1 // SPDX-License-Identifier: GPL-2.0 2 #include <linux/kernel.h> 3 #include <linux/stdarg.h> 4 #include <linux/string.h> 5 #include <linux/ctype.h> 6 #include <asm/stacktrace.h> 7 #include <asm/boot_data.h> 8 #include <asm/lowcore.h> 9 #include <asm/setup.h> 10 #include <asm/sclp.h> 11 #include <asm/uv.h> 12 #include "boot.h" 13 14 void print_stacktrace(unsigned long sp) 15 { 16 struct stack_info boot_stack = { STACK_TYPE_TASK, (unsigned long)_stack_start, 17 (unsigned long)_stack_end }; 18 bool first = true; 19 20 boot_emerg("Call Trace:\n"); 21 while (!(sp & 0x7) && on_stack(&boot_stack, sp, sizeof(struct stack_frame))) { 22 struct stack_frame *sf = (struct stack_frame *)sp; 23 24 if (first) 25 boot_emerg("(sp:%016lx [<%016lx>] %pS)\n", sp, sf->gprs[8], (void *)sf->gprs[8]); 26 else 27 boot_emerg(" sp:%016lx [<%016lx>] %pS\n", sp, sf->gprs[8], (void *)sf->gprs[8]); 28 if (sf->back_chain <= sp) 29 break; 30 sp = sf->back_chain; 31 first = false; 32 } 33 } 34 35 extern struct exception_table_entry __start___ex_table[]; 36 extern struct exception_table_entry __stop___ex_table[]; 37 38 static inline unsigned long extable_insn(const struct exception_table_entry *x) 39 { 40 return (unsigned long)&x->insn + x->insn; 41 } 42 43 static bool ex_handler(struct pt_regs *regs) 44 { 45 const struct exception_table_entry *ex; 46 47 for (ex = __start___ex_table; ex < __stop___ex_table; ex++) { 48 if (extable_insn(ex) != regs->psw.addr) 49 continue; 50 if (ex->type != EX_TYPE_FIXUP) 51 return false; 52 regs->psw.addr = extable_fixup(ex); 53 return true; 54 } 55 return false; 56 } 57 58 void do_pgm_check(struct pt_regs *regs) 59 { 60 struct psw_bits *psw = &psw_bits(regs->psw); 61 unsigned long *gpregs = regs->gprs; 62 63 if (ex_handler(regs)) 64 return; 65 if (bootdebug) 66 boot_rb_dump(); 67 boot_emerg("Linux version %s\n", kernel_version); 68 if (!is_prot_virt_guest() && early_command_line[0]) 69 boot_emerg("Kernel command line: %s\n", early_command_line); 70 boot_emerg("Kernel fault: interruption code %04x ilc:%d\n", 71 regs->int_code & 0xffff, regs->int_code >> 17); 72 if (kaslr_enabled()) { 73 boot_emerg("Kernel random base: %lx\n", __kaslr_offset); 74 boot_emerg("Kernel random base phys: %lx\n", __kaslr_offset_phys); 75 } 76 boot_emerg("PSW : %016lx %016lx (%pS)\n", 77 regs->psw.mask, regs->psw.addr, (void *)regs->psw.addr); 78 boot_emerg(" R:%x T:%x IO:%x EX:%x Key:%x M:%x W:%x P:%x AS:%x CC:%x PM:%x RI:%x EA:%x\n", 79 psw->per, psw->dat, psw->io, psw->ext, psw->key, psw->mcheck, 80 psw->wait, psw->pstate, psw->as, psw->cc, psw->pm, psw->ri, psw->eaba); 81 boot_emerg("GPRS: %016lx %016lx %016lx %016lx\n", gpregs[0], gpregs[1], gpregs[2], gpregs[3]); 82 boot_emerg(" %016lx %016lx %016lx %016lx\n", gpregs[4], gpregs[5], gpregs[6], gpregs[7]); 83 boot_emerg(" %016lx %016lx %016lx %016lx\n", gpregs[8], gpregs[9], gpregs[10], gpregs[11]); 84 boot_emerg(" %016lx %016lx %016lx %016lx\n", gpregs[12], gpregs[13], gpregs[14], gpregs[15]); 85 print_stacktrace(gpregs[15]); 86 boot_emerg("Last Breaking-Event-Address:\n"); 87 boot_emerg(" [<%016lx>] %pS\n", regs->last_break, (void *)regs->last_break); 88 /* Convert to disabled wait PSW */ 89 psw->io = 0; 90 psw->ext = 0; 91 psw->wait = 1; 92 } 93