xref: /linux/tools/perf/util/dwarf-regs.c (revision a36e9f5cfe9eb3a1dce8769c7058251c42705357)
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) */
40 const 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 */
81 int 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(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