Merge branch 'for-linus' of master.kernel.org:/pub/scm/linux/kernel/git/roland/infiniband
[linux-2.6] / arch / cris / arch-v32 / kernel / traps.c
1 /*
2  * Copyright (C) 2003, Axis Communications AB.
3  */
4
5 #include <linux/ptrace.h>
6 #include <asm/uaccess.h>
7
8 #include <asm/arch/hwregs/supp_reg.h>
9
10 extern void reset_watchdog(void);
11 extern void stop_watchdog(void);
12
13 extern int raw_printk(const char *fmt, ...);
14
15 void
16 show_registers(struct pt_regs *regs)
17 {
18         /*
19          * It's possible to use either the USP register or current->thread.usp.
20          * USP might not correspond to the current proccess for all cases this
21          * function is called, and current->thread.usp isn't up to date for the
22          * current proccess. Experience shows that using USP is the way to go.
23          */
24         unsigned long usp;
25         unsigned long d_mmu_cause;
26         unsigned long i_mmu_cause;
27
28         usp = rdusp();
29
30         raw_printk("CPU: %d\n", smp_processor_id());
31
32         raw_printk("ERP: %08lx SRP: %08lx  CCS: %08lx USP: %08lx MOF: %08lx\n",
33                 regs->erp, regs->srp, regs->ccs, usp, regs->mof);
34
35         raw_printk(" r0: %08lx  r1: %08lx   r2: %08lx  r3: %08lx\n",
36                 regs->r0, regs->r1, regs->r2, regs->r3);
37
38         raw_printk(" r4: %08lx  r5: %08lx   r6: %08lx  r7: %08lx\n",
39                 regs->r4, regs->r5, regs->r6, regs->r7);
40
41         raw_printk(" r8: %08lx  r9: %08lx  r10: %08lx r11: %08lx\n",
42                 regs->r8, regs->r9, regs->r10, regs->r11);
43
44         raw_printk("r12: %08lx r13: %08lx oR10: %08lx acr: %08lx\n",
45                 regs->r12, regs->r13, regs->orig_r10, regs->acr);
46
47         raw_printk("sp: %08lx\n", regs);
48
49         SUPP_BANK_SEL(BANK_IM);
50         SUPP_REG_RD(RW_MM_CAUSE, i_mmu_cause);
51
52         SUPP_BANK_SEL(BANK_DM);
53         SUPP_REG_RD(RW_MM_CAUSE, d_mmu_cause);
54
55         raw_printk("       Data MMU Cause: %08lx\n", d_mmu_cause);
56         raw_printk("Instruction MMU Cause: %08lx\n", i_mmu_cause);
57
58         raw_printk("Process %s (pid: %d, stackpage: %08lx)\n",
59                 current->comm, current->pid, (unsigned long) current);
60
61         /* Show additional info if in kernel-mode. */
62         if (!user_mode(regs)) {
63                 int i;
64                 unsigned char c;
65
66                 show_stack(NULL, (unsigned long *) usp);
67
68                 /*
69                  * If the previous stack-dump wasn't a kernel one, dump the
70                  * kernel stack now.
71                  */
72                 if (usp != 0)
73                         show_stack(NULL, NULL);
74
75                 raw_printk("\nCode: ");
76
77                 if (regs->erp < PAGE_OFFSET)
78                         goto bad_value;
79
80                 /*
81                  * Quite often the value at regs->erp doesn't point to the
82                  * interesting instruction, which often is the previous
83                  * instruction. So dump at an offset large enough that the
84                  * instruction decoding should be in sync at the interesting
85                  * point, but small enough to fit on a row. The regs->erp
86                  * location is pointed out in a ksymoops-friendly way by
87                  * wrapping the byte for that address in parenthesis.
88                  */
89                 for (i = -12; i < 12; i++) {
90                         if (__get_user(c, &((unsigned char *) regs->erp)[i])) {
91 bad_value:
92                                 raw_printk(" Bad IP value.");
93                                 break;
94                         }
95
96                         if (i == 0)
97                                 raw_printk("(%02x) ", c);
98                         else
99                                 raw_printk("%02x ", c);
100                 }
101
102                 raw_printk("\n");
103         }
104 }
105
106 /*
107  * This gets called from entry.S when the watchdog has bitten. Show something
108  * similiar to an Oops dump, and if the kernel if configured to be a nice doggy;
109  * halt instead of reboot.
110  */
111 void
112 watchdog_bite_hook(struct pt_regs *regs)
113 {
114 #ifdef CONFIG_ETRAX_WATCHDOG_NICE_DOGGY
115         local_irq_disable();
116         stop_watchdog();
117         show_registers(regs);
118
119         while (1)
120                 ; /* Do nothing. */
121 #else
122         show_registers(regs);
123 #endif
124 }
125
126 /* This is normally the Oops function. */
127 void
128 die_if_kernel(const char *str, struct pt_regs *regs, long err)
129 {
130         if (user_mode(regs))
131                 return;
132
133 #ifdef CONFIG_ETRAX_WATCHDOG_NICE_DOGGY
134         /*
135          * This printout might take too long and could trigger
136          * the watchdog normally. If NICE_DOGGY is set, simply
137          * stop the watchdog during the printout.
138          */
139         stop_watchdog();
140 #endif
141
142         raw_printk("%s: %04lx\n", str, err & 0xffff);
143
144         show_registers(regs);
145
146 #ifdef CONFIG_ETRAX_WATCHDOG_NICE_DOGGY
147         reset_watchdog();
148 #endif
149
150         do_exit(SIGSEGV);
151 }
152
153 void arch_enable_nmi(void)
154 {
155         unsigned long flags;
156         local_save_flags(flags);
157         flags |= (1<<30); /* NMI M flag is at bit 30 */
158         local_irq_restore(flags);
159 }