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 void stack_type_str(enum stack_type type, const char **begin, const char **end) 20 { 21 switch (type) { 22 case STACK_TYPE_IRQ: 23 case STACK_TYPE_SOFTIRQ: 24 *begin = "IRQ"; 25 *end = "EOI"; 26 break; 27 default: 28 *begin = NULL; 29 *end = NULL; 30 } 31 } 32 33 static bool in_hardirq_stack(unsigned long *stack, struct stack_info *info) 34 { 35 unsigned long *begin = (unsigned long *)this_cpu_read(hardirq_stack); 36 unsigned long *end = begin + (THREAD_SIZE / sizeof(long)); 37 38 /* 39 * This is a software stack, so 'end' can be a valid stack pointer. 40 * It just means the stack is empty. 41 */ 42 if (stack < begin || stack > end) 43 return false; 44 45 info->type = STACK_TYPE_IRQ; 46 info->begin = begin; 47 info->end = end; 48 49 /* 50 * See irq_32.c -- the next stack pointer is stored at the beginning of 51 * the stack. 52 */ 53 info->next_sp = (unsigned long *)*begin; 54 55 return true; 56 } 57 58 static bool in_softirq_stack(unsigned long *stack, struct stack_info *info) 59 { 60 unsigned long *begin = (unsigned long *)this_cpu_read(softirq_stack); 61 unsigned long *end = begin + (THREAD_SIZE / sizeof(long)); 62 63 /* 64 * This is a software stack, so 'end' can be a valid stack pointer. 65 * It just means the stack is empty. 66 */ 67 if (stack < begin || stack > end) 68 return false; 69 70 info->type = STACK_TYPE_SOFTIRQ; 71 info->begin = begin; 72 info->end = end; 73 74 /* 75 * The next stack pointer is stored at the beginning of the stack. 76 * See irq_32.c. 77 */ 78 info->next_sp = (unsigned long *)*begin; 79 80 return true; 81 } 82 83 int get_stack_info(unsigned long *stack, struct task_struct *task, 84 struct stack_info *info, unsigned long *visit_mask) 85 { 86 if (!stack) 87 goto unknown; 88 89 task = task ? : current; 90 91 if (in_task_stack(stack, task, info)) 92 goto recursion_check; 93 94 if (task != current) 95 goto unknown; 96 97 if (in_hardirq_stack(stack, info)) 98 goto recursion_check; 99 100 if (in_softirq_stack(stack, info)) 101 goto recursion_check; 102 103 goto unknown; 104 105 recursion_check: 106 /* 107 * Make sure we don't iterate through any given stack more than once. 108 * If it comes up a second time then there's something wrong going on: 109 * just break out and report an unknown stack type. 110 */ 111 if (visit_mask) { 112 if (*visit_mask & (1UL << info->type)) 113 goto unknown; 114 *visit_mask |= 1UL << info->type; 115 } 116 117 return 0; 118 119 unknown: 120 info->type = STACK_TYPE_UNKNOWN; 121 return -EINVAL; 122 } 123 124 void show_regs(struct pt_regs *regs) 125 { 126 int i; 127 128 show_regs_print_info(KERN_EMERG); 129 __show_regs(regs, !user_mode(regs)); 130 131 /* 132 * When in-kernel, we also print out the stack and code at the 133 * time of the fault.. 134 */ 135 if (!user_mode(regs)) { 136 unsigned int code_prologue = code_bytes * 43 / 64; 137 unsigned int code_len = code_bytes; 138 unsigned char c; 139 u8 *ip; 140 141 show_trace_log_lvl(current, regs, NULL, KERN_EMERG); 142 143 pr_emerg("Code:"); 144 145 ip = (u8 *)regs->ip - code_prologue; 146 if (ip < (u8 *)PAGE_OFFSET || probe_kernel_address(ip, c)) { 147 /* try starting at IP */ 148 ip = (u8 *)regs->ip; 149 code_len = code_len - code_prologue + 1; 150 } 151 for (i = 0; i < code_len; i++, ip++) { 152 if (ip < (u8 *)PAGE_OFFSET || 153 probe_kernel_address(ip, c)) { 154 pr_cont(" Bad EIP value."); 155 break; 156 } 157 if (ip == (u8 *)regs->ip) 158 pr_cont(" <%02x>", c); 159 else 160 pr_cont(" %02x", c); 161 } 162 } 163 pr_cont("\n"); 164 } 165 166 int is_valid_bugaddr(unsigned long ip) 167 { 168 unsigned short ud2; 169 170 if (ip < PAGE_OFFSET) 171 return 0; 172 if (probe_kernel_address((unsigned short *)ip, ud2)) 173 return 0; 174 175 return ud2 == 0x0b0f; 176 } 177