1 /* Target-dependent code for SPARC systems running NetBSD.
2 Copyright 2002, 2003 Free Software Foundation, Inc.
3 Contributed by Wasabi Systems, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
29 #include "gdb_string.h"
31 #include "sparcnbsd-tdep.h"
32 #include "nbsd-tdep.h"
34 #include "solib-svr4.h"
36 #define REG32_OFFSET_PSR (0 * 4)
37 #define REG32_OFFSET_PC (1 * 4)
38 #define REG32_OFFSET_NPC (2 * 4)
39 #define REG32_OFFSET_Y (3 * 4)
40 #define REG32_OFFSET_GLOBAL (4 * 4)
41 #define REG32_OFFSET_OUT (12 * 4)
43 #define REG64_OFFSET_TSTATE (0 * 8)
44 #define REG64_OFFSET_PC (1 * 8)
45 #define REG64_OFFSET_NPC (2 * 8)
46 #define REG64_OFFSET_Y (3 * 8)
47 #define REG64_OFFSET_GLOBAL (4 * 8)
48 #define REG64_OFFSET_OUT (12 * 8)
51 sparcnbsd_supply_reg32 (char *regs
, int regno
)
55 if (regno
== PS_REGNUM
|| regno
== -1)
56 supply_register (PS_REGNUM
, regs
+ REG32_OFFSET_PSR
);
58 if (regno
== PC_REGNUM
|| regno
== -1)
59 supply_register (PC_REGNUM
, regs
+ REG32_OFFSET_PC
);
61 if (regno
== NPC_REGNUM
|| regno
== -1)
62 supply_register (NPC_REGNUM
, regs
+ REG32_OFFSET_NPC
);
64 if (regno
== Y_REGNUM
|| regno
== -1)
65 supply_register (Y_REGNUM
, regs
+ REG32_OFFSET_Y
);
67 if ((regno
>= G0_REGNUM
&& regno
<= G7_REGNUM
) || regno
== -1)
69 if (regno
== G0_REGNUM
|| regno
== -1)
70 supply_register (G0_REGNUM
, NULL
); /* %g0 is always zero */
71 for (i
= G1_REGNUM
; i
<= G7_REGNUM
; i
++)
73 if (regno
== i
|| regno
== -1)
74 supply_register (i
, regs
+ REG32_OFFSET_GLOBAL
+
75 ((i
- G0_REGNUM
) * 4));
79 if ((regno
>= O0_REGNUM
&& regno
<= O7_REGNUM
) || regno
== -1)
81 for (i
= O0_REGNUM
; i
<= O7_REGNUM
; i
++)
83 if (regno
== i
|| regno
== -1)
84 supply_register (i
, regs
+ REG32_OFFSET_OUT
+
85 ((i
- O0_REGNUM
) * 4));
89 /* Inputs and Locals are stored onto the stack by by the kernel. */
90 if ((regno
>= L0_REGNUM
&& regno
<= I7_REGNUM
) || regno
== -1)
92 CORE_ADDR sp
= read_register (SP_REGNUM
);
95 for (i
= L0_REGNUM
; i
<= I7_REGNUM
; i
++)
97 if (regno
== i
|| regno
== -1)
99 target_read_memory (sp
+ ((i
- L0_REGNUM
) * 4),
101 supply_register (i
, buf
);
106 /* FIXME: If we don't set these valid, read_register_bytes() rereads
107 all the regs every time it is called! */
108 if (regno
== WIM_REGNUM
|| regno
== -1)
109 supply_register (WIM_REGNUM
, NULL
);
110 if (regno
== TBR_REGNUM
|| regno
== -1)
111 supply_register (TBR_REGNUM
, NULL
);
112 if (regno
== CPS_REGNUM
|| regno
== -1)
113 supply_register (CPS_REGNUM
, NULL
);
117 sparcnbsd_supply_reg64 (char *regs
, int regno
)
122 if (regno
== TSTATE_REGNUM
|| regno
== -1)
123 supply_register (PS_REGNUM
, regs
+ REG64_OFFSET_TSTATE
);
125 if (regno
== PC_REGNUM
|| regno
== -1)
126 supply_register (PC_REGNUM
, regs
+ REG64_OFFSET_PC
);
128 if (regno
== NPC_REGNUM
|| regno
== -1)
129 supply_register (NPC_REGNUM
, regs
+ REG64_OFFSET_NPC
);
131 if (regno
== Y_REGNUM
|| regno
== -1)
133 memset (buf
, 0, sizeof (buf
));
134 memcpy (&buf
[4], regs
+ REG64_OFFSET_Y
, 4);
135 supply_register (Y_REGNUM
, buf
);
138 if ((regno
>= G0_REGNUM
&& regno
<= G7_REGNUM
) || regno
== -1)
140 if (regno
== G0_REGNUM
|| regno
== -1)
141 supply_register (G0_REGNUM
, NULL
); /* %g0 is always zero */
142 for (i
= G1_REGNUM
; i
<= G7_REGNUM
; i
++)
144 if (regno
== i
|| regno
== -1)
145 supply_register (i
, regs
+ REG64_OFFSET_GLOBAL
+
146 ((i
- G0_REGNUM
) * 8));
150 if ((regno
>= O0_REGNUM
&& regno
<= O7_REGNUM
) || regno
== -1)
152 for (i
= O0_REGNUM
; i
<= O7_REGNUM
; i
++)
154 if (regno
== i
|| regno
== -1)
155 supply_register (i
, regs
+ REG64_OFFSET_OUT
+
156 ((i
- O0_REGNUM
) * 8));
160 /* Inputs and Locals are stored onto the stack by by the kernel. */
161 if ((regno
>= L0_REGNUM
&& regno
<= I7_REGNUM
) || regno
== -1)
163 CORE_ADDR sp
= read_register (SP_REGNUM
);
168 /* Registers are 64-bit. */
171 for (i
= L0_REGNUM
; i
<= I7_REGNUM
; i
++)
173 if (regno
== i
|| regno
== -1)
175 target_read_memory (sp
+ ((i
- L0_REGNUM
) * 8),
177 supply_register (i
, buf
);
183 /* Registers are 32-bit. Toss any sign-extension of the stack
184 pointer, clear out the top half of the temporary buffer, and
185 put the register value in the bottom half. */
188 memset (buf
, 0, sizeof (buf
));
189 for (i
= L0_REGNUM
; i
<= I7_REGNUM
; i
++)
191 if (regno
== i
|| regno
== -1)
193 target_read_memory (sp
+ ((i
- L0_REGNUM
) * 4),
194 &buf
[4], sizeof (buf
));
195 supply_register (i
, buf
);
201 /* FIXME: If we don't set these valid, read_register_bytes() rereads
202 all the regs every time it is called! */
203 if (regno
== WIM_REGNUM
|| regno
== -1)
204 supply_register (WIM_REGNUM
, NULL
);
205 if (regno
== TBR_REGNUM
|| regno
== -1)
206 supply_register (TBR_REGNUM
, NULL
);
207 if (regno
== CPS_REGNUM
|| regno
== -1)
208 supply_register (CPS_REGNUM
, NULL
);
212 sparcnbsd_fill_reg32 (char *regs
, int regno
)
216 if (regno
== PS_REGNUM
|| regno
== -1)
217 regcache_collect (PS_REGNUM
, regs
+ REG32_OFFSET_PSR
);
219 if (regno
== PC_REGNUM
|| regno
== -1)
220 regcache_collect (PC_REGNUM
, regs
+ REG32_OFFSET_PC
);
222 if (regno
== NPC_REGNUM
|| regno
== -1)
223 regcache_collect (NPC_REGNUM
, regs
+ REG32_OFFSET_NPC
);
225 if (regno
== Y_REGNUM
|| regno
== -1)
226 regcache_collect (Y_REGNUM
, regs
+ REG32_OFFSET_Y
);
228 if ((regno
>= G0_REGNUM
&& regno
<= G7_REGNUM
) || regno
== -1)
230 /* %g0 is always zero */
231 for (i
= G1_REGNUM
; i
<= G7_REGNUM
; i
++)
233 if (regno
== i
|| regno
== -1)
234 regcache_collect (i
, regs
+ REG32_OFFSET_GLOBAL
+
235 ((i
- G0_REGNUM
) * 4));
239 if ((regno
>= O0_REGNUM
&& regno
<= O7_REGNUM
) || regno
== -1)
241 for (i
= O0_REGNUM
; i
<= O7_REGNUM
; i
++)
243 if (regno
== i
|| regno
== -1)
244 regcache_collect (i
, regs
+ REG32_OFFSET_OUT
+
245 ((i
- O0_REGNUM
) * 4));
249 /* Responsibility for the stack regs is pushed off onto the caller. */
253 sparcnbsd_fill_reg64 (char *regs
, int regno
)
257 if (regno
== TSTATE_REGNUM
|| regno
== -1)
258 regcache_collect (TSTATE_REGNUM
, regs
+ REG64_OFFSET_TSTATE
);
260 if (regno
== PC_REGNUM
|| regno
== -1)
261 regcache_collect (PC_REGNUM
, regs
+ REG64_OFFSET_PC
);
263 if (regno
== NPC_REGNUM
|| regno
== -1)
264 regcache_collect (NPC_REGNUM
, regs
+ REG64_OFFSET_NPC
);
266 if (regno
== Y_REGNUM
|| regno
== -1)
267 regcache_collect (Y_REGNUM
, regs
+ REG64_OFFSET_Y
);
269 if ((regno
>= G0_REGNUM
&& regno
<= G7_REGNUM
) || regno
== -1)
271 /* %g0 is always zero */
272 for (i
= G1_REGNUM
; i
<= G7_REGNUM
; i
++)
274 if (regno
== i
|| regno
== -1)
275 regcache_collect (i
, regs
+ REG64_OFFSET_GLOBAL
+
276 ((i
- G0_REGNUM
) * 4));
280 if ((regno
>= O0_REGNUM
&& regno
<= O7_REGNUM
) || regno
== -1)
282 for (i
= O0_REGNUM
; i
<= O7_REGNUM
; i
++)
284 if (regno
== i
|| regno
== -1)
285 regcache_collect (i
, regs
+ REG64_OFFSET_OUT
+
286 ((i
- O0_REGNUM
) * 4));
290 /* Responsibility for the stack regs is pushed off onto the caller. */
294 sparcnbsd_supply_fpreg32 (char *fpregs
, int regno
)
298 for (i
= 0; i
<= 31; i
++)
300 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
301 supply_register (FP0_REGNUM
+ i
, fpregs
+ (i
* 4));
304 if (regno
== FPS_REGNUM
|| regno
== -1)
305 supply_register (FPS_REGNUM
, fpregs
+ (32 * 4));
309 sparcnbsd_supply_fpreg64 (char *fpregs
, int regno
)
313 for (i
= 0; i
<= 31; i
++)
315 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
316 supply_register (FP0_REGNUM
+ i
, fpregs
+ (i
* 4));
321 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
322 supply_register (FP0_REGNUM
+ i
, fpregs
+ (32 * 4) + (i
* 8));
325 if (regno
== FPS_REGNUM
|| regno
== -1)
326 supply_register (FPS_REGNUM
, fpregs
+ (32 * 4) + (16 * 8));
332 sparcnbsd_fill_fpreg32 (char *fpregs
, int regno
)
336 for (i
= 0; i
<= 31; i
++)
338 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
339 regcache_collect (FP0_REGNUM
+ i
, fpregs
+ (i
* 4));
342 if (regno
== FPS_REGNUM
|| regno
== -1)
343 regcache_collect (FPS_REGNUM
, fpregs
+ (32 * 4));
347 sparcnbsd_fill_fpreg64 (char *fpregs
, int regno
)
351 for (i
= 0; i
<= 31; i
++)
353 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
354 regcache_collect (FP0_REGNUM
+ i
, fpregs
+ (i
* 4));
359 if (regno
== (FP0_REGNUM
+ i
) || regno
== -1)
360 regcache_collect (FP0_REGNUM
+ i
, fpregs
+ (32 * 4) + (i
* 8));
363 if (regno
== FPS_REGNUM
|| regno
== -1)
364 regcache_collect (FPS_REGNUM
, fpregs
+ (32 * 4) + (16 * 8));
369 /* Unlike other NetBSD implementations, the SPARC port historically used
370 .reg and .reg2 (see bfd/netbsd-core.c), and as such, we can share one
371 routine for a.out and ELF core files. */
373 fetch_core_registers (char *core_reg_sect
, unsigned core_reg_size
, int which
,
376 int reg_size
, fpreg_size
;
378 if (gdbarch_ptr_bit (current_gdbarch
) == 32)
381 fpreg_size
= (33 * 4);
386 fpreg_size
= (64 * 4)
394 case 0: /* Integer registers */
395 if (core_reg_size
!= reg_size
)
396 warning ("Wrong size register set in core file.");
397 else if (gdbarch_ptr_bit (current_gdbarch
) == 32)
398 sparcnbsd_supply_reg32 (core_reg_sect
, -1);
400 sparcnbsd_supply_reg64 (core_reg_sect
, -1);
403 case 2: /* Floating pointer registers */
404 if (core_reg_size
!= fpreg_size
)
405 warning ("Wrong size FP register set in core file.");
406 else if (gdbarch_ptr_bit (current_gdbarch
) == 32)
407 sparcnbsd_supply_fpreg32 (core_reg_sect
, -1);
409 sparcnbsd_supply_fpreg64 (core_reg_sect
, -1);
413 /* Don't know what kind of register request this is; just ignore it. */
418 static struct core_fns sparcnbsd_core_fns
=
420 bfd_target_unknown_flavour
, /* core_flavour */
421 default_check_format
, /* check_format */
422 default_core_sniffer
, /* core_sniffer */
423 fetch_core_registers
, /* core_read_registers */
427 static struct core_fns sparcnbsd_elfcore_fns
=
429 bfd_target_elf_flavour
, /* core_flavour */
430 default_check_format
, /* check_format */
431 default_core_sniffer
, /* core_sniffer */
432 fetch_core_registers
, /* core_read_registers */
436 /* FIXME: Need PC_IN_SIGTRAMP() support, but NetBSD/sparc signal trampolines
437 aren't easily identified. */
440 sparcnbsd_get_longjmp_target_32 (CORE_ADDR
*pc
)
445 jb_addr
= read_register (O0_REGNUM
);
447 if (target_read_memory (jb_addr
+ 12, buf
, sizeof (buf
)))
450 *pc
= extract_unsigned_integer (buf
, sizeof (buf
));
456 sparcnbsd_get_longjmp_target_64 (CORE_ADDR
*pc
)
461 jb_addr
= read_register (O0_REGNUM
);
463 if (target_read_memory (jb_addr
+ 16, buf
, sizeof (buf
)))
466 *pc
= extract_unsigned_integer (buf
, sizeof (buf
));
472 sparcnbsd_aout_in_solib_call_trampoline (CORE_ADDR pc
, char *name
)
474 if (strcmp (name
, "_DYNAMIC") == 0)
481 sparcnbsd_init_abi_common (struct gdbarch_info info
,
482 struct gdbarch
*gdbarch
)
484 set_gdbarch_get_longjmp_target (gdbarch
, gdbarch_ptr_bit (gdbarch
) == 32 ?
485 sparcnbsd_get_longjmp_target_32
:
486 sparcnbsd_get_longjmp_target_64
);
490 sparcnbsd_init_abi_aout (struct gdbarch_info info
,
491 struct gdbarch
*gdbarch
)
493 sparcnbsd_init_abi_common (info
, gdbarch
);
495 set_gdbarch_in_solib_call_trampoline (gdbarch
,
496 sparcnbsd_aout_in_solib_call_trampoline
);
500 sparcnbsd_init_abi_elf (struct gdbarch_info info
,
501 struct gdbarch
*gdbarch
)
503 sparcnbsd_init_abi_common (info
, gdbarch
);
505 set_gdbarch_pc_in_sigtramp (gdbarch
, nbsd_pc_in_sigtramp
);
507 set_solib_svr4_fetch_link_map_offsets (gdbarch
,
508 gdbarch_ptr_bit (gdbarch
) == 32 ?
509 nbsd_ilp32_solib_svr4_fetch_link_map_offsets
:
510 nbsd_lp64_solib_svr4_fetch_link_map_offsets
);
513 static enum gdb_osabi
514 sparcnbsd_aout_osabi_sniffer (bfd
*abfd
)
516 if (strcmp (bfd_get_target (abfd
), "a.out-sparc-netbsd") == 0)
517 return GDB_OSABI_NETBSD_AOUT
;
519 return GDB_OSABI_UNKNOWN
;
523 _initialize_sparnbsd_tdep (void)
525 gdbarch_register_osabi_sniffer (bfd_arch_sparc
, bfd_target_aout_flavour
,
526 sparcnbsd_aout_osabi_sniffer
);
528 gdbarch_register_osabi (bfd_arch_sparc
, 0, GDB_OSABI_NETBSD_AOUT
,
529 sparcnbsd_init_abi_aout
);
530 gdbarch_register_osabi (bfd_arch_sparc
, 0, GDB_OSABI_NETBSD_ELF
,
531 sparcnbsd_init_abi_elf
);
533 add_core_fns (&sparcnbsd_core_fns
);
534 add_core_fns (&sparcnbsd_elfcore_fns
);