[PATCH] backends: add checks for _GLOBAL_OFFSET_TABLE_ on loongarch
Add handling of _GLOBAL_OFFSET_TABLE_. Before applying the patch: $ ./src/elflint --gnu-ld ./src/elflint section [35] '.symtab': _GLOBAL_OFFSET_TABLE_ symbol value 0x68548 does not match .got.plt section address 0x68238 After applying the patch: $ ./src/elflint --gnu-ld ./src/elflint No errors Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 4 backends/loongarch_init.c | 1 + backends/loongarch_symbol.c | 35 +++ 3 files changed, 40 insertions(+) diff --git a/backends/ChangeLog b/backends/ChangeLog index 81f08314..41071953 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,7 @@ +2023-04-01 Youling Tang + * loongarch_init.c (loongarch_init): Hook check_special_symbol. + * loongarch_symbol.c (loongarch_check_special_symbol): New function. + 2023-02-07 Mark Wielaard * libebl_CPU.h (dwarf_peeled_die_type): Explicitly handle diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 59d8cc3d..b641b07f 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -46,6 +46,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), loongarch_init_reloc (eh); HOOK (eh, reloc_simple_type); HOOK (eh, machine_flag_check); + HOOK (eh, check_special_symbol); return eh; } diff --git a/backends/loongarch_symbol.c b/backends/loongarch_symbol.c index 43306ab8..5ce55bad 100644 --- a/backends/loongarch_symbol.c +++ b/backends/loongarch_symbol.c @@ -79,3 +79,38 @@ loongarch_machine_flag_check (GElf_Word flags) return ((flags &~ (EF_LARCH_ABI_MODIFIER_MASK | EF_LARCH_OBJABI_V1)) == 0); } + +/* Check whether given symbol's st_value and st_size are OK despite failing + normal checks. */ +bool +loongarch_check_special_symbol (Elf *elf, const GElf_Sym *sym, + const char *name, const GElf_Shdr *destshdr) +{ + if (name != NULL + && strcmp (name, "_GLOBAL_OFFSET_TABLE_") == 0) +{ + size_t shstrndx; + if (elf_getshdrstrndx (elf, &shstrndx) != 0) + return false; + const char *sname = elf_strptr (elf, shstrndx, destshdr->sh_name); + if (sname != NULL + && (strcmp (sname, ".got") == 0 || strcmp (sname, ".got.plt") == 0)) + { + Elf_Scn *scn = NULL; + while ((scn = elf_nextscn (elf, scn)) != NULL) + { + GElf_Shdr shdr_mem; + GElf_Shdr *shdr = gelf_getshdr (scn, &shdr_mem); + if (shdr != NULL) + { + sname = elf_strptr (elf, shstrndx, shdr->sh_name); + if (sname != NULL && strcmp (sname, ".got") == 0) + return (sym->st_value >= shdr->sh_addr + && sym->st_value < shdr->sh_addr + shdr->sh_size); + } + } + } +} + + return false; +} -- 2.37.1
[PATCH 2/2] backends: Add new relocation type handling for LoongArch
Add new relocation type handling. Signed-off-by: Youling Tang --- backends/ChangeLog | 4 backends/loongarch_reloc.def | 40 2 files changed, 44 insertions(+) diff --git a/backends/ChangeLog b/backends/ChangeLog index 41071953..cff82b01 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,7 @@ +2023-04-01 Youling Tang + + * loongarch_reloc.def: Add RELOC_TYPE B16 to RELAX. + 2023-04-01 Youling Tang * loongarch_init.c (loongarch_init): Hook check_special_symbol. * loongarch_symbol.c (loongarch_check_special_symbol): New function. diff --git a/backends/loongarch_reloc.def b/backends/loongarch_reloc.def index dd4a6b6d..fd204924 100644 --- a/backends/loongarch_reloc.def +++ b/backends/loongarch_reloc.def @@ -79,3 +79,43 @@ RELOC_TYPE (SUB32, REL) RELOC_TYPE (SUB64, REL) RELOC_TYPE (GNU_VTINHERIT, REL) RELOC_TYPE (GNU_VTENTRY, REL) + +/* reserved 59-63 */ + +RELOC_TYPE (B16, REL) +RELOC_TYPE (B21, REL) +RELOC_TYPE (B26, REL) +RELOC_TYPE (ABS_HI20, REL) +RELOC_TYPE (ABS_LO12, REL) +RELOC_TYPE (ABS64_LO20,REL) +RELOC_TYPE (ABS64_HI12,REL) +RELOC_TYPE (PCALA_HI20,REL) +RELOC_TYPE (PCALA_LO12,REL) +RELOC_TYPE (PCALA64_LO20, REL) +RELOC_TYPE (PCALA64_HI12, REL) +RELOC_TYPE (GOT_PC_HI20, REL) +RELOC_TYPE (GOT_PC_LO12, REL) +RELOC_TYPE (GOT64_PC_LO20, REL) +RELOC_TYPE (GOT64_PC_HI12, REL) +RELOC_TYPE (GOT_HI20, REL) +RELOC_TYPE (GOT_LO12, REL) +RELOC_TYPE (GOT64_LO20,REL) +RELOC_TYPE (GOT64_HI12,REL) +RELOC_TYPE (TLS_LE_HI20, REL) +RELOC_TYPE (TLS_LE_LO12, REL) +RELOC_TYPE (TLS_LE64_LO20, REL) +RELOC_TYPE (TLS_LE64_HI12, REL) +RELOC_TYPE (TLS_IE_PC_HI20,REL) +RELOC_TYPE (TLS_IE_PC_LO12,REL) +RELOC_TYPE (TLS_IE64_PC_LO20, REL) +RELOC_TYPE (TLS_IE64_PC_HI12, REL) +RELOC_TYPE (TLS_IE_HI20, REL) +RELOC_TYPE (TLS_IE_LO12, REL) +RELOC_TYPE (TLS_IE64_LO20, REL) +RELOC_TYPE (TLS_IE64_HI12, REL) +RELOC_TYPE (TLS_LD_PC_HI20,REL) +RELOC_TYPE (TLS_LD_HI20, REL) +RELOC_TYPE (TLS_GD_PC_HI20,REL) +RELOC_TYPE (TLS_GD_HI20, REL) +RELOC_TYPE (32_PCREL, REL) +RELOC_TYPE (RELAX, REL) -- 2.37.1
[PATCH 1/2] libelf: Sync elf.h from glibc.
Adds R_LARCH_*. Signed-off-by: Youling Tang --- libelf/ChangeLog | 4 libelf/elf.h | 42 +- 2 files changed, 45 insertions(+), 1 deletion(-) diff --git a/libelf/ChangeLog b/libelf/ChangeLog index 8cc3c53c..1d5178ca 100644 --- a/libelf/ChangeLog +++ b/libelf/ChangeLog @@ -1,3 +1,7 @@ +2023-04-01 Youling Tang + + * elf.h: Update from glibc. + 2023-03-03 Mark Wielaard * libelf.h: Define ELFCOMPRESS_ZSTD if undefined. diff --git a/libelf/elf.h b/libelf/elf.h index da41bad3..4bc0e429 100644 --- a/libelf/elf.h +++ b/libelf/elf.h @@ -1,5 +1,5 @@ /* This file defines standard ELF types, structures, and macros. - Copyright (C) 1995-2022 Free Software Foundation, Inc. + Copyright (C) 1995-2023 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or @@ -4159,6 +4159,46 @@ enum #define R_LARCH_GNU_VTINHERIT 57 #define R_LARCH_GNU_VTENTRY 58 +/* reserved 59-63 */ + +#define R_LARCH_B16 64 +#define R_LARCH_B21 65 +#define R_LARCH_B26 66 +#define R_LARCH_ABS_HI20 67 +#define R_LARCH_ABS_LO12 68 +#define R_LARCH_ABS64_LO20 69 +#define R_LARCH_ABS64_HI12 70 +#define R_LARCH_PCALA_HI20 71 +#define R_LARCH_PCALA_LO12 72 +#define R_LARCH_PCALA64_LO20 73 +#define R_LARCH_PCALA64_HI12 74 +#define R_LARCH_GOT_PC_HI20 75 +#define R_LARCH_GOT_PC_LO12 76 +#define R_LARCH_GOT64_PC_LO20 77 +#define R_LARCH_GOT64_PC_HI12 78 +#define R_LARCH_GOT_HI20 79 +#define R_LARCH_GOT_LO12 80 +#define R_LARCH_GOT64_LO20 81 +#define R_LARCH_GOT64_HI12 82 +#define R_LARCH_TLS_LE_HI20 83 +#define R_LARCH_TLS_LE_LO12 84 +#define R_LARCH_TLS_LE64_LO20 85 +#define R_LARCH_TLS_LE64_HI12 86 +#define R_LARCH_TLS_IE_PC_HI20 87 +#define R_LARCH_TLS_IE_PC_LO12 88 +#define R_LARCH_TLS_IE64_PC_LO20 89 +#define R_LARCH_TLS_IE64_PC_HI12 90 +#define R_LARCH_TLS_IE_HI20 91 +#define R_LARCH_TLS_IE_LO12 92 +#define R_LARCH_TLS_IE64_LO20 93 +#define R_LARCH_TLS_IE64_HI12 94 +#define R_LARCH_TLS_LD_PC_HI20 95 +#define R_LARCH_TLS_LD_HI20 96 +#define R_LARCH_TLS_GD_PC_HI20 97 +#define R_LARCH_TLS_GD_HI20 98 +#define R_LARCH_32_PCREL 99 +#define R_LARCH_RELAX 100 + /* ARC specific declarations. */ /* Processor specific flags for the Ehdr e_flags field. */ -- 2.37.1
Re: [PATCH] backends: add checks for _GLOBAL_OFFSET_TABLE_ on loongarch
Hi, Hengqi On 04/04/2023 11:45 PM, Hengqi Chen wrote: Hi, Youling On Sat, Apr 1, 2023 at 11:19 AM Youling Tang wrote: Add handling of _GLOBAL_OFFSET_TABLE_. Before applying the patch: $ ./src/elflint --gnu-ld ./src/elflint section [35] '.symtab': _GLOBAL_OFFSET_TABLE_ symbol value 0x68548 does not match .got.plt section address 0x68238 After applying the patch: $ ./src/elflint --gnu-ld ./src/elflint No errors Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 4 backends/loongarch_init.c | 1 + backends/loongarch_symbol.c | 35 +++ 3 files changed, 40 insertions(+) diff --git a/backends/ChangeLog b/backends/ChangeLog index 81f08314..41071953 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,7 @@ +2023-04-01 Youling Tang + * loongarch_init.c (loongarch_init): Hook check_special_symbol. + * loongarch_symbol.c (loongarch_check_special_symbol): New function. + 2023-02-07 Mark Wielaard * libebl_CPU.h (dwarf_peeled_die_type): Explicitly handle diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 59d8cc3d..b641b07f 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -46,6 +46,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), loongarch_init_reloc (eh); HOOK (eh, reloc_simple_type); HOOK (eh, machine_flag_check); + HOOK (eh, check_special_symbol); return eh; } diff --git a/backends/loongarch_symbol.c b/backends/loongarch_symbol.c index 43306ab8..5ce55bad 100644 --- a/backends/loongarch_symbol.c +++ b/backends/loongarch_symbol.c @@ -79,3 +79,38 @@ loongarch_machine_flag_check (GElf_Word flags) return ((flags &~ (EF_LARCH_ABI_MODIFIER_MASK | EF_LARCH_OBJABI_V1)) == 0); } + +/* Check whether given symbol's st_value and st_size are OK despite failing + normal checks. */ +bool +loongarch_check_special_symbol (Elf *elf, const GElf_Sym *sym, + const char *name, const GElf_Shdr *destshdr) +{ + if (name != NULL + && strcmp (name, "_GLOBAL_OFFSET_TABLE_") == 0) +{ + size_t shstrndx; + if (elf_getshdrstrndx (elf, &shstrndx) != 0) + return false; + const char *sname = elf_strptr (elf, shstrndx, destshdr->sh_name); + if (sname != NULL + && (strcmp (sname, ".got") == 0 || strcmp (sname, ".got.plt") == 0)) + { + Elf_Scn *scn = NULL; + while ((scn = elf_nextscn (elf, scn)) != NULL) + { + GElf_Shdr shdr_mem; + GElf_Shdr *shdr = gelf_getshdr (scn, &shdr_mem); + if (shdr != NULL) + { + sname = elf_strptr (elf, shstrndx, shdr->sh_name); + if (sname != NULL && strcmp (sname, ".got") == 0) + return (sym->st_value >= shdr->sh_addr + && sym->st_value < shdr->sh_addr + shdr->sh_size); + } + } + } +} + + return false; +} -- 2.37.1 I've tested this locally, but still remains one error: section [34] '.symtab': _DYNAMIC symbol size 0 does not match dynamic segment size 480 The problem should be independent of this patch, but I can't reproduce it. - Test Environment 1: Old Toolchain: $ cat /etc/os-release NAME="My GNU/Linux System for LoongArch64" VERSION="5.0" ID=CLFS4LA64 PRETTY_NAME="My GNU/Linux System for LoongArch64 5.0" $ gcc -v gcc version 12.1.0 (GCC) $ ./src/elflint --gnu-ld ./src/elflint No errors - Test Environment 2: New Toolchain: $ cat /etc/os-release NAME="My GNU/Linux System for LoongArch64" VERSION="6.0" ID=CLFS4LA64 PRETTY_NAME="My GNU/Linux System for LoongArch64 6.0" $ gcc -v gcc version 13.0.0 20220919 (experimental) (GCC) $ ./src/elflint --gnu-ld ./src/elflint No errors Can you provide your test environment, or help debug the possible causes of the problem? Thanks, Youling.
[PATCH 0/5] Improve LoongArch support
Test Environment (New Toolchain): $ cat /etc/os-release NAME="My GNU/Linux System for LoongArch64" VERSION="6.0" ID=CLFS4LA64 PRETTY_NAME="My GNU/Linux System for LoongArch64 6.0" $ gcc -v gcc version 13.0.0 20220919 (experimental) (GCC) Test Results: Testsuite summary for elfutils 0.189 # TOTAL: 238 # PASS: 234 # SKIP: 4 # XFAIL: 0 # FAIL: 0 # XPASS: 0 # ERROR: 0 ======== Youling Tang (5): backends: Add abi_cfi and register_info callbacks for LoongArch backends: Add set_initial_registers_tid callback for LoongArch backends: Add initial return value location support for LoongArch backends: Add frame pointer unwinding for LoongArch backends: Add core_note callback for LoongArch backends/ChangeLog| 33 +- backends/Makefile.am | 4 +- backends/loongarch_cfi.c | 83 ++ backends/loongarch_corenote.c | 114 +++ backends/loongarch_init.c | 10 ++ backends/loongarch_initreg.c | 91 +++ backends/loongarch_regs.c | 141 backends/loongarch_retval.c | 202 ++ backends/loongarch_unwind.c | 84 ++ 9 files changed, 760 insertions(+), 2 deletions(-) create mode 100644 backends/loongarch_cfi.c create mode 100644 backends/loongarch_corenote.c create mode 100644 backends/loongarch_initreg.c create mode 100644 backends/loongarch_regs.c create mode 100644 backends/loongarch_retval.c create mode 100644 backends/loongarch_unwind.c -- 2.37.1
[PATCH 1/5] backends: Add abi_cfi and register_info callbacks for LoongArch
LoongArch Reference Manual - Volume 1: https://loongson.github.io/LoongArch-Documentation/LoongArch-Vol1-EN.html LoongArch ELF ABI: https://loongson.github.io/LoongArch-Documentation/LoongArch-ELF-ABI-EN.html Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog| 9 ++- backends/Makefile.am | 3 +- backends/loongarch_cfi.c | 83 ++ backends/loongarch_init.c | 4 ++ backends/loongarch_regs.c | 141 ++ 5 files changed, 238 insertions(+), 2 deletions(-) create mode 100644 backends/loongarch_cfi.c create mode 100644 backends/loongarch_regs.c diff --git a/backends/ChangeLog b/backends/ChangeLog index 7bde2919..926c76ed 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,4 +1,11 @@ -2023-04-01 Youling Tang +2023-04-07 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_cfi.c and loongarch_regs.c. + * loongarch_cfi.c: New file. + * loongarch_regs.c: Likewise. + * loongarch_init.c (loongarch_init): Hook register_info and abi_cfi. + +2023-04-01 Youling Tang * loongarch_init.c (loongarch_init): Hook check_special_symbol. * loongarch_symbol.c (loongarch_check_special_symbol): New function. diff --git a/backends/Makefile.am b/backends/Makefile.am index f373e5fb..2b6f08ce 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -96,7 +96,8 @@ riscv_SRCS = riscv_init.c riscv_symbol.c riscv_cfi.c riscv_regs.c \ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ csky_regs.c csky_initreg.c csky_corenote.c -loongarch_SRCS = loongarch_init.c loongarch_symbol.c +loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ + loongarch_regs.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_cfi.c b/backends/loongarch_cfi.c new file mode 100644 index ..5f3cd2c7 --- /dev/null +++ b/backends/loongarch_cfi.c @@ -0,0 +1,83 @@ +/* LoongArch ABI-specified defaults for DWARF CFI. + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limted. + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#include + +#define BACKEND loongarch_ +#include "libebl_CPU.h" + +/* LoongArch ELF ABI specification: +https://loongson.github.io/LoongArch-Documentation/LoongArch-ELF-ABI-EN.html#_register_convention +*/ +int +loongarch_abi_cfi (Ebl *ebl __attribute__ ((unused)), Dwarf_CIE *abi_info) +{ + static const uint8_t abi_cfi[] = +{ + /* The initial Canonical Frame Address is the value of the + Stack Pointer ($r3) as setup in the previous frame. */ + DW_CFA_def_cfa, ULEB128_7 (3), ULEB128_7 (0), + + /* The Stack Pointer ($r3) is restored from CFA address by default. */ + DW_CFA_val_offset, ULEB128_7 (3), ULEB128_7 (0), + +#define SV(n) DW_CFA_same_value, ULEB128_7 (n) + /* The return address register contains the return address setup by +caller. */ + SV (1), + + /* Callee-saved registers $s0-$s7. */ + SV (23), SV (24), SV (25), SV (26), SV (27), SV (28), + SV (29), SV (30), SV (31), + + /* The Frame Pointer ($fp, $r22) */ + SV(22), + + /* Callee-saved registers $fs0-$fs7. */ + SV (56), SV (57), SV (58), SV (59), SV (60), SV (61), + SV (62), SV (63), +#undef SV + + /* XXX Note: registers intentionally unused by the program, +for example as a consequence of the procedure call standard +should be initialized as if by DW_CFA_same_value. */ +}; + + abi_info->initial_instructions = abi_cfi; + abi_info->initial_instructions_end = &abi_cfi[sizeof abi_cfi]; + abi_info->data_alignment_factor = -4; + + abi_info->return_address_register = 1; /* ra. */ + + return 0; +} diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index b641b07f..7bfaaa7f 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @
[PATCH 2/5] backends: Add set_initial_registers_tid callback for LoongArch
This patch implements the set_initial_registers_tid hook for LoongArch. Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 6 +++ backends/Makefile.am | 2 +- backends/loongarch_init.c| 1 + backends/loongarch_initreg.c | 91 4 files changed, 99 insertions(+), 1 deletion(-) create mode 100644 backends/loongarch_initreg.c diff --git a/backends/ChangeLog b/backends/ChangeLog index 926c76ed..85abc8a5 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,9 @@ +2023-04-07 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_initreg.c. + * loongarch_initreg.c: New file. + * loongarch_init.c (loongarch_init): Hook set_initial_registers_tid. + 2023-04-07 Youling Tang * Makefile.am (loongarch_SRCS): Add loongarch_cfi.c and loongarch_regs.c. diff --git a/backends/Makefile.am b/backends/Makefile.am index 2b6f08ce..e7055d7e 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -97,7 +97,7 @@ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ csky_regs.c csky_initreg.c csky_corenote.c loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ - loongarch_regs.c + loongarch_regs.c loongarch_initreg.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 7bfaaa7f..9c4b94a0 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -51,6 +51,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), /* gcc/config/ #define DWARF_FRAME_REGISTERS. */ eh->frame_nregs = 74; HOOK (eh, check_special_symbol); + HOOK (eh, set_initial_registers_tid); return eh; } diff --git a/backends/loongarch_initreg.c b/backends/loongarch_initreg.c new file mode 100644 index ..75497a51 --- /dev/null +++ b/backends/loongarch_initreg.c @@ -0,0 +1,91 @@ +/* Fetch live process registers from TID. + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limted. + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#include "system.h" +#include +#if defined __loongarch__ && defined __linux__ +# include +# include +# include +#endif + +#define BACKEND loongarch_ +#include "libebl_CPU.h" + +bool +loongarch_set_initial_registers_tid (pid_t tid __attribute__ ((unused)), +ebl_tid_registers_t *setfunc __attribute__ ((unused)), +void *arg __attribute__ ((unused))) +{ +#if !defined __loongarch__ || !defined __linux__ + return false; +#else /* __loongarch__ */ + + /* General registers. */ + struct user_regs_struct gregs; + struct iovec iovec; + iovec.iov_base = &gregs; + iovec.iov_len = sizeof (gregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_PRSTATUS, &iovec) != 0) +return false; + + /* $r0 is constant 0. */ + Dwarf_Word zero = 0; + if (! setfunc (0, 1, &zero, arg)) +return false; + + /* $r1-$r31. */ + if (! setfunc (1, 32, (Dwarf_Word *) &gregs.regs[1], arg)) +return false; + + /* PC. */ + if (! setfunc (-1, 1, (Dwarf_Word *) &gregs.csr_era, arg)) +return false; + + /* Floating-point registers (only 64bits are used). */ + struct user_fp_struct fregs; + iovec.iov_base = &fregs; + iovec.iov_len = sizeof (fregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) +return false; + + Dwarf_Word dwarf_fregs[32]; + for (int r = 0; r < 32; r++) +dwarf_fregs[r] = fregs.fpr[r] & 0x; + + if (! setfunc (32, 32, dwarf_fregs, arg)) +return false; + + return true; +#endif /* __loongarch__ */ +} -- 2.37.1
[PATCH 4/5] backends: Add frame pointer unwinding for LoongArch
If we don't find any debug information for a given frame, we usually cannot unwind any further. However, the binary in question might have been compiled with frame pointers, in which case we can look up the well known frame pointer locations in the stack snapshot and use them to bridge the frames without debug information. Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 6 +++ backends/Makefile.am| 3 +- backends/loongarch_init.c | 1 + backends/loongarch_unwind.c | 84 + 4 files changed, 93 insertions(+), 1 deletion(-) create mode 100644 backends/loongarch_unwind.c diff --git a/backends/ChangeLog b/backends/ChangeLog index 40564ca7..ae385fe0 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,9 @@ +2023-04-07 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_unwind.c. + * loongarch_init.c (loongarch_init): Hook unwind. + * loongarch_unwind.c: New file. + 2023-04-07 Youling Tang * Makefile.am (loongarch_SRCS): Add loongarch_retval.c. diff --git a/backends/Makefile.am b/backends/Makefile.am index 9277ed59..848e520c 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -97,7 +97,8 @@ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ csky_regs.c csky_initreg.c csky_corenote.c loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ - loongarch_regs.c loongarch_initreg.c loongarch_retval.c + loongarch_regs.c loongarch_initreg.c loongarch_retval.c \ + loongarch_unwind.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 8892a2e6..808ff131 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -55,6 +55,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), HOOK (eh, check_special_symbol); HOOK (eh, set_initial_registers_tid); HOOK (eh, return_value_location); + HOOK (eh, unwind); return eh; } diff --git a/backends/loongarch_unwind.c b/backends/loongarch_unwind.c new file mode 100644 index ..fb748083 --- /dev/null +++ b/backends/loongarch_unwind.c @@ -0,0 +1,84 @@ +/* Get previous frame state for an existing frame state. + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limited. + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#define BACKEND loongarch_ +#define RA_REG 1 +#define SP_REG 3 +#define FP_REG 22 + +#define RA_OFFSET 8 +#define FP_OFFSET 16 + +#include "libebl_CPU.h" + +/* There was no CFI. Maybe we happen to have a frame pointer and can unwind from that? */ + +bool +EBLHOOK(unwind) (Ebl *ebl __attribute__ ((unused)), Dwarf_Addr pc __attribute__ ((unused)), + ebl_tid_registers_t *setfunc, ebl_tid_registers_get_t *getfunc, + ebl_pid_memory_read_t *readfunc, void *arg, + bool *signal_framep __attribute__ ((unused))) +{ + Dwarf_Word fp, ra, sp; + + if (!getfunc(RA_REG, 1, &ra, arg)) +return false; + + if (ra == 0 || !setfunc(-1, 1, &ra, arg)) +return false; + + if (!getfunc(FP_REG, 1, &fp, arg)) +fp = 0; + + if (!getfunc(SP_REG, 1, &sp, arg)) +sp = 0; + + Dwarf_Word newRa, newFp, newSp; + + if (!readfunc(fp - RA_OFFSET, &newRa, arg)) +newRa = 0; + + if (!readfunc(fp - FP_OFFSET, &newFp, arg)) +newFp = 0; + + newSp = fp; + + // These are not fatal if they don't work. They will just prevent unwinding at the next frame. + setfunc(RA_REG, 1, &newRa, arg); + setfunc(FP_REG, 1, &newFp, arg); + setfunc(SP_REG, 1, &newSp, arg); + + // If the fp is invalid, we might still have a valid ra. + // But if the fp is valid, then the stack should be moving in the right direction. + return fp == 0 || newSp > sp; +} -- 2.37.1
[PATCH 5/5] backends: Add core_note callback for LoongArch
Signed-off-by: Youling Tang --- backends/ChangeLog| 6 ++ backends/Makefile.am | 2 +- backends/loongarch_corenote.c | 114 ++ backends/loongarch_init.c | 1 + 4 files changed, 122 insertions(+), 1 deletion(-) create mode 100644 backends/loongarch_corenote.c diff --git a/backends/ChangeLog b/backends/ChangeLog index ae385fe0..4575c16b 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,9 @@ +2023-04-07 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_corenote.c. + * loongarch_init.c (loongarch_init): Hook core_note. + * loongarch_corenote.c: New file. + 2023-04-07 Youling Tang * Makefile.am (loongarch_SRCS): Add loongarch_unwind.c. diff --git a/backends/Makefile.am b/backends/Makefile.am index 848e520c..c8459128 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -98,7 +98,7 @@ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ loongarch_regs.c loongarch_initreg.c loongarch_retval.c \ - loongarch_unwind.c + loongarch_unwind.c loongarch_corenote.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_corenote.c b/backends/loongarch_corenote.c new file mode 100644 index ..b549edc0 --- /dev/null +++ b/backends/loongarch_corenote.c @@ -0,0 +1,114 @@ +/* LoongArch specific core note handling. + Copyright (C) 2023 Loongson Technology Corporation Limited. + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#include +#include +#include +#include +#include + +#define BACKEND loongarch_ +#include "libebl_CPU.h" + +#defineULONG uint64_t +#define PID_T int32_t +#defineUID_T uint32_t +#defineGID_T uint32_t +#define ALIGN_ULONG8 +#define ALIGN_PID_T4 +#define ALIGN_UID_T4 +#define ALIGN_GID_T4 +#define TYPE_ULONG ELF_T_XWORD +#define TYPE_PID_T ELF_T_SWORD +#define TYPE_UID_T ELF_T_WORD +#define TYPE_GID_T ELF_T_WORD + +#define PRSTATUS_REGS_SIZE (45 * 8) + +static const Ebl_Register_Location prstatus_regs[] = + { +{ .offset = 0, .regno = 0, .count = 32, .bits = 64 }, /* r0..r31 */ + }; + +#define PRSTATUS_REGSET_ITEMS \ + {\ +.name = "orig_a0", .type = ELF_T_XWORD, .format = 'x', \ +.offset = (offsetof (struct EBLHOOK(prstatus), pr_reg) \ + + 32 * 8), \ +.group = "register" \ + }, \ + {\ +.name = "csr_era", .type = ELF_T_XWORD, .format = 'x', \ +.offset = (offsetof (struct EBLHOOK(prstatus), pr_reg) \ + + 33 * 8), \ +.group = "register", \ +.pc_register = true \ + }, \ + {\ +.name = "csr_badvaddr", .type = ELF_T_XWORD, .format = 'x', \ +.offset = (offsetof (struct EBLHOOK(prstatus), pr_reg) \ + + 34 * 8), \ +.group = "register" \ + },
[PATCH 3/5] backends: Add initial return value location support for LoongArch
LoongArch ELF ABI specification - Return values: https://loongson.github.io/LoongArch-Documentation/LoongArch-ELF-ABI-EN.html#_return_values Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 6 ++ backends/Makefile.am| 2 +- backends/loongarch_init.c | 3 + backends/loongarch_retval.c | 202 4 files changed, 212 insertions(+), 1 deletion(-) create mode 100644 backends/loongarch_retval.c diff --git a/backends/ChangeLog b/backends/ChangeLog index 85abc8a5..40564ca7 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,9 @@ +2023-04-07 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_retval.c. + * loongarch_init.c (loongarch_init): Hook return_value_location. + * loongarch_retval.c: New file. + 2023-04-07 Youling Tang * Makefile.am (loongarch_SRCS): Add loongarch_initreg.c. diff --git a/backends/Makefile.am b/backends/Makefile.am index e7055d7e..9277ed59 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -97,7 +97,7 @@ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ csky_regs.c csky_initreg.c csky_corenote.c loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ - loongarch_regs.c loongarch_initreg.c + loongarch_regs.c loongarch_initreg.c loongarch_retval.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 9c4b94a0..8892a2e6 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -1,5 +1,7 @@ /* Initialization of LoongArch specific backend library. Copyright (C) 2022 Hengqi Chen + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limted. This file is part of elfutils. This file is free software; you can redistribute it and/or modify @@ -52,6 +54,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), eh->frame_nregs = 74; HOOK (eh, check_special_symbol); HOOK (eh, set_initial_registers_tid); + HOOK (eh, return_value_location); return eh; } diff --git a/backends/loongarch_retval.c b/backends/loongarch_retval.c new file mode 100644 index ..23b33ed5 --- /dev/null +++ b/backends/loongarch_retval.c @@ -0,0 +1,202 @@ +/* Function return value location for Linux/LoongArch ABI. + Copyright (C) 2013 Red Hat, Inc. + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limited. + + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#include +#include + +#include +#include + +#define BACKEND loongarch_ +#include "libebl_CPU.h" + +static int +dwarf_bytesize_aux (Dwarf_Die *die, Dwarf_Word *sizep) +{ + int bits; + if (((bits = 8 * dwarf_bytesize (die)) < 0 + && (bits = dwarf_bitsize (die)) < 0) + || bits % 8 != 0) +return -1; + + *sizep = bits / 8; + return 0; +} + +static int +pass_in_gpr (const Dwarf_Op **locp, Dwarf_Word size) +{ + static const Dwarf_Op loc[] = +{ + { .atom = DW_OP_reg4 }, { .atom = DW_OP_piece, .number = 8 }, + { .atom = DW_OP_reg5 }, { .atom = DW_OP_piece, .number = 8 } +}; + + *locp = loc; + return size <= 8 ? 1 : 4; +} + +static int +pass_by_ref (const Dwarf_Op **locp) +{ + static const Dwarf_Op loc[] = { { .atom = DW_OP_breg4 } }; + + *locp = loc; + return 1; +} + +static int +pass_in_fpr (const Dwarf_Op **locp, Dwarf_Word size) +{ + static const Dwarf_Op loc[] = +{ + { .atom = DW_OP_regx, .number = 32 }, + { .atom = DW_OP_piece, .number = 8 }, + { .atom = DW_OP_regx, .number = 33 }, + { .atom = DW_OP_piece, .number = 8 } +}; + + *locp = loc; + return size <= 8 ? 1 : 4; +} + +int +loongarch_return_value_location(Dwarf_Die *functypedie, +const Dwarf_Op **locp) +{ + /* Start with the function's type, and get the D
Re: [PATCH 2/5] backends: Add set_initial_registers_tid callback for LoongArch
Hi, Mark On 05/09/2023 03:57 AM, Mark Wielaard wrote: Him On Fri, Apr 07, 2023 at 10:59:25AM +0800, Youling Tang wrote: This patch implements the set_initial_registers_tid hook for LoongArch. Looks good, but one question: + /* Floating-point registers (only 64bits are used). */ + struct user_fp_struct fregs; + iovec.iov_base = &fregs; + iovec.iov_len = sizeof (fregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) +return false; + + Dwarf_Word dwarf_fregs[32]; + for (int r = 0; r < 32; r++) +dwarf_fregs[r] = fregs.fpr[r] & 0x; The comment says 64bits, but the mask is for 32bits. I assume the comment is wrong and the masking is deliberate? Thanks for pointing out that there is no need to mask the lower 32 bits here. It can be modified as follows, --- a/backends/loongarch_initreg.c +++ b/backends/loongarch_initreg.c @@ -79,11 +79,8 @@ loongarch_set_initial_registers_tid (pid_t tid __attribute__ ((unused)), if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) return false; - Dwarf_Word dwarf_fregs[32]; - for (int r = 0; r < 32; r++) -dwarf_fregs[r] = fregs.fpr[r] & 0x; - - if (! setfunc (32, 32, dwarf_fregs, arg)) + /* $f0-$f31 */ + if (! setfunc (32, 32, &fregs.fpr[0], arg)) Do I need to send the v2 patchset again? Thanks, Youling. Cheers, Mark
Re: [PATCH 2/5] backends: Add set_initial_registers_tid callback for LoongArch
On 05/09/2023 09:32 AM, Youling Tang wrote: Hi, Mark On 05/09/2023 03:57 AM, Mark Wielaard wrote: Him On Fri, Apr 07, 2023 at 10:59:25AM +0800, Youling Tang wrote: This patch implements the set_initial_registers_tid hook for LoongArch. Looks good, but one question: + /* Floating-point registers (only 64bits are used). */ + struct user_fp_struct fregs; + iovec.iov_base = &fregs; + iovec.iov_len = sizeof (fregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) +return false; + + Dwarf_Word dwarf_fregs[32]; + for (int r = 0; r < 32; r++) +dwarf_fregs[r] = fregs.fpr[r] & 0x; The comment says 64bits, but the mask is for 32bits. I assume the comment is wrong and the masking is deliberate? Thanks for pointing out that there is no need to mask the lower 32 bits here. It can be modified as follows, --- a/backends/loongarch_initreg.c +++ b/backends/loongarch_initreg.c @@ -79,11 +79,8 @@ loongarch_set_initial_registers_tid (pid_t tid __attribute__ ((unused)), if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) return false; - Dwarf_Word dwarf_fregs[32]; - for (int r = 0; r < 32; r++) -dwarf_fregs[r] = fregs.fpr[r] & 0x; - - if (! setfunc (32, 32, dwarf_fregs, arg)) + /* $f0-$f31 */ + if (! setfunc (32, 32, &fregs.fpr[0], arg)) Need to add `(Dwarf_Word *)`, if (! setfunc (32, 32, (Dwarf_Word *) &fregs. fpr[0], arg)) Do I need to send the v2 patchset again? Thanks, Youling. Cheers, Mark
[PATCH v2] backends: Add set_initial_registers_tid callback for LoongArch
This patch implements the set_initial_registers_tid hook for LoongArch. Signed-off-by: Liwei Ge Signed-off-by: Youling Tang --- backends/ChangeLog | 6 +++ backends/Makefile.am | 2 +- backends/loongarch_init.c| 1 + backends/loongarch_initreg.c | 88 4 files changed, 96 insertions(+), 1 deletion(-) create mode 100644 backends/loongarch_initreg.c diff --git a/backends/ChangeLog b/backends/ChangeLog index c60d6cdb..ddb4e0af 100644 --- a/backends/ChangeLog +++ b/backends/ChangeLog @@ -1,3 +1,9 @@ +2023-05-09 Youling Tang + + * Makefile.am (loongarch_SRCS): Add loongarch_initreg.c. + * loongarch_initreg.c: New file. + * loongarch_init.c (loongarch_init): Hook set_initial_registers_tid. + 2023-04-07 Youling Tang * Makefile.am (loongarch_SRCS): Add loongarch_corenote.c. diff --git a/backends/Makefile.am b/backends/Makefile.am index c7a953a1..bbb2aac7 100644 --- a/backends/Makefile.am +++ b/backends/Makefile.am @@ -97,7 +97,7 @@ csky_SRCS = csky_attrs.c csky_init.c csky_symbol.c csky_cfi.c \ csky_regs.c csky_initreg.c csky_corenote.c loongarch_SRCS = loongarch_init.c loongarch_symbol.c loongarch_cfi.c \ - loongarch_regs.c loongarch_retval.c \ + loongarch_regs.c loongarch_retval.c loongarch_initreg.c \ loongarch_unwind.c loongarch_corenote.c arc_SRCS = arc_init.c arc_symbol.c diff --git a/backends/loongarch_init.c b/backends/loongarch_init.c index 0b99d113..2f0d46c9 100644 --- a/backends/loongarch_init.c +++ b/backends/loongarch_init.c @@ -54,6 +54,7 @@ loongarch_init (Elf *elf __attribute__ ((unused)), /* gcc/config/ #define DWARF_FRAME_REGISTERS. */ eh->frame_nregs = 74; HOOK (eh, check_special_symbol); + HOOK (eh, set_initial_registers_tid); HOOK (eh, return_value_location); HOOK (eh, unwind); diff --git a/backends/loongarch_initreg.c b/backends/loongarch_initreg.c new file mode 100644 index ..74cb62f5 --- /dev/null +++ b/backends/loongarch_initreg.c @@ -0,0 +1,88 @@ +/* Fetch live process registers from TID. + Copyright (C) 2023 OpenAnolis community LoongArch SIG. + Copyright (C) 2023 Loongson Technology Corporation Limted. + This file is part of elfutils. + + This file is free software; you can redistribute it and/or modify + it under the terms of either + + * the GNU Lesser General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at + your option) any later version + + or + + * the GNU General Public License as published by the Free + Software Foundation; either version 2 of the License, or (at + your option) any later version + + or both in parallel, as here. + + elfutils is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received copies of the GNU General Public License and + the GNU Lesser General Public License along with this program. If + not, see <http://www.gnu.org/licenses/>. */ + +#ifdef HAVE_CONFIG_H +# include +#endif + +#include "system.h" +#include +#if defined __loongarch__ && defined __linux__ +# include +# include +# include +#endif + +#define BACKEND loongarch_ +#include "libebl_CPU.h" + +bool +loongarch_set_initial_registers_tid (pid_t tid __attribute__ ((unused)), +ebl_tid_registers_t *setfunc __attribute__ ((unused)), +void *arg __attribute__ ((unused))) +{ +#if !defined __loongarch__ || !defined __linux__ + return false; +#else /* __loongarch__ */ + + /* General registers. */ + struct user_regs_struct gregs; + struct iovec iovec; + iovec.iov_base = &gregs; + iovec.iov_len = sizeof (gregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_PRSTATUS, &iovec) != 0) +return false; + + /* $r0 is constant 0. */ + Dwarf_Word zero = 0; + if (! setfunc (0, 1, &zero, arg)) +return false; + + /* $r1-$r31. */ + if (! setfunc (1, 32, (Dwarf_Word *) &gregs.regs[1], arg)) +return false; + + /* PC. */ + if (! setfunc (-1, 1, (Dwarf_Word *) &gregs.csr_era, arg)) +return false; + + /* Floating-point registers (only 64bits are used). */ + struct user_fp_struct fregs; + iovec.iov_base = &fregs; + iovec.iov_len = sizeof (fregs); + if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET, &iovec) != 0) +return false; + + /* $f0-$f31 */ + if (! setfunc (32, 32, (Dwarf_Word *) &fregs.fpr[0], arg)) +return false; + + return true; +#endif /* __loongarch__ */ +} -- 2.37.1