trap.c revision 1.2.2.2
1 1.2.2.2 jdolecek /* $NetBSD: trap.c,v 1.2.2.2 2002/06/23 17:37:06 jdolecek Exp $ */ 2 1.2.2.2 jdolecek 3 1.2.2.2 jdolecek /*- 4 1.2.2.2 jdolecek * Copyright (c) 2001, 2002 The NetBSD Foundation, Inc. 5 1.2.2.2 jdolecek * All rights reserved. 6 1.2.2.2 jdolecek * 7 1.2.2.2 jdolecek * This code is derived from software contributed to The NetBSD Foundation 8 1.2.2.2 jdolecek * by Matthew Fredette. 9 1.2.2.2 jdolecek * 10 1.2.2.2 jdolecek * Redistribution and use in source and binary forms, with or without 11 1.2.2.2 jdolecek * modification, are permitted provided that the following conditions 12 1.2.2.2 jdolecek * are met: 13 1.2.2.2 jdolecek * 1. Redistributions of source code must retain the above copyright 14 1.2.2.2 jdolecek * notice, this list of conditions and the following disclaimer. 15 1.2.2.2 jdolecek * 2. Redistributions in binary form must reproduce the above copyright 16 1.2.2.2 jdolecek * notice, this list of conditions and the following disclaimer in the 17 1.2.2.2 jdolecek * documentation and/or other materials provided with the distribution. 18 1.2.2.2 jdolecek * 3. All advertising materials mentioning features or use of this software 19 1.2.2.2 jdolecek * must display the following acknowledgement: 20 1.2.2.2 jdolecek * This product includes software developed by the NetBSD 21 1.2.2.2 jdolecek * Foundation, Inc. and its contributors. 22 1.2.2.2 jdolecek * 4. Neither the name of The NetBSD Foundation nor the names of its 23 1.2.2.2 jdolecek * contributors may be used to endorse or promote products derived 24 1.2.2.2 jdolecek * from this software without specific prior written permission. 25 1.2.2.2 jdolecek * 26 1.2.2.2 jdolecek * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 1.2.2.2 jdolecek * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 1.2.2.2 jdolecek * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 1.2.2.2 jdolecek * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 1.2.2.2 jdolecek * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 1.2.2.2 jdolecek * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 1.2.2.2 jdolecek * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 1.2.2.2 jdolecek * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 1.2.2.2 jdolecek * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 1.2.2.2 jdolecek * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 1.2.2.2 jdolecek * POSSIBILITY OF SUCH DAMAGE. 37 1.2.2.2 jdolecek */ 38 1.2.2.2 jdolecek 39 1.2.2.2 jdolecek /* $OpenBSD: trap.c,v 1.30 2001/09/19 20:50:56 mickey Exp $ */ 40 1.2.2.2 jdolecek 41 1.2.2.2 jdolecek /* 42 1.2.2.2 jdolecek * Copyright (c) 1998-2000 Michael Shalayeff 43 1.2.2.2 jdolecek * All rights reserved. 44 1.2.2.2 jdolecek * 45 1.2.2.2 jdolecek * Redistribution and use in source and binary forms, with or without 46 1.2.2.2 jdolecek * modification, are permitted provided that the following conditions 47 1.2.2.2 jdolecek * are met: 48 1.2.2.2 jdolecek * 1. Redistributions of source code must retain the above copyright 49 1.2.2.2 jdolecek * notice, this list of conditions and the following disclaimer. 50 1.2.2.2 jdolecek * 2. Redistributions in binary form must reproduce the above copyright 51 1.2.2.2 jdolecek * notice, this list of conditions and the following disclaimer in the 52 1.2.2.2 jdolecek * documentation and/or other materials provided with the distribution. 53 1.2.2.2 jdolecek * 3. All advertising materials mentioning features or use of this software 54 1.2.2.2 jdolecek * must display the following acknowledgement: 55 1.2.2.2 jdolecek * This product includes software developed by Michael Shalayeff. 56 1.2.2.2 jdolecek * 4. The name of the author may not be used to endorse or promote products 57 1.2.2.2 jdolecek * derived from this software without specific prior written permission. 58 1.2.2.2 jdolecek * 59 1.2.2.2 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 60 1.2.2.2 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 61 1.2.2.2 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 62 1.2.2.2 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 63 1.2.2.2 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 64 1.2.2.2 jdolecek * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 65 1.2.2.2 jdolecek * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 66 1.2.2.2 jdolecek * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 67 1.2.2.2 jdolecek * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 68 1.2.2.2 jdolecek * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 69 1.2.2.2 jdolecek */ 70 1.2.2.2 jdolecek 71 1.2.2.2 jdolecek /* #define INTRDEBUG */ 72 1.2.2.2 jdolecek /* #define TRAPDEBUG */ 73 1.2.2.2 jdolecek /* #define USERTRACE */ 74 1.2.2.2 jdolecek 75 1.2.2.2 jdolecek #include "opt_kgdb.h" 76 1.2.2.2 jdolecek #include "opt_syscall_debug.h" 77 1.2.2.2 jdolecek 78 1.2.2.2 jdolecek #include <sys/param.h> 79 1.2.2.2 jdolecek #include <sys/systm.h> 80 1.2.2.2 jdolecek #include <sys/kernel.h> 81 1.2.2.2 jdolecek #include <sys/syscall.h> 82 1.2.2.2 jdolecek #include <sys/ktrace.h> 83 1.2.2.2 jdolecek #include <sys/proc.h> 84 1.2.2.2 jdolecek #include <sys/signalvar.h> 85 1.2.2.2 jdolecek #include <sys/user.h> 86 1.2.2.2 jdolecek #include <sys/acct.h> 87 1.2.2.2 jdolecek #include <sys/signal.h> 88 1.2.2.2 jdolecek #include <sys/device.h> 89 1.2.2.2 jdolecek 90 1.2.2.2 jdolecek #include <net/netisr.h> 91 1.2.2.2 jdolecek 92 1.2.2.2 jdolecek #ifdef KGDB 93 1.2.2.2 jdolecek #include <sys/kgdb.h> 94 1.2.2.2 jdolecek #endif 95 1.2.2.2 jdolecek 96 1.2.2.2 jdolecek #include <uvm/uvm.h> 97 1.2.2.2 jdolecek 98 1.2.2.2 jdolecek #include <machine/iomod.h> 99 1.2.2.2 jdolecek #include <machine/cpufunc.h> 100 1.2.2.2 jdolecek #include <machine/reg.h> 101 1.2.2.2 jdolecek #include <machine/autoconf.h> 102 1.2.2.2 jdolecek 103 1.2.2.2 jdolecek #include <machine/db_machdep.h> 104 1.2.2.2 jdolecek 105 1.2.2.2 jdolecek #include <hppa/hppa/machdep.h> 106 1.2.2.2 jdolecek 107 1.2.2.2 jdolecek #if defined(INTRDEBUG) || defined(TRAPDEBUG) 108 1.2.2.2 jdolecek #include <ddb/db_output.h> 109 1.2.2.2 jdolecek #endif 110 1.2.2.2 jdolecek 111 1.2.2.2 jdolecek #if defined(DEBUG) || defined(DIAGNOSTIC) 112 1.2.2.2 jdolecek /* 113 1.2.2.2 jdolecek * 0x6fc1000 is a stwm r1, d(sr0, sp), which is the last 114 1.2.2.2 jdolecek * instruction in the function prologue that gcc -O0 uses. 115 1.2.2.2 jdolecek * When we have this instruction we know the relationship 116 1.2.2.2 jdolecek * between the stack pointer and the gcc -O0 frame pointer 117 1.2.2.2 jdolecek * (in r3, loaded with the initial sp) for the body of a 118 1.2.2.2 jdolecek * function. 119 1.2.2.2 jdolecek * 120 1.2.2.2 jdolecek * If the given instruction is a stwm r1, d(sr0, sp) where 121 1.2.2.2 jdolecek * d > 0, we evaluate to d, else we evaluate to zero. 122 1.2.2.2 jdolecek */ 123 1.2.2.2 jdolecek #define STWM_R1_D_SR0_SP(inst) \ 124 1.2.2.2 jdolecek (((inst) & 0xffffc001) == 0x6fc10000 ? (((inst) & 0x00003ff) >> 1) : 0) 125 1.2.2.2 jdolecek #endif /* DEBUG || DIAGNOSTIC */ 126 1.2.2.2 jdolecek 127 1.2.2.2 jdolecek const char *trap_type[] = { 128 1.2.2.2 jdolecek "invalid", 129 1.2.2.2 jdolecek "HPMC", 130 1.2.2.2 jdolecek "power failure", 131 1.2.2.2 jdolecek "recovery counter", 132 1.2.2.2 jdolecek "external interrupt", 133 1.2.2.2 jdolecek "LPMC", 134 1.2.2.2 jdolecek "ITLB miss fault", 135 1.2.2.2 jdolecek "instruction protection", 136 1.2.2.2 jdolecek "Illegal instruction", 137 1.2.2.2 jdolecek "break instruction", 138 1.2.2.2 jdolecek "privileged operation", 139 1.2.2.2 jdolecek "privileged register", 140 1.2.2.2 jdolecek "overflow", 141 1.2.2.2 jdolecek "conditional", 142 1.2.2.2 jdolecek "assist exception", 143 1.2.2.2 jdolecek "DTLB miss", 144 1.2.2.2 jdolecek "ITLB non-access miss", 145 1.2.2.2 jdolecek "DTLB non-access miss", 146 1.2.2.2 jdolecek "data protection/rights/alignment", 147 1.2.2.2 jdolecek "data break", 148 1.2.2.2 jdolecek "TLB dirty", 149 1.2.2.2 jdolecek "page reference", 150 1.2.2.2 jdolecek "assist emulation", 151 1.2.2.2 jdolecek "higher-priv transfer", 152 1.2.2.2 jdolecek "lower-priv transfer", 153 1.2.2.2 jdolecek "taken branch", 154 1.2.2.2 jdolecek "data access rights", 155 1.2.2.2 jdolecek "data protection", 156 1.2.2.2 jdolecek "unaligned data ref", 157 1.2.2.2 jdolecek }; 158 1.2.2.2 jdolecek int trap_types = sizeof(trap_type)/sizeof(trap_type[0]); 159 1.2.2.2 jdolecek 160 1.2.2.2 jdolecek int want_resched; 161 1.2.2.2 jdolecek volatile int astpending; 162 1.2.2.2 jdolecek 163 1.2.2.2 jdolecek void pmap_hptdump __P((void)); 164 1.2.2.2 jdolecek void syscall __P((struct trapframe *frame, int *args)); 165 1.2.2.2 jdolecek 166 1.2.2.2 jdolecek #ifdef USERTRACE 167 1.2.2.2 jdolecek /* 168 1.2.2.2 jdolecek * USERTRACE is a crude facility that traces the PC of 169 1.2.2.2 jdolecek * a single user process. This tracing is normally 170 1.2.2.2 jdolecek * activated by the dispatching of a certain syscall 171 1.2.2.2 jdolecek * with certain arguments - see the activation code in 172 1.2.2.2 jdolecek * syscall(). 173 1.2.2.2 jdolecek */ 174 1.2.2.2 jdolecek u_int rctr_next_iioq; 175 1.2.2.2 jdolecek #endif 176 1.2.2.2 jdolecek 177 1.2.2.2 jdolecek static __inline void 178 1.2.2.2 jdolecek userret (struct proc *p, register_t pc, u_quad_t oticks) 179 1.2.2.2 jdolecek { 180 1.2.2.2 jdolecek int sig; 181 1.2.2.2 jdolecek 182 1.2.2.2 jdolecek /* take pending signals */ 183 1.2.2.2 jdolecek while ((sig = CURSIG(p)) != 0) 184 1.2.2.2 jdolecek postsig(sig); 185 1.2.2.2 jdolecek 186 1.2.2.2 jdolecek p->p_priority = p->p_usrpri; 187 1.2.2.2 jdolecek if (want_resched) { 188 1.2.2.2 jdolecek /* 189 1.2.2.2 jdolecek * We're being preempted. 190 1.2.2.2 jdolecek */ 191 1.2.2.2 jdolecek preempt(NULL); 192 1.2.2.2 jdolecek while ((sig = CURSIG(p)) != 0) 193 1.2.2.2 jdolecek postsig(sig); 194 1.2.2.2 jdolecek } 195 1.2.2.2 jdolecek 196 1.2.2.2 jdolecek /* 197 1.2.2.2 jdolecek * If profiling, charge recent system time to the trapped pc. 198 1.2.2.2 jdolecek */ 199 1.2.2.2 jdolecek if (p->p_flag & P_PROFIL) { 200 1.2.2.2 jdolecek extern int psratio; 201 1.2.2.2 jdolecek 202 1.2.2.2 jdolecek addupc_task(p, pc, (int)(p->p_sticks - oticks) * psratio); 203 1.2.2.2 jdolecek } 204 1.2.2.2 jdolecek 205 1.2.2.2 jdolecek curcpu()->ci_schedstate.spc_curpriority = p->p_priority; 206 1.2.2.2 jdolecek } 207 1.2.2.2 jdolecek 208 1.2.2.2 jdolecek /* 209 1.2.2.2 jdolecek * This handles some messy kernel debugger details. 210 1.2.2.2 jdolecek * It dispatches into either kgdb or DDB, and knows 211 1.2.2.2 jdolecek * about some special things to do, like skipping over 212 1.2.2.2 jdolecek * break instructions and how to really set up for 213 1.2.2.2 jdolecek * a single-step. 214 1.2.2.2 jdolecek */ 215 1.2.2.2 jdolecek #if defined(KGDB) || defined(DDB) 216 1.2.2.2 jdolecek static int 217 1.2.2.2 jdolecek trap_kdebug(int type, int code, struct trapframe *frame) 218 1.2.2.2 jdolecek { 219 1.2.2.2 jdolecek int handled; 220 1.2.2.2 jdolecek u_int tf_iioq_head_old; 221 1.2.2.2 jdolecek u_int tf_iioq_tail_old; 222 1.2.2.2 jdolecek 223 1.2.2.2 jdolecek for(;;) { 224 1.2.2.2 jdolecek 225 1.2.2.2 jdolecek /* This trap has not been handled. */ 226 1.2.2.2 jdolecek handled = 0; 227 1.2.2.2 jdolecek 228 1.2.2.2 jdolecek /* Remember the instruction offset queue. */ 229 1.2.2.2 jdolecek tf_iioq_head_old = frame->tf_iioq_head; 230 1.2.2.2 jdolecek tf_iioq_tail_old = frame->tf_iioq_tail; 231 1.2.2.2 jdolecek 232 1.2.2.2 jdolecek #ifdef KGDB 233 1.2.2.2 jdolecek /* Let KGDB handle it (if connected) */ 234 1.2.2.2 jdolecek if (!handled) 235 1.2.2.2 jdolecek handled = kgdb_trap(type, frame); 236 1.2.2.2 jdolecek #endif 237 1.2.2.2 jdolecek #ifdef DDB 238 1.2.2.2 jdolecek /* Let DDB handle it. */ 239 1.2.2.2 jdolecek if (!handled) 240 1.2.2.2 jdolecek handled = kdb_trap(type, code, frame); 241 1.2.2.2 jdolecek #endif 242 1.2.2.2 jdolecek 243 1.2.2.2 jdolecek /* If this trap wasn't handled, return now. */ 244 1.2.2.2 jdolecek if (!handled) 245 1.2.2.2 jdolecek return(0); 246 1.2.2.2 jdolecek 247 1.2.2.2 jdolecek /* 248 1.2.2.2 jdolecek * If the instruction offset queue head changed, 249 1.2.2.2 jdolecek * but the offset queue tail didn't, assume that 250 1.2.2.2 jdolecek * the user wants to jump to the head offset, and 251 1.2.2.2 jdolecek * adjust the tail accordingly. This should fix 252 1.2.2.2 jdolecek * the kgdb `jump' command, and can help DDB users 253 1.2.2.2 jdolecek * who `set' the offset head but forget the tail. 254 1.2.2.2 jdolecek */ 255 1.2.2.2 jdolecek if (frame->tf_iioq_head != tf_iioq_head_old && 256 1.2.2.2 jdolecek frame->tf_iioq_tail == tf_iioq_tail_old) 257 1.2.2.2 jdolecek frame->tf_iioq_tail = frame->tf_iioq_head + 4; 258 1.2.2.2 jdolecek 259 1.2.2.2 jdolecek /* 260 1.2.2.2 jdolecek * This is some single-stepping support. 261 1.2.2.2 jdolecek * If we're trying to step through a nullified 262 1.2.2.2 jdolecek * instruction, just advance by hand and trap 263 1.2.2.2 jdolecek * again. Otherwise, load the recovery counter 264 1.2.2.2 jdolecek * with zero. 265 1.2.2.2 jdolecek */ 266 1.2.2.2 jdolecek if (frame->tf_ipsw & PSW_R) { 267 1.2.2.2 jdolecek #ifdef TRAPDEBUG 268 1.2.2.2 jdolecek printf("(single stepping at head 0x%x tail 0x%x)\n", frame->tf_iioq_head, frame->tf_iioq_tail); 269 1.2.2.2 jdolecek #endif 270 1.2.2.2 jdolecek if (frame->tf_ipsw & PSW_N) { 271 1.2.2.2 jdolecek #ifdef TRAPDEBUG 272 1.2.2.2 jdolecek printf("(single stepping past nullified)\n"); 273 1.2.2.2 jdolecek #endif 274 1.2.2.2 jdolecek 275 1.2.2.2 jdolecek /* Advance the program counter. */ 276 1.2.2.2 jdolecek frame->tf_iioq_head = frame->tf_iioq_tail; 277 1.2.2.2 jdolecek frame->tf_iioq_tail = frame->tf_iioq_head + 4; 278 1.2.2.2 jdolecek 279 1.2.2.2 jdolecek /* Clear flags. */ 280 1.2.2.2 jdolecek frame->tf_ipsw &= ~(PSW_N|PSW_X|PSW_Y|PSW_Z|PSW_B|PSW_T|PSW_H|PSW_L); 281 1.2.2.2 jdolecek 282 1.2.2.2 jdolecek /* Simulate another trap. */ 283 1.2.2.2 jdolecek type = T_RECOVERY; 284 1.2.2.2 jdolecek continue; 285 1.2.2.2 jdolecek } 286 1.2.2.2 jdolecek frame->tf_rctr = 0; 287 1.2.2.2 jdolecek } 288 1.2.2.2 jdolecek 289 1.2.2.2 jdolecek /* We handled this trap. */ 290 1.2.2.2 jdolecek return (1); 291 1.2.2.2 jdolecek } 292 1.2.2.2 jdolecek /* NOTREACHED */ 293 1.2.2.2 jdolecek } 294 1.2.2.2 jdolecek #else /* !KGDB && !DDB */ 295 1.2.2.2 jdolecek #define trap_kdebug(t, c, f) (0) 296 1.2.2.2 jdolecek #endif /* !KGDB && !DDB */ 297 1.2.2.2 jdolecek 298 1.2.2.2 jdolecek #ifdef DIAGNOSTIC 299 1.2.2.2 jdolecek /* 300 1.2.2.2 jdolecek * These functions give a crude usermode backtrace. They 301 1.2.2.2 jdolecek * really only work when code has been compiled without 302 1.2.2.2 jdolecek * optimization, as they assume a certain function prologue 303 1.2.2.2 jdolecek * sets up a frame pointer and stores the return pointer 304 1.2.2.2 jdolecek * and arguments in it. 305 1.2.2.2 jdolecek */ 306 1.2.2.2 jdolecek static void user_backtrace_raw __P((u_int, u_int)); 307 1.2.2.2 jdolecek static void 308 1.2.2.2 jdolecek user_backtrace_raw(u_int pc, u_int fp) 309 1.2.2.2 jdolecek { 310 1.2.2.2 jdolecek int frame_number; 311 1.2.2.2 jdolecek int arg_number; 312 1.2.2.2 jdolecek 313 1.2.2.2 jdolecek for(frame_number = 0; pc > HPPA_PC_PRIV_MASK && fp; frame_number++) { 314 1.2.2.2 jdolecek printf("%3d: pc=%08x%s fp=0x%08x", frame_number, 315 1.2.2.2 jdolecek pc & ~HPPA_PC_PRIV_MASK, USERMODE(pc) ? "" : "**", fp); 316 1.2.2.2 jdolecek for(arg_number = 0; arg_number < 4; arg_number++) 317 1.2.2.2 jdolecek printf(" arg%d=0x%08x", arg_number, 318 1.2.2.2 jdolecek (int) fuword(HPPA_FRAME_CARG(arg_number, fp))); 319 1.2.2.2 jdolecek printf("\n"); 320 1.2.2.2 jdolecek pc = fuword(((register_t *) fp) - 5); /* fetch rp */ 321 1.2.2.2 jdolecek if (pc == -1) { 322 1.2.2.2 jdolecek printf(" fuword for pc failed\n"); 323 1.2.2.2 jdolecek break; 324 1.2.2.2 jdolecek } 325 1.2.2.2 jdolecek fp = fuword(((register_t *) fp) + 0); /* fetch previous fp */ 326 1.2.2.2 jdolecek if (fp == -1) { 327 1.2.2.2 jdolecek printf(" fuword for fp failed\n"); 328 1.2.2.2 jdolecek break; 329 1.2.2.2 jdolecek } 330 1.2.2.2 jdolecek } 331 1.2.2.2 jdolecek printf(" backtrace stopped with pc %08x fp 0x%08x\n", pc, fp); 332 1.2.2.2 jdolecek } 333 1.2.2.2 jdolecek 334 1.2.2.2 jdolecek static void user_backtrace __P((struct trapframe *, struct proc *)); 335 1.2.2.2 jdolecek static void 336 1.2.2.2 jdolecek user_backtrace(struct trapframe *tf, struct proc *p) 337 1.2.2.2 jdolecek { 338 1.2.2.2 jdolecek u_int pc, fp, inst; 339 1.2.2.2 jdolecek 340 1.2.2.2 jdolecek /* 341 1.2.2.2 jdolecek * Assuming that the frame pointer in r3 is valid, 342 1.2.2.2 jdolecek * dump out a stack trace. 343 1.2.2.2 jdolecek */ 344 1.2.2.2 jdolecek fp = tf->tf_r3; 345 1.2.2.2 jdolecek printf("pid %d (%s) backtrace, starting with fp 0x%08x\n", 346 1.2.2.2 jdolecek p->p_pid, p->p_comm, fp); 347 1.2.2.2 jdolecek user_backtrace_raw(tf->tf_iioq_head, fp); 348 1.2.2.2 jdolecek 349 1.2.2.2 jdolecek /* 350 1.2.2.2 jdolecek * In case the frame pointer in r3 is not valid, 351 1.2.2.2 jdolecek * assuming the stack pointer is valid and the 352 1.2.2.2 jdolecek * faulting function is a non-leaf, if we can 353 1.2.2.2 jdolecek * find its prologue we can recover its frame 354 1.2.2.2 jdolecek * pointer. 355 1.2.2.2 jdolecek */ 356 1.2.2.2 jdolecek pc = tf->tf_iioq_head; 357 1.2.2.2 jdolecek fp = tf->tf_sp - HPPA_FRAME_SIZE; 358 1.2.2.2 jdolecek printf("pid %d (%s) backtrace, starting with sp 0x%08x pc 0x%08x\n", 359 1.2.2.2 jdolecek p->p_pid, p->p_comm, tf->tf_sp, pc); 360 1.2.2.2 jdolecek for(pc &= ~HPPA_PC_PRIV_MASK; pc > 0; pc -= sizeof(inst)) { 361 1.2.2.2 jdolecek inst = fuword((register_t *) pc); 362 1.2.2.2 jdolecek if (inst == -1) { 363 1.2.2.2 jdolecek printf(" fuword for inst at pc %08x failed\n", pc); 364 1.2.2.2 jdolecek break; 365 1.2.2.2 jdolecek } 366 1.2.2.2 jdolecek /* Check for the prologue instruction that sets sp. */ 367 1.2.2.2 jdolecek if (STWM_R1_D_SR0_SP(inst)) { 368 1.2.2.2 jdolecek fp = tf->tf_sp - STWM_R1_D_SR0_SP(inst); 369 1.2.2.2 jdolecek printf(" sp from fp at pc %08x: %08x\n", pc, inst); 370 1.2.2.2 jdolecek break; 371 1.2.2.2 jdolecek } 372 1.2.2.2 jdolecek } 373 1.2.2.2 jdolecek user_backtrace_raw(tf->tf_iioq_head, fp); 374 1.2.2.2 jdolecek } 375 1.2.2.2 jdolecek #endif /* DIAGNOSTIC */ 376 1.2.2.2 jdolecek 377 1.2.2.2 jdolecek #ifdef DEBUG 378 1.2.2.2 jdolecek /* 379 1.2.2.2 jdolecek * This sanity-checks a trapframe. It is full of various 380 1.2.2.2 jdolecek * assumptions about what a healthy CPU state should be, 381 1.2.2.2 jdolecek * with some documented elsewhere, some not. 382 1.2.2.2 jdolecek */ 383 1.2.2.2 jdolecek struct trapframe *sanity_frame; 384 1.2.2.2 jdolecek struct proc *sanity_proc; 385 1.2.2.2 jdolecek int sanity_checked = 0; 386 1.2.2.2 jdolecek void frame_sanity_check __P((struct trapframe *, struct proc *)); 387 1.2.2.2 jdolecek void 388 1.2.2.2 jdolecek frame_sanity_check(struct trapframe *tf, struct proc *p) 389 1.2.2.2 jdolecek { 390 1.2.2.2 jdolecek extern int kernel_text; 391 1.2.2.2 jdolecek extern int etext; 392 1.2.2.2 jdolecek extern register_t kpsw; 393 1.2.2.2 jdolecek extern vaddr_t hpt_base; 394 1.2.2.2 jdolecek extern vsize_t hpt_mask; 395 1.2.2.2 jdolecek vsize_t uspace_size; 396 1.2.2.2 jdolecek #define SANITY(e) \ 397 1.2.2.2 jdolecek do { \ 398 1.2.2.2 jdolecek if (sanity_frame == NULL && !(e)) { \ 399 1.2.2.2 jdolecek sanity_frame = tf; \ 400 1.2.2.2 jdolecek sanity_proc = p; \ 401 1.2.2.2 jdolecek sanity_checked = __LINE__; \ 402 1.2.2.2 jdolecek } \ 403 1.2.2.2 jdolecek } while (/* CONSTCOND */ 0) 404 1.2.2.2 jdolecek 405 1.2.2.2 jdolecek SANITY((tf->tf_ipsw & kpsw) == kpsw); 406 1.2.2.2 jdolecek SANITY(tf->tf_hptm == hpt_mask && tf->tf_vtop == hpt_base); 407 1.2.2.2 jdolecek SANITY((kpsw & PSW_I) == 0 || tf->tf_eiem != 0); 408 1.2.2.2 jdolecek if (tf->tf_iisq_head == HPPA_SID_KERNEL) { 409 1.2.2.2 jdolecek /* 410 1.2.2.2 jdolecek * If the trap happened in the gateway 411 1.2.2.2 jdolecek * page, we take the easy way out and 412 1.2.2.2 jdolecek * assume that the trapframe is okay. 413 1.2.2.2 jdolecek */ 414 1.2.2.2 jdolecek if ((tf->tf_iioq_head & ~PAGE_MASK) != SYSCALLGATE) { 415 1.2.2.2 jdolecek SANITY(!USERMODE(tf->tf_iioq_head)); 416 1.2.2.2 jdolecek SANITY(!USERMODE(tf->tf_iioq_tail)); 417 1.2.2.2 jdolecek SANITY(tf->tf_iioq_head >= (u_int) &kernel_text); 418 1.2.2.2 jdolecek SANITY(tf->tf_iioq_head < (u_int) &etext); 419 1.2.2.2 jdolecek SANITY(tf->tf_iioq_tail >= (u_int) &kernel_text); 420 1.2.2.2 jdolecek SANITY(tf->tf_iioq_tail < (u_int) &etext); 421 1.2.2.2 jdolecek #ifdef HPPA_REDZONE 422 1.2.2.2 jdolecek uspace_size = HPPA_REDZONE; 423 1.2.2.2 jdolecek #else 424 1.2.2.2 jdolecek uspace_size = USPACE; 425 1.2.2.2 jdolecek #endif 426 1.2.2.2 jdolecek SANITY(p == NULL || 427 1.2.2.2 jdolecek ((tf->tf_sp >= (u_int)(p->p_addr) + NBPG && 428 1.2.2.2 jdolecek tf->tf_sp < (u_int)(p->p_addr) + uspace_size))); 429 1.2.2.2 jdolecek } 430 1.2.2.2 jdolecek } else { 431 1.2.2.2 jdolecek SANITY(USERMODE(tf->tf_iioq_head)); 432 1.2.2.2 jdolecek SANITY(USERMODE(tf->tf_iioq_tail)); 433 1.2.2.2 jdolecek SANITY(p != NULL && tf->tf_cr30 == kvtop((caddr_t)p->p_addr)); 434 1.2.2.2 jdolecek } 435 1.2.2.2 jdolecek #undef SANITY 436 1.2.2.2 jdolecek if (sanity_frame == tf) { 437 1.2.2.2 jdolecek trap_kdebug(T_IBREAK, 0, tf); 438 1.2.2.2 jdolecek sanity_frame = NULL; 439 1.2.2.2 jdolecek sanity_proc = NULL; 440 1.2.2.2 jdolecek sanity_checked = 0; 441 1.2.2.2 jdolecek } 442 1.2.2.2 jdolecek } 443 1.2.2.2 jdolecek #endif /* DEBUG */ 444 1.2.2.2 jdolecek 445 1.2.2.2 jdolecek void 446 1.2.2.2 jdolecek trap(type, frame) 447 1.2.2.2 jdolecek int type; 448 1.2.2.2 jdolecek struct trapframe *frame; 449 1.2.2.2 jdolecek { 450 1.2.2.2 jdolecek struct proc *p = curproc; 451 1.2.2.2 jdolecek struct pcb *pcbp; 452 1.2.2.2 jdolecek register vaddr_t va; 453 1.2.2.2 jdolecek register struct vm_map *map; 454 1.2.2.2 jdolecek struct vmspace *vm; 455 1.2.2.2 jdolecek register vm_prot_t vftype; 456 1.2.2.2 jdolecek register pa_space_t space; 457 1.2.2.2 jdolecek u_int opcode; 458 1.2.2.2 jdolecek int ret; 459 1.2.2.2 jdolecek const char *tts; 460 1.2.2.2 jdolecek int type_raw; 461 1.2.2.2 jdolecek #ifdef DIAGNOSTIC 462 1.2.2.2 jdolecek extern int emergency_stack_start, emergency_stack_end; 463 1.2.2.2 jdolecek #endif 464 1.2.2.2 jdolecek 465 1.2.2.2 jdolecek type_raw = type & ~T_USER; 466 1.2.2.2 jdolecek opcode = frame->tf_iir; 467 1.2.2.2 jdolecek if (type_raw == T_ITLBMISS || type_raw == T_ITLBMISSNA) { 468 1.2.2.2 jdolecek va = frame->tf_iioq_head; 469 1.2.2.2 jdolecek space = frame->tf_iisq_head; 470 1.2.2.2 jdolecek vftype = VM_PROT_READ; /* XXX VM_PROT_EXECUTE ??? */ 471 1.2.2.2 jdolecek } else { 472 1.2.2.2 jdolecek va = frame->tf_ior; 473 1.2.2.2 jdolecek space = frame->tf_isr; 474 1.2.2.2 jdolecek vftype = inst_store(opcode) ? VM_PROT_WRITE : VM_PROT_READ; 475 1.2.2.2 jdolecek } 476 1.2.2.2 jdolecek 477 1.2.2.2 jdolecek #ifdef DIAGNOSTIC 478 1.2.2.2 jdolecek /* 479 1.2.2.2 jdolecek * If we are on the emergency stack, then we either got 480 1.2.2.2 jdolecek * a fault on the kernel stack, or we're just handling 481 1.2.2.2 jdolecek * a trap for the machine check handler (which also 482 1.2.2.2 jdolecek * runs on the emergency stack). 483 1.2.2.2 jdolecek * 484 1.2.2.2 jdolecek * We *very crudely* differentiate between the two cases 485 1.2.2.2 jdolecek * by checking the faulting instruction: if it is the 486 1.2.2.2 jdolecek * function prologue instruction that stores the old 487 1.2.2.2 jdolecek * frame pointer and updates the stack pointer, we assume 488 1.2.2.2 jdolecek * that we faulted on the kernel stack. 489 1.2.2.2 jdolecek * 490 1.2.2.2 jdolecek * In this case, not completing that instruction will 491 1.2.2.2 jdolecek * probably confuse backtraces in kgdb/ddb. Completing 492 1.2.2.2 jdolecek * it would be difficult, because we already faulted on 493 1.2.2.2 jdolecek * that part of the stack, so instead we fix up the 494 1.2.2.2 jdolecek * frame as if the function called has just returned. 495 1.2.2.2 jdolecek * This has peculiar knowledge about what values are in 496 1.2.2.2 jdolecek * what registers during the "normal gcc -g" prologue. 497 1.2.2.2 jdolecek */ 498 1.2.2.2 jdolecek if (&type >= &emergency_stack_start && 499 1.2.2.2 jdolecek &type < &emergency_stack_end && 500 1.2.2.2 jdolecek type != T_IBREAK && STWM_R1_D_SR0_SP(opcode)) { 501 1.2.2.2 jdolecek /* Restore the caller's frame pointer. */ 502 1.2.2.2 jdolecek frame->tf_r3 = frame->tf_r1; 503 1.2.2.2 jdolecek /* Restore the caller's instruction offsets. */ 504 1.2.2.2 jdolecek frame->tf_iioq_head = frame->tf_rp; 505 1.2.2.2 jdolecek frame->tf_iioq_tail = frame->tf_iioq_head + 4; 506 1.2.2.2 jdolecek goto dead_end; 507 1.2.2.2 jdolecek } 508 1.2.2.2 jdolecek #endif /* DIAGNOSTIC */ 509 1.2.2.2 jdolecek 510 1.2.2.2 jdolecek #ifdef DEBUG 511 1.2.2.2 jdolecek frame_sanity_check(frame, p); 512 1.2.2.2 jdolecek #endif /* DEBUG */ 513 1.2.2.2 jdolecek 514 1.2.2.2 jdolecek /* If this is a trap, not an interrupt, reenable interrupts. */ 515 1.2.2.2 jdolecek if (type_raw != T_INTERRUPT) 516 1.2.2.2 jdolecek mtctl(frame->tf_eiem, CR_EIEM); 517 1.2.2.2 jdolecek 518 1.2.2.2 jdolecek if (frame->tf_flags & TFF_LAST) 519 1.2.2.2 jdolecek p->p_md.md_regs = frame; 520 1.2.2.2 jdolecek 521 1.2.2.2 jdolecek if ((type & ~T_USER) > trap_types) 522 1.2.2.2 jdolecek tts = "reserved"; 523 1.2.2.2 jdolecek else 524 1.2.2.2 jdolecek tts = trap_type[type & ~T_USER]; 525 1.2.2.2 jdolecek 526 1.2.2.2 jdolecek #ifdef TRAPDEBUG 527 1.2.2.2 jdolecek if (type_raw != T_INTERRUPT && type_raw != T_IBREAK) 528 1.2.2.2 jdolecek printf("trap: %d, %s for %x:%x at %x:%x, fp=%p, rp=%x\n", 529 1.2.2.2 jdolecek type, tts, space, (u_int)va, frame->tf_iisq_head, 530 1.2.2.2 jdolecek frame->tf_iioq_head, frame, frame->tf_rp); 531 1.2.2.2 jdolecek else if (type_raw == T_IBREAK) 532 1.2.2.2 jdolecek printf("trap: break instruction %x:%x at %x:%x, fp=%p\n", 533 1.2.2.2 jdolecek break5(opcode), break13(opcode), 534 1.2.2.2 jdolecek frame->tf_iisq_head, frame->tf_iioq_head, frame); 535 1.2.2.2 jdolecek 536 1.2.2.2 jdolecek { 537 1.2.2.2 jdolecek extern int etext; 538 1.2.2.2 jdolecek if (frame < (struct trapframe *)&etext) { 539 1.2.2.2 jdolecek printf("trap: bogus frame ptr %p\n", frame); 540 1.2.2.2 jdolecek goto dead_end; 541 1.2.2.2 jdolecek } 542 1.2.2.2 jdolecek } 543 1.2.2.2 jdolecek #endif 544 1.2.2.2 jdolecek switch (type) { 545 1.2.2.2 jdolecek case T_NONEXIST: 546 1.2.2.2 jdolecek case T_NONEXIST|T_USER: 547 1.2.2.2 jdolecek #if !defined(DDB) && !defined(KGDB) 548 1.2.2.2 jdolecek /* we've got screwed up by the central scrutinizer */ 549 1.2.2.2 jdolecek panic ("trap: elvis has just left the building!"); 550 1.2.2.2 jdolecek break; 551 1.2.2.2 jdolecek #else 552 1.2.2.2 jdolecek goto dead_end; 553 1.2.2.2 jdolecek #endif 554 1.2.2.2 jdolecek case T_RECOVERY|T_USER: 555 1.2.2.2 jdolecek #ifdef USERTRACE 556 1.2.2.2 jdolecek for(;;) { 557 1.2.2.2 jdolecek if (frame->tf_iioq_head != rctr_next_iioq) 558 1.2.2.2 jdolecek printf("-%08x\nr %08x", 559 1.2.2.2 jdolecek rctr_next_iioq - 4, 560 1.2.2.2 jdolecek frame->tf_iioq_head); 561 1.2.2.2 jdolecek rctr_next_iioq = frame->tf_iioq_head + 4; 562 1.2.2.2 jdolecek if (frame->tf_ipsw & PSW_N) { 563 1.2.2.2 jdolecek /* Advance the program counter. */ 564 1.2.2.2 jdolecek frame->tf_iioq_head = frame->tf_iioq_tail; 565 1.2.2.2 jdolecek frame->tf_iioq_tail = frame->tf_iioq_head + 4; 566 1.2.2.2 jdolecek /* Clear flags. */ 567 1.2.2.2 jdolecek frame->tf_ipsw &= ~(PSW_N|PSW_X|PSW_Y|PSW_Z|PSW_B|PSW_T|PSW_H|PSW_L); 568 1.2.2.2 jdolecek /* Simulate another trap. */ 569 1.2.2.2 jdolecek continue; 570 1.2.2.2 jdolecek } 571 1.2.2.2 jdolecek break; 572 1.2.2.2 jdolecek } 573 1.2.2.2 jdolecek frame->tf_rctr = 0; 574 1.2.2.2 jdolecek break; 575 1.2.2.2 jdolecek #endif /* USERTRACE */ 576 1.2.2.2 jdolecek case T_RECOVERY: 577 1.2.2.2 jdolecek #if !defined(DDB) && !defined(KGDB) 578 1.2.2.2 jdolecek /* XXX will implement later */ 579 1.2.2.2 jdolecek printf ("trap: handicapped"); 580 1.2.2.2 jdolecek break; 581 1.2.2.2 jdolecek #else 582 1.2.2.2 jdolecek goto dead_end; 583 1.2.2.2 jdolecek #endif 584 1.2.2.2 jdolecek 585 1.2.2.2 jdolecek case T_EMULATION | T_USER: 586 1.2.2.2 jdolecek #ifdef FPEMUL 587 1.2.2.2 jdolecek hppa_fpu_emulate(frame, p); 588 1.2.2.2 jdolecek #else /* !FPEMUL */ 589 1.2.2.2 jdolecek /* 590 1.2.2.2 jdolecek * We don't have FPU emulation, so signal the 591 1.2.2.2 jdolecek * process with a SIGFPE. 592 1.2.2.2 jdolecek */ 593 1.2.2.2 jdolecek trapsignal(p, SIGFPE, frame->tf_iioq_head); 594 1.2.2.2 jdolecek #endif /* !FPEMUL */ 595 1.2.2.2 jdolecek break; 596 1.2.2.2 jdolecek 597 1.2.2.2 jdolecek #ifdef DIAGNOSTIC 598 1.2.2.2 jdolecek case T_EXCEPTION: 599 1.2.2.2 jdolecek panic("FPU/SFU emulation botch"); 600 1.2.2.2 jdolecek 601 1.2.2.2 jdolecek /* these just can't happen ever */ 602 1.2.2.2 jdolecek case T_PRIV_OP: 603 1.2.2.2 jdolecek case T_PRIV_REG: 604 1.2.2.2 jdolecek /* these just can't make it to the trap() ever */ 605 1.2.2.2 jdolecek case T_HPMC: case T_HPMC | T_USER: 606 1.2.2.2 jdolecek case T_EMULATION: 607 1.2.2.2 jdolecek #endif 608 1.2.2.2 jdolecek case T_IBREAK: 609 1.2.2.2 jdolecek case T_DATALIGN: 610 1.2.2.2 jdolecek case T_DBREAK: 611 1.2.2.2 jdolecek dead_end: 612 1.2.2.2 jdolecek if (trap_kdebug(type, va, frame)) 613 1.2.2.2 jdolecek return; 614 1.2.2.2 jdolecek else if (type == T_DATALIGN) 615 1.2.2.2 jdolecek panic ("trap: %s at 0x%x", tts, (u_int) va); 616 1.2.2.2 jdolecek else 617 1.2.2.2 jdolecek panic ("trap: no debugger for \"%s\" (%d)", tts, type); 618 1.2.2.2 jdolecek break; 619 1.2.2.2 jdolecek 620 1.2.2.2 jdolecek case T_IBREAK | T_USER: 621 1.2.2.2 jdolecek case T_DBREAK | T_USER: 622 1.2.2.2 jdolecek /* pass to user debugger */ 623 1.2.2.2 jdolecek break; 624 1.2.2.2 jdolecek 625 1.2.2.2 jdolecek case T_EXCEPTION | T_USER: /* co-proc assist trap */ 626 1.2.2.2 jdolecek trapsignal(p, SIGFPE, va); 627 1.2.2.2 jdolecek break; 628 1.2.2.2 jdolecek 629 1.2.2.2 jdolecek case T_OVERFLOW | T_USER: 630 1.2.2.2 jdolecek trapsignal(p, SIGFPE, va); 631 1.2.2.2 jdolecek break; 632 1.2.2.2 jdolecek 633 1.2.2.2 jdolecek case T_CONDITION | T_USER: 634 1.2.2.2 jdolecek break; 635 1.2.2.2 jdolecek 636 1.2.2.2 jdolecek case T_ILLEGAL | T_USER: 637 1.2.2.2 jdolecek trapsignal(p, SIGILL, va); 638 1.2.2.2 jdolecek break; 639 1.2.2.2 jdolecek 640 1.2.2.2 jdolecek case T_PRIV_OP | T_USER: 641 1.2.2.2 jdolecek trapsignal(p, SIGILL, va); 642 1.2.2.2 jdolecek break; 643 1.2.2.2 jdolecek 644 1.2.2.2 jdolecek case T_PRIV_REG | T_USER: 645 1.2.2.2 jdolecek trapsignal(p, SIGILL, va); 646 1.2.2.2 jdolecek break; 647 1.2.2.2 jdolecek 648 1.2.2.2 jdolecek /* these should never got here */ 649 1.2.2.2 jdolecek case T_HIGHERPL | T_USER: 650 1.2.2.2 jdolecek case T_LOWERPL | T_USER: 651 1.2.2.2 jdolecek trapsignal(p, SIGSEGV, va); 652 1.2.2.2 jdolecek break; 653 1.2.2.2 jdolecek 654 1.2.2.2 jdolecek case T_IPROT | T_USER: 655 1.2.2.2 jdolecek case T_DPROT | T_USER: 656 1.2.2.2 jdolecek trapsignal(p, SIGSEGV, va); 657 1.2.2.2 jdolecek break; 658 1.2.2.2 jdolecek 659 1.2.2.2 jdolecek case T_DATACC: case T_USER | T_DATACC: 660 1.2.2.2 jdolecek case T_ITLBMISS: case T_USER | T_ITLBMISS: 661 1.2.2.2 jdolecek case T_DTLBMISS: case T_USER | T_DTLBMISS: 662 1.2.2.2 jdolecek case T_ITLBMISSNA: case T_USER | T_ITLBMISSNA: 663 1.2.2.2 jdolecek case T_DTLBMISSNA: case T_USER | T_DTLBMISSNA: 664 1.2.2.2 jdolecek case T_TLB_DIRTY: case T_USER | T_TLB_DIRTY: 665 1.2.2.2 jdolecek va = hppa_trunc_page(va); 666 1.2.2.2 jdolecek vm = p->p_vmspace; 667 1.2.2.2 jdolecek 668 1.2.2.2 jdolecek if (!vm) { 669 1.2.2.2 jdolecek #ifdef TRAPDEBUG 670 1.2.2.2 jdolecek printf("trap: no vm, p=%p\n", p); 671 1.2.2.2 jdolecek #endif 672 1.2.2.2 jdolecek goto dead_end; 673 1.2.2.2 jdolecek } 674 1.2.2.2 jdolecek 675 1.2.2.2 jdolecek /* 676 1.2.2.2 jdolecek * it could be a kernel map for exec_map faults 677 1.2.2.2 jdolecek */ 678 1.2.2.2 jdolecek if (!(type & T_USER) && space == HPPA_SID_KERNEL) 679 1.2.2.2 jdolecek map = kernel_map; 680 1.2.2.2 jdolecek else 681 1.2.2.2 jdolecek map = &vm->vm_map; 682 1.2.2.2 jdolecek 683 1.2.2.2 jdolecek if (map->pmap->pmap_space != space) { 684 1.2.2.2 jdolecek #ifdef TRAPDEBUG 685 1.2.2.2 jdolecek printf("trap: space missmatch %d != %d\n", 686 1.2.2.2 jdolecek space, map->pmap->pmap_space); 687 1.2.2.2 jdolecek #endif 688 1.2.2.2 jdolecek /* actually dump the user, crap the kernel */ 689 1.2.2.2 jdolecek goto dead_end; 690 1.2.2.2 jdolecek } 691 1.2.2.2 jdolecek 692 1.2.2.2 jdolecek /* Never call uvm_fault in interrupt context. */ 693 1.2.2.2 jdolecek KASSERT(hppa_intr_depth == 0); 694 1.2.2.2 jdolecek 695 1.2.2.2 jdolecek ret = uvm_fault(map, va, 0, vftype); 696 1.2.2.2 jdolecek 697 1.2.2.2 jdolecek #ifdef TRAPDEBUG 698 1.2.2.2 jdolecek printf("uvm_fault(%p, %x, %d, %d)=%d\n", 699 1.2.2.2 jdolecek map, (u_int)va, 0, vftype, ret); 700 1.2.2.2 jdolecek #endif 701 1.2.2.2 jdolecek 702 1.2.2.2 jdolecek /* 703 1.2.2.2 jdolecek * If this was a stack access we keep track of the maximum 704 1.2.2.2 jdolecek * accessed stack size. Also, if uvm_fault gets a protection 705 1.2.2.2 jdolecek * failure it is due to accessing the stack region outside 706 1.2.2.2 jdolecek * the current limit and we need to reflect that as an access 707 1.2.2.2 jdolecek * error. 708 1.2.2.2 jdolecek */ 709 1.2.2.2 jdolecek if (va >= (vaddr_t)vm->vm_maxsaddr + vm->vm_ssize) { 710 1.2.2.2 jdolecek if (ret == 0) { 711 1.2.2.2 jdolecek vsize_t nss = btoc(va - USRSTACK + NBPG); 712 1.2.2.2 jdolecek if (nss > vm->vm_ssize) 713 1.2.2.2 jdolecek vm->vm_ssize = nss; 714 1.2.2.2 jdolecek } else if (ret == EACCES) 715 1.2.2.2 jdolecek ret = EFAULT; 716 1.2.2.2 jdolecek } 717 1.2.2.2 jdolecek 718 1.2.2.2 jdolecek if (ret != 0) { 719 1.2.2.2 jdolecek if (type & T_USER) { 720 1.2.2.2 jdolecek printf("trapsignal: uvm_fault(%p, %x, %d, %d)=%d\n", 721 1.2.2.2 jdolecek map, (u_int)va, 0, vftype, ret); 722 1.2.2.2 jdolecek #ifdef DEBUG 723 1.2.2.2 jdolecek user_backtrace(frame, p); 724 1.2.2.2 jdolecek #endif 725 1.2.2.2 jdolecek trapsignal(p, SIGSEGV, frame->tf_ior); 726 1.2.2.2 jdolecek } else { 727 1.2.2.2 jdolecek if (p && p->p_addr->u_pcb.pcb_onfault) { 728 1.2.2.2 jdolecek #ifdef PMAPDEBUG 729 1.2.2.2 jdolecek printf("trap: copyin/out %d\n",ret); 730 1.2.2.2 jdolecek #endif 731 1.2.2.2 jdolecek pcbp = &p->p_addr->u_pcb; 732 1.2.2.2 jdolecek frame->tf_iioq_tail = 4 + 733 1.2.2.2 jdolecek (frame->tf_iioq_head = 734 1.2.2.2 jdolecek pcbp->pcb_onfault); 735 1.2.2.2 jdolecek pcbp->pcb_onfault = 0; 736 1.2.2.2 jdolecek break; 737 1.2.2.2 jdolecek } 738 1.2.2.2 jdolecek #if 1 739 1.2.2.2 jdolecek if (trap_kdebug (type, va, frame)) 740 1.2.2.2 jdolecek return; 741 1.2.2.2 jdolecek #else 742 1.2.2.2 jdolecek panic("trap: uvm_fault(%p, %x, %d, %d): %d", 743 1.2.2.2 jdolecek map, va, 0, vftype, ret); 744 1.2.2.2 jdolecek #endif 745 1.2.2.2 jdolecek } 746 1.2.2.2 jdolecek } 747 1.2.2.2 jdolecek break; 748 1.2.2.2 jdolecek 749 1.2.2.2 jdolecek case T_DATALIGN | T_USER: 750 1.2.2.2 jdolecek trapsignal(p, SIGBUS, va); 751 1.2.2.2 jdolecek break; 752 1.2.2.2 jdolecek 753 1.2.2.2 jdolecek case T_INTERRUPT: 754 1.2.2.2 jdolecek case T_INTERRUPT|T_USER: 755 1.2.2.2 jdolecek hppa_intr(frame); 756 1.2.2.2 jdolecek mtctl(frame->tf_eiem, CR_EIEM); 757 1.2.2.2 jdolecek #if 0 758 1.2.2.2 jdolecek if (trap_kdebug (type, va, frame)) 759 1.2.2.2 jdolecek return; 760 1.2.2.2 jdolecek #endif 761 1.2.2.2 jdolecek break; 762 1.2.2.2 jdolecek case T_LOWERPL: 763 1.2.2.2 jdolecek case T_DPROT: 764 1.2.2.2 jdolecek case T_IPROT: 765 1.2.2.2 jdolecek case T_OVERFLOW: 766 1.2.2.2 jdolecek case T_CONDITION: 767 1.2.2.2 jdolecek case T_ILLEGAL: 768 1.2.2.2 jdolecek case T_HIGHERPL: 769 1.2.2.2 jdolecek case T_TAKENBR: 770 1.2.2.2 jdolecek case T_POWERFAIL: 771 1.2.2.2 jdolecek case T_LPMC: 772 1.2.2.2 jdolecek case T_PAGEREF: 773 1.2.2.2 jdolecek case T_DATAPID: case T_DATAPID | T_USER: 774 1.2.2.2 jdolecek if (0 /* T-chip */) { 775 1.2.2.2 jdolecek break; 776 1.2.2.2 jdolecek } 777 1.2.2.2 jdolecek /* FALLTHROUGH to unimplemented */ 778 1.2.2.2 jdolecek default: 779 1.2.2.2 jdolecek #if 1 780 1.2.2.2 jdolecek if (trap_kdebug (type, va, frame)) 781 1.2.2.2 jdolecek return; 782 1.2.2.2 jdolecek #endif 783 1.2.2.2 jdolecek panic ("trap: unimplemented \'%s\' (%d)", tts, type); 784 1.2.2.2 jdolecek } 785 1.2.2.2 jdolecek 786 1.2.2.2 jdolecek if (type & T_USER) 787 1.2.2.2 jdolecek userret(p, p->p_md.md_regs->tf_iioq_head, 0); 788 1.2.2.2 jdolecek 789 1.2.2.2 jdolecek #ifdef DEBUG 790 1.2.2.2 jdolecek frame_sanity_check(frame, p); 791 1.2.2.2 jdolecek if (frame->tf_flags & TFF_LAST && curproc != NULL) 792 1.2.2.2 jdolecek frame_sanity_check(curproc->p_md.md_regs, curproc); 793 1.2.2.2 jdolecek #endif /* DEBUG */ 794 1.2.2.2 jdolecek } 795 1.2.2.2 jdolecek 796 1.2.2.2 jdolecek void 797 1.2.2.2 jdolecek child_return(arg) 798 1.2.2.2 jdolecek void *arg; 799 1.2.2.2 jdolecek { 800 1.2.2.2 jdolecek struct proc *p = arg; 801 1.2.2.2 jdolecek 802 1.2.2.2 jdolecek userret(p, p->p_md.md_regs->tf_iioq_head, 0); 803 1.2.2.2 jdolecek #ifdef KTRACE 804 1.2.2.2 jdolecek if (KTRPOINT(p, KTR_SYSRET)) 805 1.2.2.2 jdolecek ktrsysret(p, SYS_fork, 0, 0); 806 1.2.2.2 jdolecek #endif 807 1.2.2.2 jdolecek #ifdef DEBUG 808 1.2.2.2 jdolecek frame_sanity_check(p->p_md.md_regs, p); 809 1.2.2.2 jdolecek #endif /* DEBUG */ 810 1.2.2.2 jdolecek } 811 1.2.2.2 jdolecek 812 1.2.2.2 jdolecek /* 813 1.2.2.2 jdolecek * call actual syscall routine 814 1.2.2.2 jdolecek * from the low-level syscall handler: 815 1.2.2.2 jdolecek * - all HPPA_FRAME_NARGS syscall's arguments supposed to be copied onto 816 1.2.2.2 jdolecek * our stack, this wins compared to copyin just needed amount anyway 817 1.2.2.2 jdolecek * - register args are copied onto stack too 818 1.2.2.2 jdolecek */ 819 1.2.2.2 jdolecek void 820 1.2.2.2 jdolecek syscall(frame, args) 821 1.2.2.2 jdolecek struct trapframe *frame; 822 1.2.2.2 jdolecek int *args; 823 1.2.2.2 jdolecek { 824 1.2.2.2 jdolecek register struct proc *p; 825 1.2.2.2 jdolecek register const struct sysent *callp; 826 1.2.2.2 jdolecek int nsys, code, argsize, error; 827 1.2.2.2 jdolecek int tmp; 828 1.2.2.2 jdolecek int rval[2]; 829 1.2.2.2 jdolecek 830 1.2.2.2 jdolecek uvmexp.syscalls++; 831 1.2.2.2 jdolecek 832 1.2.2.2 jdolecek #ifdef DEBUG 833 1.2.2.2 jdolecek frame_sanity_check(frame, curproc); 834 1.2.2.2 jdolecek #endif /* DEBUG */ 835 1.2.2.2 jdolecek 836 1.2.2.2 jdolecek if (!USERMODE(frame->tf_iioq_head)) 837 1.2.2.2 jdolecek panic("syscall"); 838 1.2.2.2 jdolecek 839 1.2.2.2 jdolecek p = curproc; 840 1.2.2.2 jdolecek p->p_md.md_regs = frame; 841 1.2.2.2 jdolecek nsys = p->p_emul->e_nsysent; 842 1.2.2.2 jdolecek callp = p->p_emul->e_sysent; 843 1.2.2.2 jdolecek code = frame->tf_t1; 844 1.2.2.2 jdolecek 845 1.2.2.2 jdolecek /* 846 1.2.2.2 jdolecek * Restarting a system call is touchy on the HPPA, 847 1.2.2.2 jdolecek * because syscall arguments are passed in registers 848 1.2.2.2 jdolecek * and the program counter of the syscall "point" 849 1.2.2.2 jdolecek * isn't easily divined. 850 1.2.2.2 jdolecek * 851 1.2.2.2 jdolecek * We handle the first problem by assuming that we 852 1.2.2.2 jdolecek * will have to restart this system call, so we 853 1.2.2.2 jdolecek * stuff the first four words of the original arguments 854 1.2.2.2 jdolecek * back into the frame as arg0...arg3, which is where 855 1.2.2.2 jdolecek * we found them in the first place. Any further 856 1.2.2.2 jdolecek * arguments are (still) on the user's stack and the 857 1.2.2.2 jdolecek * syscall code will fetch them from there (again). 858 1.2.2.2 jdolecek * 859 1.2.2.2 jdolecek * The program counter problem is addressed below. 860 1.2.2.2 jdolecek */ 861 1.2.2.2 jdolecek frame->tf_arg0 = args[0]; 862 1.2.2.2 jdolecek frame->tf_arg1 = args[1]; 863 1.2.2.2 jdolecek frame->tf_arg2 = args[2]; 864 1.2.2.2 jdolecek frame->tf_arg3 = args[3]; 865 1.2.2.2 jdolecek 866 1.2.2.2 jdolecek /* 867 1.2.2.2 jdolecek * Some special handling for the syscall(2) and 868 1.2.2.2 jdolecek * __syscall(2) system calls. 869 1.2.2.2 jdolecek */ 870 1.2.2.2 jdolecek switch (code) { 871 1.2.2.2 jdolecek case SYS_syscall: 872 1.2.2.2 jdolecek code = *args; 873 1.2.2.2 jdolecek args += 1; 874 1.2.2.2 jdolecek break; 875 1.2.2.2 jdolecek case SYS___syscall: 876 1.2.2.2 jdolecek if (callp != sysent) 877 1.2.2.2 jdolecek break; 878 1.2.2.2 jdolecek /* 879 1.2.2.2 jdolecek * NB: even though __syscall(2) takes a quad_t 880 1.2.2.2 jdolecek * containing the system call number, because 881 1.2.2.2 jdolecek * our argument copying word-swaps 64-bit arguments, 882 1.2.2.2 jdolecek * the least significant word of that quad_t 883 1.2.2.2 jdolecek * is the first word in the argument array. 884 1.2.2.2 jdolecek */ 885 1.2.2.2 jdolecek code = *args; 886 1.2.2.2 jdolecek args += 2; 887 1.2.2.2 jdolecek } 888 1.2.2.2 jdolecek 889 1.2.2.2 jdolecek /* 890 1.2.2.2 jdolecek * Stacks growing from lower addresses to higher 891 1.2.2.2 jdolecek * addresses are not really such a good idea, because 892 1.2.2.2 jdolecek * it makes it impossible to overlay a struct on top 893 1.2.2.2 jdolecek * of C stack arguments (the arguments appear in 894 1.2.2.2 jdolecek * reversed order). 895 1.2.2.2 jdolecek * 896 1.2.2.2 jdolecek * You can do the obvious thing (as locore.S does) and 897 1.2.2.2 jdolecek * copy argument words one by one, laying them out in 898 1.2.2.2 jdolecek * the "right" order in the destination buffer, but this 899 1.2.2.2 jdolecek * ends up word-swapping multi-word arguments (like off_t). 900 1.2.2.2 jdolecek * 901 1.2.2.2 jdolecek * To compensate, we have some automatically-generated 902 1.2.2.2 jdolecek * code that word-swaps these multi-word arguments. 903 1.2.2.2 jdolecek * Right now the script that generates this code is 904 1.2.2.2 jdolecek * in Perl, because I don't know awk. 905 1.2.2.2 jdolecek * 906 1.2.2.2 jdolecek * FIXME - this works only on native binaries and 907 1.2.2.2 jdolecek * will probably screw up any and all emulation. 908 1.2.2.2 jdolecek */ 909 1.2.2.2 jdolecek switch (code) { 910 1.2.2.2 jdolecek /* 911 1.2.2.2 jdolecek * BEGIN automatically generated 912 1.2.2.2 jdolecek * by /home/fredette/project/hppa/makescargfix.pl 913 1.2.2.2 jdolecek * do not edit! 914 1.2.2.2 jdolecek */ 915 1.2.2.2 jdolecek case SYS_pread: 916 1.2.2.2 jdolecek /* 917 1.2.2.2 jdolecek * syscallarg(int) fd; 918 1.2.2.2 jdolecek * syscallarg(void *) buf; 919 1.2.2.2 jdolecek * syscallarg(size_t) nbyte; 920 1.2.2.2 jdolecek * syscallarg(int) pad; 921 1.2.2.2 jdolecek * syscallarg(off_t) offset; 922 1.2.2.2 jdolecek */ 923 1.2.2.2 jdolecek tmp = args[4]; 924 1.2.2.2 jdolecek args[4] = args[4 + 1]; 925 1.2.2.2 jdolecek args[4 + 1] = tmp; 926 1.2.2.2 jdolecek break; 927 1.2.2.2 jdolecek case SYS_pwrite: 928 1.2.2.2 jdolecek /* 929 1.2.2.2 jdolecek * syscallarg(int) fd; 930 1.2.2.2 jdolecek * syscallarg(const void *) buf; 931 1.2.2.2 jdolecek * syscallarg(size_t) nbyte; 932 1.2.2.2 jdolecek * syscallarg(int) pad; 933 1.2.2.2 jdolecek * syscallarg(off_t) offset; 934 1.2.2.2 jdolecek */ 935 1.2.2.2 jdolecek tmp = args[4]; 936 1.2.2.2 jdolecek args[4] = args[4 + 1]; 937 1.2.2.2 jdolecek args[4 + 1] = tmp; 938 1.2.2.2 jdolecek break; 939 1.2.2.2 jdolecek case SYS_mmap: 940 1.2.2.2 jdolecek /* 941 1.2.2.2 jdolecek * syscallarg(void *) addr; 942 1.2.2.2 jdolecek * syscallarg(size_t) len; 943 1.2.2.2 jdolecek * syscallarg(int) prot; 944 1.2.2.2 jdolecek * syscallarg(int) flags; 945 1.2.2.2 jdolecek * syscallarg(int) fd; 946 1.2.2.2 jdolecek * syscallarg(long) pad; 947 1.2.2.2 jdolecek * syscallarg(off_t) pos; 948 1.2.2.2 jdolecek */ 949 1.2.2.2 jdolecek tmp = args[6]; 950 1.2.2.2 jdolecek args[6] = args[6 + 1]; 951 1.2.2.2 jdolecek args[6 + 1] = tmp; 952 1.2.2.2 jdolecek break; 953 1.2.2.2 jdolecek case SYS_lseek: 954 1.2.2.2 jdolecek /* 955 1.2.2.2 jdolecek * syscallarg(int) fd; 956 1.2.2.2 jdolecek * syscallarg(int) pad; 957 1.2.2.2 jdolecek * syscallarg(off_t) offset; 958 1.2.2.2 jdolecek */ 959 1.2.2.2 jdolecek tmp = args[2]; 960 1.2.2.2 jdolecek args[2] = args[2 + 1]; 961 1.2.2.2 jdolecek args[2 + 1] = tmp; 962 1.2.2.2 jdolecek break; 963 1.2.2.2 jdolecek case SYS_truncate: 964 1.2.2.2 jdolecek /* 965 1.2.2.2 jdolecek * syscallarg(const char *) path; 966 1.2.2.2 jdolecek * syscallarg(int) pad; 967 1.2.2.2 jdolecek * syscallarg(off_t) length; 968 1.2.2.2 jdolecek */ 969 1.2.2.2 jdolecek tmp = args[2]; 970 1.2.2.2 jdolecek args[2] = args[2 + 1]; 971 1.2.2.2 jdolecek args[2 + 1] = tmp; 972 1.2.2.2 jdolecek break; 973 1.2.2.2 jdolecek case SYS_ftruncate: 974 1.2.2.2 jdolecek /* 975 1.2.2.2 jdolecek * syscallarg(int) fd; 976 1.2.2.2 jdolecek * syscallarg(int) pad; 977 1.2.2.2 jdolecek * syscallarg(off_t) length; 978 1.2.2.2 jdolecek */ 979 1.2.2.2 jdolecek tmp = args[2]; 980 1.2.2.2 jdolecek args[2] = args[2 + 1]; 981 1.2.2.2 jdolecek args[2 + 1] = tmp; 982 1.2.2.2 jdolecek break; 983 1.2.2.2 jdolecek case SYS_preadv: 984 1.2.2.2 jdolecek /* 985 1.2.2.2 jdolecek * syscallarg(int) fd; 986 1.2.2.2 jdolecek * syscallarg(const struct iovec *) iovp; 987 1.2.2.2 jdolecek * syscallarg(int) iovcnt; 988 1.2.2.2 jdolecek * syscallarg(int) pad; 989 1.2.2.2 jdolecek * syscallarg(off_t) offset; 990 1.2.2.2 jdolecek */ 991 1.2.2.2 jdolecek tmp = args[4]; 992 1.2.2.2 jdolecek args[4] = args[4 + 1]; 993 1.2.2.2 jdolecek args[4 + 1] = tmp; 994 1.2.2.2 jdolecek break; 995 1.2.2.2 jdolecek case SYS_pwritev: 996 1.2.2.2 jdolecek /* 997 1.2.2.2 jdolecek * syscallarg(int) fd; 998 1.2.2.2 jdolecek * syscallarg(const struct iovec *) iovp; 999 1.2.2.2 jdolecek * syscallarg(int) iovcnt; 1000 1.2.2.2 jdolecek * syscallarg(int) pad; 1001 1.2.2.2 jdolecek * syscallarg(off_t) offset; 1002 1.2.2.2 jdolecek */ 1003 1.2.2.2 jdolecek tmp = args[4]; 1004 1.2.2.2 jdolecek args[4] = args[4 + 1]; 1005 1.2.2.2 jdolecek args[4 + 1] = tmp; 1006 1.2.2.2 jdolecek break; 1007 1.2.2.2 jdolecek default: 1008 1.2.2.2 jdolecek break; 1009 1.2.2.2 jdolecek /* 1010 1.2.2.2 jdolecek * END automatically generated 1011 1.2.2.2 jdolecek * by /home/fredette/project/hppa/makescargfix.pl 1012 1.2.2.2 jdolecek * do not edit! 1013 1.2.2.2 jdolecek */ 1014 1.2.2.2 jdolecek } 1015 1.2.2.2 jdolecek 1016 1.2.2.2 jdolecek #ifdef USERTRACE 1017 1.2.2.2 jdolecek if (0) { 1018 1.2.2.2 jdolecek user_backtrace(frame, p); 1019 1.2.2.2 jdolecek frame->tf_ipsw |= PSW_R; 1020 1.2.2.2 jdolecek frame->tf_rctr = 0; 1021 1.2.2.2 jdolecek printf("r %08x", frame->tf_iioq_head); 1022 1.2.2.2 jdolecek rctr_next_iioq = frame->tf_iioq_head + 4; 1023 1.2.2.2 jdolecek } 1024 1.2.2.2 jdolecek #endif 1025 1.2.2.2 jdolecek 1026 1.2.2.2 jdolecek if (code < 0 || code >= nsys) 1027 1.2.2.2 jdolecek callp += p->p_emul->e_nosys; /* bad syscall # */ 1028 1.2.2.2 jdolecek else 1029 1.2.2.2 jdolecek callp += code; 1030 1.2.2.2 jdolecek argsize = callp->sy_argsize; 1031 1.2.2.2 jdolecek 1032 1.2.2.2 jdolecek #ifdef SYSCALL_DEBUG 1033 1.2.2.2 jdolecek scdebug_call(p, code, args); 1034 1.2.2.2 jdolecek #endif 1035 1.2.2.2 jdolecek #ifdef KTRACE 1036 1.2.2.2 jdolecek if (KTRPOINT(p, KTR_SYSCALL)) 1037 1.2.2.2 jdolecek ktrsyscall(p, code, argsize, args); 1038 1.2.2.2 jdolecek #endif 1039 1.2.2.2 jdolecek 1040 1.2.2.2 jdolecek rval[0] = 0; 1041 1.2.2.2 jdolecek rval[1] = 0; 1042 1.2.2.2 jdolecek switch (error = (*callp->sy_call)(p, args, rval)) { 1043 1.2.2.2 jdolecek case 0: 1044 1.2.2.2 jdolecek p = curproc; /* changes on exec() */ 1045 1.2.2.2 jdolecek frame = p->p_md.md_regs; 1046 1.2.2.2 jdolecek frame->tf_ret0 = rval[0]; 1047 1.2.2.2 jdolecek frame->tf_ret1 = rval[1]; 1048 1.2.2.2 jdolecek frame->tf_t1 = 0; 1049 1.2.2.2 jdolecek break; 1050 1.2.2.2 jdolecek case ERESTART: 1051 1.2.2.2 jdolecek /* 1052 1.2.2.2 jdolecek * Now we have to wind back the instruction 1053 1.2.2.2 jdolecek * offset queue to the point where the system 1054 1.2.2.2 jdolecek * call will be made again. This is inherently 1055 1.2.2.2 jdolecek * tied to the SYSCALL macro. 1056 1.2.2.2 jdolecek * 1057 1.2.2.2 jdolecek * Currently, the part of the SYSCALL macro 1058 1.2.2.2 jdolecek * that we want to rerun reads as: 1059 1.2.2.2 jdolecek * 1060 1.2.2.2 jdolecek * ldil L%SYSCALLGATE, r1 1061 1.2.2.2 jdolecek * ble 4(sr7, r1) 1062 1.2.2.2 jdolecek * ldi __CONCAT(SYS_,x), t1 1063 1.2.2.2 jdolecek * ldw HPPA_FRAME_ERP(sr0,sp), rp 1064 1.2.2.2 jdolecek * 1065 1.2.2.2 jdolecek * And our offset queue head points to the 1066 1.2.2.2 jdolecek * final ldw instruction. So we need to 1067 1.2.2.2 jdolecek * subtract twelve to reach the ldil. 1068 1.2.2.2 jdolecek */ 1069 1.2.2.2 jdolecek frame->tf_iioq_head -= 12; 1070 1.2.2.2 jdolecek frame->tf_iioq_tail = frame->tf_iioq_head + 4; 1071 1.2.2.2 jdolecek break; 1072 1.2.2.2 jdolecek case EJUSTRETURN: 1073 1.2.2.2 jdolecek p = curproc; 1074 1.2.2.2 jdolecek break; 1075 1.2.2.2 jdolecek default: 1076 1.2.2.2 jdolecek if (p->p_emul->e_errno) 1077 1.2.2.2 jdolecek error = p->p_emul->e_errno[error]; 1078 1.2.2.2 jdolecek frame->tf_t1 = error; 1079 1.2.2.2 jdolecek break; 1080 1.2.2.2 jdolecek } 1081 1.2.2.2 jdolecek #ifdef SYSCALL_DEBUG 1082 1.2.2.2 jdolecek scdebug_ret(p, code, error, rval); 1083 1.2.2.2 jdolecek #endif 1084 1.2.2.2 jdolecek userret(p, frame->tf_iioq_head, 0); 1085 1.2.2.2 jdolecek #ifdef KTRACE 1086 1.2.2.2 jdolecek if (KTRPOINT(p, KTR_SYSRET)) 1087 1.2.2.2 jdolecek ktrsysret(p, code, error, rval[0]); 1088 1.2.2.2 jdolecek #endif 1089 1.2.2.2 jdolecek #ifdef DEBUG 1090 1.2.2.2 jdolecek frame_sanity_check(frame, p); 1091 1.2.2.2 jdolecek #endif /* DEBUG */ 1092 1.2.2.2 jdolecek } 1093
Indexes created Wed Oct 29 09:09:48 GMT 2025