1 /*
2  * Copyright (C) 2007-2009 Michal Simek <monstr@monstr.eu>
3  * Copyright (C) 2007-2009 PetaLogix
4  * Copyright (C) 2006 Atmark Techno, Inc.
5  *
6  * This file is subject to the terms and conditions of the GNU General Public
7  * License. See the file "COPYING" in the main directory of this archive
8  * for more details.
9  */
10 
11 #include <linux/export.h>
12 #include <linux/kernel.h>
13 #include <linux/kallsyms.h>
14 #include <linux/sched.h>
15 #include <linux/sched/debug.h>
16 #include <linux/debug_locks.h>
17 
18 #include <asm/exceptions.h>
19 #include <asm/unwind.h>
20 
trap_init(void)21 void trap_init(void)
22 {
23 	__enable_hw_exceptions();
24 }
25 
26 static unsigned long kstack_depth_to_print;	/* 0 == entire stack */
27 
kstack_setup(char * s)28 static int __init kstack_setup(char *s)
29 {
30 	return !kstrtoul(s, 0, &kstack_depth_to_print);
31 }
32 __setup("kstack=", kstack_setup);
33 
show_stack(struct task_struct * task,unsigned long * sp,const char * loglvl)34 void show_stack(struct task_struct *task, unsigned long *sp, const char *loglvl)
35 {
36 	unsigned long words_to_show;
37 	u32 fp = (u32) sp;
38 
39 	if (fp == 0) {
40 		if (task) {
41 			fp = ((struct thread_info *)
42 				(task->stack))->cpu_context.r1;
43 		} else {
44 			/* Pick up caller of dump_stack() */
45 			fp = (u32)&sp - 8;
46 		}
47 	}
48 
49 	words_to_show = (THREAD_SIZE - (fp & (THREAD_SIZE - 1))) >> 2;
50 	if (kstack_depth_to_print && (words_to_show > kstack_depth_to_print))
51 		words_to_show = kstack_depth_to_print;
52 
53 	printk("%sKernel Stack:\n", loglvl);
54 
55 	/*
56 	 * Make the first line an 'odd' size if necessary to get
57 	 * remaining lines to start at an address multiple of 0x10
58 	 */
59 	if (fp & 0xF) {
60 		unsigned long line1_words = (0x10 - (fp & 0xF)) >> 2;
61 		if (line1_words < words_to_show) {
62 			print_hex_dump(KERN_INFO, "", DUMP_PREFIX_ADDRESS, 32,
63 				       4, (void *)fp, line1_words << 2, 0);
64 			fp += line1_words << 2;
65 			words_to_show -= line1_words;
66 		}
67 	}
68 	print_hex_dump(loglvl, "", DUMP_PREFIX_ADDRESS, 32, 4, (void *)fp,
69 		       words_to_show << 2, 0);
70 	printk("%s\n\nCall Trace:\n", loglvl);
71 	microblaze_unwind(task, NULL, loglvl);
72 	printk("%s\n", loglvl);
73 
74 	if (!task)
75 		task = current;
76 
77 	debug_show_held_locks(task);
78 }
79