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);