1 /* PowerPC-specific support for 32-bit ELF
2 Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
3 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
4 Free Software Foundation, Inc.
5 Written by Ian Lance Taylor, Cygnus Support.
7 This file is part of BFD, the Binary File Descriptor library.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the
21 Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
22 Boston, MA 02110-1301, USA. */
25 /* This file is based on a preliminary PowerPC ELF ABI. The
26 information may not match the final PowerPC ELF ABI. It includes
27 suggestions from the in-progress Embedded PowerPC ABI, and that
28 information may also not match. */
37 #include "elf32-ppc.h"
38 #include "elf-vxworks.h"
41 typedef enum split16_format_type
48 /* RELA relocations are used here. */
50 static bfd_reloc_status_type ppc_elf_addr16_ha_reloc
51 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
52 static bfd_reloc_status_type ppc_elf_unhandled_reloc
53 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
54 static void ppc_elf_vle_split16
55 (bfd *, bfd_byte *, bfd_vma, bfd_vma, split16_format_type);
57 /* Branch prediction bit for branch taken relocs. */
58 #define BRANCH_PREDICT_BIT 0x200000
59 /* Mask to set RA in memory instructions. */
60 #define RA_REGISTER_MASK 0x001f0000
61 /* Value to shift register by to insert RA. */
62 #define RA_REGISTER_SHIFT 16
64 /* The name of the dynamic interpreter. This is put in the .interp
66 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
68 /* For old-style PLT. */
69 /* The number of single-slot PLT entries (the rest use two slots). */
70 #define PLT_NUM_SINGLE_ENTRIES 8192
72 /* For new-style .glink and .plt. */
73 #define GLINK_PLTRESOLVE 16*4
74 #define GLINK_ENTRY_SIZE 4*4
75 #define TLS_GET_ADDR_GLINK_SIZE 12*4
77 /* VxWorks uses its own plt layout, filled in by the static linker. */
79 /* The standard VxWorks PLT entry. */
80 #define VXWORKS_PLT_ENTRY_SIZE 32
81 static const bfd_vma ppc_elf_vxworks_plt_entry
82 [VXWORKS_PLT_ENTRY_SIZE / 4] =
84 0x3d800000, /* lis r12,0 */
85 0x818c0000, /* lwz r12,0(r12) */
86 0x7d8903a6, /* mtctr r12 */
87 0x4e800420, /* bctr */
88 0x39600000, /* li r11,0 */
89 0x48000000, /* b 14 <.PLT0resolve+0x4> */
93 static const bfd_vma ppc_elf_vxworks_pic_plt_entry
94 [VXWORKS_PLT_ENTRY_SIZE / 4] =
96 0x3d9e0000, /* addis r12,r30,0 */
97 0x818c0000, /* lwz r12,0(r12) */
98 0x7d8903a6, /* mtctr r12 */
99 0x4e800420, /* bctr */
100 0x39600000, /* li r11,0 */
101 0x48000000, /* b 14 <.PLT0resolve+0x4> 14: R_PPC_REL24 .PLTresolve */
102 0x60000000, /* nop */
103 0x60000000, /* nop */
106 /* The initial VxWorks PLT entry. */
107 #define VXWORKS_PLT_INITIAL_ENTRY_SIZE 32
108 static const bfd_vma ppc_elf_vxworks_plt0_entry
109 [VXWORKS_PLT_INITIAL_ENTRY_SIZE / 4] =
111 0x3d800000, /* lis r12,0 */
112 0x398c0000, /* addi r12,r12,0 */
113 0x800c0008, /* lwz r0,8(r12) */
114 0x7c0903a6, /* mtctr r0 */
115 0x818c0004, /* lwz r12,4(r12) */
116 0x4e800420, /* bctr */
117 0x60000000, /* nop */
118 0x60000000, /* nop */
120 static const bfd_vma ppc_elf_vxworks_pic_plt0_entry
121 [VXWORKS_PLT_INITIAL_ENTRY_SIZE / 4] =
123 0x819e0008, /* lwz r12,8(r30) */
124 0x7d8903a6, /* mtctr r12 */
125 0x819e0004, /* lwz r12,4(r30) */
126 0x4e800420, /* bctr */
127 0x60000000, /* nop */
128 0x60000000, /* nop */
129 0x60000000, /* nop */
130 0x60000000, /* nop */
133 /* For executables, we have some additional relocations in
134 .rela.plt.unloaded, for the kernel loader. */
136 /* The number of non-JMP_SLOT relocations per PLT0 slot. */
137 #define VXWORKS_PLT_NON_JMP_SLOT_RELOCS 3
138 /* The number of relocations in the PLTResolve slot. */
139 #define VXWORKS_PLTRESOLVE_RELOCS 2
140 /* The number of relocations in the PLTResolve slot when when creating
142 #define VXWORKS_PLTRESOLVE_RELOCS_SHLIB 0
144 /* Some instructions. */
145 #define ADDIS_11_11 0x3d6b0000
146 #define ADDIS_11_30 0x3d7e0000
147 #define ADDIS_12_12 0x3d8c0000
148 #define ADDI_11_11 0x396b0000
149 #define ADD_0_11_11 0x7c0b5a14
150 #define ADD_3_12_2 0x7c6c1214
151 #define ADD_11_0_11 0x7d605a14
153 #define BCL_20_31 0x429f0005
154 #define BCTR 0x4e800420
155 #define BEQLR 0x4d820020
156 #define CMPWI_11_0 0x2c0b0000
157 #define LIS_11 0x3d600000
158 #define LIS_12 0x3d800000
159 #define LWZU_0_12 0x840c0000
160 #define LWZ_0_12 0x800c0000
161 #define LWZ_11_3 0x81630000
162 #define LWZ_11_11 0x816b0000
163 #define LWZ_11_30 0x817e0000
164 #define LWZ_12_3 0x81830000
165 #define LWZ_12_12 0x818c0000
166 #define MR_0_3 0x7c601b78
167 #define MR_3_0 0x7c030378
168 #define MFLR_0 0x7c0802a6
169 #define MFLR_12 0x7d8802a6
170 #define MTCTR_0 0x7c0903a6
171 #define MTCTR_11 0x7d6903a6
172 #define MTLR_0 0x7c0803a6
173 #define NOP 0x60000000
174 #define SUB_11_11_12 0x7d6c5850
176 /* Offset of tp and dtp pointers from start of TLS block. */
177 #define TP_OFFSET 0x7000
178 #define DTP_OFFSET 0x8000
180 /* The value of a defined global symbol. */
181 #define SYM_VAL(SYM) \
182 ((SYM)->root.u.def.section->output_section->vma \
183 + (SYM)->root.u.def.section->output_offset \
184 + (SYM)->root.u.def.value)
186 static reloc_howto_type *ppc_elf_howto_table[R_PPC_max];
188 static reloc_howto_type ppc_elf_howto_raw[] = {
189 /* This reloc does nothing. */
190 HOWTO (R_PPC_NONE, /* type */
192 2, /* size (0 = byte, 1 = short, 2 = long) */
194 FALSE, /* pc_relative */
196 complain_overflow_bitfield, /* complain_on_overflow */
197 bfd_elf_generic_reloc, /* special_function */
198 "R_PPC_NONE", /* name */
199 FALSE, /* partial_inplace */
202 FALSE), /* pcrel_offset */
204 /* A standard 32 bit relocation. */
205 HOWTO (R_PPC_ADDR32, /* type */
207 2, /* size (0 = byte, 1 = short, 2 = long) */
209 FALSE, /* pc_relative */
211 complain_overflow_bitfield, /* complain_on_overflow */
212 bfd_elf_generic_reloc, /* special_function */
213 "R_PPC_ADDR32", /* name */
214 FALSE, /* partial_inplace */
216 0xffffffff, /* dst_mask */
217 FALSE), /* pcrel_offset */
219 /* An absolute 26 bit branch; the lower two bits must be zero.
220 FIXME: we don't check that, we just clear them. */
221 HOWTO (R_PPC_ADDR24, /* type */
223 2, /* size (0 = byte, 1 = short, 2 = long) */
225 FALSE, /* pc_relative */
227 complain_overflow_bitfield, /* complain_on_overflow */
228 bfd_elf_generic_reloc, /* special_function */
229 "R_PPC_ADDR24", /* name */
230 FALSE, /* partial_inplace */
232 0x3fffffc, /* dst_mask */
233 FALSE), /* pcrel_offset */
235 /* A standard 16 bit relocation. */
236 HOWTO (R_PPC_ADDR16, /* type */
238 1, /* size (0 = byte, 1 = short, 2 = long) */
240 FALSE, /* pc_relative */
242 complain_overflow_bitfield, /* complain_on_overflow */
243 bfd_elf_generic_reloc, /* special_function */
244 "R_PPC_ADDR16", /* name */
245 FALSE, /* partial_inplace */
247 0xffff, /* dst_mask */
248 FALSE), /* pcrel_offset */
250 /* A 16 bit relocation without overflow. */
251 HOWTO (R_PPC_ADDR16_LO, /* type */
253 1, /* size (0 = byte, 1 = short, 2 = long) */
255 FALSE, /* pc_relative */
257 complain_overflow_dont,/* complain_on_overflow */
258 bfd_elf_generic_reloc, /* special_function */
259 "R_PPC_ADDR16_LO", /* name */
260 FALSE, /* partial_inplace */
262 0xffff, /* dst_mask */
263 FALSE), /* pcrel_offset */
265 /* The high order 16 bits of an address. */
266 HOWTO (R_PPC_ADDR16_HI, /* type */
268 1, /* size (0 = byte, 1 = short, 2 = long) */
270 FALSE, /* pc_relative */
272 complain_overflow_dont, /* complain_on_overflow */
273 bfd_elf_generic_reloc, /* special_function */
274 "R_PPC_ADDR16_HI", /* name */
275 FALSE, /* partial_inplace */
277 0xffff, /* dst_mask */
278 FALSE), /* pcrel_offset */
280 /* The high order 16 bits of an address, plus 1 if the contents of
281 the low 16 bits, treated as a signed number, is negative. */
282 HOWTO (R_PPC_ADDR16_HA, /* type */
284 1, /* size (0 = byte, 1 = short, 2 = long) */
286 FALSE, /* pc_relative */
288 complain_overflow_dont, /* complain_on_overflow */
289 ppc_elf_addr16_ha_reloc, /* special_function */
290 "R_PPC_ADDR16_HA", /* name */
291 FALSE, /* partial_inplace */
293 0xffff, /* dst_mask */
294 FALSE), /* pcrel_offset */
296 /* An absolute 16 bit branch; the lower two bits must be zero.
297 FIXME: we don't check that, we just clear them. */
298 HOWTO (R_PPC_ADDR14, /* type */
300 2, /* size (0 = byte, 1 = short, 2 = long) */
302 FALSE, /* pc_relative */
304 complain_overflow_bitfield, /* complain_on_overflow */
305 bfd_elf_generic_reloc, /* special_function */
306 "R_PPC_ADDR14", /* name */
307 FALSE, /* partial_inplace */
309 0xfffc, /* dst_mask */
310 FALSE), /* pcrel_offset */
312 /* An absolute 16 bit branch, for which bit 10 should be set to
313 indicate that the branch is expected to be taken. The lower two
314 bits must be zero. */
315 HOWTO (R_PPC_ADDR14_BRTAKEN, /* type */
317 2, /* size (0 = byte, 1 = short, 2 = long) */
319 FALSE, /* pc_relative */
321 complain_overflow_bitfield, /* complain_on_overflow */
322 bfd_elf_generic_reloc, /* special_function */
323 "R_PPC_ADDR14_BRTAKEN",/* name */
324 FALSE, /* partial_inplace */
326 0xfffc, /* dst_mask */
327 FALSE), /* pcrel_offset */
329 /* An absolute 16 bit branch, for which bit 10 should be set to
330 indicate that the branch is not expected to be taken. The lower
331 two bits must be zero. */
332 HOWTO (R_PPC_ADDR14_BRNTAKEN, /* type */
334 2, /* size (0 = byte, 1 = short, 2 = long) */
336 FALSE, /* pc_relative */
338 complain_overflow_bitfield, /* complain_on_overflow */
339 bfd_elf_generic_reloc, /* special_function */
340 "R_PPC_ADDR14_BRNTAKEN",/* name */
341 FALSE, /* partial_inplace */
343 0xfffc, /* dst_mask */
344 FALSE), /* pcrel_offset */
346 /* A relative 26 bit branch; the lower two bits must be zero. */
347 HOWTO (R_PPC_REL24, /* type */
349 2, /* size (0 = byte, 1 = short, 2 = long) */
351 TRUE, /* pc_relative */
353 complain_overflow_signed, /* complain_on_overflow */
354 bfd_elf_generic_reloc, /* special_function */
355 "R_PPC_REL24", /* name */
356 FALSE, /* partial_inplace */
358 0x3fffffc, /* dst_mask */
359 TRUE), /* pcrel_offset */
361 /* A relative 16 bit branch; the lower two bits must be zero. */
362 HOWTO (R_PPC_REL14, /* type */
364 2, /* size (0 = byte, 1 = short, 2 = long) */
366 TRUE, /* pc_relative */
368 complain_overflow_signed, /* complain_on_overflow */
369 bfd_elf_generic_reloc, /* special_function */
370 "R_PPC_REL14", /* name */
371 FALSE, /* partial_inplace */
373 0xfffc, /* dst_mask */
374 TRUE), /* pcrel_offset */
376 /* A relative 16 bit branch. Bit 10 should be set to indicate that
377 the branch is expected to be taken. The lower two bits must be
379 HOWTO (R_PPC_REL14_BRTAKEN, /* type */
381 2, /* size (0 = byte, 1 = short, 2 = long) */
383 TRUE, /* pc_relative */
385 complain_overflow_signed, /* complain_on_overflow */
386 bfd_elf_generic_reloc, /* special_function */
387 "R_PPC_REL14_BRTAKEN", /* name */
388 FALSE, /* partial_inplace */
390 0xfffc, /* dst_mask */
391 TRUE), /* pcrel_offset */
393 /* A relative 16 bit branch. Bit 10 should be set to indicate that
394 the branch is not expected to be taken. The lower two bits must
396 HOWTO (R_PPC_REL14_BRNTAKEN, /* type */
398 2, /* size (0 = byte, 1 = short, 2 = long) */
400 TRUE, /* pc_relative */
402 complain_overflow_signed, /* complain_on_overflow */
403 bfd_elf_generic_reloc, /* special_function */
404 "R_PPC_REL14_BRNTAKEN",/* name */
405 FALSE, /* partial_inplace */
407 0xfffc, /* dst_mask */
408 TRUE), /* pcrel_offset */
410 /* Like R_PPC_ADDR16, but referring to the GOT table entry for the
412 HOWTO (R_PPC_GOT16, /* type */
414 1, /* size (0 = byte, 1 = short, 2 = long) */
416 FALSE, /* pc_relative */
418 complain_overflow_signed, /* complain_on_overflow */
419 bfd_elf_generic_reloc, /* special_function */
420 "R_PPC_GOT16", /* name */
421 FALSE, /* partial_inplace */
423 0xffff, /* dst_mask */
424 FALSE), /* pcrel_offset */
426 /* Like R_PPC_ADDR16_LO, but referring to the GOT table entry for
428 HOWTO (R_PPC_GOT16_LO, /* type */
430 1, /* size (0 = byte, 1 = short, 2 = long) */
432 FALSE, /* pc_relative */
434 complain_overflow_dont, /* complain_on_overflow */
435 bfd_elf_generic_reloc, /* special_function */
436 "R_PPC_GOT16_LO", /* name */
437 FALSE, /* partial_inplace */
439 0xffff, /* dst_mask */
440 FALSE), /* pcrel_offset */
442 /* Like R_PPC_ADDR16_HI, but referring to the GOT table entry for
444 HOWTO (R_PPC_GOT16_HI, /* type */
446 1, /* size (0 = byte, 1 = short, 2 = long) */
448 FALSE, /* pc_relative */
450 complain_overflow_bitfield, /* complain_on_overflow */
451 bfd_elf_generic_reloc, /* special_function */
452 "R_PPC_GOT16_HI", /* name */
453 FALSE, /* partial_inplace */
455 0xffff, /* dst_mask */
456 FALSE), /* pcrel_offset */
458 /* Like R_PPC_ADDR16_HA, but referring to the GOT table entry for
460 HOWTO (R_PPC_GOT16_HA, /* type */
462 1, /* size (0 = byte, 1 = short, 2 = long) */
464 FALSE, /* pc_relative */
466 complain_overflow_bitfield, /* complain_on_overflow */
467 ppc_elf_addr16_ha_reloc, /* special_function */
468 "R_PPC_GOT16_HA", /* name */
469 FALSE, /* partial_inplace */
471 0xffff, /* dst_mask */
472 FALSE), /* pcrel_offset */
474 /* Like R_PPC_REL24, but referring to the procedure linkage table
475 entry for the symbol. */
476 HOWTO (R_PPC_PLTREL24, /* type */
478 2, /* size (0 = byte, 1 = short, 2 = long) */
480 TRUE, /* pc_relative */
482 complain_overflow_signed, /* complain_on_overflow */
483 bfd_elf_generic_reloc, /* special_function */
484 "R_PPC_PLTREL24", /* name */
485 FALSE, /* partial_inplace */
487 0x3fffffc, /* dst_mask */
488 TRUE), /* pcrel_offset */
490 /* This is used only by the dynamic linker. The symbol should exist
491 both in the object being run and in some shared library. The
492 dynamic linker copies the data addressed by the symbol from the
493 shared library into the object, because the object being
494 run has to have the data at some particular address. */
495 HOWTO (R_PPC_COPY, /* type */
497 2, /* size (0 = byte, 1 = short, 2 = long) */
499 FALSE, /* pc_relative */
501 complain_overflow_bitfield, /* complain_on_overflow */
502 bfd_elf_generic_reloc, /* special_function */
503 "R_PPC_COPY", /* name */
504 FALSE, /* partial_inplace */
507 FALSE), /* pcrel_offset */
509 /* Like R_PPC_ADDR32, but used when setting global offset table
511 HOWTO (R_PPC_GLOB_DAT, /* type */
513 2, /* size (0 = byte, 1 = short, 2 = long) */
515 FALSE, /* pc_relative */
517 complain_overflow_bitfield, /* complain_on_overflow */
518 bfd_elf_generic_reloc, /* special_function */
519 "R_PPC_GLOB_DAT", /* name */
520 FALSE, /* partial_inplace */
522 0xffffffff, /* dst_mask */
523 FALSE), /* pcrel_offset */
525 /* Marks a procedure linkage table entry for a symbol. */
526 HOWTO (R_PPC_JMP_SLOT, /* type */
528 2, /* size (0 = byte, 1 = short, 2 = long) */
530 FALSE, /* pc_relative */
532 complain_overflow_bitfield, /* complain_on_overflow */
533 bfd_elf_generic_reloc, /* special_function */
534 "R_PPC_JMP_SLOT", /* name */
535 FALSE, /* partial_inplace */
538 FALSE), /* pcrel_offset */
540 /* Used only by the dynamic linker. When the object is run, this
541 longword is set to the load address of the object, plus the
543 HOWTO (R_PPC_RELATIVE, /* type */
545 2, /* size (0 = byte, 1 = short, 2 = long) */
547 FALSE, /* pc_relative */
549 complain_overflow_bitfield, /* complain_on_overflow */
550 bfd_elf_generic_reloc, /* special_function */
551 "R_PPC_RELATIVE", /* name */
552 FALSE, /* partial_inplace */
554 0xffffffff, /* dst_mask */
555 FALSE), /* pcrel_offset */
557 /* Like R_PPC_REL24, but uses the value of the symbol within the
558 object rather than the final value. Normally used for
559 _GLOBAL_OFFSET_TABLE_. */
560 HOWTO (R_PPC_LOCAL24PC, /* type */
562 2, /* size (0 = byte, 1 = short, 2 = long) */
564 TRUE, /* pc_relative */
566 complain_overflow_signed, /* complain_on_overflow */
567 bfd_elf_generic_reloc, /* special_function */
568 "R_PPC_LOCAL24PC", /* name */
569 FALSE, /* partial_inplace */
571 0x3fffffc, /* dst_mask */
572 TRUE), /* pcrel_offset */
574 /* Like R_PPC_ADDR32, but may be unaligned. */
575 HOWTO (R_PPC_UADDR32, /* type */
577 2, /* size (0 = byte, 1 = short, 2 = long) */
579 FALSE, /* pc_relative */
581 complain_overflow_bitfield, /* complain_on_overflow */
582 bfd_elf_generic_reloc, /* special_function */
583 "R_PPC_UADDR32", /* name */
584 FALSE, /* partial_inplace */
586 0xffffffff, /* dst_mask */
587 FALSE), /* pcrel_offset */
589 /* Like R_PPC_ADDR16, but may be unaligned. */
590 HOWTO (R_PPC_UADDR16, /* type */
592 1, /* size (0 = byte, 1 = short, 2 = long) */
594 FALSE, /* pc_relative */
596 complain_overflow_bitfield, /* complain_on_overflow */
597 bfd_elf_generic_reloc, /* special_function */
598 "R_PPC_UADDR16", /* name */
599 FALSE, /* partial_inplace */
601 0xffff, /* dst_mask */
602 FALSE), /* pcrel_offset */
604 /* 32-bit PC relative */
605 HOWTO (R_PPC_REL32, /* type */
607 2, /* size (0 = byte, 1 = short, 2 = long) */
609 TRUE, /* pc_relative */
611 complain_overflow_bitfield, /* complain_on_overflow */
612 bfd_elf_generic_reloc, /* special_function */
613 "R_PPC_REL32", /* name */
614 FALSE, /* partial_inplace */
616 0xffffffff, /* dst_mask */
617 TRUE), /* pcrel_offset */
619 /* 32-bit relocation to the symbol's procedure linkage table.
620 FIXME: not supported. */
621 HOWTO (R_PPC_PLT32, /* type */
623 2, /* size (0 = byte, 1 = short, 2 = long) */
625 FALSE, /* pc_relative */
627 complain_overflow_bitfield, /* complain_on_overflow */
628 bfd_elf_generic_reloc, /* special_function */
629 "R_PPC_PLT32", /* name */
630 FALSE, /* partial_inplace */
633 FALSE), /* pcrel_offset */
635 /* 32-bit PC relative relocation to the symbol's procedure linkage table.
636 FIXME: not supported. */
637 HOWTO (R_PPC_PLTREL32, /* type */
639 2, /* size (0 = byte, 1 = short, 2 = long) */
641 TRUE, /* pc_relative */
643 complain_overflow_bitfield, /* complain_on_overflow */
644 bfd_elf_generic_reloc, /* special_function */
645 "R_PPC_PLTREL32", /* name */
646 FALSE, /* partial_inplace */
649 TRUE), /* pcrel_offset */
651 /* Like R_PPC_ADDR16_LO, but referring to the PLT table entry for
653 HOWTO (R_PPC_PLT16_LO, /* type */
655 1, /* size (0 = byte, 1 = short, 2 = long) */
657 FALSE, /* pc_relative */
659 complain_overflow_dont, /* complain_on_overflow */
660 bfd_elf_generic_reloc, /* special_function */
661 "R_PPC_PLT16_LO", /* name */
662 FALSE, /* partial_inplace */
664 0xffff, /* dst_mask */
665 FALSE), /* pcrel_offset */
667 /* Like R_PPC_ADDR16_HI, but referring to the PLT table entry for
669 HOWTO (R_PPC_PLT16_HI, /* type */
671 1, /* size (0 = byte, 1 = short, 2 = long) */
673 FALSE, /* pc_relative */
675 complain_overflow_bitfield, /* complain_on_overflow */
676 bfd_elf_generic_reloc, /* special_function */
677 "R_PPC_PLT16_HI", /* name */
678 FALSE, /* partial_inplace */
680 0xffff, /* dst_mask */
681 FALSE), /* pcrel_offset */
683 /* Like R_PPC_ADDR16_HA, but referring to the PLT table entry for
685 HOWTO (R_PPC_PLT16_HA, /* type */
687 1, /* size (0 = byte, 1 = short, 2 = long) */
689 FALSE, /* pc_relative */
691 complain_overflow_bitfield, /* complain_on_overflow */
692 ppc_elf_addr16_ha_reloc, /* special_function */
693 "R_PPC_PLT16_HA", /* name */
694 FALSE, /* partial_inplace */
696 0xffff, /* dst_mask */
697 FALSE), /* pcrel_offset */
699 /* A sign-extended 16 bit value relative to _SDA_BASE_, for use with
701 HOWTO (R_PPC_SDAREL16, /* type */
703 1, /* size (0 = byte, 1 = short, 2 = long) */
705 FALSE, /* pc_relative */
707 complain_overflow_signed, /* complain_on_overflow */
708 bfd_elf_generic_reloc, /* special_function */
709 "R_PPC_SDAREL16", /* name */
710 FALSE, /* partial_inplace */
712 0xffff, /* dst_mask */
713 FALSE), /* pcrel_offset */
715 /* 16-bit section relative relocation. */
716 HOWTO (R_PPC_SECTOFF, /* type */
718 1, /* size (0 = byte, 1 = short, 2 = long) */
720 FALSE, /* pc_relative */
722 complain_overflow_bitfield, /* complain_on_overflow */
723 bfd_elf_generic_reloc, /* special_function */
724 "R_PPC_SECTOFF", /* name */
725 FALSE, /* partial_inplace */
727 0xffff, /* dst_mask */
728 FALSE), /* pcrel_offset */
730 /* 16-bit lower half section relative relocation. */
731 HOWTO (R_PPC_SECTOFF_LO, /* type */
733 1, /* size (0 = byte, 1 = short, 2 = long) */
735 FALSE, /* pc_relative */
737 complain_overflow_dont, /* complain_on_overflow */
738 bfd_elf_generic_reloc, /* special_function */
739 "R_PPC_SECTOFF_LO", /* name */
740 FALSE, /* partial_inplace */
742 0xffff, /* dst_mask */
743 FALSE), /* pcrel_offset */
745 /* 16-bit upper half section relative relocation. */
746 HOWTO (R_PPC_SECTOFF_HI, /* type */
748 1, /* size (0 = byte, 1 = short, 2 = long) */
750 FALSE, /* pc_relative */
752 complain_overflow_bitfield, /* complain_on_overflow */
753 bfd_elf_generic_reloc, /* special_function */
754 "R_PPC_SECTOFF_HI", /* name */
755 FALSE, /* partial_inplace */
757 0xffff, /* dst_mask */
758 FALSE), /* pcrel_offset */
760 /* 16-bit upper half adjusted section relative relocation. */
761 HOWTO (R_PPC_SECTOFF_HA, /* type */
763 1, /* size (0 = byte, 1 = short, 2 = long) */
765 FALSE, /* pc_relative */
767 complain_overflow_bitfield, /* complain_on_overflow */
768 ppc_elf_addr16_ha_reloc, /* special_function */
769 "R_PPC_SECTOFF_HA", /* name */
770 FALSE, /* partial_inplace */
772 0xffff, /* dst_mask */
773 FALSE), /* pcrel_offset */
775 /* Marker relocs for TLS. */
778 2, /* size (0 = byte, 1 = short, 2 = long) */
780 FALSE, /* pc_relative */
782 complain_overflow_dont, /* complain_on_overflow */
783 bfd_elf_generic_reloc, /* special_function */
784 "R_PPC_TLS", /* name */
785 FALSE, /* partial_inplace */
788 FALSE), /* pcrel_offset */
792 2, /* size (0 = byte, 1 = short, 2 = long) */
794 FALSE, /* pc_relative */
796 complain_overflow_dont, /* complain_on_overflow */
797 bfd_elf_generic_reloc, /* special_function */
798 "R_PPC_TLSGD", /* name */
799 FALSE, /* partial_inplace */
802 FALSE), /* pcrel_offset */
806 2, /* size (0 = byte, 1 = short, 2 = long) */
808 FALSE, /* pc_relative */
810 complain_overflow_dont, /* complain_on_overflow */
811 bfd_elf_generic_reloc, /* special_function */
812 "R_PPC_TLSLD", /* name */
813 FALSE, /* partial_inplace */
816 FALSE), /* pcrel_offset */
818 /* Computes the load module index of the load module that contains the
819 definition of its TLS sym. */
820 HOWTO (R_PPC_DTPMOD32,
822 2, /* size (0 = byte, 1 = short, 2 = long) */
824 FALSE, /* pc_relative */
826 complain_overflow_dont, /* complain_on_overflow */
827 ppc_elf_unhandled_reloc, /* special_function */
828 "R_PPC_DTPMOD32", /* name */
829 FALSE, /* partial_inplace */
831 0xffffffff, /* dst_mask */
832 FALSE), /* pcrel_offset */
834 /* Computes a dtv-relative displacement, the difference between the value
835 of sym+add and the base address of the thread-local storage block that
836 contains the definition of sym, minus 0x8000. */
837 HOWTO (R_PPC_DTPREL32,
839 2, /* size (0 = byte, 1 = short, 2 = long) */
841 FALSE, /* pc_relative */
843 complain_overflow_dont, /* complain_on_overflow */
844 ppc_elf_unhandled_reloc, /* special_function */
845 "R_PPC_DTPREL32", /* name */
846 FALSE, /* partial_inplace */
848 0xffffffff, /* dst_mask */
849 FALSE), /* pcrel_offset */
851 /* A 16 bit dtprel reloc. */
852 HOWTO (R_PPC_DTPREL16,
854 1, /* size (0 = byte, 1 = short, 2 = long) */
856 FALSE, /* pc_relative */
858 complain_overflow_signed, /* complain_on_overflow */
859 ppc_elf_unhandled_reloc, /* special_function */
860 "R_PPC_DTPREL16", /* name */
861 FALSE, /* partial_inplace */
863 0xffff, /* dst_mask */
864 FALSE), /* pcrel_offset */
866 /* Like DTPREL16, but no overflow. */
867 HOWTO (R_PPC_DTPREL16_LO,
869 1, /* size (0 = byte, 1 = short, 2 = long) */
871 FALSE, /* pc_relative */
873 complain_overflow_dont, /* complain_on_overflow */
874 ppc_elf_unhandled_reloc, /* special_function */
875 "R_PPC_DTPREL16_LO", /* name */
876 FALSE, /* partial_inplace */
878 0xffff, /* dst_mask */
879 FALSE), /* pcrel_offset */
881 /* Like DTPREL16_LO, but next higher group of 16 bits. */
882 HOWTO (R_PPC_DTPREL16_HI,
884 1, /* size (0 = byte, 1 = short, 2 = long) */
886 FALSE, /* pc_relative */
888 complain_overflow_dont, /* complain_on_overflow */
889 ppc_elf_unhandled_reloc, /* special_function */
890 "R_PPC_DTPREL16_HI", /* name */
891 FALSE, /* partial_inplace */
893 0xffff, /* dst_mask */
894 FALSE), /* pcrel_offset */
896 /* Like DTPREL16_HI, but adjust for low 16 bits. */
897 HOWTO (R_PPC_DTPREL16_HA,
899 1, /* size (0 = byte, 1 = short, 2 = long) */
901 FALSE, /* pc_relative */
903 complain_overflow_dont, /* complain_on_overflow */
904 ppc_elf_unhandled_reloc, /* special_function */
905 "R_PPC_DTPREL16_HA", /* name */
906 FALSE, /* partial_inplace */
908 0xffff, /* dst_mask */
909 FALSE), /* pcrel_offset */
911 /* Computes a tp-relative displacement, the difference between the value of
912 sym+add and the value of the thread pointer (r13). */
913 HOWTO (R_PPC_TPREL32,
915 2, /* size (0 = byte, 1 = short, 2 = long) */
917 FALSE, /* pc_relative */
919 complain_overflow_dont, /* complain_on_overflow */
920 ppc_elf_unhandled_reloc, /* special_function */
921 "R_PPC_TPREL32", /* name */
922 FALSE, /* partial_inplace */
924 0xffffffff, /* dst_mask */
925 FALSE), /* pcrel_offset */
927 /* A 16 bit tprel reloc. */
928 HOWTO (R_PPC_TPREL16,
930 1, /* size (0 = byte, 1 = short, 2 = long) */
932 FALSE, /* pc_relative */
934 complain_overflow_signed, /* complain_on_overflow */
935 ppc_elf_unhandled_reloc, /* special_function */
936 "R_PPC_TPREL16", /* name */
937 FALSE, /* partial_inplace */
939 0xffff, /* dst_mask */
940 FALSE), /* pcrel_offset */
942 /* Like TPREL16, but no overflow. */
943 HOWTO (R_PPC_TPREL16_LO,
945 1, /* size (0 = byte, 1 = short, 2 = long) */
947 FALSE, /* pc_relative */
949 complain_overflow_dont, /* complain_on_overflow */
950 ppc_elf_unhandled_reloc, /* special_function */
951 "R_PPC_TPREL16_LO", /* name */
952 FALSE, /* partial_inplace */
954 0xffff, /* dst_mask */
955 FALSE), /* pcrel_offset */
957 /* Like TPREL16_LO, but next higher group of 16 bits. */
958 HOWTO (R_PPC_TPREL16_HI,
960 1, /* size (0 = byte, 1 = short, 2 = long) */
962 FALSE, /* pc_relative */
964 complain_overflow_dont, /* complain_on_overflow */
965 ppc_elf_unhandled_reloc, /* special_function */
966 "R_PPC_TPREL16_HI", /* name */
967 FALSE, /* partial_inplace */
969 0xffff, /* dst_mask */
970 FALSE), /* pcrel_offset */
972 /* Like TPREL16_HI, but adjust for low 16 bits. */
973 HOWTO (R_PPC_TPREL16_HA,
975 1, /* size (0 = byte, 1 = short, 2 = long) */
977 FALSE, /* pc_relative */
979 complain_overflow_dont, /* complain_on_overflow */
980 ppc_elf_unhandled_reloc, /* special_function */
981 "R_PPC_TPREL16_HA", /* name */
982 FALSE, /* partial_inplace */
984 0xffff, /* dst_mask */
985 FALSE), /* pcrel_offset */
987 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
988 with values (sym+add)@dtpmod and (sym+add)@dtprel, and computes the offset
989 to the first entry. */
990 HOWTO (R_PPC_GOT_TLSGD16,
992 1, /* size (0 = byte, 1 = short, 2 = long) */
994 FALSE, /* pc_relative */
996 complain_overflow_signed, /* complain_on_overflow */
997 ppc_elf_unhandled_reloc, /* special_function */
998 "R_PPC_GOT_TLSGD16", /* name */
999 FALSE, /* partial_inplace */
1001 0xffff, /* dst_mask */
1002 FALSE), /* pcrel_offset */
1004 /* Like GOT_TLSGD16, but no overflow. */
1005 HOWTO (R_PPC_GOT_TLSGD16_LO,
1007 1, /* size (0 = byte, 1 = short, 2 = long) */
1009 FALSE, /* pc_relative */
1011 complain_overflow_dont, /* complain_on_overflow */
1012 ppc_elf_unhandled_reloc, /* special_function */
1013 "R_PPC_GOT_TLSGD16_LO", /* name */
1014 FALSE, /* partial_inplace */
1016 0xffff, /* dst_mask */
1017 FALSE), /* pcrel_offset */
1019 /* Like GOT_TLSGD16_LO, but next higher group of 16 bits. */
1020 HOWTO (R_PPC_GOT_TLSGD16_HI,
1021 16, /* rightshift */
1022 1, /* size (0 = byte, 1 = short, 2 = long) */
1024 FALSE, /* pc_relative */
1026 complain_overflow_dont, /* complain_on_overflow */
1027 ppc_elf_unhandled_reloc, /* special_function */
1028 "R_PPC_GOT_TLSGD16_HI", /* name */
1029 FALSE, /* partial_inplace */
1031 0xffff, /* dst_mask */
1032 FALSE), /* pcrel_offset */
1034 /* Like GOT_TLSGD16_HI, but adjust for low 16 bits. */
1035 HOWTO (R_PPC_GOT_TLSGD16_HA,
1036 16, /* rightshift */
1037 1, /* size (0 = byte, 1 = short, 2 = long) */
1039 FALSE, /* pc_relative */
1041 complain_overflow_dont, /* complain_on_overflow */
1042 ppc_elf_unhandled_reloc, /* special_function */
1043 "R_PPC_GOT_TLSGD16_HA", /* name */
1044 FALSE, /* partial_inplace */
1046 0xffff, /* dst_mask */
1047 FALSE), /* pcrel_offset */
1049 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
1050 with values (sym+add)@dtpmod and zero, and computes the offset to the
1052 HOWTO (R_PPC_GOT_TLSLD16,
1054 1, /* size (0 = byte, 1 = short, 2 = long) */
1056 FALSE, /* pc_relative */
1058 complain_overflow_signed, /* complain_on_overflow */
1059 ppc_elf_unhandled_reloc, /* special_function */
1060 "R_PPC_GOT_TLSLD16", /* name */
1061 FALSE, /* partial_inplace */
1063 0xffff, /* dst_mask */
1064 FALSE), /* pcrel_offset */
1066 /* Like GOT_TLSLD16, but no overflow. */
1067 HOWTO (R_PPC_GOT_TLSLD16_LO,
1069 1, /* size (0 = byte, 1 = short, 2 = long) */
1071 FALSE, /* pc_relative */
1073 complain_overflow_dont, /* complain_on_overflow */
1074 ppc_elf_unhandled_reloc, /* special_function */
1075 "R_PPC_GOT_TLSLD16_LO", /* name */
1076 FALSE, /* partial_inplace */
1078 0xffff, /* dst_mask */
1079 FALSE), /* pcrel_offset */
1081 /* Like GOT_TLSLD16_LO, but next higher group of 16 bits. */
1082 HOWTO (R_PPC_GOT_TLSLD16_HI,
1083 16, /* rightshift */
1084 1, /* size (0 = byte, 1 = short, 2 = long) */
1086 FALSE, /* pc_relative */
1088 complain_overflow_dont, /* complain_on_overflow */
1089 ppc_elf_unhandled_reloc, /* special_function */
1090 "R_PPC_GOT_TLSLD16_HI", /* name */
1091 FALSE, /* partial_inplace */
1093 0xffff, /* dst_mask */
1094 FALSE), /* pcrel_offset */
1096 /* Like GOT_TLSLD16_HI, but adjust for low 16 bits. */
1097 HOWTO (R_PPC_GOT_TLSLD16_HA,
1098 16, /* rightshift */
1099 1, /* size (0 = byte, 1 = short, 2 = long) */
1101 FALSE, /* pc_relative */
1103 complain_overflow_dont, /* complain_on_overflow */
1104 ppc_elf_unhandled_reloc, /* special_function */
1105 "R_PPC_GOT_TLSLD16_HA", /* name */
1106 FALSE, /* partial_inplace */
1108 0xffff, /* dst_mask */
1109 FALSE), /* pcrel_offset */
1111 /* Allocates an entry in the GOT with value (sym+add)@dtprel, and computes
1112 the offset to the entry. */
1113 HOWTO (R_PPC_GOT_DTPREL16,
1115 1, /* size (0 = byte, 1 = short, 2 = long) */
1117 FALSE, /* pc_relative */
1119 complain_overflow_signed, /* complain_on_overflow */
1120 ppc_elf_unhandled_reloc, /* special_function */
1121 "R_PPC_GOT_DTPREL16", /* name */
1122 FALSE, /* partial_inplace */
1124 0xffff, /* dst_mask */
1125 FALSE), /* pcrel_offset */
1127 /* Like GOT_DTPREL16, but no overflow. */
1128 HOWTO (R_PPC_GOT_DTPREL16_LO,
1130 1, /* size (0 = byte, 1 = short, 2 = long) */
1132 FALSE, /* pc_relative */
1134 complain_overflow_dont, /* complain_on_overflow */
1135 ppc_elf_unhandled_reloc, /* special_function */
1136 "R_PPC_GOT_DTPREL16_LO", /* name */
1137 FALSE, /* partial_inplace */
1139 0xffff, /* dst_mask */
1140 FALSE), /* pcrel_offset */
1142 /* Like GOT_DTPREL16_LO, but next higher group of 16 bits. */
1143 HOWTO (R_PPC_GOT_DTPREL16_HI,
1144 16, /* rightshift */
1145 1, /* size (0 = byte, 1 = short, 2 = long) */
1147 FALSE, /* pc_relative */
1149 complain_overflow_dont, /* complain_on_overflow */
1150 ppc_elf_unhandled_reloc, /* special_function */
1151 "R_PPC_GOT_DTPREL16_HI", /* name */
1152 FALSE, /* partial_inplace */
1154 0xffff, /* dst_mask */
1155 FALSE), /* pcrel_offset */
1157 /* Like GOT_DTPREL16_HI, but adjust for low 16 bits. */
1158 HOWTO (R_PPC_GOT_DTPREL16_HA,
1159 16, /* rightshift */
1160 1, /* size (0 = byte, 1 = short, 2 = long) */
1162 FALSE, /* pc_relative */
1164 complain_overflow_dont, /* complain_on_overflow */
1165 ppc_elf_unhandled_reloc, /* special_function */
1166 "R_PPC_GOT_DTPREL16_HA", /* name */
1167 FALSE, /* partial_inplace */
1169 0xffff, /* dst_mask */
1170 FALSE), /* pcrel_offset */
1172 /* Allocates an entry in the GOT with value (sym+add)@tprel, and computes the
1173 offset to the entry. */
1174 HOWTO (R_PPC_GOT_TPREL16,
1176 1, /* size (0 = byte, 1 = short, 2 = long) */
1178 FALSE, /* pc_relative */
1180 complain_overflow_signed, /* complain_on_overflow */
1181 ppc_elf_unhandled_reloc, /* special_function */
1182 "R_PPC_GOT_TPREL16", /* name */
1183 FALSE, /* partial_inplace */
1185 0xffff, /* dst_mask */
1186 FALSE), /* pcrel_offset */
1188 /* Like GOT_TPREL16, but no overflow. */
1189 HOWTO (R_PPC_GOT_TPREL16_LO,
1191 1, /* size (0 = byte, 1 = short, 2 = long) */
1193 FALSE, /* pc_relative */
1195 complain_overflow_dont, /* complain_on_overflow */
1196 ppc_elf_unhandled_reloc, /* special_function */
1197 "R_PPC_GOT_TPREL16_LO", /* name */
1198 FALSE, /* partial_inplace */
1200 0xffff, /* dst_mask */
1201 FALSE), /* pcrel_offset */
1203 /* Like GOT_TPREL16_LO, but next higher group of 16 bits. */
1204 HOWTO (R_PPC_GOT_TPREL16_HI,
1205 16, /* rightshift */
1206 1, /* size (0 = byte, 1 = short, 2 = long) */
1208 FALSE, /* pc_relative */
1210 complain_overflow_dont, /* complain_on_overflow */
1211 ppc_elf_unhandled_reloc, /* special_function */
1212 "R_PPC_GOT_TPREL16_HI", /* name */
1213 FALSE, /* partial_inplace */
1215 0xffff, /* dst_mask */
1216 FALSE), /* pcrel_offset */
1218 /* Like GOT_TPREL16_HI, but adjust for low 16 bits. */
1219 HOWTO (R_PPC_GOT_TPREL16_HA,
1220 16, /* rightshift */
1221 1, /* size (0 = byte, 1 = short, 2 = long) */
1223 FALSE, /* pc_relative */
1225 complain_overflow_dont, /* complain_on_overflow */
1226 ppc_elf_unhandled_reloc, /* special_function */
1227 "R_PPC_GOT_TPREL16_HA", /* name */
1228 FALSE, /* partial_inplace */
1230 0xffff, /* dst_mask */
1231 FALSE), /* pcrel_offset */
1233 /* The remaining relocs are from the Embedded ELF ABI, and are not
1234 in the SVR4 ELF ABI. */
1236 /* 32 bit value resulting from the addend minus the symbol. */
1237 HOWTO (R_PPC_EMB_NADDR32, /* type */
1239 2, /* size (0 = byte, 1 = short, 2 = long) */
1241 FALSE, /* pc_relative */
1243 complain_overflow_bitfield, /* complain_on_overflow */
1244 bfd_elf_generic_reloc, /* special_function */
1245 "R_PPC_EMB_NADDR32", /* name */
1246 FALSE, /* partial_inplace */
1248 0xffffffff, /* dst_mask */
1249 FALSE), /* pcrel_offset */
1251 /* 16 bit value resulting from the addend minus the symbol. */
1252 HOWTO (R_PPC_EMB_NADDR16, /* type */
1254 1, /* size (0 = byte, 1 = short, 2 = long) */
1256 FALSE, /* pc_relative */
1258 complain_overflow_bitfield, /* complain_on_overflow */
1259 bfd_elf_generic_reloc, /* special_function */
1260 "R_PPC_EMB_NADDR16", /* name */
1261 FALSE, /* partial_inplace */
1263 0xffff, /* dst_mask */
1264 FALSE), /* pcrel_offset */
1266 /* 16 bit value resulting from the addend minus the symbol. */
1267 HOWTO (R_PPC_EMB_NADDR16_LO, /* type */
1269 1, /* size (0 = byte, 1 = short, 2 = long) */
1271 FALSE, /* pc_relative */
1273 complain_overflow_dont,/* complain_on_overflow */
1274 bfd_elf_generic_reloc, /* special_function */
1275 "R_PPC_EMB_ADDR16_LO", /* name */
1276 FALSE, /* partial_inplace */
1278 0xffff, /* dst_mask */
1279 FALSE), /* pcrel_offset */
1281 /* The high order 16 bits of the addend minus the symbol. */
1282 HOWTO (R_PPC_EMB_NADDR16_HI, /* type */
1283 16, /* rightshift */
1284 1, /* size (0 = byte, 1 = short, 2 = long) */
1286 FALSE, /* pc_relative */
1288 complain_overflow_dont, /* complain_on_overflow */
1289 bfd_elf_generic_reloc, /* special_function */
1290 "R_PPC_EMB_NADDR16_HI", /* name */
1291 FALSE, /* partial_inplace */
1293 0xffff, /* dst_mask */
1294 FALSE), /* pcrel_offset */
1296 /* The high order 16 bits of the result of the addend minus the address,
1297 plus 1 if the contents of the low 16 bits, treated as a signed number,
1299 HOWTO (R_PPC_EMB_NADDR16_HA, /* type */
1300 16, /* rightshift */
1301 1, /* size (0 = byte, 1 = short, 2 = long) */
1303 FALSE, /* pc_relative */
1305 complain_overflow_dont, /* complain_on_overflow */
1306 ppc_elf_addr16_ha_reloc, /* special_function */
1307 "R_PPC_EMB_NADDR16_HA", /* name */
1308 FALSE, /* partial_inplace */
1310 0xffff, /* dst_mask */
1311 FALSE), /* pcrel_offset */
1313 /* 16 bit value resulting from allocating a 4 byte word to hold an
1314 address in the .sdata section, and returning the offset from
1315 _SDA_BASE_ for that relocation. */
1316 HOWTO (R_PPC_EMB_SDAI16, /* type */
1318 1, /* size (0 = byte, 1 = short, 2 = long) */
1320 FALSE, /* pc_relative */
1322 complain_overflow_signed, /* complain_on_overflow */
1323 bfd_elf_generic_reloc, /* special_function */
1324 "R_PPC_EMB_SDAI16", /* name */
1325 FALSE, /* partial_inplace */
1327 0xffff, /* dst_mask */
1328 FALSE), /* pcrel_offset */
1330 /* 16 bit value resulting from allocating a 4 byte word to hold an
1331 address in the .sdata2 section, and returning the offset from
1332 _SDA2_BASE_ for that relocation. */
1333 HOWTO (R_PPC_EMB_SDA2I16, /* type */
1335 1, /* size (0 = byte, 1 = short, 2 = long) */
1337 FALSE, /* pc_relative */
1339 complain_overflow_signed, /* complain_on_overflow */
1340 bfd_elf_generic_reloc, /* special_function */
1341 "R_PPC_EMB_SDA2I16", /* name */
1342 FALSE, /* partial_inplace */
1344 0xffff, /* dst_mask */
1345 FALSE), /* pcrel_offset */
1347 /* A sign-extended 16 bit value relative to _SDA2_BASE_, for use with
1348 small data items. */
1349 HOWTO (R_PPC_EMB_SDA2REL, /* type */
1351 1, /* size (0 = byte, 1 = short, 2 = long) */
1353 FALSE, /* pc_relative */
1355 complain_overflow_signed, /* complain_on_overflow */
1356 bfd_elf_generic_reloc, /* special_function */
1357 "R_PPC_EMB_SDA2REL", /* name */
1358 FALSE, /* partial_inplace */
1360 0xffff, /* dst_mask */
1361 FALSE), /* pcrel_offset */
1363 /* Relocate against either _SDA_BASE_ or _SDA2_BASE_, filling in the 16 bit
1364 signed offset from the appropriate base, and filling in the register
1365 field with the appropriate register (0, 2, or 13). */
1366 HOWTO (R_PPC_EMB_SDA21, /* type */
1368 2, /* size (0 = byte, 1 = short, 2 = long) */
1370 FALSE, /* pc_relative */
1372 complain_overflow_signed, /* complain_on_overflow */
1373 bfd_elf_generic_reloc, /* special_function */
1374 "R_PPC_EMB_SDA21", /* name */
1375 FALSE, /* partial_inplace */
1377 0xffff, /* dst_mask */
1378 FALSE), /* pcrel_offset */
1380 /* Relocation not handled: R_PPC_EMB_MRKREF */
1381 /* Relocation not handled: R_PPC_EMB_RELSEC16 */
1382 /* Relocation not handled: R_PPC_EMB_RELST_LO */
1383 /* Relocation not handled: R_PPC_EMB_RELST_HI */
1384 /* Relocation not handled: R_PPC_EMB_RELST_HA */
1385 /* Relocation not handled: R_PPC_EMB_BIT_FLD */
1387 /* PC relative relocation against either _SDA_BASE_ or _SDA2_BASE_, filling
1388 in the 16 bit signed offset from the appropriate base, and filling in the
1389 register field with the appropriate register (0, 2, or 13). */
1390 HOWTO (R_PPC_EMB_RELSDA, /* type */
1392 1, /* size (0 = byte, 1 = short, 2 = long) */
1394 FALSE, /* pc_relative */
1396 complain_overflow_signed, /* complain_on_overflow */
1397 bfd_elf_generic_reloc, /* special_function */
1398 "R_PPC_EMB_RELSDA", /* name */
1399 FALSE, /* partial_inplace */
1401 0xffff, /* dst_mask */
1402 FALSE), /* pcrel_offset */
1404 /* A relative 8 bit branch. */
1405 HOWTO (R_PPC_VLE_REL8, /* type */
1407 1, /* size (0 = byte, 1 = short, 2 = long) */
1409 TRUE, /* pc_relative */
1411 complain_overflow_signed, /* complain_on_overflow */
1412 bfd_elf_generic_reloc, /* special_function */
1413 "R_PPC_VLE_REL8", /* name */
1414 FALSE, /* partial_inplace */
1416 0xff, /* dst_mask */
1417 TRUE), /* pcrel_offset */
1419 /* A relative 15 bit branch. */
1420 HOWTO (R_PPC_VLE_REL15, /* type */
1422 2, /* size (0 = byte, 1 = short, 2 = long) */
1424 TRUE, /* pc_relative */
1426 complain_overflow_signed, /* complain_on_overflow */
1427 bfd_elf_generic_reloc, /* special_function */
1428 "R_PPC_VLE_REL15", /* name */
1429 FALSE, /* partial_inplace */
1431 0xfe, /* dst_mask */
1432 TRUE), /* pcrel_offset */
1434 /* A relative 24 bit branch. */
1435 HOWTO (R_PPC_VLE_REL24, /* type */
1437 2, /* size (0 = byte, 1 = short, 2 = long) */
1439 TRUE, /* pc_relative */
1441 complain_overflow_signed, /* complain_on_overflow */
1442 bfd_elf_generic_reloc, /* special_function */
1443 "R_PPC_VLE_REL24", /* name */
1444 FALSE, /* partial_inplace */
1446 0x1fffffe, /* dst_mask */
1447 TRUE), /* pcrel_offset */
1449 /* The 16 LSBS in split16a format. */
1450 HOWTO (R_PPC_VLE_LO16A, /* type */
1452 2, /* size (0 = byte, 1 = short, 2 = long) */
1454 FALSE, /* pc_relative */ /* FIXME: Does this apply to split relocs? */
1456 complain_overflow_bitfield, /* complain_on_overflow */
1457 bfd_elf_generic_reloc, /* special_function */
1458 "R_PPC_VLE_LO16A", /* name */
1459 FALSE, /* partial_inplace */
1461 0x1f00fff, /* dst_mask */
1462 FALSE), /* pcrel_offset */
1464 /* The 16 LSBS in split16d format. */
1465 HOWTO (R_PPC_VLE_LO16D, /* type */
1467 2, /* size (0 = byte, 1 = short, 2 = long) */
1469 FALSE, /* pc_relative */
1471 complain_overflow_bitfield, /* complain_on_overflow */
1472 bfd_elf_generic_reloc, /* special_function */
1473 "R_PPC_VLE_LO16D", /* name */
1474 FALSE, /* partial_inplace */
1476 0x1f07ff, /* dst_mask */
1477 FALSE), /* pcrel_offset */
1479 /* Bits 16-31 split16a format. */
1480 HOWTO (R_PPC_VLE_HI16A, /* type */
1482 2, /* size (0 = byte, 1 = short, 2 = long) */
1484 FALSE, /* pc_relative */
1486 complain_overflow_bitfield, /* complain_on_overflow */
1487 bfd_elf_generic_reloc, /* special_function */
1488 "R_PPC_VLE_HI16A", /* name */
1489 FALSE, /* partial_inplace */
1491 0x1f00fff, /* dst_mask */
1492 FALSE), /* pcrel_offset */
1494 /* Bits 16-31 split16d format. */
1495 HOWTO (R_PPC_VLE_HI16D, /* type */
1497 2, /* size (0 = byte, 1 = short, 2 = long) */
1499 FALSE, /* pc_relative */
1501 complain_overflow_bitfield, /* complain_on_overflow */
1502 bfd_elf_generic_reloc, /* special_function */
1503 "R_PPC_VLE_HI16D", /* name */
1504 FALSE, /* partial_inplace */
1506 0x1f07ff, /* dst_mask */
1507 FALSE), /* pcrel_offset */
1509 /* Bits 16-31 (High Adjusted) in split16a format. */
1510 HOWTO (R_PPC_VLE_HA16A, /* type */
1512 2, /* size (0 = byte, 1 = short, 2 = long) */
1514 FALSE, /* pc_relative */
1516 complain_overflow_bitfield, /* complain_on_overflow */
1517 bfd_elf_generic_reloc, /* special_function */
1518 "R_PPC_VLE_HA16A", /* name */
1519 FALSE, /* partial_inplace */
1521 0x1f00fff, /* dst_mask */
1522 FALSE), /* pcrel_offset */
1524 /* Bits 16-31 (High Adjusted) in split16d format. */
1525 HOWTO (R_PPC_VLE_HA16D, /* type */
1527 2, /* size (0 = byte, 1 = short, 2 = long) */
1529 FALSE, /* pc_relative */
1531 complain_overflow_bitfield, /* complain_on_overflow */
1532 bfd_elf_generic_reloc, /* special_function */
1533 "R_PPC_VLE_HA16D", /* name */
1534 FALSE, /* partial_inplace */
1536 0x1f07ff, /* dst_mask */
1537 FALSE), /* pcrel_offset */
1539 /* This reloc does nothing. */
1540 HOWTO (R_PPC_VLE_SDA21, /* type */
1542 2, /* size (0 = byte, 1 = short, 2 = long) */
1544 FALSE, /* pc_relative */
1546 complain_overflow_bitfield, /* complain_on_overflow */
1547 bfd_elf_generic_reloc, /* special_function */
1548 "R_PPC_VLE_SDA21", /* name */
1549 FALSE, /* partial_inplace */
1551 0xffff, /* dst_mask */
1552 FALSE), /* pcrel_offset */
1554 /* This reloc does nothing. */
1555 HOWTO (R_PPC_VLE_SDA21_LO, /* type */
1557 2, /* size (0 = byte, 1 = short, 2 = long) */
1559 FALSE, /* pc_relative */
1561 complain_overflow_bitfield, /* complain_on_overflow */
1562 bfd_elf_generic_reloc, /* special_function */
1563 "R_PPC_VLE_SDA21_LO", /* name */
1564 FALSE, /* partial_inplace */
1567 FALSE), /* pcrel_offset */
1569 /* The 16 LSBS relative to _SDA_BASE_ in split16a format. */
1570 HOWTO (R_PPC_VLE_SDAREL_LO16A,/* type */
1572 2, /* size (0 = byte, 1 = short, 2 = long) */
1574 FALSE, /* pc_relative */
1576 complain_overflow_bitfield, /* complain_on_overflow */
1577 bfd_elf_generic_reloc, /* special_function */
1578 "R_PPC_VLE_SDAREL_LO16A", /* name */
1579 FALSE, /* partial_inplace */
1581 0x1f00fff, /* dst_mask */
1582 FALSE), /* pcrel_offset */
1584 /* The 16 LSBS relative to _SDA_BASE_ in split16d format. */
1585 /* This reloc does nothing. */
1586 HOWTO (R_PPC_VLE_SDAREL_LO16D, /* type */
1588 2, /* size (0 = byte, 1 = short, 2 = long) */
1590 FALSE, /* pc_relative */
1592 complain_overflow_bitfield, /* complain_on_overflow */
1593 bfd_elf_generic_reloc, /* special_function */
1594 "R_PPC_VLE_SDAREL_LO16D", /* name */
1595 FALSE, /* partial_inplace */
1597 0x1f07ff, /* dst_mask */
1598 FALSE), /* pcrel_offset */
1600 /* Bits 16-31 relative to _SDA_BASE_ in split16a format. */
1601 HOWTO (R_PPC_VLE_SDAREL_HI16A, /* type */
1603 2, /* size (0 = byte, 1 = short, 2 = long) */
1605 FALSE, /* pc_relative */
1607 complain_overflow_bitfield, /* complain_on_overflow */
1608 bfd_elf_generic_reloc, /* special_function */
1609 "R_PPC_VLE_SDAREL_HI16A", /* name */
1610 FALSE, /* partial_inplace */
1612 0x1f00fff, /* dst_mask */
1613 FALSE), /* pcrel_offset */
1615 /* Bits 16-31 relative to _SDA_BASE_ in split16d format. */
1616 HOWTO (R_PPC_VLE_SDAREL_HI16D, /* type */
1618 2, /* size (0 = byte, 1 = short, 2 = long) */
1620 FALSE, /* pc_relative */
1622 complain_overflow_bitfield, /* complain_on_overflow */
1623 bfd_elf_generic_reloc, /* special_function */
1624 "R_PPC_VLE_SDAREL_HI16D", /* name */
1625 FALSE, /* partial_inplace */
1627 0x1f07ff, /* dst_mask */
1628 FALSE), /* pcrel_offset */
1630 /* Bits 16-31 (HA) relative to _SDA_BASE split16a format. */
1631 HOWTO (R_PPC_VLE_SDAREL_HA16A, /* type */
1633 2, /* size (0 = byte, 1 = short, 2 = long) */
1635 FALSE, /* pc_relative */
1637 complain_overflow_bitfield, /* complain_on_overflow */
1638 bfd_elf_generic_reloc, /* special_function */
1639 "R_PPC_VLE_SDAREL_HA16A", /* name */
1640 FALSE, /* partial_inplace */
1642 0x1f00fff, /* dst_mask */
1643 FALSE), /* pcrel_offset */
1645 /* Bits 16-31 (HA) relative to _SDA_BASE split16d format. */
1646 HOWTO (R_PPC_VLE_SDAREL_HA16D, /* type */
1648 2, /* size (0 = byte, 1 = short, 2 = long) */
1650 FALSE, /* pc_relative */
1652 complain_overflow_bitfield, /* complain_on_overflow */
1653 bfd_elf_generic_reloc, /* special_function */
1654 "R_PPC_VLE_SDAREL_HA16D", /* name */
1655 FALSE, /* partial_inplace */
1657 0x1f07ff, /* dst_mask */
1658 FALSE), /* pcrel_offset */
1660 HOWTO (R_PPC_IRELATIVE, /* type */
1662 2, /* size (0 = byte, 1 = short, 2 = long) */
1664 FALSE, /* pc_relative */
1666 complain_overflow_bitfield, /* complain_on_overflow */
1667 bfd_elf_generic_reloc, /* special_function */
1668 "R_PPC_IRELATIVE", /* name */
1669 FALSE, /* partial_inplace */
1671 0xffffffff, /* dst_mask */
1672 FALSE), /* pcrel_offset */
1674 /* A 16 bit relative relocation. */
1675 HOWTO (R_PPC_REL16, /* type */
1677 1, /* size (0 = byte, 1 = short, 2 = long) */
1679 TRUE, /* pc_relative */
1681 complain_overflow_bitfield, /* complain_on_overflow */
1682 bfd_elf_generic_reloc, /* special_function */
1683 "R_PPC_REL16", /* name */
1684 FALSE, /* partial_inplace */
1686 0xffff, /* dst_mask */
1687 TRUE), /* pcrel_offset */
1689 /* A 16 bit relative relocation without overflow. */
1690 HOWTO (R_PPC_REL16_LO, /* type */
1692 1, /* size (0 = byte, 1 = short, 2 = long) */
1694 TRUE, /* pc_relative */
1696 complain_overflow_dont,/* complain_on_overflow */
1697 bfd_elf_generic_reloc, /* special_function */
1698 "R_PPC_REL16_LO", /* name */
1699 FALSE, /* partial_inplace */
1701 0xffff, /* dst_mask */
1702 TRUE), /* pcrel_offset */
1704 /* The high order 16 bits of a relative address. */
1705 HOWTO (R_PPC_REL16_HI, /* type */
1706 16, /* rightshift */
1707 1, /* size (0 = byte, 1 = short, 2 = long) */
1709 TRUE, /* pc_relative */
1711 complain_overflow_dont, /* complain_on_overflow */
1712 bfd_elf_generic_reloc, /* special_function */
1713 "R_PPC_REL16_HI", /* name */
1714 FALSE, /* partial_inplace */
1716 0xffff, /* dst_mask */
1717 TRUE), /* pcrel_offset */
1719 /* The high order 16 bits of a relative address, plus 1 if the contents of
1720 the low 16 bits, treated as a signed number, is negative. */
1721 HOWTO (R_PPC_REL16_HA, /* type */
1722 16, /* rightshift */
1723 1, /* size (0 = byte, 1 = short, 2 = long) */
1725 TRUE, /* pc_relative */
1727 complain_overflow_dont, /* complain_on_overflow */
1728 ppc_elf_addr16_ha_reloc, /* special_function */
1729 "R_PPC_REL16_HA", /* name */
1730 FALSE, /* partial_inplace */
1732 0xffff, /* dst_mask */
1733 TRUE), /* pcrel_offset */
1735 /* GNU extension to record C++ vtable hierarchy. */
1736 HOWTO (R_PPC_GNU_VTINHERIT, /* type */
1738 0, /* size (0 = byte, 1 = short, 2 = long) */
1740 FALSE, /* pc_relative */
1742 complain_overflow_dont, /* complain_on_overflow */
1743 NULL, /* special_function */
1744 "R_PPC_GNU_VTINHERIT", /* name */
1745 FALSE, /* partial_inplace */
1748 FALSE), /* pcrel_offset */
1750 /* GNU extension to record C++ vtable member usage. */
1751 HOWTO (R_PPC_GNU_VTENTRY, /* type */
1753 0, /* size (0 = byte, 1 = short, 2 = long) */
1755 FALSE, /* pc_relative */
1757 complain_overflow_dont, /* complain_on_overflow */
1758 NULL, /* special_function */
1759 "R_PPC_GNU_VTENTRY", /* name */
1760 FALSE, /* partial_inplace */
1763 FALSE), /* pcrel_offset */
1765 /* Phony reloc to handle AIX style TOC entries. */
1766 HOWTO (R_PPC_TOC16, /* type */
1768 1, /* size (0 = byte, 1 = short, 2 = long) */
1770 FALSE, /* pc_relative */
1772 complain_overflow_signed, /* complain_on_overflow */
1773 bfd_elf_generic_reloc, /* special_function */
1774 "R_PPC_TOC16", /* name */
1775 FALSE, /* partial_inplace */
1777 0xffff, /* dst_mask */
1778 FALSE), /* pcrel_offset */
1781 /* Initialize the ppc_elf_howto_table, so that linear accesses can be done. */
1784 ppc_elf_howto_init (void)
1786 unsigned int i, type;
1789 i < sizeof (ppc_elf_howto_raw) / sizeof (ppc_elf_howto_raw[0]);
1792 type = ppc_elf_howto_raw[i].type;
1793 if (type >= (sizeof (ppc_elf_howto_table)
1794 / sizeof (ppc_elf_howto_table[0])))
1796 ppc_elf_howto_table[type] = &ppc_elf_howto_raw[i];
1800 static reloc_howto_type *
1801 ppc_elf_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1802 bfd_reloc_code_real_type code)
1804 enum elf_ppc_reloc_type r;
1806 /* Initialize howto table if not already done. */
1807 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1808 ppc_elf_howto_init ();
1815 case BFD_RELOC_NONE: r = R_PPC_NONE; break;
1816 case BFD_RELOC_32: r = R_PPC_ADDR32; break;
1817 case BFD_RELOC_PPC_BA26: r = R_PPC_ADDR24; break;
1818 case BFD_RELOC_16: r = R_PPC_ADDR16; break;
1819 case BFD_RELOC_LO16: r = R_PPC_ADDR16_LO; break;
1820 case BFD_RELOC_HI16: r = R_PPC_ADDR16_HI; break;
1821 case BFD_RELOC_HI16_S: r = R_PPC_ADDR16_HA; break;
1822 case BFD_RELOC_PPC_BA16: r = R_PPC_ADDR14; break;
1823 case BFD_RELOC_PPC_BA16_BRTAKEN: r = R_PPC_ADDR14_BRTAKEN; break;
1824 case BFD_RELOC_PPC_BA16_BRNTAKEN: r = R_PPC_ADDR14_BRNTAKEN; break;
1825 case BFD_RELOC_PPC_B26: r = R_PPC_REL24; break;
1826 case BFD_RELOC_PPC_B16: r = R_PPC_REL14; break;
1827 case BFD_RELOC_PPC_B16_BRTAKEN: r = R_PPC_REL14_BRTAKEN; break;
1828 case BFD_RELOC_PPC_B16_BRNTAKEN: r = R_PPC_REL14_BRNTAKEN; break;
1829 case BFD_RELOC_16_GOTOFF: r = R_PPC_GOT16; break;
1830 case BFD_RELOC_LO16_GOTOFF: r = R_PPC_GOT16_LO; break;
1831 case BFD_RELOC_HI16_GOTOFF: r = R_PPC_GOT16_HI; break;
1832 case BFD_RELOC_HI16_S_GOTOFF: r = R_PPC_GOT16_HA; break;
1833 case BFD_RELOC_24_PLT_PCREL: r = R_PPC_PLTREL24; break;
1834 case BFD_RELOC_PPC_COPY: r = R_PPC_COPY; break;
1835 case BFD_RELOC_PPC_GLOB_DAT: r = R_PPC_GLOB_DAT; break;
1836 case BFD_RELOC_PPC_LOCAL24PC: r = R_PPC_LOCAL24PC; break;
1837 case BFD_RELOC_32_PCREL: r = R_PPC_REL32; break;
1838 case BFD_RELOC_32_PLTOFF: r = R_PPC_PLT32; break;
1839 case BFD_RELOC_32_PLT_PCREL: r = R_PPC_PLTREL32; break;
1840 case BFD_RELOC_LO16_PLTOFF: r = R_PPC_PLT16_LO; break;
1841 case BFD_RELOC_HI16_PLTOFF: r = R_PPC_PLT16_HI; break;
1842 case BFD_RELOC_HI16_S_PLTOFF: r = R_PPC_PLT16_HA; break;
1843 case BFD_RELOC_GPREL16: r = R_PPC_SDAREL16; break;
1844 case BFD_RELOC_16_BASEREL: r = R_PPC_SECTOFF; break;
1845 case BFD_RELOC_LO16_BASEREL: r = R_PPC_SECTOFF_LO; break;
1846 case BFD_RELOC_HI16_BASEREL: r = R_PPC_SECTOFF_HI; break;
1847 case BFD_RELOC_HI16_S_BASEREL: r = R_PPC_SECTOFF_HA; break;
1848 case BFD_RELOC_CTOR: r = R_PPC_ADDR32; break;
1849 case BFD_RELOC_PPC_TOC16: r = R_PPC_TOC16; break;
1850 case BFD_RELOC_PPC_TLS: r = R_PPC_TLS; break;
1851 case BFD_RELOC_PPC_TLSGD: r = R_PPC_TLSGD; break;
1852 case BFD_RELOC_PPC_TLSLD: r = R_PPC_TLSLD; break;
1853 case BFD_RELOC_PPC_DTPMOD: r = R_PPC_DTPMOD32; break;
1854 case BFD_RELOC_PPC_TPREL16: r = R_PPC_TPREL16; break;
1855 case BFD_RELOC_PPC_TPREL16_LO: r = R_PPC_TPREL16_LO; break;
1856 case BFD_RELOC_PPC_TPREL16_HI: r = R_PPC_TPREL16_HI; break;
1857 case BFD_RELOC_PPC_TPREL16_HA: r = R_PPC_TPREL16_HA; break;
1858 case BFD_RELOC_PPC_TPREL: r = R_PPC_TPREL32; break;
1859 case BFD_RELOC_PPC_DTPREL16: r = R_PPC_DTPREL16; break;
1860 case BFD_RELOC_PPC_DTPREL16_LO: r = R_PPC_DTPREL16_LO; break;
1861 case BFD_RELOC_PPC_DTPREL16_HI: r = R_PPC_DTPREL16_HI; break;
1862 case BFD_RELOC_PPC_DTPREL16_HA: r = R_PPC_DTPREL16_HA; break;
1863 case BFD_RELOC_PPC_DTPREL: r = R_PPC_DTPREL32; break;
1864 case BFD_RELOC_PPC_GOT_TLSGD16: r = R_PPC_GOT_TLSGD16; break;
1865 case BFD_RELOC_PPC_GOT_TLSGD16_LO: r = R_PPC_GOT_TLSGD16_LO; break;
1866 case BFD_RELOC_PPC_GOT_TLSGD16_HI: r = R_PPC_GOT_TLSGD16_HI; break;
1867 case BFD_RELOC_PPC_GOT_TLSGD16_HA: r = R_PPC_GOT_TLSGD16_HA; break;
1868 case BFD_RELOC_PPC_GOT_TLSLD16: r = R_PPC_GOT_TLSLD16; break;
1869 case BFD_RELOC_PPC_GOT_TLSLD16_LO: r = R_PPC_GOT_TLSLD16_LO; break;
1870 case BFD_RELOC_PPC_GOT_TLSLD16_HI: r = R_PPC_GOT_TLSLD16_HI; break;
1871 case BFD_RELOC_PPC_GOT_TLSLD16_HA: r = R_PPC_GOT_TLSLD16_HA; break;
1872 case BFD_RELOC_PPC_GOT_TPREL16: r = R_PPC_GOT_TPREL16; break;
1873 case BFD_RELOC_PPC_GOT_TPREL16_LO: r = R_PPC_GOT_TPREL16_LO; break;
1874 case BFD_RELOC_PPC_GOT_TPREL16_HI: r = R_PPC_GOT_TPREL16_HI; break;
1875 case BFD_RELOC_PPC_GOT_TPREL16_HA: r = R_PPC_GOT_TPREL16_HA; break;
1876 case BFD_RELOC_PPC_GOT_DTPREL16: r = R_PPC_GOT_DTPREL16; break;
1877 case BFD_RELOC_PPC_GOT_DTPREL16_LO: r = R_PPC_GOT_DTPREL16_LO; break;
1878 case BFD_RELOC_PPC_GOT_DTPREL16_HI: r = R_PPC_GOT_DTPREL16_HI; break;
1879 case BFD_RELOC_PPC_GOT_DTPREL16_HA: r = R_PPC_GOT_DTPREL16_HA; break;
1880 case BFD_RELOC_PPC_EMB_NADDR32: r = R_PPC_EMB_NADDR32; break;
1881 case BFD_RELOC_PPC_EMB_NADDR16: r = R_PPC_EMB_NADDR16; break;
1882 case BFD_RELOC_PPC_EMB_NADDR16_LO: r = R_PPC_EMB_NADDR16_LO; break;
1883 case BFD_RELOC_PPC_EMB_NADDR16_HI: r = R_PPC_EMB_NADDR16_HI; break;
1884 case BFD_RELOC_PPC_EMB_NADDR16_HA: r = R_PPC_EMB_NADDR16_HA; break;
1885 case BFD_RELOC_PPC_EMB_SDAI16: r = R_PPC_EMB_SDAI16; break;
1886 case BFD_RELOC_PPC_EMB_SDA2I16: r = R_PPC_EMB_SDA2I16; break;
1887 case BFD_RELOC_PPC_EMB_SDA2REL: r = R_PPC_EMB_SDA2REL; break;
1888 case BFD_RELOC_PPC_EMB_SDA21: r = R_PPC_EMB_SDA21; break;
1889 case BFD_RELOC_PPC_EMB_MRKREF: r = R_PPC_EMB_MRKREF; break;
1890 case BFD_RELOC_PPC_EMB_RELSEC16: r = R_PPC_EMB_RELSEC16; break;
1891 case BFD_RELOC_PPC_EMB_RELST_LO: r = R_PPC_EMB_RELST_LO; break;
1892 case BFD_RELOC_PPC_EMB_RELST_HI: r = R_PPC_EMB_RELST_HI; break;
1893 case BFD_RELOC_PPC_EMB_RELST_HA: r = R_PPC_EMB_RELST_HA; break;
1894 case BFD_RELOC_PPC_EMB_BIT_FLD: r = R_PPC_EMB_BIT_FLD; break;
1895 case BFD_RELOC_PPC_EMB_RELSDA: r = R_PPC_EMB_RELSDA; break;
1896 case BFD_RELOC_PPC_VLE_REL8: r = R_PPC_VLE_REL8; break;
1897 case BFD_RELOC_PPC_VLE_REL15: r = R_PPC_VLE_REL15; break;
1898 case BFD_RELOC_PPC_VLE_REL24: r = R_PPC_VLE_REL24; break;
1899 case BFD_RELOC_PPC_VLE_LO16A: r = R_PPC_VLE_LO16A; break;
1900 case BFD_RELOC_PPC_VLE_LO16D: r = R_PPC_VLE_LO16D; break;
1901 case BFD_RELOC_PPC_VLE_HI16A: r = R_PPC_VLE_HI16A; break;
1902 case BFD_RELOC_PPC_VLE_HI16D: r = R_PPC_VLE_HI16D; break;
1903 case BFD_RELOC_PPC_VLE_HA16A: r = R_PPC_VLE_HA16A; break;
1904 case BFD_RELOC_PPC_VLE_HA16D: r = R_PPC_VLE_HA16D; break;
1905 case BFD_RELOC_PPC_VLE_SDA21: r = R_PPC_VLE_SDA21; break;
1906 case BFD_RELOC_PPC_VLE_SDA21_LO: r = R_PPC_VLE_SDA21_LO; break;
1907 case BFD_RELOC_PPC_VLE_SDAREL_LO16A:
1908 r = R_PPC_VLE_SDAREL_LO16A;
1910 case BFD_RELOC_PPC_VLE_SDAREL_LO16D:
1911 r = R_PPC_VLE_SDAREL_LO16D;
1913 case BFD_RELOC_PPC_VLE_SDAREL_HI16A:
1914 r = R_PPC_VLE_SDAREL_HI16A;
1916 case BFD_RELOC_PPC_VLE_SDAREL_HI16D:
1917 r = R_PPC_VLE_SDAREL_HI16D;
1919 case BFD_RELOC_PPC_VLE_SDAREL_HA16A:
1920 r = R_PPC_VLE_SDAREL_HA16A;
1922 case BFD_RELOC_PPC_VLE_SDAREL_HA16D:
1923 r = R_PPC_VLE_SDAREL_HA16D;
1925 case BFD_RELOC_16_PCREL: r = R_PPC_REL16; break;
1926 case BFD_RELOC_LO16_PCREL: r = R_PPC_REL16_LO; break;
1927 case BFD_RELOC_HI16_PCREL: r = R_PPC_REL16_HI; break;
1928 case BFD_RELOC_HI16_S_PCREL: r = R_PPC_REL16_HA; break;
1929 case BFD_RELOC_VTABLE_INHERIT: r = R_PPC_GNU_VTINHERIT; break;
1930 case BFD_RELOC_VTABLE_ENTRY: r = R_PPC_GNU_VTENTRY; break;
1933 return ppc_elf_howto_table[r];
1936 static reloc_howto_type *
1937 ppc_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1943 i < sizeof (ppc_elf_howto_raw) / sizeof (ppc_elf_howto_raw[0]);
1945 if (ppc_elf_howto_raw[i].name != NULL
1946 && strcasecmp (ppc_elf_howto_raw[i].name, r_name) == 0)
1947 return &ppc_elf_howto_raw[i];
1952 /* Set the howto pointer for a PowerPC ELF reloc. */
1955 ppc_elf_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
1957 Elf_Internal_Rela *dst)
1959 /* Initialize howto table if not already done. */
1960 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1961 ppc_elf_howto_init ();
1963 BFD_ASSERT (ELF32_R_TYPE (dst->r_info) < (unsigned int) R_PPC_max);
1964 cache_ptr->howto = ppc_elf_howto_table[ELF32_R_TYPE (dst->r_info)];
1966 /* Just because the above assert didn't trigger doesn't mean that
1967 ELF32_R_TYPE (dst->r_info) is necessarily a valid relocation. */
1968 if (!cache_ptr->howto)
1970 (*_bfd_error_handler) (_("%B: invalid relocation type %d"),
1971 abfd, ELF32_R_TYPE (dst->r_info));
1972 bfd_set_error (bfd_error_bad_value);
1974 cache_ptr->howto = ppc_elf_howto_table[R_PPC_NONE];
1978 /* Handle the R_PPC_ADDR16_HA and R_PPC_REL16_HA relocs. */
1980 static bfd_reloc_status_type
1981 ppc_elf_addr16_ha_reloc (bfd *abfd ATTRIBUTE_UNUSED,
1982 arelent *reloc_entry,
1984 void *data ATTRIBUTE_UNUSED,
1985 asection *input_section,
1987 char **error_message ATTRIBUTE_UNUSED)
1991 if (output_bfd != NULL)
1993 reloc_entry->address += input_section->output_offset;
1994 return bfd_reloc_ok;
1997 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
1998 return bfd_reloc_outofrange;
2000 if (bfd_is_com_section (symbol->section))
2003 relocation = symbol->value;
2005 relocation += symbol->section->output_section->vma;
2006 relocation += symbol->section->output_offset;
2007 relocation += reloc_entry->addend;
2008 if (reloc_entry->howto->pc_relative)
2009 relocation -= reloc_entry->address;
2011 reloc_entry->addend += (relocation & 0x8000) << 1;
2013 return bfd_reloc_continue;
2016 static bfd_reloc_status_type
2017 ppc_elf_unhandled_reloc (bfd *abfd,
2018 arelent *reloc_entry,
2021 asection *input_section,
2023 char **error_message)
2025 /* If this is a relocatable link (output_bfd test tells us), just
2026 call the generic function. Any adjustment will be done at final
2028 if (output_bfd != NULL)
2029 return bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
2030 input_section, output_bfd, error_message);
2032 if (error_message != NULL)
2034 static char buf[60];
2035 sprintf (buf, _("generic linker can't handle %s"),
2036 reloc_entry->howto->name);
2037 *error_message = buf;
2039 return bfd_reloc_dangerous;
2042 /* Sections created by the linker. */
2044 typedef struct elf_linker_section
2046 /* Pointer to the bfd section. */
2050 /* Associated bss section name. */
2051 const char *bss_name;
2052 /* Associated symbol name. */
2053 const char *sym_name;
2054 /* Associated symbol. */
2055 struct elf_link_hash_entry *sym;
2056 } elf_linker_section_t;
2058 /* Linked list of allocated pointer entries. This hangs off of the
2059 symbol lists, and provides allows us to return different pointers,
2060 based on different addend's. */
2062 typedef struct elf_linker_section_pointers
2064 /* next allocated pointer for this symbol */
2065 struct elf_linker_section_pointers *next;
2066 /* offset of pointer from beginning of section */
2070 /* which linker section this is */
2071 elf_linker_section_t *lsect;
2072 } elf_linker_section_pointers_t;
2074 struct ppc_elf_obj_tdata
2076 struct elf_obj_tdata elf;
2078 /* A mapping from local symbols to offsets into the various linker
2079 sections added. This is index by the symbol index. */
2080 elf_linker_section_pointers_t **linker_section_pointers;
2082 /* Flags used to auto-detect plt type. */
2083 unsigned int makes_plt_call : 1;
2084 unsigned int has_rel16 : 1;
2087 #define ppc_elf_tdata(bfd) \
2088 ((struct ppc_elf_obj_tdata *) (bfd)->tdata.any)
2090 #define elf_local_ptr_offsets(bfd) \
2091 (ppc_elf_tdata (bfd)->linker_section_pointers)
2093 #define is_ppc_elf(bfd) \
2094 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
2095 && elf_object_id (bfd) == PPC32_ELF_DATA)
2097 /* Rename some of the generic section flags to better document how they
2098 are used for ppc32. */
2100 /* Nonzero if this section has TLS related relocations. */
2101 #define has_tls_reloc sec_flg0
2103 /* Nonzero if this section has a call to __tls_get_addr. */
2104 #define has_tls_get_addr_call sec_flg1
2106 /* Nonzero if this secs_tls_get_addr_calltion has the VLE bit set. */
2107 #define has_vle_insns sec_flg2
2110 is_ppc_vle (asection *sec)
2112 return (sec->owner != NULL
2113 && is_ppc_elf (sec->owner)
2114 && sec->has_vle_insns);
2117 /* Override the generic function because we store some extras. */
2120 ppc_elf_mkobject (bfd *abfd)
2122 return bfd_elf_allocate_object (abfd, sizeof (struct ppc_elf_obj_tdata),
2126 /* Fix bad default arch selected for a 32 bit input bfd when the
2127 default is 64 bit. */
2130 ppc_elf_object_p (bfd *abfd)
2132 if (abfd->arch_info->the_default && abfd->arch_info->bits_per_word == 64)
2134 Elf_Internal_Ehdr *i_ehdr = elf_elfheader (abfd);
2136 if (i_ehdr->e_ident[EI_CLASS] == ELFCLASS32)
2138 /* Relies on arch after 64 bit default being 32 bit default. */
2139 abfd->arch_info = abfd->arch_info->next;
2140 BFD_ASSERT (abfd->arch_info->bits_per_word == 32);
2146 /* Function to set whether a module needs the -mrelocatable bit set. */
2149 ppc_elf_set_private_flags (bfd *abfd, flagword flags)
2151 BFD_ASSERT (!elf_flags_init (abfd)
2152 || elf_elfheader (abfd)->e_flags == flags);
2154 elf_elfheader (abfd)->e_flags = flags;
2155 elf_flags_init (abfd) = TRUE;
2159 /* Support for core dump NOTE sections. */
2162 ppc_elf_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
2167 switch (note->descsz)
2172 case 268: /* Linux/PPC. */
2174 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
2177 elf_tdata (abfd)->core_lwpid = bfd_get_32 (abfd, note->descdata + 24);
2186 /* Make a ".reg/999" section. */
2187 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
2188 size, note->descpos + offset);
2192 ppc_elf_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
2194 switch (note->descsz)
2199 case 128: /* Linux/PPC elf_prpsinfo. */
2200 elf_tdata (abfd)->core_pid
2201 = bfd_get_32 (abfd, note->descdata + 16);
2202 elf_tdata (abfd)->core_program
2203 = _bfd_elfcore_strndup (abfd, note->descdata + 32, 16);
2204 elf_tdata (abfd)->core_command
2205 = _bfd_elfcore_strndup (abfd, note->descdata + 48, 80);
2208 /* Note that for some reason, a spurious space is tacked
2209 onto the end of the args in some (at least one anyway)
2210 implementations, so strip it off if it exists. */
2213 char *command = elf_tdata (abfd)->core_command;
2214 int n = strlen (command);
2216 if (0 < n && command[n - 1] == ' ')
2217 command[n - 1] = '\0';
2224 ppc_elf_write_core_note (bfd *abfd, char *buf, int *bufsiz, int note_type, ...)
2236 va_start (ap, note_type);
2237 memset (data, 0, sizeof (data));
2238 strncpy (data + 32, va_arg (ap, const char *), 16);
2239 strncpy (data + 48, va_arg (ap, const char *), 80);
2241 return elfcore_write_note (abfd, buf, bufsiz,
2242 "CORE", note_type, data, sizeof (data));
2253 va_start (ap, note_type);
2254 memset (data, 0, 72);
2255 pid = va_arg (ap, long);
2256 bfd_put_32 (abfd, pid, data + 24);
2257 cursig = va_arg (ap, int);
2258 bfd_put_16 (abfd, cursig, data + 12);
2259 greg = va_arg (ap, const void *);
2260 memcpy (data + 72, greg, 192);
2261 memset (data + 264, 0, 4);
2263 return elfcore_write_note (abfd, buf, bufsiz,
2264 "CORE", note_type, data, sizeof (data));
2270 ppc_elf_section_flags (flagword *flags ATTRIBUTE_UNUSED,
2271 const Elf_Internal_Shdr *hdr)
2273 if (hdr->sh_flags & SHF_PPC_VLE)
2274 hdr->bfd_section->has_vle_insns = 1;
2279 ppc_elf_lookup_section_flags (char *flag_name)
2282 if (!strcmp (flag_name, "SHF_PPC_VLE"))
2288 /* Add the VLE flag if required. */
2291 ppc_elf_section_processing (bfd *abfd, Elf_Internal_Shdr *shdr)
2293 if (bfd_get_mach (abfd) == bfd_mach_ppc_vle
2294 && (shdr->sh_flags & SHF_EXECINSTR) != 0)
2295 shdr->sh_flags |= SHF_PPC_VLE;
2300 /* Return address for Ith PLT stub in section PLT, for relocation REL
2301 or (bfd_vma) -1 if it should not be included. */
2304 ppc_elf_plt_sym_val (bfd_vma i ATTRIBUTE_UNUSED,
2305 const asection *plt ATTRIBUTE_UNUSED,
2308 return rel->address;
2311 /* Handle a PowerPC specific section when reading an object file. This
2312 is called when bfd_section_from_shdr finds a section with an unknown
2316 ppc_elf_section_from_shdr (bfd *abfd,
2317 Elf_Internal_Shdr *hdr,
2324 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
2327 newsect = hdr->bfd_section;
2328 flags = bfd_get_section_flags (abfd, newsect);
2329 if (hdr->sh_flags & SHF_EXCLUDE)
2330 flags |= SEC_EXCLUDE;
2332 if (hdr->sh_type == SHT_ORDERED)
2333 flags |= SEC_SORT_ENTRIES;
2335 bfd_set_section_flags (abfd, newsect, flags);
2339 /* Set up any other section flags and such that may be necessary. */
2342 ppc_elf_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
2343 Elf_Internal_Shdr *shdr,
2346 if ((asect->flags & SEC_SORT_ENTRIES) != 0)
2347 shdr->sh_type = SHT_ORDERED;
2352 /* If we have .sbss2 or .PPC.EMB.sbss0 output sections, we
2353 need to bump up the number of section headers. */
2356 ppc_elf_additional_program_headers (bfd *abfd,
2357 struct bfd_link_info *info ATTRIBUTE_UNUSED)
2362 s = bfd_get_section_by_name (abfd, ".sbss2");
2363 if (s != NULL && (s->flags & SEC_ALLOC) != 0)
2366 s = bfd_get_section_by_name (abfd, ".PPC.EMB.sbss0");
2367 if (s != NULL && (s->flags & SEC_ALLOC) != 0)
2373 /* Modify the segment map for VLE executables. */
2376 ppc_elf_modify_segment_map (bfd *abfd,
2377 struct bfd_link_info *info ATTRIBUTE_UNUSED)
2379 struct elf_segment_map *m, *n;
2382 bfd_boolean sect0_vle, sectj_vle;
2384 /* At this point in the link, output sections have already been sorted by
2385 LMA and assigned to segments. All that is left to do is to ensure
2386 there is no mixing of VLE & non-VLE sections in a text segment.
2387 If we find that case, we split the segment.
2388 We maintain the original output section order. */
2390 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
2395 sect0_vle = is_ppc_vle (m->sections[0]);
2396 for (j = 1; j < m->count; ++j)
2398 if (is_ppc_vle (m->sections[j]) != sect0_vle)
2404 sectj_vle = is_ppc_vle (m->sections[j]);
2406 /* sections 0..j-1 stay in this (current) segment,
2407 the remainder are put in a new segment.
2408 The scan resumes with the new segment. */
2410 /* Fix the new segment. */
2411 amt = sizeof (struct elf_segment_map);
2412 amt += (m->count - j - 1) * sizeof (asection *);
2413 n = (struct elf_segment_map *) bfd_zalloc (abfd, amt);
2417 n->p_type = PT_LOAD;
2418 n->p_flags = PF_X | PF_R;
2420 n->p_flags |= PF_PPC_VLE;
2421 n->count = m->count - j;
2422 for (k = 0; k < n->count; ++k)
2424 n->sections[k] = m->sections[j+k];
2425 m->sections[j+k] = NULL;
2430 /* Fix the current segment */
2437 /* Add extra PPC sections -- Note, for now, make .sbss2 and
2438 .PPC.EMB.sbss0 a normal section, and not a bss section so
2439 that the linker doesn't crater when trying to make more than
2442 static const struct bfd_elf_special_section ppc_elf_special_sections[] =
2444 { STRING_COMMA_LEN (".plt"), 0, SHT_NOBITS, SHF_ALLOC + SHF_EXECINSTR },
2445 { STRING_COMMA_LEN (".sbss"), -2, SHT_NOBITS, SHF_ALLOC + SHF_WRITE },
2446 { STRING_COMMA_LEN (".sbss2"), -2, SHT_PROGBITS, SHF_ALLOC },
2447 { STRING_COMMA_LEN (".sdata"), -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE },
2448 { STRING_COMMA_LEN (".sdata2"), -2, SHT_PROGBITS, SHF_ALLOC },
2449 { STRING_COMMA_LEN (".tags"), 0, SHT_ORDERED, SHF_ALLOC },
2450 { STRING_COMMA_LEN (".PPC.EMB.apuinfo"), 0, SHT_NOTE, 0 },
2451 { STRING_COMMA_LEN (".PPC.EMB.sbss0"), 0, SHT_PROGBITS, SHF_ALLOC },
2452 { STRING_COMMA_LEN (".PPC.EMB.sdata0"), 0, SHT_PROGBITS, SHF_ALLOC },
2453 { NULL, 0, 0, 0, 0 }
2456 /* This is what we want for new plt/got. */
2457 static struct bfd_elf_special_section ppc_alt_plt =
2458 { STRING_COMMA_LEN (".plt"), 0, SHT_PROGBITS, SHF_ALLOC };
2460 static const struct bfd_elf_special_section *
2461 ppc_elf_get_sec_type_attr (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
2463 const struct bfd_elf_special_section *ssect;
2465 /* See if this is one of the special sections. */
2466 if (sec->name == NULL)
2469 ssect = _bfd_elf_get_special_section (sec->name, ppc_elf_special_sections,
2473 if (ssect == ppc_elf_special_sections && (sec->flags & SEC_LOAD) != 0)
2474 ssect = &ppc_alt_plt;
2478 return _bfd_elf_get_sec_type_attr (abfd, sec);
2481 /* Very simple linked list structure for recording apuinfo values. */
2482 typedef struct apuinfo_list
2484 struct apuinfo_list *next;
2485 unsigned long value;
2489 static apuinfo_list *head;
2490 static bfd_boolean apuinfo_set;
2493 apuinfo_list_init (void)
2496 apuinfo_set = FALSE;
2500 apuinfo_list_add (unsigned long value)
2502 apuinfo_list *entry = head;
2504 while (entry != NULL)
2506 if (entry->value == value)
2508 entry = entry->next;
2511 entry = bfd_malloc (sizeof (* entry));
2515 entry->value = value;
2521 apuinfo_list_length (void)
2523 apuinfo_list *entry;
2524 unsigned long count;
2526 for (entry = head, count = 0;
2528 entry = entry->next)
2534 static inline unsigned long
2535 apuinfo_list_element (unsigned long number)
2537 apuinfo_list * entry;
2541 entry = entry->next)
2544 return entry ? entry->value : 0;
2548 apuinfo_list_finish (void)
2550 apuinfo_list *entry;
2552 for (entry = head; entry;)
2554 apuinfo_list *next = entry->next;
2562 #define APUINFO_SECTION_NAME ".PPC.EMB.apuinfo"
2563 #define APUINFO_LABEL "APUinfo"
2565 /* Scan the input BFDs and create a linked list of
2566 the APUinfo values that will need to be emitted. */
2569 ppc_elf_begin_write_processing (bfd *abfd, struct bfd_link_info *link_info)
2573 char *buffer = NULL;
2574 bfd_size_type largest_input_size = 0;
2576 unsigned long length;
2577 const char *error_message = NULL;
2579 if (link_info == NULL)
2582 apuinfo_list_init ();
2584 /* Read in the input sections contents. */
2585 for (ibfd = link_info->input_bfds; ibfd; ibfd = ibfd->link_next)
2587 unsigned long datum;
2589 asec = bfd_get_section_by_name (ibfd, APUINFO_SECTION_NAME);
2593 error_message = _("corrupt %s section in %B");
2594 length = asec->size;
2599 if (largest_input_size < asec->size)
2603 largest_input_size = asec->size;
2604 buffer = bfd_malloc (largest_input_size);
2609 if (bfd_seek (ibfd, asec->filepos, SEEK_SET) != 0
2610 || (bfd_bread (buffer, length, ibfd) != length))
2612 error_message = _("unable to read in %s section from %B");
2616 /* Verify the contents of the header. Note - we have to
2617 extract the values this way in order to allow for a
2618 host whose endian-ness is different from the target. */
2619 datum = bfd_get_32 (ibfd, buffer);
2620 if (datum != sizeof APUINFO_LABEL)
2623 datum = bfd_get_32 (ibfd, buffer + 8);
2627 if (strcmp (buffer + 12, APUINFO_LABEL) != 0)
2630 /* Get the number of bytes used for apuinfo entries. */
2631 datum = bfd_get_32 (ibfd, buffer + 4);
2632 if (datum + 20 != length)
2635 /* Scan the apuinfo section, building a list of apuinfo numbers. */
2636 for (i = 0; i < datum; i += 4)
2637 apuinfo_list_add (bfd_get_32 (ibfd, buffer + 20 + i));
2640 error_message = NULL;
2644 /* Compute the size of the output section. */
2645 unsigned num_entries = apuinfo_list_length ();
2647 /* Set the output section size, if it exists. */
2648 asec = bfd_get_section_by_name (abfd, APUINFO_SECTION_NAME);
2650 if (asec && ! bfd_set_section_size (abfd, asec, 20 + num_entries * 4))
2653 error_message = _("warning: unable to set size of %s section in %B");
2662 (*_bfd_error_handler) (error_message, ibfd, APUINFO_SECTION_NAME);
2665 /* Prevent the output section from accumulating the input sections'
2666 contents. We have already stored this in our linked list structure. */
2669 ppc_elf_write_section (bfd *abfd ATTRIBUTE_UNUSED,
2670 struct bfd_link_info *link_info ATTRIBUTE_UNUSED,
2672 bfd_byte *contents ATTRIBUTE_UNUSED)
2674 return apuinfo_set && strcmp (asec->name, APUINFO_SECTION_NAME) == 0;
2677 /* Finally we can generate the output section. */
2680 ppc_elf_final_write_processing (bfd *abfd, bfd_boolean linker ATTRIBUTE_UNUSED)
2685 unsigned num_entries;
2686 bfd_size_type length;
2688 asec = bfd_get_section_by_name (abfd, APUINFO_SECTION_NAME);
2695 length = asec->size;
2699 buffer = bfd_malloc (length);
2702 (*_bfd_error_handler)
2703 (_("failed to allocate space for new APUinfo section."));
2707 /* Create the apuinfo header. */
2708 num_entries = apuinfo_list_length ();
2709 bfd_put_32 (abfd, sizeof APUINFO_LABEL, buffer);
2710 bfd_put_32 (abfd, num_entries * 4, buffer + 4);
2711 bfd_put_32 (abfd, 0x2, buffer + 8);
2712 strcpy ((char *) buffer + 12, APUINFO_LABEL);
2715 for (i = 0; i < num_entries; i++)
2717 bfd_put_32 (abfd, apuinfo_list_element (i), buffer + length);
2721 if (length != asec->size)
2722 (*_bfd_error_handler) (_("failed to compute new APUinfo section."));
2724 if (! bfd_set_section_contents (abfd, asec, buffer, (file_ptr) 0, length))
2725 (*_bfd_error_handler) (_("failed to install new APUinfo section."));
2729 apuinfo_list_finish ();
2733 is_nonpic_glink_stub (bfd *abfd, asection *glink, bfd_vma off)
2735 bfd_byte buf[GLINK_ENTRY_SIZE];
2737 if (!bfd_get_section_contents (abfd, glink, buf, off, GLINK_ENTRY_SIZE))
2740 return ((bfd_get_32 (abfd, buf + 0) & 0xffff0000) == LIS_11
2741 && (bfd_get_32 (abfd, buf + 4) & 0xffff0000) == LWZ_11_11
2742 && bfd_get_32 (abfd, buf + 8) == MTCTR_11
2743 && bfd_get_32 (abfd, buf + 12) == BCTR);
2747 section_covers_vma (bfd *abfd ATTRIBUTE_UNUSED, asection *section, void *ptr)
2749 bfd_vma vma = *(bfd_vma *) ptr;
2750 return ((section->flags & SEC_ALLOC) != 0
2751 && section->vma <= vma
2752 && vma < section->vma + section->size);
2756 ppc_elf_get_synthetic_symtab (bfd *abfd, long symcount, asymbol **syms,
2757 long dynsymcount, asymbol **dynsyms,
2760 bfd_boolean (*slurp_relocs) (bfd *, asection *, asymbol **, bfd_boolean);
2761 asection *plt, *relplt, *dynamic, *glink;
2762 bfd_vma glink_vma = 0;
2763 bfd_vma resolv_vma = 0;
2774 if ((abfd->flags & (DYNAMIC | EXEC_P)) == 0)
2777 if (dynsymcount <= 0)
2780 relplt = bfd_get_section_by_name (abfd, ".rela.plt");
2784 plt = bfd_get_section_by_name (abfd, ".plt");
2788 /* Call common code to handle old-style executable PLTs. */
2789 if (elf_section_flags (plt) & SHF_EXECINSTR)
2790 return _bfd_elf_get_synthetic_symtab (abfd, symcount, syms,
2791 dynsymcount, dynsyms, ret);
2793 /* If this object was prelinked, the prelinker stored the address
2794 of .glink at got[1]. If it wasn't prelinked, got[1] will be zero. */
2795 dynamic = bfd_get_section_by_name (abfd, ".dynamic");
2796 if (dynamic != NULL)
2798 bfd_byte *dynbuf, *extdyn, *extdynend;
2800 void (*swap_dyn_in) (bfd *, const void *, Elf_Internal_Dyn *);
2802 if (!bfd_malloc_and_get_section (abfd, dynamic, &dynbuf))
2805 extdynsize = get_elf_backend_data (abfd)->s->sizeof_dyn;
2806 swap_dyn_in = get_elf_backend_data (abfd)->s->swap_dyn_in;
2809 extdynend = extdyn + dynamic->size;
2810 for (; extdyn < extdynend; extdyn += extdynsize)
2812 Elf_Internal_Dyn dyn;
2813 (*swap_dyn_in) (abfd, extdyn, &dyn);
2815 if (dyn.d_tag == DT_NULL)
2818 if (dyn.d_tag == DT_PPC_GOT)
2820 unsigned int g_o_t = dyn.d_un.d_val;
2821 asection *got = bfd_get_section_by_name (abfd, ".got");
2823 && bfd_get_section_contents (abfd, got, buf,
2824 g_o_t - got->vma + 4, 4))
2825 glink_vma = bfd_get_32 (abfd, buf);
2832 /* Otherwise we read the first plt entry. */
2835 if (bfd_get_section_contents (abfd, plt, buf, 0, 4))
2836 glink_vma = bfd_get_32 (abfd, buf);
2842 /* The .glink section usually does not survive the final
2843 link; search for the section (usually .text) where the
2844 glink stubs now reside. */
2845 glink = bfd_sections_find_if (abfd, section_covers_vma, &glink_vma);
2849 /* Determine glink PLT resolver by reading the relative branch
2850 from the first glink stub. */
2851 if (bfd_get_section_contents (abfd, glink, buf,
2852 glink_vma - glink->vma, 4))
2854 unsigned int insn = bfd_get_32 (abfd, buf);
2856 /* The first glink stub may either branch to the resolver ... */
2858 if ((insn & ~0x3fffffc) == 0)
2859 resolv_vma = glink_vma + (insn ^ 0x2000000) - 0x2000000;
2861 /* ... or fall through a bunch of NOPs. */
2862 else if ((insn ^ B ^ NOP) == 0)
2864 bfd_get_section_contents (abfd, glink, buf,
2865 glink_vma - glink->vma + i, 4);
2867 if (bfd_get_32 (abfd, buf) != NOP)
2869 resolv_vma = glink_vma + i;
2874 count = relplt->size / sizeof (Elf32_External_Rela);
2875 stub_vma = glink_vma - (bfd_vma) count * 16;
2876 /* If the stubs are those for -shared/-pie then we might have
2877 multiple stubs for each plt entry. If that is the case then
2878 there is no way to associate stubs with their plt entries short
2879 of figuring out the GOT pointer value used in the stub. */
2880 if (!is_nonpic_glink_stub (abfd, glink,
2881 glink_vma - GLINK_ENTRY_SIZE - glink->vma))
2884 slurp_relocs = get_elf_backend_data (abfd)->s->slurp_reloc_table;
2885 if (! (*slurp_relocs) (abfd, relplt, dynsyms, TRUE))
2888 size = count * sizeof (asymbol);
2889 p = relplt->relocation;
2890 for (i = 0; i < count; i++, p++)
2892 size += strlen ((*p->sym_ptr_ptr)->name) + sizeof ("@plt");
2894 size += sizeof ("+0x") - 1 + 8;
2897 size += sizeof (asymbol) + sizeof ("__glink");
2900 size += sizeof (asymbol) + sizeof ("__glink_PLTresolve");
2902 s = *ret = bfd_malloc (size);
2906 names = (char *) (s + count + 1 + (resolv_vma != 0));
2907 p = relplt->relocation;
2908 for (i = 0; i < count; i++, p++)
2912 *s = **p->sym_ptr_ptr;
2913 /* Undefined syms won't have BSF_LOCAL or BSF_GLOBAL set. Since
2914 we are defining a symbol, ensure one of them is set. */
2915 if ((s->flags & BSF_LOCAL) == 0)
2916 s->flags |= BSF_GLOBAL;
2917 s->flags |= BSF_SYNTHETIC;
2919 s->value = stub_vma - glink->vma;
2922 len = strlen ((*p->sym_ptr_ptr)->name);
2923 memcpy (names, (*p->sym_ptr_ptr)->name, len);
2927 memcpy (names, "+0x", sizeof ("+0x") - 1);
2928 names += sizeof ("+0x") - 1;
2929 bfd_sprintf_vma (abfd, names, p->addend);
2930 names += strlen (names);
2932 memcpy (names, "@plt", sizeof ("@plt"));
2933 names += sizeof ("@plt");
2938 /* Add a symbol at the start of the glink branch table. */
2939 memset (s, 0, sizeof *s);
2941 s->flags = BSF_GLOBAL | BSF_SYNTHETIC;
2943 s->value = glink_vma - glink->vma;
2945 memcpy (names, "__glink", sizeof ("__glink"));
2946 names += sizeof ("__glink");
2952 /* Add a symbol for the glink PLT resolver. */
2953 memset (s, 0, sizeof *s);
2955 s->flags = BSF_GLOBAL | BSF_SYNTHETIC;
2957 s->value = resolv_vma - glink->vma;
2959 memcpy (names, "__glink_PLTresolve", sizeof ("__glink_PLTresolve"));
2960 names += sizeof ("__glink_PLTresolve");
2968 /* The following functions are specific to the ELF linker, while
2969 functions above are used generally. They appear in this file more
2970 or less in the order in which they are called. eg.
2971 ppc_elf_check_relocs is called early in the link process,
2972 ppc_elf_finish_dynamic_sections is one of the last functions
2975 /* Track PLT entries needed for a given symbol. We might need more
2976 than one glink entry per symbol when generating a pic binary. */
2979 struct plt_entry *next;
2981 /* -fPIC uses multiple GOT sections, one per file, called ".got2".
2982 This field stores the offset into .got2 used to initialise the
2983 GOT pointer reg. It will always be at least 32768. (Current
2984 gcc always uses an offset of 32768, but ld -r will pack .got2
2985 sections together resulting in larger offsets). */
2988 /* The .got2 section. */
2991 /* PLT refcount or offset. */
2994 bfd_signed_vma refcount;
2998 /* .glink stub offset. */
2999 bfd_vma glink_offset;
3002 /* Of those relocs that might be copied as dynamic relocs, this function
3003 selects those that must be copied when linking a shared library,
3004 even when the symbol is local. */
3007 must_be_dyn_reloc (struct bfd_link_info *info,
3008 enum elf_ppc_reloc_type r_type)
3017 case R_PPC_REL14_BRTAKEN:
3018 case R_PPC_REL14_BRNTAKEN:
3024 case R_PPC_TPREL16_LO:
3025 case R_PPC_TPREL16_HI:
3026 case R_PPC_TPREL16_HA:
3027 return !info->executable;
3031 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
3032 copying dynamic variables from a shared lib into an app's dynbss
3033 section, and instead use a dynamic relocation to point into the
3035 #define ELIMINATE_COPY_RELOCS 1
3037 /* PPC ELF linker hash entry. */
3039 struct ppc_elf_link_hash_entry
3041 struct elf_link_hash_entry elf;
3043 /* If this symbol is used in the linker created sections, the processor
3044 specific backend uses this field to map the field into the offset
3045 from the beginning of the section. */
3046 elf_linker_section_pointers_t *linker_section_pointer;
3048 /* Track dynamic relocs copied for this symbol. */
3049 struct elf_dyn_relocs *dyn_relocs;
3051 /* Contexts in which symbol is used in the GOT (or TOC).
3052 TLS_GD .. TLS_TLS bits are or'd into the mask as the
3053 corresponding relocs are encountered during check_relocs.
3054 tls_optimize clears TLS_GD .. TLS_TPREL when optimizing to
3055 indicate the corresponding GOT entry type is not needed. */
3056 #define TLS_GD 1 /* GD reloc. */
3057 #define TLS_LD 2 /* LD reloc. */
3058 #define TLS_TPREL 4 /* TPREL reloc, => IE. */
3059 #define TLS_DTPREL 8 /* DTPREL reloc, => LD. */
3060 #define TLS_TLS 16 /* Any TLS reloc. */
3061 #define TLS_TPRELGD 32 /* TPREL reloc resulting from GD->IE. */
3062 #define PLT_IFUNC 64 /* STT_GNU_IFUNC. */
3065 /* Nonzero if we have seen a small data relocation referring to this
3067 unsigned char has_sda_refs;
3070 #define ppc_elf_hash_entry(ent) ((struct ppc_elf_link_hash_entry *) (ent))
3072 /* PPC ELF linker hash table. */
3074 struct ppc_elf_link_hash_table
3076 struct elf_link_hash_table elf;
3078 /* Short-cuts to get to dynamic linker sections. */
3090 elf_linker_section_t sdata[2];
3092 asection *glink_eh_frame;
3094 /* The (unloaded but important) .rela.plt.unloaded on VxWorks. */
3097 /* The .got.plt section (VxWorks only)*/
3100 /* Shortcut to __tls_get_addr. */
3101 struct elf_link_hash_entry *tls_get_addr;
3103 /* The bfd that forced an old-style PLT. */
3106 /* TLS local dynamic got entry handling. */
3108 bfd_signed_vma refcount;
3112 /* Offset of branch table to PltResolve function in glink. */
3113 bfd_vma glink_pltresolve;
3115 /* Size of reserved GOT entries. */
3116 unsigned int got_header_size;
3117 /* Non-zero if allocating the header left a gap. */
3118 unsigned int got_gap;
3120 /* The type of PLT we have chosen to use. */
3121 enum ppc_elf_plt_type plt_type;
3123 /* Set if we should emit symbols for stubs. */
3124 unsigned int emit_stub_syms:1;
3126 /* Set if __tls_get_addr optimization should not be done. */
3127 unsigned int no_tls_get_addr_opt:1;
3129 /* True if the target system is VxWorks. */
3130 unsigned int is_vxworks:1;
3132 /* The size of PLT entries. */
3134 /* The distance between adjacent PLT slots. */
3136 /* The size of the first PLT entry. */
3137 int plt_initial_entry_size;
3139 /* Small local sym cache. */
3140 struct sym_cache sym_cache;
3143 /* Get the PPC ELF linker hash table from a link_info structure. */
3145 #define ppc_elf_hash_table(p) \
3146 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
3147 == PPC32_ELF_DATA ? ((struct ppc_elf_link_hash_table *) ((p)->hash)) : NULL)
3149 /* Create an entry in a PPC ELF linker hash table. */
3151 static struct bfd_hash_entry *
3152 ppc_elf_link_hash_newfunc (struct bfd_hash_entry *entry,
3153 struct bfd_hash_table *table,
3156 /* Allocate the structure if it has not already been allocated by a
3160 entry = bfd_hash_allocate (table,
3161 sizeof (struct ppc_elf_link_hash_entry));
3166 /* Call the allocation method of the superclass. */
3167 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
3170 ppc_elf_hash_entry (entry)->linker_section_pointer = NULL;
3171 ppc_elf_hash_entry (entry)->dyn_relocs = NULL;
3172 ppc_elf_hash_entry (entry)->tls_mask = 0;
3173 ppc_elf_hash_entry (entry)->has_sda_refs = 0;
3179 /* Create a PPC ELF linker hash table. */
3181 static struct bfd_link_hash_table *
3182 ppc_elf_link_hash_table_create (bfd *abfd)
3184 struct ppc_elf_link_hash_table *ret;
3186 ret = bfd_zmalloc (sizeof (struct ppc_elf_link_hash_table));
3190 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
3191 ppc_elf_link_hash_newfunc,
3192 sizeof (struct ppc_elf_link_hash_entry),
3199 ret->elf.init_plt_refcount.refcount = 0;
3200 ret->elf.init_plt_refcount.glist = NULL;
3201 ret->elf.init_plt_offset.offset = 0;
3202 ret->elf.init_plt_offset.glist = NULL;
3204 ret->sdata[0].name = ".sdata";
3205 ret->sdata[0].sym_name = "_SDA_BASE_";
3206 ret->sdata[0].bss_name = ".sbss";
3208 ret->sdata[1].name = ".sdata2";
3209 ret->sdata[1].sym_name = "_SDA2_BASE_";
3210 ret->sdata[1].bss_name = ".sbss2";
3212 ret->plt_entry_size = 12;
3213 ret->plt_slot_size = 8;
3214 ret->plt_initial_entry_size = 72;
3216 return &ret->elf.root;
3219 /* Create .got and the related sections. */
3222 ppc_elf_create_got (bfd *abfd, struct bfd_link_info *info)
3224 struct ppc_elf_link_hash_table *htab;
3228 if (!_bfd_elf_create_got_section (abfd, info))
3231 htab = ppc_elf_hash_table (info);
3232 htab->got = s = bfd_get_section_by_name (abfd, ".got");
3236 if (htab->is_vxworks)
3238 htab->sgotplt = bfd_get_section_by_name (abfd, ".got.plt");
3244 /* The powerpc .got has a blrl instruction in it. Mark it
3246 flags = (SEC_ALLOC | SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS
3247 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3248 if (!bfd_set_section_flags (abfd, s, flags))
3252 htab->relgot = bfd_get_section_by_name (abfd, ".rela.got");
3260 ppc_elf_create_glink (bfd *abfd, struct bfd_link_info *info)
3262 struct ppc_elf_link_hash_table *htab = ppc_elf_hash_table (info);
3266 flags = (SEC_ALLOC | SEC_LOAD | SEC_CODE | SEC_READONLY | SEC_HAS_CONTENTS
3267 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3268 s = bfd_make_section_anyway_with_flags (abfd, ".glink", flags);
3271 || !bfd_set_section_alignment (abfd, s, 4))
3274 if (!info->no_ld_generated_unwind_info)
3276 flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_HAS_CONTENTS
3277 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3278 s = bfd_make_section_anyway_with_flags (abfd, ".eh_frame", flags);
3279 htab->glink_eh_frame = s;
3281 || !bfd_set_section_alignment (abfd, s, 2))
3285 flags = SEC_ALLOC | SEC_LINKER_CREATED;
3286 s = bfd_make_section_anyway_with_flags (abfd, ".iplt", flags);
3289 || !bfd_set_section_alignment (abfd, s, 4))
3292 flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_HAS_CONTENTS
3293 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3294 s = bfd_make_section_anyway_with_flags (abfd, ".rela.iplt", flags);
3297 || ! bfd_set_section_alignment (abfd, s, 2))
3302 /* We have to create .dynsbss and .rela.sbss here so that they get mapped
3303 to output sections (just like _bfd_elf_create_dynamic_sections has
3304 to create .dynbss and .rela.bss). */
3307 ppc_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
3309 struct ppc_elf_link_hash_table *htab;
3313 htab = ppc_elf_hash_table (info);
3315 if (htab->got == NULL
3316 && !ppc_elf_create_got (abfd, info))
3319 if (!_bfd_elf_create_dynamic_sections (abfd, info))
3322 if (htab->glink == NULL
3323 && !ppc_elf_create_glink (abfd, info))
3326 htab->dynbss = bfd_get_section_by_name (abfd, ".dynbss");
3327 s = bfd_make_section_anyway_with_flags (abfd, ".dynsbss",
3328 SEC_ALLOC | SEC_LINKER_CREATED);
3335 htab->relbss = bfd_get_section_by_name (abfd, ".rela.bss");
3336 flags = (SEC_ALLOC | SEC_LOAD | SEC_READONLY | SEC_HAS_CONTENTS
3337 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3338 s = bfd_make_section_anyway_with_flags (abfd, ".rela.sbss", flags);
3341 || ! bfd_set_section_alignment (abfd, s, 2))
3345 if (htab->is_vxworks
3346 && !elf_vxworks_create_dynamic_sections (abfd, info, &htab->srelplt2))
3349 htab->relplt = bfd_get_section_by_name (abfd, ".rela.plt");
3350 htab->plt = s = bfd_get_section_by_name (abfd, ".plt");
3354 flags = SEC_ALLOC | SEC_CODE | SEC_LINKER_CREATED;
3355 if (htab->plt_type == PLT_VXWORKS)
3356 /* The VxWorks PLT is a loaded section with contents. */
3357 flags |= SEC_HAS_CONTENTS | SEC_LOAD | SEC_READONLY;
3358 return bfd_set_section_flags (abfd, s, flags);
3361 /* Copy the extra info we tack onto an elf_link_hash_entry. */
3364 ppc_elf_copy_indirect_symbol (struct bfd_link_info *info,
3365 struct elf_link_hash_entry *dir,
3366 struct elf_link_hash_entry *ind)
3368 struct ppc_elf_link_hash_entry *edir, *eind;
3370 edir = (struct ppc_elf_link_hash_entry *) dir;
3371 eind = (struct ppc_elf_link_hash_entry *) ind;
3373 edir->tls_mask |= eind->tls_mask;
3374 edir->has_sda_refs |= eind->has_sda_refs;
3376 /* If called to transfer flags for a weakdef during processing
3377 of elf_adjust_dynamic_symbol, don't copy non_got_ref.
3378 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
3379 if (!(ELIMINATE_COPY_RELOCS
3380 && eind->elf.root.type != bfd_link_hash_indirect
3381 && edir->elf.dynamic_adjusted))
3382 edir->elf.non_got_ref |= eind->elf.non_got_ref;
3384 edir->elf.ref_dynamic |= eind->elf.ref_dynamic;
3385 edir->elf.ref_regular |= eind->elf.ref_regular;
3386 edir->elf.ref_regular_nonweak |= eind->elf.ref_regular_nonweak;
3387 edir->elf.needs_plt |= eind->elf.needs_plt;
3388 edir->elf.pointer_equality_needed |= eind->elf.pointer_equality_needed;
3390 if (eind->dyn_relocs != NULL)
3392 if (edir->dyn_relocs != NULL)
3394 struct elf_dyn_relocs **pp;
3395 struct elf_dyn_relocs *p;
3397 /* Add reloc counts against the indirect sym to the direct sym
3398 list. Merge any entries against the same section. */
3399 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
3401 struct elf_dyn_relocs *q;
3403 for (q = edir->dyn_relocs; q != NULL; q = q->next)
3404 if (q->sec == p->sec)
3406 q->pc_count += p->pc_count;
3407 q->count += p->count;
3414 *pp = edir->dyn_relocs;
3417 edir->dyn_relocs = eind->dyn_relocs;
3418 eind->dyn_relocs = NULL;
3421 /* If we were called to copy over info for a weak sym, that's all.
3422 You might think dyn_relocs need not be copied over; After all,
3423 both syms will be dynamic or both non-dynamic so we're just
3424 moving reloc accounting around. However, ELIMINATE_COPY_RELOCS
3425 code in ppc_elf_adjust_dynamic_symbol needs to check for
3426 dyn_relocs in read-only sections, and it does so on what is the
3428 if (eind->elf.root.type != bfd_link_hash_indirect)
3431 /* Copy over the GOT refcount entries that we may have already seen to
3432 the symbol which just became indirect. */
3433 edir->elf.got.refcount += eind->elf.got.refcount;
3434 eind->elf.got.refcount = 0;
3436 /* And plt entries. */
3437 if (eind->elf.plt.plist != NULL)
3439 if (edir->elf.plt.plist != NULL)
3441 struct plt_entry **entp;
3442 struct plt_entry *ent;
3444 for (entp = &eind->elf.plt.plist; (ent = *entp) != NULL; )
3446 struct plt_entry *dent;
3448 for (dent = edir->elf.plt.plist; dent != NULL; dent = dent->next)
3449 if (dent->sec == ent->sec && dent->addend == ent->addend)
3451 dent->plt.refcount += ent->plt.refcount;
3458 *entp = edir->elf.plt.plist;
3461 edir->elf.plt.plist = eind->elf.plt.plist;
3462 eind->elf.plt.plist = NULL;
3465 if (eind->elf.dynindx != -1)
3467 if (edir->elf.dynindx != -1)
3468 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
3469 edir->elf.dynstr_index);
3470 edir->elf.dynindx = eind->elf.dynindx;
3471 edir->elf.dynstr_index = eind->elf.dynstr_index;
3472 eind->elf.dynindx = -1;
3473 eind->elf.dynstr_index = 0;
3477 /* Hook called by the linker routine which adds symbols from an object
3478 file. We use it to put .comm items in .sbss, and not .bss. */
3481 ppc_elf_add_symbol_hook (bfd *abfd,
3482 struct bfd_link_info *info,
3483 Elf_Internal_Sym *sym,
3484 const char **namep ATTRIBUTE_UNUSED,
3485 flagword *flagsp ATTRIBUTE_UNUSED,
3489 if (sym->st_shndx == SHN_COMMON
3490 && !info->relocatable
3491 && is_ppc_elf (info->output_bfd)
3492 && sym->st_size <= elf_gp_size (abfd))
3494 /* Common symbols less than or equal to -G nn bytes are automatically
3496 struct ppc_elf_link_hash_table *htab;
3498 htab = ppc_elf_hash_table (info);
3499 if (htab->sbss == NULL)
3501 flagword flags = SEC_IS_COMMON | SEC_LINKER_CREATED;
3503 if (!htab->elf.dynobj)
3504 htab->elf.dynobj = abfd;
3506 htab->sbss = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
3509 if (htab->sbss == NULL)
3514 *valp = sym->st_size;
3517 if ((abfd->flags & DYNAMIC) == 0
3518 && (ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC
3519 || ELF_ST_BIND (sym->st_info) == STB_GNU_UNIQUE))
3520 elf_tdata (info->output_bfd)->has_gnu_symbols = TRUE;
3526 create_sdata_sym (struct bfd_link_info *info, elf_linker_section_t *lsect)
3528 struct ppc_elf_link_hash_table *htab = ppc_elf_hash_table (info);
3530 lsect->sym = elf_link_hash_lookup (&htab->elf, lsect->sym_name,
3532 if (lsect->sym == NULL)
3534 if (lsect->sym->root.type == bfd_link_hash_new)
3535 lsect->sym->non_elf = 0;
3536 lsect->sym->ref_regular = 1;
3537 _bfd_elf_link_hash_hide_symbol (info, lsect->sym, TRUE);
3541 /* Create a special linker section. */
3544 ppc_elf_create_linker_section (bfd *abfd,
3545 struct bfd_link_info *info,
3547 elf_linker_section_t *lsect)
3549 struct ppc_elf_link_hash_table *htab = ppc_elf_hash_table (info);
3552 flags |= (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
3553 | SEC_LINKER_CREATED);
3555 /* Record the first bfd that needs the special sections. */
3556 if (!htab->elf.dynobj)
3557 htab->elf.dynobj = abfd;
3559 s = bfd_make_section_anyway_with_flags (htab->elf.dynobj,
3563 || !bfd_set_section_alignment (htab->elf.dynobj, s, 2))
3567 return create_sdata_sym (info, lsect);
3570 /* Find a linker generated pointer with a given addend and type. */
3572 static elf_linker_section_pointers_t *
3573 elf_find_pointer_linker_section
3574 (elf_linker_section_pointers_t *linker_pointers,
3576 elf_linker_section_t *lsect)
3578 for ( ; linker_pointers != NULL; linker_pointers = linker_pointers->next)
3579 if (lsect == linker_pointers->lsect && addend == linker_pointers->addend)
3580 return linker_pointers;
3585 /* Allocate a pointer to live in a linker created section. */
3588 elf_create_pointer_linker_section (bfd *abfd,
3589 elf_linker_section_t *lsect,
3590 struct elf_link_hash_entry *h,
3591 const Elf_Internal_Rela *rel)
3593 elf_linker_section_pointers_t **ptr_linker_section_ptr = NULL;
3594 elf_linker_section_pointers_t *linker_section_ptr;
3595 unsigned long r_symndx = ELF32_R_SYM (rel->r_info);
3598 BFD_ASSERT (lsect != NULL);
3600 /* Is this a global symbol? */
3603 struct ppc_elf_link_hash_entry *eh;
3605 /* Has this symbol already been allocated? If so, our work is done. */
3606 eh = (struct ppc_elf_link_hash_entry *) h;
3607 if (elf_find_pointer_linker_section (eh->linker_section_pointer,
3612 ptr_linker_section_ptr = &eh->linker_section_pointer;
3616 BFD_ASSERT (is_ppc_elf (abfd));
3618 /* Allocation of a pointer to a local symbol. */
3619 elf_linker_section_pointers_t **ptr = elf_local_ptr_offsets (abfd);
3621 /* Allocate a table to hold the local symbols if first time. */
3624 unsigned int num_symbols = elf_symtab_hdr (abfd).sh_info;
3627 amt *= sizeof (elf_linker_section_pointers_t *);
3628 ptr = bfd_zalloc (abfd, amt);
3633 elf_local_ptr_offsets (abfd) = ptr;
3636 /* Has this symbol already been allocated? If so, our work is done. */
3637 if (elf_find_pointer_linker_section (ptr[r_symndx],
3642 ptr_linker_section_ptr = &ptr[r_symndx];
3645 /* Allocate space for a pointer in the linker section, and allocate
3646 a new pointer record from internal memory. */
3647 BFD_ASSERT (ptr_linker_section_ptr != NULL);
3648 amt = sizeof (elf_linker_section_pointers_t);
3649 linker_section_ptr = bfd_alloc (abfd, amt);
3651 if (!linker_section_ptr)
3654 linker_section_ptr->next = *ptr_linker_section_ptr;
3655 linker_section_ptr->addend = rel->r_addend;
3656 linker_section_ptr->lsect = lsect;
3657 *ptr_linker_section_ptr = linker_section_ptr;
3659 linker_section_ptr->offset = lsect->section->size;
3660 lsect->section->size += 4;
3664 "Create pointer in linker section %s, offset = %ld, section size = %ld\n",
3665 lsect->name, (long) linker_section_ptr->offset,
3666 (long) lsect->section->size);
3672 static struct plt_entry **
3673 update_local_sym_info (bfd *abfd,
3674 Elf_Internal_Shdr *symtab_hdr,
3675 unsigned long r_symndx,
3678 bfd_signed_vma *local_got_refcounts = elf_local_got_refcounts (abfd);
3679 struct plt_entry **local_plt;
3680 char *local_got_tls_masks;
3682 if (local_got_refcounts == NULL)
3684 bfd_size_type size = symtab_hdr->sh_info;
3686 size *= (sizeof (*local_got_refcounts)
3687 + sizeof (*local_plt)
3688 + sizeof (*local_got_tls_masks));
3689 local_got_refcounts = bfd_zalloc (abfd, size);
3690 if (local_got_refcounts == NULL)
3692 elf_local_got_refcounts (abfd) = local_got_refcounts;
3695 local_plt = (struct plt_entry **) (local_got_refcounts + symtab_hdr->sh_info);
3696 local_got_tls_masks = (char *) (local_plt + symtab_hdr->sh_info);
3697 local_got_tls_masks[r_symndx] |= tls_type;
3698 if (tls_type != PLT_IFUNC)
3699 local_got_refcounts[r_symndx] += 1;
3700 return local_plt + r_symndx;
3704 update_plt_info (bfd *abfd, struct plt_entry **plist,
3705 asection *sec, bfd_vma addend)
3707 struct plt_entry *ent;
3711 for (ent = *plist; ent != NULL; ent = ent->next)
3712 if (ent->sec == sec && ent->addend == addend)
3716 bfd_size_type amt = sizeof (*ent);
3717 ent = bfd_alloc (abfd, amt);
3722 ent->addend = addend;
3723 ent->plt.refcount = 0;
3726 ent->plt.refcount += 1;
3730 static struct plt_entry *
3731 find_plt_ent (struct plt_entry **plist, asection *sec, bfd_vma addend)
3733 struct plt_entry *ent;
3737 for (ent = *plist; ent != NULL; ent = ent->next)
3738 if (ent->sec == sec && ent->addend == addend)
3744 is_branch_reloc (enum elf_ppc_reloc_type r_type)
3746 return (r_type == R_PPC_PLTREL24
3747 || r_type == R_PPC_LOCAL24PC
3748 || r_type == R_PPC_REL24
3749 || r_type == R_PPC_REL14
3750 || r_type == R_PPC_REL14_BRTAKEN
3751 || r_type == R_PPC_REL14_BRNTAKEN
3752 || r_type == R_PPC_ADDR24
3753 || r_type == R_PPC_ADDR14
3754 || r_type == R_PPC_ADDR14_BRTAKEN
3755 || r_type == R_PPC_ADDR14_BRNTAKEN);
3759 bad_shared_reloc (bfd *abfd, enum elf_ppc_reloc_type r_type)
3761 (*_bfd_error_handler)
3762 (_("%B: relocation %s cannot be used when making a shared object"),
3764 ppc_elf_howto_table[r_type]->name);
3765 bfd_set_error (bfd_error_bad_value);
3768 /* Look through the relocs for a section during the first phase, and
3769 allocate space in the global offset table or procedure linkage
3773 ppc_elf_check_relocs (bfd *abfd,
3774 struct bfd_link_info *info,
3776 const Elf_Internal_Rela *relocs)
3778 struct ppc_elf_link_hash_table *htab;
3779 Elf_Internal_Shdr *symtab_hdr;
3780 struct elf_link_hash_entry **sym_hashes;
3781 const Elf_Internal_Rela *rel;
3782 const Elf_Internal_Rela *rel_end;
3783 asection *got2, *sreloc;
3784 struct elf_link_hash_entry *tga;
3786 if (info->relocatable)
3789 /* Don't do anything special with non-loaded, non-alloced sections.
3790 In particular, any relocs in such sections should not affect GOT
3791 and PLT reference counting (ie. we don't allow them to create GOT
3792 or PLT entries), there's no possibility or desire to optimize TLS
3793 relocs, and there's not much point in propagating relocs to shared
3794 libs that the dynamic linker won't relocate. */
3795 if ((sec->flags & SEC_ALLOC) == 0)
3799 _bfd_error_handler ("ppc_elf_check_relocs called for section %A in %B",
3803 BFD_ASSERT (is_ppc_elf (abfd));
3805 /* Initialize howto table if not already done. */
3806 if (!ppc_elf_howto_table[R_PPC_ADDR32])
3807 ppc_elf_howto_init ();
3809 htab = ppc_elf_hash_table (info);
3810 if (htab->glink == NULL)
3812 if (htab->elf.dynobj == NULL)
3813 htab->elf.dynobj = abfd;
3814 if (!ppc_elf_create_glink (htab->elf.dynobj, info))
3817 tga = elf_link_hash_lookup (&htab->elf, "__tls_get_addr",
3818 FALSE, FALSE, TRUE);
3819 symtab_hdr = &elf_symtab_hdr (abfd);
3820 sym_hashes = elf_sym_hashes (abfd);
3821 got2 = bfd_get_section_by_name (abfd, ".got2");
3824 rel_end = relocs + sec->reloc_count;
3825 for (rel = relocs; rel < rel_end; rel++)
3827 unsigned long r_symndx;
3828 enum elf_ppc_reloc_type r_type;
3829 struct elf_link_hash_entry *h;
3832 r_symndx = ELF32_R_SYM (rel->r_info);
3833 if (r_symndx < symtab_hdr->sh_info)
3837 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3838 while (h->root.type == bfd_link_hash_indirect
3839 || h->root.type == bfd_link_hash_warning)
3840 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3843 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
3844 This shows up in particular in an R_PPC_ADDR32 in the eabi
3847 && htab->got == NULL
3848 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3850 if (htab->elf.dynobj == NULL)
3851 htab->elf.dynobj = abfd;
3852 if (!ppc_elf_create_got (htab->elf.dynobj, info))
3854 BFD_ASSERT (h == htab->elf.hgot);
3858 r_type = ELF32_R_TYPE (rel->r_info);
3859 if (h == NULL && !htab->is_vxworks)
3861 Elf_Internal_Sym *isym = bfd_sym_from_r_symndx (&htab->sym_cache,
3866 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC
3868 || is_branch_reloc (r_type)))
3870 struct plt_entry **ifunc;
3873 ifunc = update_local_sym_info (abfd, symtab_hdr, r_symndx,
3878 /* STT_GNU_IFUNC symbols must have a PLT entry;
3879 In a non-pie executable even when there are
3882 if (r_type == R_PPC_PLTREL24)
3884 ppc_elf_tdata (abfd)->makes_plt_call = 1;
3886 addend = rel->r_addend;
3888 if (!update_plt_info (abfd, ifunc, got2, addend))
3893 if (!htab->is_vxworks
3894 && is_branch_reloc (r_type)
3899 && (ELF32_R_TYPE (rel[-1].r_info) == R_PPC_TLSGD
3900 || ELF32_R_TYPE (rel[-1].r_info) == R_PPC_TLSLD))
3901 /* We have a new-style __tls_get_addr call with a marker
3905 /* Mark this section as having an old-style call. */
3906 sec->has_tls_get_addr_call = 1;
3913 /* These special tls relocs tie a call to __tls_get_addr with
3914 its parameter symbol. */
3917 case R_PPC_GOT_TLSLD16:
3918 case R_PPC_GOT_TLSLD16_LO:
3919 case R_PPC_GOT_TLSLD16_HI:
3920 case R_PPC_GOT_TLSLD16_HA:
3921 tls_type = TLS_TLS | TLS_LD;
3924 case R_PPC_GOT_TLSGD16:
3925 case R_PPC_GOT_TLSGD16_LO:
3926 case R_PPC_GOT_TLSGD16_HI:
3927 case R_PPC_GOT_TLSGD16_HA:
3928 tls_type = TLS_TLS | TLS_GD;
3931 case R_PPC_GOT_TPREL16:
3932 case R_PPC_GOT_TPREL16_LO:
3933 case R_PPC_GOT_TPREL16_HI:
3934 case R_PPC_GOT_TPREL16_HA:
3935 if (!info->executable)
3936 info->flags |= DF_STATIC_TLS;
3937 tls_type = TLS_TLS | TLS_TPREL;
3940 case R_PPC_GOT_DTPREL16:
3941 case R_PPC_GOT_DTPREL16_LO:
3942 case R_PPC_GOT_DTPREL16_HI:
3943 case R_PPC_GOT_DTPREL16_HA:
3944 tls_type = TLS_TLS | TLS_DTPREL;
3946 sec->has_tls_reloc = 1;
3949 /* GOT16 relocations */
3951 case R_PPC_GOT16_LO:
3952 case R_PPC_GOT16_HI:
3953 case R_PPC_GOT16_HA:
3954 /* This symbol requires a global offset table entry. */
3955 if (htab->got == NULL)
3957 if (htab->elf.dynobj == NULL)
3958 htab->elf.dynobj = abfd;
3959 if (!ppc_elf_create_got (htab->elf.dynobj, info))
3964 h->got.refcount += 1;
3965 ppc_elf_hash_entry (h)->tls_mask |= tls_type;
3968 /* This is a global offset table entry for a local symbol. */
3969 if (!update_local_sym_info (abfd, symtab_hdr, r_symndx, tls_type))
3972 /* We may also need a plt entry if the symbol turns out to be
3974 if (h != NULL && !info->shared)
3976 if (!update_plt_info (abfd, &h->plt.plist, NULL, 0))
3981 /* Indirect .sdata relocation. */
3982 case R_PPC_EMB_SDAI16:
3985 bad_shared_reloc (abfd, r_type);
3988 if (htab->sdata[0].section == NULL
3989 && !ppc_elf_create_linker_section (abfd, info, 0,
3992 if (!elf_create_pointer_linker_section (abfd, &htab->sdata[0],
3997 ppc_elf_hash_entry (h)->has_sda_refs = TRUE;
3998 h->non_got_ref = TRUE;
4002 /* Indirect .sdata2 relocation. */
4003 case R_PPC_EMB_SDA2I16:
4006 bad_shared_reloc (abfd, r_type);
4009 if (htab->sdata[1].section == NULL
4010 && !ppc_elf_create_linker_section (abfd, info, SEC_READONLY,
4013 if (!elf_create_pointer_linker_section (abfd, &htab->sdata[1],
4018 ppc_elf_hash_entry (h)->has_sda_refs = TRUE;
4019 h->non_got_ref = TRUE;
4023 case R_PPC_VLE_SDAREL_LO16A:
4024 case R_PPC_VLE_SDAREL_LO16D:
4025 case R_PPC_VLE_SDAREL_HI16A:
4026 case R_PPC_VLE_SDAREL_HI16D:
4027 case R_PPC_VLE_SDAREL_HA16A:
4028 case R_PPC_VLE_SDAREL_HA16D:
4029 case R_PPC_SDAREL16:
4030 if (htab->sdata[0].sym == NULL
4031 && !create_sdata_sym (info, &htab->sdata[0]))
4034 if (htab->sdata[1].sym == NULL
4035 && !create_sdata_sym (info, &htab->sdata[1]))
4040 ppc_elf_hash_entry (h)->has_sda_refs = TRUE;
4041 h->non_got_ref = TRUE;
4045 case R_PPC_VLE_REL8:
4046 case R_PPC_VLE_REL15:
4047 case R_PPC_VLE_REL24:
4048 case R_PPC_VLE_LO16A:
4049 case R_PPC_VLE_LO16D:
4050 case R_PPC_VLE_HI16A:
4051 case R_PPC_VLE_HI16D:
4052 case R_PPC_VLE_HA16A:
4053 case R_PPC_VLE_HA16D:
4056 case R_PPC_EMB_SDA2REL:
4059 bad_shared_reloc (abfd, r_type);
4062 if (htab->sdata[1].sym == NULL
4063 && !create_sdata_sym (info, &htab->sdata[1]))
4067 ppc_elf_hash_entry (h)->has_sda_refs = TRUE;
4068 h->non_got_ref = TRUE;
4072 case R_PPC_VLE_SDA21_LO:
4073 case R_PPC_VLE_SDA21:
4074 case R_PPC_EMB_SDA21:
4075 case R_PPC_EMB_RELSDA:
4078 bad_shared_reloc (abfd, r_type);
4081 if (htab->sdata[0].sym == NULL
4082 && !create_sdata_sym (info, &htab->sdata[0]))
4084 if (htab->sdata[1].sym == NULL
4085 && !create_sdata_sym (info, &htab->sdata[1]))
4089 ppc_elf_hash_entry (h)->has_sda_refs = TRUE;
4090 h->non_got_ref = TRUE;
4094 case R_PPC_EMB_NADDR32:
4095 case R_PPC_EMB_NADDR16:
4096 case R_PPC_EMB_NADDR16_LO:
4097 case R_PPC_EMB_NADDR16_HI:
4098 case R_PPC_EMB_NADDR16_HA:
4101 bad_shared_reloc (abfd, r_type);
4105 h->non_got_ref = TRUE;
4108 case R_PPC_PLTREL24:
4113 case R_PPC_PLTREL32:
4114 case R_PPC_PLT16_LO:
4115 case R_PPC_PLT16_HI:
4116 case R_PPC_PLT16_HA:
4118 fprintf (stderr, "Reloc requires a PLT entry\n");
4120 /* This symbol requires a procedure linkage table entry. We
4121 actually build the entry in finish_dynamic_symbol,
4122 because this might be a case of linking PIC code without
4123 linking in any dynamic objects, in which case we don't
4124 need to generate a procedure linkage table after all. */
4128 /* It does not make sense to have a procedure linkage
4129 table entry for a local symbol. */
4130 info->callbacks->einfo (_("%P: %H: %s reloc against local symbol\n"),
4131 abfd, sec, rel->r_offset,
4132 ppc_elf_howto_table[r_type]->name);
4133 bfd_set_error (bfd_error_bad_value);
4140 if (r_type == R_PPC_PLTREL24)
4142 ppc_elf_tdata (abfd)->makes_plt_call = 1;
4144 addend = rel->r_addend;
4147 if (!update_plt_info (abfd, &h->plt.plist, got2, addend))
4152 /* The following relocations don't need to propagate the
4153 relocation if linking a shared object since they are
4154 section relative. */
4156 case R_PPC_SECTOFF_LO:
4157 case R_PPC_SECTOFF_HI:
4158 case R_PPC_SECTOFF_HA:
4159 case R_PPC_DTPREL16:
4160 case R_PPC_DTPREL16_LO:
4161 case R_PPC_DTPREL16_HI:
4162 case R_PPC_DTPREL16_HA:
4167 case R_PPC_REL16_LO:
4168 case R_PPC_REL16_HI:
4169 case R_PPC_REL16_HA:
4170 ppc_elf_tdata (abfd)->has_rel16 = 1;
4173 /* These are just markers. */
4175 case R_PPC_EMB_MRKREF:
4179 case R_PPC_RELAX_PLT:
4180 case R_PPC_RELAX_PLTREL24:
4183 /* These should only appear in dynamic objects. */
4185 case R_PPC_GLOB_DAT:
4186 case R_PPC_JMP_SLOT:
4187 case R_PPC_RELATIVE:
4188 case R_PPC_IRELATIVE:
4191 /* These aren't handled yet. We'll report an error later. */
4193 case R_PPC_EMB_RELSEC16:
4194 case R_PPC_EMB_RELST_LO:
4195 case R_PPC_EMB_RELST_HI:
4196 case R_PPC_EMB_RELST_HA:
4197 case R_PPC_EMB_BIT_FLD:
4200 /* This refers only to functions defined in the shared library. */
4201 case R_PPC_LOCAL24PC:
4202 if (h != NULL && h == htab->elf.hgot && htab->plt_type == PLT_UNSET)
4204 htab->plt_type = PLT_OLD;
4205 htab->old_bfd = abfd;
4209 /* This relocation describes the C++ object vtable hierarchy.
4210 Reconstruct it for later use during GC. */
4211 case R_PPC_GNU_VTINHERIT:
4212 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
4216 /* This relocation describes which C++ vtable entries are actually
4217 used. Record for later use during GC. */
4218 case R_PPC_GNU_VTENTRY:
4219 BFD_ASSERT (h != NULL);
4221 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
4225 /* We shouldn't really be seeing these. */
4228 case R_PPC_TPREL16_LO:
4229 case R_PPC_TPREL16_HI:
4230 case R_PPC_TPREL16_HA:
4231 if (!info->executable)
4232 info->flags |= DF_STATIC_TLS;
4236 case R_PPC_DTPMOD32:
4237 case R_PPC_DTPREL32:
4243 && (sec->flags & SEC_CODE) != 0
4245 && htab->plt_type == PLT_UNSET)
4247 /* Old -fPIC gcc code has .long LCTOC1-LCFx just before
4248 the start of a function, which assembles to a REL32
4249 reference to .got2. If we detect one of these, then
4250 force the old PLT layout because the linker cannot
4251 reliably deduce the GOT pointer value needed for
4254 Elf_Internal_Sym *isym;
4256 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
4261 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
4264 htab->plt_type = PLT_OLD;
4265 htab->old_bfd = abfd;
4268 if (h == NULL || h == htab->elf.hgot)
4274 case R_PPC_ADDR16_LO:
4275 case R_PPC_ADDR16_HI:
4276 case R_PPC_ADDR16_HA:
4279 if (h != NULL && !info->shared)
4281 /* We may need a plt entry if the symbol turns out to be
4282 a function defined in a dynamic object. */
4283 if (!update_plt_info (abfd, &h->plt.plist, NULL, 0))
4286 /* We may need a copy reloc too. */
4288 h->pointer_equality_needed = 1;
4294 case R_PPC_REL14_BRTAKEN:
4295 case R_PPC_REL14_BRNTAKEN:
4298 if (h == htab->elf.hgot)
4300 if (htab->plt_type == PLT_UNSET)
4302 htab->plt_type = PLT_OLD;
4303 htab->old_bfd = abfd;
4311 case R_PPC_ADDR14_BRTAKEN:
4312 case R_PPC_ADDR14_BRNTAKEN:
4313 if (h != NULL && !info->shared)
4315 /* We may need a plt entry if the symbol turns out to be
4316 a function defined in a dynamic object. */
4318 if (!update_plt_info (abfd, &h->plt.plist, NULL, 0))
4324 /* If we are creating a shared library, and this is a reloc
4325 against a global symbol, or a non PC relative reloc
4326 against a local symbol, then we need to copy the reloc
4327 into the shared library. However, if we are linking with
4328 -Bsymbolic, we do not need to copy a reloc against a
4329 global symbol which is defined in an object we are
4330 including in the link (i.e., DEF_REGULAR is set). At
4331 this point we have not seen all the input files, so it is
4332 possible that DEF_REGULAR is not set now but will be set
4333 later (it is never cleared). In case of a weak definition,
4334 DEF_REGULAR may be cleared later by a strong definition in
4335 a shared library. We account for that possibility below by
4336 storing information in the dyn_relocs field of the hash
4337 table entry. A similar situation occurs when creating
4338 shared libraries and symbol visibility changes render the
4341 If on the other hand, we are creating an executable, we
4342 may need to keep relocations for symbols satisfied by a
4343 dynamic library if we manage to avoid copy relocs for the
4346 && (must_be_dyn_reloc (info, r_type)
4348 && (! info->symbolic
4349 || h->root.type == bfd_link_hash_defweak
4350 || !h->def_regular))))
4351 || (ELIMINATE_COPY_RELOCS
4354 && (h->root.type == bfd_link_hash_defweak
4355 || !h->def_regular)))
4357 struct elf_dyn_relocs *p;
4358 struct elf_dyn_relocs **rel_head;
4362 "ppc_elf_check_relocs needs to "
4363 "create relocation for %s\n",
4364 (h && h->root.root.string
4365 ? h->root.root.string : "<unknown>"));
4369 if (htab->elf.dynobj == NULL)
4370 htab->elf.dynobj = abfd;
4372 sreloc = _bfd_elf_make_dynamic_reloc_section
4373 (sec, htab->elf.dynobj, 2, abfd, /*rela?*/ TRUE);
4379 /* If this is a global symbol, we count the number of
4380 relocations we need for this symbol. */
4383 rel_head = &ppc_elf_hash_entry (h)->dyn_relocs;
4387 /* Track dynamic relocs needed for local syms too.
4388 We really need local syms available to do this
4392 Elf_Internal_Sym *isym;
4394 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
4399 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
4403 vpp = &elf_section_data (s)->local_dynrel;
4404 rel_head = (struct elf_dyn_relocs **) vpp;
4408 if (p == NULL || p->sec != sec)
4410 p = bfd_alloc (htab->elf.dynobj, sizeof *p);
4413 p->next = *rel_head;
4421 if (!must_be_dyn_reloc (info, r_type))
4433 /* Merge object attributes from IBFD into OBFD. Raise an error if
4434 there are conflicting attributes. */
4436 ppc_elf_merge_obj_attributes (bfd *ibfd, bfd *obfd)
4438 obj_attribute *in_attr, *in_attrs;
4439 obj_attribute *out_attr, *out_attrs;
4441 if (!elf_known_obj_attributes_proc (obfd)[0].i)
4443 /* This is the first object. Copy the attributes. */
4444 _bfd_elf_copy_obj_attributes (ibfd, obfd);
4446 /* Use the Tag_null value to indicate the attributes have been
4448 elf_known_obj_attributes_proc (obfd)[0].i = 1;
4453 in_attrs = elf_known_obj_attributes (ibfd)[OBJ_ATTR_GNU];
4454 out_attrs = elf_known_obj_attributes (obfd)[OBJ_ATTR_GNU];
4456 /* Check for conflicting Tag_GNU_Power_ABI_FP attributes and merge
4457 non-conflicting ones. */
4458 in_attr = &in_attrs[Tag_GNU_Power_ABI_FP];
4459 out_attr = &out_attrs[Tag_GNU_Power_ABI_FP];
4460 if (in_attr->i != out_attr->i)
4463 if (out_attr->i == 0)
4464 out_attr->i = in_attr->i;
4465 else if (in_attr->i == 0)
4467 else if (out_attr->i == 1 && in_attr->i == 2)
4469 (_("Warning: %B uses hard float, %B uses soft float"), obfd, ibfd);
4470 else if (out_attr->i == 1 && in_attr->i == 3)
4472 (_("Warning: %B uses double-precision hard float, %B uses single-precision hard float"),
4474 else if (out_attr->i == 3 && in_attr->i == 1)
4476 (_("Warning: %B uses double-precision hard float, %B uses single-precision hard float"),
4478 else if (out_attr->i == 3 && in_attr->i == 2)
4480 (_("Warning: %B uses soft float, %B uses single-precision hard float"),
4482 else if (out_attr->i == 2 && (in_attr->i == 1 || in_attr->i == 3))
4484 (_("Warning: %B uses hard float, %B uses soft float"), ibfd, obfd);
4485 else if (in_attr->i > 3)
4487 (_("Warning: %B uses unknown floating point ABI %d"), ibfd,
4491 (_("Warning: %B uses unknown floating point ABI %d"), obfd,
4495 /* Check for conflicting Tag_GNU_Power_ABI_Vector attributes and
4496 merge non-conflicting ones. */
4497 in_attr = &in_attrs[Tag_GNU_Power_ABI_Vector];
4498 out_attr = &out_attrs[Tag_GNU_Power_ABI_Vector];
4499 if (in_attr->i != out_attr->i)
4501 const char *in_abi = NULL, *out_abi = NULL;
4505 case 1: in_abi = "generic"; break;
4506 case 2: in_abi = "AltiVec"; break;
4507 case 3: in_abi = "SPE"; break;
4510 switch (out_attr->i)
4512 case 1: out_abi = "generic"; break;
4513 case 2: out_abi = "AltiVec"; break;
4514 case 3: out_abi = "SPE"; break;
4518 if (out_attr->i == 0)
4519 out_attr->i = in_attr->i;
4520 else if (in_attr->i == 0)
4522 /* For now, allow generic to transition to AltiVec or SPE
4523 without a warning. If GCC marked files with their stack
4524 alignment and used don't-care markings for files which are
4525 not affected by the vector ABI, we could warn about this
4527 else if (out_attr->i == 1)
4528 out_attr->i = in_attr->i;
4529 else if (in_attr->i == 1)
4531 else if (in_abi == NULL)
4533 (_("Warning: %B uses unknown vector ABI %d"), ibfd,
4535 else if (out_abi == NULL)
4537 (_("Warning: %B uses unknown vector ABI %d"), obfd,
4541 (_("Warning: %B uses vector ABI \"%s\", %B uses \"%s\""),
4542 ibfd, obfd, in_abi, out_abi);
4545 /* Check for conflicting Tag_GNU_Power_ABI_Struct_Return attributes
4546 and merge non-conflicting ones. */
4547 in_attr = &in_attrs[Tag_GNU_Power_ABI_Struct_Return];
4548 out_attr = &out_attrs[Tag_GNU_Power_ABI_Struct_Return];
4549 if (in_attr->i != out_attr->i)
4552 if (out_attr->i == 0)
4553 out_attr->i = in_attr->i;
4554 else if (in_attr->i == 0)
4556 else if (out_attr->i == 1 && in_attr->i == 2)
4558 (_("Warning: %B uses r3/r4 for small structure returns, %B uses memory"), obfd, ibfd);
4559 else if (out_attr->i == 2 && in_attr->i == 1)
4561 (_("Warning: %B uses r3/r4 for small structure returns, %B uses memory"), ibfd, obfd);
4562 else if (in_attr->i > 2)
4564 (_("Warning: %B uses unknown small structure return convention %d"), ibfd,
4568 (_("Warning: %B uses unknown small structure return convention %d"), obfd,
4572 /* Merge Tag_compatibility attributes and any common GNU ones. */
4573 _bfd_elf_merge_object_attributes (ibfd, obfd);
4578 /* Merge backend specific data from an object file to the output
4579 object file when linking. */
4582 ppc_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
4588 if (!is_ppc_elf (ibfd) || !is_ppc_elf (obfd))
4591 /* Check if we have the same endianness. */
4592 if (! _bfd_generic_verify_endian_match (ibfd, obfd))
4595 if (!ppc_elf_merge_obj_attributes (ibfd, obfd))
4598 new_flags = elf_elfheader (ibfd)->e_flags;
4599 old_flags = elf_elfheader (obfd)->e_flags;
4600 if (!elf_flags_init (obfd))
4602 /* First call, no flags set. */
4603 elf_flags_init (obfd) = TRUE;
4604 elf_elfheader (obfd)->e_flags = new_flags;
4607 /* Compatible flags are ok. */
4608 else if (new_flags == old_flags)
4611 /* Incompatible flags. */
4614 /* Warn about -mrelocatable mismatch. Allow -mrelocatable-lib
4615 to be linked with either. */
4617 if ((new_flags & EF_PPC_RELOCATABLE) != 0
4618 && (old_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0)
4621 (*_bfd_error_handler)
4622 (_("%B: compiled with -mrelocatable and linked with "
4623 "modules compiled normally"), ibfd);
4625 else if ((new_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0
4626 && (old_flags & EF_PPC_RELOCATABLE) != 0)
4629 (*_bfd_error_handler)
4630 (_("%B: compiled normally and linked with "
4631 "modules compiled with -mrelocatable"), ibfd);
4634 /* The output is -mrelocatable-lib iff both the input files are. */
4635 if (! (new_flags & EF_PPC_RELOCATABLE_LIB))
4636 elf_elfheader (obfd)->e_flags &= ~EF_PPC_RELOCATABLE_LIB;
4638 /* The output is -mrelocatable iff it can't be -mrelocatable-lib,
4639 but each input file is either -mrelocatable or -mrelocatable-lib. */
4640 if (! (elf_elfheader (obfd)->e_flags & EF_PPC_RELOCATABLE_LIB)
4641 && (new_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE))
4642 && (old_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE)))
4643 elf_elfheader (obfd)->e_flags |= EF_PPC_RELOCATABLE;
4645 /* Do not warn about eabi vs. V.4 mismatch, just or in the bit if
4646 any module uses it. */
4647 elf_elfheader (obfd)->e_flags |= (new_flags & EF_PPC_EMB);
4649 new_flags &= ~(EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
4650 old_flags &= ~(EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
4652 /* Warn about any other mismatches. */
4653 if (new_flags != old_flags)
4656 (*_bfd_error_handler)
4657 (_("%B: uses different e_flags (0x%lx) fields "
4658 "than previous modules (0x%lx)"),
4659 ibfd, (long) new_flags, (long) old_flags);
4664 bfd_set_error (bfd_error_bad_value);
4673 ppc_elf_vle_split16 (bfd *output_bfd, bfd_byte *contents,
4674 bfd_vma offset, bfd_vma relocation,
4675 split16_format_type split16_format)
4678 bfd_vma insn, top5, bottom11;
4680 insn = bfd_get_32 (output_bfd, contents + offset);
4681 top5 = relocation >> 11;
4682 top5 = top5 << (split16_format == split16a_type ? 20 : 16);
4683 bottom11 = relocation & 0x7ff;
4686 bfd_put_32 (output_bfd, insn, contents + offset);
4690 /* Choose which PLT scheme to use, and set .plt flags appropriately.
4691 Returns -1 on error, 0 for old PLT, 1 for new PLT. */
4693 ppc_elf_select_plt_layout (bfd *output_bfd ATTRIBUTE_UNUSED,
4694 struct bfd_link_info *info,
4695 enum ppc_elf_plt_type plt_style,
4698 struct ppc_elf_link_hash_table *htab;
4701 htab = ppc_elf_hash_table (info);
4703 htab->emit_stub_syms = emit_stub_syms;
4705 if (htab->plt_type == PLT_UNSET)
4707 struct elf_link_hash_entry *h;
4709 if (plt_style == PLT_OLD)
4710 htab->plt_type = PLT_OLD;
4711 else if (info->shared
4712 && htab->elf.dynamic_sections_created
4713 && (h = elf_link_hash_lookup (&htab->elf, "_mcount",
4714 FALSE, FALSE, TRUE)) != NULL
4715 && (h->type == STT_FUNC
4718 && !(SYMBOL_CALLS_LOCAL (info, h)
4719 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
4720 && h->root.type == bfd_link_hash_undefweak)))
4722 /* Profiling of shared libs (and pies) is not supported with
4723 secure plt, because ppc32 does profiling before a
4724 function prologue and a secure plt pic call stubs needs
4725 r30 to be set up. */
4726 htab->plt_type = PLT_OLD;
4731 enum ppc_elf_plt_type plt_type = plt_style;
4733 /* Look through the reloc flags left by ppc_elf_check_relocs.
4734 Use the old style bss plt if a file makes plt calls
4735 without using the new relocs, and if ld isn't given
4736 --secure-plt and we never see REL16 relocs. */
4737 if (plt_type == PLT_UNSET)
4739 for (ibfd = info->input_bfds; ibfd; ibfd = ibfd->link_next)
4740 if (is_ppc_elf (ibfd))
4742 if (ppc_elf_tdata (ibfd)->has_rel16)
4744 else if (ppc_elf_tdata (ibfd)->makes_plt_call)
4747 htab->old_bfd = ibfd;
4751 htab->plt_type = plt_type;
4754 if (htab->plt_type == PLT_OLD && plt_style == PLT_NEW)
4756 if (htab->old_bfd != NULL)
4757 info->callbacks->einfo (_("%P: bss-plt forced due to %B\n"),
4760 info->callbacks->einfo (_("%P: bss-plt forced by profiling\n"));
4763 BFD_ASSERT (htab->plt_type != PLT_VXWORKS);
4765 if (htab->plt_type == PLT_NEW)
4767 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
4768 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
4770 /* The new PLT is a loaded section. */
4771 if (htab->plt != NULL
4772 && !bfd_set_section_flags (htab->elf.dynobj, htab->plt, flags))
4775 /* The new GOT is not executable. */
4776 if (htab->got != NULL
4777 && !bfd_set_section_flags (htab->elf.dynobj, htab->got, flags))
4782 /* Stop an unused .glink section from affecting .text alignment. */
4783 if (htab->glink != NULL
4784 && !bfd_set_section_alignment (htab->elf.dynobj, htab->glink, 0))
4787 return htab->plt_type == PLT_NEW;
4790 /* Return the section that should be marked against GC for a given
4794 ppc_elf_gc_mark_hook (asection *sec,
4795 struct bfd_link_info *info,
4796 Elf_Internal_Rela *rel,
4797 struct elf_link_hash_entry *h,
4798 Elf_Internal_Sym *sym)
4801 switch (ELF32_R_TYPE (rel->r_info))
4803 case R_PPC_GNU_VTINHERIT:
4804 case R_PPC_GNU_VTENTRY:
4808 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
4811 /* Update the got, plt and dynamic reloc reference counts for the
4812 section being removed. */
4815 ppc_elf_gc_sweep_hook (bfd *abfd,
4816 struct bfd_link_info *info,
4818 const Elf_Internal_Rela *relocs)
4820 struct ppc_elf_link_hash_table *htab;
4821 Elf_Internal_Shdr *symtab_hdr;
4822 struct elf_link_hash_entry **sym_hashes;
4823 bfd_signed_vma *local_got_refcounts;
4824 const Elf_Internal_Rela *rel, *relend;
4827 if (info->relocatable)
4830 if ((sec->flags & SEC_ALLOC) == 0)
4833 elf_section_data (sec)->local_dynrel = NULL;
4835 htab = ppc_elf_hash_table (info);
4836 symtab_hdr = &elf_symtab_hdr (abfd);
4837 sym_hashes = elf_sym_hashes (abfd);
4838 local_got_refcounts = elf_local_got_refcounts (abfd);
4839 got2 = bfd_get_section_by_name (abfd, ".got2");
4841 relend = relocs + sec->reloc_count;
4842 for (rel = relocs; rel < relend; rel++)
4844 unsigned long r_symndx;
4845 enum elf_ppc_reloc_type r_type;
4846 struct elf_link_hash_entry *h = NULL;
4848 r_symndx = ELF32_R_SYM (rel->r_info);
4849 if (r_symndx >= symtab_hdr->sh_info)
4851 struct elf_dyn_relocs **pp, *p;
4852 struct ppc_elf_link_hash_entry *eh;
4854 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4855 while (h->root.type == bfd_link_hash_indirect
4856 || h->root.type == bfd_link_hash_warning)
4857 h = (struct elf_link_hash_entry *) h->root.u.i.link;
4858 eh = (struct ppc_elf_link_hash_entry *) h;
4860 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
4863 /* Everything must go for SEC. */
4869 r_type = ELF32_R_TYPE (rel->r_info);
4870 if (!htab->is_vxworks
4872 && local_got_refcounts != NULL
4874 || is_branch_reloc (r_type)))
4876 struct plt_entry **local_plt = (struct plt_entry **)
4877 (local_got_refcounts + symtab_hdr->sh_info);
4878 char *local_got_tls_masks = (char *)
4879 (local_plt + symtab_hdr->sh_info);
4880 if ((local_got_tls_masks[r_symndx] & PLT_IFUNC) != 0)
4882 struct plt_entry **ifunc = local_plt + r_symndx;
4884 struct plt_entry *ent;
4886 if (r_type == R_PPC_PLTREL24 && info->shared)
4887 addend = rel->r_addend;
4888 ent = find_plt_ent (ifunc, got2, addend);
4889 if (ent->plt.refcount > 0)
4890 ent->plt.refcount -= 1;
4897 case R_PPC_GOT_TLSLD16:
4898 case R_PPC_GOT_TLSLD16_LO:
4899 case R_PPC_GOT_TLSLD16_HI:
4900 case R_PPC_GOT_TLSLD16_HA:
4901 case R_PPC_GOT_TLSGD16:
4902 case R_PPC_GOT_TLSGD16_LO:
4903 case R_PPC_GOT_TLSGD16_HI:
4904 case R_PPC_GOT_TLSGD16_HA:
4905 case R_PPC_GOT_TPREL16:
4906 case R_PPC_GOT_TPREL16_LO:
4907 case R_PPC_GOT_TPREL16_HI:
4908 case R_PPC_GOT_TPREL16_HA:
4909 case R_PPC_GOT_DTPREL16:
4910 case R_PPC_GOT_DTPREL16_LO:
4911 case R_PPC_GOT_DTPREL16_HI:
4912 case R_PPC_GOT_DTPREL16_HA:
4914 case R_PPC_GOT16_LO:
4915 case R_PPC_GOT16_HI:
4916 case R_PPC_GOT16_HA:
4919 if (h->got.refcount > 0)
4923 struct plt_entry *ent;
4925 ent = find_plt_ent (&h->plt.plist, NULL, 0);
4926 if (ent != NULL && ent->plt.refcount > 0)
4927 ent->plt.refcount -= 1;
4930 else if (local_got_refcounts != NULL)
4932 if (local_got_refcounts[r_symndx] > 0)
4933 local_got_refcounts[r_symndx]--;
4939 case R_PPC_REL14_BRTAKEN:
4940 case R_PPC_REL14_BRNTAKEN:
4942 if (h == NULL || h == htab->elf.hgot)
4949 case R_PPC_ADDR16_LO:
4950 case R_PPC_ADDR16_HI:
4951 case R_PPC_ADDR16_HA:
4953 case R_PPC_ADDR14_BRTAKEN:
4954 case R_PPC_ADDR14_BRNTAKEN:
4961 case R_PPC_PLTREL24:
4962 case R_PPC_PLTREL32:
4963 case R_PPC_PLT16_LO:
4964 case R_PPC_PLT16_HI:
4965 case R_PPC_PLT16_HA:
4969 struct plt_entry *ent;
4971 if (r_type == R_PPC_PLTREL24 && info->shared)
4972 addend = rel->r_addend;
4973 ent = find_plt_ent (&h->plt.plist, got2, addend);
4974 if (ent != NULL && ent->plt.refcount > 0)
4975 ent->plt.refcount -= 1;
4986 /* Set plt output section type, htab->tls_get_addr, and call the
4987 generic ELF tls_setup function. */
4990 ppc_elf_tls_setup (bfd *obfd,
4991 struct bfd_link_info *info,
4992 int no_tls_get_addr_opt)
4994 struct ppc_elf_link_hash_table *htab;
4996 htab = ppc_elf_hash_table (info);
4997 htab->tls_get_addr = elf_link_hash_lookup (&htab->elf, "__tls_get_addr",
4998 FALSE, FALSE, TRUE);
4999 if (!no_tls_get_addr_opt)
5001 struct elf_link_hash_entry *opt, *tga;
5002 opt = elf_link_hash_lookup (&htab->elf, "__tls_get_addr_opt",
5003 FALSE, FALSE, TRUE);
5005 && (opt->root.type == bfd_link_hash_defined
5006 || opt->root.type == bfd_link_hash_defweak))
5008 /* If glibc supports an optimized __tls_get_addr call stub,
5009 signalled by the presence of __tls_get_addr_opt, and we'll
5010 be calling __tls_get_addr via a plt call stub, then
5011 make __tls_get_addr point to __tls_get_addr_opt. */
5012 tga = htab->tls_get_addr;
5013 if (htab->elf.dynamic_sections_created
5015 && (tga->type == STT_FUNC
5017 && !(SYMBOL_CALLS_LOCAL (info, tga)
5018 || (ELF_ST_VISIBILITY (tga->other) != STV_DEFAULT
5019 && tga->root.type == bfd_link_hash_undefweak)))
5021 struct plt_entry *ent;
5022 for (ent = tga->plt.plist; ent != NULL; ent = ent->next)
5023 if (ent->plt.refcount > 0)
5027 tga->root.type = bfd_link_hash_indirect;
5028 tga->root.u.i.link = &opt->root;
5029 ppc_elf_copy_indirect_symbol (info, opt, tga);
5030 if (opt->dynindx != -1)
5032 /* Use __tls_get_addr_opt in dynamic relocations. */
5034 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
5036 if (!bfd_elf_link_record_dynamic_symbol (info, opt))
5039 htab->tls_get_addr = opt;
5044 no_tls_get_addr_opt = TRUE;
5046 htab->no_tls_get_addr_opt = no_tls_get_addr_opt;
5047 if (htab->plt_type == PLT_NEW
5048 && htab->plt != NULL
5049 && htab->plt->output_section != NULL)
5051 elf_section_type (htab->plt->output_section) = SHT_PROGBITS;
5052 elf_section_flags (htab->plt->output_section) = SHF_ALLOC + SHF_WRITE;
5055 return _bfd_elf_tls_setup (obfd, info);
5058 /* Return TRUE iff REL is a branch reloc with a global symbol matching
5062 branch_reloc_hash_match (const bfd *ibfd,
5063 const Elf_Internal_Rela *rel,
5064 const struct elf_link_hash_entry *hash)
5066 Elf_Internal_Shdr *symtab_hdr = &elf_symtab_hdr (ibfd);
5067 enum elf_ppc_reloc_type r_type = ELF32_R_TYPE (rel->r_info);
5068 unsigned int r_symndx = ELF32_R_SYM (rel->r_info);
5070 if (r_symndx >= symtab_hdr->sh_info && is_branch_reloc (r_type))
5072 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd);
5073 struct elf_link_hash_entry *h;
5075 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5076 while (h->root.type == bfd_link_hash_indirect
5077 || h->root.type == bfd_link_hash_warning)
5078 h = (struct elf_link_hash_entry *) h->root.u.i.link;
5085 /* Run through all the TLS relocs looking for optimization
5089 ppc_elf_tls_optimize (bfd *obfd ATTRIBUTE_UNUSED,
5090 struct bfd_link_info *info)
5094 struct ppc_elf_link_hash_table *htab;
5097 if (info->relocatable || !info->executable)
5100 htab = ppc_elf_hash_table (info);
5104 /* Make two passes through the relocs. First time check that tls
5105 relocs involved in setting up a tls_get_addr call are indeed
5106 followed by such a call. If they are not, don't do any tls
5107 optimization. On the second pass twiddle tls_mask flags to
5108 notify relocate_section that optimization can be done, and
5109 adjust got and plt refcounts. */
5110 for (pass = 0; pass < 2; ++pass)
5111 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
5113 Elf_Internal_Sym *locsyms = NULL;
5114 Elf_Internal_Shdr *symtab_hdr = &elf_symtab_hdr (ibfd);
5115 asection *got2 = bfd_get_section_by_name (ibfd, ".got2");
5117 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
5118 if (sec->has_tls_reloc && !bfd_is_abs_section (sec->output_section))
5120 Elf_Internal_Rela *relstart, *rel, *relend;
5121 int expecting_tls_get_addr = 0;
5123 /* Read the relocations. */
5124 relstart = _bfd_elf_link_read_relocs (ibfd, sec, NULL, NULL,
5126 if (relstart == NULL)
5129 relend = relstart + sec->reloc_count;
5130 for (rel = relstart; rel < relend; rel++)
5132 enum elf_ppc_reloc_type r_type;
5133 unsigned long r_symndx;
5134 struct elf_link_hash_entry *h = NULL;
5136 char tls_set, tls_clear;
5137 bfd_boolean is_local;
5138 bfd_signed_vma *got_count;
5140 r_symndx = ELF32_R_SYM (rel->r_info);
5141 if (r_symndx >= symtab_hdr->sh_info)
5143 struct elf_link_hash_entry **sym_hashes;
5145 sym_hashes = elf_sym_hashes (ibfd);
5146 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5147 while (h->root.type == bfd_link_hash_indirect
5148 || h->root.type == bfd_link_hash_warning)
5149 h = (struct elf_link_hash_entry *) h->root.u.i.link;
5157 r_type = ELF32_R_TYPE (rel->r_info);
5158 /* If this section has old-style __tls_get_addr calls
5159 without marker relocs, then check that each
5160 __tls_get_addr call reloc is preceded by a reloc
5161 that conceivably belongs to the __tls_get_addr arg
5162 setup insn. If we don't find matching arg setup
5163 relocs, don't do any tls optimization. */
5165 && sec->has_tls_get_addr_call
5167 && h == htab->tls_get_addr
5168 && !expecting_tls_get_addr
5169 && is_branch_reloc (r_type))
5171 info->callbacks->minfo ("%H __tls_get_addr lost arg, "
5172 "TLS optimization disabled\n",
5173 ibfd, sec, rel->r_offset);
5174 if (elf_section_data (sec)->relocs != relstart)
5179 expecting_tls_get_addr = 0;
5182 case R_PPC_GOT_TLSLD16:
5183 case R_PPC_GOT_TLSLD16_LO:
5184 expecting_tls_get_addr = 1;
5187 case R_PPC_GOT_TLSLD16_HI:
5188 case R_PPC_GOT_TLSLD16_HA:
5189 /* These relocs should never be against a symbol
5190 defined in a shared lib. Leave them alone if
5191 that turns out to be the case. */
5200 case R_PPC_GOT_TLSGD16:
5201 case R_PPC_GOT_TLSGD16_LO:
5202 expecting_tls_get_addr = 1;
5205 case R_PPC_GOT_TLSGD16_HI:
5206 case R_PPC_GOT_TLSGD16_HA:
5212 tls_set = TLS_TLS | TLS_TPRELGD;
5216 case R_PPC_GOT_TPREL16:
5217 case R_PPC_GOT_TPREL16_LO:
5218 case R_PPC_GOT_TPREL16_HI:
5219 case R_PPC_GOT_TPREL16_HA:
5224 tls_clear = TLS_TPREL;
5232 expecting_tls_get_addr = 2;
5243 if (!expecting_tls_get_addr
5244 || (expecting_tls_get_addr == 1
5245 && !sec->has_tls_get_addr_call))
5248 if (rel + 1 < relend
5249 && branch_reloc_hash_match (ibfd, rel + 1,
5250 htab->tls_get_addr))
5253 /* Uh oh, we didn't find the expected call. We
5254 could just mark this symbol to exclude it
5255 from tls optimization but it's safer to skip
5256 the entire optimization. */
5257 info->callbacks->minfo (_("%H arg lost __tls_get_addr, "
5258 "TLS optimization disabled\n"),
5259 ibfd, sec, rel->r_offset);
5260 if (elf_section_data (sec)->relocs != relstart)
5265 if (expecting_tls_get_addr)
5267 struct plt_entry *ent;
5271 && ELF32_R_TYPE (rel[1].r_info) == R_PPC_PLTREL24)
5272 addend = rel[1].r_addend;
5273 ent = find_plt_ent (&htab->tls_get_addr->plt.plist,
5275 if (ent != NULL && ent->plt.refcount > 0)
5276 ent->plt.refcount -= 1;
5278 if (expecting_tls_get_addr == 2)
5284 tls_mask = &ppc_elf_hash_entry (h)->tls_mask;
5285 got_count = &h->got.refcount;
5289 bfd_signed_vma *lgot_refs;
5290 struct plt_entry **local_plt;
5293 if (locsyms == NULL)
5295 locsyms = (Elf_Internal_Sym *) symtab_hdr->contents;
5296 if (locsyms == NULL)
5297 locsyms = bfd_elf_get_elf_syms (ibfd, symtab_hdr,
5298 symtab_hdr->sh_info,
5299 0, NULL, NULL, NULL);
5300 if (locsyms == NULL)
5302 if (elf_section_data (sec)->relocs != relstart)
5307 lgot_refs = elf_local_got_refcounts (ibfd);
5308 if (lgot_refs == NULL)
5310 local_plt = (struct plt_entry **)
5311 (lgot_refs + symtab_hdr->sh_info);
5312 lgot_masks = (char *) (local_plt + symtab_hdr->sh_info);
5313 tls_mask = &lgot_masks[r_symndx];
5314 got_count = &lgot_refs[r_symndx];
5319 /* We managed to get rid of a got entry. */
5324 *tls_mask |= tls_set;
5325 *tls_mask &= ~tls_clear;
5328 if (elf_section_data (sec)->relocs != relstart)
5333 && (symtab_hdr->contents != (unsigned char *) locsyms))
5335 if (!info->keep_memory)
5338 symtab_hdr->contents = (unsigned char *) locsyms;
5344 /* Return true if we have dynamic relocs that apply to read-only sections. */
5347 readonly_dynrelocs (struct elf_link_hash_entry *h)
5349 struct elf_dyn_relocs *p;
5351 for (p = ppc_elf_hash_entry (h)->dyn_relocs; p != NULL; p = p->next)
5353 asection *s = p->sec->output_section;
5356 && ((s->flags & (SEC_READONLY | SEC_ALLOC))
5357 == (SEC_READONLY | SEC_ALLOC)))
5363 /* Adjust a symbol defined by a dynamic object and referenced by a
5364 regular object. The current definition is in some section of the
5365 dynamic object, but we're not including those sections. We have to
5366 change the definition to something the rest of the link can
5370 ppc_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
5371 struct elf_link_hash_entry *h)
5373 struct ppc_elf_link_hash_table *htab;
5377 fprintf (stderr, "ppc_elf_adjust_dynamic_symbol called for %s\n",
5378 h->root.root.string);
5381 /* Make sure we know what is going on here. */
5382 htab = ppc_elf_hash_table (info);
5383 BFD_ASSERT (htab->elf.dynobj != NULL
5385 || h->type == STT_GNU_IFUNC
5386 || h->u.weakdef != NULL
5389 && !h->def_regular)));
5391 /* Deal with function syms. */
5392 if (h->type == STT_FUNC
5393 || h->type == STT_GNU_IFUNC
5396 /* Clear procedure linkage table information for any symbol that
5397 won't need a .plt entry. */
5398 struct plt_entry *ent;
5399 for (ent = h->plt.plist; ent != NULL; ent = ent->next)
5400 if (ent->plt.refcount > 0)
5403 || (h->type != STT_GNU_IFUNC
5404 && (SYMBOL_CALLS_LOCAL (info, h)
5405 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
5406 && h->root.type == bfd_link_hash_undefweak))))
5408 /* A PLT entry is not required/allowed when:
5410 1. We are not using ld.so; because then the PLT entry
5411 can't be set up, so we can't use one. In this case,
5412 ppc_elf_adjust_dynamic_symbol won't even be called.
5414 2. GC has rendered the entry unused.
5416 3. We know for certain that a call to this symbol
5417 will go to this object, or will remain undefined. */
5418 h->plt.plist = NULL;
5423 /* After adjust_dynamic_symbol, non_got_ref set in the
5424 non-shared case means that we have allocated space in
5425 .dynbss for the symbol and thus dyn_relocs for this
5426 symbol should be discarded.
5427 If we get here we know we are making a PLT entry for this
5428 symbol, and in an executable we'd normally resolve
5429 relocations against this symbol to the PLT entry. Allow
5430 dynamic relocs if the reference is weak, and the dynamic
5431 relocs will not cause text relocation. */
5432 if (!h->ref_regular_nonweak
5434 && h->type != STT_GNU_IFUNC
5435 && !htab->is_vxworks
5436 && !ppc_elf_hash_entry (h)->has_sda_refs
5437 && !readonly_dynrelocs (h))
5443 h->plt.plist = NULL;
5445 /* If this is a weak symbol, and there is a real definition, the
5446 processor independent code will have arranged for us to see the
5447 real definition first, and we can just use the same value. */
5448 if (h->u.weakdef != NULL)
5450 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
5451 || h->u.weakdef->root.type == bfd_link_hash_defweak);
5452 h->root.u.def.section = h->u.weakdef->root.u.def.section;
5453 h->root.u.def.value = h->u.weakdef->root.u.def.value;
5454 if (ELIMINATE_COPY_RELOCS)
5455 h->non_got_ref = h->u.weakdef->non_got_ref;
5459 /* This is a reference to a symbol defined by a dynamic object which
5460 is not a function. */
5462 /* If we are creating a shared library, we must presume that the
5463 only references to the symbol are via the global offset table.
5464 For such cases we need not do anything here; the relocations will
5465 be handled correctly by relocate_section. */
5469 /* If there are no references to this symbol that do not use the
5470 GOT, we don't need to generate a copy reloc. */
5471 if (!h->non_got_ref)
5474 /* If we didn't find any dynamic relocs in read-only sections, then
5475 we'll be keeping the dynamic relocs and avoiding the copy reloc.
5476 We can't do this if there are any small data relocations. This
5477 doesn't work on VxWorks, where we can not have dynamic
5478 relocations (other than copy and jump slot relocations) in an
5480 if (ELIMINATE_COPY_RELOCS
5481 && !ppc_elf_hash_entry (h)->has_sda_refs
5482 && !htab->is_vxworks
5484 && !readonly_dynrelocs (h))
5490 /* We must allocate the symbol in our .dynbss section, which will
5491 become part of the .bss section of the executable. There will be
5492 an entry for this symbol in the .dynsym section. The dynamic
5493 object will contain position independent code, so all references
5494 from the dynamic object to this symbol will go through the global
5495 offset table. The dynamic linker will use the .dynsym entry to
5496 determine the address it must put in the global offset table, so
5497 both the dynamic object and the regular object will refer to the
5498 same memory location for the variable.
5500 Of course, if the symbol is referenced using SDAREL relocs, we
5501 must instead allocate it in .sbss. */
5503 if (ppc_elf_hash_entry (h)->has_sda_refs)
5507 BFD_ASSERT (s != NULL);
5509 /* We must generate a R_PPC_COPY reloc to tell the dynamic linker to
5510 copy the initial value out of the dynamic object and into the
5511 runtime process image. We need to remember the offset into the
5512 .rela.bss section we are going to use. */
5513 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
5517 if (ppc_elf_hash_entry (h)->has_sda_refs)
5518 srel = htab->relsbss;
5520 srel = htab->relbss;
5521 BFD_ASSERT (srel != NULL);
5522 srel->size += sizeof (Elf32_External_Rela);
5526 return _bfd_elf_adjust_dynamic_copy (h, s);
5529 /* Generate a symbol to mark plt call stubs. For non-PIC code the sym is
5530 xxxxxxxx.plt_call32.<callee> where xxxxxxxx is a hex number, usually 0,
5531 specifying the addend on the plt relocation. For -fpic code, the sym
5532 is xxxxxxxx.plt_pic32.<callee>, and for -fPIC
5533 xxxxxxxx.got2.plt_pic32.<callee>. */
5536 add_stub_sym (struct plt_entry *ent,
5537 struct elf_link_hash_entry *h,
5538 struct bfd_link_info *info)
5540 struct elf_link_hash_entry *sh;
5541 size_t len1, len2, len3;
5544 struct ppc_elf_link_hash_table *htab = ppc_elf_hash_table (info);
5547 stub = ".plt_pic32.";
5549 stub = ".plt_call32.";
5551 len1 = strlen (h->root.root.string);
5552 len2 = strlen (stub);
5555 len3 = strlen (ent->sec->name);
5556 name = bfd_malloc (len1 + len2 + len3 + 9);
5559 sprintf (name, "%08x", (unsigned) ent->addend & 0xffffffff);
5561 memcpy (name + 8, ent->sec->name, len3);
5562 memcpy (name + 8 + len3, stub, len2);
5563 memcpy (name + 8 + len3 + len2, h->root.root.string, len1 + 1);
5564 sh = elf_link_hash_lookup (&htab->elf, name, TRUE, FALSE, FALSE);
5567 if (sh->root.type == bfd_link_hash_new)
5569 sh->root.type = bfd_link_hash_defined;
5570 sh->root.u.def.section = htab->glink;
5571 sh->root.u.def.value = ent->glink_offset;
5572 sh->ref_regular = 1;
5573 sh->def_regular = 1;
5574 sh->ref_regular_nonweak = 1;
5575 sh->forced_local = 1;
5581 /* Allocate NEED contiguous space in .got, and return the offset.
5582 Handles allocation of the got header when crossing 32k. */
5585 allocate_got (struct ppc_elf_link_hash_table *htab, unsigned int need)
5588 unsigned int max_before_header;
5590 if (htab->plt_type == PLT_VXWORKS)
5592 where = htab->got->size;
5593 htab->got->size += need;
5597 max_before_header = htab->plt_type == PLT_NEW ? 32768 : 32764;
5598 if (need <= htab->got_gap)
5600 where = max_before_header - htab->got_gap;
5601 htab->got_gap -= need;
5605 if (htab->got->size + need > max_before_header
5606 && htab->got->size <= max_before_header)
5608 htab->got_gap = max_before_header - htab->got->size;
5609 htab->got->size = max_before_header + htab->got_header_size;
5611 where = htab->got->size;
5612 htab->got->size += need;
5618 /* Allocate space in associated reloc sections for dynamic relocs. */
5621 allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
5623 struct bfd_link_info *info = inf;
5624 struct ppc_elf_link_hash_entry *eh;
5625 struct ppc_elf_link_hash_table *htab;
5626 struct elf_dyn_relocs *p;
5628 if (h->root.type == bfd_link_hash_indirect)
5631 htab = ppc_elf_hash_table (info);
5632 if (htab->elf.dynamic_sections_created
5633 || h->type == STT_GNU_IFUNC)
5635 struct plt_entry *ent;
5636 bfd_boolean doneone = FALSE;
5637 bfd_vma plt_offset = 0, glink_offset = 0;
5640 for (ent = h->plt.plist; ent != NULL; ent = ent->next)
5641 if (ent->plt.refcount > 0)
5643 /* Make sure this symbol is output as a dynamic symbol. */
5644 if (h->dynindx == -1
5647 && htab->elf.dynamic_sections_created)
5649 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5653 dyn = htab->elf.dynamic_sections_created;
5655 || h->type == STT_GNU_IFUNC
5656 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h))
5658 asection *s = htab->plt;
5659 if (!dyn || h->dynindx == -1)
5662 if (htab->plt_type == PLT_NEW || !dyn || h->dynindx == -1)
5666 plt_offset = s->size;
5669 ent->plt.offset = plt_offset;
5672 if (!doneone || info->shared)
5674 glink_offset = s->size;
5675 s->size += GLINK_ENTRY_SIZE;
5676 if (h == htab->tls_get_addr
5677 && !htab->no_tls_get_addr_opt)
5678 s->size += TLS_GET_ADDR_GLINK_SIZE - GLINK_ENTRY_SIZE;
5685 h->root.u.def.section = s;
5686 h->root.u.def.value = glink_offset;
5688 ent->glink_offset = glink_offset;
5690 if (htab->emit_stub_syms
5691 && !add_stub_sym (ent, h, info))
5698 /* If this is the first .plt entry, make room
5699 for the special first entry. */
5701 s->size += htab->plt_initial_entry_size;
5703 /* The PowerPC PLT is actually composed of two
5704 parts, the first part is 2 words (for a load
5705 and a jump), and then there is a remaining
5706 word available at the end. */
5707 plt_offset = (htab->plt_initial_entry_size
5708 + (htab->plt_slot_size
5710 - htab->plt_initial_entry_size)
5711 / htab->plt_entry_size)));
5713 /* If this symbol is not defined in a regular
5714 file, and we are not generating a shared
5715 library, then set the symbol to this location
5716 in the .plt. This is to avoid text
5717 relocations, and is required to make
5718 function pointers compare as equal between
5719 the normal executable and the shared library. */
5724 h->root.u.def.section = s;
5725 h->root.u.def.value = plt_offset;
5728 /* Make room for this entry. */
5729 s->size += htab->plt_entry_size;
5730 /* After the 8192nd entry, room for two entries
5732 if (htab->plt_type == PLT_OLD
5733 && (s->size - htab->plt_initial_entry_size)
5734 / htab->plt_entry_size
5735 > PLT_NUM_SINGLE_ENTRIES)
5736 s->size += htab->plt_entry_size;
5738 ent->plt.offset = plt_offset;
5741 /* We also need to make an entry in the .rela.plt section. */
5744 if (!htab->elf.dynamic_sections_created
5745 || h->dynindx == -1)
5746 htab->reliplt->size += sizeof (Elf32_External_Rela);
5749 htab->relplt->size += sizeof (Elf32_External_Rela);
5751 if (htab->plt_type == PLT_VXWORKS)
5753 /* Allocate space for the unloaded relocations. */
5755 && htab->elf.dynamic_sections_created)
5758 == (bfd_vma) htab->plt_initial_entry_size)
5760 htab->srelplt2->size
5761 += (sizeof (Elf32_External_Rela)
5762 * VXWORKS_PLTRESOLVE_RELOCS);
5765 htab->srelplt2->size
5766 += (sizeof (Elf32_External_Rela)
5767 * VXWORKS_PLT_NON_JMP_SLOT_RELOCS);
5770 /* Every PLT entry has an associated GOT entry in
5772 htab->sgotplt->size += 4;
5779 ent->plt.offset = (bfd_vma) -1;
5782 ent->plt.offset = (bfd_vma) -1;
5786 h->plt.plist = NULL;
5792 h->plt.plist = NULL;
5796 eh = (struct ppc_elf_link_hash_entry *) h;
5797 if (eh->elf.got.refcount > 0)
5802 /* Make sure this symbol is output as a dynamic symbol. */
5803 if (eh->elf.dynindx == -1
5804 && !eh->elf.forced_local
5805 && eh->elf.type != STT_GNU_IFUNC
5806 && htab->elf.dynamic_sections_created)
5808 if (!bfd_elf_link_record_dynamic_symbol (info, &eh->elf))
5813 if ((eh->tls_mask & TLS_TLS) != 0)
5815 if ((eh->tls_mask & TLS_LD) != 0)
5817 if (!eh->elf.def_dynamic)
5818 /* We'll just use htab->tlsld_got.offset. This should
5819 always be the case. It's a little odd if we have
5820 a local dynamic reloc against a non-local symbol. */
5821 htab->tlsld_got.refcount += 1;
5825 if ((eh->tls_mask & TLS_GD) != 0)
5827 if ((eh->tls_mask & (TLS_TPREL | TLS_TPRELGD)) != 0)
5829 if ((eh->tls_mask & TLS_DTPREL) != 0)
5835 eh->elf.got.offset = (bfd_vma) -1;
5838 eh->elf.got.offset = allocate_got (htab, need);
5839 dyn = htab->elf.dynamic_sections_created;
5841 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, &eh->elf))
5842 && (ELF_ST_VISIBILITY (eh->elf.other) == STV_DEFAULT
5843 || eh->elf.root.type != bfd_link_hash_undefweak))
5845 asection *rsec = htab->relgot;
5846 /* All the entries we allocated need relocs.
5847 Except LD only needs one. */
5848 if ((eh->tls_mask & TLS_LD) != 0
5849 && eh->elf.def_dynamic)
5851 rsec->size += need * (sizeof (Elf32_External_Rela) / 4);
5856 eh->elf.got.offset = (bfd_vma) -1;
5858 if (eh->dyn_relocs == NULL
5859 || !htab->elf.dynamic_sections_created)
5862 /* In the shared -Bsymbolic case, discard space allocated for
5863 dynamic pc-relative relocs against symbols which turn out to be
5864 defined in regular objects. For the normal shared case, discard
5865 space for relocs that have become local due to symbol visibility
5870 /* Relocs that use pc_count are those that appear on a call insn,
5871 or certain REL relocs (see must_be_dyn_reloc) that can be
5872 generated via assembly. We want calls to protected symbols to
5873 resolve directly to the function rather than going via the plt.
5874 If people want function pointer comparisons to work as expected
5875 then they should avoid writing weird assembly. */
5876 if (SYMBOL_CALLS_LOCAL (info, h))
5878 struct elf_dyn_relocs **pp;
5880 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
5882 p->count -= p->pc_count;
5891 if (htab->is_vxworks)
5893 struct elf_dyn_relocs **pp;
5895 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
5897 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
5904 /* Discard relocs on undefined symbols that must be local. */
5905 if (eh->dyn_relocs != NULL
5906 && h->root.type == bfd_link_hash_undefined
5907 && (ELF_ST_VISIBILITY (h->other) == STV_HIDDEN
5908 || ELF_ST_VISIBILITY (h->other) == STV_INTERNAL))
5909 eh->dyn_relocs = NULL;
5911 /* Also discard relocs on undefined weak syms with non-default
5913 if (eh->dyn_relocs != NULL
5914 && h->root.type == bfd_link_hash_undefweak)
5916 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
5917 eh->dyn_relocs = NULL;
5919 /* Make sure undefined weak symbols are output as a dynamic
5921 else if (h->dynindx == -1
5925 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5930 else if (ELIMINATE_COPY_RELOCS)
5932 /* For the non-shared case, discard space for relocs against
5933 symbols which turn out to need copy relocs or are not
5939 /* Make sure this symbol is output as a dynamic symbol.
5940 Undefined weak syms won't yet be marked as dynamic. */
5941 if (h->dynindx == -1
5942 && !h->forced_local)
5944 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5948 /* If that succeeded, we know we'll be keeping all the
5950 if (h->dynindx != -1)
5954 eh->dyn_relocs = NULL;
5959 /* Finally, allocate space. */
5960 for (p = eh->dyn_relocs; p != NULL; p = p->next)
5962 asection *sreloc = elf_section_data (p->sec)->sreloc;
5963 if (!htab->elf.dynamic_sections_created)
5964 sreloc = htab->reliplt;
5965 sreloc->size += p->count * sizeof (Elf32_External_Rela);
5971 /* Set DF_TEXTREL if we find any dynamic relocs that apply to
5972 read-only sections. */
5975 maybe_set_textrel (struct elf_link_hash_entry *h, void *info)
5977 if (h->root.type == bfd_link_hash_indirect)
5980 if (readonly_dynrelocs (h))
5982 ((struct bfd_link_info *) info)->flags |= DF_TEXTREL;
5984 /* Not an error, just cut short the traversal. */
5990 static const unsigned char glink_eh_frame_cie[] =
5992 0, 0, 0, 16, /* length. */
5993 0, 0, 0, 0, /* id. */
5994 1, /* CIE version. */
5995 'z', 'R', 0, /* Augmentation string. */
5996 4, /* Code alignment. */
5997 0x7c, /* Data alignment. */
5999 1, /* Augmentation size. */
6000 DW_EH_PE_pcrel | DW_EH_PE_sdata4, /* FDE encoding. */
6001 DW_CFA_def_cfa, 1, 0 /* def_cfa: r1 offset 0. */
6004 /* Set the sizes of the dynamic sections. */
6007 ppc_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
6008 struct bfd_link_info *info)
6010 struct ppc_elf_link_hash_table *htab;
6016 fprintf (stderr, "ppc_elf_size_dynamic_sections called\n");
6019 htab = ppc_elf_hash_table (info);
6020 BFD_ASSERT (htab->elf.dynobj != NULL);
6022 if (elf_hash_table (info)->dynamic_sections_created)
6024 /* Set the contents of the .interp section to the interpreter. */
6025 if (info->executable)
6027 s = bfd_get_section_by_name (htab->elf.dynobj, ".interp");
6028 BFD_ASSERT (s != NULL);
6029 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
6030 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
6034 if (htab->plt_type == PLT_OLD)
6035 htab->got_header_size = 16;
6036 else if (htab->plt_type == PLT_NEW)
6037 htab->got_header_size = 12;
6039 /* Set up .got offsets for local syms, and space for local dynamic
6041 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
6043 bfd_signed_vma *local_got;
6044 bfd_signed_vma *end_local_got;
6045 struct plt_entry **local_plt;
6046 struct plt_entry **end_local_plt;
6048 bfd_size_type locsymcount;
6049 Elf_Internal_Shdr *symtab_hdr;
6051 if (!is_ppc_elf (ibfd))
6054 for (s = ibfd->sections; s != NULL; s = s->next)
6056 struct elf_dyn_relocs *p;
6058 for (p = ((struct elf_dyn_relocs *)
6059 elf_section_data (s)->local_dynrel);
6063 if (!bfd_is_abs_section (p->sec)
6064 && bfd_is_abs_section (p->sec->output_section))
6066 /* Input section has been discarded, either because
6067 it is a copy of a linkonce section or due to
6068 linker script /DISCARD/, so we'll be discarding
6071 else if (htab->is_vxworks
6072 && strcmp (p->sec->output_section->name,
6075 /* Relocations in vxworks .tls_vars sections are
6076 handled specially by the loader. */
6078 else if (p->count != 0)
6080 asection *sreloc = elf_section_data (p->sec)->sreloc;
6081 if (!htab->elf.dynamic_sections_created)
6082 sreloc = htab->reliplt;
6083 sreloc->size += p->count * sizeof (Elf32_External_Rela);
6084 if ((p->sec->output_section->flags
6085 & (SEC_READONLY | SEC_ALLOC))
6086 == (SEC_READONLY | SEC_ALLOC))
6087 info->flags |= DF_TEXTREL;
6092 local_got = elf_local_got_refcounts (ibfd);
6096 symtab_hdr = &elf_symtab_hdr (ibfd);
6097 locsymcount = symtab_hdr->sh_info;
6098 end_local_got = local_got + locsymcount;
6099 local_plt = (struct plt_entry **) end_local_got;
6100 end_local_plt = local_plt + locsymcount;
6101 lgot_masks = (char *) end_local_plt;
6103 for (; local_got < end_local_got; ++local_got, ++lgot_masks)
6106 unsigned int need = 0;
6107 if ((*lgot_masks & TLS_TLS) != 0)
6109 if ((*lgot_masks & TLS_GD) != 0)
6111 if ((*lgot_masks & TLS_LD) != 0)
6112 htab->tlsld_got.refcount += 1;
6113 if ((*lgot_masks & (TLS_TPREL | TLS_TPRELGD)) != 0)
6115 if ((*lgot_masks & TLS_DTPREL) != 0)
6121 *local_got = (bfd_vma) -1;
6124 *local_got = allocate_got (htab, need);
6126 htab->relgot->size += (need
6127 * (sizeof (Elf32_External_Rela) / 4));
6131 *local_got = (bfd_vma) -1;
6133 if (htab->is_vxworks)
6136 /* Allocate space for calls to local STT_GNU_IFUNC syms in .iplt. */
6137 for (; local_plt < end_local_plt; ++local_plt)
6139 struct plt_entry *ent;
6140 bfd_boolean doneone = FALSE;
6141 bfd_vma plt_offset = 0, glink_offset = 0;
6143 for (ent = *local_plt; ent != NULL; ent = ent->next)
6144 if (ent->plt.refcount > 0)
6150 plt_offset = s->size;
6153 ent->plt.offset = plt_offset;
6156 if (!doneone || info->shared)
6158 glink_offset = s->size;
6159 s->size += GLINK_ENTRY_SIZE;
6161 ent->glink_offset = glink_offset;
6165 htab->reliplt->size += sizeof (Elf32_External_Rela);
6170 ent->plt.offset = (bfd_vma) -1;
6174 /* Allocate space for global sym dynamic relocs. */
6175 elf_link_hash_traverse (elf_hash_table (info), allocate_dynrelocs, info);
6177 if (htab->tlsld_got.refcount > 0)
6179 htab->tlsld_got.offset = allocate_got (htab, 8);
6181 htab->relgot->size += sizeof (Elf32_External_Rela);
6184 htab->tlsld_got.offset = (bfd_vma) -1;
6186 if (htab->got != NULL && htab->plt_type != PLT_VXWORKS)
6188 unsigned int g_o_t = 32768;
6190 /* If we haven't allocated the header, do so now. When we get here,
6191 for old plt/got the got size will be 0 to 32764 (not allocated),
6192 or 32780 to 65536 (header allocated). For new plt/got, the
6193 corresponding ranges are 0 to 32768 and 32780 to 65536. */
6194 if (htab->got->size <= 32768)
6196 g_o_t = htab->got->size;
6197 if (htab->plt_type == PLT_OLD)
6199 htab->got->size += htab->got_header_size;
6202 htab->elf.hgot->root.u.def.value = g_o_t;
6206 struct elf_link_hash_entry *sda = htab->sdata[0].sym;
6208 && !(sda->root.type == bfd_link_hash_defined
6209 || sda->root.type == bfd_link_hash_defweak))
6211 sda->root.type = bfd_link_hash_defined;
6212 sda->root.u.def.section = htab->elf.hgot->root.u.def.section;
6213 sda->root.u.def.value = htab->elf.hgot->root.u.def.value;
6217 if (htab->glink != NULL
6218 && htab->glink->size != 0
6219 && htab->elf.dynamic_sections_created)
6221 htab->glink_pltresolve = htab->glink->size;
6222 /* Space for the branch table. */
6223 htab->glink->size += htab->glink->size / (GLINK_ENTRY_SIZE / 4) - 4;
6224 /* Pad out to align the start of PLTresolve. */
6225 htab->glink->size += -htab->glink->size & 15;
6226 htab->glink->size += GLINK_PLTRESOLVE;
6228 if (htab->emit_stub_syms)
6230 struct elf_link_hash_entry *sh;
6231 sh = elf_link_hash_lookup (&htab->elf, "__glink",
6232 TRUE, FALSE, FALSE);
6235 if (sh->root.type == bfd_link_hash_new)
6237 sh->root.type = bfd_link_hash_defined;
6238 sh->root.u.def.section = htab->glink;
6239 sh->root.u.def.value = htab->glink_pltresolve;
6240 sh->ref_regular = 1;
6241 sh->def_regular = 1;
6242 sh->ref_regular_nonweak = 1;
6243 sh->forced_local = 1;
6246 sh = elf_link_hash_lookup (&htab->elf, "__glink_PLTresolve",
6247 TRUE, FALSE, FALSE);
6250 if (sh->root.type == bfd_link_hash_new)
6252 sh->root.type = bfd_link_hash_defined;
6253 sh->root.u.def.section = htab->glink;
6254 sh->root.u.def.value = htab->glink->size - GLINK_PLTRESOLVE;
6255 sh->ref_regular = 1;
6256 sh->def_regular = 1;
6257 sh->ref_regular_nonweak = 1;
6258 sh->forced_local = 1;
6264 if (htab->glink != NULL
6265 && htab->glink->size != 0
6266 && htab->glink_eh_frame != NULL
6267 && !bfd_is_abs_section (htab->glink_eh_frame->output_section))
6269 s = htab->glink_eh_frame;
6270 s->size = sizeof (glink_eh_frame_cie) + 20;
6274 if (htab->glink->size - GLINK_PLTRESOLVE + 8 >= 256)
6279 /* We've now determined the sizes of the various dynamic sections.
6280 Allocate memory for them. */
6282 for (s = htab->elf.dynobj->sections; s != NULL; s = s->next)
6284 bfd_boolean strip_section = TRUE;
6286 if ((s->flags & SEC_LINKER_CREATED) == 0)
6292 /* We'd like to strip these sections if they aren't needed, but if
6293 we've exported dynamic symbols from them we must leave them.
6294 It's too late to tell BFD to get rid of the symbols. */
6295 if (htab->elf.hplt != NULL)
6296 strip_section = FALSE;
6297 /* Strip this section if we don't need it; see the
6300 else if (s == htab->iplt
6302 || s == htab->glink_eh_frame
6303 || s == htab->sgotplt
6305 || s == htab->dynbss
6306 || s == htab->dynsbss
6307 || s == htab->sdata[0].section
6308 || s == htab->sdata[1].section)
6310 /* Strip these too. */
6312 else if (CONST_STRNEQ (bfd_get_section_name (htab->elf.dynobj, s),
6317 /* Remember whether there are any relocation sections. */
6320 /* We use the reloc_count field as a counter if we need
6321 to copy relocs into the output file. */
6327 /* It's not one of our sections, so don't allocate space. */
6331 if (s->size == 0 && strip_section)
6333 /* If we don't need this section, strip it from the
6334 output file. This is mostly to handle .rela.bss and
6335 .rela.plt. We must create both sections in
6336 create_dynamic_sections, because they must be created
6337 before the linker maps input sections to output
6338 sections. The linker does that before
6339 adjust_dynamic_symbol is called, and it is that
6340 function which decides whether anything needs to go
6341 into these sections. */
6342 s->flags |= SEC_EXCLUDE;
6346 if ((s->flags & SEC_HAS_CONTENTS) == 0)
6349 /* Allocate memory for the section contents. */
6350 s->contents = bfd_zalloc (htab->elf.dynobj, s->size);
6351 if (s->contents == NULL)
6355 if (htab->elf.dynamic_sections_created)
6357 /* Add some entries to the .dynamic section. We fill in the
6358 values later, in ppc_elf_finish_dynamic_sections, but we
6359 must add the entries now so that we get the correct size for
6360 the .dynamic section. The DT_DEBUG entry is filled in by the
6361 dynamic linker and used by the debugger. */
6362 #define add_dynamic_entry(TAG, VAL) \
6363 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
6365 if (info->executable)
6367 if (!add_dynamic_entry (DT_DEBUG, 0))
6371 if (htab->plt != NULL && htab->plt->size != 0)
6373 if (!add_dynamic_entry (DT_PLTGOT, 0)
6374 || !add_dynamic_entry (DT_PLTRELSZ, 0)
6375 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
6376 || !add_dynamic_entry (DT_JMPREL, 0))
6380 if (htab->glink != NULL && htab->glink->size != 0)
6382 if (!add_dynamic_entry (DT_PPC_GOT, 0))
6384 if (!htab->no_tls_get_addr_opt
6385 && htab->tls_get_addr != NULL
6386 && htab->tls_get_addr->plt.plist != NULL
6387 && !add_dynamic_entry (DT_PPC_TLSOPT, 0))
6393 if (!add_dynamic_entry (DT_RELA, 0)
6394 || !add_dynamic_entry (DT_RELASZ, 0)
6395 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
6399 /* If any dynamic relocs apply to a read-only section, then we
6400 need a DT_TEXTREL entry. */
6401 if ((info->flags & DF_TEXTREL) == 0)
6402 elf_link_hash_traverse (elf_hash_table (info), maybe_set_textrel,
6405 if ((info->flags & DF_TEXTREL) != 0)
6407 if (!add_dynamic_entry (DT_TEXTREL, 0))
6410 if (htab->is_vxworks
6411 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
6414 #undef add_dynamic_entry
6419 /* Return TRUE if symbol should be hashed in the `.gnu.hash' section. */
6422 ppc_elf_hash_symbol (struct elf_link_hash_entry *h)
6424 if (h->plt.plist != NULL
6426 && (!h->pointer_equality_needed
6427 || !h->ref_regular_nonweak))
6430 return _bfd_elf_hash_symbol (h);
6433 #define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0]))
6435 /* Relaxation trampolines. r12 is available for clobbering (r11, is
6436 used for some functions that are allowed to break the ABI). */
6437 static const int shared_stub_entry[] =
6439 0x7c0802a6, /* mflr 0 */
6440 0x429f0005, /* bcl 20, 31, .Lxxx */
6441 0x7d8802a6, /* mflr 12 */
6442 0x3d8c0000, /* addis 12, 12, (xxx-.Lxxx)@ha */
6443 0x398c0008, /* addi 12, 12, (xxx-.Lxxx)@l */
6444 0x7c0803a6, /* mtlr 0 */
6445 0x7d8903a6, /* mtctr 12 */
6446 0x4e800420, /* bctr */
6449 static const int stub_entry[] =
6451 0x3d800000, /* lis 12,xxx@ha */
6452 0x398c0000, /* addi 12,12,xxx@l */
6453 0x7d8903a6, /* mtctr 12 */
6454 0x4e800420, /* bctr */
6458 ppc_elf_relax_section (bfd *abfd,
6460 struct bfd_link_info *link_info,
6465 struct one_fixup *next;
6467 /* Final link, can use the symbol offset. For a
6468 relocatable link we use the symbol's index. */
6473 Elf_Internal_Shdr *symtab_hdr;
6474 bfd_byte *contents = NULL;
6475 Elf_Internal_Sym *isymbuf = NULL;
6476 Elf_Internal_Rela *internal_relocs = NULL;
6477 Elf_Internal_Rela *irel, *irelend;
6478 struct one_fixup *fixups = NULL;
6479 unsigned changes = 0;
6480 struct ppc_elf_link_hash_table *htab;
6481 bfd_size_type trampoff;
6483 bfd_boolean maybe_pasted;
6487 /* Nothing to do if there are no relocations, and no need to do
6488 anything with non-alloc or non-code sections. */
6489 if ((isec->flags & SEC_ALLOC) == 0
6490 || (isec->flags & SEC_CODE) == 0
6491 || (isec->flags & SEC_RELOC) == 0
6492 || isec->reloc_count == 0)
6495 /* We cannot represent the required PIC relocs in the output, so don't
6496 do anything. The linker doesn't support mixing -shared and -r
6498 if (link_info->relocatable && link_info->shared)
6501 trampoff = (isec->size + 3) & (bfd_vma) -4;
6502 maybe_pasted = (strcmp (isec->output_section->name, ".init") == 0
6503 || strcmp (isec->output_section->name, ".fini") == 0);
6504 /* Space for a branch around any trampolines. */
6508 symtab_hdr = &elf_symtab_hdr (abfd);
6510 /* Get a copy of the native relocations. */
6511 internal_relocs = _bfd_elf_link_read_relocs (abfd, isec, NULL, NULL,
6512 link_info->keep_memory);
6513 if (internal_relocs == NULL)
6516 htab = ppc_elf_hash_table (link_info);
6517 got2 = bfd_get_section_by_name (abfd, ".got2");
6519 irelend = internal_relocs + isec->reloc_count;
6520 for (irel = internal_relocs; irel < irelend; irel++)
6522 unsigned long r_type = ELF32_R_TYPE (irel->r_info);
6525 struct one_fixup *f;
6526 size_t insn_offset = 0;
6527 bfd_vma max_branch_offset, val;
6530 struct elf_link_hash_entry *h;
6531 struct plt_entry **plist;
6532 unsigned char sym_type;
6537 case R_PPC_LOCAL24PC:
6538 case R_PPC_PLTREL24:
6539 max_branch_offset = 1 << 25;
6543 case R_PPC_REL14_BRTAKEN:
6544 case R_PPC_REL14_BRNTAKEN:
6545 max_branch_offset = 1 << 15;
6552 /* Get the value of the symbol referred to by the reloc. */
6554 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
6556 /* A local symbol. */
6557 Elf_Internal_Sym *isym;
6559 /* Read this BFD's local symbols. */
6560 if (isymbuf == NULL)
6562 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
6563 if (isymbuf == NULL)
6564 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
6565 symtab_hdr->sh_info, 0,
6570 isym = isymbuf + ELF32_R_SYM (irel->r_info);
6571 if (isym->st_shndx == SHN_UNDEF)
6572 tsec = bfd_und_section_ptr;
6573 else if (isym->st_shndx == SHN_ABS)
6574 tsec = bfd_abs_section_ptr;
6575 else if (isym->st_shndx == SHN_COMMON)
6576 tsec = bfd_com_section_ptr;
6578 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
6580 toff = isym->st_value;
6581 sym_type = ELF_ST_TYPE (isym->st_info);
6585 /* Global symbol handling. */
6588 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
6589 h = elf_sym_hashes (abfd)[indx];
6591 while (h->root.type == bfd_link_hash_indirect
6592 || h->root.type == bfd_link_hash_warning)
6593 h = (struct elf_link_hash_entry *) h->root.u.i.link;
6595 if (h->root.type == bfd_link_hash_defined
6596 || h->root.type == bfd_link_hash_defweak)
6598 tsec = h->root.u.def.section;
6599 toff = h->root.u.def.value;
6601 else if (h->root.type == bfd_link_hash_undefined
6602 || h->root.type == bfd_link_hash_undefweak)
6604 tsec = bfd_und_section_ptr;
6605 toff = link_info->relocatable ? indx : 0;
6613 /* The condition here under which we call find_plt_ent must
6614 match that in relocate_section. If we call find_plt_ent here
6615 but not in relocate_section, or vice versa, then the branch
6616 destination used here may be incorrect. */
6620 /* We know is_branch_reloc (r_type) is true. */
6621 if (h->type == STT_GNU_IFUNC
6622 || r_type == R_PPC_PLTREL24)
6623 plist = &h->plt.plist;
6625 else if (sym_type == STT_GNU_IFUNC
6626 && elf_local_got_offsets (abfd) != NULL)
6628 bfd_vma *local_got_offsets = elf_local_got_offsets (abfd);
6629 struct plt_entry **local_plt = (struct plt_entry **)
6630 (local_got_offsets + symtab_hdr->sh_info);
6631 plist = local_plt + ELF32_R_SYM (irel->r_info);
6636 struct plt_entry *ent;
6638 if (r_type == R_PPC_PLTREL24 && link_info->shared)
6639 addend = irel->r_addend;
6640 ent = find_plt_ent (plist, got2, addend);
6643 if (htab->plt_type == PLT_NEW
6645 || !htab->elf.dynamic_sections_created
6646 || h->dynindx == -1)
6649 toff = ent->glink_offset;
6654 toff = ent->plt.offset;
6659 /* If the branch and target are in the same section, you have
6660 no hope of adding stubs. We'll error out later should the
6665 /* There probably isn't any reason to handle symbols in
6666 SEC_MERGE sections; SEC_MERGE doesn't seem a likely
6667 attribute for a code section, and we are only looking at
6668 branches. However, implement it correctly here as a
6669 reference for other target relax_section functions. */
6670 if (0 && tsec->sec_info_type == SEC_INFO_TYPE_MERGE)
6672 /* At this stage in linking, no SEC_MERGE symbol has been
6673 adjusted, so all references to such symbols need to be
6674 passed through _bfd_merged_section_offset. (Later, in
6675 relocate_section, all SEC_MERGE symbols *except* for
6676 section symbols have been adjusted.)
6678 gas may reduce relocations against symbols in SEC_MERGE
6679 sections to a relocation against the section symbol when
6680 the original addend was zero. When the reloc is against
6681 a section symbol we should include the addend in the
6682 offset passed to _bfd_merged_section_offset, since the
6683 location of interest is the original symbol. On the
6684 other hand, an access to "sym+addend" where "sym" is not
6685 a section symbol should not include the addend; Such an
6686 access is presumed to be an offset from "sym"; The
6687 location of interest is just "sym". */
6688 if (sym_type == STT_SECTION)
6689 toff += irel->r_addend;
6691 toff = _bfd_merged_section_offset (abfd, &tsec,
6692 elf_section_data (tsec)->sec_info,
6695 if (sym_type != STT_SECTION)
6696 toff += irel->r_addend;
6698 /* PLTREL24 addends are special. */
6699 else if (r_type != R_PPC_PLTREL24)
6700 toff += irel->r_addend;
6702 /* Attempted -shared link of non-pic code loses. */
6703 if (tsec->output_section == NULL)
6706 roff = irel->r_offset;
6708 /* If the branch is in range, no need to do anything. */
6709 if (tsec != bfd_und_section_ptr
6710 && (!link_info->relocatable
6711 /* A relocatable link may have sections moved during
6712 final link, so do not presume they remain in range. */
6713 || tsec->output_section == isec->output_section))
6715 bfd_vma symaddr, reladdr;
6717 symaddr = tsec->output_section->vma + tsec->output_offset + toff;
6718 reladdr = isec->output_section->vma + isec->output_offset + roff;
6719 if (symaddr - reladdr + max_branch_offset < 2 * max_branch_offset)
6723 /* Look for an existing fixup to this address. */
6724 for (f = fixups; f ; f = f->next)
6725 if (f->tsec == tsec && f->toff == toff)
6731 unsigned long stub_rtype;
6733 val = trampoff - roff;
6734 if (val >= max_branch_offset)
6735 /* Oh dear, we can't reach a trampoline. Don't try to add
6736 one. We'll report an error later. */
6739 if (link_info->shared)
6741 size = 4 * ARRAY_SIZE (shared_stub_entry);
6746 size = 4 * ARRAY_SIZE (stub_entry);
6749 stub_rtype = R_PPC_RELAX;
6750 if (tsec == htab->plt
6751 || tsec == htab->glink)
6753 stub_rtype = R_PPC_RELAX_PLT;
6754 if (r_type == R_PPC_PLTREL24)
6755 stub_rtype = R_PPC_RELAX_PLTREL24;
6758 /* Hijack the old relocation. Since we need two
6759 relocations for this use a "composite" reloc. */
6760 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
6762 irel->r_offset = trampoff + insn_offset;
6763 if (r_type == R_PPC_PLTREL24
6764 && stub_rtype != R_PPC_RELAX_PLTREL24)
6767 /* Record the fixup so we don't do it again this section. */
6768 f = bfd_malloc (sizeof (*f));
6772 f->trampoff = trampoff;
6780 val = f->trampoff - roff;
6781 if (val >= max_branch_offset)
6784 /* Nop out the reloc, since we're finalizing things here. */
6785 irel->r_info = ELF32_R_INFO (0, R_PPC_NONE);
6788 /* Get the section contents. */
6789 if (contents == NULL)
6791 /* Get cached copy if it exists. */
6792 if (elf_section_data (isec)->this_hdr.contents != NULL)
6793 contents = elf_section_data (isec)->this_hdr.contents;
6796 /* Go get them off disk. */
6797 if (!bfd_malloc_and_get_section (abfd, isec, &contents))
6802 /* Fix up the existing branch to hit the trampoline. */
6803 hit_addr = contents + roff;
6807 case R_PPC_LOCAL24PC:
6808 case R_PPC_PLTREL24:
6809 t0 = bfd_get_32 (abfd, hit_addr);
6811 t0 |= val & 0x3fffffc;
6812 bfd_put_32 (abfd, t0, hit_addr);
6816 case R_PPC_REL14_BRTAKEN:
6817 case R_PPC_REL14_BRNTAKEN:
6818 t0 = bfd_get_32 (abfd, hit_addr);
6821 bfd_put_32 (abfd, t0, hit_addr);
6826 /* Write out the trampolines. */
6835 struct one_fixup *f = fixups;
6836 fixups = fixups->next;
6841 contents = bfd_realloc_or_free (contents, trampoff);
6842 if (contents == NULL)
6845 isec->size = (isec->size + 3) & (bfd_vma) -4;
6846 dest = contents + isec->size;
6847 /* Branch around the trampolines. */
6850 bfd_vma val = B + trampoff - isec->size;
6851 bfd_put_32 (abfd, val, dest);
6854 isec->size = trampoff;
6856 if (link_info->shared)
6858 stub = shared_stub_entry;
6859 size = ARRAY_SIZE (shared_stub_entry);
6864 size = ARRAY_SIZE (stub_entry);
6868 while (dest < contents + trampoff)
6870 bfd_put_32 (abfd, stub[i], dest);
6876 BFD_ASSERT (i == 0);
6880 && symtab_hdr->contents != (unsigned char *) isymbuf)
6882 if (! link_info->keep_memory)
6886 /* Cache the symbols for elf_link_input_bfd. */
6887 symtab_hdr->contents = (unsigned char *) isymbuf;
6891 if (contents != NULL
6892 && elf_section_data (isec)->this_hdr.contents != contents)
6894 if (!changes && !link_info->keep_memory)
6898 /* Cache the section contents for elf_link_input_bfd. */
6899 elf_section_data (isec)->this_hdr.contents = contents;
6905 /* Append sufficient NOP relocs so we can write out relocation
6906 information for the trampolines. */
6907 Elf_Internal_Shdr *rel_hdr;
6908 Elf_Internal_Rela *new_relocs = bfd_malloc ((changes + isec->reloc_count)
6909 * sizeof (*new_relocs));
6914 memcpy (new_relocs, internal_relocs,
6915 isec->reloc_count * sizeof (*new_relocs));
6916 for (ix = changes; ix--;)
6918 irel = new_relocs + ix + isec->reloc_count;
6920 irel->r_info = ELF32_R_INFO (0, R_PPC_NONE);
6922 if (internal_relocs != elf_section_data (isec)->relocs)
6923 free (internal_relocs);
6924 elf_section_data (isec)->relocs = new_relocs;
6925 isec->reloc_count += changes;
6926 rel_hdr = _bfd_elf_single_rel_hdr (isec);
6927 rel_hdr->sh_size += changes * rel_hdr->sh_entsize;
6929 else if (elf_section_data (isec)->relocs != internal_relocs)
6930 free (internal_relocs);
6932 *again = changes != 0;
6933 if (!*again && link_info->relocatable)
6935 /* Convert the internal relax relocs to external form. */
6936 for (irel = internal_relocs; irel < irelend; irel++)
6937 if (ELF32_R_TYPE (irel->r_info) == R_PPC_RELAX)
6939 unsigned long r_symndx = ELF32_R_SYM (irel->r_info);
6941 /* Rewrite the reloc and convert one of the trailing nop
6942 relocs to describe this relocation. */
6943 BFD_ASSERT (ELF32_R_TYPE (irelend[-1].r_info) == R_PPC_NONE);
6944 /* The relocs are at the bottom 2 bytes */
6945 irel[0].r_offset += 2;
6946 memmove (irel + 1, irel, (irelend - irel - 1) * sizeof (*irel));
6947 irel[0].r_info = ELF32_R_INFO (r_symndx, R_PPC_ADDR16_HA);
6948 irel[1].r_offset += 4;
6949 irel[1].r_info = ELF32_R_INFO (r_symndx, R_PPC_ADDR16_LO);
6957 if (isymbuf != NULL && (unsigned char *) isymbuf != symtab_hdr->contents)
6959 if (contents != NULL
6960 && elf_section_data (isec)->this_hdr.contents != contents)
6962 if (internal_relocs != NULL
6963 && elf_section_data (isec)->relocs != internal_relocs)
6964 free (internal_relocs);
6968 /* What to do when ld finds relocations against symbols defined in
6969 discarded sections. */
6972 ppc_elf_action_discarded (asection *sec)
6974 if (strcmp (".fixup", sec->name) == 0)
6977 if (strcmp (".got2", sec->name) == 0)
6980 return _bfd_elf_default_action_discarded (sec);
6983 /* Fill in the address for a pointer generated in a linker section. */
6986 elf_finish_pointer_linker_section (bfd *input_bfd,
6987 elf_linker_section_t *lsect,
6988 struct elf_link_hash_entry *h,
6990 const Elf_Internal_Rela *rel)
6992 elf_linker_section_pointers_t *linker_section_ptr;
6994 BFD_ASSERT (lsect != NULL);
6998 /* Handle global symbol. */
6999 struct ppc_elf_link_hash_entry *eh;
7001 eh = (struct ppc_elf_link_hash_entry *) h;
7002 BFD_ASSERT (eh->elf.def_regular);
7003 linker_section_ptr = eh->linker_section_pointer;
7007 /* Handle local symbol. */
7008 unsigned long r_symndx = ELF32_R_SYM (rel->r_info);
7010 BFD_ASSERT (is_ppc_elf (input_bfd));
7011 BFD_ASSERT (elf_local_ptr_offsets (input_bfd) != NULL);
7012 linker_section_ptr = elf_local_ptr_offsets (input_bfd)[r_symndx];
7015 linker_section_ptr = elf_find_pointer_linker_section (linker_section_ptr,
7018 BFD_ASSERT (linker_section_ptr != NULL);
7020 /* Offset will always be a multiple of four, so use the bottom bit
7021 as a "written" flag. */
7022 if ((linker_section_ptr->offset & 1) == 0)
7024 bfd_put_32 (lsect->section->owner,
7025 relocation + linker_section_ptr->addend,
7026 lsect->section->contents + linker_section_ptr->offset);
7027 linker_section_ptr->offset += 1;
7030 relocation = (lsect->section->output_section->vma
7031 + lsect->section->output_offset
7032 + linker_section_ptr->offset - 1
7033 - SYM_VAL (lsect->sym));
7037 "Finish pointer in linker section %s, offset = %ld (0x%lx)\n",
7038 lsect->name, (long) relocation, (long) relocation);
7044 #define PPC_LO(v) ((v) & 0xffff)
7045 #define PPC_HI(v) (((v) >> 16) & 0xffff)
7046 #define PPC_HA(v) PPC_HI ((v) + 0x8000)
7049 write_glink_stub (struct plt_entry *ent, asection *plt_sec, unsigned char *p,
7050 struct bfd_link_info *info)
7052 struct ppc_elf_link_hash_table *htab = ppc_elf_hash_table (info);
7053 bfd *output_bfd = info->output_bfd;
7056 plt = ((ent->plt.offset & ~1)
7057 + plt_sec->output_section->vma
7058 + plt_sec->output_offset);
7064 if (ent->addend >= 32768)
7066 + ent->sec->output_section->vma
7067 + ent->sec->output_offset);
7068 else if (htab->elf.hgot != NULL)
7069 got = SYM_VAL (htab->elf.hgot);
7073 if (plt + 0x8000 < 0x10000)
7075 bfd_put_32 (output_bfd, LWZ_11_30 + PPC_LO (plt), p);
7077 bfd_put_32 (output_bfd, MTCTR_11, p);
7079 bfd_put_32 (output_bfd, BCTR, p);
7081 bfd_put_32 (output_bfd, NOP, p);
7086 bfd_put_32 (output_bfd, ADDIS_11_30 + PPC_HA (plt), p);
7088 bfd_put_32 (output_bfd, LWZ_11_11 + PPC_LO (plt), p);
7090 bfd_put_32 (output_bfd, MTCTR_11, p);
7092 bfd_put_32 (output_bfd, BCTR, p);
7098 bfd_put_32 (output_bfd, LIS_11 + PPC_HA (plt), p);
7100 bfd_put_32 (output_bfd, LWZ_11_11 + PPC_LO (plt), p);
7102 bfd_put_32 (output_bfd, MTCTR_11, p);
7104 bfd_put_32 (output_bfd, BCTR, p);
7109 /* Return true if symbol is defined statically. */
7112 is_static_defined (struct elf_link_hash_entry *h)
7114 return ((h->root.type == bfd_link_hash_defined
7115 || h->root.type == bfd_link_hash_defweak)
7116 && h->root.u.def.section != NULL
7117 && h->root.u.def.section->output_section != NULL);
7120 /* If INSN is an opcode that may be used with an @tls operand, return
7121 the transformed insn for TLS optimisation, otherwise return 0. If
7122 REG is non-zero only match an insn with RB or RA equal to REG. */
7125 _bfd_elf_ppc_at_tls_transform (unsigned int insn, unsigned int reg)
7129 if ((insn & (0x3f << 26)) != 31 << 26)
7132 if (reg == 0 || ((insn >> 11) & 0x1f) == reg)
7133 rtra = insn & ((1 << 26) - (1 << 16));
7134 else if (((insn >> 16) & 0x1f) == reg)
7135 rtra = (insn & (0x1f << 21)) | ((insn & (0x1f << 11)) << 5);
7139 if ((insn & (0x3ff << 1)) == 266 << 1)
7142 else if ((insn & (0x1f << 1)) == 23 << 1
7143 && ((insn & (0x1f << 6)) < 14 << 6
7144 || ((insn & (0x1f << 6)) >= 16 << 6
7145 && (insn & (0x1f << 6)) < 24 << 6)))
7146 /* load and store indexed -> dform. */
7147 insn = (32 | ((insn >> 6) & 0x1f)) << 26;
7148 else if ((insn & (((0x1a << 5) | 0x1f) << 1)) == 21 << 1)
7149 /* ldx, ldux, stdx, stdux -> ld, ldu, std, stdu. */
7150 insn = ((58 | ((insn >> 6) & 4)) << 26) | ((insn >> 6) & 1);
7151 else if ((insn & (((0x1f << 5) | 0x1f) << 1)) == 341 << 1)
7153 insn = (58 << 26) | 2;
7160 /* If INSN is an opcode that may be used with an @tprel operand, return
7161 the transformed insn for an undefined weak symbol, ie. with the
7162 thread pointer REG operand removed. Otherwise return 0. */
7165 _bfd_elf_ppc_at_tprel_transform (unsigned int insn, unsigned int reg)
7167 if ((insn & (0x1f << 16)) == reg << 16
7168 && ((insn & (0x3f << 26)) == 14u << 26 /* addi */
7169 || (insn & (0x3f << 26)) == 15u << 26 /* addis */
7170 || (insn & (0x3f << 26)) == 32u << 26 /* lwz */
7171 || (insn & (0x3f << 26)) == 34u << 26 /* lbz */
7172 || (insn & (0x3f << 26)) == 36u << 26 /* stw */
7173 || (insn & (0x3f << 26)) == 38u << 26 /* stb */
7174 || (insn & (0x3f << 26)) == 40u << 26 /* lhz */
7175 || (insn & (0x3f << 26)) == 42u << 26 /* lha */
7176 || (insn & (0x3f << 26)) == 44u << 26 /* sth */
7177 || (insn & (0x3f << 26)) == 46u << 26 /* lmw */
7178 || (insn & (0x3f << 26)) == 47u << 26 /* stmw */
7179 || (insn & (0x3f << 26)) == 48u << 26 /* lfs */
7180 || (insn & (0x3f << 26)) == 50u << 26 /* lfd */
7181 || (insn & (0x3f << 26)) == 52u << 26 /* stfs */
7182 || (insn & (0x3f << 26)) == 54u << 26 /* stfd */
7183 || ((insn & (0x3f << 26)) == 58u << 26 /* lwa,ld,lmd */
7185 || ((insn & (0x3f << 26)) == 62u << 26 /* std, stmd */
7186 && ((insn & 3) == 0 || (insn & 3) == 3))))
7188 insn &= ~(0x1f << 16);
7190 else if ((insn & (0x1f << 21)) == reg << 21
7191 && ((insn & (0x3e << 26)) == 24u << 26 /* ori, oris */
7192 || (insn & (0x3e << 26)) == 26u << 26 /* xori,xoris */
7193 || (insn & (0x3e << 26)) == 28u << 26 /* andi,andis */))
7195 insn &= ~(0x1f << 21);
7196 insn |= (insn & (0x1f << 16)) << 5;
7197 if ((insn & (0x3e << 26)) == 26 << 26 /* xori,xoris */)
7198 insn -= 2 >> 26; /* convert to ori,oris */
7205 /* The RELOCATE_SECTION function is called by the ELF backend linker
7206 to handle the relocations for a section.
7208 The relocs are always passed as Rela structures; if the section
7209 actually uses Rel structures, the r_addend field will always be
7212 This function is responsible for adjust the section contents as
7213 necessary, and (if using Rela relocs and generating a
7214 relocatable output file) adjusting the reloc addend as
7217 This function does not have to worry about setting the reloc
7218 address or the reloc symbol index.
7220 LOCAL_SYMS is a pointer to the swapped in local symbols.
7222 LOCAL_SECTIONS is an array giving the section in the input file
7223 corresponding to the st_shndx field of each local symbol.
7225 The global hash table entry for the global symbols can be found
7226 via elf_sym_hashes (input_bfd).
7228 When generating relocatable output, this function must handle
7229 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
7230 going to be the section symbol corresponding to the output
7231 section, which means that the addend must be adjusted
7235 ppc_elf_relocate_section (bfd *output_bfd,
7236 struct bfd_link_info *info,
7238 asection *input_section,
7240 Elf_Internal_Rela *relocs,
7241 Elf_Internal_Sym *local_syms,
7242 asection **local_sections)
7244 Elf_Internal_Shdr *symtab_hdr;
7245 struct elf_link_hash_entry **sym_hashes;
7246 struct ppc_elf_link_hash_table *htab;
7247 Elf_Internal_Rela *rel;
7248 Elf_Internal_Rela *relend;
7249 Elf_Internal_Rela outrel;
7250 asection *got2, *sreloc = NULL;
7251 bfd_vma *local_got_offsets;
7252 bfd_boolean ret = TRUE;
7253 bfd_vma d_offset = (bfd_big_endian (output_bfd) ? 2 : 0);
7254 bfd_boolean is_vxworks_tls;
7257 _bfd_error_handler ("ppc_elf_relocate_section called for %B section %A, "
7258 "%ld relocations%s",
7259 input_bfd, input_section,
7260 (long) input_section->reloc_count,
7261 (info->relocatable) ? " (relocatable)" : "");
7264 got2 = bfd_get_section_by_name (input_bfd, ".got2");
7266 /* Initialize howto table if not already done. */
7267 if (!ppc_elf_howto_table[R_PPC_ADDR32])
7268 ppc_elf_howto_init ();
7270 htab = ppc_elf_hash_table (info);
7271 local_got_offsets = elf_local_got_offsets (input_bfd);
7272 symtab_hdr = &elf_symtab_hdr (input_bfd);
7273 sym_hashes = elf_sym_hashes (input_bfd);
7274 /* We have to handle relocations in vxworks .tls_vars sections
7275 specially, because the dynamic loader is 'weird'. */
7276 is_vxworks_tls = (htab->is_vxworks && info->shared
7277 && !strcmp (input_section->output_section->name,
7280 relend = relocs + input_section->reloc_count;
7281 for (; rel < relend; rel++)
7283 enum elf_ppc_reloc_type r_type;
7285 bfd_reloc_status_type r;
7286 Elf_Internal_Sym *sym;
7288 struct elf_link_hash_entry *h;
7289 const char *sym_name;
7290 reloc_howto_type *howto;
7291 unsigned long r_symndx;
7293 bfd_vma branch_bit, from;
7294 bfd_boolean unresolved_reloc;
7296 unsigned int tls_type, tls_mask, tls_gd;
7297 struct plt_entry **ifunc;
7299 r_type = ELF32_R_TYPE (rel->r_info);
7303 unresolved_reloc = FALSE;
7305 r_symndx = ELF32_R_SYM (rel->r_info);
7307 if (r_symndx < symtab_hdr->sh_info)
7309 sym = local_syms + r_symndx;
7310 sec = local_sections[r_symndx];
7311 sym_name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, sec);
7313 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
7317 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
7318 r_symndx, symtab_hdr, sym_hashes,
7320 unresolved_reloc, warned);
7322 sym_name = h->root.root.string;
7325 if (sec != NULL && discarded_section (sec))
7327 /* For relocs against symbols from removed linkonce sections,
7328 or sections discarded by a linker script, we just want the
7329 section contents zeroed. Avoid any special processing. */
7331 if (r_type < R_PPC_max)
7332 howto = ppc_elf_howto_table[r_type];
7333 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
7334 rel, 1, relend, howto, 0, contents);
7337 if (info->relocatable)
7340 && r_type == R_PPC_PLTREL24
7341 && rel->r_addend >= 32768)
7343 /* R_PPC_PLTREL24 is rather special. If non-zero, the
7344 addend specifies the GOT pointer offset within .got2. */
7345 rel->r_addend += got2->output_offset;
7350 /* TLS optimizations. Replace instruction sequences and relocs
7351 based on information we collected in tls_optimize. We edit
7352 RELOCS so that --emit-relocs will output something sensible
7353 for the final instruction stream. */
7357 tls_mask = ((struct ppc_elf_link_hash_entry *) h)->tls_mask;
7358 else if (local_got_offsets != NULL)
7360 struct plt_entry **local_plt;
7363 = (struct plt_entry **) (local_got_offsets + symtab_hdr->sh_info);
7364 lgot_masks = (char *) (local_plt + symtab_hdr->sh_info);
7365 tls_mask = lgot_masks[r_symndx];
7368 /* Ensure reloc mapping code below stays sane. */
7369 if ((R_PPC_GOT_TLSLD16 & 3) != (R_PPC_GOT_TLSGD16 & 3)
7370 || (R_PPC_GOT_TLSLD16_LO & 3) != (R_PPC_GOT_TLSGD16_LO & 3)
7371 || (R_PPC_GOT_TLSLD16_HI & 3) != (R_PPC_GOT_TLSGD16_HI & 3)
7372 || (R_PPC_GOT_TLSLD16_HA & 3) != (R_PPC_GOT_TLSGD16_HA & 3)
7373 || (R_PPC_GOT_TLSLD16 & 3) != (R_PPC_GOT_TPREL16 & 3)
7374 || (R_PPC_GOT_TLSLD16_LO & 3) != (R_PPC_GOT_TPREL16_LO & 3)
7375 || (R_PPC_GOT_TLSLD16_HI & 3) != (R_PPC_GOT_TPREL16_HI & 3)
7376 || (R_PPC_GOT_TLSLD16_HA & 3) != (R_PPC_GOT_TPREL16_HA & 3))
7383 case R_PPC_GOT_TPREL16:
7384 case R_PPC_GOT_TPREL16_LO:
7385 if ((tls_mask & TLS_TLS) != 0
7386 && (tls_mask & TLS_TPREL) == 0)
7390 insn = bfd_get_32 (output_bfd, contents + rel->r_offset - d_offset);
7392 insn |= 0x3c020000; /* addis 0,2,0 */
7393 bfd_put_32 (output_bfd, insn, contents + rel->r_offset - d_offset);
7394 r_type = R_PPC_TPREL16_HA;
7395 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7400 if ((tls_mask & TLS_TLS) != 0
7401 && (tls_mask & TLS_TPREL) == 0)
7405 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
7406 insn = _bfd_elf_ppc_at_tls_transform (insn, 2);
7409 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
7410 r_type = R_PPC_TPREL16_LO;
7411 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7413 /* Was PPC_TLS which sits on insn boundary, now
7414 PPC_TPREL16_LO which is at low-order half-word. */
7415 rel->r_offset += d_offset;
7419 case R_PPC_GOT_TLSGD16_HI:
7420 case R_PPC_GOT_TLSGD16_HA:
7421 tls_gd = TLS_TPRELGD;
7422 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_GD) == 0)
7426 case R_PPC_GOT_TLSLD16_HI:
7427 case R_PPC_GOT_TLSLD16_HA:
7428 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_LD) == 0)
7431 if ((tls_mask & tls_gd) != 0)
7432 r_type = (((r_type - (R_PPC_GOT_TLSGD16 & 3)) & 3)
7433 + R_PPC_GOT_TPREL16);
7436 bfd_put_32 (output_bfd, NOP, contents + rel->r_offset);
7437 rel->r_offset -= d_offset;
7438 r_type = R_PPC_NONE;
7440 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7444 case R_PPC_GOT_TLSGD16:
7445 case R_PPC_GOT_TLSGD16_LO:
7446 tls_gd = TLS_TPRELGD;
7447 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_GD) == 0)
7451 case R_PPC_GOT_TLSLD16:
7452 case R_PPC_GOT_TLSLD16_LO:
7453 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_LD) == 0)
7455 unsigned int insn1, insn2;
7459 offset = (bfd_vma) -1;
7460 /* If not using the newer R_PPC_TLSGD/LD to mark
7461 __tls_get_addr calls, we must trust that the call
7462 stays with its arg setup insns, ie. that the next
7463 reloc is the __tls_get_addr call associated with
7464 the current reloc. Edit both insns. */
7465 if (input_section->has_tls_get_addr_call
7467 && branch_reloc_hash_match (input_bfd, rel + 1,
7468 htab->tls_get_addr))
7469 offset = rel[1].r_offset;
7470 if ((tls_mask & tls_gd) != 0)
7473 insn1 = bfd_get_32 (output_bfd,
7474 contents + rel->r_offset - d_offset);
7475 insn1 &= (1 << 26) - 1;
7476 insn1 |= 32 << 26; /* lwz */
7477 if (offset != (bfd_vma) -1)
7479 rel[1].r_info = ELF32_R_INFO (STN_UNDEF, R_PPC_NONE);
7480 insn2 = 0x7c631214; /* add 3,3,2 */
7481 bfd_put_32 (output_bfd, insn2, contents + offset);
7483 r_type = (((r_type - (R_PPC_GOT_TLSGD16 & 3)) & 3)
7484 + R_PPC_GOT_TPREL16);
7485 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7490 insn1 = 0x3c620000; /* addis 3,2,0 */
7493 /* Was an LD reloc. */
7495 r_symndx < symtab_hdr->sh_info;
7497 if (local_sections[r_symndx] == sec)
7499 if (r_symndx >= symtab_hdr->sh_info)
7500 r_symndx = STN_UNDEF;
7501 rel->r_addend = htab->elf.tls_sec->vma + DTP_OFFSET;
7502 if (r_symndx != STN_UNDEF)
7503 rel->r_addend -= (local_syms[r_symndx].st_value
7504 + sec->output_offset
7505 + sec->output_section->vma);
7507 r_type = R_PPC_TPREL16_HA;
7508 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7509 if (offset != (bfd_vma) -1)
7511 rel[1].r_info = ELF32_R_INFO (r_symndx, R_PPC_TPREL16_LO);
7512 rel[1].r_offset = offset + d_offset;
7513 rel[1].r_addend = rel->r_addend;
7514 insn2 = 0x38630000; /* addi 3,3,0 */
7515 bfd_put_32 (output_bfd, insn2, contents + offset);
7518 bfd_put_32 (output_bfd, insn1,
7519 contents + rel->r_offset - d_offset);
7522 /* We changed the symbol on an LD reloc. Start over
7523 in order to get h, sym, sec etc. right. */
7531 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_GD) == 0)
7534 bfd_vma offset = rel->r_offset;
7536 if ((tls_mask & TLS_TPRELGD) != 0)
7539 r_type = R_PPC_NONE;
7540 insn2 = 0x7c631214; /* add 3,3,2 */
7545 r_type = R_PPC_TPREL16_LO;
7546 rel->r_offset += d_offset;
7547 insn2 = 0x38630000; /* addi 3,3,0 */
7549 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
7550 bfd_put_32 (output_bfd, insn2, contents + offset);
7551 /* Zap the reloc on the _tls_get_addr call too. */
7552 BFD_ASSERT (offset == rel[1].r_offset);
7553 rel[1].r_info = ELF32_R_INFO (STN_UNDEF, R_PPC_NONE);
7558 if ((tls_mask & TLS_TLS) != 0 && (tls_mask & TLS_LD) == 0)
7563 r_symndx < symtab_hdr->sh_info;
7565 if (local_sections[r_symndx] == sec)
7567 if (r_symndx >= symtab_hdr->sh_info)
7568 r_symndx = STN_UNDEF;
7569 rel->r_addend = htab->elf.tls_sec->vma + DTP_OFFSET;
7570 if (r_symndx != STN_UNDEF)
7571 rel->r_addend -= (local_syms[r_symndx].st_value
7572 + sec->output_offset
7573 + sec->output_section->vma);
7575 rel->r_info = ELF32_R_INFO (r_symndx, R_PPC_TPREL16_LO);
7576 rel->r_offset += d_offset;
7577 insn2 = 0x38630000; /* addi 3,3,0 */
7578 bfd_put_32 (output_bfd, insn2,
7579 contents + rel->r_offset - d_offset);
7580 /* Zap the reloc on the _tls_get_addr call too. */
7581 BFD_ASSERT (rel->r_offset - d_offset == rel[1].r_offset);
7582 rel[1].r_info = ELF32_R_INFO (STN_UNDEF, R_PPC_NONE);
7589 /* Handle other relocations that tweak non-addend part of insn. */
7596 /* Branch taken prediction relocations. */
7597 case R_PPC_ADDR14_BRTAKEN:
7598 case R_PPC_REL14_BRTAKEN:
7599 branch_bit = BRANCH_PREDICT_BIT;
7602 /* Branch not taken prediction relocations. */
7603 case R_PPC_ADDR14_BRNTAKEN:
7604 case R_PPC_REL14_BRNTAKEN:
7608 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
7609 insn &= ~BRANCH_PREDICT_BIT;
7612 from = (rel->r_offset
7613 + input_section->output_offset
7614 + input_section->output_section->vma);
7616 /* Invert 'y' bit if not the default. */
7617 if ((bfd_signed_vma) (relocation + rel->r_addend - from) < 0)
7618 insn ^= BRANCH_PREDICT_BIT;
7620 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
7626 if (!htab->is_vxworks)
7628 struct plt_entry *ent;
7632 if (h->type == STT_GNU_IFUNC)
7633 ifunc = &h->plt.plist;
7635 else if (local_got_offsets != NULL
7636 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
7638 struct plt_entry **local_plt;
7640 local_plt = (struct plt_entry **) (local_got_offsets
7641 + symtab_hdr->sh_info);
7642 ifunc = local_plt + r_symndx;
7648 || is_branch_reloc (r_type)))
7651 if (r_type == R_PPC_PLTREL24 && info->shared)
7652 addend = rel->r_addend;
7653 ent = find_plt_ent (ifunc, got2, addend);
7657 if (h == NULL && (ent->plt.offset & 1) == 0)
7659 Elf_Internal_Rela rela;
7662 rela.r_offset = (htab->iplt->output_section->vma
7663 + htab->iplt->output_offset
7665 rela.r_info = ELF32_R_INFO (0, R_PPC_IRELATIVE);
7666 rela.r_addend = relocation;
7667 loc = htab->reliplt->contents;
7668 loc += (htab->reliplt->reloc_count++
7669 * sizeof (Elf32_External_Rela));
7670 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
7672 ent->plt.offset |= 1;
7674 if (h == NULL && (ent->glink_offset & 1) == 0)
7676 unsigned char *p = ((unsigned char *) htab->glink->contents
7677 + ent->glink_offset);
7678 write_glink_stub (ent, htab->iplt, p, info);
7679 ent->glink_offset |= 1;
7682 unresolved_reloc = FALSE;
7683 if (htab->plt_type == PLT_NEW
7684 || !htab->elf.dynamic_sections_created
7686 relocation = (htab->glink->output_section->vma
7687 + htab->glink->output_offset
7688 + (ent->glink_offset & ~1));
7690 relocation = (htab->plt->output_section->vma
7691 + htab->plt->output_offset
7696 addend = rel->r_addend;
7699 if (r_type < R_PPC_max)
7700 howto = ppc_elf_howto_table[r_type];
7704 info->callbacks->einfo
7705 (_("%P: %B: unknown relocation type %d for symbol %s\n"),
7706 input_bfd, (int) r_type, sym_name);
7708 bfd_set_error (bfd_error_bad_value);
7716 case R_PPC_EMB_MRKREF:
7717 case R_PPC_GNU_VTINHERIT:
7718 case R_PPC_GNU_VTENTRY:
7721 /* GOT16 relocations. Like an ADDR16 using the symbol's
7722 address in the GOT as relocation value instead of the
7723 symbol's value itself. Also, create a GOT entry for the
7724 symbol and put the symbol value there. */
7725 case R_PPC_GOT_TLSGD16:
7726 case R_PPC_GOT_TLSGD16_LO:
7727 case R_PPC_GOT_TLSGD16_HI:
7728 case R_PPC_GOT_TLSGD16_HA:
7729 tls_type = TLS_TLS | TLS_GD;
7732 case R_PPC_GOT_TLSLD16:
7733 case R_PPC_GOT_TLSLD16_LO:
7734 case R_PPC_GOT_TLSLD16_HI:
7735 case R_PPC_GOT_TLSLD16_HA:
7736 tls_type = TLS_TLS | TLS_LD;
7739 case R_PPC_GOT_TPREL16:
7740 case R_PPC_GOT_TPREL16_LO:
7741 case R_PPC_GOT_TPREL16_HI:
7742 case R_PPC_GOT_TPREL16_HA:
7743 tls_type = TLS_TLS | TLS_TPREL;
7746 case R_PPC_GOT_DTPREL16:
7747 case R_PPC_GOT_DTPREL16_LO:
7748 case R_PPC_GOT_DTPREL16_HI:
7749 case R_PPC_GOT_DTPREL16_HA:
7750 tls_type = TLS_TLS | TLS_DTPREL;
7754 case R_PPC_GOT16_LO:
7755 case R_PPC_GOT16_HI:
7756 case R_PPC_GOT16_HA:
7760 /* Relocation is to the entry for this symbol in the global
7766 if (htab->got == NULL)
7770 if (tls_type == (TLS_TLS | TLS_LD)
7772 || !h->def_dynamic))
7773 offp = &htab->tlsld_got.offset;
7777 dyn = htab->elf.dynamic_sections_created;
7778 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
7780 && SYMBOL_REFERENCES_LOCAL (info, h)))
7781 /* This is actually a static link, or it is a
7782 -Bsymbolic link and the symbol is defined
7783 locally, or the symbol was forced to be local
7784 because of a version file. */
7789 unresolved_reloc = FALSE;
7791 offp = &h->got.offset;
7795 if (local_got_offsets == NULL)
7797 offp = &local_got_offsets[r_symndx];
7800 /* The offset must always be a multiple of 4. We use the
7801 least significant bit to record whether we have already
7802 processed this entry. */
7808 unsigned int tls_m = (tls_mask
7809 & (TLS_LD | TLS_GD | TLS_DTPREL
7810 | TLS_TPREL | TLS_TPRELGD));
7812 if (offp == &htab->tlsld_got.offset)
7818 /* We might have multiple got entries for this sym.
7819 Initialize them all. */
7824 if ((tls_m & TLS_LD) != 0)
7826 tls_ty = TLS_TLS | TLS_LD;
7829 else if ((tls_m & TLS_GD) != 0)
7831 tls_ty = TLS_TLS | TLS_GD;
7834 else if ((tls_m & TLS_DTPREL) != 0)
7836 tls_ty = TLS_TLS | TLS_DTPREL;
7837 tls_m &= ~TLS_DTPREL;
7839 else if ((tls_m & (TLS_TPREL | TLS_TPRELGD)) != 0)
7841 tls_ty = TLS_TLS | TLS_TPREL;
7845 /* Generate relocs for the dynamic linker. */
7846 if ((info->shared || indx != 0)
7847 && (offp == &htab->tlsld_got.offset
7849 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
7850 || h->root.type != bfd_link_hash_undefweak))
7852 asection *rsec = htab->relgot;
7855 outrel.r_offset = (htab->got->output_section->vma
7856 + htab->got->output_offset
7858 outrel.r_addend = 0;
7859 if (tls_ty & (TLS_LD | TLS_GD))
7861 outrel.r_info = ELF32_R_INFO (indx, R_PPC_DTPMOD32);
7862 if (tls_ty == (TLS_TLS | TLS_GD))
7864 loc = rsec->contents;
7865 loc += (rsec->reloc_count++
7866 * sizeof (Elf32_External_Rela));
7867 bfd_elf32_swap_reloca_out (output_bfd,
7869 outrel.r_offset += 4;
7871 = ELF32_R_INFO (indx, R_PPC_DTPREL32);
7874 else if (tls_ty == (TLS_TLS | TLS_DTPREL))
7875 outrel.r_info = ELF32_R_INFO (indx, R_PPC_DTPREL32);
7876 else if (tls_ty == (TLS_TLS | TLS_TPREL))
7877 outrel.r_info = ELF32_R_INFO (indx, R_PPC_TPREL32);
7879 outrel.r_info = ELF32_R_INFO (indx, R_PPC_GLOB_DAT);
7880 else if (ifunc != NULL)
7881 outrel.r_info = ELF32_R_INFO (0, R_PPC_IRELATIVE);
7883 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
7884 if (indx == 0 && tls_ty != (TLS_TLS | TLS_LD))
7886 outrel.r_addend += relocation;
7887 if (tls_ty & (TLS_GD | TLS_DTPREL | TLS_TPREL))
7888 outrel.r_addend -= htab->elf.tls_sec->vma;
7890 loc = rsec->contents;
7891 loc += (rsec->reloc_count++
7892 * sizeof (Elf32_External_Rela));
7893 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
7896 /* Init the .got section contents if we're not
7897 emitting a reloc. */
7900 bfd_vma value = relocation;
7902 if (tls_ty == (TLS_TLS | TLS_LD))
7904 else if (tls_ty != 0)
7906 value -= htab->elf.tls_sec->vma + DTP_OFFSET;
7907 if (tls_ty == (TLS_TLS | TLS_TPREL))
7908 value += DTP_OFFSET - TP_OFFSET;
7910 if (tls_ty == (TLS_TLS | TLS_GD))
7912 bfd_put_32 (output_bfd, value,
7913 htab->got->contents + off + 4);
7917 bfd_put_32 (output_bfd, value,
7918 htab->got->contents + off);
7922 if (tls_ty & (TLS_LD | TLS_GD))
7931 if (off >= (bfd_vma) -2)
7934 if ((tls_type & TLS_TLS) != 0)
7936 if (tls_type != (TLS_TLS | TLS_LD))
7938 if ((tls_mask & TLS_LD) != 0
7940 || !h->def_dynamic))
7942 if (tls_type != (TLS_TLS | TLS_GD))
7944 if ((tls_mask & TLS_GD) != 0)
7946 if (tls_type != (TLS_TLS | TLS_DTPREL))
7948 if ((tls_mask & TLS_DTPREL) != 0)
7955 relocation = (htab->got->output_section->vma
7956 + htab->got->output_offset
7958 - SYM_VAL (htab->elf.hgot));
7960 /* Addends on got relocations don't make much sense.
7961 x+off@got is actually x@got+off, and since the got is
7962 generated by a hash table traversal, the value in the
7963 got at entry m+n bears little relation to the entry m. */
7965 info->callbacks->einfo
7966 (_("%P: %H: non-zero addend on %s reloc against `%s'\n"),
7967 input_bfd, input_section, rel->r_offset,
7973 /* Relocations that need no special processing. */
7974 case R_PPC_LOCAL24PC:
7975 /* It makes no sense to point a local relocation
7976 at a symbol not in this object. */
7977 if (unresolved_reloc)
7979 if (! (*info->callbacks->undefined_symbol) (info,
7980 h->root.root.string,
7990 case R_PPC_DTPREL16:
7991 case R_PPC_DTPREL16_LO:
7992 case R_PPC_DTPREL16_HI:
7993 case R_PPC_DTPREL16_HA:
7994 addend -= htab->elf.tls_sec->vma + DTP_OFFSET;
7997 /* Relocations that may need to be propagated if this is a shared
8000 case R_PPC_TPREL16_LO:
8001 case R_PPC_TPREL16_HI:
8002 case R_PPC_TPREL16_HA:
8004 && h->root.type == bfd_link_hash_undefweak
8005 && h->dynindx == -1)
8007 /* Make this relocation against an undefined weak symbol
8008 resolve to zero. This is really just a tweak, since
8009 code using weak externs ought to check that they are
8010 defined before using them. */
8011 bfd_byte *p = contents + rel->r_offset - d_offset;
8012 unsigned int insn = bfd_get_32 (output_bfd, p);
8013 insn = _bfd_elf_ppc_at_tprel_transform (insn, 2);
8015 bfd_put_32 (output_bfd, insn, p);
8018 addend -= htab->elf.tls_sec->vma + TP_OFFSET;
8019 /* The TPREL16 relocs shouldn't really be used in shared
8020 libs as they will result in DT_TEXTREL being set, but
8021 support them anyway. */
8025 addend -= htab->elf.tls_sec->vma + TP_OFFSET;
8028 case R_PPC_DTPREL32:
8029 addend -= htab->elf.tls_sec->vma + DTP_OFFSET;
8032 case R_PPC_DTPMOD32:
8038 case R_PPC_REL16_LO:
8039 case R_PPC_REL16_HI:
8040 case R_PPC_REL16_HA:
8044 if (h == NULL || h == htab->elf.hgot)
8050 case R_PPC_ADDR16_LO:
8051 case R_PPC_ADDR16_HI:
8052 case R_PPC_ADDR16_HA:
8057 case R_PPC_VLE_REL8:
8058 case R_PPC_VLE_REL15:
8059 case R_PPC_VLE_REL24:
8062 case R_PPC_REL14_BRTAKEN:
8063 case R_PPC_REL14_BRNTAKEN:
8064 /* If these relocations are not to a named symbol, they can be
8065 handled right here, no need to bother the dynamic linker. */
8066 if (SYMBOL_CALLS_LOCAL (info, h)
8067 || h == htab->elf.hgot)
8073 case R_PPC_ADDR14_BRTAKEN:
8074 case R_PPC_ADDR14_BRNTAKEN:
8075 if (h != NULL && !info->shared)
8080 if ((input_section->flags & SEC_ALLOC) == 0
8086 && ((h->root.type == bfd_link_hash_undefined
8087 && (ELF_ST_VISIBILITY (h->other) == STV_HIDDEN
8088 || ELF_ST_VISIBILITY (h->other) == STV_INTERNAL))
8089 || (h->root.type == bfd_link_hash_undefweak
8090 && ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)))
8091 && (must_be_dyn_reloc (info, r_type)
8092 || !SYMBOL_CALLS_LOCAL (info, h)))
8093 || (ELIMINATE_COPY_RELOCS
8098 && !h->def_regular))
8103 fprintf (stderr, "ppc_elf_relocate_section needs to "
8104 "create relocation for %s\n",
8105 (h && h->root.root.string
8106 ? h->root.root.string : "<unknown>"));
8109 /* When generating a shared object, these relocations
8110 are copied into the output file to be resolved at run
8114 sreloc = elf_section_data (input_section)->sreloc;
8115 if (!htab->elf.dynamic_sections_created)
8116 sreloc = htab->reliplt;
8122 outrel.r_offset = _bfd_elf_section_offset (output_bfd, info,
8125 if (outrel.r_offset == (bfd_vma) -1
8126 || outrel.r_offset == (bfd_vma) -2)
8127 skip = (int) outrel.r_offset;
8128 outrel.r_offset += (input_section->output_section->vma
8129 + input_section->output_offset);
8132 memset (&outrel, 0, sizeof outrel);
8134 && (h->root.type == bfd_link_hash_undefined
8135 || h->root.type == bfd_link_hash_undefweak))
8136 || !SYMBOL_REFERENCES_LOCAL (info, h))
8138 unresolved_reloc = FALSE;
8139 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
8140 outrel.r_addend = rel->r_addend;
8144 outrel.r_addend = relocation + rel->r_addend;
8146 if (r_type != R_PPC_ADDR32)
8152 /* If we get here when building a static
8153 executable, then the libc startup function
8154 responsible for applying indirect function
8155 relocations is going to complain about
8157 If we get here when building a dynamic
8158 executable, it will be because we have
8159 a text relocation. The dynamic loader
8160 will set the text segment writable and
8161 non-executable to apply text relocations.
8162 So we'll segfault when trying to run the
8163 indirection function to resolve the reloc. */
8164 info->callbacks->einfo
8165 (_("%P: %H: relocation %s for indirect "
8166 "function %s unsupported\n"),
8167 input_bfd, input_section, rel->r_offset,
8172 else if (r_symndx == STN_UNDEF || bfd_is_abs_section (sec))
8174 else if (sec == NULL || sec->owner == NULL)
8176 bfd_set_error (bfd_error_bad_value);
8183 /* We are turning this relocation into one
8184 against a section symbol. It would be
8185 proper to subtract the symbol's value,
8186 osec->vma, from the emitted reloc addend,
8187 but ld.so expects buggy relocs.
8188 FIXME: Why not always use a zero index? */
8189 osec = sec->output_section;
8190 indx = elf_section_data (osec)->dynindx;
8193 osec = htab->elf.text_index_section;
8194 indx = elf_section_data (osec)->dynindx;
8196 BFD_ASSERT (indx != 0);
8199 printf ("indx=%ld section=%s flags=%08x name=%s\n",
8200 indx, osec->name, osec->flags,
8201 h->root.root.string);
8205 outrel.r_info = ELF32_R_INFO (indx, r_type);
8207 else if (ifunc != NULL)
8208 outrel.r_info = ELF32_R_INFO (0, R_PPC_IRELATIVE);
8210 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
8213 loc = sreloc->contents;
8214 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
8215 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
8220 /* This reloc will be computed at runtime. We clear the memory
8221 so that it contains predictable value. */
8223 && ((input_section->flags & SEC_ALLOC) != 0
8224 || ELF32_R_TYPE (outrel.r_info) != R_PPC_RELATIVE))
8226 relocation = howto->pc_relative ? outrel.r_offset : 0;
8233 case R_PPC_RELAX_PLT:
8234 case R_PPC_RELAX_PLTREL24:
8237 struct plt_entry *ent;
8238 bfd_vma got2_addend = 0;
8240 if (r_type == R_PPC_RELAX_PLTREL24)
8243 got2_addend = addend;
8246 ent = find_plt_ent (&h->plt.plist, got2, got2_addend);
8247 if (htab->plt_type == PLT_NEW)
8248 relocation = (htab->glink->output_section->vma
8249 + htab->glink->output_offset
8250 + ent->glink_offset);
8252 relocation = (htab->plt->output_section->vma
8253 + htab->plt->output_offset
8260 relocation -= (input_section->output_section->vma
8261 + input_section->output_offset
8262 + rel->r_offset - 4);
8268 t0 = bfd_get_32 (output_bfd, contents + rel->r_offset);
8269 t1 = bfd_get_32 (output_bfd, contents + rel->r_offset + 4);
8271 /* We're clearing the bits for R_PPC_ADDR16_HA
8272 and R_PPC_ADDR16_LO here. */
8276 /* t0 is HA, t1 is LO */
8277 relocation += addend;
8278 t0 |= ((relocation + 0x8000) >> 16) & 0xffff;
8279 t1 |= relocation & 0xffff;
8281 bfd_put_32 (output_bfd, t0, contents + rel->r_offset);
8282 bfd_put_32 (output_bfd, t1, contents + rel->r_offset + 4);
8284 /* Rewrite the reloc and convert one of the trailing nop
8285 relocs to describe this relocation. */
8286 BFD_ASSERT (ELF32_R_TYPE (relend[-1].r_info) == R_PPC_NONE);
8287 /* The relocs are at the bottom 2 bytes */
8288 rel[0].r_offset += 2;
8289 memmove (rel + 1, rel, (relend - rel - 1) * sizeof (*rel));
8290 rel[0].r_info = ELF32_R_INFO (r_symndx, R_PPC_ADDR16_HA);
8291 rel[1].r_offset += 4;
8292 rel[1].r_info = ELF32_R_INFO (r_symndx, R_PPC_ADDR16_LO);
8297 /* Indirect .sdata relocation. */
8298 case R_PPC_EMB_SDAI16:
8299 BFD_ASSERT (htab->sdata[0].section != NULL);
8300 if (!is_static_defined (htab->sdata[0].sym))
8302 unresolved_reloc = TRUE;
8306 = elf_finish_pointer_linker_section (input_bfd, &htab->sdata[0],
8307 h, relocation, rel);
8311 /* Indirect .sdata2 relocation. */
8312 case R_PPC_EMB_SDA2I16:
8313 BFD_ASSERT (htab->sdata[1].section != NULL);
8314 if (!is_static_defined (htab->sdata[1].sym))
8316 unresolved_reloc = TRUE;
8320 = elf_finish_pointer_linker_section (input_bfd, &htab->sdata[1],
8321 h, relocation, rel);
8325 /* Handle the TOC16 reloc. We want to use the offset within the .got
8326 section, not the actual VMA. This is appropriate when generating
8327 an embedded ELF object, for which the .got section acts like the
8328 AIX .toc section. */
8329 case R_PPC_TOC16: /* phony GOT16 relocations */
8330 if (sec == NULL || sec->output_section == NULL)
8332 unresolved_reloc = TRUE;
8335 BFD_ASSERT (strcmp (bfd_get_section_name (sec->owner, sec),
8337 || strcmp (bfd_get_section_name (sec->owner, sec),
8340 addend -= sec->output_section->vma + sec->output_offset + 0x8000;
8343 case R_PPC_PLTREL24:
8344 if (h == NULL || ifunc != NULL)
8346 /* Relocation is to the entry for this symbol in the
8347 procedure linkage table. */
8349 struct plt_entry *ent = find_plt_ent (&h->plt.plist, got2,
8350 info->shared ? addend : 0);
8353 || htab->plt == NULL)
8355 /* We didn't make a PLT entry for this symbol. This
8356 happens when statically linking PIC code, or when
8357 using -Bsymbolic. */
8361 unresolved_reloc = FALSE;
8362 if (htab->plt_type == PLT_NEW)
8363 relocation = (htab->glink->output_section->vma
8364 + htab->glink->output_offset
8365 + ent->glink_offset);
8367 relocation = (htab->plt->output_section->vma
8368 + htab->plt->output_offset
8373 /* Relocate against _SDA_BASE_. */
8374 case R_PPC_SDAREL16:
8377 struct elf_link_hash_entry *sda = htab->sdata[0].sym;
8380 || sec->output_section == NULL
8381 || !is_static_defined (sda))
8383 unresolved_reloc = TRUE;
8386 addend -= SYM_VAL (sda);
8388 name = bfd_get_section_name (output_bfd, sec->output_section);
8389 if (! ((CONST_STRNEQ (name, ".sdata")
8390 && (name[6] == 0 || name[6] == '.'))
8391 || (CONST_STRNEQ (name, ".sbss")
8392 && (name[5] == 0 || name[5] == '.'))))
8394 info->callbacks->einfo
8395 (_("%P: %B: the target (%s) of a %s relocation is "
8396 "in the wrong output section (%s)\n"),
8405 /* Relocate against _SDA2_BASE_. */
8406 case R_PPC_EMB_SDA2REL:
8409 struct elf_link_hash_entry *sda = htab->sdata[1].sym;
8412 || sec->output_section == NULL
8413 || !is_static_defined (sda))
8415 unresolved_reloc = TRUE;
8418 addend -= SYM_VAL (sda);
8420 name = bfd_get_section_name (output_bfd, sec->output_section);
8421 if (! (CONST_STRNEQ (name, ".sdata2")
8422 || CONST_STRNEQ (name, ".sbss2")))
8424 info->callbacks->einfo
8425 (_("%P: %B: the target (%s) of a %s relocation is "
8426 "in the wrong output section (%s)\n"),
8435 case R_PPC_VLE_LO16A:
8436 relocation = (relocation + addend) & 0xffff;
8437 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8438 relocation, split16a_type);
8441 case R_PPC_VLE_LO16D:
8442 relocation = (relocation + addend) & 0xffff;
8443 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8444 relocation, split16d_type);
8447 case R_PPC_VLE_HI16A:
8448 relocation = ((relocation + addend) >> 16) & 0xffff;
8449 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8450 relocation, split16a_type);
8453 case R_PPC_VLE_HI16D:
8454 relocation = ((relocation + addend) >> 16) & 0xffff;
8455 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8456 relocation, split16d_type);
8459 case R_PPC_VLE_HA16A:
8461 bfd_vma value = relocation + addend;
8462 value = (((value >> 16) + ((value & 0x8000) ? 1 : 0)) & 0xffff);
8463 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8464 value, split16a_type);
8468 case R_PPC_VLE_HA16D:
8470 bfd_vma value = relocation + addend;
8471 value = (((value >> 16) + ((value & 0x8000) ? 1 : 0)) & 0xffff);
8472 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8473 value, split16d_type);
8477 /* Relocate against either _SDA_BASE_, _SDA2_BASE_, or 0. */
8478 case R_PPC_EMB_SDA21:
8479 case R_PPC_VLE_SDA21:
8480 case R_PPC_EMB_RELSDA:
8481 case R_PPC_VLE_SDA21_LO:
8485 struct elf_link_hash_entry *sda = NULL;
8487 if (sec == NULL || sec->output_section == NULL)
8489 unresolved_reloc = TRUE;
8493 name = bfd_get_section_name (output_bfd, sec->output_section);
8494 if (((CONST_STRNEQ (name, ".sdata")
8495 && (name[6] == 0 || name[6] == '.'))
8496 || (CONST_STRNEQ (name, ".sbss")
8497 && (name[5] == 0 || name[5] == '.'))))
8500 sda = htab->sdata[0].sym;
8502 else if (CONST_STRNEQ (name, ".sdata2")
8503 || CONST_STRNEQ (name, ".sbss2"))
8506 sda = htab->sdata[1].sym;
8508 else if (strcmp (name, ".PPC.EMB.sdata0") == 0
8509 || strcmp (name, ".PPC.EMB.sbss0") == 0)
8515 info->callbacks->einfo
8516 (_("%P: %B: the target (%s) of a %s relocation is "
8517 "in the wrong output section (%s)\n"),
8523 bfd_set_error (bfd_error_bad_value);
8530 if (!is_static_defined (sda))
8532 unresolved_reloc = TRUE;
8535 addend -= SYM_VAL (sda);
8539 && (r_type == R_PPC_VLE_SDA21
8540 || r_type == R_PPC_VLE_SDA21_LO))
8542 /* Use the split20 format. */
8543 bfd_vma insn, bits12to15, bits21to31;
8544 bfd_vma value = (relocation + rel->r_offset) & 0xffff;
8545 /* Propagate sign bit, if necessary. */
8546 insn = (value & 0x8000) ? 0x70107800 : 0x70000000;
8547 bits12to15 = value & 0x700;
8548 bits21to31 = value & 0x7ff;
8551 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
8554 else if (r_type == R_PPC_EMB_SDA21
8555 || r_type == R_PPC_VLE_SDA21
8556 || r_type == R_PPC_VLE_SDA21_LO)
8558 bfd_vma insn; /* Fill in register field. */
8560 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
8561 insn = (insn & ~RA_REGISTER_MASK) | (reg << RA_REGISTER_SHIFT);
8562 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
8567 case R_PPC_VLE_SDAREL_LO16A:
8568 case R_PPC_VLE_SDAREL_LO16D:
8569 case R_PPC_VLE_SDAREL_HI16A:
8570 case R_PPC_VLE_SDAREL_HI16D:
8571 case R_PPC_VLE_SDAREL_HA16A:
8572 case R_PPC_VLE_SDAREL_HA16D:
8577 struct elf_link_hash_entry *sda = NULL;
8579 if (sec == NULL || sec->output_section == NULL)
8581 unresolved_reloc = TRUE;
8585 name = bfd_get_section_name (output_bfd, sec->output_section);
8586 if (((CONST_STRNEQ (name, ".sdata")
8587 && (name[6] == 0 || name[6] == '.'))
8588 || (CONST_STRNEQ (name, ".sbss")
8589 && (name[5] == 0 || name[5] == '.'))))
8592 sda = htab->sdata[0].sym;
8594 else if (CONST_STRNEQ (name, ".sdata2")
8595 || CONST_STRNEQ (name, ".sbss2"))
8598 sda = htab->sdata[1].sym;
8602 (*_bfd_error_handler)
8603 (_("%B: the target (%s) of a %s relocation is "
8604 "in the wrong output section (%s)"),
8610 bfd_set_error (bfd_error_bad_value);
8617 if (!is_static_defined (sda))
8619 unresolved_reloc = TRUE;
8624 value = sda->root.u.def.section->output_section->vma
8625 + sda->root.u.def.section->output_offset;
8627 if (r_type == R_PPC_VLE_SDAREL_LO16A)
8629 value = (value + addend) & 0xffff;
8630 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8631 value, split16a_type);
8633 else if (r_type == R_PPC_VLE_SDAREL_LO16D)
8635 value = (value + addend) & 0xffff;
8636 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8637 value, split16d_type);
8639 else if (r_type == R_PPC_VLE_SDAREL_HI16A)
8641 value = ((value + addend) >> 16) & 0xffff;
8642 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8643 value, split16a_type);
8645 else if (r_type == R_PPC_VLE_SDAREL_HI16D)
8647 value = ((value + addend) >> 16) & 0xffff;
8648 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8649 value, split16d_type);
8651 else if (r_type == R_PPC_VLE_SDAREL_HA16A)
8654 value = (((value >> 16) + ((value & 0x8000) ? 1 : 0)) & 0xffff);
8655 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8656 value, split16a_type);
8658 else if (r_type == R_PPC_VLE_SDAREL_HA16D)
8661 value = (((value >> 16) + ((value & 0x8000) ? 1 : 0)) & 0xffff);
8662 ppc_elf_vle_split16 (output_bfd, contents, rel->r_offset,
8663 value, split16d_type);
8668 /* Relocate against the beginning of the section. */
8670 case R_PPC_SECTOFF_LO:
8671 case R_PPC_SECTOFF_HI:
8672 case R_PPC_SECTOFF_HA:
8673 if (sec == NULL || sec->output_section == NULL)
8675 unresolved_reloc = TRUE;
8678 addend -= sec->output_section->vma;
8681 /* Negative relocations. */
8682 case R_PPC_EMB_NADDR32:
8683 case R_PPC_EMB_NADDR16:
8684 case R_PPC_EMB_NADDR16_LO:
8685 case R_PPC_EMB_NADDR16_HI:
8686 case R_PPC_EMB_NADDR16_HA:
8687 addend -= 2 * relocation;
8691 case R_PPC_GLOB_DAT:
8692 case R_PPC_JMP_SLOT:
8693 case R_PPC_RELATIVE:
8694 case R_PPC_IRELATIVE:
8696 case R_PPC_PLTREL32:
8697 case R_PPC_PLT16_LO:
8698 case R_PPC_PLT16_HI:
8699 case R_PPC_PLT16_HA:
8701 case R_PPC_EMB_RELSEC16:
8702 case R_PPC_EMB_RELST_LO:
8703 case R_PPC_EMB_RELST_HI:
8704 case R_PPC_EMB_RELST_HA:
8705 case R_PPC_EMB_BIT_FLD:
8706 info->callbacks->einfo
8707 (_("%P: %B: relocation %s is not yet supported for symbol %s\n"),
8712 bfd_set_error (bfd_error_invalid_operation);
8717 /* Do any further special processing. */
8723 case R_PPC_ADDR16_HA:
8724 case R_PPC_REL16_HA:
8725 case R_PPC_SECTOFF_HA:
8726 case R_PPC_TPREL16_HA:
8727 case R_PPC_DTPREL16_HA:
8728 case R_PPC_EMB_NADDR16_HA:
8729 case R_PPC_EMB_RELST_HA:
8730 /* It's just possible that this symbol is a weak symbol
8731 that's not actually defined anywhere. In that case,
8732 'sec' would be NULL, and we should leave the symbol
8733 alone (it will be set to zero elsewhere in the link). */
8738 case R_PPC_PLT16_HA:
8739 case R_PPC_GOT16_HA:
8740 case R_PPC_GOT_TLSGD16_HA:
8741 case R_PPC_GOT_TLSLD16_HA:
8742 case R_PPC_GOT_TPREL16_HA:
8743 case R_PPC_GOT_DTPREL16_HA:
8744 /* Add 0x10000 if sign bit in 0:15 is set.
8745 Bits 0:15 are not used. */
8751 fprintf (stderr, "\ttype = %s (%d), name = %s, symbol index = %ld, "
8752 "offset = %ld, addend = %ld\n",
8757 (long) rel->r_offset,
8761 if (unresolved_reloc
8762 && !((input_section->flags & SEC_DEBUGGING) != 0
8764 && _bfd_elf_section_offset (output_bfd, info, input_section,
8765 rel->r_offset) != (bfd_vma) -1)
8767 info->callbacks->einfo
8768 (_("%P: %H: unresolvable %s relocation against symbol `%s'\n"),
8769 input_bfd, input_section, rel->r_offset,
8775 r = _bfd_final_link_relocate (howto,
8783 if (r != bfd_reloc_ok)
8785 if (r == bfd_reloc_overflow)
8790 && h->root.type == bfd_link_hash_undefweak
8791 && howto->pc_relative)
8793 /* Assume this is a call protected by other code that
8794 detect the symbol is undefined. If this is the case,
8795 we can safely ignore the overflow. If not, the
8796 program is hosed anyway, and a little warning isn't
8802 if (! (*info->callbacks->reloc_overflow) (info,
8803 (h ? &h->root : NULL),
8814 info->callbacks->einfo
8815 (_("%P: %H: %s reloc against `%s': error %d\n"),
8816 input_bfd, input_section, rel->r_offset,
8817 howto->name, sym_name, (int) r);
8824 fprintf (stderr, "\n");
8830 /* Finish up dynamic symbol handling. We set the contents of various
8831 dynamic sections here. */
8834 ppc_elf_finish_dynamic_symbol (bfd *output_bfd,
8835 struct bfd_link_info *info,
8836 struct elf_link_hash_entry *h,
8837 Elf_Internal_Sym *sym)
8839 struct ppc_elf_link_hash_table *htab;
8840 struct plt_entry *ent;
8841 bfd_boolean doneone;
8844 fprintf (stderr, "ppc_elf_finish_dynamic_symbol called for %s",
8845 h->root.root.string);
8848 htab = ppc_elf_hash_table (info);
8849 BFD_ASSERT (htab->elf.dynobj != NULL);
8852 for (ent = h->plt.plist; ent != NULL; ent = ent->next)
8853 if (ent->plt.offset != (bfd_vma) -1)
8857 Elf_Internal_Rela rela;
8859 bfd_vma reloc_index;
8861 if (htab->plt_type == PLT_NEW
8862 || !htab->elf.dynamic_sections_created
8863 || h->dynindx == -1)
8864 reloc_index = ent->plt.offset / 4;
8867 reloc_index = ((ent->plt.offset - htab->plt_initial_entry_size)
8868 / htab->plt_slot_size);
8869 if (reloc_index > PLT_NUM_SINGLE_ENTRIES
8870 && htab->plt_type == PLT_OLD)
8871 reloc_index -= (reloc_index - PLT_NUM_SINGLE_ENTRIES) / 2;
8874 /* This symbol has an entry in the procedure linkage table.
8876 if (htab->plt_type == PLT_VXWORKS
8877 && htab->elf.dynamic_sections_created
8878 && h->dynindx != -1)
8881 const bfd_vma *plt_entry;
8883 /* The first three entries in .got.plt are reserved. */
8884 got_offset = (reloc_index + 3) * 4;
8886 /* Use the right PLT. */
8887 plt_entry = info->shared ? ppc_elf_vxworks_pic_plt_entry
8888 : ppc_elf_vxworks_plt_entry;
8890 /* Fill in the .plt on VxWorks. */
8893 bfd_put_32 (output_bfd,
8894 plt_entry[0] | PPC_HA (got_offset),
8895 htab->plt->contents + ent->plt.offset + 0);
8896 bfd_put_32 (output_bfd,
8897 plt_entry[1] | PPC_LO (got_offset),
8898 htab->plt->contents + ent->plt.offset + 4);
8902 bfd_vma got_loc = got_offset + SYM_VAL (htab->elf.hgot);
8904 bfd_put_32 (output_bfd,
8905 plt_entry[0] | PPC_HA (got_loc),
8906 htab->plt->contents + ent->plt.offset + 0);
8907 bfd_put_32 (output_bfd,
8908 plt_entry[1] | PPC_LO (got_loc),
8909 htab->plt->contents + ent->plt.offset + 4);
8912 bfd_put_32 (output_bfd, plt_entry[2],
8913 htab->plt->contents + ent->plt.offset + 8);
8914 bfd_put_32 (output_bfd, plt_entry[3],
8915 htab->plt->contents + ent->plt.offset + 12);
8917 /* This instruction is an immediate load. The value loaded is
8918 the byte offset of the R_PPC_JMP_SLOT relocation from the
8919 start of the .rela.plt section. The value is stored in the
8920 low-order 16 bits of the load instruction. */
8921 /* NOTE: It appears that this is now an index rather than a
8922 prescaled offset. */
8923 bfd_put_32 (output_bfd,
8924 plt_entry[4] | reloc_index,
8925 htab->plt->contents + ent->plt.offset + 16);
8926 /* This instruction is a PC-relative branch whose target is
8927 the start of the PLT section. The address of this branch
8928 instruction is 20 bytes beyond the start of this PLT entry.
8929 The address is encoded in bits 6-29, inclusive. The value
8930 stored is right-shifted by two bits, permitting a 26-bit
8932 bfd_put_32 (output_bfd,
8934 | (-(ent->plt.offset + 20) & 0x03fffffc)),
8935 htab->plt->contents + ent->plt.offset + 20);
8936 bfd_put_32 (output_bfd, plt_entry[6],
8937 htab->plt->contents + ent->plt.offset + 24);
8938 bfd_put_32 (output_bfd, plt_entry[7],
8939 htab->plt->contents + ent->plt.offset + 28);
8941 /* Fill in the GOT entry corresponding to this PLT slot with
8942 the address immediately after the the "bctr" instruction
8943 in this PLT entry. */
8944 bfd_put_32 (output_bfd, (htab->plt->output_section->vma
8945 + htab->plt->output_offset
8946 + ent->plt.offset + 16),
8947 htab->sgotplt->contents + got_offset);
8951 /* Fill in a couple of entries in .rela.plt.unloaded. */
8952 loc = htab->srelplt2->contents
8953 + ((VXWORKS_PLTRESOLVE_RELOCS + reloc_index
8954 * VXWORKS_PLT_NON_JMP_SLOT_RELOCS)
8955 * sizeof (Elf32_External_Rela));
8957 /* Provide the @ha relocation for the first instruction. */
8958 rela.r_offset = (htab->plt->output_section->vma
8959 + htab->plt->output_offset
8960 + ent->plt.offset + 2);
8961 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
8963 rela.r_addend = got_offset;
8964 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
8965 loc += sizeof (Elf32_External_Rela);
8967 /* Provide the @l relocation for the second instruction. */
8968 rela.r_offset = (htab->plt->output_section->vma
8969 + htab->plt->output_offset
8970 + ent->plt.offset + 6);
8971 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx,
8973 rela.r_addend = got_offset;
8974 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
8975 loc += sizeof (Elf32_External_Rela);
8977 /* Provide a relocation for the GOT entry corresponding to this
8978 PLT slot. Point it at the middle of the .plt entry. */
8979 rela.r_offset = (htab->sgotplt->output_section->vma
8980 + htab->sgotplt->output_offset
8982 rela.r_info = ELF32_R_INFO (htab->elf.hplt->indx,
8984 rela.r_addend = ent->plt.offset + 16;
8985 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
8988 /* VxWorks uses non-standard semantics for R_PPC_JMP_SLOT.
8989 In particular, the offset for the relocation is not the
8990 address of the PLT entry for this function, as specified
8991 by the ABI. Instead, the offset is set to the address of
8992 the GOT slot for this function. See EABI 4.4.4.1. */
8993 rela.r_offset = (htab->sgotplt->output_section->vma
8994 + htab->sgotplt->output_offset
9000 asection *splt = htab->plt;
9001 if (!htab->elf.dynamic_sections_created
9002 || h->dynindx == -1)
9005 rela.r_offset = (splt->output_section->vma
9006 + splt->output_offset
9008 if (htab->plt_type == PLT_OLD
9009 || !htab->elf.dynamic_sections_created
9010 || h->dynindx == -1)
9012 /* We don't need to fill in the .plt. The ppc dynamic
9013 linker will fill it in. */
9017 bfd_vma val = (htab->glink_pltresolve + ent->plt.offset
9018 + htab->glink->output_section->vma
9019 + htab->glink->output_offset);
9020 bfd_put_32 (output_bfd, val,
9021 splt->contents + ent->plt.offset);
9025 /* Fill in the entry in the .rela.plt section. */
9027 if (!htab->elf.dynamic_sections_created
9028 || h->dynindx == -1)
9030 BFD_ASSERT (h->type == STT_GNU_IFUNC
9032 && (h->root.type == bfd_link_hash_defined
9033 || h->root.type == bfd_link_hash_defweak));
9034 rela.r_info = ELF32_R_INFO (0, R_PPC_IRELATIVE);
9035 rela.r_addend = SYM_VAL (h);
9038 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_JMP_SLOT);
9040 if (!htab->elf.dynamic_sections_created
9041 || h->dynindx == -1)
9042 loc = (htab->reliplt->contents
9043 + (htab->reliplt->reloc_count++
9044 * sizeof (Elf32_External_Rela)));
9046 loc = (htab->relplt->contents
9047 + reloc_index * sizeof (Elf32_External_Rela));
9048 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
9050 if (!h->def_regular)
9052 /* Mark the symbol as undefined, rather than as
9053 defined in the .plt section. Leave the value if
9054 there were any relocations where pointer equality
9055 matters (this is a clue for the dynamic linker, to
9056 make function pointer comparisons work between an
9057 application and shared library), otherwise set it
9059 sym->st_shndx = SHN_UNDEF;
9060 if (!h->pointer_equality_needed)
9062 else if (!h->ref_regular_nonweak)
9064 /* This breaks function pointer comparisons, but
9065 that is better than breaking tests for a NULL
9066 function pointer. */
9070 else if (h->type == STT_GNU_IFUNC
9073 /* Set the value of ifunc symbols in a non-pie
9074 executable to the glink entry. This is to avoid
9075 text relocations. We can't do this for ifunc in
9076 allocate_dynrelocs, as we do for normal dynamic
9077 function symbols with plt entries, because we need
9078 to keep the original value around for the ifunc
9080 sym->st_shndx = (_bfd_elf_section_from_bfd_section
9081 (output_bfd, htab->glink->output_section));
9082 sym->st_value = (ent->glink_offset
9083 + htab->glink->output_offset
9084 + htab->glink->output_section->vma);
9089 if (htab->plt_type == PLT_NEW
9090 || !htab->elf.dynamic_sections_created
9091 || h->dynindx == -1)
9094 asection *splt = htab->plt;
9095 if (!htab->elf.dynamic_sections_created
9096 || h->dynindx == -1)
9099 p = (unsigned char *) htab->glink->contents + ent->glink_offset;
9101 if (h == htab->tls_get_addr && !htab->no_tls_get_addr_opt)
9103 bfd_put_32 (output_bfd, LWZ_11_3, p);
9105 bfd_put_32 (output_bfd, LWZ_12_3 + 4, p);
9107 bfd_put_32 (output_bfd, MR_0_3, p);
9109 bfd_put_32 (output_bfd, CMPWI_11_0, p);
9111 bfd_put_32 (output_bfd, ADD_3_12_2, p);
9113 bfd_put_32 (output_bfd, BEQLR, p);
9115 bfd_put_32 (output_bfd, MR_3_0, p);
9117 bfd_put_32 (output_bfd, NOP, p);
9121 write_glink_stub (ent, splt, p, info);
9124 /* We only need one non-PIC glink stub. */
9134 Elf_Internal_Rela rela;
9137 /* This symbols needs a copy reloc. Set it up. */
9140 fprintf (stderr, ", copy");
9143 BFD_ASSERT (h->dynindx != -1);
9145 if (ppc_elf_hash_entry (h)->has_sda_refs)
9149 BFD_ASSERT (s != NULL);
9151 rela.r_offset = SYM_VAL (h);
9152 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_COPY);
9154 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
9155 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
9159 fprintf (stderr, "\n");
9162 /* Mark some specially defined symbols as absolute. */
9163 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
9164 || (!htab->is_vxworks
9165 && (h == htab->elf.hgot
9166 || strcmp (h->root.root.string,
9167 "_PROCEDURE_LINKAGE_TABLE_") == 0)))
9168 sym->st_shndx = SHN_ABS;
9173 static enum elf_reloc_type_class
9174 ppc_elf_reloc_type_class (const Elf_Internal_Rela *rela)
9176 switch (ELF32_R_TYPE (rela->r_info))
9178 case R_PPC_RELATIVE:
9179 return reloc_class_relative;
9182 case R_PPC_JMP_SLOT:
9183 return reloc_class_plt;
9185 return reloc_class_copy;
9187 return reloc_class_normal;
9191 /* Finish up the dynamic sections. */
9194 ppc_elf_finish_dynamic_sections (bfd *output_bfd,
9195 struct bfd_link_info *info)
9199 struct ppc_elf_link_hash_table *htab;
9202 bfd_boolean ret = TRUE;
9205 fprintf (stderr, "ppc_elf_finish_dynamic_sections called\n");
9208 htab = ppc_elf_hash_table (info);
9209 dynobj = elf_hash_table (info)->dynobj;
9210 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
9211 if (htab->is_vxworks)
9212 splt = bfd_get_section_by_name (dynobj, ".plt");
9217 if (htab->elf.hgot != NULL)
9218 got = SYM_VAL (htab->elf.hgot);
9220 if (htab->elf.dynamic_sections_created)
9222 Elf32_External_Dyn *dyncon, *dynconend;
9224 BFD_ASSERT (htab->plt != NULL && sdyn != NULL);
9226 dyncon = (Elf32_External_Dyn *) sdyn->contents;
9227 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
9228 for (; dyncon < dynconend; dyncon++)
9230 Elf_Internal_Dyn dyn;
9233 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
9238 if (htab->is_vxworks)
9242 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9246 dyn.d_un.d_val = htab->relplt->size;
9251 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9255 dyn.d_un.d_ptr = got;
9259 if (htab->is_vxworks)
9262 dyn.d_un.d_ptr -= htab->relplt->size;
9268 if (htab->is_vxworks
9269 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
9274 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
9278 if (htab->got != NULL)
9280 if (htab->elf.hgot->root.u.def.section == htab->got
9281 || htab->elf.hgot->root.u.def.section == htab->sgotplt)
9283 unsigned char *p = htab->elf.hgot->root.u.def.section->contents;
9285 p += htab->elf.hgot->root.u.def.value;
9286 if (htab->plt_type == PLT_OLD)
9288 /* Add a blrl instruction at _GLOBAL_OFFSET_TABLE_-4
9289 so that a function can easily find the address of
9290 _GLOBAL_OFFSET_TABLE_. */
9291 BFD_ASSERT (htab->elf.hgot->root.u.def.value - 4
9292 < htab->elf.hgot->root.u.def.section->size);
9293 bfd_put_32 (output_bfd, 0x4e800021, p - 4);
9298 bfd_vma val = sdyn->output_section->vma + sdyn->output_offset;
9299 BFD_ASSERT (htab->elf.hgot->root.u.def.value
9300 < htab->elf.hgot->root.u.def.section->size);
9301 bfd_put_32 (output_bfd, val, p);
9306 info->callbacks->einfo (_("%P: %s not defined in linker created %s\n"),
9307 htab->elf.hgot->root.root.string,
9308 (htab->sgotplt != NULL
9309 ? htab->sgotplt->name : htab->got->name));
9310 bfd_set_error (bfd_error_bad_value);
9314 elf_section_data (htab->got->output_section)->this_hdr.sh_entsize = 4;
9317 /* Fill in the first entry in the VxWorks procedure linkage table. */
9318 if (splt && splt->size > 0)
9320 /* Use the right PLT. */
9321 const bfd_vma *plt_entry = (info->shared
9322 ? ppc_elf_vxworks_pic_plt0_entry
9323 : ppc_elf_vxworks_plt0_entry);
9327 bfd_vma got_value = SYM_VAL (htab->elf.hgot);
9329 bfd_put_32 (output_bfd, plt_entry[0] | PPC_HA (got_value),
9330 splt->contents + 0);
9331 bfd_put_32 (output_bfd, plt_entry[1] | PPC_LO (got_value),
9332 splt->contents + 4);
9336 bfd_put_32 (output_bfd, plt_entry[0], splt->contents + 0);
9337 bfd_put_32 (output_bfd, plt_entry[1], splt->contents + 4);
9339 bfd_put_32 (output_bfd, plt_entry[2], splt->contents + 8);
9340 bfd_put_32 (output_bfd, plt_entry[3], splt->contents + 12);
9341 bfd_put_32 (output_bfd, plt_entry[4], splt->contents + 16);
9342 bfd_put_32 (output_bfd, plt_entry[5], splt->contents + 20);
9343 bfd_put_32 (output_bfd, plt_entry[6], splt->contents + 24);
9344 bfd_put_32 (output_bfd, plt_entry[7], splt->contents + 28);
9348 Elf_Internal_Rela rela;
9351 loc = htab->srelplt2->contents;
9353 /* Output the @ha relocation for the first instruction. */
9354 rela.r_offset = (htab->plt->output_section->vma
9355 + htab->plt->output_offset
9357 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_PPC_ADDR16_HA);
9359 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
9360 loc += sizeof (Elf32_External_Rela);
9362 /* Output the @l relocation for the second instruction. */
9363 rela.r_offset = (htab->plt->output_section->vma
9364 + htab->plt->output_offset
9366 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_PPC_ADDR16_LO);
9368 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
9369 loc += sizeof (Elf32_External_Rela);
9371 /* Fix up the remaining relocations. They may have the wrong
9372 symbol index for _G_O_T_ or _P_L_T_ depending on the order
9373 in which symbols were output. */
9374 while (loc < htab->srelplt2->contents + htab->srelplt2->size)
9376 Elf_Internal_Rela rel;
9378 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
9379 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_PPC_ADDR16_HA);
9380 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
9381 loc += sizeof (Elf32_External_Rela);
9383 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
9384 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_PPC_ADDR16_LO);
9385 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
9386 loc += sizeof (Elf32_External_Rela);
9388 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
9389 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_PPC_ADDR32);
9390 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
9391 loc += sizeof (Elf32_External_Rela);
9396 if (htab->glink != NULL
9397 && htab->glink->contents != NULL
9398 && htab->elf.dynamic_sections_created)
9401 unsigned char *endp;
9406 * PIC glink code is the following:
9408 * # ith PLT code stub.
9409 * addis 11,30,(plt+(i-1)*4-got)@ha
9410 * lwz 11,(plt+(i-1)*4-got)@l(11)
9414 * # A table of branches, one for each plt entry.
9415 * # The idea is that the plt call stub loads ctr and r11 with these
9416 * # addresses, so (r11 - res_0) gives the plt index * 4.
9417 * res_0: b PLTresolve
9418 * res_1: b PLTresolve
9420 * # Some number of entries towards the end can be nops
9426 * addis 11,11,(1f-res_0)@ha
9429 * 1: addi 11,11,(1b-res_0)@l
9432 * sub 11,11,12 # r11 = index * 4
9433 * addis 12,12,(got+4-1b)@ha
9434 * lwz 0,(got+4-1b)@l(12) # got[1] address of dl_runtime_resolve
9435 * lwz 12,(got+8-1b)@l(12) # got[2] contains the map address
9438 * add 11,0,11 # r11 = index * 12 = reloc offset.
9441 static const unsigned int pic_plt_resolve[] =
9462 * Non-PIC glink code is a little simpler.
9464 * # ith PLT code stub.
9465 * lis 11,(plt+(i-1)*4)@ha
9466 * lwz 11,(plt+(i-1)*4)@l(11)
9470 * The branch table is the same, then comes
9474 * addis 11,11,(-res_0)@ha
9475 * lwz 0,(got+4)@l(12) # got[1] address of dl_runtime_resolve
9476 * addi 11,11,(-res_0)@l # r11 = index * 4
9479 * lwz 12,(got+8)@l(12) # got[2] contains the map address
9480 * add 11,0,11 # r11 = index * 12 = reloc offset.
9483 static const unsigned int plt_resolve[] =
9503 if (ARRAY_SIZE (pic_plt_resolve) != GLINK_PLTRESOLVE / 4)
9505 if (ARRAY_SIZE (plt_resolve) != GLINK_PLTRESOLVE / 4)
9508 /* Build the branch table, one for each plt entry (less one),
9509 and perhaps some padding. */
9510 p = htab->glink->contents;
9511 p += htab->glink_pltresolve;
9512 endp = htab->glink->contents;
9513 endp += htab->glink->size - GLINK_PLTRESOLVE;
9514 while (p < endp - 8 * 4)
9516 bfd_put_32 (output_bfd, B + endp - p, p);
9521 bfd_put_32 (output_bfd, NOP, p);
9525 res0 = (htab->glink_pltresolve
9526 + htab->glink->output_section->vma
9527 + htab->glink->output_offset);
9529 /* Last comes the PLTresolve stub. */
9534 for (i = 0; i < ARRAY_SIZE (pic_plt_resolve); i++)
9536 bfd_put_32 (output_bfd, pic_plt_resolve[i], p);
9539 p -= 4 * ARRAY_SIZE (pic_plt_resolve);
9541 bcl = (htab->glink->size - GLINK_PLTRESOLVE + 3*4
9542 + htab->glink->output_section->vma
9543 + htab->glink->output_offset);
9545 bfd_put_32 (output_bfd,
9546 ADDIS_11_11 + PPC_HA (bcl - res0), p + 0*4);
9547 bfd_put_32 (output_bfd,
9548 ADDI_11_11 + PPC_LO (bcl - res0), p + 3*4);
9549 bfd_put_32 (output_bfd,
9550 ADDIS_12_12 + PPC_HA (got + 4 - bcl), p + 7*4);
9551 if (PPC_HA (got + 4 - bcl) == PPC_HA (got + 8 - bcl))
9553 bfd_put_32 (output_bfd,
9554 LWZ_0_12 + PPC_LO (got + 4 - bcl), p + 8*4);
9555 bfd_put_32 (output_bfd,
9556 LWZ_12_12 + PPC_LO (got + 8 - bcl), p + 9*4);
9560 bfd_put_32 (output_bfd,
9561 LWZU_0_12 + PPC_LO (got + 4 - bcl), p + 8*4);
9562 bfd_put_32 (output_bfd,
9563 LWZ_12_12 + 4, p + 9*4);
9568 for (i = 0; i < ARRAY_SIZE (plt_resolve); i++)
9570 bfd_put_32 (output_bfd, plt_resolve[i], p);
9573 p -= 4 * ARRAY_SIZE (plt_resolve);
9575 bfd_put_32 (output_bfd,
9576 LIS_12 + PPC_HA (got + 4), p + 0*4);
9577 bfd_put_32 (output_bfd,
9578 ADDIS_11_11 + PPC_HA (-res0), p + 1*4);
9579 bfd_put_32 (output_bfd,
9580 ADDI_11_11 + PPC_LO (-res0), p + 3*4);
9581 if (PPC_HA (got + 4) == PPC_HA (got + 8))
9583 bfd_put_32 (output_bfd,
9584 LWZ_0_12 + PPC_LO (got + 4), p + 2*4);
9585 bfd_put_32 (output_bfd,
9586 LWZ_12_12 + PPC_LO (got + 8), p + 6*4);
9590 bfd_put_32 (output_bfd,
9591 LWZU_0_12 + PPC_LO (got + 4), p + 2*4);
9592 bfd_put_32 (output_bfd,
9593 LWZ_12_12 + 4, p + 6*4);
9598 if (htab->glink_eh_frame != NULL
9599 && htab->glink_eh_frame->contents != NULL)
9601 unsigned char *p = htab->glink_eh_frame->contents;
9604 memcpy (p, glink_eh_frame_cie, sizeof (glink_eh_frame_cie));
9605 /* CIE length (rewrite in case little-endian). */
9606 bfd_put_32 (htab->elf.dynobj, sizeof (glink_eh_frame_cie) - 4, p);
9607 p += sizeof (glink_eh_frame_cie);
9609 val = htab->glink_eh_frame->size - 4 - sizeof (glink_eh_frame_cie);
9610 bfd_put_32 (htab->elf.dynobj, val, p);
9613 val = p - htab->glink_eh_frame->contents;
9614 bfd_put_32 (htab->elf.dynobj, val, p);
9616 /* Offset to .glink. */
9617 val = (htab->glink->output_section->vma
9618 + htab->glink->output_offset);
9619 val -= (htab->glink_eh_frame->output_section->vma
9620 + htab->glink_eh_frame->output_offset);
9621 val -= p - htab->glink_eh_frame->contents;
9622 bfd_put_32 (htab->elf.dynobj, val, p);
9625 bfd_put_32 (htab->elf.dynobj, htab->glink->size, p);
9631 && htab->elf.dynamic_sections_created)
9633 bfd_vma adv = (htab->glink->size - GLINK_PLTRESOLVE + 8) >> 2;
9635 *p++ = DW_CFA_advance_loc + adv;
9638 *p++ = DW_CFA_advance_loc1;
9641 else if (adv < 65536)
9643 *p++ = DW_CFA_advance_loc2;
9644 bfd_put_16 (htab->elf.dynobj, adv, p);
9649 *p++ = DW_CFA_advance_loc4;
9650 bfd_put_32 (htab->elf.dynobj, adv, p);
9653 *p++ = DW_CFA_register;
9656 *p++ = DW_CFA_advance_loc + 4;
9657 *p++ = DW_CFA_restore_extended;
9660 BFD_ASSERT ((bfd_vma) ((p + 3 - htab->glink_eh_frame->contents) & -4)
9661 == htab->glink_eh_frame->size);
9663 if (htab->glink_eh_frame->sec_info_type == SEC_INFO_TYPE_EH_FRAME
9664 && !_bfd_elf_write_section_eh_frame (output_bfd, info,
9665 htab->glink_eh_frame,
9666 htab->glink_eh_frame->contents))
9673 #define TARGET_LITTLE_SYM bfd_elf32_powerpcle_vec
9674 #define TARGET_LITTLE_NAME "elf32-powerpcle"
9675 #define TARGET_BIG_SYM bfd_elf32_powerpc_vec
9676 #define TARGET_BIG_NAME "elf32-powerpc"
9677 #define ELF_ARCH bfd_arch_powerpc
9678 #define ELF_TARGET_ID PPC32_ELF_DATA
9679 #define ELF_MACHINE_CODE EM_PPC
9680 #ifdef __QNXTARGET__
9681 #define ELF_MAXPAGESIZE 0x1000
9683 #define ELF_MAXPAGESIZE 0x10000
9685 #define ELF_MINPAGESIZE 0x1000
9686 #define ELF_COMMONPAGESIZE 0x1000
9687 #define elf_info_to_howto ppc_elf_info_to_howto
9689 #ifdef EM_CYGNUS_POWERPC
9690 #define ELF_MACHINE_ALT1 EM_CYGNUS_POWERPC
9694 #define ELF_MACHINE_ALT2 EM_PPC_OLD
9697 #define elf_backend_plt_not_loaded 1
9698 #define elf_backend_can_gc_sections 1
9699 #define elf_backend_can_refcount 1
9700 #define elf_backend_rela_normal 1
9702 #define bfd_elf32_mkobject ppc_elf_mkobject
9703 #define bfd_elf32_bfd_merge_private_bfd_data ppc_elf_merge_private_bfd_data
9704 #define bfd_elf32_bfd_relax_section ppc_elf_relax_section
9705 #define bfd_elf32_bfd_reloc_type_lookup ppc_elf_reloc_type_lookup
9706 #define bfd_elf32_bfd_reloc_name_lookup ppc_elf_reloc_name_lookup
9707 #define bfd_elf32_bfd_set_private_flags ppc_elf_set_private_flags
9708 #define bfd_elf32_bfd_link_hash_table_create ppc_elf_link_hash_table_create
9709 #define bfd_elf32_get_synthetic_symtab ppc_elf_get_synthetic_symtab
9711 #define elf_backend_object_p ppc_elf_object_p
9712 #define elf_backend_gc_mark_hook ppc_elf_gc_mark_hook
9713 #define elf_backend_gc_sweep_hook ppc_elf_gc_sweep_hook
9714 #define elf_backend_section_from_shdr ppc_elf_section_from_shdr
9715 #define elf_backend_relocate_section ppc_elf_relocate_section
9716 #define elf_backend_create_dynamic_sections ppc_elf_create_dynamic_sections
9717 #define elf_backend_check_relocs ppc_elf_check_relocs
9718 #define elf_backend_copy_indirect_symbol ppc_elf_copy_indirect_symbol
9719 #define elf_backend_adjust_dynamic_symbol ppc_elf_adjust_dynamic_symbol
9720 #define elf_backend_add_symbol_hook ppc_elf_add_symbol_hook
9721 #define elf_backend_size_dynamic_sections ppc_elf_size_dynamic_sections
9722 #define elf_backend_hash_symbol ppc_elf_hash_symbol
9723 #define elf_backend_finish_dynamic_symbol ppc_elf_finish_dynamic_symbol
9724 #define elf_backend_finish_dynamic_sections ppc_elf_finish_dynamic_sections
9725 #define elf_backend_fake_sections ppc_elf_fake_sections
9726 #define elf_backend_additional_program_headers ppc_elf_additional_program_headers
9727 #define elf_backend_modify_segment_map ppc_elf_modify_segment_map
9728 #define elf_backend_grok_prstatus ppc_elf_grok_prstatus
9729 #define elf_backend_grok_psinfo ppc_elf_grok_psinfo
9730 #define elf_backend_write_core_note ppc_elf_write_core_note
9731 #define elf_backend_reloc_type_class ppc_elf_reloc_type_class
9732 #define elf_backend_begin_write_processing ppc_elf_begin_write_processing
9733 #define elf_backend_final_write_processing ppc_elf_final_write_processing
9734 #define elf_backend_write_section ppc_elf_write_section
9735 #define elf_backend_get_sec_type_attr ppc_elf_get_sec_type_attr
9736 #define elf_backend_plt_sym_val ppc_elf_plt_sym_val
9737 #define elf_backend_action_discarded ppc_elf_action_discarded
9738 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
9739 #define elf_backend_post_process_headers _bfd_elf_set_osabi
9740 #define elf_backend_lookup_section_flags_hook ppc_elf_lookup_section_flags
9741 #define elf_backend_section_flags ppc_elf_section_flags
9742 #define elf_backend_section_processing ppc_elf_section_processing
9744 #include "elf32-target.h"
9746 /* FreeBSD Target */
9748 #undef TARGET_LITTLE_SYM
9749 #undef TARGET_LITTLE_NAME
9751 #undef TARGET_BIG_SYM
9752 #define TARGET_BIG_SYM bfd_elf32_powerpc_freebsd_vec
9753 #undef TARGET_BIG_NAME
9754 #define TARGET_BIG_NAME "elf32-powerpc-freebsd"
9757 #define ELF_OSABI ELFOSABI_FREEBSD
9760 #define elf32_bed elf32_powerpc_fbsd_bed
9762 #include "elf32-target.h"
9764 /* VxWorks Target */
9766 #undef TARGET_LITTLE_SYM
9767 #undef TARGET_LITTLE_NAME
9769 #undef TARGET_BIG_SYM
9770 #define TARGET_BIG_SYM bfd_elf32_powerpc_vxworks_vec
9771 #undef TARGET_BIG_NAME
9772 #define TARGET_BIG_NAME "elf32-powerpc-vxworks"
9776 /* VxWorks uses the elf default section flags for .plt. */
9777 static const struct bfd_elf_special_section *
9778 ppc_elf_vxworks_get_sec_type_attr (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
9780 if (sec->name == NULL)
9783 if (strcmp (sec->name, ".plt") == 0)
9784 return _bfd_elf_get_sec_type_attr (abfd, sec);
9786 return ppc_elf_get_sec_type_attr (abfd, sec);
9789 /* Like ppc_elf_link_hash_table_create, but overrides
9790 appropriately for VxWorks. */
9791 static struct bfd_link_hash_table *
9792 ppc_elf_vxworks_link_hash_table_create (bfd *abfd)
9794 struct bfd_link_hash_table *ret;
9796 ret = ppc_elf_link_hash_table_create (abfd);
9799 struct ppc_elf_link_hash_table *htab
9800 = (struct ppc_elf_link_hash_table *)ret;
9801 htab->is_vxworks = 1;
9802 htab->plt_type = PLT_VXWORKS;
9803 htab->plt_entry_size = VXWORKS_PLT_ENTRY_SIZE;
9804 htab->plt_slot_size = VXWORKS_PLT_ENTRY_SIZE;
9805 htab->plt_initial_entry_size = VXWORKS_PLT_INITIAL_ENTRY_SIZE;
9810 /* Tweak magic VxWorks symbols as they are loaded. */
9812 ppc_elf_vxworks_add_symbol_hook (bfd *abfd,
9813 struct bfd_link_info *info,
9814 Elf_Internal_Sym *sym,
9815 const char **namep ATTRIBUTE_UNUSED,
9816 flagword *flagsp ATTRIBUTE_UNUSED,
9820 if (!elf_vxworks_add_symbol_hook(abfd, info, sym,namep, flagsp, secp,
9824 return ppc_elf_add_symbol_hook(abfd, info, sym,namep, flagsp, secp, valp);
9828 ppc_elf_vxworks_final_write_processing (bfd *abfd, bfd_boolean linker)
9830 ppc_elf_final_write_processing(abfd, linker);
9831 elf_vxworks_final_write_processing(abfd, linker);
9834 /* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
9836 #undef elf_backend_want_plt_sym
9837 #define elf_backend_want_plt_sym 1
9838 #undef elf_backend_want_got_plt
9839 #define elf_backend_want_got_plt 1
9840 #undef elf_backend_got_symbol_offset
9841 #define elf_backend_got_symbol_offset 0
9842 #undef elf_backend_plt_not_loaded
9843 #define elf_backend_plt_not_loaded 0
9844 #undef elf_backend_plt_readonly
9845 #define elf_backend_plt_readonly 1
9846 #undef elf_backend_got_header_size
9847 #define elf_backend_got_header_size 12
9849 #undef bfd_elf32_get_synthetic_symtab
9851 #undef bfd_elf32_bfd_link_hash_table_create
9852 #define bfd_elf32_bfd_link_hash_table_create \
9853 ppc_elf_vxworks_link_hash_table_create
9854 #undef elf_backend_add_symbol_hook
9855 #define elf_backend_add_symbol_hook \
9856 ppc_elf_vxworks_add_symbol_hook
9857 #undef elf_backend_link_output_symbol_hook
9858 #define elf_backend_link_output_symbol_hook \
9859 elf_vxworks_link_output_symbol_hook
9860 #undef elf_backend_final_write_processing
9861 #define elf_backend_final_write_processing \
9862 ppc_elf_vxworks_final_write_processing
9863 #undef elf_backend_get_sec_type_attr
9864 #define elf_backend_get_sec_type_attr \
9865 ppc_elf_vxworks_get_sec_type_attr
9866 #undef elf_backend_emit_relocs
9867 #define elf_backend_emit_relocs \
9868 elf_vxworks_emit_relocs
9871 #define elf32_bed ppc_elf_vxworks_bed
9872 #undef elf_backend_post_process_headers
9874 #include "elf32-target.h"
projects / external / binutils.git / blob