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(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