xref: /openbmc/linux/arch/x86/kernel/dumpstack_64.c (revision 8730046c)
1 /*
2  *  Copyright (C) 1991, 1992  Linus Torvalds
3  *  Copyright (C) 2000, 2001, 2002 Andi Kleen, SuSE Labs
4  */
5 #include <linux/kallsyms.h>
6 #include <linux/kprobes.h>
7 #include <linux/uaccess.h>
8 #include <linux/hardirq.h>
9 #include <linux/kdebug.h>
10 #include <linux/export.h>
11 #include <linux/ptrace.h>
12 #include <linux/kexec.h>
13 #include <linux/sysfs.h>
14 #include <linux/bug.h>
15 #include <linux/nmi.h>
16 
17 #include <asm/stacktrace.h>
18 
19 static char *exception_stack_names[N_EXCEPTION_STACKS] = {
20 		[ DOUBLEFAULT_STACK-1	]	= "#DF",
21 		[ NMI_STACK-1		]	= "NMI",
22 		[ DEBUG_STACK-1		]	= "#DB",
23 		[ MCE_STACK-1		]	= "#MC",
24 };
25 
26 static unsigned long exception_stack_sizes[N_EXCEPTION_STACKS] = {
27 	[0 ... N_EXCEPTION_STACKS - 1]		= EXCEPTION_STKSZ,
28 	[DEBUG_STACK - 1]			= DEBUG_STKSZ
29 };
30 
31 const char *stack_type_name(enum stack_type type)
32 {
33 	BUILD_BUG_ON(N_EXCEPTION_STACKS != 4);
34 
35 	if (type == STACK_TYPE_IRQ)
36 		return "IRQ";
37 
38 	if (type >= STACK_TYPE_EXCEPTION && type <= STACK_TYPE_EXCEPTION_LAST)
39 		return exception_stack_names[type - STACK_TYPE_EXCEPTION];
40 
41 	return NULL;
42 }
43 
44 static bool in_exception_stack(unsigned long *stack, struct stack_info *info)
45 {
46 	unsigned long *begin, *end;
47 	struct pt_regs *regs;
48 	unsigned k;
49 
50 	BUILD_BUG_ON(N_EXCEPTION_STACKS != 4);
51 
52 	for (k = 0; k < N_EXCEPTION_STACKS; k++) {
53 		end   = (unsigned long *)raw_cpu_ptr(&orig_ist)->ist[k];
54 		begin = end - (exception_stack_sizes[k] / sizeof(long));
55 		regs  = (struct pt_regs *)end - 1;
56 
57 		if (stack < begin || stack >= end)
58 			continue;
59 
60 		info->type	= STACK_TYPE_EXCEPTION + k;
61 		info->begin	= begin;
62 		info->end	= end;
63 		info->next_sp	= (unsigned long *)regs->sp;
64 
65 		return true;
66 	}
67 
68 	return false;
69 }
70 
71 static bool in_irq_stack(unsigned long *stack, struct stack_info *info)
72 {
73 	unsigned long *end   = (unsigned long *)this_cpu_read(irq_stack_ptr);
74 	unsigned long *begin = end - (IRQ_STACK_SIZE / sizeof(long));
75 
76 	/*
77 	 * This is a software stack, so 'end' can be a valid stack pointer.
78 	 * It just means the stack is empty.
79 	 */
80 	if (stack < begin || stack > end)
81 		return false;
82 
83 	info->type	= STACK_TYPE_IRQ;
84 	info->begin	= begin;
85 	info->end	= end;
86 
87 	/*
88 	 * The next stack pointer is the first thing pushed by the entry code
89 	 * after switching to the irq stack.
90 	 */
91 	info->next_sp = (unsigned long *)*(end - 1);
92 
93 	return true;
94 }
95 
96 int get_stack_info(unsigned long *stack, struct task_struct *task,
97 		   struct stack_info *info, unsigned long *visit_mask)
98 {
99 	if (!stack)
100 		goto unknown;
101 
102 	task = task ? : current;
103 
104 	if (in_task_stack(stack, task, info))
105 		goto recursion_check;
106 
107 	if (task != current)
108 		goto unknown;
109 
110 	if (in_exception_stack(stack, info))
111 		goto recursion_check;
112 
113 	if (in_irq_stack(stack, info))
114 		goto recursion_check;
115 
116 	goto unknown;
117 
118 recursion_check:
119 	/*
120 	 * Make sure we don't iterate through any given stack more than once.
121 	 * If it comes up a second time then there's something wrong going on:
122 	 * just break out and report an unknown stack type.
123 	 */
124 	if (visit_mask) {
125 		if (*visit_mask & (1UL << info->type)) {
126 			printk_deferred_once(KERN_WARNING "WARNING: stack recursion on stack type %d\n", info->type);
127 			goto unknown;
128 		}
129 		*visit_mask |= 1UL << info->type;
130 	}
131 
132 	return 0;
133 
134 unknown:
135 	info->type = STACK_TYPE_UNKNOWN;
136 	return -EINVAL;
137 }
138 
139 void show_regs(struct pt_regs *regs)
140 {
141 	int i;
142 
143 	show_regs_print_info(KERN_DEFAULT);
144 	__show_regs(regs, 1);
145 
146 	/*
147 	 * When in-kernel, we also print out the stack and code at the
148 	 * time of the fault..
149 	 */
150 	if (!user_mode(regs)) {
151 		unsigned int code_prologue = code_bytes * 43 / 64;
152 		unsigned int code_len = code_bytes;
153 		unsigned char c;
154 		u8 *ip;
155 
156 		show_trace_log_lvl(current, regs, NULL, KERN_DEFAULT);
157 
158 		printk(KERN_DEFAULT "Code: ");
159 
160 		ip = (u8 *)regs->ip - code_prologue;
161 		if (ip < (u8 *)PAGE_OFFSET || probe_kernel_address(ip, c)) {
162 			/* try starting at IP */
163 			ip = (u8 *)regs->ip;
164 			code_len = code_len - code_prologue + 1;
165 		}
166 		for (i = 0; i < code_len; i++, ip++) {
167 			if (ip < (u8 *)PAGE_OFFSET ||
168 					probe_kernel_address(ip, c)) {
169 				pr_cont(" Bad RIP value.");
170 				break;
171 			}
172 			if (ip == (u8 *)regs->ip)
173 				pr_cont("<%02x> ", c);
174 			else
175 				pr_cont("%02x ", c);
176 		}
177 	}
178 	pr_cont("\n");
179 }
180 
181 int is_valid_bugaddr(unsigned long ip)
182 {
183 	unsigned short ud2;
184 
185 	if (__copy_from_user(&ud2, (const void __user *) ip, sizeof(ud2)))
186 		return 0;
187 
188 	return ud2 == 0x0b0f;
189 }
190