xref: /linux/tools/perf/util/dwarf-regs.c (revision 23c48a124b469cee2eb0c75e6d22d366d1caa118)
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 <debug.h>
9 #include <dwarf-regs.h>
10 #include <elf.h>
11 #include <linux/kernel.h>
12 
13 #ifndef EM_AARCH64
14 #define EM_AARCH64	183  /* ARM 64 bit */
15 #endif
16 
17 /* Define const char * {arch}_register_tbl[] */
18 #define DEFINE_DWARF_REGSTR_TABLE
19 #include "../arch/x86/include/dwarf-regs-table.h"
20 #include "../arch/arm/include/dwarf-regs-table.h"
21 #include "../arch/arm64/include/dwarf-regs-table.h"
22 #include "../arch/sh/include/dwarf-regs-table.h"
23 #include "../arch/powerpc/include/dwarf-regs-table.h"
24 #include "../arch/s390/include/dwarf-regs-table.h"
25 #include "../arch/sparc/include/dwarf-regs-table.h"
26 #include "../arch/xtensa/include/dwarf-regs-table.h"
27 #include "../arch/mips/include/dwarf-regs-table.h"
28 
29 #define __get_dwarf_regstr(tbl, n) (((n) < ARRAY_SIZE(tbl)) ? (tbl)[(n)] : NULL)
30 
31 /* Return architecture dependent register string (for kprobe-tracer) */
32 const char *get_dwarf_regstr(unsigned int n, unsigned int machine)
33 {
34 	switch (machine) {
35 	case EM_NONE:	/* Generic arch - use host arch */
36 		return get_arch_regstr(n);
37 	case EM_386:
38 		return __get_dwarf_regstr(x86_32_regstr_tbl, n);
39 	case EM_X86_64:
40 		return __get_dwarf_regstr(x86_64_regstr_tbl, n);
41 	case EM_ARM:
42 		return __get_dwarf_regstr(arm_regstr_tbl, n);
43 	case EM_AARCH64:
44 		return __get_dwarf_regstr(aarch64_regstr_tbl, n);
45 	case EM_SH:
46 		return __get_dwarf_regstr(sh_regstr_tbl, n);
47 	case EM_S390:
48 		return __get_dwarf_regstr(s390_regstr_tbl, n);
49 	case EM_PPC:
50 	case EM_PPC64:
51 		return __get_dwarf_regstr(powerpc_regstr_tbl, n);
52 	case EM_SPARC:
53 	case EM_SPARCV9:
54 		return __get_dwarf_regstr(sparc_regstr_tbl, n);
55 	case EM_XTENSA:
56 		return __get_dwarf_regstr(xtensa_regstr_tbl, n);
57 	case EM_MIPS:
58 		return __get_dwarf_regstr(mips_regstr_tbl, n);
59 	default:
60 		pr_err("ELF MACHINE %x is not supported.\n", machine);
61 	}
62 	return NULL;
63 }
64