1 /*
2 * linux/arch/h8300/boot/traps.c -- general exception handling code
3 * H8/300 support Yoshinori Sato <ysato@users.sourceforge.jp>
4 *
5 * Cloned from Linux/m68k.
6 *
7 * No original Copyright holder listed,
8 * Probable original (C) Roman Zippel (assigned DJD, 1999)
9 *
10 * Copyright 1999-2000 D. Jeff Dionne, <jeff@rt-control.com>
11 *
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
14 * for more details.
15 */
16
17 #include <linux/types.h>
18 #include <linux/sched.h>
19 #include <linux/sched/debug.h>
20 #include <linux/sched/task.h>
21 #include <linux/mm_types.h>
22 #include <linux/kernel.h>
23 #include <linux/errno.h>
24 #include <linux/init.h>
25 #include <linux/module.h>
26 #include <linux/bug.h>
27
28 #include <asm/irq.h>
29 #include <asm/traps.h>
30 #include <asm/page.h>
31
32 static DEFINE_SPINLOCK(die_lock);
33
34 /*
35 * this must be called very early as the kernel might
36 * use some instruction that are emulated on the 060
37 */
38
base_trap_init(void)39 void __init base_trap_init(void)
40 {
41 }
42
set_esp0(unsigned long ssp)43 asmlinkage void set_esp0(unsigned long ssp)
44 {
45 current->thread.esp0 = ssp;
46 }
47
48 /*
49 * Generic dumping code. Used for panic and debug.
50 */
51
dump(struct pt_regs * fp)52 static void dump(struct pt_regs *fp)
53 {
54 unsigned long *sp;
55 unsigned char *tp;
56 int i;
57
58 pr_info("\nCURRENT PROCESS:\n\n");
59 pr_info("COMM=%s PID=%d\n", current->comm, current->pid);
60 if (current->mm) {
61 pr_info("TEXT=%08x-%08x DATA=%08x-%08x BSS=%08x-%08x\n",
62 (int) current->mm->start_code,
63 (int) current->mm->end_code,
64 (int) current->mm->start_data,
65 (int) current->mm->end_data,
66 (int) current->mm->end_data,
67 (int) current->mm->brk);
68 pr_info("USER-STACK=%08x KERNEL-STACK=%08lx\n\n",
69 (int) current->mm->start_stack,
70 (int) PAGE_SIZE+(unsigned long)current);
71 }
72
73 show_regs(fp);
74 pr_info("\nCODE:");
75 tp = ((unsigned char *) fp->pc) - 0x20;
76 for (sp = (unsigned long *) tp, i = 0; (i < 0x40); i += 4) {
77 if ((i % 0x10) == 0)
78 pr_info("\n%08x: ", (int) (tp + i));
79 pr_info("%08x ", (int) *sp++);
80 }
81 pr_info("\n");
82
83 pr_info("\nKERNEL STACK:");
84 tp = ((unsigned char *) fp) - 0x40;
85 for (sp = (unsigned long *) tp, i = 0; (i < 0xc0); i += 4) {
86 if ((i % 0x10) == 0)
87 pr_info("\n%08x: ", (int) (tp + i));
88 pr_info("%08x ", (int) *sp++);
89 }
90 pr_info("\n");
91 if (STACK_MAGIC != *(unsigned long *)((unsigned long)current+PAGE_SIZE))
92 pr_info("(Possibly corrupted stack page??)\n");
93
94 pr_info("\n\n");
95 }
96
die(const char * str,struct pt_regs * fp,unsigned long err)97 void die(const char *str, struct pt_regs *fp, unsigned long err)
98 {
99 static int diecount;
100
101 oops_enter();
102
103 console_verbose();
104 spin_lock_irq(&die_lock);
105 report_bug(fp->pc, fp);
106 pr_crit("%s: %04lx [#%d] ", str, err & 0xffff, ++diecount);
107 dump(fp);
108
109 spin_unlock_irq(&die_lock);
110 make_task_dead(SIGSEGV);
111 }
112
113 static int kstack_depth_to_print = 24;
114
show_stack(struct task_struct * task,unsigned long * esp,const char * loglvl)115 void show_stack(struct task_struct *task, unsigned long *esp, const char *loglvl)
116 {
117 unsigned long *stack, addr;
118 int i;
119
120 if (esp == NULL)
121 esp = (unsigned long *) &esp;
122
123 stack = esp;
124
125 printk("%sStack from %08lx:", loglvl, (unsigned long)stack);
126 for (i = 0; i < kstack_depth_to_print; i++) {
127 if (((unsigned long)stack & (THREAD_SIZE - 1)) >=
128 THREAD_SIZE-4)
129 break;
130 if (i % 8 == 0)
131 printk("%s ", loglvl);
132 pr_cont(" %08lx", *stack++);
133 }
134
135 printk("%s\nCall Trace:\n", loglvl);
136 i = 0;
137 stack = esp;
138 while (((unsigned long)stack & (THREAD_SIZE - 1)) < THREAD_SIZE-4) {
139 addr = *stack++;
140 /*
141 * If the address is either in the text segment of the
142 * kernel, or in the region which contains vmalloc'ed
143 * memory, it *may* be the address of a calling
144 * routine; if so, print it so that someone tracing
145 * down the cause of the crash will be able to figure
146 * out the call path that was taken.
147 */
148 if (check_kernel_text(addr)) {
149 if (i % 4 == 0)
150 printk("%s ", loglvl);
151 pr_cont(" [<%08lx>]", addr);
152 i++;
153 }
154 }
155 printk("%s\n", loglvl);
156 }
157