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