1*4882a593Smuzhiyun // SPDX-License-Identifier: GPL-2.0
2*4882a593Smuzhiyun #include <elfutils/libdwfl.h>
3*4882a593Smuzhiyun #include <linux/kernel.h>
4*4882a593Smuzhiyun #include "../../../util/unwind-libdw.h"
5*4882a593Smuzhiyun #include "../../../util/perf_regs.h"
6*4882a593Smuzhiyun #include "../../../util/event.h"
7*4882a593Smuzhiyun
8*4882a593Smuzhiyun /* See backends/ppc_initreg.c and backends/ppc_regs.c in elfutils. */
9*4882a593Smuzhiyun static const int special_regs[3][2] = {
10*4882a593Smuzhiyun { 65, PERF_REG_POWERPC_LINK },
11*4882a593Smuzhiyun { 101, PERF_REG_POWERPC_XER },
12*4882a593Smuzhiyun { 109, PERF_REG_POWERPC_CTR },
13*4882a593Smuzhiyun };
14*4882a593Smuzhiyun
libdw__arch_set_initial_registers(Dwfl_Thread * thread,void * arg)15*4882a593Smuzhiyun bool libdw__arch_set_initial_registers(Dwfl_Thread *thread, void *arg)
16*4882a593Smuzhiyun {
17*4882a593Smuzhiyun struct unwind_info *ui = arg;
18*4882a593Smuzhiyun struct regs_dump *user_regs = &ui->sample->user_regs;
19*4882a593Smuzhiyun Dwarf_Word dwarf_regs[32], dwarf_nip;
20*4882a593Smuzhiyun size_t i;
21*4882a593Smuzhiyun
22*4882a593Smuzhiyun #define REG(r) ({ \
23*4882a593Smuzhiyun Dwarf_Word val = 0; \
24*4882a593Smuzhiyun perf_reg_value(&val, user_regs, PERF_REG_POWERPC_##r); \
25*4882a593Smuzhiyun val; \
26*4882a593Smuzhiyun })
27*4882a593Smuzhiyun
28*4882a593Smuzhiyun dwarf_regs[0] = REG(R0);
29*4882a593Smuzhiyun dwarf_regs[1] = REG(R1);
30*4882a593Smuzhiyun dwarf_regs[2] = REG(R2);
31*4882a593Smuzhiyun dwarf_regs[3] = REG(R3);
32*4882a593Smuzhiyun dwarf_regs[4] = REG(R4);
33*4882a593Smuzhiyun dwarf_regs[5] = REG(R5);
34*4882a593Smuzhiyun dwarf_regs[6] = REG(R6);
35*4882a593Smuzhiyun dwarf_regs[7] = REG(R7);
36*4882a593Smuzhiyun dwarf_regs[8] = REG(R8);
37*4882a593Smuzhiyun dwarf_regs[9] = REG(R9);
38*4882a593Smuzhiyun dwarf_regs[10] = REG(R10);
39*4882a593Smuzhiyun dwarf_regs[11] = REG(R11);
40*4882a593Smuzhiyun dwarf_regs[12] = REG(R12);
41*4882a593Smuzhiyun dwarf_regs[13] = REG(R13);
42*4882a593Smuzhiyun dwarf_regs[14] = REG(R14);
43*4882a593Smuzhiyun dwarf_regs[15] = REG(R15);
44*4882a593Smuzhiyun dwarf_regs[16] = REG(R16);
45*4882a593Smuzhiyun dwarf_regs[17] = REG(R17);
46*4882a593Smuzhiyun dwarf_regs[18] = REG(R18);
47*4882a593Smuzhiyun dwarf_regs[19] = REG(R19);
48*4882a593Smuzhiyun dwarf_regs[20] = REG(R20);
49*4882a593Smuzhiyun dwarf_regs[21] = REG(R21);
50*4882a593Smuzhiyun dwarf_regs[22] = REG(R22);
51*4882a593Smuzhiyun dwarf_regs[23] = REG(R23);
52*4882a593Smuzhiyun dwarf_regs[24] = REG(R24);
53*4882a593Smuzhiyun dwarf_regs[25] = REG(R25);
54*4882a593Smuzhiyun dwarf_regs[26] = REG(R26);
55*4882a593Smuzhiyun dwarf_regs[27] = REG(R27);
56*4882a593Smuzhiyun dwarf_regs[28] = REG(R28);
57*4882a593Smuzhiyun dwarf_regs[29] = REG(R29);
58*4882a593Smuzhiyun dwarf_regs[30] = REG(R30);
59*4882a593Smuzhiyun dwarf_regs[31] = REG(R31);
60*4882a593Smuzhiyun if (!dwfl_thread_state_registers(thread, 0, 32, dwarf_regs))
61*4882a593Smuzhiyun return false;
62*4882a593Smuzhiyun
63*4882a593Smuzhiyun dwarf_nip = REG(NIP);
64*4882a593Smuzhiyun dwfl_thread_state_register_pc(thread, dwarf_nip);
65*4882a593Smuzhiyun for (i = 0; i < ARRAY_SIZE(special_regs); i++) {
66*4882a593Smuzhiyun Dwarf_Word val = 0;
67*4882a593Smuzhiyun perf_reg_value(&val, user_regs, special_regs[i][1]);
68*4882a593Smuzhiyun if (!dwfl_thread_state_registers(thread,
69*4882a593Smuzhiyun special_regs[i][0], 1,
70*4882a593Smuzhiyun &val))
71*4882a593Smuzhiyun return false;
72*4882a593Smuzhiyun }
73*4882a593Smuzhiyun
74*4882a593Smuzhiyun return true;
75*4882a593Smuzhiyun }
76