1// SPDX-License-Identifier: GPL-2.0
2/*
3 * dwarf-regs.c : Mapping of DWARF debug register numbers into register names.
4 *
5 * Written by: Masami Hiramatsu <mhiramat@kernel.org>
6 */
7
8#include <stdlib.h>
9#include <string.h>
10#include <debug.h>
11#include <dwarf-regs.h>
12#include <elf.h>
13#include <errno.h>
14#include <linux/kernel.h>
15
16#ifndef EM_AARCH64
17#define EM_AARCH64 183 /* ARM 64 bit */
18#endif
19
20#ifndef EM_LOONGARCH
21#define EM_LOONGARCH 258 /* LoongArch */
22#endif
23
24/* Define const char * {arch}_register_tbl[] */
25#define DEFINE_DWARF_REGSTR_TABLE
26#include "../arch/x86/include/dwarf-regs-table.h"
27#include "../arch/arm/include/dwarf-regs-table.h"
28#include "../arch/arm64/include/dwarf-regs-table.h"
29#include "../arch/sh/include/dwarf-regs-table.h"
30#include "../arch/powerpc/include/dwarf-regs-table.h"
31#include "../arch/s390/include/dwarf-regs-table.h"
32#include "../arch/sparc/include/dwarf-regs-table.h"
33#include "../arch/xtensa/include/dwarf-regs-table.h"
34#include "../arch/mips/include/dwarf-regs-table.h"
35#include "../arch/loongarch/include/dwarf-regs-table.h"
36
37#define __get_dwarf_regstr(tbl, n) (((n) < ARRAY_SIZE(tbl)) ? (tbl)[(n)] : NULL)
38
39/* Return architecture dependent register string (for kprobe-tracer) */
40const char *get_dwarf_regstr(unsigned int n, unsigned int machine)
41{
42 switch (machine) {
43 case EM_NONE: /* Generic arch - use host arch */
44 return get_arch_regstr(n);
45 case EM_386:
46 return __get_dwarf_regstr(x86_32_regstr_tbl, n);
47 case EM_X86_64:
48 return __get_dwarf_regstr(x86_64_regstr_tbl, n);
49 case EM_ARM:
50 return __get_dwarf_regstr(arm_regstr_tbl, n);
51 case EM_AARCH64:
52 return __get_dwarf_regstr(aarch64_regstr_tbl, n);
53 case EM_SH:
54 return __get_dwarf_regstr(sh_regstr_tbl, n);
55 case EM_S390:
56 return __get_dwarf_regstr(s390_regstr_tbl, n);
57 case EM_PPC:
58 case EM_PPC64:
59 return __get_dwarf_regstr(powerpc_regstr_tbl, n);
60 case EM_SPARC:
61 case EM_SPARCV9:
62 return __get_dwarf_regstr(sparc_regstr_tbl, n);
63 case EM_XTENSA:
64 return __get_dwarf_regstr(xtensa_regstr_tbl, n);
65 case EM_MIPS:
66 return __get_dwarf_regstr(mips_regstr_tbl, n);
67 case EM_LOONGARCH:
68 return __get_dwarf_regstr(loongarch_regstr_tbl, n);
69 default:
70 pr_err("ELF MACHINE %x is not supported.\n", machine);
71 }
72 return NULL;
73}
74
75__weak int get_arch_regnum(const char *name __maybe_unused)
76{
77 return -ENOTSUP;
78}
79
80/* Return DWARF register number from architecture register name */
81int get_dwarf_regnum(const char *name, unsigned int machine)
82{
83 char *regname = strdup(name);
84 int reg = -1;
85 char *p;
86
87 if (regname == NULL)
88 return -EINVAL;
89
90 /* For convenience, remove trailing characters */
91 p = strpbrk(regname, " ,)");
92 if (p)
93 *p = '\0';
94
95 switch (machine) {
96 case EM_NONE: /* Generic arch - use host arch */
97 reg = get_arch_regnum(name: regname);
98 break;
99 default:
100 pr_err("ELF MACHINE %x is not supported.\n", machine);
101 }
102 free(regname);
103 return reg;
104}
105

source code of linux/tools/perf/util/dwarf-regs.c