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
34 getregs_supplies (int regno)
35 {
36   return ((regno) >= ZERO_REGNUM && (regno) <= PC_REGNUM);
37 }
38 
39 void
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) &regs, 0) == -1)
48 	perror_with_name ("Couldn't get registers");
49 
50       mipsnbsd_supply_reg ((char *) &regs, 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
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) &regs, 0) == -1)
76 	perror_with_name ("Couldn't get registers");
77 
78       mipsnbsd_fill_reg ((char *) &regs, regno);
79 
80       if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
81 		  (PTRACE_TYPE_ARG3) &regs, 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