sig_machdep.c revision 1.9 1 /* $NetBSD: sig_machdep.c,v 1.9 2004/06/11 14:01:02 chs Exp $ */
2
3 /*-
4 * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Matthew Fredette.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Copyright (c) 1982, 1986, 1990, 1993
41 * The Regents of the University of California. All rights reserved.
42 *
43 * This code is derived from software contributed to Berkeley by
44 * the Systems Programming Group of the University of Utah Computer
45 * Science Department.
46 *
47 * Redistribution and use in source and binary forms, with or without
48 * modification, are permitted provided that the following conditions
49 * are met:
50 * 1. Redistributions of source code must retain the above copyright
51 * notice, this list of conditions and the following disclaimer.
52 * 2. Redistributions in binary form must reproduce the above copyright
53 * notice, this list of conditions and the following disclaimer in the
54 * documentation and/or other materials provided with the distribution.
55 * 3. Neither the name of the University nor the names of its contributors
56 * may be used to endorse or promote products derived from this software
57 * without specific prior written permission.
58 *
59 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
60 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
61 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
62 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
63 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
64 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
65 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
66 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
67 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
68 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
69 * SUCH DAMAGE.
70 *
71 * from: Utah Hdr: machdep.c 1.74 92/12/20
72 * from: @(#)machdep.c 8.10 (Berkeley) 4/20/94
73 */
74 /*
75 * Copyright (c) 1988 University of Utah.
76 *
77 * This code is derived from software contributed to Berkeley by
78 * the Systems Programming Group of the University of Utah Computer
79 * Science Department.
80 *
81 * Redistribution and use in source and binary forms, with or without
82 * modification, are permitted provided that the following conditions
83 * are met:
84 * 1. Redistributions of source code must retain the above copyright
85 * notice, this list of conditions and the following disclaimer.
86 * 2. Redistributions in binary form must reproduce the above copyright
87 * notice, this list of conditions and the following disclaimer in the
88 * documentation and/or other materials provided with the distribution.
89 * 3. All advertising materials mentioning features or use of this software
90 * must display the following acknowledgement:
91 * This product includes software developed by the University of
92 * California, Berkeley and its contributors.
93 * 4. Neither the name of the University nor the names of its contributors
94 * may be used to endorse or promote products derived from this software
95 * without specific prior written permission.
96 *
97 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
98 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
99 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
100 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
101 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
102 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
103 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
104 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
105 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
106 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
107 * SUCH DAMAGE.
108 *
109 * from: Utah Hdr: machdep.c 1.74 92/12/20
110 * from: @(#)machdep.c 8.10 (Berkeley) 4/20/94
111 */
112
113 #include <sys/cdefs.h>
114 __KERNEL_RCSID(0, "$NetBSD: sig_machdep.c,v 1.9 2004/06/11 14:01:02 chs Exp $");
115
116 #include "opt_compat_netbsd.h"
117
118 #define __HPPA_SIGNAL_PRIVATE
119
120 #include <sys/param.h>
121 #include <sys/systm.h>
122 #include <sys/kernel.h>
123 #include <sys/proc.h>
124 #include <sys/user.h>
125 #include <sys/signal.h>
126 #include <sys/signalvar.h>
127
128 #include <sys/mount.h>
129 #include <sys/sa.h>
130 #include <sys/syscallargs.h>
131
132 #include <machine/cpu.h>
133 #include <machine/reg.h>
134
135 #ifdef DEBUG
136 int sigdebug = 0;
137 int sigpid = 0;
138 #define SDB_FOLLOW 0x01
139 #define SDB_KSTACK 0x02
140 #define SDB_FPSTATE 0x04
141 #endif
142
143 /*
144 * Send an interrupt to process.
145 */
146 void
147 sendsig(const struct ksiginfo *ksi, const sigset_t *mask)
148 {
149 /* XXX we don't deliver siginfo yet */
150 int sig = ksi->ksi_signo;
151 u_long code = ksi->ksi_trap;
152
153 struct lwp *l = curlwp;
154 struct proc *p = l->l_proc;
155 struct sigacts *ps = p->p_sigacts;
156 struct sigframe *fp, kf;
157 caddr_t sp;
158 struct trapframe *tf;
159 int onstack, fsize;
160 sig_t catcher = SIGACTION(p, sig).sa_handler;
161
162 tf = (struct trapframe *)l->l_md.md_regs;
163
164 /* Do we need to jump onto the signal stack? */
165 onstack =
166 (p->p_sigctx.ps_sigstk.ss_flags & (SS_DISABLE | SS_ONSTACK)) == 0 &&
167 (SIGACTION(p, sig).sa_flags & SA_ONSTACK) != 0;
168
169 /*
170 * Allocate space for the signal handler context.
171 * The PA-RISC calling convention mandates that
172 * the stack pointer must always be 64-byte aligned,
173 * and points to the first *unused* byte.
174 */
175 fsize = sizeof(struct sigframe);
176 sp = (onstack ?
177 (caddr_t)p->p_sigctx.ps_sigstk.ss_sp :
178 (caddr_t)tf->tf_sp);
179 sp = (caddr_t)(((u_int)(sp + fsize + 63)) & ~63);
180 fp = (struct sigframe *) (sp - fsize);
181
182 #ifdef DEBUG
183 if ((sigdebug & SDB_FOLLOW) && (!sigpid || p->p_pid == sigpid))
184 printf("sendsig: %s[%d] sig %d catcher %p\n",
185 p->p_comm, p->p_pid, sig, catcher);
186 #endif
187
188 /*
189 * Save necessary hardware state. Currently this includes:
190 * - original exception frame
191 * - FP coprocessor state
192 */
193 kf.sf_state.ss_flags = SS_USERREGS;
194 memcpy(&kf.sf_state.ss_frame, tf, sizeof(*tf));
195 /* XXX FP state */
196
197 /* Build the signal context to be used by sigreturn. */
198 kf.sf_sc.sc_sp = tf->tf_sp;
199 kf.sf_sc.sc_fp = tf->tf_sp; /* XXX fredette - is this right? */
200 kf.sf_sc.sc_ap = (int)&fp->sf_state;
201 kf.sf_sc.sc_pcsqh = tf->tf_iisq_head;
202 kf.sf_sc.sc_pcoqh = tf->tf_iioq_head;
203 kf.sf_sc.sc_pcsqt = tf->tf_iisq_tail;
204 kf.sf_sc.sc_pcoqt = tf->tf_iioq_tail;
205 kf.sf_sc.sc_ps = tf->tf_ipsw;
206
207 /* Save signal stack. */
208 kf.sf_sc.sc_onstack = p->p_sigctx.ps_sigstk.ss_flags & SS_ONSTACK;
209
210 /* Save signal mask. */
211 kf.sf_sc.sc_mask = *mask;
212
213 /* Fill the calling convention part of the signal frame. */
214 kf.sf_psp = 0;
215 kf.sf_clup = 0; /* XXX fredette - is this right? */
216 kf.sf_sl = 0; /* XXX fredette - is this right? */
217 kf.sf_edp = 0; /* XXX fredette - is this right? */
218
219 /* Copy out the signal frame. */
220 if (copyout(&kf, fp, fsize)) {
221 #ifdef DEBUG
222 if ((sigdebug & SDB_KSTACK) && p->p_pid == sigpid)
223 printf("sendsig(%d): copyout failed on sig %d\n",
224 p->p_pid, sig);
225 #endif
226 /*
227 * Process has trashed its stack; give it an illegal
228 * instruction to halt it in its tracks.
229 */
230 sigexit(l, SIGILL);
231 /* NOTREACHED */
232 }
233 #ifdef DEBUG
234 if (sigdebug & SDB_FOLLOW)
235 printf("sendsig(%d): sig %d scp %p fp %p sc_sp %x sc_ap %x\n",
236 p->p_pid, sig, &fp->sf_sc, fp,
237 kf.sf_sc.sc_sp, kf.sf_sc.sc_ap);
238 #endif
239
240 /* Set up the registers to return to sigcode. */
241 switch (ps->sa_sigdesc[sig].sd_vers) {
242 #if 1 /* COMPAT_16 */
243 case 0: /* legacy on-stack sigtramp */
244 tf->tf_iioq_head =
245 (int)p->p_sigctx.ps_sigcode | HPPA_PC_PRIV_USER;
246 tf->tf_iioq_tail = tf->tf_iioq_head + 4;
247 break;
248 #endif
249
250 case 1:
251 tf->tf_iioq_head =
252 (int)ps->sa_sigdesc[sig].sd_tramp | HPPA_PC_PRIV_USER;
253 tf->tf_iioq_tail = tf->tf_iioq_head + 4;
254 break;
255
256 default:
257 /* Don't know what trampoline version; kill it. */
258 sigexit(l, SIGILL);
259 }
260
261 tf->tf_sp = (int)sp;
262 tf->tf_r3 = (int)&fp->sf_sc;
263 tf->tf_arg0 = sig;
264 tf->tf_arg1 = code;
265 tf->tf_arg2 = (int)&fp->sf_sc;
266 tf->tf_arg3 = (int)catcher;
267
268 /* Remember that we're now on the signal stack. */
269 if (onstack)
270 p->p_sigctx.ps_sigstk.ss_flags |= SS_ONSTACK;
271
272 #ifdef DEBUG
273 if ((sigdebug & SDB_KSTACK) && p->p_pid == sigpid)
274 printf("sendsig(%d): sig %d returns\n",
275 p->p_pid, sig);
276 #endif
277 }
278
279 int
280 compat_16_sys___sigreturn14(struct lwp *l, void *v, register_t *retval)
281 {
282 struct compat_16_sys___sigreturn14_args /* {
283 syscallarg(struct sigcontext *) sigcntxp;
284 } */ *uap = v;
285 struct proc *p = l->l_proc;
286 struct sigcontext *scp;
287 struct trapframe *tf;
288 struct sigcontext tsigc;
289 struct sigstate tstate;
290 int rf, flags;
291
292 /*
293 * The trampoline code hands us the context.
294 * It is unsafe to keep track of it ourselves, in the event that a
295 * program jumps out of a signal handler.
296 */
297 scp = SCARG(uap, sigcntxp);
298 #ifdef DEBUG
299 if (sigdebug & SDB_FOLLOW)
300 printf("sigreturn: pid %d, scp %p\n", p->p_pid, scp);
301 #endif
302 if ((int)scp & 3)
303 return (EINVAL);
304
305 if (copyin(scp, &tsigc, sizeof(tsigc)) != 0)
306 return (EFAULT);
307 scp = &tsigc;
308
309 /* Make sure the user isn't pulling a fast one on us! */
310 /* XXX fredette - until this is done, huge security hole here. */
311 /* XXX fredette - requiring that PSL_R be zero will hurt debuggers. */
312 #define PSW_MBS (PSW_C|PSW_Q|PSW_P|PSW_D|PSW_I)
313 #define PSW_MBZ (PSW_Y|PSW_Z|PSW_S|PSW_X|PSW_M|PSW_R)
314 if ((scp->sc_ps & (PSW_MBS|PSW_MBZ)) != PSW_MBS)
315 return (EINVAL);
316
317 /* Restore register context. */
318 tf = (struct trapframe *)l->l_md.md_regs;
319
320 /*
321 * Grab pointer to hardware state information.
322 * If zero, the user is probably doing a longjmp.
323 */
324 if ((rf = scp->sc_ap) == 0)
325 goto restore;
326
327 /*
328 * See if there is anything to do before we go to the
329 * expense of copying in the trapframe
330 */
331 flags = fuword((caddr_t)rf);
332 #ifdef DEBUG
333 if (sigdebug & SDB_FOLLOW)
334 printf("sigreturn(%d): sc_ap %x flags %x\n",
335 p->p_pid, rf, flags);
336 #endif
337 /* fuword failed (bogus sc_ap value). */
338 if (flags == -1)
339 return (EINVAL);
340
341 if (flags == 0 || copyin((caddr_t)rf, &tstate, sizeof(tstate)) != 0)
342 goto restore;
343 #ifdef DEBUG
344 if ((sigdebug & SDB_KSTACK) && p->p_pid == sigpid)
345 printf("sigreturn(%d): ssp %p usp %x scp %p\n",
346 p->p_pid, &flags, scp->sc_sp, SCARG(uap, sigcntxp));
347 #endif
348
349 /*
350 * Restore most of the users registers except for those
351 * in the sigcontext; they will be handled below.
352 */
353 if (flags & SS_USERREGS) {
354
355 /*
356 * There are more registers that the user can tell
357 * us to bash than registers that, for security
358 * or other reasons, we must protect. So it's
359 * easier (but not faster), to copy these sensitive
360 * register values into the user-provided frame,
361 * then bulk-copy the user-provided frame into
362 * the process' frame.
363 */
364 #define SIG_PROTECT(r) tstate.ss_frame.r = tf->r
365 /* SRs 5,6,7 must be protected. */
366 SIG_PROTECT(tf_sr5);
367 SIG_PROTECT(tf_sr6);
368 SIG_PROTECT(tf_sr7);
369
370 /* all CRs except CR11 must be protected. */
371 SIG_PROTECT(tf_rctr); /* CR0 */
372 /* CRs 1-8 are reserved */
373 SIG_PROTECT(tf_pidr1); /* CR8 */
374 SIG_PROTECT(tf_pidr2); /* CR9 */
375 SIG_PROTECT(tf_ccr); /* CR10 */
376 SIG_PROTECT(tf_pidr3); /* CR12 */
377 SIG_PROTECT(tf_pidr4); /* CR14 */
378 SIG_PROTECT(tf_eiem); /* CR15 */
379 /* CR17 is the IISQ head */
380 /* CR18 is the IIOQ head */
381 SIG_PROTECT(tf_iir); /* CR19 */
382 SIG_PROTECT(tf_isr); /* CR20 */
383 SIG_PROTECT(tf_ior); /* CR21 */
384 /* CR22 is the IPSW */
385 SIG_PROTECT(tf_eirr); /* CR23 */
386 SIG_PROTECT(tf_hptm); /* CR24 */
387 SIG_PROTECT(tf_vtop); /* CR25 */
388 /* XXX where are CR26, CR27, CR29, CR31? */
389 SIG_PROTECT(tf_cr28); /* CR28 */
390 SIG_PROTECT(tf_cr30); /* CR30 */
391 #undef SIG_PROTECT
392
393 /* The bulk copy. */
394 *tf = tstate.ss_frame;
395 }
396
397 /*
398 * Restore the original FP context
399 */
400 /* XXX fredette */
401
402 restore:
403 /*
404 * Restore the user supplied information.
405 * This should be at the last so that the error (EINVAL)
406 * is reported to the sigreturn caller, not to the
407 * jump destination.
408 */
409
410 tf->tf_sp = scp->sc_sp;
411 /* XXX should we be doing the space registers? */
412 tf->tf_iisq_head = scp->sc_pcsqh;
413 tf->tf_iioq_head = scp->sc_pcoqh | HPPA_PC_PRIV_USER;
414 tf->tf_iisq_tail = scp->sc_pcsqt;
415 tf->tf_iioq_tail = scp->sc_pcoqt | HPPA_PC_PRIV_USER;
416 tf->tf_ipsw = scp->sc_ps;
417
418 /* Restore signal stack. */
419 if (scp->sc_onstack & SS_ONSTACK)
420 p->p_sigctx.ps_sigstk.ss_flags |= SS_ONSTACK;
421 else
422 p->p_sigctx.ps_sigstk.ss_flags &= ~SS_ONSTACK;
423
424 /* Restore signal mask. */
425 (void) sigprocmask1(p, SIG_SETMASK, &scp->sc_mask, 0);
426
427 #ifdef DEBUG
428 #if 0 /* XXX FP state */
429 if ((sigdebug & SDB_FPSTATE) && *(char *)&tstate.ss_fpstate)
430 printf("sigreturn(%d): copied in FP state (%x) at %p\n",
431 p->p_pid, *(u_int *)&tstate.ss_fpstate,
432 &tstate.ss_fpstate);
433 #endif
434 if ((sigdebug & SDB_FOLLOW) ||
435 ((sigdebug & SDB_KSTACK) && p->p_pid == sigpid))
436 printf("sigreturn(%d): returns\n", p->p_pid);
437 #endif
438 return (EJUSTRETURN);
439 }
440
441