aa2eb285de10f264292c8531b13721f3b3fdc5ea
1 /* GNU/Linux on ARM native support.
2 Copyright 1999, 2000 Free Software Foundation, Inc.
4 This file is part of GDB.
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.
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.
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. */
24 #include "gdb_string.h"
27 #include <sys/ptrace.h>
28 #include <sys/utsname.h>
30 extern int arm_apcs_32
;
33 #define typeSingle 0x01
34 #define typeDouble 0x02
35 #define typeExtended 0x03
37 #define CPSR_REGNUM 16
39 typedef union tagFPREG
42 unsigned int fDouble
[2];
43 unsigned int fExtended
[3];
47 typedef struct tagFPA11
49 FPREG fpreg
[8]; /* 8 floating point registers */
50 unsigned int fpsr
; /* floating point status register */
51 unsigned int fpcr
; /* floating point control register */
52 unsigned char fType
[8]; /* type of floating point value held in
53 floating point registers. */
54 int initflag
; /* NWFPE initialization flag. */
58 /* The following variables are used to determine the version of the
59 underlying Linux operating system. Examples:
61 Linux 2.0.35 Linux 2.2.12
62 os_version = 0x00020023 os_version = 0x0002020c
63 os_major = 2 os_major = 2
64 os_minor = 0 os_minor = 2
65 os_release = 35 os_release = 12
67 Note: os_version = (os_major << 16) | (os_minor << 8) | os_release
69 These are initialized using get_linux_version() from
70 _initialize_arm_linux_nat(). */
72 static unsigned int os_version
, os_major
, os_minor
, os_release
;
75 fetch_nwfpe_single (unsigned int fn
, FPA11
* fpa11
)
79 mem
[0] = fpa11
->fpreg
[fn
].fSingle
;
82 supply_register (F0_REGNUM
+ fn
, (char *) &mem
[0]);
86 fetch_nwfpe_double (unsigned int fn
, FPA11
* fpa11
)
90 mem
[0] = fpa11
->fpreg
[fn
].fDouble
[1];
91 mem
[1] = fpa11
->fpreg
[fn
].fDouble
[0];
93 supply_register (F0_REGNUM
+ fn
, (char *) &mem
[0]);
97 fetch_nwfpe_none (unsigned int fn
)
102 supply_register (F0_REGNUM
+ fn
, (char *) &mem
[0]);
106 fetch_nwfpe_extended (unsigned int fn
, FPA11
* fpa11
)
110 mem
[0] = fpa11
->fpreg
[fn
].fExtended
[0]; /* sign & exponent */
111 mem
[1] = fpa11
->fpreg
[fn
].fExtended
[2]; /* ls bits */
112 mem
[2] = fpa11
->fpreg
[fn
].fExtended
[1]; /* ms bits */
113 supply_register (F0_REGNUM
+ fn
, (char *) &mem
[0]);
117 store_nwfpe_single (unsigned int fn
, FPA11
* fpa11
)
121 read_register_gen (F0_REGNUM
+ fn
, (char *) &mem
[0]);
122 fpa11
->fpreg
[fn
].fSingle
= mem
[0];
123 fpa11
->fType
[fn
] = typeSingle
;
127 store_nwfpe_double (unsigned int fn
, FPA11
* fpa11
)
131 read_register_gen (F0_REGNUM
+ fn
, (char *) &mem
[0]);
132 fpa11
->fpreg
[fn
].fDouble
[1] = mem
[0];
133 fpa11
->fpreg
[fn
].fDouble
[0] = mem
[1];
134 fpa11
->fType
[fn
] = typeDouble
;
138 store_nwfpe_extended (unsigned int fn
, FPA11
* fpa11
)
142 read_register_gen (F0_REGNUM
+ fn
, (char *) &mem
[0]);
143 fpa11
->fpreg
[fn
].fExtended
[0] = mem
[0]; /* sign & exponent */
144 fpa11
->fpreg
[fn
].fExtended
[2] = mem
[1]; /* ls bits */
145 fpa11
->fpreg
[fn
].fExtended
[1] = mem
[2]; /* ms bits */
146 fpa11
->fType
[fn
] = typeDouble
;
149 /* Get the whole floating point state of the process and store the
150 floating point stack into registers[]. */
158 /* Read the floating point state. */
159 ret
= ptrace (PT_GETFPREGS
, inferior_pid
, 0, &fp
);
162 warning ("Unable to fetch the floating point state.");
167 supply_register (FPS_REGNUM
, (char *) &fp
.fpsr
);
169 /* Fetch the floating point registers. */
170 for (regno
= F0_REGNUM
; regno
<= F7_REGNUM
; regno
++)
172 int fn
= regno
- F0_REGNUM
;
174 switch (fp
.fType
[fn
])
177 fetch_nwfpe_single (fn
, &fp
);
181 fetch_nwfpe_double (fn
, &fp
);
185 fetch_nwfpe_extended (fn
, &fp
);
189 fetch_nwfpe_none (fn
);
194 /* Save the whole floating point state of the process using
195 the contents from registers[]. */
204 if (register_valid
[FPS_REGNUM
])
205 read_register_gen (FPS_REGNUM
, (char *) &fp
.fpsr
);
207 /* Store the floating point registers. */
208 for (regno
= F0_REGNUM
; regno
<= F7_REGNUM
; regno
++)
210 if (register_valid
[regno
])
212 unsigned int fn
= regno
- F0_REGNUM
;
213 switch (fp
.fType
[fn
])
216 store_nwfpe_single (fn
, &fp
);
220 store_nwfpe_double (fn
, &fp
);
224 store_nwfpe_extended (fn
, &fp
);
230 ret
= ptrace (PTRACE_SETFPREGS
, inferior_pid
, 0, &fp
);
233 warning ("Unable to store floating point state.");
238 /* Fetch all general registers of the process and store into
247 ret
= ptrace (PTRACE_GETREGS
, inferior_pid
, 0, ®s
);
250 warning ("Unable to fetch general registers.");
254 for (regno
= A1_REGNUM
; regno
< PC_REGNUM
; regno
++)
255 supply_register (regno
, (char *) ®s
.uregs
[regno
]);
258 supply_register (PS_REGNUM
, (char *) ®s
.uregs
[CPSR_REGNUM
]);
260 supply_register (PS_REGNUM
, (char *) ®s
.uregs
[PC_REGNUM
]);
262 regs
.uregs
[PC_REGNUM
] = ADDR_BITS_REMOVE (regs
.uregs
[PC_REGNUM
]);
263 supply_register (PC_REGNUM
, (char *) ®s
.uregs
[PC_REGNUM
]);
266 /* Store all general registers of the process from the values in
275 ret
= ptrace (PTRACE_GETREGS
, inferior_pid
, 0, ®s
);
278 warning ("Unable to fetch general registers.");
282 for (regno
= A1_REGNUM
; regno
<= PC_REGNUM
; regno
++)
284 if (register_valid
[regno
])
285 read_register_gen (regno
, (char *) ®s
.uregs
[regno
]);
288 ret
= ptrace (PTRACE_SETREGS
, inferior_pid
, 0, ®s
);
292 warning ("Unable to store general registers.");
297 /* Fetch registers from the child process. Fetch all registers if
298 regno == -1, otherwise fetch all general registers or all floating
299 point registers depending upon the value of regno. */
302 fetch_inferior_registers (int regno
)
304 if ((regno
< F0_REGNUM
) || (regno
> FPS_REGNUM
))
307 if (((regno
>= F0_REGNUM
) && (regno
<= FPS_REGNUM
)) || (regno
== -1))
311 /* Store registers back into the inferior. Store all registers if
312 regno == -1, otherwise store all general registers or all floating
313 point registers depending upon the value of regno. */
316 store_inferior_registers (int regno
)
318 if ((regno
< F0_REGNUM
) || (regno
> FPS_REGNUM
))
321 if (((regno
>= F0_REGNUM
) && (regno
<= FPS_REGNUM
)) || (regno
== -1))
326 arm_linux_register_u_addr (int blockend
, int regnum
)
328 return blockend
+ REGISTER_BYTE (regnum
);
332 arm_linux_kernel_u_size (void)
334 return (sizeof (struct user
));
338 get_linux_version (unsigned int *vmajor
,
339 unsigned int *vminor
,
340 unsigned int *vrelease
)
343 char *pmajor
, *pminor
, *prelease
, *tail
;
345 if (-1 == uname (&info
))
347 warning ("Unable to determine Linux version.");
351 pmajor
= strtok (info
.release
, ".");
352 pminor
= strtok (NULL
, ".");
353 prelease
= strtok (NULL
, ".");
355 *vmajor
= (unsigned int) strtoul (pmajor
, &tail
, 0);
356 *vminor
= (unsigned int) strtoul (pminor
, &tail
, 0);
357 *vrelease
= (unsigned int) strtoul (prelease
, &tail
, 0);
359 return ((*vmajor
<< 16) | (*vminor
<< 8) | *vrelease
);
363 _initialize_arm_linux_nat (void)
365 os_version
= get_linux_version (&os_major
, &os_minor
, &os_release
);
This page took 0.036869 seconds and 4 git commands to generate.