1 /* Target-dependent code for OpenBSD/sparc.
3 Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
4 Free Software Foundation, 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 3 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, see <http://www.gnu.org/licenses/>. */
22 #include "floatformat.h"
24 #include "frame-unwind.h"
29 #include "trad-frame.h"
31 #include "gdb_assert.h"
33 #include "obsd-tdep.h"
34 #include "sparc-tdep.h"
35 #include "solib-svr4.h"
36 #include "bsd-uthread.h"
38 /* Signal trampolines. */
40 /* The OpenBSD kernel maps the signal trampoline at some random
41 location in user space, which means that the traditional BSD way of
42 detecting it won't work.
44 The signal trampoline will be mapped at an address that is page
45 aligned. We recognize the signal trampoline by looking for the
46 sigreturn system call. */
48 static const int sparc32obsd_page_size
= 4096;
51 sparc32obsd_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
53 CORE_ADDR start_pc
= (pc
& ~(sparc32obsd_page_size
- 1));
59 /* Check for "restore %g0, SYS_sigreturn, %g1". */
60 insn
= sparc_fetch_instruction (start_pc
+ 0xec);
61 if (insn
!= 0x83e82067)
64 /* Check for "t ST_SYSCALL". */
65 insn
= sparc_fetch_instruction (start_pc
+ 0xf4);
66 if (insn
!= 0x91d02000)
72 static struct sparc_frame_cache
*
73 sparc32obsd_sigtramp_frame_cache (struct frame_info
*this_frame
,
76 struct sparc_frame_cache
*cache
;
82 cache
= sparc_frame_cache (this_frame
, this_cache
);
83 gdb_assert (cache
== *this_cache
);
85 /* If we couldn't find the frame's function, we're probably dealing
86 with an on-stack signal trampoline. */
89 cache
->pc
= get_frame_pc (this_frame
);
90 cache
->pc
&= ~(sparc32obsd_page_size
- 1);
92 /* Since we couldn't find the frame's function, the cache was
93 initialized under the assumption that we're frameless. */
94 cache
->frameless_p
= 0;
95 addr
= get_frame_register_unsigned (this_frame
, SPARC_FP_REGNUM
);
99 cache
->saved_regs
= sparc32nbsd_sigcontext_saved_regs (this_frame
);
105 sparc32obsd_sigtramp_frame_this_id (struct frame_info
*this_frame
,
107 struct frame_id
*this_id
)
109 struct sparc_frame_cache
*cache
=
110 sparc32obsd_sigtramp_frame_cache (this_frame
, this_cache
);
112 (*this_id
) = frame_id_build (cache
->base
, cache
->pc
);
115 static struct value
*
116 sparc32obsd_sigtramp_frame_prev_register (struct frame_info
*this_frame
,
117 void **this_cache
, int regnum
)
119 struct sparc_frame_cache
*cache
=
120 sparc32obsd_sigtramp_frame_cache (this_frame
, this_cache
);
122 return trad_frame_get_prev_register (this_frame
, cache
->saved_regs
, regnum
);
126 sparc32obsd_sigtramp_frame_sniffer (const struct frame_unwind
*self
,
127 struct frame_info
*this_frame
,
130 CORE_ADDR pc
= get_frame_pc (this_frame
);
133 find_pc_partial_function (pc
, &name
, NULL
, NULL
);
134 if (sparc32obsd_pc_in_sigtramp (pc
, name
))
139 static const struct frame_unwind sparc32obsd_sigtramp_frame_unwind
=
142 default_frame_unwind_stop_reason
,
143 sparc32obsd_sigtramp_frame_this_id
,
144 sparc32obsd_sigtramp_frame_prev_register
,
146 sparc32obsd_sigtramp_frame_sniffer
151 /* Offset wthin the thread structure where we can find %fp and %i7. */
152 #define SPARC32OBSD_UTHREAD_FP_OFFSET 128
153 #define SPARC32OBSD_UTHREAD_PC_OFFSET 132
156 sparc32obsd_supply_uthread (struct regcache
*regcache
,
157 int regnum
, CORE_ADDR addr
)
159 struct gdbarch
*gdbarch
= get_regcache_arch (regcache
);
160 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
161 CORE_ADDR fp
, fp_addr
= addr
+ SPARC32OBSD_UTHREAD_FP_OFFSET
;
164 gdb_assert (regnum
>= -1);
166 fp
= read_memory_unsigned_integer (fp_addr
, 4, byte_order
);
167 if (regnum
== SPARC_SP_REGNUM
|| regnum
== -1)
169 store_unsigned_integer (buf
, 4, byte_order
, fp
);
170 regcache_raw_supply (regcache
, SPARC_SP_REGNUM
, buf
);
172 if (regnum
== SPARC_SP_REGNUM
)
176 if (regnum
== SPARC32_PC_REGNUM
|| regnum
== SPARC32_NPC_REGNUM
179 CORE_ADDR i7
, i7_addr
= addr
+ SPARC32OBSD_UTHREAD_PC_OFFSET
;
181 i7
= read_memory_unsigned_integer (i7_addr
, 4, byte_order
);
182 if (regnum
== SPARC32_PC_REGNUM
|| regnum
== -1)
184 store_unsigned_integer (buf
, 4, byte_order
, i7
+ 8);
185 regcache_raw_supply (regcache
, SPARC32_PC_REGNUM
, buf
);
187 if (regnum
== SPARC32_NPC_REGNUM
|| regnum
== -1)
189 store_unsigned_integer (buf
, 4, byte_order
, i7
+ 12);
190 regcache_raw_supply (regcache
, SPARC32_NPC_REGNUM
, buf
);
193 if (regnum
== SPARC32_PC_REGNUM
|| regnum
== SPARC32_NPC_REGNUM
)
197 sparc_supply_rwindow (regcache
, fp
, regnum
);
201 sparc32obsd_collect_uthread(const struct regcache
*regcache
,
202 int regnum
, CORE_ADDR addr
)
204 struct gdbarch
*gdbarch
= get_regcache_arch (regcache
);
205 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
209 gdb_assert (regnum
>= -1);
211 if (regnum
== SPARC_SP_REGNUM
|| regnum
== -1)
213 CORE_ADDR fp_addr
= addr
+ SPARC32OBSD_UTHREAD_FP_OFFSET
;
215 regcache_raw_collect (regcache
, SPARC_SP_REGNUM
, buf
);
216 write_memory (fp_addr
,buf
, 4);
219 if (regnum
== SPARC32_PC_REGNUM
|| regnum
== -1)
221 CORE_ADDR i7
, i7_addr
= addr
+ SPARC32OBSD_UTHREAD_PC_OFFSET
;
223 regcache_raw_collect (regcache
, SPARC32_PC_REGNUM
, buf
);
224 i7
= extract_unsigned_integer (buf
, 4, byte_order
) - 8;
225 write_memory_unsigned_integer (i7_addr
, 4, byte_order
, i7
);
227 if (regnum
== SPARC32_PC_REGNUM
)
231 regcache_raw_collect (regcache
, SPARC_SP_REGNUM
, buf
);
232 sp
= extract_unsigned_integer (buf
, 4, byte_order
);
233 sparc_collect_rwindow (regcache
, sp
, regnum
);
238 sparc32obsd_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
240 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
242 /* OpenBSD/sparc is very similar to NetBSD/sparc ELF. */
243 sparc32nbsd_elf_init_abi (info
, gdbarch
);
245 set_gdbarch_skip_solib_resolver (gdbarch
, obsd_skip_solib_resolver
);
247 frame_unwind_append_unwinder (gdbarch
, &sparc32obsd_sigtramp_frame_unwind
);
249 /* OpenBSD provides a user-level threads implementation. */
250 bsd_uthread_set_supply_uthread (gdbarch
, sparc32obsd_supply_uthread
);
251 bsd_uthread_set_collect_uthread (gdbarch
, sparc32obsd_collect_uthread
);
255 /* Provide a prototype to silence -Wmissing-prototypes. */
256 void _initialize_sparc32obsd_tdep (void);
259 _initialize_sparc32obsd_tdep (void)
261 gdbarch_register_osabi (bfd_arch_sparc
, 0, GDB_OSABI_OPENBSD_ELF
,
262 sparc32obsd_init_abi
);