1 /* Target-dependent code for GDB, the GNU debugger.
3 Copyright (C) 1986-2014 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 "glibc-tdep.h"
41 #include "trad-frame.h"
42 #include "frame-unwind.h"
43 #include "tramp-frame.h"
46 #include "elf/common.h"
47 #include "elf/ppc64.h"
48 #include "exceptions.h"
49 #include "arch-utils.h"
51 #include "xml-syscall.h"
52 #include "linux-tdep.h"
54 #include "stap-probe.h"
57 #include "cli/cli-utils.h"
58 #include "parser-defs.h"
59 #include "user-regs.h"
61 #include "elf-bfd.h" /* for elfcore_write_* */
63 #include "features/rs6000/powerpc-32l.c"
64 #include "features/rs6000/powerpc-altivec32l.c"
65 #include "features/rs6000/powerpc-cell32l.c"
66 #include "features/rs6000/powerpc-vsx32l.c"
67 #include "features/rs6000/powerpc-isa205-32l.c"
68 #include "features/rs6000/powerpc-isa205-altivec32l.c"
69 #include "features/rs6000/powerpc-isa205-vsx32l.c"
70 #include "features/rs6000/powerpc-64l.c"
71 #include "features/rs6000/powerpc-altivec64l.c"
72 #include "features/rs6000/powerpc-cell64l.c"
73 #include "features/rs6000/powerpc-vsx64l.c"
74 #include "features/rs6000/powerpc-isa205-64l.c"
75 #include "features/rs6000/powerpc-isa205-altivec64l.c"
76 #include "features/rs6000/powerpc-isa205-vsx64l.c"
77 #include "features/rs6000/powerpc-e500l.c"
79 /* Shared library operations for PowerPC-Linux. */
80 static struct target_so_ops powerpc_so_ops
;
82 /* The syscall's XML filename for PPC and PPC64. */
83 #define XML_SYSCALL_FILENAME_PPC "syscalls/ppc-linux.xml"
84 #define XML_SYSCALL_FILENAME_PPC64 "syscalls/ppc64-linux.xml"
86 /* ppc_linux_memory_remove_breakpoints attempts to remove a breakpoint
87 in much the same fashion as memory_remove_breakpoint in mem-break.c,
88 but is careful not to write back the previous contents if the code
89 in question has changed in between inserting the breakpoint and
92 Here is the problem that we're trying to solve...
94 Once upon a time, before introducing this function to remove
95 breakpoints from the inferior, setting a breakpoint on a shared
96 library function prior to running the program would not work
97 properly. In order to understand the problem, it is first
98 necessary to understand a little bit about dynamic linking on
101 A call to a shared library function is accomplished via a bl
102 (branch-and-link) instruction whose branch target is an entry
103 in the procedure linkage table (PLT). The PLT in the object
104 file is uninitialized. To gdb, prior to running the program, the
105 entries in the PLT are all zeros.
107 Once the program starts running, the shared libraries are loaded
108 and the procedure linkage table is initialized, but the entries in
109 the table are not (necessarily) resolved. Once a function is
110 actually called, the code in the PLT is hit and the function is
111 resolved. In order to better illustrate this, an example is in
112 order; the following example is from the gdb testsuite.
114 We start the program shmain.
116 [kev@arroyo testsuite]$ ../gdb gdb.base/shmain
119 We place two breakpoints, one on shr1 and the other on main.
122 Breakpoint 1 at 0x100409d4
124 Breakpoint 2 at 0x100006a0: file gdb.base/shmain.c, line 44.
126 Examine the instruction (and the immediatly following instruction)
127 upon which the breakpoint was placed. Note that the PLT entry
128 for shr1 contains zeros.
130 (gdb) x/2i 0x100409d4
131 0x100409d4 <shr1>: .long 0x0
132 0x100409d8 <shr1+4>: .long 0x0
137 Starting program: gdb.base/shmain
138 Breakpoint 1 at 0xffaf790: file gdb.base/shr1.c, line 19.
140 Breakpoint 2, main ()
141 at gdb.base/shmain.c:44
144 Examine the PLT again. Note that the loading of the shared
145 library has initialized the PLT to code which loads a constant
146 (which I think is an index into the GOT) into r11 and then
147 branchs a short distance to the code which actually does the
150 (gdb) x/2i 0x100409d4
151 0x100409d4 <shr1>: li r11,4
152 0x100409d8 <shr1+4>: b 0x10040984 <sg+4>
156 Breakpoint 1, shr1 (x=1)
157 at gdb.base/shr1.c:19
160 Now we've hit the breakpoint at shr1. (The breakpoint was
161 reset from the PLT entry to the actual shr1 function after the
162 shared library was loaded.) Note that the PLT entry has been
163 resolved to contain a branch that takes us directly to shr1.
164 (The real one, not the PLT entry.)
166 (gdb) x/2i 0x100409d4
167 0x100409d4 <shr1>: b 0xffaf76c <shr1>
168 0x100409d8 <shr1+4>: b 0x10040984 <sg+4>
170 The thing to note here is that the PLT entry for shr1 has been
173 Now the problem should be obvious. GDB places a breakpoint (a
174 trap instruction) on the zero value of the PLT entry for shr1.
175 Later on, after the shared library had been loaded and the PLT
176 initialized, GDB gets a signal indicating this fact and attempts
177 (as it always does when it stops) to remove all the breakpoints.
179 The breakpoint removal was causing the former contents (a zero
180 word) to be written back to the now initialized PLT entry thus
181 destroying a portion of the initialization that had occurred only a
182 short time ago. When execution continued, the zero word would be
183 executed as an instruction an illegal instruction trap was
184 generated instead. (0 is not a legal instruction.)
186 The fix for this problem was fairly straightforward. The function
187 memory_remove_breakpoint from mem-break.c was copied to this file,
188 modified slightly, and renamed to ppc_linux_memory_remove_breakpoint.
189 In tm-linux.h, MEMORY_REMOVE_BREAKPOINT is defined to call this new
192 The differences between ppc_linux_memory_remove_breakpoint () and
193 memory_remove_breakpoint () are minor. All that the former does
194 that the latter does not is check to make sure that the breakpoint
195 location actually contains a breakpoint (trap instruction) prior
196 to attempting to write back the old contents. If it does contain
197 a trap instruction, we allow the old contents to be written back.
198 Otherwise, we silently do nothing.
200 The big question is whether memory_remove_breakpoint () should be
201 changed to have the same functionality. The downside is that more
202 traffic is generated for remote targets since we'll have an extra
203 fetch of a memory word each time a breakpoint is removed.
205 For the time being, we'll leave this self-modifying-code-friendly
206 version in ppc-linux-tdep.c, but it ought to be migrated somewhere
207 else in the event that some other platform has similar needs with
208 regard to removing breakpoints in some potentially self modifying
211 ppc_linux_memory_remove_breakpoint (struct gdbarch
*gdbarch
,
212 struct bp_target_info
*bp_tgt
)
214 CORE_ADDR addr
= bp_tgt
->placed_address
;
215 const unsigned char *bp
;
218 gdb_byte old_contents
[BREAKPOINT_MAX
];
219 struct cleanup
*cleanup
;
221 /* Determine appropriate breakpoint contents and size for this address. */
222 bp
= gdbarch_breakpoint_from_pc (gdbarch
, &addr
, &bplen
);
224 error (_("Software breakpoints not implemented for this target."));
226 /* Make sure we see the memory breakpoints. */
227 cleanup
= make_show_memory_breakpoints_cleanup (1);
228 val
= target_read_memory (addr
, old_contents
, bplen
);
230 /* If our breakpoint is no longer at the address, this means that the
231 program modified the code on us, so it is wrong to put back the
233 if (val
== 0 && memcmp (bp
, old_contents
, bplen
) == 0)
234 val
= target_write_raw_memory (addr
, bp_tgt
->shadow_contents
, bplen
);
236 do_cleanups (cleanup
);
240 /* For historic reasons, PPC 32 GNU/Linux follows PowerOpen rather
241 than the 32 bit SYSV R4 ABI structure return convention - all
242 structures, no matter their size, are put in memory. Vectors,
243 which were added later, do get returned in a register though. */
245 static enum return_value_convention
246 ppc_linux_return_value (struct gdbarch
*gdbarch
, struct value
*function
,
247 struct type
*valtype
, struct regcache
*regcache
,
248 gdb_byte
*readbuf
, const gdb_byte
*writebuf
)
250 if ((TYPE_CODE (valtype
) == TYPE_CODE_STRUCT
251 || TYPE_CODE (valtype
) == TYPE_CODE_UNION
)
252 && !((TYPE_LENGTH (valtype
) == 16 || TYPE_LENGTH (valtype
) == 8)
253 && TYPE_VECTOR (valtype
)))
254 return RETURN_VALUE_STRUCT_CONVENTION
;
256 return ppc_sysv_abi_return_value (gdbarch
, function
, valtype
, regcache
,
260 /* PLT stub in executable. */
261 static struct ppc_insn_pattern powerpc32_plt_stub
[] =
263 { 0xffff0000, 0x3d600000, 0 }, /* lis r11, xxxx */
264 { 0xffff0000, 0x816b0000, 0 }, /* lwz r11, xxxx(r11) */
265 { 0xffffffff, 0x7d6903a6, 0 }, /* mtctr r11 */
266 { 0xffffffff, 0x4e800420, 0 }, /* bctr */
270 /* PLT stub in shared library. */
271 static struct ppc_insn_pattern powerpc32_plt_stub_so
[] =
273 { 0xffff0000, 0x817e0000, 0 }, /* lwz r11, xxxx(r30) */
274 { 0xffffffff, 0x7d6903a6, 0 }, /* mtctr r11 */
275 { 0xffffffff, 0x4e800420, 0 }, /* bctr */
276 { 0xffffffff, 0x60000000, 0 }, /* nop */
279 #define POWERPC32_PLT_STUB_LEN ARRAY_SIZE (powerpc32_plt_stub)
281 /* Check if PC is in PLT stub. For non-secure PLT, stub is in .plt
282 section. For secure PLT, stub is in .text and we need to check
283 instruction patterns. */
286 powerpc_linux_in_dynsym_resolve_code (CORE_ADDR pc
)
288 struct bound_minimal_symbol sym
;
290 /* Check whether PC is in the dynamic linker. This also checks
291 whether it is in the .plt section, used by non-PIC executables. */
292 if (svr4_in_dynsym_resolve_code (pc
))
295 /* Check if we are in the resolver. */
296 sym
= lookup_minimal_symbol_by_pc (pc
);
297 if (sym
.minsym
!= NULL
298 && (strcmp (MSYMBOL_LINKAGE_NAME (sym
.minsym
), "__glink") == 0
299 || strcmp (MSYMBOL_LINKAGE_NAME (sym
.minsym
),
300 "__glink_PLTresolve") == 0))
306 /* Follow PLT stub to actual routine. */
309 ppc_skip_trampoline_code (struct frame_info
*frame
, CORE_ADDR pc
)
311 unsigned int insnbuf
[POWERPC32_PLT_STUB_LEN
];
312 struct gdbarch
*gdbarch
= get_frame_arch (frame
);
313 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
314 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
315 CORE_ADDR target
= 0;
317 if (ppc_insns_match_pattern (frame
, pc
, powerpc32_plt_stub
, insnbuf
))
322 Branch target is in r11. */
324 target
= (ppc_insn_d_field (insnbuf
[0]) << 16)
325 | ppc_insn_d_field (insnbuf
[1]);
326 target
= read_memory_unsigned_integer (target
, 4, byte_order
);
329 if (ppc_insns_match_pattern (frame
, pc
, powerpc32_plt_stub_so
, insnbuf
))
333 Branch target is in r11. */
335 target
= get_frame_register_unsigned (frame
, tdep
->ppc_gp0_regnum
+ 30)
336 + ppc_insn_d_field (insnbuf
[0]);
337 target
= read_memory_unsigned_integer (target
, 4, byte_order
);
343 /* Wrappers to handle Linux-only registers. */
346 ppc_linux_supply_gregset (const struct regset
*regset
,
347 struct regcache
*regcache
,
348 int regnum
, const void *gregs
, size_t len
)
350 const struct ppc_reg_offsets
*offsets
= regset
->regmap
;
352 ppc_supply_gregset (regset
, regcache
, regnum
, gregs
, len
);
354 if (ppc_linux_trap_reg_p (get_regcache_arch (regcache
)))
356 /* "orig_r3" is stored 2 slots after "pc". */
357 if (regnum
== -1 || regnum
== PPC_ORIG_R3_REGNUM
)
358 ppc_supply_reg (regcache
, PPC_ORIG_R3_REGNUM
, gregs
,
359 offsets
->pc_offset
+ 2 * offsets
->gpr_size
,
362 /* "trap" is stored 8 slots after "pc". */
363 if (regnum
== -1 || regnum
== PPC_TRAP_REGNUM
)
364 ppc_supply_reg (regcache
, PPC_TRAP_REGNUM
, gregs
,
365 offsets
->pc_offset
+ 8 * offsets
->gpr_size
,
371 ppc_linux_collect_gregset (const struct regset
*regset
,
372 const struct regcache
*regcache
,
373 int regnum
, void *gregs
, size_t len
)
375 const struct ppc_reg_offsets
*offsets
= regset
->regmap
;
377 /* Clear areas in the linux gregset not written elsewhere. */
379 memset (gregs
, 0, len
);
381 ppc_collect_gregset (regset
, regcache
, regnum
, gregs
, len
);
383 if (ppc_linux_trap_reg_p (get_regcache_arch (regcache
)))
385 /* "orig_r3" is stored 2 slots after "pc". */
386 if (regnum
== -1 || regnum
== PPC_ORIG_R3_REGNUM
)
387 ppc_collect_reg (regcache
, PPC_ORIG_R3_REGNUM
, gregs
,
388 offsets
->pc_offset
+ 2 * offsets
->gpr_size
,
391 /* "trap" is stored 8 slots after "pc". */
392 if (regnum
== -1 || regnum
== PPC_TRAP_REGNUM
)
393 ppc_collect_reg (regcache
, PPC_TRAP_REGNUM
, gregs
,
394 offsets
->pc_offset
+ 8 * offsets
->gpr_size
,
399 /* Regset descriptions. */
400 static const struct ppc_reg_offsets ppc32_linux_reg_offsets
=
402 /* General-purpose registers. */
403 /* .r0_offset = */ 0,
406 /* .pc_offset = */ 128,
407 /* .ps_offset = */ 132,
408 /* .cr_offset = */ 152,
409 /* .lr_offset = */ 144,
410 /* .ctr_offset = */ 140,
411 /* .xer_offset = */ 148,
412 /* .mq_offset = */ 156,
414 /* Floating-point registers. */
415 /* .f0_offset = */ 0,
416 /* .fpscr_offset = */ 256,
417 /* .fpscr_size = */ 8,
419 /* AltiVec registers. */
420 /* .vr0_offset = */ 0,
421 /* .vscr_offset = */ 512 + 12,
422 /* .vrsave_offset = */ 528
425 static const struct ppc_reg_offsets ppc64_linux_reg_offsets
=
427 /* General-purpose registers. */
428 /* .r0_offset = */ 0,
431 /* .pc_offset = */ 256,
432 /* .ps_offset = */ 264,
433 /* .cr_offset = */ 304,
434 /* .lr_offset = */ 288,
435 /* .ctr_offset = */ 280,
436 /* .xer_offset = */ 296,
437 /* .mq_offset = */ 312,
439 /* Floating-point registers. */
440 /* .f0_offset = */ 0,
441 /* .fpscr_offset = */ 256,
442 /* .fpscr_size = */ 8,
444 /* AltiVec registers. */
445 /* .vr0_offset = */ 0,
446 /* .vscr_offset = */ 512 + 12,
447 /* .vrsave_offset = */ 528
450 static const struct regset ppc32_linux_gregset
= {
451 &ppc32_linux_reg_offsets
,
452 ppc_linux_supply_gregset
,
453 ppc_linux_collect_gregset
456 static const struct regset ppc64_linux_gregset
= {
457 &ppc64_linux_reg_offsets
,
458 ppc_linux_supply_gregset
,
459 ppc_linux_collect_gregset
462 static const struct regset ppc32_linux_fpregset
= {
463 &ppc32_linux_reg_offsets
,
468 static const struct regset ppc32_linux_vrregset
= {
469 &ppc32_linux_reg_offsets
,
474 static const struct regset ppc32_linux_vsxregset
= {
475 &ppc32_linux_reg_offsets
,
476 ppc_supply_vsxregset
,
477 ppc_collect_vsxregset
480 const struct regset
*
481 ppc_linux_gregset (int wordsize
)
483 return wordsize
== 8 ? &ppc64_linux_gregset
: &ppc32_linux_gregset
;
486 const struct regset
*
487 ppc_linux_fpregset (void)
489 return &ppc32_linux_fpregset
;
492 static const struct regset
*
493 ppc_linux_regset_from_core_section (struct gdbarch
*core_arch
,
494 const char *sect_name
, size_t sect_size
)
496 struct gdbarch_tdep
*tdep
= gdbarch_tdep (core_arch
);
497 if (strcmp (sect_name
, ".reg") == 0)
499 if (tdep
->wordsize
== 4)
500 return &ppc32_linux_gregset
;
502 return &ppc64_linux_gregset
;
504 if (strcmp (sect_name
, ".reg2") == 0)
505 return &ppc32_linux_fpregset
;
506 if (strcmp (sect_name
, ".reg-ppc-vmx") == 0)
507 return &ppc32_linux_vrregset
;
508 if (strcmp (sect_name
, ".reg-ppc-vsx") == 0)
509 return &ppc32_linux_vsxregset
;
513 /* Iterate over supported core file register note sections. */
516 ppc_linux_iterate_over_regset_sections (struct gdbarch
*gdbarch
,
517 iterate_over_regset_sections_cb
*cb
,
519 const struct regcache
*regcache
)
521 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
522 int have_altivec
= tdep
->ppc_vr0_regnum
!= -1;
523 int have_vsx
= tdep
->ppc_vsr0_upper_regnum
!= -1;
525 cb (".reg", 48 * tdep
->wordsize
, "general-purpose", cb_data
);
526 cb (".reg2", 264, "floating-point", cb_data
);
529 cb (".reg-ppc-vmx", 544, "ppc Altivec", cb_data
);
532 cb (".reg-ppc-vsx", 256, "POWER7 VSX", cb_data
);
536 ppc_linux_sigtramp_cache (struct frame_info
*this_frame
,
537 struct trad_frame_cache
*this_cache
,
538 CORE_ADDR func
, LONGEST offset
,
546 struct gdbarch
*gdbarch
= get_frame_arch (this_frame
);
547 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
548 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
550 base
= get_frame_register_unsigned (this_frame
,
551 gdbarch_sp_regnum (gdbarch
));
552 if (bias
> 0 && get_frame_pc (this_frame
) != func
)
553 /* See below, some signal trampolines increment the stack as their
554 first instruction, need to compensate for that. */
557 /* Find the address of the register buffer pointer. */
558 regs
= base
+ offset
;
559 /* Use that to find the address of the corresponding register
561 gpregs
= read_memory_unsigned_integer (regs
, tdep
->wordsize
, byte_order
);
562 fpregs
= gpregs
+ 48 * tdep
->wordsize
;
564 /* General purpose. */
565 for (i
= 0; i
< 32; i
++)
567 int regnum
= i
+ tdep
->ppc_gp0_regnum
;
568 trad_frame_set_reg_addr (this_cache
,
569 regnum
, gpregs
+ i
* tdep
->wordsize
);
571 trad_frame_set_reg_addr (this_cache
,
572 gdbarch_pc_regnum (gdbarch
),
573 gpregs
+ 32 * tdep
->wordsize
);
574 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_ctr_regnum
,
575 gpregs
+ 35 * tdep
->wordsize
);
576 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_lr_regnum
,
577 gpregs
+ 36 * tdep
->wordsize
);
578 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_xer_regnum
,
579 gpregs
+ 37 * tdep
->wordsize
);
580 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_cr_regnum
,
581 gpregs
+ 38 * tdep
->wordsize
);
583 if (ppc_linux_trap_reg_p (gdbarch
))
585 trad_frame_set_reg_addr (this_cache
, PPC_ORIG_R3_REGNUM
,
586 gpregs
+ 34 * tdep
->wordsize
);
587 trad_frame_set_reg_addr (this_cache
, PPC_TRAP_REGNUM
,
588 gpregs
+ 40 * tdep
->wordsize
);
591 if (ppc_floating_point_unit_p (gdbarch
))
593 /* Floating point registers. */
594 for (i
= 0; i
< 32; i
++)
596 int regnum
= i
+ gdbarch_fp0_regnum (gdbarch
);
597 trad_frame_set_reg_addr (this_cache
, regnum
,
598 fpregs
+ i
* tdep
->wordsize
);
600 trad_frame_set_reg_addr (this_cache
, tdep
->ppc_fpscr_regnum
,
601 fpregs
+ 32 * tdep
->wordsize
);
603 trad_frame_set_id (this_cache
, frame_id_build (base
, func
));
607 ppc32_linux_sigaction_cache_init (const struct tramp_frame
*self
,
608 struct frame_info
*this_frame
,
609 struct trad_frame_cache
*this_cache
,
612 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
613 0xd0 /* Offset to ucontext_t. */
614 + 0x30 /* Offset to .reg. */,
619 ppc64_linux_sigaction_cache_init (const struct tramp_frame
*self
,
620 struct frame_info
*this_frame
,
621 struct trad_frame_cache
*this_cache
,
624 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
625 0x80 /* Offset to ucontext_t. */
626 + 0xe0 /* Offset to .reg. */,
631 ppc32_linux_sighandler_cache_init (const struct tramp_frame
*self
,
632 struct frame_info
*this_frame
,
633 struct trad_frame_cache
*this_cache
,
636 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
637 0x40 /* Offset to ucontext_t. */
638 + 0x1c /* Offset to .reg. */,
643 ppc64_linux_sighandler_cache_init (const struct tramp_frame
*self
,
644 struct frame_info
*this_frame
,
645 struct trad_frame_cache
*this_cache
,
648 ppc_linux_sigtramp_cache (this_frame
, this_cache
, func
,
649 0x80 /* Offset to struct sigcontext. */
650 + 0x38 /* Offset to .reg. */,
654 static struct tramp_frame ppc32_linux_sigaction_tramp_frame
= {
658 { 0x380000ac, -1 }, /* li r0, 172 */
659 { 0x44000002, -1 }, /* sc */
660 { TRAMP_SENTINEL_INSN
},
662 ppc32_linux_sigaction_cache_init
664 static struct tramp_frame ppc64_linux_sigaction_tramp_frame
= {
668 { 0x38210080, -1 }, /* addi r1,r1,128 */
669 { 0x380000ac, -1 }, /* li r0, 172 */
670 { 0x44000002, -1 }, /* sc */
671 { TRAMP_SENTINEL_INSN
},
673 ppc64_linux_sigaction_cache_init
675 static struct tramp_frame ppc32_linux_sighandler_tramp_frame
= {
679 { 0x38000077, -1 }, /* li r0,119 */
680 { 0x44000002, -1 }, /* sc */
681 { TRAMP_SENTINEL_INSN
},
683 ppc32_linux_sighandler_cache_init
685 static struct tramp_frame ppc64_linux_sighandler_tramp_frame
= {
689 { 0x38210080, -1 }, /* addi r1,r1,128 */
690 { 0x38000077, -1 }, /* li r0,119 */
691 { 0x44000002, -1 }, /* sc */
692 { TRAMP_SENTINEL_INSN
},
694 ppc64_linux_sighandler_cache_init
698 /* Address to use for displaced stepping. When debugging a stand-alone
699 SPU executable, entry_point_address () will point to an SPU local-store
700 address and is thus not usable as displaced stepping location. We use
701 the auxiliary vector to determine the PowerPC-side entry point address
704 static CORE_ADDR ppc_linux_entry_point_addr
= 0;
707 ppc_linux_inferior_created (struct target_ops
*target
, int from_tty
)
709 ppc_linux_entry_point_addr
= 0;
713 ppc_linux_displaced_step_location (struct gdbarch
*gdbarch
)
715 if (ppc_linux_entry_point_addr
== 0)
719 /* Determine entry point from target auxiliary vector. */
720 if (target_auxv_search (¤t_target
, AT_ENTRY
, &addr
) <= 0)
721 error (_("Cannot find AT_ENTRY auxiliary vector entry."));
723 /* Make certain that the address points at real code, and not a
724 function descriptor. */
725 addr
= gdbarch_convert_from_func_ptr_addr (gdbarch
, addr
,
728 /* Inferior calls also use the entry point as a breakpoint location.
729 We don't want displaced stepping to interfere with those
730 breakpoints, so leave space. */
731 ppc_linux_entry_point_addr
= addr
+ 2 * PPC_INSN_SIZE
;
734 return ppc_linux_entry_point_addr
;
738 /* Return 1 if PPC_ORIG_R3_REGNUM and PPC_TRAP_REGNUM are usable. */
740 ppc_linux_trap_reg_p (struct gdbarch
*gdbarch
)
742 /* If we do not have a target description with registers, then
743 the special registers will not be included in the register set. */
744 if (!tdesc_has_registers (gdbarch_target_desc (gdbarch
)))
747 /* If we do, then it is safe to check the size. */
748 return register_size (gdbarch
, PPC_ORIG_R3_REGNUM
) > 0
749 && register_size (gdbarch
, PPC_TRAP_REGNUM
) > 0;
752 /* Return the current system call's number present in the
753 r0 register. When the function fails, it returns -1. */
755 ppc_linux_get_syscall_number (struct gdbarch
*gdbarch
,
758 struct regcache
*regcache
= get_thread_regcache (ptid
);
759 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
760 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
761 struct cleanup
*cleanbuf
;
762 /* The content of a register */
767 /* Make sure we're in a 32- or 64-bit machine */
768 gdb_assert (tdep
->wordsize
== 4 || tdep
->wordsize
== 8);
770 buf
= (gdb_byte
*) xmalloc (tdep
->wordsize
* sizeof (gdb_byte
));
772 cleanbuf
= make_cleanup (xfree
, buf
);
774 /* Getting the system call number from the register.
775 When dealing with PowerPC architecture, this information
776 is stored at 0th register. */
777 regcache_cooked_read (regcache
, tdep
->ppc_gp0_regnum
, buf
);
779 ret
= extract_signed_integer (buf
, tdep
->wordsize
, byte_order
);
780 do_cleanups (cleanbuf
);
786 ppc_linux_write_pc (struct regcache
*regcache
, CORE_ADDR pc
)
788 struct gdbarch
*gdbarch
= get_regcache_arch (regcache
);
790 regcache_cooked_write_unsigned (regcache
, gdbarch_pc_regnum (gdbarch
), pc
);
792 /* Set special TRAP register to -1 to prevent the kernel from
793 messing with the PC we just installed, if we happen to be
794 within an interrupted system call that the kernel wants to
797 Note that after we return from the dummy call, the TRAP and
798 ORIG_R3 registers will be automatically restored, and the
799 kernel continues to restart the system call at this point. */
800 if (ppc_linux_trap_reg_p (gdbarch
))
801 regcache_cooked_write_unsigned (regcache
, PPC_TRAP_REGNUM
, -1);
805 ppc_linux_spu_section (bfd
*abfd
, asection
*asect
, void *user_data
)
807 return strncmp (bfd_section_name (abfd
, asect
), "SPU/", 4) == 0;
810 static const struct target_desc
*
811 ppc_linux_core_read_description (struct gdbarch
*gdbarch
,
812 struct target_ops
*target
,
815 asection
*cell
= bfd_sections_find_if (abfd
, ppc_linux_spu_section
, NULL
);
816 asection
*altivec
= bfd_get_section_by_name (abfd
, ".reg-ppc-vmx");
817 asection
*vsx
= bfd_get_section_by_name (abfd
, ".reg-ppc-vsx");
818 asection
*section
= bfd_get_section_by_name (abfd
, ".reg");
822 switch (bfd_section_size (abfd
, section
))
826 return tdesc_powerpc_cell32l
;
828 return tdesc_powerpc_vsx32l
;
830 return tdesc_powerpc_altivec32l
;
832 return tdesc_powerpc_32l
;
836 return tdesc_powerpc_cell64l
;
838 return tdesc_powerpc_vsx64l
;
840 return tdesc_powerpc_altivec64l
;
842 return tdesc_powerpc_64l
;
850 /* Implementation of `gdbarch_elf_make_msymbol_special', as defined in
851 gdbarch.h. This implementation is used for the ELFv2 ABI only. */
854 ppc_elfv2_elf_make_msymbol_special (asymbol
*sym
, struct minimal_symbol
*msym
)
856 elf_symbol_type
*elf_sym
= (elf_symbol_type
*)sym
;
858 /* If the symbol is marked as having a local entry point, set a target
859 flag in the msymbol. We currently only support local entry point
860 offsets of 8 bytes, which is the only entry point offset ever used
861 by current compilers. If/when other offsets are ever used, we will
862 have to use additional target flag bits to store them. */
863 switch (PPC64_LOCAL_ENTRY_OFFSET (elf_sym
->internal_elf_sym
.st_other
))
868 MSYMBOL_TARGET_FLAG_1 (msym
) = 1;
873 /* Implementation of `gdbarch_skip_entrypoint', as defined in
874 gdbarch.h. This implementation is used for the ELFv2 ABI only. */
877 ppc_elfv2_skip_entrypoint (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
879 struct bound_minimal_symbol fun
;
880 int local_entry_offset
= 0;
882 fun
= lookup_minimal_symbol_by_pc (pc
);
883 if (fun
.minsym
== NULL
)
886 /* See ppc_elfv2_elf_make_msymbol_special for how local entry point
887 offset values are encoded. */
888 if (MSYMBOL_TARGET_FLAG_1 (fun
.minsym
))
889 local_entry_offset
= 8;
891 if (BMSYMBOL_VALUE_ADDRESS (fun
) <= pc
892 && pc
< BMSYMBOL_VALUE_ADDRESS (fun
) + local_entry_offset
)
893 return BMSYMBOL_VALUE_ADDRESS (fun
) + local_entry_offset
;
898 /* Implementation of `gdbarch_stap_is_single_operand', as defined in
902 ppc_stap_is_single_operand (struct gdbarch
*gdbarch
, const char *s
)
904 return (*s
== 'i' /* Literal number. */
905 || (isdigit (*s
) && s
[1] == '('
906 && isdigit (s
[2])) /* Displacement. */
907 || (*s
== '(' && isdigit (s
[1])) /* Register indirection. */
908 || isdigit (*s
)); /* Register value. */
911 /* Implementation of `gdbarch_stap_parse_special_token', as defined in
915 ppc_stap_parse_special_token (struct gdbarch
*gdbarch
,
916 struct stap_parse_info
*p
)
918 if (isdigit (*p
->arg
))
920 /* This temporary pointer is needed because we have to do a lookahead.
921 We could be dealing with a register displacement, and in such case
922 we would not need to do anything. */
923 const char *s
= p
->arg
;
933 /* It is a register displacement indeed. Returning 0 means we are
934 deferring the treatment of this case to the generic parser. */
939 regname
= alloca (len
+ 2);
942 strncpy (regname
+ 1, p
->arg
, len
);
946 if (user_reg_map_name_to_regnum (gdbarch
, regname
, len
) == -1)
947 error (_("Invalid register name `%s' on expression `%s'."),
948 regname
, p
->saved_arg
);
950 write_exp_elt_opcode (&p
->pstate
, OP_REGISTER
);
953 write_exp_string (&p
->pstate
, str
);
954 write_exp_elt_opcode (&p
->pstate
, OP_REGISTER
);
960 /* All the other tokens should be handled correctly by the generic
968 /* Cell/B.E. active SPE context tracking support. */
970 static struct objfile
*spe_context_objfile
= NULL
;
971 static CORE_ADDR spe_context_lm_addr
= 0;
972 static CORE_ADDR spe_context_offset
= 0;
974 static ptid_t spe_context_cache_ptid
;
975 static CORE_ADDR spe_context_cache_address
;
977 /* Hook into inferior_created, solib_loaded, and solib_unloaded observers
978 to track whether we've loaded a version of libspe2 (as static or dynamic
979 library) that provides the __spe_current_active_context variable. */
981 ppc_linux_spe_context_lookup (struct objfile
*objfile
)
983 struct bound_minimal_symbol sym
;
987 spe_context_objfile
= NULL
;
988 spe_context_lm_addr
= 0;
989 spe_context_offset
= 0;
990 spe_context_cache_ptid
= minus_one_ptid
;
991 spe_context_cache_address
= 0;
995 sym
= lookup_minimal_symbol ("__spe_current_active_context", NULL
, objfile
);
998 spe_context_objfile
= objfile
;
999 spe_context_lm_addr
= svr4_fetch_objfile_link_map (objfile
);
1000 spe_context_offset
= BMSYMBOL_VALUE_ADDRESS (sym
);
1001 spe_context_cache_ptid
= minus_one_ptid
;
1002 spe_context_cache_address
= 0;
1008 ppc_linux_spe_context_inferior_created (struct target_ops
*t
, int from_tty
)
1010 struct objfile
*objfile
;
1012 ppc_linux_spe_context_lookup (NULL
);
1013 ALL_OBJFILES (objfile
)
1014 ppc_linux_spe_context_lookup (objfile
);
1018 ppc_linux_spe_context_solib_loaded (struct so_list
*so
)
1020 if (strstr (so
->so_original_name
, "/libspe") != NULL
)
1022 solib_read_symbols (so
, 0);
1023 ppc_linux_spe_context_lookup (so
->objfile
);
1028 ppc_linux_spe_context_solib_unloaded (struct so_list
*so
)
1030 if (so
->objfile
== spe_context_objfile
)
1031 ppc_linux_spe_context_lookup (NULL
);
1034 /* Retrieve contents of the N'th element in the current thread's
1035 linked SPE context list into ID and NPC. Return the address of
1036 said context element, or 0 if not found. */
1038 ppc_linux_spe_context (int wordsize
, enum bfd_endian byte_order
,
1039 int n
, int *id
, unsigned int *npc
)
1041 CORE_ADDR spe_context
= 0;
1045 /* Quick exit if we have not found __spe_current_active_context. */
1046 if (!spe_context_objfile
)
1049 /* Look up cached address of thread-local variable. */
1050 if (!ptid_equal (spe_context_cache_ptid
, inferior_ptid
))
1052 struct target_ops
*target
= ¤t_target
;
1053 volatile struct gdb_exception ex
;
1055 TRY_CATCH (ex
, RETURN_MASK_ERROR
)
1057 /* We do not call target_translate_tls_address here, because
1058 svr4_fetch_objfile_link_map may invalidate the frame chain,
1059 which must not do while inside a frame sniffer.
1061 Instead, we have cached the lm_addr value, and use that to
1062 directly call the target's to_get_thread_local_address. */
1063 spe_context_cache_address
1064 = target
->to_get_thread_local_address (target
, inferior_ptid
,
1065 spe_context_lm_addr
,
1066 spe_context_offset
);
1067 spe_context_cache_ptid
= inferior_ptid
;
1074 /* Read variable value. */
1075 if (target_read_memory (spe_context_cache_address
, buf
, wordsize
) == 0)
1076 spe_context
= extract_unsigned_integer (buf
, wordsize
, byte_order
);
1078 /* Cyle through to N'th linked list element. */
1079 for (i
= 0; i
< n
&& spe_context
; i
++)
1080 if (target_read_memory (spe_context
+ align_up (12, wordsize
),
1081 buf
, wordsize
) == 0)
1082 spe_context
= extract_unsigned_integer (buf
, wordsize
, byte_order
);
1086 /* Read current context. */
1088 && target_read_memory (spe_context
, buf
, 12) != 0)
1091 /* Extract data elements. */
1095 *id
= extract_signed_integer (buf
, 4, byte_order
);
1097 *npc
= extract_unsigned_integer (buf
+ 4, 4, byte_order
);
1104 /* Cell/B.E. cross-architecture unwinder support. */
1106 struct ppu2spu_cache
1108 struct frame_id frame_id
;
1109 struct regcache
*regcache
;
1112 static struct gdbarch
*
1113 ppu2spu_prev_arch (struct frame_info
*this_frame
, void **this_cache
)
1115 struct ppu2spu_cache
*cache
= *this_cache
;
1116 return get_regcache_arch (cache
->regcache
);
1120 ppu2spu_this_id (struct frame_info
*this_frame
,
1121 void **this_cache
, struct frame_id
*this_id
)
1123 struct ppu2spu_cache
*cache
= *this_cache
;
1124 *this_id
= cache
->frame_id
;
1127 static struct value
*
1128 ppu2spu_prev_register (struct frame_info
*this_frame
,
1129 void **this_cache
, int regnum
)
1131 struct ppu2spu_cache
*cache
= *this_cache
;
1132 struct gdbarch
*gdbarch
= get_regcache_arch (cache
->regcache
);
1135 buf
= alloca (register_size (gdbarch
, regnum
));
1137 if (regnum
< gdbarch_num_regs (gdbarch
))
1138 regcache_raw_read (cache
->regcache
, regnum
, buf
);
1140 gdbarch_pseudo_register_read (gdbarch
, cache
->regcache
, regnum
, buf
);
1142 return frame_unwind_got_bytes (this_frame
, regnum
, buf
);
1147 struct gdbarch
*gdbarch
;
1150 gdb_byte gprs
[128*16];
1154 ppu2spu_unwind_register (void *src
, int regnum
, gdb_byte
*buf
)
1156 struct ppu2spu_data
*data
= src
;
1157 enum bfd_endian byte_order
= gdbarch_byte_order (data
->gdbarch
);
1159 if (regnum
>= 0 && regnum
< SPU_NUM_GPRS
)
1160 memcpy (buf
, data
->gprs
+ 16*regnum
, 16);
1161 else if (regnum
== SPU_ID_REGNUM
)
1162 store_unsigned_integer (buf
, 4, byte_order
, data
->id
);
1163 else if (regnum
== SPU_PC_REGNUM
)
1164 store_unsigned_integer (buf
, 4, byte_order
, data
->npc
);
1166 return REG_UNAVAILABLE
;
1172 ppu2spu_sniffer (const struct frame_unwind
*self
,
1173 struct frame_info
*this_frame
, void **this_prologue_cache
)
1175 struct gdbarch
*gdbarch
= get_frame_arch (this_frame
);
1176 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1177 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
1178 struct ppu2spu_data data
;
1179 struct frame_info
*fi
;
1180 CORE_ADDR base
, func
, backchain
, spe_context
;
1184 /* Count the number of SPU contexts already in the frame chain. */
1185 for (fi
= get_next_frame (this_frame
); fi
; fi
= get_next_frame (fi
))
1186 if (get_frame_type (fi
) == ARCH_FRAME
1187 && gdbarch_bfd_arch_info (get_frame_arch (fi
))->arch
== bfd_arch_spu
)
1190 base
= get_frame_sp (this_frame
);
1191 func
= get_frame_pc (this_frame
);
1192 if (target_read_memory (base
, buf
, tdep
->wordsize
))
1194 backchain
= extract_unsigned_integer (buf
, tdep
->wordsize
, byte_order
);
1196 spe_context
= ppc_linux_spe_context (tdep
->wordsize
, byte_order
,
1197 n
, &data
.id
, &data
.npc
);
1198 if (spe_context
&& base
<= spe_context
&& spe_context
< backchain
)
1202 /* Find gdbarch for SPU. */
1203 struct gdbarch_info info
;
1204 gdbarch_info_init (&info
);
1205 info
.bfd_arch_info
= bfd_lookup_arch (bfd_arch_spu
, bfd_mach_spu
);
1206 info
.byte_order
= BFD_ENDIAN_BIG
;
1207 info
.osabi
= GDB_OSABI_LINUX
;
1208 info
.tdep_info
= (void *) &data
.id
;
1209 data
.gdbarch
= gdbarch_find_by_info (info
);
1213 xsnprintf (annex
, sizeof annex
, "%d/regs", data
.id
);
1214 if (target_read (¤t_target
, TARGET_OBJECT_SPU
, annex
,
1215 data
.gprs
, 0, sizeof data
.gprs
)
1216 == sizeof data
.gprs
)
1218 struct ppu2spu_cache
*cache
1219 = FRAME_OBSTACK_CALLOC (1, struct ppu2spu_cache
);
1221 struct address_space
*aspace
= get_frame_address_space (this_frame
);
1222 struct regcache
*regcache
= regcache_xmalloc (data
.gdbarch
, aspace
);
1223 struct cleanup
*cleanups
= make_cleanup_regcache_xfree (regcache
);
1224 regcache_save (regcache
, ppu2spu_unwind_register
, &data
);
1225 discard_cleanups (cleanups
);
1227 cache
->frame_id
= frame_id_build (base
, func
);
1228 cache
->regcache
= regcache
;
1229 *this_prologue_cache
= cache
;
1238 ppu2spu_dealloc_cache (struct frame_info
*self
, void *this_cache
)
1240 struct ppu2spu_cache
*cache
= this_cache
;
1241 regcache_xfree (cache
->regcache
);
1244 static const struct frame_unwind ppu2spu_unwind
= {
1246 default_frame_unwind_stop_reason
,
1248 ppu2spu_prev_register
,
1251 ppu2spu_dealloc_cache
,
1257 ppc_linux_init_abi (struct gdbarch_info info
,
1258 struct gdbarch
*gdbarch
)
1260 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1261 struct tdesc_arch_data
*tdesc_data
= (void *) info
.tdep_info
;
1262 static const char *const stap_integer_prefixes
[] = { "i", NULL
};
1263 static const char *const stap_register_indirection_prefixes
[] = { "(",
1265 static const char *const stap_register_indirection_suffixes
[] = { ")",
1268 linux_init_abi (info
, gdbarch
);
1270 /* PPC GNU/Linux uses either 64-bit or 128-bit long doubles; where
1271 128-bit, they are IBM long double, not IEEE quad long double as
1272 in the System V ABI PowerPC Processor Supplement. We can safely
1273 let them default to 128-bit, since the debug info will give the
1274 size of type actually used in each case. */
1275 set_gdbarch_long_double_bit (gdbarch
, 16 * TARGET_CHAR_BIT
);
1276 set_gdbarch_long_double_format (gdbarch
, floatformats_ibm_long_double
);
1278 /* Handle inferior calls during interrupted system calls. */
1279 set_gdbarch_write_pc (gdbarch
, ppc_linux_write_pc
);
1281 /* Get the syscall number from the arch's register. */
1282 set_gdbarch_get_syscall_number (gdbarch
, ppc_linux_get_syscall_number
);
1284 /* SystemTap functions. */
1285 set_gdbarch_stap_integer_prefixes (gdbarch
, stap_integer_prefixes
);
1286 set_gdbarch_stap_register_indirection_prefixes (gdbarch
,
1287 stap_register_indirection_prefixes
);
1288 set_gdbarch_stap_register_indirection_suffixes (gdbarch
,
1289 stap_register_indirection_suffixes
);
1290 set_gdbarch_stap_gdb_register_prefix (gdbarch
, "r");
1291 set_gdbarch_stap_is_single_operand (gdbarch
, ppc_stap_is_single_operand
);
1292 set_gdbarch_stap_parse_special_token (gdbarch
,
1293 ppc_stap_parse_special_token
);
1295 if (tdep
->wordsize
== 4)
1297 /* Until November 2001, gcc did not comply with the 32 bit SysV
1298 R4 ABI requirement that structures less than or equal to 8
1299 bytes should be returned in registers. Instead GCC was using
1300 the AIX/PowerOpen ABI - everything returned in memory
1301 (well ignoring vectors that is). When this was corrected, it
1302 wasn't fixed for GNU/Linux native platform. Use the
1303 PowerOpen struct convention. */
1304 set_gdbarch_return_value (gdbarch
, ppc_linux_return_value
);
1306 set_gdbarch_memory_remove_breakpoint (gdbarch
,
1307 ppc_linux_memory_remove_breakpoint
);
1309 /* Shared library handling. */
1310 set_gdbarch_skip_trampoline_code (gdbarch
, ppc_skip_trampoline_code
);
1311 set_solib_svr4_fetch_link_map_offsets
1312 (gdbarch
, svr4_ilp32_fetch_link_map_offsets
);
1314 /* Setting the correct XML syscall filename. */
1315 set_xml_syscall_file_name (XML_SYSCALL_FILENAME_PPC
);
1318 tramp_frame_prepend_unwinder (gdbarch
,
1319 &ppc32_linux_sigaction_tramp_frame
);
1320 tramp_frame_prepend_unwinder (gdbarch
,
1321 &ppc32_linux_sighandler_tramp_frame
);
1323 /* BFD target for core files. */
1324 if (gdbarch_byte_order (gdbarch
) == BFD_ENDIAN_LITTLE
)
1325 set_gdbarch_gcore_bfd_target (gdbarch
, "elf32-powerpcle");
1327 set_gdbarch_gcore_bfd_target (gdbarch
, "elf32-powerpc");
1329 if (powerpc_so_ops
.in_dynsym_resolve_code
== NULL
)
1331 powerpc_so_ops
= svr4_so_ops
;
1332 /* Override dynamic resolve function. */
1333 powerpc_so_ops
.in_dynsym_resolve_code
=
1334 powerpc_linux_in_dynsym_resolve_code
;
1336 set_solib_ops (gdbarch
, &powerpc_so_ops
);
1338 set_gdbarch_skip_solib_resolver (gdbarch
, glibc_skip_solib_resolver
);
1341 if (tdep
->wordsize
== 8)
1343 if (tdep
->elf_abi
== POWERPC_ELF_V1
)
1345 /* Handle PPC GNU/Linux 64-bit function pointers (which are really
1346 function descriptors). */
1347 set_gdbarch_convert_from_func_ptr_addr
1348 (gdbarch
, ppc64_convert_from_func_ptr_addr
);
1350 set_gdbarch_elf_make_msymbol_special
1351 (gdbarch
, ppc64_elf_make_msymbol_special
);
1355 set_gdbarch_elf_make_msymbol_special
1356 (gdbarch
, ppc_elfv2_elf_make_msymbol_special
);
1358 set_gdbarch_skip_entrypoint (gdbarch
, ppc_elfv2_skip_entrypoint
);
1361 /* Shared library handling. */
1362 set_gdbarch_skip_trampoline_code (gdbarch
, ppc64_skip_trampoline_code
);
1363 set_solib_svr4_fetch_link_map_offsets
1364 (gdbarch
, svr4_lp64_fetch_link_map_offsets
);
1366 /* Setting the correct XML syscall filename. */
1367 set_xml_syscall_file_name (XML_SYSCALL_FILENAME_PPC64
);
1370 tramp_frame_prepend_unwinder (gdbarch
,
1371 &ppc64_linux_sigaction_tramp_frame
);
1372 tramp_frame_prepend_unwinder (gdbarch
,
1373 &ppc64_linux_sighandler_tramp_frame
);
1375 /* BFD target for core files. */
1376 if (gdbarch_byte_order (gdbarch
) == BFD_ENDIAN_LITTLE
)
1377 set_gdbarch_gcore_bfd_target (gdbarch
, "elf64-powerpcle");
1379 set_gdbarch_gcore_bfd_target (gdbarch
, "elf64-powerpc");
1382 /* PPC32 uses a different prpsinfo32 compared to most other Linux
1384 if (tdep
->wordsize
== 4)
1385 set_gdbarch_elfcore_write_linux_prpsinfo (gdbarch
,
1386 elfcore_write_ppc_linux_prpsinfo32
);
1388 set_gdbarch_regset_from_core_section (gdbarch
,
1389 ppc_linux_regset_from_core_section
);
1390 set_gdbarch_core_read_description (gdbarch
, ppc_linux_core_read_description
);
1391 set_gdbarch_iterate_over_regset_sections (gdbarch
,
1392 ppc_linux_iterate_over_regset_sections
);
1394 /* Enable TLS support. */
1395 set_gdbarch_fetch_tls_load_module_address (gdbarch
,
1396 svr4_fetch_objfile_link_map
);
1400 const struct tdesc_feature
*feature
;
1402 /* If we have target-described registers, then we can safely
1403 reserve a number for PPC_ORIG_R3_REGNUM and PPC_TRAP_REGNUM
1404 (whether they are described or not). */
1405 gdb_assert (gdbarch_num_regs (gdbarch
) <= PPC_ORIG_R3_REGNUM
);
1406 set_gdbarch_num_regs (gdbarch
, PPC_TRAP_REGNUM
+ 1);
1408 /* If they are present, then assign them to the reserved number. */
1409 feature
= tdesc_find_feature (info
.target_desc
,
1410 "org.gnu.gdb.power.linux");
1411 if (feature
!= NULL
)
1413 tdesc_numbered_register (feature
, tdesc_data
,
1414 PPC_ORIG_R3_REGNUM
, "orig_r3");
1415 tdesc_numbered_register (feature
, tdesc_data
,
1416 PPC_TRAP_REGNUM
, "trap");
1420 /* Enable Cell/B.E. if supported by the target. */
1421 if (tdesc_compatible_p (info
.target_desc
,
1422 bfd_lookup_arch (bfd_arch_spu
, bfd_mach_spu
)))
1424 /* Cell/B.E. multi-architecture support. */
1425 set_spu_solib_ops (gdbarch
);
1427 /* Cell/B.E. cross-architecture unwinder support. */
1428 frame_unwind_prepend_unwinder (gdbarch
, &ppu2spu_unwind
);
1430 /* The default displaced_step_at_entry_point doesn't work for
1431 SPU stand-alone executables. */
1432 set_gdbarch_displaced_step_location (gdbarch
,
1433 ppc_linux_displaced_step_location
);
1436 set_gdbarch_get_siginfo_type (gdbarch
, linux_get_siginfo_type
);
1439 /* Provide a prototype to silence -Wmissing-prototypes. */
1440 extern initialize_file_ftype _initialize_ppc_linux_tdep
;
1443 _initialize_ppc_linux_tdep (void)
1445 /* Register for all sub-familes of the POWER/PowerPC: 32-bit and
1446 64-bit PowerPC, and the older rs6k. */
1447 gdbarch_register_osabi (bfd_arch_powerpc
, bfd_mach_ppc
, GDB_OSABI_LINUX
,
1448 ppc_linux_init_abi
);
1449 gdbarch_register_osabi (bfd_arch_powerpc
, bfd_mach_ppc64
, GDB_OSABI_LINUX
,
1450 ppc_linux_init_abi
);
1451 gdbarch_register_osabi (bfd_arch_rs6000
, bfd_mach_rs6k
, GDB_OSABI_LINUX
,
1452 ppc_linux_init_abi
);
1454 /* Attach to inferior_created observer. */
1455 observer_attach_inferior_created (ppc_linux_inferior_created
);
1457 /* Attach to observers to track __spe_current_active_context. */
1458 observer_attach_inferior_created (ppc_linux_spe_context_inferior_created
);
1459 observer_attach_solib_loaded (ppc_linux_spe_context_solib_loaded
);
1460 observer_attach_solib_unloaded (ppc_linux_spe_context_solib_unloaded
);
1462 /* Initialize the Linux target descriptions. */
1463 initialize_tdesc_powerpc_32l ();
1464 initialize_tdesc_powerpc_altivec32l ();
1465 initialize_tdesc_powerpc_cell32l ();
1466 initialize_tdesc_powerpc_vsx32l ();
1467 initialize_tdesc_powerpc_isa205_32l ();
1468 initialize_tdesc_powerpc_isa205_altivec32l ();
1469 initialize_tdesc_powerpc_isa205_vsx32l ();
1470 initialize_tdesc_powerpc_64l ();
1471 initialize_tdesc_powerpc_altivec64l ();
1472 initialize_tdesc_powerpc_cell64l ();
1473 initialize_tdesc_powerpc_vsx64l ();
1474 initialize_tdesc_powerpc_isa205_64l ();
1475 initialize_tdesc_powerpc_isa205_altivec64l ();
1476 initialize_tdesc_powerpc_isa205_vsx64l ();
1477 initialize_tdesc_powerpc_e500l ();