gdb/alpha-linux-tdep.c - gdb
Global variables defined
Functions defined
Source code
- #include "defs.h"
- #include "frame.h"
- #include "osabi.h"
- #include "solib-svr4.h"
- #include "symtab.h"
- #include "regset.h"
- #include "regcache.h"
- #include "linux-tdep.h"
- #include "alpha-tdep.h"
- enum
- {
-
- ALPHA_LINUX_SIGABRT = 6,
- ALPHA_LINUX_SIGEMT = 7,
- ALPHA_LINUX_SIGBUS = 10,
- ALPHA_LINUX_SIGSYS = 12,
- ALPHA_LINUX_SIGURG = 16,
- ALPHA_LINUX_SIGSTOP = 17,
- ALPHA_LINUX_SIGTSTP = 18,
- ALPHA_LINUX_SIGCONT = 19,
- ALPHA_LINUX_SIGCHLD = 20,
- ALPHA_LINUX_SIGIO = 23,
- ALPHA_LINUX_SIGINFO = 29,
- ALPHA_LINUX_SIGUSR1 = 30,
- ALPHA_LINUX_SIGUSR2 = 31,
- ALPHA_LINUX_SIGPOLL = ALPHA_LINUX_SIGIO,
- ALPHA_LINUX_SIGPWR = ALPHA_LINUX_SIGINFO,
- ALPHA_LINUX_SIGIOT = ALPHA_LINUX_SIGABRT,
- };
- static long
- alpha_linux_sigtramp_offset_1 (struct gdbarch *gdbarch, CORE_ADDR pc)
- {
- switch (alpha_read_insn (gdbarch, pc))
- {
- case 0x47de0410:
- case 0x47fe0410:
- return 0;
- case 0x43ecf400:
- case 0x201f0067:
- case 0x201f015f:
- return 4;
- case 0x00000083:
- return 8;
- default:
- return -1;
- }
- }
- static LONGEST
- alpha_linux_sigtramp_offset (struct gdbarch *gdbarch, CORE_ADDR pc)
- {
- long i, off;
- if (pc & 3)
- return -1;
-
- off = alpha_linux_sigtramp_offset_1 (gdbarch, pc);
- if (off < 0)
- return -1;
-
- pc -= off;
- for (i = 0; i < 12; i += 4)
- {
- if (i == off)
- continue;
- if (alpha_linux_sigtramp_offset_1 (gdbarch, pc + i) != i)
- return -1;
- }
- return off;
- }
- static int
- alpha_linux_pc_in_sigtramp (struct gdbarch *gdbarch,
- CORE_ADDR pc, const char *func_name)
- {
- return alpha_linux_sigtramp_offset (gdbarch, pc) >= 0;
- }
- static CORE_ADDR
- alpha_linux_sigcontext_addr (struct frame_info *this_frame)
- {
- struct gdbarch *gdbarch = get_frame_arch (this_frame);
- CORE_ADDR pc;
- ULONGEST sp;
- long off;
- pc = get_frame_pc (this_frame);
- sp = get_frame_register_unsigned (this_frame, ALPHA_SP_REGNUM);
- off = alpha_linux_sigtramp_offset (gdbarch, pc);
- gdb_assert (off >= 0);
-
- if (alpha_read_insn (gdbarch, pc - off + 4) == 0x201f015f)
- return sp + 176;
-
- return sp;
- }
- static void
- alpha_linux_supply_gregset (const struct regset *regset,
- struct regcache *regcache,
- int regnum, const void *gregs, size_t len)
- {
- const gdb_byte *regs = gregs;
- gdb_assert (len >= 32 * 8);
- alpha_supply_int_regs (regcache, regnum, regs, regs + 31 * 8,
- len >= 33 * 8 ? regs + 32 * 8 : NULL);
- }
- static void
- alpha_linux_collect_gregset (const struct regset *regset,
- const struct regcache *regcache,
- int regnum, void *gregs, size_t len)
- {
- gdb_byte *regs = gregs;
- gdb_assert (len >= 32 * 8);
- alpha_fill_int_regs (regcache, regnum, regs, regs + 31 * 8,
- len >= 33 * 8 ? regs + 32 * 8 : NULL);
- }
- static void
- alpha_linux_supply_fpregset (const struct regset *regset,
- struct regcache *regcache,
- int regnum, const void *fpregs, size_t len)
- {
- const gdb_byte *regs = fpregs;
- gdb_assert (len >= 32 * 8);
- alpha_supply_fp_regs (regcache, regnum, regs, regs + 31 * 8);
- }
- static void
- alpha_linux_collect_fpregset (const struct regset *regset,
- const struct regcache *regcache,
- int regnum, void *fpregs, size_t len)
- {
- gdb_byte *regs = fpregs;
- gdb_assert (len >= 32 * 8);
- alpha_fill_fp_regs (regcache, regnum, regs, regs + 31 * 8);
- }
- static const struct regset alpha_linux_gregset =
- {
- NULL,
- alpha_linux_supply_gregset, alpha_linux_collect_gregset
- };
- static const struct regset alpha_linux_fpregset =
- {
- NULL,
- alpha_linux_supply_fpregset, alpha_linux_collect_fpregset
- };
- static void
- alpha_linux_iterate_over_regset_sections (struct gdbarch *gdbarch,
- iterate_over_regset_sections_cb *cb,
- void *cb_data,
- const struct regcache *regcache)
- {
- cb (".reg", 32 * 8, &alpha_linux_gregset, NULL, cb_data);
- cb (".reg2", 32 * 8, &alpha_linux_fpregset, NULL, cb_data);
- }
- static enum gdb_signal
- alpha_linux_gdb_signal_from_target (struct gdbarch *gdbarch,
- int signal)
- {
- switch (signal)
- {
- case ALPHA_LINUX_SIGEMT:
- return GDB_SIGNAL_EMT;
- case ALPHA_LINUX_SIGBUS:
- return GDB_SIGNAL_BUS;
- case ALPHA_LINUX_SIGSYS:
- return GDB_SIGNAL_SYS;
- case ALPHA_LINUX_SIGURG:
- return GDB_SIGNAL_URG;
- case ALPHA_LINUX_SIGSTOP:
- return GDB_SIGNAL_STOP;
- case ALPHA_LINUX_SIGTSTP:
- return GDB_SIGNAL_TSTP;
- case ALPHA_LINUX_SIGCONT:
- return GDB_SIGNAL_CONT;
- case ALPHA_LINUX_SIGCHLD:
- return GDB_SIGNAL_CHLD;
-
- case ALPHA_LINUX_SIGIO:
- return GDB_SIGNAL_IO;
-
- case ALPHA_LINUX_SIGINFO:
- return GDB_SIGNAL_INFO;
- case ALPHA_LINUX_SIGUSR1:
- return GDB_SIGNAL_USR1;
- case ALPHA_LINUX_SIGUSR2:
- return GDB_SIGNAL_USR2;
- }
- return linux_gdb_signal_from_target (gdbarch, signal);
- }
- static int
- alpha_linux_gdb_signal_to_target (struct gdbarch *gdbarch,
- enum gdb_signal signal)
- {
- switch (signal)
- {
- case GDB_SIGNAL_EMT:
- return ALPHA_LINUX_SIGEMT;
- case GDB_SIGNAL_BUS:
- return ALPHA_LINUX_SIGBUS;
- case GDB_SIGNAL_SYS:
- return ALPHA_LINUX_SIGSYS;
- case GDB_SIGNAL_URG:
- return ALPHA_LINUX_SIGURG;
- case GDB_SIGNAL_STOP:
- return ALPHA_LINUX_SIGSTOP;
- case GDB_SIGNAL_TSTP:
- return ALPHA_LINUX_SIGTSTP;
- case GDB_SIGNAL_CONT:
- return ALPHA_LINUX_SIGCONT;
- case GDB_SIGNAL_CHLD:
- return ALPHA_LINUX_SIGCHLD;
- case GDB_SIGNAL_IO:
- return ALPHA_LINUX_SIGIO;
- case GDB_SIGNAL_INFO:
- return ALPHA_LINUX_SIGINFO;
- case GDB_SIGNAL_USR1:
- return ALPHA_LINUX_SIGUSR1;
- case GDB_SIGNAL_USR2:
- return ALPHA_LINUX_SIGUSR2;
- case GDB_SIGNAL_POLL:
- return ALPHA_LINUX_SIGPOLL;
- case GDB_SIGNAL_PWR:
- return ALPHA_LINUX_SIGPWR;
- }
- return linux_gdb_signal_to_target (gdbarch, signal);
- }
- static void
- alpha_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
- {
- struct gdbarch_tdep *tdep;
- linux_init_abi (info, gdbarch);
-
- alpha_dwarf2_init_abi (info, gdbarch);
-
- alpha_mdebug_init_abi (info, gdbarch);
- tdep = gdbarch_tdep (gdbarch);
- tdep->dynamic_sigtramp_offset = alpha_linux_sigtramp_offset;
- tdep->sigcontext_addr = alpha_linux_sigcontext_addr;
- tdep->pc_in_sigtramp = alpha_linux_pc_in_sigtramp;
- tdep->jb_pc = 2;
- tdep->jb_elt_size = 8;
- 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, alpha_linux_iterate_over_regset_sections);
- set_gdbarch_gdb_signal_from_target (gdbarch,
- alpha_linux_gdb_signal_from_target);
- set_gdbarch_gdb_signal_to_target (gdbarch,
- alpha_linux_gdb_signal_to_target);
- }
- extern initialize_file_ftype _initialize_alpha_linux_tdep;
- void
- _initialize_alpha_linux_tdep (void)
- {
- gdbarch_register_osabi (bfd_arch_alpha, 0, GDB_OSABI_LINUX,
- alpha_linux_init_abi);
- }