xref: /qemu/linux-user/sh4/signal.c (revision 654d6b04)
1 /*
2  *  Emulation of Linux signals
3  *
4  *  Copyright (c) 2003 Fabrice Bellard
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 2 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19 #include "qemu/osdep.h"
20 #include "qemu.h"
21 #include "user-internals.h"
22 #include "signal-common.h"
23 #include "linux-user/trace.h"
24 
25 /*
26  * code and data structures from linux kernel:
27  * include/asm-sh/sigcontext.h
28  * arch/sh/kernel/signal.c
29  */
30 
31 struct target_sigcontext {
32     target_ulong  oldmask;
33 
34     /* CPU registers */
35     target_ulong  sc_gregs[16];
36     target_ulong  sc_pc;
37     target_ulong  sc_pr;
38     target_ulong  sc_sr;
39     target_ulong  sc_gbr;
40     target_ulong  sc_mach;
41     target_ulong  sc_macl;
42 
43     /* FPU registers */
44     target_ulong  sc_fpregs[16];
45     target_ulong  sc_xfpregs[16];
46     unsigned int sc_fpscr;
47     unsigned int sc_fpul;
48     unsigned int sc_ownedfp;
49 };
50 
51 struct target_sigframe
52 {
53     struct target_sigcontext sc;
54     target_ulong extramask[TARGET_NSIG_WORDS-1];
55 };
56 
57 
58 struct target_ucontext {
59     target_ulong tuc_flags;
60     struct target_ucontext *tuc_link;
61     target_stack_t tuc_stack;
62     struct target_sigcontext tuc_mcontext;
63     target_sigset_t tuc_sigmask;        /* mask last for extensibility */
64 };
65 
66 struct target_rt_sigframe
67 {
68     struct target_siginfo info;
69     struct target_ucontext uc;
70 };
71 
72 
73 #define MOVW(n)  (0x9300|((n)-2)) /* Move mem word at PC+n to R3 */
74 #define TRAP_NOARG 0xc310         /* Syscall w/no args (NR in R3) SH3/4 */
75 
76 static abi_ulong get_sigframe(struct target_sigaction *ka,
77                               unsigned long sp, size_t frame_size)
78 {
79     sp = target_sigsp(sp, ka);
80 
81     return (sp - frame_size) & -8ul;
82 }
83 
84 /*
85  * Notice when we're in the middle of a gUSA region and reset.
86  * Note that this will only occur when #CF_PARALLEL is unset, as we
87  * will translate such sequences differently in a parallel context.
88  */
89 static void unwind_gusa(CPUSH4State *regs)
90 {
91     /* If the stack pointer is sufficiently negative, and we haven't
92        completed the sequence, then reset to the entry to the region.  */
93     /* ??? The SH4 kernel checks for and address above 0xC0000000.
94        However, the page mappings in qemu linux-user aren't as restricted
95        and we wind up with the normal stack mapped above 0xF0000000.
96        That said, there is no reason why the kernel should be allowing
97        a gUSA region that spans 1GB.  Use a tighter check here, for what
98        can actually be enabled by the immediate move.  */
99     if (regs->gregs[15] >= -128u && regs->pc < regs->gregs[0]) {
100         /* Reset the PC to before the gUSA region, as computed from
101            R0 = region end, SP = -(region size), plus one more for the
102            insn that actually initializes SP to the region size.  */
103         regs->pc = regs->gregs[0] + regs->gregs[15] - 2;
104 
105         /* Reset the SP to the saved version in R1.  */
106         regs->gregs[15] = regs->gregs[1];
107     }
108 }
109 
110 static void setup_sigcontext(struct target_sigcontext *sc,
111                              CPUSH4State *regs, unsigned long mask)
112 {
113     int i;
114 
115 #define COPY(x)         __put_user(regs->x, &sc->sc_##x)
116     COPY(gregs[0]); COPY(gregs[1]);
117     COPY(gregs[2]); COPY(gregs[3]);
118     COPY(gregs[4]); COPY(gregs[5]);
119     COPY(gregs[6]); COPY(gregs[7]);
120     COPY(gregs[8]); COPY(gregs[9]);
121     COPY(gregs[10]); COPY(gregs[11]);
122     COPY(gregs[12]); COPY(gregs[13]);
123     COPY(gregs[14]); COPY(gregs[15]);
124     COPY(gbr); COPY(mach);
125     COPY(macl); COPY(pr);
126     COPY(sr); COPY(pc);
127 #undef COPY
128 
129     for (i=0; i<16; i++) {
130         __put_user(regs->fregs[i], &sc->sc_fpregs[i]);
131     }
132     __put_user(regs->fpscr, &sc->sc_fpscr);
133     __put_user(regs->fpul, &sc->sc_fpul);
134 
135     /* non-iBCS2 extensions.. */
136     __put_user(mask, &sc->oldmask);
137 }
138 
139 static void restore_sigcontext(CPUSH4State *regs, struct target_sigcontext *sc)
140 {
141     int i;
142 
143 #define COPY(x)         __get_user(regs->x, &sc->sc_##x)
144     COPY(gregs[0]); COPY(gregs[1]);
145     COPY(gregs[2]); COPY(gregs[3]);
146     COPY(gregs[4]); COPY(gregs[5]);
147     COPY(gregs[6]); COPY(gregs[7]);
148     COPY(gregs[8]); COPY(gregs[9]);
149     COPY(gregs[10]); COPY(gregs[11]);
150     COPY(gregs[12]); COPY(gregs[13]);
151     COPY(gregs[14]); COPY(gregs[15]);
152     COPY(gbr); COPY(mach);
153     COPY(macl); COPY(pr);
154     COPY(sr); COPY(pc);
155 #undef COPY
156 
157     for (i=0; i<16; i++) {
158         __get_user(regs->fregs[i], &sc->sc_fpregs[i]);
159     }
160     __get_user(regs->fpscr, &sc->sc_fpscr);
161     __get_user(regs->fpul, &sc->sc_fpul);
162 
163     regs->tra = -1;         /* disable syscall checks */
164     regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK);
165 }
166 
167 void setup_frame(int sig, struct target_sigaction *ka,
168                  target_sigset_t *set, CPUSH4State *regs)
169 {
170     struct target_sigframe *frame;
171     abi_ulong frame_addr;
172     int i;
173 
174     unwind_gusa(regs);
175 
176     frame_addr = get_sigframe(ka, regs->gregs[15], sizeof(*frame));
177     trace_user_setup_frame(regs, frame_addr);
178     if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) {
179         goto give_sigsegv;
180     }
181 
182     setup_sigcontext(&frame->sc, regs, set->sig[0]);
183 
184     for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) {
185         __put_user(set->sig[i + 1], &frame->extramask[i]);
186     }
187 
188     /* Set up to return from userspace.  If provided, use a stub
189        already in userspace.  */
190     if (ka->sa_flags & TARGET_SA_RESTORER) {
191         regs->pr = ka->sa_restorer;
192     } else {
193         regs->pr = default_sigreturn;
194     }
195 
196     /* Set up registers for signal handler */
197     regs->gregs[15] = frame_addr;
198     regs->gregs[4] = sig; /* Arg for signal handler */
199     regs->gregs[5] = 0;
200     regs->gregs[6] = frame_addr += offsetof(typeof(*frame), sc);
201     regs->pc = (unsigned long) ka->_sa_handler;
202     regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK);
203 
204     unlock_user_struct(frame, frame_addr, 1);
205     return;
206 
207 give_sigsegv:
208     unlock_user_struct(frame, frame_addr, 1);
209     force_sigsegv(sig);
210 }
211 
212 void setup_rt_frame(int sig, struct target_sigaction *ka,
213                     target_siginfo_t *info,
214                     target_sigset_t *set, CPUSH4State *regs)
215 {
216     struct target_rt_sigframe *frame;
217     abi_ulong frame_addr;
218     int i;
219 
220     unwind_gusa(regs);
221 
222     frame_addr = get_sigframe(ka, regs->gregs[15], sizeof(*frame));
223     trace_user_setup_rt_frame(regs, frame_addr);
224     if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) {
225         goto give_sigsegv;
226     }
227 
228     tswap_siginfo(&frame->info, info);
229 
230     /* Create the ucontext.  */
231     __put_user(0, &frame->uc.tuc_flags);
232     __put_user(0, (unsigned long *)&frame->uc.tuc_link);
233     target_save_altstack(&frame->uc.tuc_stack, regs);
234     setup_sigcontext(&frame->uc.tuc_mcontext,
235                      regs, set->sig[0]);
236     for(i = 0; i < TARGET_NSIG_WORDS; i++) {
237         __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]);
238     }
239 
240     /* Set up to return from userspace.  If provided, use a stub
241        already in userspace.  */
242     if (ka->sa_flags & TARGET_SA_RESTORER) {
243         regs->pr = ka->sa_restorer;
244     } else {
245         regs->pr = default_rt_sigreturn;
246     }
247 
248     /* Set up registers for signal handler */
249     regs->gregs[15] = frame_addr;
250     regs->gregs[4] = sig; /* Arg for signal handler */
251     regs->gregs[5] = frame_addr + offsetof(typeof(*frame), info);
252     regs->gregs[6] = frame_addr + offsetof(typeof(*frame), uc);
253     regs->pc = (unsigned long) ka->_sa_handler;
254     regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK);
255 
256     unlock_user_struct(frame, frame_addr, 1);
257     return;
258 
259 give_sigsegv:
260     unlock_user_struct(frame, frame_addr, 1);
261     force_sigsegv(sig);
262 }
263 
264 long do_sigreturn(CPUSH4State *regs)
265 {
266     struct target_sigframe *frame;
267     abi_ulong frame_addr;
268     sigset_t blocked;
269     target_sigset_t target_set;
270     int i;
271 
272     frame_addr = regs->gregs[15];
273     trace_user_do_sigreturn(regs, frame_addr);
274     if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) {
275         goto badframe;
276     }
277 
278     __get_user(target_set.sig[0], &frame->sc.oldmask);
279     for(i = 1; i < TARGET_NSIG_WORDS; i++) {
280         __get_user(target_set.sig[i], &frame->extramask[i - 1]);
281     }
282 
283     target_to_host_sigset_internal(&blocked, &target_set);
284     set_sigmask(&blocked);
285 
286     restore_sigcontext(regs, &frame->sc);
287 
288     unlock_user_struct(frame, frame_addr, 0);
289     return -TARGET_QEMU_ESIGRETURN;
290 
291 badframe:
292     unlock_user_struct(frame, frame_addr, 0);
293     force_sig(TARGET_SIGSEGV);
294     return -TARGET_QEMU_ESIGRETURN;
295 }
296 
297 long do_rt_sigreturn(CPUSH4State *regs)
298 {
299     struct target_rt_sigframe *frame;
300     abi_ulong frame_addr;
301     sigset_t blocked;
302 
303     frame_addr = regs->gregs[15];
304     trace_user_do_rt_sigreturn(regs, frame_addr);
305     if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) {
306         goto badframe;
307     }
308 
309     target_to_host_sigset(&blocked, &frame->uc.tuc_sigmask);
310     set_sigmask(&blocked);
311 
312     restore_sigcontext(regs, &frame->uc.tuc_mcontext);
313     target_restore_altstack(&frame->uc.tuc_stack, regs);
314 
315     unlock_user_struct(frame, frame_addr, 0);
316     return -TARGET_QEMU_ESIGRETURN;
317 
318 badframe:
319     unlock_user_struct(frame, frame_addr, 0);
320     force_sig(TARGET_SIGSEGV);
321     return -TARGET_QEMU_ESIGRETURN;
322 }
323 
324 void setup_sigtramp(abi_ulong sigtramp_page)
325 {
326     uint16_t *tramp = lock_user(VERIFY_WRITE, sigtramp_page, 2 * 6, 0);
327     assert(tramp != NULL);
328 
329     default_sigreturn = sigtramp_page;
330     __put_user(MOVW(2), &tramp[0]);
331     __put_user(TRAP_NOARG, &tramp[1]);
332     __put_user(TARGET_NR_sigreturn, &tramp[2]);
333 
334     default_rt_sigreturn = sigtramp_page + 6;
335     __put_user(MOVW(2), &tramp[3]);
336     __put_user(TRAP_NOARG, &tramp[4]);
337     __put_user(TARGET_NR_rt_sigreturn, &tramp[5]);
338 
339     unlock_user(tramp, sigtramp_page, 2 * 6);
340 }
341