5a78e3172aa4ca75b7524f4dcaf9ea7019eca7f6
1 /* DWARF2 EH unwinding support for SH Linux.
2 Copyright (C) 2004, 2005, 2006, 2007, 2009, 2012 Free Software Foundation,
5 This file is part of GCC.
7 GCC 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 3, or (at your option)
12 GCC 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 Under Section 7 of GPL version 3, you are granted additional
18 permissions described in the GCC Runtime Library Exception, version
19 3.1, as published by the Free Software Foundation.
21 You should have received a copy of the GNU General Public License and
22 a copy of the GCC Runtime Library Exception along with this program;
23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
24 <http://www.gnu.org/licenses/>. */
27 /* Do code reading to identify a signal frame, and set the frame
28 state data appropriately. See unwind-dw2.c for the structs.
29 Don't use this at all if inhibit_libc is used. */
34 #include <sys/ucontext.h>
35 #include "insn-constants.h"
37 # if defined (__SH5__)
38 #define SH_DWARF_FRAME_GP0 0
39 #define SH_DWARF_FRAME_FP0 77
40 #define SH_DWARF_FRAME_BT0 68
41 #define SH_DWARF_FRAME_PR_MEDIA 18
42 #define SH_DWARF_FRAME_SR 65
43 #define SH_DWARF_FRAME_FPSCR 76
45 #define SH_DWARF_FRAME_GP0 0
46 #define SH_DWARF_FRAME_FP0 25
47 #define SH_DWARF_FRAME_XD0 87
48 #define SH_DWARF_FRAME_PR 17
49 #define SH_DWARF_FRAME_GBR 18
50 #define SH_DWARF_FRAME_MACH 20
51 #define SH_DWARF_FRAME_MACL 21
52 #define SH_DWARF_FRAME_PC 16
53 #define SH_DWARF_FRAME_SR 22
54 #define SH_DWARF_FRAME_FPUL 23
55 #define SH_DWARF_FRAME_FPSCR 24
56 #endif /* defined (__SH5__) */
60 #define MD_FALLBACK_FRAME_STATE_FOR shmedia_fallback_frame_state
62 static _Unwind_Reason_Code
63 shmedia_fallback_frame_state (struct _Unwind_Context
*context
,
64 _Unwind_FrameState
*fs
)
66 unsigned char *pc
= context
->ra
;
67 struct sigcontext
*sc
;
71 /* movi 0x10,r9; shori 0x77,r9; trapa r9; nop (sigreturn) */
72 /* movi 0x10,r9; shori 0xad,r9; trapa r9; nop (rt_sigreturn) */
73 if ((*(unsigned long *) (pc
-1) == 0xcc004090)
74 && (*(unsigned long *) (pc
+3) == 0xc801dc90)
75 && (*(unsigned long *) (pc
+7) == 0x6c91fff0)
76 && (*(unsigned long *) (pc
+11) == 0x6ff0fff0))
78 else if ((*(unsigned long *) (pc
-1) == 0xcc004090)
79 && (*(unsigned long *) (pc
+3) == 0xc802b490)
80 && (*(unsigned long *) (pc
+7) == 0x6c91fff0)
81 && (*(unsigned long *) (pc
+11) == 0x6ff0fff0))
88 } *rt_
= context
->cfa
;
89 /* The void * cast is necessary to avoid an aliasing warning.
90 The aliasing warning is correct, but should not be a problem
91 because it does not alias anything. */
92 sc
= (struct sigcontext
*) (void *) &rt_
->uc
.uc_mcontext
;
95 return _URC_END_OF_STACK
;
97 new_cfa
= sc
->sc_regs
[15];
98 fs
->regs
.cfa_how
= CFA_REG_OFFSET
;
99 fs
->regs
.cfa_reg
= 15;
100 fs
->regs
.cfa_offset
= new_cfa
- (long) context
->cfa
;
102 for (i
= 0; i
< 63; i
++)
107 fs
->regs
.reg
[i
].how
= REG_SAVED_OFFSET
;
108 fs
->regs
.reg
[i
].loc
.offset
109 = (long)&(sc
->sc_regs
[i
]) - new_cfa
;
112 fs
->regs
.reg
[SH_DWARF_FRAME_SR
].how
= REG_SAVED_OFFSET
;
113 fs
->regs
.reg
[SH_DWARF_FRAME_SR
].loc
.offset
114 = (long)&(sc
->sc_sr
) - new_cfa
;
116 r
= SH_DWARF_FRAME_BT0
;
117 for (i
= 0; i
< 8; i
++)
119 fs
->regs
.reg
[r
+i
].how
= REG_SAVED_OFFSET
;
120 fs
->regs
.reg
[r
+i
].loc
.offset
121 = (long)&(sc
->sc_tregs
[i
]) - new_cfa
;
124 r
= SH_DWARF_FRAME_FP0
;
125 for (i
= 0; i
< 32; i
++)
127 fs
->regs
.reg
[r
+i
].how
= REG_SAVED_OFFSET
;
128 fs
->regs
.reg
[r
+i
].loc
.offset
129 = (long)&(sc
->sc_fpregs
[i
]) - new_cfa
;
132 fs
->regs
.reg
[SH_DWARF_FRAME_FPSCR
].how
= REG_SAVED_OFFSET
;
133 fs
->regs
.reg
[SH_DWARF_FRAME_FPSCR
].loc
.offset
134 = (long)&(sc
->sc_fpscr
) - new_cfa
;
136 /* We use the slot for the zero register to save return address. */
137 fs
->regs
.reg
[63].how
= REG_SAVED_OFFSET
;
138 fs
->regs
.reg
[63].loc
.offset
139 = (long)&(sc
->sc_pc
) - new_cfa
;
140 fs
->retaddr_column
= 63;
141 fs
->signal_frame
= 1;
142 return _URC_NO_REASON
;
145 #else /* defined (__SH5__) */
147 #define MD_FALLBACK_FRAME_STATE_FOR sh_fallback_frame_state
149 static _Unwind_Reason_Code
150 sh_fallback_frame_state (struct _Unwind_Context
*context
,
151 _Unwind_FrameState
*fs
)
153 unsigned char *pc
= context
->ra
;
154 struct sigcontext
*sc
;
157 #if defined (__SH3E__) || defined (__SH4__)
161 /* mov.w 1f,r3; trapa #0x10; 1: .short 0x77 (sigreturn) */
162 /* mov.w 1f,r3; trapa #0x10; 1: .short 0xad (rt_sigreturn) */
163 /* Newer kernel uses pad instructions to avoid an SH-4 core bug. */
164 /* mov.w 1f,r3; trapa #0x10; or r0,r0; or r0,r0; or r0,r0; or r0,r0;
165 or r0,r0; 1: .short 0x77 (sigreturn) */
166 /* mov.w 1f,r3; trapa #0x10; or r0,r0; or r0,r0; or r0,r0; or r0,r0;
167 or r0,r0; 1: .short 0xad (rt_sigreturn) */
168 if (((*(unsigned short *) (pc
+0) == 0x9300)
169 && (*(unsigned short *) (pc
+2) == 0xc310)
170 && (*(unsigned short *) (pc
+4) == 0x0077))
171 || (((*(unsigned short *) (pc
+0) == 0x9305)
172 && (*(unsigned short *) (pc
+2) == 0xc310)
173 && (*(unsigned short *) (pc
+14) == 0x0077))))
175 else if (((*(unsigned short *) (pc
+0) == 0x9300)
176 && (*(unsigned short *) (pc
+2) == 0xc310)
177 && (*(unsigned short *) (pc
+4) == 0x00ad))
178 || (((*(unsigned short *) (pc
+0) == 0x9305)
179 && (*(unsigned short *) (pc
+2) == 0xc310)
180 && (*(unsigned short *) (pc
+14) == 0x00ad))))
185 } *rt_
= context
->cfa
;
186 /* The void * cast is necessary to avoid an aliasing warning.
187 The aliasing warning is correct, but should not be a problem
188 because it does not alias anything. */
189 sc
= (struct sigcontext
*) (void *) &rt_
->uc
.uc_mcontext
;
192 return _URC_END_OF_STACK
;
194 new_cfa
= sc
->sc_regs
[15];
195 fs
->regs
.cfa_how
= CFA_REG_OFFSET
;
196 fs
->regs
.cfa_reg
= 15;
197 fs
->regs
.cfa_offset
= new_cfa
- (long) context
->cfa
;
199 for (i
= 0; i
< 15; i
++)
201 fs
->regs
.reg
[i
].how
= REG_SAVED_OFFSET
;
202 fs
->regs
.reg
[i
].loc
.offset
203 = (long)&(sc
->sc_regs
[i
]) - new_cfa
;
206 fs
->regs
.reg
[SH_DWARF_FRAME_PR
].how
= REG_SAVED_OFFSET
;
207 fs
->regs
.reg
[SH_DWARF_FRAME_PR
].loc
.offset
208 = (long)&(sc
->sc_pr
) - new_cfa
;
209 fs
->regs
.reg
[SH_DWARF_FRAME_SR
].how
= REG_SAVED_OFFSET
;
210 fs
->regs
.reg
[SH_DWARF_FRAME_SR
].loc
.offset
211 = (long)&(sc
->sc_sr
) - new_cfa
;
212 fs
->regs
.reg
[SH_DWARF_FRAME_GBR
].how
= REG_SAVED_OFFSET
;
213 fs
->regs
.reg
[SH_DWARF_FRAME_GBR
].loc
.offset
214 = (long)&(sc
->sc_gbr
) - new_cfa
;
215 fs
->regs
.reg
[SH_DWARF_FRAME_MACH
].how
= REG_SAVED_OFFSET
;
216 fs
->regs
.reg
[SH_DWARF_FRAME_MACH
].loc
.offset
217 = (long)&(sc
->sc_mach
) - new_cfa
;
218 fs
->regs
.reg
[SH_DWARF_FRAME_MACL
].how
= REG_SAVED_OFFSET
;
219 fs
->regs
.reg
[SH_DWARF_FRAME_MACL
].loc
.offset
220 = (long)&(sc
->sc_macl
) - new_cfa
;
222 #if defined (__SH3E__) || defined (__SH4__)
223 r
= SH_DWARF_FRAME_FP0
;
224 for (i
= 0; i
< 16; i
++)
226 fs
->regs
.reg
[r
+i
].how
= REG_SAVED_OFFSET
;
227 fs
->regs
.reg
[r
+i
].loc
.offset
228 = (long)&(sc
->sc_fpregs
[i
]) - new_cfa
;
231 r
= SH_DWARF_FRAME_XD0
;
232 for (i
= 0; i
< 8; i
++)
234 fs
->regs
.reg
[r
+i
].how
= REG_SAVED_OFFSET
;
235 fs
->regs
.reg
[r
+i
].loc
.offset
236 = (long)&(sc
->sc_xfpregs
[2*i
]) - new_cfa
;
239 fs
->regs
.reg
[SH_DWARF_FRAME_FPUL
].how
= REG_SAVED_OFFSET
;
240 fs
->regs
.reg
[SH_DWARF_FRAME_FPUL
].loc
.offset
241 = (long)&(sc
->sc_fpul
) - new_cfa
;
242 fs
->regs
.reg
[SH_DWARF_FRAME_FPSCR
].how
= REG_SAVED_OFFSET
;
243 fs
->regs
.reg
[SH_DWARF_FRAME_FPSCR
].loc
.offset
244 = (long)&(sc
->sc_fpscr
) - new_cfa
;
247 fs
->regs
.reg
[SH_DWARF_FRAME_PC
].how
= REG_SAVED_OFFSET
;
248 fs
->regs
.reg
[SH_DWARF_FRAME_PC
].loc
.offset
249 = (long)&(sc
->sc_pc
) - new_cfa
;
250 fs
->retaddr_column
= SH_DWARF_FRAME_PC
;
251 fs
->signal_frame
= 1;
252 return _URC_NO_REASON
;
254 #endif /* defined (__SH5__) */
256 #endif /* inhibit_libc */