diff options
author | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-11-24 18:08:25 +0000 |
---|---|---|
committer | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-12-02 17:47:39 +0000 |
commit | e45020422076c1014579ae8763fd253990ddf58e (patch) | |
tree | c1738488ba31f78c02c69ca5b5603e32efb82f9f | |
parent | 7ddfb1a891ce2fee8708e6d5f14a6935d307875e (diff) | |
download | fsf-binutils-gdb-e45020422076c1014579ae8763fd253990ddf58e.zip fsf-binutils-gdb-e45020422076c1014579ae8763fd253990ddf58e.tar.gz fsf-binutils-gdb-e45020422076c1014579ae8763fd253990ddf58e.tar.bz2 |
gdb/riscv: place unknown csrs into the correct register groups
Unknown riscv CSRs should not be in the 'general' group, but should be
in the system and csr register groups.
To see this in action connect to QEMU, this target advertises two
registers dscratch and mucounteren which are unknown to GDB (these are
legacy CSRs). Before this commit these registers would show up in the
output of:
(gdb) info registers
....
dscratch Could not fetch register "dscratch"; remote failure reply 'E14'
mucounteren Could not fetch register "mucounteren"; remote failure reply 'E14'
Ignore the errors, this is just a QEMU annoyance, it advertises these
CSRs, but doesn't actually let GDB read them. These registers don't
show up in the output of either:
(gdb) info registers csr
(gdb) info registers system
After this commit this situation is reveresed, which makes more sense
to me.
gdb/ChangeLog:
* riscv-tdep.c (riscv_is_unknown_csr): New function,
implementation moved from riscv_register_reggroup_p.
(riscv_register_reggroup_p): Update group handling for unknown
CSRs.
gdb/testsuite/ChangeLog:
* gdb.arch/riscv-tdesc-regs.exp (get_expected_result): New proc,
update test to use this.
-rw-r--r-- | gdb/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/riscv-tdep.c | 34 | ||||
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.arch/riscv-tdesc-regs.exp | 39 |
4 files changed, 69 insertions, 16 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 4946a52..1d5bbcf 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,10 @@ +2020-12-02 Andrew Burgess <andrew.burgess@embecosm.com> + + * riscv-tdep.c (riscv_is_unknown_csr): New function, + implementation moved from riscv_register_reggroup_p. + (riscv_register_reggroup_p): Update group handling for unknown + CSRs. + 2020-12-01 Sergio Durigan Junior <sergiodj@sergiodj.net> * dwarf2/read.c (dwz_search_other_debugdirs): New function. diff --git a/gdb/riscv-tdep.c b/gdb/riscv-tdep.c index 4e25505..437e8f8 100644 --- a/gdb/riscv-tdep.c +++ b/gdb/riscv-tdep.c @@ -969,6 +969,18 @@ riscv_is_regnum_a_named_csr (int regnum) } } +/* Return true if REGNUM is an unknown CSR identified in + riscv_tdesc_unknown_reg for GDBARCH. */ + +static bool +riscv_is_unknown_csr (struct gdbarch *gdbarch, int regnum) +{ + struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); + return (regnum >= tdep->unknown_csrs_first_regnum + && regnum < (tdep->unknown_csrs_first_regnum + + tdep->unknown_csrs_count)); +} + /* Implement the register_reggroup_p gdbarch method. Is REGNUM a member of REGGROUP? */ @@ -986,13 +998,21 @@ riscv_register_reggroup_p (struct gdbarch *gdbarch, int regnum, { /* Any extra registers from the CSR tdesc_feature (identified in riscv_tdesc_unknown_reg) are removed from the save/restore groups - as some targets (QEMU) report CSRs which then can't be read. */ - struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); - if ((reggroup == restore_reggroup || reggroup == save_reggroup) - && regnum >= tdep->unknown_csrs_first_regnum - && regnum < (tdep->unknown_csrs_first_regnum - + tdep->unknown_csrs_count)) - return 0; + as some targets (QEMU) report CSRs which then can't be read and + having unreadable registers in the save/restore group breaks + things like inferior calls. + + The unknown CSRs are also removed from the general group, and + added into both the csr and system group. This is inline with the + known CSRs (see below). */ + if (riscv_is_unknown_csr (gdbarch, regnum)) + { + if (reggroup == restore_reggroup || reggroup == save_reggroup + || reggroup == general_reggroup) + return 0; + else if (reggroup == system_reggroup || reggroup == csr_reggroup) + return 1; + } /* This is some other unknown register from the target description. In this case we trust whatever the target description says about diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f35a2dc..f093845 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2020-12-02 Andrew Burgess <andrew.burgess@embecosm.com> + + * gdb.arch/riscv-tdesc-regs.exp (get_expected_result): New proc, + update test to use this. + 2020-12-01 Simon Marchi <simon.marchi@polymtl.ca> * gdb.threads/non-ldr-exc-1.exp: Fix indentation. diff --git a/gdb/testsuite/gdb.arch/riscv-tdesc-regs.exp b/gdb/testsuite/gdb.arch/riscv-tdesc-regs.exp index 1be32e0..e35d618 100644 --- a/gdb/testsuite/gdb.arch/riscv-tdesc-regs.exp +++ b/gdb/testsuite/gdb.arch/riscv-tdesc-regs.exp @@ -80,7 +80,32 @@ gdb_test "info registers \$csr0" "Invalid register `csr0'" gdb_test "info registers \$dscratch0" "dscratch0\[ \t\]+.*" gdb_test "info registers \$dscratch" "dscratch\[ \t\]+.*" -foreach rgroup {x_all all save restore} { +# Return the number of times REGISTER should appear in GROUP, this +# will either be 0 or 1. +proc get_expected_result { register group } { + + # Everything should appear once in the 'all' group. + if { $group == "all" || $group == "x_all" } { + return 1 + } + + if { $group == "save" || $group == "restore" } { + # Everything is in the save/restore groups except these two. + if { $register == "unknown_csr" || $register == "dscratch" } { + return 0 + } + return 1 + } + + if { $group == "system" || $group == "csr" } { + # All the registers we check should be in these groups. + return 1 + } + + return 0 +} + +foreach rgroup {x_all all save restore general system csr} { # Now use 'info registers all' to see how many times the floating # point status registers show up in the output. array set reg_counts {} @@ -110,14 +135,10 @@ foreach rgroup {x_all all save restore} { } else { set count 0 } - if {($reg == "unknown_csr" || $reg == "dscratch") \ - && $rgroup != "all" && $rgroup != "x_all"} { - gdb_assert {$count == 0} \ - "register $reg not seen in reggroup $rgroup" - } else { - gdb_assert {$count == 1} \ - "register $reg seen once in reggroup $rgroup" - } + + set expected_count [ get_expected_result $reg $rgroup ] + gdb_assert {$count == $expected_count} \ + "register $reg seen in reggroup $rgroup $expected_count times" } array unset reg_counts } |