/* Target-dependent code for GNU/Linux UltraSPARC.
- Copyright 2003, 2004 Free Software Foundation, Inc.
+ Copyright (C) 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
This file is part of GDB.
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. */
+ Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA. */
#include "defs.h"
#include "frame.h"
#include "frame-unwind.h"
+#include "dwarf2-frame.h"
+#include "regset.h"
+#include "regcache.h"
#include "gdbarch.h"
+#include "gdbcore.h"
#include "osabi.h"
#include "solib-svr4.h"
#include "symtab.h"
#include "trad-frame.h"
-
-#include "gdb_assert.h"
-#include "gdb_string.h"
+#include "tramp-frame.h"
#include "sparc64-tdep.h"
-/* The instruction sequence for RT signals is
- mov __NR_rt_sigreturn, %g1 ! hex: 0x82102065
- ta 0x6d ! hex: 0x91d0206d
-
- The effect is to call the system call rt_sigreturn.
- Note that 64-bit binaries only use this RT signal return method. */
+/* Signal trampoline support. */
-#define LINUX64_RT_SIGTRAMP_INSN0 0x82102065
-#define LINUX64_RT_SIGTRAMP_INSN1 0x91d0206d
+static void sparc64_linux_sigframe_init (const struct tramp_frame *self,
+ struct frame_info *next_frame,
+ struct trad_frame_cache *this_cache,
+ CORE_ADDR func);
-/* If PC is in a sigtramp routine consisting of the instructions
- LINUX64_RT_SIGTRAMP_INSN0 and LINUX64_RT_SIGTRAMP_INSN1, return
- the address of the start of the routine. Otherwise, return 0. */
+/* See sparc-linux-tdep.c for details. Note that 64-bit binaries only
+ use RT signals. */
-static CORE_ADDR
-sparc64_linux_sigtramp_start (struct frame_info *next_frame)
+static const struct tramp_frame sparc64_linux_rt_sigframe =
{
- CORE_ADDR pc = frame_pc_unwind (next_frame);
- ULONGEST word0, word1;
- unsigned char buf[8]; /* Two instructions. */
-
- /* We only recognize a signal trampoline if PC is at the start of
- one of the instructions. We optimize for finding the PC at the
- start of the instruction sequence, as will be the case when the
- trampoline is not the first frame on the stack. We assume that
- in the case where the PC is not at the start of the instruction
- sequence, there will be a few trailing readable bytes on the
- stack. */
-
- if (!safe_frame_unwind_memory (next_frame, pc, buf, sizeof buf))
- return 0;
-
- word0 = extract_unsigned_integer (buf, 4);
- if (word0 != LINUX64_RT_SIGTRAMP_INSN0)
- {
- if (word0 != LINUX64_RT_SIGTRAMP_INSN1)
- return 0;
+ SIGTRAMP_FRAME,
+ 4,
+ {
+ { 0x82102065, -1 }, /* mov __NR_rt_sigreturn, %g1 */
+ { 0x91d0206d, -1 }, /* ta 0x6d */
+ { TRAMP_SENTINEL_INSN, -1 }
+ },
+ sparc64_linux_sigframe_init
+};
- pc -= 4;
- if (!safe_frame_unwind_memory (next_frame, pc, buf, sizeof buf))
- return 0;
+static void
+sparc64_linux_sigframe_init (const struct tramp_frame *self,
+ struct frame_info *next_frame,
+ struct trad_frame_cache *this_cache,
+ CORE_ADDR func)
+{
+ CORE_ADDR base, addr, sp_addr;
+ int regnum;
- word0 = extract_unsigned_integer (buf, 4);
- }
+ base = frame_unwind_register_unsigned (next_frame, SPARC_O1_REGNUM);
+ base += 128;
- word1 = extract_unsigned_integer (buf + 4, 4);
- if (word0 != LINUX64_RT_SIGTRAMP_INSN0
- || word1 != LINUX64_RT_SIGTRAMP_INSN1)
- return 0;
+ /* Offsets from <bits/sigcontext.h>. */
- return pc;
-}
+ /* Since %g0 is always zero, keep the identity encoding. */
+ addr = base + 8;
+ sp_addr = base + ((SPARC_SP_REGNUM - SPARC_G0_REGNUM) * 8);
+ for (regnum = SPARC_G1_REGNUM; regnum <= SPARC_O7_REGNUM; regnum++)
+ {
+ trad_frame_set_reg_addr (this_cache, regnum, addr);
+ addr += 8;
+ }
-static int
-sparc64_linux_sigtramp_p (struct frame_info *next_frame)
-{
- CORE_ADDR pc = frame_pc_unwind (next_frame);
- char *name;
+ trad_frame_set_reg_addr (this_cache, SPARC64_STATE_REGNUM, addr + 0);
+ trad_frame_set_reg_addr (this_cache, SPARC64_PC_REGNUM, addr + 8);
+ trad_frame_set_reg_addr (this_cache, SPARC64_NPC_REGNUM, addr + 16);
+ trad_frame_set_reg_addr (this_cache, SPARC64_Y_REGNUM, addr + 24);
+ trad_frame_set_reg_addr (this_cache, SPARC64_FPRS_REGNUM, addr + 28);
- find_pc_partial_function (pc, &name, NULL, NULL);
+ base = frame_unwind_register_unsigned (next_frame, SPARC_SP_REGNUM);
+ if (base & 1)
+ base += BIAS;
- /* If we have NAME, we can optimize the search. The trampolines is
- named __rt_sigreturn_stub. However, is isn't dynamically exported
- from the shared C library, so the trampoline may appear to be part
- of the preceding function. This should always be sigaction,
- __sigaction, or __libc_sigaction (all aliases to the same function). */
- if (name == NULL || strstr (name, "sigaction") != NULL)
- return (sparc64_linux_sigtramp_start (next_frame) != 0);
+ addr = get_frame_memory_unsigned (next_frame, sp_addr, 8);
+ if (addr & 1)
+ addr += BIAS;
- return (strcmp ("__rt_sigreturn_stub", name) == 0);
+ for (regnum = SPARC_L0_REGNUM; regnum <= SPARC_I7_REGNUM; regnum++)
+ {
+ trad_frame_set_reg_addr (this_cache, regnum, addr);
+ addr += 8;
+ }
+ trad_frame_set_id (this_cache, frame_id_build (base, func));
}
+\f
+/* Return the address of a system call's alternative return
+ address. */
-static struct sparc_frame_cache *
-sparc64_linux_sigtramp_frame_cache (struct frame_info *next_frame,
- void **this_cache)
+static CORE_ADDR
+sparc64_linux_step_trap (unsigned long insn)
{
- struct sparc_frame_cache *cache;
- CORE_ADDR sigcontext_addr, addr;
- int regnum;
-
- if (*this_cache)
- return *this_cache;
-
- cache = sparc_frame_cache (next_frame, this_cache);
- gdb_assert (cache == *this_cache);
-
- regnum = SPARC_SP_REGNUM;
- cache->base = frame_unwind_register_unsigned (next_frame, regnum);
- if (cache->base & 1)
- cache->base += BIAS;
-
- regnum = SPARC_O1_REGNUM;
- sigcontext_addr = frame_unwind_register_unsigned (next_frame, regnum);
-
- /* If this is a RT signal trampoline, adjust SIGCONTEXT_ADDR
- accordingly. */
- addr = sparc64_linux_sigtramp_start (next_frame);
- if (addr)
- sigcontext_addr += 128;
- else
- addr = frame_func_unwind (next_frame);
-
- cache->pc = addr;
-
- cache->saved_regs = trad_frame_alloc_saved_regs (next_frame);
+ if (insn == 0x91d0206d)
+ {
+ ULONGEST sp;
- /* Offsets from <bits/sigcontext.h> */
+ regcache_cooked_read_unsigned (current_regcache,
+ SPARC_SP_REGNUM, &sp);
+ if (sp & 1)
+ sp += BIAS;
- /* Since %g0 is always zero, keep the identity encoding. */
- for (addr = sigcontext_addr + 8, regnum = SPARC_G1_REGNUM;
- regnum <= SPARC_O7_REGNUM; regnum++, addr += 8)
- cache->saved_regs[regnum].addr = addr;
+ /* The kernel puts the sigreturn registers on the stack,
+ and this is where the signal unwinding state is take from
+ when returning from a signal.
- cache->saved_regs[SPARC64_STATE_REGNUM].addr = addr + 0;
- cache->saved_regs[SPARC64_PC_REGNUM].addr = addr + 8;
- cache->saved_regs[SPARC64_NPC_REGNUM].addr = addr + 16;
- cache->saved_regs[SPARC64_Y_REGNUM].addr = addr + 24;
- cache->saved_regs[SPARC64_FPRS_REGNUM].addr = addr + 28;
+ A siginfo_t sits 192 bytes from the base of the stack. This
+ siginfo_t is 128 bytes, and is followed by the sigreturn
+ register save area. The saved PC sits at a 136 byte offset
+ into there. */
- for (regnum = SPARC_L0_REGNUM, addr = cache->base;
- regnum <= SPARC_I7_REGNUM; regnum++, addr += 8)
- cache->saved_regs[regnum].addr = addr;
+ return read_memory_unsigned_integer (sp + 192 + 128 + 136, 8);
+ }
- return cache;
+ return 0;
}
+\f
-static void
-sparc64_linux_sigtramp_frame_this_id (struct frame_info *next_frame,
- void **this_cache,
- struct frame_id *this_id)
+const struct sparc_gregset sparc64_linux_core_gregset =
{
- struct sparc_frame_cache *cache =
- sparc64_linux_sigtramp_frame_cache (next_frame, this_cache);
+ 32 * 8, /* %tstate */
+ 33 * 8, /* %tpc */
+ 34 * 8, /* %tnpc */
+ 35 * 8, /* %y */
+ -1, /* %wim */
+ -1, /* %tbr */
+ 1 * 8, /* %g1 */
+ 16 * 8, /* %l0 */
+ 8, /* y size */
+};
+\f
- (*this_id) = frame_id_build (cache->base, cache->pc);
+static void
+sparc64_linux_supply_core_gregset (const struct regset *regset,
+ struct regcache *regcache,
+ int regnum, const void *gregs, size_t len)
+{
+ sparc64_supply_gregset (&sparc64_linux_core_gregset, regcache, regnum, gregs);
}
static void
-sparc64_linux_sigtramp_frame_prev_register (struct frame_info *next_frame,
- void **this_cache,
- int regnum, int *optimizedp,
- enum lval_type *lvalp,
- CORE_ADDR *addrp,
- int *realnump, void *valuep)
+sparc64_linux_collect_core_gregset (const struct regset *regset,
+ const struct regcache *regcache,
+ int regnum, void *gregs, size_t len)
{
- struct sparc_frame_cache *cache =
- sparc64_linux_sigtramp_frame_cache (next_frame, this_cache);
-
- trad_frame_get_prev_register (next_frame, cache->saved_regs, regnum,
- optimizedp, lvalp, addrp, realnump, valuep);
+ sparc64_collect_gregset (&sparc64_linux_core_gregset, regcache, regnum, gregs);
}
-static const struct frame_unwind sparc64_linux_sigtramp_frame_unwind =
+static void
+sparc64_linux_supply_core_fpregset (const struct regset *regset,
+ struct regcache *regcache,
+ int regnum, const void *fpregs, size_t len)
{
- SIGTRAMP_FRAME,
- sparc64_linux_sigtramp_frame_this_id,
- sparc64_linux_sigtramp_frame_prev_register
-};
+ sparc64_supply_fpregset (regcache, regnum, fpregs);
+}
-static const struct frame_unwind *
-sparc64_linux_sigtramp_frame_sniffer (struct frame_info *next_frame)
+static void
+sparc64_linux_collect_core_fpregset (const struct regset *regset,
+ const struct regcache *regcache,
+ int regnum, void *fpregs, size_t len)
{
- if (sparc64_linux_sigtramp_p (next_frame))
- return &sparc64_linux_sigtramp_frame_unwind;
-
- return NULL;
+ sparc64_collect_fpregset (regcache, regnum, fpregs);
}
+
\f
+
static void
sparc64_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
- frame_unwind_append_sniffer (gdbarch, sparc64_linux_sigtramp_frame_sniffer);
+ tdep->gregset = regset_alloc (gdbarch, sparc64_linux_supply_core_gregset,
+ sparc64_linux_collect_core_gregset);
+ tdep->sizeof_gregset = 288;
- /* GNU/Linux is very similar to Solaris ... */
- sparc64_sol2_init_abi (info, gdbarch);
+ tdep->fpregset = regset_alloc (gdbarch, sparc64_linux_supply_core_fpregset,
+ sparc64_linux_collect_core_fpregset);
+ tdep->sizeof_fpregset = 280;
- /* ... but doesn't have kernel-assisted single-stepping support. */
- set_gdbarch_software_single_step (gdbarch, sparc_software_single_step);
+ tramp_frame_prepend_unwinder (gdbarch, &sparc64_linux_rt_sigframe);
+
+ /* Hook in the DWARF CFI frame unwinder. */
+ frame_unwind_append_sniffer (gdbarch, dwarf2_frame_sniffer);
+
+ sparc64_init_abi (info, gdbarch);
+
+ /* GNU/Linux has SVR4-style shared libraries... */
+ set_gdbarch_skip_trampoline_code (gdbarch, find_solib_trampoline_target);
+ set_solib_svr4_fetch_link_map_offsets
+ (gdbarch, svr4_lp64_fetch_link_map_offsets);
+
+ /* ...which means that we need some special handling when doing
+ prologue analysis. */
+ tdep->plt_entry_size = 16;
/* Enable TLS support. */
set_gdbarch_fetch_tls_load_module_address (gdbarch,
svr4_fetch_objfile_link_map);
+
+ /* Make sure we can single-step over signal return system calls. */
+ tdep->step_trap = sparc64_linux_step_trap;
}
+\f
/* Provide a prototype to silence -Wmissing-prototypes. */
extern void _initialize_sparc64_linux_tdep (void);
projects / deliverable / binutils-gdb.git / blobdiff