projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Eliminate ia64 compiler warnings. Fix ia64 gas testsuite again.
[deliverable/binutils-gdb.git] / bfd / elf32-ppc.c
1 /* PowerPC-specific support for 32-bit ELF
2 Copyright 1994, 95, 96, 97, 98, 1999 Free Software Foundation, Inc.
3 Written by Ian Lance Taylor, Cygnus Support.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20
21 /* This file is based on a preliminary PowerPC ELF ABI. The
22 information may not match the final PowerPC ELF ABI. It includes
23 suggestions from the in-progress Embedded PowerPC ABI, and that
24 information may also not match. */
25
26 #include "bfd.h"
27 #include "sysdep.h"
28 #include "bfdlink.h"
29 #include "libbfd.h"
30 #include "elf-bfd.h"
31 #include "elf/ppc.h"
32
33 #define USE_RELA /* we want RELA relocations, not REL */
34
35 static reloc_howto_type *ppc_elf_reloc_type_lookup
36 PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
37 static void ppc_elf_info_to_howto
38 PARAMS ((bfd *abfd, arelent *cache_ptr, Elf32_Internal_Rela *dst));
39 static void ppc_elf_howto_init PARAMS ((void));
40 static bfd_reloc_status_type ppc_elf_addr16_ha_reloc
41 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
42 static boolean ppc_elf_set_private_flags PARAMS ((bfd *, flagword));
43 static boolean ppc_elf_copy_private_bfd_data PARAMS ((bfd *, bfd *));
44 static boolean ppc_elf_merge_private_bfd_data PARAMS ((bfd *, bfd *));
45
46 static int ppc_elf_additional_program_headers PARAMS ((bfd *));
47 static boolean ppc_elf_modify_segment_map PARAMS ((bfd *));
48
49 static boolean ppc_elf_create_dynamic_sections
50 PARAMS ((bfd *, struct bfd_link_info *));
51
52 static boolean ppc_elf_section_from_shdr PARAMS ((bfd *,
53 Elf32_Internal_Shdr *,
54 char *));
55 static boolean ppc_elf_fake_sections
56 PARAMS ((bfd *, Elf32_Internal_Shdr *, asection *));
57
58 static elf_linker_section_t *ppc_elf_create_linker_section
59 PARAMS ((bfd *abfd,
60 struct bfd_link_info *info,
61 enum elf_linker_section_enum));
62
63 static boolean ppc_elf_check_relocs PARAMS ((bfd *,
64 struct bfd_link_info *,
65 asection *,
66 const Elf_Internal_Rela *));
67
68 static asection * ppc_elf_gc_mark_hook PARAMS ((bfd *abfd,
69 struct bfd_link_info *info,
70 Elf_Internal_Rela *rel,
71 struct elf_link_hash_entry *h,
72 Elf_Internal_Sym *sym));
73
74 static boolean ppc_elf_gc_sweep_hook PARAMS ((bfd *abfd,
75 struct bfd_link_info *info,
76 asection *sec,
77 const Elf_Internal_Rela *relocs));
78
79 static boolean ppc_elf_adjust_dynamic_symbol PARAMS ((struct bfd_link_info *,
80 struct elf_link_hash_entry *));
81
82 static boolean ppc_elf_size_dynamic_sections PARAMS ((bfd *, struct bfd_link_info *));
83
84 static boolean ppc_elf_relocate_section PARAMS ((bfd *,
85 struct bfd_link_info *info,
86 bfd *,
87 asection *,
88 bfd_byte *,
89 Elf_Internal_Rela *relocs,
90 Elf_Internal_Sym *local_syms,
91 asection **));
92
93 static boolean ppc_elf_add_symbol_hook PARAMS ((bfd *,
94 struct bfd_link_info *,
95 const Elf_Internal_Sym *,
96 const char **,
97 flagword *,
98 asection **,
99 bfd_vma *));
100
101 static boolean ppc_elf_finish_dynamic_symbol PARAMS ((bfd *,
102 struct bfd_link_info *,
103 struct elf_link_hash_entry *,
104 Elf_Internal_Sym *));
105
106 static boolean ppc_elf_finish_dynamic_sections PARAMS ((bfd *, struct bfd_link_info *));
107
108 #define BRANCH_PREDICT_BIT 0x200000 /* branch prediction bit for branch taken relocs */
109 #define RA_REGISTER_MASK 0x001f0000 /* mask to set RA in memory instructions */
110 #define RA_REGISTER_SHIFT 16 /* value to shift register by to insert RA */
111
112 /* The name of the dynamic interpreter. This is put in the .interp
113 section. */
114
115 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
116
117 /* The size in bytes of an entry in the procedure linkage table. */
118 #define PLT_ENTRY_SIZE 12
119 /* The initial size of the plt reserved for the dynamic linker. */
120 #define PLT_INITIAL_ENTRY_SIZE 72
121 /* The size of the gap between entries in the PLT. */
122 #define PLT_SLOT_SIZE 8
123 /* The number of single-slot PLT entries (the rest use two slots). */
124 #define PLT_NUM_SINGLE_ENTRIES 8192
125
126 /* Will references to this symbol always reference the symbol
127 in this object? */
128 #define SYMBOL_REFERENCES_LOCAL(INFO, H) \
129 ((! INFO->shared \
130 || INFO->symbolic \
131 || H->dynindx == -1 \
132 || ELF_ST_VISIBILITY (H->other) == STV_INTERNAL \
133 || ELF_ST_VISIBILITY (H->other) == STV_HIDDEN) \
134 && (H->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0)
135
136 /* Will _calls_ to this symbol always call the version in this object? */
137 #define SYMBOL_CALLS_LOCAL(INFO, H) \
138 ((! INFO->shared \
139 || INFO->symbolic \
140 || H->dynindx == -1 \
141 || ELF_ST_VISIBILITY (H->other) != STV_DEFAULT) \
142 && (H->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0)
143 \f
144 static reloc_howto_type *ppc_elf_howto_table[(int) R_PPC_max];
145
146 static reloc_howto_type ppc_elf_howto_raw[] = {
147 /* This reloc does nothing. */
148 HOWTO (R_PPC_NONE, /* type */
149 0, /* rightshift */
150 2, /* size (0 = byte, 1 = short, 2 = long) */
151 32, /* bitsize */
152 false, /* pc_relative */
153 0, /* bitpos */
154 complain_overflow_bitfield, /* complain_on_overflow */
155 bfd_elf_generic_reloc, /* special_function */
156 "R_PPC_NONE", /* name */
157 false, /* partial_inplace */
158 0, /* src_mask */
159 0, /* dst_mask */
160 false), /* pcrel_offset */
161
162 /* A standard 32 bit relocation. */
163 HOWTO (R_PPC_ADDR32, /* type */
164 0, /* rightshift */
165 2, /* size (0 = byte, 1 = short, 2 = long) */
166 32, /* bitsize */
167 false, /* pc_relative */
168 0, /* bitpos */
169 complain_overflow_bitfield, /* complain_on_overflow */
170 bfd_elf_generic_reloc, /* special_function */
171 "R_PPC_ADDR32", /* name */
172 false, /* partial_inplace */
173 0, /* src_mask */
174 0xffffffff, /* dst_mask */
175 false), /* pcrel_offset */
176
177 /* An absolute 26 bit branch; the lower two bits must be zero.
178 FIXME: we don't check that, we just clear them. */
179 HOWTO (R_PPC_ADDR24, /* type */
180 0, /* rightshift */
181 2, /* size (0 = byte, 1 = short, 2 = long) */
182 26, /* bitsize */
183 false, /* pc_relative */
184 0, /* bitpos */
185 complain_overflow_bitfield, /* complain_on_overflow */
186 bfd_elf_generic_reloc, /* special_function */
187 "R_PPC_ADDR24", /* name */
188 false, /* partial_inplace */
189 0, /* src_mask */
190 0x3fffffc, /* dst_mask */
191 false), /* pcrel_offset */
192
193 /* A standard 16 bit relocation. */
194 HOWTO (R_PPC_ADDR16, /* type */
195 0, /* rightshift */
196 1, /* size (0 = byte, 1 = short, 2 = long) */
197 16, /* bitsize */
198 false, /* pc_relative */
199 0, /* bitpos */
200 complain_overflow_bitfield, /* complain_on_overflow */
201 bfd_elf_generic_reloc, /* special_function */
202 "R_PPC_ADDR16", /* name */
203 false, /* partial_inplace */
204 0, /* src_mask */
205 0xffff, /* dst_mask */
206 false), /* pcrel_offset */
207
208 /* A 16 bit relocation without overflow. */
209 HOWTO (R_PPC_ADDR16_LO, /* type */
210 0, /* rightshift */
211 1, /* size (0 = byte, 1 = short, 2 = long) */
212 16, /* bitsize */
213 false, /* pc_relative */
214 0, /* bitpos */
215 complain_overflow_dont,/* complain_on_overflow */
216 bfd_elf_generic_reloc, /* special_function */
217 "R_PPC_ADDR16_LO", /* name */
218 false, /* partial_inplace */
219 0, /* src_mask */
220 0xffff, /* dst_mask */
221 false), /* pcrel_offset */
222
223 /* The high order 16 bits of an address. */
224 HOWTO (R_PPC_ADDR16_HI, /* type */
225 16, /* rightshift */
226 1, /* size (0 = byte, 1 = short, 2 = long) */
227 16, /* bitsize */
228 false, /* pc_relative */
229 0, /* bitpos */
230 complain_overflow_dont, /* complain_on_overflow */
231 bfd_elf_generic_reloc, /* special_function */
232 "R_PPC_ADDR16_HI", /* name */
233 false, /* partial_inplace */
234 0, /* src_mask */
235 0xffff, /* dst_mask */
236 false), /* pcrel_offset */
237
238 /* The high order 16 bits of an address, plus 1 if the contents of
239 the low 16 bits, treated as a signed number, is negative. */
240 HOWTO (R_PPC_ADDR16_HA, /* type */
241 16, /* rightshift */
242 1, /* size (0 = byte, 1 = short, 2 = long) */
243 16, /* bitsize */
244 false, /* pc_relative */
245 0, /* bitpos */
246 complain_overflow_dont, /* complain_on_overflow */
247 ppc_elf_addr16_ha_reloc, /* special_function */
248 "R_PPC_ADDR16_HA", /* name */
249 false, /* partial_inplace */
250 0, /* src_mask */
251 0xffff, /* dst_mask */
252 false), /* pcrel_offset */
253
254 /* An absolute 16 bit branch; the lower two bits must be zero.
255 FIXME: we don't check that, we just clear them. */
256 HOWTO (R_PPC_ADDR14, /* type */
257 0, /* rightshift */
258 2, /* size (0 = byte, 1 = short, 2 = long) */
259 16, /* bitsize */
260 false, /* pc_relative */
261 0, /* bitpos */
262 complain_overflow_bitfield, /* complain_on_overflow */
263 bfd_elf_generic_reloc, /* special_function */
264 "R_PPC_ADDR14", /* name */
265 false, /* partial_inplace */
266 0, /* src_mask */
267 0xfffc, /* dst_mask */
268 false), /* pcrel_offset */
269
270 /* An absolute 16 bit branch, for which bit 10 should be set to
271 indicate that the branch is expected to be taken. The lower two
272 bits must be zero. */
273 HOWTO (R_PPC_ADDR14_BRTAKEN, /* type */
274 0, /* rightshift */
275 2, /* size (0 = byte, 1 = short, 2 = long) */
276 16, /* bitsize */
277 false, /* pc_relative */
278 0, /* bitpos */
279 complain_overflow_bitfield, /* complain_on_overflow */
280 bfd_elf_generic_reloc, /* special_function */
281 "R_PPC_ADDR14_BRTAKEN",/* name */
282 false, /* partial_inplace */
283 0, /* src_mask */
284 0xfffc, /* dst_mask */
285 false), /* pcrel_offset */
286
287 /* An absolute 16 bit branch, for which bit 10 should be set to
288 indicate that the branch is not expected to be taken. The lower
289 two bits must be zero. */
290 HOWTO (R_PPC_ADDR14_BRNTAKEN, /* type */
291 0, /* rightshift */
292 2, /* size (0 = byte, 1 = short, 2 = long) */
293 16, /* bitsize */
294 false, /* pc_relative */
295 0, /* bitpos */
296 complain_overflow_bitfield, /* complain_on_overflow */
297 bfd_elf_generic_reloc, /* special_function */
298 "R_PPC_ADDR14_BRNTAKEN",/* name */
299 false, /* partial_inplace */
300 0, /* src_mask */
301 0xfffc, /* dst_mask */
302 false), /* pcrel_offset */
303
304 /* A relative 26 bit branch; the lower two bits must be zero. */
305 HOWTO (R_PPC_REL24, /* type */
306 0, /* rightshift */
307 2, /* size (0 = byte, 1 = short, 2 = long) */
308 26, /* bitsize */
309 true, /* pc_relative */
310 0, /* bitpos */
311 complain_overflow_signed, /* complain_on_overflow */
312 bfd_elf_generic_reloc, /* special_function */
313 "R_PPC_REL24", /* name */
314 false, /* partial_inplace */
315 0, /* src_mask */
316 0x3fffffc, /* dst_mask */
317 true), /* pcrel_offset */
318
319 /* A relative 16 bit branch; the lower two bits must be zero. */
320 HOWTO (R_PPC_REL14, /* type */
321 0, /* rightshift */
322 2, /* size (0 = byte, 1 = short, 2 = long) */
323 16, /* bitsize */
324 true, /* pc_relative */
325 0, /* bitpos */
326 complain_overflow_signed, /* complain_on_overflow */
327 bfd_elf_generic_reloc, /* special_function */
328 "R_PPC_REL14", /* name */
329 false, /* partial_inplace */
330 0, /* src_mask */
331 0xfffc, /* dst_mask */
332 true), /* pcrel_offset */
333
334 /* A relative 16 bit branch. Bit 10 should be set to indicate that
335 the branch is expected to be taken. The lower two bits must be
336 zero. */
337 HOWTO (R_PPC_REL14_BRTAKEN, /* type */
338 0, /* rightshift */
339 2, /* size (0 = byte, 1 = short, 2 = long) */
340 16, /* bitsize */
341 true, /* pc_relative */
342 0, /* bitpos */
343 complain_overflow_signed, /* complain_on_overflow */
344 bfd_elf_generic_reloc, /* special_function */
345 "R_PPC_REL14_BRTAKEN", /* name */
346 false, /* partial_inplace */
347 0, /* src_mask */
348 0xfffc, /* dst_mask */
349 true), /* pcrel_offset */
350
351 /* A relative 16 bit branch. Bit 10 should be set to indicate that
352 the branch is not expected to be taken. The lower two bits must
353 be zero. */
354 HOWTO (R_PPC_REL14_BRNTAKEN, /* type */
355 0, /* rightshift */
356 2, /* size (0 = byte, 1 = short, 2 = long) */
357 16, /* bitsize */
358 true, /* pc_relative */
359 0, /* bitpos */
360 complain_overflow_signed, /* complain_on_overflow */
361 bfd_elf_generic_reloc, /* special_function */
362 "R_PPC_REL14_BRNTAKEN",/* name */
363 false, /* partial_inplace */
364 0, /* src_mask */
365 0xfffc, /* dst_mask */
366 true), /* pcrel_offset */
367
368 /* Like R_PPC_ADDR16, but referring to the GOT table entry for the
369 symbol. */
370 HOWTO (R_PPC_GOT16, /* type */
371 0, /* rightshift */
372 1, /* size (0 = byte, 1 = short, 2 = long) */
373 16, /* bitsize */
374 false, /* pc_relative */
375 0, /* bitpos */
376 complain_overflow_signed, /* complain_on_overflow */
377 bfd_elf_generic_reloc, /* special_function */
378 "R_PPC_GOT16", /* name */
379 false, /* partial_inplace */
380 0, /* src_mask */
381 0xffff, /* dst_mask */
382 false), /* pcrel_offset */
383
384 /* Like R_PPC_ADDR16_LO, but referring to the GOT table entry for
385 the symbol. */
386 HOWTO (R_PPC_GOT16_LO, /* type */
387 0, /* rightshift */
388 1, /* size (0 = byte, 1 = short, 2 = long) */
389 16, /* bitsize */
390 false, /* pc_relative */
391 0, /* bitpos */
392 complain_overflow_dont, /* complain_on_overflow */
393 bfd_elf_generic_reloc, /* special_function */
394 "R_PPC_GOT16_LO", /* name */
395 false, /* partial_inplace */
396 0, /* src_mask */
397 0xffff, /* dst_mask */
398 false), /* pcrel_offset */
399
400 /* Like R_PPC_ADDR16_HI, but referring to the GOT table entry for
401 the symbol. */
402 HOWTO (R_PPC_GOT16_HI, /* type */
403 16, /* rightshift */
404 1, /* size (0 = byte, 1 = short, 2 = long) */
405 16, /* bitsize */
406 false, /* pc_relative */
407 0, /* bitpos */
408 complain_overflow_bitfield, /* complain_on_overflow */
409 bfd_elf_generic_reloc, /* special_function */
410 "R_PPC_GOT16_HI", /* name */
411 false, /* partial_inplace */
412 0, /* src_mask */
413 0xffff, /* dst_mask */
414 false), /* pcrel_offset */
415
416 /* Like R_PPC_ADDR16_HA, but referring to the GOT table entry for
417 the symbol. */
418 HOWTO (R_PPC_GOT16_HA, /* type */
419 16, /* rightshift */
420 1, /* size (0 = byte, 1 = short, 2 = long) */
421 16, /* bitsize */
422 false, /* pc_relative */
423 0, /* bitpos */
424 complain_overflow_bitfield, /* complain_on_overflow */
425 ppc_elf_addr16_ha_reloc, /* special_function */
426 "R_PPC_GOT16_HA", /* name */
427 false, /* partial_inplace */
428 0, /* src_mask */
429 0xffff, /* dst_mask */
430 false), /* pcrel_offset */
431
432 /* Like R_PPC_REL24, but referring to the procedure linkage table
433 entry for the symbol. */
434 HOWTO (R_PPC_PLTREL24, /* type */
435 0, /* rightshift */
436 2, /* size (0 = byte, 1 = short, 2 = long) */
437 26, /* bitsize */
438 true, /* pc_relative */
439 0, /* bitpos */
440 complain_overflow_signed, /* complain_on_overflow */
441 bfd_elf_generic_reloc, /* special_function */
442 "R_PPC_PLTREL24", /* name */
443 false, /* partial_inplace */
444 0, /* src_mask */
445 0x3fffffc, /* dst_mask */
446 true), /* pcrel_offset */
447
448 /* This is used only by the dynamic linker. The symbol should exist
449 both in the object being run and in some shared library. The
450 dynamic linker copies the data addressed by the symbol from the
451 shared library into the object, because the object being
452 run has to have the data at some particular address. */
453 HOWTO (R_PPC_COPY, /* type */
454 0, /* rightshift */
455 2, /* size (0 = byte, 1 = short, 2 = long) */
456 32, /* bitsize */
457 false, /* pc_relative */
458 0, /* bitpos */
459 complain_overflow_bitfield, /* complain_on_overflow */
460 bfd_elf_generic_reloc, /* special_function */
461 "R_PPC_COPY", /* name */
462 false, /* partial_inplace */
463 0, /* src_mask */
464 0, /* dst_mask */
465 false), /* pcrel_offset */
466
467 /* Like R_PPC_ADDR32, but used when setting global offset table
468 entries. */
469 HOWTO (R_PPC_GLOB_DAT, /* type */
470 0, /* rightshift */
471 2, /* size (0 = byte, 1 = short, 2 = long) */
472 32, /* bitsize */
473 false, /* pc_relative */
474 0, /* bitpos */
475 complain_overflow_bitfield, /* complain_on_overflow */
476 bfd_elf_generic_reloc, /* special_function */
477 "R_PPC_GLOB_DAT", /* name */
478 false, /* partial_inplace */
479 0, /* src_mask */
480 0xffffffff, /* dst_mask */
481 false), /* pcrel_offset */
482
483 /* Marks a procedure linkage table entry for a symbol. */
484 HOWTO (R_PPC_JMP_SLOT, /* type */
485 0, /* rightshift */
486 2, /* size (0 = byte, 1 = short, 2 = long) */
487 32, /* bitsize */
488 false, /* pc_relative */
489 0, /* bitpos */
490 complain_overflow_bitfield, /* complain_on_overflow */
491 bfd_elf_generic_reloc, /* special_function */
492 "R_PPC_JMP_SLOT", /* name */
493 false, /* partial_inplace */
494 0, /* src_mask */
495 0, /* dst_mask */
496 false), /* pcrel_offset */
497
498 /* Used only by the dynamic linker. When the object is run, this
499 longword is set to the load address of the object, plus the
500 addend. */
501 HOWTO (R_PPC_RELATIVE, /* type */
502 0, /* rightshift */
503 2, /* size (0 = byte, 1 = short, 2 = long) */
504 32, /* bitsize */
505 false, /* pc_relative */
506 0, /* bitpos */
507 complain_overflow_bitfield, /* complain_on_overflow */
508 bfd_elf_generic_reloc, /* special_function */
509 "R_PPC_RELATIVE", /* name */
510 false, /* partial_inplace */
511 0, /* src_mask */
512 0xffffffff, /* dst_mask */
513 false), /* pcrel_offset */
514
515 /* Like R_PPC_REL24, but uses the value of the symbol within the
516 object rather than the final value. Normally used for
517 _GLOBAL_OFFSET_TABLE_. */
518 HOWTO (R_PPC_LOCAL24PC, /* type */
519 0, /* rightshift */
520 2, /* size (0 = byte, 1 = short, 2 = long) */
521 26, /* bitsize */
522 true, /* pc_relative */
523 0, /* bitpos */
524 complain_overflow_signed, /* complain_on_overflow */
525 bfd_elf_generic_reloc, /* special_function */
526 "R_PPC_LOCAL24PC", /* name */
527 false, /* partial_inplace */
528 0, /* src_mask */
529 0x3fffffc, /* dst_mask */
530 true), /* pcrel_offset */
531
532 /* Like R_PPC_ADDR32, but may be unaligned. */
533 HOWTO (R_PPC_UADDR32, /* type */
534 0, /* rightshift */
535 2, /* size (0 = byte, 1 = short, 2 = long) */
536 32, /* bitsize */
537 false, /* pc_relative */
538 0, /* bitpos */
539 complain_overflow_bitfield, /* complain_on_overflow */
540 bfd_elf_generic_reloc, /* special_function */
541 "R_PPC_UADDR32", /* name */
542 false, /* partial_inplace */
543 0, /* src_mask */
544 0xffffffff, /* dst_mask */
545 false), /* pcrel_offset */
546
547 /* Like R_PPC_ADDR16, but may be unaligned. */
548 HOWTO (R_PPC_UADDR16, /* type */
549 0, /* rightshift */
550 1, /* size (0 = byte, 1 = short, 2 = long) */
551 16, /* bitsize */
552 false, /* pc_relative */
553 0, /* bitpos */
554 complain_overflow_bitfield, /* complain_on_overflow */
555 bfd_elf_generic_reloc, /* special_function */
556 "R_PPC_UADDR16", /* name */
557 false, /* partial_inplace */
558 0, /* src_mask */
559 0xffff, /* dst_mask */
560 false), /* pcrel_offset */
561
562 /* 32-bit PC relative */
563 HOWTO (R_PPC_REL32, /* type */
564 0, /* rightshift */
565 2, /* size (0 = byte, 1 = short, 2 = long) */
566 32, /* bitsize */
567 true, /* pc_relative */
568 0, /* bitpos */
569 complain_overflow_bitfield, /* complain_on_overflow */
570 bfd_elf_generic_reloc, /* special_function */
571 "R_PPC_REL32", /* name */
572 false, /* partial_inplace */
573 0, /* src_mask */
574 0xffffffff, /* dst_mask */
575 true), /* pcrel_offset */
576
577 /* 32-bit relocation to the symbol's procedure linkage table.
578 FIXME: not supported. */
579 HOWTO (R_PPC_PLT32, /* type */
580 0, /* rightshift */
581 2, /* size (0 = byte, 1 = short, 2 = long) */
582 32, /* bitsize */
583 false, /* pc_relative */
584 0, /* bitpos */
585 complain_overflow_bitfield, /* complain_on_overflow */
586 bfd_elf_generic_reloc, /* special_function */
587 "R_PPC_PLT32", /* name */
588 false, /* partial_inplace */
589 0, /* src_mask */
590 0, /* dst_mask */
591 false), /* pcrel_offset */
592
593 /* 32-bit PC relative relocation to the symbol's procedure linkage table.
594 FIXME: not supported. */
595 HOWTO (R_PPC_PLTREL32, /* type */
596 0, /* rightshift */
597 2, /* size (0 = byte, 1 = short, 2 = long) */
598 32, /* bitsize */
599 true, /* pc_relative */
600 0, /* bitpos */
601 complain_overflow_bitfield, /* complain_on_overflow */
602 bfd_elf_generic_reloc, /* special_function */
603 "R_PPC_PLTREL32", /* name */
604 false, /* partial_inplace */
605 0, /* src_mask */
606 0, /* dst_mask */
607 true), /* pcrel_offset */
608
609 /* Like R_PPC_ADDR16_LO, but referring to the PLT table entry for
610 the symbol. */
611 HOWTO (R_PPC_PLT16_LO, /* type */
612 0, /* rightshift */
613 1, /* size (0 = byte, 1 = short, 2 = long) */
614 16, /* bitsize */
615 false, /* pc_relative */
616 0, /* bitpos */
617 complain_overflow_dont, /* complain_on_overflow */
618 bfd_elf_generic_reloc, /* special_function */
619 "R_PPC_PLT16_LO", /* name */
620 false, /* partial_inplace */
621 0, /* src_mask */
622 0xffff, /* dst_mask */
623 false), /* pcrel_offset */
624
625 /* Like R_PPC_ADDR16_HI, but referring to the PLT table entry for
626 the symbol. */
627 HOWTO (R_PPC_PLT16_HI, /* type */
628 16, /* rightshift */
629 1, /* size (0 = byte, 1 = short, 2 = long) */
630 16, /* bitsize */
631 false, /* pc_relative */
632 0, /* bitpos */
633 complain_overflow_bitfield, /* complain_on_overflow */
634 bfd_elf_generic_reloc, /* special_function */
635 "R_PPC_PLT16_HI", /* name */
636 false, /* partial_inplace */
637 0, /* src_mask */
638 0xffff, /* dst_mask */
639 false), /* pcrel_offset */
640
641 /* Like R_PPC_ADDR16_HA, but referring to the PLT table entry for
642 the symbol. */
643 HOWTO (R_PPC_PLT16_HA, /* type */
644 16, /* rightshift */
645 1, /* size (0 = byte, 1 = short, 2 = long) */
646 16, /* bitsize */
647 false, /* pc_relative */
648 0, /* bitpos */
649 complain_overflow_bitfield, /* complain_on_overflow */
650 ppc_elf_addr16_ha_reloc, /* special_function */
651 "R_PPC_PLT16_HA", /* name */
652 false, /* partial_inplace */
653 0, /* src_mask */
654 0xffff, /* dst_mask */
655 false), /* pcrel_offset */
656
657 /* A sign-extended 16 bit value relative to _SDA_BASE_, for use with
658 small data items. */
659 HOWTO (R_PPC_SDAREL16, /* type */
660 0, /* rightshift */
661 1, /* size (0 = byte, 1 = short, 2 = long) */
662 16, /* bitsize */
663 false, /* pc_relative */
664 0, /* bitpos */
665 complain_overflow_signed, /* complain_on_overflow */
666 bfd_elf_generic_reloc, /* special_function */
667 "R_PPC_SDAREL16", /* name */
668 false, /* partial_inplace */
669 0, /* src_mask */
670 0xffff, /* dst_mask */
671 false), /* pcrel_offset */
672
673 /* 32-bit section relative relocation. */
674 HOWTO (R_PPC_SECTOFF, /* type */
675 0, /* rightshift */
676 2, /* size (0 = byte, 1 = short, 2 = long) */
677 32, /* bitsize */
678 true, /* pc_relative */
679 0, /* bitpos */
680 complain_overflow_bitfield, /* complain_on_overflow */
681 bfd_elf_generic_reloc, /* special_function */
682 "R_PPC_SECTOFF", /* name */
683 false, /* partial_inplace */
684 0, /* src_mask */
685 0, /* dst_mask */
686 true), /* pcrel_offset */
687
688 /* 16-bit lower half section relative relocation. */
689 HOWTO (R_PPC_SECTOFF_LO, /* type */
690 0, /* rightshift */
691 1, /* size (0 = byte, 1 = short, 2 = long) */
692 16, /* bitsize */
693 false, /* pc_relative */
694 0, /* bitpos */
695 complain_overflow_dont, /* complain_on_overflow */
696 bfd_elf_generic_reloc, /* special_function */
697 "R_PPC_SECTOFF_LO", /* name */
698 false, /* partial_inplace */
699 0, /* src_mask */
700 0xffff, /* dst_mask */
701 false), /* pcrel_offset */
702
703 /* 16-bit upper half section relative relocation. */
704 HOWTO (R_PPC_SECTOFF_HI, /* type */
705 16, /* rightshift */
706 1, /* size (0 = byte, 1 = short, 2 = long) */
707 16, /* bitsize */
708 false, /* pc_relative */
709 0, /* bitpos */
710 complain_overflow_bitfield, /* complain_on_overflow */
711 bfd_elf_generic_reloc, /* special_function */
712 "R_PPC_SECTOFF_HI", /* name */
713 false, /* partial_inplace */
714 0, /* src_mask */
715 0xffff, /* dst_mask */
716 false), /* pcrel_offset */
717
718 /* 16-bit upper half adjusted section relative relocation. */
719 HOWTO (R_PPC_SECTOFF_HA, /* type */
720 16, /* rightshift */
721 1, /* size (0 = byte, 1 = short, 2 = long) */
722 16, /* bitsize */
723 false, /* pc_relative */
724 0, /* bitpos */
725 complain_overflow_bitfield, /* complain_on_overflow */
726 ppc_elf_addr16_ha_reloc, /* special_function */
727 "R_PPC_SECTOFF_HA", /* name */
728 false, /* partial_inplace */
729 0, /* src_mask */
730 0xffff, /* dst_mask */
731 false), /* pcrel_offset */
732
733 /* The remaining relocs are from the Embedded ELF ABI, and are not
734 in the SVR4 ELF ABI. */
735
736 /* 32 bit value resulting from the addend minus the symbol */
737 HOWTO (R_PPC_EMB_NADDR32, /* type */
738 0, /* rightshift */
739 2, /* size (0 = byte, 1 = short, 2 = long) */
740 32, /* bitsize */
741 false, /* pc_relative */
742 0, /* bitpos */
743 complain_overflow_bitfield, /* complain_on_overflow */
744 bfd_elf_generic_reloc, /* special_function */
745 "R_PPC_EMB_NADDR32", /* name */
746 false, /* partial_inplace */
747 0, /* src_mask */
748 0xffffffff, /* dst_mask */
749 false), /* pcrel_offset */
750
751 /* 16 bit value resulting from the addend minus the symbol */
752 HOWTO (R_PPC_EMB_NADDR16, /* type */
753 0, /* rightshift */
754 1, /* size (0 = byte, 1 = short, 2 = long) */
755 16, /* bitsize */
756 false, /* pc_relative */
757 0, /* bitpos */
758 complain_overflow_bitfield, /* complain_on_overflow */
759 bfd_elf_generic_reloc, /* special_function */
760 "R_PPC_EMB_NADDR16", /* name */
761 false, /* partial_inplace */
762 0, /* src_mask */
763 0xffff, /* dst_mask */
764 false), /* pcrel_offset */
765
766 /* 16 bit value resulting from the addend minus the symbol */
767 HOWTO (R_PPC_EMB_NADDR16_LO, /* type */
768 0, /* rightshift */
769 1, /* size (0 = byte, 1 = short, 2 = long) */
770 16, /* bitsize */
771 false, /* pc_relative */
772 0, /* bitpos */
773 complain_overflow_dont,/* complain_on_overflow */
774 bfd_elf_generic_reloc, /* special_function */
775 "R_PPC_EMB_ADDR16_LO", /* name */
776 false, /* partial_inplace */
777 0, /* src_mask */
778 0xffff, /* dst_mask */
779 false), /* pcrel_offset */
780
781 /* The high order 16 bits of the addend minus the symbol */
782 HOWTO (R_PPC_EMB_NADDR16_HI, /* type */
783 16, /* rightshift */
784 1, /* size (0 = byte, 1 = short, 2 = long) */
785 16, /* bitsize */
786 false, /* pc_relative */
787 0, /* bitpos */
788 complain_overflow_dont, /* complain_on_overflow */
789 bfd_elf_generic_reloc, /* special_function */
790 "R_PPC_EMB_NADDR16_HI", /* name */
791 false, /* partial_inplace */
792 0, /* src_mask */
793 0xffff, /* dst_mask */
794 false), /* pcrel_offset */
795
796 /* The high order 16 bits of the result of the addend minus the address,
797 plus 1 if the contents of the low 16 bits, treated as a signed number,
798 is negative. */
799 HOWTO (R_PPC_EMB_NADDR16_HA, /* type */
800 16, /* rightshift */
801 1, /* size (0 = byte, 1 = short, 2 = long) */
802 16, /* bitsize */
803 false, /* pc_relative */
804 0, /* bitpos */
805 complain_overflow_dont, /* complain_on_overflow */
806 ppc_elf_addr16_ha_reloc, /* special_function */
807 "R_PPC_EMB_NADDR16_HA", /* name */
808 false, /* partial_inplace */
809 0, /* src_mask */
810 0xffff, /* dst_mask */
811 false), /* pcrel_offset */
812
813 /* 16 bit value resulting from allocating a 4 byte word to hold an
814 address in the .sdata section, and returning the offset from
815 _SDA_BASE_ for that relocation */
816 HOWTO (R_PPC_EMB_SDAI16, /* type */
817 0, /* rightshift */
818 1, /* size (0 = byte, 1 = short, 2 = long) */
819 16, /* bitsize */
820 false, /* pc_relative */
821 0, /* bitpos */
822 complain_overflow_bitfield, /* complain_on_overflow */
823 bfd_elf_generic_reloc, /* special_function */
824 "R_PPC_EMB_SDAI16", /* name */
825 false, /* partial_inplace */
826 0, /* src_mask */
827 0xffff, /* dst_mask */
828 false), /* pcrel_offset */
829
830 /* 16 bit value resulting from allocating a 4 byte word to hold an
831 address in the .sdata2 section, and returning the offset from
832 _SDA2_BASE_ for that relocation */
833 HOWTO (R_PPC_EMB_SDA2I16, /* type */
834 0, /* rightshift */
835 1, /* size (0 = byte, 1 = short, 2 = long) */
836 16, /* bitsize */
837 false, /* pc_relative */
838 0, /* bitpos */
839 complain_overflow_bitfield, /* complain_on_overflow */
840 bfd_elf_generic_reloc, /* special_function */
841 "R_PPC_EMB_SDA2I16", /* name */
842 false, /* partial_inplace */
843 0, /* src_mask */
844 0xffff, /* dst_mask */
845 false), /* pcrel_offset */
846
847 /* A sign-extended 16 bit value relative to _SDA2_BASE_, for use with
848 small data items. */
849 HOWTO (R_PPC_EMB_SDA2REL, /* type */
850 0, /* rightshift */
851 1, /* size (0 = byte, 1 = short, 2 = long) */
852 16, /* bitsize */
853 false, /* pc_relative */
854 0, /* bitpos */
855 complain_overflow_signed, /* complain_on_overflow */
856 bfd_elf_generic_reloc, /* special_function */
857 "R_PPC_EMB_SDA2REL", /* name */
858 false, /* partial_inplace */
859 0, /* src_mask */
860 0xffff, /* dst_mask */
861 false), /* pcrel_offset */
862
863 /* Relocate against either _SDA_BASE_ or _SDA2_BASE_, filling in the 16 bit
864 signed offset from the appropriate base, and filling in the register
865 field with the appropriate register (0, 2, or 13). */
866 HOWTO (R_PPC_EMB_SDA21, /* type */
867 0, /* rightshift */
868 2, /* size (0 = byte, 1 = short, 2 = long) */
869 16, /* bitsize */
870 false, /* pc_relative */
871 0, /* bitpos */
872 complain_overflow_signed, /* complain_on_overflow */
873 bfd_elf_generic_reloc, /* special_function */
874 "R_PPC_EMB_SDA21", /* name */
875 false, /* partial_inplace */
876 0, /* src_mask */
877 0xffff, /* dst_mask */
878 false), /* pcrel_offset */
879
880 /* Relocation not handled: R_PPC_EMB_MRKREF */
881 /* Relocation not handled: R_PPC_EMB_RELSEC16 */
882 /* Relocation not handled: R_PPC_EMB_RELST_LO */
883 /* Relocation not handled: R_PPC_EMB_RELST_HI */
884 /* Relocation not handled: R_PPC_EMB_RELST_HA */
885 /* Relocation not handled: R_PPC_EMB_BIT_FLD */
886
887 /* PC relative relocation against either _SDA_BASE_ or _SDA2_BASE_, filling
888 in the 16 bit signed offset from the appropriate base, and filling in the
889 register field with the appropriate register (0, 2, or 13). */
890 HOWTO (R_PPC_EMB_RELSDA, /* type */
891 0, /* rightshift */
892 1, /* size (0 = byte, 1 = short, 2 = long) */
893 16, /* bitsize */
894 true, /* pc_relative */
895 0, /* bitpos */
896 complain_overflow_signed, /* complain_on_overflow */
897 bfd_elf_generic_reloc, /* special_function */
898 "R_PPC_EMB_RELSDA", /* name */
899 false, /* partial_inplace */
900 0, /* src_mask */
901 0xffff, /* dst_mask */
902 false), /* pcrel_offset */
903
904 /* GNU extension to record C++ vtable hierarchy */
905 HOWTO (R_PPC_GNU_VTINHERIT, /* type */
906 0, /* rightshift */
907 0, /* size (0 = byte, 1 = short, 2 = long) */
908 0, /* bitsize */
909 false, /* pc_relative */
910 0, /* bitpos */
911 complain_overflow_dont, /* complain_on_overflow */
912 NULL, /* special_function */
913 "R_PPC_GNU_VTINHERIT", /* name */
914 false, /* partial_inplace */
915 0, /* src_mask */
916 0, /* dst_mask */
917 false), /* pcrel_offset */
918
919 /* GNU extension to record C++ vtable member usage */
920 HOWTO (R_PPC_GNU_VTENTRY, /* type */
921 0, /* rightshift */
922 0, /* size (0 = byte, 1 = short, 2 = long) */
923 0, /* bitsize */
924 false, /* pc_relative */
925 0, /* bitpos */
926 complain_overflow_dont, /* complain_on_overflow */
927 NULL, /* special_function */
928 "R_PPC_GNU_VTENTRY", /* name */
929 false, /* partial_inplace */
930 0, /* src_mask */
931 0, /* dst_mask */
932 false), /* pcrel_offset */
933
934 /* Phony reloc to handle AIX style TOC entries */
935 HOWTO (R_PPC_TOC16, /* type */
936 0, /* rightshift */
937 1, /* size (0 = byte, 1 = short, 2 = long) */
938 16, /* bitsize */
939 false, /* pc_relative */
940 0, /* bitpos */
941 complain_overflow_signed, /* complain_on_overflow */
942 bfd_elf_generic_reloc, /* special_function */
943 "R_PPC_TOC16", /* name */
944 false, /* partial_inplace */
945 0, /* src_mask */
946 0xffff, /* dst_mask */
947 false), /* pcrel_offset */
948 };
949 \f
950 /* Initialize the ppc_elf_howto_table, so that linear accesses can be done. */
951
952 static void
953 ppc_elf_howto_init ()
954 {
955 unsigned int i, type;
956
957 for (i = 0; i < sizeof (ppc_elf_howto_raw) / sizeof (ppc_elf_howto_raw[0]); i++)
958 {
959 type = ppc_elf_howto_raw[i].type;
960 BFD_ASSERT (type < sizeof (ppc_elf_howto_table) / sizeof (ppc_elf_howto_table[0]));
961 ppc_elf_howto_table[type] = &ppc_elf_howto_raw[i];
962 }
963 }
964 \f
965 /* This function handles relaxing for the PPC with option --mpc860c0[=<n>].
966
967 The MPC860, revision C0 or earlier contains a bug in the die.
968 If all of the following conditions are true, the next instruction
969 to be executed *may* be treated as a no-op.
970 1/ A forward branch is executed.
971 2/ The branch is predicted as not taken.
972 3/ The branch is taken.
973 4/ The branch is located in the last 5 words of a page.
974 (The EOP limit is 5 by default but may be specified as any value from 1-10.)
975
976 Our software solution is to detect these problematic branches in a
977 linker pass and modify them as follows:
978 1/ Unconditional branches - Since these are always predicted taken,
979 there is no problem and no action is required.
980 2/ Conditional backward branches - No problem, no action required.
981 3/ Conditional forward branches - Ensure that the "inverse prediction
982 bit" is set (ensure it is predicted taken).
983 4/ Conditional register branches - Ensure that the "y bit" is set
984 (ensure it is predicted taken).
985 */
986
987 /* Sort sections by address. */
988
989 static int
990 ppc_elf_sort_rela (arg1, arg2)
991 const void *arg1;
992 const void *arg2;
993 {
994 const Elf_Internal_Rela **rela1 = (const Elf_Internal_Rela**) arg1;
995 const Elf_Internal_Rela **rela2 = (const Elf_Internal_Rela**) arg2;
996
997 /* Sort by offset. */
998 return ((*rela1)->r_offset - (*rela2)->r_offset);
999 }
1000
1001 static boolean
1002 ppc_elf_relax_section (abfd, isec, link_info, again)
1003 bfd *abfd;
1004 asection *isec;
1005 struct bfd_link_info *link_info;
1006 boolean *again;
1007 {
1008 #define PAGESIZE 0x1000
1009
1010 bfd_byte *contents = NULL;
1011 bfd_byte *free_contents = NULL;
1012 Elf_Internal_Rela *internal_relocs = NULL;
1013 Elf_Internal_Rela *free_relocs = NULL;
1014 Elf_Internal_Rela **rela_comb = NULL;
1015 int comb_curr, comb_count;
1016
1017 /* We never have to do this more than once per input section. */
1018 *again = false;
1019
1020 /* If needed, initialize this section's cooked size. */
1021 if (isec->_cooked_size == 0)
1022 isec->_cooked_size = isec->_raw_size;
1023
1024 /* We're only interested in text sections which overlap the
1025 troublesome area at the end of a page. */
1026 if (link_info->mpc860c0 && (isec->flags & SEC_CODE) && isec->_cooked_size)
1027 {
1028 bfd_vma dot, end_page, end_section;
1029 boolean section_modified;
1030
1031 /* Get the section contents. */
1032 /* Get cached copy if it exists. */
1033 if (elf_section_data (isec)->this_hdr.contents != NULL)
1034 contents = elf_section_data (isec)->this_hdr.contents;
1035 else
1036 {
1037 /* Go get them off disk. */
1038 contents = (bfd_byte *) bfd_malloc (isec->_raw_size);
1039 if (contents == NULL)
1040 goto error_return;
1041 free_contents = contents;
1042
1043 if (! bfd_get_section_contents (abfd, isec, contents,
1044 (file_ptr) 0, isec->_raw_size))
1045 goto error_return;
1046 }
1047
1048 comb_curr = 0;
1049 comb_count = 0;
1050 if (isec->reloc_count)
1051 {
1052 unsigned n;
1053
1054 /* Get a copy of the native relocations. */
1055 internal_relocs = _bfd_elf32_link_read_relocs (
1056 abfd, isec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
1057 link_info->keep_memory);
1058 if (internal_relocs == NULL)
1059 goto error_return;
1060 if (! link_info->keep_memory)
1061 free_relocs = internal_relocs;
1062
1063 /* Setup a faster access method for the reloc info we need. */
1064 rela_comb = (Elf_Internal_Rela**)
1065 bfd_malloc (isec->reloc_count*sizeof (Elf_Internal_Rela*));
1066 if (rela_comb == NULL)
1067 goto error_return;
1068 for (n = 0; n < isec->reloc_count; ++n)
1069 {
1070 long r_type;
1071
1072 r_type = ELF32_R_TYPE (internal_relocs[n].r_info);
1073 if (r_type < 0 || r_type >= (int) R_PPC_max)
1074 goto error_return;
1075
1076 /* Prologue constants are sometimes present in the ".text"
1077 sections and they can be identified by their associated relocation.
1078 We don't want to process those words and some others which
1079 can also be identified by their relocations. However, not all
1080 conditional branches will have a relocation so we will
1081 only ignore words that 1) have a reloc, and 2) the reloc
1082 is not applicable to a conditional branch.
1083 The array rela_comb is built here for use in the EOP scan loop. */
1084 switch (r_type)
1085 {
1086 case R_PPC_ADDR14_BRNTAKEN: /* absolute, predicted not taken */
1087 case R_PPC_REL14: /* relative cond. br. */
1088 case R_PPC_REL14_BRNTAKEN: /* rel. cond. br., predicted not taken */
1089 /* We should check the instruction. */
1090 break;
1091 default:
1092 /* The word is not a conditional branch - ignore it. */
1093 rela_comb[comb_count++] = &internal_relocs[n];
1094 break;
1095 }
1096 }
1097 if (comb_count > 1)
1098 qsort (rela_comb, (size_t) comb_count, sizeof (int), ppc_elf_sort_rela);
1099 }
1100
1101 /* Enumerate each EOP region that overlaps this section. */
1102 end_section = isec->vma + isec->_cooked_size;
1103 dot = end_page = (isec->vma | (PAGESIZE - 1)) + 1;
1104 dot -= link_info->mpc860c0;
1105 section_modified = false;
1106 if (dot < isec->vma) /* Increment the start position if this section */
1107 dot = isec->vma; /* begins in the middle of its first EOP region. */
1108 for (;
1109 dot < end_section;
1110 dot += PAGESIZE, end_page += PAGESIZE)
1111 {
1112
1113 /* Check each word in this EOP region. */
1114 for (; dot < end_page; dot += 4)
1115 {
1116 bfd_vma isec_offset;
1117 unsigned long insn;
1118 boolean skip, modified;
1119
1120 /* Don't process this word if there is a relocation for it and
1121 the relocation indicates the word is not a conditional branch. */
1122 skip = false;
1123 isec_offset = dot - isec->vma;
1124 for (; comb_curr<comb_count; ++comb_curr)
1125 {
1126 bfd_vma r_offset;
1127
1128 r_offset = rela_comb[comb_curr]->r_offset;
1129 if (r_offset >= isec_offset)
1130 {
1131 if (r_offset == isec_offset) skip = true;
1132 break;
1133 }
1134 }
1135 if (skip) continue;
1136
1137 /* Check the current word for a problematic conditional branch. */
1138 #define BO0(insn) ((insn) & 0x02000000)
1139 #define BO2(insn) ((insn) & 0x00800000)
1140 #define BO4(insn) ((insn) & 0x00200000)
1141 insn = (unsigned long) bfd_get_32 (abfd, contents + isec_offset);
1142 modified = false;
1143 if ((insn & 0xFc000000) == 0x40000000)
1144 {
1145 /* Instruction is BCx */
1146 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1147 {
1148 bfd_vma target;
1149 /* This branch is predicted as "normal".
1150 If this is a forward branch, it is problematic. */
1151
1152 target = insn & 0x0000Fffc; /*extract*/
1153 target = (target ^ 0x8000) - 0x8000; /*sign extend*/
1154 if ((insn & 0x00000002) == 0)
1155 target += dot; /*convert to abs*/
1156 if (target > dot)
1157 {
1158 insn |= 0x00200000; /* set the prediction bit */
1159 modified = true;
1160 }
1161 }
1162 }
1163 else if ((insn & 0xFc00Fffe) == 0x4c000420)
1164 {
1165 /* Instruction is BCCTRx */
1166 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1167 {
1168 /* This branch is predicted as not-taken.
1169 If this is a forward branch, it is problematic.
1170 Since we can't tell statically if it will branch forward,
1171 always set the prediction bit. */
1172 insn |= 0x00200000; /* set the prediction bit */
1173 modified = true;
1174 }
1175 }
1176 else if ((insn & 0xFc00Fffe) == 0x4c000020)
1177 {
1178 /* Instruction is BCLRx */
1179 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1180 {
1181 /* This branch is predicted as not-taken.
1182 If this is a forward branch, it is problematic.
1183 Since we can't tell statically if it will branch forward,
1184 always set the prediction bit. */
1185 insn |= 0x00200000; /* set the prediction bit */
1186 modified = true;
1187 }
1188 }
1189 #undef BO0
1190 #undef BO2
1191 #undef BO4
1192 if (modified)
1193 {
1194 bfd_put_32 (abfd, insn, contents + isec_offset);
1195 section_modified = true;
1196 }
1197 }
1198 }
1199 if (section_modified)
1200 {
1201 elf_section_data (isec)->this_hdr.contents = contents;
1202 free_contents = NULL;
1203 }
1204 }
1205
1206 if (rela_comb != NULL)
1207 {
1208 free (rela_comb);
1209 rela_comb = NULL;
1210 }
1211
1212 if (free_relocs != NULL)
1213 {
1214 free (free_relocs);
1215 free_relocs = NULL;
1216 }
1217
1218 if (free_contents != NULL)
1219 {
1220 if (! link_info->keep_memory)
1221 free (free_contents);
1222 else
1223 {
1224 /* Cache the section contents for elf_link_input_bfd. */
1225 elf_section_data (isec)->this_hdr.contents = contents;
1226 }
1227 free_contents = NULL;
1228 }
1229
1230 return true;
1231
1232 error_return:
1233 if (rela_comb != NULL)
1234 free (rela_comb);
1235 if (free_relocs != NULL)
1236 free (free_relocs);
1237 if (free_contents != NULL)
1238 free (free_contents);
1239 return false;
1240 }
1241 \f
1242 static reloc_howto_type *
1243 ppc_elf_reloc_type_lookup (abfd, code)
1244 bfd *abfd ATTRIBUTE_UNUSED;
1245 bfd_reloc_code_real_type code;
1246 {
1247 enum elf_ppc_reloc_type ppc_reloc = R_PPC_NONE;
1248
1249 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1250 /* Initialize howto table if needed. */
1251 ppc_elf_howto_init ();
1252
1253 switch ((int) code)
1254 {
1255 default:
1256 return (reloc_howto_type *) NULL;
1257
1258 case BFD_RELOC_NONE: ppc_reloc = R_PPC_NONE; break;
1259 case BFD_RELOC_32: ppc_reloc = R_PPC_ADDR32; break;
1260 case BFD_RELOC_PPC_BA26: ppc_reloc = R_PPC_ADDR24; break;
1261 case BFD_RELOC_16: ppc_reloc = R_PPC_ADDR16; break;
1262 case BFD_RELOC_LO16: ppc_reloc = R_PPC_ADDR16_LO; break;
1263 case BFD_RELOC_HI16: ppc_reloc = R_PPC_ADDR16_HI; break;
1264 case BFD_RELOC_HI16_S: ppc_reloc = R_PPC_ADDR16_HA; break;
1265 case BFD_RELOC_PPC_BA16: ppc_reloc = R_PPC_ADDR14; break;
1266 case BFD_RELOC_PPC_BA16_BRTAKEN: ppc_reloc = R_PPC_ADDR14_BRTAKEN; break;
1267 case BFD_RELOC_PPC_BA16_BRNTAKEN: ppc_reloc = R_PPC_ADDR14_BRNTAKEN; break;
1268 case BFD_RELOC_PPC_B26: ppc_reloc = R_PPC_REL24; break;
1269 case BFD_RELOC_PPC_B16: ppc_reloc = R_PPC_REL14; break;
1270 case BFD_RELOC_PPC_B16_BRTAKEN: ppc_reloc = R_PPC_REL14_BRTAKEN; break;
1271 case BFD_RELOC_PPC_B16_BRNTAKEN: ppc_reloc = R_PPC_REL14_BRNTAKEN; break;
1272 case BFD_RELOC_16_GOTOFF: ppc_reloc = R_PPC_GOT16; break;
1273 case BFD_RELOC_LO16_GOTOFF: ppc_reloc = R_PPC_GOT16_LO; break;
1274 case BFD_RELOC_HI16_GOTOFF: ppc_reloc = R_PPC_GOT16_HI; break;
1275 case BFD_RELOC_HI16_S_GOTOFF: ppc_reloc = R_PPC_GOT16_HA; break;
1276 case BFD_RELOC_24_PLT_PCREL: ppc_reloc = R_PPC_PLTREL24; break;
1277 case BFD_RELOC_PPC_COPY: ppc_reloc = R_PPC_COPY; break;
1278 case BFD_RELOC_PPC_GLOB_DAT: ppc_reloc = R_PPC_GLOB_DAT; break;
1279 case BFD_RELOC_PPC_LOCAL24PC: ppc_reloc = R_PPC_LOCAL24PC; break;
1280 case BFD_RELOC_32_PCREL: ppc_reloc = R_PPC_REL32; break;
1281 case BFD_RELOC_32_PLTOFF: ppc_reloc = R_PPC_PLT32; break;
1282 case BFD_RELOC_32_PLT_PCREL: ppc_reloc = R_PPC_PLTREL32; break;
1283 case BFD_RELOC_LO16_PLTOFF: ppc_reloc = R_PPC_PLT16_LO; break;
1284 case BFD_RELOC_HI16_PLTOFF: ppc_reloc = R_PPC_PLT16_HI; break;
1285 case BFD_RELOC_HI16_S_PLTOFF: ppc_reloc = R_PPC_PLT16_HA; break;
1286 case BFD_RELOC_GPREL16: ppc_reloc = R_PPC_SDAREL16; break;
1287 case BFD_RELOC_32_BASEREL: ppc_reloc = R_PPC_SECTOFF; break;
1288 case BFD_RELOC_LO16_BASEREL: ppc_reloc = R_PPC_SECTOFF_LO; break;
1289 case BFD_RELOC_HI16_BASEREL: ppc_reloc = R_PPC_SECTOFF_HI; break;
1290 case BFD_RELOC_HI16_S_BASEREL: ppc_reloc = R_PPC_SECTOFF_HA; break;
1291 case BFD_RELOC_CTOR: ppc_reloc = R_PPC_ADDR32; break;
1292 case BFD_RELOC_PPC_TOC16: ppc_reloc = R_PPC_TOC16; break;
1293 case BFD_RELOC_PPC_EMB_NADDR32: ppc_reloc = R_PPC_EMB_NADDR32; break;
1294 case BFD_RELOC_PPC_EMB_NADDR16: ppc_reloc = R_PPC_EMB_NADDR16; break;
1295 case BFD_RELOC_PPC_EMB_NADDR16_LO: ppc_reloc = R_PPC_EMB_NADDR16_LO; break;
1296 case BFD_RELOC_PPC_EMB_NADDR16_HI: ppc_reloc = R_PPC_EMB_NADDR16_HI; break;
1297 case BFD_RELOC_PPC_EMB_NADDR16_HA: ppc_reloc = R_PPC_EMB_NADDR16_HA; break;
1298 case BFD_RELOC_PPC_EMB_SDAI16: ppc_reloc = R_PPC_EMB_SDAI16; break;
1299 case BFD_RELOC_PPC_EMB_SDA2I16: ppc_reloc = R_PPC_EMB_SDA2I16; break;
1300 case BFD_RELOC_PPC_EMB_SDA2REL: ppc_reloc = R_PPC_EMB_SDA2REL; break;
1301 case BFD_RELOC_PPC_EMB_SDA21: ppc_reloc = R_PPC_EMB_SDA21; break;
1302 case BFD_RELOC_PPC_EMB_MRKREF: ppc_reloc = R_PPC_EMB_MRKREF; break;
1303 case BFD_RELOC_PPC_EMB_RELSEC16: ppc_reloc = R_PPC_EMB_RELSEC16; break;
1304 case BFD_RELOC_PPC_EMB_RELST_LO: ppc_reloc = R_PPC_EMB_RELST_LO; break;
1305 case BFD_RELOC_PPC_EMB_RELST_HI: ppc_reloc = R_PPC_EMB_RELST_HI; break;
1306 case BFD_RELOC_PPC_EMB_RELST_HA: ppc_reloc = R_PPC_EMB_RELST_HA; break;
1307 case BFD_RELOC_PPC_EMB_BIT_FLD: ppc_reloc = R_PPC_EMB_BIT_FLD; break;
1308 case BFD_RELOC_PPC_EMB_RELSDA: ppc_reloc = R_PPC_EMB_RELSDA; break;
1309 case BFD_RELOC_VTABLE_INHERIT: ppc_reloc = R_PPC_GNU_VTINHERIT; break;
1310 case BFD_RELOC_VTABLE_ENTRY: ppc_reloc = R_PPC_GNU_VTENTRY; break;
1311 }
1312
1313 return ppc_elf_howto_table[(int) ppc_reloc];
1314 };
1315
1316 /* Set the howto pointer for a PowerPC ELF reloc. */
1317
1318 static void
1319 ppc_elf_info_to_howto (abfd, cache_ptr, dst)
1320 bfd *abfd ATTRIBUTE_UNUSED;
1321 arelent *cache_ptr;
1322 Elf32_Internal_Rela *dst;
1323 {
1324 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1325 /* Initialize howto table if needed. */
1326 ppc_elf_howto_init ();
1327
1328 BFD_ASSERT (ELF32_R_TYPE (dst->r_info) < (unsigned int) R_PPC_max);
1329 cache_ptr->howto = ppc_elf_howto_table[ELF32_R_TYPE (dst->r_info)];
1330 }
1331
1332 /* Handle the R_PPC_ADDR16_HA reloc. */
1333
1334 static bfd_reloc_status_type
1335 ppc_elf_addr16_ha_reloc (abfd, reloc_entry, symbol, data, input_section,
1336 output_bfd, error_message)
1337 bfd *abfd ATTRIBUTE_UNUSED;
1338 arelent *reloc_entry;
1339 asymbol *symbol;
1340 PTR data ATTRIBUTE_UNUSED;
1341 asection *input_section;
1342 bfd *output_bfd;
1343 char **error_message ATTRIBUTE_UNUSED;
1344 {
1345 bfd_vma relocation;
1346
1347 if (output_bfd != NULL)
1348 {
1349 reloc_entry->address += input_section->output_offset;
1350 return bfd_reloc_ok;
1351 }
1352
1353 if (reloc_entry->address > input_section->_cooked_size)
1354 return bfd_reloc_outofrange;
1355
1356 if (bfd_is_com_section (symbol->section))
1357 relocation = 0;
1358 else
1359 relocation = symbol->value;
1360
1361 relocation += symbol->section->output_section->vma;
1362 relocation += symbol->section->output_offset;
1363 relocation += reloc_entry->addend;
1364
1365 reloc_entry->addend += (relocation & 0x8000) << 1;
1366
1367 return bfd_reloc_continue;
1368 }
1369
1370 /* Function to set whether a module needs the -mrelocatable bit set. */
1371
1372 static boolean
1373 ppc_elf_set_private_flags (abfd, flags)
1374 bfd *abfd;
1375 flagword flags;
1376 {
1377 BFD_ASSERT (!elf_flags_init (abfd)
1378 || elf_elfheader (abfd)->e_flags == flags);
1379
1380 elf_elfheader (abfd)->e_flags = flags;
1381 elf_flags_init (abfd) = true;
1382 return true;
1383 }
1384
1385 /* Copy backend specific data from one object module to another */
1386 static boolean
1387 ppc_elf_copy_private_bfd_data (ibfd, obfd)
1388 bfd *ibfd;
1389 bfd *obfd;
1390 {
1391 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
1392 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
1393 return true;
1394
1395 BFD_ASSERT (!elf_flags_init (obfd)
1396 || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
1397
1398 elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
1399 elf_flags_init (obfd) = true;
1400 return true;
1401 }
1402
1403 /* Merge backend specific data from an object file to the output
1404 object file when linking */
1405 static boolean
1406 ppc_elf_merge_private_bfd_data (ibfd, obfd)
1407 bfd *ibfd;
1408 bfd *obfd;
1409 {
1410 flagword old_flags;
1411 flagword new_flags;
1412 boolean error;
1413
1414 /* Check if we have the same endianess */
1415 if (_bfd_generic_verify_endian_match (ibfd, obfd) == false)
1416 return false;
1417
1418 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
1419 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
1420 return true;
1421
1422 new_flags = elf_elfheader (ibfd)->e_flags;
1423 old_flags = elf_elfheader (obfd)->e_flags;
1424 if (!elf_flags_init (obfd)) /* First call, no flags set */
1425 {
1426 elf_flags_init (obfd) = true;
1427 elf_elfheader (obfd)->e_flags = new_flags;
1428 }
1429
1430 else if (new_flags == old_flags) /* Compatible flags are ok */
1431 ;
1432
1433 else /* Incompatible flags */
1434 {
1435 /* Warn about -mrelocatable mismatch. Allow -mrelocatable-lib to be linked
1436 with either. */
1437 error = false;
1438 if ((new_flags & EF_PPC_RELOCATABLE) != 0
1439 && (old_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0)
1440 {
1441 error = true;
1442 (*_bfd_error_handler)
1443 (_("%s: compiled with -mrelocatable and linked with modules compiled normally"),
1444 bfd_get_filename (ibfd));
1445 }
1446 else if ((new_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0
1447 && (old_flags & EF_PPC_RELOCATABLE) != 0)
1448 {
1449 error = true;
1450 (*_bfd_error_handler)
1451 (_("%s: compiled normally and linked with modules compiled with -mrelocatable"),
1452 bfd_get_filename (ibfd));
1453 }
1454
1455 /* The output is -mrelocatable-lib iff both the input files are. */
1456 if (! (new_flags & EF_PPC_RELOCATABLE_LIB))
1457 elf_elfheader (obfd)->e_flags &= ~EF_PPC_RELOCATABLE_LIB;
1458
1459 /* The output is -mrelocatable iff it can't be -mrelocatable-lib,
1460 but each input file is either -mrelocatable or -mrelocatable-lib. */
1461 if (! (elf_elfheader (obfd)->e_flags & EF_PPC_RELOCATABLE_LIB)
1462 && (new_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE))
1463 && (old_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE)))
1464 elf_elfheader (obfd)->e_flags |= EF_PPC_RELOCATABLE;
1465
1466 /* Do not warn about eabi vs. V.4 mismatch, just or in the bit if any module uses it */
1467 elf_elfheader (obfd)->e_flags |= (new_flags & EF_PPC_EMB);
1468
1469 new_flags &= ~ (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
1470 old_flags &= ~ (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
1471
1472 /* Warn about any other mismatches */
1473 if (new_flags != old_flags)
1474 {
1475 error = true;
1476 (*_bfd_error_handler)
1477 (_("%s: uses different e_flags (0x%lx) fields than previous modules (0x%lx)"),
1478 bfd_get_filename (ibfd), (long) new_flags, (long) old_flags);
1479 }
1480
1481 if (error)
1482 {
1483 bfd_set_error (bfd_error_bad_value);
1484 return false;
1485 }
1486 }
1487
1488 return true;
1489 }
1490
1491 \f
1492 /* Handle a PowerPC specific section when reading an object file. This
1493 is called when elfcode.h finds a section with an unknown type. */
1494
1495 static boolean
1496 ppc_elf_section_from_shdr (abfd, hdr, name)
1497 bfd *abfd;
1498 Elf32_Internal_Shdr *hdr;
1499 char *name;
1500 {
1501 asection *newsect;
1502 flagword flags;
1503
1504 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name))
1505 return false;
1506
1507 newsect = hdr->bfd_section;
1508 flags = bfd_get_section_flags (abfd, newsect);
1509 if (hdr->sh_flags & SHF_EXCLUDE)
1510 flags |= SEC_EXCLUDE;
1511
1512 if (hdr->sh_type == SHT_ORDERED)
1513 flags |= SEC_SORT_ENTRIES;
1514
1515 bfd_set_section_flags (abfd, newsect, flags);
1516 return true;
1517 }
1518
1519 \f
1520 /* Set up any other section flags and such that may be necessary. */
1521
1522 static boolean
1523 ppc_elf_fake_sections (abfd, shdr, asect)
1524 bfd *abfd ATTRIBUTE_UNUSED;
1525 Elf32_Internal_Shdr *shdr;
1526 asection *asect;
1527 {
1528 if ((asect->flags & SEC_EXCLUDE) != 0)
1529 shdr->sh_flags |= SHF_EXCLUDE;
1530
1531 if ((asect->flags & SEC_SORT_ENTRIES) != 0)
1532 shdr->sh_type = SHT_ORDERED;
1533
1534 return true;
1535 }
1536
1537 \f
1538 /* Create a special linker section */
1539 static elf_linker_section_t *
1540 ppc_elf_create_linker_section (abfd, info, which)
1541 bfd *abfd;
1542 struct bfd_link_info *info;
1543 enum elf_linker_section_enum which;
1544 {
1545 bfd *dynobj = elf_hash_table (info)->dynobj;
1546 elf_linker_section_t *lsect;
1547
1548 /* Record the first bfd section that needs the special section */
1549 if (!dynobj)
1550 dynobj = elf_hash_table (info)->dynobj = abfd;
1551
1552 /* If this is the first time, create the section */
1553 lsect = elf_linker_section (dynobj, which);
1554 if (!lsect)
1555 {
1556 elf_linker_section_t defaults;
1557 static elf_linker_section_t zero_section;
1558
1559 defaults = zero_section;
1560 defaults.which = which;
1561 defaults.hole_written_p = false;
1562 defaults.alignment = 2;
1563
1564 /* Both of these sections are (technically) created by the user
1565 putting data in them, so they shouldn't be marked
1566 SEC_LINKER_CREATED.
1567
1568 The linker creates them so it has somewhere to attach their
1569 respective symbols. In fact, if they were empty it would
1570 be OK to leave the symbol set to 0 (or any random number), because
1571 the appropriate register should never be used. */
1572 defaults.flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
1573 | SEC_IN_MEMORY);
1574
1575 switch (which)
1576 {
1577 default:
1578 (*_bfd_error_handler) (_("%s: Unknown special linker type %d"),
1579 bfd_get_filename (abfd),
1580 (int) which);
1581
1582 bfd_set_error (bfd_error_bad_value);
1583 return (elf_linker_section_t *) 0;
1584
1585 case LINKER_SECTION_SDATA: /* .sdata/.sbss section */
1586 defaults.name = ".sdata";
1587 defaults.rel_name = ".rela.sdata";
1588 defaults.bss_name = ".sbss";
1589 defaults.sym_name = "_SDA_BASE_";
1590 defaults.sym_offset = 32768;
1591 break;
1592
1593 case LINKER_SECTION_SDATA2: /* .sdata2/.sbss2 section */
1594 defaults.name = ".sdata2";
1595 defaults.rel_name = ".rela.sdata2";
1596 defaults.bss_name = ".sbss2";
1597 defaults.sym_name = "_SDA2_BASE_";
1598 defaults.sym_offset = 32768;
1599 defaults.flags |= SEC_READONLY;
1600 break;
1601 }
1602
1603 lsect = _bfd_elf_create_linker_section (abfd, info, which, &defaults);
1604 }
1605
1606 return lsect;
1607 }
1608 \f
1609 /* If we have a non-zero sized .sbss2 or .PPC.EMB.sbss0 sections, we
1610 need to bump up the number of section headers. */
1611
1612 static int
1613 ppc_elf_additional_program_headers (abfd)
1614 bfd *abfd;
1615 {
1616 asection *s;
1617 int ret;
1618
1619 ret = 0;
1620
1621 s = bfd_get_section_by_name (abfd, ".interp");
1622 if (s != NULL)
1623 ++ret;
1624
1625 s = bfd_get_section_by_name (abfd, ".sbss2");
1626 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
1627 ++ret;
1628
1629 s = bfd_get_section_by_name (abfd, ".PPC.EMB.sbss0");
1630 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
1631 ++ret;
1632
1633 return ret;
1634 }
1635
1636 /* Modify the segment map if needed. */
1637
1638 static boolean
1639 ppc_elf_modify_segment_map (abfd)
1640 bfd *abfd ATTRIBUTE_UNUSED;
1641 {
1642 return true;
1643 }
1644 \f
1645 /* We have to create .dynsbss and .rela.sbss here so that they get mapped
1646 to output sections (just like _bfd_elf_create_dynamic_sections has
1647 to create .dynbss and .rela.bss). */
1648
1649 static boolean
1650 ppc_elf_create_dynamic_sections (abfd, info)
1651 bfd *abfd;
1652 struct bfd_link_info *info;
1653 {
1654 register asection *s;
1655 flagword flags;
1656
1657 if (!_bfd_elf_create_dynamic_sections (abfd, info))
1658 return false;
1659
1660 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
1661 | SEC_LINKER_CREATED);
1662
1663 s = bfd_make_section (abfd, ".dynsbss");
1664 if (s == NULL
1665 || ! bfd_set_section_flags (abfd, s, SEC_ALLOC))
1666 return false;
1667
1668 if (! info->shared)
1669 {
1670 s = bfd_make_section (abfd, ".rela.sbss");
1671 if (s == NULL
1672 || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
1673 || ! bfd_set_section_alignment (abfd, s, 2))
1674 return false;
1675 }
1676 return true;
1677 }
1678
1679 /* Adjust a symbol defined by a dynamic object and referenced by a
1680 regular object. The current definition is in some section of the
1681 dynamic object, but we're not including those sections. We have to
1682 change the definition to something the rest of the link can
1683 understand. */
1684
1685 static boolean
1686 ppc_elf_adjust_dynamic_symbol (info, h)
1687 struct bfd_link_info *info;
1688 struct elf_link_hash_entry *h;
1689 {
1690 bfd *dynobj = elf_hash_table (info)->dynobj;
1691 asection *s;
1692 unsigned int power_of_two;
1693 bfd_vma plt_offset;
1694
1695 #ifdef DEBUG
1696 fprintf (stderr, "ppc_elf_adjust_dynamic_symbol called for %s\n", h->root.root.string);
1697 #endif
1698
1699 /* Make sure we know what is going on here. */
1700 BFD_ASSERT (dynobj != NULL
1701 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
1702 || h->weakdef != NULL
1703 || ((h->elf_link_hash_flags
1704 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1705 && (h->elf_link_hash_flags
1706 & ELF_LINK_HASH_REF_REGULAR) != 0
1707 && (h->elf_link_hash_flags
1708 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
1709
1710 /* If this is a function, put it in the procedure linkage table. We
1711 will fill in the contents of the procedure linkage table later,
1712 when we know the address of the .got section. */
1713 if (h->type == STT_FUNC
1714 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
1715 {
1716 if (! elf_hash_table (info)->dynamic_sections_created
1717 || SYMBOL_CALLS_LOCAL (info, h)
1718 || (info->shared && h->plt.refcount <= 0))
1719 {
1720 /* A PLT entry is not required/allowed when:
1721
1722 1. We are not using ld.so; because then the PLT entry
1723 can't be set up, so we can't use one.
1724
1725 2. We know for certain that a call to this symbol
1726 will go to this object.
1727
1728 3. GC has rendered the entry unused.
1729 Note, however, that in an executable all references to the
1730 symbol go to the PLT, so we can't turn it off in that case.
1731 ??? The correct thing to do here is to reference count
1732 all uses of the symbol, not just those to the GOT or PLT. */
1733 h->plt.offset = (bfd_vma) -1;
1734 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
1735 return true;
1736 }
1737
1738 /* Make sure this symbol is output as a dynamic symbol. */
1739 if (h->dynindx == -1)
1740 {
1741 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1742 return false;
1743 }
1744 BFD_ASSERT (h->dynindx != -1);
1745
1746 s = bfd_get_section_by_name (dynobj, ".plt");
1747 BFD_ASSERT (s != NULL);
1748
1749 /* If this is the first .plt entry, make room for the special
1750 first entry. */
1751 if (s->_raw_size == 0)
1752 s->_raw_size += PLT_INITIAL_ENTRY_SIZE;
1753
1754 /* The PowerPC PLT is actually composed of two parts, the first part
1755 is 2 words (for a load and a jump), and then there is a remaining
1756 word available at the end. */
1757 plt_offset = (PLT_INITIAL_ENTRY_SIZE
1758 + (PLT_SLOT_SIZE
1759 * ((s->_raw_size - PLT_INITIAL_ENTRY_SIZE)
1760 / PLT_ENTRY_SIZE)));
1761
1762 /* If this symbol is not defined in a regular file, and we are
1763 not generating a shared library, then set the symbol to this
1764 location in the .plt. This is required to make function
1765 pointers compare as equal between the normal executable and
1766 the shared library. */
1767 if (! info->shared
1768 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1769 {
1770 h->root.u.def.section = s;
1771 h->root.u.def.value = plt_offset;
1772 }
1773
1774 h->plt.offset = plt_offset;
1775
1776 /* Make room for this entry. After the 8192nd entry, room
1777 for two entries is allocated. */
1778 if ((s->_raw_size - PLT_INITIAL_ENTRY_SIZE) / PLT_ENTRY_SIZE
1779 >= PLT_NUM_SINGLE_ENTRIES)
1780 s->_raw_size += 2 * PLT_ENTRY_SIZE;
1781 else
1782 s->_raw_size += PLT_ENTRY_SIZE;
1783
1784 /* We also need to make an entry in the .rela.plt section. */
1785 s = bfd_get_section_by_name (dynobj, ".rela.plt");
1786 BFD_ASSERT (s != NULL);
1787 s->_raw_size += sizeof (Elf32_External_Rela);
1788
1789 return true;
1790 }
1791
1792 /* If this is a weak symbol, and there is a real definition, the
1793 processor independent code will have arranged for us to see the
1794 real definition first, and we can just use the same value. */
1795 if (h->weakdef != NULL)
1796 {
1797 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1798 || h->weakdef->root.type == bfd_link_hash_defweak);
1799 h->root.u.def.section = h->weakdef->root.u.def.section;
1800 h->root.u.def.value = h->weakdef->root.u.def.value;
1801 return true;
1802 }
1803
1804 /* This is a reference to a symbol defined by a dynamic object which
1805 is not a function. */
1806
1807 /* If we are creating a shared library, we must presume that the
1808 only references to the symbol are via the global offset table.
1809 For such cases we need not do anything here; the relocations will
1810 be handled correctly by relocate_section. */
1811 if (info->shared)
1812 return true;
1813
1814 /* We must allocate the symbol in our .dynbss section, which will
1815 become part of the .bss section of the executable. There will be
1816 an entry for this symbol in the .dynsym section. The dynamic
1817 object will contain position independent code, so all references
1818 from the dynamic object to this symbol will go through the global
1819 offset table. The dynamic linker will use the .dynsym entry to
1820 determine the address it must put in the global offset table, so
1821 both the dynamic object and the regular object will refer to the
1822 same memory location for the variable.
1823
1824 Of course, if the symbol is sufficiently small, we must instead
1825 allocate it in .sbss. FIXME: It would be better to do this if and
1826 only if there were actually SDAREL relocs for that symbol. */
1827
1828 if (h->size <= elf_gp_size (dynobj))
1829 s = bfd_get_section_by_name (dynobj, ".dynsbss");
1830 else
1831 s = bfd_get_section_by_name (dynobj, ".dynbss");
1832 BFD_ASSERT (s != NULL);
1833
1834 /* We must generate a R_PPC_COPY reloc to tell the dynamic linker to
1835 copy the initial value out of the dynamic object and into the
1836 runtime process image. We need to remember the offset into the
1837 .rela.bss section we are going to use. */
1838 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1839 {
1840 asection *srel;
1841
1842 if (h->size <= elf_gp_size (dynobj))
1843 srel = bfd_get_section_by_name (dynobj, ".rela.sbss");
1844 else
1845 srel = bfd_get_section_by_name (dynobj, ".rela.bss");
1846 BFD_ASSERT (srel != NULL);
1847 srel->_raw_size += sizeof (Elf32_External_Rela);
1848 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1849 }
1850
1851 /* We need to figure out the alignment required for this symbol. I
1852 have no idea how ELF linkers handle this. */
1853 power_of_two = bfd_log2 (h->size);
1854 if (power_of_two > 4)
1855 power_of_two = 4;
1856
1857 /* Apply the required alignment. */
1858 s->_raw_size = BFD_ALIGN (s->_raw_size,
1859 (bfd_size_type) (1 << power_of_two));
1860 if (power_of_two > bfd_get_section_alignment (dynobj, s))
1861 {
1862 if (! bfd_set_section_alignment (dynobj, s, power_of_two))
1863 return false;
1864 }
1865
1866 /* Define the symbol as being at this point in the section. */
1867 h->root.u.def.section = s;
1868 h->root.u.def.value = s->_raw_size;
1869
1870 /* Increment the section size to make room for the symbol. */
1871 s->_raw_size += h->size;
1872
1873 return true;
1874 }
1875 \f
1876 /* Set the sizes of the dynamic sections. */
1877
1878 static boolean
1879 ppc_elf_size_dynamic_sections (output_bfd, info)
1880 bfd *output_bfd;
1881 struct bfd_link_info *info;
1882 {
1883 bfd *dynobj;
1884 asection *s;
1885 boolean plt;
1886 boolean relocs;
1887 boolean reltext;
1888
1889 #ifdef DEBUG
1890 fprintf (stderr, "ppc_elf_size_dynamic_sections called\n");
1891 #endif
1892
1893 dynobj = elf_hash_table (info)->dynobj;
1894 BFD_ASSERT (dynobj != NULL);
1895
1896 if (elf_hash_table (info)->dynamic_sections_created)
1897 {
1898 /* Set the contents of the .interp section to the interpreter. */
1899 if (! info->shared)
1900 {
1901 s = bfd_get_section_by_name (dynobj, ".interp");
1902 BFD_ASSERT (s != NULL);
1903 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
1904 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1905 }
1906 }
1907 else
1908 {
1909 /* We may have created entries in the .rela.got, .rela.sdata, and
1910 .rela.sdata2 sections. However, if we are not creating the
1911 dynamic sections, we will not actually use these entries. Reset
1912 the size of .rela.got, et al, which will cause it to get
1913 stripped from the output file below. */
1914 static char *rela_sections[] = { ".rela.got", ".rela.sdata",
1915 ".rela.sdata2", ".rela.sbss",
1916 (char *) 0 };
1917 char **p;
1918
1919 for (p = rela_sections; *p != (char *) 0; p++)
1920 {
1921 s = bfd_get_section_by_name (dynobj, *p);
1922 if (s != NULL)
1923 s->_raw_size = 0;
1924 }
1925 }
1926
1927 /* The check_relocs and adjust_dynamic_symbol entry points have
1928 determined the sizes of the various dynamic sections. Allocate
1929 memory for them. */
1930 plt = false;
1931 relocs = false;
1932 reltext = false;
1933 for (s = dynobj->sections; s != NULL; s = s->next)
1934 {
1935 const char *name;
1936 boolean strip;
1937
1938 if ((s->flags & SEC_LINKER_CREATED) == 0)
1939 continue;
1940
1941 /* It's OK to base decisions on the section name, because none
1942 of the dynobj section names depend upon the input files. */
1943 name = bfd_get_section_name (dynobj, s);
1944
1945 strip = false;
1946
1947 if (strcmp (name, ".plt") == 0)
1948 {
1949 if (s->_raw_size == 0)
1950 {
1951 /* Strip this section if we don't need it; see the
1952 comment below. */
1953 strip = true;
1954 }
1955 else
1956 {
1957 /* Remember whether there is a PLT. */
1958 plt = true;
1959 }
1960 }
1961 else if (strncmp (name, ".rela", 5) == 0)
1962 {
1963 if (s->_raw_size == 0)
1964 {
1965 /* If we don't need this section, strip it from the
1966 output file. This is mostly to handle .rela.bss and
1967 .rela.plt. We must create both sections in
1968 create_dynamic_sections, because they must be created
1969 before the linker maps input sections to output
1970 sections. The linker does that before
1971 adjust_dynamic_symbol is called, and it is that
1972 function which decides whether anything needs to go
1973 into these sections. */
1974 strip = true;
1975 }
1976 else
1977 {
1978 asection *target;
1979 const char *outname;
1980
1981 /* Remember whether there are any relocation sections. */
1982 relocs = true;
1983
1984 /* If this relocation section applies to a read only
1985 section, then we probably need a DT_TEXTREL entry. */
1986 outname = bfd_get_section_name (output_bfd,
1987 s->output_section);
1988 target = bfd_get_section_by_name (output_bfd, outname + 5);
1989 if (target != NULL
1990 && (target->flags & SEC_READONLY) != 0
1991 && (target->flags & SEC_ALLOC) != 0)
1992 reltext = true;
1993
1994 /* We use the reloc_count field as a counter if we need
1995 to copy relocs into the output file. */
1996 s->reloc_count = 0;
1997 }
1998 }
1999 else if (strcmp (name, ".got") != 0
2000 && strcmp (name, ".sdata") != 0
2001 && strcmp (name, ".sdata2") != 0)
2002 {
2003 /* It's not one of our sections, so don't allocate space. */
2004 continue;
2005 }
2006
2007 if (strip)
2008 {
2009 _bfd_strip_section_from_output (info, s);
2010 continue;
2011 }
2012
2013 /* Allocate memory for the section contents. */
2014 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
2015 if (s->contents == NULL && s->_raw_size != 0)
2016 return false;
2017 }
2018
2019 if (elf_hash_table (info)->dynamic_sections_created)
2020 {
2021 /* Add some entries to the .dynamic section. We fill in the
2022 values later, in ppc_elf_finish_dynamic_sections, but we
2023 must add the entries now so that we get the correct size for
2024 the .dynamic section. The DT_DEBUG entry is filled in by the
2025 dynamic linker and used by the debugger. */
2026 if (! info->shared)
2027 {
2028 if (! bfd_elf32_add_dynamic_entry (info, DT_DEBUG, 0))
2029 return false;
2030 }
2031
2032 if (plt)
2033 {
2034 if (! bfd_elf32_add_dynamic_entry (info, DT_PLTGOT, 0)
2035 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTRELSZ, 0)
2036 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTREL, DT_RELA)
2037 || ! bfd_elf32_add_dynamic_entry (info, DT_JMPREL, 0))
2038 return false;
2039 }
2040
2041 if (relocs)
2042 {
2043 if (! bfd_elf32_add_dynamic_entry (info, DT_RELA, 0)
2044 || ! bfd_elf32_add_dynamic_entry (info, DT_RELASZ, 0)
2045 || ! bfd_elf32_add_dynamic_entry (info, DT_RELAENT,
2046 sizeof (Elf32_External_Rela)))
2047 return false;
2048 }
2049
2050 if (reltext)
2051 {
2052 if (! bfd_elf32_add_dynamic_entry (info, DT_TEXTREL, 0))
2053 return false;
2054 info->flags |= DF_TEXTREL;
2055 }
2056 }
2057
2058 return true;
2059 }
2060
2061 \f
2062 /* Look through the relocs for a section during the first phase, and
2063 allocate space in the global offset table or procedure linkage
2064 table. */
2065
2066 static boolean
2067 ppc_elf_check_relocs (abfd, info, sec, relocs)
2068 bfd *abfd;
2069 struct bfd_link_info *info;
2070 asection *sec;
2071 const Elf_Internal_Rela *relocs;
2072 {
2073 bfd *dynobj;
2074 Elf_Internal_Shdr *symtab_hdr;
2075 struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
2076 const Elf_Internal_Rela *rel;
2077 const Elf_Internal_Rela *rel_end;
2078 bfd_signed_vma *local_got_refcounts;
2079 elf_linker_section_t *sdata;
2080 elf_linker_section_t *sdata2;
2081 asection *sreloc;
2082 asection *sgot = NULL;
2083 asection *srelgot = NULL;
2084
2085 if (info->relocateable)
2086 return true;
2087
2088 #ifdef DEBUG
2089 fprintf (stderr, "ppc_elf_check_relocs called for section %s in %s\n",
2090 bfd_get_section_name (abfd, sec),
2091 bfd_get_filename (abfd));
2092 #endif
2093
2094 /* Create the linker generated sections all the time so that the
2095 special symbols are created. */
2096
2097 if ((sdata = elf_linker_section (abfd, LINKER_SECTION_SDATA)) == NULL)
2098 {
2099 sdata = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA);
2100 if (!sdata)
2101 return false;
2102 }
2103
2104 if ((sdata2 = elf_linker_section (abfd, LINKER_SECTION_SDATA2)) == NULL)
2105 {
2106 sdata2 = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA2);
2107 if (!sdata2)
2108 return false;
2109 }
2110
2111 dynobj = elf_hash_table (info)->dynobj;
2112 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2113 local_got_refcounts = elf_local_got_refcounts (abfd);
2114
2115 sym_hashes = elf_sym_hashes (abfd);
2116 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
2117 if (!elf_bad_symtab (abfd))
2118 sym_hashes_end -= symtab_hdr->sh_info;
2119
2120 sreloc = NULL;
2121
2122 rel_end = relocs + sec->reloc_count;
2123 for (rel = relocs; rel < rel_end; rel++)
2124 {
2125 unsigned long r_symndx;
2126 struct elf_link_hash_entry *h;
2127
2128 r_symndx = ELF32_R_SYM (rel->r_info);
2129 if (r_symndx < symtab_hdr->sh_info)
2130 h = NULL;
2131 else
2132 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2133
2134 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
2135 This shows up in particular in an R_PPC_ADDR32 in the eabi
2136 startup code. */
2137 if (h && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2138 {
2139 if (sgot == NULL)
2140 {
2141 if (dynobj == NULL)
2142 elf_hash_table (info)->dynobj = dynobj = abfd;
2143 if (! _bfd_elf_create_got_section (dynobj, info))
2144 return false;
2145 sgot = bfd_get_section_by_name (dynobj, ".got");
2146 BFD_ASSERT (sgot != NULL);
2147 }
2148 }
2149
2150 switch (ELF32_R_TYPE (rel->r_info))
2151 {
2152 /* GOT16 relocations */
2153 case R_PPC_GOT16:
2154 case R_PPC_GOT16_LO:
2155 case R_PPC_GOT16_HI:
2156 case R_PPC_GOT16_HA:
2157 /* This symbol requires a global offset table entry. */
2158
2159 if (sgot == NULL)
2160 {
2161 if (dynobj == NULL)
2162 elf_hash_table (info)->dynobj = dynobj = abfd;
2163 if (! _bfd_elf_create_got_section (dynobj, info))
2164 return false;
2165 sgot = bfd_get_section_by_name (dynobj, ".got");
2166 BFD_ASSERT (sgot != NULL);
2167 }
2168
2169 if (srelgot == NULL
2170 && (h != NULL || info->shared))
2171 {
2172 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
2173 if (srelgot == NULL)
2174 {
2175 srelgot = bfd_make_section (dynobj, ".rela.got");
2176 if (srelgot == NULL
2177 || ! bfd_set_section_flags (dynobj, srelgot,
2178 (SEC_ALLOC
2179 | SEC_LOAD
2180 | SEC_HAS_CONTENTS
2181 | SEC_IN_MEMORY
2182 | SEC_LINKER_CREATED
2183 | SEC_READONLY))
2184 || ! bfd_set_section_alignment (dynobj, srelgot, 2))
2185 return false;
2186 }
2187 }
2188
2189 if (h != NULL)
2190 {
2191 if (h->got.refcount == -1)
2192 {
2193 /* Make sure this symbol is output as a dynamic symbol. */
2194 if (h->dynindx == -1)
2195 if (!bfd_elf32_link_record_dynamic_symbol (info, h))
2196 return false;
2197
2198 /* Allocate space in the .got. */
2199 sgot->_raw_size += 4;
2200 /* Allocate relocation space. */
2201 srelgot->_raw_size += sizeof (Elf32_External_Rela);
2202
2203 h->got.refcount = 1;
2204 }
2205 else
2206 h->got.refcount++;
2207 }
2208 else
2209 {
2210 /* This is a global offset table entry for a local symbol. */
2211 if (local_got_refcounts == NULL)
2212 {
2213 size_t size;
2214
2215 size = symtab_hdr->sh_info * sizeof (bfd_signed_vma);
2216 local_got_refcounts = (bfd_signed_vma *)
2217 bfd_alloc (abfd, size);
2218 if (local_got_refcounts == NULL)
2219 return false;
2220 elf_local_got_refcounts (abfd) = local_got_refcounts;
2221 memset (local_got_refcounts, -1, size);
2222 }
2223 if (local_got_refcounts[r_symndx] == -1)
2224 {
2225 sgot->_raw_size += 4;
2226
2227 /* If we are generating a shared object, we need to
2228 output a R_PPC_RELATIVE reloc so that the
2229 dynamic linker can adjust this GOT entry. */
2230 if (info->shared)
2231 srelgot->_raw_size += sizeof (Elf32_External_Rela);
2232
2233 local_got_refcounts[r_symndx] = 1;
2234 }
2235 else
2236 local_got_refcounts[r_symndx]++;
2237 }
2238 break;
2239
2240 /* Indirect .sdata relocation */
2241 case R_PPC_EMB_SDAI16:
2242 if (info->shared)
2243 {
2244 ((*_bfd_error_handler)
2245 (_("%s: relocation %s cannot be used when making a shared object"),
2246 bfd_get_filename (abfd), "R_PPC_EMB_SDAI16"));
2247 return false;
2248 }
2249
2250 if (srelgot == NULL && (h != NULL || info->shared))
2251 {
2252 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
2253 if (srelgot == NULL)
2254 {
2255 srelgot = bfd_make_section (dynobj, ".rela.got");
2256 if (srelgot == NULL
2257 || ! bfd_set_section_flags (dynobj, srelgot,
2258 (SEC_ALLOC
2259 | SEC_LOAD
2260 | SEC_HAS_CONTENTS
2261 | SEC_IN_MEMORY
2262 | SEC_LINKER_CREATED
2263 | SEC_READONLY))
2264 || ! bfd_set_section_alignment (dynobj, srelgot, 2))
2265 return false;
2266 }
2267 }
2268
2269 if (!bfd_elf32_create_pointer_linker_section (abfd, info, sdata, h, rel))
2270 return false;
2271
2272 break;
2273
2274 /* Indirect .sdata2 relocation */
2275 case R_PPC_EMB_SDA2I16:
2276 if (info->shared)
2277 {
2278 ((*_bfd_error_handler)
2279 (_("%s: relocation %s cannot be used when making a shared object"),
2280 bfd_get_filename (abfd), "R_PPC_EMB_SDA2I16"));
2281 return false;
2282 }
2283
2284 if (srelgot == NULL && (h != NULL || info->shared))
2285 {
2286 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
2287 if (srelgot == NULL)
2288 {
2289 srelgot = bfd_make_section (dynobj, ".rela.got");
2290 if (srelgot == NULL
2291 || ! bfd_set_section_flags (dynobj, srelgot,
2292 (SEC_ALLOC
2293 | SEC_LOAD
2294 | SEC_HAS_CONTENTS
2295 | SEC_IN_MEMORY
2296 | SEC_LINKER_CREATED
2297 | SEC_READONLY))
2298 || ! bfd_set_section_alignment (dynobj, srelgot, 2))
2299 return false;
2300 }
2301 }
2302
2303 if (!bfd_elf32_create_pointer_linker_section (abfd, info, sdata2, h, rel))
2304 return false;
2305
2306 break;
2307
2308 case R_PPC_SDAREL16:
2309 case R_PPC_EMB_SDA2REL:
2310 case R_PPC_EMB_SDA21:
2311 if (info->shared)
2312 {
2313 ((*_bfd_error_handler)
2314 (_("%s: relocation %s cannot be used when making a shared object"),
2315 bfd_get_filename (abfd),
2316 ppc_elf_howto_table[(int) ELF32_R_TYPE (rel->r_info)]->name));
2317 return false;
2318 }
2319 break;
2320
2321 case R_PPC_PLT32:
2322 case R_PPC_PLTREL24:
2323 case R_PPC_PLT16_LO:
2324 case R_PPC_PLT16_HI:
2325 case R_PPC_PLT16_HA:
2326 #ifdef DEBUG
2327 fprintf (stderr, "Reloc requires a PLT entry\n");
2328 #endif
2329 /* This symbol requires a procedure linkage table entry. We
2330 actually build the entry in adjust_dynamic_symbol,
2331 because this might be a case of linking PIC code without
2332 linking in any dynamic objects, in which case we don't
2333 need to generate a procedure linkage table after all. */
2334
2335 if (h == NULL)
2336 {
2337 /* It does not make sense to have a procedure linkage
2338 table entry for a local symbol. */
2339 bfd_set_error (bfd_error_bad_value);
2340 return false;
2341 }
2342
2343 /* Make sure this symbol is output as a dynamic symbol. */
2344 if (h->dynindx == -1)
2345 {
2346 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
2347 return false;
2348 }
2349 if (h->plt.refcount == -1)
2350 {
2351 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
2352 h->plt.refcount = 1;
2353 }
2354 else
2355 h->plt.refcount++;
2356 break;
2357
2358 /* The following relocations don't need to propagate the
2359 relocation if linking a shared object since they are
2360 section relative. */
2361 case R_PPC_SECTOFF:
2362 case R_PPC_SECTOFF_LO:
2363 case R_PPC_SECTOFF_HI:
2364 case R_PPC_SECTOFF_HA:
2365 break;
2366
2367 /* This refers only to functions defined in the shared library */
2368 case R_PPC_LOCAL24PC:
2369 break;
2370
2371 /* This relocation describes the C++ object vtable hierarchy.
2372 Reconstruct it for later use during GC. */
2373 case R_PPC_GNU_VTINHERIT:
2374 if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2375 return false;
2376 break;
2377
2378 /* This relocation describes which C++ vtable entries are actually
2379 used. Record for later use during GC. */
2380 case R_PPC_GNU_VTENTRY:
2381 if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2382 return false;
2383 break;
2384
2385 /* When creating a shared object, we must copy these
2386 relocs into the output file. We create a reloc
2387 section in dynobj and make room for the reloc. */
2388 case R_PPC_REL24:
2389 case R_PPC_REL14:
2390 case R_PPC_REL14_BRTAKEN:
2391 case R_PPC_REL14_BRNTAKEN:
2392 case R_PPC_REL32:
2393 if (h == NULL
2394 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
2395 || SYMBOL_REFERENCES_LOCAL (info, h))
2396 break;
2397 /* fall through */
2398
2399 default:
2400 if (info->shared)
2401 {
2402 #ifdef DEBUG
2403 fprintf (stderr, "ppc_elf_check_relocs need to create relocation for %s\n",
2404 (h && h->root.root.string) ? h->root.root.string : "<unknown>");
2405 #endif
2406 if (sreloc == NULL)
2407 {
2408 const char *name;
2409
2410 name = (bfd_elf_string_from_elf_section
2411 (abfd,
2412 elf_elfheader (abfd)->e_shstrndx,
2413 elf_section_data (sec)->rel_hdr.sh_name));
2414 if (name == NULL)
2415 return false;
2416
2417 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
2418 && strcmp (bfd_get_section_name (abfd, sec),
2419 name + 5) == 0);
2420
2421 sreloc = bfd_get_section_by_name (dynobj, name);
2422 if (sreloc == NULL)
2423 {
2424 flagword flags;
2425
2426 sreloc = bfd_make_section (dynobj, name);
2427 flags = (SEC_HAS_CONTENTS | SEC_READONLY
2428 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
2429 if ((sec->flags & SEC_ALLOC) != 0)
2430 flags |= SEC_ALLOC | SEC_LOAD;
2431 if (sreloc == NULL
2432 || ! bfd_set_section_flags (dynobj, sreloc, flags)
2433 || ! bfd_set_section_alignment (dynobj, sreloc, 2))
2434 return false;
2435 }
2436 }
2437
2438 sreloc->_raw_size += sizeof (Elf32_External_Rela);
2439
2440 /* FIXME: We should here do what the m68k and i386
2441 backends do: if the reloc is pc-relative, record it
2442 in case it turns out that the reloc is unnecessary
2443 because the symbol is forced local by versioning or
2444 we are linking with -Bdynamic. Fortunately this
2445 case is not frequent. */
2446 }
2447
2448 break;
2449 }
2450 }
2451
2452 return true;
2453 }
2454
2455 /* Return the section that should be marked against GC for a given
2456 relocation. */
2457
2458 static asection *
2459 ppc_elf_gc_mark_hook (abfd, info, rel, h, sym)
2460 bfd *abfd;
2461 struct bfd_link_info *info ATTRIBUTE_UNUSED;
2462 Elf_Internal_Rela *rel;
2463 struct elf_link_hash_entry *h;
2464 Elf_Internal_Sym *sym;
2465 {
2466 if (h != NULL)
2467 {
2468 switch (ELF32_R_TYPE (rel->r_info))
2469 {
2470 case R_PPC_GNU_VTINHERIT:
2471 case R_PPC_GNU_VTENTRY:
2472 break;
2473
2474 default:
2475 switch (h->root.type)
2476 {
2477 case bfd_link_hash_defined:
2478 case bfd_link_hash_defweak:
2479 return h->root.u.def.section;
2480
2481 case bfd_link_hash_common:
2482 return h->root.u.c.p->section;
2483
2484 default:
2485 break;
2486 }
2487 }
2488 }
2489 else
2490 {
2491 if (!(elf_bad_symtab (abfd)
2492 && ELF_ST_BIND (sym->st_info) != STB_LOCAL)
2493 && ! ((sym->st_shndx <= 0 || sym->st_shndx >= SHN_LORESERVE)
2494 && sym->st_shndx != SHN_COMMON))
2495 {
2496 return bfd_section_from_elf_index (abfd, sym->st_shndx);
2497 }
2498 }
2499
2500 return NULL;
2501 }
2502
2503 /* Update the got entry reference counts for the section being removed. */
2504
2505 static boolean
2506 ppc_elf_gc_sweep_hook (abfd, info, sec, relocs)
2507 bfd *abfd;
2508 struct bfd_link_info *info ATTRIBUTE_UNUSED;
2509 asection *sec;
2510 const Elf_Internal_Rela *relocs;
2511 {
2512 Elf_Internal_Shdr *symtab_hdr;
2513 struct elf_link_hash_entry **sym_hashes;
2514 bfd_signed_vma *local_got_refcounts;
2515 const Elf_Internal_Rela *rel, *relend;
2516 unsigned long r_symndx;
2517 struct elf_link_hash_entry *h;
2518
2519 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2520 sym_hashes = elf_sym_hashes (abfd);
2521 local_got_refcounts = elf_local_got_refcounts (abfd);
2522
2523 relend = relocs + sec->reloc_count;
2524 for (rel = relocs; rel < relend; rel++)
2525 switch (ELF32_R_TYPE (rel->r_info))
2526 {
2527 case R_PPC_GOT16:
2528 case R_PPC_GOT16_LO:
2529 case R_PPC_GOT16_HI:
2530 case R_PPC_GOT16_HA:
2531 r_symndx = ELF32_R_SYM (rel->r_info);
2532 if (r_symndx >= symtab_hdr->sh_info)
2533 {
2534 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2535 if (h->got.refcount > 0)
2536 h->got.refcount--;
2537 }
2538 else if (local_got_refcounts != NULL)
2539 {
2540 if (local_got_refcounts[r_symndx] > 0)
2541 local_got_refcounts[r_symndx]--;
2542 }
2543 break;
2544
2545 case R_PPC_PLT32:
2546 case R_PPC_PLTREL24:
2547 case R_PPC_PLT16_LO:
2548 case R_PPC_PLT16_HI:
2549 case R_PPC_PLT16_HA:
2550 r_symndx = ELF32_R_SYM (rel->r_info);
2551 if (r_symndx >= symtab_hdr->sh_info)
2552 {
2553 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2554 if (h->plt.refcount > 0)
2555 h->plt.refcount--;
2556 }
2557 break;
2558
2559 default:
2560 break;
2561 }
2562
2563 return true;
2564 }
2565 \f
2566 /* Hook called by the linker routine which adds symbols from an object
2567 file. We use it to put .comm items in .sbss, and not .bss. */
2568
2569 static boolean
2570 ppc_elf_add_symbol_hook (abfd, info, sym, namep, flagsp, secp, valp)
2571 bfd *abfd;
2572 struct bfd_link_info *info;
2573 const Elf_Internal_Sym *sym;
2574 const char **namep ATTRIBUTE_UNUSED;
2575 flagword *flagsp ATTRIBUTE_UNUSED;
2576 asection **secp;
2577 bfd_vma *valp;
2578 {
2579 if (sym->st_shndx == SHN_COMMON
2580 && !info->relocateable
2581 && sym->st_size <= (bfd_vma) bfd_get_gp_size (abfd))
2582 {
2583 /* Common symbols less than or equal to -G nn bytes are automatically
2584 put into .sdata. */
2585 elf_linker_section_t *sdata
2586 = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA);
2587
2588 if (!sdata->bss_section)
2589 {
2590 /* We don't go through bfd_make_section, because we don't
2591 want to attach this common section to DYNOBJ. The linker
2592 will move the symbols to the appropriate output section
2593 when it defines common symbols. */
2594 sdata->bss_section = ((asection *)
2595 bfd_zalloc (abfd, sizeof (asection)));
2596 if (sdata->bss_section == NULL)
2597 return false;
2598 sdata->bss_section->name = sdata->bss_name;
2599 sdata->bss_section->flags = SEC_IS_COMMON;
2600 sdata->bss_section->output_section = sdata->bss_section;
2601 sdata->bss_section->symbol =
2602 (asymbol *) bfd_zalloc (abfd, sizeof (asymbol));
2603 sdata->bss_section->symbol_ptr_ptr =
2604 (asymbol **) bfd_zalloc (abfd, sizeof (asymbol *));
2605 if (sdata->bss_section->symbol == NULL
2606 || sdata->bss_section->symbol_ptr_ptr == NULL)
2607 return false;
2608 sdata->bss_section->symbol->name = sdata->bss_name;
2609 sdata->bss_section->symbol->flags = BSF_SECTION_SYM;
2610 sdata->bss_section->symbol->section = sdata->bss_section;
2611 *sdata->bss_section->symbol_ptr_ptr = sdata->bss_section->symbol;
2612 }
2613
2614 *secp = sdata->bss_section;
2615 *valp = sym->st_size;
2616 }
2617
2618 return true;
2619 }
2620 \f
2621 /* Finish up dynamic symbol handling. We set the contents of various
2622 dynamic sections here. */
2623
2624 static boolean
2625 ppc_elf_finish_dynamic_symbol (output_bfd, info, h, sym)
2626 bfd *output_bfd;
2627 struct bfd_link_info *info;
2628 struct elf_link_hash_entry *h;
2629 Elf_Internal_Sym *sym;
2630 {
2631 bfd *dynobj;
2632
2633 #ifdef DEBUG
2634 fprintf (stderr, "ppc_elf_finish_dynamic_symbol called for %s",
2635 h->root.root.string);
2636 #endif
2637
2638 dynobj = elf_hash_table (info)->dynobj;
2639 BFD_ASSERT (dynobj != NULL);
2640
2641 if (h->plt.offset != (bfd_vma) -1)
2642 {
2643 asection *splt;
2644 asection *srela;
2645 Elf_Internal_Rela rela;
2646 bfd_vma reloc_index;
2647
2648 #ifdef DEBUG
2649 fprintf (stderr, ", plt_offset = %d", h->plt.offset);
2650 #endif
2651
2652 /* This symbol has an entry in the procedure linkage table. Set
2653 it up. */
2654
2655 BFD_ASSERT (h->dynindx != -1);
2656
2657 splt = bfd_get_section_by_name (dynobj, ".plt");
2658 srela = bfd_get_section_by_name (dynobj, ".rela.plt");
2659 BFD_ASSERT (splt != NULL && srela != NULL);
2660
2661 /* We don't need to fill in the .plt. The ppc dynamic linker
2662 will fill it in. */
2663
2664 /* Fill in the entry in the .rela.plt section. */
2665 rela.r_offset = (splt->output_section->vma
2666 + splt->output_offset
2667 + h->plt.offset);
2668 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_JMP_SLOT);
2669 rela.r_addend = 0;
2670
2671 reloc_index = (h->plt.offset - PLT_INITIAL_ENTRY_SIZE) / PLT_SLOT_SIZE;
2672 if (reloc_index > PLT_NUM_SINGLE_ENTRIES)
2673 reloc_index -= (reloc_index - PLT_NUM_SINGLE_ENTRIES) / 2;
2674 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2675 ((Elf32_External_Rela *) srela->contents
2676 + reloc_index));
2677
2678 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
2679 {
2680 /* Mark the symbol as undefined, rather than as defined in
2681 the .plt section. Leave the value alone. */
2682 sym->st_shndx = SHN_UNDEF;
2683 /* If the symbol is weak, we do need to clear the value.
2684 Otherwise, the PLT entry would provide a definition for
2685 the symbol even if the symbol wasn't defined anywhere,
2686 and so the symbol would never be NULL. */
2687 if ((h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR_NONWEAK)
2688 == 0)
2689 sym->st_value = 0;
2690 }
2691 }
2692
2693 if (h->got.offset != (bfd_vma) -1)
2694 {
2695 asection *sgot;
2696 asection *srela;
2697 Elf_Internal_Rela rela;
2698
2699 /* This symbol has an entry in the global offset table. Set it
2700 up. */
2701
2702 sgot = bfd_get_section_by_name (dynobj, ".got");
2703 srela = bfd_get_section_by_name (dynobj, ".rela.got");
2704 BFD_ASSERT (sgot != NULL && srela != NULL);
2705
2706 rela.r_offset = (sgot->output_section->vma
2707 + sgot->output_offset
2708 + (h->got.offset &~ 1));
2709
2710 /* If this is a -Bsymbolic link, and the symbol is defined
2711 locally, we just want to emit a RELATIVE reloc. The entry in
2712 the global offset table will already have been initialized in
2713 the relocate_section function. */
2714 if (info->shared
2715 && SYMBOL_REFERENCES_LOCAL (info, h))
2716 {
2717 rela.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
2718 rela.r_addend = (h->root.u.def.value
2719 + h->root.u.def.section->output_section->vma
2720 + h->root.u.def.section->output_offset);
2721 }
2722 else
2723 {
2724 BFD_ASSERT ((h->got.offset & 1) == 0);
2725 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
2726 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_GLOB_DAT);
2727 rela.r_addend = 0;
2728 }
2729
2730 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2731 ((Elf32_External_Rela *) srela->contents
2732 + srela->reloc_count));
2733 ++srela->reloc_count;
2734 }
2735
2736 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
2737 {
2738 asection *s;
2739 Elf_Internal_Rela rela;
2740
2741 /* This symbols needs a copy reloc. Set it up. */
2742
2743 #ifdef DEBUG
2744 fprintf (stderr, ", copy");
2745 #endif
2746
2747 BFD_ASSERT (h->dynindx != -1);
2748
2749 if (h->size <= elf_gp_size (dynobj))
2750 s = bfd_get_section_by_name (h->root.u.def.section->owner,
2751 ".rela.sbss");
2752 else
2753 s = bfd_get_section_by_name (h->root.u.def.section->owner,
2754 ".rela.bss");
2755 BFD_ASSERT (s != NULL);
2756
2757 rela.r_offset = (h->root.u.def.value
2758 + h->root.u.def.section->output_section->vma
2759 + h->root.u.def.section->output_offset);
2760 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_COPY);
2761 rela.r_addend = 0;
2762 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2763 ((Elf32_External_Rela *) s->contents
2764 + s->reloc_count));
2765 ++s->reloc_count;
2766 }
2767
2768 #ifdef DEBUG
2769 fprintf (stderr, "\n");
2770 #endif
2771
2772 /* Mark some specially defined symbols as absolute. */
2773 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2774 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
2775 || strcmp (h->root.root.string, "_PROCEDURE_LINKAGE_TABLE_") == 0)
2776 sym->st_shndx = SHN_ABS;
2777
2778 return true;
2779 }
2780 \f
2781 /* Finish up the dynamic sections. */
2782
2783 static boolean
2784 ppc_elf_finish_dynamic_sections (output_bfd, info)
2785 bfd *output_bfd;
2786 struct bfd_link_info *info;
2787 {
2788 asection *sdyn;
2789 bfd *dynobj = elf_hash_table (info)->dynobj;
2790 asection *sgot = bfd_get_section_by_name (dynobj, ".got");
2791
2792 #ifdef DEBUG
2793 fprintf (stderr, "ppc_elf_finish_dynamic_sections called\n");
2794 #endif
2795
2796 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2797
2798 if (elf_hash_table (info)->dynamic_sections_created)
2799 {
2800 asection *splt;
2801 Elf32_External_Dyn *dyncon, *dynconend;
2802
2803 splt = bfd_get_section_by_name (dynobj, ".plt");
2804 BFD_ASSERT (splt != NULL && sdyn != NULL);
2805
2806 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2807 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
2808 for (; dyncon < dynconend; dyncon++)
2809 {
2810 Elf_Internal_Dyn dyn;
2811 const char *name;
2812 boolean size;
2813
2814 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
2815
2816 switch (dyn.d_tag)
2817 {
2818 case DT_PLTGOT: name = ".plt"; size = false; break;
2819 case DT_PLTRELSZ: name = ".rela.plt"; size = true; break;
2820 case DT_JMPREL: name = ".rela.plt"; size = false; break;
2821 default: name = NULL; size = false; break;
2822 }
2823
2824 if (name != NULL)
2825 {
2826 asection *s;
2827
2828 s = bfd_get_section_by_name (output_bfd, name);
2829 if (s == NULL)
2830 dyn.d_un.d_val = 0;
2831 else
2832 {
2833 if (! size)
2834 dyn.d_un.d_ptr = s->vma;
2835 else
2836 {
2837 if (s->_cooked_size != 0)
2838 dyn.d_un.d_val = s->_cooked_size;
2839 else
2840 dyn.d_un.d_val = s->_raw_size;
2841 }
2842 }
2843 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2844 }
2845 }
2846 }
2847
2848 /* Add a blrl instruction at _GLOBAL_OFFSET_TABLE_-4 so that a function can
2849 easily find the address of the _GLOBAL_OFFSET_TABLE_. */
2850 if (sgot)
2851 {
2852 unsigned char *contents = sgot->contents;
2853 bfd_put_32 (output_bfd, 0x4e800021 /* blrl */, contents);
2854
2855 if (sdyn == NULL)
2856 bfd_put_32 (output_bfd, (bfd_vma) 0, contents+4);
2857 else
2858 bfd_put_32 (output_bfd,
2859 sdyn->output_section->vma + sdyn->output_offset,
2860 contents+4);
2861
2862 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
2863 }
2864
2865 return true;
2866 }
2867 \f
2868 /* The RELOCATE_SECTION function is called by the ELF backend linker
2869 to handle the relocations for a section.
2870
2871 The relocs are always passed as Rela structures; if the section
2872 actually uses Rel structures, the r_addend field will always be
2873 zero.
2874
2875 This function is responsible for adjust the section contents as
2876 necessary, and (if using Rela relocs and generating a
2877 relocateable output file) adjusting the reloc addend as
2878 necessary.
2879
2880 This function does not have to worry about setting the reloc
2881 address or the reloc symbol index.
2882
2883 LOCAL_SYMS is a pointer to the swapped in local symbols.
2884
2885 LOCAL_SECTIONS is an array giving the section in the input file
2886 corresponding to the st_shndx field of each local symbol.
2887
2888 The global hash table entry for the global symbols can be found
2889 via elf_sym_hashes (input_bfd).
2890
2891 When generating relocateable output, this function must handle
2892 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
2893 going to be the section symbol corresponding to the output
2894 section, which means that the addend must be adjusted
2895 accordingly. */
2896
2897 static boolean
2898 ppc_elf_relocate_section (output_bfd, info, input_bfd, input_section,
2899 contents, relocs, local_syms, local_sections)
2900 bfd *output_bfd;
2901 struct bfd_link_info *info;
2902 bfd *input_bfd;
2903 asection *input_section;
2904 bfd_byte *contents;
2905 Elf_Internal_Rela *relocs;
2906 Elf_Internal_Sym *local_syms;
2907 asection **local_sections;
2908 {
2909 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
2910 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
2911 bfd *dynobj = elf_hash_table (info)->dynobj;
2912 elf_linker_section_t *sdata = (dynobj) ? elf_linker_section (dynobj, LINKER_SECTION_SDATA) : NULL;
2913 elf_linker_section_t *sdata2 = (dynobj) ? elf_linker_section (dynobj, LINKER_SECTION_SDATA2) : NULL;
2914 Elf_Internal_Rela *rel = relocs;
2915 Elf_Internal_Rela *relend = relocs + input_section->reloc_count;
2916 asection *sreloc = NULL;
2917 asection *splt;
2918 asection *sgot;
2919 bfd_vma *local_got_offsets;
2920 boolean ret = true;
2921 long insn;
2922
2923 #ifdef DEBUG
2924 fprintf (stderr, "ppc_elf_relocate_section called for %s section %s, %ld relocations%s\n",
2925 bfd_get_filename (input_bfd),
2926 bfd_section_name(input_bfd, input_section),
2927 (long) input_section->reloc_count,
2928 (info->relocateable) ? " (relocatable)" : "");
2929 #endif
2930
2931 if (!ppc_elf_howto_table[R_PPC_ADDR32])
2932 /* Initialize howto table if needed. */
2933 ppc_elf_howto_init ();
2934
2935 local_got_offsets = elf_local_got_offsets (input_bfd);
2936
2937 splt = sgot = NULL;
2938 if (dynobj != NULL)
2939 {
2940 splt = bfd_get_section_by_name (dynobj, ".plt");
2941 sgot = bfd_get_section_by_name (dynobj, ".got");
2942 }
2943
2944 for (; rel < relend; rel++)
2945 {
2946 enum elf_ppc_reloc_type r_type = (enum elf_ppc_reloc_type)ELF32_R_TYPE (rel->r_info);
2947 bfd_vma offset = rel->r_offset;
2948 bfd_vma addend = rel->r_addend;
2949 bfd_reloc_status_type r = bfd_reloc_other;
2950 Elf_Internal_Sym *sym = (Elf_Internal_Sym *) 0;
2951 asection *sec = (asection *) 0;
2952 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) 0;
2953 const char *sym_name = (const char *) 0;
2954 reloc_howto_type *howto;
2955 unsigned long r_symndx;
2956 bfd_vma relocation;
2957 int will_become_local;
2958
2959 /* Unknown relocation handling */
2960 if ((unsigned) r_type >= (unsigned) R_PPC_max
2961 || !ppc_elf_howto_table[(int) r_type])
2962 {
2963 (*_bfd_error_handler) (_("%s: unknown relocation type %d"),
2964 bfd_get_filename (input_bfd),
2965 (int) r_type);
2966
2967 bfd_set_error (bfd_error_bad_value);
2968 ret = false;
2969 continue;
2970 }
2971
2972 howto = ppc_elf_howto_table[(int) r_type];
2973 r_symndx = ELF32_R_SYM (rel->r_info);
2974
2975 if (info->relocateable)
2976 {
2977 /* This is a relocateable link. We don't have to change
2978 anything, unless the reloc is against a section symbol,
2979 in which case we have to adjust according to where the
2980 section symbol winds up in the output section. */
2981 if (r_symndx < symtab_hdr->sh_info)
2982 {
2983 sym = local_syms + r_symndx;
2984 if ((unsigned) ELF_ST_TYPE (sym->st_info) == STT_SECTION)
2985 {
2986 sec = local_sections[r_symndx];
2987 addend = rel->r_addend += sec->output_offset + sym->st_value;
2988 }
2989 }
2990
2991 #ifdef DEBUG
2992 fprintf (stderr, "\ttype = %s (%d), symbol index = %ld, offset = %ld, addend = %ld\n",
2993 howto->name,
2994 (int) r_type,
2995 r_symndx,
2996 (long) offset,
2997 (long) addend);
2998 #endif
2999 continue;
3000 }
3001
3002 /* This is a final link. */
3003 if (r_symndx < symtab_hdr->sh_info)
3004 {
3005 sym = local_syms + r_symndx;
3006 sec = local_sections[r_symndx];
3007 sym_name = "<local symbol>";
3008
3009 relocation = (sec->output_section->vma
3010 + sec->output_offset
3011 + sym->st_value);
3012 /* Relocs to local symbols are always resolved. */
3013 will_become_local = 1;
3014 }
3015 else
3016 {
3017 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3018 while (h->root.type == bfd_link_hash_indirect
3019 || h->root.type == bfd_link_hash_warning)
3020 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3021 sym_name = h->root.root.string;
3022
3023 /* Can this relocation be resolved immediately? */
3024 will_become_local = SYMBOL_REFERENCES_LOCAL (info, h);
3025
3026 if (h->root.type == bfd_link_hash_defined
3027 || h->root.type == bfd_link_hash_defweak)
3028 {
3029 sec = h->root.u.def.section;
3030 if (((r_type == R_PPC_PLT32
3031 || r_type == R_PPC_PLTREL24)
3032 && splt != NULL
3033 && h->plt.offset != (bfd_vma) -1)
3034 || (r_type == R_PPC_LOCAL24PC
3035 && sec->output_section == NULL)
3036 || ((r_type == R_PPC_GOT16
3037 || r_type == R_PPC_GOT16_LO
3038 || r_type == R_PPC_GOT16_HI
3039 || r_type == R_PPC_GOT16_HA)
3040 && elf_hash_table (info)->dynamic_sections_created
3041 && (! info->shared || ! will_become_local))
3042 || (info->shared
3043 && ! will_become_local
3044 && ((input_section->flags & SEC_ALLOC) != 0
3045 /* Testing SEC_DEBUGGING here may be wrong.
3046 It's here to avoid a crash when
3047 generating a shared library with DWARF
3048 debugging information. */
3049 || ((input_section->flags & SEC_DEBUGGING) != 0
3050 && (h->elf_link_hash_flags
3051 & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
3052 && (r_type == R_PPC_ADDR32
3053 || r_type == R_PPC_ADDR24
3054 || r_type == R_PPC_ADDR16
3055 || r_type == R_PPC_ADDR16_LO
3056 || r_type == R_PPC_ADDR16_HI
3057 || r_type == R_PPC_ADDR16_HA
3058 || r_type == R_PPC_ADDR14
3059 || r_type == R_PPC_ADDR14_BRTAKEN
3060 || r_type == R_PPC_ADDR14_BRNTAKEN
3061 || r_type == R_PPC_COPY
3062 || r_type == R_PPC_GLOB_DAT
3063 || r_type == R_PPC_JMP_SLOT
3064 || r_type == R_PPC_UADDR32
3065 || r_type == R_PPC_UADDR16
3066 || r_type == R_PPC_SDAREL16
3067 || r_type == R_PPC_EMB_NADDR32
3068 || r_type == R_PPC_EMB_NADDR16
3069 || r_type == R_PPC_EMB_NADDR16_LO
3070 || r_type == R_PPC_EMB_NADDR16_HI
3071 || r_type == R_PPC_EMB_NADDR16_HA
3072 || r_type == R_PPC_EMB_SDAI16
3073 || r_type == R_PPC_EMB_SDA2I16
3074 || r_type == R_PPC_EMB_SDA2REL
3075 || r_type == R_PPC_EMB_SDA21
3076 || r_type == R_PPC_EMB_MRKREF
3077 || r_type == R_PPC_EMB_BIT_FLD
3078 || r_type == R_PPC_EMB_RELSDA
3079 || ((r_type == R_PPC_REL24
3080 || r_type == R_PPC_REL32
3081 || r_type == R_PPC_REL14
3082 || r_type == R_PPC_REL14_BRTAKEN
3083 || r_type == R_PPC_REL14_BRNTAKEN
3084 || r_type == R_PPC_RELATIVE)
3085 && strcmp (h->root.root.string,
3086 "_GLOBAL_OFFSET_TABLE_") != 0))))
3087 {
3088 /* In these cases, we don't need the relocation
3089 value. We check specially because in some
3090 obscure cases sec->output_section will be NULL. */
3091 relocation = 0;
3092 }
3093 else if (sec->output_section == NULL)
3094 {
3095 (*_bfd_error_handler)
3096 (_("%s: warning: unresolvable relocation against symbol `%s' from %s section"),
3097 bfd_get_filename (input_bfd), h->root.root.string,
3098 bfd_get_section_name (input_bfd, input_section));
3099 relocation = 0;
3100 }
3101 else
3102 relocation = (h->root.u.def.value
3103 + sec->output_section->vma
3104 + sec->output_offset);
3105 }
3106 else if (h->root.type == bfd_link_hash_undefweak)
3107 relocation = 0;
3108 else if (info->shared && !info->symbolic && !info->no_undefined
3109 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
3110 relocation = 0;
3111 else
3112 {
3113 if (! (*info->callbacks->undefined_symbol) (info,
3114 h->root.root.string,
3115 input_bfd,
3116 input_section,
3117 rel->r_offset,
3118 (!info->shared
3119 || info->no_undefined
3120 || ELF_ST_VISIBILITY (h->other))))
3121 return false;
3122 relocation = 0;
3123 }
3124 }
3125
3126 switch ((int) r_type)
3127 {
3128 default:
3129 (*_bfd_error_handler) (_("%s: unknown relocation type %d for symbol %s"),
3130 bfd_get_filename (input_bfd),
3131 (int) r_type, sym_name);
3132
3133 bfd_set_error (bfd_error_bad_value);
3134 ret = false;
3135 continue;
3136
3137 /* Relocations that need no special processing. */
3138 case (int) R_PPC_LOCAL24PC:
3139 /* It makes no sense to point a local relocation
3140 at a symbol not in this object. */
3141 if (h != NULL
3142 && (h->root.type == bfd_link_hash_defined
3143 || h->root.type == bfd_link_hash_defweak)
3144 && sec->output_section == NULL)
3145 {
3146 if (! (*info->callbacks->undefined_symbol) (info,
3147 h->root.root.string,
3148 input_bfd,
3149 input_section,
3150 rel->r_offset,
3151 true))
3152 return false;
3153 continue;
3154 }
3155 break;
3156
3157 /* Relocations that may need to be propagated if this is a shared
3158 object. */
3159 case (int) R_PPC_REL24:
3160 case (int) R_PPC_REL32:
3161 case (int) R_PPC_REL14:
3162 /* If these relocations are not to a named symbol, they can be
3163 handled right here, no need to bother the dynamic linker. */
3164 if (h == NULL
3165 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
3166 || SYMBOL_REFERENCES_LOCAL (info, h))
3167 break;
3168 /* fall through */
3169
3170 /* Relocations that always need to be propagated if this is a shared
3171 object. */
3172 case (int) R_PPC_NONE:
3173 case (int) R_PPC_ADDR32:
3174 case (int) R_PPC_ADDR24:
3175 case (int) R_PPC_ADDR16:
3176 case (int) R_PPC_ADDR16_LO:
3177 case (int) R_PPC_ADDR16_HI:
3178 case (int) R_PPC_ADDR16_HA:
3179 case (int) R_PPC_ADDR14:
3180 case (int) R_PPC_UADDR32:
3181 case (int) R_PPC_UADDR16:
3182 if (info->shared)
3183 {
3184 Elf_Internal_Rela outrel;
3185 boolean skip;
3186
3187 #ifdef DEBUG
3188 fprintf (stderr, "ppc_elf_relocate_section need to create relocation for %s\n",
3189 (h && h->root.root.string) ? h->root.root.string : "<unknown>");
3190 #endif
3191
3192 /* When generating a shared object, these relocations
3193 are copied into the output file to be resolved at run
3194 time. */
3195
3196 if (sreloc == NULL)
3197 {
3198 const char *name;
3199
3200 name = (bfd_elf_string_from_elf_section
3201 (input_bfd,
3202 elf_elfheader (input_bfd)->e_shstrndx,
3203 elf_section_data (input_section)->rel_hdr.sh_name));
3204 if (name == NULL)
3205 return false;
3206
3207 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
3208 && strcmp (bfd_get_section_name (input_bfd,
3209 input_section),
3210 name + 5) == 0);
3211
3212 sreloc = bfd_get_section_by_name (dynobj, name);
3213 BFD_ASSERT (sreloc != NULL);
3214 }
3215
3216 skip = false;
3217
3218 if (elf_section_data (input_section)->stab_info == NULL)
3219 outrel.r_offset = rel->r_offset;
3220 else
3221 {
3222 bfd_vma off;
3223
3224 off = (_bfd_stab_section_offset
3225 (output_bfd, &elf_hash_table (info)->stab_info,
3226 input_section,
3227 &elf_section_data (input_section)->stab_info,
3228 rel->r_offset));
3229 if (off == (bfd_vma) -1)
3230 skip = true;
3231 outrel.r_offset = off;
3232 }
3233
3234 outrel.r_offset += (input_section->output_section->vma
3235 + input_section->output_offset);
3236
3237 if (skip)
3238 memset (&outrel, 0, sizeof outrel);
3239 /* h->dynindx may be -1 if this symbol was marked to
3240 become local. */
3241 else if (! will_become_local)
3242 {
3243 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
3244 outrel.r_addend = rel->r_addend;
3245 }
3246 else
3247 {
3248 if (r_type == R_PPC_ADDR32)
3249 {
3250 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
3251 outrel.r_addend = relocation + rel->r_addend;
3252 }
3253 else
3254 {
3255 long indx;
3256
3257 if (h == NULL)
3258 sec = local_sections[r_symndx];
3259 else
3260 {
3261 BFD_ASSERT (h->root.type == bfd_link_hash_defined
3262 || (h->root.type
3263 == bfd_link_hash_defweak));
3264 sec = h->root.u.def.section;
3265 }
3266 if (sec != NULL && bfd_is_abs_section (sec))
3267 indx = 0;
3268 else if (sec == NULL || sec->owner == NULL)
3269 {
3270 bfd_set_error (bfd_error_bad_value);
3271 return false;
3272 }
3273 else
3274 {
3275 asection *osec;
3276
3277 osec = sec->output_section;
3278 indx = elf_section_data (osec)->dynindx;
3279 BFD_ASSERT (indx > 0);
3280 #ifdef DEBUG
3281 if (indx <= 0)
3282 {
3283 printf ("indx=%d section=%s flags=%08x name=%s\n",
3284 indx, osec->name, osec->flags,
3285 h->root.root.string);
3286 }
3287 #endif
3288 }
3289
3290 outrel.r_info = ELF32_R_INFO (indx, r_type);
3291 outrel.r_addend = relocation + rel->r_addend;
3292 }
3293 }
3294
3295 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
3296 (((Elf32_External_Rela *)
3297 sreloc->contents)
3298 + sreloc->reloc_count));
3299 ++sreloc->reloc_count;
3300
3301 /* This reloc will be computed at runtime, so there's no
3302 need to do anything now, unless this is a RELATIVE
3303 reloc in an unallocated section. */
3304 if (skip
3305 || (input_section->flags & SEC_ALLOC) != 0
3306 || ELF32_R_TYPE (outrel.r_info) != R_PPC_RELATIVE)
3307 continue;
3308 }
3309
3310 /* Arithmetic adjust relocations that aren't going into a
3311 shared object. */
3312 if (r_type == R_PPC_ADDR16_HA
3313 /* It's just possible that this symbol is a weak symbol
3314 that's not actually defined anywhere. In that case,
3315 'sec' would be NULL, and we should leave the symbol
3316 alone (it will be set to zero elsewhere in the link). */
3317 && sec != NULL)
3318 {
3319 addend += ((relocation + addend) & 0x8000) << 1;
3320 }
3321 break;
3322
3323 /* branch taken prediction relocations */
3324 case (int) R_PPC_ADDR14_BRTAKEN:
3325 case (int) R_PPC_REL14_BRTAKEN:
3326 insn = bfd_get_32 (output_bfd, contents + offset);
3327 if ((relocation - offset) & 0x8000)
3328 insn &= ~BRANCH_PREDICT_BIT;
3329 else
3330 insn |= BRANCH_PREDICT_BIT;
3331 bfd_put_32 (output_bfd, insn, contents + offset);
3332 break;
3333
3334 /* branch not taken predicition relocations */
3335 case (int) R_PPC_ADDR14_BRNTAKEN:
3336 case (int) R_PPC_REL14_BRNTAKEN:
3337 insn = bfd_get_32 (output_bfd, contents + offset);
3338 if ((relocation - offset) & 0x8000)
3339 insn |= BRANCH_PREDICT_BIT;
3340 else
3341 insn &= ~BRANCH_PREDICT_BIT;
3342 bfd_put_32 (output_bfd, insn, contents + offset);
3343 break;
3344
3345 /* GOT16 relocations */
3346 case (int) R_PPC_GOT16:
3347 case (int) R_PPC_GOT16_LO:
3348 case (int) R_PPC_GOT16_HI:
3349 case (int) R_PPC_GOT16_HA:
3350 /* Relocation is to the entry for this symbol in the global
3351 offset table. */
3352 BFD_ASSERT (sgot != NULL);
3353
3354 if (h != NULL)
3355 {
3356 bfd_vma off;
3357
3358 off = h->got.offset;
3359 BFD_ASSERT (off != (bfd_vma) -1);
3360
3361 if (! elf_hash_table (info)->dynamic_sections_created
3362 || (info->shared
3363 && SYMBOL_REFERENCES_LOCAL (info, h)))
3364 {
3365 /* This is actually a static link, or it is a
3366 -Bsymbolic link and the symbol is defined
3367 locally. We must initialize this entry in the
3368 global offset table. Since the offset must
3369 always be a multiple of 4, we use the least
3370 significant bit to record whether we have
3371 initialized it already.
3372
3373 When doing a dynamic link, we create a .rela.got
3374 relocation entry to initialize the value. This
3375 is done in the finish_dynamic_symbol routine. */
3376 if ((off & 1) != 0)
3377 off &= ~1;
3378 else
3379 {
3380 bfd_put_32 (output_bfd, relocation,
3381 sgot->contents + off);
3382 h->got.offset |= 1;
3383 }
3384 }
3385
3386 relocation = sgot->output_offset + off - 4;
3387 }
3388 else
3389 {
3390 bfd_vma off;
3391
3392 BFD_ASSERT (local_got_offsets != NULL
3393 && local_got_offsets[r_symndx] != (bfd_vma) -1);
3394
3395 off = local_got_offsets[r_symndx];
3396
3397 /* The offset must always be a multiple of 4. We use
3398 the least significant bit to record whether we have
3399 already processed this entry. */
3400 if ((off & 1) != 0)
3401 off &= ~1;
3402 else
3403 {
3404 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
3405
3406 if (info->shared)
3407 {
3408 asection *srelgot;
3409 Elf_Internal_Rela outrel;
3410
3411 /* We need to generate a R_PPC_RELATIVE reloc
3412 for the dynamic linker. */
3413 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
3414 BFD_ASSERT (srelgot != NULL);
3415
3416 outrel.r_offset = (sgot->output_section->vma
3417 + sgot->output_offset
3418 + off);
3419 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
3420 outrel.r_addend = relocation;
3421 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
3422 (((Elf32_External_Rela *)
3423 srelgot->contents)
3424 + srelgot->reloc_count));
3425 ++srelgot->reloc_count;
3426 }
3427
3428 local_got_offsets[r_symndx] |= 1;
3429 }
3430
3431 relocation = sgot->output_offset + off - 4;
3432 }
3433 break;
3434
3435 /* Indirect .sdata relocation */
3436 case (int) R_PPC_EMB_SDAI16:
3437 BFD_ASSERT (sdata != NULL);
3438 relocation = bfd_elf32_finish_pointer_linker_section (output_bfd, input_bfd, info,
3439 sdata, h, relocation, rel,
3440 R_PPC_RELATIVE);
3441 break;
3442
3443 /* Indirect .sdata2 relocation */
3444 case (int) R_PPC_EMB_SDA2I16:
3445 BFD_ASSERT (sdata2 != NULL);
3446 relocation = bfd_elf32_finish_pointer_linker_section (output_bfd, input_bfd, info,
3447 sdata2, h, relocation, rel,
3448 R_PPC_RELATIVE);
3449 break;
3450
3451 /* Handle the TOC16 reloc. We want to use the offset within the .got
3452 section, not the actual VMA. This is appropriate when generating
3453 an embedded ELF object, for which the .got section acts like the
3454 AIX .toc section. */
3455 case (int) R_PPC_TOC16: /* phony GOT16 relocations */
3456 BFD_ASSERT (sec != (asection *) 0);
3457 BFD_ASSERT (bfd_is_und_section (sec)
3458 || strcmp (bfd_get_section_name (abfd, sec), ".got") == 0
3459 || strcmp (bfd_get_section_name (abfd, sec), ".cgot") == 0)
3460
3461 addend -= sec->output_section->vma + sec->output_offset + 0x8000;
3462 break;
3463
3464 case (int) R_PPC_PLTREL24:
3465 /* Relocation is to the entry for this symbol in the
3466 procedure linkage table. */
3467 BFD_ASSERT (h != NULL);
3468
3469 if (h->plt.offset == (bfd_vma) -1
3470 || splt == NULL)
3471 {
3472 /* We didn't make a PLT entry for this symbol. This
3473 happens when statically linking PIC code, or when
3474 using -Bsymbolic. */
3475 break;
3476 }
3477
3478 relocation = (splt->output_section->vma
3479 + splt->output_offset
3480 + h->plt.offset);
3481 break;
3482
3483 /* relocate against _SDA_BASE_ */
3484 case (int) R_PPC_SDAREL16:
3485 {
3486 const char *name;
3487
3488 BFD_ASSERT (sec != (asection *) 0);
3489 name = bfd_get_section_name (abfd, sec->output_section);
3490 if (strcmp (name, ".sdata") != 0
3491 && strcmp (name, ".sbss") != 0)
3492 {
3493 (*_bfd_error_handler) (_("%s: The target (%s) of a %s relocation is in the wrong output section (%s)"),
3494 bfd_get_filename (input_bfd),
3495 sym_name,
3496 ppc_elf_howto_table[(int) r_type]->name,
3497 name);
3498 }
3499 addend -= (sdata->sym_hash->root.u.def.value
3500 + sdata->sym_hash->root.u.def.section->output_section->vma
3501 + sdata->sym_hash->root.u.def.section->output_offset);
3502 }
3503 break;
3504
3505 /* relocate against _SDA2_BASE_ */
3506 case (int) R_PPC_EMB_SDA2REL:
3507 {
3508 const char *name;
3509
3510 BFD_ASSERT (sec != (asection *) 0);
3511 name = bfd_get_section_name (abfd, sec->output_section);
3512 if (strcmp (name, ".sdata2") != 0 && strcmp (name, ".sbss2") != 0)
3513 {
3514 (*_bfd_error_handler) (_("%s: The target (%s) of a %s relocation is in the wrong output section (%s)"),
3515 bfd_get_filename (input_bfd),
3516 sym_name,
3517 ppc_elf_howto_table[(int) r_type]->name,
3518 name);
3519
3520 bfd_set_error (bfd_error_bad_value);
3521 ret = false;
3522 continue;
3523 }
3524 addend -= (sdata2->sym_hash->root.u.def.value
3525 + sdata2->sym_hash->root.u.def.section->output_section->vma
3526 + sdata2->sym_hash->root.u.def.section->output_offset);
3527 }
3528 break;
3529
3530 /* relocate against either _SDA_BASE_, _SDA2_BASE_, or 0 */
3531 case (int) R_PPC_EMB_SDA21:
3532 case (int) R_PPC_EMB_RELSDA:
3533 {
3534 const char *name;
3535 int reg;
3536
3537 BFD_ASSERT (sec != (asection *) 0);
3538 name = bfd_get_section_name (abfd, sec->output_section);
3539 if (strcmp (name, ".sdata") == 0 || strcmp (name, ".sbss") == 0)
3540 {
3541 reg = 13;
3542 addend -= (sdata->sym_hash->root.u.def.value
3543 + sdata->sym_hash->root.u.def.section->output_section->vma
3544 + sdata->sym_hash->root.u.def.section->output_offset);
3545 }
3546
3547 else if (strcmp (name, ".sdata2") == 0
3548 || strcmp (name, ".sbss2") == 0)
3549 {
3550 reg = 2;
3551 addend -= (sdata2->sym_hash->root.u.def.value
3552 + sdata2->sym_hash->root.u.def.section->output_section->vma
3553 + sdata2->sym_hash->root.u.def.section->output_offset);
3554 }
3555
3556 else if (strcmp (name, ".PPC.EMB.sdata0") == 0
3557 || strcmp (name, ".PPC.EMB.sbss0") == 0)
3558 {
3559 reg = 0;
3560 }
3561
3562 else
3563 {
3564 (*_bfd_error_handler) (_("%s: The target (%s) of a %s relocation is in the wrong output section (%s)"),
3565 bfd_get_filename (input_bfd),
3566 sym_name,
3567 ppc_elf_howto_table[(int) r_type]->name,
3568 name);
3569
3570 bfd_set_error (bfd_error_bad_value);
3571 ret = false;
3572 continue;
3573 }
3574
3575 if (r_type == R_PPC_EMB_SDA21)
3576 { /* fill in register field */
3577 insn = bfd_get_32 (output_bfd, contents + offset);
3578 insn = (insn & ~RA_REGISTER_MASK) | (reg << RA_REGISTER_SHIFT);
3579 bfd_put_32 (output_bfd, insn, contents + offset);
3580 }
3581 }
3582 break;
3583
3584 /* Relocate against the beginning of the section */
3585 case (int) R_PPC_SECTOFF:
3586 case (int) R_PPC_SECTOFF_LO:
3587 case (int) R_PPC_SECTOFF_HI:
3588 BFD_ASSERT (sec != (asection *) 0);
3589 addend -= sec->output_section->vma;
3590 break;
3591
3592 case (int) R_PPC_SECTOFF_HA:
3593 BFD_ASSERT (sec != (asection *) 0);
3594 addend -= sec->output_section->vma;
3595 addend += ((relocation + addend) & 0x8000) << 1;
3596 break;
3597
3598 /* Negative relocations */
3599 case (int) R_PPC_EMB_NADDR32:
3600 case (int) R_PPC_EMB_NADDR16:
3601 case (int) R_PPC_EMB_NADDR16_LO:
3602 case (int) R_PPC_EMB_NADDR16_HI:
3603 addend -= 2 * relocation;
3604 break;
3605
3606 case (int) R_PPC_EMB_NADDR16_HA:
3607 addend -= 2 * relocation;
3608 addend += ((relocation + addend) & 0x8000) << 1;
3609 break;
3610
3611 /* NOP relocation that prevents garbage collecting linkers from omitting a
3612 reference. */
3613 case (int) R_PPC_EMB_MRKREF:
3614 continue;
3615
3616 case (int) R_PPC_COPY:
3617 case (int) R_PPC_GLOB_DAT:
3618 case (int) R_PPC_JMP_SLOT:
3619 case (int) R_PPC_RELATIVE:
3620 case (int) R_PPC_PLT32:
3621 case (int) R_PPC_PLTREL32:
3622 case (int) R_PPC_PLT16_LO:
3623 case (int) R_PPC_PLT16_HI:
3624 case (int) R_PPC_PLT16_HA:
3625 case (int) R_PPC_EMB_RELSEC16:
3626 case (int) R_PPC_EMB_RELST_LO:
3627 case (int) R_PPC_EMB_RELST_HI:
3628 case (int) R_PPC_EMB_RELST_HA:
3629 case (int) R_PPC_EMB_BIT_FLD:
3630 (*_bfd_error_handler) (_("%s: Relocation %s is not yet supported for symbol %s."),
3631 bfd_get_filename (input_bfd),
3632 ppc_elf_howto_table[(int) r_type]->name,
3633 sym_name);
3634
3635 bfd_set_error (bfd_error_invalid_operation);
3636 ret = false;
3637 continue;
3638
3639 case (int) R_PPC_GNU_VTINHERIT:
3640 case (int) R_PPC_GNU_VTENTRY:
3641 /* These are no-ops in the end. */
3642 continue;
3643 }
3644
3645 #ifdef DEBUG
3646 fprintf (stderr, "\ttype = %s (%d), name = %s, symbol index = %ld, offset = %ld, addend = %ld\n",
3647 howto->name,
3648 (int) r_type,
3649 sym_name,
3650 r_symndx,
3651 (long) offset,
3652 (long) addend);
3653 #endif
3654
3655 r = _bfd_final_link_relocate (howto,
3656 input_bfd,
3657 input_section,
3658 contents,
3659 offset,
3660 relocation,
3661 addend);
3662
3663 if (r == bfd_reloc_ok)
3664 ;
3665 else if (r == bfd_reloc_overflow)
3666 {
3667 const char *name;
3668
3669 if (h != NULL)
3670 {
3671 if (h->root.type == bfd_link_hash_undefweak
3672 && howto->pc_relative)
3673 {
3674 /* Assume this is a call protected by other code that
3675 detect the symbol is undefined. If this is the case,
3676 we can safely ignore the overflow. If not, the
3677 program is hosed anyway, and a little warning isn't
3678 going to help. */
3679
3680 continue;
3681 }
3682
3683 name = h->root.root.string;
3684 }
3685 else
3686 {
3687 name = bfd_elf_string_from_elf_section (input_bfd,
3688 symtab_hdr->sh_link,
3689 sym->st_name);
3690 if (name == NULL)
3691 continue;
3692 if (*name == '\0')
3693 name = bfd_section_name (input_bfd, sec);
3694 }
3695
3696 if (! (*info->callbacks->reloc_overflow) (info,
3697 name,
3698 howto->name,
3699 (bfd_vma) 0,
3700 input_bfd,
3701 input_section,
3702 offset))
3703 return false;
3704 }
3705 else
3706 ret = false;
3707 }
3708
3709 #ifdef DEBUG
3710 fprintf (stderr, "\n");
3711 #endif
3712
3713 return ret;
3714 }
3715 \f
3716 #define TARGET_LITTLE_SYM bfd_elf32_powerpcle_vec
3717 #define TARGET_LITTLE_NAME "elf32-powerpcle"
3718 #define TARGET_BIG_SYM bfd_elf32_powerpc_vec
3719 #define TARGET_BIG_NAME "elf32-powerpc"
3720 #define ELF_ARCH bfd_arch_powerpc
3721 #define ELF_MACHINE_CODE EM_PPC
3722 #define ELF_MAXPAGESIZE 0x10000
3723 #define elf_info_to_howto ppc_elf_info_to_howto
3724
3725 #ifdef EM_CYGNUS_POWERPC
3726 #define ELF_MACHINE_ALT1 EM_CYGNUS_POWERPC
3727 #endif
3728
3729 #ifdef EM_PPC_OLD
3730 #define ELF_MACHINE_ALT2 EM_PPC_OLD
3731 #endif
3732
3733 #define elf_backend_plt_not_loaded 1
3734 #define elf_backend_got_symbol_offset 4
3735 #define elf_backend_can_gc_sections 1
3736 #define elf_backend_got_header_size 12
3737 #define elf_backend_plt_header_size PLT_INITIAL_ENTRY_SIZE
3738
3739 #define bfd_elf32_bfd_copy_private_bfd_data ppc_elf_copy_private_bfd_data
3740 #define bfd_elf32_bfd_merge_private_bfd_data ppc_elf_merge_private_bfd_data
3741 #define bfd_elf32_bfd_relax_section ppc_elf_relax_section
3742 #define bfd_elf32_bfd_reloc_type_lookup ppc_elf_reloc_type_lookup
3743 #define bfd_elf32_bfd_set_private_flags ppc_elf_set_private_flags
3744 #define bfd_elf32_bfd_final_link _bfd_elf32_gc_common_final_link
3745
3746 #define elf_backend_gc_mark_hook ppc_elf_gc_mark_hook
3747 #define elf_backend_gc_sweep_hook ppc_elf_gc_sweep_hook
3748 #define elf_backend_section_from_shdr ppc_elf_section_from_shdr
3749 #define elf_backend_relocate_section ppc_elf_relocate_section
3750 #define elf_backend_create_dynamic_sections ppc_elf_create_dynamic_sections
3751 #define elf_backend_check_relocs ppc_elf_check_relocs
3752 #define elf_backend_adjust_dynamic_symbol ppc_elf_adjust_dynamic_symbol
3753 #define elf_backend_add_symbol_hook ppc_elf_add_symbol_hook
3754 #define elf_backend_size_dynamic_sections ppc_elf_size_dynamic_sections
3755 #define elf_backend_finish_dynamic_symbol ppc_elf_finish_dynamic_symbol
3756 #define elf_backend_finish_dynamic_sections ppc_elf_finish_dynamic_sections
3757 #define elf_backend_fake_sections ppc_elf_fake_sections
3758 #define elf_backend_additional_program_headers ppc_elf_additional_program_headers
3759 #define elf_backend_modify_segment_map ppc_elf_modify_segment_map
3760
3761 #include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.138179 seconds and 4 git commands to generate.