1 /* Native-dependent code for MIPS systems running NetBSD.
2
3 Copyright 2000, 2001, 2002, 2004 Free Software Foundation, Inc.
4
5 This file is part of GDB.
6
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 2 of the License, or
10 (at your option) any later version.
11
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.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
21
22 #include "defs.h"
23 #include "inferior.h"
24 #include "regcache.h"
25
26 #include "mipsnbsd-tdep.h"
27
28 #include <sys/types.h>
29 #include <sys/ptrace.h>
30 #include <machine/reg.h>
31
32 /* Determine if PT_GETREGS fetches this register. */
33 static int
getregs_supplies(int regno)34 getregs_supplies (int regno)
35 {
36 return ((regno) >= ZERO_REGNUM && (regno) <= PC_REGNUM);
37 }
38
39 void
fetch_inferior_registers(int regno)40 fetch_inferior_registers (int regno)
41 {
42 if (regno == -1 || getregs_supplies (regno))
43 {
44 struct reg regs;
45
46 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
47 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
48 perror_with_name ("Couldn't get registers");
49
50 mipsnbsd_supply_reg ((char *) ®s, regno);
51 if (regno != -1)
52 return;
53 }
54
55 if (regno == -1 || regno >= FP0_REGNUM)
56 {
57 struct fpreg fpregs;
58
59 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
60 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
61 perror_with_name ("Couldn't get floating point status");
62
63 mipsnbsd_supply_fpreg ((char *) &fpregs, regno);
64 }
65 }
66
67 void
store_inferior_registers(int regno)68 store_inferior_registers (int regno)
69 {
70 if (regno == -1 || getregs_supplies (regno))
71 {
72 struct reg regs;
73
74 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
75 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
76 perror_with_name ("Couldn't get registers");
77
78 mipsnbsd_fill_reg ((char *) ®s, regno);
79
80 if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
81 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
82 perror_with_name ("Couldn't write registers");
83
84 if (regno != -1)
85 return;
86 }
87
88 if (regno == -1 || regno >= FP0_REGNUM)
89 {
90 struct fpreg fpregs;
91
92 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
93 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
94 perror_with_name ("Couldn't get floating point status");
95
96 mipsnbsd_fill_fpreg ((char *) &fpregs, regno);
97
98 if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
99 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
100 perror_with_name ("Couldn't write floating point status");
101 }
102 }
103