1 /* Target-dependent code for Solaris SPARC.
3 Copyright 2003, 2004 Free Software Foundation, 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. */
24 #include "frame-unwind.h"
31 #include "trad-frame.h"
33 #include "gdb_assert.h"
34 #include "gdb_string.h"
36 #include "sparc-tdep.h"
37 #include "solib-svr4.h"
39 /* From <sys/regset.h>. */
40 const struct sparc_gregset sparc32_sol2_gregset
=
53 /* The Solaris signal trampolines reside in libc. For normal signals,
54 the function `sigacthandler' is used. This signal trampoline will
55 call the signal handler using the System V calling convention,
56 where the third argument is a pointer to an instance of
57 `ucontext_t', which has a member `uc_mcontext' that contains the
58 saved registers. Incidentally, the kernel passes the `ucontext_t'
59 pointer as the third argument of the signal trampoline too, and
60 `sigacthandler' simply passes it on. However, if you link your
61 program with "-L/usr/ucblib -R/usr/ucblib -lucb", the function
62 `ucbsigvechandler' will be used, which invokes the using the BSD
63 convention, where the third argument is a pointer to an instance of
64 `struct sigcontext'. It is the `ucbsigvechandler' function that
65 converts the `ucontext_t' to a `sigcontext', and back. Unless the
66 signal handler modifies the `struct sigcontext' we can safely
70 sparc_sol2_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
72 return (name
&& (strcmp (name
, "sigacthandler") == 0
73 || strcmp (name
, "ucbsigvechandler") == 0));
76 static struct sparc_frame_cache
*
77 sparc32_sol2_sigtramp_frame_cache (struct frame_info
*next_frame
,
80 struct sparc_frame_cache
*cache
;
81 CORE_ADDR mcontext_addr
, addr
;
87 cache
= sparc_frame_cache (next_frame
, this_cache
);
88 gdb_assert (cache
== *this_cache
);
90 cache
->saved_regs
= trad_frame_alloc_saved_regs (next_frame
);
92 /* The third argument is a pointer to an instance of `ucontext_t',
93 which has a member `uc_mcontext' that contains the saved
95 regnum
= (cache
->frameless_p
? SPARC_O2_REGNUM
: SPARC_I2_REGNUM
);
96 mcontext_addr
= frame_unwind_register_unsigned (next_frame
, regnum
) + 40;
98 cache
->saved_regs
[SPARC32_PSR_REGNUM
].addr
= mcontext_addr
+ 0 * 4;
99 cache
->saved_regs
[SPARC32_PC_REGNUM
].addr
= mcontext_addr
+ 1 * 4;
100 cache
->saved_regs
[SPARC32_NPC_REGNUM
].addr
= mcontext_addr
+ 2 * 4;
101 cache
->saved_regs
[SPARC32_Y_REGNUM
].addr
= mcontext_addr
+ 3 * 4;
103 /* Since %g0 is always zero, keep the identity encoding. */
104 for (regnum
= SPARC_G1_REGNUM
, addr
= mcontext_addr
+ 4 * 4;
105 regnum
<= SPARC_O7_REGNUM
; regnum
++, addr
+= 4)
106 cache
->saved_regs
[regnum
].addr
= addr
;
108 if (get_frame_memory_unsigned (next_frame
, mcontext_addr
+ 19 * 4, 4))
110 /* The register windows haven't been flushed. */
111 for (regnum
= SPARC_L0_REGNUM
; regnum
<= SPARC_I7_REGNUM
; regnum
++)
112 trad_frame_set_unknown (cache
->saved_regs
, regnum
);
116 addr
= cache
->saved_regs
[SPARC_SP_REGNUM
].addr
;
117 addr
= get_frame_memory_unsigned (next_frame
, addr
, 4);
118 for (regnum
= SPARC_L0_REGNUM
;
119 regnum
<= SPARC_I7_REGNUM
; regnum
++, addr
+= 4)
120 cache
->saved_regs
[regnum
].addr
= addr
;
127 sparc32_sol2_sigtramp_frame_this_id (struct frame_info
*next_frame
,
129 struct frame_id
*this_id
)
131 struct sparc_frame_cache
*cache
=
132 sparc32_sol2_sigtramp_frame_cache (next_frame
, this_cache
);
134 (*this_id
) = frame_id_build (cache
->base
, cache
->pc
);
138 sparc32_sol2_sigtramp_frame_prev_register (struct frame_info
*next_frame
,
140 int regnum
, int *optimizedp
,
141 enum lval_type
*lvalp
,
143 int *realnump
, void *valuep
)
145 struct sparc_frame_cache
*cache
=
146 sparc32_sol2_sigtramp_frame_cache (next_frame
, this_cache
);
148 trad_frame_prev_register (next_frame
, cache
->saved_regs
, regnum
,
149 optimizedp
, lvalp
, addrp
, realnump
, valuep
);
152 static const struct frame_unwind sparc32_sol2_sigtramp_frame_unwind
=
155 sparc32_sol2_sigtramp_frame_this_id
,
156 sparc32_sol2_sigtramp_frame_prev_register
159 static const struct frame_unwind
*
160 sparc32_sol2_sigtramp_frame_sniffer (struct frame_info
*next_frame
)
162 CORE_ADDR pc
= frame_pc_unwind (next_frame
);
165 find_pc_partial_function (pc
, &name
, NULL
, NULL
);
166 if (sparc_sol2_pc_in_sigtramp (pc
, name
))
167 return &sparc32_sol2_sigtramp_frame_unwind
;
174 sparc32_sol2_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
176 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
178 /* Solaris has SVR4-style shared libraries... */
179 set_gdbarch_in_solib_call_trampoline (gdbarch
, in_plt_section
);
180 set_gdbarch_skip_trampoline_code (gdbarch
, find_solib_trampoline_target
);
181 set_solib_svr4_fetch_link_map_offsets
182 (gdbarch
, svr4_ilp32_fetch_link_map_offsets
);
184 /* ...which means that we need some special handling when doing
185 prologue analysis. */
186 tdep
->plt_entry_size
= 12;
188 /* Solaris has kernel-assisted single-stepping support. */
189 set_gdbarch_software_single_step (gdbarch
, NULL
);
191 frame_unwind_append_sniffer (gdbarch
, sparc32_sol2_sigtramp_frame_sniffer
);
195 /* Provide a prototype to silence -Wmissing-prototypes. */
196 void _initialize_sparc_sol2_tdep (void);
199 _initialize_sparc_sol2_tdep (void)
201 gdbarch_register_osabi (bfd_arch_sparc
, 0,
202 GDB_OSABI_SOLARIS
, sparc32_sol2_init_abi
);