1 /* Target-dependent code for GDB, the GNU debugger.
3 Copyright (C) 1986-2018 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
33 #include "solib-svr4.h"
34 #include "solib-spu.h"
38 #include "ppc64-tdep.h"
39 #include "ppc-linux-tdep.h"
40 #include "arch/ppc-linux-common.h"
41 #include "arch/ppc-linux-tdesc.h"
42 #include "glibc-tdep.h"
43 #include "trad-frame.h"
44 #include "frame-unwind.h"
45 #include "tramp-frame.h"
46 #include "observable.h"
48 #include "elf/common.h"
49 #include "elf/ppc64.h"
50 #include "arch-utils.h"
52 #include "xml-syscall.h"
53 #include "linux-tdep.h"
54 #include "linux-record.h"
55 #include "record-full.h"
58 #include "stap-probe.h"
61 #include "cli/cli-utils.h"
62 #include "parser-defs.h"
63 #include "user-regs.h"
67 #include "features/rs6000/powerpc-32l.c"
68 #include "features/rs6000/powerpc-altivec32l.c"
69 #include "features/rs6000/powerpc-cell32l.c"
70 #include "features/rs6000/powerpc-vsx32l.c"
71 #include "features/rs6000/powerpc-isa205-32l.c"
72 #include "features/rs6000/powerpc-isa205-altivec32l.c"
73 #include "features/rs6000/powerpc-isa205-vsx32l.c"
74 #include "features/rs6000/powerpc-isa205-ppr-dscr-vsx32l.c"
75 #include "features/rs6000/powerpc-isa207-vsx32l.c"
76 #include "features/rs6000/powerpc-64l.c"
77 #include "features/rs6000/powerpc-altivec64l.c"
78 #include "features/rs6000/powerpc-cell64l.c"
79 #include "features/rs6000/powerpc-vsx64l.c"
80 #include "features/rs6000/powerpc-isa205-64l.c"
81 #include "features/rs6000/powerpc-isa205-altivec64l.c"
82 #include "features/rs6000/powerpc-isa205-vsx64l.c"
83 #include "features/rs6000/powerpc-isa205-ppr-dscr-vsx64l.c"
84 #include "features/rs6000/powerpc-isa207-vsx64l.c"
85 #include "features/rs6000/powerpc-e500l.c"
87 /* Shared library operations for PowerPC-Linux. */
88 static struct target_so_ops powerpc_so_ops
;
90 /* The syscall's XML filename for PPC and PPC64. */
91 #define XML_SYSCALL_FILENAME_PPC "syscalls/ppc-linux.xml"
92 #define XML_SYSCALL_FILENAME_PPC64 "syscalls/ppc64-linux.xml"
94 /* ppc_linux_memory_remove_breakpoints attempts to remove a breakpoint
95 in much the same fashion as memory_remove_breakpoint in mem-break.c,
96 but is careful not to write back the previous contents if the code
97 in question has changed in between inserting the breakpoint and
100 Here is the problem that we're trying to solve...
102 Once upon a time, before introducing this function to remove
103 breakpoints from the inferior, setting a breakpoint on a shared
104 library function prior to running the program would not work
105 properly. In order to understand the problem, it is first
106 necessary to understand a little bit about dynamic linking on
109 A call to a shared library function is accomplished via a bl
110 (branch-and-link) instruction whose branch target is an entry
111 in the procedure linkage table (PLT). The PLT in the object
112 file is uninitialized. To gdb, prior to running the program, the
113 entries in the PLT are all zeros.
115 Once the program starts running, the shared libraries are loaded
116 and the procedure linkage table is initialized, but the entries in
117 the table are not (necessarily) resolved. Once a function is
118 actually called, the code in the PLT is hit and the function is
119 resolved. In order to better illustrate this, an example is in
120 order; the following example is from the gdb testsuite.
122 We start the program shmain.
124 [kev@arroyo testsuite]$ ../gdb gdb.base/shmain
127 We place two breakpoints, one on shr1 and the other on main.
130 Breakpoint 1 at 0x100409d4
132 Breakpoint 2 at 0x100006a0: file gdb.base/shmain.c, line 44.
134 Examine the instruction (and the immediatly following instruction)
135 upon which the breakpoint was placed. Note that the PLT entry
136 for shr1 contains zeros.
138 (gdb) x/2i 0x100409d4
139 0x100409d4 <shr1>: .long 0x0
140 0x100409d8 <shr1+4>: .long 0x0
145 Starting program: gdb.base/shmain
146 Breakpoint 1 at 0xffaf790: file gdb.base/shr1.c, line 19.
148 Breakpoint 2, main ()
149 at gdb.base/shmain.c:44
152 Examine the PLT again. Note that the loading of the shared
153 library has initialized the PLT to code which loads a constant
154 (which I think is an index into the GOT) into r11 and then
155 branchs a short distance to the code which actually does the
158 (gdb) x/2i 0x100409d4
159 0x100409d4 <shr1>: li r11,4
160 0x100409d8 <shr1+4>: b 0x10040984 <sg+4>
164 Breakpoint 1, shr1 (x=1)
165 at gdb.base/shr1.c:19
168 Now we've hit the breakpoint at shr1. (The breakpoint was
169 reset from the PLT entry to the actual shr1 function after the
170 shared library was loaded.) Note that the PLT entry has been
171 resolved to contain a branch that takes us directly to shr1.
172 (The real one, not the PLT entry.)
174 (gdb) x/2i 0x100409d4
175 0x100409d4 <shr1>: b 0xffaf76c <shr1>
176 0x100409d8 <shr1+4>: b 0x10040984 <sg+4>
178 The thing to note here is that the PLT entry for shr1 has been
181 Now the problem should be obvious. GDB places a breakpoint (a
182 trap instruction) on the zero value of the PLT entry for shr1.
183 Later on, after the shared library had been loaded and the PLT
184 initialized, GDB gets a signal indicating this fact and attempts
185 (as it always does when it stops) to remove all the breakpoints.
187 The breakpoint removal was causing the former contents (a zero
188 word) to be written back to the now initialized PLT entry thus
189 destroying a portion of the initialization that had occurred only a
190 short time ago. When execution continued, the zero word would be
191 executed as an instruction an illegal instruction trap was
192 generated instead. (0 is not a legal instruction.)
194 The fix for this problem was fairly straightforward. The function
195 memory_remove_breakpoint from mem-break.c was copied to this file,
196 modified slightly, and renamed to ppc_linux_memory_remove_breakpoint.
197 In tm-linux.h, MEMORY_REMOVE_BREAKPOINT is defined to call this new
200 The differences between ppc_linux_memory_remove_breakpoint () and
201 memory_remove_breakpoint () are minor. All that the former does
202 that the latter does not is check to make sure that the breakpoint
203 location actually contains a breakpoint (trap instruction) prior
204 to attempting to write back the old contents. If it does contain
205 a trap instruction, we allow the old contents to be written back.
206 Otherwise, we silently do nothing.
208 The big question is whether memory_remove_breakpoint () should be
209 changed to have the same functionality. The downside is that more
210 traffic is generated for remote targets since we'll have an extra
211 fetch of a memory word each time a breakpoint is removed.
213 For the time being, we'll leave this self-modifying-code-friendly
214 version in ppc-linux-tdep.c, but it ought to be migrated somewhere
215 else in the event that some other platform has similar needs with
216 regard to removing breakpoints in some potentially self modifying
219 ppc_linux_memory_remove_breakpoint (struct gdbarch
*gdbarch
,
220 struct bp_target_info
*bp_tgt
)
222 CORE_ADDR addr
= bp_tgt
->reqstd_address
;
223 const unsigned char *bp
;
226 gdb_byte old_contents
[BREAKPOINT_MAX
];
228 /* Determine appropriate breakpoint contents and size for this address. */
229 bp
= gdbarch_breakpoint_from_pc (gdbarch
, &addr
, &bplen
);
231 /* Make sure we see the memory breakpoints. */
232 scoped_restore restore_memory
233 = make_scoped_restore_show_memory_breakpoints (1);
234 val
= target_read_memory (addr
, old_contents
, bplen
);
236 /* If our breakpoint is no longer at the address, this means that the
237 program modified the code on us, so it is wrong to put back the
239 if (val
== 0 && memcmp (bp
, old_contents
, bplen
) == 0)
240 val
= target_write_raw_memory (addr
, bp_tgt
->shadow_contents
, bplen
);
245 /* For historic reasons, PPC 32 GNU/Linux follows PowerOpen rather
246 than the 32 bit SYSV R4 ABI structure return convention - all
247 structures, no matter their size, are put in memory. Vectors,
248 which were added later, do get returned in a register though. */
250 static enum return_value_convention
251 ppc_linux_return_value (struct gdbarch
*gdbarch
, struct value
*function
,
252 struct type
*valtype
, struct regcache
*regcache
,
253 gdb_byte
*readbuf
, const gdb_byte
*writebuf
)
255 if ((TYPE_CODE (valtype
) == TYPE_CODE_STRUCT
256 || TYPE_CODE (valtype
) == TYPE_CODE_UNION
)
257 && !((TYPE_LENGTH (valtype
) == 16 || TYPE_LENGTH (valtype
) == 8)
258 && TYPE_VECTOR (valtype
)))
259 return RETURN_VALUE_STRUCT_CONVENTION
;
261 return ppc_sysv_abi_return_value (gdbarch
, function
, valtype
, regcache
,
265 /* PLT stub in an executable. */
266 static const struct ppc_insn_pattern powerpc32_plt_stub
[] =
268 { 0xffff0000, 0x3d600000, 0 }, /* lis r11, xxxx */
269 { 0xffff0000, 0x816b0000, 0 }, /* lwz r11, xxxx(r11) */
270 { 0xffffffff, 0x7d6903a6, 0 }, /* mtctr r11 */
271 { 0xffffffff, 0x4e800420, 0 }, /* bctr */
275 /* PLT stubs in a shared library or PIE.
276 The first variant is used when the PLT entry is within +/-32k of
277 the GOT pointer (r30). */
278 static const struct ppc_insn_pattern powerpc32_plt_stub_so_1
[] =
280 { 0xffff0000, 0x817e0000, 0 }, /* lwz r11, xxxx(r30) */
281 { 0xffffffff, 0x7d6903a6, 0 }, /* mtctr r11 */
282 { 0xffffffff, 0x4e800420, 0 }, /* bctr */
286 /* The second variant is used when the PLT entry is more than +/-32k
287 from the GOT pointer (r30). */
288 static const struct ppc_insn_pattern powerpc32_plt_stub_so_2
[] =
290 { 0xffff0000, 0x3d7e0000, 0 }, /* addis r11, r30, xxxx */
291 { 0xffff0000, 0x816b0000, 0 }, /* lwz r11, xxxx(r11) */
292 { 0xffffffff, 0x7d6903a6, 0 }, /* mtctr r11 */
293 { 0xffffffff, 0x4e800420, 0 }, /* bctr */
297 /* The max number of insns we check using ppc_insns_match_pattern. */
298 #define POWERPC32_PLT_CHECK_LEN (ARRAY_SIZE (powerpc32_plt_stub) - 1)
300 /* Check if PC is in PLT stub. For non-secure PLT, stub is in .plt
301 section. For secure PLT, stub is in .text and we need to check
302 instruction patterns. */
305 powerpc_linux_in_dynsym_resolve_code (CORE_ADDR pc
)
307 struct bound_minimal_symbol sym
;
309 /* Check whether PC is in the dynamic linker. This also checks
310 whether it is in the .plt section, used by non-PIC executables. */
311 if (svr4_in_dynsym_resolve_code (pc
))
314 /* Check if we are in the resolver. */
315 sym
= lookup_minimal_symbol_by_pc (pc
);
316 if (sym
.minsym
!= NULL
317 && (strcmp (MSYMBOL_LINKAGE_NAME (sym
.minsym
), "__glink") == 0
318 || strcmp (MSYMBOL_LINKAGE_NAME (sym
.minsym
),
319 "__glink_PLTresolve") == 0))
325 /* Follow PLT stub to actual routine.
327 When the execution direction is EXEC_REVERSE, scan backward to
328 check whether we are in the middle of a PLT stub. Currently,
329 we only look-behind at most 4 instructions (the max length of a PLT
333 ppc_skip_trampoline_code (struct frame_info
*frame
, CORE_ADDR pc
)
335 unsigned int insnbuf
[POWERPC32_PLT_CHECK_LEN
];
336 struct gdbarch
*gdbarch
= get_frame_arch (frame
);
337 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
338 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
339 CORE_ADDR target
= 0;
343 /* When reverse-debugging, scan backward to check whether we are
344 in the middle of trampoline code. */
345 if (execution_direction
== EXEC_REVERSE
)
346 scan_limit
= 4; /* At most 4 instructions. */
348 for (i
= 0; i
< scan_limit
; i
++)
350 if (ppc_insns_match_pattern (frame
, pc
, powerpc32_plt_stub
, insnbuf
))
352 /* Calculate PLT entry address from
354 lwz r11, xxxx(r11). */
355 target
= ((ppc_insn_d_field (insnbuf
[0]) << 16)
356 + ppc_insn_d_field (insnbuf
[1]));
358 else if (i
< ARRAY_SIZE (powerpc32_plt_stub_so_1
) - 1
359 && ppc_insns_match_pattern (frame
, pc
, powerpc32_plt_stub_so_1
,
362 /* Calculate PLT entry address from
363 lwz r11, xxxx(r30). */
364 target
= (ppc_insn_d_field (insnbuf
[0])
365 + get_frame_register_unsigned (frame
,
366 tdep
->ppc_gp0_regnum
+ 30));
368 else if (ppc_insns_match_pattern (frame
, pc
, powerpc32_plt_stub_so_2
,
371 /* Calculate PLT entry address from
373 lwz r11, xxxx(r11). */
374 target
= ((ppc_insn_d_field (insnbuf
[0]) << 16)
375 + ppc_insn_d_field (insnbuf
[1])
376 + get_frame_register_unsigned (frame
,
377 tdep
->ppc_gp0_regnum
+ 30));
381 /* Scan backward one more instruction if it doesn't match. */
386 target
= read_memory_unsigned_integer (target
, 4, byte_order
);
393 /* Wrappers to handle Linux-only registers. */
396 ppc_linux_supply_gregset (const struct regset
*regset
,
397 struct regcache
*regcache
,
398 int regnum
, const void *gregs
, size_t len
)
400 const struct ppc_reg_offsets
*offsets
401 = (const struct ppc_reg_offsets
*) regset
->regmap
;
403 ppc_supply_gregset (regset
, regcache
, regnum
, gregs
, len
);
405 if (ppc_linux_trap_reg_p (regcache
->arch ()))
407 /* "orig_r3" is stored 2 slots after "pc". */
408 if (regnum
== -1 || regnum
== PPC_ORIG_R3_REGNUM
)
409 ppc_supply_reg (regcache
, PPC_ORIG_R3_REGNUM
, (const gdb_byte
*) gregs
,
410 offsets
->pc_offset
+ 2 * offsets
->gpr_size
,
413 /* "trap" is stored 8 slots after "pc". */
414 if (regnum
== -1 || regnum
== PPC_TRAP_REGNUM
)
415 ppc_supply_reg (regcache
, PPC_TRAP_REGNUM
, (const gdb_byte
*) gregs
,
416 offsets
->pc_offset
+ 8 * offsets
->gpr_size
,
422 ppc_linux_collect_gregset (const struct regset
*regset
,
423 const struct regcache
*regcache
,
424 int regnum
, void *gregs
, size_t len
)
426 const struct ppc_reg_offsets
*offsets
427 = (const struct ppc_reg_offsets
*) regset
->regmap
;
429 /* Clear areas in the linux gregset not written elsewhere. */
431 memset (gregs
, 0, len
);
433 ppc_collect_gregset (regset
, regcache
, regnum
, gregs
, len
);
435 if (ppc_linux_trap_reg_p (regcache
->arch ()))
437 /* "orig_r3" is stored 2 slots after "pc". */
438 if (regnum
== -1 || regnum
== PPC_ORIG_R3_REGNUM
)
439 ppc_collect_reg (regcache
, PPC_ORIG_R3_REGNUM
, (gdb_byte
*) gregs
,
440 offsets
->pc_offset
+ 2 * offsets
->gpr_size
,
443 /* "trap" is stored 8 slots after "pc". */
444 if (regnum
== -1 || regnum
== PPC_TRAP_REGNUM
)
445 ppc_collect_reg (regcache
, PPC_TRAP_REGNUM
, (gdb_byte
*) gregs
,
446 offsets
->pc_offset
+ 8 * offsets
->gpr_size
,
451 /* Regset descriptions. */
452 static const struct ppc_reg_offsets ppc32_linux_reg_offsets
=
454 /* General-purpose registers. */
455 /* .r0_offset = */ 0,
458 /* .pc_offset = */ 128,
459 /* .ps_offset = */ 132,
460 /* .cr_offset = */ 152,
461 /* .lr_offset = */ 144,
462 /* .ctr_offset = */ 140,
463 /* .xer_offset = */ 148,
464 /* .mq_offset = */ 156,
466 /* Floating-point registers. */
467 /* .f0_offset = */ 0,
468 /* .fpscr_offset = */ 256,
469 /* .fpscr_size = */ 8
472 static const struct ppc_reg_offsets ppc64_linux_reg_offsets
=
474 /* General-purpose registers. */
475 /* .r0_offset = */ 0,
478 /* .pc_offset = */ 256,
479 /* .ps_offset = */ 264,
480 /* .cr_offset = */ 304,
481 /* .lr_offset = */ 288,
482 /* .ctr_offset = */ 280,
483 /* .xer_offset = */ 296,
484 /* .mq_offset = */ 312,
486 /* Floating-point registers. */
487 /* .f0_offset = */ 0,
488 /* .fpscr_offset = */ 256,
489 /* .fpscr_size = */ 8
492 static const struct regset ppc32_linux_gregset
= {
493 &ppc32_linux_reg_offsets
,
494 ppc_linux_supply_gregset
,
495 ppc_linux_collect_gregset
498 static const struct regset ppc64_linux_gregset
= {
499 &ppc64_linux_reg_offsets
,
500 ppc_linux_supply_gregset
,
501 ppc_linux_collect_gregset
504 static const struct regset ppc32_linux_fpregset
= {
505 &ppc32_linux_reg_offsets
,
510 static const struct regcache_map_entry ppc32_le_linux_vrregmap
[] =
512 { 32, PPC_VR0_REGNUM
, 16 },
513 { 1, PPC_VSCR_REGNUM
, 4 },
514 { 1, REGCACHE_MAP_SKIP
, 12 },
515 { 1, PPC_VRSAVE_REGNUM
, 4 },
516 { 1, REGCACHE_MAP_SKIP
, 12 },
520 static const struct regcache_map_entry ppc32_be_linux_vrregmap
[] =
522 { 32, PPC_VR0_REGNUM
, 16 },
523 { 1, REGCACHE_MAP_SKIP
, 12},
524 { 1, PPC_VSCR_REGNUM
, 4 },
525 { 1, PPC_VRSAVE_REGNUM
, 4 },
526 { 1, REGCACHE_MAP_SKIP
, 12 },
530 static const struct regset ppc32_le_linux_vrregset
= {
531 ppc32_le_linux_vrregmap
,
532 regcache_supply_regset
,
533 regcache_collect_regset
536 static const struct regset ppc32_be_linux_vrregset
= {
537 ppc32_be_linux_vrregmap
,
538 regcache_supply_regset
,
539 regcache_collect_regset
542 static const struct regcache_map_entry ppc32_linux_vsxregmap
[] =
544 { 32, PPC_VSR0_UPPER_REGNUM
, 8 },
548 static const struct regset ppc32_linux_vsxregset
= {
549 ppc32_linux_vsxregmap
,
550 regcache_supply_regset
,
551 regcache_collect_regset
554 /* Program Priorty Register regmap. */
556 static const struct regcache_map_entry ppc32_regmap_ppr
[] =
558 { 1, PPC_PPR_REGNUM
, 8 },
562 /* Program Priorty Register regset. */
564 const struct regset ppc32_linux_pprregset
= {
566 regcache_supply_regset
,
567 regcache_collect_regset
570 /* Data Stream Control Register regmap. */
572 static const struct regcache_map_entry ppc32_regmap_dscr
[] =
574 { 1, PPC_DSCR_REGNUM
, 8 },
578 /* Data Stream Control Register regset. */
580 const struct regset ppc32_linux_dscrregset
= {
582 regcache_supply_regset
,
583 regcache_collect_regset
586 /* Target Address Register regmap. */
588 static const struct regcache_map_entry ppc32_regmap_tar
[] =
590 { 1, PPC_TAR_REGNUM
, 8 },
594 /* Target Address Register regset. */
596 const struct regset ppc32_linux_tarregset
= {
598 regcache_supply_regset
,
599 regcache_collect_regset
602 const struct regset
*
603 ppc_linux_gregset (int wordsize
)
605 return wordsize
== 8 ? &ppc64_linux_gregset
: &ppc32_linux_gregset
;
608 const struct regset
*
609 ppc_linux_fpregset (void)
611 return &ppc32_linux_fpregset
;
614 const struct regset
*
615 ppc_linux_vrregset (struct gdbarch
*gdbarch
)
617 if (gdbarch_byte_order (gdbarch
) == BFD_ENDIAN_BIG
)
618 return &ppc32_be_linux_vrregset
;
620 return &ppc32_le_linux_vrregset
;
623 const struct regset
*
624 ppc_linux_vsxregset (void)
626 return &ppc32_linux_vsxregset
;
629 /* Iterate over supported core file register note sections. */
632 ppc_linux_iterate_over_regset_sections (struct gdbarch
*gdbarch
,
633 iterate_over_regset_sections_cb
*cb
,
635 const struct regcache
*regcache
)
637 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
638 int have_altivec
= tdep
->ppc_vr0_regnum
!= -1;
639 int have_vsx
= tdep
->ppc_vsr0_upper_regnum
!= -1;
640 int have_ppr
= tdep
->ppc_ppr_regnum
!= -1;
641 int have_dscr
= tdep
->ppc_dscr_regnum
!= -1;
642 int have_tar
= tdep
->ppc_tar_regnum
!= -1;
644 if (tdep
->wordsize
== 4)
645 cb (".reg", 48 * 4, 48 * 4, &ppc32_linux_gregset
, NULL
, cb_data
);
647 cb (".reg", 48 * 8, 48 * 8, &ppc64_linux_gregset
, NULL
, cb_data
);
649 cb (".reg2", 264, 264, &ppc32_linux_fpregset
, NULL
, cb_data
);
653 const struct regset
*vrregset
= ppc_linux_vrregset (gdbarch
);
654 cb (".reg-ppc-vmx", PPC_LINUX_SIZEOF_VRREGSET
, PPC_LINUX_SIZEOF_VRREGSET
,
655 vrregset
, "ppc Altivec", cb_data
);
659 cb (".reg-ppc-vsx", PPC_LINUX_SIZEOF_VSXREGSET
, PPC_LINUX_SIZEOF_VSXREGSET
,
660 &ppc32_linux_vsxregset
, "POWER7 VSX", cb_data
);
663 cb (".reg-ppc-ppr", PPC_LINUX_SIZEOF_PPRREGSET
,
664 PPC_LINUX_SIZEOF_PPRREGSET
,
665 &ppc32_linux_pprregset
, "Priority Program Register", cb_data
);
668 cb (".reg-ppc-dscr", PPC_LINUX_SIZEOF_DSCRREGSET
,
669 PPC_LINUX_SIZEOF_DSCRREGSET
,
670 &ppc32_linux_dscrregset
, "Data Stream Control Register",
674 cb (".reg-ppc-tar", PPC_LINUX_SIZEOF_TARREGSET
,
675 PPC_LINUX_SIZEOF_TARREGSET
,
676 &ppc32_linux_tarregset
, "Target Address Register", cb_data
);
680 ppc_linux_sigtramp_cache (struct frame_info
*this_frame
,
681 struct trad_frame_cache
*this_cache
,
682 CORE_ADDR func
, LONGEST offset
,
690 struct gdbarch
*gdbarch
= get_frame_arch (this_frame
);
691 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
692 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
694 base
= get_frame_register_unsigned (this_frame
,
695 gdbarch_sp_regnum (gdbarch
));
696 if (bias
> 0 && get_frame_pc (this_frame
) != func
)
697 /* See below, some signal trampolines increment the stack as their
698 first instruction, need to compensate for that. */
701 /* Find the address of the register buffer pointer. */
702 regs
= base
+ offset
;
703 /* Use that to find the address of the corresponding register
705 gpregs
= read_memory_unsigned_integer (regs
, tdep
->wordsize
, byte_order
);
706 fpregs
= gpregs
+ 48 * tdep
->wordsize
;
708 /* General purpose. */
709 for (i
= 0; i
< 32; i
++)
711 int regnum
= i
+ tdep
->ppc_gp0_regnum
;
712 trad_frame_set_reg_addr (this_cache
,
713 regnum
, gpregs
+ i
* tdep
->wordsize
);
715 trad_frame_set_reg_addr (this_cache
,
716 gdbarch_pc_regnum (gdbarch
),
717 gpregs
+ 32 * tdep
->wordsize
);
718 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_ctr_regnum
,
719 gpregs
+ 35 * tdep
->wordsize
);
720 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_lr_regnum
,
721 gpregs
+ 36 * tdep
->wordsize
);
722 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_xer_regnum
,
723 gpregs
+ 37 * tdep
->wordsize
);
724 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_cr_regnum
,
725 gpregs
+ 38 * tdep
->wordsize
);
727 if (ppc_linux_trap_reg_p (gdbarch
))
729 trad_frame_set_reg_addr (this_cache
, PPC_ORIG_R3_REGNUM
,
730 gpregs
+ 34 * tdep
->wordsize
);
731 trad_frame_set_reg_addr (this_cache
, PPC_TRAP_REGNUM
,
732 gpregs
+ 40 * tdep
->wordsize
);
735 if (ppc_floating_point_unit_p (gdbarch
))
737 /* Floating point registers. */
738 for (i
= 0; i
< 32; i
++)
740 int regnum
= i
+ gdbarch_fp0_regnum (gdbarch
);
741 trad_frame_set_reg_addr (this_cache
, regnum
,
742 fpregs
+ i
* tdep
->wordsize
);
744 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_fpscr_regnum
,
745 fpregs
+ 32 * tdep
->wordsize
);
747 trad_frame_set_id (this_cache
, frame_id_build (base
, func
));
751 ppc32_linux_sigaction_cache_init (const struct tramp_frame
*self
,
752 struct frame_info
*this_frame
,
753 struct trad_frame_cache
*this_cache
,
756 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
757 0xd0 /* Offset to ucontext_t. */
758 + 0x30 /* Offset to .reg. */,
763 ppc64_linux_sigaction_cache_init (const struct tramp_frame
*self
,
764 struct frame_info
*this_frame
,
765 struct trad_frame_cache
*this_cache
,
768 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
769 0x80 /* Offset to ucontext_t. */
770 + 0xe0 /* Offset to .reg. */,
775 ppc32_linux_sighandler_cache_init (const struct tramp_frame
*self
,
776 struct frame_info
*this_frame
,
777 struct trad_frame_cache
*this_cache
,
780 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
781 0x40 /* Offset to ucontext_t. */
782 + 0x1c /* Offset to .reg. */,
787 ppc64_linux_sighandler_cache_init (const struct tramp_frame
*self
,
788 struct frame_info
*this_frame
,
789 struct trad_frame_cache
*this_cache
,
792 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
793 0x80 /* Offset to struct sigcontext. */
794 + 0x38 /* Offset to .reg. */,
798 static struct tramp_frame ppc32_linux_sigaction_tramp_frame
= {
802 { 0x380000ac, ULONGEST_MAX
}, /* li r0, 172 */
803 { 0x44000002, ULONGEST_MAX
}, /* sc */
804 { TRAMP_SENTINEL_INSN
},
806 ppc32_linux_sigaction_cache_init
808 static struct tramp_frame ppc64_linux_sigaction_tramp_frame
= {
812 { 0x38210080, ULONGEST_MAX
}, /* addi r1,r1,128 */
813 { 0x380000ac, ULONGEST_MAX
}, /* li r0, 172 */
814 { 0x44000002, ULONGEST_MAX
}, /* sc */
815 { TRAMP_SENTINEL_INSN
},
817 ppc64_linux_sigaction_cache_init
819 static struct tramp_frame ppc32_linux_sighandler_tramp_frame
= {
823 { 0x38000077, ULONGEST_MAX
}, /* li r0,119 */
824 { 0x44000002, ULONGEST_MAX
}, /* sc */
825 { TRAMP_SENTINEL_INSN
},
827 ppc32_linux_sighandler_cache_init
829 static struct tramp_frame ppc64_linux_sighandler_tramp_frame
= {
833 { 0x38210080, ULONGEST_MAX
}, /* addi r1,r1,128 */
834 { 0x38000077, ULONGEST_MAX
}, /* li r0,119 */
835 { 0x44000002, ULONGEST_MAX
}, /* sc */
836 { TRAMP_SENTINEL_INSN
},
838 ppc64_linux_sighandler_cache_init
841 /* Return 1 if PPC_ORIG_R3_REGNUM and PPC_TRAP_REGNUM are usable. */
843 ppc_linux_trap_reg_p (struct gdbarch
*gdbarch
)
845 /* If we do not have a target description with registers, then
846 the special registers will not be included in the register set. */
847 if (!tdesc_has_registers (gdbarch_target_desc (gdbarch
)))
850 /* If we do, then it is safe to check the size. */
851 return register_size (gdbarch
, PPC_ORIG_R3_REGNUM
) > 0
852 && register_size (gdbarch
, PPC_TRAP_REGNUM
) > 0;
855 /* Return the current system call's number present in the
856 r0 register. When the function fails, it returns -1. */
858 ppc_linux_get_syscall_number (struct gdbarch
*gdbarch
,
861 struct regcache
*regcache
= get_thread_regcache (thread
);
862 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
863 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
865 /* Make sure we're in a 32- or 64-bit machine */
866 gdb_assert (tdep
->wordsize
== 4 || tdep
->wordsize
== 8);
868 /* The content of a register */
869 gdb::byte_vector
buf (tdep
->wordsize
);
871 /* Getting the system call number from the register.
872 When dealing with PowerPC architecture, this information
873 is stored at 0th register. */
874 regcache
->cooked_read (tdep
->ppc_gp0_regnum
, buf
.data ());
876 return extract_signed_integer (buf
.data (), tdep
->wordsize
, byte_order
);
879 /* PPC process record-replay */
881 static struct linux_record_tdep ppc_linux_record_tdep
;
882 static struct linux_record_tdep ppc64_linux_record_tdep
;
884 /* ppc_canonicalize_syscall maps from the native PowerPC Linux set of
885 syscall ids into a canonical set of syscall ids used by process
886 record. (See arch/powerpc/include/uapi/asm/unistd.h in kernel tree.)
887 Return -1 if this system call is not supported by process record.
888 Otherwise, return the syscall number for preocess reocrd of given
891 static enum gdb_syscall
892 ppc_canonicalize_syscall (int syscall
)
898 else if (syscall
>= 167 && syscall
<= 190) /* Skip query_module 166 */
899 result
= syscall
+ 1;
900 else if (syscall
>= 192 && syscall
<= 197) /* mmap2 */
902 else if (syscall
== 208) /* tkill */
903 result
= gdb_sys_tkill
;
904 else if (syscall
>= 207 && syscall
<= 220) /* gettid */
905 result
= syscall
+ 224 - 207;
906 else if (syscall
>= 234 && syscall
<= 239) /* exit_group */
907 result
= syscall
+ 252 - 234;
908 else if (syscall
>= 240 && syscall
<= 248) /* timer_create */
909 result
= syscall
+= 259 - 240;
910 else if (syscall
>= 250 && syscall
<= 251) /* tgkill */
911 result
= syscall
+ 270 - 250;
912 else if (syscall
== 336)
913 result
= gdb_sys_recv
;
914 else if (syscall
== 337)
915 result
= gdb_sys_recvfrom
;
916 else if (syscall
== 342)
917 result
= gdb_sys_recvmsg
;
919 return (enum gdb_syscall
) result
;
922 /* Record registers which might be clobbered during system call.
923 Return 0 if successful. */
926 ppc_linux_syscall_record (struct regcache
*regcache
)
928 struct gdbarch
*gdbarch
= regcache
->arch ();
929 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
931 enum gdb_syscall syscall_gdb
;
934 regcache_raw_read_unsigned (regcache
, tdep
->ppc_gp0_regnum
, &scnum
);
935 syscall_gdb
= ppc_canonicalize_syscall (scnum
);
939 printf_unfiltered (_("Process record and replay target doesn't "
940 "support syscall number %d\n"), (int) scnum
);
944 if (syscall_gdb
== gdb_sys_sigreturn
945 || syscall_gdb
== gdb_sys_rt_sigreturn
)
948 int regsets
[] = { tdep
->ppc_gp0_regnum
,
949 tdep
->ppc_fp0_regnum
,
950 tdep
->ppc_vr0_regnum
,
951 tdep
->ppc_vsr0_upper_regnum
};
953 for (j
= 0; j
< 4; j
++)
955 if (regsets
[j
] == -1)
957 for (i
= 0; i
< 32; i
++)
959 if (record_full_arch_list_add_reg (regcache
, regsets
[j
] + i
))
964 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_cr_regnum
))
966 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_ctr_regnum
))
968 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_lr_regnum
))
970 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_xer_regnum
))
976 if (tdep
->wordsize
== 8)
977 ret
= record_linux_system_call (syscall_gdb
, regcache
,
978 &ppc64_linux_record_tdep
);
980 ret
= record_linux_system_call (syscall_gdb
, regcache
,
981 &ppc_linux_record_tdep
);
986 /* Record registers clobbered during syscall. */
987 for (int i
= 3; i
<= 12; i
++)
989 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_gp0_regnum
+ i
))
992 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_gp0_regnum
+ 0))
994 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_cr_regnum
))
996 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_ctr_regnum
))
998 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_lr_regnum
))
1004 /* Record registers which might be clobbered during signal handling.
1005 Return 0 if successful. */
1008 ppc_linux_record_signal (struct gdbarch
*gdbarch
, struct regcache
*regcache
,
1009 enum gdb_signal signal
)
1011 /* See handle_rt_signal64 in arch/powerpc/kernel/signal_64.c
1012 handle_rt_signal32 in arch/powerpc/kernel/signal_32.c
1013 arch/powerpc/include/asm/ptrace.h
1015 const int SIGNAL_FRAMESIZE
= 128;
1016 const int sizeof_rt_sigframe
= 1440 * 2 + 8 * 2 + 4 * 6 + 8 + 8 + 128 + 512;
1018 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1021 for (i
= 3; i
<= 12; i
++)
1023 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_gp0_regnum
+ i
))
1027 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_lr_regnum
))
1029 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_cr_regnum
))
1031 if (record_full_arch_list_add_reg (regcache
, tdep
->ppc_ctr_regnum
))
1033 if (record_full_arch_list_add_reg (regcache
, gdbarch_pc_regnum (gdbarch
)))
1035 if (record_full_arch_list_add_reg (regcache
, gdbarch_sp_regnum (gdbarch
)))
1038 /* Record the change in the stack.
1039 frame-size = sizeof (struct rt_sigframe) + SIGNAL_FRAMESIZE */
1040 regcache_raw_read_unsigned (regcache
, gdbarch_sp_regnum (gdbarch
), &sp
);
1041 sp
-= SIGNAL_FRAMESIZE
;
1042 sp
-= sizeof_rt_sigframe
;
1044 if (record_full_arch_list_add_mem (sp
, SIGNAL_FRAMESIZE
+ sizeof_rt_sigframe
))
1047 if (record_full_arch_list_add_end ())
1054 ppc_linux_write_pc (struct regcache
*regcache
, CORE_ADDR pc
)
1056 struct gdbarch
*gdbarch
= regcache
->arch ();
1058 regcache_cooked_write_unsigned (regcache
, gdbarch_pc_regnum (gdbarch
), pc
);
1060 /* Set special TRAP register to -1 to prevent the kernel from
1061 messing with the PC we just installed, if we happen to be
1062 within an interrupted system call that the kernel wants to
1065 Note that after we return from the dummy call, the TRAP and
1066 ORIG_R3 registers will be automatically restored, and the
1067 kernel continues to restart the system call at this point. */
1068 if (ppc_linux_trap_reg_p (gdbarch
))
1069 regcache_cooked_write_unsigned (regcache
, PPC_TRAP_REGNUM
, -1);
1073 ppc_linux_spu_section (bfd
*abfd
, asection
*asect
, void *user_data
)
1075 return startswith (bfd_section_name (abfd
, asect
), "SPU/");
1078 static const struct target_desc
*
1079 ppc_linux_core_read_description (struct gdbarch
*gdbarch
,
1080 struct target_ops
*target
,
1083 struct ppc_linux_features features
= ppc_linux_no_features
;
1084 asection
*cell
= bfd_sections_find_if (abfd
, ppc_linux_spu_section
, NULL
);
1085 asection
*altivec
= bfd_get_section_by_name (abfd
, ".reg-ppc-vmx");
1086 asection
*vsx
= bfd_get_section_by_name (abfd
, ".reg-ppc-vsx");
1087 asection
*section
= bfd_get_section_by_name (abfd
, ".reg");
1088 asection
*ppr
= bfd_get_section_by_name (abfd
, ".reg-ppc-ppr");
1089 asection
*dscr
= bfd_get_section_by_name (abfd
, ".reg-ppc-dscr");
1090 asection
*tar
= bfd_get_section_by_name (abfd
, ".reg-ppc-tar");
1095 switch (bfd_section_size (abfd
, section
))
1098 features
.wordsize
= 4;
1101 features
.wordsize
= 8;
1108 features
.cell
= true;
1111 features
.altivec
= true;
1114 features
.vsx
= true;
1118 if (target_auxv_search (target
, AT_HWCAP
, &hwcap
) != 1)
1121 features
.isa205
= ppc_linux_has_isa205 (hwcap
);
1125 features
.ppr_dscr
= true;
1127 features
.isa207
= true;
1130 return ppc_linux_match_description (features
);
1134 /* Implementation of `gdbarch_elf_make_msymbol_special', as defined in
1135 gdbarch.h. This implementation is used for the ELFv2 ABI only. */
1138 ppc_elfv2_elf_make_msymbol_special (asymbol
*sym
, struct minimal_symbol
*msym
)
1140 elf_symbol_type
*elf_sym
= (elf_symbol_type
*)sym
;
1142 /* If the symbol is marked as having a local entry point, set a target
1143 flag in the msymbol. We currently only support local entry point
1144 offsets of 8 bytes, which is the only entry point offset ever used
1145 by current compilers. If/when other offsets are ever used, we will
1146 have to use additional target flag bits to store them. */
1147 switch (PPC64_LOCAL_ENTRY_OFFSET (elf_sym
->internal_elf_sym
.st_other
))
1152 MSYMBOL_TARGET_FLAG_1 (msym
) = 1;
1157 /* Implementation of `gdbarch_skip_entrypoint', as defined in
1158 gdbarch.h. This implementation is used for the ELFv2 ABI only. */
1161 ppc_elfv2_skip_entrypoint (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
1163 struct bound_minimal_symbol fun
;
1164 int local_entry_offset
= 0;
1166 fun
= lookup_minimal_symbol_by_pc (pc
);
1167 if (fun
.minsym
== NULL
)
1170 /* See ppc_elfv2_elf_make_msymbol_special for how local entry point
1171 offset values are encoded. */
1172 if (MSYMBOL_TARGET_FLAG_1 (fun
.minsym
))
1173 local_entry_offset
= 8;
1175 if (BMSYMBOL_VALUE_ADDRESS (fun
) <= pc
1176 && pc
< BMSYMBOL_VALUE_ADDRESS (fun
) + local_entry_offset
)
1177 return BMSYMBOL_VALUE_ADDRESS (fun
) + local_entry_offset
;
1182 /* Implementation of `gdbarch_stap_is_single_operand', as defined in
1186 ppc_stap_is_single_operand (struct gdbarch
*gdbarch
, const char *s
)
1188 return (*s
== 'i' /* Literal number. */
1189 || (isdigit (*s
) && s
[1] == '('
1190 && isdigit (s
[2])) /* Displacement. */
1191 || (*s
== '(' && isdigit (s
[1])) /* Register indirection. */
1192 || isdigit (*s
)); /* Register value. */
1195 /* Implementation of `gdbarch_stap_parse_special_token', as defined in
1199 ppc_stap_parse_special_token (struct gdbarch
*gdbarch
,
1200 struct stap_parse_info
*p
)
1202 if (isdigit (*p
->arg
))
1204 /* This temporary pointer is needed because we have to do a lookahead.
1205 We could be dealing with a register displacement, and in such case
1206 we would not need to do anything. */
1207 const char *s
= p
->arg
;
1212 while (isdigit (*s
))
1217 /* It is a register displacement indeed. Returning 0 means we are
1218 deferring the treatment of this case to the generic parser. */
1223 regname
= (char *) alloca (len
+ 2);
1226 strncpy (regname
+ 1, p
->arg
, len
);
1228 regname
[len
] = '\0';
1230 if (user_reg_map_name_to_regnum (gdbarch
, regname
, len
) == -1)
1231 error (_("Invalid register name `%s' on expression `%s'."),
1232 regname
, p
->saved_arg
);
1234 write_exp_elt_opcode (&p
->pstate
, OP_REGISTER
);
1237 write_exp_string (&p
->pstate
, str
);
1238 write_exp_elt_opcode (&p
->pstate
, OP_REGISTER
);
1244 /* All the other tokens should be handled correctly by the generic
1252 /* Cell/B.E. active SPE context tracking support. */
1254 static struct objfile
*spe_context_objfile
= NULL
;
1255 static CORE_ADDR spe_context_lm_addr
= 0;
1256 static CORE_ADDR spe_context_offset
= 0;
1258 static ptid_t spe_context_cache_ptid
;
1259 static CORE_ADDR spe_context_cache_address
;
1261 /* Hook into inferior_created, solib_loaded, and solib_unloaded observers
1262 to track whether we've loaded a version of libspe2 (as static or dynamic
1263 library) that provides the __spe_current_active_context variable. */
1265 ppc_linux_spe_context_lookup (struct objfile
*objfile
)
1267 struct bound_minimal_symbol sym
;
1271 spe_context_objfile
= NULL
;
1272 spe_context_lm_addr
= 0;
1273 spe_context_offset
= 0;
1274 spe_context_cache_ptid
= minus_one_ptid
;
1275 spe_context_cache_address
= 0;
1279 sym
= lookup_minimal_symbol ("__spe_current_active_context", NULL
, objfile
);
1282 spe_context_objfile
= objfile
;
1283 spe_context_lm_addr
= svr4_fetch_objfile_link_map (objfile
);
1284 spe_context_offset
= MSYMBOL_VALUE_RAW_ADDRESS (sym
.minsym
);
1285 spe_context_cache_ptid
= minus_one_ptid
;
1286 spe_context_cache_address
= 0;
1292 ppc_linux_spe_context_inferior_created (struct target_ops
*t
, int from_tty
)
1294 struct objfile
*objfile
;
1296 ppc_linux_spe_context_lookup (NULL
);
1297 ALL_OBJFILES (objfile
)
1298 ppc_linux_spe_context_lookup (objfile
);
1302 ppc_linux_spe_context_solib_loaded (struct so_list
*so
)
1304 if (strstr (so
->so_original_name
, "/libspe") != NULL
)
1306 solib_read_symbols (so
, 0);
1307 ppc_linux_spe_context_lookup (so
->objfile
);
1312 ppc_linux_spe_context_solib_unloaded (struct so_list
*so
)
1314 if (so
->objfile
== spe_context_objfile
)
1315 ppc_linux_spe_context_lookup (NULL
);
1318 /* Retrieve contents of the N'th element in the current thread's
1319 linked SPE context list into ID and NPC. Return the address of
1320 said context element, or 0 if not found. */
1322 ppc_linux_spe_context (int wordsize
, enum bfd_endian byte_order
,
1323 int n
, int *id
, unsigned int *npc
)
1325 CORE_ADDR spe_context
= 0;
1329 /* Quick exit if we have not found __spe_current_active_context. */
1330 if (!spe_context_objfile
)
1333 /* Look up cached address of thread-local variable. */
1334 if (spe_context_cache_ptid
!= inferior_ptid
)
1336 struct target_ops
*target
= current_top_target ();
1340 /* We do not call target_translate_tls_address here, because
1341 svr4_fetch_objfile_link_map may invalidate the frame chain,
1342 which must not do while inside a frame sniffer.
1344 Instead, we have cached the lm_addr value, and use that to
1345 directly call the target's to_get_thread_local_address. */
1346 spe_context_cache_address
1347 = target
->get_thread_local_address (inferior_ptid
,
1348 spe_context_lm_addr
,
1349 spe_context_offset
);
1350 spe_context_cache_ptid
= inferior_ptid
;
1353 CATCH (ex
, RETURN_MASK_ERROR
)
1360 /* Read variable value. */
1361 if (target_read_memory (spe_context_cache_address
, buf
, wordsize
) == 0)
1362 spe_context
= extract_unsigned_integer (buf
, wordsize
, byte_order
);
1364 /* Cyle through to N'th linked list element. */
1365 for (i
= 0; i
< n
&& spe_context
; i
++)
1366 if (target_read_memory (spe_context
+ align_up (12, wordsize
),
1367 buf
, wordsize
) == 0)
1368 spe_context
= extract_unsigned_integer (buf
, wordsize
, byte_order
);
1372 /* Read current context. */
1374 && target_read_memory (spe_context
, buf
, 12) != 0)
1377 /* Extract data elements. */
1381 *id
= extract_signed_integer (buf
, 4, byte_order
);
1383 *npc
= extract_unsigned_integer (buf
+ 4, 4, byte_order
);
1390 /* Cell/B.E. cross-architecture unwinder support. */
1392 struct ppu2spu_cache
1394 struct frame_id frame_id
;
1395 readonly_detached_regcache
*regcache
;
1398 static struct gdbarch
*
1399 ppu2spu_prev_arch (struct frame_info
*this_frame
, void **this_cache
)
1401 struct ppu2spu_cache
*cache
= (struct ppu2spu_cache
*) *this_cache
;
1402 return cache
->regcache
->arch ();
1406 ppu2spu_this_id (struct frame_info
*this_frame
,
1407 void **this_cache
, struct frame_id
*this_id
)
1409 struct ppu2spu_cache
*cache
= (struct ppu2spu_cache
*) *this_cache
;
1410 *this_id
= cache
->frame_id
;
1413 static struct value
*
1414 ppu2spu_prev_register (struct frame_info
*this_frame
,
1415 void **this_cache
, int regnum
)
1417 struct ppu2spu_cache
*cache
= (struct ppu2spu_cache
*) *this_cache
;
1418 struct gdbarch
*gdbarch
= cache
->regcache
->arch ();
1421 buf
= (gdb_byte
*) alloca (register_size (gdbarch
, regnum
));
1423 cache
->regcache
->cooked_read (regnum
, buf
);
1424 return frame_unwind_got_bytes (this_frame
, regnum
, buf
);
1429 struct gdbarch
*gdbarch
;
1432 gdb_byte gprs
[128*16];
1435 static enum register_status
1436 ppu2spu_unwind_register (ppu2spu_data
*data
, int regnum
, gdb_byte
*buf
)
1438 enum bfd_endian byte_order
= gdbarch_byte_order (data
->gdbarch
);
1440 if (regnum
>= 0 && regnum
< SPU_NUM_GPRS
)
1441 memcpy (buf
, data
->gprs
+ 16*regnum
, 16);
1442 else if (regnum
== SPU_ID_REGNUM
)
1443 store_unsigned_integer (buf
, 4, byte_order
, data
->id
);
1444 else if (regnum
== SPU_PC_REGNUM
)
1445 store_unsigned_integer (buf
, 4, byte_order
, data
->npc
);
1447 return REG_UNAVAILABLE
;
1453 ppu2spu_sniffer (const struct frame_unwind
*self
,
1454 struct frame_info
*this_frame
, void **this_prologue_cache
)
1456 struct gdbarch
*gdbarch
= get_frame_arch (this_frame
);
1457 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1458 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
1459 struct ppu2spu_data data
;
1460 struct frame_info
*fi
;
1461 CORE_ADDR base
, func
, backchain
, spe_context
;
1465 /* Count the number of SPU contexts already in the frame chain. */
1466 for (fi
= get_next_frame (this_frame
); fi
; fi
= get_next_frame (fi
))
1467 if (get_frame_type (fi
) == ARCH_FRAME
1468 && gdbarch_bfd_arch_info (get_frame_arch (fi
))->arch
== bfd_arch_spu
)
1471 base
= get_frame_sp (this_frame
);
1472 func
= get_frame_pc (this_frame
);
1473 if (target_read_memory (base
, buf
, tdep
->wordsize
))
1475 backchain
= extract_unsigned_integer (buf
, tdep
->wordsize
, byte_order
);
1477 spe_context
= ppc_linux_spe_context (tdep
->wordsize
, byte_order
,
1478 n
, &data
.id
, &data
.npc
);
1479 if (spe_context
&& base
<= spe_context
&& spe_context
< backchain
)
1483 /* Find gdbarch for SPU. */
1484 struct gdbarch_info info
;
1485 gdbarch_info_init (&info
);
1486 info
.bfd_arch_info
= bfd_lookup_arch (bfd_arch_spu
, bfd_mach_spu
);
1487 info
.byte_order
= BFD_ENDIAN_BIG
;
1488 info
.osabi
= GDB_OSABI_LINUX
;
1490 data
.gdbarch
= gdbarch_find_by_info (info
);
1494 xsnprintf (annex
, sizeof annex
, "%d/regs", data
.id
);
1495 if (target_read (current_top_target (), TARGET_OBJECT_SPU
, annex
,
1496 data
.gprs
, 0, sizeof data
.gprs
)
1497 == sizeof data
.gprs
)
1499 auto cooked_read
= [&data
] (int regnum
, gdb_byte
*out_buf
)
1501 return ppu2spu_unwind_register (&data
, regnum
, out_buf
);
1503 struct ppu2spu_cache
*cache
1504 = FRAME_OBSTACK_CALLOC (1, struct ppu2spu_cache
);
1505 std::unique_ptr
<readonly_detached_regcache
> regcache
1506 (new readonly_detached_regcache (data
.gdbarch
, cooked_read
));
1508 cache
->frame_id
= frame_id_build (base
, func
);
1509 cache
->regcache
= regcache
.release ();
1510 *this_prologue_cache
= cache
;
1519 ppu2spu_dealloc_cache (struct frame_info
*self
, void *this_cache
)
1521 struct ppu2spu_cache
*cache
= (struct ppu2spu_cache
*) this_cache
;
1522 delete cache
->regcache
;
1525 static const struct frame_unwind ppu2spu_unwind
= {
1527 default_frame_unwind_stop_reason
,
1529 ppu2spu_prev_register
,
1532 ppu2spu_dealloc_cache
,
1536 /* Initialize linux_record_tdep if not initialized yet.
1537 WORDSIZE is 4 or 8 for 32- or 64-bit PowerPC Linux respectively.
1538 Sizes of data structures are initialized accordingly. */
1541 ppc_init_linux_record_tdep (struct linux_record_tdep
*record_tdep
,
1544 /* Simply return if it had been initialized. */
1545 if (record_tdep
->size_pointer
!= 0)
1548 /* These values are the size of the type that will be used in a system
1549 call. They are obtained from Linux Kernel source. */
1553 record_tdep
->size_pointer
= 8;
1554 record_tdep
->size__old_kernel_stat
= 32;
1555 record_tdep
->size_tms
= 32;
1556 record_tdep
->size_loff_t
= 8;
1557 record_tdep
->size_flock
= 32;
1558 record_tdep
->size_oldold_utsname
= 45;
1559 record_tdep
->size_ustat
= 32;
1560 record_tdep
->size_old_sigaction
= 32;
1561 record_tdep
->size_old_sigset_t
= 8;
1562 record_tdep
->size_rlimit
= 16;
1563 record_tdep
->size_rusage
= 144;
1564 record_tdep
->size_timeval
= 16;
1565 record_tdep
->size_timezone
= 8;
1566 record_tdep
->size_old_gid_t
= 4;
1567 record_tdep
->size_old_uid_t
= 4;
1568 record_tdep
->size_fd_set
= 128;
1569 record_tdep
->size_old_dirent
= 280;
1570 record_tdep
->size_statfs
= 120;
1571 record_tdep
->size_statfs64
= 120;
1572 record_tdep
->size_sockaddr
= 16;
1573 record_tdep
->size_int
= 4;
1574 record_tdep
->size_long
= 8;
1575 record_tdep
->size_ulong
= 8;
1576 record_tdep
->size_msghdr
= 56;
1577 record_tdep
->size_itimerval
= 32;
1578 record_tdep
->size_stat
= 144;
1579 record_tdep
->size_old_utsname
= 325;
1580 record_tdep
->size_sysinfo
= 112;
1581 record_tdep
->size_msqid_ds
= 120;
1582 record_tdep
->size_shmid_ds
= 112;
1583 record_tdep
->size_new_utsname
= 390;
1584 record_tdep
->size_timex
= 208;
1585 record_tdep
->size_mem_dqinfo
= 24;
1586 record_tdep
->size_if_dqblk
= 72;
1587 record_tdep
->size_fs_quota_stat
= 80;
1588 record_tdep
->size_timespec
= 16;
1589 record_tdep
->size_pollfd
= 8;
1590 record_tdep
->size_NFS_FHSIZE
= 32;
1591 record_tdep
->size_knfsd_fh
= 132;
1592 record_tdep
->size_TASK_COMM_LEN
= 16;
1593 record_tdep
->size_sigaction
= 32;
1594 record_tdep
->size_sigset_t
= 8;
1595 record_tdep
->size_siginfo_t
= 128;
1596 record_tdep
->size_cap_user_data_t
= 8;
1597 record_tdep
->size_stack_t
= 24;
1598 record_tdep
->size_off_t
= 8;
1599 record_tdep
->size_stat64
= 104;
1600 record_tdep
->size_gid_t
= 4;
1601 record_tdep
->size_uid_t
= 4;
1602 record_tdep
->size_PAGE_SIZE
= 0x10000; /* 64KB */
1603 record_tdep
->size_flock64
= 32;
1604 record_tdep
->size_io_event
= 32;
1605 record_tdep
->size_iocb
= 64;
1606 record_tdep
->size_epoll_event
= 16;
1607 record_tdep
->size_itimerspec
= 32;
1608 record_tdep
->size_mq_attr
= 64;
1609 record_tdep
->size_termios
= 44;
1610 record_tdep
->size_pid_t
= 4;
1611 record_tdep
->size_winsize
= 8;
1612 record_tdep
->size_serial_struct
= 72;
1613 record_tdep
->size_serial_icounter_struct
= 80;
1614 record_tdep
->size_size_t
= 8;
1615 record_tdep
->size_iovec
= 16;
1616 record_tdep
->size_time_t
= 8;
1618 else if (wordsize
== 4)
1620 record_tdep
->size_pointer
= 4;
1621 record_tdep
->size__old_kernel_stat
= 32;
1622 record_tdep
->size_tms
= 16;
1623 record_tdep
->size_loff_t
= 8;
1624 record_tdep
->size_flock
= 16;
1625 record_tdep
->size_oldold_utsname
= 45;
1626 record_tdep
->size_ustat
= 20;
1627 record_tdep
->size_old_sigaction
= 16;
1628 record_tdep
->size_old_sigset_t
= 4;
1629 record_tdep
->size_rlimit
= 8;
1630 record_tdep
->size_rusage
= 72;
1631 record_tdep
->size_timeval
= 8;
1632 record_tdep
->size_timezone
= 8;
1633 record_tdep
->size_old_gid_t
= 4;
1634 record_tdep
->size_old_uid_t
= 4;
1635 record_tdep
->size_fd_set
= 128;
1636 record_tdep
->size_old_dirent
= 268;
1637 record_tdep
->size_statfs
= 64;
1638 record_tdep
->size_statfs64
= 88;
1639 record_tdep
->size_sockaddr
= 16;
1640 record_tdep
->size_int
= 4;
1641 record_tdep
->size_long
= 4;
1642 record_tdep
->size_ulong
= 4;
1643 record_tdep
->size_msghdr
= 28;
1644 record_tdep
->size_itimerval
= 16;
1645 record_tdep
->size_stat
= 88;
1646 record_tdep
->size_old_utsname
= 325;
1647 record_tdep
->size_sysinfo
= 64;
1648 record_tdep
->size_msqid_ds
= 68;
1649 record_tdep
->size_shmid_ds
= 60;
1650 record_tdep
->size_new_utsname
= 390;
1651 record_tdep
->size_timex
= 128;
1652 record_tdep
->size_mem_dqinfo
= 24;
1653 record_tdep
->size_if_dqblk
= 72;
1654 record_tdep
->size_fs_quota_stat
= 80;
1655 record_tdep
->size_timespec
= 8;
1656 record_tdep
->size_pollfd
= 8;
1657 record_tdep
->size_NFS_FHSIZE
= 32;
1658 record_tdep
->size_knfsd_fh
= 132;
1659 record_tdep
->size_TASK_COMM_LEN
= 16;
1660 record_tdep
->size_sigaction
= 20;
1661 record_tdep
->size_sigset_t
= 8;
1662 record_tdep
->size_siginfo_t
= 128;
1663 record_tdep
->size_cap_user_data_t
= 4;
1664 record_tdep
->size_stack_t
= 12;
1665 record_tdep
->size_off_t
= 4;
1666 record_tdep
->size_stat64
= 104;
1667 record_tdep
->size_gid_t
= 4;
1668 record_tdep
->size_uid_t
= 4;
1669 record_tdep
->size_PAGE_SIZE
= 0x10000; /* 64KB */
1670 record_tdep
->size_flock64
= 32;
1671 record_tdep
->size_io_event
= 32;
1672 record_tdep
->size_iocb
= 64;
1673 record_tdep
->size_epoll_event
= 16;
1674 record_tdep
->size_itimerspec
= 16;
1675 record_tdep
->size_mq_attr
= 32;
1676 record_tdep
->size_termios
= 44;
1677 record_tdep
->size_pid_t
= 4;
1678 record_tdep
->size_winsize
= 8;
1679 record_tdep
->size_serial_struct
= 60;
1680 record_tdep
->size_serial_icounter_struct
= 80;
1681 record_tdep
->size_size_t
= 4;
1682 record_tdep
->size_iovec
= 8;
1683 record_tdep
->size_time_t
= 4;
1686 internal_error (__FILE__
, __LINE__
, _("unexpected wordsize"));
1688 /* These values are the second argument of system call "sys_fcntl"
1689 and "sys_fcntl64". They are obtained from Linux Kernel source. */
1690 record_tdep
->fcntl_F_GETLK
= 5;
1691 record_tdep
->fcntl_F_GETLK64
= 12;
1692 record_tdep
->fcntl_F_SETLK64
= 13;
1693 record_tdep
->fcntl_F_SETLKW64
= 14;
1695 record_tdep
->arg1
= PPC_R0_REGNUM
+ 3;
1696 record_tdep
->arg2
= PPC_R0_REGNUM
+ 4;
1697 record_tdep
->arg3
= PPC_R0_REGNUM
+ 5;
1698 record_tdep
->arg4
= PPC_R0_REGNUM
+ 6;
1699 record_tdep
->arg5
= PPC_R0_REGNUM
+ 7;
1700 record_tdep
->arg6
= PPC_R0_REGNUM
+ 8;
1702 /* These values are the second argument of system call "sys_ioctl".
1703 They are obtained from Linux Kernel source.
1704 See arch/powerpc/include/uapi/asm/ioctls.h. */
1705 record_tdep
->ioctl_TCGETS
= 0x403c7413;
1706 record_tdep
->ioctl_TCSETS
= 0x803c7414;
1707 record_tdep
->ioctl_TCSETSW
= 0x803c7415;
1708 record_tdep
->ioctl_TCSETSF
= 0x803c7416;
1709 record_tdep
->ioctl_TCGETA
= 0x40147417;
1710 record_tdep
->ioctl_TCSETA
= 0x80147418;
1711 record_tdep
->ioctl_TCSETAW
= 0x80147419;
1712 record_tdep
->ioctl_TCSETAF
= 0x8014741c;
1713 record_tdep
->ioctl_TCSBRK
= 0x2000741d;
1714 record_tdep
->ioctl_TCXONC
= 0x2000741e;
1715 record_tdep
->ioctl_TCFLSH
= 0x2000741f;
1716 record_tdep
->ioctl_TIOCEXCL
= 0x540c;
1717 record_tdep
->ioctl_TIOCNXCL
= 0x540d;
1718 record_tdep
->ioctl_TIOCSCTTY
= 0x540e;
1719 record_tdep
->ioctl_TIOCGPGRP
= 0x40047477;
1720 record_tdep
->ioctl_TIOCSPGRP
= 0x80047476;
1721 record_tdep
->ioctl_TIOCOUTQ
= 0x40047473;
1722 record_tdep
->ioctl_TIOCSTI
= 0x5412;
1723 record_tdep
->ioctl_TIOCGWINSZ
= 0x40087468;
1724 record_tdep
->ioctl_TIOCSWINSZ
= 0x80087467;
1725 record_tdep
->ioctl_TIOCMGET
= 0x5415;
1726 record_tdep
->ioctl_TIOCMBIS
= 0x5416;
1727 record_tdep
->ioctl_TIOCMBIC
= 0x5417;
1728 record_tdep
->ioctl_TIOCMSET
= 0x5418;
1729 record_tdep
->ioctl_TIOCGSOFTCAR
= 0x5419;
1730 record_tdep
->ioctl_TIOCSSOFTCAR
= 0x541a;
1731 record_tdep
->ioctl_FIONREAD
= 0x4004667f;
1732 record_tdep
->ioctl_TIOCINQ
= 0x4004667f;
1733 record_tdep
->ioctl_TIOCLINUX
= 0x541c;
1734 record_tdep
->ioctl_TIOCCONS
= 0x541d;
1735 record_tdep
->ioctl_TIOCGSERIAL
= 0x541e;
1736 record_tdep
->ioctl_TIOCSSERIAL
= 0x541f;
1737 record_tdep
->ioctl_TIOCPKT
= 0x5420;
1738 record_tdep
->ioctl_FIONBIO
= 0x8004667e;
1739 record_tdep
->ioctl_TIOCNOTTY
= 0x5422;
1740 record_tdep
->ioctl_TIOCSETD
= 0x5423;
1741 record_tdep
->ioctl_TIOCGETD
= 0x5424;
1742 record_tdep
->ioctl_TCSBRKP
= 0x5425;
1743 record_tdep
->ioctl_TIOCSBRK
= 0x5427;
1744 record_tdep
->ioctl_TIOCCBRK
= 0x5428;
1745 record_tdep
->ioctl_TIOCGSID
= 0x5429;
1746 record_tdep
->ioctl_TIOCGPTN
= 0x40045430;
1747 record_tdep
->ioctl_TIOCSPTLCK
= 0x80045431;
1748 record_tdep
->ioctl_FIONCLEX
= 0x20006602;
1749 record_tdep
->ioctl_FIOCLEX
= 0x20006601;
1750 record_tdep
->ioctl_FIOASYNC
= 0x8004667d;
1751 record_tdep
->ioctl_TIOCSERCONFIG
= 0x5453;
1752 record_tdep
->ioctl_TIOCSERGWILD
= 0x5454;
1753 record_tdep
->ioctl_TIOCSERSWILD
= 0x5455;
1754 record_tdep
->ioctl_TIOCGLCKTRMIOS
= 0x5456;
1755 record_tdep
->ioctl_TIOCSLCKTRMIOS
= 0x5457;
1756 record_tdep
->ioctl_TIOCSERGSTRUCT
= 0x5458;
1757 record_tdep
->ioctl_TIOCSERGETLSR
= 0x5459;
1758 record_tdep
->ioctl_TIOCSERGETMULTI
= 0x545a;
1759 record_tdep
->ioctl_TIOCSERSETMULTI
= 0x545b;
1760 record_tdep
->ioctl_TIOCMIWAIT
= 0x545c;
1761 record_tdep
->ioctl_TIOCGICOUNT
= 0x545d;
1762 record_tdep
->ioctl_FIOQSIZE
= 0x40086680;
1765 /* Return a floating-point format for a floating-point variable of
1766 length LEN in bits. If non-NULL, NAME is the name of its type.
1767 If no suitable type is found, return NULL. */
1769 const struct floatformat
**
1770 ppc_floatformat_for_type (struct gdbarch
*gdbarch
,
1771 const char *name
, int len
)
1773 if (len
== 128 && name
)
1775 if (strcmp (name
, "__float128") == 0
1776 || strcmp (name
, "_Float128") == 0
1777 || strcmp (name
, "_Float64x") == 0
1778 || strcmp (name
, "complex _Float128") == 0
1779 || strcmp (name
, "complex _Float64x") == 0)
1780 return floatformats_ia64_quad
;
1782 if (strcmp (name
, "__ibm128") == 0)
1783 return floatformats_ibm_long_double
;
1786 return default_floatformat_for_type (gdbarch
, name
, len
);
1790 ppc_linux_init_abi (struct gdbarch_info info
,
1791 struct gdbarch
*gdbarch
)
1793 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1794 struct tdesc_arch_data
*tdesc_data
= info
.tdesc_data
;
1795 static const char *const stap_integer_prefixes
[] = { "i", NULL
};
1796 static const char *const stap_register_indirection_prefixes
[] = { "(",
1798 static const char *const stap_register_indirection_suffixes
[] = { ")",
1801 linux_init_abi (info
, gdbarch
);
1803 /* PPC GNU/Linux uses either 64-bit or 128-bit long doubles; where
1804 128-bit, they can be either IBM long double or IEEE quad long double.
1805 The 64-bit long double case will be detected automatically using
1806 the size specified in debug info. We use a .gnu.attribute flag
1807 to distinguish between the IBM long double and IEEE quad cases. */
1808 set_gdbarch_long_double_bit (gdbarch
, 16 * TARGET_CHAR_BIT
);
1809 if (tdep
->long_double_abi
== POWERPC_LONG_DOUBLE_IEEE128
)
1810 set_gdbarch_long_double_format (gdbarch
, floatformats_ia64_quad
);
1812 set_gdbarch_long_double_format (gdbarch
, floatformats_ibm_long_double
);
1814 /* Support for floating-point data type variants. */
1815 set_gdbarch_floatformat_for_type (gdbarch
, ppc_floatformat_for_type
);
1817 /* Handle inferior calls during interrupted system calls. */
1818 set_gdbarch_write_pc (gdbarch
, ppc_linux_write_pc
);
1820 /* Get the syscall number from the arch's register. */
1821 set_gdbarch_get_syscall_number (gdbarch
, ppc_linux_get_syscall_number
);
1823 /* SystemTap functions. */
1824 set_gdbarch_stap_integer_prefixes (gdbarch
, stap_integer_prefixes
);
1825 set_gdbarch_stap_register_indirection_prefixes (gdbarch
,
1826 stap_register_indirection_prefixes
);
1827 set_gdbarch_stap_register_indirection_suffixes (gdbarch
,
1828 stap_register_indirection_suffixes
);
1829 set_gdbarch_stap_gdb_register_prefix (gdbarch
, "r");
1830 set_gdbarch_stap_is_single_operand (gdbarch
, ppc_stap_is_single_operand
);
1831 set_gdbarch_stap_parse_special_token (gdbarch
,
1832 ppc_stap_parse_special_token
);
1834 if (tdep
->wordsize
== 4)
1836 /* Until November 2001, gcc did not comply with the 32 bit SysV
1837 R4 ABI requirement that structures less than or equal to 8
1838 bytes should be returned in registers. Instead GCC was using
1839 the AIX/PowerOpen ABI - everything returned in memory
1840 (well ignoring vectors that is). When this was corrected, it
1841 wasn't fixed for GNU/Linux native platform. Use the
1842 PowerOpen struct convention. */
1843 set_gdbarch_return_value (gdbarch
, ppc_linux_return_value
);
1845 set_gdbarch_memory_remove_breakpoint (gdbarch
,
1846 ppc_linux_memory_remove_breakpoint
);
1848 /* Shared library handling. */
1849 set_gdbarch_skip_trampoline_code (gdbarch
, ppc_skip_trampoline_code
);
1850 set_solib_svr4_fetch_link_map_offsets
1851 (gdbarch
, svr4_ilp32_fetch_link_map_offsets
);
1853 /* Setting the correct XML syscall filename. */
1854 set_xml_syscall_file_name (gdbarch
, XML_SYSCALL_FILENAME_PPC
);
1857 tramp_frame_prepend_unwinder (gdbarch
,
1858 &ppc32_linux_sigaction_tramp_frame
);
1859 tramp_frame_prepend_unwinder (gdbarch
,
1860 &ppc32_linux_sighandler_tramp_frame
);
1862 /* BFD target for core files. */
1863 if (gdbarch_byte_order (gdbarch
) == BFD_ENDIAN_LITTLE
)
1864 set_gdbarch_gcore_bfd_target (gdbarch
, "elf32-powerpcle");
1866 set_gdbarch_gcore_bfd_target (gdbarch
, "elf32-powerpc");
1868 if (powerpc_so_ops
.in_dynsym_resolve_code
== NULL
)
1870 powerpc_so_ops
= svr4_so_ops
;
1871 /* Override dynamic resolve function. */
1872 powerpc_so_ops
.in_dynsym_resolve_code
=
1873 powerpc_linux_in_dynsym_resolve_code
;
1875 set_solib_ops (gdbarch
, &powerpc_so_ops
);
1877 set_gdbarch_skip_solib_resolver (gdbarch
, glibc_skip_solib_resolver
);
1880 if (tdep
->wordsize
== 8)
1882 if (tdep
->elf_abi
== POWERPC_ELF_V1
)
1884 /* Handle PPC GNU/Linux 64-bit function pointers (which are really
1885 function descriptors). */
1886 set_gdbarch_convert_from_func_ptr_addr
1887 (gdbarch
, ppc64_convert_from_func_ptr_addr
);
1889 set_gdbarch_elf_make_msymbol_special
1890 (gdbarch
, ppc64_elf_make_msymbol_special
);
1894 set_gdbarch_elf_make_msymbol_special
1895 (gdbarch
, ppc_elfv2_elf_make_msymbol_special
);
1897 set_gdbarch_skip_entrypoint (gdbarch
, ppc_elfv2_skip_entrypoint
);
1900 /* Shared library handling. */
1901 set_gdbarch_skip_trampoline_code (gdbarch
, ppc64_skip_trampoline_code
);
1902 set_solib_svr4_fetch_link_map_offsets
1903 (gdbarch
, svr4_lp64_fetch_link_map_offsets
);
1905 /* Setting the correct XML syscall filename. */
1906 set_xml_syscall_file_name (gdbarch
, XML_SYSCALL_FILENAME_PPC64
);
1909 tramp_frame_prepend_unwinder (gdbarch
,
1910 &ppc64_linux_sigaction_tramp_frame
);
1911 tramp_frame_prepend_unwinder (gdbarch
,
1912 &ppc64_linux_sighandler_tramp_frame
);
1914 /* BFD target for core files. */
1915 if (gdbarch_byte_order (gdbarch
) == BFD_ENDIAN_LITTLE
)
1916 set_gdbarch_gcore_bfd_target (gdbarch
, "elf64-powerpcle");
1918 set_gdbarch_gcore_bfd_target (gdbarch
, "elf64-powerpc");
1921 set_gdbarch_core_read_description (gdbarch
, ppc_linux_core_read_description
);
1922 set_gdbarch_iterate_over_regset_sections (gdbarch
,
1923 ppc_linux_iterate_over_regset_sections
);
1925 /* Enable TLS support. */
1926 set_gdbarch_fetch_tls_load_module_address (gdbarch
,
1927 svr4_fetch_objfile_link_map
);
1931 const struct tdesc_feature
*feature
;
1933 /* If we have target-described registers, then we can safely
1934 reserve a number for PPC_ORIG_R3_REGNUM and PPC_TRAP_REGNUM
1935 (whether they are described or not). */
1936 gdb_assert (gdbarch_num_regs (gdbarch
) <= PPC_ORIG_R3_REGNUM
);
1937 set_gdbarch_num_regs (gdbarch
, PPC_TRAP_REGNUM
+ 1);
1939 /* If they are present, then assign them to the reserved number. */
1940 feature
= tdesc_find_feature (info
.target_desc
,
1941 "org.gnu.gdb.power.linux");
1942 if (feature
!= NULL
)
1944 tdesc_numbered_register (feature
, tdesc_data
,
1945 PPC_ORIG_R3_REGNUM
, "orig_r3");
1946 tdesc_numbered_register (feature
, tdesc_data
,
1947 PPC_TRAP_REGNUM
, "trap");
1951 /* Enable Cell/B.E. if supported by the target. */
1952 if (tdesc_compatible_p (info
.target_desc
,
1953 bfd_lookup_arch (bfd_arch_spu
, bfd_mach_spu
)))
1955 /* Cell/B.E. multi-architecture support. */
1956 set_spu_solib_ops (gdbarch
);
1958 /* Cell/B.E. cross-architecture unwinder support. */
1959 frame_unwind_prepend_unwinder (gdbarch
, &ppu2spu_unwind
);
1961 /* We need to support more than "addr_bit" significant address bits
1962 in order to support SPUADDR_ADDR encoded values. */
1963 set_gdbarch_significant_addr_bit (gdbarch
, 64);
1966 set_gdbarch_displaced_step_location (gdbarch
,
1967 linux_displaced_step_location
);
1969 /* Support reverse debugging. */
1970 set_gdbarch_process_record (gdbarch
, ppc_process_record
);
1971 set_gdbarch_process_record_signal (gdbarch
, ppc_linux_record_signal
);
1972 tdep
->ppc_syscall_record
= ppc_linux_syscall_record
;
1974 ppc_init_linux_record_tdep (&ppc_linux_record_tdep
, 4);
1975 ppc_init_linux_record_tdep (&ppc64_linux_record_tdep
, 8);
1979 _initialize_ppc_linux_tdep (void)
1981 /* Register for all sub-familes of the POWER/PowerPC: 32-bit and
1982 64-bit PowerPC, and the older rs6k. */
1983 gdbarch_register_osabi (bfd_arch_powerpc
, bfd_mach_ppc
, GDB_OSABI_LINUX
,
1984 ppc_linux_init_abi
);
1985 gdbarch_register_osabi (bfd_arch_powerpc
, bfd_mach_ppc64
, GDB_OSABI_LINUX
,
1986 ppc_linux_init_abi
);
1987 gdbarch_register_osabi (bfd_arch_rs6000
, bfd_mach_rs6k
, GDB_OSABI_LINUX
,
1988 ppc_linux_init_abi
);
1990 /* Attach to observers to track __spe_current_active_context. */
1991 gdb::observers::inferior_created
.attach (ppc_linux_spe_context_inferior_created
);
1992 gdb::observers::solib_loaded
.attach (ppc_linux_spe_context_solib_loaded
);
1993 gdb::observers::solib_unloaded
.attach (ppc_linux_spe_context_solib_unloaded
);
1995 /* Initialize the Linux target descriptions. */
1996 initialize_tdesc_powerpc_32l ();
1997 initialize_tdesc_powerpc_altivec32l ();
1998 initialize_tdesc_powerpc_cell32l ();
1999 initialize_tdesc_powerpc_vsx32l ();
2000 initialize_tdesc_powerpc_isa205_32l ();
2001 initialize_tdesc_powerpc_isa205_altivec32l ();
2002 initialize_tdesc_powerpc_isa205_vsx32l ();
2003 initialize_tdesc_powerpc_isa205_ppr_dscr_vsx32l ();
2004 initialize_tdesc_powerpc_isa207_vsx32l ();
2005 initialize_tdesc_powerpc_64l ();
2006 initialize_tdesc_powerpc_altivec64l ();
2007 initialize_tdesc_powerpc_cell64l ();
2008 initialize_tdesc_powerpc_vsx64l ();
2009 initialize_tdesc_powerpc_isa205_64l ();
2010 initialize_tdesc_powerpc_isa205_altivec64l ();
2011 initialize_tdesc_powerpc_isa205_vsx64l ();
2012 initialize_tdesc_powerpc_isa205_ppr_dscr_vsx64l ();
2013 initialize_tdesc_powerpc_isa207_vsx64l ();
2014 initialize_tdesc_powerpc_e500l ();