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 (int regno
)
38 return ((regno
) >= MIPS_ZERO_REGNUM
39 && (regno
) <= gdbarch_pc_regnum (current_gdbarch
));
43 mipsnbsd_fetch_inferior_registers (struct regcache
*regcache
, int regno
)
45 if (regno
== -1 || getregs_supplies (regno
))
49 if (ptrace (PT_GETREGS
, PIDGET (inferior_ptid
),
50 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
51 perror_with_name (_("Couldn't get registers"));
53 mipsnbsd_supply_reg (regcache
, (char *) ®s
, regno
);
58 if (regno
== -1 || regno
>= gdbarch_fp0_regnum (get_regcache_arch (regcache
)))
62 if (ptrace (PT_GETFPREGS
, PIDGET (inferior_ptid
),
63 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
64 perror_with_name (_("Couldn't get floating point status"));
66 mipsnbsd_supply_fpreg (regcache
, (char *) &fpregs
, regno
);
71 mipsnbsd_store_inferior_registers (struct regcache
*regcache
, int regno
)
73 if (regno
== -1 || getregs_supplies (regno
))
77 if (ptrace (PT_GETREGS
, PIDGET (inferior_ptid
),
78 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
79 perror_with_name (_("Couldn't get registers"));
81 mipsnbsd_fill_reg (regcache
, (char *) ®s
, regno
);
83 if (ptrace (PT_SETREGS
, PIDGET (inferior_ptid
),
84 (PTRACE_TYPE_ARG3
) ®s
, 0) == -1)
85 perror_with_name (_("Couldn't write registers"));
91 if (regno
== -1 || regno
>= gdbarch_fp0_regnum (get_regcache_arch (regcache
)))
95 if (ptrace (PT_GETFPREGS
, PIDGET (inferior_ptid
),
96 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
97 perror_with_name (_("Couldn't get floating point status"));
99 mipsnbsd_fill_fpreg (regcache
, (char *) &fpregs
, regno
);
101 if (ptrace (PT_SETFPREGS
, PIDGET (inferior_ptid
),
102 (PTRACE_TYPE_ARG3
) &fpregs
, 0) == -1)
103 perror_with_name (_("Couldn't write floating point status"));
108 /* Provide a prototype to silence -Wmissing-prototypes. */
109 void _initialize_mipsnbsd_nat (void);
112 _initialize_mipsnbsd_nat (void)
114 struct target_ops
*t
;
116 t
= inf_ptrace_target ();
117 t
->to_fetch_registers
= mipsnbsd_fetch_inferior_registers
;
118 t
->to_store_registers
= mipsnbsd_store_inferior_registers
;