1 /*-
2 * Copyright (C) 1995, 1996 Wolfgang Solfrank.
3 * Copyright (C) 1995, 1996 TooLs GmbH.
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by TooLs GmbH.
17 * 4. The name of TooLs GmbH may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
25 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
26 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
27 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
28 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
29 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 *
31 * $NetBSD: trap.c,v 1.58 2002/03/04 04:07:35 dbj Exp $
32 */
33
34 #include <sys/cdefs.h>
35 __FBSDID("$FreeBSD$");
36
37 #include <sys/param.h>
38 #include <sys/kdb.h>
39 #include <sys/proc.h>
40 #include <sys/ktr.h>
41 #include <sys/lock.h>
42 #include <sys/mutex.h>
43 #include <sys/ptrace.h>
44 #include <sys/reboot.h>
45 #include <sys/syscall.h>
46 #include <sys/sysent.h>
47 #include <sys/systm.h>
48 #include <sys/kernel.h>
49 #include <sys/uio.h>
50 #include <sys/signalvar.h>
51 #include <sys/vmmeter.h>
52
53 #include <security/audit/audit.h>
54
55 #include <vm/vm.h>
56 #include <vm/pmap.h>
57 #include <vm/vm_extern.h>
58 #include <vm/vm_param.h>
59 #include <vm/vm_kern.h>
60 #include <vm/vm_map.h>
61 #include <vm/vm_page.h>
62
63 #include <machine/_inttypes.h>
64 #include <machine/altivec.h>
65 #include <machine/cpu.h>
66 #include <machine/db_machdep.h>
67 #include <machine/fpu.h>
68 #include <machine/frame.h>
69 #include <machine/pcb.h>
70 #include <machine/psl.h>
71 #include <machine/slb.h>
72 #include <machine/spr.h>
73 #include <machine/sr.h>
74 #include <machine/trap.h>
75
76 /* Below matches setjmp.S */
77 #define FAULTBUF_LR 21
78 #define FAULTBUF_R1 1
79 #define FAULTBUF_R2 2
80 #define FAULTBUF_CR 22
81 #define FAULTBUF_R14 3
82
83 #define MOREARGS(sp) ((caddr_t)((uintptr_t)(sp) + \
84 sizeof(struct callframe) - 3*sizeof(register_t))) /* more args go here */
85
86 static void trap_fatal(struct trapframe *frame);
87 static void printtrap(u_int vector, struct trapframe *frame, int isfatal,
88 int user);
89 static bool trap_pfault(struct trapframe *frame, bool user, int *signo,
90 int *ucode);
91 static int fix_unaligned(struct thread *td, struct trapframe *frame);
92 static int handle_onfault(struct trapframe *frame);
93 static void syscall(struct trapframe *frame);
94
95 #if defined(__powerpc64__) && defined(AIM)
96 static void normalize_inputs(void);
97 #endif
98
99 extern vm_offset_t __startkernel;
100
101 extern int copy_fault(void);
102 extern int fusufault(void);
103
104 #ifdef KDB
105 int db_trap_glue(struct trapframe *); /* Called from trap_subr.S */
106 #endif
107
108 struct powerpc_exception {
109 u_int vector;
110 char *name;
111 };
112
113 #ifdef KDTRACE_HOOKS
114 #include <sys/dtrace_bsd.h>
115
116 int (*dtrace_invop_jump_addr)(struct trapframe *);
117 #endif
118
119 static struct powerpc_exception powerpc_exceptions[] = {
120 { EXC_CRIT, "critical input" },
121 { EXC_RST, "system reset" },
122 { EXC_MCHK, "machine check" },
123 { EXC_DSI, "data storage interrupt" },
124 { EXC_DSE, "data segment exception" },
125 { EXC_ISI, "instruction storage interrupt" },
126 { EXC_ISE, "instruction segment exception" },
127 { EXC_EXI, "external interrupt" },
128 { EXC_ALI, "alignment" },
129 { EXC_PGM, "program" },
130 { EXC_HEA, "hypervisor emulation assistance" },
131 { EXC_FPU, "floating-point unavailable" },
132 { EXC_APU, "auxiliary proc unavailable" },
133 { EXC_DECR, "decrementer" },
134 { EXC_FIT, "fixed-interval timer" },
135 { EXC_WDOG, "watchdog timer" },
136 { EXC_SC, "system call" },
137 { EXC_TRC, "trace" },
138 { EXC_FPA, "floating-point assist" },
139 { EXC_DEBUG, "debug" },
140 { EXC_PERF, "performance monitoring" },
141 { EXC_VEC, "altivec unavailable" },
142 { EXC_VSX, "vsx unavailable" },
143 { EXC_FAC, "facility unavailable" },
144 { EXC_ITMISS, "instruction tlb miss" },
145 { EXC_DLMISS, "data load tlb miss" },
146 { EXC_DSMISS, "data store tlb miss" },
147 { EXC_BPT, "instruction breakpoint" },
148 { EXC_SMI, "system management" },
149 { EXC_VECAST_G4, "altivec assist" },
150 { EXC_THRM, "thermal management" },
151 { EXC_RUNMODETRC, "run mode/trace" },
152 { EXC_SOFT_PATCH, "soft patch exception" },
153 { EXC_LAST, NULL }
154 };
155
156 static int uprintf_signal;
157 SYSCTL_INT(_machdep, OID_AUTO, uprintf_signal, CTLFLAG_RWTUN,
158 &uprintf_signal, 0,
159 "Print debugging information on trap signal to ctty");
160
161 #define ESR_BITMASK \
162 "\2" \
163 "\040b0\037b1\036b2\035b3\034PIL\033PRR\032PTR\031FP" \
164 "\030ST\027b9\026DLK\025ILK\024b12\023b13\022BO\021PIE" \
165 "\020b16\017b17\016b18\015b19\014b20\013b21\012b22\011b23" \
166 "\010SPE\007EPID\006b26\005b27\004b28\003b29\002b30\001b31"
167 #define MCSR_BITMASK \
168 "\2" \
169 "\040MCP\037ICERR\036DCERR\035TLBPERR\034L2MMU_MHIT\033b5\032b6\031b7" \
170 "\030b8\027b9\026b10\025NMI\024MAV\023MEA\022b14\021IF" \
171 "\020LD\017ST\016LDG\015b19\014b20\013b21\012b22\011b23" \
172 "\010b24\007b25\006b26\005b27\004b28\003b29\002TLBSYNC\001BSL2_ERR"
173 #define MSSSR_BITMASK \
174 "\2" \
175 "\040b0\037b1\036b2\035b3\034b4\033b5\032b6\031b7" \
176 "\030b8\027b9\026b10\025b11\024b12\023L2TAG\022L2DAT\021L3TAG" \
177 "\020L3DAT\017APE\016DPE\015TEA\014b20\013b21\012b22\011b23" \
178 "\010b24\007b25\006b26\005b27\004b28\003b29\002b30\001b31"
179
180 static const char *
181 trapname(u_int vector)
182 {
183 struct powerpc_exception *pe;
184
185 for (pe = powerpc_exceptions; pe->vector != EXC_LAST; pe++) {
186 if (pe->vector == vector)
187 return (pe->name);
188 }
189
190 return ("unknown");
191 }
192
193 static inline bool
194 frame_is_trap_inst(struct trapframe *frame)
195 {
196 #ifdef AIM
197 return (frame->exc == EXC_PGM && frame->srr1 & EXC_PGM_TRAP);
198 #else
199 return ((frame->cpu.booke.esr & ESR_PTR) != 0);
200 #endif
201 }
202
203 void
204 trap(struct trapframe *frame)
205 {
206 struct thread *td;
207 struct proc *p;
208 #ifdef KDTRACE_HOOKS
209 uint32_t inst;
210 #endif
211 int sig, type, user;
212 u_int ucode;
213 ksiginfo_t ksi;
214 register_t addr, fscr;
215
216 VM_CNT_INC(v_trap);
217
218 #ifdef KDB
219 if (kdb_active) {
220 kdb_reenter();
221 return;
222 }
223 #endif
224
225 td = curthread;
226 p = td->td_proc;
227
228 type = ucode = frame->exc;
229 sig = 0;
230 user = frame->srr1 & PSL_PR;
231 addr = 0;
232
233 CTR3(KTR_TRAP, "trap: %s type=%s (%s)", td->td_name,
234 trapname(type), user ? "user" : "kernel");
235
236 #ifdef KDTRACE_HOOKS
237 /*
238 * A trap can occur while DTrace executes a probe. Before
239 * executing the probe, DTrace blocks re-scheduling and sets
240 * a flag in its per-cpu flags to indicate that it doesn't
241 * want to fault. On returning from the probe, the no-fault
242 * flag is cleared and finally re-scheduling is enabled.
243 *
244 * If the DTrace kernel module has registered a trap handler,
245 * call it and if it returns non-zero, assume that it has
246 * handled the trap and modified the trap frame so that this
247 * function can return normally.
248 */
249 if (dtrace_trap_func != NULL && (*dtrace_trap_func)(frame, type) != 0)
250 return;
251 #endif
252
253 if (user) {
254 td->td_pticks = 0;
255 td->td_frame = frame;
256 addr = frame->srr0;
257 if (td->td_cowgen != p->p_cowgen)
258 thread_cow_update(td);
259
260 /* User Mode Traps */
261 switch (type) {
262 case EXC_RUNMODETRC:
263 case EXC_TRC:
264 frame->srr1 &= ~PSL_SE;
265 sig = SIGTRAP;
266 ucode = TRAP_TRACE;
267 break;
268
269 #if defined(__powerpc64__) && defined(AIM)
270 case EXC_DSE:
271 addr = frame->dar;
272 /* FALLTHROUGH */
273 case EXC_ISE:
274 /* DSE/ISE are automatically fatal with radix pmap. */
275 if (radix_mmu ||
276 handle_user_slb_spill(&p->p_vmspace->vm_pmap,
277 addr) != 0){
278 sig = SIGSEGV;
279 ucode = SEGV_MAPERR;
280 }
281 break;
282 #endif
283 case EXC_DSI:
284 addr = frame->dar;
285 /* FALLTHROUGH */
286 case EXC_ISI:
287 if (trap_pfault(frame, true, &sig, &ucode))
288 sig = 0;
289 break;
290
291 case EXC_SC:
292 syscall(frame);
293 break;
294
295 case EXC_FPU:
296 KASSERT((td->td_pcb->pcb_flags & PCB_FPU) != PCB_FPU,
297 ("FPU already enabled for thread"));
298 enable_fpu(td);
299 break;
300
301 case EXC_VEC:
302 KASSERT((td->td_pcb->pcb_flags & PCB_VEC) != PCB_VEC,
303 ("Altivec already enabled for thread"));
304 enable_vec(td);
305 break;
306
307 case EXC_VSX:
308 KASSERT((td->td_pcb->pcb_flags & PCB_VSX) != PCB_VSX,
309 ("VSX already enabled for thread"));
310 if (!(td->td_pcb->pcb_flags & PCB_VEC))
311 enable_vec(td);
312 if (td->td_pcb->pcb_flags & PCB_FPU)
313 save_fpu(td);
314 td->td_pcb->pcb_flags |= PCB_VSX;
315 enable_fpu(td);
316 break;
317
318 case EXC_FAC:
319 fscr = mfspr(SPR_FSCR);
320 switch (fscr & FSCR_IC_MASK) {
321 case FSCR_IC_HTM:
322 CTR0(KTR_TRAP,
323 "Hardware Transactional Memory subsystem disabled");
324 sig = SIGILL;
325 ucode = ILL_ILLOPC;
326 break;
327 case FSCR_IC_DSCR:
328 td->td_pcb->pcb_flags |= PCB_CFSCR | PCB_CDSCR;
329 fscr |= FSCR_DSCR;
330 mtspr(SPR_DSCR, 0);
331 break;
332 case FSCR_IC_EBB:
333 td->td_pcb->pcb_flags |= PCB_CFSCR;
334 fscr |= FSCR_EBB;
335 mtspr(SPR_EBBHR, 0);
336 mtspr(SPR_EBBRR, 0);
337 mtspr(SPR_BESCR, 0);
338 break;
339 case FSCR_IC_TAR:
340 td->td_pcb->pcb_flags |= PCB_CFSCR;
341 fscr |= FSCR_TAR;
342 mtspr(SPR_TAR, 0);
343 break;
344 case FSCR_IC_LM:
345 td->td_pcb->pcb_flags |= PCB_CFSCR;
346 fscr |= FSCR_LM;
347 mtspr(SPR_LMRR, 0);
348 mtspr(SPR_LMSER, 0);
349 break;
350 default:
351 sig = SIGILL;
352 ucode = ILL_ILLOPC;
353 }
354 mtspr(SPR_FSCR, fscr & ~FSCR_IC_MASK);
355 break;
356 case EXC_HEA:
357 sig = SIGILL;
358 ucode = ILL_ILLOPC;
359 break;
360
361 case EXC_VECAST_E:
362 case EXC_VECAST_G4:
363 case EXC_VECAST_G5:
364 /*
365 * We get a VPU assist exception for IEEE mode
366 * vector operations on denormalized floats.
367 * Emulating this is a giant pain, so for now,
368 * just switch off IEEE mode and treat them as
369 * zero.
370 */
371
372 save_vec(td);
373 td->td_pcb->pcb_vec.vscr |= ALTIVEC_VSCR_NJ;
374 enable_vec(td);
375 break;
376
377 case EXC_ALI:
378 if (fix_unaligned(td, frame) != 0) {
379 sig = SIGBUS;
380 ucode = BUS_ADRALN;
381 addr = frame->dar;
382 }
383 else
384 frame->srr0 += 4;
385 break;
386
387 case EXC_DEBUG: /* Single stepping */
388 mtspr(SPR_DBSR, mfspr(SPR_DBSR));
389 frame->srr1 &= ~PSL_DE;
390 frame->cpu.booke.dbcr0 &= ~(DBCR0_IDM | DBCR0_IC);
391 sig = SIGTRAP;
392 ucode = TRAP_TRACE;
393 break;
394
395 case EXC_PGM:
396 /* Identify the trap reason */
397 if (frame_is_trap_inst(frame)) {
398 #ifdef KDTRACE_HOOKS
399 inst = fuword32((const void *)frame->srr0);
400 if (inst == 0x0FFFDDDD &&
401 dtrace_pid_probe_ptr != NULL) {
402 (*dtrace_pid_probe_ptr)(frame);
403 break;
404 }
405 #endif
406 sig = SIGTRAP;
407 ucode = TRAP_BRKPT;
408 break;
409 }
410
411 if ((frame->srr1 & EXC_PGM_FPENABLED) &&
412 (td->td_pcb->pcb_flags & PCB_FPU))
413 sig = SIGFPE;
414 else
415 sig = ppc_instr_emulate(frame, td);
416
417 if (sig == SIGILL) {
418 if (frame->srr1 & EXC_PGM_PRIV)
419 ucode = ILL_PRVOPC;
420 else if (frame->srr1 & EXC_PGM_ILLEGAL)
421 ucode = ILL_ILLOPC;
422 } else if (sig == SIGFPE) {
423 ucode = get_fpu_exception(td);
424 }
425
426 break;
427
428 case EXC_MCHK:
429 sig = cpu_machine_check(td, frame, &ucode);
430 printtrap(frame->exc, frame, 0, (frame->srr1 & PSL_PR));
431 break;
432
433 #if defined(__powerpc64__) && defined(AIM)
434 case EXC_SOFT_PATCH:
435 /*
436 * Point to the instruction that generated the exception to execute it again,
437 * and normalize the register values.
438 */
439 frame->srr0 -= 4;
440 normalize_inputs();
441 break;
442 #endif
443
444 default:
445 trap_fatal(frame);
446 }
447 } else {
448 /* Kernel Mode Traps */
449
450 KASSERT(cold || td->td_ucred != NULL,
451 ("kernel trap doesn't have ucred"));
452 switch (type) {
453 case EXC_PGM:
454 #ifdef KDTRACE_HOOKS
455 if (frame_is_trap_inst(frame)) {
456 if (*(uint32_t *)frame->srr0 == EXC_DTRACE) {
457 if (dtrace_invop_jump_addr != NULL) {
458 dtrace_invop_jump_addr(frame);
459 return;
460 }
461 }
462 }
463 #endif
464 #ifdef KDB
465 if (db_trap_glue(frame))
466 return;
467 #endif
468 break;
469 #if defined(__powerpc64__) && defined(AIM)
470 case EXC_DSE:
471 /* DSE on radix mmu is automatically fatal. */
472 if (radix_mmu)
473 break;
474 if (td->td_pcb->pcb_cpu.aim.usr_vsid != 0 &&
475 (frame->dar & SEGMENT_MASK) == USER_ADDR) {
476 __asm __volatile ("slbmte %0, %1" ::
477 "r"(td->td_pcb->pcb_cpu.aim.usr_vsid),
478 "r"(USER_SLB_SLBE));
479 return;
480 }
481 break;
482 #endif
483 case EXC_DSI:
484 if (trap_pfault(frame, false, NULL, NULL))
485 return;
486 break;
487 case EXC_MCHK:
488 if (handle_onfault(frame))
489 return;
490 break;
491 default:
492 break;
493 }
494 trap_fatal(frame);
495 }
496
497 if (sig != 0) {
498 if (p->p_sysent->sv_transtrap != NULL)
499 sig = (p->p_sysent->sv_transtrap)(sig, type);
500 ksiginfo_init_trap(&ksi);
501 ksi.ksi_signo = sig;
502 ksi.ksi_code = (int) ucode; /* XXX, not POSIX */
503 ksi.ksi_addr = (void *)addr;
504 ksi.ksi_trapno = type;
505 if (uprintf_signal) {
506 uprintf("pid %d comm %s: signal %d code %d type 0x%x "
507 "addr 0x%lx r1 0x%lx srr0 0x%lx srr1 0x%lx\n",
508 p->p_pid, p->p_comm, sig, ucode, type,
509 (u_long)addr, (u_long)frame->fixreg[1],
510 (u_long)frame->srr0, (u_long)frame->srr1);
511 }
512
513 trapsignal(td, &ksi);
514 }
515
516 userret(td, frame);
517 }
518
519 static void
520 trap_fatal(struct trapframe *frame)
521 {
522 #ifdef KDB
523 bool handled;
524 #endif
525
526 printtrap(frame->exc, frame, 1, (frame->srr1 & PSL_PR));
527 #ifdef KDB
528 if (debugger_on_trap) {
529 kdb_why = KDB_WHY_TRAP;
530 handled = kdb_trap(frame->exc, 0, frame);
531 kdb_why = KDB_WHY_UNSET;
532 if (handled)
533 return;
534 }
535 #endif
536 panic("%s trap", trapname(frame->exc));
537 }
538
539 static void
540 cpu_printtrap(u_int vector, struct trapframe *frame, int isfatal, int user)
541 {
542 #ifdef AIM
543 uint16_t ver;
544
545 switch (vector) {
546 case EXC_MCHK:
547 ver = mfpvr() >> 16;
548 if (MPC745X_P(ver))
549 printf(" msssr0 = 0x%b\n",
550 (int)mfspr(SPR_MSSSR0), MSSSR_BITMASK);
551 case EXC_DSE:
552 case EXC_DSI:
553 case EXC_DTMISS:
554 printf(" dsisr = 0x%lx\n",
555 (u_long)frame->cpu.aim.dsisr);
556 break;
557 }
558 #elif defined(BOOKE)
559 vm_paddr_t pa;
560
561 switch (vector) {
562 case EXC_MCHK:
563 pa = mfspr(SPR_MCARU);
564 pa = (pa << 32) | (u_register_t)mfspr(SPR_MCAR);
565 printf(" mcsr = 0x%b\n",
566 (int)mfspr(SPR_MCSR), MCSR_BITMASK);
567 printf(" mcar = 0x%jx\n", (uintmax_t)pa);
568 }
569 printf(" esr = 0x%b\n",
570 (int)frame->cpu.booke.esr, ESR_BITMASK);
571 #endif
572 }
573
574 static void
575 printtrap(u_int vector, struct trapframe *frame, int isfatal, int user)
576 {
577
578 printf("\n");
579 printf("%s %s trap:\n", isfatal ? "fatal" : "handled",
580 user ? "user" : "kernel");
581 printf("\n");
582 printf(" exception = 0x%x (%s)\n", vector, trapname(vector));
583 switch (vector) {
584 case EXC_DSE:
585 case EXC_DSI:
586 case EXC_DTMISS:
587 case EXC_ALI:
588 case EXC_MCHK:
589 printf(" virtual address = 0x%" PRIxPTR "\n", frame->dar);
590 break;
591 case EXC_ISE:
592 case EXC_ISI:
593 case EXC_ITMISS:
594 printf(" virtual address = 0x%" PRIxPTR "\n", frame->srr0);
595 break;
596 }
597 cpu_printtrap(vector, frame, isfatal, user);
598 printf(" srr0 = 0x%" PRIxPTR " (0x%" PRIxPTR ")\n",
599 frame->srr0, frame->srr0 - (register_t)(__startkernel - KERNBASE));
600 printf(" srr1 = 0x%lx\n", (u_long)frame->srr1);
601 printf(" current msr = 0x%" PRIxPTR "\n", mfmsr());
602 printf(" lr = 0x%" PRIxPTR " (0x%" PRIxPTR ")\n",
603 frame->lr, frame->lr - (register_t)(__startkernel - KERNBASE));
604 printf(" frame = %p\n", frame);
605 printf(" curthread = %p\n", curthread);
606 if (curthread != NULL)
607 printf(" pid = %d, comm = %s\n",
608 curthread->td_proc->p_pid, curthread->td_name);
609 printf("\n");
610 }
611
612 /*
613 * Handles a fatal fault when we have onfault state to recover. Returns
614 * non-zero if there was onfault recovery state available.
615 */
616 static int
617 handle_onfault(struct trapframe *frame)
618 {
619 struct thread *td;
620 jmp_buf *fb;
621
622 td = curthread;
623 #if defined(__powerpc64__) || defined(BOOKE)
624 uintptr_t dispatch = (uintptr_t)td->td_pcb->pcb_onfault;
625
626 if (dispatch == 0)
627 return (0);
628 /* Short-circuit radix and Book-E paths. */
629 switch (dispatch) {
630 case COPYFAULT:
631 frame->srr0 = (uintptr_t)copy_fault;
632 return (1);
633 case FUSUFAULT:
634 frame->srr0 = (uintptr_t)fusufault;
635 return (1);
636 default:
637 break;
638 }
639 #endif
640 fb = td->td_pcb->pcb_onfault;
641 if (fb != NULL) {
642 frame->srr0 = (*fb)->_jb[FAULTBUF_LR];
643 frame->fixreg[1] = (*fb)->_jb[FAULTBUF_R1];
644 frame->fixreg[2] = (*fb)->_jb[FAULTBUF_R2];
645 frame->fixreg[3] = 1;
646 frame->cr = (*fb)->_jb[FAULTBUF_CR];
647 bcopy(&(*fb)->_jb[FAULTBUF_R14], &frame->fixreg[14],
648 18 * sizeof(register_t));
649 td->td_pcb->pcb_onfault = NULL; /* Returns twice, not thrice */
650 return (1);
651 }
652 return (0);
653 }
654
655 int
656 cpu_fetch_syscall_args(struct thread *td)
657 {
658 struct proc *p;
659 struct trapframe *frame;
660 struct syscall_args *sa;
661 caddr_t params;
662 size_t argsz;
663 int error, n, narg, i;
664
665 p = td->td_proc;
666 frame = td->td_frame;
667 sa = &td->td_sa;
668
669 sa->code = frame->fixreg[0];
670 params = (caddr_t)(frame->fixreg + FIRSTARG);
671 n = NARGREG;
672
673 if (sa->code == SYS_syscall) {
674 /*
675 * code is first argument,
676 * followed by actual args.
677 */
678 sa->code = *(register_t *) params;
679 params += sizeof(register_t);
680 n -= 1;
681 } else if (sa->code == SYS___syscall) {
682 /*
683 * Like syscall, but code is a quad,
684 * so as to maintain quad alignment
685 * for the rest of the args.
686 */
687 if (SV_PROC_FLAG(p, SV_ILP32)) {
688 params += sizeof(register_t);
689 sa->code = *(register_t *) params;
690 params += sizeof(register_t);
691 n -= 2;
692 } else {
693 sa->code = *(register_t *) params;
694 params += sizeof(register_t);
695 n -= 1;
696 }
697 }
698
699 if (sa->code >= p->p_sysent->sv_size)
700 sa->callp = &p->p_sysent->sv_table[0];
701 else
702 sa->callp = &p->p_sysent->sv_table[sa->code];
703
704 narg = sa->callp->sy_narg;
705
706 if (SV_PROC_FLAG(p, SV_ILP32)) {
707 argsz = sizeof(uint32_t);
708
709 for (i = 0; i < n; i++)
710 sa->args[i] = ((u_register_t *)(params))[i] &
711 0xffffffff;
712 } else {
713 argsz = sizeof(uint64_t);
714
715 for (i = 0; i < n; i++)
716 sa->args[i] = ((u_register_t *)(params))[i];
717 }
718
719 if (narg > n)
720 error = copyin(MOREARGS(frame->fixreg[1]), sa->args + n,
721 (narg - n) * argsz);
722 else
723 error = 0;
724
725 #ifdef __powerpc64__
726 if (SV_PROC_FLAG(p, SV_ILP32) && narg > n) {
727 /* Expand the size of arguments copied from the stack */
728
729 for (i = narg; i >= n; i--)
730 sa->args[i] = ((uint32_t *)(&sa->args[n]))[i-n];
731 }
732 #endif
733
734 if (error == 0) {
735 td->td_retval[0] = 0;
736 td->td_retval[1] = frame->fixreg[FIRSTARG + 1];
737 }
738 return (error);
739 }
740
741 #include "../../kern/subr_syscall.c"
742
743 void
744 syscall(struct trapframe *frame)
745 {
746 struct thread *td;
747
748 td = curthread;
749 td->td_frame = frame;
750
751 #if defined(__powerpc64__) && defined(AIM)
752 /*
753 * Speculatively restore last user SLB segment, which we know is
754 * invalid already, since we are likely to do copyin()/copyout().
755 */
756 if (td->td_pcb->pcb_cpu.aim.usr_vsid != 0)
757 __asm __volatile ("slbmte %0, %1; isync" ::
758 "r"(td->td_pcb->pcb_cpu.aim.usr_vsid), "r"(USER_SLB_SLBE));
759 #endif
760
761 syscallenter(td);
762 syscallret(td);
763 }
764
765 static bool
766 trap_pfault(struct trapframe *frame, bool user, int *signo, int *ucode)
767 {
768 vm_offset_t eva;
769 struct thread *td;
770 struct proc *p;
771 vm_map_t map;
772 vm_prot_t ftype;
773 int rv, is_user;
774
775 td = curthread;
776 p = td->td_proc;
777 if (frame->exc == EXC_ISI) {
778 eva = frame->srr0;
779 ftype = VM_PROT_EXECUTE;
780 if (frame->srr1 & SRR1_ISI_PFAULT)
781 ftype |= VM_PROT_READ;
782 } else {
783 eva = frame->dar;
784 #ifdef BOOKE
785 if (frame->cpu.booke.esr & ESR_ST)
786 #else
787 if (frame->cpu.aim.dsisr & DSISR_STORE)
788 #endif
789 ftype = VM_PROT_WRITE;
790 else
791 ftype = VM_PROT_READ;
792 }
793 #if defined(__powerpc64__) && defined(AIM)
794 if (radix_mmu && pmap_nofault(&p->p_vmspace->vm_pmap, eva, ftype) == 0)
795 return (true);
796 #endif
797
798 if (__predict_false((td->td_pflags & TDP_NOFAULTING) == 0)) {
799 /*
800 * If we get a page fault while in a critical section, then
801 * it is most likely a fatal kernel page fault. The kernel
802 * is already going to panic trying to get a sleep lock to
803 * do the VM lookup, so just consider it a fatal trap so the
804 * kernel can print out a useful trap message and even get
805 * to the debugger.
806 *
807 * If we get a page fault while holding a non-sleepable
808 * lock, then it is most likely a fatal kernel page fault.
809 * If WITNESS is enabled, then it's going to whine about
810 * bogus LORs with various VM locks, so just skip to the
811 * fatal trap handling directly.
812 */
813 if (td->td_critnest != 0 ||
814 WITNESS_CHECK(WARN_SLEEPOK | WARN_GIANTOK, NULL,
815 "Kernel page fault") != 0) {
816 trap_fatal(frame);
817 return (false);
818 }
819 }
820 if (user) {
821 KASSERT(p->p_vmspace != NULL, ("trap_pfault: vmspace NULL"));
822 map = &p->p_vmspace->vm_map;
823 } else {
824 rv = pmap_decode_kernel_ptr(eva, &is_user, &eva);
825 if (rv != 0)
826 return (false);
827
828 if (is_user)
829 map = &p->p_vmspace->vm_map;
830 else
831 map = kernel_map;
832 }
833
834 /* Fault in the page. */
835 rv = vm_fault_trap(map, eva, ftype, VM_FAULT_NORMAL, signo, ucode);
836 /*
837 * XXXDTRACE: add dtrace_doubletrap_func here?
838 */
839
840 if (rv == KERN_SUCCESS)
841 return (true);
842
843 if (!user && handle_onfault(frame))
844 return (true);
845
846 return (false);
847 }
848
849 /*
850 * For now, this only deals with the particular unaligned access case
851 * that gcc tends to generate. Eventually it should handle all of the
852 * possibilities that can happen on a 32-bit PowerPC in big-endian mode.
853 */
854
855 static int
856 fix_unaligned(struct thread *td, struct trapframe *frame)
857 {
858 struct thread *fputhread;
859 #ifdef BOOKE
860 uint32_t inst;
861 #endif
862 int indicator, reg;
863 double *fpr;
864
865 #ifdef __SPE__
866 indicator = (frame->cpu.booke.esr & (ESR_ST|ESR_SPE));
867 if (indicator & ESR_SPE) {
868 if (copyin((void *)frame->srr0, &inst, sizeof(inst)) != 0)
869 return (-1);
870 reg = EXC_ALI_INST_RST(inst);
871 fpr = (double *)td->td_pcb->pcb_vec.vr[reg];
872 fputhread = PCPU_GET(vecthread);
873
874 /* Juggle the SPE to ensure that we've initialized
875 * the registers, and that their current state is in
876 * the PCB.
877 */
878 if (fputhread != td) {
879 if (fputhread)
880 save_vec(fputhread);
881 enable_vec(td);
882 }
883 save_vec(td);
884
885 if (!(indicator & ESR_ST)) {
886 if (copyin((void *)frame->dar, fpr,
887 sizeof(double)) != 0)
888 return (-1);
889 frame->fixreg[reg] = td->td_pcb->pcb_vec.vr[reg][1];
890 enable_vec(td);
891 } else {
892 td->td_pcb->pcb_vec.vr[reg][1] = frame->fixreg[reg];
893 if (copyout(fpr, (void *)frame->dar,
894 sizeof(double)) != 0)
895 return (-1);
896 }
897 return (0);
898 }
899 #else
900 #ifdef BOOKE
901 indicator = (frame->cpu.booke.esr & ESR_ST) ? EXC_ALI_STFD : EXC_ALI_LFD;
902 #else
903 indicator = EXC_ALI_OPCODE_INDICATOR(frame->cpu.aim.dsisr);
904 #endif
905
906 switch (indicator) {
907 case EXC_ALI_LFD:
908 case EXC_ALI_STFD:
909 #ifdef BOOKE
910 if (copyin((void *)frame->srr0, &inst, sizeof(inst)) != 0)
911 return (-1);
912 reg = EXC_ALI_INST_RST(inst);
913 #else
914 reg = EXC_ALI_RST(frame->cpu.aim.dsisr);
915 #endif
916 fpr = &td->td_pcb->pcb_fpu.fpr[reg].fpr;
917 fputhread = PCPU_GET(fputhread);
918
919 /* Juggle the FPU to ensure that we've initialized
920 * the FPRs, and that their current state is in
921 * the PCB.
922 */
923 if (fputhread != td) {
924 if (fputhread)
925 save_fpu(fputhread);
926 enable_fpu(td);
927 }
928 save_fpu(td);
929
930 if (indicator == EXC_ALI_LFD) {
931 if (copyin((void *)frame->dar, fpr,
932 sizeof(double)) != 0)
933 return (-1);
934 enable_fpu(td);
935 } else {
936 if (copyout(fpr, (void *)frame->dar,
937 sizeof(double)) != 0)
938 return (-1);
939 }
940 return (0);
941 break;
942 }
943 #endif
944
945 return (-1);
946 }
947
948 #if defined(__powerpc64__) && defined(AIM)
949 #define MSKNSHL(x, m, n) "(((" #x ") & " #m ") << " #n ")"
950 #define MSKNSHR(x, m, n) "(((" #x ") & " #m ") >> " #n ")"
951
952 /* xvcpsgndp instruction, built in opcode format.
953 * This can be changed to use mnemonic after a toolchain update.
954 */
955 #define XVCPSGNDP(xt, xa, xb) \
956 __asm __volatile(".long (" \
957 MSKNSHL(60, 0x3f, 26) " | " \
958 MSKNSHL(xt, 0x1f, 21) " | " \
959 MSKNSHL(xa, 0x1f, 16) " | " \
960 MSKNSHL(xb, 0x1f, 11) " | " \
961 MSKNSHL(240, 0xff, 3) " | " \
962 MSKNSHR(xa, 0x20, 3) " | " \
963 MSKNSHR(xa, 0x20, 4) " | " \
964 MSKNSHR(xa, 0x20, 5) ")")
965
966 /* Macros to normalize 1 or 10 VSX registers */
967 #define NORM(x) XVCPSGNDP(x, x, x)
968 #define NORM10(x) \
969 NORM(x ## 0); NORM(x ## 1); NORM(x ## 2); NORM(x ## 3); NORM(x ## 4); \
970 NORM(x ## 5); NORM(x ## 6); NORM(x ## 7); NORM(x ## 8); NORM(x ## 9)
971
972 static void
973 normalize_inputs(void)
974 {
975 register_t msr;
976
977 /* enable VSX */
978 msr = mfmsr();
979 mtmsr(msr | PSL_VSX);
980
981 NORM(0); NORM(1); NORM(2); NORM(3); NORM(4);
982 NORM(5); NORM(6); NORM(7); NORM(8); NORM(9);
983 NORM10(1); NORM10(2); NORM10(3); NORM10(4); NORM10(5);
984 NORM(60); NORM(61); NORM(62); NORM(63);
985
986 /* restore MSR */
987 mtmsr(msr);
988 }
989 #endif
990
991 #ifdef KDB
992 int
993 db_trap_glue(struct trapframe *frame)
994 {
995
996 if (!(frame->srr1 & PSL_PR)
997 && (frame->exc == EXC_TRC || frame->exc == EXC_RUNMODETRC
998 || frame_is_trap_inst(frame)
999 || frame->exc == EXC_BPT
1000 || frame->exc == EXC_DEBUG
1001 || frame->exc == EXC_DSI)) {
1002 int type = frame->exc;
1003
1004 /* Ignore DTrace traps. */
1005 if (*(uint32_t *)frame->srr0 == EXC_DTRACE)
1006 return (0);
1007 if (frame_is_trap_inst(frame)) {
1008 type = T_BREAKPOINT;
1009 }
1010 return (kdb_trap(type, 0, frame));
1011 }
1012
1013 return (0);
1014 }
1015 #endif
Cache object: 3e7453988a0eef517814214ef1867890
|