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_VSX 0x00000080
29 #define PPC_FEATURE_HAS_ALTIVEC 0x10000000
30 #define PPC_FEATURE_HAS_SPE 0x00800000
32 static unsigned long ppc_hwcap
;
35 /* Defined in auto-generated file powerpc-32l.c. */
36 void init_registers_powerpc_32l (void);
37 /* Defined in auto-generated file powerpc-altivec32l.c. */
38 void init_registers_powerpc_altivec32l (void);
39 /* Defined in auto-generated file powerpc-vsx32l.c. */
40 void init_registers_powerpc_vsx32l (void);
41 /* Defined in auto-generated file powerpc-e500l.c. */
42 void init_registers_powerpc_e500l (void);
43 /* Defined in auto-generated file powerpc-64l.c. */
44 void init_registers_powerpc_64l (void);
45 /* Defined in auto-generated file powerpc-altivec64l.c. */
46 void init_registers_powerpc_altivec64l (void);
47 /* Defined in auto-generated file powerpc-vsx64l.c. */
48 void init_registers_powerpc_vsx64l (void);
50 #define ppc_num_regs 73
52 /* This sometimes isn't defined. */
61 /* We use a constant for FPSCR instead of PT_FPSCR, because
62 many shipped PPC64 kernels had the wrong value in ptrace.h. */
63 static int ppc_regmap
[] =
64 {PT_R0
* 8, PT_R1
* 8, PT_R2
* 8, PT_R3
* 8,
65 PT_R4
* 8, PT_R5
* 8, PT_R6
* 8, PT_R7
* 8,
66 PT_R8
* 8, PT_R9
* 8, PT_R10
* 8, PT_R11
* 8,
67 PT_R12
* 8, PT_R13
* 8, PT_R14
* 8, PT_R15
* 8,
68 PT_R16
* 8, PT_R17
* 8, PT_R18
* 8, PT_R19
* 8,
69 PT_R20
* 8, PT_R21
* 8, PT_R22
* 8, PT_R23
* 8,
70 PT_R24
* 8, PT_R25
* 8, PT_R26
* 8, PT_R27
* 8,
71 PT_R28
* 8, PT_R29
* 8, PT_R30
* 8, PT_R31
* 8,
72 PT_FPR0
*8, PT_FPR0
*8 + 8, PT_FPR0
*8+16, PT_FPR0
*8+24,
73 PT_FPR0
*8+32, PT_FPR0
*8+40, PT_FPR0
*8+48, PT_FPR0
*8+56,
74 PT_FPR0
*8+64, PT_FPR0
*8+72, PT_FPR0
*8+80, PT_FPR0
*8+88,
75 PT_FPR0
*8+96, PT_FPR0
*8+104, PT_FPR0
*8+112, PT_FPR0
*8+120,
76 PT_FPR0
*8+128, PT_FPR0
*8+136, PT_FPR0
*8+144, PT_FPR0
*8+152,
77 PT_FPR0
*8+160, PT_FPR0
*8+168, PT_FPR0
*8+176, PT_FPR0
*8+184,
78 PT_FPR0
*8+192, PT_FPR0
*8+200, PT_FPR0
*8+208, PT_FPR0
*8+216,
79 PT_FPR0
*8+224, PT_FPR0
*8+232, PT_FPR0
*8+240, PT_FPR0
*8+248,
80 PT_NIP
* 8, PT_MSR
* 8, PT_CCR
* 8, PT_LNK
* 8,
81 PT_CTR
* 8, PT_XER
* 8, PT_FPR0
*8 + 256,
82 PT_ORIG_R3
* 8, PT_TRAP
* 8 };
84 /* Currently, don't check/send MQ. */
85 static int ppc_regmap
[] =
86 {PT_R0
* 4, PT_R1
* 4, PT_R2
* 4, PT_R3
* 4,
87 PT_R4
* 4, PT_R5
* 4, PT_R6
* 4, PT_R7
* 4,
88 PT_R8
* 4, PT_R9
* 4, PT_R10
* 4, PT_R11
* 4,
89 PT_R12
* 4, PT_R13
* 4, PT_R14
* 4, PT_R15
* 4,
90 PT_R16
* 4, PT_R17
* 4, PT_R18
* 4, PT_R19
* 4,
91 PT_R20
* 4, PT_R21
* 4, PT_R22
* 4, PT_R23
* 4,
92 PT_R24
* 4, PT_R25
* 4, PT_R26
* 4, PT_R27
* 4,
93 PT_R28
* 4, PT_R29
* 4, PT_R30
* 4, PT_R31
* 4,
94 PT_FPR0
*4, PT_FPR0
*4 + 8, PT_FPR0
*4+16, PT_FPR0
*4+24,
95 PT_FPR0
*4+32, PT_FPR0
*4+40, PT_FPR0
*4+48, PT_FPR0
*4+56,
96 PT_FPR0
*4+64, PT_FPR0
*4+72, PT_FPR0
*4+80, PT_FPR0
*4+88,
97 PT_FPR0
*4+96, PT_FPR0
*4+104, PT_FPR0
*4+112, PT_FPR0
*4+120,
98 PT_FPR0
*4+128, PT_FPR0
*4+136, PT_FPR0
*4+144, PT_FPR0
*4+152,
99 PT_FPR0
*4+160, PT_FPR0
*4+168, PT_FPR0
*4+176, PT_FPR0
*4+184,
100 PT_FPR0
*4+192, PT_FPR0
*4+200, PT_FPR0
*4+208, PT_FPR0
*4+216,
101 PT_FPR0
*4+224, PT_FPR0
*4+232, PT_FPR0
*4+240, PT_FPR0
*4+248,
102 PT_NIP
* 4, PT_MSR
* 4, PT_CCR
* 4, PT_LNK
* 4,
103 PT_CTR
* 4, PT_XER
* 4, PT_FPSCR
* 4,
104 PT_ORIG_R3
* 4, PT_TRAP
* 4
107 static int ppc_regmap_e500
[] =
108 {PT_R0
* 4, PT_R1
* 4, PT_R2
* 4, PT_R3
* 4,
109 PT_R4
* 4, PT_R5
* 4, PT_R6
* 4, PT_R7
* 4,
110 PT_R8
* 4, PT_R9
* 4, PT_R10
* 4, PT_R11
* 4,
111 PT_R12
* 4, PT_R13
* 4, PT_R14
* 4, PT_R15
* 4,
112 PT_R16
* 4, PT_R17
* 4, PT_R18
* 4, PT_R19
* 4,
113 PT_R20
* 4, PT_R21
* 4, PT_R22
* 4, PT_R23
* 4,
114 PT_R24
* 4, PT_R25
* 4, PT_R26
* 4, PT_R27
* 4,
115 PT_R28
* 4, PT_R29
* 4, PT_R30
* 4, PT_R31
* 4,
124 PT_NIP
* 4, PT_MSR
* 4, PT_CCR
* 4, PT_LNK
* 4,
125 PT_CTR
* 4, PT_XER
* 4, -1,
126 PT_ORIG_R3
* 4, PT_TRAP
* 4
131 ppc_cannot_store_register (int regno
)
133 #ifndef __powerpc64__
134 /* Some kernels do not allow us to store fpscr. */
135 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
) && regno
== find_regno ("fpscr"))
139 /* Some kernels do not allow us to store orig_r3 or trap. */
140 if (regno
== find_regno ("orig_r3")
141 || regno
== find_regno ("trap"))
148 ppc_cannot_fetch_register (int regno
)
154 ppc_collect_ptrace_register (int regno
, char *buf
)
156 int size
= register_size (regno
);
158 memset (buf
, 0, sizeof (long));
160 if (size
< sizeof (long))
161 collect_register (regno
, buf
+ sizeof (long) - size
);
163 collect_register (regno
, buf
);
167 ppc_supply_ptrace_register (int regno
, const char *buf
)
169 int size
= register_size (regno
);
170 if (size
< sizeof (long))
171 supply_register (regno
, buf
+ sizeof (long) - size
);
173 supply_register (regno
, buf
);
179 if (register_size (0) == 4)
182 collect_register_by_name ("pc", &pc
);
183 return (CORE_ADDR
) pc
;
188 collect_register_by_name ("pc", &pc
);
189 return (CORE_ADDR
) pc
;
194 ppc_set_pc (CORE_ADDR pc
)
196 if (register_size (0) == 4)
198 unsigned int newpc
= pc
;
199 supply_register_by_name ("pc", &newpc
);
203 unsigned long newpc
= pc
;
204 supply_register_by_name ("pc", &newpc
);
210 ppc_get_hwcap (unsigned long *valp
)
212 int wordsize
= register_size (0);
213 unsigned char *data
= alloca (2 * wordsize
);
216 while ((*the_target
->read_auxv
) (offset
, data
, 2 * wordsize
) == 2 * wordsize
)
220 unsigned int *data_p
= (unsigned int *)data
;
221 if (data_p
[0] == AT_HWCAP
)
229 unsigned long *data_p
= (unsigned long *)data
;
230 if (data_p
[0] == AT_HWCAP
)
237 offset
+= 2 * wordsize
;
245 ppc_arch_setup (void)
250 /* On a 64-bit host, assume 64-bit inferior process with no
251 AltiVec registers. Reset ppc_hwcap to ensure that the
252 collect_register call below does not fail. */
253 init_registers_powerpc_64l ();
256 /* Only if the high bit of the MSR is set, we actually have
257 a 64-bit inferior. */
258 collect_register_by_name ("msr", &msr
);
261 ppc_get_hwcap (&ppc_hwcap
);
262 if (ppc_hwcap
& PPC_FEATURE_HAS_VSX
)
263 init_registers_powerpc_vsx64l ();
264 else if (ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
)
265 init_registers_powerpc_altivec64l ();
270 /* OK, we have a 32-bit inferior. */
271 init_registers_powerpc_32l ();
273 ppc_get_hwcap (&ppc_hwcap
);
274 if (ppc_hwcap
& PPC_FEATURE_HAS_VSX
)
275 init_registers_powerpc_vsx32l ();
276 else if (ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
)
277 init_registers_powerpc_altivec32l ();
280 /* On 32-bit machines, check for SPE registers.
281 Set the low target's regmap field as appropriately. */
282 #ifndef __powerpc64__
283 the_low_target
.regmap
= ppc_regmap
;
284 if (ppc_hwcap
& PPC_FEATURE_HAS_SPE
)
286 init_registers_powerpc_e500l ();
287 the_low_target
.regmap
= ppc_regmap_e500
;
292 /* Correct in either endianness.
293 This instruction is "twge r2, r2", which GDB uses as a software
295 static const unsigned int ppc_breakpoint
= 0x7d821008;
296 #define ppc_breakpoint_len 4
299 ppc_breakpoint_at (CORE_ADDR where
)
303 (*the_target
->read_memory
) (where
, (unsigned char *) &insn
, 4);
304 if (insn
== ppc_breakpoint
)
306 /* If necessary, recognize more trap instructions here. GDB only uses the
311 /* Provide only a fill function for the general register set. ps_lgetregs
312 will use this for NPTL support. */
314 static void ppc_fill_gregset (void *buf
)
318 for (i
= 0; i
< 32; i
++)
319 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
321 for (i
= 64; i
< 70; i
++)
322 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
324 for (i
= 71; i
< 73; i
++)
325 ppc_collect_ptrace_register (i
, (char *) buf
+ ppc_regmap
[i
]);
328 #ifndef PTRACE_GETVSXREGS
329 #define PTRACE_GETVSXREGS 27
330 #define PTRACE_SETVSXREGS 28
333 #define SIZEOF_VSXREGS 32*8
336 ppc_fill_vsxregset (void *buf
)
341 if (!(ppc_hwcap
& PPC_FEATURE_HAS_VSX
))
344 base
= find_regno ("vs0h");
345 for (i
= 0; i
< 32; i
++)
346 collect_register (base
+ i
, ®set
[i
* 8]);
350 ppc_store_vsxregset (const void *buf
)
353 const char *regset
= buf
;
355 if (!(ppc_hwcap
& PPC_FEATURE_HAS_VSX
))
358 base
= find_regno ("vs0h");
359 for (i
= 0; i
< 32; i
++)
360 supply_register (base
+ i
, ®set
[i
* 8]);
363 #ifndef PTRACE_GETVRREGS
364 #define PTRACE_GETVRREGS 18
365 #define PTRACE_SETVRREGS 19
368 #define SIZEOF_VRREGS 33*16+4
371 ppc_fill_vrregset (void *buf
)
376 if (!(ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
))
379 base
= find_regno ("vr0");
380 for (i
= 0; i
< 32; i
++)
381 collect_register (base
+ i
, ®set
[i
* 16]);
383 collect_register_by_name ("vscr", ®set
[32 * 16 + 12]);
384 collect_register_by_name ("vrsave", ®set
[33 * 16]);
388 ppc_store_vrregset (const void *buf
)
391 const char *regset
= buf
;
393 if (!(ppc_hwcap
& PPC_FEATURE_HAS_ALTIVEC
))
396 base
= find_regno ("vr0");
397 for (i
= 0; i
< 32; i
++)
398 supply_register (base
+ i
, ®set
[i
* 16]);
400 supply_register_by_name ("vscr", ®set
[32 * 16 + 12]);
401 supply_register_by_name ("vrsave", ®set
[33 * 16]);
404 #ifndef PTRACE_GETEVRREGS
405 #define PTRACE_GETEVRREGS 20
406 #define PTRACE_SETEVRREGS 21
409 struct gdb_evrregset_t
411 unsigned long evr
[32];
412 unsigned long long acc
;
413 unsigned long spefscr
;
417 ppc_fill_evrregset (void *buf
)
420 struct gdb_evrregset_t
*regset
= buf
;
422 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
))
425 ev0
= find_regno ("ev0h");
426 for (i
= 0; i
< 32; i
++)
427 collect_register (ev0
+ i
, ®set
->evr
[i
]);
429 collect_register_by_name ("acc", ®set
->acc
);
430 collect_register_by_name ("spefscr", ®set
->spefscr
);
434 ppc_store_evrregset (const void *buf
)
437 const struct gdb_evrregset_t
*regset
= buf
;
439 if (!(ppc_hwcap
& PPC_FEATURE_HAS_SPE
))
442 ev0
= find_regno ("ev0h");
443 for (i
= 0; i
< 32; i
++)
444 supply_register (ev0
+ i
, ®set
->evr
[i
]);
446 supply_register_by_name ("acc", ®set
->acc
);
447 supply_register_by_name ("spefscr", ®set
->spefscr
);
450 struct regset_info target_regsets
[] = {
451 /* List the extra register sets before GENERAL_REGS. That way we will
452 fetch them every time, but still fall back to PTRACE_PEEKUSER for the
453 general registers. Some kernels support these, but not the newer
454 PPC_PTRACE_GETREGS. */
455 { PTRACE_GETVSXREGS
, PTRACE_SETVSXREGS
, SIZEOF_VSXREGS
, EXTENDED_REGS
,
456 ppc_fill_vsxregset
, ppc_store_vsxregset
},
457 { PTRACE_GETVRREGS
, PTRACE_SETVRREGS
, SIZEOF_VRREGS
, EXTENDED_REGS
,
458 ppc_fill_vrregset
, ppc_store_vrregset
},
459 { PTRACE_GETEVRREGS
, PTRACE_SETEVRREGS
, 32 * 4 + 8 + 4, EXTENDED_REGS
,
460 ppc_fill_evrregset
, ppc_store_evrregset
},
461 { 0, 0, 0, GENERAL_REGS
, ppc_fill_gregset
, NULL
},
462 { 0, 0, -1, -1, NULL
, NULL
}
465 struct linux_target_ops the_low_target
= {
469 ppc_cannot_fetch_register
,
470 ppc_cannot_store_register
,
473 (const unsigned char *) &ppc_breakpoint
,
482 ppc_collect_ptrace_register
,
483 ppc_supply_ptrace_register
,