123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235 |
- /* Target-dependent code for Solaris UltraSPARC.
- Copyright (C) 2003-2022 Free Software Foundation, Inc.
- 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 3 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, see <http://www.gnu.org/licenses/>. */
- #include "defs.h"
- #include "frame.h"
- #include "frame-unwind.h"
- #include "gdbarch.h"
- #include "symtab.h"
- #include "objfiles.h"
- #include "osabi.h"
- #include "trad-frame.h"
- #include "regset.h"
- #include "sol2-tdep.h"
- #include "sparc64-tdep.h"
- #include "solib-svr4.h"
- /* From <sys/regset.h>. */
- const struct sparc_gregmap sparc64_sol2_gregmap =
- {
- 32 * 8, /* "tstate" */
- 33 * 8, /* %pc */
- 34 * 8, /* %npc */
- 35 * 8, /* %y */
- -1, /* %wim */
- -1, /* %tbr */
- 1 * 8, /* %g1 */
- 16 * 8, /* %l0 */
- 8 /* sizeof (%y) */
- };
- const struct sparc_fpregmap sparc64_sol2_fpregmap =
- {
- 0 * 8, /* %f0 */
- 33 * 8, /* %fsr */
- };
- static void
- sparc64_sol2_supply_core_gregset (const struct regset *regset,
- struct regcache *regcache,
- int regnum, const void *gregs, size_t len)
- {
- sparc64_supply_gregset (&sparc64_sol2_gregmap, regcache, regnum, gregs);
- }
- static void
- sparc64_sol2_collect_core_gregset (const struct regset *regset,
- const struct regcache *regcache,
- int regnum, void *gregs, size_t len)
- {
- sparc64_collect_gregset (&sparc64_sol2_gregmap, regcache, regnum, gregs);
- }
- static void
- sparc64_sol2_supply_core_fpregset (const struct regset *regset,
- struct regcache *regcache,
- int regnum, const void *fpregs, size_t len)
- {
- sparc64_supply_fpregset (&sparc64_sol2_fpregmap, regcache, regnum, fpregs);
- }
- static void
- sparc64_sol2_collect_core_fpregset (const struct regset *regset,
- const struct regcache *regcache,
- int regnum, void *fpregs, size_t len)
- {
- sparc64_collect_fpregset (&sparc64_sol2_fpregmap, regcache, regnum, fpregs);
- }
- static const struct regset sparc64_sol2_gregset =
- {
- NULL,
- sparc64_sol2_supply_core_gregset,
- sparc64_sol2_collect_core_gregset
- };
- static const struct regset sparc64_sol2_fpregset =
- {
- NULL,
- sparc64_sol2_supply_core_fpregset,
- sparc64_sol2_collect_core_fpregset
- };
- static struct sparc_frame_cache *
- sparc64_sol2_sigtramp_frame_cache (struct frame_info *this_frame,
- void **this_cache)
- {
- struct sparc_frame_cache *cache;
- CORE_ADDR mcontext_addr, addr;
- int regnum;
- if (*this_cache)
- return (struct sparc_frame_cache *) *this_cache;
- cache = sparc_frame_cache (this_frame, this_cache);
- gdb_assert (cache == *this_cache);
- cache->saved_regs = trad_frame_alloc_saved_regs (this_frame);
- /* The third argument is a pointer to an instance of `ucontext_t',
- which has a member `uc_mcontext' that contains the saved
- registers. */
- regnum =
- (cache->copied_regs_mask & 0x04) ? SPARC_I2_REGNUM : SPARC_O2_REGNUM;
- mcontext_addr = get_frame_register_unsigned (this_frame, regnum) + 64;
- cache->saved_regs[SPARC64_CCR_REGNUM].set_addr (mcontext_addr + 0 * 8);
- cache->saved_regs[SPARC64_PC_REGNUM].set_addr (mcontext_addr + 1 * 8);
- cache->saved_regs[SPARC64_NPC_REGNUM].set_addr (mcontext_addr + 2 * 8);
- cache->saved_regs[SPARC64_Y_REGNUM].set_addr (mcontext_addr + 3 * 8);
- cache->saved_regs[SPARC64_ASI_REGNUM].set_addr (mcontext_addr + 19 * 8);
- cache->saved_regs[SPARC64_FPRS_REGNUM].set_addr (mcontext_addr + 20 * 8);
- /* Since %g0 is always zero, keep the identity encoding. */
- for (regnum = SPARC_G1_REGNUM, addr = mcontext_addr + 4 * 8;
- regnum <= SPARC_O7_REGNUM; regnum++, addr += 8)
- cache->saved_regs[regnum].set_addr (addr);
- if (get_frame_memory_unsigned (this_frame, mcontext_addr + 21 * 8, 8))
- {
- /* The register windows haven't been flushed. */
- for (regnum = SPARC_L0_REGNUM; regnum <= SPARC_I7_REGNUM; regnum++)
- cache->saved_regs[regnum].set_unknown ();
- }
- else
- {
- CORE_ADDR sp;
- addr = cache->saved_regs[SPARC_SP_REGNUM].addr ();
- sp = get_frame_memory_unsigned (this_frame, addr, 8);
- for (regnum = SPARC_L0_REGNUM, addr = sp + BIAS;
- regnum <= SPARC_I7_REGNUM; regnum++, addr += 8)
- cache->saved_regs[regnum].set_addr (addr);
- }
- return cache;
- }
- static void
- sparc64_sol2_sigtramp_frame_this_id (struct frame_info *this_frame,
- void **this_cache,
- struct frame_id *this_id)
- {
- struct sparc_frame_cache *cache =
- sparc64_sol2_sigtramp_frame_cache (this_frame, this_cache);
- (*this_id) = frame_id_build (cache->base, cache->pc);
- }
- static struct value *
- sparc64_sol2_sigtramp_frame_prev_register (struct frame_info *this_frame,
- void **this_cache,
- int regnum)
- {
- struct sparc_frame_cache *cache =
- sparc64_sol2_sigtramp_frame_cache (this_frame, this_cache);
- return trad_frame_get_prev_register (this_frame, cache->saved_regs, regnum);
- }
- static int
- sparc64_sol2_sigtramp_frame_sniffer (const struct frame_unwind *self,
- struct frame_info *this_frame,
- void **this_cache)
- {
- return sol2_sigtramp_p (this_frame);
- }
- static const struct frame_unwind sparc64_sol2_sigtramp_frame_unwind =
- {
- "sparc64 solaris sigtramp",
- SIGTRAMP_FRAME,
- default_frame_unwind_stop_reason,
- sparc64_sol2_sigtramp_frame_this_id,
- sparc64_sol2_sigtramp_frame_prev_register,
- NULL,
- sparc64_sol2_sigtramp_frame_sniffer
- };
- static void
- sparc64_sol2_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
- {
- sparc_gdbarch_tdep *tdep = (sparc_gdbarch_tdep *) gdbarch_tdep (gdbarch);
- tdep->gregset = &sparc64_sol2_gregset;
- tdep->sizeof_gregset = 304;
- tdep->fpregset = &sparc64_sol2_fpregset;
- tdep->sizeof_fpregset = 544;
- frame_unwind_append_unwinder (gdbarch, &sparc64_sol2_sigtramp_frame_unwind);
- sparc64_init_abi (info, gdbarch);
- sol2_init_abi (info, gdbarch);
- /* Solaris 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;
- /* Solaris has kernel-assisted single-stepping support. */
- set_gdbarch_software_single_step (gdbarch, NULL);
- }
- void _initialize_sparc64_sol2_tdep ();
- void
- _initialize_sparc64_sol2_tdep ()
- {
- gdbarch_register_osabi (bfd_arch_sparc, bfd_mach_sparc_v9,
- GDB_OSABI_SOLARIS, sparc64_sol2_init_abi);
- }
|