Commit | Line | Data |
---|---|---|
e42180d7 | 1 | /* Native-dependent code for PowerPC's running NetBSD, for GDB. |
485721b1 JT |
2 | Copyright 2002 Free Software Foundation, Inc. |
3 | Contributed by Wasabi Systems, Inc. | |
e42180d7 C |
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 <sys/types.h> | |
23 | #include <sys/ptrace.h> | |
24 | #include <machine/reg.h> | |
e42180d7 C |
25 | |
26 | #include "defs.h" | |
27 | #include "inferior.h" | |
e42180d7 | 28 | |
485721b1 JT |
29 | #include "ppc-tdep.h" |
30 | #include "ppcnbsd-tdep.h" | |
e42180d7 | 31 | |
485721b1 JT |
32 | /* Returns true if PT_GETREGS fetches this register. */ |
33 | static int | |
34 | getregs_supplies (int regno) | |
e42180d7 | 35 | { |
485721b1 JT |
36 | struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch); |
37 | ||
38 | return ((regno >= 0 && regno <= 31) | |
39 | || regno == tdep->ppc_lr_regnum | |
40 | || regno == tdep->ppc_cr_regnum | |
41 | || regno == tdep->ppc_xer_regnum | |
42 | || regno == tdep->ppc_ctr_regnum | |
43 | || regno == PC_REGNUM); | |
e42180d7 C |
44 | } |
45 | ||
485721b1 JT |
46 | /* Like above, but for PT_GETFPREGS. */ |
47 | static int | |
48 | getfpregs_supplies (int regno) | |
e42180d7 | 49 | { |
485721b1 | 50 | struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch); |
e42180d7 | 51 | |
366f009f JB |
52 | return ((regno >= tdep->ppc_fp0_regnum |
53 | && regno < tdep->ppc_fp0_regnum + ppc_num_fprs) | |
485721b1 JT |
54 | || regno == tdep->ppc_fpscr_regnum); |
55 | } | |
e42180d7 C |
56 | |
57 | void | |
485721b1 | 58 | fetch_inferior_registers (int regno) |
e42180d7 | 59 | { |
485721b1 JT |
60 | if (regno == -1 || getregs_supplies (regno)) |
61 | { | |
62 | struct reg regs; | |
63 | ||
64 | if (ptrace (PT_GETREGS, PIDGET (inferior_ptid), | |
65 | (PTRACE_ARG3_TYPE) ®s, 0) == -1) | |
66 | perror_with_name ("Couldn't get registers"); | |
67 | ||
68 | ppcnbsd_supply_reg ((char *) ®s, regno); | |
69 | if (regno != -1) | |
70 | return; | |
71 | } | |
72 | ||
73 | if (regno == -1 || getfpregs_supplies (regno)) | |
74 | { | |
75 | struct fpreg fpregs; | |
76 | ||
77 | if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid), | |
78 | (PTRACE_ARG3_TYPE) &fpregs, 0) == -1) | |
79 | perror_with_name ("Couldn't get FP registers"); | |
80 | ||
81 | ppcnbsd_supply_fpreg ((char *) &fpregs, regno); | |
82 | if (regno != -1) | |
83 | return; | |
84 | } | |
e42180d7 C |
85 | } |
86 | ||
e42180d7 | 87 | void |
485721b1 | 88 | store_inferior_registers (int regno) |
e42180d7 | 89 | { |
485721b1 JT |
90 | if (regno == -1 || getregs_supplies (regno)) |
91 | { | |
92 | struct reg regs; | |
93 | ||
94 | if (ptrace (PT_GETREGS, PIDGET (inferior_ptid), | |
95 | (PTRACE_ARG3_TYPE) ®s, 0) == -1) | |
96 | perror_with_name ("Couldn't get registers"); | |
97 | ||
98 | ppcnbsd_fill_reg ((char *) ®s, regno); | |
99 | ||
100 | if (ptrace (PT_SETREGS, PIDGET (inferior_ptid), | |
101 | (PTRACE_ARG3_TYPE) ®s, 0) == -1) | |
102 | perror_with_name ("Couldn't write registers"); | |
103 | ||
104 | if (regno != -1) | |
105 | return; | |
106 | } | |
107 | ||
108 | if (regno == -1 || getfpregs_supplies (regno)) | |
109 | { | |
110 | struct fpreg fpregs; | |
111 | ||
112 | if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid), | |
113 | (PTRACE_ARG3_TYPE) &fpregs, 0) == -1) | |
114 | perror_with_name ("Couldn't get FP registers"); | |
115 | ||
116 | ppcnbsd_fill_fpreg ((char *) &fpregs, regno); | |
117 | ||
118 | if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid), | |
119 | (PTRACE_ARG3_TYPE) &fpregs, 0) == -1) | |
120 | perror_with_name ("Couldn't set FP registers"); | |
121 | } | |
e42180d7 | 122 | } |