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
sparc64nbsd_supply_gregset(const struct regset * regset,struct regcache * regcache,int regnum,const void * gregs,size_t len)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
sparc64nbsd_supply_fpregset(const struct regset * regset,struct regcache * regcache,int regnum,const void * fpregs,size_t len)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
sparc64nbsd_pc_in_sigtramp(CORE_ADDR pc,char * name)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 *
sparc64nbsd_sigcontext_saved_regs(CORE_ADDR sigcontext_addr,struct frame_info * next_frame)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 *
sparc64nbsd_sigcontext_frame_cache(struct frame_info * next_frame,void ** this_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
sparc64nbsd_sigcontext_frame_this_id(struct frame_info * next_frame,void ** this_cache,struct frame_id * this_id)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
sparc64nbsd_sigcontext_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)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 *
sparc64nbsd_sigtramp_frame_sniffer(struct frame_info * next_frame)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
sparc64nbsd_init_abi(struct gdbarch_info info,struct gdbarch * gdbarch)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
_initialize_sparc64nbsd_tdep(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