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 dump_trace(struct task_struct *task, struct pt_regs *regs, 125 unsigned long *stack, unsigned long bp, 126 const struct stacktrace_ops *ops, void *data) 127 { 128 unsigned long visit_mask = 0; 129 int graph = 0; 130 131 task = task ? : current; 132 stack = stack ? : get_stack_pointer(task, regs); 133 bp = bp ? : (unsigned long)get_frame_pointer(task, regs); 134 135 for (;;) { 136 const char *begin_str, *end_str; 137 struct stack_info info; 138 139 if (get_stack_info(stack, task, &info, &visit_mask)) 140 break; 141 142 stack_type_str(info.type, &begin_str, &end_str); 143 144 if (begin_str && ops->stack(data, begin_str) < 0) 145 break; 146 147 bp = ops->walk_stack(task, stack, bp, ops, data, &info, &graph); 148 149 if (end_str && ops->stack(data, end_str) < 0) 150 break; 151 152 stack = info.next_sp; 153 154 touch_nmi_watchdog(); 155 } 156 } 157 EXPORT_SYMBOL(dump_trace); 158 159 void 160 show_stack_log_lvl(struct task_struct *task, struct pt_regs *regs, 161 unsigned long *sp, unsigned long bp, char *log_lvl) 162 { 163 unsigned long *stack; 164 int i; 165 166 sp = sp ? : get_stack_pointer(task, regs); 167 168 stack = sp; 169 for (i = 0; i < kstack_depth_to_print; i++) { 170 if (kstack_end(stack)) 171 break; 172 if ((i % STACKSLOTS_PER_LINE) == 0) { 173 if (i != 0) 174 pr_cont("\n"); 175 printk("%s %08lx", log_lvl, *stack++); 176 } else 177 pr_cont(" %08lx", *stack++); 178 touch_nmi_watchdog(); 179 } 180 pr_cont("\n"); 181 show_trace_log_lvl(task, regs, sp, bp, log_lvl); 182 } 183 184 185 void show_regs(struct pt_regs *regs) 186 { 187 int i; 188 189 show_regs_print_info(KERN_EMERG); 190 __show_regs(regs, !user_mode(regs)); 191 192 /* 193 * When in-kernel, we also print out the stack and code at the 194 * time of the fault.. 195 */ 196 if (!user_mode(regs)) { 197 unsigned int code_prologue = code_bytes * 43 / 64; 198 unsigned int code_len = code_bytes; 199 unsigned char c; 200 u8 *ip; 201 202 pr_emerg("Stack:\n"); 203 show_stack_log_lvl(NULL, regs, NULL, 0, KERN_EMERG); 204 205 pr_emerg("Code:"); 206 207 ip = (u8 *)regs->ip - code_prologue; 208 if (ip < (u8 *)PAGE_OFFSET || probe_kernel_address(ip, c)) { 209 /* try starting at IP */ 210 ip = (u8 *)regs->ip; 211 code_len = code_len - code_prologue + 1; 212 } 213 for (i = 0; i < code_len; i++, ip++) { 214 if (ip < (u8 *)PAGE_OFFSET || 215 probe_kernel_address(ip, c)) { 216 pr_cont(" Bad EIP value."); 217 break; 218 } 219 if (ip == (u8 *)regs->ip) 220 pr_cont(" <%02x>", c); 221 else 222 pr_cont(" %02x", c); 223 } 224 } 225 pr_cont("\n"); 226 } 227 228 int is_valid_bugaddr(unsigned long ip) 229 { 230 unsigned short ud2; 231 232 if (ip < PAGE_OFFSET) 233 return 0; 234 if (probe_kernel_address((unsigned short *)ip, ud2)) 235 return 0; 236 237 return ud2 == 0x0b0f; 238 } 239