1 /* Native-dependent code for MIPS systems running NetBSD.
3 Copyright (C) 2000, 2001, 2002, 2004, 2007 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 "mipsnbsd-tdep.h"
31 #include "inf-ptrace.h"
33 /* Determine if PT_GETREGS fetches this register. */
35 getregs_supplies (int regno
)
37 return ((regno
) >= MIPS_ZERO_REGNUM
38 && (regno
) <= gdbarch_pc_regnum (current_gdbarch
));
42 mipsnbsd_fetch_inferior_registers (struct regcache
*regcache
, int regno
)
44 if (regno
== -1 || getregs_supplies (regno
))
48 if (ptrace (PT_GETREGS
, PIDGET (inferior_ptid
),
49 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
50 perror_with_name (_("Couldn't get registers"));
52 mipsnbsd_supply_reg (regcache
, (char *) ®s
, regno
);
57 if (regno
== -1 || regno
>= gdbarch_fp0_regnum (current_gdbarch
))
61 if (ptrace (PT_GETFPREGS
, PIDGET (inferior_ptid
),
62 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
63 perror_with_name (_("Couldn't get floating point status"));
65 mipsnbsd_supply_fpreg (regcache
, (char *) &fpregs
, regno
);
70 mipsnbsd_store_inferior_registers (struct regcache
*regcache
, int regno
)
72 if (regno
== -1 || getregs_supplies (regno
))
76 if (ptrace (PT_GETREGS
, PIDGET (inferior_ptid
),
77 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
78 perror_with_name (_("Couldn't get registers"));
80 mipsnbsd_fill_reg (regcache
, (char *) ®s
, regno
);
82 if (ptrace (PT_SETREGS
, PIDGET (inferior_ptid
),
83 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
84 perror_with_name (_("Couldn't write registers"));
90 if (regno
== -1 || regno
>= gdbarch_fp0_regnum (current_gdbarch
))
94 if (ptrace (PT_GETFPREGS
, PIDGET (inferior_ptid
),
95 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
96 perror_with_name (_("Couldn't get floating point status"));
98 mipsnbsd_fill_fpreg (regcache
, (char *) &fpregs
, regno
);
100 if (ptrace (PT_SETFPREGS
, PIDGET (inferior_ptid
),
101 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
102 perror_with_name (_("Couldn't write floating point status"));
107 /* Provide a prototype to silence -Wmissing-prototypes. */
108 void _initialize_mipsnbsd_nat (void);
111 _initialize_mipsnbsd_nat (void)
113 struct target_ops
*t
;
115 t
= inf_ptrace_target ();
116 t
->to_fetch_registers
= mipsnbsd_fetch_inferior_registers
;
117 t
->to_store_registers
= mipsnbsd_store_inferior_registers
;