1 /* Target-dependent code for NetBSD/Alpha.
3 Copyright 2002, 2003, 2004 Free Software Foundation, Inc.
4 Contributed by Wasabi Systems, Inc.
6 This file is part of GDB.
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.
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.
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. */
30 #include "gdb_string.h"
32 #include "alpha-tdep.h"
33 #include "alphabsd-tdep.h"
34 #include "nbsd-tdep.h"
35 #include "solib-svr4.h"
38 fetch_core_registers (char *core_reg_sect
, unsigned core_reg_size
, int which
,
44 /* Table to map a gdb register number to a trapframe register index. */
45 static const int regmap
[] =
56 #define SIZEOF_TRAPFRAME (33 * 8)
58 /* We get everything from one section. */
63 fpregs
= core_reg_sect
+ SIZEOF_TRAPFRAME
;
65 if (core_reg_size
< (SIZEOF_TRAPFRAME
+ SIZEOF_STRUCT_FPREG
))
67 warning (_("Wrong size register set in core file."));
71 /* Integer registers. */
72 for (regno
= 0; regno
< ALPHA_ZERO_REGNUM
; regno
++)
73 regcache_raw_supply (current_regcache
, regno
, regs
+ (regmap
[regno
] * 8));
74 regcache_raw_supply (current_regcache
, ALPHA_ZERO_REGNUM
, NULL
);
75 regcache_raw_supply (current_regcache
, PC_REGNUM
, regs
+ (28 * 8));
77 /* Floating point registers. */
78 alphabsd_supply_fpreg (fpregs
, -1);
82 fetch_elfcore_registers (char *core_reg_sect
, unsigned core_reg_size
, int which
,
87 case 0: /* Integer registers. */
88 if (core_reg_size
!= SIZEOF_STRUCT_REG
)
89 warning (_("Wrong size register set in core file."));
91 alphabsd_supply_reg (core_reg_sect
, -1);
94 case 2: /* Floating point registers. */
95 if (core_reg_size
!= SIZEOF_STRUCT_FPREG
)
96 warning (_("Wrong size FP register set in core file."));
98 alphabsd_supply_fpreg (core_reg_sect
, -1);
102 /* Don't know what kind of register request this is; just ignore it. */
107 static struct core_fns alphanbsd_core_fns
=
109 bfd_target_unknown_flavour
, /* core_flavour */
110 default_check_format
, /* check_format */
111 default_core_sniffer
, /* core_sniffer */
112 fetch_core_registers
, /* core_read_registers */
116 static struct core_fns alphanbsd_elfcore_fns
=
118 bfd_target_elf_flavour
, /* core_flavour */
119 default_check_format
, /* check_format */
120 default_core_sniffer
, /* core_sniffer */
121 fetch_elfcore_registers
, /* core_read_registers */
125 /* Under NetBSD/alpha, signal handler invocations can be identified by the
126 designated code sequence that is used to return from a signal handler.
127 In particular, the return address of a signal handler points to the
128 following code sequence:
132 lda v0, 295(zero) # __sigreturn14
135 Each instruction has a unique encoding, so we simply attempt to match
136 the instruction the PC is pointing to with any of the above instructions.
137 If there is a hit, we know the offset to the start of the designated
138 sequence and can then check whether we really are executing in the
139 signal trampoline. If not, -1 is returned, otherwise the offset from the
140 start of the return sequence is returned. */
141 static const unsigned char sigtramp_retcode
[] =
143 0x00, 0x00, 0x1e, 0xa6, /* ldq a0, 0(sp) */
144 0x10, 0x00, 0xde, 0x23, /* lda sp, 16(sp) */
145 0x27, 0x01, 0x1f, 0x20, /* lda v0, 295(zero) */
146 0x83, 0x00, 0x00, 0x00, /* call_pal callsys */
148 #define RETCODE_NWORDS 4
149 #define RETCODE_SIZE (RETCODE_NWORDS * 4)
152 alphanbsd_sigtramp_offset (CORE_ADDR pc
)
154 unsigned char ret
[RETCODE_SIZE
], w
[4];
158 if (deprecated_read_memory_nobpt (pc
, (char *) w
, 4) != 0)
161 for (i
= 0; i
< RETCODE_NWORDS
; i
++)
163 if (memcmp (w
, sigtramp_retcode
+ (i
* 4), 4) == 0)
166 if (i
== RETCODE_NWORDS
)
172 if (deprecated_read_memory_nobpt (pc
, (char *) ret
, sizeof (ret
)) != 0)
175 if (memcmp (ret
, sigtramp_retcode
, RETCODE_SIZE
) == 0)
182 alphanbsd_pc_in_sigtramp (CORE_ADDR pc
, char *func_name
)
184 return (nbsd_pc_in_sigtramp (pc
, func_name
)
185 || alphanbsd_sigtramp_offset (pc
) >= 0);
189 alphanbsd_sigcontext_addr (struct frame_info
*frame
)
191 /* FIXME: This is not correct for all versions of NetBSD/alpha.
192 We will probably need to disassemble the trampoline to figure
193 out which trampoline frame type we have. */
194 return get_frame_base (frame
);
198 alphanbsd_init_abi (struct gdbarch_info info
,
199 struct gdbarch
*gdbarch
)
201 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
203 /* Hook into the DWARF CFI frame unwinder. */
204 alpha_dwarf2_init_abi (info
, gdbarch
);
206 /* Hook into the MDEBUG frame unwinder. */
207 alpha_mdebug_init_abi (info
, gdbarch
);
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
->pc_in_sigtramp
= alphanbsd_pc_in_sigtramp
;
218 tdep
->sigcontext_addr
= alphanbsd_sigcontext_addr
;
221 tdep
->jb_elt_size
= 8;
225 _initialize_alphanbsd_tdep (void)
227 gdbarch_register_osabi (bfd_arch_alpha
, 0, GDB_OSABI_NETBSD_ELF
,
229 gdbarch_register_osabi (bfd_arch_alpha
, 0, GDB_OSABI_OPENBSD_ELF
,
232 deprecated_add_core_fns (&alphanbsd_core_fns
);
233 deprecated_add_core_fns (&alphanbsd_elfcore_fns
);