2018-08-10 04:35:24 +08:00
|
|
|
/* Native-dependent code for GNU/Linux RISC-V.
|
2021-01-01 16:03:39 +08:00
|
|
|
Copyright (C) 2018-2021 Free Software Foundation, Inc.
|
2018-08-10 04:35:24 +08:00
|
|
|
|
|
|
|
This file is part of GDB.
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
This program 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 a copy of the GNU General Public License
|
|
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
#include "regcache.h"
|
|
|
|
#include "gregset.h"
|
|
|
|
#include "linux-nat.h"
|
|
|
|
#include "riscv-tdep.h"
|
2018-11-29 06:42:27 +08:00
|
|
|
#include "inferior.h"
|
2018-08-10 04:35:24 +08:00
|
|
|
|
2018-08-30 01:52:42 +08:00
|
|
|
#include "elf/common.h"
|
|
|
|
|
2020-02-06 01:21:12 +08:00
|
|
|
#include "nat/riscv-linux-tdesc.h"
|
|
|
|
|
2018-08-10 04:35:24 +08:00
|
|
|
#include <sys/ptrace.h>
|
|
|
|
|
2020-02-03 20:07:02 +08:00
|
|
|
/* Work around glibc header breakage causing ELF_NFPREG not to be usable. */
|
|
|
|
#ifndef NFPREG
|
|
|
|
# define NFPREG 33
|
|
|
|
#endif
|
|
|
|
|
2018-08-10 04:35:24 +08:00
|
|
|
/* RISC-V Linux native additions to the default linux support. */
|
|
|
|
|
|
|
|
class riscv_linux_nat_target final : public linux_nat_target
|
|
|
|
{
|
|
|
|
public:
|
|
|
|
/* Add our register access methods. */
|
|
|
|
void fetch_registers (struct regcache *regcache, int regnum) override;
|
|
|
|
void store_registers (struct regcache *regcache, int regnum) override;
|
2018-11-29 06:42:27 +08:00
|
|
|
|
|
|
|
/* Read suitable target description. */
|
|
|
|
const struct target_desc *read_description () override;
|
2018-08-10 04:35:24 +08:00
|
|
|
};
|
|
|
|
|
|
|
|
static riscv_linux_nat_target the_riscv_linux_nat_target;
|
|
|
|
|
|
|
|
/* Copy general purpose register REGNUM (or all gp regs if REGNUM == -1)
|
|
|
|
from regset GREGS into REGCACHE. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
supply_gregset_regnum (struct regcache *regcache, const prgregset_t *gregs,
|
|
|
|
int regnum)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
const elf_greg_t *regp = *gregs;
|
|
|
|
|
|
|
|
if (regnum == -1)
|
|
|
|
{
|
|
|
|
/* We only support the integer registers and PC here. */
|
|
|
|
for (i = RISCV_ZERO_REGNUM + 1; i < RISCV_PC_REGNUM; i++)
|
|
|
|
regcache->raw_supply (i, regp + i);
|
|
|
|
|
|
|
|
/* GDB stores PC in reg 32. Linux kernel stores it in reg 0. */
|
|
|
|
regcache->raw_supply (32, regp + 0);
|
|
|
|
|
|
|
|
/* Fill the inaccessible zero register with zero. */
|
|
|
|
regcache->raw_supply_zeroed (0);
|
|
|
|
}
|
|
|
|
else if (regnum == RISCV_ZERO_REGNUM)
|
|
|
|
regcache->raw_supply_zeroed (0);
|
|
|
|
else if (regnum > RISCV_ZERO_REGNUM && regnum < RISCV_PC_REGNUM)
|
|
|
|
regcache->raw_supply (regnum, regp + regnum);
|
|
|
|
else if (regnum == RISCV_PC_REGNUM)
|
|
|
|
regcache->raw_supply (32, regp + 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Copy all general purpose registers from regset GREGS into REGCACHE. */
|
|
|
|
|
|
|
|
void
|
|
|
|
supply_gregset (struct regcache *regcache, const prgregset_t *gregs)
|
|
|
|
{
|
|
|
|
supply_gregset_regnum (regcache, gregs, -1);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Copy floating point register REGNUM (or all fp regs if REGNUM == -1)
|
|
|
|
from regset FPREGS into REGCACHE. */
|
|
|
|
|
|
|
|
static void
|
|
|
|
supply_fpregset_regnum (struct regcache *regcache, const prfpregset_t *fpregs,
|
|
|
|
int regnum)
|
|
|
|
{
|
2020-02-03 20:07:02 +08:00
|
|
|
int flen = register_size (regcache->arch (), RISCV_FIRST_FP_REGNUM);
|
|
|
|
union
|
|
|
|
{
|
|
|
|
const prfpregset_t *fpregs;
|
|
|
|
const gdb_byte *buf;
|
|
|
|
}
|
|
|
|
fpbuf = { .fpregs = fpregs };
|
2018-08-10 04:35:24 +08:00
|
|
|
int i;
|
|
|
|
|
|
|
|
if (regnum == -1)
|
|
|
|
{
|
|
|
|
/* We only support the FP registers and FCSR here. */
|
2020-02-03 20:07:02 +08:00
|
|
|
for (i = RISCV_FIRST_FP_REGNUM;
|
|
|
|
i <= RISCV_LAST_FP_REGNUM;
|
|
|
|
i++, fpbuf.buf += flen)
|
|
|
|
regcache->raw_supply (i, fpbuf.buf);
|
2018-08-10 04:35:24 +08:00
|
|
|
|
2020-02-03 20:07:02 +08:00
|
|
|
regcache->raw_supply (RISCV_CSR_FCSR_REGNUM, fpbuf.buf);
|
2018-08-10 04:35:24 +08:00
|
|
|
}
|
|
|
|
else if (regnum >= RISCV_FIRST_FP_REGNUM && regnum <= RISCV_LAST_FP_REGNUM)
|
2020-02-03 20:07:02 +08:00
|
|
|
{
|
|
|
|
fpbuf.buf += flen * (regnum - RISCV_FIRST_FP_REGNUM);
|
|
|
|
regcache->raw_supply (regnum, fpbuf.buf);
|
|
|
|
}
|
2018-08-10 04:35:24 +08:00
|
|
|
else if (regnum == RISCV_CSR_FCSR_REGNUM)
|
2020-02-03 20:07:02 +08:00
|
|
|
{
|
|
|
|
fpbuf.buf += flen * (RISCV_LAST_FP_REGNUM - RISCV_FIRST_FP_REGNUM + 1);
|
|
|
|
regcache->raw_supply (RISCV_CSR_FCSR_REGNUM, fpbuf.buf);
|
|
|
|
}
|
2018-08-10 04:35:24 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Copy all floating point registers from regset FPREGS into REGCACHE. */
|
|
|
|
|
|
|
|
void
|
|
|
|
supply_fpregset (struct regcache *regcache, const prfpregset_t *fpregs)
|
|
|
|
{
|
|
|
|
supply_fpregset_regnum (regcache, fpregs, -1);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Copy general purpose register REGNUM (or all gp regs if REGNUM == -1)
|
|
|
|
from REGCACHE into regset GREGS. */
|
|
|
|
|
|
|
|
void
|
|
|
|
fill_gregset (const struct regcache *regcache, prgregset_t *gregs, int regnum)
|
|
|
|
{
|
|
|
|
elf_greg_t *regp = *gregs;
|
|
|
|
|
|
|
|
if (regnum == -1)
|
|
|
|
{
|
|
|
|
/* We only support the integer registers and PC here. */
|
|
|
|
for (int i = RISCV_ZERO_REGNUM + 1; i < RISCV_PC_REGNUM; i++)
|
|
|
|
regcache->raw_collect (i, regp + i);
|
|
|
|
|
|
|
|
regcache->raw_collect (32, regp + 0);
|
|
|
|
}
|
|
|
|
else if (regnum == RISCV_ZERO_REGNUM)
|
|
|
|
/* Nothing to do here. */
|
|
|
|
;
|
|
|
|
else if (regnum > RISCV_ZERO_REGNUM && regnum < RISCV_PC_REGNUM)
|
|
|
|
regcache->raw_collect (regnum, regp + regnum);
|
|
|
|
else if (regnum == RISCV_PC_REGNUM)
|
|
|
|
regcache->raw_collect (32, regp + 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Copy floating point register REGNUM (or all fp regs if REGNUM == -1)
|
|
|
|
from REGCACHE into regset FPREGS. */
|
|
|
|
|
|
|
|
void
|
|
|
|
fill_fpregset (const struct regcache *regcache, prfpregset_t *fpregs,
|
|
|
|
int regnum)
|
|
|
|
{
|
2020-02-03 20:07:02 +08:00
|
|
|
int flen = register_size (regcache->arch (), RISCV_FIRST_FP_REGNUM);
|
|
|
|
union
|
|
|
|
{
|
|
|
|
prfpregset_t *fpregs;
|
|
|
|
gdb_byte *buf;
|
|
|
|
}
|
|
|
|
fpbuf = { .fpregs = fpregs };
|
|
|
|
int i;
|
|
|
|
|
2018-08-10 04:35:24 +08:00
|
|
|
if (regnum == -1)
|
|
|
|
{
|
|
|
|
/* We only support the FP registers and FCSR here. */
|
2020-02-03 20:07:02 +08:00
|
|
|
for (i = RISCV_FIRST_FP_REGNUM;
|
|
|
|
i <= RISCV_LAST_FP_REGNUM;
|
|
|
|
i++, fpbuf.buf += flen)
|
|
|
|
regcache->raw_collect (i, fpbuf.buf);
|
2018-08-10 04:35:24 +08:00
|
|
|
|
2020-02-03 20:07:02 +08:00
|
|
|
regcache->raw_collect (RISCV_CSR_FCSR_REGNUM, fpbuf.buf);
|
2018-08-10 04:35:24 +08:00
|
|
|
}
|
|
|
|
else if (regnum >= RISCV_FIRST_FP_REGNUM && regnum <= RISCV_LAST_FP_REGNUM)
|
2020-02-03 20:07:02 +08:00
|
|
|
{
|
|
|
|
fpbuf.buf += flen * (regnum - RISCV_FIRST_FP_REGNUM);
|
|
|
|
regcache->raw_collect (regnum, fpbuf.buf);
|
|
|
|
}
|
2018-08-10 04:35:24 +08:00
|
|
|
else if (regnum == RISCV_CSR_FCSR_REGNUM)
|
2020-02-03 20:07:02 +08:00
|
|
|
{
|
|
|
|
fpbuf.buf += flen * (RISCV_LAST_FP_REGNUM - RISCV_FIRST_FP_REGNUM + 1);
|
|
|
|
regcache->raw_collect (RISCV_CSR_FCSR_REGNUM, fpbuf.buf);
|
|
|
|
}
|
2018-08-10 04:35:24 +08:00
|
|
|
}
|
|
|
|
|
2018-11-29 06:42:27 +08:00
|
|
|
/* Return a target description for the current target. */
|
|
|
|
|
|
|
|
const struct target_desc *
|
|
|
|
riscv_linux_nat_target::read_description ()
|
|
|
|
{
|
gdb/riscv: Update API for looking up target descriptions
In preparation for adding the RISC-V gdbserver, this commit
restructures the API for looking up target descriptions.
The current API is riscv_create_target_description, which creates a
target description from a riscv_gdbarch_features, but also caches the
created target descriptions so that for a given features object we
always get back the same target description object. This is important
for GDB due to the way gdbarch objects are reused.
As the same target description is always returned to GDB, and can be
returned multiple times, it is returned as a const, however, the
current cache actually stores a non-const target description. This is
improved in this patch so that the cache holds a const target
description.
For gdbsever, this caching of the target descriptions is not needed,
the gdbserver looks up one target description to describe the target
it is actually running on and that is it. Further the gdbserver
actually needs to modify the target description that is looked up, so
for the gdbsever, returning a const target description is not
acceptable.
This commit aims to address this by creating two parallel target
description APIs, on is the old riscv_create_target_description,
however, this no longer performs any caching, and just creates a new
target description, and returns it as non-const.
The second API is riscv_lookup_target_description, this one performs
the caching, and calls riscv_create_target_description to create a
target description when needed.
In order to make sure the correct API is used in the correct place I
have guarded the code using the GDBSERVER define. For GDB the
riscv_create_target_description is static, and not generally usable
throughout GDB, only the lookup API is global. In gdbserver, the
lookup functions, and the cache are not defined or created at all,
only the riscv_create_target_description API is available.
There should be no user visible changes after this commit.
gdb/ChangeLog:
* arch/riscv.c (struct riscv_gdbarch_features_hasher): Only define
if GDBSERVER is not defined.
(riscv_tdesc_cache): Likewise, also store const target_desc.
(STATIC_IN_GDB): Define.
(riscv_create_target_description): Update declaration with
STATIC_IN_GDB.
(riscv_lookup_target_description): New function, only define if
GDBSERVER is not defined.
* arch/riscv.h (riscv_create_target_description): Declare only
when GDBSERVER is defined.
(riscv_lookup_target_description): New declaration when GDBSERVER
is not defined.
* nat/riscv-linux-tdesc.c (riscv_linux_read_description): Rename to...
(riscv_linux_read_features): ...this, and return
riscv_gdbarch_features instead of target_desc.
* nat/riscv-linux-tdesc.h: Include 'arch/riscv.h'.
(riscv_linux_read_description): Rename to...
(riscv_linux_read_features): ...this.
* riscv-linux-nat.c (riscv_linux_nat_target::read_description):
Update to use riscv_gdbarch_features and
riscv_lookup_target_description.
* riscv-tdep.c (riscv_find_default_target_description): Use
riscv_lookup_target_description instead of
riscv_create_target_description.
2020-02-19 09:24:37 +08:00
|
|
|
const struct riscv_gdbarch_features features
|
|
|
|
= riscv_linux_read_features (inferior_ptid.lwp ());
|
|
|
|
return riscv_lookup_target_description (features);
|
2018-11-29 06:42:27 +08:00
|
|
|
}
|
|
|
|
|
2018-08-10 04:35:24 +08:00
|
|
|
/* Fetch REGNUM (or all registers if REGNUM == -1) from the target
|
|
|
|
into REGCACHE using PTRACE_GETREGSET. */
|
|
|
|
|
|
|
|
void
|
|
|
|
riscv_linux_nat_target::fetch_registers (struct regcache *regcache, int regnum)
|
|
|
|
{
|
|
|
|
int tid;
|
|
|
|
|
|
|
|
tid = get_ptrace_pid (regcache->ptid());
|
|
|
|
|
|
|
|
if ((regnum >= RISCV_ZERO_REGNUM && regnum <= RISCV_PC_REGNUM)
|
|
|
|
|| (regnum == -1))
|
|
|
|
{
|
|
|
|
struct iovec iov;
|
|
|
|
elf_gregset_t regs;
|
|
|
|
|
|
|
|
iov.iov_base = ®s;
|
|
|
|
iov.iov_len = sizeof (regs);
|
|
|
|
|
|
|
|
if (ptrace (PTRACE_GETREGSET, tid, NT_PRSTATUS,
|
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't get registers"));
|
|
|
|
else
|
|
|
|
supply_gregset_regnum (regcache, ®s, regnum);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((regnum >= RISCV_FIRST_FP_REGNUM
|
|
|
|
&& regnum <= RISCV_LAST_FP_REGNUM)
|
|
|
|
|| (regnum == RISCV_CSR_FCSR_REGNUM)
|
|
|
|
|| (regnum == -1))
|
|
|
|
{
|
|
|
|
struct iovec iov;
|
|
|
|
elf_fpregset_t regs;
|
|
|
|
|
|
|
|
iov.iov_base = ®s;
|
2020-02-03 20:07:02 +08:00
|
|
|
iov.iov_len = ELF_NFPREG * register_size (regcache->arch (),
|
|
|
|
RISCV_FIRST_FP_REGNUM);
|
|
|
|
gdb_assert (iov.iov_len <= sizeof (regs));
|
2018-08-10 04:35:24 +08:00
|
|
|
|
2018-08-30 01:52:42 +08:00
|
|
|
if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET,
|
2018-08-10 04:35:24 +08:00
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't get registers"));
|
|
|
|
else
|
|
|
|
supply_fpregset_regnum (regcache, ®s, regnum);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((regnum == RISCV_CSR_MISA_REGNUM)
|
|
|
|
|| (regnum == -1))
|
2018-10-28 18:43:26 +08:00
|
|
|
{
|
|
|
|
/* TODO: Need to add a ptrace call for this. */
|
|
|
|
regcache->raw_supply_zeroed (RISCV_CSR_MISA_REGNUM);
|
|
|
|
}
|
2018-08-10 04:35:24 +08:00
|
|
|
|
|
|
|
/* Access to other CSRs has potential security issues, don't support them for
|
|
|
|
now. */
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Store REGNUM (or all registers if REGNUM == -1) to the target
|
|
|
|
from REGCACHE using PTRACE_SETREGSET. */
|
|
|
|
|
|
|
|
void
|
|
|
|
riscv_linux_nat_target::store_registers (struct regcache *regcache, int regnum)
|
|
|
|
{
|
|
|
|
int tid;
|
|
|
|
|
|
|
|
tid = get_ptrace_pid (regcache->ptid ());
|
|
|
|
|
|
|
|
if ((regnum >= RISCV_ZERO_REGNUM && regnum <= RISCV_PC_REGNUM)
|
|
|
|
|| (regnum == -1))
|
|
|
|
{
|
|
|
|
struct iovec iov;
|
|
|
|
elf_gregset_t regs;
|
|
|
|
|
|
|
|
iov.iov_base = ®s;
|
|
|
|
iov.iov_len = sizeof (regs);
|
|
|
|
|
|
|
|
if (ptrace (PTRACE_GETREGSET, tid, NT_PRSTATUS,
|
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't get registers"));
|
|
|
|
else
|
|
|
|
{
|
|
|
|
fill_gregset (regcache, ®s, regnum);
|
|
|
|
|
|
|
|
if (ptrace (PTRACE_SETREGSET, tid, NT_PRSTATUS,
|
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't set registers"));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((regnum >= RISCV_FIRST_FP_REGNUM
|
|
|
|
&& regnum <= RISCV_LAST_FP_REGNUM)
|
|
|
|
|| (regnum == RISCV_CSR_FCSR_REGNUM)
|
|
|
|
|| (regnum == -1))
|
|
|
|
{
|
|
|
|
struct iovec iov;
|
|
|
|
elf_fpregset_t regs;
|
|
|
|
|
|
|
|
iov.iov_base = ®s;
|
2020-02-03 20:07:02 +08:00
|
|
|
iov.iov_len = ELF_NFPREG * register_size (regcache->arch (),
|
|
|
|
RISCV_FIRST_FP_REGNUM);
|
|
|
|
gdb_assert (iov.iov_len <= sizeof (regs));
|
2018-08-10 04:35:24 +08:00
|
|
|
|
2018-08-30 01:52:42 +08:00
|
|
|
if (ptrace (PTRACE_GETREGSET, tid, NT_FPREGSET,
|
2018-08-10 04:35:24 +08:00
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't get registers"));
|
|
|
|
else
|
|
|
|
{
|
|
|
|
fill_fpregset (regcache, ®s, regnum);
|
|
|
|
|
2018-08-30 01:52:42 +08:00
|
|
|
if (ptrace (PTRACE_SETREGSET, tid, NT_FPREGSET,
|
2018-08-10 04:35:24 +08:00
|
|
|
(PTRACE_TYPE_ARG3) &iov) == -1)
|
|
|
|
perror_with_name (_("Couldn't set registers"));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Access to CSRs has potential security issues, don't support them for
|
|
|
|
now. */
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Initialize RISC-V Linux native support. */
|
|
|
|
|
2020-01-14 03:01:38 +08:00
|
|
|
void _initialize_riscv_linux_nat ();
|
2018-08-10 04:35:24 +08:00
|
|
|
void
|
2020-01-14 03:01:38 +08:00
|
|
|
_initialize_riscv_linux_nat ()
|
2018-08-10 04:35:24 +08:00
|
|
|
{
|
|
|
|
/* Register the target. */
|
|
|
|
linux_target = &the_riscv_linux_nat_target;
|
|
|
|
add_inf_child_target (&the_riscv_linux_nat_target);
|
|
|
|
}
|