Commit | Line | Data |
---|---|---|
65bc6093 MS |
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 | ||
f717a8d1 | 11 | #include <linux/cpu.h> |
d64af918 | 12 | #include <linux/export.h> |
65bc6093 MS |
13 | #include <linux/kernel.h> |
14 | #include <linux/kallsyms.h> | |
65bc6093 | 15 | #include <linux/sched.h> |
b17b0153 | 16 | #include <linux/sched/debug.h> |
65bc6093 MS |
17 | #include <linux/debug_locks.h> |
18 | ||
19 | #include <asm/exceptions.h> | |
ce3266c0 | 20 | #include <asm/unwind.h> |
65bc6093 MS |
21 | |
22 | void trap_init(void) | |
23 | { | |
24 | __enable_hw_exceptions(); | |
25 | } | |
26 | ||
ce3266c0 | 27 | static unsigned long kstack_depth_to_print; /* 0 == entire stack */ |
65bc6093 MS |
28 | |
29 | static int __init kstack_setup(char *s) | |
30 | { | |
6bd55f0b | 31 | return !kstrtoul(s, 0, &kstack_depth_to_print); |
65bc6093 MS |
32 | } |
33 | __setup("kstack=", kstack_setup); | |
34 | ||
9cb8f069 | 35 | void show_stack(struct task_struct *task, unsigned long *sp, const char *loglvl) |
65bc6093 | 36 | { |
ce3266c0 SM |
37 | unsigned long words_to_show; |
38 | u32 fp = (u32) sp; | |
39 | ||
40 | if (fp == 0) { | |
41 | if (task) { | |
42 | fp = ((struct thread_info *) | |
43 | (task->stack))->cpu_context.r1; | |
44 | } else { | |
45 | /* Pick up caller of dump_stack() */ | |
46 | fp = (u32)&sp - 8; | |
47 | } | |
48 | } | |
65bc6093 | 49 | |
ce3266c0 SM |
50 | words_to_show = (THREAD_SIZE - (fp & (THREAD_SIZE - 1))) >> 2; |
51 | if (kstack_depth_to_print && (words_to_show > kstack_depth_to_print)) | |
52 | words_to_show = kstack_depth_to_print; | |
53 | ||
35f3968b | 54 | printk("%sKernel Stack:\n", loglvl); |
ce3266c0 SM |
55 | |
56 | /* | |
57 | * Make the first line an 'odd' size if necessary to get | |
58 | * remaining lines to start at an address multiple of 0x10 | |
59 | */ | |
60 | if (fp & 0xF) { | |
61 | unsigned long line1_words = (0x10 - (fp & 0xF)) >> 2; | |
62 | if (line1_words < words_to_show) { | |
63 | print_hex_dump(KERN_INFO, "", DUMP_PREFIX_ADDRESS, 32, | |
64 | 4, (void *)fp, line1_words << 2, 0); | |
65 | fp += line1_words << 2; | |
66 | words_to_show -= line1_words; | |
67 | } | |
65bc6093 | 68 | } |
35f3968b | 69 | print_hex_dump(loglvl, "", DUMP_PREFIX_ADDRESS, 32, 4, (void *)fp, |
ce3266c0 | 70 | words_to_show << 2, 0); |
35f3968b DS |
71 | printk("%s\n\nCall Trace:\n", loglvl); |
72 | microblaze_unwind(task, NULL, loglvl); | |
73 | printk("%s\n", loglvl); | |
65bc6093 MS |
74 | |
75 | if (!task) | |
76 | task = current; | |
77 | ||
78 | debug_show_held_locks(task); | |
79 | } |