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