1 /* Target-dependent code for NetBSD/sparc64. 2 3 Copyright 2002, 2003, 2004 Free Software Foundation, Inc. 4 Based on code contributed by Wasabi Systems, Inc. 5 6 This file is part of GDB. 7 8 This program is free software; you can redistribute it and/or modify 9 it under the terms of the GNU General Public License as published by 10 the Free Software Foundation; either version 2 of the License, or 11 (at your option) any later version. 12 13 This program is distributed in the hope that it will be useful, 14 but WITHOUT ANY WARRANTY; without even the implied warranty of 15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 GNU General Public License for more details. 17 18 You should have received a copy of the GNU General Public License 19 along with this program; if not, write to the Free Software 20 Foundation, Inc., 59 Temple Place - Suite 330, 21 Boston, MA 02111-1307, USA. */ 22 23 #include "defs.h" 24 #include "frame.h" 25 #include "frame-unwind.h" 26 #include "gdbcore.h" 27 #include "osabi.h" 28 #include "regcache.h" 29 #include "regset.h" 30 #include "symtab.h" 31 #include "objfiles.h" 32 #include "solib-svr4.h" 33 #include "trad-frame.h" 34 35 #include "gdb_assert.h" 36 #include "gdb_string.h" 37 38 #include "sparc64-tdep.h" 39 #include "nbsd-tdep.h" 40 41 /* From <machine/reg.h>. */ 42 const struct sparc_gregset sparc64nbsd_gregset = 43 { 44 0 * 8, /* "tstate" */ 45 1 * 8, /* %pc */ 46 2 * 8, /* %npc */ 47 3 * 8, /* %y */ 48 -1, /* %fprs */ 49 -1, 50 5 * 8, /* %g1 */ 51 -1, /* %l0 */ 52 4 /* sizeof (%y) */ 53 }; 54 55 56 static void 57 sparc64nbsd_supply_gregset (const struct regset *regset, 58 struct regcache *regcache, 59 int regnum, const void *gregs, size_t len) 60 { 61 sparc64_supply_gregset (&sparc64nbsd_gregset, regcache, regnum, gregs); 62 } 63 64 static void 65 sparc64nbsd_supply_fpregset (const struct regset *regset, 66 struct regcache *regcache, 67 int regnum, const void *fpregs, size_t len) 68 { 69 sparc64_supply_fpregset (regcache, regnum, fpregs); 70 } 71 72 73 /* Signal trampolines. */ 74 75 /* The following variables describe the location of an on-stack signal 76 trampoline. The current values correspond to the memory layout for 77 NetBSD 1.3 and up. These shouldn't be necessary for NetBSD 2.0 and 78 up, since NetBSD uses signal trampolines provided by libc now. */ 79 80 static const CORE_ADDR sparc64nbsd_sigtramp_start = 0xffffffffffffdee4ULL; 81 static const CORE_ADDR sparc64nbsd_sigtramp_end = 0xffffffffffffe000ULL; 82 83 static int 84 sparc64nbsd_pc_in_sigtramp (CORE_ADDR pc, char *name) 85 { 86 if (pc >= sparc64nbsd_sigtramp_start && pc < sparc64nbsd_sigtramp_end) 87 return 1; 88 89 return nbsd_pc_in_sigtramp (pc, name); 90 } 91 92 struct trad_frame_saved_reg * 93 sparc64nbsd_sigcontext_saved_regs (CORE_ADDR sigcontext_addr, 94 struct frame_info *next_frame) 95 { 96 struct trad_frame_saved_reg *saved_regs; 97 CORE_ADDR addr, sp; 98 int regnum, delta; 99 100 saved_regs = trad_frame_alloc_saved_regs (next_frame); 101 102 /* The registers are saved in bits and pieces scattered all over the 103 place. The code below records their location on the assumption 104 that the part of the signal trampoline that saves the state has 105 been executed. */ 106 107 saved_regs[SPARC_SP_REGNUM].addr = sigcontext_addr + 8; 108 saved_regs[SPARC64_PC_REGNUM].addr = sigcontext_addr + 16; 109 saved_regs[SPARC64_NPC_REGNUM].addr = sigcontext_addr + 24; 110 saved_regs[SPARC64_STATE_REGNUM].addr = sigcontext_addr + 32; 111 saved_regs[SPARC_G1_REGNUM].addr = sigcontext_addr + 40; 112 saved_regs[SPARC_O0_REGNUM].addr = sigcontext_addr + 48; 113 114 /* The remaining `global' registers and %y are saved in the `local' 115 registers. */ 116 delta = SPARC_L0_REGNUM - SPARC_G0_REGNUM; 117 for (regnum = SPARC_G2_REGNUM; regnum <= SPARC_G7_REGNUM; regnum++) 118 saved_regs[regnum].realreg = regnum + delta; 119 saved_regs[SPARC64_Y_REGNUM].realreg = SPARC_L1_REGNUM; 120 121 /* The remaining `out' registers can be found in the current frame's 122 `in' registers. */ 123 delta = SPARC_I0_REGNUM - SPARC_O0_REGNUM; 124 for (regnum = SPARC_O1_REGNUM; regnum <= SPARC_O5_REGNUM; regnum++) 125 saved_regs[regnum].realreg = regnum + delta; 126 saved_regs[SPARC_O7_REGNUM].realreg = SPARC_I7_REGNUM; 127 128 /* The `local' and `in' registers have been saved in the register 129 save area. */ 130 addr = saved_regs[SPARC_SP_REGNUM].addr; 131 sp = get_frame_memory_unsigned (next_frame, addr, 8); 132 for (regnum = SPARC_L0_REGNUM, addr = sp + BIAS; 133 regnum <= SPARC_I7_REGNUM; regnum++, addr += 8) 134 saved_regs[regnum].addr = addr; 135 136 /* Handle StackGhost. */ 137 { 138 ULONGEST wcookie = sparc_fetch_wcookie (); 139 140 if (wcookie != 0) 141 { 142 ULONGEST i7; 143 144 addr = saved_regs[SPARC_I7_REGNUM].addr; 145 i7 = get_frame_memory_unsigned (next_frame, addr, 8); 146 trad_frame_set_value (saved_regs, SPARC_I7_REGNUM, i7 ^ wcookie); 147 } 148 } 149 150 /* TODO: Handle the floating-point registers. */ 151 152 return saved_regs; 153 } 154 155 static struct sparc_frame_cache * 156 sparc64nbsd_sigcontext_frame_cache (struct frame_info *next_frame, 157 void **this_cache) 158 { 159 struct sparc_frame_cache *cache; 160 CORE_ADDR addr; 161 162 if (*this_cache) 163 return *this_cache; 164 165 cache = sparc_frame_cache (next_frame, this_cache); 166 gdb_assert (cache == *this_cache); 167 168 /* If we couldn't find the frame's function, we're probably dealing 169 with an on-stack signal trampoline. */ 170 if (cache->pc == 0) 171 { 172 cache->pc = sparc64nbsd_sigtramp_start; 173 174 /* Since we couldn't find the frame's function, the cache was 175 initialized under the assumption that we're frameless. */ 176 cache->frameless_p = 0; 177 addr = frame_unwind_register_unsigned (next_frame, SPARC_FP_REGNUM); 178 cache->base = addr; 179 } 180 181 /* We find the appropriate instance of `struct sigcontext' at a 182 fixed offset in the signal frame. */ 183 addr = cache->base + BIAS + 128 + 8; 184 cache->saved_regs = sparc64nbsd_sigcontext_saved_regs (addr, next_frame); 185 186 return cache; 187 } 188 189 static void 190 sparc64nbsd_sigcontext_frame_this_id (struct frame_info *next_frame, 191 void **this_cache, 192 struct frame_id *this_id) 193 { 194 struct sparc_frame_cache *cache = 195 sparc64nbsd_sigcontext_frame_cache (next_frame, this_cache); 196 197 (*this_id) = frame_id_build (cache->base, cache->pc); 198 } 199 200 static void 201 sparc64nbsd_sigcontext_frame_prev_register (struct frame_info *next_frame, 202 void **this_cache, 203 int regnum, int *optimizedp, 204 enum lval_type *lvalp, 205 CORE_ADDR *addrp, 206 int *realnump, void *valuep) 207 { 208 struct sparc_frame_cache *cache = 209 sparc64nbsd_sigcontext_frame_cache (next_frame, this_cache); 210 211 trad_frame_get_prev_register (next_frame, cache->saved_regs, regnum, 212 optimizedp, lvalp, addrp, realnump, valuep); 213 } 214 215 static const struct frame_unwind sparc64nbsd_sigcontext_frame_unwind = 216 { 217 SIGTRAMP_FRAME, 218 sparc64nbsd_sigcontext_frame_this_id, 219 sparc64nbsd_sigcontext_frame_prev_register 220 }; 221 222 static const struct frame_unwind * 223 sparc64nbsd_sigtramp_frame_sniffer (struct frame_info *next_frame) 224 { 225 CORE_ADDR pc = frame_pc_unwind (next_frame); 226 char *name; 227 228 find_pc_partial_function (pc, &name, NULL, NULL); 229 if (sparc64nbsd_pc_in_sigtramp (pc, name)) 230 { 231 if (name == NULL || strncmp (name, "__sigtramp_sigcontext", 21)) 232 return &sparc64nbsd_sigcontext_frame_unwind; 233 } 234 235 return NULL; 236 } 237 238 239 static void 240 sparc64nbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch) 241 { 242 struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); 243 244 tdep->gregset = regset_alloc (gdbarch, sparc64nbsd_supply_gregset, NULL); 245 tdep->sizeof_gregset = 160; 246 247 tdep->fpregset = regset_alloc (gdbarch, sparc64nbsd_supply_fpregset, NULL); 248 tdep->sizeof_fpregset = 272; 249 250 frame_unwind_append_sniffer (gdbarch, sparc64nbsd_sigtramp_frame_sniffer); 251 252 sparc64_init_abi (info, gdbarch); 253 254 /* NetBSD/sparc64 has SVR4-style shared libraries... */ 255 set_gdbarch_in_solib_call_trampoline (gdbarch, in_plt_section); 256 set_gdbarch_skip_trampoline_code (gdbarch, find_solib_trampoline_target); 257 set_solib_svr4_fetch_link_map_offsets 258 (gdbarch, svr4_lp64_fetch_link_map_offsets); 259 } 260 261 262 /* Provide a prototype to silence -Wmissing-prototypes. */ 263 void _initialize_sparc64nbsd_tdep (void); 264 265 void 266 _initialize_sparc64nbsd_tdep (void) 267 { 268 gdbarch_register_osabi (bfd_arch_sparc, bfd_mach_sparc_v9, 269 GDB_OSABI_NETBSD_ELF, sparc64nbsd_init_abi); 270 } 271