dumpstack_32.c 3.6 KB
Newer Older
1 2 3 4
/*
 *  Copyright (C) 1991, 1992  Linus Torvalds
 *  Copyright (C) 2000, 2001, 2002 Andi Kleen, SuSE Labs
 */
5
#include <linux/sched/debug.h>
6 7 8 9 10
#include <linux/kallsyms.h>
#include <linux/kprobes.h>
#include <linux/uaccess.h>
#include <linux/hardirq.h>
#include <linux/kdebug.h>
11
#include <linux/export.h>
12 13
#include <linux/ptrace.h>
#include <linux/kexec.h>
14
#include <linux/sysfs.h>
15 16 17 18 19
#include <linux/bug.h>
#include <linux/nmi.h>

#include <asm/stacktrace.h>

20
const char *stack_type_name(enum stack_type type)
21
{
22 23 24 25 26 27 28
	if (type == STACK_TYPE_IRQ)
		return "IRQ";

	if (type == STACK_TYPE_SOFTIRQ)
		return "SOFTIRQ";

	return NULL;
29 30
}

31 32 33 34 35
static bool in_hardirq_stack(unsigned long *stack, struct stack_info *info)
{
	unsigned long *begin = (unsigned long *)this_cpu_read(hardirq_stack);
	unsigned long *end   = begin + (THREAD_SIZE / sizeof(long));

36 37 38 39
	/*
	 * This is a software stack, so 'end' can be a valid stack pointer.
	 * It just means the stack is empty.
	 */
40
	if (stack <= begin || stack > end)
41 42 43 44 45 46 47 48 49 50 51
		return false;

	info->type	= STACK_TYPE_IRQ;
	info->begin	= begin;
	info->end	= end;

	/*
	 * See irq_32.c -- the next stack pointer is stored at the beginning of
	 * the stack.
	 */
	info->next_sp	= (unsigned long *)*begin;
52

53 54 55 56
	return true;
}

static bool in_softirq_stack(unsigned long *stack, struct stack_info *info)
57
{
58 59 60
	unsigned long *begin = (unsigned long *)this_cpu_read(softirq_stack);
	unsigned long *end   = begin + (THREAD_SIZE / sizeof(long));

61 62 63 64
	/*
	 * This is a software stack, so 'end' can be a valid stack pointer.
	 * It just means the stack is empty.
	 */
65
	if (stack <= begin || stack > end)
66 67 68 69 70 71 72 73 74 75 76
		return false;

	info->type	= STACK_TYPE_SOFTIRQ;
	info->begin	= begin;
	info->end	= end;

	/*
	 * The next stack pointer is stored at the beginning of the stack.
	 * See irq_32.c.
	 */
	info->next_sp	= (unsigned long *)*begin;
77

78
	return true;
79 80
}

81 82
int get_stack_info(unsigned long *stack, struct task_struct *task,
		   struct stack_info *info, unsigned long *visit_mask)
83
{
84 85
	if (!stack)
		goto unknown;
86

87 88 89
	task = task ? : current;

	if (in_task_stack(stack, task, info))
90
		goto recursion_check;
91 92 93 94 95

	if (task != current)
		goto unknown;

	if (in_hardirq_stack(stack, info))
96
		goto recursion_check;
97 98

	if (in_softirq_stack(stack, info))
99 100 101 102 103 104 105 106 107 108 109
		goto recursion_check;

	goto unknown;

recursion_check:
	/*
	 * Make sure we don't iterate through any given stack more than once.
	 * If it comes up a second time then there's something wrong going on:
	 * just break out and report an unknown stack type.
	 */
	if (visit_mask) {
110 111
		if (*visit_mask & (1UL << info->type)) {
			printk_deferred_once(KERN_WARNING "WARNING: stack recursion on stack type %d\n", info->type);
112
			goto unknown;
113
		}
114 115 116 117
		*visit_mask |= 1UL << info->type;
	}

	return 0;
118 119 120 121

unknown:
	info->type = STACK_TYPE_UNKNOWN;
	return -EINVAL;
122
}
123

124
void show_regs(struct pt_regs *regs)
125 126 127
{
	int i;

128
	show_regs_print_info(KERN_EMERG);
129
	__show_regs(regs, !user_mode(regs));
130 131 132 133 134

	/*
	 * When in-kernel, we also print out the stack and code at the
	 * time of the fault..
	 */
135
	if (!user_mode(regs)) {
136 137 138 139 140
		unsigned int code_prologue = code_bytes * 43 / 64;
		unsigned int code_len = code_bytes;
		unsigned char c;
		u8 *ip;

141
		show_trace_log_lvl(current, regs, NULL, KERN_EMERG);
142

143
		pr_emerg("Code:");
144 145 146

		ip = (u8 *)regs->ip - code_prologue;
		if (ip < (u8 *)PAGE_OFFSET || probe_kernel_address(ip, c)) {
147
			/* try starting at IP */
148 149 150 151 152 153
			ip = (u8 *)regs->ip;
			code_len = code_len - code_prologue + 1;
		}
		for (i = 0; i < code_len; i++, ip++) {
			if (ip < (u8 *)PAGE_OFFSET ||
					probe_kernel_address(ip, c)) {
154
				pr_cont("  Bad EIP value.");
155 156 157
				break;
			}
			if (ip == (u8 *)regs->ip)
158
				pr_cont(" <%02x>", c);
159
			else
160
				pr_cont(" %02x", c);
161 162
		}
	}
163
	pr_cont("\n");
164
}