1 /* Native-dependent code for MIPS systems running NetBSD.
3 Copyright (C) 2000, 2001, 2002, 2004, 2007, 2008
4 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
26 #include <sys/types.h>
27 #include <sys/ptrace.h>
28 #include <machine/reg.h>
30 #include "mips-tdep.h"
31 #include "mipsnbsd-tdep.h"
32 #include "inf-ptrace.h"
34 /* Determine if PT_GETREGS fetches this register. */
36 getregs_supplies (struct gdbarch *gdbarch, int regno)
38 return ((regno) >= MIPS_ZERO_REGNUM
39 && (regno) <= gdbarch_pc_regnum (gdbarch));
43 mipsnbsd_fetch_inferior_registers (struct regcache *regcache, int regno)
45 struct gdbarch *gdbarch = get_regcache_arch (regcache);
46 if (regno == -1 || getregs_supplies (gdbarch, regno))
50 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
51 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
52 perror_with_name (_("Couldn't get registers"));
54 mipsnbsd_supply_reg (regcache, (char *) ®s, regno);
59 if (regno == -1 || regno >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
63 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
64 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
65 perror_with_name (_("Couldn't get floating point status"));
67 mipsnbsd_supply_fpreg (regcache, (char *) &fpregs, regno);
72 mipsnbsd_store_inferior_registers (struct regcache *regcache, int regno)
74 struct gdbarch *gdbarch = get_regcache_arch (regcache);
75 if (regno == -1 || getregs_supplies (gdbarch, regno))
79 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
80 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
81 perror_with_name (_("Couldn't get registers"));
83 mipsnbsd_fill_reg (regcache, (char *) ®s, regno);
85 if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
86 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
87 perror_with_name (_("Couldn't write registers"));
93 if (regno == -1 || regno >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
97 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
98 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
99 perror_with_name (_("Couldn't get floating point status"));
101 mipsnbsd_fill_fpreg (regcache, (char *) &fpregs, regno);
103 if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
104 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
105 perror_with_name (_("Couldn't write floating point status"));
110 /* Provide a prototype to silence -Wmissing-prototypes. */
111 void _initialize_mipsnbsd_nat (void);
114 _initialize_mipsnbsd_nat (void)
116 struct target_ops *t;
118 t = inf_ptrace_target ();
119 t->to_fetch_registers = mipsnbsd_fetch_inferior_registers;
120 t->to_store_registers = mipsnbsd_store_inferior_registers;