2000-04-03 02:00:32 +02:00
|
|
|
|
/* Dynamic architecture support for GDB, the GNU debugger.
|
2002-04-18 20:09:09 +02:00
|
|
|
|
|
2003-01-05 00:38:46 +01:00
|
|
|
|
Copyright 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation,
|
2002-04-18 20:09:09 +02:00
|
|
|
|
Inc.
|
2000-04-03 02:00:32 +02:00
|
|
|
|
|
|
|
|
|
This file is part of GDB.
|
|
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
|
Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
|
|
|
|
|
|
#if GDB_MULTI_ARCH
|
2001-12-19 15:14:52 +01:00
|
|
|
|
#include "arch-utils.h"
|
2000-04-03 02:00:32 +02:00
|
|
|
|
#include "gdbcmd.h"
|
|
|
|
|
#include "inferior.h" /* enum CALL_DUMMY_LOCATION et.al. */
|
|
|
|
|
#else
|
|
|
|
|
/* Just include everything in sight so that the every old definition
|
|
|
|
|
of macro is visible. */
|
|
|
|
|
#include "symtab.h"
|
|
|
|
|
#include "frame.h"
|
|
|
|
|
#include "inferior.h"
|
|
|
|
|
#include "breakpoint.h"
|
|
|
|
|
#include "gdb_wait.h"
|
|
|
|
|
#include "gdbcore.h"
|
|
|
|
|
#include "gdbcmd.h"
|
|
|
|
|
#include "target.h"
|
|
|
|
|
#include "annotate.h"
|
|
|
|
|
#endif
|
2002-07-30 Andrew Cagney <ac131313@redhat.com>
* symtab.h: Replace #include "gdb_obstack.h" with opaque
declaration.
* cli/cli-cmds.c, cli/cli-script.c: Include "gdb_string.h".
* gnu-v3-abi.c, arc-tdep.c, cli/cli-decode.c: Ditto.
* avr-tdep.c, mon960-rom.c, i960-tdep.c: Ditto.
* arch-utils.c, cli/cli-setshow.c: Unconditionally include
"gdb_string.h".
* Makefile.in (cli-script.o, cli-cmds.o): Update dependencies.
(gnu-v3-abi.o, cli-setshow.o, i960-tdep.o): Ditto.
(cli-decode.o, mi-cmd-var.o, mi-cmd-disas.o): Ditto.
(avr-tdep.o, mon960-rom.o): Ditto.
(aout_stabs_gnu_h): Define.
(symtab_h): Remove $(gdb_obstack_h).
2002-07-30 15:45:15 +02:00
|
|
|
|
#include "gdb_string.h"
|
2001-04-19 02:37:24 +02:00
|
|
|
|
#include "regcache.h"
|
2001-08-11 02:59:29 +02:00
|
|
|
|
#include "gdb_assert.h"
|
2002-05-29 18:39:56 +02:00
|
|
|
|
#include "sim-regno.h"
|
2000-04-03 02:00:32 +02:00
|
|
|
|
|
2000-06-08 06:00:56 +02:00
|
|
|
|
#include "version.h"
|
|
|
|
|
|
2000-06-02 03:59:13 +02:00
|
|
|
|
#include "floatformat.h"
|
|
|
|
|
|
2002-07-03 23:27:55 +02:00
|
|
|
|
/* Implementation of extract return value that grubs around in the
|
|
|
|
|
register cache. */
|
|
|
|
|
void
|
|
|
|
|
legacy_extract_return_value (struct type *type, struct regcache *regcache,
|
2002-08-24 02:21:37 +02:00
|
|
|
|
void *valbuf)
|
2002-07-03 23:27:55 +02:00
|
|
|
|
{
|
|
|
|
|
char *registers = deprecated_grub_regcache_for_registers (regcache);
|
2002-08-24 02:21:37 +02:00
|
|
|
|
bfd_byte *buf = valbuf;
|
2002-11-14 Andrew Cagney <ac131313@redhat.com>
* regcache.h (deprecated_registers): Rename registers.
* a68v-nat.c, alpha-nat.c, arch-utils.c, core-sol2.c: Update.
* hp300ux-nat.c, hppab-nat.c, hppah-nat.c: Update.
* hppam3-nat.c, hpux-thread.c, i386gnu-nat.c: Update.
* ia64-aix-nat.c, ia64-linux-nat.c, ia64-tdep.c: Update.
* irix4-nat.c, irix5-nat.c, lynx-nat.c, m68k-tdep.c: Update.
* m68knbsd-nat.c, mips-linux-tdep.c, mipsm3-nat.c: Update.
* mipsv4-nat.c, ns32knbsd-nat.c, ppc-bdm.c: Update.
* ppc-sysv-tdep.c, ptx4-nat.c, regcache.c, remote-es.c: Update.
* remote-sds.c, remote-vx68.c, remote-vxmips.c: Update.
* remote-vxsparc.c, rs6000-tdep.c, sol-thread.c: Update.
* sparc-nat.c, sparc-tdep.c, sun3-nat.c, symm-nat.c: Update.
* v850ice.c: Update.
2002-11-14 21:37:29 +01:00
|
|
|
|
DEPRECATED_EXTRACT_RETURN_VALUE (type, registers, buf); /* OK */
|
2002-07-03 23:27:55 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-08-24 02:21:37 +02:00
|
|
|
|
/* Implementation of store return value that grubs the register cache.
|
|
|
|
|
Takes a local copy of the buffer to avoid const problems. */
|
|
|
|
|
void
|
|
|
|
|
legacy_store_return_value (struct type *type, struct regcache *regcache,
|
|
|
|
|
const void *buf)
|
|
|
|
|
{
|
|
|
|
|
bfd_byte *b = alloca (TYPE_LENGTH (type));
|
|
|
|
|
gdb_assert (regcache == current_regcache);
|
|
|
|
|
memcpy (b, buf, TYPE_LENGTH (type));
|
|
|
|
|
DEPRECATED_STORE_RETURN_VALUE (type, b);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2003-06-13 01:25:37 +02:00
|
|
|
|
int
|
|
|
|
|
always_use_struct_convention (int gcc_p, struct type *value_type)
|
|
|
|
|
{
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2002-05-29 18:39:56 +02:00
|
|
|
|
int
|
|
|
|
|
legacy_register_sim_regno (int regnum)
|
|
|
|
|
{
|
|
|
|
|
/* Only makes sense to supply raw registers. */
|
|
|
|
|
gdb_assert (regnum >= 0 && regnum < NUM_REGS);
|
|
|
|
|
/* NOTE: cagney/2002-05-13: The old code did it this way and it is
|
|
|
|
|
suspected that some GDB/SIM combinations may rely on this
|
|
|
|
|
behavour. The default should be one2one_register_sim_regno
|
|
|
|
|
(below). */
|
|
|
|
|
if (REGISTER_NAME (regnum) != NULL
|
|
|
|
|
&& REGISTER_NAME (regnum)[0] != '\0')
|
|
|
|
|
return regnum;
|
|
|
|
|
else
|
|
|
|
|
return LEGACY_SIM_REGNO_IGNORE;
|
|
|
|
|
}
|
|
|
|
|
|
2000-04-03 02:00:32 +02:00
|
|
|
|
int
|
|
|
|
|
generic_frameless_function_invocation_not (struct frame_info *fi)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2000-04-20 01:22:14 +02:00
|
|
|
|
int
|
|
|
|
|
generic_return_value_on_stack_not (struct type *type)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2001-08-15 17:29:56 +02:00
|
|
|
|
CORE_ADDR
|
|
|
|
|
generic_skip_trampoline_code (CORE_ADDR pc)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2001-11-01 00:21:33 +01:00
|
|
|
|
int
|
|
|
|
|
generic_in_solib_call_trampoline (CORE_ADDR pc, char *name)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2002-08-21 01:01:29 +02:00
|
|
|
|
int
|
|
|
|
|
generic_in_solib_return_trampoline (CORE_ADDR pc, char *name)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2001-11-06 12:02:12 +01:00
|
|
|
|
int
|
|
|
|
|
generic_in_function_epilogue_p (struct gdbarch *gdbarch, CORE_ADDR pc)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2000-04-03 02:00:32 +02:00
|
|
|
|
#if defined (CALL_DUMMY)
|
|
|
|
|
LONGEST legacy_call_dummy_words[] = CALL_DUMMY;
|
|
|
|
|
#else
|
|
|
|
|
LONGEST legacy_call_dummy_words[1];
|
|
|
|
|
#endif
|
|
|
|
|
int legacy_sizeof_call_dummy_words = sizeof (legacy_call_dummy_words);
|
|
|
|
|
|
|
|
|
|
void
|
2003-05-07 21:21:13 +02:00
|
|
|
|
generic_remote_translate_xfer_address (struct gdbarch *gdbarch,
|
|
|
|
|
struct regcache *regcache,
|
|
|
|
|
CORE_ADDR gdb_addr, int gdb_len,
|
2000-04-03 02:00:32 +02:00
|
|
|
|
CORE_ADDR * rem_addr, int *rem_len)
|
|
|
|
|
{
|
|
|
|
|
*rem_addr = gdb_addr;
|
|
|
|
|
*rem_len = gdb_len;
|
|
|
|
|
}
|
|
|
|
|
|
2000-04-29 10:55:45 +02:00
|
|
|
|
int
|
|
|
|
|
generic_prologue_frameless_p (CORE_ADDR ip)
|
|
|
|
|
{
|
|
|
|
|
return ip == SKIP_PROLOGUE (ip);
|
|
|
|
|
}
|
|
|
|
|
|
2001-09-06 01:44:44 +02:00
|
|
|
|
/* New/multi-arched targets should use the correct gdbarch field
|
|
|
|
|
instead of using this global pointer. */
|
|
|
|
|
int
|
|
|
|
|
legacy_print_insn (bfd_vma vma, disassemble_info *info)
|
|
|
|
|
{
|
2003-04-28 18:17:29 +02:00
|
|
|
|
return (*deprecated_tm_print_insn) (vma, info);
|
2001-09-06 01:44:44 +02:00
|
|
|
|
}
|
2000-04-29 10:55:45 +02:00
|
|
|
|
|
2000-05-15 05:56:30 +02:00
|
|
|
|
/* Helper functions for INNER_THAN */
|
|
|
|
|
|
|
|
|
|
int
|
2000-07-30 03:48:28 +02:00
|
|
|
|
core_addr_lessthan (CORE_ADDR lhs, CORE_ADDR rhs)
|
2000-05-15 05:56:30 +02:00
|
|
|
|
{
|
|
|
|
|
return (lhs < rhs);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int
|
2000-07-30 03:48:28 +02:00
|
|
|
|
core_addr_greaterthan (CORE_ADDR lhs, CORE_ADDR rhs)
|
2000-05-15 05:56:30 +02:00
|
|
|
|
{
|
|
|
|
|
return (lhs > rhs);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2000-06-02 03:59:13 +02:00
|
|
|
|
/* Helper functions for TARGET_{FLOAT,DOUBLE}_FORMAT */
|
|
|
|
|
|
|
|
|
|
const struct floatformat *
|
|
|
|
|
default_float_format (struct gdbarch *gdbarch)
|
|
|
|
|
{
|
|
|
|
|
#if GDB_MULTI_ARCH
|
|
|
|
|
int byte_order = gdbarch_byte_order (gdbarch);
|
|
|
|
|
#else
|
|
|
|
|
int byte_order = TARGET_BYTE_ORDER;
|
|
|
|
|
#endif
|
|
|
|
|
switch (byte_order)
|
|
|
|
|
{
|
2002-01-05 05:30:46 +01:00
|
|
|
|
case BFD_ENDIAN_BIG:
|
2000-06-02 03:59:13 +02:00
|
|
|
|
return &floatformat_ieee_single_big;
|
2001-12-15 17:53:24 +01:00
|
|
|
|
case BFD_ENDIAN_LITTLE:
|
2000-06-02 03:59:13 +02:00
|
|
|
|
return &floatformat_ieee_single_little;
|
|
|
|
|
default:
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"default_float_format: bad byte order");
|
2000-06-02 03:59:13 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
const struct floatformat *
|
|
|
|
|
default_double_format (struct gdbarch *gdbarch)
|
|
|
|
|
{
|
|
|
|
|
#if GDB_MULTI_ARCH
|
|
|
|
|
int byte_order = gdbarch_byte_order (gdbarch);
|
|
|
|
|
#else
|
|
|
|
|
int byte_order = TARGET_BYTE_ORDER;
|
|
|
|
|
#endif
|
|
|
|
|
switch (byte_order)
|
|
|
|
|
{
|
2002-01-05 05:30:46 +01:00
|
|
|
|
case BFD_ENDIAN_BIG:
|
2000-06-02 03:59:13 +02:00
|
|
|
|
return &floatformat_ieee_double_big;
|
2001-12-15 17:53:24 +01:00
|
|
|
|
case BFD_ENDIAN_LITTLE:
|
2000-06-02 03:59:13 +02:00
|
|
|
|
return &floatformat_ieee_double_little;
|
|
|
|
|
default:
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"default_double_format: bad byte order");
|
2000-06-02 03:59:13 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2000-06-06 08:45:19 +02:00
|
|
|
|
/* Misc helper functions for targets. */
|
|
|
|
|
|
|
|
|
|
int
|
2003-06-11 21:38:27 +02:00
|
|
|
|
deprecated_register_convertible_not (int num)
|
2000-06-06 08:45:19 +02:00
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2000-06-07 06:38:02 +02:00
|
|
|
|
|
2001-11-29 23:24:42 +01:00
|
|
|
|
/* Under some ABI's that specify the `struct convention' for returning
|
|
|
|
|
structures by value, by the time we've returned from the function,
|
|
|
|
|
the return value is sitting there in the caller's buffer, but GDB
|
|
|
|
|
has no way to find the address of that buffer.
|
|
|
|
|
|
|
|
|
|
On such architectures, use this function as your
|
|
|
|
|
extract_struct_value_address method. When asked to a struct
|
|
|
|
|
returned by value in this fashion, GDB will print a nice error
|
|
|
|
|
message, instead of garbage. */
|
|
|
|
|
CORE_ADDR
|
|
|
|
|
generic_cannot_extract_struct_value_address (char *dummy)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2000-10-26 09:41:25 +02:00
|
|
|
|
CORE_ADDR
|
2001-06-16 00:10:21 +02:00
|
|
|
|
core_addr_identity (CORE_ADDR addr)
|
2000-10-26 09:41:25 +02:00
|
|
|
|
{
|
|
|
|
|
return addr;
|
|
|
|
|
}
|
|
|
|
|
|
2000-12-04 05:01:16 +01:00
|
|
|
|
int
|
|
|
|
|
no_op_reg_to_regnum (int reg)
|
|
|
|
|
{
|
|
|
|
|
return reg;
|
|
|
|
|
}
|
|
|
|
|
|
2002-12-09 03:04:17 +01:00
|
|
|
|
CORE_ADDR
|
2001-06-16 01:10:55 +02:00
|
|
|
|
init_frame_pc_noop (int fromleaf, struct frame_info *prev)
|
|
|
|
|
{
|
2002-12-09 03:04:17 +01:00
|
|
|
|
/* Do nothing, implies return the same PC value. */
|
|
|
|
|
return get_frame_pc (prev);
|
2001-06-16 01:10:55 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-12-09 03:04:17 +01:00
|
|
|
|
CORE_ADDR
|
2001-06-16 22:00:24 +02:00
|
|
|
|
init_frame_pc_default (int fromleaf, struct frame_info *prev)
|
|
|
|
|
{
|
2003-04-11 20:15:40 +02:00
|
|
|
|
if (fromleaf && DEPRECATED_SAVED_PC_AFTER_CALL_P ())
|
|
|
|
|
return DEPRECATED_SAVED_PC_AFTER_CALL (get_next_frame (prev));
|
2002-12-09 01:32:08 +01:00
|
|
|
|
else if (get_next_frame (prev) != NULL)
|
2003-03-12 17:50:47 +01:00
|
|
|
|
return DEPRECATED_FRAME_SAVED_PC (get_next_frame (prev));
|
2001-06-16 22:00:24 +02:00
|
|
|
|
else
|
2002-12-09 03:04:17 +01:00
|
|
|
|
return read_pc ();
|
2001-06-16 22:00:24 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-02-06 02:20:23 +01:00
|
|
|
|
void
|
|
|
|
|
default_elf_make_msymbol_special (asymbol *sym, struct minimal_symbol *msym)
|
|
|
|
|
{
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
default_coff_make_msymbol_special (int val, struct minimal_symbol *msym)
|
|
|
|
|
{
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
2001-06-16 01:50:46 +02:00
|
|
|
|
int
|
|
|
|
|
cannot_register_not (int regnum)
|
|
|
|
|
{
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
2001-08-11 02:59:29 +02:00
|
|
|
|
|
|
|
|
|
/* Legacy version of target_virtual_frame_pointer(). Assumes that
|
2003-04-28 Andrew Cagney <cagney@redhat.com>
* gdbarch.sh (DEPRECATED_TARGET_READ_FP): Replace TARGET_READ_FP.
(DEPRECATED_FP_REGNUM): Replace FP_REGNUM.
* gdbarch.h, gdbarch.c: Re-generate.
* infcall.c (call_function_by_hand): Use DEPRECATED_FP_REGNUM,
DEPRECATED_TARGET_READ_FP, or "sp" to create the dummy frame ID.
* inferior.h (deprecated_read_fp): Rename read_fp.
(generic_target_read_fp): Delete declaration.
* regcache.c (generic_target_read_fp): Delete function.
(deprecated_read_fp): Replace read_fp, use
DEPRECATED_TARGET_READ_FP or DEPRECATED_FP_REGNUM.
* d10v-tdep.c (d10v_read_fp): Delete function.
(d10v_gdbarch_init): Do not set deprecated_read_fp.
* sparc-tdep.c (sparc_gdbarch_init): Do not set
deprecated_target_read_fp to generic_target_read_fp.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* xstormy16-tdep.c (xstormy16_gdbarch_init): Set
deprecated_fp_regnum.
* x86-64-tdep.c (x86_64_init_abi): Ditto.
* vax-tdep.c (vax_gdbarch_init): Ditto.
* v850-tdep.c (v850_gdbarch_init): Ditto.
* sparc-tdep.c (sparc_gdbarch_init): Ditto.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* s390-tdep.c (s390_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* mn10300-tdep.c (mn10300_gdbarch_init): Ditto.
* mcore-tdep.c (mcore_gdbarch_init): Ditto.
* m68k-tdep.c (m68k_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* i386-tdep.c (i386_gdbarch_init): Ditto.
* hppa-tdep.c (hppa_gdbarch_init): Ditto.
* h8300-tdep.c (h8300_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* cris-tdep.c (cris_gdbarch_init): Ditto.
* avr-tdep.c (avr_gdbarch_init): Ditto.
* arm-tdep.c (arm_gdbarch_init): Ditto.
* alpha-tdep.c (alpha_gdbarch_init): Ditto.
* x86-64-tdep.c (x86_64_init_abi): Set deprecated_target_read_fp.
* v850-tdep.c (v850_gdbarch_init): Ditto.
* sparc-tdep.c (sparc_gdbarch_init): Ditto.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* s390-tdep.c (s390_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* mn10300-tdep.c (mn10300_gdbarch_init): Ditto.
* mips-tdep.c (mips_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* hppa-tdep.c (hppa_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* avr-tdep.c (avr_gdbarch_init): Ditto.
* arm-tdep.c (arm_gdbarch_init): Ditto.
* vax-tdep.c (vax_frame_init_saved_regs): Replace FP_REGNUM with
DEPRECATED_FP_REGNUM.
(vax_push_dummy_frame, vax_pop_frame): Ditto.
* std-regs.c (value_of_builtin_frame_fp_reg): Ditto.
* sparc-tdep.c (sparc_init_extra_frame_info): Ditto.
(sparc_push_dummy_frame, sparc64_read_fp): Ditto.
(sparc32_register_virtual_type): Ditto.
* sh-tdep.c (sh64_frame_chain): Ditto.
(sh64_get_saved_register, sh64_pop_frame): Ditto.
(sh_nofp_frame_init_saved_regs): Ditto.
(sh64_nofp_frame_init_saved_regs): Ditto.
(sh_fp_frame_init_saved_regs): Ditto.
* remote-mips.c (mips_wait, mips_fetch_registers): Ditto.
* remote-e7000.c (fetch_regs_from_dump): Ditto.
* procfs.c (procfs_fetch_registers): Ditto.
(procfs_store_registers): Ditto.
* ns32knbsd-nat.c (fetch_inferior_registers): Ditto.
(store_inferior_registers, fetch_core_registers): Ditto.
(fetch_kcore_registers, clear_regs): Ditto.
* ns32k-tdep.c (ns32k_frame_init_saved_regs): Ditto.
(ns32k_push_dummy_frame, ns32k_pop_frame): Ditto.
* nlm/i386.h (DEPRECATED_FP_REGNUM): Ditto.
* nlm/i386.c (do_status): Ditto.
* mipsv4-nat.c (supply_gregset): Ditto.
* mips-tdep.c: Ditto for comments.
* mips-nat.c (fetch_inferior_registers): Ditto.
(store_inferior_registers, fetch_core_registers): Ditto.
* m68k-tdep.c (m68k_push_dummy_frame): Ditto.
(m68k_pop_frame, m68k_frame_init_saved_regs): Ditto.
* i386-tdep.c (i386_frame_init_saved_regs): Ditto.
(i386_do_pop_frame, i386_register_type): Ditto.
* hppa-tdep.c (hppa_frame_chain): Ditto.
(hppa_push_dummy_frame, find_dummy_frame_regs): Ditto.
(hppa_pop_frame, hppa_read_fp): Ditto.
(skip_prologue_hard_way, hppa_frame_find_saved_regs): Ditto.
* cris-tdep.c (cris_examine, cris_pop_frame): Ditto.
* config/vax/nm-vax.h (REGISTER_U_ADDR): Ditto.
* config/sparc/tm-sparc.h (DEPRECATED_FP_REGNUM): Ditto.
* config/sparc/tm-sp64.h (DEPRECATED_FP_REGNUM): Ditto.
* config/s390/tm-s390.h (DEPRECATED_FP_REGNUM): Ditto.
* config/pa/tm-hppa64.h (DEPRECATED_FP_REGNUM): Ditto.
* config/ia64/tm-ia64.h (DEPRECATED_FP_REGNUM): Ditto.
* blockframe.c: Ditto for comments.
* arch-utils.h: Ditto for comments.
* arch-utils.c (legacy_virtual_frame_pointer): Ditto.
* alphanbsd-tdep.c (fetch_core_registers): Ditto.
* alphabsd-nat.c (fetch_inferior_registers): Ditto.
* alpha-tdep.h: Ditto for comments.
* alpha-tdep.c (alpha_cannot_fetch_register): Ditto.
(alpha_cannot_store_register): Ditto.
(alpha_push_dummy_frame): Ditto.
* alpha-nat.c (supply_gregset): Ditto.
* config/sparc/tm-sp64.h (DEPRECATED_TARGET_READ_FP): Update.
* config/pa/tm-hppa64.h (DEPRECATED_TARGET_READ_FP): Update.
* config/sparc/tm-sparc.h: Update comment.
* hppa-tdep.c (hppa_init_extra_frame_info): Use
deprecated_read_fp instead of TARGET_READ_FP.
(hppa_init_extra_frame_info, hppa_frame_chain): Ditto.
(hppa_push_dummy_frame, hppa_read_fp): Ditto.
* sparc-tdep.c (sparc_init_extra_frame_info): Use
deprecated_read_fp instead of read_fp.
* s390-tdep.c (s390_push_arguments): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* frame.h: Ditto in comments.
* frame.c (legacy_get_prev_frame): Ditto.
* dummy-frame.c (dummy_frame_this_id): Ditto.
* arm-tdep.c (arm_init_extra_frame_info): Ditto.
2003-04-28 Andrew Cagney <cagney@redhat.com>
* gdbint.texinfo (Target Architecture Definition): Replace
read_fp, TARGET_READ_FP and FP_REGNUM, with deprecated_read_fp,
DEPRECATED_TARGET_READ_FP and DEPRECATED_REGNUM.
2003-04-29 03:49:49 +02:00
|
|
|
|
there is an DEPRECATED_FP_REGNUM and that it is the same, cooked or
|
|
|
|
|
raw. */
|
2001-08-11 02:59:29 +02:00
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
legacy_virtual_frame_pointer (CORE_ADDR pc,
|
|
|
|
|
int *frame_regnum,
|
|
|
|
|
LONGEST *frame_offset)
|
|
|
|
|
{
|
2002-09-17 23:18:54 +02:00
|
|
|
|
/* FIXME: cagney/2002-09-13: This code is used when identifying the
|
|
|
|
|
frame pointer of the current PC. It is assuming that a single
|
|
|
|
|
register and an offset can determine this. I think it should
|
|
|
|
|
instead generate a byte code expression as that would work better
|
|
|
|
|
with things like Dwarf2's CFI. */
|
2003-04-28 Andrew Cagney <cagney@redhat.com>
* gdbarch.sh (DEPRECATED_TARGET_READ_FP): Replace TARGET_READ_FP.
(DEPRECATED_FP_REGNUM): Replace FP_REGNUM.
* gdbarch.h, gdbarch.c: Re-generate.
* infcall.c (call_function_by_hand): Use DEPRECATED_FP_REGNUM,
DEPRECATED_TARGET_READ_FP, or "sp" to create the dummy frame ID.
* inferior.h (deprecated_read_fp): Rename read_fp.
(generic_target_read_fp): Delete declaration.
* regcache.c (generic_target_read_fp): Delete function.
(deprecated_read_fp): Replace read_fp, use
DEPRECATED_TARGET_READ_FP or DEPRECATED_FP_REGNUM.
* d10v-tdep.c (d10v_read_fp): Delete function.
(d10v_gdbarch_init): Do not set deprecated_read_fp.
* sparc-tdep.c (sparc_gdbarch_init): Do not set
deprecated_target_read_fp to generic_target_read_fp.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* xstormy16-tdep.c (xstormy16_gdbarch_init): Set
deprecated_fp_regnum.
* x86-64-tdep.c (x86_64_init_abi): Ditto.
* vax-tdep.c (vax_gdbarch_init): Ditto.
* v850-tdep.c (v850_gdbarch_init): Ditto.
* sparc-tdep.c (sparc_gdbarch_init): Ditto.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* s390-tdep.c (s390_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* mn10300-tdep.c (mn10300_gdbarch_init): Ditto.
* mcore-tdep.c (mcore_gdbarch_init): Ditto.
* m68k-tdep.c (m68k_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* i386-tdep.c (i386_gdbarch_init): Ditto.
* hppa-tdep.c (hppa_gdbarch_init): Ditto.
* h8300-tdep.c (h8300_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* cris-tdep.c (cris_gdbarch_init): Ditto.
* avr-tdep.c (avr_gdbarch_init): Ditto.
* arm-tdep.c (arm_gdbarch_init): Ditto.
* alpha-tdep.c (alpha_gdbarch_init): Ditto.
* x86-64-tdep.c (x86_64_init_abi): Set deprecated_target_read_fp.
* v850-tdep.c (v850_gdbarch_init): Ditto.
* sparc-tdep.c (sparc_gdbarch_init): Ditto.
* sh-tdep.c (sh_gdbarch_init): Ditto.
* s390-tdep.c (s390_gdbarch_init): Ditto.
* rs6000-tdep.c (rs6000_gdbarch_init): Ditto.
* mn10300-tdep.c (mn10300_gdbarch_init): Ditto.
* mips-tdep.c (mips_gdbarch_init): Ditto.
* m68hc11-tdep.c (m68hc11_gdbarch_init): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* hppa-tdep.c (hppa_gdbarch_init): Ditto.
* frv-tdep.c (frv_gdbarch_init): Ditto.
* avr-tdep.c (avr_gdbarch_init): Ditto.
* arm-tdep.c (arm_gdbarch_init): Ditto.
* vax-tdep.c (vax_frame_init_saved_regs): Replace FP_REGNUM with
DEPRECATED_FP_REGNUM.
(vax_push_dummy_frame, vax_pop_frame): Ditto.
* std-regs.c (value_of_builtin_frame_fp_reg): Ditto.
* sparc-tdep.c (sparc_init_extra_frame_info): Ditto.
(sparc_push_dummy_frame, sparc64_read_fp): Ditto.
(sparc32_register_virtual_type): Ditto.
* sh-tdep.c (sh64_frame_chain): Ditto.
(sh64_get_saved_register, sh64_pop_frame): Ditto.
(sh_nofp_frame_init_saved_regs): Ditto.
(sh64_nofp_frame_init_saved_regs): Ditto.
(sh_fp_frame_init_saved_regs): Ditto.
* remote-mips.c (mips_wait, mips_fetch_registers): Ditto.
* remote-e7000.c (fetch_regs_from_dump): Ditto.
* procfs.c (procfs_fetch_registers): Ditto.
(procfs_store_registers): Ditto.
* ns32knbsd-nat.c (fetch_inferior_registers): Ditto.
(store_inferior_registers, fetch_core_registers): Ditto.
(fetch_kcore_registers, clear_regs): Ditto.
* ns32k-tdep.c (ns32k_frame_init_saved_regs): Ditto.
(ns32k_push_dummy_frame, ns32k_pop_frame): Ditto.
* nlm/i386.h (DEPRECATED_FP_REGNUM): Ditto.
* nlm/i386.c (do_status): Ditto.
* mipsv4-nat.c (supply_gregset): Ditto.
* mips-tdep.c: Ditto for comments.
* mips-nat.c (fetch_inferior_registers): Ditto.
(store_inferior_registers, fetch_core_registers): Ditto.
* m68k-tdep.c (m68k_push_dummy_frame): Ditto.
(m68k_pop_frame, m68k_frame_init_saved_regs): Ditto.
* i386-tdep.c (i386_frame_init_saved_regs): Ditto.
(i386_do_pop_frame, i386_register_type): Ditto.
* hppa-tdep.c (hppa_frame_chain): Ditto.
(hppa_push_dummy_frame, find_dummy_frame_regs): Ditto.
(hppa_pop_frame, hppa_read_fp): Ditto.
(skip_prologue_hard_way, hppa_frame_find_saved_regs): Ditto.
* cris-tdep.c (cris_examine, cris_pop_frame): Ditto.
* config/vax/nm-vax.h (REGISTER_U_ADDR): Ditto.
* config/sparc/tm-sparc.h (DEPRECATED_FP_REGNUM): Ditto.
* config/sparc/tm-sp64.h (DEPRECATED_FP_REGNUM): Ditto.
* config/s390/tm-s390.h (DEPRECATED_FP_REGNUM): Ditto.
* config/pa/tm-hppa64.h (DEPRECATED_FP_REGNUM): Ditto.
* config/ia64/tm-ia64.h (DEPRECATED_FP_REGNUM): Ditto.
* blockframe.c: Ditto for comments.
* arch-utils.h: Ditto for comments.
* arch-utils.c (legacy_virtual_frame_pointer): Ditto.
* alphanbsd-tdep.c (fetch_core_registers): Ditto.
* alphabsd-nat.c (fetch_inferior_registers): Ditto.
* alpha-tdep.h: Ditto for comments.
* alpha-tdep.c (alpha_cannot_fetch_register): Ditto.
(alpha_cannot_store_register): Ditto.
(alpha_push_dummy_frame): Ditto.
* alpha-nat.c (supply_gregset): Ditto.
* config/sparc/tm-sp64.h (DEPRECATED_TARGET_READ_FP): Update.
* config/pa/tm-hppa64.h (DEPRECATED_TARGET_READ_FP): Update.
* config/sparc/tm-sparc.h: Update comment.
* hppa-tdep.c (hppa_init_extra_frame_info): Use
deprecated_read_fp instead of TARGET_READ_FP.
(hppa_init_extra_frame_info, hppa_frame_chain): Ditto.
(hppa_push_dummy_frame, hppa_read_fp): Ditto.
* sparc-tdep.c (sparc_init_extra_frame_info): Use
deprecated_read_fp instead of read_fp.
* s390-tdep.c (s390_push_arguments): Ditto.
* ia64-tdep.c (ia64_gdbarch_init): Ditto.
* frame.h: Ditto in comments.
* frame.c (legacy_get_prev_frame): Ditto.
* dummy-frame.c (dummy_frame_this_id): Ditto.
* arm-tdep.c (arm_init_extra_frame_info): Ditto.
2003-04-28 Andrew Cagney <cagney@redhat.com>
* gdbint.texinfo (Target Architecture Definition): Replace
read_fp, TARGET_READ_FP and FP_REGNUM, with deprecated_read_fp,
DEPRECATED_TARGET_READ_FP and DEPRECATED_REGNUM.
2003-04-29 03:49:49 +02:00
|
|
|
|
if (DEPRECATED_FP_REGNUM >= 0 && DEPRECATED_FP_REGNUM < NUM_REGS)
|
|
|
|
|
*frame_regnum = DEPRECATED_FP_REGNUM;
|
2002-09-17 23:18:54 +02:00
|
|
|
|
else if (SP_REGNUM >= 0 && SP_REGNUM < NUM_REGS)
|
|
|
|
|
*frame_regnum = SP_REGNUM;
|
|
|
|
|
else
|
|
|
|
|
/* Should this be an internal error? I guess so, it is reflecting
|
|
|
|
|
an architectural limitation in the current design. */
|
|
|
|
|
internal_error (__FILE__, __LINE__, "No virtual frame pointer available");
|
2001-08-11 02:59:29 +02:00
|
|
|
|
*frame_offset = 0;
|
|
|
|
|
}
|
2001-12-10 05:58:31 +01:00
|
|
|
|
|
2002-05-12 04:16:05 +02:00
|
|
|
|
/* Assume the world is sane, every register's virtual and real size
|
|
|
|
|
is identical. */
|
2001-12-10 05:58:31 +01:00
|
|
|
|
|
|
|
|
|
int
|
2002-05-12 04:16:05 +02:00
|
|
|
|
generic_register_size (int regnum)
|
2001-12-10 05:58:31 +01:00
|
|
|
|
{
|
|
|
|
|
gdb_assert (regnum >= 0 && regnum < NUM_REGS + NUM_PSEUDO_REGS);
|
2003-03-01 18:59:12 +01:00
|
|
|
|
if (gdbarch_register_type_p (current_gdbarch))
|
|
|
|
|
return TYPE_LENGTH (gdbarch_register_type (current_gdbarch, regnum));
|
|
|
|
|
else
|
|
|
|
|
/* FIXME: cagney/2003-03-01: Once all architectures implement
|
|
|
|
|
gdbarch_register_type(), this entire function can go away. It
|
|
|
|
|
is made obsolete by register_size(). */
|
|
|
|
|
return TYPE_LENGTH (REGISTER_VIRTUAL_TYPE (regnum)); /* OK */
|
2001-12-11 23:15:55 +01:00
|
|
|
|
}
|
|
|
|
|
|
2002-08-10 04:00:16 +02:00
|
|
|
|
/* Assume all registers are adjacent. */
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
generic_register_byte (int regnum)
|
|
|
|
|
{
|
|
|
|
|
int byte;
|
|
|
|
|
int i;
|
|
|
|
|
gdb_assert (regnum >= 0 && regnum < NUM_REGS + NUM_PSEUDO_REGS);
|
|
|
|
|
byte = 0;
|
|
|
|
|
for (i = 0; i < regnum; i++)
|
|
|
|
|
{
|
2003-03-02 11:23:09 +01:00
|
|
|
|
byte += generic_register_size (i);
|
2002-08-10 04:00:16 +02:00
|
|
|
|
}
|
|
|
|
|
return byte;
|
|
|
|
|
}
|
|
|
|
|
|
2002-04-24 18:28:16 +02:00
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
legacy_pc_in_sigtramp (CORE_ADDR pc, char *name)
|
|
|
|
|
{
|
2002-09-14 11:40:36 +02:00
|
|
|
|
#if !defined (IN_SIGTRAMP)
|
|
|
|
|
if (SIGTRAMP_START_P ())
|
|
|
|
|
return (pc) >= SIGTRAMP_START (pc) && (pc) < SIGTRAMP_END (pc);
|
|
|
|
|
else
|
|
|
|
|
return name && strcmp ("_sigtramp", name) == 0;
|
|
|
|
|
#else
|
|
|
|
|
return IN_SIGTRAMP (pc, name);
|
|
|
|
|
#endif
|
2002-04-24 18:28:16 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-05-12 05:09:12 +02:00
|
|
|
|
int
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
legacy_convert_register_p (int regnum, struct type *type)
|
2002-05-12 05:09:12 +02:00
|
|
|
|
{
|
2003-06-11 21:38:27 +02:00
|
|
|
|
return DEPRECATED_REGISTER_CONVERTIBLE (regnum);
|
2002-05-12 05:09:12 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
legacy_register_to_value (struct frame_info *frame, int regnum,
|
|
|
|
|
struct type *type, void *to)
|
2002-05-12 05:09:12 +02:00
|
|
|
|
{
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
char from[MAX_REGISTER_SIZE];
|
|
|
|
|
frame_read_register (frame, regnum, from);
|
2003-06-11 21:38:27 +02:00
|
|
|
|
DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL (regnum, type, from, to);
|
2002-05-12 05:09:12 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
legacy_value_to_register (struct frame_info *frame, int regnum,
|
|
|
|
|
struct type *type, const void *tmp)
|
2002-05-12 05:09:12 +02:00
|
|
|
|
{
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
char to[MAX_REGISTER_SIZE];
|
|
|
|
|
char *from = alloca (TYPE_LENGTH (type));
|
|
|
|
|
memcpy (from, from, TYPE_LENGTH (type));
|
2003-06-11 21:38:27 +02:00
|
|
|
|
DEPRECATED_REGISTER_CONVERT_TO_RAW (type, regnum, from, to);
|
2003-06-14 Andrew Cagney <cagney@redhat.com>
Mark Kettenis <kettenis@gnu.org>
* gdbarch.sh (CONVERT_REGISTER_P): Add "type" parameter.
(REGISTER_TO_VALUE, VALUE_TO_REGISTER): Replace raw buffer
parameter with "frame".
* gdbarch.h, gdbarch.c: Re-generate.
* frame.h (put_frame_register): Declare.
* frame.c (put_frame_register): New function.
* arch-utils.c (legacy_convert_register_p): Add "type" parameter.
(legacy_register_to_value): Rewrite, use "frame" to get the
register value.
(legacy_value_to_register): Rewrite, use "frame" to find the
register's location before storing.
* arch-utils.h (legacy_convert_register_p): Update.
(legacy_register_to_value, legacy_value_to_register): Update.
* findvar.c (value_from_register): Rewrite, eliminate use of
REGISTER_CONVERT_TO_TYPE, pass "type" to CONVERT_REGISTER_P, pass
"frame" to REGISTER_TO_VALUE.
* valops.c (value_assign): Move the CONVERT_REGISTER code to the
lval_reg_frame_relative + lval_register branch of the switch. Do
not use REGISTER_CONVERT_FROM_TYPE. Use put_frame_register.
* i386-tdep.c (I386_EBX_REGNUM, I386_ECX_REGNUM, I386_ESI_REGNUM,
I386_EDI_REGNUM): New defines.
(i386_next_regnum, i386_convert_register_p,
i386_register_to_value, i386_value_to_register): New functions.
(i386_register_convertible, i386_register_convert_to_virtual,
i386_convert_to_raw): Remove functions.
(i386_gdbarch_init): Set convert_register_p, register_to_value and
value_to_register instead of register_convertible,
register_convert_to_virtual and register_convert_to_raw.
* mips-tdep.c (mips_convert_register_p): New function.
(mips_value_to_register): Replace mips_register_convert_from_type.
(mips_register_to_value): Replace mips_register_convert_to_type.
(mips_gdbarch_init): Set conver_register_p, value_to_register and
register_to_value.
* alpha-tdep.c (alpha_convert_register_p): Update.
(alpha_value_to_register): Update, store the register.
(alpha_register_to_value): Update, fetch the register.
2003-06-15 00:35:25 +02:00
|
|
|
|
put_frame_register (frame, regnum, to);
|
2002-05-12 05:09:12 +02:00
|
|
|
|
}
|
|
|
|
|
|
2001-06-16 01:50:46 +02:00
|
|
|
|
|
2000-06-07 06:38:02 +02:00
|
|
|
|
/* Functions to manipulate the endianness of the target. */
|
|
|
|
|
|
2000-06-08 06:00:56 +02:00
|
|
|
|
/* ``target_byte_order'' is only used when non- multi-arch.
|
2002-01-29 04:51:19 +01:00
|
|
|
|
Multi-arch targets obtain the current byte order using the
|
|
|
|
|
TARGET_BYTE_ORDER gdbarch method.
|
|
|
|
|
|
|
|
|
|
The choice of initial value is entirely arbitrary. During startup,
|
|
|
|
|
the function initialize_current_architecture() updates this value
|
|
|
|
|
based on default byte-order information extracted from BFD. */
|
|
|
|
|
int target_byte_order = BFD_ENDIAN_BIG;
|
2000-06-07 06:38:02 +02:00
|
|
|
|
int target_byte_order_auto = 1;
|
|
|
|
|
|
2000-06-08 02:52:56 +02:00
|
|
|
|
static const char endian_big[] = "big";
|
|
|
|
|
static const char endian_little[] = "little";
|
|
|
|
|
static const char endian_auto[] = "auto";
|
|
|
|
|
static const char *endian_enum[] =
|
2000-06-07 06:38:02 +02:00
|
|
|
|
{
|
|
|
|
|
endian_big,
|
|
|
|
|
endian_little,
|
|
|
|
|
endian_auto,
|
|
|
|
|
NULL,
|
|
|
|
|
};
|
2000-06-08 02:52:56 +02:00
|
|
|
|
static const char *set_endian_string;
|
2000-06-07 06:38:02 +02:00
|
|
|
|
|
|
|
|
|
/* Called by ``show endian''. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
show_endian (char *args, int from_tty)
|
|
|
|
|
{
|
|
|
|
|
if (TARGET_BYTE_ORDER_AUTO)
|
|
|
|
|
printf_unfiltered ("The target endianness is set automatically (currently %s endian)\n",
|
2002-01-05 05:30:46 +01:00
|
|
|
|
(TARGET_BYTE_ORDER == BFD_ENDIAN_BIG ? "big" : "little"));
|
2000-06-07 06:38:02 +02:00
|
|
|
|
else
|
|
|
|
|
printf_unfiltered ("The target is assumed to be %s endian\n",
|
2002-01-05 05:30:46 +01:00
|
|
|
|
(TARGET_BYTE_ORDER == BFD_ENDIAN_BIG ? "big" : "little"));
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
set_endian (char *ignore_args, int from_tty, struct cmd_list_element *c)
|
|
|
|
|
{
|
2002-01-20 20:26:50 +01:00
|
|
|
|
if (set_endian_string == endian_auto)
|
2000-06-07 06:38:02 +02:00
|
|
|
|
{
|
|
|
|
|
target_byte_order_auto = 1;
|
|
|
|
|
}
|
|
|
|
|
else if (set_endian_string == endian_little)
|
|
|
|
|
{
|
|
|
|
|
target_byte_order_auto = 0;
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
|
|
|
|
{
|
|
|
|
|
struct gdbarch_info info;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
gdbarch_info_init (&info);
|
2001-12-15 17:53:24 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_LITTLE;
|
2000-08-11 03:30:11 +02:00
|
|
|
|
if (! gdbarch_update_p (info))
|
|
|
|
|
{
|
|
|
|
|
printf_unfiltered ("Little endian target not supported by GDB\n");
|
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
2000-06-08 06:00:56 +02:00
|
|
|
|
else
|
|
|
|
|
{
|
2001-12-15 17:53:24 +01:00
|
|
|
|
target_byte_order = BFD_ENDIAN_LITTLE;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
else if (set_endian_string == endian_big)
|
|
|
|
|
{
|
|
|
|
|
target_byte_order_auto = 0;
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
|
|
|
|
{
|
|
|
|
|
struct gdbarch_info info;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
gdbarch_info_init (&info);
|
2002-01-05 05:30:46 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_BIG;
|
2000-08-11 03:30:11 +02:00
|
|
|
|
if (! gdbarch_update_p (info))
|
|
|
|
|
{
|
|
|
|
|
printf_unfiltered ("Big endian target not supported by GDB\n");
|
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
2000-06-08 06:00:56 +02:00
|
|
|
|
else
|
|
|
|
|
{
|
2002-01-05 05:30:46 +01:00
|
|
|
|
target_byte_order = BFD_ENDIAN_BIG;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
else
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_endian: bad value");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
show_endian (NULL, from_tty);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Set the endianness from a BFD. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
set_endian_from_file (bfd *abfd)
|
|
|
|
|
{
|
2002-01-20 20:26:50 +01:00
|
|
|
|
int want;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
if (GDB_MULTI_ARCH)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_endian_from_file: not for multi-arch");
|
2002-01-20 20:26:50 +01:00
|
|
|
|
if (bfd_big_endian (abfd))
|
|
|
|
|
want = BFD_ENDIAN_BIG;
|
2000-06-07 06:38:02 +02:00
|
|
|
|
else
|
2002-01-20 20:26:50 +01:00
|
|
|
|
want = BFD_ENDIAN_LITTLE;
|
|
|
|
|
if (TARGET_BYTE_ORDER_AUTO)
|
|
|
|
|
target_byte_order = want;
|
|
|
|
|
else if (TARGET_BYTE_ORDER != want)
|
|
|
|
|
warning ("%s endian file does not match %s endian target.",
|
|
|
|
|
want == BFD_ENDIAN_BIG ? "big" : "little",
|
|
|
|
|
TARGET_BYTE_ORDER == BFD_ENDIAN_BIG ? "big" : "little");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Functions to manipulate the architecture of the target */
|
|
|
|
|
|
|
|
|
|
enum set_arch { set_arch_auto, set_arch_manual };
|
|
|
|
|
|
|
|
|
|
int target_architecture_auto = 1;
|
|
|
|
|
|
2000-06-08 02:52:56 +02:00
|
|
|
|
const char *set_architecture_string;
|
2000-06-07 06:38:02 +02:00
|
|
|
|
|
|
|
|
|
/* Old way of changing the current architecture. */
|
|
|
|
|
|
|
|
|
|
extern const struct bfd_arch_info bfd_default_arch_struct;
|
|
|
|
|
const struct bfd_arch_info *target_architecture = &bfd_default_arch_struct;
|
|
|
|
|
int (*target_architecture_hook) (const struct bfd_arch_info *ap);
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
arch_ok (const struct bfd_arch_info *arch)
|
|
|
|
|
{
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"arch_ok: not multi-arched");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
/* Should be performing the more basic check that the binary is
|
|
|
|
|
compatible with GDB. */
|
|
|
|
|
/* Check with the target that the architecture is valid. */
|
|
|
|
|
return (target_architecture_hook == NULL
|
|
|
|
|
|| target_architecture_hook (arch));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
set_arch (const struct bfd_arch_info *arch,
|
|
|
|
|
enum set_arch type)
|
|
|
|
|
{
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_arch: not multi-arched");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
switch (type)
|
|
|
|
|
{
|
|
|
|
|
case set_arch_auto:
|
|
|
|
|
if (!arch_ok (arch))
|
|
|
|
|
warning ("Target may not support %s architecture",
|
|
|
|
|
arch->printable_name);
|
|
|
|
|
target_architecture = arch;
|
|
|
|
|
break;
|
|
|
|
|
case set_arch_manual:
|
|
|
|
|
if (!arch_ok (arch))
|
|
|
|
|
{
|
|
|
|
|
printf_unfiltered ("Target does not support `%s' architecture.\n",
|
|
|
|
|
arch->printable_name);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
target_architecture_auto = 0;
|
|
|
|
|
target_architecture = arch;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
if (gdbarch_debug)
|
2000-06-10 07:37:47 +02:00
|
|
|
|
gdbarch_dump (current_gdbarch, gdb_stdlog);
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Set the architecture from arch/machine (deprecated) */
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
set_architecture_from_arch_mach (enum bfd_architecture arch,
|
|
|
|
|
unsigned long mach)
|
|
|
|
|
{
|
|
|
|
|
const struct bfd_arch_info *wanted = bfd_lookup_arch (arch, mach);
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_architecture_from_arch_mach: not multi-arched");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
if (wanted != NULL)
|
|
|
|
|
set_arch (wanted, set_arch_manual);
|
|
|
|
|
else
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"gdbarch: hardwired architecture/machine not recognized");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Set the architecture from a BFD (deprecated) */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
set_architecture_from_file (bfd *abfd)
|
|
|
|
|
{
|
|
|
|
|
const struct bfd_arch_info *wanted = bfd_get_arch_info (abfd);
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_architecture_from_file: not multi-arched");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
if (target_architecture_auto)
|
|
|
|
|
{
|
|
|
|
|
set_arch (wanted, set_arch_auto);
|
|
|
|
|
}
|
|
|
|
|
else if (wanted != target_architecture)
|
|
|
|
|
{
|
|
|
|
|
warning ("%s architecture file may be incompatible with %s target.",
|
|
|
|
|
wanted->printable_name,
|
|
|
|
|
target_architecture->printable_name);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Called if the user enters ``show architecture'' without an
|
|
|
|
|
argument. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
show_architecture (char *args, int from_tty)
|
|
|
|
|
{
|
|
|
|
|
const char *arch;
|
|
|
|
|
arch = TARGET_ARCHITECTURE->printable_name;
|
|
|
|
|
if (target_architecture_auto)
|
|
|
|
|
printf_filtered ("The target architecture is set automatically (currently %s)\n", arch);
|
|
|
|
|
else
|
|
|
|
|
printf_filtered ("The target architecture is assumed to be %s\n", arch);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Called if the user enters ``set architecture'' with or without an
|
|
|
|
|
argument. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
set_architecture (char *ignore_args, int from_tty, struct cmd_list_element *c)
|
|
|
|
|
{
|
|
|
|
|
if (strcmp (set_architecture_string, "auto") == 0)
|
|
|
|
|
{
|
|
|
|
|
target_architecture_auto = 1;
|
|
|
|
|
}
|
|
|
|
|
else if (GDB_MULTI_ARCH)
|
|
|
|
|
{
|
|
|
|
|
struct gdbarch_info info;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
gdbarch_info_init (&info);
|
2000-06-07 06:38:02 +02:00
|
|
|
|
info.bfd_arch_info = bfd_scan_arch (set_architecture_string);
|
|
|
|
|
if (info.bfd_arch_info == NULL)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_architecture: bfd_scan_arch failed");
|
2000-08-11 03:30:11 +02:00
|
|
|
|
if (gdbarch_update_p (info))
|
2000-06-07 06:38:02 +02:00
|
|
|
|
target_architecture_auto = 0;
|
|
|
|
|
else
|
2000-10-27 21:17:57 +02:00
|
|
|
|
printf_unfiltered ("Architecture `%s' not recognized.\n",
|
2000-06-07 06:38:02 +02:00
|
|
|
|
set_architecture_string);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
const struct bfd_arch_info *arch
|
|
|
|
|
= bfd_scan_arch (set_architecture_string);
|
|
|
|
|
if (arch == NULL)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"set_architecture: bfd_scan_arch failed");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
set_arch (arch, set_arch_manual);
|
|
|
|
|
}
|
|
|
|
|
show_architecture (NULL, from_tty);
|
|
|
|
|
}
|
|
|
|
|
|
2000-09-02 01:39:11 +02:00
|
|
|
|
/* Set the dynamic target-system-dependent parameters (architecture,
|
2000-06-07 06:38:02 +02:00
|
|
|
|
byte-order) using information found in the BFD */
|
|
|
|
|
|
|
|
|
|
void
|
2000-07-30 03:48:28 +02:00
|
|
|
|
set_gdbarch_from_file (bfd *abfd)
|
2000-06-07 06:38:02 +02:00
|
|
|
|
{
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
|
|
|
|
{
|
|
|
|
|
struct gdbarch_info info;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
gdbarch_info_init (&info);
|
2000-06-07 06:38:02 +02:00
|
|
|
|
info.abfd = abfd;
|
2000-08-11 03:30:11 +02:00
|
|
|
|
if (! gdbarch_update_p (info))
|
2000-10-27 21:17:57 +02:00
|
|
|
|
error ("Architecture of file not recognized.\n");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
set_architecture_from_file (abfd);
|
|
|
|
|
set_endian_from_file (abfd);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Initialize the current architecture. Update the ``set
|
|
|
|
|
architecture'' command so that it specifies a list of valid
|
|
|
|
|
architectures. */
|
|
|
|
|
|
2000-06-08 06:00:56 +02:00
|
|
|
|
#ifdef DEFAULT_BFD_ARCH
|
|
|
|
|
extern const bfd_arch_info_type DEFAULT_BFD_ARCH;
|
|
|
|
|
static const bfd_arch_info_type *default_bfd_arch = &DEFAULT_BFD_ARCH;
|
|
|
|
|
#else
|
2000-06-10 07:37:47 +02:00
|
|
|
|
static const bfd_arch_info_type *default_bfd_arch;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifdef DEFAULT_BFD_VEC
|
|
|
|
|
extern const bfd_target DEFAULT_BFD_VEC;
|
|
|
|
|
static const bfd_target *default_bfd_vec = &DEFAULT_BFD_VEC;
|
|
|
|
|
#else
|
|
|
|
|
static const bfd_target *default_bfd_vec;
|
|
|
|
|
#endif
|
|
|
|
|
|
2000-06-07 06:38:02 +02:00
|
|
|
|
void
|
|
|
|
|
initialize_current_architecture (void)
|
|
|
|
|
{
|
|
|
|
|
const char **arches = gdbarch_printable_names ();
|
|
|
|
|
|
2000-06-08 06:00:56 +02:00
|
|
|
|
/* determine a default architecture and byte order. */
|
|
|
|
|
struct gdbarch_info info;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
gdbarch_info_init (&info);
|
2000-06-08 06:00:56 +02:00
|
|
|
|
|
|
|
|
|
/* Find a default architecture. */
|
|
|
|
|
if (info.bfd_arch_info == NULL
|
|
|
|
|
&& default_bfd_arch != NULL)
|
|
|
|
|
info.bfd_arch_info = default_bfd_arch;
|
|
|
|
|
if (info.bfd_arch_info == NULL)
|
2000-06-07 06:38:02 +02:00
|
|
|
|
{
|
2000-06-08 06:00:56 +02:00
|
|
|
|
/* Choose the architecture by taking the first one
|
|
|
|
|
alphabetically. */
|
|
|
|
|
const char *chosen = arches[0];
|
2000-06-07 06:38:02 +02:00
|
|
|
|
const char **arch;
|
|
|
|
|
for (arch = arches; *arch != NULL; arch++)
|
|
|
|
|
{
|
|
|
|
|
if (strcmp (*arch, chosen) < 0)
|
|
|
|
|
chosen = *arch;
|
|
|
|
|
}
|
|
|
|
|
if (chosen == NULL)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"initialize_current_architecture: No arch");
|
2000-06-07 06:38:02 +02:00
|
|
|
|
info.bfd_arch_info = bfd_scan_arch (chosen);
|
|
|
|
|
if (info.bfd_arch_info == NULL)
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"initialize_current_architecture: Arch not found");
|
2000-06-08 06:00:56 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-01-29 04:51:19 +01:00
|
|
|
|
/* Take several guesses at a byte order. */
|
2001-12-29 20:25:58 +01:00
|
|
|
|
if (info.byte_order == BFD_ENDIAN_UNKNOWN
|
2000-06-08 06:00:56 +02:00
|
|
|
|
&& default_bfd_vec != NULL)
|
|
|
|
|
{
|
|
|
|
|
/* Extract BFD's default vector's byte order. */
|
|
|
|
|
switch (default_bfd_vec->byteorder)
|
|
|
|
|
{
|
|
|
|
|
case BFD_ENDIAN_BIG:
|
2002-01-05 05:30:46 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_BIG;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
break;
|
|
|
|
|
case BFD_ENDIAN_LITTLE:
|
2001-12-15 17:53:24 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_LITTLE;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
}
|
2001-12-29 20:25:58 +01:00
|
|
|
|
if (info.byte_order == BFD_ENDIAN_UNKNOWN)
|
2000-06-08 06:00:56 +02:00
|
|
|
|
{
|
|
|
|
|
/* look for ``*el-*'' in the target name. */
|
|
|
|
|
const char *chp;
|
|
|
|
|
chp = strchr (target_name, '-');
|
|
|
|
|
if (chp != NULL
|
|
|
|
|
&& chp - 2 >= target_name
|
|
|
|
|
&& strncmp (chp - 2, "el", 2) == 0)
|
2001-12-15 17:53:24 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_LITTLE;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
}
|
2001-12-29 20:25:58 +01:00
|
|
|
|
if (info.byte_order == BFD_ENDIAN_UNKNOWN)
|
2000-06-08 06:00:56 +02:00
|
|
|
|
{
|
|
|
|
|
/* Wire it to big-endian!!! */
|
2002-01-05 05:30:46 +01:00
|
|
|
|
info.byte_order = BFD_ENDIAN_BIG;
|
2000-06-08 06:00:56 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (GDB_MULTI_ARCH)
|
|
|
|
|
{
|
2000-08-11 03:30:11 +02:00
|
|
|
|
if (! gdbarch_update_p (info))
|
|
|
|
|
{
|
2001-02-08 07:03:54 +01:00
|
|
|
|
internal_error (__FILE__, __LINE__,
|
|
|
|
|
"initialize_current_architecture: Selection of initial architecture failed");
|
2000-08-11 03:30:11 +02:00
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
}
|
2001-06-06 19:47:28 +02:00
|
|
|
|
else
|
2002-01-29 04:51:19 +01:00
|
|
|
|
{
|
|
|
|
|
/* If the multi-arch logic comes up with a byte-order (from BFD)
|
|
|
|
|
use it for the non-multi-arch case. */
|
|
|
|
|
if (info.byte_order != BFD_ENDIAN_UNKNOWN)
|
|
|
|
|
target_byte_order = info.byte_order;
|
|
|
|
|
initialize_non_multiarch ();
|
|
|
|
|
}
|
2000-06-07 06:38:02 +02:00
|
|
|
|
|
2000-06-08 06:00:56 +02:00
|
|
|
|
/* Create the ``set architecture'' command appending ``auto'' to the
|
|
|
|
|
list of architectures. */
|
2000-06-07 06:38:02 +02:00
|
|
|
|
{
|
|
|
|
|
struct cmd_list_element *c;
|
|
|
|
|
/* Append ``auto''. */
|
|
|
|
|
int nr;
|
|
|
|
|
for (nr = 0; arches[nr] != NULL; nr++);
|
|
|
|
|
arches = xrealloc (arches, sizeof (char*) * (nr + 2));
|
|
|
|
|
arches[nr + 0] = "auto";
|
|
|
|
|
arches[nr + 1] = NULL;
|
|
|
|
|
/* FIXME: add_set_enum_cmd() uses an array of ``char *'' instead
|
|
|
|
|
of ``const char *''. We just happen to know that the casts are
|
|
|
|
|
safe. */
|
|
|
|
|
c = add_set_enum_cmd ("architecture", class_support,
|
2000-06-08 02:52:56 +02:00
|
|
|
|
arches, &set_architecture_string,
|
2000-06-07 06:38:02 +02:00
|
|
|
|
"Set architecture of target.",
|
|
|
|
|
&setlist);
|
2002-02-05 05:37:23 +01:00
|
|
|
|
set_cmd_sfunc (c, set_architecture);
|
2000-06-07 06:38:02 +02:00
|
|
|
|
add_alias_cmd ("processor", "architecture", class_support, 1, &setlist);
|
|
|
|
|
/* Don't use set_from_show - need to print both auto/manual and
|
|
|
|
|
current setting. */
|
|
|
|
|
add_cmd ("architecture", class_support, show_architecture,
|
|
|
|
|
"Show the current target architecture", &showlist);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2001-12-19 15:14:52 +01:00
|
|
|
|
/* Initialize a gdbarch info to values that will be automatically
|
|
|
|
|
overridden. Note: Originally, this ``struct info'' was initialized
|
|
|
|
|
using memset(0). Unfortunatly, that ran into problems, namely
|
|
|
|
|
BFD_ENDIAN_BIG is zero. An explicit initialization function that
|
|
|
|
|
can explicitly set each field to a well defined value is used. */
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
gdbarch_info_init (struct gdbarch_info *info)
|
|
|
|
|
{
|
|
|
|
|
memset (info, 0, sizeof (struct gdbarch_info));
|
2001-12-29 20:25:58 +01:00
|
|
|
|
info->byte_order = BFD_ENDIAN_UNKNOWN;
|
2003-01-05 00:38:46 +01:00
|
|
|
|
info->osabi = GDB_OSABI_UNINITIALIZED;
|
2001-12-19 15:14:52 +01:00
|
|
|
|
}
|
|
|
|
|
|
2000-04-03 02:00:32 +02:00
|
|
|
|
/* */
|
|
|
|
|
|
2003-06-11 15:16:30 +02:00
|
|
|
|
extern initialize_file_ftype _initialize_gdbarch_utils; /* -Wmissing-prototypes */
|
2000-04-03 02:00:32 +02:00
|
|
|
|
|
|
|
|
|
void
|
2000-06-07 06:38:02 +02:00
|
|
|
|
_initialize_gdbarch_utils (void)
|
2000-04-03 02:00:32 +02:00
|
|
|
|
{
|
2000-06-07 06:38:02 +02:00
|
|
|
|
struct cmd_list_element *c;
|
|
|
|
|
c = add_set_enum_cmd ("endian", class_support,
|
|
|
|
|
endian_enum, &set_endian_string,
|
|
|
|
|
"Set endianness of target.",
|
|
|
|
|
&setlist);
|
2002-02-05 05:37:23 +01:00
|
|
|
|
set_cmd_sfunc (c, set_endian);
|
2000-06-07 06:38:02 +02:00
|
|
|
|
/* Don't use set_from_show - need to print both auto/manual and
|
|
|
|
|
current setting. */
|
|
|
|
|
add_cmd ("endian", class_support, show_endian,
|
|
|
|
|
"Show the current byte-order", &showlist);
|
2000-04-03 02:00:32 +02:00
|
|
|
|
}
|