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