1*4882a593Smuzhiyun #include <linux/kernel.h> 2*4882a593Smuzhiyun #include <elfutils/libdwfl.h> 3*4882a593Smuzhiyun #include "../../util/unwind-libdw.h" 4*4882a593Smuzhiyun #include "../../util/perf_regs.h" 5*4882a593Smuzhiyun #include "../../util/event.h" 6*4882a593Smuzhiyun #include "dwarf-regs-table.h" 7*4882a593Smuzhiyun 8*4882a593Smuzhiyun libdw__arch_set_initial_registers(Dwfl_Thread * thread,void * arg)9*4882a593Smuzhiyunbool libdw__arch_set_initial_registers(Dwfl_Thread *thread, void *arg) 10*4882a593Smuzhiyun { 11*4882a593Smuzhiyun struct unwind_info *ui = arg; 12*4882a593Smuzhiyun struct regs_dump *user_regs = &ui->sample->user_regs; 13*4882a593Smuzhiyun Dwarf_Word dwarf_regs[ARRAY_SIZE(s390_dwarf_regs)]; 14*4882a593Smuzhiyun 15*4882a593Smuzhiyun #define REG(r) ({ \ 16*4882a593Smuzhiyun Dwarf_Word val = 0; \ 17*4882a593Smuzhiyun perf_reg_value(&val, user_regs, PERF_REG_S390_##r); \ 18*4882a593Smuzhiyun val; \ 19*4882a593Smuzhiyun }) 20*4882a593Smuzhiyun /* 21*4882a593Smuzhiyun * For DWARF register mapping details, 22*4882a593Smuzhiyun * see also perf/arch/s390/include/dwarf-regs-table.h 23*4882a593Smuzhiyun */ 24*4882a593Smuzhiyun dwarf_regs[0] = REG(R0); 25*4882a593Smuzhiyun dwarf_regs[1] = REG(R1); 26*4882a593Smuzhiyun dwarf_regs[2] = REG(R2); 27*4882a593Smuzhiyun dwarf_regs[3] = REG(R3); 28*4882a593Smuzhiyun dwarf_regs[4] = REG(R4); 29*4882a593Smuzhiyun dwarf_regs[5] = REG(R5); 30*4882a593Smuzhiyun dwarf_regs[6] = REG(R6); 31*4882a593Smuzhiyun dwarf_regs[7] = REG(R7); 32*4882a593Smuzhiyun dwarf_regs[8] = REG(R8); 33*4882a593Smuzhiyun dwarf_regs[9] = REG(R9); 34*4882a593Smuzhiyun dwarf_regs[10] = REG(R10); 35*4882a593Smuzhiyun dwarf_regs[11] = REG(R11); 36*4882a593Smuzhiyun dwarf_regs[12] = REG(R12); 37*4882a593Smuzhiyun dwarf_regs[13] = REG(R13); 38*4882a593Smuzhiyun dwarf_regs[14] = REG(R14); 39*4882a593Smuzhiyun dwarf_regs[15] = REG(R15); 40*4882a593Smuzhiyun 41*4882a593Smuzhiyun dwarf_regs[16] = REG(FP0); 42*4882a593Smuzhiyun dwarf_regs[17] = REG(FP2); 43*4882a593Smuzhiyun dwarf_regs[18] = REG(FP4); 44*4882a593Smuzhiyun dwarf_regs[19] = REG(FP6); 45*4882a593Smuzhiyun dwarf_regs[20] = REG(FP1); 46*4882a593Smuzhiyun dwarf_regs[21] = REG(FP3); 47*4882a593Smuzhiyun dwarf_regs[22] = REG(FP5); 48*4882a593Smuzhiyun dwarf_regs[23] = REG(FP7); 49*4882a593Smuzhiyun dwarf_regs[24] = REG(FP8); 50*4882a593Smuzhiyun dwarf_regs[25] = REG(FP10); 51*4882a593Smuzhiyun dwarf_regs[26] = REG(FP12); 52*4882a593Smuzhiyun dwarf_regs[27] = REG(FP14); 53*4882a593Smuzhiyun dwarf_regs[28] = REG(FP9); 54*4882a593Smuzhiyun dwarf_regs[29] = REG(FP11); 55*4882a593Smuzhiyun dwarf_regs[30] = REG(FP13); 56*4882a593Smuzhiyun dwarf_regs[31] = REG(FP15); 57*4882a593Smuzhiyun 58*4882a593Smuzhiyun dwarf_regs[64] = REG(MASK); 59*4882a593Smuzhiyun dwarf_regs[65] = REG(PC); 60*4882a593Smuzhiyun 61*4882a593Smuzhiyun dwfl_thread_state_register_pc(thread, dwarf_regs[65]); 62*4882a593Smuzhiyun return dwfl_thread_state_registers(thread, 0, 32, dwarf_regs); 63*4882a593Smuzhiyun } 64