Commit | Line | Data |
---|---|---|
c906108c SS |
1 | /* Native-dependent code for SVR4 Unix running on i386's, for GDB. |
2 | Copyright 1988, 1989, 1991, 1992, 1996, 1998 Free Software Foundation, Inc. | |
3 | ||
c5aa993b | 4 | This file is part of GDB. |
c906108c | 5 | |
c5aa993b JM |
6 | This program is free software; you can redistribute it and/or modify |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 2 of the License, or | |
9 | (at your option) any later version. | |
c906108c | 10 | |
c5aa993b JM |
11 | This program is distributed in the hope that it will be useful, |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
c906108c | 15 | |
c5aa993b JM |
16 | You should have received a copy of the GNU General Public License |
17 | along with this program; if not, write to the Free Software | |
18 | Foundation, Inc., 59 Temple Place - Suite 330, | |
19 | Boston, MA 02111-1307, USA. */ | |
c906108c SS |
20 | |
21 | #include "defs.h" | |
22 | #include "value.h" | |
7a292a7a | 23 | #include "inferior.h" |
c906108c SS |
24 | |
25 | #ifdef HAVE_SYS_REG_H | |
26 | #include <sys/reg.h> | |
27 | #endif | |
28 | ||
29 | ||
30 | #ifdef HAVE_SYS_PROCFS_H | |
31 | ||
32 | #include <sys/procfs.h> | |
33 | ||
34 | /* The /proc interface divides the target machine's register set up into | |
c5aa993b JM |
35 | two different sets, the general register set (gregset) and the floating |
36 | point register set (fpregset). For each set, there is an ioctl to get | |
37 | the current register set and another ioctl to set the current values. | |
38 | ||
39 | The actual structure passed through the ioctl interface is, of course, | |
40 | naturally machine dependent, and is different for each set of registers. | |
41 | For the i386 for example, the general register set is typically defined | |
42 | by: | |
43 | ||
44 | typedef int gregset_t[19]; (in <sys/regset.h>) | |
45 | ||
46 | #define GS 0 (in <sys/reg.h>) | |
47 | #define FS 1 | |
48 | ... | |
49 | #define UESP 17 | |
50 | #define SS 18 | |
51 | ||
52 | and the floating point set by: | |
53 | ||
54 | typedef struct fpregset | |
55 | { | |
56 | union | |
57 | { | |
58 | struct fpchip_state // fp extension state // | |
59 | { | |
60 | int state[27]; // 287/387 saved state // | |
61 | int status; // status word saved at exception // | |
62 | } fpchip_state; | |
63 | struct fp_emul_space // for emulators // | |
64 | { | |
65 | char fp_emul[246]; | |
66 | char fp_epad[2]; | |
67 | } fp_emul_space; | |
68 | int f_fpregs[62]; // union of the above // | |
69 | } fp_reg_set; | |
70 | long f_wregs[33]; // saved weitek state // | |
71 | } fpregset_t; | |
72 | ||
73 | These routines provide the packing and unpacking of gregset_t and | |
74 | fpregset_t formatted data. | |
c906108c SS |
75 | |
76 | */ | |
77 | ||
78 | #ifdef HAVE_GREGSET_T | |
79 | ||
80 | /* This is a duplicate of the table in i386-xdep.c. */ | |
81 | ||
c5aa993b | 82 | static int regmap[] = |
c906108c SS |
83 | { |
84 | EAX, ECX, EDX, EBX, | |
85 | UESP, EBP, ESI, EDI, | |
86 | EIP, EFL, CS, SS, | |
87 | DS, ES, FS, GS, | |
88 | }; | |
89 | ||
90 | /* Prototypes for local functions */ | |
91 | ||
92 | void fill_gregset PARAMS ((gregset_t *, int)); | |
93 | ||
94 | void supply_gregset PARAMS ((gregset_t *)); | |
95 | ||
96 | void supply_fpregset PARAMS ((fpregset_t *)); | |
97 | ||
98 | void fill_fpregset PARAMS ((fpregset_t *, int)); | |
99 | ||
100 | ||
101 | /* FIXME: These routine absolutely depends upon (NUM_REGS - NUM_FREGS) | |
c5aa993b JM |
102 | being less than or equal to the number of registers that can be stored |
103 | in a gregset_t. Note that with the current scheme there will typically | |
104 | be more registers actually stored in a gregset_t that what we know | |
105 | about. This is bogus and should be fixed. */ | |
c906108c SS |
106 | |
107 | /* Given a pointer to a general register set in /proc format (gregset_t *), | |
c5aa993b JM |
108 | unpack the register contents and supply them as gdb's idea of the current |
109 | register values. */ | |
c906108c SS |
110 | |
111 | void | |
112 | supply_gregset (gregsetp) | |
113 | gregset_t *gregsetp; | |
114 | { | |
115 | register int regi; | |
116 | register greg_t *regp = (greg_t *) gregsetp; | |
117 | extern int regmap[]; | |
118 | ||
c5aa993b | 119 | for (regi = 0; regi < (NUM_REGS - NUM_FREGS); regi++) |
c906108c SS |
120 | { |
121 | supply_register (regi, (char *) (regp + regmap[regi])); | |
122 | } | |
123 | } | |
124 | ||
125 | void | |
126 | fill_gregset (gregsetp, regno) | |
127 | gregset_t *gregsetp; | |
128 | int regno; | |
129 | { | |
130 | int regi; | |
131 | register greg_t *regp = (greg_t *) gregsetp; | |
c906108c SS |
132 | extern int regmap[]; |
133 | ||
c5aa993b | 134 | for (regi = 0; regi < (NUM_REGS - NUM_FREGS); regi++) |
c906108c SS |
135 | { |
136 | if ((regno == -1) || (regno == regi)) | |
137 | { | |
138 | *(regp + regmap[regi]) = *(int *) ®isters[REGISTER_BYTE (regi)]; | |
139 | } | |
140 | } | |
141 | } | |
142 | ||
c5aa993b | 143 | #endif /* HAVE_GREGSET_T */ |
c906108c | 144 | |
14164c30 | 145 | #if defined (HAVE_FPREGSET_T) |
c906108c SS |
146 | |
147 | /* Given a pointer to a floating point register set in /proc format | |
c5aa993b JM |
148 | (fpregset_t *), unpack the register contents and supply them as gdb's |
149 | idea of the current floating point register values. */ | |
c906108c | 150 | |
14164c30 PS |
151 | /* FIXME: Assumes that fpregsetp contains an i387 FSAVE area. */ |
152 | static const int freg_offset_map[] = | |
153 | { | |
154 | #if !defined(FPREGSET_FSAVE_OFFSET) | |
155 | #define FPREGSET_FSAVE_OFFSET 0 | |
156 | #endif | |
157 | FPREGSET_FSAVE_OFFSET + 28 + 0 * 10, | |
158 | FPREGSET_FSAVE_OFFSET + 28 + 1 * 10, | |
159 | FPREGSET_FSAVE_OFFSET + 28 + 2 * 10, | |
160 | FPREGSET_FSAVE_OFFSET + 28 + 3 * 10, | |
161 | FPREGSET_FSAVE_OFFSET + 28 + 4 * 10, | |
162 | FPREGSET_FSAVE_OFFSET + 28 + 5 * 10, | |
163 | FPREGSET_FSAVE_OFFSET + 28 + 6 * 10, | |
164 | FPREGSET_FSAVE_OFFSET + 28 + 7 * 10, | |
165 | FPREGSET_FSAVE_OFFSET + 0, | |
166 | FPREGSET_FSAVE_OFFSET + 4, | |
167 | FPREGSET_FSAVE_OFFSET + 8, | |
168 | FPREGSET_FSAVE_OFFSET + 16, | |
169 | FPREGSET_FSAVE_OFFSET + 12, | |
170 | FPREGSET_FSAVE_OFFSET + 24, | |
171 | FPREGSET_FSAVE_OFFSET + 20, | |
172 | FPREGSET_FSAVE_OFFSET + 16 | |
173 | }; | |
174 | ||
c5aa993b | 175 | void |
c906108c SS |
176 | supply_fpregset (fpregsetp) |
177 | fpregset_t *fpregsetp; | |
178 | { | |
14164c30 PS |
179 | int regi; |
180 | ||
181 | if (NUM_FREGS == 0) | |
182 | return; | |
183 | for (regi = FP0_REGNUM; regi <= LAST_FPU_CTRL_REGNUM; regi++) | |
184 | { | |
185 | char tbuf[4]; | |
186 | ULONGEST tval; | |
187 | char *from = (char *) fpregsetp + freg_offset_map[regi - FP0_REGNUM]; | |
188 | ||
189 | if (regi == FCS_REGNUM) | |
190 | { | |
191 | tval = extract_unsigned_integer (from, 4) & 0xffff; | |
192 | store_unsigned_integer (tbuf, 4, tval); | |
193 | supply_register (regi, tbuf); | |
194 | } | |
195 | else if (regi == FOP_REGNUM) | |
196 | { | |
197 | tval = (extract_unsigned_integer (from, 4) >> 16) & ((1 << 11) - 1); | |
198 | store_unsigned_integer (tbuf, 4, tval); | |
199 | supply_register (regi, tbuf); | |
200 | } | |
201 | else | |
202 | supply_register (regi, from); | |
203 | } | |
c906108c SS |
204 | } |
205 | ||
206 | /* Given a pointer to a floating point register set in /proc format | |
c5aa993b JM |
207 | (fpregset_t *), update the register specified by REGNO from gdb's idea |
208 | of the current floating point register set. If REGNO is -1, update | |
209 | them all. */ | |
c906108c SS |
210 | |
211 | void | |
212 | fill_fpregset (fpregsetp, regno) | |
213 | fpregset_t *fpregsetp; | |
214 | int regno; | |
215 | { | |
14164c30 PS |
216 | int regi; |
217 | ||
218 | if (NUM_FREGS == 0) | |
219 | return; | |
220 | for (regi = FP0_REGNUM; regi <= LAST_FPU_CTRL_REGNUM; regi++) | |
221 | { | |
222 | if ((regno == -1) || (regno == regi)) | |
223 | { | |
224 | char *to = (char *) fpregsetp + freg_offset_map[regi - FP0_REGNUM]; | |
225 | char *from = (char *) ®isters[REGISTER_BYTE (regi)]; | |
226 | ULONGEST valto; | |
227 | ULONGEST valfrom; | |
228 | ||
229 | if (regi == FCS_REGNUM) | |
230 | { | |
231 | valto = extract_unsigned_integer (to, 4); | |
232 | valfrom = extract_unsigned_integer (from, 4); | |
233 | valto = (valto & ~0xffff) | (valfrom & 0xffff); | |
234 | store_unsigned_integer (to, 4, valto); | |
235 | } | |
236 | else if (regi == FOP_REGNUM) | |
237 | { | |
238 | valto = extract_unsigned_integer (to, 4); | |
239 | valfrom = extract_unsigned_integer (from, 4); | |
240 | valto = (valto & 0xffff) | ((valfrom & ((1 << 11) - 1)) << 16); | |
241 | store_unsigned_integer (to, 4, valto); | |
242 | } | |
243 | else | |
244 | { | |
245 | memcpy (to, from, REGISTER_RAW_SIZE (regi)); | |
246 | } | |
247 | } | |
248 | } | |
c906108c SS |
249 | } |
250 | ||
14164c30 | 251 | #endif /* defined (HAVE_FPREGSET_T) */ |
c906108c | 252 | |
c5aa993b | 253 | #endif /* HAVE_SYS_PROCFS_H */ |