1 /* Target-dependent code for Solaris SPARC.
3 Copyright 2003 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"
38 /* From <sys/regset.h>. */
39 const struct sparc_gregset sparc32_sol2_gregset
=
52 /* The Solaris signal trampolines reside in libc. For normal signals,
53 the function `sigacthandler' is used. This signal trampoline will
54 call the signal handler using the System V calling convention,
55 where the third argument is a pointer to an instance of
56 `ucontext_t', which has a member `uc_mcontext' that contains the
57 saved registers. Incidentally, the kernel passes the `ucontext_t'
58 pointer as the third argument of the signal trampoline too, and
59 `sigacthandler' simply passes it on. However, if you link your
60 program with "-L/usr/ucblib -R/usr/ucblib -lucb", the function
61 `ucbsigvechandler' will be used, which invokes the using the BSD
62 convention, where the third argument is a pointer to an instance of
63 `struct sigcontext'. It is the `ucbsigvechandler' function that
64 converts the `ucontext_t' to a `sigcontext', and back. Unless the
65 signal handler modifies the `struct sigcontext' we can safely
69 sparc_sol2_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
71 return (name
&& (strcmp (name
, "sigacthandler") == 0
72 || strcmp (name
, "ucbsigvechandler") == 0));
75 static struct sparc_frame_cache
*
76 sparc32_sol2_sigtramp_frame_cache (struct frame_info
*next_frame
,
79 struct sparc_frame_cache
*cache
;
80 CORE_ADDR mcontext_addr
, addr
;
86 cache
= sparc_frame_cache (next_frame
, this_cache
);
87 gdb_assert (cache
== *this_cache
);
89 cache
->saved_regs
= trad_frame_alloc_saved_regs (next_frame
);
91 /* The third argument is a pointer to an instance of `ucontext_t',
92 which has a member `uc_mcontext' that contains the saved
94 regnum
= (cache
->frameless_p
? SPARC_O2_REGNUM
: SPARC_I2_REGNUM
);
95 mcontext_addr
= frame_unwind_register_unsigned (next_frame
, regnum
) + 40;
97 cache
->saved_regs
[SPARC32_PSR_REGNUM
].addr
= mcontext_addr
+ 0 * 4;
98 cache
->saved_regs
[SPARC32_PC_REGNUM
].addr
= mcontext_addr
+ 1 * 4;
99 cache
->saved_regs
[SPARC32_NPC_REGNUM
].addr
= mcontext_addr
+ 2 * 4;
100 cache
->saved_regs
[SPARC32_Y_REGNUM
].addr
= mcontext_addr
+ 3 * 4;
102 /* Since %g0 is always zero, keep the identity encoding. */
103 for (regnum
= SPARC_G1_REGNUM
, addr
= mcontext_addr
+ 4 * 4;
104 regnum
<= SPARC_O7_REGNUM
; regnum
++, addr
+= 4)
105 cache
->saved_regs
[regnum
].addr
= addr
;
107 if (get_frame_memory_unsigned (next_frame
, mcontext_addr
+ 19 * 4, 4))
109 /* The register windows haven't been flushed. */
110 for (regnum
= SPARC_L0_REGNUM
; regnum
<= SPARC_I7_REGNUM
; regnum
++)
111 trad_frame_set_unknown (cache
->saved_regs
, regnum
);
115 addr
= cache
->saved_regs
[SPARC_SP_REGNUM
].addr
;
116 addr
= get_frame_memory_unsigned (next_frame
, addr
, 4);
117 for (regnum
= SPARC_L0_REGNUM
;
118 regnum
<= SPARC_I7_REGNUM
; regnum
++, addr
+= 4)
119 cache
->saved_regs
[regnum
].addr
= addr
;
126 sparc32_sol2_sigtramp_frame_this_id (struct frame_info
*next_frame
,
128 struct frame_id
*this_id
)
130 struct sparc_frame_cache
*cache
=
131 sparc32_sol2_sigtramp_frame_cache (next_frame
, this_cache
);
133 (*this_id
) = frame_id_build (cache
->base
, cache
->pc
);
137 sparc32_sol2_sigtramp_frame_prev_register (struct frame_info
*next_frame
,
139 int regnum
, int *optimizedp
,
140 enum lval_type
*lvalp
,
142 int *realnump
, void *valuep
)
144 struct sparc_frame_cache
*cache
=
145 sparc32_sol2_sigtramp_frame_cache (next_frame
, this_cache
);
147 trad_frame_prev_register (next_frame
, cache
->saved_regs
, regnum
,
148 optimizedp
, lvalp
, addrp
, realnump
, valuep
);
151 static const struct frame_unwind sparc32_sol2_sigtramp_frame_unwind
=
154 sparc32_sol2_sigtramp_frame_this_id
,
155 sparc32_sol2_sigtramp_frame_prev_register
158 static const struct frame_unwind
*
159 sparc32_sol2_sigtramp_frame_sniffer (struct frame_info
*next_frame
)
161 CORE_ADDR pc
= frame_pc_unwind (next_frame
);
164 find_pc_partial_function (pc
, &name
, NULL
, NULL
);
165 if (sparc_sol2_pc_in_sigtramp (pc
, name
))
166 return &sparc32_sol2_sigtramp_frame_unwind
;
173 sparc32_sol2_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
175 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
177 /* Solaris has SVR4-style shared libraries... */
178 set_gdbarch_in_solib_call_trampoline (gdbarch
, in_plt_section
);
179 set_gdbarch_skip_trampoline_code (gdbarch
, find_solib_trampoline_target
);
181 /* ...which means that we need some special handling when doing
182 prologue analysis. */
183 tdep
->plt_entry_size
= 12;
185 /* Solaris has kernel-assisted single-stepping support. */
186 set_gdbarch_software_single_step (gdbarch
, NULL
);
188 set_gdbarch_pc_in_sigtramp (gdbarch
, sparc_sol2_pc_in_sigtramp
);
189 frame_unwind_append_sniffer (gdbarch
, sparc32_sol2_sigtramp_frame_sniffer
);
193 /* Provide a prototype to silence -Wmissing-prototypes. */
194 void _initialize_sparc_sol2_tdep (void);
197 _initialize_sparc_sol2_tdep (void)
199 gdbarch_register_osabi (bfd_arch_sparc
, 0,
200 GDB_OSABI_SOLARIS
, sparc32_sol2_init_abi
);