1 /* GNU/Linux/PowerPC specific low level interface, for the remote server for
3 Copyright (C) 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2005, 2007, 2008
4 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
22 #include "linux-low.h"
25 #include <asm/ptrace.h>
27 /* These are in <asm/cputable.h> in current kernels. */
28 #define PPC_FEATURE_HAS_ALTIVEC 0x10000000
29 #define PPC_FEATURE_HAS_SPE 0x00800000
31 static unsigned long ppc_hwcap
;
34 /* Defined in auto-generated file powerpc-32l.c. */
35 void init_registers_powerpc_32l (void);
36 /* Defined in auto-generated file powerpc-altivec32l.c. */
37 void init_registers_powerpc_altivec32l (void);
38 /* Defined in auto-generated file powerpc-e500l.c. */
39 void init_registers_powerpc_e500l (void);
40 /* Defined in auto-generated file powerpc-64l.c. */
41 void init_registers_powerpc_64l (void);
42 /* Defined in auto-generated file powerpc-altivec64l.c. */
43 void init_registers_powerpc_altivec64l (void);
45 #define ppc_num_regs 73
47 /* This sometimes isn't defined. */
56 /* We use a constant for FPSCR instead of PT_FPSCR, because
57 many shipped PPC64 kernels had the wrong value in ptrace.h. */
58 static int ppc_regmap
[] =
59 {PT_R0
* 8, PT_R1
* 8, PT_R2
* 8, PT_R3
* 8,
60 PT_R4
* 8, PT_R5
* 8, PT_R6
* 8, PT_R7
* 8,
61 PT_R8
* 8, PT_R9
* 8, PT_R10
* 8, PT_R11
* 8,
62 PT_R12
* 8, PT_R13
* 8, PT_R14
* 8, PT_R15
* 8,
63 PT_R16
* 8, PT_R17
* 8, PT_R18
* 8, PT_R19
* 8,
64 PT_R20
* 8, PT_R21
* 8, PT_R22
* 8, PT_R23
* 8,
65 PT_R24
* 8, PT_R25
* 8, PT_R26
* 8, PT_R27
* 8,
66 PT_R28
* 8, PT_R29
* 8, PT_R30
* 8, PT_R31
* 8,
67 PT_FPR0
*8, PT_FPR0
*8 + 8, PT_FPR0
*8+16, PT_FPR0
*8+24,
68 PT_FPR0
*8+32, PT_FPR0
*8+40, PT_FPR0
*8+48, PT_FPR0
*8+56,
69 PT_FPR0
*8+64, PT_FPR0
*8+72, PT_FPR0
*8+80, PT_FPR0
*8+88,
70 PT_FPR0
*8+96, PT_FPR0
*8+104, PT_FPR0
*8+112, PT_FPR0
*8+120,
71 PT_FPR0
*8+128, PT_FPR0
*8+136, PT_FPR0
*8+144, PT_FPR0
*8+152,
72 PT_FPR0
*8+160, PT_FPR0
*8+168, PT_FPR0
*8+176, PT_FPR0
*8+184,
73 PT_FPR0
*8+192, PT_FPR0
*8+200, PT_FPR0
*8+208, PT_FPR0
*8+216,
74 PT_FPR0
*8+224, PT_FPR0
*8+232, PT_FPR0
*8+240, PT_FPR0
*8+248,
75 PT_NIP
* 8, PT_MSR
* 8, PT_CCR
* 8, PT_LNK
* 8,
76 PT_CTR
* 8, PT_XER
* 8, PT_FPR0
*8 + 256,
77 PT_ORIG_R3
* 8, PT_TRAP
* 8 };
79 /* Currently, don't check/send MQ. */
80 static int ppc_regmap
[] =
81 {PT_R0
* 4, PT_R1
* 4, PT_R2
* 4, PT_R3
* 4,
82 PT_R4
* 4, PT_R5
* 4, PT_R6
* 4, PT_R7
* 4,
83 PT_R8
* 4, PT_R9
* 4, PT_R10
* 4, PT_R11
* 4,
84 PT_R12
* 4, PT_R13
* 4, PT_R14
* 4, PT_R15
* 4,
85 PT_R16
* 4, PT_R17
* 4, PT_R18
* 4, PT_R19
* 4,
86 PT_R20
* 4, PT_R21
* 4, PT_R22
* 4, PT_R23
* 4,
87 PT_R24
* 4, PT_R25
* 4, PT_R26
* 4, PT_R27
* 4,
88 PT_R28
* 4, PT_R29
* 4, PT_R30
* 4, PT_R31
* 4,
89 PT_FPR0
*4, PT_FPR0
*4 + 8, PT_FPR0
*4+16, PT_FPR0
*4+24,
90 PT_FPR0
*4+32, PT_FPR0
*4+40, PT_FPR0
*4+48, PT_FPR0
*4+56,
91 PT_FPR0
*4+64, PT_FPR0
*4+72, PT_FPR0
*4+80, PT_FPR0
*4+88,
92 PT_FPR0
*4+96, PT_FPR0
*4+104, PT_FPR0
*4+112, PT_FPR0
*4+120,
93 PT_FPR0
*4+128, PT_FPR0
*4+136, PT_FPR0
*4+144, PT_FPR0
*4+152,
94 PT_FPR0
*4+160, PT_FPR0
*4+168, PT_FPR0
*4+176, PT_FPR0
*4+184,
95 PT_FPR0
*4+192, PT_FPR0
*4+200, PT_FPR0
*4+208, PT_FPR0
*4+216,
96 PT_FPR0
*4+224, PT_FPR0
*4+232, PT_FPR0
*4+240, PT_FPR0
*4+248,
97 PT_NIP
* 4, PT_MSR
* 4, PT_CCR
* 4, PT_LNK
* 4,
98 PT_CTR
* 4, PT_XER
* 4, PT_FPSCR
* 4,
99 PT_ORIG_R3
* 4, PT_TRAP
* 4
102 static int ppc_regmap_e500
[] =
103 {PT_R0
* 4, PT_R1
* 4, PT_R2
* 4, PT_R3
* 4,
104 PT_R4
* 4, PT_R5
* 4, PT_R6
* 4, PT_R7
* 4,
105 PT_R8
* 4, PT_R9
* 4, PT_R10
* 4, PT_R11
* 4,
106 PT_R12
* 4, PT_R13
* 4, PT_R14
* 4, PT_R15
* 4,
107 PT_R16
* 4, PT_R17
* 4, PT_R18
* 4, PT_R19
* 4,
108 PT_R20
* 4, PT_R21
* 4, PT_R22
* 4, PT_R23
* 4,
109 PT_R24
* 4, PT_R25
* 4, PT_R26
* 4, PT_R27
* 4,
110 PT_R28
* 4, PT_R29
* 4, PT_R30
* 4, PT_R31
* 4,
119 PT_NIP
* 4, PT_MSR
* 4, PT_CCR
* 4, PT_LNK
* 4,
120 PT_CTR
* 4, PT_XER
* 4, -1,
121 PT_ORIG_R3
* 4, PT_TRAP
* 4
126 ppc_cannot_store_register (int regno
)
128 #ifndef __powerpc64__
129 /* Some kernels do not allow us to store fpscr. */
130 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
) && regno
== find_regno ("fpscr"))
134 /* Some kernels do not allow us to store orig_r3 or trap. */
135 if (regno
== find_regno ("orig_r3")
136 || regno
== find_regno ("trap"))
143 ppc_cannot_fetch_register (int regno
)
149 ppc_collect_ptrace_register (int regno
, char *buf
)
151 int size
= register_size (regno
);
152 if (size
< sizeof (long))
153 collect_register (regno
, buf
+ sizeof (long) - size
);
155 collect_register (regno
, buf
);
159 ppc_supply_ptrace_register (int regno
, const char *buf
)
161 int size
= register_size (regno
);
162 if (size
< sizeof (long))
163 supply_register (regno
, buf
+ sizeof (long) - size
);
165 supply_register (regno
, buf
);
171 if (register_size (0) == 4)
174 collect_register_by_name ("pc", &pc
);
175 return (CORE_ADDR
) pc
;
180 collect_register_by_name ("pc", &pc
);
181 return (CORE_ADDR
) pc
;
186 ppc_set_pc (CORE_ADDR pc
)
188 if (register_size (0) == 4)
190 unsigned int newpc
= pc
;
191 supply_register_by_name ("pc", &newpc
);
195 unsigned long newpc
= pc
;
196 supply_register_by_name ("pc", &newpc
);
202 ppc_get_hwcap (unsigned long *valp
)
204 int wordsize
= register_size (0);
205 unsigned char *data
= alloca (2 * wordsize
);
208 while ((*the_target
->read_auxv
) (offset
, data
, 2 * wordsize
) == 2 * wordsize
)
212 unsigned int *data_p
= (unsigned int *)data
;
213 if (data_p
[0] == AT_HWCAP
)
221 unsigned long *data_p
= (unsigned long *)data
;
222 if (data_p
[0] == AT_HWCAP
)
229 offset
+= 2 * wordsize
;
237 ppc_arch_setup (void)
242 /* On a 64-bit host, assume 64-bit inferior process with no
243 AltiVec registers. Reset ppc_hwcap to ensure that the
244 collect_register call below does not fail. */
245 init_registers_powerpc_64l ();
248 /* Only if the high bit of the MSR is set, we actually have
249 a 64-bit inferior. */
250 collect_register_by_name ("msr", &msr
);
253 ppc_get_hwcap (&ppc_hwcap
);
254 if (ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
)
255 init_registers_powerpc_altivec64l ();
261 /* OK, we have a 32-bit inferior. */
262 init_registers_powerpc_32l ();
264 ppc_get_hwcap (&ppc_hwcap
);
265 if (ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
)
266 init_registers_powerpc_altivec32l ();
268 /* On 32-bit machines, check for SPE registers.
269 Set the low target's regmap field as appropriately. */
270 #ifndef __powerpc64__
271 the_low_target
.regmap
= ppc_regmap
;
272 if (ppc_hwcap
& PPC_FEATURE_HAS_SPE
)
274 init_registers_powerpc_e500l ();
275 the_low_target
.regmap
= ppc_regmap_e500
;
280 /* Correct in either endianness.
281 This instruction is "twge r2, r2", which GDB uses as a software
283 static const unsigned int ppc_breakpoint
= 0x7d821008;
284 #define ppc_breakpoint_len 4
287 ppc_breakpoint_at (CORE_ADDR where
)
291 (*the_target
->read_memory
) (where
, (unsigned char *) &insn
, 4);
292 if (insn
== ppc_breakpoint
)
294 /* If necessary, recognize more trap instructions here. GDB only uses the
299 /* Provide only a fill function for the general register set. ps_lgetregs
300 will use this for NPTL support. */
302 static void ppc_fill_gregset (void *buf
)
306 for (i
= 0; i
< 32; i
++)
307 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
309 for (i
= 64; i
< 70; i
++)
310 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
312 for (i
= 71; i
< 73; i
++)
313 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
316 #ifndef PTRACE_GETVRREGS
317 #define PTRACE_GETVRREGS 18
318 #define PTRACE_SETVRREGS 19
321 #define SIZEOF_VRREGS 33*16+4
324 ppc_fill_vrregset (void *buf
)
329 if (!(ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
))
332 base
= find_regno ("vr0");
333 for (i
= 0; i
< 32; i
++)
334 collect_register (base
+ i
, ®set
[i
* 16]);
336 collect_register_by_name ("vscr", ®set
[32 * 16 + 12]);
337 collect_register_by_name ("vrsave", ®set
[33 * 16]);
341 ppc_store_vrregset (const void *buf
)
344 const char *regset
= buf
;
346 if (!(ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
))
349 base
= find_regno ("vr0");
350 for (i
= 0; i
< 32; i
++)
351 supply_register (base
+ i
, ®set
[i
* 16]);
353 supply_register_by_name ("vscr", ®set
[32 * 16 + 12]);
354 supply_register_by_name ("vrsave", ®set
[33 * 16]);
357 #ifndef PTRACE_GETEVRREGS
358 #define PTRACE_GETEVRREGS 20
359 #define PTRACE_SETEVRREGS 21
362 struct gdb_evrregset_t
364 unsigned long evr
[32];
365 unsigned long long acc
;
366 unsigned long spefscr
;
370 ppc_fill_evrregset (void *buf
)
373 struct gdb_evrregset_t
*regset
= buf
;
375 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
))
378 ev0
= find_regno ("ev0h");
379 for (i
= 0; i
< 32; i
++)
380 collect_register (ev0
+ i
, ®set
->evr
[i
]);
382 collect_register_by_name ("acc", ®set
->acc
);
383 collect_register_by_name ("spefscr", ®set
->spefscr
);
387 ppc_store_evrregset (const void *buf
)
390 const struct gdb_evrregset_t
*regset
= buf
;
392 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
))
395 ev0
= find_regno ("ev0h");
396 for (i
= 0; i
< 32; i
++)
397 supply_register (ev0
+ i
, ®set
->evr
[i
]);
399 supply_register_by_name ("acc", ®set
->acc
);
400 supply_register_by_name ("spefscr", ®set
->spefscr
);
403 struct regset_info target_regsets
[] = {
404 /* List the extra register sets before GENERAL_REGS. That way we will
405 fetch them every time, but still fall back to PTRACE_PEEKUSER for the
406 general registers. Some kernels support these, but not the newer
407 PPC_PTRACE_GETREGS. */
408 { PTRACE_GETVRREGS
, PTRACE_SETVRREGS
, SIZEOF_VRREGS
, EXTENDED_REGS
,
409 ppc_fill_vrregset
, ppc_store_vrregset
},
410 { PTRACE_GETEVRREGS
, PTRACE_SETEVRREGS
, 32 * 4 + 8 + 4, EXTENDED_REGS
,
411 ppc_fill_evrregset
, ppc_store_evrregset
},
412 { 0, 0, 0, GENERAL_REGS
, ppc_fill_gregset
, NULL
},
413 { 0, 0, -1, -1, NULL
, NULL
}
416 struct linux_target_ops the_low_target
= {
420 ppc_cannot_fetch_register
,
421 ppc_cannot_store_register
,
424 (const unsigned char *) &ppc_breakpoint
,
433 ppc_collect_ptrace_register
,
434 ppc_supply_ptrace_register
,