1 /* Target-dependent code for NetBSD/Alpha.
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 "solib-svr4.h"
31 #include "alpha-tdep.h"
32 #include "alphabsd-tdep.h"
33 #include "nbsd-tdep.h"
36 fetch_core_registers (char *core_reg_sect
, unsigned core_reg_size
, int which
,
42 /* Table to map a gdb register number to a trapframe register index. */
43 static const int regmap
[] =
54 #define SIZEOF_TRAPFRAME (33 * 8)
56 /* We get everything from one section. */
61 fpregs
= core_reg_sect
+ SIZEOF_TRAPFRAME
;
63 if (core_reg_size
< (SIZEOF_TRAPFRAME
+ SIZEOF_STRUCT_FPREG
))
65 warning ("Wrong size register set in core file.");
69 /* Integer registers. */
70 for (regno
= 0; regno
< ALPHA_ZERO_REGNUM
; regno
++)
71 supply_register (regno
, regs
+ (regmap
[regno
] * 8));
72 supply_register (ALPHA_ZERO_REGNUM
, NULL
);
73 supply_register (PC_REGNUM
, regs
+ (28 * 8));
75 /* Floating point registers. */
76 alphabsd_supply_fpreg (fpregs
, -1);
80 fetch_elfcore_registers (char *core_reg_sect
, unsigned core_reg_size
, int which
,
85 case 0: /* Integer registers. */
86 if (core_reg_size
!= SIZEOF_STRUCT_REG
)
87 warning ("Wrong size register set in core file.");
89 alphabsd_supply_reg (core_reg_sect
, -1);
92 case 2: /* Floating point registers. */
93 if (core_reg_size
!= SIZEOF_STRUCT_FPREG
)
94 warning ("Wrong size FP register set in core file.");
96 alphabsd_supply_fpreg (core_reg_sect
, -1);
100 /* Don't know what kind of register request this is; just ignore it. */
105 static struct core_fns alphanbsd_core_fns
=
107 bfd_target_unknown_flavour
, /* core_flavour */
108 default_check_format
, /* check_format */
109 default_core_sniffer
, /* core_sniffer */
110 fetch_core_registers
, /* core_read_registers */
114 static struct core_fns alphanbsd_elfcore_fns
=
116 bfd_target_elf_flavour
, /* core_flavour */
117 default_check_format
, /* check_format */
118 default_core_sniffer
, /* core_sniffer */
119 fetch_elfcore_registers
, /* core_read_registers */
123 /* Under NetBSD/alpha, signal handler invocations can be identified by the
124 designated code sequence that is used to return from a signal handler.
125 In particular, the return address of a signal handler points to the
126 following code sequence:
130 lda v0, 295(zero) # __sigreturn14
133 Each instruction has a unique encoding, so we simply attempt to match
134 the instruction the PC is pointing to with any of the above instructions.
135 If there is a hit, we know the offset to the start of the designated
136 sequence and can then check whether we really are executing in the
137 signal trampoline. If not, -1 is returned, otherwise the offset from the
138 start of the return sequence is returned. */
139 static const unsigned char sigtramp_retcode
[] =
141 0x00, 0x00, 0x1e, 0xa6, /* ldq a0, 0(sp) */
142 0x10, 0x00, 0xde, 0x23, /* lda sp, 16(sp) */
143 0x27, 0x01, 0x1f, 0x20, /* lda v0, 295(zero) */
144 0x83, 0x00, 0x00, 0x00, /* call_pal callsys */
146 #define RETCODE_NWORDS 4
147 #define RETCODE_SIZE (RETCODE_NWORDS * 4)
150 alphanbsd_sigtramp_offset (CORE_ADDR pc
)
152 unsigned char ret
[RETCODE_SIZE
], w
[4];
156 if (read_memory_nobpt (pc
, (char *) w
, 4) != 0)
159 for (i
= 0; i
< RETCODE_NWORDS
; i
++)
161 if (memcmp (w
, sigtramp_retcode
+ (i
* 4), 4) == 0)
164 if (i
== RETCODE_NWORDS
)
170 if (read_memory_nobpt (pc
, (char *) ret
, sizeof (ret
)) != 0)
173 if (memcmp (ret
, sigtramp_retcode
, RETCODE_SIZE
) == 0)
180 alphanbsd_pc_in_sigtramp (CORE_ADDR pc
, char *func_name
)
182 return (nbsd_pc_in_sigtramp (pc
, func_name
)
183 || alphanbsd_sigtramp_offset (pc
) >= 0);
187 alphanbsd_sigcontext_addr (struct frame_info
*frame
)
189 /* FIXME: This is not correct for all versions of NetBSD/alpha.
190 We will probably need to disassemble the trampoline to figure
191 out which trampoline frame type we have. */
192 return get_frame_base (frame
);
196 alphanbsd_init_abi (struct gdbarch_info info
,
197 struct gdbarch
*gdbarch
)
199 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
201 /* Hook into the DWARF CFI frame unwinder. */
202 alpha_dwarf2_init_abi (info
, gdbarch
);
204 /* Hook into the MDEBUG frame unwinder. */
205 alpha_mdebug_init_abi (info
, gdbarch
);
207 set_gdbarch_pc_in_sigtramp (gdbarch
, alphanbsd_pc_in_sigtramp
);
209 /* NetBSD/alpha does not provide single step support via ptrace(2); we
210 must use software single-stepping. */
211 set_gdbarch_software_single_step (gdbarch
, alpha_software_single_step
);
213 set_solib_svr4_fetch_link_map_offsets (gdbarch
,
214 nbsd_lp64_solib_svr4_fetch_link_map_offsets
);
216 tdep
->dynamic_sigtramp_offset
= alphanbsd_sigtramp_offset
;
217 tdep
->sigcontext_addr
= alphanbsd_sigcontext_addr
;
220 tdep
->jb_elt_size
= 8;
224 _initialize_alphanbsd_tdep (void)
226 gdbarch_register_osabi (bfd_arch_alpha
, 0, GDB_OSABI_NETBSD_ELF
,
229 add_core_fns (&alphanbsd_core_fns
);
230 add_core_fns (&alphanbsd_elfcore_fns
);