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 Free Software Foundation, Inc.
4 Written by Ian Lance Taylor, Cygnus Support.
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the
20 Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
21 Boston, MA 02110-1301, USA. */
23 /* This file is based on a preliminary PowerPC ELF ABI. The
24 information may not match the final PowerPC ELF ABI. It includes
25 suggestions from the in-progress Embedded PowerPC ABI, and that
26 information may also not match. */
35 #include "elf32-ppc.h"
36 #include "elf-vxworks.h"
38 /* RELA relocations are used here. */
40 static bfd_reloc_status_type ppc_elf_addr16_ha_reloc
41 (bfd
*, arelent
*, asymbol
*, void *, asection
*, bfd
*, char **);
42 static bfd_reloc_status_type ppc_elf_unhandled_reloc
43 (bfd
*, arelent
*, asymbol
*, void *, asection
*, bfd
*, char **);
45 /* Branch prediction bit for branch taken relocs. */
46 #define BRANCH_PREDICT_BIT 0x200000
47 /* Mask to set RA in memory instructions. */
48 #define RA_REGISTER_MASK 0x001f0000
49 /* Value to shift register by to insert RA. */
50 #define RA_REGISTER_SHIFT 16
52 /* The name of the dynamic interpreter. This is put in the .interp
54 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
56 /* For old-style PLT. */
57 /* The number of single-slot PLT entries (the rest use two slots). */
58 #define PLT_NUM_SINGLE_ENTRIES 8192
60 /* For new-style .glink and .plt. */
61 #define GLINK_PLTRESOLVE 16*4
62 #define GLINK_ENTRY_SIZE 4*4
64 /* VxWorks uses its own plt layout, filled in by the static linker. */
66 /* The standard VxWorks PLT entry. */
67 #define VXWORKS_PLT_ENTRY_SIZE 32
68 static const bfd_vma ppc_elf_vxworks_plt_entry
69 [VXWORKS_PLT_ENTRY_SIZE
/ 4] =
71 0x3d800000, /* lis r12,0 */
72 0x818c0000, /* lwz r12,0(r12) */
73 0x7d8903a6, /* mtctr r12 */
74 0x4e800420, /* bctr */
75 0x39600000, /* li r11,0 */
76 0x48000000, /* b 14 <.PLT0resolve+0x4> */
80 static const bfd_vma ppc_elf_vxworks_pic_plt_entry
81 [VXWORKS_PLT_ENTRY_SIZE
/ 4] =
83 0x3d9e0000, /* addis r12,r30,0 */
84 0x818c0000, /* lwz r12,0(r12) */
85 0x7d8903a6, /* mtctr r12 */
86 0x4e800420, /* bctr */
87 0x39600000, /* li r11,0 */
88 0x48000000, /* b 14 <.PLT0resolve+0x4> 14: R_PPC_REL24 .PLTresolve */
93 /* The initial VxWorks PLT entry. */
94 #define VXWORKS_PLT_INITIAL_ENTRY_SIZE 32
95 static const bfd_vma ppc_elf_vxworks_plt0_entry
96 [VXWORKS_PLT_INITIAL_ENTRY_SIZE
/ 4] =
98 0x3d800000, /* lis r12,0 */
99 0x398c0000, /* addi r12,r12,0 */
100 0x800c0008, /* lwz r0,8(r12) */
101 0x7c0903a6, /* mtctr r0 */
102 0x818c0004, /* lwz r12,4(r12) */
103 0x4e800420, /* bctr */
104 0x60000000, /* nop */
105 0x60000000, /* nop */
107 static const bfd_vma ppc_elf_vxworks_pic_plt0_entry
108 [VXWORKS_PLT_INITIAL_ENTRY_SIZE
/ 4] =
110 0x819e0008, /* lwz r12,8(r30) */
111 0x7d8903a6, /* mtctr r12 */
112 0x819e0004, /* lwz r12,4(r30) */
113 0x4e800420, /* bctr */
114 0x60000000, /* nop */
115 0x60000000, /* nop */
116 0x60000000, /* nop */
117 0x60000000, /* nop */
120 /* For executables, we have some additional relocations in
121 .rela.plt.unloaded, for the kernel loader. */
123 /* The number of non-JMP_SLOT relocations per PLT0 slot. */
124 #define VXWORKS_PLT_NON_JMP_SLOT_RELOCS 3
125 /* The number of relocations in the PLTResolve slot. */
126 #define VXWORKS_PLTRESOLVE_RELOCS 2
127 /* The number of relocations in the PLTResolve slot when when creating
129 #define VXWORKS_PLTRESOLVE_RELOCS_SHLIB 0
131 /* Some instructions. */
132 #define ADDIS_11_11 0x3d6b0000
133 #define ADDIS_11_30 0x3d7e0000
134 #define ADDIS_12_12 0x3d8c0000
135 #define ADDI_11_11 0x396b0000
136 #define ADD_0_11_11 0x7c0b5a14
137 #define ADD_11_0_11 0x7d605a14
139 #define BCL_20_31 0x429f0005
140 #define BCTR 0x4e800420
141 #define LIS_11 0x3d600000
142 #define LIS_12 0x3d800000
143 #define LWZU_0_12 0x840c0000
144 #define LWZ_0_12 0x800c0000
145 #define LWZ_11_11 0x816b0000
146 #define LWZ_11_30 0x817e0000
147 #define LWZ_12_12 0x818c0000
148 #define MFLR_0 0x7c0802a6
149 #define MFLR_12 0x7d8802a6
150 #define MTCTR_0 0x7c0903a6
151 #define MTCTR_11 0x7d6903a6
152 #define MTLR_0 0x7c0803a6
153 #define NOP 0x60000000
154 #define SUB_11_11_12 0x7d6c5850
156 /* Offset of tp and dtp pointers from start of TLS block. */
157 #define TP_OFFSET 0x7000
158 #define DTP_OFFSET 0x8000
160 static reloc_howto_type
*ppc_elf_howto_table
[R_PPC_max
];
162 static reloc_howto_type ppc_elf_howto_raw
[] = {
163 /* This reloc does nothing. */
164 HOWTO (R_PPC_NONE
, /* type */
166 2, /* size (0 = byte, 1 = short, 2 = long) */
168 FALSE
, /* pc_relative */
170 complain_overflow_bitfield
, /* complain_on_overflow */
171 bfd_elf_generic_reloc
, /* special_function */
172 "R_PPC_NONE", /* name */
173 FALSE
, /* partial_inplace */
176 FALSE
), /* pcrel_offset */
178 /* A standard 32 bit relocation. */
179 HOWTO (R_PPC_ADDR32
, /* type */
181 2, /* size (0 = byte, 1 = short, 2 = long) */
183 FALSE
, /* pc_relative */
185 complain_overflow_bitfield
, /* complain_on_overflow */
186 bfd_elf_generic_reloc
, /* special_function */
187 "R_PPC_ADDR32", /* name */
188 FALSE
, /* partial_inplace */
190 0xffffffff, /* dst_mask */
191 FALSE
), /* pcrel_offset */
193 /* An absolute 26 bit branch; the lower two bits must be zero.
194 FIXME: we don't check that, we just clear them. */
195 HOWTO (R_PPC_ADDR24
, /* type */
197 2, /* size (0 = byte, 1 = short, 2 = long) */
199 FALSE
, /* pc_relative */
201 complain_overflow_bitfield
, /* complain_on_overflow */
202 bfd_elf_generic_reloc
, /* special_function */
203 "R_PPC_ADDR24", /* name */
204 FALSE
, /* partial_inplace */
206 0x3fffffc, /* dst_mask */
207 FALSE
), /* pcrel_offset */
209 /* A standard 16 bit relocation. */
210 HOWTO (R_PPC_ADDR16
, /* type */
212 1, /* size (0 = byte, 1 = short, 2 = long) */
214 FALSE
, /* pc_relative */
216 complain_overflow_bitfield
, /* complain_on_overflow */
217 bfd_elf_generic_reloc
, /* special_function */
218 "R_PPC_ADDR16", /* name */
219 FALSE
, /* partial_inplace */
221 0xffff, /* dst_mask */
222 FALSE
), /* pcrel_offset */
224 /* A 16 bit relocation without overflow. */
225 HOWTO (R_PPC_ADDR16_LO
, /* type */
227 1, /* size (0 = byte, 1 = short, 2 = long) */
229 FALSE
, /* pc_relative */
231 complain_overflow_dont
,/* complain_on_overflow */
232 bfd_elf_generic_reloc
, /* special_function */
233 "R_PPC_ADDR16_LO", /* name */
234 FALSE
, /* partial_inplace */
236 0xffff, /* dst_mask */
237 FALSE
), /* pcrel_offset */
239 /* The high order 16 bits of an address. */
240 HOWTO (R_PPC_ADDR16_HI
, /* type */
242 1, /* size (0 = byte, 1 = short, 2 = long) */
244 FALSE
, /* pc_relative */
246 complain_overflow_dont
, /* complain_on_overflow */
247 bfd_elf_generic_reloc
, /* special_function */
248 "R_PPC_ADDR16_HI", /* name */
249 FALSE
, /* partial_inplace */
251 0xffff, /* dst_mask */
252 FALSE
), /* pcrel_offset */
254 /* The high order 16 bits of an address, plus 1 if the contents of
255 the low 16 bits, treated as a signed number, is negative. */
256 HOWTO (R_PPC_ADDR16_HA
, /* type */
258 1, /* size (0 = byte, 1 = short, 2 = long) */
260 FALSE
, /* pc_relative */
262 complain_overflow_dont
, /* complain_on_overflow */
263 ppc_elf_addr16_ha_reloc
, /* special_function */
264 "R_PPC_ADDR16_HA", /* name */
265 FALSE
, /* partial_inplace */
267 0xffff, /* dst_mask */
268 FALSE
), /* pcrel_offset */
270 /* An absolute 16 bit branch; the lower two bits must be zero.
271 FIXME: we don't check that, we just clear them. */
272 HOWTO (R_PPC_ADDR14
, /* type */
274 2, /* size (0 = byte, 1 = short, 2 = long) */
276 FALSE
, /* pc_relative */
278 complain_overflow_bitfield
, /* complain_on_overflow */
279 bfd_elf_generic_reloc
, /* special_function */
280 "R_PPC_ADDR14", /* name */
281 FALSE
, /* partial_inplace */
283 0xfffc, /* dst_mask */
284 FALSE
), /* pcrel_offset */
286 /* An absolute 16 bit branch, for which bit 10 should be set to
287 indicate that the branch is expected to be taken. The lower two
288 bits must be zero. */
289 HOWTO (R_PPC_ADDR14_BRTAKEN
, /* type */
291 2, /* size (0 = byte, 1 = short, 2 = long) */
293 FALSE
, /* pc_relative */
295 complain_overflow_bitfield
, /* complain_on_overflow */
296 bfd_elf_generic_reloc
, /* special_function */
297 "R_PPC_ADDR14_BRTAKEN",/* name */
298 FALSE
, /* partial_inplace */
300 0xfffc, /* dst_mask */
301 FALSE
), /* pcrel_offset */
303 /* An absolute 16 bit branch, for which bit 10 should be set to
304 indicate that the branch is not expected to be taken. The lower
305 two bits must be zero. */
306 HOWTO (R_PPC_ADDR14_BRNTAKEN
, /* type */
308 2, /* size (0 = byte, 1 = short, 2 = long) */
310 FALSE
, /* pc_relative */
312 complain_overflow_bitfield
, /* complain_on_overflow */
313 bfd_elf_generic_reloc
, /* special_function */
314 "R_PPC_ADDR14_BRNTAKEN",/* name */
315 FALSE
, /* partial_inplace */
317 0xfffc, /* dst_mask */
318 FALSE
), /* pcrel_offset */
320 /* A relative 26 bit branch; the lower two bits must be zero. */
321 HOWTO (R_PPC_REL24
, /* type */
323 2, /* size (0 = byte, 1 = short, 2 = long) */
325 TRUE
, /* pc_relative */
327 complain_overflow_signed
, /* complain_on_overflow */
328 bfd_elf_generic_reloc
, /* special_function */
329 "R_PPC_REL24", /* name */
330 FALSE
, /* partial_inplace */
332 0x3fffffc, /* dst_mask */
333 TRUE
), /* pcrel_offset */
335 /* A relative 16 bit branch; the lower two bits must be zero. */
336 HOWTO (R_PPC_REL14
, /* type */
338 2, /* size (0 = byte, 1 = short, 2 = long) */
340 TRUE
, /* pc_relative */
342 complain_overflow_signed
, /* complain_on_overflow */
343 bfd_elf_generic_reloc
, /* special_function */
344 "R_PPC_REL14", /* name */
345 FALSE
, /* partial_inplace */
347 0xfffc, /* dst_mask */
348 TRUE
), /* pcrel_offset */
350 /* A relative 16 bit branch. Bit 10 should be set to indicate that
351 the branch is expected to be taken. The lower two bits must be
353 HOWTO (R_PPC_REL14_BRTAKEN
, /* type */
355 2, /* size (0 = byte, 1 = short, 2 = long) */
357 TRUE
, /* pc_relative */
359 complain_overflow_signed
, /* complain_on_overflow */
360 bfd_elf_generic_reloc
, /* special_function */
361 "R_PPC_REL14_BRTAKEN", /* name */
362 FALSE
, /* partial_inplace */
364 0xfffc, /* dst_mask */
365 TRUE
), /* pcrel_offset */
367 /* A relative 16 bit branch. Bit 10 should be set to indicate that
368 the branch is not expected to be taken. The lower two bits must
370 HOWTO (R_PPC_REL14_BRNTAKEN
, /* type */
372 2, /* size (0 = byte, 1 = short, 2 = long) */
374 TRUE
, /* pc_relative */
376 complain_overflow_signed
, /* complain_on_overflow */
377 bfd_elf_generic_reloc
, /* special_function */
378 "R_PPC_REL14_BRNTAKEN",/* name */
379 FALSE
, /* partial_inplace */
381 0xfffc, /* dst_mask */
382 TRUE
), /* pcrel_offset */
384 /* Like R_PPC_ADDR16, but referring to the GOT table entry for the
386 HOWTO (R_PPC_GOT16
, /* type */
388 1, /* size (0 = byte, 1 = short, 2 = long) */
390 FALSE
, /* pc_relative */
392 complain_overflow_signed
, /* complain_on_overflow */
393 bfd_elf_generic_reloc
, /* special_function */
394 "R_PPC_GOT16", /* name */
395 FALSE
, /* partial_inplace */
397 0xffff, /* dst_mask */
398 FALSE
), /* pcrel_offset */
400 /* Like R_PPC_ADDR16_LO, but referring to the GOT table entry for
402 HOWTO (R_PPC_GOT16_LO
, /* type */
404 1, /* size (0 = byte, 1 = short, 2 = long) */
406 FALSE
, /* pc_relative */
408 complain_overflow_dont
, /* complain_on_overflow */
409 bfd_elf_generic_reloc
, /* special_function */
410 "R_PPC_GOT16_LO", /* name */
411 FALSE
, /* partial_inplace */
413 0xffff, /* dst_mask */
414 FALSE
), /* pcrel_offset */
416 /* Like R_PPC_ADDR16_HI, but referring to the GOT table entry for
418 HOWTO (R_PPC_GOT16_HI
, /* type */
420 1, /* size (0 = byte, 1 = short, 2 = long) */
422 FALSE
, /* pc_relative */
424 complain_overflow_bitfield
, /* complain_on_overflow */
425 bfd_elf_generic_reloc
, /* special_function */
426 "R_PPC_GOT16_HI", /* name */
427 FALSE
, /* partial_inplace */
429 0xffff, /* dst_mask */
430 FALSE
), /* pcrel_offset */
432 /* Like R_PPC_ADDR16_HA, but referring to the GOT table entry for
434 HOWTO (R_PPC_GOT16_HA
, /* type */
436 1, /* size (0 = byte, 1 = short, 2 = long) */
438 FALSE
, /* pc_relative */
440 complain_overflow_bitfield
, /* complain_on_overflow */
441 ppc_elf_addr16_ha_reloc
, /* special_function */
442 "R_PPC_GOT16_HA", /* name */
443 FALSE
, /* partial_inplace */
445 0xffff, /* dst_mask */
446 FALSE
), /* pcrel_offset */
448 /* Like R_PPC_REL24, but referring to the procedure linkage table
449 entry for the symbol. */
450 HOWTO (R_PPC_PLTREL24
, /* type */
452 2, /* size (0 = byte, 1 = short, 2 = long) */
454 TRUE
, /* pc_relative */
456 complain_overflow_signed
, /* complain_on_overflow */
457 bfd_elf_generic_reloc
, /* special_function */
458 "R_PPC_PLTREL24", /* name */
459 FALSE
, /* partial_inplace */
461 0x3fffffc, /* dst_mask */
462 TRUE
), /* pcrel_offset */
464 /* This is used only by the dynamic linker. The symbol should exist
465 both in the object being run and in some shared library. The
466 dynamic linker copies the data addressed by the symbol from the
467 shared library into the object, because the object being
468 run has to have the data at some particular address. */
469 HOWTO (R_PPC_COPY
, /* type */
471 2, /* size (0 = byte, 1 = short, 2 = long) */
473 FALSE
, /* pc_relative */
475 complain_overflow_bitfield
, /* complain_on_overflow */
476 bfd_elf_generic_reloc
, /* special_function */
477 "R_PPC_COPY", /* name */
478 FALSE
, /* partial_inplace */
481 FALSE
), /* pcrel_offset */
483 /* Like R_PPC_ADDR32, but used when setting global offset table
485 HOWTO (R_PPC_GLOB_DAT
, /* type */
487 2, /* size (0 = byte, 1 = short, 2 = long) */
489 FALSE
, /* pc_relative */
491 complain_overflow_bitfield
, /* complain_on_overflow */
492 bfd_elf_generic_reloc
, /* special_function */
493 "R_PPC_GLOB_DAT", /* name */
494 FALSE
, /* partial_inplace */
496 0xffffffff, /* dst_mask */
497 FALSE
), /* pcrel_offset */
499 /* Marks a procedure linkage table entry for a symbol. */
500 HOWTO (R_PPC_JMP_SLOT
, /* type */
502 2, /* size (0 = byte, 1 = short, 2 = long) */
504 FALSE
, /* pc_relative */
506 complain_overflow_bitfield
, /* complain_on_overflow */
507 bfd_elf_generic_reloc
, /* special_function */
508 "R_PPC_JMP_SLOT", /* name */
509 FALSE
, /* partial_inplace */
512 FALSE
), /* pcrel_offset */
514 /* Used only by the dynamic linker. When the object is run, this
515 longword is set to the load address of the object, plus the
517 HOWTO (R_PPC_RELATIVE
, /* type */
519 2, /* size (0 = byte, 1 = short, 2 = long) */
521 FALSE
, /* pc_relative */
523 complain_overflow_bitfield
, /* complain_on_overflow */
524 bfd_elf_generic_reloc
, /* special_function */
525 "R_PPC_RELATIVE", /* name */
526 FALSE
, /* partial_inplace */
528 0xffffffff, /* dst_mask */
529 FALSE
), /* pcrel_offset */
531 /* Like R_PPC_REL24, but uses the value of the symbol within the
532 object rather than the final value. Normally used for
533 _GLOBAL_OFFSET_TABLE_. */
534 HOWTO (R_PPC_LOCAL24PC
, /* type */
536 2, /* size (0 = byte, 1 = short, 2 = long) */
538 TRUE
, /* pc_relative */
540 complain_overflow_signed
, /* complain_on_overflow */
541 bfd_elf_generic_reloc
, /* special_function */
542 "R_PPC_LOCAL24PC", /* name */
543 FALSE
, /* partial_inplace */
545 0x3fffffc, /* dst_mask */
546 TRUE
), /* pcrel_offset */
548 /* Like R_PPC_ADDR32, but may be unaligned. */
549 HOWTO (R_PPC_UADDR32
, /* type */
551 2, /* size (0 = byte, 1 = short, 2 = long) */
553 FALSE
, /* pc_relative */
555 complain_overflow_bitfield
, /* complain_on_overflow */
556 bfd_elf_generic_reloc
, /* special_function */
557 "R_PPC_UADDR32", /* name */
558 FALSE
, /* partial_inplace */
560 0xffffffff, /* dst_mask */
561 FALSE
), /* pcrel_offset */
563 /* Like R_PPC_ADDR16, but may be unaligned. */
564 HOWTO (R_PPC_UADDR16
, /* type */
566 1, /* size (0 = byte, 1 = short, 2 = long) */
568 FALSE
, /* pc_relative */
570 complain_overflow_bitfield
, /* complain_on_overflow */
571 bfd_elf_generic_reloc
, /* special_function */
572 "R_PPC_UADDR16", /* name */
573 FALSE
, /* partial_inplace */
575 0xffff, /* dst_mask */
576 FALSE
), /* pcrel_offset */
578 /* 32-bit PC relative */
579 HOWTO (R_PPC_REL32
, /* type */
581 2, /* size (0 = byte, 1 = short, 2 = long) */
583 TRUE
, /* pc_relative */
585 complain_overflow_bitfield
, /* complain_on_overflow */
586 bfd_elf_generic_reloc
, /* special_function */
587 "R_PPC_REL32", /* name */
588 FALSE
, /* partial_inplace */
590 0xffffffff, /* dst_mask */
591 TRUE
), /* pcrel_offset */
593 /* 32-bit relocation to the symbol's procedure linkage table.
594 FIXME: not supported. */
595 HOWTO (R_PPC_PLT32
, /* type */
597 2, /* size (0 = byte, 1 = short, 2 = long) */
599 FALSE
, /* pc_relative */
601 complain_overflow_bitfield
, /* complain_on_overflow */
602 bfd_elf_generic_reloc
, /* special_function */
603 "R_PPC_PLT32", /* name */
604 FALSE
, /* partial_inplace */
607 FALSE
), /* pcrel_offset */
609 /* 32-bit PC relative relocation to the symbol's procedure linkage table.
610 FIXME: not supported. */
611 HOWTO (R_PPC_PLTREL32
, /* type */
613 2, /* size (0 = byte, 1 = short, 2 = long) */
615 TRUE
, /* pc_relative */
617 complain_overflow_bitfield
, /* complain_on_overflow */
618 bfd_elf_generic_reloc
, /* special_function */
619 "R_PPC_PLTREL32", /* name */
620 FALSE
, /* partial_inplace */
623 TRUE
), /* pcrel_offset */
625 /* Like R_PPC_ADDR16_LO, but referring to the PLT table entry for
627 HOWTO (R_PPC_PLT16_LO
, /* type */
629 1, /* size (0 = byte, 1 = short, 2 = long) */
631 FALSE
, /* pc_relative */
633 complain_overflow_dont
, /* complain_on_overflow */
634 bfd_elf_generic_reloc
, /* special_function */
635 "R_PPC_PLT16_LO", /* name */
636 FALSE
, /* partial_inplace */
638 0xffff, /* dst_mask */
639 FALSE
), /* pcrel_offset */
641 /* Like R_PPC_ADDR16_HI, but referring to the PLT table entry for
643 HOWTO (R_PPC_PLT16_HI
, /* type */
645 1, /* size (0 = byte, 1 = short, 2 = long) */
647 FALSE
, /* pc_relative */
649 complain_overflow_bitfield
, /* complain_on_overflow */
650 bfd_elf_generic_reloc
, /* special_function */
651 "R_PPC_PLT16_HI", /* name */
652 FALSE
, /* partial_inplace */
654 0xffff, /* dst_mask */
655 FALSE
), /* pcrel_offset */
657 /* Like R_PPC_ADDR16_HA, but referring to the PLT table entry for
659 HOWTO (R_PPC_PLT16_HA
, /* type */
661 1, /* size (0 = byte, 1 = short, 2 = long) */
663 FALSE
, /* pc_relative */
665 complain_overflow_bitfield
, /* complain_on_overflow */
666 ppc_elf_addr16_ha_reloc
, /* special_function */
667 "R_PPC_PLT16_HA", /* name */
668 FALSE
, /* partial_inplace */
670 0xffff, /* dst_mask */
671 FALSE
), /* pcrel_offset */
673 /* A sign-extended 16 bit value relative to _SDA_BASE_, for use with
675 HOWTO (R_PPC_SDAREL16
, /* type */
677 1, /* size (0 = byte, 1 = short, 2 = long) */
679 FALSE
, /* pc_relative */
681 complain_overflow_signed
, /* complain_on_overflow */
682 bfd_elf_generic_reloc
, /* special_function */
683 "R_PPC_SDAREL16", /* name */
684 FALSE
, /* partial_inplace */
686 0xffff, /* dst_mask */
687 FALSE
), /* pcrel_offset */
689 /* 16-bit section relative relocation. */
690 HOWTO (R_PPC_SECTOFF
, /* type */
692 1, /* size (0 = byte, 1 = short, 2 = long) */
694 FALSE
, /* pc_relative */
696 complain_overflow_bitfield
, /* complain_on_overflow */
697 bfd_elf_generic_reloc
, /* special_function */
698 "R_PPC_SECTOFF", /* name */
699 FALSE
, /* partial_inplace */
701 0xffff, /* dst_mask */
702 FALSE
), /* pcrel_offset */
704 /* 16-bit lower half section relative relocation. */
705 HOWTO (R_PPC_SECTOFF_LO
, /* type */
707 1, /* size (0 = byte, 1 = short, 2 = long) */
709 FALSE
, /* pc_relative */
711 complain_overflow_dont
, /* complain_on_overflow */
712 bfd_elf_generic_reloc
, /* special_function */
713 "R_PPC_SECTOFF_LO", /* name */
714 FALSE
, /* partial_inplace */
716 0xffff, /* dst_mask */
717 FALSE
), /* pcrel_offset */
719 /* 16-bit upper half section relative relocation. */
720 HOWTO (R_PPC_SECTOFF_HI
, /* type */
722 1, /* size (0 = byte, 1 = short, 2 = long) */
724 FALSE
, /* pc_relative */
726 complain_overflow_bitfield
, /* complain_on_overflow */
727 bfd_elf_generic_reloc
, /* special_function */
728 "R_PPC_SECTOFF_HI", /* name */
729 FALSE
, /* partial_inplace */
731 0xffff, /* dst_mask */
732 FALSE
), /* pcrel_offset */
734 /* 16-bit upper half adjusted section relative relocation. */
735 HOWTO (R_PPC_SECTOFF_HA
, /* type */
737 1, /* size (0 = byte, 1 = short, 2 = long) */
739 FALSE
, /* pc_relative */
741 complain_overflow_bitfield
, /* complain_on_overflow */
742 ppc_elf_addr16_ha_reloc
, /* special_function */
743 "R_PPC_SECTOFF_HA", /* name */
744 FALSE
, /* partial_inplace */
746 0xffff, /* dst_mask */
747 FALSE
), /* pcrel_offset */
749 /* Marker reloc for TLS. */
752 2, /* size (0 = byte, 1 = short, 2 = long) */
754 FALSE
, /* pc_relative */
756 complain_overflow_dont
, /* complain_on_overflow */
757 bfd_elf_generic_reloc
, /* special_function */
758 "R_PPC_TLS", /* name */
759 FALSE
, /* partial_inplace */
762 FALSE
), /* pcrel_offset */
764 /* Computes the load module index of the load module that contains the
765 definition of its TLS sym. */
766 HOWTO (R_PPC_DTPMOD32
,
768 2, /* size (0 = byte, 1 = short, 2 = long) */
770 FALSE
, /* pc_relative */
772 complain_overflow_dont
, /* complain_on_overflow */
773 ppc_elf_unhandled_reloc
, /* special_function */
774 "R_PPC_DTPMOD32", /* name */
775 FALSE
, /* partial_inplace */
777 0xffffffff, /* dst_mask */
778 FALSE
), /* pcrel_offset */
780 /* Computes a dtv-relative displacement, the difference between the value
781 of sym+add and the base address of the thread-local storage block that
782 contains the definition of sym, minus 0x8000. */
783 HOWTO (R_PPC_DTPREL32
,
785 2, /* size (0 = byte, 1 = short, 2 = long) */
787 FALSE
, /* pc_relative */
789 complain_overflow_dont
, /* complain_on_overflow */
790 ppc_elf_unhandled_reloc
, /* special_function */
791 "R_PPC_DTPREL32", /* name */
792 FALSE
, /* partial_inplace */
794 0xffffffff, /* dst_mask */
795 FALSE
), /* pcrel_offset */
797 /* A 16 bit dtprel reloc. */
798 HOWTO (R_PPC_DTPREL16
,
800 1, /* size (0 = byte, 1 = short, 2 = long) */
802 FALSE
, /* pc_relative */
804 complain_overflow_signed
, /* complain_on_overflow */
805 ppc_elf_unhandled_reloc
, /* special_function */
806 "R_PPC_DTPREL16", /* name */
807 FALSE
, /* partial_inplace */
809 0xffff, /* dst_mask */
810 FALSE
), /* pcrel_offset */
812 /* Like DTPREL16, but no overflow. */
813 HOWTO (R_PPC_DTPREL16_LO
,
815 1, /* size (0 = byte, 1 = short, 2 = long) */
817 FALSE
, /* pc_relative */
819 complain_overflow_dont
, /* complain_on_overflow */
820 ppc_elf_unhandled_reloc
, /* special_function */
821 "R_PPC_DTPREL16_LO", /* name */
822 FALSE
, /* partial_inplace */
824 0xffff, /* dst_mask */
825 FALSE
), /* pcrel_offset */
827 /* Like DTPREL16_LO, but next higher group of 16 bits. */
828 HOWTO (R_PPC_DTPREL16_HI
,
830 1, /* size (0 = byte, 1 = short, 2 = long) */
832 FALSE
, /* pc_relative */
834 complain_overflow_dont
, /* complain_on_overflow */
835 ppc_elf_unhandled_reloc
, /* special_function */
836 "R_PPC_DTPREL16_HI", /* name */
837 FALSE
, /* partial_inplace */
839 0xffff, /* dst_mask */
840 FALSE
), /* pcrel_offset */
842 /* Like DTPREL16_HI, but adjust for low 16 bits. */
843 HOWTO (R_PPC_DTPREL16_HA
,
845 1, /* size (0 = byte, 1 = short, 2 = long) */
847 FALSE
, /* pc_relative */
849 complain_overflow_dont
, /* complain_on_overflow */
850 ppc_elf_unhandled_reloc
, /* special_function */
851 "R_PPC_DTPREL16_HA", /* name */
852 FALSE
, /* partial_inplace */
854 0xffff, /* dst_mask */
855 FALSE
), /* pcrel_offset */
857 /* Computes a tp-relative displacement, the difference between the value of
858 sym+add and the value of the thread pointer (r13). */
859 HOWTO (R_PPC_TPREL32
,
861 2, /* size (0 = byte, 1 = short, 2 = long) */
863 FALSE
, /* pc_relative */
865 complain_overflow_dont
, /* complain_on_overflow */
866 ppc_elf_unhandled_reloc
, /* special_function */
867 "R_PPC_TPREL32", /* name */
868 FALSE
, /* partial_inplace */
870 0xffffffff, /* dst_mask */
871 FALSE
), /* pcrel_offset */
873 /* A 16 bit tprel reloc. */
874 HOWTO (R_PPC_TPREL16
,
876 1, /* size (0 = byte, 1 = short, 2 = long) */
878 FALSE
, /* pc_relative */
880 complain_overflow_signed
, /* complain_on_overflow */
881 ppc_elf_unhandled_reloc
, /* special_function */
882 "R_PPC_TPREL16", /* name */
883 FALSE
, /* partial_inplace */
885 0xffff, /* dst_mask */
886 FALSE
), /* pcrel_offset */
888 /* Like TPREL16, but no overflow. */
889 HOWTO (R_PPC_TPREL16_LO
,
891 1, /* size (0 = byte, 1 = short, 2 = long) */
893 FALSE
, /* pc_relative */
895 complain_overflow_dont
, /* complain_on_overflow */
896 ppc_elf_unhandled_reloc
, /* special_function */
897 "R_PPC_TPREL16_LO", /* name */
898 FALSE
, /* partial_inplace */
900 0xffff, /* dst_mask */
901 FALSE
), /* pcrel_offset */
903 /* Like TPREL16_LO, but next higher group of 16 bits. */
904 HOWTO (R_PPC_TPREL16_HI
,
906 1, /* size (0 = byte, 1 = short, 2 = long) */
908 FALSE
, /* pc_relative */
910 complain_overflow_dont
, /* complain_on_overflow */
911 ppc_elf_unhandled_reloc
, /* special_function */
912 "R_PPC_TPREL16_HI", /* name */
913 FALSE
, /* partial_inplace */
915 0xffff, /* dst_mask */
916 FALSE
), /* pcrel_offset */
918 /* Like TPREL16_HI, but adjust for low 16 bits. */
919 HOWTO (R_PPC_TPREL16_HA
,
921 1, /* size (0 = byte, 1 = short, 2 = long) */
923 FALSE
, /* pc_relative */
925 complain_overflow_dont
, /* complain_on_overflow */
926 ppc_elf_unhandled_reloc
, /* special_function */
927 "R_PPC_TPREL16_HA", /* name */
928 FALSE
, /* partial_inplace */
930 0xffff, /* dst_mask */
931 FALSE
), /* pcrel_offset */
933 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
934 with values (sym+add)@dtpmod and (sym+add)@dtprel, and computes the offset
935 to the first entry. */
936 HOWTO (R_PPC_GOT_TLSGD16
,
938 1, /* size (0 = byte, 1 = short, 2 = long) */
940 FALSE
, /* pc_relative */
942 complain_overflow_signed
, /* complain_on_overflow */
943 ppc_elf_unhandled_reloc
, /* special_function */
944 "R_PPC_GOT_TLSGD16", /* name */
945 FALSE
, /* partial_inplace */
947 0xffff, /* dst_mask */
948 FALSE
), /* pcrel_offset */
950 /* Like GOT_TLSGD16, but no overflow. */
951 HOWTO (R_PPC_GOT_TLSGD16_LO
,
953 1, /* size (0 = byte, 1 = short, 2 = long) */
955 FALSE
, /* pc_relative */
957 complain_overflow_dont
, /* complain_on_overflow */
958 ppc_elf_unhandled_reloc
, /* special_function */
959 "R_PPC_GOT_TLSGD16_LO", /* name */
960 FALSE
, /* partial_inplace */
962 0xffff, /* dst_mask */
963 FALSE
), /* pcrel_offset */
965 /* Like GOT_TLSGD16_LO, but next higher group of 16 bits. */
966 HOWTO (R_PPC_GOT_TLSGD16_HI
,
968 1, /* size (0 = byte, 1 = short, 2 = long) */
970 FALSE
, /* pc_relative */
972 complain_overflow_dont
, /* complain_on_overflow */
973 ppc_elf_unhandled_reloc
, /* special_function */
974 "R_PPC_GOT_TLSGD16_HI", /* name */
975 FALSE
, /* partial_inplace */
977 0xffff, /* dst_mask */
978 FALSE
), /* pcrel_offset */
980 /* Like GOT_TLSGD16_HI, but adjust for low 16 bits. */
981 HOWTO (R_PPC_GOT_TLSGD16_HA
,
983 1, /* size (0 = byte, 1 = short, 2 = long) */
985 FALSE
, /* pc_relative */
987 complain_overflow_dont
, /* complain_on_overflow */
988 ppc_elf_unhandled_reloc
, /* special_function */
989 "R_PPC_GOT_TLSGD16_HA", /* name */
990 FALSE
, /* partial_inplace */
992 0xffff, /* dst_mask */
993 FALSE
), /* pcrel_offset */
995 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
996 with values (sym+add)@dtpmod and zero, and computes the offset to the
998 HOWTO (R_PPC_GOT_TLSLD16
,
1000 1, /* size (0 = byte, 1 = short, 2 = long) */
1002 FALSE
, /* pc_relative */
1004 complain_overflow_signed
, /* complain_on_overflow */
1005 ppc_elf_unhandled_reloc
, /* special_function */
1006 "R_PPC_GOT_TLSLD16", /* name */
1007 FALSE
, /* partial_inplace */
1009 0xffff, /* dst_mask */
1010 FALSE
), /* pcrel_offset */
1012 /* Like GOT_TLSLD16, but no overflow. */
1013 HOWTO (R_PPC_GOT_TLSLD16_LO
,
1015 1, /* size (0 = byte, 1 = short, 2 = long) */
1017 FALSE
, /* pc_relative */
1019 complain_overflow_dont
, /* complain_on_overflow */
1020 ppc_elf_unhandled_reloc
, /* special_function */
1021 "R_PPC_GOT_TLSLD16_LO", /* name */
1022 FALSE
, /* partial_inplace */
1024 0xffff, /* dst_mask */
1025 FALSE
), /* pcrel_offset */
1027 /* Like GOT_TLSLD16_LO, but next higher group of 16 bits. */
1028 HOWTO (R_PPC_GOT_TLSLD16_HI
,
1029 16, /* rightshift */
1030 1, /* size (0 = byte, 1 = short, 2 = long) */
1032 FALSE
, /* pc_relative */
1034 complain_overflow_dont
, /* complain_on_overflow */
1035 ppc_elf_unhandled_reloc
, /* special_function */
1036 "R_PPC_GOT_TLSLD16_HI", /* name */
1037 FALSE
, /* partial_inplace */
1039 0xffff, /* dst_mask */
1040 FALSE
), /* pcrel_offset */
1042 /* Like GOT_TLSLD16_HI, but adjust for low 16 bits. */
1043 HOWTO (R_PPC_GOT_TLSLD16_HA
,
1044 16, /* rightshift */
1045 1, /* size (0 = byte, 1 = short, 2 = long) */
1047 FALSE
, /* pc_relative */
1049 complain_overflow_dont
, /* complain_on_overflow */
1050 ppc_elf_unhandled_reloc
, /* special_function */
1051 "R_PPC_GOT_TLSLD16_HA", /* name */
1052 FALSE
, /* partial_inplace */
1054 0xffff, /* dst_mask */
1055 FALSE
), /* pcrel_offset */
1057 /* Allocates an entry in the GOT with value (sym+add)@dtprel, and computes
1058 the offset to the entry. */
1059 HOWTO (R_PPC_GOT_DTPREL16
,
1061 1, /* size (0 = byte, 1 = short, 2 = long) */
1063 FALSE
, /* pc_relative */
1065 complain_overflow_signed
, /* complain_on_overflow */
1066 ppc_elf_unhandled_reloc
, /* special_function */
1067 "R_PPC_GOT_DTPREL16", /* name */
1068 FALSE
, /* partial_inplace */
1070 0xffff, /* dst_mask */
1071 FALSE
), /* pcrel_offset */
1073 /* Like GOT_DTPREL16, but no overflow. */
1074 HOWTO (R_PPC_GOT_DTPREL16_LO
,
1076 1, /* size (0 = byte, 1 = short, 2 = long) */
1078 FALSE
, /* pc_relative */
1080 complain_overflow_dont
, /* complain_on_overflow */
1081 ppc_elf_unhandled_reloc
, /* special_function */
1082 "R_PPC_GOT_DTPREL16_LO", /* name */
1083 FALSE
, /* partial_inplace */
1085 0xffff, /* dst_mask */
1086 FALSE
), /* pcrel_offset */
1088 /* Like GOT_DTPREL16_LO, but next higher group of 16 bits. */
1089 HOWTO (R_PPC_GOT_DTPREL16_HI
,
1090 16, /* rightshift */
1091 1, /* size (0 = byte, 1 = short, 2 = long) */
1093 FALSE
, /* pc_relative */
1095 complain_overflow_dont
, /* complain_on_overflow */
1096 ppc_elf_unhandled_reloc
, /* special_function */
1097 "R_PPC_GOT_DTPREL16_HI", /* name */
1098 FALSE
, /* partial_inplace */
1100 0xffff, /* dst_mask */
1101 FALSE
), /* pcrel_offset */
1103 /* Like GOT_DTPREL16_HI, but adjust for low 16 bits. */
1104 HOWTO (R_PPC_GOT_DTPREL16_HA
,
1105 16, /* rightshift */
1106 1, /* size (0 = byte, 1 = short, 2 = long) */
1108 FALSE
, /* pc_relative */
1110 complain_overflow_dont
, /* complain_on_overflow */
1111 ppc_elf_unhandled_reloc
, /* special_function */
1112 "R_PPC_GOT_DTPREL16_HA", /* name */
1113 FALSE
, /* partial_inplace */
1115 0xffff, /* dst_mask */
1116 FALSE
), /* pcrel_offset */
1118 /* Allocates an entry in the GOT with value (sym+add)@tprel, and computes the
1119 offset to the entry. */
1120 HOWTO (R_PPC_GOT_TPREL16
,
1122 1, /* size (0 = byte, 1 = short, 2 = long) */
1124 FALSE
, /* pc_relative */
1126 complain_overflow_signed
, /* complain_on_overflow */
1127 ppc_elf_unhandled_reloc
, /* special_function */
1128 "R_PPC_GOT_TPREL16", /* name */
1129 FALSE
, /* partial_inplace */
1131 0xffff, /* dst_mask */
1132 FALSE
), /* pcrel_offset */
1134 /* Like GOT_TPREL16, but no overflow. */
1135 HOWTO (R_PPC_GOT_TPREL16_LO
,
1137 1, /* size (0 = byte, 1 = short, 2 = long) */
1139 FALSE
, /* pc_relative */
1141 complain_overflow_dont
, /* complain_on_overflow */
1142 ppc_elf_unhandled_reloc
, /* special_function */
1143 "R_PPC_GOT_TPREL16_LO", /* name */
1144 FALSE
, /* partial_inplace */
1146 0xffff, /* dst_mask */
1147 FALSE
), /* pcrel_offset */
1149 /* Like GOT_TPREL16_LO, but next higher group of 16 bits. */
1150 HOWTO (R_PPC_GOT_TPREL16_HI
,
1151 16, /* rightshift */
1152 1, /* size (0 = byte, 1 = short, 2 = long) */
1154 FALSE
, /* pc_relative */
1156 complain_overflow_dont
, /* complain_on_overflow */
1157 ppc_elf_unhandled_reloc
, /* special_function */
1158 "R_PPC_GOT_TPREL16_HI", /* name */
1159 FALSE
, /* partial_inplace */
1161 0xffff, /* dst_mask */
1162 FALSE
), /* pcrel_offset */
1164 /* Like GOT_TPREL16_HI, but adjust for low 16 bits. */
1165 HOWTO (R_PPC_GOT_TPREL16_HA
,
1166 16, /* rightshift */
1167 1, /* size (0 = byte, 1 = short, 2 = long) */
1169 FALSE
, /* pc_relative */
1171 complain_overflow_dont
, /* complain_on_overflow */
1172 ppc_elf_unhandled_reloc
, /* special_function */
1173 "R_PPC_GOT_TPREL16_HA", /* name */
1174 FALSE
, /* partial_inplace */
1176 0xffff, /* dst_mask */
1177 FALSE
), /* pcrel_offset */
1179 /* The remaining relocs are from the Embedded ELF ABI, and are not
1180 in the SVR4 ELF ABI. */
1182 /* 32 bit value resulting from the addend minus the symbol. */
1183 HOWTO (R_PPC_EMB_NADDR32
, /* type */
1185 2, /* size (0 = byte, 1 = short, 2 = long) */
1187 FALSE
, /* pc_relative */
1189 complain_overflow_bitfield
, /* complain_on_overflow */
1190 bfd_elf_generic_reloc
, /* special_function */
1191 "R_PPC_EMB_NADDR32", /* name */
1192 FALSE
, /* partial_inplace */
1194 0xffffffff, /* dst_mask */
1195 FALSE
), /* pcrel_offset */
1197 /* 16 bit value resulting from the addend minus the symbol. */
1198 HOWTO (R_PPC_EMB_NADDR16
, /* type */
1200 1, /* size (0 = byte, 1 = short, 2 = long) */
1202 FALSE
, /* pc_relative */
1204 complain_overflow_bitfield
, /* complain_on_overflow */
1205 bfd_elf_generic_reloc
, /* special_function */
1206 "R_PPC_EMB_NADDR16", /* name */
1207 FALSE
, /* partial_inplace */
1209 0xffff, /* dst_mask */
1210 FALSE
), /* pcrel_offset */
1212 /* 16 bit value resulting from the addend minus the symbol. */
1213 HOWTO (R_PPC_EMB_NADDR16_LO
, /* type */
1215 1, /* size (0 = byte, 1 = short, 2 = long) */
1217 FALSE
, /* pc_relative */
1219 complain_overflow_dont
,/* complain_on_overflow */
1220 bfd_elf_generic_reloc
, /* special_function */
1221 "R_PPC_EMB_ADDR16_LO", /* name */
1222 FALSE
, /* partial_inplace */
1224 0xffff, /* dst_mask */
1225 FALSE
), /* pcrel_offset */
1227 /* The high order 16 bits of the addend minus the symbol. */
1228 HOWTO (R_PPC_EMB_NADDR16_HI
, /* type */
1229 16, /* rightshift */
1230 1, /* size (0 = byte, 1 = short, 2 = long) */
1232 FALSE
, /* pc_relative */
1234 complain_overflow_dont
, /* complain_on_overflow */
1235 bfd_elf_generic_reloc
, /* special_function */
1236 "R_PPC_EMB_NADDR16_HI", /* name */
1237 FALSE
, /* partial_inplace */
1239 0xffff, /* dst_mask */
1240 FALSE
), /* pcrel_offset */
1242 /* The high order 16 bits of the result of the addend minus the address,
1243 plus 1 if the contents of the low 16 bits, treated as a signed number,
1245 HOWTO (R_PPC_EMB_NADDR16_HA
, /* type */
1246 16, /* rightshift */
1247 1, /* size (0 = byte, 1 = short, 2 = long) */
1249 FALSE
, /* pc_relative */
1251 complain_overflow_dont
, /* complain_on_overflow */
1252 ppc_elf_addr16_ha_reloc
, /* special_function */
1253 "R_PPC_EMB_NADDR16_HA", /* name */
1254 FALSE
, /* partial_inplace */
1256 0xffff, /* dst_mask */
1257 FALSE
), /* pcrel_offset */
1259 /* 16 bit value resulting from allocating a 4 byte word to hold an
1260 address in the .sdata section, and returning the offset from
1261 _SDA_BASE_ for that relocation. */
1262 HOWTO (R_PPC_EMB_SDAI16
, /* type */
1264 1, /* size (0 = byte, 1 = short, 2 = long) */
1266 FALSE
, /* pc_relative */
1268 complain_overflow_bitfield
, /* complain_on_overflow */
1269 bfd_elf_generic_reloc
, /* special_function */
1270 "R_PPC_EMB_SDAI16", /* name */
1271 FALSE
, /* partial_inplace */
1273 0xffff, /* dst_mask */
1274 FALSE
), /* pcrel_offset */
1276 /* 16 bit value resulting from allocating a 4 byte word to hold an
1277 address in the .sdata2 section, and returning the offset from
1278 _SDA2_BASE_ for that relocation. */
1279 HOWTO (R_PPC_EMB_SDA2I16
, /* type */
1281 1, /* size (0 = byte, 1 = short, 2 = long) */
1283 FALSE
, /* pc_relative */
1285 complain_overflow_bitfield
, /* complain_on_overflow */
1286 bfd_elf_generic_reloc
, /* special_function */
1287 "R_PPC_EMB_SDA2I16", /* name */
1288 FALSE
, /* partial_inplace */
1290 0xffff, /* dst_mask */
1291 FALSE
), /* pcrel_offset */
1293 /* A sign-extended 16 bit value relative to _SDA2_BASE_, for use with
1294 small data items. */
1295 HOWTO (R_PPC_EMB_SDA2REL
, /* type */
1297 1, /* size (0 = byte, 1 = short, 2 = long) */
1299 FALSE
, /* pc_relative */
1301 complain_overflow_signed
, /* complain_on_overflow */
1302 bfd_elf_generic_reloc
, /* special_function */
1303 "R_PPC_EMB_SDA2REL", /* name */
1304 FALSE
, /* partial_inplace */
1306 0xffff, /* dst_mask */
1307 FALSE
), /* pcrel_offset */
1309 /* Relocate against either _SDA_BASE_ or _SDA2_BASE_, filling in the 16 bit
1310 signed offset from the appropriate base, and filling in the register
1311 field with the appropriate register (0, 2, or 13). */
1312 HOWTO (R_PPC_EMB_SDA21
, /* type */
1314 2, /* size (0 = byte, 1 = short, 2 = long) */
1316 FALSE
, /* pc_relative */
1318 complain_overflow_signed
, /* complain_on_overflow */
1319 bfd_elf_generic_reloc
, /* special_function */
1320 "R_PPC_EMB_SDA21", /* name */
1321 FALSE
, /* partial_inplace */
1323 0xffff, /* dst_mask */
1324 FALSE
), /* pcrel_offset */
1326 /* Relocation not handled: R_PPC_EMB_MRKREF */
1327 /* Relocation not handled: R_PPC_EMB_RELSEC16 */
1328 /* Relocation not handled: R_PPC_EMB_RELST_LO */
1329 /* Relocation not handled: R_PPC_EMB_RELST_HI */
1330 /* Relocation not handled: R_PPC_EMB_RELST_HA */
1331 /* Relocation not handled: R_PPC_EMB_BIT_FLD */
1333 /* PC relative relocation against either _SDA_BASE_ or _SDA2_BASE_, filling
1334 in the 16 bit signed offset from the appropriate base, and filling in the
1335 register field with the appropriate register (0, 2, or 13). */
1336 HOWTO (R_PPC_EMB_RELSDA
, /* type */
1338 1, /* size (0 = byte, 1 = short, 2 = long) */
1340 TRUE
, /* pc_relative */
1342 complain_overflow_signed
, /* complain_on_overflow */
1343 bfd_elf_generic_reloc
, /* special_function */
1344 "R_PPC_EMB_RELSDA", /* name */
1345 FALSE
, /* partial_inplace */
1347 0xffff, /* dst_mask */
1348 FALSE
), /* pcrel_offset */
1350 /* A 16 bit relative relocation. */
1351 HOWTO (R_PPC_REL16
, /* type */
1353 1, /* size (0 = byte, 1 = short, 2 = long) */
1355 TRUE
, /* pc_relative */
1357 complain_overflow_bitfield
, /* complain_on_overflow */
1358 bfd_elf_generic_reloc
, /* special_function */
1359 "R_PPC_REL16", /* name */
1360 FALSE
, /* partial_inplace */
1362 0xffff, /* dst_mask */
1363 TRUE
), /* pcrel_offset */
1365 /* A 16 bit relative relocation without overflow. */
1366 HOWTO (R_PPC_REL16_LO
, /* type */
1368 1, /* size (0 = byte, 1 = short, 2 = long) */
1370 TRUE
, /* pc_relative */
1372 complain_overflow_dont
,/* complain_on_overflow */
1373 bfd_elf_generic_reloc
, /* special_function */
1374 "R_PPC_REL16_LO", /* name */
1375 FALSE
, /* partial_inplace */
1377 0xffff, /* dst_mask */
1378 TRUE
), /* pcrel_offset */
1380 /* The high order 16 bits of a relative address. */
1381 HOWTO (R_PPC_REL16_HI
, /* type */
1382 16, /* rightshift */
1383 1, /* size (0 = byte, 1 = short, 2 = long) */
1385 TRUE
, /* pc_relative */
1387 complain_overflow_dont
, /* complain_on_overflow */
1388 bfd_elf_generic_reloc
, /* special_function */
1389 "R_PPC_REL16_HI", /* name */
1390 FALSE
, /* partial_inplace */
1392 0xffff, /* dst_mask */
1393 TRUE
), /* pcrel_offset */
1395 /* The high order 16 bits of a relative address, plus 1 if the contents of
1396 the low 16 bits, treated as a signed number, is negative. */
1397 HOWTO (R_PPC_REL16_HA
, /* type */
1398 16, /* rightshift */
1399 1, /* size (0 = byte, 1 = short, 2 = long) */
1401 TRUE
, /* pc_relative */
1403 complain_overflow_dont
, /* complain_on_overflow */
1404 ppc_elf_addr16_ha_reloc
, /* special_function */
1405 "R_PPC_REL16_HA", /* name */
1406 FALSE
, /* partial_inplace */
1408 0xffff, /* dst_mask */
1409 TRUE
), /* pcrel_offset */
1411 /* GNU extension to record C++ vtable hierarchy. */
1412 HOWTO (R_PPC_GNU_VTINHERIT
, /* type */
1414 0, /* size (0 = byte, 1 = short, 2 = long) */
1416 FALSE
, /* pc_relative */
1418 complain_overflow_dont
, /* complain_on_overflow */
1419 NULL
, /* special_function */
1420 "R_PPC_GNU_VTINHERIT", /* name */
1421 FALSE
, /* partial_inplace */
1424 FALSE
), /* pcrel_offset */
1426 /* GNU extension to record C++ vtable member usage. */
1427 HOWTO (R_PPC_GNU_VTENTRY
, /* type */
1429 0, /* size (0 = byte, 1 = short, 2 = long) */
1431 FALSE
, /* pc_relative */
1433 complain_overflow_dont
, /* complain_on_overflow */
1434 NULL
, /* special_function */
1435 "R_PPC_GNU_VTENTRY", /* name */
1436 FALSE
, /* partial_inplace */
1439 FALSE
), /* pcrel_offset */
1441 /* Phony reloc to handle AIX style TOC entries. */
1442 HOWTO (R_PPC_TOC16
, /* type */
1444 1, /* size (0 = byte, 1 = short, 2 = long) */
1446 FALSE
, /* pc_relative */
1448 complain_overflow_signed
, /* complain_on_overflow */
1449 bfd_elf_generic_reloc
, /* special_function */
1450 "R_PPC_TOC16", /* name */
1451 FALSE
, /* partial_inplace */
1453 0xffff, /* dst_mask */
1454 FALSE
), /* pcrel_offset */
1457 /* Initialize the ppc_elf_howto_table, so that linear accesses can be done. */
1460 ppc_elf_howto_init (void)
1462 unsigned int i
, type
;
1465 i
< sizeof (ppc_elf_howto_raw
) / sizeof (ppc_elf_howto_raw
[0]);
1468 type
= ppc_elf_howto_raw
[i
].type
;
1469 if (type
>= (sizeof (ppc_elf_howto_table
)
1470 / sizeof (ppc_elf_howto_table
[0])))
1472 ppc_elf_howto_table
[type
] = &ppc_elf_howto_raw
[i
];
1476 static reloc_howto_type
*
1477 ppc_elf_reloc_type_lookup (bfd
*abfd ATTRIBUTE_UNUSED
,
1478 bfd_reloc_code_real_type code
)
1480 enum elf_ppc_reloc_type r
;
1482 /* Initialize howto table if not already done. */
1483 if (!ppc_elf_howto_table
[R_PPC_ADDR32
])
1484 ppc_elf_howto_init ();
1491 case BFD_RELOC_NONE
: r
= R_PPC_NONE
; break;
1492 case BFD_RELOC_32
: r
= R_PPC_ADDR32
; break;
1493 case BFD_RELOC_PPC_BA26
: r
= R_PPC_ADDR24
; break;
1494 case BFD_RELOC_16
: r
= R_PPC_ADDR16
; break;
1495 case BFD_RELOC_LO16
: r
= R_PPC_ADDR16_LO
; break;
1496 case BFD_RELOC_HI16
: r
= R_PPC_ADDR16_HI
; break;
1497 case BFD_RELOC_HI16_S
: r
= R_PPC_ADDR16_HA
; break;
1498 case BFD_RELOC_PPC_BA16
: r
= R_PPC_ADDR14
; break;
1499 case BFD_RELOC_PPC_BA16_BRTAKEN
: r
= R_PPC_ADDR14_BRTAKEN
; break;
1500 case BFD_RELOC_PPC_BA16_BRNTAKEN
: r
= R_PPC_ADDR14_BRNTAKEN
; break;
1501 case BFD_RELOC_PPC_B26
: r
= R_PPC_REL24
; break;
1502 case BFD_RELOC_PPC_B16
: r
= R_PPC_REL14
; break;
1503 case BFD_RELOC_PPC_B16_BRTAKEN
: r
= R_PPC_REL14_BRTAKEN
; break;
1504 case BFD_RELOC_PPC_B16_BRNTAKEN
: r
= R_PPC_REL14_BRNTAKEN
; break;
1505 case BFD_RELOC_16_GOTOFF
: r
= R_PPC_GOT16
; break;
1506 case BFD_RELOC_LO16_GOTOFF
: r
= R_PPC_GOT16_LO
; break;
1507 case BFD_RELOC_HI16_GOTOFF
: r
= R_PPC_GOT16_HI
; break;
1508 case BFD_RELOC_HI16_S_GOTOFF
: r
= R_PPC_GOT16_HA
; break;
1509 case BFD_RELOC_24_PLT_PCREL
: r
= R_PPC_PLTREL24
; break;
1510 case BFD_RELOC_PPC_COPY
: r
= R_PPC_COPY
; break;
1511 case BFD_RELOC_PPC_GLOB_DAT
: r
= R_PPC_GLOB_DAT
; break;
1512 case BFD_RELOC_PPC_LOCAL24PC
: r
= R_PPC_LOCAL24PC
; break;
1513 case BFD_RELOC_32_PCREL
: r
= R_PPC_REL32
; break;
1514 case BFD_RELOC_32_PLTOFF
: r
= R_PPC_PLT32
; break;
1515 case BFD_RELOC_32_PLT_PCREL
: r
= R_PPC_PLTREL32
; break;
1516 case BFD_RELOC_LO16_PLTOFF
: r
= R_PPC_PLT16_LO
; break;
1517 case BFD_RELOC_HI16_PLTOFF
: r
= R_PPC_PLT16_HI
; break;
1518 case BFD_RELOC_HI16_S_PLTOFF
: r
= R_PPC_PLT16_HA
; break;
1519 case BFD_RELOC_GPREL16
: r
= R_PPC_SDAREL16
; break;
1520 case BFD_RELOC_16_BASEREL
: r
= R_PPC_SECTOFF
; break;
1521 case BFD_RELOC_LO16_BASEREL
: r
= R_PPC_SECTOFF_LO
; break;
1522 case BFD_RELOC_HI16_BASEREL
: r
= R_PPC_SECTOFF_HI
; break;
1523 case BFD_RELOC_HI16_S_BASEREL
: r
= R_PPC_SECTOFF_HA
; break;
1524 case BFD_RELOC_CTOR
: r
= R_PPC_ADDR32
; break;
1525 case BFD_RELOC_PPC_TOC16
: r
= R_PPC_TOC16
; break;
1526 case BFD_RELOC_PPC_TLS
: r
= R_PPC_TLS
; break;
1527 case BFD_RELOC_PPC_DTPMOD
: r
= R_PPC_DTPMOD32
; break;
1528 case BFD_RELOC_PPC_TPREL16
: r
= R_PPC_TPREL16
; break;
1529 case BFD_RELOC_PPC_TPREL16_LO
: r
= R_PPC_TPREL16_LO
; break;
1530 case BFD_RELOC_PPC_TPREL16_HI
: r
= R_PPC_TPREL16_HI
; break;
1531 case BFD_RELOC_PPC_TPREL16_HA
: r
= R_PPC_TPREL16_HA
; break;
1532 case BFD_RELOC_PPC_TPREL
: r
= R_PPC_TPREL32
; break;
1533 case BFD_RELOC_PPC_DTPREL16
: r
= R_PPC_DTPREL16
; break;
1534 case BFD_RELOC_PPC_DTPREL16_LO
: r
= R_PPC_DTPREL16_LO
; break;
1535 case BFD_RELOC_PPC_DTPREL16_HI
: r
= R_PPC_DTPREL16_HI
; break;
1536 case BFD_RELOC_PPC_DTPREL16_HA
: r
= R_PPC_DTPREL16_HA
; break;
1537 case BFD_RELOC_PPC_DTPREL
: r
= R_PPC_DTPREL32
; break;
1538 case BFD_RELOC_PPC_GOT_TLSGD16
: r
= R_PPC_GOT_TLSGD16
; break;
1539 case BFD_RELOC_PPC_GOT_TLSGD16_LO
: r
= R_PPC_GOT_TLSGD16_LO
; break;
1540 case BFD_RELOC_PPC_GOT_TLSGD16_HI
: r
= R_PPC_GOT_TLSGD16_HI
; break;
1541 case BFD_RELOC_PPC_GOT_TLSGD16_HA
: r
= R_PPC_GOT_TLSGD16_HA
; break;
1542 case BFD_RELOC_PPC_GOT_TLSLD16
: r
= R_PPC_GOT_TLSLD16
; break;
1543 case BFD_RELOC_PPC_GOT_TLSLD16_LO
: r
= R_PPC_GOT_TLSLD16_LO
; break;
1544 case BFD_RELOC_PPC_GOT_TLSLD16_HI
: r
= R_PPC_GOT_TLSLD16_HI
; break;
1545 case BFD_RELOC_PPC_GOT_TLSLD16_HA
: r
= R_PPC_GOT_TLSLD16_HA
; break;
1546 case BFD_RELOC_PPC_GOT_TPREL16
: r
= R_PPC_GOT_TPREL16
; break;
1547 case BFD_RELOC_PPC_GOT_TPREL16_LO
: r
= R_PPC_GOT_TPREL16_LO
; break;
1548 case BFD_RELOC_PPC_GOT_TPREL16_HI
: r
= R_PPC_GOT_TPREL16_HI
; break;
1549 case BFD_RELOC_PPC_GOT_TPREL16_HA
: r
= R_PPC_GOT_TPREL16_HA
; break;
1550 case BFD_RELOC_PPC_GOT_DTPREL16
: r
= R_PPC_GOT_DTPREL16
; break;
1551 case BFD_RELOC_PPC_GOT_DTPREL16_LO
: r
= R_PPC_GOT_DTPREL16_LO
; break;
1552 case BFD_RELOC_PPC_GOT_DTPREL16_HI
: r
= R_PPC_GOT_DTPREL16_HI
; break;
1553 case BFD_RELOC_PPC_GOT_DTPREL16_HA
: r
= R_PPC_GOT_DTPREL16_HA
; break;
1554 case BFD_RELOC_PPC_EMB_NADDR32
: r
= R_PPC_EMB_NADDR32
; break;
1555 case BFD_RELOC_PPC_EMB_NADDR16
: r
= R_PPC_EMB_NADDR16
; break;
1556 case BFD_RELOC_PPC_EMB_NADDR16_LO
: r
= R_PPC_EMB_NADDR16_LO
; break;
1557 case BFD_RELOC_PPC_EMB_NADDR16_HI
: r
= R_PPC_EMB_NADDR16_HI
; break;
1558 case BFD_RELOC_PPC_EMB_NADDR16_HA
: r
= R_PPC_EMB_NADDR16_HA
; break;
1559 case BFD_RELOC_PPC_EMB_SDAI16
: r
= R_PPC_EMB_SDAI16
; break;
1560 case BFD_RELOC_PPC_EMB_SDA2I16
: r
= R_PPC_EMB_SDA2I16
; break;
1561 case BFD_RELOC_PPC_EMB_SDA2REL
: r
= R_PPC_EMB_SDA2REL
; break;
1562 case BFD_RELOC_PPC_EMB_SDA21
: r
= R_PPC_EMB_SDA21
; break;
1563 case BFD_RELOC_PPC_EMB_MRKREF
: r
= R_PPC_EMB_MRKREF
; break;
1564 case BFD_RELOC_PPC_EMB_RELSEC16
: r
= R_PPC_EMB_RELSEC16
; break;
1565 case BFD_RELOC_PPC_EMB_RELST_LO
: r
= R_PPC_EMB_RELST_LO
; break;
1566 case BFD_RELOC_PPC_EMB_RELST_HI
: r
= R_PPC_EMB_RELST_HI
; break;
1567 case BFD_RELOC_PPC_EMB_RELST_HA
: r
= R_PPC_EMB_RELST_HA
; break;
1568 case BFD_RELOC_PPC_EMB_BIT_FLD
: r
= R_PPC_EMB_BIT_FLD
; break;
1569 case BFD_RELOC_PPC_EMB_RELSDA
: r
= R_PPC_EMB_RELSDA
; break;
1570 case BFD_RELOC_16_PCREL
: r
= R_PPC_REL16
; break;
1571 case BFD_RELOC_LO16_PCREL
: r
= R_PPC_REL16_LO
; break;
1572 case BFD_RELOC_HI16_PCREL
: r
= R_PPC_REL16_HI
; break;
1573 case BFD_RELOC_HI16_S_PCREL
: r
= R_PPC_REL16_HA
; break;
1574 case BFD_RELOC_VTABLE_INHERIT
: r
= R_PPC_GNU_VTINHERIT
; break;
1575 case BFD_RELOC_VTABLE_ENTRY
: r
= R_PPC_GNU_VTENTRY
; break;
1578 return ppc_elf_howto_table
[r
];
1581 static reloc_howto_type
*
1582 ppc_elf_reloc_name_lookup (bfd
*abfd ATTRIBUTE_UNUSED
,
1588 i
< sizeof (ppc_elf_howto_raw
) / sizeof (ppc_elf_howto_raw
[0]);
1590 if (ppc_elf_howto_raw
[i
].name
!= NULL
1591 && strcasecmp (ppc_elf_howto_raw
[i
].name
, r_name
) == 0)
1592 return &ppc_elf_howto_raw
[i
];
1597 /* Set the howto pointer for a PowerPC ELF reloc. */
1600 ppc_elf_info_to_howto (bfd
*abfd ATTRIBUTE_UNUSED
,
1602 Elf_Internal_Rela
*dst
)
1604 /* Initialize howto table if not already done. */
1605 if (!ppc_elf_howto_table
[R_PPC_ADDR32
])
1606 ppc_elf_howto_init ();
1608 BFD_ASSERT (ELF32_R_TYPE (dst
->r_info
) < (unsigned int) R_PPC_max
);
1609 cache_ptr
->howto
= ppc_elf_howto_table
[ELF32_R_TYPE (dst
->r_info
)];
1612 /* Handle the R_PPC_ADDR16_HA and R_PPC_REL16_HA relocs. */
1614 static bfd_reloc_status_type
1615 ppc_elf_addr16_ha_reloc (bfd
*abfd ATTRIBUTE_UNUSED
,
1616 arelent
*reloc_entry
,
1618 void *data ATTRIBUTE_UNUSED
,
1619 asection
*input_section
,
1621 char **error_message ATTRIBUTE_UNUSED
)
1625 if (output_bfd
!= NULL
)
1627 reloc_entry
->address
+= input_section
->output_offset
;
1628 return bfd_reloc_ok
;
1631 if (reloc_entry
->address
> bfd_get_section_limit (abfd
, input_section
))
1632 return bfd_reloc_outofrange
;
1634 if (bfd_is_com_section (symbol
->section
))
1637 relocation
= symbol
->value
;
1639 relocation
+= symbol
->section
->output_section
->vma
;
1640 relocation
+= symbol
->section
->output_offset
;
1641 relocation
+= reloc_entry
->addend
;
1642 if (reloc_entry
->howto
->pc_relative
)
1643 relocation
-= reloc_entry
->address
;
1645 reloc_entry
->addend
+= (relocation
& 0x8000) << 1;
1647 return bfd_reloc_continue
;
1650 static bfd_reloc_status_type
1651 ppc_elf_unhandled_reloc (bfd
*abfd
,
1652 arelent
*reloc_entry
,
1655 asection
*input_section
,
1657 char **error_message
)
1659 /* If this is a relocatable link (output_bfd test tells us), just
1660 call the generic function. Any adjustment will be done at final
1662 if (output_bfd
!= NULL
)
1663 return bfd_elf_generic_reloc (abfd
, reloc_entry
, symbol
, data
,
1664 input_section
, output_bfd
, error_message
);
1666 if (error_message
!= NULL
)
1668 static char buf
[60];
1669 sprintf (buf
, _("generic linker can't handle %s"),
1670 reloc_entry
->howto
->name
);
1671 *error_message
= buf
;
1673 return bfd_reloc_dangerous
;
1676 /* Sections created by the linker. */
1678 typedef struct elf_linker_section
1680 /* Pointer to the bfd section. */
1684 /* Associated bss section name. */
1685 const char *bss_name
;
1686 /* Associated symbol name. */
1687 const char *sym_name
;
1688 /* Associated symbol. */
1689 struct elf_link_hash_entry
*sym
;
1690 } elf_linker_section_t
;
1692 /* Linked list of allocated pointer entries. This hangs off of the
1693 symbol lists, and provides allows us to return different pointers,
1694 based on different addend's. */
1696 typedef struct elf_linker_section_pointers
1698 /* next allocated pointer for this symbol */
1699 struct elf_linker_section_pointers
*next
;
1700 /* offset of pointer from beginning of section */
1704 /* which linker section this is */
1705 elf_linker_section_t
*lsect
;
1706 } elf_linker_section_pointers_t
;
1708 struct ppc_elf_obj_tdata
1710 struct elf_obj_tdata elf
;
1712 /* A mapping from local symbols to offsets into the various linker
1713 sections added. This is index by the symbol index. */
1714 elf_linker_section_pointers_t
**linker_section_pointers
;
1716 /* Flags used to auto-detect plt type. */
1717 unsigned int makes_plt_call
: 1;
1718 unsigned int has_rel16
: 1;
1721 #define ppc_elf_tdata(bfd) \
1722 ((struct ppc_elf_obj_tdata *) (bfd)->tdata.any)
1724 #define elf_local_ptr_offsets(bfd) \
1725 (ppc_elf_tdata (bfd)->linker_section_pointers)
1727 /* Override the generic function because we store some extras. */
1730 ppc_elf_mkobject (bfd
*abfd
)
1732 if (abfd
->tdata
.any
== NULL
)
1734 bfd_size_type amt
= sizeof (struct ppc_elf_obj_tdata
);
1735 abfd
->tdata
.any
= bfd_zalloc (abfd
, amt
);
1736 if (abfd
->tdata
.any
== NULL
)
1739 return bfd_elf_mkobject (abfd
);
1742 /* Fix bad default arch selected for a 32 bit input bfd when the
1743 default is 64 bit. */
1746 ppc_elf_object_p (bfd
*abfd
)
1748 if (abfd
->arch_info
->the_default
&& abfd
->arch_info
->bits_per_word
== 64)
1750 Elf_Internal_Ehdr
*i_ehdr
= elf_elfheader (abfd
);
1752 if (i_ehdr
->e_ident
[EI_CLASS
] == ELFCLASS32
)
1754 /* Relies on arch after 64 bit default being 32 bit default. */
1755 abfd
->arch_info
= abfd
->arch_info
->next
;
1756 BFD_ASSERT (abfd
->arch_info
->bits_per_word
== 32);
1762 /* Function to set whether a module needs the -mrelocatable bit set. */
1765 ppc_elf_set_private_flags (bfd
*abfd
, flagword flags
)
1767 BFD_ASSERT (!elf_flags_init (abfd
)
1768 || elf_elfheader (abfd
)->e_flags
== flags
);
1770 elf_elfheader (abfd
)->e_flags
= flags
;
1771 elf_flags_init (abfd
) = TRUE
;
1775 /* Support for core dump NOTE sections. */
1778 ppc_elf_grok_prstatus (bfd
*abfd
, Elf_Internal_Note
*note
)
1783 switch (note
->descsz
)
1788 case 268: /* Linux/PPC. */
1790 elf_tdata (abfd
)->core_signal
= bfd_get_16 (abfd
, note
->descdata
+ 12);
1793 elf_tdata (abfd
)->core_pid
= bfd_get_32 (abfd
, note
->descdata
+ 24);
1802 /* Make a ".reg/999" section. */
1803 return _bfd_elfcore_make_pseudosection (abfd
, ".reg",
1804 size
, note
->descpos
+ offset
);
1808 ppc_elf_grok_psinfo (bfd
*abfd
, Elf_Internal_Note
*note
)
1810 switch (note
->descsz
)
1815 case 128: /* Linux/PPC elf_prpsinfo. */
1816 elf_tdata (abfd
)->core_program
1817 = _bfd_elfcore_strndup (abfd
, note
->descdata
+ 32, 16);
1818 elf_tdata (abfd
)->core_command
1819 = _bfd_elfcore_strndup (abfd
, note
->descdata
+ 48, 80);
1822 /* Note that for some reason, a spurious space is tacked
1823 onto the end of the args in some (at least one anyway)
1824 implementations, so strip it off if it exists. */
1827 char *command
= elf_tdata (abfd
)->core_command
;
1828 int n
= strlen (command
);
1830 if (0 < n
&& command
[n
- 1] == ' ')
1831 command
[n
- 1] = '\0';
1838 ppc_elf_write_core_note (bfd
*abfd
, char *buf
, int *bufsiz
, int note_type
, ...)
1850 va_start (ap
, note_type
);
1851 memset (data
, 0, 32);
1852 strncpy (data
+ 32, va_arg (ap
, const char *), 16);
1853 strncpy (data
+ 48, va_arg (ap
, const char *), 80);
1855 return elfcore_write_note (abfd
, buf
, bufsiz
,
1856 "CORE", note_type
, data
, sizeof (data
));
1867 va_start (ap
, note_type
);
1868 memset (data
, 0, 72);
1869 pid
= va_arg (ap
, long);
1870 bfd_put_32 (abfd
, pid
, data
+ 24);
1871 cursig
= va_arg (ap
, int);
1872 bfd_put_16 (abfd
, cursig
, data
+ 12);
1873 greg
= va_arg (ap
, const void *);
1874 memcpy (data
+ 72, greg
, 192);
1875 memset (data
+ 264, 0, 4);
1877 return elfcore_write_note (abfd
, buf
, bufsiz
,
1878 "CORE", note_type
, data
, sizeof (data
));
1883 /* Return address for Ith PLT stub in section PLT, for relocation REL
1884 or (bfd_vma) -1 if it should not be included. */
1887 ppc_elf_plt_sym_val (bfd_vma i ATTRIBUTE_UNUSED
,
1888 const asection
*plt ATTRIBUTE_UNUSED
,
1891 return rel
->address
;
1894 /* Handle a PowerPC specific section when reading an object file. This
1895 is called when bfd_section_from_shdr finds a section with an unknown
1899 ppc_elf_section_from_shdr (bfd
*abfd
,
1900 Elf_Internal_Shdr
*hdr
,
1907 if (! _bfd_elf_make_section_from_shdr (abfd
, hdr
, name
, shindex
))
1910 newsect
= hdr
->bfd_section
;
1911 flags
= bfd_get_section_flags (abfd
, newsect
);
1912 if (hdr
->sh_flags
& SHF_EXCLUDE
)
1913 flags
|= SEC_EXCLUDE
;
1915 if (hdr
->sh_type
== SHT_ORDERED
)
1916 flags
|= SEC_SORT_ENTRIES
;
1918 bfd_set_section_flags (abfd
, newsect
, flags
);
1922 /* Set up any other section flags and such that may be necessary. */
1925 ppc_elf_fake_sections (bfd
*abfd ATTRIBUTE_UNUSED
,
1926 Elf_Internal_Shdr
*shdr
,
1929 if ((asect
->flags
& (SEC_GROUP
| SEC_EXCLUDE
)) == SEC_EXCLUDE
)
1930 shdr
->sh_flags
|= SHF_EXCLUDE
;
1932 if ((asect
->flags
& SEC_SORT_ENTRIES
) != 0)
1933 shdr
->sh_type
= SHT_ORDERED
;
1938 /* If we have .sbss2 or .PPC.EMB.sbss0 output sections, we
1939 need to bump up the number of section headers. */
1942 ppc_elf_additional_program_headers (bfd
*abfd
,
1943 struct bfd_link_info
*info ATTRIBUTE_UNUSED
)
1948 s
= bfd_get_section_by_name (abfd
, ".sbss2");
1949 if (s
!= NULL
&& (s
->flags
& SEC_ALLOC
) != 0)
1952 s
= bfd_get_section_by_name (abfd
, ".PPC.EMB.sbss0");
1953 if (s
!= NULL
&& (s
->flags
& SEC_ALLOC
) != 0)
1959 /* Add extra PPC sections -- Note, for now, make .sbss2 and
1960 .PPC.EMB.sbss0 a normal section, and not a bss section so
1961 that the linker doesn't crater when trying to make more than
1964 static const struct bfd_elf_special_section ppc_elf_special_sections
[] =
1966 { STRING_COMMA_LEN (".plt"), 0, SHT_NOBITS
, SHF_ALLOC
+ SHF_EXECINSTR
},
1967 { STRING_COMMA_LEN (".sbss"), -2, SHT_NOBITS
, SHF_ALLOC
+ SHF_WRITE
},
1968 { STRING_COMMA_LEN (".sbss2"), -2, SHT_PROGBITS
, SHF_ALLOC
},
1969 { STRING_COMMA_LEN (".sdata"), -2, SHT_PROGBITS
, SHF_ALLOC
+ SHF_WRITE
},
1970 { STRING_COMMA_LEN (".sdata2"), -2, SHT_PROGBITS
, SHF_ALLOC
},
1971 { STRING_COMMA_LEN (".tags"), 0, SHT_ORDERED
, SHF_ALLOC
},
1972 { STRING_COMMA_LEN (".PPC.EMB.apuinfo"), 0, SHT_NOTE
, 0 },
1973 { STRING_COMMA_LEN (".PPC.EMB.sbss0"), 0, SHT_PROGBITS
, SHF_ALLOC
},
1974 { STRING_COMMA_LEN (".PPC.EMB.sdata0"), 0, SHT_PROGBITS
, SHF_ALLOC
},
1975 { NULL
, 0, 0, 0, 0 }
1978 /* This is what we want for new plt/got. */
1979 static struct bfd_elf_special_section ppc_alt_plt
=
1980 { STRING_COMMA_LEN (".plt"), 0, SHT_PROGBITS
, SHF_ALLOC
};
1982 static const struct bfd_elf_special_section
*
1983 ppc_elf_get_sec_type_attr (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1985 const struct bfd_elf_special_section
*ssect
;
1987 /* See if this is one of the special sections. */
1988 if (sec
->name
== NULL
)
1991 ssect
= _bfd_elf_get_special_section (sec
->name
, ppc_elf_special_sections
,
1995 if (ssect
== ppc_elf_special_sections
&& (sec
->flags
& SEC_LOAD
) != 0)
1996 ssect
= &ppc_alt_plt
;
2000 return _bfd_elf_get_sec_type_attr (abfd
, sec
);
2003 /* Very simple linked list structure for recording apuinfo values. */
2004 typedef struct apuinfo_list
2006 struct apuinfo_list
*next
;
2007 unsigned long value
;
2011 static apuinfo_list
*head
;
2015 apuinfo_list_init (void)
2021 apuinfo_list_add (unsigned long value
)
2023 apuinfo_list
*entry
= head
;
2025 while (entry
!= NULL
)
2027 if (entry
->value
== value
)
2029 entry
= entry
->next
;
2032 entry
= bfd_malloc (sizeof (* entry
));
2036 entry
->value
= value
;
2042 apuinfo_list_length (void)
2044 apuinfo_list
*entry
;
2045 unsigned long count
;
2047 for (entry
= head
, count
= 0;
2049 entry
= entry
->next
)
2055 static inline unsigned long
2056 apuinfo_list_element (unsigned long number
)
2058 apuinfo_list
* entry
;
2062 entry
= entry
->next
)
2065 return entry
? entry
->value
: 0;
2069 apuinfo_list_finish (void)
2071 apuinfo_list
*entry
;
2073 for (entry
= head
; entry
;)
2075 apuinfo_list
*next
= entry
->next
;
2083 #define APUINFO_SECTION_NAME ".PPC.EMB.apuinfo"
2084 #define APUINFO_LABEL "APUinfo"
2086 /* Scan the input BFDs and create a linked list of
2087 the APUinfo values that will need to be emitted. */
2090 ppc_elf_begin_write_processing (bfd
*abfd
, struct bfd_link_info
*link_info
)
2095 unsigned num_input_sections
;
2096 bfd_size_type output_section_size
;
2098 unsigned num_entries
;
2099 unsigned long offset
;
2100 unsigned long length
;
2101 const char *error_message
= NULL
;
2103 if (link_info
== NULL
)
2106 /* Scan the input bfds, looking for apuinfo sections. */
2107 num_input_sections
= 0;
2108 output_section_size
= 0;
2110 for (ibfd
= link_info
->input_bfds
; ibfd
; ibfd
= ibfd
->link_next
)
2112 asec
= bfd_get_section_by_name (ibfd
, APUINFO_SECTION_NAME
);
2115 ++ num_input_sections
;
2116 output_section_size
+= asec
->size
;
2120 /* We need at least one input sections
2121 in order to make merging worthwhile. */
2122 if (num_input_sections
< 1)
2125 /* Just make sure that the output section exists as well. */
2126 asec
= bfd_get_section_by_name (abfd
, APUINFO_SECTION_NAME
);
2130 /* Allocate a buffer for the contents of the input sections. */
2131 buffer
= bfd_malloc (output_section_size
);
2136 apuinfo_list_init ();
2138 /* Read in the input sections contents. */
2139 for (ibfd
= link_info
->input_bfds
; ibfd
; ibfd
= ibfd
->link_next
)
2141 unsigned long datum
;
2144 asec
= bfd_get_section_by_name (ibfd
, APUINFO_SECTION_NAME
);
2148 length
= asec
->size
;
2151 error_message
= _("corrupt or empty %s section in %B");
2155 if (bfd_seek (ibfd
, asec
->filepos
, SEEK_SET
) != 0
2156 || (bfd_bread (buffer
+ offset
, length
, ibfd
) != length
))
2158 error_message
= _("unable to read in %s section from %B");
2162 /* Process the contents of the section. */
2163 ptr
= buffer
+ offset
;
2164 error_message
= _("corrupt %s section in %B");
2166 /* Verify the contents of the header. Note - we have to
2167 extract the values this way in order to allow for a
2168 host whose endian-ness is different from the target. */
2169 datum
= bfd_get_32 (ibfd
, ptr
);
2170 if (datum
!= sizeof APUINFO_LABEL
)
2173 datum
= bfd_get_32 (ibfd
, ptr
+ 8);
2177 if (strcmp (ptr
+ 12, APUINFO_LABEL
) != 0)
2180 /* Get the number of bytes used for apuinfo entries. */
2181 datum
= bfd_get_32 (ibfd
, ptr
+ 4);
2182 if (datum
+ 20 != length
)
2185 /* Make sure that we do not run off the end of the section. */
2186 if (offset
+ length
> output_section_size
)
2189 /* Scan the apuinfo section, building a list of apuinfo numbers. */
2190 for (i
= 0; i
< datum
; i
+= 4)
2191 apuinfo_list_add (bfd_get_32 (ibfd
, ptr
+ 20 + i
));
2193 /* Update the offset. */
2197 error_message
= NULL
;
2199 /* Compute the size of the output section. */
2200 num_entries
= apuinfo_list_length ();
2201 output_section_size
= 20 + num_entries
* 4;
2203 asec
= bfd_get_section_by_name (abfd
, APUINFO_SECTION_NAME
);
2205 if (! bfd_set_section_size (abfd
, asec
, output_section_size
))
2207 error_message
= _("warning: unable to set size of %s section in %B");
2213 (*_bfd_error_handler
) (error_message
, ibfd
, APUINFO_SECTION_NAME
);
2216 /* Prevent the output section from accumulating the input sections'
2217 contents. We have already stored this in our linked list structure. */
2220 ppc_elf_write_section (bfd
*abfd ATTRIBUTE_UNUSED
,
2221 struct bfd_link_info
*link_info ATTRIBUTE_UNUSED
,
2223 bfd_byte
*contents ATTRIBUTE_UNUSED
)
2225 return (apuinfo_list_length ()
2226 && strcmp (asec
->name
, APUINFO_SECTION_NAME
) == 0);
2229 /* Finally we can generate the output section. */
2232 ppc_elf_final_write_processing (bfd
*abfd
, bfd_boolean linker ATTRIBUTE_UNUSED
)
2237 unsigned num_entries
;
2238 bfd_size_type length
;
2240 asec
= bfd_get_section_by_name (abfd
, APUINFO_SECTION_NAME
);
2244 if (apuinfo_list_length () == 0)
2247 length
= asec
->size
;
2251 buffer
= bfd_malloc (length
);
2254 (*_bfd_error_handler
)
2255 (_("failed to allocate space for new APUinfo section."));
2259 /* Create the apuinfo header. */
2260 num_entries
= apuinfo_list_length ();
2261 bfd_put_32 (abfd
, sizeof APUINFO_LABEL
, buffer
);
2262 bfd_put_32 (abfd
, num_entries
* 4, buffer
+ 4);
2263 bfd_put_32 (abfd
, 0x2, buffer
+ 8);
2264 strcpy ((char *) buffer
+ 12, APUINFO_LABEL
);
2267 for (i
= 0; i
< num_entries
; i
++)
2269 bfd_put_32 (abfd
, apuinfo_list_element (i
), buffer
+ length
);
2273 if (length
!= asec
->size
)
2274 (*_bfd_error_handler
) (_("failed to compute new APUinfo section."));
2276 if (! bfd_set_section_contents (abfd
, asec
, buffer
, (file_ptr
) 0, length
))
2277 (*_bfd_error_handler
) (_("failed to install new APUinfo section."));
2281 apuinfo_list_finish ();
2284 /* The following functions are specific to the ELF linker, while
2285 functions above are used generally. They appear in this file more
2286 or less in the order in which they are called. eg.
2287 ppc_elf_check_relocs is called early in the link process,
2288 ppc_elf_finish_dynamic_sections is one of the last functions
2291 /* The PPC linker needs to keep track of the number of relocs that it
2292 decides to copy as dynamic relocs in check_relocs for each symbol.
2293 This is so that it can later discard them if they are found to be
2294 unnecessary. We store the information in a field extending the
2295 regular ELF linker hash table. */
2297 struct ppc_elf_dyn_relocs
2299 struct ppc_elf_dyn_relocs
*next
;
2301 /* The input section of the reloc. */
2304 /* Total number of relocs copied for the input section. */
2305 bfd_size_type count
;
2307 /* Number of pc-relative relocs copied for the input section. */
2308 bfd_size_type pc_count
;
2311 /* Track PLT entries needed for a given symbol. We might need more
2312 than one glink entry per symbol. */
2315 struct plt_entry
*next
;
2317 /* -fPIC uses multiple GOT sections, one per file, called ".got2".
2318 This field stores the offset into .got2 used to initialise the
2319 GOT pointer reg. It will always be at least 32768 (and for
2320 current gcc this is the only offset used). */
2323 /* The .got2 section. */
2326 /* PLT refcount or offset. */
2329 bfd_signed_vma refcount
;
2333 /* .glink stub offset. */
2334 bfd_vma glink_offset
;
2337 /* Of those relocs that might be copied as dynamic relocs, this macro
2338 selects those that must be copied when linking a shared library,
2339 even when the symbol is local. */
2341 #define MUST_BE_DYN_RELOC(RTYPE) \
2342 ((RTYPE) != R_PPC_REL24 \
2343 && (RTYPE) != R_PPC_REL14 \
2344 && (RTYPE) != R_PPC_REL14_BRTAKEN \
2345 && (RTYPE) != R_PPC_REL14_BRNTAKEN \
2346 && (RTYPE) != R_PPC_REL32)
2348 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
2349 copying dynamic variables from a shared lib into an app's dynbss
2350 section, and instead use a dynamic relocation to point into the
2352 #define ELIMINATE_COPY_RELOCS 1
2354 /* PPC ELF linker hash entry. */
2356 struct ppc_elf_link_hash_entry
2358 struct elf_link_hash_entry elf
;
2360 /* If this symbol is used in the linker created sections, the processor
2361 specific backend uses this field to map the field into the offset
2362 from the beginning of the section. */
2363 elf_linker_section_pointers_t
*linker_section_pointer
;
2365 /* Track dynamic relocs copied for this symbol. */
2366 struct ppc_elf_dyn_relocs
*dyn_relocs
;
2368 /* Contexts in which symbol is used in the GOT (or TOC).
2369 TLS_GD .. TLS_TLS bits are or'd into the mask as the
2370 corresponding relocs are encountered during check_relocs.
2371 tls_optimize clears TLS_GD .. TLS_TPREL when optimizing to
2372 indicate the corresponding GOT entry type is not needed. */
2373 #define TLS_GD 1 /* GD reloc. */
2374 #define TLS_LD 2 /* LD reloc. */
2375 #define TLS_TPREL 4 /* TPREL reloc, => IE. */
2376 #define TLS_DTPREL 8 /* DTPREL reloc, => LD. */
2377 #define TLS_TLS 16 /* Any TLS reloc. */
2378 #define TLS_TPRELGD 32 /* TPREL reloc resulting from GD->IE. */
2381 /* Nonzero if we have seen a small data relocation referring to this
2383 unsigned char has_sda_refs
;
2386 #define ppc_elf_hash_entry(ent) ((struct ppc_elf_link_hash_entry *) (ent))
2388 /* PPC ELF linker hash table. */
2390 struct ppc_elf_link_hash_table
2392 struct elf_link_hash_table elf
;
2394 /* Short-cuts to get to dynamic linker sections. */
2404 elf_linker_section_t sdata
[2];
2407 /* The (unloaded but important) .rela.plt.unloaded on VxWorks. */
2410 /* The .got.plt section (VxWorks only)*/
2413 /* Shortcut to .__tls_get_addr. */
2414 struct elf_link_hash_entry
*tls_get_addr
;
2416 /* The bfd that forced an old-style PLT. */
2419 /* TLS local dynamic got entry handling. */
2421 bfd_signed_vma refcount
;
2425 /* Offset of PltResolve function in glink. */
2426 bfd_vma glink_pltresolve
;
2428 /* Size of reserved GOT entries. */
2429 unsigned int got_header_size
;
2430 /* Non-zero if allocating the header left a gap. */
2431 unsigned int got_gap
;
2433 /* The type of PLT we have chosen to use. */
2434 enum ppc_elf_plt_type plt_type
;
2436 /* Set if we should emit symbols for stubs. */
2437 unsigned int emit_stub_syms
:1;
2439 /* True if the target system is VxWorks. */
2440 unsigned int is_vxworks
:1;
2442 /* The size of PLT entries. */
2444 /* The distance between adjacent PLT slots. */
2446 /* The size of the first PLT entry. */
2447 int plt_initial_entry_size
;
2449 /* Small local sym to section mapping cache. */
2450 struct sym_sec_cache sym_sec
;
2453 /* Get the PPC ELF linker hash table from a link_info structure. */
2455 #define ppc_elf_hash_table(p) \
2456 ((struct ppc_elf_link_hash_table *) (p)->hash)
2458 /* Create an entry in a PPC ELF linker hash table. */
2460 static struct bfd_hash_entry
*
2461 ppc_elf_link_hash_newfunc (struct bfd_hash_entry
*entry
,
2462 struct bfd_hash_table
*table
,
2465 /* Allocate the structure if it has not already been allocated by a
2469 entry
= bfd_hash_allocate (table
,
2470 sizeof (struct ppc_elf_link_hash_entry
));
2475 /* Call the allocation method of the superclass. */
2476 entry
= _bfd_elf_link_hash_newfunc (entry
, table
, string
);
2479 ppc_elf_hash_entry (entry
)->linker_section_pointer
= NULL
;
2480 ppc_elf_hash_entry (entry
)->dyn_relocs
= NULL
;
2481 ppc_elf_hash_entry (entry
)->tls_mask
= 0;
2487 /* Create a PPC ELF linker hash table. */
2489 static struct bfd_link_hash_table
*
2490 ppc_elf_link_hash_table_create (bfd
*abfd
)
2492 struct ppc_elf_link_hash_table
*ret
;
2494 ret
= bfd_zmalloc (sizeof (struct ppc_elf_link_hash_table
));
2498 if (!_bfd_elf_link_hash_table_init (&ret
->elf
, abfd
,
2499 ppc_elf_link_hash_newfunc
,
2500 sizeof (struct ppc_elf_link_hash_entry
)))
2506 ret
->elf
.init_plt_refcount
.refcount
= 0;
2507 ret
->elf
.init_plt_refcount
.glist
= NULL
;
2508 ret
->elf
.init_plt_offset
.offset
= 0;
2509 ret
->elf
.init_plt_offset
.glist
= NULL
;
2511 ret
->sdata
[0].name
= ".sdata";
2512 ret
->sdata
[0].sym_name
= "_SDA_BASE_";
2513 ret
->sdata
[0].bss_name
= ".sbss";
2515 ret
->sdata
[1].name
= ".sdata2";
2516 ret
->sdata
[1].sym_name
= "_SDA2_BASE_";
2517 ret
->sdata
[1].bss_name
= ".sbss2";
2519 ret
->plt_entry_size
= 12;
2520 ret
->plt_slot_size
= 8;
2521 ret
->plt_initial_entry_size
= 72;
2523 return &ret
->elf
.root
;
2526 /* Create .got and the related sections. */
2529 ppc_elf_create_got (bfd
*abfd
, struct bfd_link_info
*info
)
2531 struct ppc_elf_link_hash_table
*htab
;
2535 if (!_bfd_elf_create_got_section (abfd
, info
))
2538 htab
= ppc_elf_hash_table (info
);
2539 htab
->got
= s
= bfd_get_section_by_name (abfd
, ".got");
2543 if (htab
->is_vxworks
)
2545 htab
->sgotplt
= bfd_get_section_by_name (abfd
, ".got.plt");
2551 /* The powerpc .got has a blrl instruction in it. Mark it
2553 flags
= (SEC_ALLOC
| SEC_LOAD
| SEC_CODE
| SEC_HAS_CONTENTS
2554 | SEC_IN_MEMORY
| SEC_LINKER_CREATED
);
2555 if (!bfd_set_section_flags (abfd
, s
, flags
))
2559 flags
= (SEC_ALLOC
| SEC_LOAD
| SEC_HAS_CONTENTS
| SEC_IN_MEMORY
2560 | SEC_LINKER_CREATED
| SEC_READONLY
);
2561 htab
->relgot
= bfd_make_section_with_flags (abfd
, ".rela.got", flags
);
2563 || ! bfd_set_section_alignment (abfd
, htab
->relgot
, 2))
2569 /* We have to create .dynsbss and .rela.sbss here so that they get mapped
2570 to output sections (just like _bfd_elf_create_dynamic_sections has
2571 to create .dynbss and .rela.bss). */
2574 ppc_elf_create_dynamic_sections (bfd
*abfd
, struct bfd_link_info
*info
)
2576 struct ppc_elf_link_hash_table
*htab
;
2580 htab
= ppc_elf_hash_table (info
);
2582 if (htab
->got
== NULL
2583 && !ppc_elf_create_got (abfd
, info
))
2586 if (!_bfd_elf_create_dynamic_sections (abfd
, info
))
2589 flags
= (SEC_ALLOC
| SEC_LOAD
| SEC_READONLY
| SEC_HAS_CONTENTS
2590 | SEC_IN_MEMORY
| SEC_LINKER_CREATED
);
2592 s
= bfd_make_section_anyway_with_flags (abfd
, ".glink", flags
| SEC_CODE
);
2595 || !bfd_set_section_alignment (abfd
, s
, 4))
2598 htab
->dynbss
= bfd_get_section_by_name (abfd
, ".dynbss");
2599 s
= bfd_make_section_with_flags (abfd
, ".dynsbss",
2600 SEC_ALLOC
| SEC_LINKER_CREATED
);
2607 htab
->relbss
= bfd_get_section_by_name (abfd
, ".rela.bss");
2608 s
= bfd_make_section_with_flags (abfd
, ".rela.sbss", flags
);
2611 || ! bfd_set_section_alignment (abfd
, s
, 2))
2615 if (htab
->is_vxworks
2616 && !elf_vxworks_create_dynamic_sections (abfd
, info
, &htab
->srelplt2
))
2619 htab
->relplt
= bfd_get_section_by_name (abfd
, ".rela.plt");
2620 htab
->plt
= s
= bfd_get_section_by_name (abfd
, ".plt");
2624 flags
= SEC_ALLOC
| SEC_CODE
| SEC_LINKER_CREATED
;
2625 if (htab
->plt_type
== PLT_VXWORKS
)
2626 /* The VxWorks PLT is a loaded section with contents. */
2627 flags
|= SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_READONLY
;
2628 return bfd_set_section_flags (abfd
, s
, flags
);
2631 /* Copy the extra info we tack onto an elf_link_hash_entry. */
2634 ppc_elf_copy_indirect_symbol (struct bfd_link_info
*info
,
2635 struct elf_link_hash_entry
*dir
,
2636 struct elf_link_hash_entry
*ind
)
2638 struct ppc_elf_link_hash_entry
*edir
, *eind
;
2640 edir
= (struct ppc_elf_link_hash_entry
*) dir
;
2641 eind
= (struct ppc_elf_link_hash_entry
*) ind
;
2643 if (eind
->dyn_relocs
!= NULL
)
2645 if (edir
->dyn_relocs
!= NULL
)
2647 struct ppc_elf_dyn_relocs
**pp
;
2648 struct ppc_elf_dyn_relocs
*p
;
2650 /* Add reloc counts against the indirect sym to the direct sym
2651 list. Merge any entries against the same section. */
2652 for (pp
= &eind
->dyn_relocs
; (p
= *pp
) != NULL
; )
2654 struct ppc_elf_dyn_relocs
*q
;
2656 for (q
= edir
->dyn_relocs
; q
!= NULL
; q
= q
->next
)
2657 if (q
->sec
== p
->sec
)
2659 q
->pc_count
+= p
->pc_count
;
2660 q
->count
+= p
->count
;
2667 *pp
= edir
->dyn_relocs
;
2670 edir
->dyn_relocs
= eind
->dyn_relocs
;
2671 eind
->dyn_relocs
= NULL
;
2674 edir
->tls_mask
|= eind
->tls_mask
;
2675 edir
->has_sda_refs
|= eind
->has_sda_refs
;
2677 /* If called to transfer flags for a weakdef during processing
2678 of elf_adjust_dynamic_symbol, don't copy non_got_ref.
2679 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
2680 if (!(ELIMINATE_COPY_RELOCS
2681 && eind
->elf
.root
.type
!= bfd_link_hash_indirect
2682 && edir
->elf
.dynamic_adjusted
))
2683 edir
->elf
.non_got_ref
|= eind
->elf
.non_got_ref
;
2685 edir
->elf
.ref_dynamic
|= eind
->elf
.ref_dynamic
;
2686 edir
->elf
.ref_regular
|= eind
->elf
.ref_regular
;
2687 edir
->elf
.ref_regular_nonweak
|= eind
->elf
.ref_regular_nonweak
;
2688 edir
->elf
.needs_plt
|= eind
->elf
.needs_plt
;
2690 /* If we were called to copy over info for a weak sym, that's all. */
2691 if (eind
->elf
.root
.type
!= bfd_link_hash_indirect
)
2694 /* Copy over the GOT refcount entries that we may have already seen to
2695 the symbol which just became indirect. */
2696 edir
->elf
.got
.refcount
+= eind
->elf
.got
.refcount
;
2697 eind
->elf
.got
.refcount
= 0;
2699 /* And plt entries. */
2700 if (eind
->elf
.plt
.plist
!= NULL
)
2702 if (edir
->elf
.plt
.plist
!= NULL
)
2704 struct plt_entry
**entp
;
2705 struct plt_entry
*ent
;
2707 for (entp
= &eind
->elf
.plt
.plist
; (ent
= *entp
) != NULL
; )
2709 struct plt_entry
*dent
;
2711 for (dent
= edir
->elf
.plt
.plist
; dent
!= NULL
; dent
= dent
->next
)
2712 if (dent
->sec
== ent
->sec
&& dent
->addend
== ent
->addend
)
2714 dent
->plt
.refcount
+= ent
->plt
.refcount
;
2721 *entp
= edir
->elf
.plt
.plist
;
2724 edir
->elf
.plt
.plist
= eind
->elf
.plt
.plist
;
2725 eind
->elf
.plt
.plist
= NULL
;
2728 if (eind
->elf
.dynindx
!= -1)
2730 if (edir
->elf
.dynindx
!= -1)
2731 _bfd_elf_strtab_delref (elf_hash_table (info
)->dynstr
,
2732 edir
->elf
.dynstr_index
);
2733 edir
->elf
.dynindx
= eind
->elf
.dynindx
;
2734 edir
->elf
.dynstr_index
= eind
->elf
.dynstr_index
;
2735 eind
->elf
.dynindx
= -1;
2736 eind
->elf
.dynstr_index
= 0;
2740 /* Return 1 if target is one of ours. */
2743 is_ppc_elf_target (const struct bfd_target
*targ
)
2745 extern const bfd_target bfd_elf32_powerpc_vec
;
2746 extern const bfd_target bfd_elf32_powerpc_vxworks_vec
;
2747 extern const bfd_target bfd_elf32_powerpcle_vec
;
2749 return (targ
== &bfd_elf32_powerpc_vec
2750 || targ
== &bfd_elf32_powerpc_vxworks_vec
2751 || targ
== &bfd_elf32_powerpcle_vec
);
2754 /* Hook called by the linker routine which adds symbols from an object
2755 file. We use it to put .comm items in .sbss, and not .bss. */
2758 ppc_elf_add_symbol_hook (bfd
*abfd
,
2759 struct bfd_link_info
*info
,
2760 Elf_Internal_Sym
*sym
,
2761 const char **namep ATTRIBUTE_UNUSED
,
2762 flagword
*flagsp ATTRIBUTE_UNUSED
,
2766 if (sym
->st_shndx
== SHN_COMMON
2767 && !info
->relocatable
2768 && sym
->st_size
<= elf_gp_size (abfd
)
2769 && is_ppc_elf_target (info
->hash
->creator
))
2771 /* Common symbols less than or equal to -G nn bytes are automatically
2773 struct ppc_elf_link_hash_table
*htab
;
2775 htab
= ppc_elf_hash_table (info
);
2776 if (htab
->sbss
== NULL
)
2778 flagword flags
= SEC_IS_COMMON
| SEC_LINKER_CREATED
;
2780 if (!htab
->elf
.dynobj
)
2781 htab
->elf
.dynobj
= abfd
;
2783 htab
->sbss
= bfd_make_section_anyway_with_flags (htab
->elf
.dynobj
,
2786 if (htab
->sbss
== NULL
)
2791 *valp
= sym
->st_size
;
2798 create_sdata_sym (struct ppc_elf_link_hash_table
*htab
,
2799 elf_linker_section_t
*lsect
)
2801 lsect
->sym
= elf_link_hash_lookup (&htab
->elf
, lsect
->sym_name
,
2803 if (lsect
->sym
== NULL
)
2805 if (lsect
->sym
->root
.type
== bfd_link_hash_new
)
2806 lsect
->sym
->non_elf
= 0;
2807 lsect
->sym
->ref_regular
= 1;
2811 /* Create a special linker section. */
2814 ppc_elf_create_linker_section (bfd
*abfd
,
2815 struct bfd_link_info
*info
,
2817 elf_linker_section_t
*lsect
)
2819 struct ppc_elf_link_hash_table
*htab
= ppc_elf_hash_table (info
);
2822 flags
|= (SEC_ALLOC
| SEC_LOAD
| SEC_HAS_CONTENTS
| SEC_IN_MEMORY
2823 | SEC_LINKER_CREATED
);
2825 /* Record the first bfd that needs the special sections. */
2826 if (!htab
->elf
.dynobj
)
2827 htab
->elf
.dynobj
= abfd
;
2829 s
= bfd_make_section_anyway_with_flags (htab
->elf
.dynobj
,
2833 || !bfd_set_section_alignment (htab
->elf
.dynobj
, s
, 2))
2837 return create_sdata_sym (htab
, lsect
);
2840 /* Find a linker generated pointer with a given addend and type. */
2842 static elf_linker_section_pointers_t
*
2843 elf_find_pointer_linker_section
2844 (elf_linker_section_pointers_t
*linker_pointers
,
2846 elf_linker_section_t
*lsect
)
2848 for ( ; linker_pointers
!= NULL
; linker_pointers
= linker_pointers
->next
)
2849 if (lsect
== linker_pointers
->lsect
&& addend
== linker_pointers
->addend
)
2850 return linker_pointers
;
2855 /* Allocate a pointer to live in a linker created section. */
2858 elf_create_pointer_linker_section (bfd
*abfd
,
2859 elf_linker_section_t
*lsect
,
2860 struct elf_link_hash_entry
*h
,
2861 const Elf_Internal_Rela
*rel
)
2863 elf_linker_section_pointers_t
**ptr_linker_section_ptr
= NULL
;
2864 elf_linker_section_pointers_t
*linker_section_ptr
;
2865 unsigned long r_symndx
= ELF32_R_SYM (rel
->r_info
);
2868 BFD_ASSERT (lsect
!= NULL
);
2870 /* Is this a global symbol? */
2873 struct ppc_elf_link_hash_entry
*eh
;
2875 /* Has this symbol already been allocated? If so, our work is done. */
2876 eh
= (struct ppc_elf_link_hash_entry
*) h
;
2877 if (elf_find_pointer_linker_section (eh
->linker_section_pointer
,
2882 ptr_linker_section_ptr
= &eh
->linker_section_pointer
;
2886 /* Allocation of a pointer to a local symbol. */
2887 elf_linker_section_pointers_t
**ptr
= elf_local_ptr_offsets (abfd
);
2889 /* Allocate a table to hold the local symbols if first time. */
2892 unsigned int num_symbols
= elf_tdata (abfd
)->symtab_hdr
.sh_info
;
2895 amt
*= sizeof (elf_linker_section_pointers_t
*);
2896 ptr
= bfd_zalloc (abfd
, amt
);
2901 elf_local_ptr_offsets (abfd
) = ptr
;
2904 /* Has this symbol already been allocated? If so, our work is done. */
2905 if (elf_find_pointer_linker_section (ptr
[r_symndx
],
2910 ptr_linker_section_ptr
= &ptr
[r_symndx
];
2913 /* Allocate space for a pointer in the linker section, and allocate
2914 a new pointer record from internal memory. */
2915 BFD_ASSERT (ptr_linker_section_ptr
!= NULL
);
2916 amt
= sizeof (elf_linker_section_pointers_t
);
2917 linker_section_ptr
= bfd_alloc (abfd
, amt
);
2919 if (!linker_section_ptr
)
2922 linker_section_ptr
->next
= *ptr_linker_section_ptr
;
2923 linker_section_ptr
->addend
= rel
->r_addend
;
2924 linker_section_ptr
->lsect
= lsect
;
2925 *ptr_linker_section_ptr
= linker_section_ptr
;
2927 linker_section_ptr
->offset
= lsect
->section
->size
;
2928 lsect
->section
->size
+= 4;
2932 "Create pointer in linker section %s, offset = %ld, section size = %ld\n",
2933 lsect
->name
, (long) linker_section_ptr
->offset
,
2934 (long) lsect
->section
->size
);
2941 update_local_sym_info (bfd
*abfd
,
2942 Elf_Internal_Shdr
*symtab_hdr
,
2943 unsigned long r_symndx
,
2946 bfd_signed_vma
*local_got_refcounts
= elf_local_got_refcounts (abfd
);
2947 char *local_got_tls_masks
;
2949 if (local_got_refcounts
== NULL
)
2951 bfd_size_type size
= symtab_hdr
->sh_info
;
2953 size
*= sizeof (*local_got_refcounts
) + sizeof (*local_got_tls_masks
);
2954 local_got_refcounts
= bfd_zalloc (abfd
, size
);
2955 if (local_got_refcounts
== NULL
)
2957 elf_local_got_refcounts (abfd
) = local_got_refcounts
;
2960 local_got_refcounts
[r_symndx
] += 1;
2961 local_got_tls_masks
= (char *) (local_got_refcounts
+ symtab_hdr
->sh_info
);
2962 local_got_tls_masks
[r_symndx
] |= tls_type
;
2967 update_plt_info (bfd
*abfd
, struct elf_link_hash_entry
*h
,
2968 asection
*sec
, bfd_vma addend
)
2970 struct plt_entry
*ent
;
2974 for (ent
= h
->plt
.plist
; ent
!= NULL
; ent
= ent
->next
)
2975 if (ent
->sec
== sec
&& ent
->addend
== addend
)
2979 bfd_size_type amt
= sizeof (*ent
);
2980 ent
= bfd_alloc (abfd
, amt
);
2983 ent
->next
= h
->plt
.plist
;
2985 ent
->addend
= addend
;
2986 ent
->plt
.refcount
= 0;
2989 ent
->plt
.refcount
+= 1;
2993 static struct plt_entry
*
2994 find_plt_ent (struct elf_link_hash_entry
*h
, asection
*sec
, bfd_vma addend
)
2996 struct plt_entry
*ent
;
3000 for (ent
= h
->plt
.plist
; ent
!= NULL
; ent
= ent
->next
)
3001 if (ent
->sec
== sec
&& ent
->addend
== addend
)
3007 bad_shared_reloc (bfd
*abfd
, enum elf_ppc_reloc_type r_type
)
3009 (*_bfd_error_handler
)
3010 (_("%B: relocation %s cannot be used when making a shared object"),
3012 ppc_elf_howto_table
[r_type
]->name
);
3013 bfd_set_error (bfd_error_bad_value
);
3016 /* Look through the relocs for a section during the first phase, and
3017 allocate space in the global offset table or procedure linkage
3021 ppc_elf_check_relocs (bfd
*abfd
,
3022 struct bfd_link_info
*info
,
3024 const Elf_Internal_Rela
*relocs
)
3026 struct ppc_elf_link_hash_table
*htab
;
3027 Elf_Internal_Shdr
*symtab_hdr
;
3028 struct elf_link_hash_entry
**sym_hashes
;
3029 const Elf_Internal_Rela
*rel
;
3030 const Elf_Internal_Rela
*rel_end
;
3031 asection
*got2
, *sreloc
;
3033 if (info
->relocatable
)
3036 /* Don't do anything special with non-loaded, non-alloced sections.
3037 In particular, any relocs in such sections should not affect GOT
3038 and PLT reference counting (ie. we don't allow them to create GOT
3039 or PLT entries), there's no possibility or desire to optimize TLS
3040 relocs, and there's not much point in propagating relocs to shared
3041 libs that the dynamic linker won't relocate. */
3042 if ((sec
->flags
& SEC_ALLOC
) == 0)
3046 _bfd_error_handler ("ppc_elf_check_relocs called for section %A in %B",
3050 /* Initialize howto table if not already done. */
3051 if (!ppc_elf_howto_table
[R_PPC_ADDR32
])
3052 ppc_elf_howto_init ();
3054 htab
= ppc_elf_hash_table (info
);
3055 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
3056 sym_hashes
= elf_sym_hashes (abfd
);
3057 got2
= bfd_get_section_by_name (abfd
, ".got2");
3060 rel_end
= relocs
+ sec
->reloc_count
;
3061 for (rel
= relocs
; rel
< rel_end
; rel
++)
3063 unsigned long r_symndx
;
3064 enum elf_ppc_reloc_type r_type
;
3065 struct elf_link_hash_entry
*h
;
3068 r_symndx
= ELF32_R_SYM (rel
->r_info
);
3069 if (r_symndx
< symtab_hdr
->sh_info
)
3073 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
3074 while (h
->root
.type
== bfd_link_hash_indirect
3075 || h
->root
.type
== bfd_link_hash_warning
)
3076 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
3079 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
3080 This shows up in particular in an R_PPC_ADDR32 in the eabi
3083 && htab
->got
== NULL
3084 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
3086 if (htab
->elf
.dynobj
== NULL
)
3087 htab
->elf
.dynobj
= abfd
;
3088 if (!ppc_elf_create_got (htab
->elf
.dynobj
, info
))
3090 BFD_ASSERT (h
== htab
->elf
.hgot
);
3093 r_type
= ELF32_R_TYPE (rel
->r_info
);
3096 case R_PPC_GOT_TLSLD16
:
3097 case R_PPC_GOT_TLSLD16_LO
:
3098 case R_PPC_GOT_TLSLD16_HI
:
3099 case R_PPC_GOT_TLSLD16_HA
:
3100 htab
->tlsld_got
.refcount
+= 1;
3101 tls_type
= TLS_TLS
| TLS_LD
;
3104 case R_PPC_GOT_TLSGD16
:
3105 case R_PPC_GOT_TLSGD16_LO
:
3106 case R_PPC_GOT_TLSGD16_HI
:
3107 case R_PPC_GOT_TLSGD16_HA
:
3108 tls_type
= TLS_TLS
| TLS_GD
;
3111 case R_PPC_GOT_TPREL16
:
3112 case R_PPC_GOT_TPREL16_LO
:
3113 case R_PPC_GOT_TPREL16_HI
:
3114 case R_PPC_GOT_TPREL16_HA
:
3116 info
->flags
|= DF_STATIC_TLS
;
3117 tls_type
= TLS_TLS
| TLS_TPREL
;
3120 case R_PPC_GOT_DTPREL16
:
3121 case R_PPC_GOT_DTPREL16_LO
:
3122 case R_PPC_GOT_DTPREL16_HI
:
3123 case R_PPC_GOT_DTPREL16_HA
:
3124 tls_type
= TLS_TLS
| TLS_DTPREL
;
3126 sec
->has_tls_reloc
= 1;
3129 /* GOT16 relocations */
3131 case R_PPC_GOT16_LO
:
3132 case R_PPC_GOT16_HI
:
3133 case R_PPC_GOT16_HA
:
3134 /* This symbol requires a global offset table entry. */
3135 if (htab
->got
== NULL
)
3137 if (htab
->elf
.dynobj
== NULL
)
3138 htab
->elf
.dynobj
= abfd
;
3139 if (!ppc_elf_create_got (htab
->elf
.dynobj
, info
))
3144 h
->got
.refcount
+= 1;
3145 ppc_elf_hash_entry (h
)->tls_mask
|= tls_type
;
3148 /* This is a global offset table entry for a local symbol. */
3149 if (!update_local_sym_info (abfd
, symtab_hdr
, r_symndx
, tls_type
))
3153 /* Indirect .sdata relocation. */
3154 case R_PPC_EMB_SDAI16
:
3157 bad_shared_reloc (abfd
, r_type
);
3160 if (htab
->sdata
[0].section
== NULL
3161 && !ppc_elf_create_linker_section (abfd
, info
, 0,
3164 if (!elf_create_pointer_linker_section (abfd
, &htab
->sdata
[0],
3169 ppc_elf_hash_entry (h
)->has_sda_refs
= TRUE
;
3170 h
->non_got_ref
= TRUE
;
3174 /* Indirect .sdata2 relocation. */
3175 case R_PPC_EMB_SDA2I16
:
3178 bad_shared_reloc (abfd
, r_type
);
3181 if (htab
->sdata
[1].section
== NULL
3182 && !ppc_elf_create_linker_section (abfd
, info
, SEC_READONLY
,
3185 if (!elf_create_pointer_linker_section (abfd
, &htab
->sdata
[1],
3190 ppc_elf_hash_entry (h
)->has_sda_refs
= TRUE
;
3191 h
->non_got_ref
= TRUE
;
3195 case R_PPC_SDAREL16
:
3198 bad_shared_reloc (abfd
, r_type
);
3201 if (htab
->sdata
[0].sym
== NULL
3202 && !create_sdata_sym (htab
, &htab
->sdata
[0]))
3206 ppc_elf_hash_entry (h
)->has_sda_refs
= TRUE
;
3207 h
->non_got_ref
= TRUE
;
3211 case R_PPC_EMB_SDA2REL
:
3214 bad_shared_reloc (abfd
, r_type
);
3217 if (htab
->sdata
[1].sym
== NULL
3218 && !create_sdata_sym (htab
, &htab
->sdata
[1]))
3222 ppc_elf_hash_entry (h
)->has_sda_refs
= TRUE
;
3223 h
->non_got_ref
= TRUE
;
3227 case R_PPC_EMB_SDA21
:
3228 case R_PPC_EMB_RELSDA
:
3231 bad_shared_reloc (abfd
, r_type
);
3234 if (htab
->sdata
[0].sym
== NULL
3235 && !create_sdata_sym (htab
, &htab
->sdata
[0]))
3237 if (htab
->sdata
[1].sym
== NULL
3238 && !create_sdata_sym (htab
, &htab
->sdata
[1]))
3242 ppc_elf_hash_entry (h
)->has_sda_refs
= TRUE
;
3243 h
->non_got_ref
= TRUE
;
3247 case R_PPC_EMB_NADDR32
:
3248 case R_PPC_EMB_NADDR16
:
3249 case R_PPC_EMB_NADDR16_LO
:
3250 case R_PPC_EMB_NADDR16_HI
:
3251 case R_PPC_EMB_NADDR16_HA
:
3254 bad_shared_reloc (abfd
, r_type
);
3258 h
->non_got_ref
= TRUE
;
3262 case R_PPC_PLTREL24
:
3263 case R_PPC_PLTREL32
:
3264 case R_PPC_PLT16_LO
:
3265 case R_PPC_PLT16_HI
:
3266 case R_PPC_PLT16_HA
:
3268 fprintf (stderr
, "Reloc requires a PLT entry\n");
3270 /* This symbol requires a procedure linkage table entry. We
3271 actually build the entry in finish_dynamic_symbol,
3272 because this might be a case of linking PIC code without
3273 linking in any dynamic objects, in which case we don't
3274 need to generate a procedure linkage table after all. */
3278 /* It does not make sense to have a procedure linkage
3279 table entry for a local symbol. */
3280 (*_bfd_error_handler
) (_("%B(%A+0x%lx): %s reloc against "
3284 (long) rel
->r_offset
,
3285 ppc_elf_howto_table
[r_type
]->name
);
3286 bfd_set_error (bfd_error_bad_value
);
3293 if (r_type
== R_PPC_PLTREL24
)
3295 ppc_elf_tdata (abfd
)->makes_plt_call
= 1;
3296 addend
= rel
->r_addend
;
3299 if (!update_plt_info (abfd
, h
, got2
, addend
))
3304 /* The following relocations don't need to propagate the
3305 relocation if linking a shared object since they are
3306 section relative. */
3308 case R_PPC_SECTOFF_LO
:
3309 case R_PPC_SECTOFF_HI
:
3310 case R_PPC_SECTOFF_HA
:
3311 case R_PPC_DTPREL16
:
3312 case R_PPC_DTPREL16_LO
:
3313 case R_PPC_DTPREL16_HI
:
3314 case R_PPC_DTPREL16_HA
:
3319 case R_PPC_REL16_LO
:
3320 case R_PPC_REL16_HI
:
3321 case R_PPC_REL16_HA
:
3322 ppc_elf_tdata (abfd
)->has_rel16
= 1;
3325 /* These are just markers. */
3327 case R_PPC_EMB_MRKREF
:
3332 /* These should only appear in dynamic objects. */
3334 case R_PPC_GLOB_DAT
:
3335 case R_PPC_JMP_SLOT
:
3336 case R_PPC_RELATIVE
:
3339 /* These aren't handled yet. We'll report an error later. */
3341 case R_PPC_EMB_RELSEC16
:
3342 case R_PPC_EMB_RELST_LO
:
3343 case R_PPC_EMB_RELST_HI
:
3344 case R_PPC_EMB_RELST_HA
:
3345 case R_PPC_EMB_BIT_FLD
:
3348 /* This refers only to functions defined in the shared library. */
3349 case R_PPC_LOCAL24PC
:
3350 if (h
&& h
== htab
->elf
.hgot
&& htab
->plt_type
== PLT_UNSET
)
3352 htab
->plt_type
= PLT_OLD
;
3353 htab
->old_bfd
= abfd
;
3357 /* This relocation describes the C++ object vtable hierarchy.
3358 Reconstruct it for later use during GC. */
3359 case R_PPC_GNU_VTINHERIT
:
3360 if (!bfd_elf_gc_record_vtinherit (abfd
, sec
, h
, rel
->r_offset
))
3364 /* This relocation describes which C++ vtable entries are actually
3365 used. Record for later use during GC. */
3366 case R_PPC_GNU_VTENTRY
:
3367 if (!bfd_elf_gc_record_vtentry (abfd
, sec
, h
, rel
->r_addend
))
3371 /* We shouldn't really be seeing these. */
3374 info
->flags
|= DF_STATIC_TLS
;
3378 case R_PPC_DTPMOD32
:
3379 case R_PPC_DTPREL32
:
3383 case R_PPC_TPREL16_LO
:
3384 case R_PPC_TPREL16_HI
:
3385 case R_PPC_TPREL16_HA
:
3387 info
->flags
|= DF_STATIC_TLS
;
3393 && (sec
->flags
& SEC_CODE
) != 0
3394 && (info
->shared
|| info
->pie
)
3395 && htab
->plt_type
== PLT_UNSET
)
3397 /* Old -fPIC gcc code has .long LCTOC1-LCFx just before
3398 the start of a function, which assembles to a REL32
3399 reference to .got2. If we detect one of these, then
3400 force the old PLT layout because the linker cannot
3401 reliably deduce the GOT pointer value needed for
3405 s
= bfd_section_from_r_symndx (abfd
, &htab
->sym_sec
, sec
,
3409 htab
->plt_type
= PLT_OLD
;
3410 htab
->old_bfd
= abfd
;
3413 if (h
== NULL
|| h
== htab
->elf
.hgot
)
3419 case R_PPC_REL14_BRTAKEN
:
3420 case R_PPC_REL14_BRNTAKEN
:
3423 if (h
== htab
->elf
.hgot
)
3425 if (htab
->plt_type
== PLT_UNSET
)
3427 htab
->plt_type
= PLT_OLD
;
3428 htab
->old_bfd
= abfd
;
3437 case R_PPC_ADDR16_LO
:
3438 case R_PPC_ADDR16_HI
:
3439 case R_PPC_ADDR16_HA
:
3441 case R_PPC_ADDR14_BRTAKEN
:
3442 case R_PPC_ADDR14_BRNTAKEN
:
3446 if (h
!= NULL
&& !info
->shared
)
3448 /* We may need a plt entry if the symbol turns out to be
3449 a function defined in a dynamic object. */
3450 if (!update_plt_info (abfd
, h
, NULL
, 0))
3453 /* We may need a copy reloc too. */
3458 /* If we are creating a shared library, and this is a reloc
3459 against a global symbol, or a non PC relative reloc
3460 against a local symbol, then we need to copy the reloc
3461 into the shared library. However, if we are linking with
3462 -Bsymbolic, we do not need to copy a reloc against a
3463 global symbol which is defined in an object we are
3464 including in the link (i.e., DEF_REGULAR is set). At
3465 this point we have not seen all the input files, so it is
3466 possible that DEF_REGULAR is not set now but will be set
3467 later (it is never cleared). In case of a weak definition,
3468 DEF_REGULAR may be cleared later by a strong definition in
3469 a shared library. We account for that possibility below by
3470 storing information in the dyn_relocs field of the hash
3471 table entry. A similar situation occurs when creating
3472 shared libraries and symbol visibility changes render the
3475 If on the other hand, we are creating an executable, we
3476 may need to keep relocations for symbols satisfied by a
3477 dynamic library if we manage to avoid copy relocs for the
3480 && (MUST_BE_DYN_RELOC (r_type
)
3482 && (! info
->symbolic
3483 || h
->root
.type
== bfd_link_hash_defweak
3484 || !h
->def_regular
))))
3485 || (ELIMINATE_COPY_RELOCS
3488 && (h
->root
.type
== bfd_link_hash_defweak
3489 || !h
->def_regular
)))
3491 struct ppc_elf_dyn_relocs
*p
;
3492 struct ppc_elf_dyn_relocs
**head
;
3496 "ppc_elf_check_relocs needs to "
3497 "create relocation for %s\n",
3498 (h
&& h
->root
.root
.string
3499 ? h
->root
.root
.string
: "<unknown>"));
3505 name
= (bfd_elf_string_from_elf_section
3507 elf_elfheader (abfd
)->e_shstrndx
,
3508 elf_section_data (sec
)->rel_hdr
.sh_name
));
3512 BFD_ASSERT (CONST_STRNEQ (name
, ".rela")
3513 && strcmp (bfd_get_section_name (abfd
, sec
),
3516 if (htab
->elf
.dynobj
== NULL
)
3517 htab
->elf
.dynobj
= abfd
;
3518 sreloc
= bfd_get_section_by_name (htab
->elf
.dynobj
, name
);
3523 flags
= (SEC_HAS_CONTENTS
| SEC_READONLY
3524 | SEC_IN_MEMORY
| SEC_LINKER_CREATED
3525 | SEC_ALLOC
| SEC_LOAD
);
3526 sreloc
= bfd_make_section_with_flags (htab
->elf
.dynobj
,
3530 || ! bfd_set_section_alignment (htab
->elf
.dynobj
,
3534 elf_section_data (sec
)->sreloc
= sreloc
;
3537 /* If this is a global symbol, we count the number of
3538 relocations we need for this symbol. */
3541 head
= &ppc_elf_hash_entry (h
)->dyn_relocs
;
3545 /* Track dynamic relocs needed for local syms too.
3546 We really need local syms available to do this
3552 s
= bfd_section_from_r_symndx (abfd
, &htab
->sym_sec
,
3557 vpp
= &elf_section_data (s
)->local_dynrel
;
3558 head
= (struct ppc_elf_dyn_relocs
**) vpp
;
3562 if (p
== NULL
|| p
->sec
!= sec
)
3564 p
= bfd_alloc (htab
->elf
.dynobj
, sizeof *p
);
3575 if (!MUST_BE_DYN_RELOC (r_type
))
3586 /* Merge backend specific data from an object file to the output
3587 object file when linking. */
3590 ppc_elf_merge_private_bfd_data (bfd
*ibfd
, bfd
*obfd
)
3596 if (!is_ppc_elf_target (ibfd
->xvec
)
3597 || !is_ppc_elf_target (obfd
->xvec
))
3600 /* Check if we have the same endianess. */
3601 if (! _bfd_generic_verify_endian_match (ibfd
, obfd
))
3604 new_flags
= elf_elfheader (ibfd
)->e_flags
;
3605 old_flags
= elf_elfheader (obfd
)->e_flags
;
3606 if (!elf_flags_init (obfd
))
3608 /* First call, no flags set. */
3609 elf_flags_init (obfd
) = TRUE
;
3610 elf_elfheader (obfd
)->e_flags
= new_flags
;
3613 /* Compatible flags are ok. */
3614 else if (new_flags
== old_flags
)
3617 /* Incompatible flags. */
3620 /* Warn about -mrelocatable mismatch. Allow -mrelocatable-lib
3621 to be linked with either. */
3623 if ((new_flags
& EF_PPC_RELOCATABLE
) != 0
3624 && (old_flags
& (EF_PPC_RELOCATABLE
| EF_PPC_RELOCATABLE_LIB
)) == 0)
3627 (*_bfd_error_handler
)
3628 (_("%B: compiled with -mrelocatable and linked with "
3629 "modules compiled normally"), ibfd
);
3631 else if ((new_flags
& (EF_PPC_RELOCATABLE
| EF_PPC_RELOCATABLE_LIB
)) == 0
3632 && (old_flags
& EF_PPC_RELOCATABLE
) != 0)
3635 (*_bfd_error_handler
)
3636 (_("%B: compiled normally and linked with "
3637 "modules compiled with -mrelocatable"), ibfd
);
3640 /* The output is -mrelocatable-lib iff both the input files are. */
3641 if (! (new_flags
& EF_PPC_RELOCATABLE_LIB
))
3642 elf_elfheader (obfd
)->e_flags
&= ~EF_PPC_RELOCATABLE_LIB
;
3644 /* The output is -mrelocatable iff it can't be -mrelocatable-lib,
3645 but each input file is either -mrelocatable or -mrelocatable-lib. */
3646 if (! (elf_elfheader (obfd
)->e_flags
& EF_PPC_RELOCATABLE_LIB
)
3647 && (new_flags
& (EF_PPC_RELOCATABLE_LIB
| EF_PPC_RELOCATABLE
))
3648 && (old_flags
& (EF_PPC_RELOCATABLE_LIB
| EF_PPC_RELOCATABLE
)))
3649 elf_elfheader (obfd
)->e_flags
|= EF_PPC_RELOCATABLE
;
3651 /* Do not warn about eabi vs. V.4 mismatch, just or in the bit if
3652 any module uses it. */
3653 elf_elfheader (obfd
)->e_flags
|= (new_flags
& EF_PPC_EMB
);
3655 new_flags
&= ~(EF_PPC_RELOCATABLE
| EF_PPC_RELOCATABLE_LIB
| EF_PPC_EMB
);
3656 old_flags
&= ~(EF_PPC_RELOCATABLE
| EF_PPC_RELOCATABLE_LIB
| EF_PPC_EMB
);
3658 /* Warn about any other mismatches. */
3659 if (new_flags
!= old_flags
)
3662 (*_bfd_error_handler
)
3663 (_("%B: uses different e_flags (0x%lx) fields "
3664 "than previous modules (0x%lx)"),
3665 ibfd
, (long) new_flags
, (long) old_flags
);
3670 bfd_set_error (bfd_error_bad_value
);
3678 /* Choose which PLT scheme to use, and set .plt flags appropriately.
3679 Returns -1 on error, 0 for old PLT, 1 for new PLT. */
3681 ppc_elf_select_plt_layout (bfd
*output_bfd ATTRIBUTE_UNUSED
,
3682 struct bfd_link_info
*info
,
3683 enum ppc_elf_plt_type plt_style
,
3686 struct ppc_elf_link_hash_table
*htab
;
3689 htab
= ppc_elf_hash_table (info
);
3691 if (htab
->plt_type
== PLT_UNSET
)
3693 if (plt_style
== PLT_OLD
)
3694 htab
->plt_type
= PLT_OLD
;
3698 enum ppc_elf_plt_type plt_type
= plt_style
;
3700 /* Look through the reloc flags left by ppc_elf_check_relocs.
3701 Use the old style bss plt if a file makes plt calls
3702 without using the new relocs, and if ld isn't given
3703 --secure-plt and we never see REL16 relocs. */
3704 if (plt_type
== PLT_UNSET
)
3706 for (ibfd
= info
->input_bfds
; ibfd
; ibfd
= ibfd
->next
)
3707 if (is_ppc_elf_target (ibfd
->xvec
))
3709 if (ppc_elf_tdata (ibfd
)->has_rel16
)
3711 else if (ppc_elf_tdata (ibfd
)->makes_plt_call
)
3714 htab
->old_bfd
= ibfd
;
3718 htab
->plt_type
= plt_type
;
3721 if (htab
->plt_type
== PLT_OLD
&& plt_style
== PLT_NEW
)
3722 info
->callbacks
->info (_("Using bss-plt due to %B"), htab
->old_bfd
);
3724 htab
->emit_stub_syms
= emit_stub_syms
;
3726 BFD_ASSERT (htab
->plt_type
!= PLT_VXWORKS
);
3728 if (htab
->plt_type
== PLT_NEW
)
3730 flags
= (SEC_ALLOC
| SEC_LOAD
| SEC_HAS_CONTENTS
3731 | SEC_IN_MEMORY
| SEC_LINKER_CREATED
);
3733 /* The new PLT is a loaded section. */
3734 if (htab
->plt
!= NULL
3735 && !bfd_set_section_flags (htab
->elf
.dynobj
, htab
->plt
, flags
))
3738 /* The new GOT is not executable. */
3739 if (htab
->got
!= NULL
3740 && !bfd_set_section_flags (htab
->elf
.dynobj
, htab
->got
, flags
))
3745 /* Stop an unused .glink section from affecting .text alignment. */
3746 if (htab
->glink
!= NULL
3747 && !bfd_set_section_alignment (htab
->elf
.dynobj
, htab
->glink
, 0))
3750 return htab
->plt_type
== PLT_NEW
;
3753 /* Return the section that should be marked against GC for a given
3757 ppc_elf_gc_mark_hook (asection
*sec
,
3758 struct bfd_link_info
*info
,
3759 Elf_Internal_Rela
*rel
,
3760 struct elf_link_hash_entry
*h
,
3761 Elf_Internal_Sym
*sym
)
3764 switch (ELF32_R_TYPE (rel
->r_info
))
3766 case R_PPC_GNU_VTINHERIT
:
3767 case R_PPC_GNU_VTENTRY
:
3771 return _bfd_elf_gc_mark_hook (sec
, info
, rel
, h
, sym
);
3774 /* Update the got, plt and dynamic reloc reference counts for the
3775 section being removed. */
3778 ppc_elf_gc_sweep_hook (bfd
*abfd
,
3779 struct bfd_link_info
*info
,
3781 const Elf_Internal_Rela
*relocs
)
3783 struct ppc_elf_link_hash_table
*htab
;
3784 Elf_Internal_Shdr
*symtab_hdr
;
3785 struct elf_link_hash_entry
**sym_hashes
;
3786 bfd_signed_vma
*local_got_refcounts
;
3787 const Elf_Internal_Rela
*rel
, *relend
;
3790 if ((sec
->flags
& SEC_ALLOC
) == 0)
3793 elf_section_data (sec
)->local_dynrel
= NULL
;
3795 htab
= ppc_elf_hash_table (info
);
3796 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
3797 sym_hashes
= elf_sym_hashes (abfd
);
3798 local_got_refcounts
= elf_local_got_refcounts (abfd
);
3799 got2
= bfd_get_section_by_name (abfd
, ".got2");
3801 relend
= relocs
+ sec
->reloc_count
;
3802 for (rel
= relocs
; rel
< relend
; rel
++)
3804 unsigned long r_symndx
;
3805 enum elf_ppc_reloc_type r_type
;
3806 struct elf_link_hash_entry
*h
= NULL
;
3808 r_symndx
= ELF32_R_SYM (rel
->r_info
);
3809 if (r_symndx
>= symtab_hdr
->sh_info
)
3811 struct ppc_elf_dyn_relocs
**pp
, *p
;
3812 struct ppc_elf_link_hash_entry
*eh
;
3814 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
3815 while (h
->root
.type
== bfd_link_hash_indirect
3816 || h
->root
.type
== bfd_link_hash_warning
)
3817 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
3818 eh
= (struct ppc_elf_link_hash_entry
*) h
;
3820 for (pp
= &eh
->dyn_relocs
; (p
= *pp
) != NULL
; pp
= &p
->next
)
3823 /* Everything must go for SEC. */
3829 r_type
= ELF32_R_TYPE (rel
->r_info
);
3832 case R_PPC_GOT_TLSLD16
:
3833 case R_PPC_GOT_TLSLD16_LO
:
3834 case R_PPC_GOT_TLSLD16_HI
:
3835 case R_PPC_GOT_TLSLD16_HA
:
3836 htab
->tlsld_got
.refcount
-= 1;
3839 case R_PPC_GOT_TLSGD16
:
3840 case R_PPC_GOT_TLSGD16_LO
:
3841 case R_PPC_GOT_TLSGD16_HI
:
3842 case R_PPC_GOT_TLSGD16_HA
:
3843 case R_PPC_GOT_TPREL16
:
3844 case R_PPC_GOT_TPREL16_LO
:
3845 case R_PPC_GOT_TPREL16_HI
:
3846 case R_PPC_GOT_TPREL16_HA
:
3847 case R_PPC_GOT_DTPREL16
:
3848 case R_PPC_GOT_DTPREL16_LO
:
3849 case R_PPC_GOT_DTPREL16_HI
:
3850 case R_PPC_GOT_DTPREL16_HA
:
3852 case R_PPC_GOT16_LO
:
3853 case R_PPC_GOT16_HI
:
3854 case R_PPC_GOT16_HA
:
3857 if (h
->got
.refcount
> 0)
3860 else if (local_got_refcounts
!= NULL
)
3862 if (local_got_refcounts
[r_symndx
] > 0)
3863 local_got_refcounts
[r_symndx
]--;
3869 case R_PPC_REL14_BRTAKEN
:
3870 case R_PPC_REL14_BRNTAKEN
:
3872 if (h
== NULL
|| h
== htab
->elf
.hgot
)
3879 case R_PPC_ADDR16_LO
:
3880 case R_PPC_ADDR16_HI
:
3881 case R_PPC_ADDR16_HA
:
3883 case R_PPC_ADDR14_BRTAKEN
:
3884 case R_PPC_ADDR14_BRNTAKEN
:
3891 case R_PPC_PLTREL24
:
3892 case R_PPC_PLTREL32
:
3893 case R_PPC_PLT16_LO
:
3894 case R_PPC_PLT16_HI
:
3895 case R_PPC_PLT16_HA
:
3898 bfd_vma addend
= r_type
== R_PPC_PLTREL24
? rel
->r_addend
: 0;
3899 struct plt_entry
*ent
= find_plt_ent (h
, got2
, addend
);
3900 if (ent
->plt
.refcount
> 0)
3901 ent
->plt
.refcount
-= 1;
3912 /* Set htab->tls_get_addr and call the generic ELF tls_setup function. */
3915 ppc_elf_tls_setup (bfd
*obfd
, struct bfd_link_info
*info
)
3917 struct ppc_elf_link_hash_table
*htab
;
3919 htab
= ppc_elf_hash_table (info
);
3920 if (htab
->plt_type
== PLT_NEW
3921 && htab
->plt
!= NULL
3922 && htab
->plt
->output_section
!= NULL
)
3924 elf_section_type (htab
->plt
->output_section
) = SHT_PROGBITS
;
3925 elf_section_flags (htab
->plt
->output_section
) = SHF_ALLOC
+ SHF_WRITE
;
3928 htab
->tls_get_addr
= elf_link_hash_lookup (&htab
->elf
, "__tls_get_addr",
3929 FALSE
, FALSE
, TRUE
);
3930 return _bfd_elf_tls_setup (obfd
, info
);
3933 /* Run through all the TLS relocs looking for optimization
3937 ppc_elf_tls_optimize (bfd
*obfd ATTRIBUTE_UNUSED
,
3938 struct bfd_link_info
*info
)
3942 struct ppc_elf_link_hash_table
*htab
;
3944 if (info
->relocatable
|| info
->shared
)
3947 htab
= ppc_elf_hash_table (info
);
3948 for (ibfd
= info
->input_bfds
; ibfd
!= NULL
; ibfd
= ibfd
->link_next
)
3950 Elf_Internal_Sym
*locsyms
= NULL
;
3951 Elf_Internal_Shdr
*symtab_hdr
= &elf_tdata (ibfd
)->symtab_hdr
;
3953 for (sec
= ibfd
->sections
; sec
!= NULL
; sec
= sec
->next
)
3954 if (sec
->has_tls_reloc
&& !bfd_is_abs_section (sec
->output_section
))
3956 Elf_Internal_Rela
*relstart
, *rel
, *relend
;
3957 int expecting_tls_get_addr
;
3959 /* Read the relocations. */
3960 relstart
= _bfd_elf_link_read_relocs (ibfd
, sec
, NULL
, NULL
,
3962 if (relstart
== NULL
)
3965 expecting_tls_get_addr
= 0;
3966 relend
= relstart
+ sec
->reloc_count
;
3967 for (rel
= relstart
; rel
< relend
; rel
++)
3969 enum elf_ppc_reloc_type r_type
;
3970 unsigned long r_symndx
;
3971 struct elf_link_hash_entry
*h
= NULL
;
3973 char tls_set
, tls_clear
;
3974 bfd_boolean is_local
;
3976 r_symndx
= ELF32_R_SYM (rel
->r_info
);
3977 if (r_symndx
>= symtab_hdr
->sh_info
)
3979 struct elf_link_hash_entry
**sym_hashes
;
3981 sym_hashes
= elf_sym_hashes (ibfd
);
3982 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
3983 while (h
->root
.type
== bfd_link_hash_indirect
3984 || h
->root
.type
== bfd_link_hash_warning
)
3985 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
3993 r_type
= ELF32_R_TYPE (rel
->r_info
);
3996 case R_PPC_GOT_TLSLD16
:
3997 case R_PPC_GOT_TLSLD16_LO
:
3998 case R_PPC_GOT_TLSLD16_HI
:
3999 case R_PPC_GOT_TLSLD16_HA
:
4000 /* These relocs should never be against a symbol
4001 defined in a shared lib. Leave them alone if
4002 that turns out to be the case. */
4003 expecting_tls_get_addr
= 0;
4004 htab
->tlsld_got
.refcount
-= 1;
4011 expecting_tls_get_addr
= 1;
4014 case R_PPC_GOT_TLSGD16
:
4015 case R_PPC_GOT_TLSGD16_LO
:
4016 case R_PPC_GOT_TLSGD16_HI
:
4017 case R_PPC_GOT_TLSGD16_HA
:
4023 tls_set
= TLS_TLS
| TLS_TPRELGD
;
4025 expecting_tls_get_addr
= 1;
4028 case R_PPC_GOT_TPREL16
:
4029 case R_PPC_GOT_TPREL16_LO
:
4030 case R_PPC_GOT_TPREL16_HI
:
4031 case R_PPC_GOT_TPREL16_HA
:
4032 expecting_tls_get_addr
= 0;
4037 tls_clear
= TLS_TPREL
;
4044 case R_PPC_REL14_BRTAKEN
:
4045 case R_PPC_REL14_BRNTAKEN
:
4047 if (expecting_tls_get_addr
4049 && h
== htab
->tls_get_addr
)
4051 struct plt_entry
*ent
= find_plt_ent (h
, NULL
, 0);
4052 if (ent
!= NULL
&& ent
->plt
.refcount
> 0)
4053 ent
->plt
.refcount
-= 1;
4055 expecting_tls_get_addr
= 0;
4059 expecting_tls_get_addr
= 0;
4067 /* We managed to get rid of a got entry. */
4068 if (h
->got
.refcount
> 0)
4069 h
->got
.refcount
-= 1;
4071 tls_mask
= &ppc_elf_hash_entry (h
)->tls_mask
;
4075 Elf_Internal_Sym
*sym
;
4076 bfd_signed_vma
*lgot_refs
;
4079 if (locsyms
== NULL
)
4081 locsyms
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
4082 if (locsyms
== NULL
)
4083 locsyms
= bfd_elf_get_elf_syms (ibfd
, symtab_hdr
,
4084 symtab_hdr
->sh_info
,
4085 0, NULL
, NULL
, NULL
);
4086 if (locsyms
== NULL
)
4088 if (elf_section_data (sec
)->relocs
!= relstart
)
4093 sym
= locsyms
+ r_symndx
;
4094 lgot_refs
= elf_local_got_refcounts (ibfd
);
4095 if (lgot_refs
== NULL
)
4099 /* We managed to get rid of a got entry. */
4100 if (lgot_refs
[r_symndx
] > 0)
4101 lgot_refs
[r_symndx
] -= 1;
4103 lgot_masks
= (char *) (lgot_refs
+ symtab_hdr
->sh_info
);
4104 tls_mask
= &lgot_masks
[r_symndx
];
4107 *tls_mask
|= tls_set
;
4108 *tls_mask
&= ~tls_clear
;
4111 if (elf_section_data (sec
)->relocs
!= relstart
)
4116 && (symtab_hdr
->contents
!= (unsigned char *) locsyms
))
4118 if (!info
->keep_memory
)
4121 symtab_hdr
->contents
= (unsigned char *) locsyms
;
4127 /* Adjust a symbol defined by a dynamic object and referenced by a
4128 regular object. The current definition is in some section of the
4129 dynamic object, but we're not including those sections. We have to
4130 change the definition to something the rest of the link can
4134 ppc_elf_adjust_dynamic_symbol (struct bfd_link_info
*info
,
4135 struct elf_link_hash_entry
*h
)
4137 struct ppc_elf_link_hash_table
*htab
;
4141 fprintf (stderr
, "ppc_elf_adjust_dynamic_symbol called for %s\n",
4142 h
->root
.root
.string
);
4145 /* Make sure we know what is going on here. */
4146 htab
= ppc_elf_hash_table (info
);
4147 BFD_ASSERT (htab
->elf
.dynobj
!= NULL
4149 || h
->u
.weakdef
!= NULL
4152 && !h
->def_regular
)));
4154 /* Deal with function syms. */
4155 if (h
->type
== STT_FUNC
4158 /* Clear procedure linkage table information for any symbol that
4159 won't need a .plt entry. */
4160 struct plt_entry
*ent
;
4161 for (ent
= h
->plt
.plist
; ent
!= NULL
; ent
= ent
->next
)
4162 if (ent
->plt
.refcount
> 0)
4165 || SYMBOL_CALLS_LOCAL (info
, h
)
4166 || (ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
4167 && h
->root
.type
== bfd_link_hash_undefweak
))
4169 /* A PLT entry is not required/allowed when:
4171 1. We are not using ld.so; because then the PLT entry
4172 can't be set up, so we can't use one. In this case,
4173 ppc_elf_adjust_dynamic_symbol won't even be called.
4175 2. GC has rendered the entry unused.
4177 3. We know for certain that a call to this symbol
4178 will go to this object, or will remain undefined. */
4179 h
->plt
.plist
= NULL
;
4185 h
->plt
.plist
= NULL
;
4187 /* If this is a weak symbol, and there is a real definition, the
4188 processor independent code will have arranged for us to see the
4189 real definition first, and we can just use the same value. */
4190 if (h
->u
.weakdef
!= NULL
)
4192 BFD_ASSERT (h
->u
.weakdef
->root
.type
== bfd_link_hash_defined
4193 || h
->u
.weakdef
->root
.type
== bfd_link_hash_defweak
);
4194 h
->root
.u
.def
.section
= h
->u
.weakdef
->root
.u
.def
.section
;
4195 h
->root
.u
.def
.value
= h
->u
.weakdef
->root
.u
.def
.value
;
4196 if (ELIMINATE_COPY_RELOCS
)
4197 h
->non_got_ref
= h
->u
.weakdef
->non_got_ref
;
4201 /* This is a reference to a symbol defined by a dynamic object which
4202 is not a function. */
4204 /* If we are creating a shared library, we must presume that the
4205 only references to the symbol are via the global offset table.
4206 For such cases we need not do anything here; the relocations will
4207 be handled correctly by relocate_section. */
4211 /* If there are no references to this symbol that do not use the
4212 GOT, we don't need to generate a copy reloc. */
4213 if (!h
->non_got_ref
)
4216 /* If we didn't find any dynamic relocs in read-only sections, then we'll
4217 be keeping the dynamic relocs and avoiding the copy reloc. We can't
4218 do this if there are any small data relocations. */
4219 if (ELIMINATE_COPY_RELOCS
4220 && !ppc_elf_hash_entry (h
)->has_sda_refs
)
4222 struct ppc_elf_dyn_relocs
*p
;
4223 for (p
= ppc_elf_hash_entry (h
)->dyn_relocs
; p
!= NULL
; p
= p
->next
)
4225 s
= p
->sec
->output_section
;
4226 if (s
!= NULL
&& (s
->flags
& SEC_READONLY
) != 0)
4239 (*_bfd_error_handler
) (_("dynamic variable `%s' is zero size"),
4240 h
->root
.root
.string
);
4244 /* We must allocate the symbol in our .dynbss section, which will
4245 become part of the .bss section of the executable. There will be
4246 an entry for this symbol in the .dynsym section. The dynamic
4247 object will contain position independent code, so all references
4248 from the dynamic object to this symbol will go through the global
4249 offset table. The dynamic linker will use the .dynsym entry to
4250 determine the address it must put in the global offset table, so
4251 both the dynamic object and the regular object will refer to the
4252 same memory location for the variable.
4254 Of course, if the symbol is referenced using SDAREL relocs, we
4255 must instead allocate it in .sbss. */
4257 if (ppc_elf_hash_entry (h
)->has_sda_refs
)
4261 BFD_ASSERT (s
!= NULL
);
4263 /* We must generate a R_PPC_COPY reloc to tell the dynamic linker to
4264 copy the initial value out of the dynamic object and into the
4265 runtime process image. We need to remember the offset into the
4266 .rela.bss section we are going to use. */
4267 if ((h
->root
.u
.def
.section
->flags
& SEC_ALLOC
) != 0)
4271 if (ppc_elf_hash_entry (h
)->has_sda_refs
)
4272 srel
= htab
->relsbss
;
4274 srel
= htab
->relbss
;
4275 BFD_ASSERT (srel
!= NULL
);
4276 srel
->size
+= sizeof (Elf32_External_Rela
);
4280 return _bfd_elf_adjust_dynamic_copy (h
, s
);
4283 /* Generate a symbol to mark plt call stubs. For non-PIC code the sym is
4284 xxxxxxxx.plt_call32.<callee> where xxxxxxxx is a hex number, usually 0,
4285 specifying the addend on the plt relocation. For -fpic code, the sym
4286 is xxxxxxxx.plt_pic32.<callee>, and for -fPIC
4287 xxxxxxxx.got2.plt_pic32.<callee>. */
4290 add_stub_sym (struct plt_entry
*ent
,
4291 struct elf_link_hash_entry
*h
,
4292 struct bfd_link_info
*info
)
4294 struct elf_link_hash_entry
*sh
;
4295 size_t len1
, len2
, len3
;
4298 struct ppc_elf_link_hash_table
*htab
= ppc_elf_hash_table (info
);
4300 if (info
->shared
|| info
->pie
)
4301 stub
= ".plt_pic32.";
4303 stub
= ".plt_call32.";
4305 len1
= strlen (h
->root
.root
.string
);
4306 len2
= strlen (stub
);
4309 len3
= strlen (ent
->sec
->name
);
4310 name
= bfd_malloc (len1
+ len2
+ len3
+ 9);
4313 sprintf (name
, "%08x", (unsigned) ent
->addend
& 0xffffffff);
4315 memcpy (name
+ 8, ent
->sec
->name
, len3
);
4316 memcpy (name
+ 8 + len3
, stub
, len2
);
4317 memcpy (name
+ 8 + len3
+ len2
, h
->root
.root
.string
, len1
+ 1);
4318 sh
= elf_link_hash_lookup (&htab
->elf
, name
, TRUE
, FALSE
, FALSE
);
4321 if (sh
->root
.type
== bfd_link_hash_new
)
4323 sh
->root
.type
= bfd_link_hash_defined
;
4324 sh
->root
.u
.def
.section
= htab
->glink
;
4325 sh
->root
.u
.def
.value
= ent
->glink_offset
;
4326 sh
->ref_regular
= 1;
4327 sh
->def_regular
= 1;
4328 sh
->ref_regular_nonweak
= 1;
4329 sh
->forced_local
= 1;
4335 /* Allocate NEED contiguous space in .got, and return the offset.
4336 Handles allocation of the got header when crossing 32k. */
4339 allocate_got (struct ppc_elf_link_hash_table
*htab
, unsigned int need
)
4342 unsigned int max_before_header
;
4344 if (htab
->plt_type
== PLT_VXWORKS
)
4346 where
= htab
->got
->size
;
4347 htab
->got
->size
+= need
;
4351 max_before_header
= htab
->plt_type
== PLT_NEW
? 32768 : 32764;
4352 if (need
<= htab
->got_gap
)
4354 where
= max_before_header
- htab
->got_gap
;
4355 htab
->got_gap
-= need
;
4359 if (htab
->got
->size
+ need
> max_before_header
4360 && htab
->got
->size
<= max_before_header
)
4362 htab
->got_gap
= max_before_header
- htab
->got
->size
;
4363 htab
->got
->size
= max_before_header
+ htab
->got_header_size
;
4365 where
= htab
->got
->size
;
4366 htab
->got
->size
+= need
;
4372 /* Allocate space in associated reloc sections for dynamic relocs. */
4375 allocate_dynrelocs (struct elf_link_hash_entry
*h
, void *inf
)
4377 struct bfd_link_info
*info
= inf
;
4378 struct ppc_elf_link_hash_entry
*eh
;
4379 struct ppc_elf_link_hash_table
*htab
;
4380 struct ppc_elf_dyn_relocs
*p
;
4382 if (h
->root
.type
== bfd_link_hash_indirect
)
4385 if (h
->root
.type
== bfd_link_hash_warning
)
4386 /* When warning symbols are created, they **replace** the "real"
4387 entry in the hash table, thus we never get to see the real
4388 symbol in a hash traversal. So look at it now. */
4389 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
4391 htab
= ppc_elf_hash_table (info
);
4392 if (htab
->elf
.dynamic_sections_created
)
4394 struct plt_entry
*ent
;
4395 bfd_boolean doneone
= FALSE
;
4396 bfd_vma plt_offset
= 0, glink_offset
= 0;
4398 for (ent
= h
->plt
.plist
; ent
!= NULL
; ent
= ent
->next
)
4399 if (ent
->plt
.refcount
> 0)
4401 /* Make sure this symbol is output as a dynamic symbol. */
4402 if (h
->dynindx
== -1
4403 && !h
->forced_local
)
4405 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
4410 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h
))
4412 asection
*s
= htab
->plt
;
4414 if (htab
->plt_type
== PLT_NEW
)
4418 plt_offset
= s
->size
;
4421 ent
->plt
.offset
= plt_offset
;
4424 if (!doneone
|| info
->shared
|| info
->pie
)
4426 glink_offset
= s
->size
;
4427 s
->size
+= GLINK_ENTRY_SIZE
;
4433 h
->root
.u
.def
.section
= s
;
4434 h
->root
.u
.def
.value
= glink_offset
;
4436 ent
->glink_offset
= glink_offset
;
4438 if (htab
->emit_stub_syms
4439 && !add_stub_sym (ent
, h
, info
))
4446 /* If this is the first .plt entry, make room
4447 for the special first entry. */
4449 s
->size
+= htab
->plt_initial_entry_size
;
4451 /* The PowerPC PLT is actually composed of two
4452 parts, the first part is 2 words (for a load
4453 and a jump), and then there is a remaining
4454 word available at the end. */
4455 plt_offset
= (htab
->plt_initial_entry_size
4456 + (htab
->plt_slot_size
4458 - htab
->plt_initial_entry_size
)
4459 / htab
->plt_entry_size
)));
4461 /* If this symbol is not defined in a regular
4462 file, and we are not generating a shared
4463 library, then set the symbol to this location
4464 in the .plt. This is required to make
4465 function pointers compare as equal between
4466 the normal executable and the shared library. */
4470 h
->root
.u
.def
.section
= s
;
4471 h
->root
.u
.def
.value
= plt_offset
;
4474 /* Make room for this entry. */
4475 s
->size
+= htab
->plt_entry_size
;
4476 /* After the 8192nd entry, room for two entries
4478 if (htab
->plt_type
== PLT_OLD
4479 && (s
->size
- htab
->plt_initial_entry_size
)
4480 / htab
->plt_entry_size
4481 > PLT_NUM_SINGLE_ENTRIES
)
4482 s
->size
+= htab
->plt_entry_size
;
4484 ent
->plt
.offset
= plt_offset
;
4487 /* We also need to make an entry in the .rela.plt section. */
4490 htab
->relplt
->size
+= sizeof (Elf32_External_Rela
);
4492 if (htab
->plt_type
== PLT_VXWORKS
)
4494 /* Allocate space for the unloaded relocations. */
4498 == (bfd_vma
) htab
->plt_initial_entry_size
)
4500 htab
->srelplt2
->size
4501 += sizeof (Elf32_External_Rela
)
4502 * VXWORKS_PLTRESOLVE_RELOCS
;
4505 htab
->srelplt2
->size
4506 += sizeof (Elf32_External_Rela
)
4507 * VXWORKS_PLT_NON_JMP_SLOT_RELOCS
;
4510 /* Every PLT entry has an associated GOT entry in
4512 htab
->sgotplt
->size
+= 4;
4518 ent
->plt
.offset
= (bfd_vma
) -1;
4521 ent
->plt
.offset
= (bfd_vma
) -1;
4525 h
->plt
.plist
= NULL
;
4531 h
->plt
.plist
= NULL
;
4535 eh
= (struct ppc_elf_link_hash_entry
*) h
;
4536 if (eh
->elf
.got
.refcount
> 0)
4538 /* Make sure this symbol is output as a dynamic symbol. */
4539 if (eh
->elf
.dynindx
== -1
4540 && !eh
->elf
.forced_local
)
4542 if (!bfd_elf_link_record_dynamic_symbol (info
, &eh
->elf
))
4546 if (eh
->tls_mask
== (TLS_TLS
| TLS_LD
)
4547 && !eh
->elf
.def_dynamic
)
4548 /* If just an LD reloc, we'll just use htab->tlsld_got.offset. */
4549 eh
->elf
.got
.offset
= (bfd_vma
) -1;
4553 unsigned int need
= 0;
4554 if ((eh
->tls_mask
& TLS_TLS
) != 0)
4556 if ((eh
->tls_mask
& TLS_LD
) != 0)
4558 if ((eh
->tls_mask
& TLS_GD
) != 0)
4560 if ((eh
->tls_mask
& (TLS_TPREL
| TLS_TPRELGD
)) != 0)
4562 if ((eh
->tls_mask
& TLS_DTPREL
) != 0)
4567 eh
->elf
.got
.offset
= allocate_got (htab
, need
);
4568 dyn
= htab
->elf
.dynamic_sections_created
;
4570 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn
, 0, &eh
->elf
))
4571 && (ELF_ST_VISIBILITY (eh
->elf
.other
) == STV_DEFAULT
4572 || eh
->elf
.root
.type
!= bfd_link_hash_undefweak
))
4574 /* All the entries we allocated need relocs.
4575 Except LD only needs one. */
4576 if ((eh
->tls_mask
& TLS_LD
) != 0)
4578 htab
->relgot
->size
+= need
* (sizeof (Elf32_External_Rela
) / 4);
4583 eh
->elf
.got
.offset
= (bfd_vma
) -1;
4585 if (eh
->dyn_relocs
== NULL
)
4588 /* In the shared -Bsymbolic case, discard space allocated for
4589 dynamic pc-relative relocs against symbols which turn out to be
4590 defined in regular objects. For the normal shared case, discard
4591 space for relocs that have become local due to symbol visibility
4596 /* Relocs that use pc_count are those that appear on a call insn,
4597 or certain REL relocs (see MUST_BE_DYN_RELOC) that can be
4598 generated via assembly. We want calls to protected symbols to
4599 resolve directly to the function rather than going via the plt.
4600 If people want function pointer comparisons to work as expected
4601 then they should avoid writing weird assembly. */
4602 if (SYMBOL_CALLS_LOCAL (info
, h
))
4604 struct ppc_elf_dyn_relocs
**pp
;
4606 for (pp
= &eh
->dyn_relocs
; (p
= *pp
) != NULL
; )
4608 p
->count
-= p
->pc_count
;
4617 /* Also discard relocs on undefined weak syms with non-default
4619 if (eh
->dyn_relocs
!= NULL
4620 && h
->root
.type
== bfd_link_hash_undefweak
)
4622 if (ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
)
4623 eh
->dyn_relocs
= NULL
;
4625 /* Make sure undefined weak symbols are output as a dynamic
4627 else if (h
->dynindx
== -1
4628 && !h
->forced_local
)
4630 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
4635 else if (ELIMINATE_COPY_RELOCS
)
4637 /* For the non-shared case, discard space for relocs against
4638 symbols which turn out to need copy relocs or are not
4645 /* Make sure this symbol is output as a dynamic symbol.
4646 Undefined weak syms won't yet be marked as dynamic. */
4647 if (h
->dynindx
== -1
4648 && !h
->forced_local
)
4650 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
4654 /* If that succeeded, we know we'll be keeping all the
4656 if (h
->dynindx
!= -1)
4660 eh
->dyn_relocs
= NULL
;
4665 /* Finally, allocate space. */
4666 for (p
= eh
->dyn_relocs
; p
!= NULL
; p
= p
->next
)
4668 asection
*sreloc
= elf_section_data (p
->sec
)->sreloc
;
4669 sreloc
->size
+= p
->count
* sizeof (Elf32_External_Rela
);
4675 /* Find any dynamic relocs that apply to read-only sections. */
4678 readonly_dynrelocs (struct elf_link_hash_entry
*h
, void *info
)
4680 struct ppc_elf_dyn_relocs
*p
;
4682 if (h
->root
.type
== bfd_link_hash_indirect
)
4685 if (h
->root
.type
== bfd_link_hash_warning
)
4686 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
4688 for (p
= ppc_elf_hash_entry (h
)->dyn_relocs
; p
!= NULL
; p
= p
->next
)
4690 asection
*s
= p
->sec
->output_section
;
4693 && ((s
->flags
& (SEC_READONLY
| SEC_ALLOC
))
4694 == (SEC_READONLY
| SEC_ALLOC
)))
4696 ((struct bfd_link_info
*) info
)->flags
|= DF_TEXTREL
;
4698 /* Not an error, just cut short the traversal. */
4705 /* Set the sizes of the dynamic sections. */
4708 ppc_elf_size_dynamic_sections (bfd
*output_bfd ATTRIBUTE_UNUSED
,
4709 struct bfd_link_info
*info
)
4711 struct ppc_elf_link_hash_table
*htab
;
4717 fprintf (stderr
, "ppc_elf_size_dynamic_sections called\n");
4720 htab
= ppc_elf_hash_table (info
);
4721 BFD_ASSERT (htab
->elf
.dynobj
!= NULL
);
4723 if (elf_hash_table (info
)->dynamic_sections_created
)
4725 /* Set the contents of the .interp section to the interpreter. */
4726 if (info
->executable
)
4728 s
= bfd_get_section_by_name (htab
->elf
.dynobj
, ".interp");
4729 BFD_ASSERT (s
!= NULL
);
4730 s
->size
= sizeof ELF_DYNAMIC_INTERPRETER
;
4731 s
->contents
= (unsigned char *) ELF_DYNAMIC_INTERPRETER
;
4735 if (htab
->plt_type
== PLT_OLD
)
4736 htab
->got_header_size
= 16;
4737 else if (htab
->plt_type
== PLT_NEW
)
4738 htab
->got_header_size
= 12;
4740 /* Set up .got offsets for local syms, and space for local dynamic
4742 for (ibfd
= info
->input_bfds
; ibfd
!= NULL
; ibfd
= ibfd
->link_next
)
4744 bfd_signed_vma
*local_got
;
4745 bfd_signed_vma
*end_local_got
;
4747 bfd_size_type locsymcount
;
4748 Elf_Internal_Shdr
*symtab_hdr
;
4750 if (!is_ppc_elf_target (ibfd
->xvec
))
4753 for (s
= ibfd
->sections
; s
!= NULL
; s
= s
->next
)
4755 struct ppc_elf_dyn_relocs
*p
;
4757 for (p
= ((struct ppc_elf_dyn_relocs
*)
4758 elf_section_data (s
)->local_dynrel
);
4762 if (!bfd_is_abs_section (p
->sec
)
4763 && bfd_is_abs_section (p
->sec
->output_section
))
4765 /* Input section has been discarded, either because
4766 it is a copy of a linkonce section or due to
4767 linker script /DISCARD/, so we'll be discarding
4770 else if (p
->count
!= 0)
4772 elf_section_data (p
->sec
)->sreloc
->size
4773 += p
->count
* sizeof (Elf32_External_Rela
);
4774 if ((p
->sec
->output_section
->flags
4775 & (SEC_READONLY
| SEC_ALLOC
))
4776 == (SEC_READONLY
| SEC_ALLOC
))
4777 info
->flags
|= DF_TEXTREL
;
4782 local_got
= elf_local_got_refcounts (ibfd
);
4786 symtab_hdr
= &elf_tdata (ibfd
)->symtab_hdr
;
4787 locsymcount
= symtab_hdr
->sh_info
;
4788 end_local_got
= local_got
+ locsymcount
;
4789 lgot_masks
= (char *) end_local_got
;
4790 for (; local_got
< end_local_got
; ++local_got
, ++lgot_masks
)
4793 if (*lgot_masks
== (TLS_TLS
| TLS_LD
))
4795 /* If just an LD reloc, we'll just use
4796 htab->tlsld_got.offset. */
4797 htab
->tlsld_got
.refcount
+= 1;
4798 *local_got
= (bfd_vma
) -1;
4802 unsigned int need
= 0;
4803 if ((*lgot_masks
& TLS_TLS
) != 0)
4805 if ((*lgot_masks
& TLS_GD
) != 0)
4807 if ((*lgot_masks
& (TLS_TPREL
| TLS_TPRELGD
)) != 0)
4809 if ((*lgot_masks
& TLS_DTPREL
) != 0)
4814 *local_got
= allocate_got (htab
, need
);
4816 htab
->relgot
->size
+= (need
4817 * (sizeof (Elf32_External_Rela
) / 4));
4821 *local_got
= (bfd_vma
) -1;
4824 if (htab
->tlsld_got
.refcount
> 0)
4826 htab
->tlsld_got
.offset
= allocate_got (htab
, 8);
4828 htab
->relgot
->size
+= sizeof (Elf32_External_Rela
);
4831 htab
->tlsld_got
.offset
= (bfd_vma
) -1;
4833 /* Allocate space for global sym dynamic relocs. */
4834 elf_link_hash_traverse (elf_hash_table (info
), allocate_dynrelocs
, info
);
4836 if (htab
->got
!= NULL
&& htab
->plt_type
!= PLT_VXWORKS
)
4838 unsigned int g_o_t
= 32768;
4840 /* If we haven't allocated the header, do so now. When we get here,
4841 for old plt/got the got size will be 0 to 32764 (not allocated),
4842 or 32780 to 65536 (header allocated). For new plt/got, the
4843 corresponding ranges are 0 to 32768 and 32780 to 65536. */
4844 if (htab
->got
->size
<= 32768)
4846 g_o_t
= htab
->got
->size
;
4847 if (htab
->plt_type
== PLT_OLD
)
4849 htab
->got
->size
+= htab
->got_header_size
;
4852 htab
->elf
.hgot
->root
.u
.def
.value
= g_o_t
;
4855 if (htab
->glink
!= NULL
&& htab
->glink
->size
!= 0)
4857 htab
->glink_pltresolve
= htab
->glink
->size
;
4858 /* Space for the branch table. */
4859 htab
->glink
->size
+= htab
->glink
->size
/ (GLINK_ENTRY_SIZE
/ 4) - 4;
4860 /* Pad out to align the start of PLTresolve. */
4861 htab
->glink
->size
+= -htab
->glink
->size
& 15;
4862 htab
->glink
->size
+= GLINK_PLTRESOLVE
;
4864 if (htab
->emit_stub_syms
)
4866 struct elf_link_hash_entry
*sh
;
4867 sh
= elf_link_hash_lookup (&htab
->elf
, "__glink",
4868 TRUE
, FALSE
, FALSE
);
4871 if (sh
->root
.type
== bfd_link_hash_new
)
4873 sh
->root
.type
= bfd_link_hash_defined
;
4874 sh
->root
.u
.def
.section
= htab
->glink
;
4875 sh
->root
.u
.def
.value
= htab
->glink_pltresolve
;
4876 sh
->ref_regular
= 1;
4877 sh
->def_regular
= 1;
4878 sh
->ref_regular_nonweak
= 1;
4879 sh
->forced_local
= 1;
4882 sh
= elf_link_hash_lookup (&htab
->elf
, "__glink_PLTresolve",
4883 TRUE
, FALSE
, FALSE
);
4886 if (sh
->root
.type
== bfd_link_hash_new
)
4888 sh
->root
.type
= bfd_link_hash_defined
;
4889 sh
->root
.u
.def
.section
= htab
->glink
;
4890 sh
->root
.u
.def
.value
= htab
->glink
->size
- GLINK_PLTRESOLVE
;
4891 sh
->ref_regular
= 1;
4892 sh
->def_regular
= 1;
4893 sh
->ref_regular_nonweak
= 1;
4894 sh
->forced_local
= 1;
4900 /* We've now determined the sizes of the various dynamic sections.
4901 Allocate memory for them. */
4903 for (s
= htab
->elf
.dynobj
->sections
; s
!= NULL
; s
= s
->next
)
4905 bfd_boolean strip_section
= TRUE
;
4907 if ((s
->flags
& SEC_LINKER_CREATED
) == 0)
4913 || s
== htab
->sgotplt
4915 || s
== htab
->dynbss
4916 || s
== htab
->dynsbss
)
4918 /* We'd like to strip these sections if they aren't needed, but if
4919 we've exported dynamic symbols from them we must leave them.
4920 It's too late to tell BFD to get rid of the symbols. */
4921 if ((s
== htab
->plt
|| s
== htab
->got
) && htab
->elf
.hplt
!= NULL
)
4922 strip_section
= FALSE
;
4923 /* Strip this section if we don't need it; see the
4926 else if (s
== htab
->sdata
[0].section
4927 || s
== htab
->sdata
[1].section
)
4929 /* Strip these too. */
4931 else if (CONST_STRNEQ (bfd_get_section_name (dynobj
, s
), ".rela"))
4935 /* Remember whether there are any relocation sections. */
4938 /* We use the reloc_count field as a counter if we need
4939 to copy relocs into the output file. */
4945 /* It's not one of our sections, so don't allocate space. */
4949 if (s
->size
== 0 && strip_section
)
4951 /* If we don't need this section, strip it from the
4952 output file. This is mostly to handle .rela.bss and
4953 .rela.plt. We must create both sections in
4954 create_dynamic_sections, because they must be created
4955 before the linker maps input sections to output
4956 sections. The linker does that before
4957 adjust_dynamic_symbol is called, and it is that
4958 function which decides whether anything needs to go
4959 into these sections. */
4960 s
->flags
|= SEC_EXCLUDE
;
4964 if ((s
->flags
& SEC_HAS_CONTENTS
) == 0)
4967 /* Allocate memory for the section contents. */
4968 s
->contents
= bfd_zalloc (htab
->elf
.dynobj
, s
->size
);
4969 if (s
->contents
== NULL
)
4973 if (htab
->elf
.dynamic_sections_created
)
4975 /* Add some entries to the .dynamic section. We fill in the
4976 values later, in ppc_elf_finish_dynamic_sections, but we
4977 must add the entries now so that we get the correct size for
4978 the .dynamic section. The DT_DEBUG entry is filled in by the
4979 dynamic linker and used by the debugger. */
4980 #define add_dynamic_entry(TAG, VAL) \
4981 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
4983 if (info
->executable
)
4985 if (!add_dynamic_entry (DT_DEBUG
, 0))
4989 if (htab
->plt
!= NULL
&& htab
->plt
->size
!= 0)
4991 if (!add_dynamic_entry (DT_PLTGOT
, 0)
4992 || !add_dynamic_entry (DT_PLTRELSZ
, 0)
4993 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
4994 || !add_dynamic_entry (DT_JMPREL
, 0))
4998 if (htab
->glink
!= NULL
&& htab
->glink
->size
!= 0)
5000 if (!add_dynamic_entry (DT_PPC_GOT
, 0))
5006 if (!add_dynamic_entry (DT_RELA
, 0)
5007 || !add_dynamic_entry (DT_RELASZ
, 0)
5008 || !add_dynamic_entry (DT_RELAENT
, sizeof (Elf32_External_Rela
)))
5012 /* If any dynamic relocs apply to a read-only section, then we
5013 need a DT_TEXTREL entry. */
5014 if ((info
->flags
& DF_TEXTREL
) == 0)
5015 elf_link_hash_traverse (elf_hash_table (info
), readonly_dynrelocs
,
5018 if ((info
->flags
& DF_TEXTREL
) != 0)
5020 if (!add_dynamic_entry (DT_TEXTREL
, 0))
5024 #undef add_dynamic_entry
5029 #define ARRAY_SIZE(a) (sizeof (a) / sizeof ((a)[0]))
5031 static const int shared_stub_entry
[] =
5033 0x7c0802a6, /* mflr 0 */
5034 0x429f0005, /* bcl 20, 31, .Lxxx */
5035 0x7d6802a6, /* mflr 11 */
5036 0x3d6b0000, /* addis 11, 11, (xxx-.Lxxx)@ha */
5037 0x396b0018, /* addi 11, 11, (xxx-.Lxxx)@l */
5038 0x7c0803a6, /* mtlr 0 */
5039 0x7d6903a6, /* mtctr 11 */
5040 0x4e800420, /* bctr */
5043 static const int stub_entry
[] =
5045 0x3d600000, /* lis 11,xxx@ha */
5046 0x396b0000, /* addi 11,11,xxx@l */
5047 0x7d6903a6, /* mtctr 11 */
5048 0x4e800420, /* bctr */
5052 ppc_elf_relax_section (bfd
*abfd
,
5054 struct bfd_link_info
*link_info
,
5059 struct one_fixup
*next
;
5065 Elf_Internal_Shdr
*symtab_hdr
;
5066 bfd_byte
*contents
= NULL
;
5067 Elf_Internal_Sym
*isymbuf
= NULL
;
5068 Elf_Internal_Rela
*internal_relocs
= NULL
;
5069 Elf_Internal_Rela
*irel
, *irelend
;
5070 struct one_fixup
*fixups
= NULL
;
5071 bfd_boolean changed
;
5072 struct ppc_elf_link_hash_table
*htab
;
5073 bfd_size_type trampoff
;
5078 /* Nothing to do if there are no relocations, and no need to do
5079 anything with non-alloc sections. */
5080 if ((isec
->flags
& SEC_ALLOC
) == 0
5081 || (isec
->flags
& SEC_RELOC
) == 0
5082 || isec
->reloc_count
== 0)
5085 trampoff
= (isec
->size
+ 3) & (bfd_vma
) -4;
5086 /* Space for a branch around any trampolines. */
5089 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
5091 /* Get a copy of the native relocations. */
5092 internal_relocs
= _bfd_elf_link_read_relocs (abfd
, isec
, NULL
, NULL
,
5093 link_info
->keep_memory
);
5094 if (internal_relocs
== NULL
)
5097 htab
= ppc_elf_hash_table (link_info
);
5098 got2
= bfd_get_section_by_name (abfd
, ".got2");
5100 irelend
= internal_relocs
+ isec
->reloc_count
;
5101 for (irel
= internal_relocs
; irel
< irelend
; irel
++)
5103 unsigned long r_type
= ELF32_R_TYPE (irel
->r_info
);
5104 bfd_vma symaddr
, reladdr
, toff
, roff
;
5106 struct one_fixup
*f
;
5107 size_t insn_offset
= 0;
5108 bfd_vma max_branch_offset
, val
;
5111 unsigned char sym_type
;
5116 case R_PPC_LOCAL24PC
:
5117 case R_PPC_PLTREL24
:
5118 max_branch_offset
= 1 << 25;
5122 case R_PPC_REL14_BRTAKEN
:
5123 case R_PPC_REL14_BRNTAKEN
:
5124 max_branch_offset
= 1 << 15;
5131 /* Get the value of the symbol referred to by the reloc. */
5132 if (ELF32_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
5134 /* A local symbol. */
5135 Elf_Internal_Sym
*isym
;
5137 /* Read this BFD's local symbols. */
5138 if (isymbuf
== NULL
)
5140 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
5141 if (isymbuf
== NULL
)
5142 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
5143 symtab_hdr
->sh_info
, 0,
5148 isym
= isymbuf
+ ELF32_R_SYM (irel
->r_info
);
5149 if (isym
->st_shndx
== SHN_UNDEF
)
5150 continue; /* We can't do anything with undefined symbols. */
5151 else if (isym
->st_shndx
== SHN_ABS
)
5152 tsec
= bfd_abs_section_ptr
;
5153 else if (isym
->st_shndx
== SHN_COMMON
)
5154 tsec
= bfd_com_section_ptr
;
5156 tsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
5158 toff
= isym
->st_value
;
5159 sym_type
= ELF_ST_TYPE (isym
->st_info
);
5163 /* Global symbol handling. */
5165 struct elf_link_hash_entry
*h
;
5167 indx
= ELF32_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
5168 h
= elf_sym_hashes (abfd
)[indx
];
5170 while (h
->root
.type
== bfd_link_hash_indirect
5171 || h
->root
.type
== bfd_link_hash_warning
)
5172 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
5176 if (r_type
== R_PPC_PLTREL24
5177 && htab
->plt
!= NULL
)
5179 struct plt_entry
*ent
= find_plt_ent (h
, got2
, irel
->r_addend
);
5183 if (htab
->plt_type
== PLT_NEW
)
5186 toff
= ent
->glink_offset
;
5191 toff
= ent
->plt
.offset
;
5197 else if (h
->root
.type
== bfd_link_hash_defined
5198 || h
->root
.type
== bfd_link_hash_defweak
)
5200 tsec
= h
->root
.u
.def
.section
;
5201 toff
= h
->root
.u
.def
.value
;
5209 /* If the branch and target are in the same section, you have
5210 no hope of adding stubs. We'll error out later should the
5215 /* There probably isn't any reason to handle symbols in
5216 SEC_MERGE sections; SEC_MERGE doesn't seem a likely
5217 attribute for a code section, and we are only looking at
5218 branches. However, implement it correctly here as a
5219 reference for other target relax_section functions. */
5220 if (0 && tsec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
5222 /* At this stage in linking, no SEC_MERGE symbol has been
5223 adjusted, so all references to such symbols need to be
5224 passed through _bfd_merged_section_offset. (Later, in
5225 relocate_section, all SEC_MERGE symbols *except* for
5226 section symbols have been adjusted.)
5228 gas may reduce relocations against symbols in SEC_MERGE
5229 sections to a relocation against the section symbol when
5230 the original addend was zero. When the reloc is against
5231 a section symbol we should include the addend in the
5232 offset passed to _bfd_merged_section_offset, since the
5233 location of interest is the original symbol. On the
5234 other hand, an access to "sym+addend" where "sym" is not
5235 a section symbol should not include the addend; Such an
5236 access is presumed to be an offset from "sym"; The
5237 location of interest is just "sym". */
5238 if (sym_type
== STT_SECTION
)
5239 toff
+= irel
->r_addend
;
5241 toff
= _bfd_merged_section_offset (abfd
, &tsec
,
5242 elf_section_data (tsec
)->sec_info
,
5245 if (sym_type
!= STT_SECTION
)
5246 toff
+= irel
->r_addend
;
5248 /* PLTREL24 addends are special. */
5249 else if (r_type
!= R_PPC_PLTREL24
)
5250 toff
+= irel
->r_addend
;
5252 /* Attempted -shared link of non-pic code loses. */
5253 if (tsec
->output_section
== NULL
)
5256 symaddr
= tsec
->output_section
->vma
+ tsec
->output_offset
+ toff
;
5258 roff
= irel
->r_offset
;
5259 reladdr
= isec
->output_section
->vma
+ isec
->output_offset
+ roff
;
5261 /* If the branch is in range, no need to do anything. */
5262 if (symaddr
- reladdr
+ max_branch_offset
< 2 * max_branch_offset
)
5265 /* Look for an existing fixup to this address. */
5266 for (f
= fixups
; f
; f
= f
->next
)
5267 if (f
->tsec
== tsec
&& f
->toff
== toff
)
5273 unsigned long stub_rtype
;
5275 val
= trampoff
- roff
;
5276 if (val
>= max_branch_offset
)
5277 /* Oh dear, we can't reach a trampoline. Don't try to add
5278 one. We'll report an error later. */
5281 if (link_info
->shared
)
5283 size
= 4 * ARRAY_SIZE (shared_stub_entry
);
5285 stub_rtype
= R_PPC_RELAX32PC
;
5289 size
= 4 * ARRAY_SIZE (stub_entry
);
5291 stub_rtype
= R_PPC_RELAX32
;
5294 if (R_PPC_RELAX32_PLT
- R_PPC_RELAX32
5295 != R_PPC_RELAX32PC_PLT
- R_PPC_RELAX32PC
)
5297 if (tsec
== htab
->plt
5298 || tsec
== htab
->glink
)
5299 stub_rtype
+= R_PPC_RELAX32_PLT
- R_PPC_RELAX32
;
5301 /* Hijack the old relocation. Since we need two
5302 relocations for this use a "composite" reloc. */
5303 irel
->r_info
= ELF32_R_INFO (ELF32_R_SYM (irel
->r_info
),
5305 irel
->r_offset
= trampoff
+ insn_offset
;
5307 /* Record the fixup so we don't do it again this section. */
5308 f
= bfd_malloc (sizeof (*f
));
5312 f
->trampoff
= trampoff
;
5319 val
= f
->trampoff
- roff
;
5320 if (val
>= max_branch_offset
)
5323 /* Nop out the reloc, since we're finalizing things here. */
5324 irel
->r_info
= ELF32_R_INFO (0, R_PPC_NONE
);
5327 /* Get the section contents. */
5328 if (contents
== NULL
)
5330 /* Get cached copy if it exists. */
5331 if (elf_section_data (isec
)->this_hdr
.contents
!= NULL
)
5332 contents
= elf_section_data (isec
)->this_hdr
.contents
;
5335 /* Go get them off disk. */
5336 if (!bfd_malloc_and_get_section (abfd
, isec
, &contents
))
5341 /* Fix up the existing branch to hit the trampoline. */
5342 hit_addr
= contents
+ roff
;
5346 case R_PPC_LOCAL24PC
:
5347 case R_PPC_PLTREL24
:
5348 t0
= bfd_get_32 (abfd
, hit_addr
);
5350 t0
|= val
& 0x3fffffc;
5351 bfd_put_32 (abfd
, t0
, hit_addr
);
5355 case R_PPC_REL14_BRTAKEN
:
5356 case R_PPC_REL14_BRNTAKEN
:
5357 t0
= bfd_get_32 (abfd
, hit_addr
);
5360 bfd_put_32 (abfd
, t0
, hit_addr
);
5365 /* Write out the trampolines. */
5366 changed
= fixups
!= NULL
;
5376 struct one_fixup
*f
= fixups
;
5377 fixups
= fixups
->next
;
5382 contents
= bfd_realloc (contents
, trampoff
);
5383 if (contents
== NULL
)
5386 isec
->size
= (isec
->size
+ 3) & (bfd_vma
) -4;
5387 /* Branch around the trampolines. */
5388 val
= trampoff
- isec
->size
+ 0x48000000;
5389 dest
= contents
+ isec
->size
;
5390 isec
->size
= trampoff
;
5391 bfd_put_32 (abfd
, val
, dest
);
5394 if (link_info
->shared
)
5396 stub
= shared_stub_entry
;
5397 size
= ARRAY_SIZE (shared_stub_entry
);
5402 size
= ARRAY_SIZE (stub_entry
);
5406 while (dest
< contents
+ trampoff
)
5408 bfd_put_32 (abfd
, stub
[i
], dest
);
5414 BFD_ASSERT (i
== 0);
5418 && symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
5420 if (! link_info
->keep_memory
)
5424 /* Cache the symbols for elf_link_input_bfd. */
5425 symtab_hdr
->contents
= (unsigned char *) isymbuf
;
5429 if (contents
!= NULL
5430 && elf_section_data (isec
)->this_hdr
.contents
!= contents
)
5432 if (!changed
&& !link_info
->keep_memory
)
5436 /* Cache the section contents for elf_link_input_bfd. */
5437 elf_section_data (isec
)->this_hdr
.contents
= contents
;
5441 if (elf_section_data (isec
)->relocs
!= internal_relocs
)
5444 free (internal_relocs
);
5446 elf_section_data (isec
)->relocs
= internal_relocs
;
5453 if (isymbuf
!= NULL
&& (unsigned char *) isymbuf
!= symtab_hdr
->contents
)
5455 if (contents
!= NULL
5456 && elf_section_data (isec
)->this_hdr
.contents
!= contents
)
5458 if (internal_relocs
!= NULL
5459 && elf_section_data (isec
)->relocs
!= internal_relocs
)
5460 free (internal_relocs
);
5464 /* What to do when ld finds relocations against symbols defined in
5465 discarded sections. */
5468 ppc_elf_action_discarded (asection
*sec
)
5470 if (strcmp (".fixup", sec
->name
) == 0)
5473 if (strcmp (".got2", sec
->name
) == 0)
5476 return _bfd_elf_default_action_discarded (sec
);
5479 /* Fill in the address for a pointer generated in a linker section. */
5482 elf_finish_pointer_linker_section (bfd
*input_bfd
,
5483 elf_linker_section_t
*lsect
,
5484 struct elf_link_hash_entry
*h
,
5486 const Elf_Internal_Rela
*rel
)
5488 elf_linker_section_pointers_t
*linker_section_ptr
;
5490 BFD_ASSERT (lsect
!= NULL
);
5494 /* Handle global symbol. */
5495 struct ppc_elf_link_hash_entry
*eh
;
5497 eh
= (struct ppc_elf_link_hash_entry
*) h
;
5498 BFD_ASSERT (eh
->elf
.def_regular
);
5499 linker_section_ptr
= eh
->linker_section_pointer
;
5503 /* Handle local symbol. */
5504 unsigned long r_symndx
= ELF32_R_SYM (rel
->r_info
);
5506 BFD_ASSERT (elf_local_ptr_offsets (input_bfd
) != NULL
);
5507 linker_section_ptr
= elf_local_ptr_offsets (input_bfd
)[r_symndx
];
5510 linker_section_ptr
= elf_find_pointer_linker_section (linker_section_ptr
,
5513 BFD_ASSERT (linker_section_ptr
!= NULL
);
5515 /* Offset will always be a multiple of four, so use the bottom bit
5516 as a "written" flag. */
5517 if ((linker_section_ptr
->offset
& 1) == 0)
5519 bfd_put_32 (lsect
->section
->owner
,
5520 relocation
+ linker_section_ptr
->addend
,
5521 lsect
->section
->contents
+ linker_section_ptr
->offset
);
5522 linker_section_ptr
->offset
+= 1;
5525 relocation
= (lsect
->section
->output_offset
5526 + linker_section_ptr
->offset
- 1
5531 "Finish pointer in linker section %s, offset = %ld (0x%lx)\n",
5532 lsect
->name
, (long) relocation
, (long) relocation
);
5535 /* Subtract out the addend, because it will get added back in by the normal
5537 return relocation
- linker_section_ptr
->addend
;
5540 /* The RELOCATE_SECTION function is called by the ELF backend linker
5541 to handle the relocations for a section.
5543 The relocs are always passed as Rela structures; if the section
5544 actually uses Rel structures, the r_addend field will always be
5547 This function is responsible for adjust the section contents as
5548 necessary, and (if using Rela relocs and generating a
5549 relocatable output file) adjusting the reloc addend as
5552 This function does not have to worry about setting the reloc
5553 address or the reloc symbol index.
5555 LOCAL_SYMS is a pointer to the swapped in local symbols.
5557 LOCAL_SECTIONS is an array giving the section in the input file
5558 corresponding to the st_shndx field of each local symbol.
5560 The global hash table entry for the global symbols can be found
5561 via elf_sym_hashes (input_bfd).
5563 When generating relocatable output, this function must handle
5564 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
5565 going to be the section symbol corresponding to the output
5566 section, which means that the addend must be adjusted
5570 ppc_elf_relocate_section (bfd
*output_bfd
,
5571 struct bfd_link_info
*info
,
5573 asection
*input_section
,
5575 Elf_Internal_Rela
*relocs
,
5576 Elf_Internal_Sym
*local_syms
,
5577 asection
**local_sections
)
5579 Elf_Internal_Shdr
*symtab_hdr
;
5580 struct elf_link_hash_entry
**sym_hashes
;
5581 struct ppc_elf_link_hash_table
*htab
;
5582 Elf_Internal_Rela
*rel
;
5583 Elf_Internal_Rela
*relend
;
5584 Elf_Internal_Rela outrel
;
5586 asection
*got2
, *sreloc
= NULL
;
5587 bfd_vma
*local_got_offsets
;
5588 bfd_boolean ret
= TRUE
;
5589 bfd_vma d_offset
= (bfd_big_endian (output_bfd
) ? 2 : 0);
5592 _bfd_error_handler ("ppc_elf_relocate_section called for %B section %A, "
5593 "%ld relocations%s",
5594 input_bfd
, input_section
,
5595 (long) input_section
->reloc_count
,
5596 (info
->relocatable
) ? " (relocatable)" : "");
5599 got2
= bfd_get_section_by_name (input_bfd
, ".got2");
5601 /* Initialize howto table if not already done. */
5602 if (!ppc_elf_howto_table
[R_PPC_ADDR32
])
5603 ppc_elf_howto_init ();
5605 htab
= ppc_elf_hash_table (info
);
5606 local_got_offsets
= elf_local_got_offsets (input_bfd
);
5607 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
5608 sym_hashes
= elf_sym_hashes (input_bfd
);
5610 relend
= relocs
+ input_section
->reloc_count
;
5611 for (; rel
< relend
; rel
++)
5613 enum elf_ppc_reloc_type r_type
;
5615 bfd_reloc_status_type r
;
5616 Elf_Internal_Sym
*sym
;
5618 struct elf_link_hash_entry
*h
;
5619 const char *sym_name
;
5620 reloc_howto_type
*howto
;
5621 unsigned long r_symndx
;
5623 bfd_vma branch_bit
, insn
, from
;
5624 bfd_boolean unresolved_reloc
;
5626 unsigned int tls_type
, tls_mask
, tls_gd
;
5628 r_type
= ELF32_R_TYPE (rel
->r_info
);
5632 unresolved_reloc
= FALSE
;
5634 r_symndx
= ELF32_R_SYM (rel
->r_info
);
5636 if (r_symndx
< symtab_hdr
->sh_info
)
5638 sym
= local_syms
+ r_symndx
;
5639 sec
= local_sections
[r_symndx
];
5640 sym_name
= bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
, sec
);
5642 relocation
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &sec
, rel
);
5646 RELOC_FOR_GLOBAL_SYMBOL (info
, input_bfd
, input_section
, rel
,
5647 r_symndx
, symtab_hdr
, sym_hashes
,
5649 unresolved_reloc
, warned
);
5651 sym_name
= h
->root
.root
.string
;
5654 if (sec
!= NULL
&& elf_discarded_section (sec
))
5656 /* For relocs against symbols from removed linkonce sections,
5657 or sections discarded by a linker script, we just want the
5658 section contents zeroed. Avoid any special processing. */
5660 if (r_type
< R_PPC_max
)
5661 howto
= ppc_elf_howto_table
[r_type
];
5662 _bfd_clear_contents (howto
, input_bfd
, contents
+ rel
->r_offset
);
5668 if (info
->relocatable
)
5671 && r_type
== R_PPC_PLTREL24
5672 && rel
->r_addend
>= 32768)
5674 /* R_PPC_PLTREL24 is rather special. If non-zero, the
5675 addend specifies the GOT pointer offset within .got2. */
5676 rel
->r_addend
+= got2
->output_offset
;
5681 /* TLS optimizations. Replace instruction sequences and relocs
5682 based on information we collected in tls_optimize. We edit
5683 RELOCS so that --emit-relocs will output something sensible
5684 for the final instruction stream. */
5687 if (IS_PPC_TLS_RELOC (r_type
))
5690 tls_mask
= ((struct ppc_elf_link_hash_entry
*) h
)->tls_mask
;
5691 else if (local_got_offsets
!= NULL
)
5694 lgot_masks
= (char *) (local_got_offsets
+ symtab_hdr
->sh_info
);
5695 tls_mask
= lgot_masks
[r_symndx
];
5699 /* Ensure reloc mapping code below stays sane. */
5700 if ((R_PPC_GOT_TLSLD16
& 3) != (R_PPC_GOT_TLSGD16
& 3)
5701 || (R_PPC_GOT_TLSLD16_LO
& 3) != (R_PPC_GOT_TLSGD16_LO
& 3)
5702 || (R_PPC_GOT_TLSLD16_HI
& 3) != (R_PPC_GOT_TLSGD16_HI
& 3)
5703 || (R_PPC_GOT_TLSLD16_HA
& 3) != (R_PPC_GOT_TLSGD16_HA
& 3)
5704 || (R_PPC_GOT_TLSLD16
& 3) != (R_PPC_GOT_TPREL16
& 3)
5705 || (R_PPC_GOT_TLSLD16_LO
& 3) != (R_PPC_GOT_TPREL16_LO
& 3)
5706 || (R_PPC_GOT_TLSLD16_HI
& 3) != (R_PPC_GOT_TPREL16_HI
& 3)
5707 || (R_PPC_GOT_TLSLD16_HA
& 3) != (R_PPC_GOT_TPREL16_HA
& 3))
5714 case R_PPC_GOT_TPREL16
:
5715 case R_PPC_GOT_TPREL16_LO
:
5717 && (tls_mask
& TLS_TPREL
) == 0)
5720 insn
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
- d_offset
);
5722 insn
|= 0x3c020000; /* addis 0,2,0 */
5723 bfd_put_32 (output_bfd
, insn
, contents
+ rel
->r_offset
- d_offset
);
5724 r_type
= R_PPC_TPREL16_HA
;
5725 rel
->r_info
= ELF32_R_INFO (r_symndx
, r_type
);
5731 && (tls_mask
& TLS_TPREL
) == 0)
5734 insn
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
);
5735 if ((insn
& ((31 << 26) | (31 << 11)))
5736 == ((31 << 26) | (2 << 11)))
5737 rtra
= insn
& ((1 << 26) - (1 << 16));
5738 else if ((insn
& ((31 << 26) | (31 << 16)))
5739 == ((31 << 26) | (2 << 16)))
5740 rtra
= (insn
& (31 << 21)) | ((insn
& (31 << 11)) << 5);
5743 if ((insn
& ((1 << 11) - (1 << 1))) == 266 << 1)
5746 else if ((insn
& (31 << 1)) == 23 << 1
5747 && ((insn
& (31 << 6)) < 14 << 6
5748 || ((insn
& (31 << 6)) >= 16 << 6
5749 && (insn
& (31 << 6)) < 24 << 6)))
5750 /* load and store indexed -> dform. */
5751 insn
= (32 | ((insn
>> 6) & 31)) << 26;
5752 else if ((insn
& (31 << 1)) == 21 << 1
5753 && (insn
& (0x1a << 6)) == 0)
5754 /* ldx, ldux, stdx, stdux -> ld, ldu, std, stdu. */
5755 insn
= (((58 | ((insn
>> 6) & 4)) << 26)
5756 | ((insn
>> 6) & 1));
5757 else if ((insn
& (31 << 1)) == 21 << 1
5758 && (insn
& ((1 << 11) - (1 << 1))) == 341 << 1)
5760 insn
= (58 << 26) | 2;
5764 bfd_put_32 (output_bfd
, insn
, contents
+ rel
->r_offset
);
5765 r_type
= R_PPC_TPREL16_LO
;
5766 rel
->r_info
= ELF32_R_INFO (r_symndx
, r_type
);
5768 /* Was PPC_TLS which sits on insn boundary, now
5769 PPC_TPREL16_LO which is at low-order half-word. */
5770 rel
->r_offset
+= d_offset
;
5774 case R_PPC_GOT_TLSGD16_HI
:
5775 case R_PPC_GOT_TLSGD16_HA
:
5776 tls_gd
= TLS_TPRELGD
;
5777 if (tls_mask
!= 0 && (tls_mask
& TLS_GD
) == 0)
5781 case R_PPC_GOT_TLSLD16_HI
:
5782 case R_PPC_GOT_TLSLD16_HA
:
5783 if (tls_mask
!= 0 && (tls_mask
& TLS_LD
) == 0)
5786 if ((tls_mask
& tls_gd
) != 0)
5787 r_type
= (((r_type
- (R_PPC_GOT_TLSGD16
& 3)) & 3)
5788 + R_PPC_GOT_TPREL16
);
5791 bfd_put_32 (output_bfd
, NOP
, contents
+ rel
->r_offset
);
5792 rel
->r_offset
-= d_offset
;
5793 r_type
= R_PPC_NONE
;
5795 rel
->r_info
= ELF32_R_INFO (r_symndx
, r_type
);
5799 case R_PPC_GOT_TLSGD16
:
5800 case R_PPC_GOT_TLSGD16_LO
:
5801 tls_gd
= TLS_TPRELGD
;
5802 if (tls_mask
!= 0 && (tls_mask
& TLS_GD
) == 0)
5803 goto tls_get_addr_check
;
5806 case R_PPC_GOT_TLSLD16
:
5807 case R_PPC_GOT_TLSLD16_LO
:
5808 if (tls_mask
!= 0 && (tls_mask
& TLS_LD
) == 0)
5811 if (rel
+ 1 < relend
)
5813 enum elf_ppc_reloc_type r_type2
;
5814 unsigned long r_symndx2
;
5815 struct elf_link_hash_entry
*h2
;
5816 bfd_vma insn1
, insn2
;
5819 /* The next instruction should be a call to
5820 __tls_get_addr. Peek at the reloc to be sure. */
5821 r_type2
= ELF32_R_TYPE (rel
[1].r_info
);
5822 r_symndx2
= ELF32_R_SYM (rel
[1].r_info
);
5823 if (r_symndx2
< symtab_hdr
->sh_info
5824 || (r_type2
!= R_PPC_REL14
5825 && r_type2
!= R_PPC_REL14_BRTAKEN
5826 && r_type2
!= R_PPC_REL14_BRNTAKEN
5827 && r_type2
!= R_PPC_REL24
5828 && r_type2
!= R_PPC_PLTREL24
))
5831 h2
= sym_hashes
[r_symndx2
- symtab_hdr
->sh_info
];
5832 while (h2
->root
.type
== bfd_link_hash_indirect
5833 || h2
->root
.type
== bfd_link_hash_warning
)
5834 h2
= (struct elf_link_hash_entry
*) h2
->root
.u
.i
.link
;
5835 if (h2
== NULL
|| h2
!= htab
->tls_get_addr
)
5838 /* OK, it checks out. Replace the call. */
5839 offset
= rel
[1].r_offset
;
5840 insn1
= bfd_get_32 (output_bfd
,
5841 contents
+ rel
->r_offset
- d_offset
);
5842 if ((tls_mask
& tls_gd
) != 0)
5845 insn1
&= (1 << 26) - 1;
5846 insn1
|= 32 << 26; /* lwz */
5847 insn2
= 0x7c631214; /* add 3,3,2 */
5848 rel
[1].r_info
= ELF32_R_INFO (r_symndx2
, R_PPC_NONE
);
5849 rel
[1].r_addend
= 0;
5850 r_type
= (((r_type
- (R_PPC_GOT_TLSGD16
& 3)) & 3)
5851 + R_PPC_GOT_TPREL16
);
5852 rel
->r_info
= ELF32_R_INFO (r_symndx
, r_type
);
5857 insn1
= 0x3c620000; /* addis 3,2,0 */
5858 insn2
= 0x38630000; /* addi 3,3,0 */
5861 /* Was an LD reloc. */
5863 rel
->r_addend
= htab
->elf
.tls_sec
->vma
+ DTP_OFFSET
;
5865 r_type
= R_PPC_TPREL16_HA
;
5866 rel
->r_info
= ELF32_R_INFO (r_symndx
, r_type
);
5867 rel
[1].r_info
= ELF32_R_INFO (r_symndx
,
5869 rel
[1].r_offset
+= d_offset
;
5870 rel
[1].r_addend
= rel
->r_addend
;
5872 bfd_put_32 (output_bfd
, insn1
, contents
+ rel
->r_offset
- d_offset
);
5873 bfd_put_32 (output_bfd
, insn2
, contents
+ offset
);
5876 /* We changed the symbol on an LD reloc. Start over
5877 in order to get h, sym, sec etc. right. */
5886 /* Handle other relocations that tweak non-addend part of insn. */
5893 /* Branch taken prediction relocations. */
5894 case R_PPC_ADDR14_BRTAKEN
:
5895 case R_PPC_REL14_BRTAKEN
:
5896 branch_bit
= BRANCH_PREDICT_BIT
;
5899 /* Branch not taken prediction relocations. */
5900 case R_PPC_ADDR14_BRNTAKEN
:
5901 case R_PPC_REL14_BRNTAKEN
:
5902 insn
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
);
5903 insn
&= ~BRANCH_PREDICT_BIT
;
5906 from
= (rel
->r_offset
5907 + input_section
->output_offset
5908 + input_section
->output_section
->vma
);
5910 /* Invert 'y' bit if not the default. */
5911 if ((bfd_signed_vma
) (relocation
+ rel
->r_addend
- from
) < 0)
5912 insn
^= BRANCH_PREDICT_BIT
;
5914 bfd_put_32 (output_bfd
, insn
, contents
+ rel
->r_offset
);
5918 addend
= rel
->r_addend
;
5921 if (r_type
< R_PPC_max
)
5922 howto
= ppc_elf_howto_table
[r_type
];
5926 (*_bfd_error_handler
)
5927 (_("%B: unknown relocation type %d for symbol %s"),
5928 input_bfd
, (int) r_type
, sym_name
);
5930 bfd_set_error (bfd_error_bad_value
);
5936 case R_PPC_EMB_MRKREF
:
5937 case R_PPC_GNU_VTINHERIT
:
5938 case R_PPC_GNU_VTENTRY
:
5941 /* GOT16 relocations. Like an ADDR16 using the symbol's
5942 address in the GOT as relocation value instead of the
5943 symbol's value itself. Also, create a GOT entry for the
5944 symbol and put the symbol value there. */
5945 case R_PPC_GOT_TLSGD16
:
5946 case R_PPC_GOT_TLSGD16_LO
:
5947 case R_PPC_GOT_TLSGD16_HI
:
5948 case R_PPC_GOT_TLSGD16_HA
:
5949 tls_type
= TLS_TLS
| TLS_GD
;
5952 case R_PPC_GOT_TLSLD16
:
5953 case R_PPC_GOT_TLSLD16_LO
:
5954 case R_PPC_GOT_TLSLD16_HI
:
5955 case R_PPC_GOT_TLSLD16_HA
:
5956 tls_type
= TLS_TLS
| TLS_LD
;
5959 case R_PPC_GOT_TPREL16
:
5960 case R_PPC_GOT_TPREL16_LO
:
5961 case R_PPC_GOT_TPREL16_HI
:
5962 case R_PPC_GOT_TPREL16_HA
:
5963 tls_type
= TLS_TLS
| TLS_TPREL
;
5966 case R_PPC_GOT_DTPREL16
:
5967 case R_PPC_GOT_DTPREL16_LO
:
5968 case R_PPC_GOT_DTPREL16_HI
:
5969 case R_PPC_GOT_DTPREL16_HA
:
5970 tls_type
= TLS_TLS
| TLS_DTPREL
;
5974 case R_PPC_GOT16_LO
:
5975 case R_PPC_GOT16_HI
:
5976 case R_PPC_GOT16_HA
:
5979 /* Relocation is to the entry for this symbol in the global
5985 if (htab
->got
== NULL
)
5989 if (tls_type
== (TLS_TLS
| TLS_LD
)
5991 || !h
->def_dynamic
))
5992 offp
= &htab
->tlsld_got
.offset
;
5996 dyn
= htab
->elf
.dynamic_sections_created
;
5997 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn
, info
->shared
, h
)
5999 && SYMBOL_REFERENCES_LOCAL (info
, h
)))
6000 /* This is actually a static link, or it is a
6001 -Bsymbolic link and the symbol is defined
6002 locally, or the symbol was forced to be local
6003 because of a version file. */
6008 unresolved_reloc
= FALSE
;
6010 offp
= &h
->got
.offset
;
6014 if (local_got_offsets
== NULL
)
6016 offp
= &local_got_offsets
[r_symndx
];
6019 /* The offset must always be a multiple of 4. We use the
6020 least significant bit to record whether we have already
6021 processed this entry. */
6027 unsigned int tls_m
= (tls_mask
6028 & (TLS_LD
| TLS_GD
| TLS_DTPREL
6029 | TLS_TPREL
| TLS_TPRELGD
));
6031 if (offp
== &htab
->tlsld_got
.offset
)
6037 /* We might have multiple got entries for this sym.
6038 Initialize them all. */
6043 if ((tls_m
& TLS_LD
) != 0)
6045 tls_ty
= TLS_TLS
| TLS_LD
;
6048 else if ((tls_m
& TLS_GD
) != 0)
6050 tls_ty
= TLS_TLS
| TLS_GD
;
6053 else if ((tls_m
& TLS_DTPREL
) != 0)
6055 tls_ty
= TLS_TLS
| TLS_DTPREL
;
6056 tls_m
&= ~TLS_DTPREL
;
6058 else if ((tls_m
& (TLS_TPREL
| TLS_TPRELGD
)) != 0)
6060 tls_ty
= TLS_TLS
| TLS_TPREL
;
6064 /* Generate relocs for the dynamic linker. */
6065 if ((info
->shared
|| indx
!= 0)
6067 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
6068 || h
->root
.type
!= bfd_link_hash_undefweak
))
6070 outrel
.r_offset
= (htab
->got
->output_section
->vma
6071 + htab
->got
->output_offset
6073 outrel
.r_addend
= 0;
6074 if (tls_ty
& (TLS_LD
| TLS_GD
))
6076 outrel
.r_info
= ELF32_R_INFO (indx
, R_PPC_DTPMOD32
);
6077 if (tls_ty
== (TLS_TLS
| TLS_GD
))
6079 loc
= htab
->relgot
->contents
;
6080 loc
+= (htab
->relgot
->reloc_count
++
6081 * sizeof (Elf32_External_Rela
));
6082 bfd_elf32_swap_reloca_out (output_bfd
,
6084 outrel
.r_offset
+= 4;
6086 = ELF32_R_INFO (indx
, R_PPC_DTPREL32
);
6089 else if (tls_ty
== (TLS_TLS
| TLS_DTPREL
))
6090 outrel
.r_info
= ELF32_R_INFO (indx
, R_PPC_DTPREL32
);
6091 else if (tls_ty
== (TLS_TLS
| TLS_TPREL
))
6092 outrel
.r_info
= ELF32_R_INFO (indx
, R_PPC_TPREL32
);
6094 outrel
.r_info
= ELF32_R_INFO (indx
, R_PPC_RELATIVE
);
6096 outrel
.r_info
= ELF32_R_INFO (indx
, R_PPC_GLOB_DAT
);
6099 outrel
.r_addend
+= relocation
;
6100 if (tls_ty
& (TLS_GD
| TLS_DTPREL
| TLS_TPREL
))
6101 outrel
.r_addend
-= htab
->elf
.tls_sec
->vma
;
6103 loc
= htab
->relgot
->contents
;
6104 loc
+= (htab
->relgot
->reloc_count
++
6105 * sizeof (Elf32_External_Rela
));
6106 bfd_elf32_swap_reloca_out (output_bfd
, &outrel
, loc
);
6109 /* Init the .got section contents if we're not
6110 emitting a reloc. */
6113 bfd_vma value
= relocation
;
6115 if (tls_ty
== (TLS_TLS
| TLS_LD
))
6117 else if (tls_ty
!= 0)
6119 value
-= htab
->elf
.tls_sec
->vma
+ DTP_OFFSET
;
6120 if (tls_ty
== (TLS_TLS
| TLS_TPREL
))
6121 value
+= DTP_OFFSET
- TP_OFFSET
;
6123 if (tls_ty
== (TLS_TLS
| TLS_GD
))
6125 bfd_put_32 (output_bfd
, value
,
6126 htab
->got
->contents
+ off
+ 4);
6130 bfd_put_32 (output_bfd
, value
,
6131 htab
->got
->contents
+ off
);
6135 if (tls_ty
& (TLS_LD
| TLS_GD
))
6144 if (off
>= (bfd_vma
) -2)
6147 if ((tls_type
& TLS_TLS
) != 0)
6149 if (tls_type
!= (TLS_TLS
| TLS_LD
))
6151 if ((tls_mask
& TLS_LD
) != 0
6153 || !h
->def_dynamic
))
6155 if (tls_type
!= (TLS_TLS
| TLS_GD
))
6157 if ((tls_mask
& TLS_GD
) != 0)
6159 if (tls_type
!= (TLS_TLS
| TLS_DTPREL
))
6161 if ((tls_mask
& TLS_DTPREL
) != 0)
6168 relocation
= htab
->got
->output_offset
+ off
;
6169 relocation
-= htab
->elf
.hgot
->root
.u
.def
.value
;
6171 /* Addends on got relocations don't make much sense.
6172 x+off@got is actually x@got+off, and since the got is
6173 generated by a hash table traversal, the value in the
6174 got at entry m+n bears little relation to the entry m. */
6176 (*_bfd_error_handler
)
6177 (_("%B(%A+0x%lx): non-zero addend on %s reloc against `%s'"),
6180 (long) rel
->r_offset
,
6186 /* Relocations that need no special processing. */
6187 case R_PPC_LOCAL24PC
:
6188 /* It makes no sense to point a local relocation
6189 at a symbol not in this object. */
6190 if (unresolved_reloc
)
6192 if (! (*info
->callbacks
->undefined_symbol
) (info
,
6193 h
->root
.root
.string
,
6203 case R_PPC_DTPREL16
:
6204 case R_PPC_DTPREL16_LO
:
6205 case R_PPC_DTPREL16_HI
:
6206 case R_PPC_DTPREL16_HA
:
6207 addend
-= htab
->elf
.tls_sec
->vma
+ DTP_OFFSET
;
6210 /* Relocations that may need to be propagated if this is a shared
6213 case R_PPC_TPREL16_LO
:
6214 case R_PPC_TPREL16_HI
:
6215 case R_PPC_TPREL16_HA
:
6216 addend
-= htab
->elf
.tls_sec
->vma
+ TP_OFFSET
;
6217 /* The TPREL16 relocs shouldn't really be used in shared
6218 libs as they will result in DT_TEXTREL being set, but
6219 support them anyway. */
6223 addend
-= htab
->elf
.tls_sec
->vma
+ TP_OFFSET
;
6226 case R_PPC_DTPREL32
:
6227 addend
-= htab
->elf
.tls_sec
->vma
+ DTP_OFFSET
;
6230 case R_PPC_DTPMOD32
:
6236 case R_PPC_REL16_LO
:
6237 case R_PPC_REL16_HI
:
6238 case R_PPC_REL16_HA
:
6244 case R_PPC_REL14_BRTAKEN
:
6245 case R_PPC_REL14_BRNTAKEN
:
6246 /* If these relocations are not to a named symbol, they can be
6247 handled right here, no need to bother the dynamic linker. */
6248 if (SYMBOL_REFERENCES_LOCAL (info
, h
)
6249 || h
== htab
->elf
.hgot
)
6253 /* Relocations that always need to be propagated if this is a shared
6258 case R_PPC_ADDR16_LO
:
6259 case R_PPC_ADDR16_HI
:
6260 case R_PPC_ADDR16_HA
:
6262 case R_PPC_ADDR14_BRTAKEN
:
6263 case R_PPC_ADDR14_BRNTAKEN
:
6267 if ((input_section
->flags
& SEC_ALLOC
) == 0)
6273 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
6274 || h
->root
.type
!= bfd_link_hash_undefweak
)
6275 && (MUST_BE_DYN_RELOC (r_type
)
6276 || !SYMBOL_CALLS_LOCAL (info
, h
)))
6277 || (ELIMINATE_COPY_RELOCS
6283 && !h
->def_regular
))
6288 fprintf (stderr
, "ppc_elf_relocate_section needs to "
6289 "create relocation for %s\n",
6290 (h
&& h
->root
.root
.string
6291 ? h
->root
.root
.string
: "<unknown>"));
6294 /* When generating a shared object, these relocations
6295 are copied into the output file to be resolved at run
6301 name
= (bfd_elf_string_from_elf_section
6303 elf_elfheader (input_bfd
)->e_shstrndx
,
6304 elf_section_data (input_section
)->rel_hdr
.sh_name
));
6308 BFD_ASSERT (CONST_STRNEQ (name
, ".rela")
6309 && strcmp (bfd_get_section_name (input_bfd
,
6313 sreloc
= bfd_get_section_by_name (htab
->elf
.dynobj
, name
);
6314 BFD_ASSERT (sreloc
!= NULL
);
6320 _bfd_elf_section_offset (output_bfd
, info
, input_section
,
6322 if (outrel
.r_offset
== (bfd_vma
) -1
6323 || outrel
.r_offset
== (bfd_vma
) -2)
6324 skip
= (int) outrel
.r_offset
;
6325 outrel
.r_offset
+= (input_section
->output_section
->vma
6326 + input_section
->output_offset
);
6329 memset (&outrel
, 0, sizeof outrel
);
6330 else if (!SYMBOL_REFERENCES_LOCAL (info
, h
))
6332 unresolved_reloc
= FALSE
;
6333 outrel
.r_info
= ELF32_R_INFO (h
->dynindx
, r_type
);
6334 outrel
.r_addend
= rel
->r_addend
;
6338 outrel
.r_addend
= relocation
+ rel
->r_addend
;
6340 if (r_type
== R_PPC_ADDR32
)
6341 outrel
.r_info
= ELF32_R_INFO (0, R_PPC_RELATIVE
);
6346 if (bfd_is_abs_section (sec
))
6348 else if (sec
== NULL
|| sec
->owner
== NULL
)
6350 bfd_set_error (bfd_error_bad_value
);
6357 /* We are turning this relocation into one
6358 against a section symbol. It would be
6359 proper to subtract the symbol's value,
6360 osec->vma, from the emitted reloc addend,
6361 but ld.so expects buggy relocs. */
6362 osec
= sec
->output_section
;
6363 indx
= elf_section_data (osec
)->dynindx
;
6366 osec
= htab
->elf
.text_index_section
;
6367 indx
= elf_section_data (osec
)->dynindx
;
6369 BFD_ASSERT (indx
!= 0);
6372 printf ("indx=%ld section=%s flags=%08x name=%s\n",
6373 indx
, osec
->name
, osec
->flags
,
6374 h
->root
.root
.string
);
6378 outrel
.r_info
= ELF32_R_INFO (indx
, r_type
);
6382 loc
= sreloc
->contents
;
6383 loc
+= sreloc
->reloc_count
++ * sizeof (Elf32_External_Rela
);
6384 bfd_elf32_swap_reloca_out (output_bfd
, &outrel
, loc
);
6389 /* This reloc will be computed at runtime. We clear the memory
6390 so that it contains predictable value. */
6392 && ((input_section
->flags
& SEC_ALLOC
) != 0
6393 || ELF32_R_TYPE (outrel
.r_info
) != R_PPC_RELATIVE
))
6395 relocation
= howto
->pc_relative
? outrel
.r_offset
: 0;
6402 case R_PPC_RELAX32PC_PLT
:
6403 case R_PPC_RELAX32_PLT
:
6405 struct plt_entry
*ent
= find_plt_ent (h
, got2
, addend
);
6407 if (htab
->plt_type
== PLT_NEW
)
6408 relocation
= (htab
->glink
->output_section
->vma
6409 + htab
->glink
->output_offset
6410 + ent
->glink_offset
);
6412 relocation
= (htab
->plt
->output_section
->vma
6413 + htab
->plt
->output_offset
6417 if (r_type
== R_PPC_RELAX32_PLT
)
6421 case R_PPC_RELAX32PC
:
6422 relocation
-= (input_section
->output_section
->vma
6423 + input_section
->output_offset
6424 + rel
->r_offset
- 4);
6433 t0
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
);
6434 t1
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
+ 4);
6436 /* We're clearing the bits for R_PPC_ADDR16_HA
6437 and R_PPC_ADDR16_LO here. */
6441 /* t0 is HA, t1 is LO */
6442 relocation
+= addend
;
6443 t0
|= ((relocation
+ 0x8000) >> 16) & 0xffff;
6444 t1
|= relocation
& 0xffff;
6446 bfd_put_32 (output_bfd
, t0
, contents
+ rel
->r_offset
);
6447 bfd_put_32 (output_bfd
, t1
, contents
+ rel
->r_offset
+ 4);
6451 /* Indirect .sdata relocation. */
6452 case R_PPC_EMB_SDAI16
:
6453 BFD_ASSERT (htab
->sdata
[0].section
!= NULL
);
6455 = elf_finish_pointer_linker_section (input_bfd
, &htab
->sdata
[0],
6456 h
, relocation
, rel
);
6459 /* Indirect .sdata2 relocation. */
6460 case R_PPC_EMB_SDA2I16
:
6461 BFD_ASSERT (htab
->sdata
[1].section
!= NULL
);
6463 = elf_finish_pointer_linker_section (input_bfd
, &htab
->sdata
[1],
6464 h
, relocation
, rel
);
6467 /* Handle the TOC16 reloc. We want to use the offset within the .got
6468 section, not the actual VMA. This is appropriate when generating
6469 an embedded ELF object, for which the .got section acts like the
6470 AIX .toc section. */
6471 case R_PPC_TOC16
: /* phony GOT16 relocations */
6472 BFD_ASSERT (sec
!= NULL
);
6473 BFD_ASSERT (bfd_is_und_section (sec
)
6474 || strcmp (bfd_get_section_name (abfd
, sec
), ".got") == 0
6475 || strcmp (bfd_get_section_name (abfd
, sec
), ".cgot") == 0);
6477 addend
-= sec
->output_section
->vma
+ sec
->output_offset
+ 0x8000;
6480 case R_PPC_PLTREL24
:
6481 /* Relocation is to the entry for this symbol in the
6482 procedure linkage table. */
6484 struct plt_entry
*ent
= find_plt_ent (h
, got2
, addend
);
6488 || htab
->plt
== NULL
)
6490 /* We didn't make a PLT entry for this symbol. This
6491 happens when statically linking PIC code, or when
6492 using -Bsymbolic. */
6496 unresolved_reloc
= FALSE
;
6497 if (htab
->plt_type
== PLT_NEW
)
6498 relocation
= (htab
->glink
->output_section
->vma
6499 + htab
->glink
->output_offset
6500 + ent
->glink_offset
);
6502 relocation
= (htab
->plt
->output_section
->vma
6503 + htab
->plt
->output_offset
6508 /* Relocate against _SDA_BASE_. */
6509 case R_PPC_SDAREL16
:
6512 struct elf_link_hash_entry
*sh
;
6514 BFD_ASSERT (sec
!= NULL
);
6515 name
= bfd_get_section_name (abfd
, sec
->output_section
);
6516 if (! ((CONST_STRNEQ (name
, ".sdata")
6517 && (name
[6] == 0 || name
[6] == '.'))
6518 || (CONST_STRNEQ (name
, ".sbss")
6519 && (name
[5] == 0 || name
[5] == '.'))))
6521 (*_bfd_error_handler
)
6522 (_("%B: the target (%s) of a %s relocation is "
6523 "in the wrong output section (%s)"),
6529 sh
= htab
->sdata
[0].sym
;
6530 addend
-= (sh
->root
.u
.def
.value
6531 + sh
->root
.u
.def
.section
->output_offset
6532 + sh
->root
.u
.def
.section
->output_section
->vma
);
6536 /* Relocate against _SDA2_BASE_. */
6537 case R_PPC_EMB_SDA2REL
:
6540 struct elf_link_hash_entry
*sh
;
6542 BFD_ASSERT (sec
!= NULL
);
6543 name
= bfd_get_section_name (abfd
, sec
->output_section
);
6544 if (! (CONST_STRNEQ (name
, ".sdata2")
6545 || CONST_STRNEQ (name
, ".sbss2")))
6547 (*_bfd_error_handler
)
6548 (_("%B: the target (%s) of a %s relocation is "
6549 "in the wrong output section (%s)"),
6555 bfd_set_error (bfd_error_bad_value
);
6559 sh
= htab
->sdata
[1].sym
;
6560 addend
-= (sh
->root
.u
.def
.value
6561 + sh
->root
.u
.def
.section
->output_offset
6562 + sh
->root
.u
.def
.section
->output_section
->vma
);
6566 /* Relocate against either _SDA_BASE_, _SDA2_BASE_, or 0. */
6567 case R_PPC_EMB_SDA21
:
6568 case R_PPC_EMB_RELSDA
:
6572 struct elf_link_hash_entry
*sh
;
6574 BFD_ASSERT (sec
!= NULL
);
6575 name
= bfd_get_section_name (abfd
, sec
->output_section
);
6576 if (((CONST_STRNEQ (name
, ".sdata")
6577 && (name
[6] == 0 || name
[6] == '.'))
6578 || (CONST_STRNEQ (name
, ".sbss")
6579 && (name
[5] == 0 || name
[5] == '.'))))
6582 sh
= htab
->sdata
[0].sym
;
6583 addend
-= (sh
->root
.u
.def
.value
6584 + sh
->root
.u
.def
.section
->output_offset
6585 + sh
->root
.u
.def
.section
->output_section
->vma
);
6588 else if (CONST_STRNEQ (name
, ".sdata2")
6589 || CONST_STRNEQ (name
, ".sbss2"))
6592 sh
= htab
->sdata
[1].sym
;
6593 addend
-= (sh
->root
.u
.def
.value
6594 + sh
->root
.u
.def
.section
->output_offset
6595 + sh
->root
.u
.def
.section
->output_section
->vma
);
6598 else if (strcmp (name
, ".PPC.EMB.sdata0") == 0
6599 || strcmp (name
, ".PPC.EMB.sbss0") == 0)
6606 (*_bfd_error_handler
)
6607 (_("%B: the target (%s) of a %s relocation is "
6608 "in the wrong output section (%s)"),
6614 bfd_set_error (bfd_error_bad_value
);
6619 if (r_type
== R_PPC_EMB_SDA21
)
6620 { /* fill in register field */
6621 insn
= bfd_get_32 (output_bfd
, contents
+ rel
->r_offset
);
6622 insn
= (insn
& ~RA_REGISTER_MASK
) | (reg
<< RA_REGISTER_SHIFT
);
6623 bfd_put_32 (output_bfd
, insn
, contents
+ rel
->r_offset
);
6628 /* Relocate against the beginning of the section. */
6630 case R_PPC_SECTOFF_LO
:
6631 case R_PPC_SECTOFF_HI
:
6632 case R_PPC_SECTOFF_HA
:
6633 BFD_ASSERT (sec
!= NULL
);
6634 addend
-= sec
->output_section
->vma
;
6637 /* Negative relocations. */
6638 case R_PPC_EMB_NADDR32
:
6639 case R_PPC_EMB_NADDR16
:
6640 case R_PPC_EMB_NADDR16_LO
:
6641 case R_PPC_EMB_NADDR16_HI
:
6642 case R_PPC_EMB_NADDR16_HA
:
6643 addend
-= 2 * relocation
;
6647 case R_PPC_GLOB_DAT
:
6648 case R_PPC_JMP_SLOT
:
6649 case R_PPC_RELATIVE
:
6651 case R_PPC_PLTREL32
:
6652 case R_PPC_PLT16_LO
:
6653 case R_PPC_PLT16_HI
:
6654 case R_PPC_PLT16_HA
:
6656 case R_PPC_EMB_RELSEC16
:
6657 case R_PPC_EMB_RELST_LO
:
6658 case R_PPC_EMB_RELST_HI
:
6659 case R_PPC_EMB_RELST_HA
:
6660 case R_PPC_EMB_BIT_FLD
:
6661 (*_bfd_error_handler
)
6662 (_("%B: relocation %s is not yet supported for symbol %s."),
6667 bfd_set_error (bfd_error_invalid_operation
);
6672 /* Do any further special processing. */
6678 case R_PPC_ADDR16_HA
:
6679 case R_PPC_REL16_HA
:
6680 case R_PPC_SECTOFF_HA
:
6681 case R_PPC_TPREL16_HA
:
6682 case R_PPC_DTPREL16_HA
:
6683 case R_PPC_EMB_NADDR16_HA
:
6684 case R_PPC_EMB_RELST_HA
:
6685 /* It's just possible that this symbol is a weak symbol
6686 that's not actually defined anywhere. In that case,
6687 'sec' would be NULL, and we should leave the symbol
6688 alone (it will be set to zero elsewhere in the link). */
6693 case R_PPC_PLT16_HA
:
6694 case R_PPC_GOT16_HA
:
6695 case R_PPC_GOT_TLSGD16_HA
:
6696 case R_PPC_GOT_TLSLD16_HA
:
6697 case R_PPC_GOT_TPREL16_HA
:
6698 case R_PPC_GOT_DTPREL16_HA
:
6699 /* Add 0x10000 if sign bit in 0:15 is set.
6700 Bits 0:15 are not used. */
6706 fprintf (stderr
, "\ttype = %s (%d), name = %s, symbol index = %ld, "
6707 "offset = %ld, addend = %ld\n",
6712 (long) rel
->r_offset
,
6716 if (unresolved_reloc
6717 && !((input_section
->flags
& SEC_DEBUGGING
) != 0
6720 (*_bfd_error_handler
)
6721 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
6724 (long) rel
->r_offset
,
6730 r
= _bfd_final_link_relocate (howto
,
6738 if (r
!= bfd_reloc_ok
)
6740 if (r
== bfd_reloc_overflow
)
6745 && h
->root
.type
== bfd_link_hash_undefweak
6746 && howto
->pc_relative
)
6748 /* Assume this is a call protected by other code that
6749 detect the symbol is undefined. If this is the case,
6750 we can safely ignore the overflow. If not, the
6751 program is hosed anyway, and a little warning isn't
6757 if (! (*info
->callbacks
->reloc_overflow
) (info
,
6758 (h
? &h
->root
: NULL
),
6769 (*_bfd_error_handler
)
6770 (_("%B(%A+0x%lx): %s reloc against `%s': error %d"),
6771 input_bfd
, input_section
,
6772 (long) rel
->r_offset
, howto
->name
, sym_name
, (int) r
);
6779 fprintf (stderr
, "\n");
6785 #define PPC_LO(v) ((v) & 0xffff)
6786 #define PPC_HI(v) (((v) >> 16) & 0xffff)
6787 #define PPC_HA(v) PPC_HI ((v) + 0x8000)
6789 /* Finish up dynamic symbol handling. We set the contents of various
6790 dynamic sections here. */
6793 ppc_elf_finish_dynamic_symbol (bfd
*output_bfd
,
6794 struct bfd_link_info
*info
,
6795 struct elf_link_hash_entry
*h
,
6796 Elf_Internal_Sym
*sym
)
6798 struct ppc_elf_link_hash_table
*htab
;
6799 struct plt_entry
*ent
;
6800 bfd_boolean doneone
;
6803 fprintf (stderr
, "ppc_elf_finish_dynamic_symbol called for %s",
6804 h
->root
.root
.string
);
6807 htab
= ppc_elf_hash_table (info
);
6808 BFD_ASSERT (htab
->elf
.dynobj
!= NULL
);
6811 for (ent
= h
->plt
.plist
; ent
!= NULL
; ent
= ent
->next
)
6812 if (ent
->plt
.offset
!= (bfd_vma
) -1)
6816 Elf_Internal_Rela rela
;
6818 bfd_vma reloc_index
;
6820 if (htab
->plt_type
== PLT_NEW
)
6821 reloc_index
= ent
->plt
.offset
/ 4;
6824 reloc_index
= ((ent
->plt
.offset
- htab
->plt_initial_entry_size
)
6825 / htab
->plt_slot_size
);
6826 if (reloc_index
> PLT_NUM_SINGLE_ENTRIES
6827 && htab
->plt_type
== PLT_OLD
)
6828 reloc_index
-= (reloc_index
- PLT_NUM_SINGLE_ENTRIES
) / 2;
6831 /* This symbol has an entry in the procedure linkage table.
6833 if (htab
->plt_type
== PLT_VXWORKS
)
6836 const bfd_vma
*plt_entry
;
6838 /* The first three entries in .got.plt are reserved. */
6839 got_offset
= (reloc_index
+ 3) * 4;
6841 /* Use the right PLT. */
6842 plt_entry
= info
->shared
? ppc_elf_vxworks_pic_plt_entry
6843 : ppc_elf_vxworks_plt_entry
;
6845 /* Fill in the .plt on VxWorks. */
6848 bfd_vma got_offset_hi
= (got_offset
>> 16)
6849 + ((got_offset
& 0x8000) >> 15);
6851 bfd_put_32 (output_bfd
,
6852 plt_entry
[0] | (got_offset_hi
& 0xffff),
6853 htab
->plt
->contents
+ ent
->plt
.offset
+ 0);
6854 bfd_put_32 (output_bfd
,
6855 plt_entry
[1] | (got_offset
& 0xffff),
6856 htab
->plt
->contents
+ ent
->plt
.offset
+ 4);
6862 + htab
->elf
.hgot
->root
.u
.def
.value
6863 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
6864 + htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
);
6865 bfd_vma got_loc_hi
= (got_loc
>> 16)
6866 + ((got_loc
& 0x8000) >> 15);
6868 bfd_put_32 (output_bfd
,
6869 plt_entry
[0] | (got_loc_hi
& 0xffff),
6870 htab
->plt
->contents
+ ent
->plt
.offset
+ 0);
6871 bfd_put_32 (output_bfd
,
6872 plt_entry
[1] | (got_loc
& 0xffff),
6873 htab
->plt
->contents
+ ent
->plt
.offset
+ 4);
6876 bfd_put_32 (output_bfd
, plt_entry
[2],
6877 htab
->plt
->contents
+ ent
->plt
.offset
+ 8);
6878 bfd_put_32 (output_bfd
, plt_entry
[3],
6879 htab
->plt
->contents
+ ent
->plt
.offset
+ 12);
6881 /* This instruction is an immediate load. The value loaded is
6882 the byte offset of the R_PPC_JMP_SLOT relocation from the
6883 start of the .rela.plt section. The value is stored in the
6884 low-order 16 bits of the load instruction. */
6885 /* NOTE: It appears that this is now an index rather than a
6886 prescaled offset. */
6887 bfd_put_32 (output_bfd
,
6888 plt_entry
[4] | reloc_index
,
6889 htab
->plt
->contents
+ ent
->plt
.offset
+ 16);
6890 /* This instruction is a PC-relative branch whose target is
6891 the start of the PLT section. The address of this branch
6892 instruction is 20 bytes beyond the start of this PLT entry.
6893 The address is encoded in bits 6-29, inclusive. The value
6894 stored is right-shifted by two bits, permitting a 26-bit
6896 bfd_put_32 (output_bfd
,
6898 | (-(ent
->plt
.offset
+ 20) & 0x03fffffc)),
6899 htab
->plt
->contents
+ ent
->plt
.offset
+ 20);
6900 bfd_put_32 (output_bfd
, plt_entry
[6],
6901 htab
->plt
->contents
+ ent
->plt
.offset
+ 24);
6902 bfd_put_32 (output_bfd
, plt_entry
[7],
6903 htab
->plt
->contents
+ ent
->plt
.offset
+ 28);
6905 /* Fill in the GOT entry corresponding to this PLT slot with
6906 the address immediately after the the "bctr" instruction
6907 in this PLT entry. */
6908 bfd_put_32 (output_bfd
, (htab
->plt
->output_section
->vma
6909 + htab
->plt
->output_offset
6910 + ent
->plt
.offset
+ 16),
6911 htab
->sgotplt
->contents
+ got_offset
);
6915 /* Fill in a couple of entries in .rela.plt.unloaded. */
6916 loc
= htab
->srelplt2
->contents
6917 + ((VXWORKS_PLTRESOLVE_RELOCS
+ reloc_index
6918 * VXWORKS_PLT_NON_JMP_SLOT_RELOCS
)
6919 * sizeof (Elf32_External_Rela
));
6921 /* Provide the @ha relocation for the first instruction. */
6922 rela
.r_offset
= (htab
->plt
->output_section
->vma
6923 + htab
->plt
->output_offset
6924 + ent
->plt
.offset
+ 2);
6925 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
,
6927 rela
.r_addend
= got_offset
;
6928 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
6929 loc
+= sizeof (Elf32_External_Rela
);
6931 /* Provide the @l relocation for the second instruction. */
6932 rela
.r_offset
= (htab
->plt
->output_section
->vma
6933 + htab
->plt
->output_offset
6934 + ent
->plt
.offset
+ 6);
6935 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
,
6937 rela
.r_addend
= got_offset
;
6938 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
6939 loc
+= sizeof (Elf32_External_Rela
);
6941 /* Provide a relocation for the GOT entry corresponding to this
6942 PLT slot. Point it at the middle of the .plt entry. */
6943 rela
.r_offset
= (htab
->sgotplt
->output_section
->vma
6944 + htab
->sgotplt
->output_offset
6946 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hplt
->indx
,
6948 rela
.r_addend
= ent
->plt
.offset
+ 16;
6949 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
6952 /* VxWorks uses non-standard semantics for R_PPC_JMP_SLOT.
6953 In particular, the offset for the relocation is not the
6954 address of the PLT entry for this function, as specified
6955 by the ABI. Instead, the offset is set to the address of
6956 the GOT slot for this function. See EABI 4.4.4.1. */
6957 rela
.r_offset
= (htab
->sgotplt
->output_section
->vma
6958 + htab
->sgotplt
->output_offset
6964 rela
.r_offset
= (htab
->plt
->output_section
->vma
6965 + htab
->plt
->output_offset
6967 if (htab
->plt_type
== PLT_OLD
)
6969 /* We don't need to fill in the .plt. The ppc dynamic
6970 linker will fill it in. */
6974 bfd_vma val
= (htab
->glink_pltresolve
+ ent
->plt
.offset
6975 + htab
->glink
->output_section
->vma
6976 + htab
->glink
->output_offset
);
6977 bfd_put_32 (output_bfd
, val
,
6978 htab
->plt
->contents
+ ent
->plt
.offset
);
6982 /* Fill in the entry in the .rela.plt section. */
6983 rela
.r_info
= ELF32_R_INFO (h
->dynindx
, R_PPC_JMP_SLOT
);
6986 loc
= (htab
->relplt
->contents
6987 + reloc_index
* sizeof (Elf32_External_Rela
));
6988 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
6990 if (!h
->def_regular
)
6992 /* Mark the symbol as undefined, rather than as defined in
6993 the .plt section. Leave the value alone. */
6994 sym
->st_shndx
= SHN_UNDEF
;
6995 /* If the symbol is weak, we do need to clear the value.
6996 Otherwise, the PLT entry would provide a definition for
6997 the symbol even if the symbol wasn't defined anywhere,
6998 and so the symbol would never be NULL. */
6999 if (!h
->ref_regular_nonweak
)
7005 if (htab
->plt_type
== PLT_NEW
)
7010 plt
= (ent
->plt
.offset
7011 + htab
->plt
->output_section
->vma
7012 + htab
->plt
->output_offset
);
7013 p
= (unsigned char *) htab
->glink
->contents
+ ent
->glink_offset
;
7015 if (info
->shared
|| info
->pie
)
7019 if (ent
->addend
>= 32768)
7021 + ent
->sec
->output_section
->vma
7022 + ent
->sec
->output_offset
);
7023 else if (htab
->elf
.hgot
!= NULL
)
7024 got
= (htab
->elf
.hgot
->root
.u
.def
.value
7025 + htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
7026 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
);
7030 if (plt
+ 0x8000 < 0x10000)
7032 bfd_put_32 (output_bfd
, LWZ_11_30
+ PPC_LO (plt
), p
);
7034 bfd_put_32 (output_bfd
, MTCTR_11
, p
);
7036 bfd_put_32 (output_bfd
, BCTR
, p
);
7038 bfd_put_32 (output_bfd
, NOP
, p
);
7043 bfd_put_32 (output_bfd
, ADDIS_11_30
+ PPC_HA (plt
), p
);
7045 bfd_put_32 (output_bfd
, LWZ_11_11
+ PPC_LO (plt
), p
);
7047 bfd_put_32 (output_bfd
, MTCTR_11
, p
);
7049 bfd_put_32 (output_bfd
, BCTR
, p
);
7055 bfd_put_32 (output_bfd
, LIS_11
+ PPC_HA (plt
), p
);
7057 bfd_put_32 (output_bfd
, LWZ_11_11
+ PPC_LO (plt
), p
);
7059 bfd_put_32 (output_bfd
, MTCTR_11
, p
);
7061 bfd_put_32 (output_bfd
, BCTR
, p
);
7064 /* We only need one non-PIC glink stub. */
7075 Elf_Internal_Rela rela
;
7078 /* This symbols needs a copy reloc. Set it up. */
7081 fprintf (stderr
, ", copy");
7084 BFD_ASSERT (h
->dynindx
!= -1);
7086 if (ppc_elf_hash_entry (h
)->has_sda_refs
)
7090 BFD_ASSERT (s
!= NULL
);
7092 rela
.r_offset
= (h
->root
.u
.def
.value
7093 + h
->root
.u
.def
.section
->output_section
->vma
7094 + h
->root
.u
.def
.section
->output_offset
);
7095 rela
.r_info
= ELF32_R_INFO (h
->dynindx
, R_PPC_COPY
);
7097 loc
= s
->contents
+ s
->reloc_count
++ * sizeof (Elf32_External_Rela
);
7098 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
7102 fprintf (stderr
, "\n");
7105 /* Mark some specially defined symbols as absolute. */
7106 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
7107 || (!htab
->is_vxworks
7108 && (h
== htab
->elf
.hgot
7109 || strcmp (h
->root
.root
.string
,
7110 "_PROCEDURE_LINKAGE_TABLE_") == 0)))
7111 sym
->st_shndx
= SHN_ABS
;
7116 static enum elf_reloc_type_class
7117 ppc_elf_reloc_type_class (const Elf_Internal_Rela
*rela
)
7119 switch (ELF32_R_TYPE (rela
->r_info
))
7121 case R_PPC_RELATIVE
:
7122 return reloc_class_relative
;
7125 case R_PPC_JMP_SLOT
:
7126 return reloc_class_plt
;
7128 return reloc_class_copy
;
7130 return reloc_class_normal
;
7134 /* Finish up the dynamic sections. */
7137 ppc_elf_finish_dynamic_sections (bfd
*output_bfd
,
7138 struct bfd_link_info
*info
)
7142 struct ppc_elf_link_hash_table
*htab
;
7147 fprintf (stderr
, "ppc_elf_finish_dynamic_sections called\n");
7150 htab
= ppc_elf_hash_table (info
);
7151 dynobj
= elf_hash_table (info
)->dynobj
;
7152 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
7153 if (htab
->is_vxworks
)
7154 splt
= bfd_get_section_by_name (dynobj
, ".plt");
7159 if (htab
->elf
.hgot
!= NULL
)
7160 got
= (htab
->elf
.hgot
->root
.u
.def
.value
7161 + htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
7162 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
);
7164 if (htab
->elf
.dynamic_sections_created
)
7166 Elf32_External_Dyn
*dyncon
, *dynconend
;
7168 BFD_ASSERT (htab
->plt
!= NULL
&& sdyn
!= NULL
);
7170 dyncon
= (Elf32_External_Dyn
*) sdyn
->contents
;
7171 dynconend
= (Elf32_External_Dyn
*) (sdyn
->contents
+ sdyn
->size
);
7172 for (; dyncon
< dynconend
; dyncon
++)
7174 Elf_Internal_Dyn dyn
;
7177 bfd_elf32_swap_dyn_in (dynobj
, dyncon
, &dyn
);
7182 if (htab
->is_vxworks
)
7186 dyn
.d_un
.d_ptr
= s
->output_section
->vma
+ s
->output_offset
;
7190 dyn
.d_un
.d_val
= htab
->relplt
->size
;
7195 dyn
.d_un
.d_ptr
= s
->output_section
->vma
+ s
->output_offset
;
7199 dyn
.d_un
.d_ptr
= got
;
7203 if (htab
->is_vxworks
)
7206 dyn
.d_un
.d_ptr
-= htab
->relplt
->size
;
7215 bfd_elf32_swap_dyn_out (output_bfd
, &dyn
, dyncon
);
7219 /* Add a blrl instruction at _GLOBAL_OFFSET_TABLE_-4 so that a function can
7220 easily find the address of the _GLOBAL_OFFSET_TABLE_. */
7221 if (htab
->got
!= NULL
)
7223 unsigned char *p
= htab
->got
->contents
;
7226 p
+= htab
->elf
.hgot
->root
.u
.def
.value
;
7227 if (htab
->plt_type
== PLT_OLD
)
7228 bfd_put_32 (output_bfd
, 0x4e800021 /* blrl */, p
- 4);
7232 val
= sdyn
->output_section
->vma
+ sdyn
->output_offset
;
7233 bfd_put_32 (output_bfd
, val
, p
);
7235 elf_section_data (htab
->got
->output_section
)->this_hdr
.sh_entsize
= 4;
7238 /* Fill in the first entry in the VxWorks procedure linkage table. */
7239 if (splt
&& splt
->size
> 0)
7241 /* Use the right PLT. */
7242 static const bfd_vma
*plt_entry
= NULL
;
7243 plt_entry
= info
->shared
?
7244 ppc_elf_vxworks_pic_plt0_entry
: ppc_elf_vxworks_plt0_entry
;
7249 (htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
7250 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
7251 + htab
->elf
.hgot
->root
.u
.def
.value
);
7252 bfd_vma got_hi
= (got_value
>> 16) + ((got_value
& 0x8000) >> 15);
7254 bfd_put_32 (output_bfd
, plt_entry
[0] | (got_hi
& 0xffff),
7255 splt
->contents
+ 0);
7256 bfd_put_32 (output_bfd
, plt_entry
[1] | (got_value
& 0xffff),
7257 splt
->contents
+ 4);
7261 bfd_put_32 (output_bfd
, plt_entry
[0], splt
->contents
+ 0);
7262 bfd_put_32 (output_bfd
, plt_entry
[1], splt
->contents
+ 4);
7264 bfd_put_32 (output_bfd
, plt_entry
[2], splt
->contents
+ 8);
7265 bfd_put_32 (output_bfd
, plt_entry
[3], splt
->contents
+ 12);
7266 bfd_put_32 (output_bfd
, plt_entry
[4], splt
->contents
+ 16);
7267 bfd_put_32 (output_bfd
, plt_entry
[5], splt
->contents
+ 20);
7268 bfd_put_32 (output_bfd
, plt_entry
[6], splt
->contents
+ 24);
7269 bfd_put_32 (output_bfd
, plt_entry
[7], splt
->contents
+ 28);
7273 Elf_Internal_Rela rela
;
7276 loc
= htab
->srelplt2
->contents
;
7278 /* Output the @ha relocation for the first instruction. */
7279 rela
.r_offset
= (htab
->plt
->output_section
->vma
7280 + htab
->plt
->output_offset
7282 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_PPC_ADDR16_HA
);
7284 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
7285 loc
+= sizeof (Elf32_External_Rela
);
7287 /* Output the @l relocation for the second instruction. */
7288 rela
.r_offset
= (htab
->plt
->output_section
->vma
7289 + htab
->plt
->output_offset
7291 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_PPC_ADDR16_LO
);
7293 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
7294 loc
+= sizeof (Elf32_External_Rela
);
7296 /* Fix up the remaining relocations. They may have the wrong
7297 symbol index for _G_O_T_ or _P_L_T_ depending on the order
7298 in which symbols were output. */
7299 while (loc
< htab
->srelplt2
->contents
+ htab
->srelplt2
->size
)
7301 Elf_Internal_Rela rel
;
7303 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
7304 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_PPC_ADDR16_HA
);
7305 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
7306 loc
+= sizeof (Elf32_External_Rela
);
7308 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
7309 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_PPC_ADDR16_LO
);
7310 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
7311 loc
+= sizeof (Elf32_External_Rela
);
7313 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
7314 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hplt
->indx
, R_PPC_ADDR32
);
7315 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
7316 loc
+= sizeof (Elf32_External_Rela
);
7321 if (htab
->glink
!= NULL
&& htab
->glink
->contents
!= NULL
)
7324 unsigned char *endp
;
7329 * PIC glink code is the following:
7331 * # ith PLT code stub.
7332 * addis 11,30,(plt+(i-1)*4-got)@ha
7333 * lwz 11,(plt+(i-1)*4-got)@l(11)
7337 * # A table of branches, one for each plt entry.
7338 * # The idea is that the plt call stub loads ctr (and r11) with these
7339 * # addresses, so (r11 - res_0) gives the plt index * 4.
7340 * res_0: b PLTresolve
7341 * res_1: b PLTresolve
7343 * # Some number of entries towards the end can be nops
7349 * addis 11,11,(1f-res_0)@ha
7352 * 1: addi 11,11,(1b-res_0)@l
7355 * sub 11,11,12 # r11 = index * 4
7356 * addis 12,12,(got+4-1b)@ha
7357 * lwz 0,(got+4-1b)@l(12) # got[1] address of dl_runtime_resolve
7358 * lwz 12,(got+8-1b)@l(12) # got[2] contains the map address
7361 * add 11,0,11 # r11 = index * 12 = reloc offset.
7364 static const unsigned int pic_plt_resolve
[] =
7384 static const unsigned int plt_resolve
[] =
7404 if (ARRAY_SIZE (pic_plt_resolve
) != GLINK_PLTRESOLVE
/ 4)
7406 if (ARRAY_SIZE (plt_resolve
) != GLINK_PLTRESOLVE
/ 4)
7409 /* Build the branch table, one for each plt entry (less one),
7410 and perhaps some padding. */
7411 p
= htab
->glink
->contents
;
7412 p
+= htab
->glink_pltresolve
;
7413 endp
= htab
->glink
->contents
;
7414 endp
+= htab
->glink
->size
- GLINK_PLTRESOLVE
;
7415 while (p
< endp
- 8 * 4)
7417 bfd_put_32 (output_bfd
, B
+ endp
- p
, p
);
7422 bfd_put_32 (output_bfd
, NOP
, p
);
7426 res0
= (htab
->glink_pltresolve
7427 + htab
->glink
->output_section
->vma
7428 + htab
->glink
->output_offset
);
7430 /* Last comes the PLTresolve stub. */
7431 if (info
->shared
|| info
->pie
)
7435 for (i
= 0; i
< ARRAY_SIZE (pic_plt_resolve
); i
++)
7437 bfd_put_32 (output_bfd
, pic_plt_resolve
[i
], p
);
7440 p
-= 4 * ARRAY_SIZE (pic_plt_resolve
);
7442 bcl
= (htab
->glink
->size
- GLINK_PLTRESOLVE
+ 3*4
7443 + htab
->glink
->output_section
->vma
7444 + htab
->glink
->output_offset
);
7446 bfd_put_32 (output_bfd
,
7447 ADDIS_11_11
+ PPC_HA (bcl
- res0
), p
+ 0*4);
7448 bfd_put_32 (output_bfd
,
7449 ADDI_11_11
+ PPC_LO (bcl
- res0
), p
+ 3*4);
7450 bfd_put_32 (output_bfd
,
7451 ADDIS_12_12
+ PPC_HA (got
+ 4 - bcl
), p
+ 7*4);
7452 if (PPC_HA (got
+ 4 - bcl
) == PPC_HA (got
+ 8 - bcl
))
7454 bfd_put_32 (output_bfd
,
7455 LWZ_0_12
+ PPC_LO (got
+ 4 - bcl
), p
+ 8*4);
7456 bfd_put_32 (output_bfd
,
7457 LWZ_12_12
+ PPC_LO (got
+ 8 - bcl
), p
+ 9*4);
7461 bfd_put_32 (output_bfd
,
7462 LWZU_0_12
+ PPC_LO (got
+ 4 - bcl
), p
+ 8*4);
7463 bfd_put_32 (output_bfd
,
7464 LWZ_12_12
+ 4, p
+ 9*4);
7469 for (i
= 0; i
< ARRAY_SIZE (plt_resolve
); i
++)
7471 bfd_put_32 (output_bfd
, plt_resolve
[i
], p
);
7474 p
-= 4 * ARRAY_SIZE (plt_resolve
);
7476 bfd_put_32 (output_bfd
,
7477 LIS_12
+ PPC_HA (got
+ 4), p
+ 0*4);
7478 bfd_put_32 (output_bfd
,
7479 ADDIS_11_11
+ PPC_HA (-res0
), p
+ 1*4);
7480 bfd_put_32 (output_bfd
,
7481 ADDI_11_11
+ PPC_LO (-res0
), p
+ 3*4);
7482 if (PPC_HA (got
+ 4) == PPC_HA (got
+ 8))
7484 bfd_put_32 (output_bfd
,
7485 LWZ_0_12
+ PPC_LO (got
+ 4), p
+ 2*4);
7486 bfd_put_32 (output_bfd
,
7487 LWZ_12_12
+ PPC_LO (got
+ 8), p
+ 6*4);
7491 bfd_put_32 (output_bfd
,
7492 LWZU_0_12
+ PPC_LO (got
+ 4), p
+ 2*4);
7493 bfd_put_32 (output_bfd
,
7494 LWZ_12_12
+ 4, p
+ 6*4);
7502 #define TARGET_LITTLE_SYM bfd_elf32_powerpcle_vec
7503 #define TARGET_LITTLE_NAME "elf32-powerpcle"
7504 #define TARGET_BIG_SYM bfd_elf32_powerpc_vec
7505 #define TARGET_BIG_NAME "elf32-powerpc"
7506 #define ELF_ARCH bfd_arch_powerpc
7507 #define ELF_MACHINE_CODE EM_PPC
7508 #ifdef __QNXTARGET__
7509 #define ELF_MAXPAGESIZE 0x1000
7511 #define ELF_MAXPAGESIZE 0x10000
7513 #define ELF_MINPAGESIZE 0x1000
7514 #define ELF_COMMONPAGESIZE 0x1000
7515 #define elf_info_to_howto ppc_elf_info_to_howto
7517 #ifdef EM_CYGNUS_POWERPC
7518 #define ELF_MACHINE_ALT1 EM_CYGNUS_POWERPC
7522 #define ELF_MACHINE_ALT2 EM_PPC_OLD
7525 #define elf_backend_plt_not_loaded 1
7526 #define elf_backend_can_gc_sections 1
7527 #define elf_backend_can_refcount 1
7528 #define elf_backend_rela_normal 1
7530 #define bfd_elf32_mkobject ppc_elf_mkobject
7531 #define bfd_elf32_bfd_merge_private_bfd_data ppc_elf_merge_private_bfd_data
7532 #define bfd_elf32_bfd_relax_section ppc_elf_relax_section
7533 #define bfd_elf32_bfd_reloc_type_lookup ppc_elf_reloc_type_lookup
7534 #define bfd_elf32_bfd_reloc_name_lookup ppc_elf_reloc_name_lookup
7535 #define bfd_elf32_bfd_set_private_flags ppc_elf_set_private_flags
7536 #define bfd_elf32_bfd_link_hash_table_create ppc_elf_link_hash_table_create
7538 #define elf_backend_object_p ppc_elf_object_p
7539 #define elf_backend_gc_mark_hook ppc_elf_gc_mark_hook
7540 #define elf_backend_gc_sweep_hook ppc_elf_gc_sweep_hook
7541 #define elf_backend_section_from_shdr ppc_elf_section_from_shdr
7542 #define elf_backend_relocate_section ppc_elf_relocate_section
7543 #define elf_backend_create_dynamic_sections ppc_elf_create_dynamic_sections
7544 #define elf_backend_check_relocs ppc_elf_check_relocs
7545 #define elf_backend_copy_indirect_symbol ppc_elf_copy_indirect_symbol
7546 #define elf_backend_adjust_dynamic_symbol ppc_elf_adjust_dynamic_symbol
7547 #define elf_backend_add_symbol_hook ppc_elf_add_symbol_hook
7548 #define elf_backend_size_dynamic_sections ppc_elf_size_dynamic_sections
7549 #define elf_backend_finish_dynamic_symbol ppc_elf_finish_dynamic_symbol
7550 #define elf_backend_finish_dynamic_sections ppc_elf_finish_dynamic_sections
7551 #define elf_backend_fake_sections ppc_elf_fake_sections
7552 #define elf_backend_additional_program_headers ppc_elf_additional_program_headers
7553 #define elf_backend_grok_prstatus ppc_elf_grok_prstatus
7554 #define elf_backend_grok_psinfo ppc_elf_grok_psinfo
7555 #define elf_backend_write_core_note ppc_elf_write_core_note
7556 #define elf_backend_reloc_type_class ppc_elf_reloc_type_class
7557 #define elf_backend_begin_write_processing ppc_elf_begin_write_processing
7558 #define elf_backend_final_write_processing ppc_elf_final_write_processing
7559 #define elf_backend_write_section ppc_elf_write_section
7560 #define elf_backend_get_sec_type_attr ppc_elf_get_sec_type_attr
7561 #define elf_backend_plt_sym_val ppc_elf_plt_sym_val
7562 #define elf_backend_action_discarded ppc_elf_action_discarded
7563 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
7565 #include "elf32-target.h"
7567 /* VxWorks Target */
7569 #undef TARGET_LITTLE_SYM
7570 #undef TARGET_LITTLE_NAME
7572 #undef TARGET_BIG_SYM
7573 #define TARGET_BIG_SYM bfd_elf32_powerpc_vxworks_vec
7574 #undef TARGET_BIG_NAME
7575 #define TARGET_BIG_NAME "elf32-powerpc-vxworks"
7577 /* VxWorks uses the elf default section flags for .plt. */
7578 static const struct bfd_elf_special_section
*
7579 ppc_elf_vxworks_get_sec_type_attr (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
7581 if (sec
->name
== NULL
)
7584 if (strcmp (sec
->name
, ".plt") == 0)
7585 return _bfd_elf_get_sec_type_attr (abfd
, sec
);
7587 return ppc_elf_get_sec_type_attr (abfd
, sec
);
7590 /* Like ppc_elf_link_hash_table_create, but overrides
7591 appropriately for VxWorks. */
7592 static struct bfd_link_hash_table
*
7593 ppc_elf_vxworks_link_hash_table_create (bfd
*abfd
)
7595 struct bfd_link_hash_table
*ret
;
7597 ret
= ppc_elf_link_hash_table_create (abfd
);
7600 struct ppc_elf_link_hash_table
*htab
7601 = (struct ppc_elf_link_hash_table
*)ret
;
7602 htab
->is_vxworks
= 1;
7603 htab
->plt_type
= PLT_VXWORKS
;
7604 htab
->plt_entry_size
= VXWORKS_PLT_ENTRY_SIZE
;
7605 htab
->plt_slot_size
= VXWORKS_PLT_ENTRY_SIZE
;
7606 htab
->plt_initial_entry_size
= VXWORKS_PLT_INITIAL_ENTRY_SIZE
;
7611 /* Tweak magic VxWorks symbols as they are loaded. */
7613 ppc_elf_vxworks_add_symbol_hook (bfd
*abfd
,
7614 struct bfd_link_info
*info
,
7615 Elf_Internal_Sym
*sym
,
7616 const char **namep ATTRIBUTE_UNUSED
,
7617 flagword
*flagsp ATTRIBUTE_UNUSED
,
7621 if (!elf_vxworks_add_symbol_hook(abfd
, info
, sym
,namep
, flagsp
, secp
,
7625 return ppc_elf_add_symbol_hook(abfd
, info
, sym
,namep
, flagsp
, secp
, valp
);
7629 ppc_elf_vxworks_final_write_processing (bfd
*abfd
, bfd_boolean linker
)
7631 ppc_elf_final_write_processing(abfd
, linker
);
7632 elf_vxworks_final_write_processing(abfd
, linker
);
7635 /* On VxWorks, we emit relocations against _PROCEDURE_LINKAGE_TABLE_, so
7637 #undef elf_backend_want_plt_sym
7638 #define elf_backend_want_plt_sym 1
7639 #undef elf_backend_want_got_plt
7640 #define elf_backend_want_got_plt 1
7641 #undef elf_backend_got_symbol_offset
7642 #define elf_backend_got_symbol_offset 0
7643 #undef elf_backend_plt_not_loaded
7644 #define elf_backend_plt_not_loaded 0
7645 #undef elf_backend_plt_readonly
7646 #define elf_backend_plt_readonly 1
7647 #undef elf_backend_got_header_size
7648 #define elf_backend_got_header_size 12
7650 #undef bfd_elf32_bfd_link_hash_table_create
7651 #define bfd_elf32_bfd_link_hash_table_create \
7652 ppc_elf_vxworks_link_hash_table_create
7653 #undef elf_backend_add_symbol_hook
7654 #define elf_backend_add_symbol_hook \
7655 ppc_elf_vxworks_add_symbol_hook
7656 #undef elf_backend_link_output_symbol_hook
7657 #define elf_backend_link_output_symbol_hook \
7658 elf_vxworks_link_output_symbol_hook
7659 #undef elf_backend_final_write_processing
7660 #define elf_backend_final_write_processing \
7661 ppc_elf_vxworks_final_write_processing
7662 #undef elf_backend_get_sec_type_attr
7663 #define elf_backend_get_sec_type_attr \
7664 ppc_elf_vxworks_get_sec_type_attr
7665 #undef elf_backend_emit_relocs
7666 #define elf_backend_emit_relocs \
7667 elf_vxworks_emit_relocs
7670 #define elf32_bed ppc_elf_vxworks_bed
7672 #include "elf32-target.h"