gdb/ia64-linux-tdep.c - gdb
Global variables defined
Functions defined
Macros defined
Source code
- #include "defs.h"
- #include "ia64-tdep.h"
- #include "arch-utils.h"
- #include "gdbcore.h"
- #include "regcache.h"
- #include "osabi.h"
- #include "solib-svr4.h"
- #include "symtab.h"
- #include "linux-tdep.h"
- #include "regset.h"
- #include <ctype.h>
- #define GATE_AREA_START 0xa000000000000100LL
- #define GATE_AREA_END 0xa000000000020000LL
- #define IA64_LINUX_SIGCONTEXT_OFFSET 192
- static int
- ia64_linux_pc_in_sigtramp (CORE_ADDR pc)
- {
- return (pc >= (CORE_ADDR) GATE_AREA_START && pc < (CORE_ADDR) GATE_AREA_END);
- }
- static CORE_ADDR
- ia64_linux_sigcontext_register_address (struct gdbarch *gdbarch,
- CORE_ADDR sp, int regno)
- {
- enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
- gdb_byte buf[8];
- CORE_ADDR sigcontext_addr = 0;
-
- read_memory (sp + 16, buf, 8);
- sigcontext_addr = extract_unsigned_integer (buf, 8, byte_order);
- if (IA64_GR0_REGNUM <= regno && regno <= IA64_GR31_REGNUM)
- return sigcontext_addr + 200 + 8 * (regno - IA64_GR0_REGNUM);
- else if (IA64_BR0_REGNUM <= regno && regno <= IA64_BR7_REGNUM)
- return sigcontext_addr + 136 + 8 * (regno - IA64_BR0_REGNUM);
- else if (IA64_FR0_REGNUM <= regno && regno <= IA64_FR127_REGNUM)
- return sigcontext_addr + 464 + 16 * (regno - IA64_FR0_REGNUM);
- else
- switch (regno)
- {
- case IA64_IP_REGNUM :
- return sigcontext_addr + 40;
- case IA64_CFM_REGNUM :
- return sigcontext_addr + 48;
- case IA64_PSR_REGNUM :
- return sigcontext_addr + 56;
-
- case IA64_BSP_REGNUM :
- return sigcontext_addr + 72;
- case IA64_RNAT_REGNUM :
- return sigcontext_addr + 80;
- case IA64_CCV_REGNUM :
- return sigcontext_addr + 88;
- case IA64_UNAT_REGNUM :
- return sigcontext_addr + 96;
- case IA64_FPSR_REGNUM :
- return sigcontext_addr + 104;
- case IA64_PFS_REGNUM :
- return sigcontext_addr + 112;
- case IA64_LC_REGNUM :
- return sigcontext_addr + 120;
- case IA64_PR_REGNUM :
- return sigcontext_addr + 128;
- default :
- return 0;
- }
- }
- static void
- ia64_linux_write_pc (struct regcache *regcache, CORE_ADDR pc)
- {
- ia64_write_pc (regcache, pc);
-
- regcache_cooked_write_unsigned (regcache, IA64_GR10_REGNUM, 0);
- }
- static int
- ia64_linux_stap_is_single_operand (struct gdbarch *gdbarch, const char *s)
- {
- return ((isdigit (*s) && s[1] == '[' && s[2] == 'r')
- || *s == 'r'
- || isdigit (*s));
- }
- static const struct regcache_map_entry ia64_linux_gregmap[] =
- {
- { 32, IA64_GR0_REGNUM, 8 },
- { 1, REGCACHE_MAP_SKIP, 8 }, FIXME
- { 1, IA64_PR_REGNUM, 8 },
- { 8, IA64_BR0_REGNUM, 8 },
- { 1, IA64_IP_REGNUM, 8 },
- { 1, IA64_CFM_REGNUM, 8 },
- { 1, IA64_PSR_REGNUM, 8 },
- { 1, IA64_RSC_REGNUM, 8 },
- { 1, IA64_BSP_REGNUM, 8 },
- { 1, IA64_BSPSTORE_REGNUM, 8 },
- { 1, IA64_RNAT_REGNUM, 8 },
- { 1, IA64_CCV_REGNUM, 8 },
- { 1, IA64_UNAT_REGNUM, 8 },
- { 1, IA64_FPSR_REGNUM, 8 },
- { 1, IA64_PFS_REGNUM, 8 },
- { 1, IA64_LC_REGNUM, 8 },
- { 1, IA64_EC_REGNUM, 8 },
- { 0 }
- };
- #define IA64_LINUX_GREGS_SIZE (128 * 8)
- static const struct regcache_map_entry ia64_linux_fpregmap[] =
- {
- { 128, IA64_FR0_REGNUM, 16 },
- { 0 }
- };
- #define IA64_LINUX_FPREGS_SIZE (128 * 16)
- static void
- ia64_linux_supply_fpregset (const struct regset *regset,
- struct regcache *regcache,
- int regnum, const void *regs, size_t len)
- {
- const gdb_byte f_zero[16] = { 0 };
- const gdb_byte f_one[16] =
- { 0, 0, 0, 0, 0, 0, 0, 0x80, 0xff, 0xff, 0, 0, 0, 0, 0, 0 };
- regcache_supply_regset (regset, regcache, regnum, regs, len);
-
- if (regnum == -1 || regnum == IA64_FR0_REGNUM)
- regcache_raw_supply (regcache, IA64_FR0_REGNUM, f_zero);
- if (regnum == -1 || regnum == IA64_FR1_REGNUM)
- regcache_raw_supply (regcache, IA64_FR1_REGNUM, f_one);
- }
- static const struct regset ia64_linux_gregset =
- {
- ia64_linux_gregmap,
- regcache_supply_regset, regcache_collect_regset
- };
- static const struct regset ia64_linux_fpregset =
- {
- ia64_linux_fpregmap,
- ia64_linux_supply_fpregset, regcache_collect_regset
- };
- static void
- ia64_linux_iterate_over_regset_sections (struct gdbarch *gdbarch,
- iterate_over_regset_sections_cb *cb,
- void *cb_data,
- const struct regcache *regcache)
- {
- cb (".reg", IA64_LINUX_GREGS_SIZE, &ia64_linux_gregset, NULL, cb_data);
- cb (".reg2", IA64_LINUX_FPREGS_SIZE, &ia64_linux_fpregset, NULL, cb_data);
- }
- static void
- ia64_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
- {
- struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
- static const char *const stap_register_prefixes[] = { "r", NULL };
- static const char *const stap_register_indirection_prefixes[] = { "[",
- NULL };
- static const char *const stap_register_indirection_suffixes[] = { "]",
- NULL };
- linux_init_abi (info, gdbarch);
-
- tdep->sigcontext_register_address = ia64_linux_sigcontext_register_address;
-
- tdep->pc_in_sigtramp = ia64_linux_pc_in_sigtramp;
- set_gdbarch_write_pc (gdbarch, ia64_linux_write_pc);
- set_gdbarch_skip_trampoline_code (gdbarch, find_solib_trampoline_target);
- set_solib_svr4_fetch_link_map_offsets
- (gdbarch, svr4_lp64_fetch_link_map_offsets);
-
- set_gdbarch_fetch_tls_load_module_address (gdbarch,
- svr4_fetch_objfile_link_map);
-
- set_gdbarch_iterate_over_regset_sections
- (gdbarch, ia64_linux_iterate_over_regset_sections);
-
- set_gdbarch_stap_register_prefixes (gdbarch, stap_register_prefixes);
- set_gdbarch_stap_register_indirection_prefixes (gdbarch,
- stap_register_indirection_prefixes);
- set_gdbarch_stap_register_indirection_suffixes (gdbarch,
- stap_register_indirection_suffixes);
- set_gdbarch_stap_gdb_register_prefix (gdbarch, "r");
- set_gdbarch_stap_is_single_operand (gdbarch,
- ia64_linux_stap_is_single_operand);
- }
- extern initialize_file_ftype _initialize_ia64_linux_tdep;
- void
- _initialize_ia64_linux_tdep (void)
- {
- gdbarch_register_osabi (bfd_arch_ia64, 0, GDB_OSABI_LINUX,
- ia64_linux_init_abi);
- }