1 /* Native-dependent code for MIPS systems running NetBSD.
3 Copyright (C) 2000-2019 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
25 #include <sys/types.h>
26 #include <sys/ptrace.h>
27 #include <machine/reg.h>
29 #include "mips-tdep.h"
30 #include "mips-nbsd-tdep.h"
31 #include "inf-ptrace.h"
33 class mips_nbsd_nat_target final : public inf_ptrace_target
35 void fetch_registers (struct regcache *, int) override;
36 void store_registers (struct regcache *, int) override;
39 static mips_nbsd_nat_target the_mips_nbsd_nat_target;
41 /* Determine if PT_GETREGS fetches this register. */
43 getregs_supplies (struct gdbarch *gdbarch, int regno)
45 return ((regno) >= MIPS_ZERO_REGNUM
46 && (regno) <= gdbarch_pc_regnum (gdbarch));
50 mips_nbsd_nat_target::fetch_registers (struct regcache *regcache, int regno)
52 pid_t pid = regcache->ptid ().pid ();
54 struct gdbarch *gdbarch = regcache->arch ();
55 if (regno == -1 || getregs_supplies (gdbarch, regno))
59 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
60 perror_with_name (_("Couldn't get registers"));
62 mipsnbsd_supply_reg (regcache, (char *) ®s, regno);
68 || regno >= gdbarch_fp0_regnum (regcache->arch ()))
72 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
73 perror_with_name (_("Couldn't get floating point status"));
75 mipsnbsd_supply_fpreg (regcache, (char *) &fpregs, regno);
80 mips_nbsd_nat_target::store_registers (struct regcache *regcache, int regno)
82 pid_t pid = regcache->ptid ().pid ();
84 struct gdbarch *gdbarch = regcache->arch ();
85 if (regno == -1 || getregs_supplies (gdbarch, regno))
89 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
90 perror_with_name (_("Couldn't get registers"));
92 mipsnbsd_fill_reg (regcache, (char *) ®s, regno);
94 if (ptrace (PT_SETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
95 perror_with_name (_("Couldn't write registers"));
102 || regno >= gdbarch_fp0_regnum (regcache->arch ()))
106 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
107 perror_with_name (_("Couldn't get floating point status"));
109 mipsnbsd_fill_fpreg (regcache, (char *) &fpregs, regno);
111 if (ptrace (PT_SETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
112 perror_with_name (_("Couldn't write floating point status"));
117 _initialize_mipsnbsd_nat (void)
119 add_inf_child_target (&the_mips_nbsd_nat_target);