2 * linux/arch/m68k/kernel/traps.c
4 * Copyright (C) 1993, 1994 by Hamish Macdonald
6 * 68040 fixes by Michael Rausch
7 * 68040 fixes by Martin Apel
8 * 68040 fixes and writeback by Richard Zidlicky
9 * 68060 fixes by Roman Hodek
10 * 68060 fixes by Jesper Skov
12 * This file is subject to the terms and conditions of the GNU General Public
13 * License. See the file COPYING in the main directory of this archive
18 * Sets up all exception vectors
21 #include <linux/sched.h>
22 #include <linux/signal.h>
23 #include <linux/kernel.h>
25 #include <linux/module.h>
26 #include <linux/user.h>
27 #include <linux/string.h>
28 #include <linux/linkage.h>
29 #include <linux/init.h>
30 #include <linux/ptrace.h>
31 #include <linux/kallsyms.h>
33 #include <asm/setup.h>
35 #include <asm/uaccess.h>
36 #include <asm/traps.h>
37 #include <asm/pgalloc.h>
38 #include <asm/machdep.h>
39 #include <asm/siginfo.h>
42 static const char *vec_names
[] = {
43 [VEC_RESETSP
] = "RESET SP",
44 [VEC_RESETPC
] = "RESET PC",
45 [VEC_BUSERR
] = "BUS ERROR",
46 [VEC_ADDRERR
] = "ADDRESS ERROR",
47 [VEC_ILLEGAL
] = "ILLEGAL INSTRUCTION",
48 [VEC_ZERODIV
] = "ZERO DIVIDE",
50 [VEC_TRAP
] = "TRAPcc",
51 [VEC_PRIV
] = "PRIVILEGE VIOLATION",
52 [VEC_TRACE
] = "TRACE",
53 [VEC_LINE10
] = "LINE 1010",
54 [VEC_LINE11
] = "LINE 1111",
55 [VEC_RESV12
] = "UNASSIGNED RESERVED 12",
56 [VEC_COPROC
] = "COPROCESSOR PROTOCOL VIOLATION",
57 [VEC_FORMAT
] = "FORMAT ERROR",
58 [VEC_UNINT
] = "UNINITIALIZED INTERRUPT",
59 [VEC_RESV16
] = "UNASSIGNED RESERVED 16",
60 [VEC_RESV17
] = "UNASSIGNED RESERVED 17",
61 [VEC_RESV18
] = "UNASSIGNED RESERVED 18",
62 [VEC_RESV19
] = "UNASSIGNED RESERVED 19",
63 [VEC_RESV20
] = "UNASSIGNED RESERVED 20",
64 [VEC_RESV21
] = "UNASSIGNED RESERVED 21",
65 [VEC_RESV22
] = "UNASSIGNED RESERVED 22",
66 [VEC_RESV23
] = "UNASSIGNED RESERVED 23",
67 [VEC_SPUR
] = "SPURIOUS INTERRUPT",
68 [VEC_INT1
] = "LEVEL 1 INT",
69 [VEC_INT2
] = "LEVEL 2 INT",
70 [VEC_INT3
] = "LEVEL 3 INT",
71 [VEC_INT4
] = "LEVEL 4 INT",
72 [VEC_INT5
] = "LEVEL 5 INT",
73 [VEC_INT6
] = "LEVEL 6 INT",
74 [VEC_INT7
] = "LEVEL 7 INT",
75 [VEC_SYS
] = "SYSCALL",
76 [VEC_TRAP1
] = "TRAP #1",
77 [VEC_TRAP2
] = "TRAP #2",
78 [VEC_TRAP3
] = "TRAP #3",
79 [VEC_TRAP4
] = "TRAP #4",
80 [VEC_TRAP5
] = "TRAP #5",
81 [VEC_TRAP6
] = "TRAP #6",
82 [VEC_TRAP7
] = "TRAP #7",
83 [VEC_TRAP8
] = "TRAP #8",
84 [VEC_TRAP9
] = "TRAP #9",
85 [VEC_TRAP10
] = "TRAP #10",
86 [VEC_TRAP11
] = "TRAP #11",
87 [VEC_TRAP12
] = "TRAP #12",
88 [VEC_TRAP13
] = "TRAP #13",
89 [VEC_TRAP14
] = "TRAP #14",
90 [VEC_TRAP15
] = "TRAP #15",
91 [VEC_FPBRUC
] = "FPCP BSUN",
92 [VEC_FPIR
] = "FPCP INEXACT",
93 [VEC_FPDIVZ
] = "FPCP DIV BY 0",
94 [VEC_FPUNDER
] = "FPCP UNDERFLOW",
95 [VEC_FPOE
] = "FPCP OPERAND ERROR",
96 [VEC_FPOVER
] = "FPCP OVERFLOW",
97 [VEC_FPNAN
] = "FPCP SNAN",
98 [VEC_FPUNSUP
] = "FPCP UNSUPPORTED OPERATION",
99 [VEC_MMUCFG
] = "MMU CONFIGURATION ERROR",
100 [VEC_MMUILL
] = "MMU ILLEGAL OPERATION ERROR",
101 [VEC_MMUACC
] = "MMU ACCESS LEVEL VIOLATION ERROR",
102 [VEC_RESV59
] = "UNASSIGNED RESERVED 59",
103 [VEC_UNIMPEA
] = "UNASSIGNED RESERVED 60",
104 [VEC_UNIMPII
] = "UNASSIGNED RESERVED 61",
105 [VEC_RESV62
] = "UNASSIGNED RESERVED 62",
106 [VEC_RESV63
] = "UNASSIGNED RESERVED 63",
109 static const char *space_names
[] = {
111 [USER_DATA
] = "User Data",
112 [USER_PROGRAM
] = "User Program",
116 [FC_CONTROL
] = "Control",
119 [SUPER_DATA
] = "Super Data",
120 [SUPER_PROGRAM
] = "Super Program",
124 void die_if_kernel(char *,struct pt_regs
*,int);
125 asmlinkage
int do_page_fault(struct pt_regs
*regs
, unsigned long address
,
126 unsigned long error_code
);
127 int send_fault_sig(struct pt_regs
*regs
);
129 asmlinkage
void trap_c(struct frame
*fp
);
131 #if defined (CONFIG_M68060)
132 static inline void access_error060 (struct frame
*fp
)
134 unsigned long fslw
= fp
->un
.fmt4
.pc
; /* is really FSLW for access error */
137 printk("fslw=%#lx, fa=%#lx\n", fslw
, fp
->un
.fmt4
.effaddr
);
140 if (fslw
& MMU060_BPE
) {
141 /* branch prediction error -> clear branch cache */
142 __asm__
__volatile__ ("movec %/cacr,%/d0\n\t"
143 "orl #0x00400000,%/d0\n\t"
146 /* return if there's no other error */
147 if (!(fslw
& MMU060_ERR_BITS
) && !(fslw
& MMU060_SEE
))
151 if (fslw
& (MMU060_DESC_ERR
| MMU060_WP
| MMU060_SP
)) {
152 unsigned long errorcode
;
153 unsigned long addr
= fp
->un
.fmt4
.effaddr
;
155 if (fslw
& MMU060_MA
)
156 addr
= (addr
+ PAGE_SIZE
- 1) & PAGE_MASK
;
159 if (fslw
& MMU060_DESC_ERR
) {
160 __flush_tlb040_one(addr
);
166 printk("errorcode = %d\n", errorcode
);
168 do_page_fault(&fp
->ptregs
, addr
, errorcode
);
169 } else if (fslw
& (MMU060_SEE
)){
170 /* Software Emulation Error.
171 * fault during mem_read/mem_write in ifpsp060/os.S
173 send_fault_sig(&fp
->ptregs
);
174 } else if (!(fslw
& (MMU060_RE
|MMU060_WE
)) ||
175 send_fault_sig(&fp
->ptregs
) > 0) {
176 printk("pc=%#lx, fa=%#lx\n", fp
->ptregs
.pc
, fp
->un
.fmt4
.effaddr
);
177 printk( "68060 access error, fslw=%lx\n", fslw
);
181 #endif /* CONFIG_M68060 */
183 #if defined (CONFIG_M68040)
184 static inline unsigned long probe040(int iswrite
, unsigned long addr
, int wbs
)
187 mm_segment_t old_fs
= get_fs();
189 set_fs(MAKE_MM_SEG(wbs
));
192 asm volatile (".chip 68040; ptestw (%0); .chip 68k" : : "a" (addr
));
194 asm volatile (".chip 68040; ptestr (%0); .chip 68k" : : "a" (addr
));
196 asm volatile (".chip 68040; movec %%mmusr,%0; .chip 68k" : "=r" (mmusr
));
203 static inline int do_040writeback1(unsigned short wbs
, unsigned long wba
,
207 mm_segment_t old_fs
= get_fs();
209 /* set_fs can not be moved, otherwise put_user() may oops */
210 set_fs(MAKE_MM_SEG(wbs
));
212 switch (wbs
& WBSIZ_040
) {
214 res
= put_user(wbd
& 0xff, (char __user
*)wba
);
217 res
= put_user(wbd
& 0xffff, (short __user
*)wba
);
220 res
= put_user(wbd
, (int __user
*)wba
);
224 /* set_fs can not be moved, otherwise put_user() may oops */
229 printk("do_040writeback1, res=%d\n",res
);
235 /* after an exception in a writeback the stack frame corresponding
236 * to that exception is discarded, set a few bits in the old frame
237 * to simulate what it should look like
239 static inline void fix_xframe040(struct frame
*fp
, unsigned long wba
, unsigned short wbs
)
241 fp
->un
.fmt7
.faddr
= wba
;
242 fp
->un
.fmt7
.ssw
= wbs
& 0xff;
243 if (wba
!= current
->thread
.faddr
)
244 fp
->un
.fmt7
.ssw
|= MA_040
;
247 static inline void do_040writebacks(struct frame
*fp
)
251 if (fp
->un
.fmt7
.wb1s
& WBV_040
)
252 printk("access_error040: cannot handle 1st writeback. oops.\n");
255 if ((fp
->un
.fmt7
.wb2s
& WBV_040
) &&
256 !(fp
->un
.fmt7
.wb2s
& WBTT_040
)) {
257 res
= do_040writeback1(fp
->un
.fmt7
.wb2s
, fp
->un
.fmt7
.wb2a
,
260 fix_xframe040(fp
, fp
->un
.fmt7
.wb2a
, fp
->un
.fmt7
.wb2s
);
262 fp
->un
.fmt7
.wb2s
= 0;
265 /* do the 2nd wb only if the first one was successful (except for a kernel wb) */
266 if (fp
->un
.fmt7
.wb3s
& WBV_040
&& (!res
|| fp
->un
.fmt7
.wb3s
& 4)) {
267 res
= do_040writeback1(fp
->un
.fmt7
.wb3s
, fp
->un
.fmt7
.wb3a
,
271 fix_xframe040(fp
, fp
->un
.fmt7
.wb3a
, fp
->un
.fmt7
.wb3s
);
273 fp
->un
.fmt7
.wb2s
= fp
->un
.fmt7
.wb3s
;
274 fp
->un
.fmt7
.wb3s
&= (~WBV_040
);
275 fp
->un
.fmt7
.wb2a
= fp
->un
.fmt7
.wb3a
;
276 fp
->un
.fmt7
.wb2d
= fp
->un
.fmt7
.wb3d
;
279 fp
->un
.fmt7
.wb3s
= 0;
283 send_fault_sig(&fp
->ptregs
);
287 * called from sigreturn(), must ensure userspace code didn't
288 * manipulate exception frame to circumvent protection, then complete
290 * we just clear TM2 to turn it into a userspace access
292 asmlinkage
void berr_040cleanup(struct frame
*fp
)
294 fp
->un
.fmt7
.wb2s
&= ~4;
295 fp
->un
.fmt7
.wb3s
&= ~4;
297 do_040writebacks(fp
);
300 static inline void access_error040(struct frame
*fp
)
302 unsigned short ssw
= fp
->un
.fmt7
.ssw
;
306 printk("ssw=%#x, fa=%#lx\n", ssw
, fp
->un
.fmt7
.faddr
);
307 printk("wb1s=%#x, wb2s=%#x, wb3s=%#x\n", fp
->un
.fmt7
.wb1s
,
308 fp
->un
.fmt7
.wb2s
, fp
->un
.fmt7
.wb3s
);
309 printk ("wb2a=%lx, wb3a=%lx, wb2d=%lx, wb3d=%lx\n",
310 fp
->un
.fmt7
.wb2a
, fp
->un
.fmt7
.wb3a
,
311 fp
->un
.fmt7
.wb2d
, fp
->un
.fmt7
.wb3d
);
315 unsigned long addr
= fp
->un
.fmt7
.faddr
;
316 unsigned long errorcode
;
319 * The MMU status has to be determined AFTER the address
320 * has been corrected if there was a misaligned access (MA).
323 addr
= (addr
+ 7) & -8;
325 /* MMU error, get the MMUSR info for this access */
326 mmusr
= probe040(!(ssw
& RW_040
), addr
, ssw
);
328 printk("mmusr = %lx\n", mmusr
);
331 if (!(mmusr
& MMU_R_040
)) {
332 /* clear the invalid atc entry */
333 __flush_tlb040_one(addr
);
337 /* despite what documentation seems to say, RMW
338 * accesses have always both the LK and RW bits set */
339 if (!(ssw
& RW_040
) || (ssw
& LK_040
))
342 if (do_page_fault(&fp
->ptregs
, addr
, errorcode
)) {
344 printk("do_page_fault() !=0\n");
346 if (user_mode(&fp
->ptregs
)){
347 /* delay writebacks after signal delivery */
349 printk(".. was usermode - return\n");
353 /* disable writeback into user space from kernel
354 * (if do_page_fault didn't fix the mapping,
355 * the writeback won't do good)
359 printk(".. disabling wb2\n");
361 if (fp
->un
.fmt7
.wb2a
== fp
->un
.fmt7
.faddr
)
362 fp
->un
.fmt7
.wb2s
&= ~WBV_040
;
363 if (fp
->un
.fmt7
.wb3a
== fp
->un
.fmt7
.faddr
)
364 fp
->un
.fmt7
.wb3s
&= ~WBV_040
;
367 /* In case of a bus error we either kill the process or expect
368 * the kernel to catch the fault, which then is also responsible
369 * for cleaning up the mess.
371 current
->thread
.signo
= SIGBUS
;
372 current
->thread
.faddr
= fp
->un
.fmt7
.faddr
;
373 if (send_fault_sig(&fp
->ptregs
) >= 0)
374 printk("68040 bus error (ssw=%x, faddr=%lx)\n", ssw
,
379 do_040writebacks(fp
);
381 #endif /* CONFIG_M68040 */
383 #if defined(CONFIG_SUN3)
384 #include <asm/sun3mmu.h>
386 extern int mmu_emu_handle_fault (unsigned long, int, int);
388 /* sun3 version of bus_error030 */
390 static inline void bus_error030 (struct frame
*fp
)
392 unsigned char buserr_type
= sun3_get_buserr ();
393 unsigned long addr
, errorcode
;
394 unsigned short ssw
= fp
->un
.fmtb
.ssw
;
395 extern unsigned long _sun3_map_test_start
, _sun3_map_test_end
;
399 printk ("Instruction fault at %#010lx\n",
401 fp
->ptregs
.format
== 0xa ? fp
->ptregs
.pc
+ 2 : fp
->un
.fmtb
.baddr
- 2
403 fp
->ptregs
.format
== 0xa ? fp
->ptregs
.pc
+ 4 : fp
->un
.fmtb
.baddr
);
405 printk ("Data %s fault at %#010lx in %s (pc=%#lx)\n",
406 ssw
& RW
? "read" : "write",
408 space_names
[ssw
& DFC
], fp
->ptregs
.pc
);
412 * Check if this page should be demand-mapped. This needs to go before
413 * the testing for a bad kernel-space access (demand-mapping applies
414 * to kernel accesses too).
418 && (buserr_type
& (SUN3_BUSERR_PROTERR
| SUN3_BUSERR_INVALID
))) {
419 if (mmu_emu_handle_fault (fp
->un
.fmtb
.daddr
, ssw
& RW
, 0))
423 /* Check for kernel-space pagefault (BAD). */
424 if (fp
->ptregs
.sr
& PS_S
) {
425 /* kernel fault must be a data fault to user space */
426 if (! ((ssw
& DF
) && ((ssw
& DFC
) == USER_DATA
))) {
427 // try checking the kernel mappings before surrender
428 if (mmu_emu_handle_fault (fp
->un
.fmtb
.daddr
, ssw
& RW
, 1))
430 /* instruction fault or kernel data fault! */
432 printk ("Instruction fault at %#010lx\n",
435 /* was this fault incurred testing bus mappings? */
436 if((fp
->ptregs
.pc
>= (unsigned long)&_sun3_map_test_start
) &&
437 (fp
->ptregs
.pc
<= (unsigned long)&_sun3_map_test_end
)) {
438 send_fault_sig(&fp
->ptregs
);
442 printk ("Data %s fault at %#010lx in %s (pc=%#lx)\n",
443 ssw
& RW
? "read" : "write",
445 space_names
[ssw
& DFC
], fp
->ptregs
.pc
);
447 printk ("BAD KERNEL BUSERR\n");
449 die_if_kernel("Oops", &fp
->ptregs
,0);
450 force_sig(SIGKILL
, current
);
455 if (!(ssw
& (FC
| FB
)) && !(ssw
& DF
))
456 /* not an instruction fault or data fault! BAD */
457 panic ("USER BUSERR w/o instruction or data fault");
461 /* First handle the data fault, if any. */
463 addr
= fp
->un
.fmtb
.daddr
;
465 // errorcode bit 0: 0 -> no page 1 -> protection fault
466 // errorcode bit 1: 0 -> read fault 1 -> write fault
468 // (buserr_type & SUN3_BUSERR_PROTERR) -> protection fault
469 // (buserr_type & SUN3_BUSERR_INVALID) -> invalid page fault
471 if (buserr_type
& SUN3_BUSERR_PROTERR
)
473 else if (buserr_type
& SUN3_BUSERR_INVALID
)
477 printk ("*** unexpected busfault type=%#04x\n", buserr_type
);
478 printk ("invalid %s access at %#lx from pc %#lx\n",
479 !(ssw
& RW
) ? "write" : "read", addr
,
482 die_if_kernel ("Oops", &fp
->ptregs
, buserr_type
);
483 force_sig (SIGBUS
, current
);
487 //todo: wtf is RM bit? --m
488 if (!(ssw
& RW
) || ssw
& RM
)
491 /* Handle page fault. */
492 do_page_fault (&fp
->ptregs
, addr
, errorcode
);
494 /* Retry the data fault now. */
498 /* Now handle the instruction fault. */
500 /* Get the fault address. */
501 if (fp
->ptregs
.format
== 0xA)
502 addr
= fp
->ptregs
.pc
+ 4;
504 addr
= fp
->un
.fmtb
.baddr
;
508 if (buserr_type
& SUN3_BUSERR_INVALID
) {
509 if (!mmu_emu_handle_fault(addr
, 1, 0))
510 do_page_fault (&fp
->ptregs
, addr
, 0);
513 printk ("protection fault on insn access (segv).\n");
515 force_sig (SIGSEGV
, current
);
519 #if defined(CPU_M68020_OR_M68030)
520 static inline void bus_error030 (struct frame
*fp
)
522 volatile unsigned short temp
;
523 unsigned short mmusr
;
524 unsigned long addr
, errorcode
;
525 unsigned short ssw
= fp
->un
.fmtb
.ssw
;
529 printk ("pid = %x ", current
->pid
);
530 printk ("SSW=%#06x ", ssw
);
533 printk ("Instruction fault at %#010lx\n",
535 fp
->ptregs
.format
== 0xa ? fp
->ptregs
.pc
+ 2 : fp
->un
.fmtb
.baddr
- 2
537 fp
->ptregs
.format
== 0xa ? fp
->ptregs
.pc
+ 4 : fp
->un
.fmtb
.baddr
);
539 printk ("Data %s fault at %#010lx in %s (pc=%#lx)\n",
540 ssw
& RW
? "read" : "write",
542 space_names
[ssw
& DFC
], fp
->ptregs
.pc
);
545 /* ++andreas: If a data fault and an instruction fault happen
546 at the same time map in both pages. */
548 /* First handle the data fault, if any. */
550 addr
= fp
->un
.fmtb
.daddr
;
553 asm volatile ("ptestr %3,%2@,#7,%0\n\t"
555 : "=a&" (desc
), "=m" (temp
)
556 : "a" (addr
), "d" (ssw
));
558 asm volatile ("ptestr %2,%1@,#7\n\t"
560 : "=m" (temp
) : "a" (addr
), "d" (ssw
));
565 printk("mmusr is %#x for addr %#lx in task %p\n",
566 mmusr
, addr
, current
);
567 printk("descriptor address is %#lx, contents %#lx\n",
568 __va(desc
), *(unsigned long *)__va(desc
));
571 errorcode
= (mmusr
& MMU_I
) ? 0 : 1;
572 if (!(ssw
& RW
) || (ssw
& RM
))
575 if (mmusr
& (MMU_I
| MMU_WP
)) {
577 printk("Data %s fault at %#010lx in %s (pc=%#lx)\n",
578 ssw
& RW
? "read" : "write",
580 space_names
[ssw
& DFC
], fp
->ptregs
.pc
);
583 /* Don't try to do anything further if an exception was
585 if (do_page_fault (&fp
->ptregs
, addr
, errorcode
) < 0)
587 } else if (!(mmusr
& MMU_I
)) {
588 /* probably a 020 cas fault */
589 if (!(ssw
& RM
) && send_fault_sig(&fp
->ptregs
) > 0)
590 printk("unexpected bus error (%#x,%#x)\n", ssw
, mmusr
);
591 } else if (mmusr
& (MMU_B
|MMU_L
|MMU_S
)) {
592 printk("invalid %s access at %#lx from pc %#lx\n",
593 !(ssw
& RW
) ? "write" : "read", addr
,
595 die_if_kernel("Oops",&fp
->ptregs
,mmusr
);
596 force_sig(SIGSEGV
, current
);
600 static volatile long tlong
;
603 printk("weird %s access at %#lx from pc %#lx (ssw is %#x)\n",
604 !(ssw
& RW
) ? "write" : "read", addr
,
606 asm volatile ("ptestr #1,%1@,#0\n\t"
612 printk ("level 0 mmusr is %#x\n", mmusr
);
614 asm volatile ("pmove %%tt0,%0"
616 printk("tt0 is %#lx, ", tlong
);
617 asm volatile ("pmove %%tt1,%0"
619 printk("tt1 is %#lx\n", tlong
);
622 printk("Unknown SIGSEGV - 1\n");
624 die_if_kernel("Oops",&fp
->ptregs
,mmusr
);
625 force_sig(SIGSEGV
, current
);
629 /* setup an ATC entry for the access about to be retried */
630 if (!(ssw
& RW
) || (ssw
& RM
))
631 asm volatile ("ploadw %1,%0@" : /* no outputs */
632 : "a" (addr
), "d" (ssw
));
634 asm volatile ("ploadr %1,%0@" : /* no outputs */
635 : "a" (addr
), "d" (ssw
));
638 /* Now handle the instruction fault. */
640 if (!(ssw
& (FC
|FB
)))
643 if (fp
->ptregs
.sr
& PS_S
) {
644 printk("Instruction fault at %#010lx\n",
647 printk ("BAD KERNEL BUSERR\n");
648 die_if_kernel("Oops",&fp
->ptregs
,0);
649 force_sig(SIGKILL
, current
);
653 /* get the fault address */
654 if (fp
->ptregs
.format
== 10)
655 addr
= fp
->ptregs
.pc
+ 4;
657 addr
= fp
->un
.fmtb
.baddr
;
661 if ((ssw
& DF
) && ((addr
^ fp
->un
.fmtb
.daddr
) & PAGE_MASK
) == 0)
662 /* Insn fault on same page as data fault. But we
663 should still create the ATC entry. */
664 goto create_atc_entry
;
667 asm volatile ("ptestr #1,%2@,#7,%0\n\t"
669 : "=a&" (desc
), "=m" (temp
)
672 asm volatile ("ptestr #1,%1@,#7\n\t"
674 : "=m" (temp
) : "a" (addr
));
679 printk ("mmusr is %#x for addr %#lx in task %p\n",
680 mmusr
, addr
, current
);
681 printk ("descriptor address is %#lx, contents %#lx\n",
682 __va(desc
), *(unsigned long *)__va(desc
));
686 do_page_fault (&fp
->ptregs
, addr
, 0);
687 else if (mmusr
& (MMU_B
|MMU_L
|MMU_S
)) {
688 printk ("invalid insn access at %#lx from pc %#lx\n",
689 addr
, fp
->ptregs
.pc
);
691 printk("Unknown SIGSEGV - 2\n");
693 die_if_kernel("Oops",&fp
->ptregs
,mmusr
);
694 force_sig(SIGSEGV
, current
);
699 /* setup an ATC entry for the access about to be retried */
700 asm volatile ("ploadr #2,%0@" : /* no outputs */
703 #endif /* CPU_M68020_OR_M68030 */
704 #endif /* !CONFIG_SUN3 */
706 #if defined(CONFIG_COLDFIRE) && defined(CONFIG_MMU)
707 #include <asm/mcfmmu.h>
710 * The following table converts the FS encoding of a ColdFire
711 * exception stack frame into the error_code value needed by
714 static const unsigned char fs_err_code
[] = {
733 static inline void access_errorcf(unsigned int fs
, struct frame
*fp
)
735 unsigned long mmusr
, addr
;
736 unsigned int err_code
;
739 mmusr
= mmu_read(MMUSR
);
740 addr
= mmu_read(MMUAR
);
744 * bit 0 == 0 means no page found, 1 means protection fault
745 * bit 1 == 0 means read, 1 means write
748 case 5: /* 0101 TLB opword X miss */
749 need_page_fault
= cf_tlb_miss(&fp
->ptregs
, 0, 0, 0);
750 addr
= fp
->ptregs
.pc
;
752 case 6: /* 0110 TLB extension word X miss */
753 need_page_fault
= cf_tlb_miss(&fp
->ptregs
, 0, 0, 1);
754 addr
= fp
->ptregs
.pc
+ sizeof(long);
756 case 10: /* 1010 TLB W miss */
757 need_page_fault
= cf_tlb_miss(&fp
->ptregs
, 1, 1, 0);
759 case 14: /* 1110 TLB R miss */
760 need_page_fault
= cf_tlb_miss(&fp
->ptregs
, 0, 1, 0);
765 /* 0010 Interrupt during debug service routine */
767 /* 0100 X Protection */
768 /* 0111 IFP in emulator mode */
769 /* 1000 W Protection*/
770 /* 1001 Write error*/
772 /* 1100 R Protection*/
773 /* 1101 R Protection*/
774 /* 1111 OEP in emulator mode*/
779 if (need_page_fault
) {
780 err_code
= fs_err_code
[fs
];
781 if ((fs
== 13) && (mmusr
& MMUSR_WF
)) /* rd-mod-wr access */
782 err_code
|= 2; /* bit1 - write, bit0 - protection */
783 do_page_fault(&fp
->ptregs
, addr
, err_code
);
786 #endif /* CONFIG_COLDFIRE CONFIG_MMU */
788 asmlinkage
void buserr_c(struct frame
*fp
)
790 /* Only set esp0 if coming from user mode */
791 if (user_mode(&fp
->ptregs
))
792 current
->thread
.esp0
= (unsigned long) fp
;
795 printk ("*** Bus Error *** Format is %x\n", fp
->ptregs
.format
);
798 #if defined(CONFIG_COLDFIRE) && defined(CONFIG_MMU)
799 if (CPU_IS_COLDFIRE
) {
801 fs
= (fp
->ptregs
.vector
& 0x3) |
802 ((fp
->ptregs
.vector
& 0xc00) >> 8);
812 access_errorcf(fs
, fp
);
818 #endif /* CONFIG_COLDFIRE && CONFIG_MMU */
820 switch (fp
->ptregs
.format
) {
821 #if defined (CONFIG_M68060)
822 case 4: /* 68060 access error */
823 access_error060 (fp
);
826 #if defined (CONFIG_M68040)
827 case 0x7: /* 68040 access error */
828 access_error040 (fp
);
831 #if defined (CPU_M68020_OR_M68030)
838 die_if_kernel("bad frame format",&fp
->ptregs
,0);
840 printk("Unknown SIGSEGV - 4\n");
842 force_sig(SIGSEGV
, current
);
847 static int kstack_depth_to_print
= 48;
849 void show_trace(unsigned long *stack
)
851 unsigned long *endstack
;
855 printk("Call Trace:");
856 addr
= (unsigned long)stack
+ THREAD_SIZE
- 1;
857 endstack
= (unsigned long *)(addr
& -THREAD_SIZE
);
859 while (stack
+ 1 <= endstack
) {
862 * If the address is either in the text segment of the
863 * kernel, or in the region which contains vmalloc'ed
864 * memory, it *may* be the address of a calling
865 * routine; if so, print it so that someone tracing
866 * down the cause of the crash will be able to figure
867 * out the call path that was taken.
869 if (__kernel_text_address(addr
)) {
870 #ifndef CONFIG_KALLSYMS
874 printk(" [<%08lx>] %pS\n", addr
, (void *)addr
);
881 void show_registers(struct pt_regs
*regs
)
883 struct frame
*fp
= (struct frame
*)regs
;
884 mm_segment_t old_fs
= get_fs();
890 printk("PC: [<%08lx>] %pS\n", regs
->pc
, (void *)regs
->pc
);
891 printk("SR: %04x SP: %p a2: %08lx\n", regs
->sr
, regs
, regs
->a2
);
892 printk("d0: %08lx d1: %08lx d2: %08lx d3: %08lx\n",
893 regs
->d0
, regs
->d1
, regs
->d2
, regs
->d3
);
894 printk("d4: %08lx d5: %08lx a0: %08lx a1: %08lx\n",
895 regs
->d4
, regs
->d5
, regs
->a0
, regs
->a1
);
897 printk("Process %s (pid: %d, task=%p)\n",
898 current
->comm
, task_pid_nr(current
), current
);
899 addr
= (unsigned long)&fp
->un
;
900 printk("Frame format=%X ", regs
->format
);
901 switch (regs
->format
) {
903 printk("instr addr=%08lx\n", fp
->un
.fmt2
.iaddr
);
904 addr
+= sizeof(fp
->un
.fmt2
);
907 printk("eff addr=%08lx\n", fp
->un
.fmt3
.effaddr
);
908 addr
+= sizeof(fp
->un
.fmt3
);
911 printk((CPU_IS_060
? "fault addr=%08lx fslw=%08lx\n"
912 : "eff addr=%08lx pc=%08lx\n"),
913 fp
->un
.fmt4
.effaddr
, fp
->un
.fmt4
.pc
);
914 addr
+= sizeof(fp
->un
.fmt4
);
917 printk("eff addr=%08lx ssw=%04x faddr=%08lx\n",
918 fp
->un
.fmt7
.effaddr
, fp
->un
.fmt7
.ssw
, fp
->un
.fmt7
.faddr
);
919 printk("wb 1 stat/addr/data: %04x %08lx %08lx\n",
920 fp
->un
.fmt7
.wb1s
, fp
->un
.fmt7
.wb1a
, fp
->un
.fmt7
.wb1dpd0
);
921 printk("wb 2 stat/addr/data: %04x %08lx %08lx\n",
922 fp
->un
.fmt7
.wb2s
, fp
->un
.fmt7
.wb2a
, fp
->un
.fmt7
.wb2d
);
923 printk("wb 3 stat/addr/data: %04x %08lx %08lx\n",
924 fp
->un
.fmt7
.wb3s
, fp
->un
.fmt7
.wb3a
, fp
->un
.fmt7
.wb3d
);
925 printk("push data: %08lx %08lx %08lx %08lx\n",
926 fp
->un
.fmt7
.wb1dpd0
, fp
->un
.fmt7
.pd1
, fp
->un
.fmt7
.pd2
,
928 addr
+= sizeof(fp
->un
.fmt7
);
931 printk("instr addr=%08lx\n", fp
->un
.fmt9
.iaddr
);
932 addr
+= sizeof(fp
->un
.fmt9
);
935 printk("ssw=%04x isc=%04x isb=%04x daddr=%08lx dobuf=%08lx\n",
936 fp
->un
.fmta
.ssw
, fp
->un
.fmta
.isc
, fp
->un
.fmta
.isb
,
937 fp
->un
.fmta
.daddr
, fp
->un
.fmta
.dobuf
);
938 addr
+= sizeof(fp
->un
.fmta
);
941 printk("ssw=%04x isc=%04x isb=%04x daddr=%08lx dobuf=%08lx\n",
942 fp
->un
.fmtb
.ssw
, fp
->un
.fmtb
.isc
, fp
->un
.fmtb
.isb
,
943 fp
->un
.fmtb
.daddr
, fp
->un
.fmtb
.dobuf
);
944 printk("baddr=%08lx dibuf=%08lx ver=%x\n",
945 fp
->un
.fmtb
.baddr
, fp
->un
.fmtb
.dibuf
, fp
->un
.fmtb
.ver
);
946 addr
+= sizeof(fp
->un
.fmtb
);
951 show_stack(NULL
, (unsigned long *)addr
);
955 cp
= (u16
*)regs
->pc
;
956 for (i
= -8; i
< 16; i
++) {
957 if (get_user(c
, cp
+ i
) && i
>= 0) {
958 printk(" Bad PC value.");
961 printk(i
? " %04x" : " <%04x>", c
);
967 void show_stack(struct task_struct
*task
, unsigned long *stack
)
970 unsigned long *endstack
;
975 stack
= (unsigned long *)task
->thread
.esp0
;
977 stack
= (unsigned long *)&stack
;
979 endstack
= (unsigned long *)(((unsigned long)stack
+ THREAD_SIZE
- 1) & -THREAD_SIZE
);
981 printk("Stack from %08lx:", (unsigned long)stack
);
983 for (i
= 0; i
< kstack_depth_to_print
; i
++) {
984 if (p
+ 1 > endstack
)
988 printk(" %08lx", *p
++);
995 * The vector number returned in the frame pointer may also contain
996 * the "fs" (Fault Status) bits on ColdFire. These are in the bottom
997 * 2 bits, and upper 2 bits. So we need to mask out the real vector
998 * number before using it in comparisons. You don't need to do this on
999 * real 68k parts, but it won't hurt either.
1002 void bad_super_trap (struct frame
*fp
)
1004 int vector
= (fp
->ptregs
.vector
>> 2) & 0xff;
1007 if (vector
< ARRAY_SIZE(vec_names
))
1008 printk ("*** %s *** FORMAT=%X\n",
1012 printk ("*** Exception %d *** FORMAT=%X\n",
1013 vector
, fp
->ptregs
.format
);
1014 if (vector
== VEC_ADDRERR
&& CPU_IS_020_OR_030
) {
1015 unsigned short ssw
= fp
->un
.fmtb
.ssw
;
1017 printk ("SSW=%#06x ", ssw
);
1020 printk ("Pipe stage C instruction fault at %#010lx\n",
1021 (fp
->ptregs
.format
) == 0xA ?
1022 fp
->ptregs
.pc
+ 2 : fp
->un
.fmtb
.baddr
- 2);
1024 printk ("Pipe stage B instruction fault at %#010lx\n",
1025 (fp
->ptregs
.format
) == 0xA ?
1026 fp
->ptregs
.pc
+ 4 : fp
->un
.fmtb
.baddr
);
1028 printk ("Data %s fault at %#010lx in %s (pc=%#lx)\n",
1029 ssw
& RW
? "read" : "write",
1030 fp
->un
.fmtb
.daddr
, space_names
[ssw
& DFC
],
1033 printk ("Current process id is %d\n", task_pid_nr(current
));
1034 die_if_kernel("BAD KERNEL TRAP", &fp
->ptregs
, 0);
1037 asmlinkage
void trap_c(struct frame
*fp
)
1040 int vector
= (fp
->ptregs
.vector
>> 2) & 0xff;
1043 if (fp
->ptregs
.sr
& PS_S
) {
1044 if (vector
== VEC_TRACE
) {
1045 /* traced a trapping instruction on a 68020/30,
1046 * real exception will be executed afterwards.
1048 } else if (!handle_kernel_fault(&fp
->ptregs
))
1053 /* send the appropriate signal to the user program */
1056 info
.si_code
= BUS_ADRALN
;
1062 info
.si_code
= ILL_ILLOPC
;
1066 info
.si_code
= ILL_PRVOPC
;
1070 info
.si_code
= ILL_COPROC
;
1087 info
.si_code
= ILL_ILLTRP
;
1093 info
.si_code
= FPE_FLTINV
;
1097 info
.si_code
= FPE_FLTRES
;
1101 info
.si_code
= FPE_FLTDIV
;
1105 info
.si_code
= FPE_FLTUND
;
1109 info
.si_code
= FPE_FLTOVF
;
1113 info
.si_code
= FPE_INTDIV
;
1118 info
.si_code
= FPE_INTOVF
;
1121 case VEC_TRACE
: /* ptrace single step */
1122 info
.si_code
= TRAP_TRACE
;
1125 case VEC_TRAP15
: /* breakpoint */
1126 info
.si_code
= TRAP_BRKPT
;
1130 info
.si_code
= ILL_ILLOPC
;
1134 info
.si_signo
= sig
;
1136 switch (fp
->ptregs
.format
) {
1138 info
.si_addr
= (void *) fp
->ptregs
.pc
;
1141 info
.si_addr
= (void *) fp
->un
.fmt2
.iaddr
;
1144 info
.si_addr
= (void *) fp
->un
.fmt7
.effaddr
;
1147 info
.si_addr
= (void *) fp
->un
.fmt9
.iaddr
;
1150 info
.si_addr
= (void *) fp
->un
.fmta
.daddr
;
1153 info
.si_addr
= (void *) fp
->un
.fmtb
.daddr
;
1156 force_sig_info (sig
, &info
, current
);
1159 void die_if_kernel (char *str
, struct pt_regs
*fp
, int nr
)
1161 if (!(fp
->sr
& PS_S
))
1165 printk("%s: %08x\n",str
,nr
);
1167 add_taint(TAINT_DIE
, LOCKDEP_NOW_UNRELIABLE
);
1171 asmlinkage
void set_esp0(unsigned long ssp
)
1173 current
->thread
.esp0
= ssp
;
1177 * This function is called if an error occur while accessing
1178 * user-space from the fpsp040 code.
1180 asmlinkage
void fpsp040_die(void)
1185 #ifdef CONFIG_M68KFPU_EMU
1186 asmlinkage
void fpemu_signal(int signal
, int code
, void *addr
)
1190 info
.si_signo
= signal
;
1192 info
.si_code
= code
;
1193 info
.si_addr
= addr
;
1194 force_sig_info(signal
, &info
, current
);