projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
* mips-linux-nat.c (mips_linux_cannot_fetch_register)
[deliverable/binutils-gdb.git] / bfd / elf32-ppc.c
1 /* PowerPC-specific support for 32-bit ELF
2 Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
3 Free Software Foundation, Inc.
4 Written by Ian Lance Taylor, Cygnus Support.
5
6 This file is part of BFD, the Binary File Descriptor library.
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the
20 Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
22
23 /* This file is based on a preliminary PowerPC ELF ABI. The
24 information may not match the final PowerPC ELF ABI. It includes
25 suggestions from the in-progress Embedded PowerPC ABI, and that
26 information may also not match. */
27
28 #include "bfd.h"
29 #include "sysdep.h"
30 #include "bfdlink.h"
31 #include "libbfd.h"
32 #include "elf-bfd.h"
33 #include "elf/ppc.h"
34 #include "elf32-ppc.h"
35
36 /* RELA relocations are used here. */
37
38 static bfd_reloc_status_type ppc_elf_addr16_ha_reloc
39 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
40 static bfd_reloc_status_type ppc_elf_unhandled_reloc
41 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
42
43 /* Branch prediction bit for branch taken relocs. */
44 #define BRANCH_PREDICT_BIT 0x200000
45 /* Mask to set RA in memory instructions. */
46 #define RA_REGISTER_MASK 0x001f0000
47 /* Value to shift register by to insert RA. */
48 #define RA_REGISTER_SHIFT 16
49
50 /* The name of the dynamic interpreter. This is put in the .interp
51 section. */
52 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
53
54 /* The size in bytes of an entry in the procedure linkage table. */
55 #define PLT_ENTRY_SIZE 12
56 /* The initial size of the plt reserved for the dynamic linker. */
57 #define PLT_INITIAL_ENTRY_SIZE 72
58 /* The size of the gap between entries in the PLT. */
59 #define PLT_SLOT_SIZE 8
60 /* The number of single-slot PLT entries (the rest use two slots). */
61 #define PLT_NUM_SINGLE_ENTRIES 8192
62
63 /* Some nop instructions. */
64 #define NOP 0x60000000
65 #define CROR_151515 0x4def7b82
66 #define CROR_313131 0x4ffffb82
67
68 /* Offset of tp and dtp pointers from start of TLS block. */
69 #define TP_OFFSET 0x7000
70 #define DTP_OFFSET 0x8000
71
72 \f
73 /* The PPC linker needs to keep track of the number of relocs that it
74 decides to copy as dynamic relocs in check_relocs for each symbol.
75 This is so that it can later discard them if they are found to be
76 unnecessary. We store the information in a field extending the
77 regular ELF linker hash table. */
78
79 struct ppc_elf_dyn_relocs
80 {
81 struct ppc_elf_dyn_relocs *next;
82
83 /* The input section of the reloc. */
84 asection *sec;
85
86 /* Total number of relocs copied for the input section. */
87 bfd_size_type count;
88
89 /* Number of pc-relative relocs copied for the input section. */
90 bfd_size_type pc_count;
91 };
92
93 /* PPC ELF linker hash entry. */
94
95 struct ppc_elf_link_hash_entry
96 {
97 struct elf_link_hash_entry elf;
98
99 /* Track dynamic relocs copied for this symbol. */
100 struct ppc_elf_dyn_relocs *dyn_relocs;
101
102 /* Contexts in which symbol is used in the GOT (or TOC).
103 TLS_GD .. TLS_TLS bits are or'd into the mask as the
104 corresponding relocs are encountered during check_relocs.
105 tls_optimize clears TLS_GD .. TLS_TPREL when optimizing to
106 indicate the corresponding GOT entry type is not needed. */
107 #define TLS_GD 1 /* GD reloc. */
108 #define TLS_LD 2 /* LD reloc. */
109 #define TLS_TPREL 4 /* TPREL reloc, => IE. */
110 #define TLS_DTPREL 8 /* DTPREL reloc, => LD. */
111 #define TLS_TLS 16 /* Any TLS reloc. */
112 #define TLS_TPRELGD 32 /* TPREL reloc resulting from GD->IE. */
113 char tls_mask;
114 };
115
116 #define ppc_elf_hash_entry(ent) ((struct ppc_elf_link_hash_entry *) (ent))
117
118 /* PPC ELF linker hash table. */
119
120 struct ppc_elf_link_hash_table
121 {
122 struct elf_link_hash_table elf;
123
124 /* Short-cuts to get to dynamic linker sections. */
125 asection *got;
126 asection *relgot;
127 asection *plt;
128 asection *relplt;
129 asection *dynbss;
130 asection *relbss;
131 asection *dynsbss;
132 asection *relsbss;
133 elf_linker_section_t *sdata;
134 elf_linker_section_t *sdata2;
135
136 /* Short-cut to first output tls section. */
137 asection *tls_sec;
138
139 /* Shortcut to .__tls_get_addr. */
140 struct elf_link_hash_entry *tls_get_addr;
141
142 /* TLS local dynamic got entry handling. */
143 union {
144 bfd_signed_vma refcount;
145 bfd_vma offset;
146 } tlsld_got;
147
148 /* Small local sym to section mapping cache. */
149 struct sym_sec_cache sym_sec;
150 };
151
152 /* Get the PPC ELF linker hash table from a link_info structure. */
153
154 #define ppc_elf_hash_table(p) \
155 ((struct ppc_elf_link_hash_table *) (p)->hash)
156
157 /* Create an entry in a PPC ELF linker hash table. */
158
159 static struct bfd_hash_entry *
160 ppc_elf_link_hash_newfunc (struct bfd_hash_entry *entry,
161 struct bfd_hash_table *table,
162 const char *string)
163 {
164 /* Allocate the structure if it has not already been allocated by a
165 subclass. */
166 if (entry == NULL)
167 {
168 entry = bfd_hash_allocate (table,
169 sizeof (struct ppc_elf_link_hash_entry));
170 if (entry == NULL)
171 return entry;
172 }
173
174 /* Call the allocation method of the superclass. */
175 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
176 if (entry != NULL)
177 {
178 ppc_elf_hash_entry (entry)->dyn_relocs = NULL;
179 ppc_elf_hash_entry (entry)->tls_mask = 0;
180 }
181
182 return entry;
183 }
184
185 /* Create a PPC ELF linker hash table. */
186
187 static struct bfd_link_hash_table *
188 ppc_elf_link_hash_table_create (bfd *abfd)
189 {
190 struct ppc_elf_link_hash_table *ret;
191
192 ret = bfd_malloc (sizeof (struct ppc_elf_link_hash_table));
193 if (ret == NULL)
194 return NULL;
195
196 if (! _bfd_elf_link_hash_table_init (&ret->elf, abfd,
197 ppc_elf_link_hash_newfunc))
198 {
199 free (ret);
200 return NULL;
201 }
202
203 ret->got = NULL;
204 ret->relgot = NULL;
205 ret->plt = NULL;
206 ret->relplt = NULL;
207 ret->dynbss = NULL;
208 ret->relbss = NULL;
209 ret->dynsbss = NULL;
210 ret->relsbss = NULL;
211 ret->sdata = NULL;
212 ret->sdata2 = NULL;
213 ret->tls_sec = NULL;
214 ret->tls_get_addr = NULL;
215 ret->tlsld_got.refcount = 0;
216 ret->sym_sec.abfd = NULL;
217
218 return &ret->elf.root;
219 }
220
221 /* If ELIMINATE_COPY_RELOCS is non-zero, the linker will try to avoid
222 copying dynamic variables from a shared lib into an app's dynbss
223 section, and instead use a dynamic relocation to point into the
224 shared lib. */
225 #define ELIMINATE_COPY_RELOCS 1
226
227 /* Copy the extra info we tack onto an elf_link_hash_entry. */
228
229 static void
230 ppc_elf_copy_indirect_symbol (struct elf_backend_data *bed,
231 struct elf_link_hash_entry *dir,
232 struct elf_link_hash_entry *ind)
233 {
234 struct ppc_elf_link_hash_entry *edir, *eind;
235
236 edir = (struct ppc_elf_link_hash_entry *) dir;
237 eind = (struct ppc_elf_link_hash_entry *) ind;
238
239 if (eind->dyn_relocs != NULL)
240 {
241 if (edir->dyn_relocs != NULL)
242 {
243 struct ppc_elf_dyn_relocs **pp;
244 struct ppc_elf_dyn_relocs *p;
245
246 if (ind->root.type == bfd_link_hash_indirect)
247 abort ();
248
249 /* Add reloc counts against the weak sym to the strong sym
250 list. Merge any entries against the same section. */
251 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
252 {
253 struct ppc_elf_dyn_relocs *q;
254
255 for (q = edir->dyn_relocs; q != NULL; q = q->next)
256 if (q->sec == p->sec)
257 {
258 q->pc_count += p->pc_count;
259 q->count += p->count;
260 *pp = p->next;
261 break;
262 }
263 if (q == NULL)
264 pp = &p->next;
265 }
266 *pp = edir->dyn_relocs;
267 }
268
269 edir->dyn_relocs = eind->dyn_relocs;
270 eind->dyn_relocs = NULL;
271 }
272
273 edir->tls_mask |= eind->tls_mask;
274
275 if (ELIMINATE_COPY_RELOCS
276 && ind->root.type != bfd_link_hash_indirect
277 && (dir->elf_link_hash_flags & ELF_LINK_HASH_DYNAMIC_ADJUSTED) != 0)
278 /* If called to transfer flags for a weakdef during processing
279 of elf_adjust_dynamic_symbol, don't copy ELF_LINK_NON_GOT_REF.
280 We clear it ourselves for ELIMINATE_COPY_RELOCS. */
281 dir->elf_link_hash_flags |=
282 (ind->elf_link_hash_flags & (ELF_LINK_HASH_REF_DYNAMIC
283 | ELF_LINK_HASH_REF_REGULAR
284 | ELF_LINK_HASH_REF_REGULAR_NONWEAK));
285 else
286 _bfd_elf_link_hash_copy_indirect (bed, dir, ind);
287 }
288 \f
289 static reloc_howto_type *ppc_elf_howto_table[R_PPC_max];
290
291 static reloc_howto_type ppc_elf_howto_raw[] = {
292 /* This reloc does nothing. */
293 HOWTO (R_PPC_NONE, /* type */
294 0, /* rightshift */
295 2, /* size (0 = byte, 1 = short, 2 = long) */
296 32, /* bitsize */
297 FALSE, /* pc_relative */
298 0, /* bitpos */
299 complain_overflow_bitfield, /* complain_on_overflow */
300 bfd_elf_generic_reloc, /* special_function */
301 "R_PPC_NONE", /* name */
302 FALSE, /* partial_inplace */
303 0, /* src_mask */
304 0, /* dst_mask */
305 FALSE), /* pcrel_offset */
306
307 /* A standard 32 bit relocation. */
308 HOWTO (R_PPC_ADDR32, /* type */
309 0, /* rightshift */
310 2, /* size (0 = byte, 1 = short, 2 = long) */
311 32, /* bitsize */
312 FALSE, /* pc_relative */
313 0, /* bitpos */
314 complain_overflow_bitfield, /* complain_on_overflow */
315 bfd_elf_generic_reloc, /* special_function */
316 "R_PPC_ADDR32", /* name */
317 FALSE, /* partial_inplace */
318 0, /* src_mask */
319 0xffffffff, /* dst_mask */
320 FALSE), /* pcrel_offset */
321
322 /* An absolute 26 bit branch; the lower two bits must be zero.
323 FIXME: we don't check that, we just clear them. */
324 HOWTO (R_PPC_ADDR24, /* type */
325 0, /* rightshift */
326 2, /* size (0 = byte, 1 = short, 2 = long) */
327 26, /* bitsize */
328 FALSE, /* pc_relative */
329 0, /* bitpos */
330 complain_overflow_bitfield, /* complain_on_overflow */
331 bfd_elf_generic_reloc, /* special_function */
332 "R_PPC_ADDR24", /* name */
333 FALSE, /* partial_inplace */
334 0, /* src_mask */
335 0x3fffffc, /* dst_mask */
336 FALSE), /* pcrel_offset */
337
338 /* A standard 16 bit relocation. */
339 HOWTO (R_PPC_ADDR16, /* type */
340 0, /* rightshift */
341 1, /* size (0 = byte, 1 = short, 2 = long) */
342 16, /* bitsize */
343 FALSE, /* pc_relative */
344 0, /* bitpos */
345 complain_overflow_bitfield, /* complain_on_overflow */
346 bfd_elf_generic_reloc, /* special_function */
347 "R_PPC_ADDR16", /* name */
348 FALSE, /* partial_inplace */
349 0, /* src_mask */
350 0xffff, /* dst_mask */
351 FALSE), /* pcrel_offset */
352
353 /* A 16 bit relocation without overflow. */
354 HOWTO (R_PPC_ADDR16_LO, /* type */
355 0, /* rightshift */
356 1, /* size (0 = byte, 1 = short, 2 = long) */
357 16, /* bitsize */
358 FALSE, /* pc_relative */
359 0, /* bitpos */
360 complain_overflow_dont,/* complain_on_overflow */
361 bfd_elf_generic_reloc, /* special_function */
362 "R_PPC_ADDR16_LO", /* name */
363 FALSE, /* partial_inplace */
364 0, /* src_mask */
365 0xffff, /* dst_mask */
366 FALSE), /* pcrel_offset */
367
368 /* The high order 16 bits of an address. */
369 HOWTO (R_PPC_ADDR16_HI, /* type */
370 16, /* rightshift */
371 1, /* size (0 = byte, 1 = short, 2 = long) */
372 16, /* bitsize */
373 FALSE, /* pc_relative */
374 0, /* bitpos */
375 complain_overflow_dont, /* complain_on_overflow */
376 bfd_elf_generic_reloc, /* special_function */
377 "R_PPC_ADDR16_HI", /* name */
378 FALSE, /* partial_inplace */
379 0, /* src_mask */
380 0xffff, /* dst_mask */
381 FALSE), /* pcrel_offset */
382
383 /* The high order 16 bits of an address, plus 1 if the contents of
384 the low 16 bits, treated as a signed number, is negative. */
385 HOWTO (R_PPC_ADDR16_HA, /* type */
386 16, /* rightshift */
387 1, /* size (0 = byte, 1 = short, 2 = long) */
388 16, /* bitsize */
389 FALSE, /* pc_relative */
390 0, /* bitpos */
391 complain_overflow_dont, /* complain_on_overflow */
392 ppc_elf_addr16_ha_reloc, /* special_function */
393 "R_PPC_ADDR16_HA", /* name */
394 FALSE, /* partial_inplace */
395 0, /* src_mask */
396 0xffff, /* dst_mask */
397 FALSE), /* pcrel_offset */
398
399 /* An absolute 16 bit branch; the lower two bits must be zero.
400 FIXME: we don't check that, we just clear them. */
401 HOWTO (R_PPC_ADDR14, /* type */
402 0, /* rightshift */
403 2, /* size (0 = byte, 1 = short, 2 = long) */
404 16, /* bitsize */
405 FALSE, /* pc_relative */
406 0, /* bitpos */
407 complain_overflow_bitfield, /* complain_on_overflow */
408 bfd_elf_generic_reloc, /* special_function */
409 "R_PPC_ADDR14", /* name */
410 FALSE, /* partial_inplace */
411 0, /* src_mask */
412 0xfffc, /* dst_mask */
413 FALSE), /* pcrel_offset */
414
415 /* An absolute 16 bit branch, for which bit 10 should be set to
416 indicate that the branch is expected to be taken. The lower two
417 bits must be zero. */
418 HOWTO (R_PPC_ADDR14_BRTAKEN, /* type */
419 0, /* rightshift */
420 2, /* size (0 = byte, 1 = short, 2 = long) */
421 16, /* bitsize */
422 FALSE, /* pc_relative */
423 0, /* bitpos */
424 complain_overflow_bitfield, /* complain_on_overflow */
425 bfd_elf_generic_reloc, /* special_function */
426 "R_PPC_ADDR14_BRTAKEN",/* name */
427 FALSE, /* partial_inplace */
428 0, /* src_mask */
429 0xfffc, /* dst_mask */
430 FALSE), /* pcrel_offset */
431
432 /* An absolute 16 bit branch, for which bit 10 should be set to
433 indicate that the branch is not expected to be taken. The lower
434 two bits must be zero. */
435 HOWTO (R_PPC_ADDR14_BRNTAKEN, /* type */
436 0, /* rightshift */
437 2, /* size (0 = byte, 1 = short, 2 = long) */
438 16, /* bitsize */
439 FALSE, /* pc_relative */
440 0, /* bitpos */
441 complain_overflow_bitfield, /* complain_on_overflow */
442 bfd_elf_generic_reloc, /* special_function */
443 "R_PPC_ADDR14_BRNTAKEN",/* name */
444 FALSE, /* partial_inplace */
445 0, /* src_mask */
446 0xfffc, /* dst_mask */
447 FALSE), /* pcrel_offset */
448
449 /* A relative 26 bit branch; the lower two bits must be zero. */
450 HOWTO (R_PPC_REL24, /* type */
451 0, /* rightshift */
452 2, /* size (0 = byte, 1 = short, 2 = long) */
453 26, /* bitsize */
454 TRUE, /* pc_relative */
455 0, /* bitpos */
456 complain_overflow_signed, /* complain_on_overflow */
457 bfd_elf_generic_reloc, /* special_function */
458 "R_PPC_REL24", /* name */
459 FALSE, /* partial_inplace */
460 0, /* src_mask */
461 0x3fffffc, /* dst_mask */
462 TRUE), /* pcrel_offset */
463
464 /* A relative 16 bit branch; the lower two bits must be zero. */
465 HOWTO (R_PPC_REL14, /* type */
466 0, /* rightshift */
467 2, /* size (0 = byte, 1 = short, 2 = long) */
468 16, /* bitsize */
469 TRUE, /* pc_relative */
470 0, /* bitpos */
471 complain_overflow_signed, /* complain_on_overflow */
472 bfd_elf_generic_reloc, /* special_function */
473 "R_PPC_REL14", /* name */
474 FALSE, /* partial_inplace */
475 0, /* src_mask */
476 0xfffc, /* dst_mask */
477 TRUE), /* pcrel_offset */
478
479 /* A relative 16 bit branch. Bit 10 should be set to indicate that
480 the branch is expected to be taken. The lower two bits must be
481 zero. */
482 HOWTO (R_PPC_REL14_BRTAKEN, /* type */
483 0, /* rightshift */
484 2, /* size (0 = byte, 1 = short, 2 = long) */
485 16, /* bitsize */
486 TRUE, /* pc_relative */
487 0, /* bitpos */
488 complain_overflow_signed, /* complain_on_overflow */
489 bfd_elf_generic_reloc, /* special_function */
490 "R_PPC_REL14_BRTAKEN", /* name */
491 FALSE, /* partial_inplace */
492 0, /* src_mask */
493 0xfffc, /* dst_mask */
494 TRUE), /* pcrel_offset */
495
496 /* A relative 16 bit branch. Bit 10 should be set to indicate that
497 the branch is not expected to be taken. The lower two bits must
498 be zero. */
499 HOWTO (R_PPC_REL14_BRNTAKEN, /* type */
500 0, /* rightshift */
501 2, /* size (0 = byte, 1 = short, 2 = long) */
502 16, /* bitsize */
503 TRUE, /* pc_relative */
504 0, /* bitpos */
505 complain_overflow_signed, /* complain_on_overflow */
506 bfd_elf_generic_reloc, /* special_function */
507 "R_PPC_REL14_BRNTAKEN",/* name */
508 FALSE, /* partial_inplace */
509 0, /* src_mask */
510 0xfffc, /* dst_mask */
511 TRUE), /* pcrel_offset */
512
513 /* Like R_PPC_ADDR16, but referring to the GOT table entry for the
514 symbol. */
515 HOWTO (R_PPC_GOT16, /* type */
516 0, /* rightshift */
517 1, /* size (0 = byte, 1 = short, 2 = long) */
518 16, /* bitsize */
519 FALSE, /* pc_relative */
520 0, /* bitpos */
521 complain_overflow_signed, /* complain_on_overflow */
522 bfd_elf_generic_reloc, /* special_function */
523 "R_PPC_GOT16", /* name */
524 FALSE, /* partial_inplace */
525 0, /* src_mask */
526 0xffff, /* dst_mask */
527 FALSE), /* pcrel_offset */
528
529 /* Like R_PPC_ADDR16_LO, but referring to the GOT table entry for
530 the symbol. */
531 HOWTO (R_PPC_GOT16_LO, /* type */
532 0, /* rightshift */
533 1, /* size (0 = byte, 1 = short, 2 = long) */
534 16, /* bitsize */
535 FALSE, /* pc_relative */
536 0, /* bitpos */
537 complain_overflow_dont, /* complain_on_overflow */
538 bfd_elf_generic_reloc, /* special_function */
539 "R_PPC_GOT16_LO", /* name */
540 FALSE, /* partial_inplace */
541 0, /* src_mask */
542 0xffff, /* dst_mask */
543 FALSE), /* pcrel_offset */
544
545 /* Like R_PPC_ADDR16_HI, but referring to the GOT table entry for
546 the symbol. */
547 HOWTO (R_PPC_GOT16_HI, /* type */
548 16, /* rightshift */
549 1, /* size (0 = byte, 1 = short, 2 = long) */
550 16, /* bitsize */
551 FALSE, /* pc_relative */
552 0, /* bitpos */
553 complain_overflow_bitfield, /* complain_on_overflow */
554 bfd_elf_generic_reloc, /* special_function */
555 "R_PPC_GOT16_HI", /* name */
556 FALSE, /* partial_inplace */
557 0, /* src_mask */
558 0xffff, /* dst_mask */
559 FALSE), /* pcrel_offset */
560
561 /* Like R_PPC_ADDR16_HA, but referring to the GOT table entry for
562 the symbol. */
563 HOWTO (R_PPC_GOT16_HA, /* type */
564 16, /* rightshift */
565 1, /* size (0 = byte, 1 = short, 2 = long) */
566 16, /* bitsize */
567 FALSE, /* pc_relative */
568 0, /* bitpos */
569 complain_overflow_bitfield, /* complain_on_overflow */
570 ppc_elf_addr16_ha_reloc, /* special_function */
571 "R_PPC_GOT16_HA", /* name */
572 FALSE, /* partial_inplace */
573 0, /* src_mask */
574 0xffff, /* dst_mask */
575 FALSE), /* pcrel_offset */
576
577 /* Like R_PPC_REL24, but referring to the procedure linkage table
578 entry for the symbol. */
579 HOWTO (R_PPC_PLTREL24, /* type */
580 0, /* rightshift */
581 2, /* size (0 = byte, 1 = short, 2 = long) */
582 26, /* bitsize */
583 TRUE, /* pc_relative */
584 0, /* bitpos */
585 complain_overflow_signed, /* complain_on_overflow */
586 bfd_elf_generic_reloc, /* special_function */
587 "R_PPC_PLTREL24", /* name */
588 FALSE, /* partial_inplace */
589 0, /* src_mask */
590 0x3fffffc, /* dst_mask */
591 TRUE), /* pcrel_offset */
592
593 /* This is used only by the dynamic linker. The symbol should exist
594 both in the object being run and in some shared library. The
595 dynamic linker copies the data addressed by the symbol from the
596 shared library into the object, because the object being
597 run has to have the data at some particular address. */
598 HOWTO (R_PPC_COPY, /* type */
599 0, /* rightshift */
600 2, /* size (0 = byte, 1 = short, 2 = long) */
601 32, /* bitsize */
602 FALSE, /* pc_relative */
603 0, /* bitpos */
604 complain_overflow_bitfield, /* complain_on_overflow */
605 bfd_elf_generic_reloc, /* special_function */
606 "R_PPC_COPY", /* name */
607 FALSE, /* partial_inplace */
608 0, /* src_mask */
609 0, /* dst_mask */
610 FALSE), /* pcrel_offset */
611
612 /* Like R_PPC_ADDR32, but used when setting global offset table
613 entries. */
614 HOWTO (R_PPC_GLOB_DAT, /* type */
615 0, /* rightshift */
616 2, /* size (0 = byte, 1 = short, 2 = long) */
617 32, /* bitsize */
618 FALSE, /* pc_relative */
619 0, /* bitpos */
620 complain_overflow_bitfield, /* complain_on_overflow */
621 bfd_elf_generic_reloc, /* special_function */
622 "R_PPC_GLOB_DAT", /* name */
623 FALSE, /* partial_inplace */
624 0, /* src_mask */
625 0xffffffff, /* dst_mask */
626 FALSE), /* pcrel_offset */
627
628 /* Marks a procedure linkage table entry for a symbol. */
629 HOWTO (R_PPC_JMP_SLOT, /* type */
630 0, /* rightshift */
631 2, /* size (0 = byte, 1 = short, 2 = long) */
632 32, /* bitsize */
633 FALSE, /* pc_relative */
634 0, /* bitpos */
635 complain_overflow_bitfield, /* complain_on_overflow */
636 bfd_elf_generic_reloc, /* special_function */
637 "R_PPC_JMP_SLOT", /* name */
638 FALSE, /* partial_inplace */
639 0, /* src_mask */
640 0, /* dst_mask */
641 FALSE), /* pcrel_offset */
642
643 /* Used only by the dynamic linker. When the object is run, this
644 longword is set to the load address of the object, plus the
645 addend. */
646 HOWTO (R_PPC_RELATIVE, /* type */
647 0, /* rightshift */
648 2, /* size (0 = byte, 1 = short, 2 = long) */
649 32, /* bitsize */
650 FALSE, /* pc_relative */
651 0, /* bitpos */
652 complain_overflow_bitfield, /* complain_on_overflow */
653 bfd_elf_generic_reloc, /* special_function */
654 "R_PPC_RELATIVE", /* name */
655 FALSE, /* partial_inplace */
656 0, /* src_mask */
657 0xffffffff, /* dst_mask */
658 FALSE), /* pcrel_offset */
659
660 /* Like R_PPC_REL24, but uses the value of the symbol within the
661 object rather than the final value. Normally used for
662 _GLOBAL_OFFSET_TABLE_. */
663 HOWTO (R_PPC_LOCAL24PC, /* type */
664 0, /* rightshift */
665 2, /* size (0 = byte, 1 = short, 2 = long) */
666 26, /* bitsize */
667 TRUE, /* pc_relative */
668 0, /* bitpos */
669 complain_overflow_signed, /* complain_on_overflow */
670 bfd_elf_generic_reloc, /* special_function */
671 "R_PPC_LOCAL24PC", /* name */
672 FALSE, /* partial_inplace */
673 0, /* src_mask */
674 0x3fffffc, /* dst_mask */
675 TRUE), /* pcrel_offset */
676
677 /* Like R_PPC_ADDR32, but may be unaligned. */
678 HOWTO (R_PPC_UADDR32, /* type */
679 0, /* rightshift */
680 2, /* size (0 = byte, 1 = short, 2 = long) */
681 32, /* bitsize */
682 FALSE, /* pc_relative */
683 0, /* bitpos */
684 complain_overflow_bitfield, /* complain_on_overflow */
685 bfd_elf_generic_reloc, /* special_function */
686 "R_PPC_UADDR32", /* name */
687 FALSE, /* partial_inplace */
688 0, /* src_mask */
689 0xffffffff, /* dst_mask */
690 FALSE), /* pcrel_offset */
691
692 /* Like R_PPC_ADDR16, but may be unaligned. */
693 HOWTO (R_PPC_UADDR16, /* type */
694 0, /* rightshift */
695 1, /* size (0 = byte, 1 = short, 2 = long) */
696 16, /* bitsize */
697 FALSE, /* pc_relative */
698 0, /* bitpos */
699 complain_overflow_bitfield, /* complain_on_overflow */
700 bfd_elf_generic_reloc, /* special_function */
701 "R_PPC_UADDR16", /* name */
702 FALSE, /* partial_inplace */
703 0, /* src_mask */
704 0xffff, /* dst_mask */
705 FALSE), /* pcrel_offset */
706
707 /* 32-bit PC relative */
708 HOWTO (R_PPC_REL32, /* type */
709 0, /* rightshift */
710 2, /* size (0 = byte, 1 = short, 2 = long) */
711 32, /* bitsize */
712 TRUE, /* pc_relative */
713 0, /* bitpos */
714 complain_overflow_bitfield, /* complain_on_overflow */
715 bfd_elf_generic_reloc, /* special_function */
716 "R_PPC_REL32", /* name */
717 FALSE, /* partial_inplace */
718 0, /* src_mask */
719 0xffffffff, /* dst_mask */
720 TRUE), /* pcrel_offset */
721
722 /* 32-bit relocation to the symbol's procedure linkage table.
723 FIXME: not supported. */
724 HOWTO (R_PPC_PLT32, /* type */
725 0, /* rightshift */
726 2, /* size (0 = byte, 1 = short, 2 = long) */
727 32, /* bitsize */
728 FALSE, /* pc_relative */
729 0, /* bitpos */
730 complain_overflow_bitfield, /* complain_on_overflow */
731 bfd_elf_generic_reloc, /* special_function */
732 "R_PPC_PLT32", /* name */
733 FALSE, /* partial_inplace */
734 0, /* src_mask */
735 0, /* dst_mask */
736 FALSE), /* pcrel_offset */
737
738 /* 32-bit PC relative relocation to the symbol's procedure linkage table.
739 FIXME: not supported. */
740 HOWTO (R_PPC_PLTREL32, /* type */
741 0, /* rightshift */
742 2, /* size (0 = byte, 1 = short, 2 = long) */
743 32, /* bitsize */
744 TRUE, /* pc_relative */
745 0, /* bitpos */
746 complain_overflow_bitfield, /* complain_on_overflow */
747 bfd_elf_generic_reloc, /* special_function */
748 "R_PPC_PLTREL32", /* name */
749 FALSE, /* partial_inplace */
750 0, /* src_mask */
751 0, /* dst_mask */
752 TRUE), /* pcrel_offset */
753
754 /* Like R_PPC_ADDR16_LO, but referring to the PLT table entry for
755 the symbol. */
756 HOWTO (R_PPC_PLT16_LO, /* type */
757 0, /* rightshift */
758 1, /* size (0 = byte, 1 = short, 2 = long) */
759 16, /* bitsize */
760 FALSE, /* pc_relative */
761 0, /* bitpos */
762 complain_overflow_dont, /* complain_on_overflow */
763 bfd_elf_generic_reloc, /* special_function */
764 "R_PPC_PLT16_LO", /* name */
765 FALSE, /* partial_inplace */
766 0, /* src_mask */
767 0xffff, /* dst_mask */
768 FALSE), /* pcrel_offset */
769
770 /* Like R_PPC_ADDR16_HI, but referring to the PLT table entry for
771 the symbol. */
772 HOWTO (R_PPC_PLT16_HI, /* type */
773 16, /* rightshift */
774 1, /* size (0 = byte, 1 = short, 2 = long) */
775 16, /* bitsize */
776 FALSE, /* pc_relative */
777 0, /* bitpos */
778 complain_overflow_bitfield, /* complain_on_overflow */
779 bfd_elf_generic_reloc, /* special_function */
780 "R_PPC_PLT16_HI", /* name */
781 FALSE, /* partial_inplace */
782 0, /* src_mask */
783 0xffff, /* dst_mask */
784 FALSE), /* pcrel_offset */
785
786 /* Like R_PPC_ADDR16_HA, but referring to the PLT table entry for
787 the symbol. */
788 HOWTO (R_PPC_PLT16_HA, /* type */
789 16, /* rightshift */
790 1, /* size (0 = byte, 1 = short, 2 = long) */
791 16, /* bitsize */
792 FALSE, /* pc_relative */
793 0, /* bitpos */
794 complain_overflow_bitfield, /* complain_on_overflow */
795 ppc_elf_addr16_ha_reloc, /* special_function */
796 "R_PPC_PLT16_HA", /* name */
797 FALSE, /* partial_inplace */
798 0, /* src_mask */
799 0xffff, /* dst_mask */
800 FALSE), /* pcrel_offset */
801
802 /* A sign-extended 16 bit value relative to _SDA_BASE_, for use with
803 small data items. */
804 HOWTO (R_PPC_SDAREL16, /* type */
805 0, /* rightshift */
806 1, /* size (0 = byte, 1 = short, 2 = long) */
807 16, /* bitsize */
808 FALSE, /* pc_relative */
809 0, /* bitpos */
810 complain_overflow_signed, /* complain_on_overflow */
811 bfd_elf_generic_reloc, /* special_function */
812 "R_PPC_SDAREL16", /* name */
813 FALSE, /* partial_inplace */
814 0, /* src_mask */
815 0xffff, /* dst_mask */
816 FALSE), /* pcrel_offset */
817
818 /* 16-bit section relative relocation. */
819 HOWTO (R_PPC_SECTOFF, /* type */
820 0, /* rightshift */
821 1, /* size (0 = byte, 1 = short, 2 = long) */
822 16, /* bitsize */
823 FALSE, /* pc_relative */
824 0, /* bitpos */
825 complain_overflow_bitfield, /* complain_on_overflow */
826 bfd_elf_generic_reloc, /* special_function */
827 "R_PPC_SECTOFF", /* name */
828 FALSE, /* partial_inplace */
829 0, /* src_mask */
830 0xffff, /* dst_mask */
831 FALSE), /* pcrel_offset */
832
833 /* 16-bit lower half section relative relocation. */
834 HOWTO (R_PPC_SECTOFF_LO, /* 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_dont, /* complain_on_overflow */
841 bfd_elf_generic_reloc, /* special_function */
842 "R_PPC_SECTOFF_LO", /* name */
843 FALSE, /* partial_inplace */
844 0, /* src_mask */
845 0xffff, /* dst_mask */
846 FALSE), /* pcrel_offset */
847
848 /* 16-bit upper half section relative relocation. */
849 HOWTO (R_PPC_SECTOFF_HI, /* type */
850 16, /* rightshift */
851 1, /* size (0 = byte, 1 = short, 2 = long) */
852 16, /* bitsize */
853 FALSE, /* pc_relative */
854 0, /* bitpos */
855 complain_overflow_bitfield, /* complain_on_overflow */
856 bfd_elf_generic_reloc, /* special_function */
857 "R_PPC_SECTOFF_HI", /* name */
858 FALSE, /* partial_inplace */
859 0, /* src_mask */
860 0xffff, /* dst_mask */
861 FALSE), /* pcrel_offset */
862
863 /* 16-bit upper half adjusted section relative relocation. */
864 HOWTO (R_PPC_SECTOFF_HA, /* type */
865 16, /* rightshift */
866 1, /* size (0 = byte, 1 = short, 2 = long) */
867 16, /* bitsize */
868 FALSE, /* pc_relative */
869 0, /* bitpos */
870 complain_overflow_bitfield, /* complain_on_overflow */
871 ppc_elf_addr16_ha_reloc, /* special_function */
872 "R_PPC_SECTOFF_HA", /* name */
873 FALSE, /* partial_inplace */
874 0, /* src_mask */
875 0xffff, /* dst_mask */
876 FALSE), /* pcrel_offset */
877
878 /* Marker reloc for TLS. */
879 HOWTO (R_PPC_TLS,
880 0, /* rightshift */
881 2, /* size (0 = byte, 1 = short, 2 = long) */
882 32, /* bitsize */
883 FALSE, /* pc_relative */
884 0, /* bitpos */
885 complain_overflow_dont, /* complain_on_overflow */
886 bfd_elf_generic_reloc, /* special_function */
887 "R_PPC_TLS", /* name */
888 FALSE, /* partial_inplace */
889 0, /* src_mask */
890 0, /* dst_mask */
891 FALSE), /* pcrel_offset */
892
893 /* Computes the load module index of the load module that contains the
894 definition of its TLS sym. */
895 HOWTO (R_PPC_DTPMOD32,
896 0, /* rightshift */
897 2, /* size (0 = byte, 1 = short, 2 = long) */
898 32, /* bitsize */
899 FALSE, /* pc_relative */
900 0, /* bitpos */
901 complain_overflow_dont, /* complain_on_overflow */
902 ppc_elf_unhandled_reloc, /* special_function */
903 "R_PPC_DTPMOD32", /* name */
904 FALSE, /* partial_inplace */
905 0, /* src_mask */
906 0xffffffff, /* dst_mask */
907 FALSE), /* pcrel_offset */
908
909 /* Computes a dtv-relative displacement, the difference between the value
910 of sym+add and the base address of the thread-local storage block that
911 contains the definition of sym, minus 0x8000. */
912 HOWTO (R_PPC_DTPREL32,
913 0, /* rightshift */
914 2, /* size (0 = byte, 1 = short, 2 = long) */
915 32, /* bitsize */
916 FALSE, /* pc_relative */
917 0, /* bitpos */
918 complain_overflow_dont, /* complain_on_overflow */
919 ppc_elf_unhandled_reloc, /* special_function */
920 "R_PPC_DTPREL32", /* name */
921 FALSE, /* partial_inplace */
922 0, /* src_mask */
923 0xffffffff, /* dst_mask */
924 FALSE), /* pcrel_offset */
925
926 /* A 16 bit dtprel reloc. */
927 HOWTO (R_PPC_DTPREL16,
928 0, /* rightshift */
929 1, /* size (0 = byte, 1 = short, 2 = long) */
930 16, /* bitsize */
931 FALSE, /* pc_relative */
932 0, /* bitpos */
933 complain_overflow_signed, /* complain_on_overflow */
934 ppc_elf_unhandled_reloc, /* special_function */
935 "R_PPC_DTPREL16", /* name */
936 FALSE, /* partial_inplace */
937 0, /* src_mask */
938 0xffff, /* dst_mask */
939 FALSE), /* pcrel_offset */
940
941 /* Like DTPREL16, but no overflow. */
942 HOWTO (R_PPC_DTPREL16_LO,
943 0, /* rightshift */
944 1, /* size (0 = byte, 1 = short, 2 = long) */
945 16, /* bitsize */
946 FALSE, /* pc_relative */
947 0, /* bitpos */
948 complain_overflow_dont, /* complain_on_overflow */
949 ppc_elf_unhandled_reloc, /* special_function */
950 "R_PPC_DTPREL16_LO", /* name */
951 FALSE, /* partial_inplace */
952 0, /* src_mask */
953 0xffff, /* dst_mask */
954 FALSE), /* pcrel_offset */
955
956 /* Like DTPREL16_LO, but next higher group of 16 bits. */
957 HOWTO (R_PPC_DTPREL16_HI,
958 16, /* rightshift */
959 1, /* size (0 = byte, 1 = short, 2 = long) */
960 16, /* bitsize */
961 FALSE, /* pc_relative */
962 0, /* bitpos */
963 complain_overflow_dont, /* complain_on_overflow */
964 ppc_elf_unhandled_reloc, /* special_function */
965 "R_PPC_DTPREL16_HI", /* name */
966 FALSE, /* partial_inplace */
967 0, /* src_mask */
968 0xffff, /* dst_mask */
969 FALSE), /* pcrel_offset */
970
971 /* Like DTPREL16_HI, but adjust for low 16 bits. */
972 HOWTO (R_PPC_DTPREL16_HA,
973 16, /* rightshift */
974 1, /* size (0 = byte, 1 = short, 2 = long) */
975 16, /* bitsize */
976 FALSE, /* pc_relative */
977 0, /* bitpos */
978 complain_overflow_dont, /* complain_on_overflow */
979 ppc_elf_unhandled_reloc, /* special_function */
980 "R_PPC_DTPREL16_HA", /* name */
981 FALSE, /* partial_inplace */
982 0, /* src_mask */
983 0xffff, /* dst_mask */
984 FALSE), /* pcrel_offset */
985
986 /* Computes a tp-relative displacement, the difference between the value of
987 sym+add and the value of the thread pointer (r13). */
988 HOWTO (R_PPC_TPREL32,
989 0, /* rightshift */
990 2, /* size (0 = byte, 1 = short, 2 = long) */
991 32, /* bitsize */
992 FALSE, /* pc_relative */
993 0, /* bitpos */
994 complain_overflow_dont, /* complain_on_overflow */
995 ppc_elf_unhandled_reloc, /* special_function */
996 "R_PPC_TPREL32", /* name */
997 FALSE, /* partial_inplace */
998 0, /* src_mask */
999 0xffffffff, /* dst_mask */
1000 FALSE), /* pcrel_offset */
1001
1002 /* A 16 bit tprel reloc. */
1003 HOWTO (R_PPC_TPREL16,
1004 0, /* rightshift */
1005 1, /* size (0 = byte, 1 = short, 2 = long) */
1006 16, /* bitsize */
1007 FALSE, /* pc_relative */
1008 0, /* bitpos */
1009 complain_overflow_signed, /* complain_on_overflow */
1010 ppc_elf_unhandled_reloc, /* special_function */
1011 "R_PPC_TPREL16", /* name */
1012 FALSE, /* partial_inplace */
1013 0, /* src_mask */
1014 0xffff, /* dst_mask */
1015 FALSE), /* pcrel_offset */
1016
1017 /* Like TPREL16, but no overflow. */
1018 HOWTO (R_PPC_TPREL16_LO,
1019 0, /* rightshift */
1020 1, /* size (0 = byte, 1 = short, 2 = long) */
1021 16, /* bitsize */
1022 FALSE, /* pc_relative */
1023 0, /* bitpos */
1024 complain_overflow_dont, /* complain_on_overflow */
1025 ppc_elf_unhandled_reloc, /* special_function */
1026 "R_PPC_TPREL16_LO", /* name */
1027 FALSE, /* partial_inplace */
1028 0, /* src_mask */
1029 0xffff, /* dst_mask */
1030 FALSE), /* pcrel_offset */
1031
1032 /* Like TPREL16_LO, but next higher group of 16 bits. */
1033 HOWTO (R_PPC_TPREL16_HI,
1034 16, /* rightshift */
1035 1, /* size (0 = byte, 1 = short, 2 = long) */
1036 16, /* bitsize */
1037 FALSE, /* pc_relative */
1038 0, /* bitpos */
1039 complain_overflow_dont, /* complain_on_overflow */
1040 ppc_elf_unhandled_reloc, /* special_function */
1041 "R_PPC_TPREL16_HI", /* name */
1042 FALSE, /* partial_inplace */
1043 0, /* src_mask */
1044 0xffff, /* dst_mask */
1045 FALSE), /* pcrel_offset */
1046
1047 /* Like TPREL16_HI, but adjust for low 16 bits. */
1048 HOWTO (R_PPC_TPREL16_HA,
1049 16, /* rightshift */
1050 1, /* size (0 = byte, 1 = short, 2 = long) */
1051 16, /* bitsize */
1052 FALSE, /* pc_relative */
1053 0, /* bitpos */
1054 complain_overflow_dont, /* complain_on_overflow */
1055 ppc_elf_unhandled_reloc, /* special_function */
1056 "R_PPC_TPREL16_HA", /* name */
1057 FALSE, /* partial_inplace */
1058 0, /* src_mask */
1059 0xffff, /* dst_mask */
1060 FALSE), /* pcrel_offset */
1061
1062 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
1063 with values (sym+add)@dtpmod and (sym+add)@dtprel, and computes the offset
1064 to the first entry. */
1065 HOWTO (R_PPC_GOT_TLSGD16,
1066 0, /* rightshift */
1067 1, /* size (0 = byte, 1 = short, 2 = long) */
1068 16, /* bitsize */
1069 FALSE, /* pc_relative */
1070 0, /* bitpos */
1071 complain_overflow_signed, /* complain_on_overflow */
1072 ppc_elf_unhandled_reloc, /* special_function */
1073 "R_PPC_GOT_TLSGD16", /* name */
1074 FALSE, /* partial_inplace */
1075 0, /* src_mask */
1076 0xffff, /* dst_mask */
1077 FALSE), /* pcrel_offset */
1078
1079 /* Like GOT_TLSGD16, but no overflow. */
1080 HOWTO (R_PPC_GOT_TLSGD16_LO,
1081 0, /* rightshift */
1082 1, /* size (0 = byte, 1 = short, 2 = long) */
1083 16, /* bitsize */
1084 FALSE, /* pc_relative */
1085 0, /* bitpos */
1086 complain_overflow_dont, /* complain_on_overflow */
1087 ppc_elf_unhandled_reloc, /* special_function */
1088 "R_PPC_GOT_TLSGD16_LO", /* name */
1089 FALSE, /* partial_inplace */
1090 0, /* src_mask */
1091 0xffff, /* dst_mask */
1092 FALSE), /* pcrel_offset */
1093
1094 /* Like GOT_TLSGD16_LO, but next higher group of 16 bits. */
1095 HOWTO (R_PPC_GOT_TLSGD16_HI,
1096 16, /* rightshift */
1097 1, /* size (0 = byte, 1 = short, 2 = long) */
1098 16, /* bitsize */
1099 FALSE, /* pc_relative */
1100 0, /* bitpos */
1101 complain_overflow_dont, /* complain_on_overflow */
1102 ppc_elf_unhandled_reloc, /* special_function */
1103 "R_PPC_GOT_TLSGD16_HI", /* name */
1104 FALSE, /* partial_inplace */
1105 0, /* src_mask */
1106 0xffff, /* dst_mask */
1107 FALSE), /* pcrel_offset */
1108
1109 /* Like GOT_TLSGD16_HI, but adjust for low 16 bits. */
1110 HOWTO (R_PPC_GOT_TLSGD16_HA,
1111 16, /* rightshift */
1112 1, /* size (0 = byte, 1 = short, 2 = long) */
1113 16, /* bitsize */
1114 FALSE, /* pc_relative */
1115 0, /* bitpos */
1116 complain_overflow_dont, /* complain_on_overflow */
1117 ppc_elf_unhandled_reloc, /* special_function */
1118 "R_PPC_GOT_TLSGD16_HA", /* name */
1119 FALSE, /* partial_inplace */
1120 0, /* src_mask */
1121 0xffff, /* dst_mask */
1122 FALSE), /* pcrel_offset */
1123
1124 /* Allocates two contiguous entries in the GOT to hold a tls_index structure,
1125 with values (sym+add)@dtpmod and zero, and computes the offset to the
1126 first entry. */
1127 HOWTO (R_PPC_GOT_TLSLD16,
1128 0, /* rightshift */
1129 1, /* size (0 = byte, 1 = short, 2 = long) */
1130 16, /* bitsize */
1131 FALSE, /* pc_relative */
1132 0, /* bitpos */
1133 complain_overflow_signed, /* complain_on_overflow */
1134 ppc_elf_unhandled_reloc, /* special_function */
1135 "R_PPC_GOT_TLSLD16", /* name */
1136 FALSE, /* partial_inplace */
1137 0, /* src_mask */
1138 0xffff, /* dst_mask */
1139 FALSE), /* pcrel_offset */
1140
1141 /* Like GOT_TLSLD16, but no overflow. */
1142 HOWTO (R_PPC_GOT_TLSLD16_LO,
1143 0, /* rightshift */
1144 1, /* size (0 = byte, 1 = short, 2 = long) */
1145 16, /* bitsize */
1146 FALSE, /* pc_relative */
1147 0, /* bitpos */
1148 complain_overflow_dont, /* complain_on_overflow */
1149 ppc_elf_unhandled_reloc, /* special_function */
1150 "R_PPC_GOT_TLSLD16_LO", /* name */
1151 FALSE, /* partial_inplace */
1152 0, /* src_mask */
1153 0xffff, /* dst_mask */
1154 FALSE), /* pcrel_offset */
1155
1156 /* Like GOT_TLSLD16_LO, but next higher group of 16 bits. */
1157 HOWTO (R_PPC_GOT_TLSLD16_HI,
1158 16, /* rightshift */
1159 1, /* size (0 = byte, 1 = short, 2 = long) */
1160 16, /* bitsize */
1161 FALSE, /* pc_relative */
1162 0, /* bitpos */
1163 complain_overflow_dont, /* complain_on_overflow */
1164 ppc_elf_unhandled_reloc, /* special_function */
1165 "R_PPC_GOT_TLSLD16_HI", /* name */
1166 FALSE, /* partial_inplace */
1167 0, /* src_mask */
1168 0xffff, /* dst_mask */
1169 FALSE), /* pcrel_offset */
1170
1171 /* Like GOT_TLSLD16_HI, but adjust for low 16 bits. */
1172 HOWTO (R_PPC_GOT_TLSLD16_HA,
1173 16, /* rightshift */
1174 1, /* size (0 = byte, 1 = short, 2 = long) */
1175 16, /* bitsize */
1176 FALSE, /* pc_relative */
1177 0, /* bitpos */
1178 complain_overflow_dont, /* complain_on_overflow */
1179 ppc_elf_unhandled_reloc, /* special_function */
1180 "R_PPC_GOT_TLSLD16_HA", /* name */
1181 FALSE, /* partial_inplace */
1182 0, /* src_mask */
1183 0xffff, /* dst_mask */
1184 FALSE), /* pcrel_offset */
1185
1186 /* Allocates an entry in the GOT with value (sym+add)@dtprel, and computes
1187 the offset to the entry. */
1188 HOWTO (R_PPC_GOT_DTPREL16,
1189 0, /* rightshift */
1190 1, /* size (0 = byte, 1 = short, 2 = long) */
1191 16, /* bitsize */
1192 FALSE, /* pc_relative */
1193 0, /* bitpos */
1194 complain_overflow_signed, /* complain_on_overflow */
1195 ppc_elf_unhandled_reloc, /* special_function */
1196 "R_PPC_GOT_DTPREL16", /* name */
1197 FALSE, /* partial_inplace */
1198 0, /* src_mask */
1199 0xffff, /* dst_mask */
1200 FALSE), /* pcrel_offset */
1201
1202 /* Like GOT_DTPREL16, but no overflow. */
1203 HOWTO (R_PPC_GOT_DTPREL16_LO,
1204 0, /* rightshift */
1205 1, /* size (0 = byte, 1 = short, 2 = long) */
1206 16, /* bitsize */
1207 FALSE, /* pc_relative */
1208 0, /* bitpos */
1209 complain_overflow_dont, /* complain_on_overflow */
1210 ppc_elf_unhandled_reloc, /* special_function */
1211 "R_PPC_GOT_DTPREL16_LO", /* name */
1212 FALSE, /* partial_inplace */
1213 0, /* src_mask */
1214 0xffff, /* dst_mask */
1215 FALSE), /* pcrel_offset */
1216
1217 /* Like GOT_DTPREL16_LO, but next higher group of 16 bits. */
1218 HOWTO (R_PPC_GOT_DTPREL16_HI,
1219 16, /* rightshift */
1220 1, /* size (0 = byte, 1 = short, 2 = long) */
1221 16, /* bitsize */
1222 FALSE, /* pc_relative */
1223 0, /* bitpos */
1224 complain_overflow_dont, /* complain_on_overflow */
1225 ppc_elf_unhandled_reloc, /* special_function */
1226 "R_PPC_GOT_DTPREL16_HI", /* name */
1227 FALSE, /* partial_inplace */
1228 0, /* src_mask */
1229 0xffff, /* dst_mask */
1230 FALSE), /* pcrel_offset */
1231
1232 /* Like GOT_DTPREL16_HI, but adjust for low 16 bits. */
1233 HOWTO (R_PPC_GOT_DTPREL16_HA,
1234 16, /* rightshift */
1235 1, /* size (0 = byte, 1 = short, 2 = long) */
1236 16, /* bitsize */
1237 FALSE, /* pc_relative */
1238 0, /* bitpos */
1239 complain_overflow_dont, /* complain_on_overflow */
1240 ppc_elf_unhandled_reloc, /* special_function */
1241 "R_PPC_GOT_DTPREL16_HA", /* name */
1242 FALSE, /* partial_inplace */
1243 0, /* src_mask */
1244 0xffff, /* dst_mask */
1245 FALSE), /* pcrel_offset */
1246
1247 /* Allocates an entry in the GOT with value (sym+add)@tprel, and computes the
1248 offset to the entry. */
1249 HOWTO (R_PPC_GOT_TPREL16,
1250 0, /* rightshift */
1251 1, /* size (0 = byte, 1 = short, 2 = long) */
1252 16, /* bitsize */
1253 FALSE, /* pc_relative */
1254 0, /* bitpos */
1255 complain_overflow_signed, /* complain_on_overflow */
1256 ppc_elf_unhandled_reloc, /* special_function */
1257 "R_PPC_GOT_TPREL16", /* name */
1258 FALSE, /* partial_inplace */
1259 0, /* src_mask */
1260 0xffff, /* dst_mask */
1261 FALSE), /* pcrel_offset */
1262
1263 /* Like GOT_TPREL16, but no overflow. */
1264 HOWTO (R_PPC_GOT_TPREL16_LO,
1265 0, /* rightshift */
1266 1, /* size (0 = byte, 1 = short, 2 = long) */
1267 16, /* bitsize */
1268 FALSE, /* pc_relative */
1269 0, /* bitpos */
1270 complain_overflow_dont, /* complain_on_overflow */
1271 ppc_elf_unhandled_reloc, /* special_function */
1272 "R_PPC_GOT_TPREL16_LO", /* name */
1273 FALSE, /* partial_inplace */
1274 0, /* src_mask */
1275 0xffff, /* dst_mask */
1276 FALSE), /* pcrel_offset */
1277
1278 /* Like GOT_TPREL16_LO, but next higher group of 16 bits. */
1279 HOWTO (R_PPC_GOT_TPREL16_HI,
1280 16, /* rightshift */
1281 1, /* size (0 = byte, 1 = short, 2 = long) */
1282 16, /* bitsize */
1283 FALSE, /* pc_relative */
1284 0, /* bitpos */
1285 complain_overflow_dont, /* complain_on_overflow */
1286 ppc_elf_unhandled_reloc, /* special_function */
1287 "R_PPC_GOT_TPREL16_HI", /* name */
1288 FALSE, /* partial_inplace */
1289 0, /* src_mask */
1290 0xffff, /* dst_mask */
1291 FALSE), /* pcrel_offset */
1292
1293 /* Like GOT_TPREL16_HI, but adjust for low 16 bits. */
1294 HOWTO (R_PPC_GOT_TPREL16_HA,
1295 16, /* rightshift */
1296 1, /* size (0 = byte, 1 = short, 2 = long) */
1297 16, /* bitsize */
1298 FALSE, /* pc_relative */
1299 0, /* bitpos */
1300 complain_overflow_dont, /* complain_on_overflow */
1301 ppc_elf_unhandled_reloc, /* special_function */
1302 "R_PPC_GOT_TPREL16_HA", /* name */
1303 FALSE, /* partial_inplace */
1304 0, /* src_mask */
1305 0xffff, /* dst_mask */
1306 FALSE), /* pcrel_offset */
1307
1308 /* The remaining relocs are from the Embedded ELF ABI, and are not
1309 in the SVR4 ELF ABI. */
1310
1311 /* 32 bit value resulting from the addend minus the symbol. */
1312 HOWTO (R_PPC_EMB_NADDR32, /* type */
1313 0, /* rightshift */
1314 2, /* size (0 = byte, 1 = short, 2 = long) */
1315 32, /* bitsize */
1316 FALSE, /* pc_relative */
1317 0, /* bitpos */
1318 complain_overflow_bitfield, /* complain_on_overflow */
1319 bfd_elf_generic_reloc, /* special_function */
1320 "R_PPC_EMB_NADDR32", /* name */
1321 FALSE, /* partial_inplace */
1322 0, /* src_mask */
1323 0xffffffff, /* dst_mask */
1324 FALSE), /* pcrel_offset */
1325
1326 /* 16 bit value resulting from the addend minus the symbol. */
1327 HOWTO (R_PPC_EMB_NADDR16, /* type */
1328 0, /* rightshift */
1329 1, /* size (0 = byte, 1 = short, 2 = long) */
1330 16, /* bitsize */
1331 FALSE, /* pc_relative */
1332 0, /* bitpos */
1333 complain_overflow_bitfield, /* complain_on_overflow */
1334 bfd_elf_generic_reloc, /* special_function */
1335 "R_PPC_EMB_NADDR16", /* name */
1336 FALSE, /* partial_inplace */
1337 0, /* src_mask */
1338 0xffff, /* dst_mask */
1339 FALSE), /* pcrel_offset */
1340
1341 /* 16 bit value resulting from the addend minus the symbol. */
1342 HOWTO (R_PPC_EMB_NADDR16_LO, /* type */
1343 0, /* rightshift */
1344 1, /* size (0 = byte, 1 = short, 2 = long) */
1345 16, /* bitsize */
1346 FALSE, /* pc_relative */
1347 0, /* bitpos */
1348 complain_overflow_dont,/* complain_on_overflow */
1349 bfd_elf_generic_reloc, /* special_function */
1350 "R_PPC_EMB_ADDR16_LO", /* name */
1351 FALSE, /* partial_inplace */
1352 0, /* src_mask */
1353 0xffff, /* dst_mask */
1354 FALSE), /* pcrel_offset */
1355
1356 /* The high order 16 bits of the addend minus the symbol. */
1357 HOWTO (R_PPC_EMB_NADDR16_HI, /* type */
1358 16, /* rightshift */
1359 1, /* size (0 = byte, 1 = short, 2 = long) */
1360 16, /* bitsize */
1361 FALSE, /* pc_relative */
1362 0, /* bitpos */
1363 complain_overflow_dont, /* complain_on_overflow */
1364 bfd_elf_generic_reloc, /* special_function */
1365 "R_PPC_EMB_NADDR16_HI", /* name */
1366 FALSE, /* partial_inplace */
1367 0, /* src_mask */
1368 0xffff, /* dst_mask */
1369 FALSE), /* pcrel_offset */
1370
1371 /* The high order 16 bits of the result of the addend minus the address,
1372 plus 1 if the contents of the low 16 bits, treated as a signed number,
1373 is negative. */
1374 HOWTO (R_PPC_EMB_NADDR16_HA, /* type */
1375 16, /* rightshift */
1376 1, /* size (0 = byte, 1 = short, 2 = long) */
1377 16, /* bitsize */
1378 FALSE, /* pc_relative */
1379 0, /* bitpos */
1380 complain_overflow_dont, /* complain_on_overflow */
1381 ppc_elf_addr16_ha_reloc, /* special_function */
1382 "R_PPC_EMB_NADDR16_HA", /* name */
1383 FALSE, /* partial_inplace */
1384 0, /* src_mask */
1385 0xffff, /* dst_mask */
1386 FALSE), /* pcrel_offset */
1387
1388 /* 16 bit value resulting from allocating a 4 byte word to hold an
1389 address in the .sdata section, and returning the offset from
1390 _SDA_BASE_ for that relocation. */
1391 HOWTO (R_PPC_EMB_SDAI16, /* type */
1392 0, /* rightshift */
1393 1, /* size (0 = byte, 1 = short, 2 = long) */
1394 16, /* bitsize */
1395 FALSE, /* pc_relative */
1396 0, /* bitpos */
1397 complain_overflow_bitfield, /* complain_on_overflow */
1398 bfd_elf_generic_reloc, /* special_function */
1399 "R_PPC_EMB_SDAI16", /* name */
1400 FALSE, /* partial_inplace */
1401 0, /* src_mask */
1402 0xffff, /* dst_mask */
1403 FALSE), /* pcrel_offset */
1404
1405 /* 16 bit value resulting from allocating a 4 byte word to hold an
1406 address in the .sdata2 section, and returning the offset from
1407 _SDA2_BASE_ for that relocation. */
1408 HOWTO (R_PPC_EMB_SDA2I16, /* type */
1409 0, /* rightshift */
1410 1, /* size (0 = byte, 1 = short, 2 = long) */
1411 16, /* bitsize */
1412 FALSE, /* pc_relative */
1413 0, /* bitpos */
1414 complain_overflow_bitfield, /* complain_on_overflow */
1415 bfd_elf_generic_reloc, /* special_function */
1416 "R_PPC_EMB_SDA2I16", /* name */
1417 FALSE, /* partial_inplace */
1418 0, /* src_mask */
1419 0xffff, /* dst_mask */
1420 FALSE), /* pcrel_offset */
1421
1422 /* A sign-extended 16 bit value relative to _SDA2_BASE_, for use with
1423 small data items. */
1424 HOWTO (R_PPC_EMB_SDA2REL, /* type */
1425 0, /* rightshift */
1426 1, /* size (0 = byte, 1 = short, 2 = long) */
1427 16, /* bitsize */
1428 FALSE, /* pc_relative */
1429 0, /* bitpos */
1430 complain_overflow_signed, /* complain_on_overflow */
1431 bfd_elf_generic_reloc, /* special_function */
1432 "R_PPC_EMB_SDA2REL", /* name */
1433 FALSE, /* partial_inplace */
1434 0, /* src_mask */
1435 0xffff, /* dst_mask */
1436 FALSE), /* pcrel_offset */
1437
1438 /* Relocate against either _SDA_BASE_ or _SDA2_BASE_, filling in the 16 bit
1439 signed offset from the appropriate base, and filling in the register
1440 field with the appropriate register (0, 2, or 13). */
1441 HOWTO (R_PPC_EMB_SDA21, /* type */
1442 0, /* rightshift */
1443 2, /* size (0 = byte, 1 = short, 2 = long) */
1444 16, /* bitsize */
1445 FALSE, /* pc_relative */
1446 0, /* bitpos */
1447 complain_overflow_signed, /* complain_on_overflow */
1448 bfd_elf_generic_reloc, /* special_function */
1449 "R_PPC_EMB_SDA21", /* name */
1450 FALSE, /* partial_inplace */
1451 0, /* src_mask */
1452 0xffff, /* dst_mask */
1453 FALSE), /* pcrel_offset */
1454
1455 /* Relocation not handled: R_PPC_EMB_MRKREF */
1456 /* Relocation not handled: R_PPC_EMB_RELSEC16 */
1457 /* Relocation not handled: R_PPC_EMB_RELST_LO */
1458 /* Relocation not handled: R_PPC_EMB_RELST_HI */
1459 /* Relocation not handled: R_PPC_EMB_RELST_HA */
1460 /* Relocation not handled: R_PPC_EMB_BIT_FLD */
1461
1462 /* PC relative relocation against either _SDA_BASE_ or _SDA2_BASE_, filling
1463 in the 16 bit signed offset from the appropriate base, and filling in the
1464 register field with the appropriate register (0, 2, or 13). */
1465 HOWTO (R_PPC_EMB_RELSDA, /* type */
1466 0, /* rightshift */
1467 1, /* size (0 = byte, 1 = short, 2 = long) */
1468 16, /* bitsize */
1469 TRUE, /* pc_relative */
1470 0, /* bitpos */
1471 complain_overflow_signed, /* complain_on_overflow */
1472 bfd_elf_generic_reloc, /* special_function */
1473 "R_PPC_EMB_RELSDA", /* name */
1474 FALSE, /* partial_inplace */
1475 0, /* src_mask */
1476 0xffff, /* dst_mask */
1477 FALSE), /* pcrel_offset */
1478
1479 /* GNU extension to record C++ vtable hierarchy. */
1480 HOWTO (R_PPC_GNU_VTINHERIT, /* type */
1481 0, /* rightshift */
1482 0, /* size (0 = byte, 1 = short, 2 = long) */
1483 0, /* bitsize */
1484 FALSE, /* pc_relative */
1485 0, /* bitpos */
1486 complain_overflow_dont, /* complain_on_overflow */
1487 NULL, /* special_function */
1488 "R_PPC_GNU_VTINHERIT", /* name */
1489 FALSE, /* partial_inplace */
1490 0, /* src_mask */
1491 0, /* dst_mask */
1492 FALSE), /* pcrel_offset */
1493
1494 /* GNU extension to record C++ vtable member usage. */
1495 HOWTO (R_PPC_GNU_VTENTRY, /* type */
1496 0, /* rightshift */
1497 0, /* size (0 = byte, 1 = short, 2 = long) */
1498 0, /* bitsize */
1499 FALSE, /* pc_relative */
1500 0, /* bitpos */
1501 complain_overflow_dont, /* complain_on_overflow */
1502 NULL, /* special_function */
1503 "R_PPC_GNU_VTENTRY", /* name */
1504 FALSE, /* partial_inplace */
1505 0, /* src_mask */
1506 0, /* dst_mask */
1507 FALSE), /* pcrel_offset */
1508
1509 /* Phony reloc to handle AIX style TOC entries. */
1510 HOWTO (R_PPC_TOC16, /* type */
1511 0, /* rightshift */
1512 1, /* size (0 = byte, 1 = short, 2 = long) */
1513 16, /* bitsize */
1514 FALSE, /* pc_relative */
1515 0, /* bitpos */
1516 complain_overflow_signed, /* complain_on_overflow */
1517 bfd_elf_generic_reloc, /* special_function */
1518 "R_PPC_TOC16", /* name */
1519 FALSE, /* partial_inplace */
1520 0, /* src_mask */
1521 0xffff, /* dst_mask */
1522 FALSE), /* pcrel_offset */
1523 };
1524 \f
1525 /* Initialize the ppc_elf_howto_table, so that linear accesses can be done. */
1526
1527 static void
1528 ppc_elf_howto_init (void)
1529 {
1530 unsigned int i, type;
1531
1532 for (i = 0;
1533 i < sizeof (ppc_elf_howto_raw) / sizeof (ppc_elf_howto_raw[0]);
1534 i++)
1535 {
1536 type = ppc_elf_howto_raw[i].type;
1537 if (type >= (sizeof (ppc_elf_howto_table)
1538 / sizeof (ppc_elf_howto_table[0])))
1539 abort ();
1540 ppc_elf_howto_table[type] = &ppc_elf_howto_raw[i];
1541 }
1542 }
1543 \f
1544 /* This function handles relaxing for the PPC with option --mpc860c0[=<n>].
1545
1546 The MPC860, revision C0 or earlier contains a bug in the die.
1547 If all of the following conditions are true, the next instruction
1548 to be executed *may* be treated as a no-op.
1549 1/ A forward branch is executed.
1550 2/ The branch is predicted as not taken.
1551 3/ The branch is taken.
1552 4/ The branch is located in the last 5 words of a page.
1553 (The EOP limit is 5 by default but may be specified as any value
1554 from 1-10.)
1555
1556 Our software solution is to detect these problematic branches in a
1557 linker pass and modify them as follows:
1558 1/ Unconditional branches - Since these are always predicted taken,
1559 there is no problem and no action is required.
1560 2/ Conditional backward branches - No problem, no action required.
1561 3/ Conditional forward branches - Ensure that the "inverse prediction
1562 bit" is set (ensure it is predicted taken).
1563 4/ Conditional register branches - Ensure that the "y bit" is set
1564 (ensure it is predicted taken). */
1565
1566 /* Sort sections by address. */
1567
1568 static int
1569 ppc_elf_sort_rela (const void *arg1, const void *arg2)
1570 {
1571 const Elf_Internal_Rela * const *rela1 = arg1;
1572 const Elf_Internal_Rela * const *rela2 = arg2;
1573
1574 /* Sort by offset. */
1575 return ((*rela1)->r_offset - (*rela2)->r_offset);
1576 }
1577
1578 static bfd_boolean
1579 ppc_elf_relax_section (bfd *abfd,
1580 asection *isec,
1581 struct bfd_link_info *link_info,
1582 bfd_boolean *again)
1583 {
1584 #define PAGESIZE 0x1000
1585
1586 bfd_byte *contents = NULL;
1587 bfd_byte *free_contents = NULL;
1588 Elf_Internal_Rela *internal_relocs = NULL;
1589 Elf_Internal_Rela *free_relocs = NULL;
1590 Elf_Internal_Rela **rela_comb = NULL;
1591 int comb_curr, comb_count;
1592
1593 /* We never have to do this more than once per input section. */
1594 *again = FALSE;
1595
1596 /* If needed, initialize this section's cooked size. */
1597 if (isec->_cooked_size == 0)
1598 isec->_cooked_size = isec->_raw_size;
1599
1600 /* We're only interested in text sections which overlap the
1601 troublesome area at the end of a page. */
1602 if (link_info->mpc860c0 && (isec->flags & SEC_CODE) && isec->_cooked_size)
1603 {
1604 bfd_vma dot, end_page, end_section;
1605 bfd_boolean section_modified;
1606
1607 /* Get the section contents. */
1608 /* Get cached copy if it exists. */
1609 if (elf_section_data (isec)->this_hdr.contents != NULL)
1610 contents = elf_section_data (isec)->this_hdr.contents;
1611 else
1612 {
1613 /* Go get them off disk. */
1614 contents = bfd_malloc (isec->_raw_size);
1615 if (contents == NULL)
1616 goto error_return;
1617 free_contents = contents;
1618
1619 if (! bfd_get_section_contents (abfd, isec, contents,
1620 (file_ptr) 0, isec->_raw_size))
1621 goto error_return;
1622 }
1623
1624 comb_curr = 0;
1625 comb_count = 0;
1626 if (isec->reloc_count)
1627 {
1628 unsigned n;
1629 bfd_size_type amt;
1630
1631 /* Get a copy of the native relocations. */
1632 internal_relocs
1633 = _bfd_elf_link_read_relocs (abfd, isec, NULL, NULL,
1634 link_info->keep_memory);
1635 if (internal_relocs == NULL)
1636 goto error_return;
1637 if (! link_info->keep_memory)
1638 free_relocs = internal_relocs;
1639
1640 /* Setup a faster access method for the reloc info we need. */
1641 amt = isec->reloc_count;
1642 amt *= sizeof (Elf_Internal_Rela*);
1643 rela_comb = bfd_malloc (amt);
1644 if (rela_comb == NULL)
1645 goto error_return;
1646 for (n = 0; n < isec->reloc_count; ++n)
1647 {
1648 enum elf_ppc_reloc_type r_type;
1649
1650 r_type = ELF32_R_TYPE (internal_relocs[n].r_info);
1651 if (r_type >= R_PPC_max)
1652 goto error_return;
1653
1654 /* Prologue constants are sometimes present in the ".text"
1655 sections and they can be identified by their associated
1656 relocation. We don't want to process those words and
1657 some others which can also be identified by their
1658 relocations. However, not all conditional branches will
1659 have a relocation so we will only ignore words that
1660 1) have a reloc, and 2) the reloc is not applicable to a
1661 conditional branch. The array rela_comb is built here
1662 for use in the EOP scan loop. */
1663 switch (r_type)
1664 {
1665 case R_PPC_ADDR14_BRNTAKEN:
1666 case R_PPC_REL14:
1667 case R_PPC_REL14_BRNTAKEN:
1668 /* We should check the instruction. */
1669 break;
1670 default:
1671 /* The word is not a conditional branch - ignore it. */
1672 rela_comb[comb_count++] = &internal_relocs[n];
1673 break;
1674 }
1675 }
1676 if (comb_count > 1)
1677 qsort (rela_comb, (size_t) comb_count, sizeof (int),
1678 ppc_elf_sort_rela);
1679 }
1680
1681 /* Enumerate each EOP region that overlaps this section. */
1682 end_section = isec->vma + isec->_cooked_size;
1683 dot = end_page = (isec->vma | (PAGESIZE - 1)) + 1;
1684 dot -= link_info->mpc860c0;
1685 section_modified = FALSE;
1686 /* Increment the start position if this section begins in the
1687 middle of its first EOP region. */
1688 if (dot < isec->vma)
1689 dot = isec->vma;
1690 for (;
1691 dot < end_section;
1692 dot += PAGESIZE, end_page += PAGESIZE)
1693 {
1694 /* Check each word in this EOP region. */
1695 for (; dot < end_page; dot += 4)
1696 {
1697 bfd_vma isec_offset;
1698 unsigned long insn;
1699 bfd_boolean skip, modified;
1700
1701 /* Don't process this word if there is a relocation for it
1702 and the relocation indicates the word is not a
1703 conditional branch. */
1704 skip = FALSE;
1705 isec_offset = dot - isec->vma;
1706 for (; comb_curr<comb_count; ++comb_curr)
1707 {
1708 bfd_vma r_offset;
1709
1710 r_offset = rela_comb[comb_curr]->r_offset;
1711 if (r_offset >= isec_offset)
1712 {
1713 if (r_offset == isec_offset) skip = TRUE;
1714 break;
1715 }
1716 }
1717 if (skip) continue;
1718
1719 /* Check the current word for a problematic conditional
1720 branch. */
1721 #define BO0(insn) ((insn) & 0x02000000)
1722 #define BO2(insn) ((insn) & 0x00800000)
1723 #define BO4(insn) ((insn) & 0x00200000)
1724 insn = (unsigned long) bfd_get_32 (abfd, contents + isec_offset);
1725 modified = FALSE;
1726 if ((insn & 0xFc000000) == 0x40000000)
1727 {
1728 /* Instruction is BCx */
1729 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1730 {
1731 bfd_vma target;
1732
1733 /* This branch is predicted as "normal".
1734 If this is a forward branch, it is problematic. */
1735 target = insn & 0x0000Fffc;
1736 target = (target ^ 0x8000) - 0x8000;
1737 if ((insn & 0x00000002) == 0)
1738 /* Convert to abs. */
1739 target += dot;
1740 if (target > dot)
1741 {
1742 /* Set the prediction bit. */
1743 insn |= 0x00200000;
1744 modified = TRUE;
1745 }
1746 }
1747 }
1748 else if ((insn & 0xFc00Fffe) == 0x4c000420)
1749 {
1750 /* Instruction is BCCTRx. */
1751 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1752 {
1753 /* This branch is predicted as not-taken.
1754 If this is a forward branch, it is problematic.
1755 Since we can't tell statically if it will branch
1756 forward, always set the prediction bit. */
1757 insn |= 0x00200000;
1758 modified = TRUE;
1759 }
1760 }
1761 else if ((insn & 0xFc00Fffe) == 0x4c000020)
1762 {
1763 /* Instruction is BCLRx */
1764 if ((!BO0(insn) || !BO2(insn)) && !BO4(insn))
1765 {
1766 /* This branch is predicted as not-taken.
1767 If this is a forward branch, it is problematic.
1768 Since we can't tell statically if it will branch
1769 forward, always set the prediction bit. */
1770 insn |= 0x00200000;
1771 modified = TRUE;
1772 }
1773 }
1774 #undef BO0
1775 #undef BO2
1776 #undef BO4
1777 if (modified)
1778 {
1779 bfd_put_32 (abfd, insn, contents + isec_offset);
1780 section_modified = TRUE;
1781 }
1782 }
1783 }
1784 if (section_modified)
1785 {
1786 elf_section_data (isec)->this_hdr.contents = contents;
1787 free_contents = NULL;
1788 }
1789 }
1790
1791 if (rela_comb != NULL)
1792 {
1793 free (rela_comb);
1794 rela_comb = NULL;
1795 }
1796
1797 if (free_relocs != NULL)
1798 {
1799 free (free_relocs);
1800 free_relocs = NULL;
1801 }
1802
1803 if (free_contents != NULL)
1804 {
1805 if (! link_info->keep_memory)
1806 free (free_contents);
1807 else
1808 {
1809 /* Cache the section contents for elf_link_input_bfd. */
1810 elf_section_data (isec)->this_hdr.contents = contents;
1811 }
1812 free_contents = NULL;
1813 }
1814
1815 return TRUE;
1816
1817 error_return:
1818 if (rela_comb != NULL)
1819 free (rela_comb);
1820 if (free_relocs != NULL)
1821 free (free_relocs);
1822 if (free_contents != NULL)
1823 free (free_contents);
1824 return FALSE;
1825 }
1826 \f
1827 static reloc_howto_type *
1828 ppc_elf_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1829 bfd_reloc_code_real_type code)
1830 {
1831 enum elf_ppc_reloc_type r;
1832
1833 /* Initialize howto table if not already done. */
1834 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1835 ppc_elf_howto_init ();
1836
1837 switch (code)
1838 {
1839 default:
1840 return NULL;
1841
1842 case BFD_RELOC_NONE: r = R_PPC_NONE; break;
1843 case BFD_RELOC_32: r = R_PPC_ADDR32; break;
1844 case BFD_RELOC_PPC_BA26: r = R_PPC_ADDR24; break;
1845 case BFD_RELOC_16: r = R_PPC_ADDR16; break;
1846 case BFD_RELOC_LO16: r = R_PPC_ADDR16_LO; break;
1847 case BFD_RELOC_HI16: r = R_PPC_ADDR16_HI; break;
1848 case BFD_RELOC_HI16_S: r = R_PPC_ADDR16_HA; break;
1849 case BFD_RELOC_PPC_BA16: r = R_PPC_ADDR14; break;
1850 case BFD_RELOC_PPC_BA16_BRTAKEN: r = R_PPC_ADDR14_BRTAKEN; break;
1851 case BFD_RELOC_PPC_BA16_BRNTAKEN: r = R_PPC_ADDR14_BRNTAKEN; break;
1852 case BFD_RELOC_PPC_B26: r = R_PPC_REL24; break;
1853 case BFD_RELOC_PPC_B16: r = R_PPC_REL14; break;
1854 case BFD_RELOC_PPC_B16_BRTAKEN: r = R_PPC_REL14_BRTAKEN; break;
1855 case BFD_RELOC_PPC_B16_BRNTAKEN: r = R_PPC_REL14_BRNTAKEN; break;
1856 case BFD_RELOC_16_GOTOFF: r = R_PPC_GOT16; break;
1857 case BFD_RELOC_LO16_GOTOFF: r = R_PPC_GOT16_LO; break;
1858 case BFD_RELOC_HI16_GOTOFF: r = R_PPC_GOT16_HI; break;
1859 case BFD_RELOC_HI16_S_GOTOFF: r = R_PPC_GOT16_HA; break;
1860 case BFD_RELOC_24_PLT_PCREL: r = R_PPC_PLTREL24; break;
1861 case BFD_RELOC_PPC_COPY: r = R_PPC_COPY; break;
1862 case BFD_RELOC_PPC_GLOB_DAT: r = R_PPC_GLOB_DAT; break;
1863 case BFD_RELOC_PPC_LOCAL24PC: r = R_PPC_LOCAL24PC; break;
1864 case BFD_RELOC_32_PCREL: r = R_PPC_REL32; break;
1865 case BFD_RELOC_32_PLTOFF: r = R_PPC_PLT32; break;
1866 case BFD_RELOC_32_PLT_PCREL: r = R_PPC_PLTREL32; break;
1867 case BFD_RELOC_LO16_PLTOFF: r = R_PPC_PLT16_LO; break;
1868 case BFD_RELOC_HI16_PLTOFF: r = R_PPC_PLT16_HI; break;
1869 case BFD_RELOC_HI16_S_PLTOFF: r = R_PPC_PLT16_HA; break;
1870 case BFD_RELOC_GPREL16: r = R_PPC_SDAREL16; break;
1871 case BFD_RELOC_16_BASEREL: r = R_PPC_SECTOFF; break;
1872 case BFD_RELOC_LO16_BASEREL: r = R_PPC_SECTOFF_LO; break;
1873 case BFD_RELOC_HI16_BASEREL: r = R_PPC_SECTOFF_HI; break;
1874 case BFD_RELOC_HI16_S_BASEREL: r = R_PPC_SECTOFF_HA; break;
1875 case BFD_RELOC_CTOR: r = R_PPC_ADDR32; break;
1876 case BFD_RELOC_PPC_TOC16: r = R_PPC_TOC16; break;
1877 case BFD_RELOC_PPC_TLS: r = R_PPC_TLS; break;
1878 case BFD_RELOC_PPC_DTPMOD: r = R_PPC_DTPMOD32; break;
1879 case BFD_RELOC_PPC_TPREL16: r = R_PPC_TPREL16; break;
1880 case BFD_RELOC_PPC_TPREL16_LO: r = R_PPC_TPREL16_LO; break;
1881 case BFD_RELOC_PPC_TPREL16_HI: r = R_PPC_TPREL16_HI; break;
1882 case BFD_RELOC_PPC_TPREL16_HA: r = R_PPC_TPREL16_HA; break;
1883 case BFD_RELOC_PPC_TPREL: r = R_PPC_TPREL32; break;
1884 case BFD_RELOC_PPC_DTPREL16: r = R_PPC_DTPREL16; break;
1885 case BFD_RELOC_PPC_DTPREL16_LO: r = R_PPC_DTPREL16_LO; break;
1886 case BFD_RELOC_PPC_DTPREL16_HI: r = R_PPC_DTPREL16_HI; break;
1887 case BFD_RELOC_PPC_DTPREL16_HA: r = R_PPC_DTPREL16_HA; break;
1888 case BFD_RELOC_PPC_DTPREL: r = R_PPC_DTPREL32; break;
1889 case BFD_RELOC_PPC_GOT_TLSGD16: r = R_PPC_GOT_TLSGD16; break;
1890 case BFD_RELOC_PPC_GOT_TLSGD16_LO: r = R_PPC_GOT_TLSGD16_LO; break;
1891 case BFD_RELOC_PPC_GOT_TLSGD16_HI: r = R_PPC_GOT_TLSGD16_HI; break;
1892 case BFD_RELOC_PPC_GOT_TLSGD16_HA: r = R_PPC_GOT_TLSGD16_HA; break;
1893 case BFD_RELOC_PPC_GOT_TLSLD16: r = R_PPC_GOT_TLSLD16; break;
1894 case BFD_RELOC_PPC_GOT_TLSLD16_LO: r = R_PPC_GOT_TLSLD16_LO; break;
1895 case BFD_RELOC_PPC_GOT_TLSLD16_HI: r = R_PPC_GOT_TLSLD16_HI; break;
1896 case BFD_RELOC_PPC_GOT_TLSLD16_HA: r = R_PPC_GOT_TLSLD16_HA; break;
1897 case BFD_RELOC_PPC_GOT_TPREL16: r = R_PPC_GOT_TPREL16; break;
1898 case BFD_RELOC_PPC_GOT_TPREL16_LO: r = R_PPC_GOT_TPREL16_LO; break;
1899 case BFD_RELOC_PPC_GOT_TPREL16_HI: r = R_PPC_GOT_TPREL16_HI; break;
1900 case BFD_RELOC_PPC_GOT_TPREL16_HA: r = R_PPC_GOT_TPREL16_HA; break;
1901 case BFD_RELOC_PPC_GOT_DTPREL16: r = R_PPC_GOT_DTPREL16; break;
1902 case BFD_RELOC_PPC_GOT_DTPREL16_LO: r = R_PPC_GOT_DTPREL16_LO; break;
1903 case BFD_RELOC_PPC_GOT_DTPREL16_HI: r = R_PPC_GOT_DTPREL16_HI; break;
1904 case BFD_RELOC_PPC_GOT_DTPREL16_HA: r = R_PPC_GOT_DTPREL16_HA; break;
1905 case BFD_RELOC_PPC_EMB_NADDR32: r = R_PPC_EMB_NADDR32; break;
1906 case BFD_RELOC_PPC_EMB_NADDR16: r = R_PPC_EMB_NADDR16; break;
1907 case BFD_RELOC_PPC_EMB_NADDR16_LO: r = R_PPC_EMB_NADDR16_LO; break;
1908 case BFD_RELOC_PPC_EMB_NADDR16_HI: r = R_PPC_EMB_NADDR16_HI; break;
1909 case BFD_RELOC_PPC_EMB_NADDR16_HA: r = R_PPC_EMB_NADDR16_HA; break;
1910 case BFD_RELOC_PPC_EMB_SDAI16: r = R_PPC_EMB_SDAI16; break;
1911 case BFD_RELOC_PPC_EMB_SDA2I16: r = R_PPC_EMB_SDA2I16; break;
1912 case BFD_RELOC_PPC_EMB_SDA2REL: r = R_PPC_EMB_SDA2REL; break;
1913 case BFD_RELOC_PPC_EMB_SDA21: r = R_PPC_EMB_SDA21; break;
1914 case BFD_RELOC_PPC_EMB_MRKREF: r = R_PPC_EMB_MRKREF; break;
1915 case BFD_RELOC_PPC_EMB_RELSEC16: r = R_PPC_EMB_RELSEC16; break;
1916 case BFD_RELOC_PPC_EMB_RELST_LO: r = R_PPC_EMB_RELST_LO; break;
1917 case BFD_RELOC_PPC_EMB_RELST_HI: r = R_PPC_EMB_RELST_HI; break;
1918 case BFD_RELOC_PPC_EMB_RELST_HA: r = R_PPC_EMB_RELST_HA; break;
1919 case BFD_RELOC_PPC_EMB_BIT_FLD: r = R_PPC_EMB_BIT_FLD; break;
1920 case BFD_RELOC_PPC_EMB_RELSDA: r = R_PPC_EMB_RELSDA; break;
1921 case BFD_RELOC_VTABLE_INHERIT: r = R_PPC_GNU_VTINHERIT; break;
1922 case BFD_RELOC_VTABLE_ENTRY: r = R_PPC_GNU_VTENTRY; break;
1923 }
1924
1925 return ppc_elf_howto_table[r];
1926 };
1927
1928 /* Set the howto pointer for a PowerPC ELF reloc. */
1929
1930 static void
1931 ppc_elf_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
1932 arelent *cache_ptr,
1933 Elf_Internal_Rela *dst)
1934 {
1935 /* Initialize howto table if not already done. */
1936 if (!ppc_elf_howto_table[R_PPC_ADDR32])
1937 ppc_elf_howto_init ();
1938
1939 BFD_ASSERT (ELF32_R_TYPE (dst->r_info) < (unsigned int) R_PPC_max);
1940 cache_ptr->howto = ppc_elf_howto_table[ELF32_R_TYPE (dst->r_info)];
1941 }
1942
1943 /* Handle the R_PPC_ADDR16_HA reloc. */
1944
1945 static bfd_reloc_status_type
1946 ppc_elf_addr16_ha_reloc (bfd *abfd ATTRIBUTE_UNUSED,
1947 arelent *reloc_entry,
1948 asymbol *symbol,
1949 void *data ATTRIBUTE_UNUSED,
1950 asection *input_section,
1951 bfd *output_bfd,
1952 char **error_message ATTRIBUTE_UNUSED)
1953 {
1954 bfd_vma relocation;
1955
1956 if (output_bfd != NULL)
1957 {
1958 reloc_entry->address += input_section->output_offset;
1959 return bfd_reloc_ok;
1960 }
1961
1962 if (reloc_entry->address > input_section->_cooked_size)
1963 return bfd_reloc_outofrange;
1964
1965 if (bfd_is_com_section (symbol->section))
1966 relocation = 0;
1967 else
1968 relocation = symbol->value;
1969
1970 relocation += symbol->section->output_section->vma;
1971 relocation += symbol->section->output_offset;
1972 relocation += reloc_entry->addend;
1973
1974 reloc_entry->addend += (relocation & 0x8000) << 1;
1975
1976 return bfd_reloc_continue;
1977 }
1978
1979 static bfd_reloc_status_type
1980 ppc_elf_unhandled_reloc (bfd *abfd,
1981 arelent *reloc_entry,
1982 asymbol *symbol,
1983 void *data,
1984 asection *input_section,
1985 bfd *output_bfd,
1986 char **error_message)
1987 {
1988 /* If this is a relocatable link (output_bfd test tells us), just
1989 call the generic function. Any adjustment will be done at final
1990 link time. */
1991 if (output_bfd != NULL)
1992 return bfd_elf_generic_reloc (abfd, reloc_entry, symbol, data,
1993 input_section, output_bfd, error_message);
1994
1995 if (error_message != NULL)
1996 {
1997 static char buf[60];
1998 sprintf (buf, _("generic linker can't handle %s"),
1999 reloc_entry->howto->name);
2000 *error_message = buf;
2001 }
2002 return bfd_reloc_dangerous;
2003 }
2004
2005 /* Fix bad default arch selected for a 32 bit input bfd when the
2006 default is 64 bit. */
2007
2008 static bfd_boolean
2009 ppc_elf_object_p (bfd *abfd)
2010 {
2011 if (abfd->arch_info->the_default && abfd->arch_info->bits_per_word == 64)
2012 {
2013 Elf_Internal_Ehdr *i_ehdr = elf_elfheader (abfd);
2014
2015 if (i_ehdr->e_ident[EI_CLASS] == ELFCLASS32)
2016 {
2017 /* Relies on arch after 64 bit default being 32 bit default. */
2018 abfd->arch_info = abfd->arch_info->next;
2019 BFD_ASSERT (abfd->arch_info->bits_per_word == 32);
2020 }
2021 }
2022 return TRUE;
2023 }
2024
2025 /* Function to set whether a module needs the -mrelocatable bit set. */
2026
2027 static bfd_boolean
2028 ppc_elf_set_private_flags (bfd *abfd, flagword flags)
2029 {
2030 BFD_ASSERT (!elf_flags_init (abfd)
2031 || elf_elfheader (abfd)->e_flags == flags);
2032
2033 elf_elfheader (abfd)->e_flags = flags;
2034 elf_flags_init (abfd) = TRUE;
2035 return TRUE;
2036 }
2037
2038 /* Merge backend specific data from an object file to the output
2039 object file when linking. */
2040
2041 static bfd_boolean
2042 ppc_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
2043 {
2044 flagword old_flags;
2045 flagword new_flags;
2046 bfd_boolean error;
2047
2048 /* Check if we have the same endianess. */
2049 if (! _bfd_generic_verify_endian_match (ibfd, obfd))
2050 return FALSE;
2051
2052 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2053 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2054 return TRUE;
2055
2056 new_flags = elf_elfheader (ibfd)->e_flags;
2057 old_flags = elf_elfheader (obfd)->e_flags;
2058 if (!elf_flags_init (obfd))
2059 {
2060 /* First call, no flags set. */
2061 elf_flags_init (obfd) = TRUE;
2062 elf_elfheader (obfd)->e_flags = new_flags;
2063 }
2064
2065 /* Compatible flags are ok. */
2066 else if (new_flags == old_flags)
2067 ;
2068
2069 /* Incompatible flags. */
2070 else
2071 {
2072 /* Warn about -mrelocatable mismatch. Allow -mrelocatable-lib
2073 to be linked with either. */
2074 error = FALSE;
2075 if ((new_flags & EF_PPC_RELOCATABLE) != 0
2076 && (old_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0)
2077 {
2078 error = TRUE;
2079 (*_bfd_error_handler)
2080 (_("%s: compiled with -mrelocatable and linked with "
2081 "modules compiled normally"),
2082 bfd_archive_filename (ibfd));
2083 }
2084 else if ((new_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0
2085 && (old_flags & EF_PPC_RELOCATABLE) != 0)
2086 {
2087 error = TRUE;
2088 (*_bfd_error_handler)
2089 (_("%s: compiled normally and linked with "
2090 "modules compiled with -mrelocatable"),
2091 bfd_archive_filename (ibfd));
2092 }
2093
2094 /* The output is -mrelocatable-lib iff both the input files are. */
2095 if (! (new_flags & EF_PPC_RELOCATABLE_LIB))
2096 elf_elfheader (obfd)->e_flags &= ~EF_PPC_RELOCATABLE_LIB;
2097
2098 /* The output is -mrelocatable iff it can't be -mrelocatable-lib,
2099 but each input file is either -mrelocatable or -mrelocatable-lib. */
2100 if (! (elf_elfheader (obfd)->e_flags & EF_PPC_RELOCATABLE_LIB)
2101 && (new_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE))
2102 && (old_flags & (EF_PPC_RELOCATABLE_LIB | EF_PPC_RELOCATABLE)))
2103 elf_elfheader (obfd)->e_flags |= EF_PPC_RELOCATABLE;
2104
2105 /* Do not warn about eabi vs. V.4 mismatch, just or in the bit if
2106 any module uses it. */
2107 elf_elfheader (obfd)->e_flags |= (new_flags & EF_PPC_EMB);
2108
2109 new_flags &= ~(EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
2110 old_flags &= ~(EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
2111
2112 /* Warn about any other mismatches. */
2113 if (new_flags != old_flags)
2114 {
2115 error = TRUE;
2116 (*_bfd_error_handler)
2117 (_("%s: uses different e_flags (0x%lx) fields "
2118 "than previous modules (0x%lx)"),
2119 bfd_archive_filename (ibfd), (long) new_flags, (long) old_flags);
2120 }
2121
2122 if (error)
2123 {
2124 bfd_set_error (bfd_error_bad_value);
2125 return FALSE;
2126 }
2127 }
2128
2129 return TRUE;
2130 }
2131 \f
2132 /* Handle a PowerPC specific section when reading an object file. This
2133 is called when elfcode.h finds a section with an unknown type. */
2134
2135 static bfd_boolean
2136 ppc_elf_section_from_shdr (bfd *abfd, Elf_Internal_Shdr *hdr, const char *name)
2137 {
2138 asection *newsect;
2139 flagword flags;
2140
2141 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name))
2142 return FALSE;
2143
2144 newsect = hdr->bfd_section;
2145 flags = bfd_get_section_flags (abfd, newsect);
2146 if (hdr->sh_flags & SHF_EXCLUDE)
2147 flags |= SEC_EXCLUDE;
2148
2149 if (hdr->sh_type == SHT_ORDERED)
2150 flags |= SEC_SORT_ENTRIES;
2151
2152 bfd_set_section_flags (abfd, newsect, flags);
2153 return TRUE;
2154 }
2155 \f
2156 /* Set up any other section flags and such that may be necessary. */
2157
2158 static bfd_boolean
2159 ppc_elf_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
2160 Elf_Internal_Shdr *shdr,
2161 asection *asect)
2162 {
2163 if ((asect->flags & SEC_EXCLUDE) != 0)
2164 shdr->sh_flags |= SHF_EXCLUDE;
2165
2166 if ((asect->flags & SEC_SORT_ENTRIES) != 0)
2167 shdr->sh_type = SHT_ORDERED;
2168
2169 return TRUE;
2170 }
2171 \f
2172 /* Create a special linker section, or return a pointer to a linker
2173 section already created */
2174
2175 static elf_linker_section_t *
2176 elf_create_linker_section (bfd *abfd,
2177 struct bfd_link_info *info,
2178 enum elf_linker_section_enum which,
2179 elf_linker_section_t *defaults)
2180 {
2181 bfd *dynobj = elf_hash_table (info)->dynobj;
2182 elf_linker_section_t *lsect;
2183
2184 /* Record the first bfd section that needs the special section */
2185 if (!dynobj)
2186 dynobj = elf_hash_table (info)->dynobj = abfd;
2187
2188 /* If this is the first time, create the section */
2189 lsect = elf_linker_section (dynobj, which);
2190 if (!lsect)
2191 {
2192 asection *s;
2193 bfd_size_type amt = sizeof (elf_linker_section_t);
2194
2195 lsect = bfd_alloc (dynobj, amt);
2196
2197 *lsect = *defaults;
2198 elf_linker_section (dynobj, which) = lsect;
2199 lsect->which = which;
2200 lsect->hole_written_p = FALSE;
2201
2202 /* See if the sections already exist */
2203 lsect->section = s = bfd_get_section_by_name (dynobj, lsect->name);
2204 if (!s || (s->flags & defaults->flags) != defaults->flags)
2205 {
2206 lsect->section = s = bfd_make_section_anyway (dynobj, lsect->name);
2207
2208 if (s == NULL)
2209 return NULL;
2210
2211 bfd_set_section_flags (dynobj, s, defaults->flags);
2212 bfd_set_section_alignment (dynobj, s, lsect->alignment);
2213 }
2214 else if (bfd_get_section_alignment (dynobj, s) < lsect->alignment)
2215 bfd_set_section_alignment (dynobj, s, lsect->alignment);
2216
2217 s->_raw_size = align_power (s->_raw_size, lsect->alignment);
2218
2219 /* Is there a hole we have to provide? If so check whether the
2220 segment is too big already */
2221 if (lsect->hole_size)
2222 {
2223 lsect->hole_offset = s->_raw_size;
2224 s->_raw_size += lsect->hole_size;
2225 if (lsect->hole_offset > lsect->max_hole_offset)
2226 {
2227 (*_bfd_error_handler)
2228 (_("%s: Section %s is too large to add hole of %ld bytes"),
2229 bfd_get_filename (abfd),
2230 lsect->name,
2231 (long) lsect->hole_size);
2232
2233 bfd_set_error (bfd_error_bad_value);
2234 return NULL;
2235 }
2236 }
2237
2238 #ifdef DEBUG
2239 fprintf (stderr, "Creating section %s, current size = %ld\n",
2240 lsect->name, (long) s->_raw_size);
2241 #endif
2242
2243 if (lsect->sym_name)
2244 {
2245 struct elf_link_hash_entry *h;
2246 struct bfd_link_hash_entry *bh;
2247
2248 #ifdef DEBUG
2249 fprintf (stderr, "Adding %s to section %s\n",
2250 lsect->sym_name,
2251 lsect->name);
2252 #endif
2253 bh = bfd_link_hash_lookup (info->hash, lsect->sym_name,
2254 FALSE, FALSE, FALSE);
2255
2256 if ((bh == NULL || bh->type == bfd_link_hash_undefined)
2257 && !(_bfd_generic_link_add_one_symbol
2258 (info, abfd, lsect->sym_name, BSF_GLOBAL, s,
2259 (lsect->hole_size
2260 ? s->_raw_size - lsect->hole_size + lsect->sym_offset
2261 : lsect->sym_offset),
2262 NULL, FALSE,
2263 get_elf_backend_data (abfd)->collect, &bh)))
2264 return NULL;
2265 h = (struct elf_link_hash_entry *) bh;
2266
2267 if ((defaults->which != LINKER_SECTION_SDATA)
2268 && (defaults->which != LINKER_SECTION_SDATA2))
2269 h->elf_link_hash_flags |= ELF_LINK_HASH_DEF_DYNAMIC;
2270
2271 h->type = STT_OBJECT;
2272 lsect->sym_hash = h;
2273
2274 if (info->shared
2275 && ! _bfd_elf_link_record_dynamic_symbol (info, h))
2276 return NULL;
2277 }
2278 }
2279
2280 return lsect;
2281 }
2282 \f
2283 /* Find a linker generated pointer with a given addend and type. */
2284
2285 static elf_linker_section_pointers_t *
2286 elf_find_pointer_linker_section
2287 (elf_linker_section_pointers_t *linker_pointers,
2288 bfd_vma addend,
2289 elf_linker_section_enum_t which)
2290 {
2291 for ( ; linker_pointers != NULL; linker_pointers = linker_pointers->next)
2292 if (which == linker_pointers->which && addend == linker_pointers->addend)
2293 return linker_pointers;
2294
2295 return NULL;
2296 }
2297 \f
2298 /* Allocate a pointer to live in a linker created section. */
2299
2300 static bfd_boolean
2301 elf_create_pointer_linker_section (bfd *abfd,
2302 struct bfd_link_info *info,
2303 elf_linker_section_t *lsect,
2304 struct elf_link_hash_entry *h,
2305 const Elf_Internal_Rela *rel)
2306 {
2307 elf_linker_section_pointers_t **ptr_linker_section_ptr = NULL;
2308 elf_linker_section_pointers_t *linker_section_ptr;
2309 unsigned long r_symndx = ELF32_R_SYM (rel->r_info);
2310 bfd_size_type amt;
2311
2312 BFD_ASSERT (lsect != NULL);
2313
2314 /* Is this a global symbol? */
2315 if (h != NULL)
2316 {
2317 /* Has this symbol already been allocated? If so, our work is done. */
2318 if (elf_find_pointer_linker_section (h->linker_section_pointer,
2319 rel->r_addend,
2320 lsect->which))
2321 return TRUE;
2322
2323 ptr_linker_section_ptr = &h->linker_section_pointer;
2324 /* Make sure this symbol is output as a dynamic symbol. */
2325 if (h->dynindx == -1)
2326 {
2327 if (! _bfd_elf_link_record_dynamic_symbol (info, h))
2328 return FALSE;
2329 }
2330
2331 if (lsect->rel_section)
2332 lsect->rel_section->_raw_size += sizeof (Elf32_External_Rela);
2333 }
2334 else
2335 {
2336 /* Allocation of a pointer to a local symbol. */
2337 elf_linker_section_pointers_t **ptr = elf_local_ptr_offsets (abfd);
2338
2339 /* Allocate a table to hold the local symbols if first time. */
2340 if (!ptr)
2341 {
2342 unsigned int num_symbols = elf_tdata (abfd)->symtab_hdr.sh_info;
2343 register unsigned int i;
2344
2345 amt = num_symbols;
2346 amt *= sizeof (elf_linker_section_pointers_t *);
2347 ptr = bfd_alloc (abfd, amt);
2348
2349 if (!ptr)
2350 return FALSE;
2351
2352 elf_local_ptr_offsets (abfd) = ptr;
2353 for (i = 0; i < num_symbols; i++)
2354 ptr[i] = NULL;
2355 }
2356
2357 /* Has this symbol already been allocated? If so, our work is done. */
2358 if (elf_find_pointer_linker_section (ptr[r_symndx],
2359 rel->r_addend,
2360 lsect->which))
2361 return TRUE;
2362
2363 ptr_linker_section_ptr = &ptr[r_symndx];
2364
2365 if (info->shared)
2366 {
2367 /* If we are generating a shared object, we need to
2368 output a R_<xxx>_RELATIVE reloc so that the
2369 dynamic linker can adjust this GOT entry. */
2370 BFD_ASSERT (lsect->rel_section != NULL);
2371 lsect->rel_section->_raw_size += sizeof (Elf32_External_Rela);
2372 }
2373 }
2374
2375 /* Allocate space for a pointer in the linker section, and allocate
2376 a new pointer record from internal memory. */
2377 BFD_ASSERT (ptr_linker_section_ptr != NULL);
2378 amt = sizeof (elf_linker_section_pointers_t);
2379 linker_section_ptr = bfd_alloc (abfd, amt);
2380
2381 if (!linker_section_ptr)
2382 return FALSE;
2383
2384 linker_section_ptr->next = *ptr_linker_section_ptr;
2385 linker_section_ptr->addend = rel->r_addend;
2386 linker_section_ptr->which = lsect->which;
2387 linker_section_ptr->written_address_p = FALSE;
2388 *ptr_linker_section_ptr = linker_section_ptr;
2389
2390 linker_section_ptr->offset = lsect->section->_raw_size;
2391 lsect->section->_raw_size += 4;
2392
2393 #ifdef DEBUG
2394 fprintf (stderr,
2395 "Create pointer in linker section %s, offset = %ld, section size = %ld\n",
2396 lsect->name, (long) linker_section_ptr->offset,
2397 (long) lsect->section->_raw_size);
2398 #endif
2399
2400 return TRUE;
2401 }
2402 \f
2403 #define bfd_put_ptr(BFD, VAL, ADDR) bfd_put_32 (BFD, VAL, ADDR)
2404
2405 /* Fill in the address for a pointer generated in a linker section. */
2406
2407 static bfd_vma
2408 elf_finish_pointer_linker_section (bfd *output_bfd,
2409 bfd *input_bfd,
2410 struct bfd_link_info *info,
2411 elf_linker_section_t *lsect,
2412 struct elf_link_hash_entry *h,
2413 bfd_vma relocation,
2414 const Elf_Internal_Rela *rel,
2415 int relative_reloc)
2416 {
2417 elf_linker_section_pointers_t *linker_section_ptr;
2418
2419 BFD_ASSERT (lsect != NULL);
2420
2421 if (h != NULL)
2422 {
2423 /* Handle global symbol. */
2424 linker_section_ptr
2425 = elf_find_pointer_linker_section (h->linker_section_pointer,
2426 rel->r_addend,
2427 lsect->which);
2428
2429 BFD_ASSERT (linker_section_ptr != NULL);
2430
2431 if (! elf_hash_table (info)->dynamic_sections_created
2432 || (info->shared
2433 && info->symbolic
2434 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
2435 {
2436 /* This is actually a static link, or it is a
2437 -Bsymbolic link and the symbol is defined
2438 locally. We must initialize this entry in the
2439 global section.
2440
2441 When doing a dynamic link, we create a .rela.<xxx>
2442 relocation entry to initialize the value. This
2443 is done in the finish_dynamic_symbol routine. */
2444 if (!linker_section_ptr->written_address_p)
2445 {
2446 linker_section_ptr->written_address_p = TRUE;
2447 bfd_put_ptr (output_bfd,
2448 relocation + linker_section_ptr->addend,
2449 (lsect->section->contents
2450 + linker_section_ptr->offset));
2451 }
2452 }
2453 }
2454 else
2455 {
2456 /* Handle local symbol. */
2457 unsigned long r_symndx = ELF32_R_SYM (rel->r_info);
2458 BFD_ASSERT (elf_local_ptr_offsets (input_bfd) != NULL);
2459 BFD_ASSERT (elf_local_ptr_offsets (input_bfd)[r_symndx] != NULL);
2460 linker_section_ptr = (elf_find_pointer_linker_section
2461 (elf_local_ptr_offsets (input_bfd)[r_symndx],
2462 rel->r_addend,
2463 lsect->which));
2464
2465 BFD_ASSERT (linker_section_ptr != NULL);
2466
2467 /* Write out pointer if it hasn't been rewritten out before. */
2468 if (!linker_section_ptr->written_address_p)
2469 {
2470 linker_section_ptr->written_address_p = TRUE;
2471 bfd_put_ptr (output_bfd, relocation + linker_section_ptr->addend,
2472 lsect->section->contents + linker_section_ptr->offset);
2473
2474 if (info->shared)
2475 {
2476 asection *srel = lsect->rel_section;
2477 Elf_Internal_Rela outrel[MAX_INT_RELS_PER_EXT_REL];
2478 bfd_byte *erel;
2479 struct elf_backend_data *bed = get_elf_backend_data (output_bfd);
2480 unsigned int i;
2481
2482 /* We need to generate a relative reloc for the dynamic
2483 linker. */
2484 if (!srel)
2485 {
2486 srel = bfd_get_section_by_name (elf_hash_table (info)->dynobj,
2487 lsect->rel_name);
2488 lsect->rel_section = srel;
2489 }
2490
2491 BFD_ASSERT (srel != NULL);
2492
2493 for (i = 0; i < bed->s->int_rels_per_ext_rel; i++)
2494 {
2495 outrel[i].r_offset = (lsect->section->output_section->vma
2496 + lsect->section->output_offset
2497 + linker_section_ptr->offset);
2498 outrel[i].r_info = 0;
2499 outrel[i].r_addend = 0;
2500 }
2501 outrel[0].r_info = ELF32_R_INFO (0, relative_reloc);
2502 erel = lsect->section->contents;
2503 erel += (elf_section_data (lsect->section)->rel_count++
2504 * sizeof (Elf32_External_Rela));
2505 bfd_elf32_swap_reloca_out (output_bfd, outrel, erel);
2506 }
2507 }
2508 }
2509
2510 relocation = (lsect->section->output_offset
2511 + linker_section_ptr->offset
2512 - lsect->hole_offset
2513 - lsect->sym_offset);
2514
2515 #ifdef DEBUG
2516 fprintf (stderr,
2517 "Finish pointer in linker section %s, offset = %ld (0x%lx)\n",
2518 lsect->name, (long) relocation, (long) relocation);
2519 #endif
2520
2521 /* Subtract out the addend, because it will get added back in by the normal
2522 processing. */
2523 return relocation - linker_section_ptr->addend;
2524 }
2525 \f
2526 /* Create a special linker section */
2527 static elf_linker_section_t *
2528 ppc_elf_create_linker_section (bfd *abfd,
2529 struct bfd_link_info *info,
2530 enum elf_linker_section_enum which)
2531 {
2532 bfd *dynobj = elf_hash_table (info)->dynobj;
2533 elf_linker_section_t *lsect;
2534
2535 /* Record the first bfd section that needs the special section. */
2536 if (!dynobj)
2537 dynobj = elf_hash_table (info)->dynobj = abfd;
2538
2539 /* If this is the first time, create the section. */
2540 lsect = elf_linker_section (dynobj, which);
2541 if (!lsect)
2542 {
2543 elf_linker_section_t defaults;
2544 static elf_linker_section_t zero_section;
2545
2546 defaults = zero_section;
2547 defaults.which = which;
2548 defaults.hole_written_p = FALSE;
2549 defaults.alignment = 2;
2550
2551 /* Both of these sections are (technically) created by the user
2552 putting data in them, so they shouldn't be marked
2553 SEC_LINKER_CREATED.
2554
2555 The linker creates them so it has somewhere to attach their
2556 respective symbols. In fact, if they were empty it would
2557 be OK to leave the symbol set to 0 (or any random number), because
2558 the appropriate register should never be used. */
2559 defaults.flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
2560 | SEC_IN_MEMORY);
2561
2562 switch (which)
2563 {
2564 default:
2565 (*_bfd_error_handler) (_("%s: unknown special linker type %d"),
2566 bfd_get_filename (abfd),
2567 (int) which);
2568
2569 bfd_set_error (bfd_error_bad_value);
2570 return NULL;
2571
2572 case LINKER_SECTION_SDATA: /* .sdata/.sbss section */
2573 defaults.name = ".sdata";
2574 defaults.rel_name = ".rela.sdata";
2575 defaults.bss_name = ".sbss";
2576 defaults.sym_name = "_SDA_BASE_";
2577 defaults.sym_offset = 32768;
2578 break;
2579
2580 case LINKER_SECTION_SDATA2: /* .sdata2/.sbss2 section */
2581 defaults.name = ".sdata2";
2582 defaults.rel_name = ".rela.sdata2";
2583 defaults.bss_name = ".sbss2";
2584 defaults.sym_name = "_SDA2_BASE_";
2585 defaults.sym_offset = 32768;
2586 defaults.flags |= SEC_READONLY;
2587 break;
2588 }
2589
2590 lsect = elf_create_linker_section (abfd, info, which, &defaults);
2591 }
2592
2593 return lsect;
2594 }
2595 \f
2596 /* If we have a non-zero sized .sbss2 or .PPC.EMB.sbss0 sections, we
2597 need to bump up the number of section headers. */
2598
2599 static int
2600 ppc_elf_additional_program_headers (bfd *abfd)
2601 {
2602 asection *s;
2603 int ret;
2604
2605 ret = 0;
2606
2607 s = bfd_get_section_by_name (abfd, ".interp");
2608 if (s != NULL)
2609 ++ret;
2610
2611 s = bfd_get_section_by_name (abfd, ".sbss2");
2612 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
2613 ++ret;
2614
2615 s = bfd_get_section_by_name (abfd, ".PPC.EMB.sbss0");
2616 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
2617 ++ret;
2618
2619 return ret;
2620 }
2621
2622 /* Modify the segment map if needed. */
2623
2624 static bfd_boolean
2625 ppc_elf_modify_segment_map (bfd *abfd ATTRIBUTE_UNUSED)
2626 {
2627 return TRUE;
2628 }
2629 \f
2630 /* The powerpc .got has a blrl instruction in it. Mark it executable. */
2631
2632 static bfd_boolean
2633 ppc_elf_create_got (bfd *abfd, struct bfd_link_info *info)
2634 {
2635 struct ppc_elf_link_hash_table *htab;
2636 asection *s;
2637 flagword flags;
2638
2639 if (!_bfd_elf_create_got_section (abfd, info))
2640 return FALSE;
2641
2642 htab = ppc_elf_hash_table (info);
2643 htab->got = s = bfd_get_section_by_name (abfd, ".got");
2644 if (s == NULL)
2645 abort ();
2646
2647 flags = (SEC_ALLOC | SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2648 | SEC_LINKER_CREATED);
2649 if (!bfd_set_section_flags (abfd, s, flags))
2650 return FALSE;
2651
2652 htab->relgot = bfd_make_section (abfd, ".rela.got");
2653 if (!htab->relgot
2654 || ! bfd_set_section_flags (abfd, htab->relgot,
2655 (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
2656 | SEC_IN_MEMORY | SEC_LINKER_CREATED
2657 | SEC_READONLY))
2658 || ! bfd_set_section_alignment (abfd, htab->relgot, 2))
2659 return FALSE;
2660
2661 return TRUE;
2662 }
2663
2664 /* We have to create .dynsbss and .rela.sbss here so that they get mapped
2665 to output sections (just like _bfd_elf_create_dynamic_sections has
2666 to create .dynbss and .rela.bss). */
2667
2668 static bfd_boolean
2669 ppc_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
2670 {
2671 struct ppc_elf_link_hash_table *htab;
2672 asection *s;
2673 flagword flags;
2674
2675 htab = ppc_elf_hash_table (info);
2676
2677 if (htab->got == NULL
2678 && !ppc_elf_create_got (abfd, info))
2679 return FALSE;
2680
2681 if (!_bfd_elf_create_dynamic_sections (abfd, info))
2682 return FALSE;
2683
2684 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2685 | SEC_LINKER_CREATED);
2686
2687 htab->dynbss = bfd_get_section_by_name (abfd, ".dynbss");
2688 htab->dynsbss = s = bfd_make_section (abfd, ".dynsbss");
2689 if (s == NULL
2690 || ! bfd_set_section_flags (abfd, s, SEC_ALLOC))
2691 return FALSE;
2692
2693 if (! info->shared)
2694 {
2695 htab->relbss = bfd_get_section_by_name (abfd, ".rela.bss");
2696 htab->relsbss = s = bfd_make_section (abfd, ".rela.sbss");
2697 if (s == NULL
2698 || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
2699 || ! bfd_set_section_alignment (abfd, s, 2))
2700 return FALSE;
2701 }
2702
2703 htab->relplt = bfd_get_section_by_name (abfd, ".rela.plt");
2704 htab->plt = s = bfd_get_section_by_name (abfd, ".plt");
2705 if (s == NULL)
2706 abort ();
2707
2708 flags = SEC_ALLOC | SEC_CODE | SEC_IN_MEMORY | SEC_LINKER_CREATED;
2709 return bfd_set_section_flags (abfd, s, flags);
2710 }
2711
2712 /* Adjust a symbol defined by a dynamic object and referenced by a
2713 regular object. The current definition is in some section of the
2714 dynamic object, but we're not including those sections. We have to
2715 change the definition to something the rest of the link can
2716 understand. */
2717
2718 static bfd_boolean
2719 ppc_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
2720 struct elf_link_hash_entry *h)
2721 {
2722 struct ppc_elf_link_hash_table *htab;
2723 asection *s;
2724 unsigned int power_of_two;
2725
2726 #ifdef DEBUG
2727 fprintf (stderr, "ppc_elf_adjust_dynamic_symbol called for %s\n",
2728 h->root.root.string);
2729 #endif
2730
2731 /* Make sure we know what is going on here. */
2732 htab = ppc_elf_hash_table (info);
2733 BFD_ASSERT (htab->elf.dynobj != NULL
2734 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
2735 || h->weakdef != NULL
2736 || ((h->elf_link_hash_flags
2737 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
2738 && (h->elf_link_hash_flags
2739 & ELF_LINK_HASH_REF_REGULAR) != 0
2740 && (h->elf_link_hash_flags
2741 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
2742
2743 /* Deal with function syms. */
2744 if (h->type == STT_FUNC
2745 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
2746 {
2747 /* Clear procedure linkage table information for any symbol that
2748 won't need a .plt entry. */
2749 if (h->plt.refcount <= 0
2750 || SYMBOL_CALLS_LOCAL (info, h)
2751 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2752 && h->root.type == bfd_link_hash_undefweak))
2753 {
2754 /* A PLT entry is not required/allowed when:
2755
2756 1. We are not using ld.so; because then the PLT entry
2757 can't be set up, so we can't use one. In this case,
2758 ppc_elf_adjust_dynamic_symbol won't even be called.
2759
2760 2. GC has rendered the entry unused.
2761
2762 3. We know for certain that a call to this symbol
2763 will go to this object, or will remain undefined. */
2764 h->plt.offset = (bfd_vma) -1;
2765 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
2766 }
2767 return TRUE;
2768 }
2769 else
2770 h->plt.offset = (bfd_vma) -1;
2771
2772 /* If this is a weak symbol, and there is a real definition, the
2773 processor independent code will have arranged for us to see the
2774 real definition first, and we can just use the same value. */
2775 if (h->weakdef != NULL)
2776 {
2777 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
2778 || h->weakdef->root.type == bfd_link_hash_defweak);
2779 h->root.u.def.section = h->weakdef->root.u.def.section;
2780 h->root.u.def.value = h->weakdef->root.u.def.value;
2781 if (ELIMINATE_COPY_RELOCS)
2782 h->elf_link_hash_flags
2783 = ((h->elf_link_hash_flags & ~ELF_LINK_NON_GOT_REF)
2784 | (h->weakdef->elf_link_hash_flags & ELF_LINK_NON_GOT_REF));
2785 return TRUE;
2786 }
2787
2788 /* This is a reference to a symbol defined by a dynamic object which
2789 is not a function. */
2790
2791 /* If we are creating a shared library, we must presume that the
2792 only references to the symbol are via the global offset table.
2793 For such cases we need not do anything here; the relocations will
2794 be handled correctly by relocate_section. */
2795 if (info->shared)
2796 return TRUE;
2797
2798 /* If there are no references to this symbol that do not use the
2799 GOT, we don't need to generate a copy reloc. */
2800 if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
2801 return TRUE;
2802
2803 if (ELIMINATE_COPY_RELOCS)
2804 {
2805 struct ppc_elf_dyn_relocs *p;
2806 for (p = ppc_elf_hash_entry (h)->dyn_relocs; p != NULL; p = p->next)
2807 {
2808 s = p->sec->output_section;
2809 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2810 break;
2811 }
2812
2813 /* If we didn't find any dynamic relocs in read-only sections, then
2814 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2815 if (p == NULL)
2816 {
2817 h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
2818 return TRUE;
2819 }
2820 }
2821
2822 /* We must allocate the symbol in our .dynbss section, which will
2823 become part of the .bss section of the executable. There will be
2824 an entry for this symbol in the .dynsym section. The dynamic
2825 object will contain position independent code, so all references
2826 from the dynamic object to this symbol will go through the global
2827 offset table. The dynamic linker will use the .dynsym entry to
2828 determine the address it must put in the global offset table, so
2829 both the dynamic object and the regular object will refer to the
2830 same memory location for the variable.
2831
2832 Of course, if the symbol is sufficiently small, we must instead
2833 allocate it in .sbss. FIXME: It would be better to do this if and
2834 only if there were actually SDAREL relocs for that symbol. */
2835
2836 if (h->size <= elf_gp_size (htab->elf.dynobj))
2837 s = htab->dynsbss;
2838 else
2839 s = htab->dynbss;
2840 BFD_ASSERT (s != NULL);
2841
2842 /* We must generate a R_PPC_COPY reloc to tell the dynamic linker to
2843 copy the initial value out of the dynamic object and into the
2844 runtime process image. We need to remember the offset into the
2845 .rela.bss section we are going to use. */
2846 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2847 {
2848 asection *srel;
2849
2850 if (h->size <= elf_gp_size (htab->elf.dynobj))
2851 srel = htab->relsbss;
2852 else
2853 srel = htab->relbss;
2854 BFD_ASSERT (srel != NULL);
2855 srel->_raw_size += sizeof (Elf32_External_Rela);
2856 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
2857 }
2858
2859 /* We need to figure out the alignment required for this symbol. I
2860 have no idea how ELF linkers handle this. */
2861 power_of_two = bfd_log2 (h->size);
2862 if (power_of_two > 4)
2863 power_of_two = 4;
2864
2865 /* Apply the required alignment. */
2866 s->_raw_size = BFD_ALIGN (s->_raw_size,
2867 (bfd_size_type) (1 << power_of_two));
2868 if (power_of_two > bfd_get_section_alignment (htab->elf.dynobj, s))
2869 {
2870 if (! bfd_set_section_alignment (htab->elf.dynobj, s, power_of_two))
2871 return FALSE;
2872 }
2873
2874 /* Define the symbol as being at this point in the section. */
2875 h->root.u.def.section = s;
2876 h->root.u.def.value = s->_raw_size;
2877
2878 /* Increment the section size to make room for the symbol. */
2879 s->_raw_size += h->size;
2880
2881 return TRUE;
2882 }
2883 \f
2884 /* This is the condition under which finish_dynamic_symbol will be
2885 called from elflink.h. If elflink.h doesn't call our
2886 finish_dynamic_symbol routine, we'll need to do something about
2887 initializing any .plt and .got entries in relocate_section. */
2888 #define WILL_CALL_FINISH_DYNAMIC_SYMBOL(DYN, SHARED, H) \
2889 ((DYN) \
2890 && ((SHARED) \
2891 || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0) \
2892 && ((H)->dynindx != -1 \
2893 || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0))
2894
2895 /* Of those relocs that might be copied as dynamic relocs, this macro
2896 selects those that must be copied when linking a shared library,
2897 even when the symbol is local. */
2898
2899 #define MUST_BE_DYN_RELOC(RTYPE) \
2900 ((RTYPE) != R_PPC_REL24 \
2901 && (RTYPE) != R_PPC_REL14 \
2902 && (RTYPE) != R_PPC_REL14_BRTAKEN \
2903 && (RTYPE) != R_PPC_REL14_BRNTAKEN \
2904 && (RTYPE) != R_PPC_REL32)
2905
2906 /* Allocate space in associated reloc sections for dynamic relocs. */
2907
2908 static bfd_boolean
2909 allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
2910 {
2911 struct bfd_link_info *info = inf;
2912 struct ppc_elf_link_hash_entry *eh;
2913 struct ppc_elf_link_hash_table *htab;
2914 struct ppc_elf_dyn_relocs *p;
2915
2916 if (h->root.type == bfd_link_hash_indirect)
2917 return TRUE;
2918
2919 if (h->root.type == bfd_link_hash_warning)
2920 /* When warning symbols are created, they **replace** the "real"
2921 entry in the hash table, thus we never get to see the real
2922 symbol in a hash traversal. So look at it now. */
2923 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2924
2925 htab = ppc_elf_hash_table (info);
2926 if (htab->elf.dynamic_sections_created
2927 && h->plt.refcount > 0)
2928 {
2929 /* Make sure this symbol is output as a dynamic symbol. */
2930 if (h->dynindx == -1
2931 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
2932 {
2933 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
2934 return FALSE;
2935 }
2936
2937 if (info->shared
2938 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
2939 {
2940 asection *s = htab->plt;
2941
2942 /* If this is the first .plt entry, make room for the special
2943 first entry. */
2944 if (s->_raw_size == 0)
2945 s->_raw_size += PLT_INITIAL_ENTRY_SIZE;
2946
2947 /* The PowerPC PLT is actually composed of two parts, the
2948 first part is 2 words (for a load and a jump), and then
2949 there is a remaining word available at the end. */
2950 h->plt.offset = (PLT_INITIAL_ENTRY_SIZE
2951 + (PLT_SLOT_SIZE
2952 * ((s->_raw_size - PLT_INITIAL_ENTRY_SIZE)
2953 / PLT_ENTRY_SIZE)));
2954
2955 /* If this symbol is not defined in a regular file, and we
2956 are not generating a shared library, then set the symbol
2957 to this location in the .plt. This is required to make
2958 function pointers compare as equal between the normal
2959 executable and the shared library. */
2960 if (! info->shared
2961 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
2962 {
2963 h->root.u.def.section = s;
2964 h->root.u.def.value = h->plt.offset;
2965 }
2966
2967 /* Make room for this entry. After the 8192nd entry, room
2968 for two entries is allocated. */
2969 s->_raw_size += PLT_ENTRY_SIZE;
2970 if ((s->_raw_size - PLT_INITIAL_ENTRY_SIZE) / PLT_ENTRY_SIZE
2971 > PLT_NUM_SINGLE_ENTRIES)
2972 s->_raw_size += PLT_ENTRY_SIZE;
2973
2974 /* We also need to make an entry in the .rela.plt section. */
2975 htab->relplt->_raw_size += sizeof (Elf32_External_Rela);
2976 }
2977 else
2978 {
2979 h->plt.offset = (bfd_vma) -1;
2980 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
2981 }
2982 }
2983 else
2984 {
2985 h->plt.offset = (bfd_vma) -1;
2986 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
2987 }
2988
2989 eh = (struct ppc_elf_link_hash_entry *) h;
2990 if (eh->elf.got.refcount > 0)
2991 {
2992 /* Make sure this symbol is output as a dynamic symbol. */
2993 if (eh->elf.dynindx == -1
2994 && (eh->elf.elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
2995 {
2996 if (!bfd_elf32_link_record_dynamic_symbol (info, &eh->elf))
2997 return FALSE;
2998 }
2999
3000 if (eh->tls_mask == (TLS_TLS | TLS_LD)
3001 && !(eh->elf.elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC))
3002 /* If just an LD reloc, we'll just use htab->tlsld_got.offset. */
3003 eh->elf.got.offset = (bfd_vma) -1;
3004 else
3005 {
3006 bfd_boolean dyn;
3007 eh->elf.got.offset = htab->got->_raw_size;
3008 if ((eh->tls_mask & TLS_TLS) != 0)
3009 {
3010 if ((eh->tls_mask & TLS_LD) != 0)
3011 htab->got->_raw_size += 8;
3012 if ((eh->tls_mask & TLS_GD) != 0)
3013 htab->got->_raw_size += 8;
3014 if ((eh->tls_mask & (TLS_TPREL | TLS_TPRELGD)) != 0)
3015 htab->got->_raw_size += 4;
3016 if ((eh->tls_mask & TLS_DTPREL) != 0)
3017 htab->got->_raw_size += 4;
3018 }
3019 else
3020 htab->got->_raw_size += 4;
3021 dyn = htab->elf.dynamic_sections_created;
3022 if ((info->shared
3023 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, &eh->elf))
3024 && (ELF_ST_VISIBILITY (eh->elf.other) == STV_DEFAULT
3025 || eh->elf.root.type != bfd_link_hash_undefweak))
3026 {
3027 /* All the entries we allocated need relocs. */
3028 htab->relgot->_raw_size
3029 += ((htab->got->_raw_size - eh->elf.got.offset) / 4
3030 * sizeof (Elf32_External_Rela));
3031 /* Except LD only needs one. */
3032 if ((eh->tls_mask & TLS_LD) != 0)
3033 htab->relgot->_raw_size -= sizeof (Elf32_External_Rela);
3034 }
3035 }
3036 }
3037 else
3038 eh->elf.got.offset = (bfd_vma) -1;
3039
3040 if (eh->dyn_relocs == NULL)
3041 return TRUE;
3042
3043 /* In the shared -Bsymbolic case, discard space allocated for
3044 dynamic pc-relative relocs against symbols which turn out to be
3045 defined in regular objects. For the normal shared case, discard
3046 space for relocs that have become local due to symbol visibility
3047 changes. */
3048
3049 if (info->shared)
3050 {
3051 /* Relocs that use pc_count are those that appear on a call insn,
3052 or certain REL relocs (see MUST_BE_DYN_RELOC) that can be
3053 generated via assembly. We want calls to protected symbols to
3054 resolve directly to the function rather than going via the plt.
3055 If people want function pointer comparisons to work as expected
3056 then they should avoid writing weird assembly. */
3057 if (SYMBOL_CALLS_LOCAL (info, h))
3058 {
3059 struct ppc_elf_dyn_relocs **pp;
3060
3061 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
3062 {
3063 p->count -= p->pc_count;
3064 p->pc_count = 0;
3065 if (p->count == 0)
3066 *pp = p->next;
3067 else
3068 pp = &p->next;
3069 }
3070 }
3071
3072 /* Also discard relocs on undefined weak syms with non-default
3073 visibility. */
3074 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
3075 && h->root.type == bfd_link_hash_undefweak)
3076 eh->dyn_relocs = NULL;
3077 }
3078 else if (ELIMINATE_COPY_RELOCS)
3079 {
3080 /* For the non-shared case, discard space for relocs against
3081 symbols which turn out to need copy relocs or are not
3082 dynamic. */
3083
3084 if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
3085 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
3086 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
3087 {
3088 /* Make sure this symbol is output as a dynamic symbol.
3089 Undefined weak syms won't yet be marked as dynamic. */
3090 if (h->dynindx == -1
3091 && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
3092 {
3093 if (! bfd_elf64_link_record_dynamic_symbol (info, h))
3094 return FALSE;
3095 }
3096
3097 /* If that succeeded, we know we'll be keeping all the
3098 relocs. */
3099 if (h->dynindx != -1)
3100 goto keep;
3101 }
3102
3103 eh->dyn_relocs = NULL;
3104
3105 keep: ;
3106 }
3107
3108 /* Finally, allocate space. */
3109 for (p = eh->dyn_relocs; p != NULL; p = p->next)
3110 {
3111 asection *sreloc = elf_section_data (p->sec)->sreloc;
3112 sreloc->_raw_size += p->count * sizeof (Elf32_External_Rela);
3113 }
3114
3115 return TRUE;
3116 }
3117
3118 /* Find any dynamic relocs that apply to read-only sections. */
3119
3120 static bfd_boolean
3121 readonly_dynrelocs (struct elf_link_hash_entry *h, void *info)
3122 {
3123 struct ppc_elf_dyn_relocs *p;
3124
3125 if (h->root.type == bfd_link_hash_indirect)
3126 return TRUE;
3127
3128 if (h->root.type == bfd_link_hash_warning)
3129 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3130
3131 for (p = ppc_elf_hash_entry (h)->dyn_relocs; p != NULL; p = p->next)
3132 {
3133 asection *s = p->sec->output_section;
3134
3135 if (s != NULL
3136 && ((s->flags & (SEC_READONLY | SEC_ALLOC))
3137 == (SEC_READONLY | SEC_ALLOC)))
3138 {
3139 ((struct bfd_link_info *) info)->flags |= DF_TEXTREL;
3140
3141 /* Not an error, just cut short the traversal. */
3142 return FALSE;
3143 }
3144 }
3145 return TRUE;
3146 }
3147
3148 /* Set the sizes of the dynamic sections. */
3149
3150 static bfd_boolean
3151 ppc_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
3152 struct bfd_link_info *info)
3153 {
3154 struct ppc_elf_link_hash_table *htab;
3155 asection *s;
3156 bfd_boolean relocs;
3157 bfd *ibfd;
3158
3159 #ifdef DEBUG
3160 fprintf (stderr, "ppc_elf_size_dynamic_sections called\n");
3161 #endif
3162
3163 htab = ppc_elf_hash_table (info);
3164 BFD_ASSERT (htab->elf.dynobj != NULL);
3165
3166 if (elf_hash_table (info)->dynamic_sections_created)
3167 {
3168 /* Set the contents of the .interp section to the interpreter. */
3169 if (info->executable)
3170 {
3171 s = bfd_get_section_by_name (htab->elf.dynobj, ".interp");
3172 BFD_ASSERT (s != NULL);
3173 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
3174 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
3175 }
3176 }
3177
3178 if (htab->tlsld_got.refcount > 0)
3179 {
3180 htab->tlsld_got.offset = htab->got->_raw_size;
3181 htab->got->_raw_size += 8;
3182 if (info->shared)
3183 htab->relgot->_raw_size += sizeof (Elf32_External_Rela);
3184 }
3185 else
3186 htab->tlsld_got.offset = (bfd_vma) -1;
3187
3188 /* Set up .got offsets for local syms, and space for local dynamic
3189 relocs. */
3190 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
3191 {
3192 bfd_signed_vma *local_got;
3193 bfd_signed_vma *end_local_got;
3194 char *lgot_masks;
3195 bfd_size_type locsymcount;
3196 Elf_Internal_Shdr *symtab_hdr;
3197 asection *srel;
3198
3199 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
3200 continue;
3201
3202 for (s = ibfd->sections; s != NULL; s = s->next)
3203 {
3204 struct ppc_elf_dyn_relocs *p;
3205
3206 for (p = ((struct ppc_elf_dyn_relocs *)
3207 elf_section_data (s)->local_dynrel);
3208 p != NULL;
3209 p = p->next)
3210 {
3211 if (!bfd_is_abs_section (p->sec)
3212 && bfd_is_abs_section (p->sec->output_section))
3213 {
3214 /* Input section has been discarded, either because
3215 it is a copy of a linkonce section or due to
3216 linker script /DISCARD/, so we'll be discarding
3217 the relocs too. */
3218 }
3219 else if (p->count != 0)
3220 {
3221 elf_section_data (p->sec)->sreloc->_raw_size
3222 += p->count * sizeof (Elf32_External_Rela);
3223 if ((p->sec->output_section->flags
3224 & (SEC_READONLY | SEC_ALLOC))
3225 == (SEC_READONLY | SEC_ALLOC))
3226 info->flags |= DF_TEXTREL;
3227 }
3228 }
3229 }
3230
3231 local_got = elf_local_got_refcounts (ibfd);
3232 if (!local_got)
3233 continue;
3234
3235 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
3236 locsymcount = symtab_hdr->sh_info;
3237 end_local_got = local_got + locsymcount;
3238 lgot_masks = (char *) end_local_got;
3239 s = htab->got;
3240 srel = htab->relgot;
3241 for (; local_got < end_local_got; ++local_got, ++lgot_masks)
3242 if (*local_got > 0)
3243 {
3244 if (*lgot_masks == (TLS_TLS | TLS_LD))
3245 {
3246 /* If just an LD reloc, we'll just use
3247 htab->tlsld_got.offset. */
3248 if (htab->tlsld_got.offset == (bfd_vma) -1)
3249 {
3250 htab->tlsld_got.offset = s->_raw_size;
3251 s->_raw_size += 8;
3252 if (info->shared)
3253 srel->_raw_size += sizeof (Elf32_External_Rela);
3254 }
3255 *local_got = (bfd_vma) -1;
3256 }
3257 else
3258 {
3259 *local_got = s->_raw_size;
3260 if ((*lgot_masks & TLS_TLS) != 0)
3261 {
3262 if ((*lgot_masks & TLS_GD) != 0)
3263 s->_raw_size += 8;
3264 if ((*lgot_masks & (TLS_TPREL | TLS_TPRELGD)) != 0)
3265 s->_raw_size += 4;
3266 if ((*lgot_masks & TLS_DTPREL) != 0)
3267 s->_raw_size += 4;
3268 }
3269 else
3270 s->_raw_size += 4;
3271 if (info->shared)
3272 srel->_raw_size += ((s->_raw_size - *local_got) / 4
3273 * sizeof (Elf32_External_Rela));
3274 }
3275 }
3276 else
3277 *local_got = (bfd_vma) -1;
3278 }
3279
3280 /* Allocate space for global sym dynamic relocs. */
3281 elf_link_hash_traverse (elf_hash_table (info), allocate_dynrelocs, info);
3282
3283 /* We've now determined the sizes of the various dynamic sections.
3284 Allocate memory for them. */
3285 relocs = FALSE;
3286 for (s = htab->elf.dynobj->sections; s != NULL; s = s->next)
3287 {
3288 if ((s->flags & SEC_LINKER_CREATED) == 0)
3289 continue;
3290
3291 if (s == htab->plt
3292 || s == htab->got
3293 || (htab->sdata != NULL && s == htab->sdata->section)
3294 || (htab->sdata2 != NULL && s == htab->sdata2->section))
3295 {
3296 /* Strip this section if we don't need it; see the
3297 comment below. */
3298 }
3299 else if (strncmp (bfd_get_section_name (dynobj, s), ".rela", 5) == 0)
3300 {
3301 if (s->_raw_size == 0)
3302 {
3303 /* If we don't need this section, strip it from the
3304 output file. This is mostly to handle .rela.bss and
3305 .rela.plt. We must create both sections in
3306 create_dynamic_sections, because they must be created
3307 before the linker maps input sections to output
3308 sections. The linker does that before
3309 adjust_dynamic_symbol is called, and it is that
3310 function which decides whether anything needs to go
3311 into these sections. */
3312 }
3313 else
3314 {
3315 /* Remember whether there are any relocation sections. */
3316 relocs = TRUE;
3317
3318 /* We use the reloc_count field as a counter if we need
3319 to copy relocs into the output file. */
3320 s->reloc_count = 0;
3321 }
3322 }
3323 else
3324 {
3325 /* It's not one of our sections, so don't allocate space. */
3326 continue;
3327 }
3328
3329 if (s->_raw_size == 0)
3330 {
3331 _bfd_strip_section_from_output (info, s);
3332 continue;
3333 }
3334
3335 /* Allocate memory for the section contents. */
3336 s->contents = bfd_zalloc (htab->elf.dynobj, s->_raw_size);
3337 if (s->contents == NULL)
3338 return FALSE;
3339 }
3340
3341 if (htab->elf.dynamic_sections_created)
3342 {
3343 /* Add some entries to the .dynamic section. We fill in the
3344 values later, in ppc_elf_finish_dynamic_sections, but we
3345 must add the entries now so that we get the correct size for
3346 the .dynamic section. The DT_DEBUG entry is filled in by the
3347 dynamic linker and used by the debugger. */
3348 #define add_dynamic_entry(TAG, VAL) \
3349 bfd_elf32_add_dynamic_entry (info, (TAG), (VAL))
3350
3351 if (info->executable)
3352 {
3353 if (!add_dynamic_entry (DT_DEBUG, 0))
3354 return FALSE;
3355 }
3356
3357 if (htab->plt != NULL && htab->plt->_raw_size != 0)
3358 {
3359 if (!add_dynamic_entry (DT_PLTGOT, 0)
3360 || !add_dynamic_entry (DT_PLTRELSZ, 0)
3361 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3362 || !add_dynamic_entry (DT_JMPREL, 0))
3363 return FALSE;
3364 }
3365
3366 if (relocs)
3367 {
3368 if (!add_dynamic_entry (DT_RELA, 0)
3369 || !add_dynamic_entry (DT_RELASZ, 0)
3370 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
3371 return FALSE;
3372 }
3373
3374 /* If any dynamic relocs apply to a read-only section, then we
3375 need a DT_TEXTREL entry. */
3376 if ((info->flags & DF_TEXTREL) == 0)
3377 elf_link_hash_traverse (elf_hash_table (info), readonly_dynrelocs,
3378 info);
3379
3380 if ((info->flags & DF_TEXTREL) != 0)
3381 {
3382 if (!add_dynamic_entry (DT_TEXTREL, 0))
3383 return FALSE;
3384 }
3385 }
3386 #undef add_dynamic_entry
3387
3388 return TRUE;
3389 }
3390 \f
3391 static bfd_boolean
3392 update_local_sym_info (bfd *abfd,
3393 Elf_Internal_Shdr *symtab_hdr,
3394 unsigned long r_symndx,
3395 int tls_type)
3396 {
3397 bfd_signed_vma *local_got_refcounts = elf_local_got_refcounts (abfd);
3398 char *local_got_tls_masks;
3399
3400 if (local_got_refcounts == NULL)
3401 {
3402 bfd_size_type size = symtab_hdr->sh_info;
3403
3404 size *= sizeof (*local_got_refcounts) + sizeof (*local_got_tls_masks);
3405 local_got_refcounts = bfd_zalloc (abfd, size);
3406 if (local_got_refcounts == NULL)
3407 return FALSE;
3408 elf_local_got_refcounts (abfd) = local_got_refcounts;
3409 }
3410
3411 local_got_refcounts[r_symndx] += 1;
3412 local_got_tls_masks = (char *) (local_got_refcounts + symtab_hdr->sh_info);
3413 local_got_tls_masks[r_symndx] |= tls_type;
3414 return TRUE;
3415 }
3416
3417 static void
3418 bad_shared_reloc (bfd *abfd, enum elf_ppc_reloc_type r_type)
3419 {
3420 (*_bfd_error_handler)
3421 (_("%s: relocation %s cannot be used when making a shared object"),
3422 bfd_archive_filename (abfd),
3423 ppc_elf_howto_table[r_type]->name);
3424 bfd_set_error (bfd_error_bad_value);
3425 }
3426
3427 /* Look through the relocs for a section during the first phase, and
3428 allocate space in the global offset table or procedure linkage
3429 table. */
3430
3431 static bfd_boolean
3432 ppc_elf_check_relocs (bfd *abfd,
3433 struct bfd_link_info *info,
3434 asection *sec,
3435 const Elf_Internal_Rela *relocs)
3436 {
3437 struct ppc_elf_link_hash_table *htab;
3438 Elf_Internal_Shdr *symtab_hdr;
3439 struct elf_link_hash_entry **sym_hashes;
3440 const Elf_Internal_Rela *rel;
3441 const Elf_Internal_Rela *rel_end;
3442 asection *sreloc;
3443
3444 if (info->relocatable)
3445 return TRUE;
3446
3447 #ifdef DEBUG
3448 fprintf (stderr, "ppc_elf_check_relocs called for section %s in %s\n",
3449 bfd_get_section_name (abfd, sec),
3450 bfd_archive_filename (abfd));
3451 #endif
3452
3453 /* Initialize howto table if not already done. */
3454 if (!ppc_elf_howto_table[R_PPC_ADDR32])
3455 ppc_elf_howto_init ();
3456
3457 /* Create the linker generated sections all the time so that the
3458 special symbols are created. */
3459 htab = ppc_elf_hash_table (info);
3460 if (htab->sdata == NULL)
3461 {
3462 htab->sdata = elf_linker_section (abfd, LINKER_SECTION_SDATA);
3463 if (htab->sdata == NULL)
3464 htab->sdata = ppc_elf_create_linker_section (abfd, info,
3465 LINKER_SECTION_SDATA);
3466 if (htab->sdata == NULL)
3467 return FALSE;
3468 }
3469
3470 if (htab->sdata2 == NULL)
3471 {
3472 htab->sdata2 = elf_linker_section (abfd, LINKER_SECTION_SDATA2);
3473 if (htab->sdata2 == NULL)
3474 htab->sdata2 = ppc_elf_create_linker_section (abfd, info,
3475 LINKER_SECTION_SDATA2);
3476 if (htab->sdata2 == NULL)
3477 return FALSE;
3478 }
3479
3480 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3481 sym_hashes = elf_sym_hashes (abfd);
3482 sreloc = NULL;
3483
3484 rel_end = relocs + sec->reloc_count;
3485 for (rel = relocs; rel < rel_end; rel++)
3486 {
3487 unsigned long r_symndx;
3488 enum elf_ppc_reloc_type r_type;
3489 struct elf_link_hash_entry *h;
3490 int tls_type = 0;
3491
3492 r_symndx = ELF32_R_SYM (rel->r_info);
3493 if (r_symndx < symtab_hdr->sh_info)
3494 h = NULL;
3495 else
3496 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3497
3498 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
3499 This shows up in particular in an R_PPC_ADDR32 in the eabi
3500 startup code. */
3501 if (h && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3502 {
3503 if (htab->got == NULL)
3504 {
3505 if (htab->elf.dynobj == NULL)
3506 htab->elf.dynobj = abfd;
3507 if (!ppc_elf_create_got (htab->elf.dynobj, info))
3508 return FALSE;
3509 }
3510 }
3511
3512 r_type = ELF32_R_TYPE (rel->r_info);
3513 switch (r_type)
3514 {
3515 case R_PPC_GOT_TLSLD16:
3516 case R_PPC_GOT_TLSLD16_LO:
3517 case R_PPC_GOT_TLSLD16_HI:
3518 case R_PPC_GOT_TLSLD16_HA:
3519 htab->tlsld_got.refcount += 1;
3520 tls_type = TLS_TLS | TLS_LD;
3521 goto dogottls;
3522
3523 case R_PPC_GOT_TLSGD16:
3524 case R_PPC_GOT_TLSGD16_LO:
3525 case R_PPC_GOT_TLSGD16_HI:
3526 case R_PPC_GOT_TLSGD16_HA:
3527 tls_type = TLS_TLS | TLS_GD;
3528 goto dogottls;
3529
3530 case R_PPC_GOT_TPREL16:
3531 case R_PPC_GOT_TPREL16_LO:
3532 case R_PPC_GOT_TPREL16_HI:
3533 case R_PPC_GOT_TPREL16_HA:
3534 if (info->shared)
3535 info->flags |= DF_STATIC_TLS;
3536 tls_type = TLS_TLS | TLS_TPREL;
3537 goto dogottls;
3538
3539 case R_PPC_GOT_DTPREL16:
3540 case R_PPC_GOT_DTPREL16_LO:
3541 case R_PPC_GOT_DTPREL16_HI:
3542 case R_PPC_GOT_DTPREL16_HA:
3543 tls_type = TLS_TLS | TLS_DTPREL;
3544 dogottls:
3545 sec->has_tls_reloc = 1;
3546 /* Fall thru */
3547
3548 /* GOT16 relocations */
3549 case R_PPC_GOT16:
3550 case R_PPC_GOT16_LO:
3551 case R_PPC_GOT16_HI:
3552 case R_PPC_GOT16_HA:
3553 /* This symbol requires a global offset table entry. */
3554 if (htab->got == NULL)
3555 {
3556 if (htab->elf.dynobj == NULL)
3557 htab->elf.dynobj = abfd;
3558 if (!ppc_elf_create_got (htab->elf.dynobj, info))
3559 return FALSE;
3560 }
3561 if (h != NULL)
3562 {
3563 h->got.refcount += 1;
3564 ppc_elf_hash_entry (h)->tls_mask |= tls_type;
3565 }
3566 else
3567 /* This is a global offset table entry for a local symbol. */
3568 if (!update_local_sym_info (abfd, symtab_hdr, r_symndx, tls_type))
3569 return FALSE;
3570 break;
3571
3572 /* Indirect .sdata relocation. */
3573 case R_PPC_EMB_SDAI16:
3574 if (info->shared)
3575 {
3576 bad_shared_reloc (abfd, r_type);
3577 return FALSE;
3578 }
3579 if (!elf_create_pointer_linker_section (abfd, info,
3580 htab->sdata, h, rel))
3581 return FALSE;
3582 break;
3583
3584 /* Indirect .sdata2 relocation. */
3585 case R_PPC_EMB_SDA2I16:
3586 if (info->shared)
3587 {
3588 bad_shared_reloc (abfd, r_type);
3589 return FALSE;
3590 }
3591 if (!elf_create_pointer_linker_section (abfd, info,
3592 htab->sdata2, h, rel))
3593 return FALSE;
3594 break;
3595
3596 case R_PPC_SDAREL16:
3597 case R_PPC_EMB_SDA2REL:
3598 case R_PPC_EMB_SDA21:
3599 case R_PPC_EMB_RELSDA:
3600 case R_PPC_EMB_NADDR32:
3601 case R_PPC_EMB_NADDR16:
3602 case R_PPC_EMB_NADDR16_LO:
3603 case R_PPC_EMB_NADDR16_HI:
3604 case R_PPC_EMB_NADDR16_HA:
3605 if (info->shared)
3606 {
3607 bad_shared_reloc (abfd, r_type);
3608 return FALSE;
3609 }
3610 break;
3611
3612 case R_PPC_PLT32:
3613 case R_PPC_PLTREL24:
3614 case R_PPC_PLTREL32:
3615 case R_PPC_PLT16_LO:
3616 case R_PPC_PLT16_HI:
3617 case R_PPC_PLT16_HA:
3618 #ifdef DEBUG
3619 fprintf (stderr, "Reloc requires a PLT entry\n");
3620 #endif
3621 /* This symbol requires a procedure linkage table entry. We
3622 actually build the entry in finish_dynamic_symbol,
3623 because this might be a case of linking PIC code without
3624 linking in any dynamic objects, in which case we don't
3625 need to generate a procedure linkage table after all. */
3626
3627 if (h == NULL)
3628 {
3629 /* It does not make sense to have a procedure linkage
3630 table entry for a local symbol. */
3631 (*_bfd_error_handler) (_("%s(%s+0x%lx): %s reloc against "
3632 "local symbol"),
3633 bfd_archive_filename (abfd),
3634 sec->name,
3635 (long) rel->r_offset,
3636 ppc_elf_howto_table[r_type]->name);
3637 bfd_set_error (bfd_error_bad_value);
3638 return FALSE;
3639 }
3640
3641 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
3642 h->plt.refcount++;
3643 break;
3644
3645 /* The following relocations don't need to propagate the
3646 relocation if linking a shared object since they are
3647 section relative. */
3648 case R_PPC_SECTOFF:
3649 case R_PPC_SECTOFF_LO:
3650 case R_PPC_SECTOFF_HI:
3651 case R_PPC_SECTOFF_HA:
3652 case R_PPC_DTPREL16:
3653 case R_PPC_DTPREL16_LO:
3654 case R_PPC_DTPREL16_HI:
3655 case R_PPC_DTPREL16_HA:
3656 case R_PPC_TOC16:
3657 break;
3658
3659 /* This are just markers. */
3660 case R_PPC_TLS:
3661 case R_PPC_EMB_MRKREF:
3662 case R_PPC_NONE:
3663 case R_PPC_max:
3664 break;
3665
3666 /* These should only appear in dynamic objects. */
3667 case R_PPC_COPY:
3668 case R_PPC_GLOB_DAT:
3669 case R_PPC_JMP_SLOT:
3670 case R_PPC_RELATIVE:
3671 break;
3672
3673 /* These aren't handled yet. We'll report an error later. */
3674 case R_PPC_ADDR30:
3675 case R_PPC_EMB_RELSEC16:
3676 case R_PPC_EMB_RELST_LO:
3677 case R_PPC_EMB_RELST_HI:
3678 case R_PPC_EMB_RELST_HA:
3679 case R_PPC_EMB_BIT_FLD:
3680 break;
3681
3682 /* This refers only to functions defined in the shared library. */
3683 case R_PPC_LOCAL24PC:
3684 break;
3685
3686 /* This relocation describes the C++ object vtable hierarchy.
3687 Reconstruct it for later use during GC. */
3688 case R_PPC_GNU_VTINHERIT:
3689 if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
3690 return FALSE;
3691 break;
3692
3693 /* This relocation describes which C++ vtable entries are actually
3694 used. Record for later use during GC. */
3695 case R_PPC_GNU_VTENTRY:
3696 if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
3697 return FALSE;
3698 break;
3699
3700 /* We shouldn't really be seeing these. */
3701 case R_PPC_TPREL32:
3702 if (info->shared)
3703 info->flags |= DF_STATIC_TLS;
3704 goto dodyn;
3705
3706 /* Nor these. */
3707 case R_PPC_DTPMOD32:
3708 case R_PPC_DTPREL32:
3709 goto dodyn;
3710
3711 case R_PPC_TPREL16:
3712 case R_PPC_TPREL16_LO:
3713 case R_PPC_TPREL16_HI:
3714 case R_PPC_TPREL16_HA:
3715 if (info->shared)
3716 info->flags |= DF_STATIC_TLS;
3717 goto dodyn;
3718
3719 /* When creating a shared object, we must copy these
3720 relocs into the output file. We create a reloc
3721 section in dynobj and make room for the reloc. */
3722 case R_PPC_REL24:
3723 case R_PPC_REL14:
3724 case R_PPC_REL14_BRTAKEN:
3725 case R_PPC_REL14_BRNTAKEN:
3726 case R_PPC_REL32:
3727 if (h == NULL
3728 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3729 break;
3730 /* fall through */
3731
3732 case R_PPC_ADDR32:
3733 case R_PPC_ADDR24:
3734 case R_PPC_ADDR16:
3735 case R_PPC_ADDR16_LO:
3736 case R_PPC_ADDR16_HI:
3737 case R_PPC_ADDR16_HA:
3738 case R_PPC_ADDR14:
3739 case R_PPC_ADDR14_BRTAKEN:
3740 case R_PPC_ADDR14_BRNTAKEN:
3741 case R_PPC_UADDR32:
3742 case R_PPC_UADDR16:
3743 if (h != NULL && !info->shared)
3744 {
3745 /* We may need a plt entry if the symbol turns out to be
3746 a function defined in a dynamic object. */
3747 h->plt.refcount++;
3748
3749 /* We may need a copy reloc too. */
3750 h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
3751 }
3752
3753 dodyn:
3754 /* If we are creating a shared library, and this is a reloc
3755 against a global symbol, or a non PC relative reloc
3756 against a local symbol, then we need to copy the reloc
3757 into the shared library. However, if we are linking with
3758 -Bsymbolic, we do not need to copy a reloc against a
3759 global symbol which is defined in an object we are
3760 including in the link (i.e., DEF_REGULAR is set). At
3761 this point we have not seen all the input files, so it is
3762 possible that DEF_REGULAR is not set now but will be set
3763 later (it is never cleared). In case of a weak definition,
3764 DEF_REGULAR may be cleared later by a strong definition in
3765 a shared library. We account for that possibility below by
3766 storing information in the dyn_relocs field of the hash
3767 table entry. A similar situation occurs when creating
3768 shared libraries and symbol visibility changes render the
3769 symbol local.
3770
3771 If on the other hand, we are creating an executable, we
3772 may need to keep relocations for symbols satisfied by a
3773 dynamic library if we manage to avoid copy relocs for the
3774 symbol. */
3775 if ((info->shared
3776 && (MUST_BE_DYN_RELOC (r_type)
3777 || (h != NULL
3778 && (! info->symbolic
3779 || h->root.type == bfd_link_hash_defweak
3780 || (h->elf_link_hash_flags
3781 & ELF_LINK_HASH_DEF_REGULAR) == 0))))
3782 || (ELIMINATE_COPY_RELOCS
3783 && !info->shared
3784 && (sec->flags & SEC_ALLOC) != 0
3785 && h != NULL
3786 && (h->root.type == bfd_link_hash_defweak
3787 || (h->elf_link_hash_flags
3788 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
3789 {
3790 struct ppc_elf_dyn_relocs *p;
3791 struct ppc_elf_dyn_relocs **head;
3792
3793 #ifdef DEBUG
3794 fprintf (stderr,
3795 "ppc_elf_check_relocs needs to "
3796 "create relocation for %s\n",
3797 (h && h->root.root.string
3798 ? h->root.root.string : "<unknown>"));
3799 #endif
3800 if (sreloc == NULL)
3801 {
3802 const char *name;
3803
3804 name = (bfd_elf_string_from_elf_section
3805 (abfd,
3806 elf_elfheader (abfd)->e_shstrndx,
3807 elf_section_data (sec)->rel_hdr.sh_name));
3808 if (name == NULL)
3809 return FALSE;
3810
3811 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
3812 && strcmp (bfd_get_section_name (abfd, sec),
3813 name + 5) == 0);
3814
3815 sreloc = bfd_get_section_by_name (htab->elf.dynobj, name);
3816 if (sreloc == NULL)
3817 {
3818 flagword flags;
3819
3820 sreloc = bfd_make_section (htab->elf.dynobj, name);
3821 flags = (SEC_HAS_CONTENTS | SEC_READONLY
3822 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3823 if ((sec->flags & SEC_ALLOC) != 0)
3824 flags |= SEC_ALLOC | SEC_LOAD;
3825 if (sreloc == NULL
3826 || ! bfd_set_section_flags (htab->elf.dynobj,
3827 sreloc, flags)
3828 || ! bfd_set_section_alignment (htab->elf.dynobj,
3829 sreloc, 2))
3830 return FALSE;
3831 }
3832 elf_section_data (sec)->sreloc = sreloc;
3833 }
3834
3835 /* If this is a global symbol, we count the number of
3836 relocations we need for this symbol. */
3837 if (h != NULL)
3838 {
3839 head = &ppc_elf_hash_entry (h)->dyn_relocs;
3840 }
3841 else
3842 {
3843 /* Track dynamic relocs needed for local syms too.
3844 We really need local syms available to do this
3845 easily. Oh well. */
3846
3847 asection *s;
3848 s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
3849 sec, r_symndx);
3850 if (s == NULL)
3851 return FALSE;
3852
3853 head = ((struct ppc_elf_dyn_relocs **)
3854 &elf_section_data (s)->local_dynrel);
3855 }
3856
3857 p = *head;
3858 if (p == NULL || p->sec != sec)
3859 {
3860 p = bfd_alloc (htab->elf.dynobj, sizeof *p);
3861 if (p == NULL)
3862 return FALSE;
3863 p->next = *head;
3864 *head = p;
3865 p->sec = sec;
3866 p->count = 0;
3867 p->pc_count = 0;
3868 }
3869
3870 p->count += 1;
3871 if (!MUST_BE_DYN_RELOC (r_type))
3872 p->pc_count += 1;
3873 }
3874
3875 break;
3876 }
3877 }
3878
3879 return TRUE;
3880 }
3881
3882 /* Return the section that should be marked against GC for a given
3883 relocation. */
3884
3885 static asection *
3886 ppc_elf_gc_mark_hook (asection *sec,
3887 struct bfd_link_info *info ATTRIBUTE_UNUSED,
3888 Elf_Internal_Rela *rel,
3889 struct elf_link_hash_entry *h,
3890 Elf_Internal_Sym *sym)
3891 {
3892 if (h != NULL)
3893 {
3894 switch (ELF32_R_TYPE (rel->r_info))
3895 {
3896 case R_PPC_GNU_VTINHERIT:
3897 case R_PPC_GNU_VTENTRY:
3898 break;
3899
3900 default:
3901 switch (h->root.type)
3902 {
3903 case bfd_link_hash_defined:
3904 case bfd_link_hash_defweak:
3905 return h->root.u.def.section;
3906
3907 case bfd_link_hash_common:
3908 return h->root.u.c.p->section;
3909
3910 default:
3911 break;
3912 }
3913 }
3914 }
3915 else
3916 return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
3917
3918 return NULL;
3919 }
3920
3921 /* Update the got, plt and dynamic reloc reference counts for the
3922 section being removed. */
3923
3924 static bfd_boolean
3925 ppc_elf_gc_sweep_hook (bfd *abfd,
3926 struct bfd_link_info *info,
3927 asection *sec,
3928 const Elf_Internal_Rela *relocs)
3929 {
3930 struct ppc_elf_link_hash_table *htab;
3931 Elf_Internal_Shdr *symtab_hdr;
3932 struct elf_link_hash_entry **sym_hashes;
3933 bfd_signed_vma *local_got_refcounts;
3934 const Elf_Internal_Rela *rel, *relend;
3935
3936 elf_section_data (sec)->local_dynrel = NULL;
3937
3938 htab = ppc_elf_hash_table (info);
3939 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3940 sym_hashes = elf_sym_hashes (abfd);
3941 local_got_refcounts = elf_local_got_refcounts (abfd);
3942
3943 relend = relocs + sec->reloc_count;
3944 for (rel = relocs; rel < relend; rel++)
3945 {
3946 unsigned long r_symndx;
3947 enum elf_ppc_reloc_type r_type;
3948 struct elf_link_hash_entry *h = NULL;
3949
3950 r_symndx = ELF32_R_SYM (rel->r_info);
3951 if (r_symndx >= symtab_hdr->sh_info)
3952 {
3953 struct ppc_elf_dyn_relocs **pp, *p;
3954 struct ppc_elf_link_hash_entry *eh;
3955
3956 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3957 eh = (struct ppc_elf_link_hash_entry *) h;
3958
3959 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
3960 if (p->sec == sec)
3961 {
3962 /* Everything must go for SEC. */
3963 *pp = p->next;
3964 break;
3965 }
3966 }
3967
3968 r_type = ELF32_R_TYPE (rel->r_info);
3969 switch (r_type)
3970 {
3971 case R_PPC_GOT_TLSLD16:
3972 case R_PPC_GOT_TLSLD16_LO:
3973 case R_PPC_GOT_TLSLD16_HI:
3974 case R_PPC_GOT_TLSLD16_HA:
3975 htab->tlsld_got.refcount -= 1;
3976 /* Fall thru */
3977
3978 case R_PPC_GOT_TLSGD16:
3979 case R_PPC_GOT_TLSGD16_LO:
3980 case R_PPC_GOT_TLSGD16_HI:
3981 case R_PPC_GOT_TLSGD16_HA:
3982 case R_PPC_GOT_TPREL16:
3983 case R_PPC_GOT_TPREL16_LO:
3984 case R_PPC_GOT_TPREL16_HI:
3985 case R_PPC_GOT_TPREL16_HA:
3986 case R_PPC_GOT_DTPREL16:
3987 case R_PPC_GOT_DTPREL16_LO:
3988 case R_PPC_GOT_DTPREL16_HI:
3989 case R_PPC_GOT_DTPREL16_HA:
3990 case R_PPC_GOT16:
3991 case R_PPC_GOT16_LO:
3992 case R_PPC_GOT16_HI:
3993 case R_PPC_GOT16_HA:
3994 if (h != NULL)
3995 {
3996 if (h->got.refcount > 0)
3997 h->got.refcount--;
3998 }
3999 else if (local_got_refcounts != NULL)
4000 {
4001 if (local_got_refcounts[r_symndx] > 0)
4002 local_got_refcounts[r_symndx]--;
4003 }
4004 break;
4005
4006 case R_PPC_REL24:
4007 case R_PPC_REL14:
4008 case R_PPC_REL14_BRTAKEN:
4009 case R_PPC_REL14_BRNTAKEN:
4010 case R_PPC_REL32:
4011 if (h == NULL
4012 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
4013 break;
4014 /* Fall thru */
4015
4016 case R_PPC_ADDR32:
4017 case R_PPC_ADDR24:
4018 case R_PPC_ADDR16:
4019 case R_PPC_ADDR16_LO:
4020 case R_PPC_ADDR16_HI:
4021 case R_PPC_ADDR16_HA:
4022 case R_PPC_ADDR14:
4023 case R_PPC_ADDR14_BRTAKEN:
4024 case R_PPC_ADDR14_BRNTAKEN:
4025 case R_PPC_UADDR32:
4026 case R_PPC_UADDR16:
4027 case R_PPC_PLT32:
4028 case R_PPC_PLTREL24:
4029 case R_PPC_PLT16_LO:
4030 case R_PPC_PLT16_HI:
4031 case R_PPC_PLT16_HA:
4032 if (h != NULL)
4033 {
4034 if (h->plt.refcount > 0)
4035 h->plt.refcount--;
4036 }
4037 break;
4038
4039 default:
4040 break;
4041 }
4042 }
4043 return TRUE;
4044 }
4045
4046 /* Set htab->tls_sec and htab->tls_get_addr. */
4047
4048 bfd_boolean
4049 ppc_elf_tls_setup (bfd *obfd, struct bfd_link_info *info)
4050 {
4051 asection *tls;
4052 struct ppc_elf_link_hash_table *htab;
4053
4054 htab = ppc_elf_hash_table (info);
4055 htab->tls_get_addr = elf_link_hash_lookup (&htab->elf, "__tls_get_addr",
4056 FALSE, FALSE, TRUE);
4057
4058 for (tls = obfd->sections; tls != NULL; tls = tls->next)
4059 if ((tls->flags & (SEC_THREAD_LOCAL | SEC_LOAD))
4060 == (SEC_THREAD_LOCAL | SEC_LOAD))
4061 break;
4062 htab->tls_sec = tls;
4063
4064 return tls != NULL;
4065 }
4066
4067 /* Run through all the TLS relocs looking for optimization
4068 opportunities. */
4069
4070 bfd_boolean
4071 ppc_elf_tls_optimize (bfd *obfd ATTRIBUTE_UNUSED,
4072 struct bfd_link_info *info)
4073 {
4074 bfd *ibfd;
4075 asection *sec;
4076 struct ppc_elf_link_hash_table *htab;
4077
4078 if (info->relocatable || info->shared)
4079 return TRUE;
4080
4081 htab = ppc_elf_hash_table (info);
4082 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
4083 {
4084 Elf_Internal_Sym *locsyms = NULL;
4085 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
4086
4087 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
4088 if (sec->has_tls_reloc && !bfd_is_abs_section (sec->output_section))
4089 {
4090 Elf_Internal_Rela *relstart, *rel, *relend;
4091 int expecting_tls_get_addr;
4092
4093 /* Read the relocations. */
4094 relstart = _bfd_elf_link_read_relocs (ibfd, sec, NULL, NULL,
4095 info->keep_memory);
4096 if (relstart == NULL)
4097 return FALSE;
4098
4099 expecting_tls_get_addr = 0;
4100 relend = relstart + sec->reloc_count;
4101 for (rel = relstart; rel < relend; rel++)
4102 {
4103 enum elf_ppc_reloc_type r_type;
4104 unsigned long r_symndx;
4105 struct elf_link_hash_entry *h = NULL;
4106 char *tls_mask;
4107 char tls_set, tls_clear;
4108 bfd_boolean is_local;
4109
4110 r_symndx = ELF32_R_SYM (rel->r_info);
4111 if (r_symndx >= symtab_hdr->sh_info)
4112 {
4113 struct elf_link_hash_entry **sym_hashes;
4114
4115 sym_hashes = elf_sym_hashes (ibfd);
4116 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4117 while (h->root.type == bfd_link_hash_indirect
4118 || h->root.type == bfd_link_hash_warning)
4119 h = (struct elf_link_hash_entry *) h->root.u.i.link;
4120 }
4121
4122 is_local = FALSE;
4123 if (h == NULL
4124 || !(h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC))
4125 is_local = TRUE;
4126
4127 r_type = ELF32_R_TYPE (rel->r_info);
4128 switch (r_type)
4129 {
4130 case R_PPC_GOT_TLSLD16:
4131 case R_PPC_GOT_TLSLD16_LO:
4132 case R_PPC_GOT_TLSLD16_HI:
4133 case R_PPC_GOT_TLSLD16_HA:
4134 /* These relocs should never be against a symbol
4135 defined in a shared lib. Leave them alone if
4136 that turns out to be the case. */
4137 expecting_tls_get_addr = 0;
4138 htab->tlsld_got.refcount -= 1;
4139 if (!is_local)
4140 continue;
4141
4142 /* LD -> LE */
4143 tls_set = 0;
4144 tls_clear = TLS_LD;
4145 expecting_tls_get_addr = 1;
4146 break;
4147
4148 case R_PPC_GOT_TLSGD16:
4149 case R_PPC_GOT_TLSGD16_LO:
4150 case R_PPC_GOT_TLSGD16_HI:
4151 case R_PPC_GOT_TLSGD16_HA:
4152 if (is_local)
4153 /* GD -> LE */
4154 tls_set = 0;
4155 else
4156 /* GD -> IE */
4157 tls_set = TLS_TLS | TLS_TPRELGD;
4158 tls_clear = TLS_GD;
4159 expecting_tls_get_addr = 1;
4160 break;
4161
4162 case R_PPC_GOT_TPREL16:
4163 case R_PPC_GOT_TPREL16_LO:
4164 case R_PPC_GOT_TPREL16_HI:
4165 case R_PPC_GOT_TPREL16_HA:
4166 expecting_tls_get_addr = 0;
4167 if (is_local)
4168 {
4169 /* IE -> LE */
4170 tls_set = 0;
4171 tls_clear = TLS_TPREL;
4172 break;
4173 }
4174 else
4175 continue;
4176
4177 case R_PPC_REL14:
4178 case R_PPC_REL14_BRTAKEN:
4179 case R_PPC_REL14_BRNTAKEN:
4180 case R_PPC_REL24:
4181 if (expecting_tls_get_addr
4182 && h != NULL
4183 && h == htab->tls_get_addr)
4184 {
4185 if (h->plt.refcount > 0)
4186 h->plt.refcount -= 1;
4187 }
4188 expecting_tls_get_addr = 0;
4189 continue;
4190
4191 default:
4192 expecting_tls_get_addr = 0;
4193 continue;
4194 }
4195
4196 if (h != NULL)
4197 {
4198 if (tls_set == 0)
4199 {
4200 /* We managed to get rid of a got entry. */
4201 if (h->got.refcount > 0)
4202 h->got.refcount -= 1;
4203 }
4204 tls_mask = &ppc_elf_hash_entry (h)->tls_mask;
4205 }
4206 else
4207 {
4208 Elf_Internal_Sym *sym;
4209 bfd_signed_vma *lgot_refs;
4210 char *lgot_masks;
4211
4212 if (locsyms == NULL)
4213 {
4214 locsyms = (Elf_Internal_Sym *) symtab_hdr->contents;
4215 if (locsyms == NULL)
4216 locsyms = bfd_elf_get_elf_syms (ibfd, symtab_hdr,
4217 symtab_hdr->sh_info,
4218 0, NULL, NULL, NULL);
4219 if (locsyms == NULL)
4220 {
4221 if (elf_section_data (sec)->relocs != relstart)
4222 free (relstart);
4223 return FALSE;
4224 }
4225 }
4226 sym = locsyms + r_symndx;
4227 lgot_refs = elf_local_got_refcounts (ibfd);
4228 if (lgot_refs == NULL)
4229 abort ();
4230 if (tls_set == 0)
4231 {
4232 /* We managed to get rid of a got entry. */
4233 if (lgot_refs[r_symndx] > 0)
4234 lgot_refs[r_symndx] -= 1;
4235 }
4236 lgot_masks = (char *) (lgot_refs + symtab_hdr->sh_info);
4237 tls_mask = &lgot_masks[r_symndx];
4238 }
4239
4240 *tls_mask |= tls_set;
4241 *tls_mask &= ~tls_clear;
4242 }
4243
4244 if (elf_section_data (sec)->relocs != relstart)
4245 free (relstart);
4246 }
4247
4248 if (locsyms != NULL
4249 && (symtab_hdr->contents != (unsigned char *) locsyms))
4250 {
4251 if (!info->keep_memory)
4252 free (locsyms);
4253 else
4254 symtab_hdr->contents = (unsigned char *) locsyms;
4255 }
4256 }
4257 return TRUE;
4258 }
4259 \f
4260 /* Hook called by the linker routine which adds symbols from an object
4261 file. We use it to put .comm items in .sbss, and not .bss. */
4262
4263 static bfd_boolean
4264 ppc_elf_add_symbol_hook (bfd *abfd,
4265 struct bfd_link_info *info,
4266 const Elf_Internal_Sym *sym,
4267 const char **namep ATTRIBUTE_UNUSED,
4268 flagword *flagsp ATTRIBUTE_UNUSED,
4269 asection **secp,
4270 bfd_vma *valp)
4271 {
4272 if (sym->st_shndx == SHN_COMMON
4273 && !info->relocatable
4274 && sym->st_size <= elf_gp_size (abfd)
4275 && info->hash->creator->flavour == bfd_target_elf_flavour)
4276 {
4277 /* Common symbols less than or equal to -G nn bytes are automatically
4278 put into .sdata. */
4279 elf_linker_section_t *sdata
4280 = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA);
4281
4282 if (!sdata->bss_section)
4283 {
4284 bfd_size_type amt;
4285
4286 /* We don't go through bfd_make_section, because we don't
4287 want to attach this common section to DYNOBJ. The linker
4288 will move the symbols to the appropriate output section
4289 when it defines common symbols. */
4290 amt = sizeof (asection);
4291 sdata->bss_section = bfd_zalloc (abfd, amt);
4292 if (sdata->bss_section == NULL)
4293 return FALSE;
4294 sdata->bss_section->name = sdata->bss_name;
4295 sdata->bss_section->flags = SEC_IS_COMMON;
4296 sdata->bss_section->output_section = sdata->bss_section;
4297 amt = sizeof (asymbol);
4298 sdata->bss_section->symbol = bfd_zalloc (abfd, amt);
4299 amt = sizeof (asymbol *);
4300 sdata->bss_section->symbol_ptr_ptr = bfd_zalloc (abfd, amt);
4301 if (sdata->bss_section->symbol == NULL
4302 || sdata->bss_section->symbol_ptr_ptr == NULL)
4303 return FALSE;
4304 sdata->bss_section->symbol->name = sdata->bss_name;
4305 sdata->bss_section->symbol->flags = BSF_SECTION_SYM;
4306 sdata->bss_section->symbol->section = sdata->bss_section;
4307 *sdata->bss_section->symbol_ptr_ptr = sdata->bss_section->symbol;
4308 }
4309
4310 *secp = sdata->bss_section;
4311 *valp = sym->st_size;
4312 }
4313
4314 return TRUE;
4315 }
4316 \f
4317 /* Finish up dynamic symbol handling. We set the contents of various
4318 dynamic sections here. */
4319
4320 static bfd_boolean
4321 ppc_elf_finish_dynamic_symbol (bfd *output_bfd,
4322 struct bfd_link_info *info,
4323 struct elf_link_hash_entry *h,
4324 Elf_Internal_Sym *sym)
4325 {
4326 struct ppc_elf_link_hash_table *htab;
4327
4328 #ifdef DEBUG
4329 fprintf (stderr, "ppc_elf_finish_dynamic_symbol called for %s",
4330 h->root.root.string);
4331 #endif
4332
4333 htab = ppc_elf_hash_table (info);
4334 BFD_ASSERT (htab->elf.dynobj != NULL);
4335
4336 if (h->plt.offset != (bfd_vma) -1)
4337 {
4338 Elf_Internal_Rela rela;
4339 bfd_byte *loc;
4340 bfd_vma reloc_index;
4341
4342 #ifdef DEBUG
4343 fprintf (stderr, ", plt_offset = %d", h->plt.offset);
4344 #endif
4345
4346 /* This symbol has an entry in the procedure linkage table. Set
4347 it up. */
4348
4349 BFD_ASSERT (h->dynindx != -1);
4350 BFD_ASSERT (htab->plt != NULL && htab->relplt != NULL);
4351
4352 /* We don't need to fill in the .plt. The ppc dynamic linker
4353 will fill it in. */
4354
4355 /* Fill in the entry in the .rela.plt section. */
4356 rela.r_offset = (htab->plt->output_section->vma
4357 + htab->plt->output_offset
4358 + h->plt.offset);
4359 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_JMP_SLOT);
4360 rela.r_addend = 0;
4361
4362 reloc_index = (h->plt.offset - PLT_INITIAL_ENTRY_SIZE) / PLT_SLOT_SIZE;
4363 if (reloc_index > PLT_NUM_SINGLE_ENTRIES)
4364 reloc_index -= (reloc_index - PLT_NUM_SINGLE_ENTRIES) / 2;
4365 loc = (htab->relplt->contents
4366 + reloc_index * sizeof (Elf32_External_Rela));
4367 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4368
4369 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4370 {
4371 /* Mark the symbol as undefined, rather than as defined in
4372 the .plt section. Leave the value alone. */
4373 sym->st_shndx = SHN_UNDEF;
4374 /* If the symbol is weak, we do need to clear the value.
4375 Otherwise, the PLT entry would provide a definition for
4376 the symbol even if the symbol wasn't defined anywhere,
4377 and so the symbol would never be NULL. */
4378 if ((h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR_NONWEAK)
4379 == 0)
4380 sym->st_value = 0;
4381 }
4382 }
4383
4384 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
4385 {
4386 asection *s;
4387 Elf_Internal_Rela rela;
4388 bfd_byte *loc;
4389
4390 /* This symbols needs a copy reloc. Set it up. */
4391
4392 #ifdef DEBUG
4393 fprintf (stderr, ", copy");
4394 #endif
4395
4396 BFD_ASSERT (h->dynindx != -1);
4397
4398 if (h->size <= elf_gp_size (htab->elf.dynobj))
4399 s = htab->relsbss;
4400 else
4401 s = htab->relbss;
4402 BFD_ASSERT (s != NULL);
4403
4404 rela.r_offset = (h->root.u.def.value
4405 + h->root.u.def.section->output_section->vma
4406 + h->root.u.def.section->output_offset);
4407 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_COPY);
4408 rela.r_addend = 0;
4409 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
4410 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4411 }
4412
4413 #ifdef DEBUG
4414 fprintf (stderr, "\n");
4415 #endif
4416
4417 /* Mark some specially defined symbols as absolute. */
4418 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
4419 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
4420 || strcmp (h->root.root.string, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4421 sym->st_shndx = SHN_ABS;
4422
4423 return TRUE;
4424 }
4425 \f
4426 /* Finish up the dynamic sections. */
4427
4428 static bfd_boolean
4429 ppc_elf_finish_dynamic_sections (bfd *output_bfd,
4430 struct bfd_link_info *info)
4431 {
4432 asection *sdyn;
4433 struct ppc_elf_link_hash_table *htab;
4434
4435 #ifdef DEBUG
4436 fprintf (stderr, "ppc_elf_finish_dynamic_sections called\n");
4437 #endif
4438
4439 htab = ppc_elf_hash_table (info);
4440 sdyn = bfd_get_section_by_name (htab->elf.dynobj, ".dynamic");
4441
4442 if (htab->elf.dynamic_sections_created)
4443 {
4444 Elf32_External_Dyn *dyncon, *dynconend;
4445
4446 BFD_ASSERT (htab->plt != NULL && sdyn != NULL);
4447
4448 dyncon = (Elf32_External_Dyn *) sdyn->contents;
4449 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
4450 for (; dyncon < dynconend; dyncon++)
4451 {
4452 Elf_Internal_Dyn dyn;
4453 asection *s;
4454
4455 bfd_elf32_swap_dyn_in (htab->elf.dynobj, dyncon, &dyn);
4456
4457 switch (dyn.d_tag)
4458 {
4459 case DT_PLTGOT:
4460 s = htab->plt;
4461 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
4462 break;
4463
4464 case DT_PLTRELSZ:
4465 dyn.d_un.d_val = htab->relplt->_raw_size;
4466 break;
4467
4468 case DT_JMPREL:
4469 s = htab->relplt;
4470 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
4471 break;
4472
4473 default:
4474 continue;
4475 }
4476
4477 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
4478 }
4479 }
4480
4481 /* Add a blrl instruction at _GLOBAL_OFFSET_TABLE_-4 so that a function can
4482 easily find the address of the _GLOBAL_OFFSET_TABLE_. */
4483 if (htab->got)
4484 {
4485 unsigned char *contents = htab->got->contents;
4486 bfd_put_32 (output_bfd, 0x4e800021 /* blrl */, contents);
4487
4488 if (sdyn == NULL)
4489 bfd_put_32 (output_bfd, 0, contents + 4);
4490 else
4491 bfd_put_32 (output_bfd,
4492 sdyn->output_section->vma + sdyn->output_offset,
4493 contents + 4);
4494
4495 elf_section_data (htab->got->output_section)->this_hdr.sh_entsize = 4;
4496 }
4497
4498 return TRUE;
4499 }
4500 \f
4501 /* The RELOCATE_SECTION function is called by the ELF backend linker
4502 to handle the relocations for a section.
4503
4504 The relocs are always passed as Rela structures; if the section
4505 actually uses Rel structures, the r_addend field will always be
4506 zero.
4507
4508 This function is responsible for adjust the section contents as
4509 necessary, and (if using Rela relocs and generating a
4510 relocatable output file) adjusting the reloc addend as
4511 necessary.
4512
4513 This function does not have to worry about setting the reloc
4514 address or the reloc symbol index.
4515
4516 LOCAL_SYMS is a pointer to the swapped in local symbols.
4517
4518 LOCAL_SECTIONS is an array giving the section in the input file
4519 corresponding to the st_shndx field of each local symbol.
4520
4521 The global hash table entry for the global symbols can be found
4522 via elf_sym_hashes (input_bfd).
4523
4524 When generating relocatable output, this function must handle
4525 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
4526 going to be the section symbol corresponding to the output
4527 section, which means that the addend must be adjusted
4528 accordingly. */
4529
4530 static bfd_boolean
4531 ppc_elf_relocate_section (bfd *output_bfd,
4532 struct bfd_link_info *info,
4533 bfd *input_bfd,
4534 asection *input_section,
4535 bfd_byte *contents,
4536 Elf_Internal_Rela *relocs,
4537 Elf_Internal_Sym *local_syms,
4538 asection **local_sections)
4539 {
4540 Elf_Internal_Shdr *symtab_hdr;
4541 struct elf_link_hash_entry **sym_hashes;
4542 struct ppc_elf_link_hash_table *htab;
4543 Elf_Internal_Rela *rel;
4544 Elf_Internal_Rela *relend;
4545 Elf_Internal_Rela outrel;
4546 bfd_byte *loc;
4547 asection *sreloc = NULL;
4548 bfd_vma *local_got_offsets;
4549 bfd_boolean ret = TRUE;
4550
4551 #ifdef DEBUG
4552 fprintf (stderr, "ppc_elf_relocate_section called for %s section %s, "
4553 "%ld relocations%s\n",
4554 bfd_archive_filename (input_bfd),
4555 bfd_section_name(input_bfd, input_section),
4556 (long) input_section->reloc_count,
4557 (info->relocatable) ? " (relocatable)" : "");
4558 #endif
4559
4560 if (info->relocatable)
4561 return TRUE;
4562
4563 /* Initialize howto table if not already done. */
4564 if (!ppc_elf_howto_table[R_PPC_ADDR32])
4565 ppc_elf_howto_init ();
4566
4567 htab = ppc_elf_hash_table (info);
4568 local_got_offsets = elf_local_got_offsets (input_bfd);
4569 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4570 sym_hashes = elf_sym_hashes (input_bfd);
4571 rel = relocs;
4572 relend = relocs + input_section->reloc_count;
4573 for (; rel < relend; rel++)
4574 {
4575 enum elf_ppc_reloc_type r_type;
4576 bfd_vma addend;
4577 bfd_reloc_status_type r;
4578 Elf_Internal_Sym *sym;
4579 asection *sec;
4580 struct elf_link_hash_entry *h;
4581 const char *sym_name;
4582 reloc_howto_type *howto;
4583 unsigned long r_symndx;
4584 bfd_vma relocation;
4585 bfd_vma branch_bit, insn, from;
4586 bfd_boolean unresolved_reloc;
4587 bfd_boolean warned;
4588 unsigned int tls_type, tls_mask, tls_gd;
4589
4590 r_type = ELF32_R_TYPE (rel->r_info);
4591 sym = NULL;
4592 sec = NULL;
4593 h = NULL;
4594 unresolved_reloc = FALSE;
4595 warned = FALSE;
4596 r_symndx = ELF32_R_SYM (rel->r_info);
4597 if (r_symndx < symtab_hdr->sh_info)
4598 {
4599 sym = local_syms + r_symndx;
4600 sec = local_sections[r_symndx];
4601 sym_name = bfd_elf_local_sym_name (input_bfd, sym);
4602
4603 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, sec, rel);
4604 }
4605 else
4606 {
4607 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4608 while (h->root.type == bfd_link_hash_indirect
4609 || h->root.type == bfd_link_hash_warning)
4610 h = (struct elf_link_hash_entry *) h->root.u.i.link;
4611 sym_name = h->root.root.string;
4612
4613 relocation = 0;
4614 if (h->root.type == bfd_link_hash_defined
4615 || h->root.type == bfd_link_hash_defweak)
4616 {
4617 sec = h->root.u.def.section;
4618 /* Set a flag that will be cleared later if we find a
4619 relocation value for this symbol. output_section
4620 is typically NULL for symbols satisfied by a shared
4621 library. */
4622 if (sec->output_section == NULL)
4623 unresolved_reloc = TRUE;
4624 else
4625 relocation = (h->root.u.def.value
4626 + sec->output_section->vma
4627 + sec->output_offset);
4628 }
4629 else if (h->root.type == bfd_link_hash_undefweak)
4630 ;
4631 else if (!info->executable
4632 && !info->no_undefined
4633 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
4634 ;
4635 else
4636 {
4637 if (! ((*info->callbacks->undefined_symbol)
4638 (info, h->root.root.string, input_bfd, input_section,
4639 rel->r_offset, (!info->shared
4640 || info->no_undefined
4641 || ELF_ST_VISIBILITY (h->other)))))
4642 return FALSE;
4643 warned = TRUE;
4644 }
4645 }
4646
4647 /* TLS optimizations. Replace instruction sequences and relocs
4648 based on information we collected in tls_optimize. We edit
4649 RELOCS so that --emit-relocs will output something sensible
4650 for the final instruction stream. */
4651 tls_mask = 0;
4652 tls_gd = 0;
4653 if (IS_PPC_TLS_RELOC (r_type))
4654 {
4655 if (h != NULL)
4656 tls_mask = ((struct ppc_elf_link_hash_entry *) h)->tls_mask;
4657 else if (local_got_offsets != NULL)
4658 {
4659 char *lgot_masks;
4660 lgot_masks = (char *) (local_got_offsets + symtab_hdr->sh_info);
4661 tls_mask = lgot_masks[r_symndx];
4662 }
4663 }
4664
4665 /* Ensure reloc mapping code below stays sane. */
4666 if ((R_PPC_GOT_TLSLD16 & 3) != (R_PPC_GOT_TLSGD16 & 3)
4667 || (R_PPC_GOT_TLSLD16_LO & 3) != (R_PPC_GOT_TLSGD16_LO & 3)
4668 || (R_PPC_GOT_TLSLD16_HI & 3) != (R_PPC_GOT_TLSGD16_HI & 3)
4669 || (R_PPC_GOT_TLSLD16_HA & 3) != (R_PPC_GOT_TLSGD16_HA & 3)
4670 || (R_PPC_GOT_TLSLD16 & 3) != (R_PPC_GOT_TPREL16 & 3)
4671 || (R_PPC_GOT_TLSLD16_LO & 3) != (R_PPC_GOT_TPREL16_LO & 3)
4672 || (R_PPC_GOT_TLSLD16_HI & 3) != (R_PPC_GOT_TPREL16_HI & 3)
4673 || (R_PPC_GOT_TLSLD16_HA & 3) != (R_PPC_GOT_TPREL16_HA & 3))
4674 abort ();
4675 switch (r_type)
4676 {
4677 default:
4678 break;
4679
4680 case R_PPC_GOT_TPREL16:
4681 case R_PPC_GOT_TPREL16_LO:
4682 if (tls_mask != 0
4683 && (tls_mask & TLS_TPREL) == 0)
4684 {
4685 bfd_vma insn;
4686 insn = bfd_get_32 (output_bfd, contents + rel->r_offset - 2);
4687 insn &= 31 << 21;
4688 insn |= 0x3c020000; /* addis 0,2,0 */
4689 bfd_put_32 (output_bfd, insn, contents + rel->r_offset - 2);
4690 r_type = R_PPC_TPREL16_HA;
4691 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
4692 }
4693 break;
4694
4695 case R_PPC_TLS:
4696 if (tls_mask != 0
4697 && (tls_mask & TLS_TPREL) == 0)
4698 {
4699 bfd_vma insn, rtra;
4700 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
4701 if ((insn & ((31 << 26) | (31 << 11)))
4702 == ((31 << 26) | (2 << 11)))
4703 rtra = insn & ((1 << 26) - (1 << 16));
4704 else if ((insn & ((31 << 26) | (31 << 16)))
4705 == ((31 << 26) | (2 << 16)))
4706 rtra = (insn & (31 << 21)) | ((insn & (31 << 11)) << 5);
4707 else
4708 abort ();
4709 if ((insn & ((1 << 11) - (1 << 1))) == 266 << 1)
4710 /* add -> addi. */
4711 insn = 14 << 26;
4712 else if ((insn & (31 << 1)) == 23 << 1
4713 && ((insn & (31 << 6)) < 14 << 6
4714 || ((insn & (31 << 6)) >= 16 << 6
4715 && (insn & (31 << 6)) < 24 << 6)))
4716 /* load and store indexed -> dform. */
4717 insn = (32 | ((insn >> 6) & 31)) << 26;
4718 else if ((insn & (31 << 1)) == 21 << 1
4719 && (insn & (0x1a << 6)) == 0)
4720 /* ldx, ldux, stdx, stdux -> ld, ldu, std, stdu. */
4721 insn = (((58 | ((insn >> 6) & 4)) << 26)
4722 | ((insn >> 6) & 1));
4723 else if ((insn & (31 << 1)) == 21 << 1
4724 && (insn & ((1 << 11) - (1 << 1))) == 341 << 1)
4725 /* lwax -> lwa. */
4726 insn = (58 << 26) | 2;
4727 else
4728 abort ();
4729 insn |= rtra;
4730 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
4731 r_type = R_PPC_TPREL16_LO;
4732 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
4733 /* Was PPC_TLS which sits on insn boundary, now
4734 PPC_TPREL16_LO which is at insn+2. */
4735 rel->r_offset += 2;
4736 }
4737 break;
4738
4739 case R_PPC_GOT_TLSGD16_HI:
4740 case R_PPC_GOT_TLSGD16_HA:
4741 tls_gd = TLS_TPRELGD;
4742 if (tls_mask != 0 && (tls_mask & TLS_GD) == 0)
4743 goto tls_gdld_hi;
4744 break;
4745
4746 case R_PPC_GOT_TLSLD16_HI:
4747 case R_PPC_GOT_TLSLD16_HA:
4748 if (tls_mask != 0 && (tls_mask & TLS_LD) == 0)
4749 {
4750 tls_gdld_hi:
4751 if ((tls_mask & tls_gd) != 0)
4752 r_type = (((r_type - (R_PPC_GOT_TLSGD16 & 3)) & 3)
4753 + R_PPC_GOT_TPREL16);
4754 else
4755 {
4756 bfd_put_32 (output_bfd, NOP, contents + rel->r_offset);
4757 rel->r_offset -= 2;
4758 r_type = R_PPC_NONE;
4759 }
4760 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
4761 }
4762 break;
4763
4764 case R_PPC_GOT_TLSGD16:
4765 case R_PPC_GOT_TLSGD16_LO:
4766 tls_gd = TLS_TPRELGD;
4767 if (tls_mask != 0 && (tls_mask & TLS_GD) == 0)
4768 goto tls_get_addr_check;
4769 break;
4770
4771 case R_PPC_GOT_TLSLD16:
4772 case R_PPC_GOT_TLSLD16_LO:
4773 if (tls_mask != 0 && (tls_mask & TLS_LD) == 0)
4774 {
4775 tls_get_addr_check:
4776 if (rel + 1 < relend)
4777 {
4778 enum elf_ppc_reloc_type r_type2;
4779 unsigned long r_symndx2;
4780 struct elf_link_hash_entry *h2;
4781 bfd_vma insn1, insn2;
4782 bfd_vma offset;
4783
4784 /* The next instruction should be a call to
4785 __tls_get_addr. Peek at the reloc to be sure. */
4786 r_type2 = ELF32_R_TYPE (rel[1].r_info);
4787 r_symndx2 = ELF32_R_SYM (rel[1].r_info);
4788 if (r_symndx2 < symtab_hdr->sh_info
4789 || (r_type2 != R_PPC_REL14
4790 && r_type2 != R_PPC_REL14_BRTAKEN
4791 && r_type2 != R_PPC_REL14_BRNTAKEN
4792 && r_type2 != R_PPC_REL24
4793 && r_type2 != R_PPC_PLTREL24))
4794 break;
4795
4796 h2 = sym_hashes[r_symndx2 - symtab_hdr->sh_info];
4797 while (h2->root.type == bfd_link_hash_indirect
4798 || h2->root.type == bfd_link_hash_warning)
4799 h2 = (struct elf_link_hash_entry *) h2->root.u.i.link;
4800 if (h2 == NULL || h2 != htab->tls_get_addr)
4801 break;
4802
4803 /* OK, it checks out. Replace the call. */
4804 offset = rel[1].r_offset;
4805 insn1 = bfd_get_32 (output_bfd,
4806 contents + rel->r_offset - 2);
4807 if ((tls_mask & tls_gd) != 0)
4808 {
4809 /* IE */
4810 insn1 &= (1 << 26) - 1;
4811 insn1 |= 32 << 26; /* lwz */
4812 insn2 = 0x7c631214; /* add 3,3,2 */
4813 rel[1].r_info = ELF32_R_INFO (r_symndx2, R_PPC_NONE);
4814 r_type = (((r_type - (R_PPC_GOT_TLSGD16 & 3)) & 3)
4815 + R_PPC_GOT_TPREL16);
4816 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
4817 }
4818 else
4819 {
4820 /* LE */
4821 insn1 = 0x3c620000; /* addis 3,2,0 */
4822 insn2 = 0x38630000; /* addi 3,3,0 */
4823 if (tls_gd == 0)
4824 {
4825 /* Was an LD reloc. */
4826 r_symndx = 0;
4827 rel->r_addend = htab->tls_sec->vma + DTP_OFFSET;
4828 rel[1].r_addend = htab->tls_sec->vma + DTP_OFFSET;
4829 }
4830 r_type = R_PPC_TPREL16_HA;
4831 rel->r_info = ELF32_R_INFO (r_symndx, r_type);
4832 rel[1].r_info = ELF32_R_INFO (r_symndx,
4833 R_PPC_TPREL16_LO);
4834 rel[1].r_offset += 2;
4835 }
4836 bfd_put_32 (output_bfd, insn1, contents + rel->r_offset - 2);
4837 bfd_put_32 (output_bfd, insn2, contents + offset);
4838 if (tls_gd == 0)
4839 {
4840 /* We changed the symbol on an LD reloc. Start over
4841 in order to get h, sym, sec etc. right. */
4842 rel--;
4843 continue;
4844 }
4845 }
4846 }
4847 break;
4848 }
4849
4850 /* Handle other relocations that tweak non-addend part of insn. */
4851 branch_bit = 0;
4852 switch (r_type)
4853 {
4854 default:
4855 break;
4856
4857 /* Branch taken prediction relocations. */
4858 case R_PPC_ADDR14_BRTAKEN:
4859 case R_PPC_REL14_BRTAKEN:
4860 branch_bit = BRANCH_PREDICT_BIT;
4861 /* Fall thru */
4862
4863 /* Branch not taken predicition relocations. */
4864 case R_PPC_ADDR14_BRNTAKEN:
4865 case R_PPC_REL14_BRNTAKEN:
4866 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
4867 insn &= ~BRANCH_PREDICT_BIT;
4868 insn |= branch_bit;
4869
4870 from = (rel->r_offset
4871 + input_section->output_offset
4872 + input_section->output_section->vma);
4873
4874 /* Invert 'y' bit if not the default. */
4875 if ((bfd_signed_vma) (relocation + rel->r_addend - from) < 0)
4876 insn ^= BRANCH_PREDICT_BIT;
4877
4878 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
4879 break;
4880 }
4881
4882 addend = rel->r_addend;
4883 tls_type = 0;
4884 howto = NULL;
4885 if (r_type < R_PPC_max)
4886 howto = ppc_elf_howto_table[r_type];
4887 switch (r_type)
4888 {
4889 default:
4890 (*_bfd_error_handler)
4891 (_("%s: unknown relocation type %d for symbol %s"),
4892 bfd_archive_filename (input_bfd), (int) r_type, sym_name);
4893
4894 bfd_set_error (bfd_error_bad_value);
4895 ret = FALSE;
4896 continue;
4897
4898 case R_PPC_NONE:
4899 case R_PPC_TLS:
4900 case R_PPC_EMB_MRKREF:
4901 case R_PPC_GNU_VTINHERIT:
4902 case R_PPC_GNU_VTENTRY:
4903 continue;
4904
4905 /* GOT16 relocations. Like an ADDR16 using the symbol's
4906 address in the GOT as relocation value instead of the
4907 symbol's value itself. Also, create a GOT entry for the
4908 symbol and put the symbol value there. */
4909 case R_PPC_GOT_TLSGD16:
4910 case R_PPC_GOT_TLSGD16_LO:
4911 case R_PPC_GOT_TLSGD16_HI:
4912 case R_PPC_GOT_TLSGD16_HA:
4913 tls_type = TLS_TLS | TLS_GD;
4914 goto dogot;
4915
4916 case R_PPC_GOT_TLSLD16:
4917 case R_PPC_GOT_TLSLD16_LO:
4918 case R_PPC_GOT_TLSLD16_HI:
4919 case R_PPC_GOT_TLSLD16_HA:
4920 tls_type = TLS_TLS | TLS_LD;
4921 goto dogot;
4922
4923 case R_PPC_GOT_TPREL16:
4924 case R_PPC_GOT_TPREL16_LO:
4925 case R_PPC_GOT_TPREL16_HI:
4926 case R_PPC_GOT_TPREL16_HA:
4927 tls_type = TLS_TLS | TLS_TPREL;
4928 goto dogot;
4929
4930 case R_PPC_GOT_DTPREL16:
4931 case R_PPC_GOT_DTPREL16_LO:
4932 case R_PPC_GOT_DTPREL16_HI:
4933 case R_PPC_GOT_DTPREL16_HA:
4934 tls_type = TLS_TLS | TLS_DTPREL;
4935 goto dogot;
4936
4937 case R_PPC_GOT16:
4938 case R_PPC_GOT16_LO:
4939 case R_PPC_GOT16_HI:
4940 case R_PPC_GOT16_HA:
4941 dogot:
4942 {
4943 /* Relocation is to the entry for this symbol in the global
4944 offset table. */
4945 bfd_vma off;
4946 bfd_vma *offp;
4947 unsigned long indx;
4948
4949 if (htab->got == NULL)
4950 abort ();
4951
4952 indx = 0;
4953 if (tls_type == (TLS_TLS | TLS_LD)
4954 && (h == NULL
4955 || !(h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC)))
4956 offp = &htab->tlsld_got.offset;
4957 else if (h != NULL)
4958 {
4959 bfd_boolean dyn;
4960 dyn = htab->elf.dynamic_sections_created;
4961 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
4962 || (info->shared
4963 && SYMBOL_REFERENCES_LOCAL (info, h)))
4964 /* This is actually a static link, or it is a
4965 -Bsymbolic link and the symbol is defined
4966 locally, or the symbol was forced to be local
4967 because of a version file. */
4968 ;
4969 else
4970 {
4971 indx = h->dynindx;
4972 unresolved_reloc = FALSE;
4973 }
4974 offp = &h->got.offset;
4975 }
4976 else
4977 {
4978 if (local_got_offsets == NULL)
4979 abort ();
4980 offp = &local_got_offsets[r_symndx];
4981 }
4982
4983 /* The offset must always be a multiple of 4. We use the
4984 least significant bit to record whether we have already
4985 processed this entry. */
4986 off = *offp;
4987 if ((off & 1) != 0)
4988 off &= ~1;
4989 else
4990 {
4991 unsigned int tls_m = (tls_mask
4992 & (TLS_LD | TLS_GD | TLS_DTPREL
4993 | TLS_TPREL | TLS_TPRELGD));
4994
4995 if (offp == &htab->tlsld_got.offset)
4996 tls_m = TLS_LD;
4997 else if (h == NULL
4998 || !(h->elf_link_hash_flags
4999 & ELF_LINK_HASH_DEF_DYNAMIC))
5000 tls_m &= ~TLS_LD;
5001
5002 /* We might have multiple got entries for this sym.
5003 Initialize them all. */
5004 do
5005 {
5006 int tls_ty = 0;
5007
5008 if ((tls_m & TLS_LD) != 0)
5009 {
5010 tls_ty = TLS_TLS | TLS_LD;
5011 tls_m &= ~TLS_LD;
5012 }
5013 else if ((tls_m & TLS_GD) != 0)
5014 {
5015 tls_ty = TLS_TLS | TLS_GD;
5016 tls_m &= ~TLS_GD;
5017 }
5018 else if ((tls_m & TLS_DTPREL) != 0)
5019 {
5020 tls_ty = TLS_TLS | TLS_DTPREL;
5021 tls_m &= ~TLS_DTPREL;
5022 }
5023 else if ((tls_m & (TLS_TPREL | TLS_TPRELGD)) != 0)
5024 {
5025 tls_ty = TLS_TLS | TLS_TPREL;
5026 tls_m = 0;
5027 }
5028
5029 /* Generate relocs for the dynamic linker. */
5030 if ((info->shared || indx != 0)
5031 && (h == NULL
5032 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5033 || h->root.type != bfd_link_hash_undefweak))
5034 {
5035 outrel.r_offset = (htab->got->output_section->vma
5036 + htab->got->output_offset
5037 + off);
5038 outrel.r_addend = 0;
5039 if (tls_ty & (TLS_LD | TLS_GD))
5040 {
5041 outrel.r_info = ELF32_R_INFO (indx, R_PPC_DTPMOD32);
5042 if (tls_ty == (TLS_TLS | TLS_GD))
5043 {
5044 loc = htab->relgot->contents;
5045 loc += (htab->relgot->reloc_count++
5046 * sizeof (Elf32_External_Rela));
5047 bfd_elf32_swap_reloca_out (output_bfd,
5048 &outrel, loc);
5049 outrel.r_offset += 4;
5050 outrel.r_info
5051 = ELF32_R_INFO (indx, R_PPC_DTPREL32);
5052 }
5053 }
5054 else if (tls_ty == (TLS_TLS | TLS_DTPREL))
5055 outrel.r_info = ELF32_R_INFO (indx, R_PPC_DTPREL32);
5056 else if (tls_ty == (TLS_TLS | TLS_TPREL))
5057 outrel.r_info = ELF32_R_INFO (indx, R_PPC_TPREL32);
5058 else if (indx == 0)
5059 outrel.r_info = ELF32_R_INFO (indx, R_PPC_RELATIVE);
5060 else
5061 outrel.r_info = ELF32_R_INFO (indx, R_PPC_GLOB_DAT);
5062 if (indx == 0)
5063 {
5064 outrel.r_addend += relocation;
5065 if (tls_ty & (TLS_GD | TLS_DTPREL | TLS_TPREL))
5066 outrel.r_addend -= htab->tls_sec->vma;
5067 }
5068 loc = htab->relgot->contents;
5069 loc += (htab->relgot->reloc_count++
5070 * sizeof (Elf32_External_Rela));
5071 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5072 }
5073
5074 /* Init the .got section contents if we're not
5075 emitting a reloc. */
5076 else
5077 {
5078 bfd_vma value = relocation;
5079
5080 if (tls_ty == (TLS_TLS | TLS_LD))
5081 value = 1;
5082 else if (tls_ty != 0)
5083 {
5084 value -= htab->tls_sec->vma + DTP_OFFSET;
5085 if (tls_ty == (TLS_TLS | TLS_TPREL))
5086 value += DTP_OFFSET - TP_OFFSET;
5087
5088 if (tls_ty == (TLS_TLS | TLS_GD))
5089 {
5090 bfd_put_32 (output_bfd, value,
5091 htab->got->contents + off + 4);
5092 value = 1;
5093 }
5094 }
5095 bfd_put_32 (output_bfd, value,
5096 htab->got->contents + off);
5097 }
5098
5099 off += 4;
5100 if (tls_ty & (TLS_LD | TLS_GD))
5101 off += 4;
5102 }
5103 while (tls_m != 0);
5104
5105 off = *offp;
5106 *offp = off | 1;
5107 }
5108
5109 if (off >= (bfd_vma) -2)
5110 abort ();
5111
5112 if ((tls_type & TLS_TLS) != 0)
5113 {
5114 if (tls_type != (TLS_TLS | TLS_LD))
5115 {
5116 if ((tls_mask & TLS_LD) != 0
5117 && !(h == NULL
5118 || !(h->elf_link_hash_flags
5119 & ELF_LINK_HASH_DEF_DYNAMIC)))
5120 off += 8;
5121 if (tls_type != (TLS_TLS | TLS_GD))
5122 {
5123 if ((tls_mask & TLS_GD) != 0)
5124 off += 8;
5125 if (tls_type != (TLS_TLS | TLS_DTPREL))
5126 {
5127 if ((tls_mask & TLS_DTPREL) != 0)
5128 off += 4;
5129 }
5130 }
5131 }
5132 }
5133
5134 relocation = htab->got->output_offset + off - 4;
5135
5136 /* Addends on got relocations don't make much sense.
5137 x+off@got is actually x@got+off, and since the got is
5138 generated by a hash table traversal, the value in the
5139 got at entry m+n bears little relation to the entry m. */
5140 if (addend != 0)
5141 (*_bfd_error_handler)
5142 (_("%s(%s+0x%lx): non-zero addend on %s reloc against `%s'"),
5143 bfd_archive_filename (input_bfd),
5144 bfd_get_section_name (input_bfd, input_section),
5145 (long) rel->r_offset,
5146 howto->name,
5147 sym_name);
5148 }
5149 break;
5150
5151 /* Relocations that need no special processing. */
5152 case R_PPC_LOCAL24PC:
5153 /* It makes no sense to point a local relocation
5154 at a symbol not in this object. */
5155 if (unresolved_reloc)
5156 {
5157 if (! (*info->callbacks->undefined_symbol) (info,
5158 h->root.root.string,
5159 input_bfd,
5160 input_section,
5161 rel->r_offset,
5162 TRUE))
5163 return FALSE;
5164 continue;
5165 }
5166 break;
5167
5168 case R_PPC_DTPREL16:
5169 case R_PPC_DTPREL16_LO:
5170 case R_PPC_DTPREL16_HI:
5171 case R_PPC_DTPREL16_HA:
5172 addend -= htab->tls_sec->vma + DTP_OFFSET;
5173 break;
5174
5175 /* Relocations that may need to be propagated if this is a shared
5176 object. */
5177 case R_PPC_TPREL16:
5178 case R_PPC_TPREL16_LO:
5179 case R_PPC_TPREL16_HI:
5180 case R_PPC_TPREL16_HA:
5181 addend -= htab->tls_sec->vma + TP_OFFSET;
5182 /* The TPREL16 relocs shouldn't really be used in shared
5183 libs as they will result in DT_TEXTREL being set, but
5184 support them anyway. */
5185 goto dodyn;
5186
5187 case R_PPC_TPREL32:
5188 addend -= htab->tls_sec->vma + TP_OFFSET;
5189 goto dodyn;
5190
5191 case R_PPC_DTPREL32:
5192 addend -= htab->tls_sec->vma + DTP_OFFSET;
5193 goto dodyn;
5194
5195 case R_PPC_DTPMOD32:
5196 relocation = 1;
5197 addend = 0;
5198 goto dodyn;
5199
5200 case R_PPC_REL24:
5201 case R_PPC_REL32:
5202 case R_PPC_REL14:
5203 case R_PPC_REL14_BRTAKEN:
5204 case R_PPC_REL14_BRNTAKEN:
5205 /* If these relocations are not to a named symbol, they can be
5206 handled right here, no need to bother the dynamic linker. */
5207 if (h == NULL
5208 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
5209 || SYMBOL_REFERENCES_LOCAL (info, h))
5210 break;
5211 /* fall through */
5212
5213 /* Relocations that always need to be propagated if this is a shared
5214 object. */
5215 case R_PPC_ADDR32:
5216 case R_PPC_ADDR24:
5217 case R_PPC_ADDR16:
5218 case R_PPC_ADDR16_LO:
5219 case R_PPC_ADDR16_HI:
5220 case R_PPC_ADDR16_HA:
5221 case R_PPC_ADDR14:
5222 case R_PPC_ADDR14_BRTAKEN:
5223 case R_PPC_ADDR14_BRNTAKEN:
5224 case R_PPC_UADDR32:
5225 case R_PPC_UADDR16:
5226 /* r_symndx will be zero only for relocs against symbols
5227 from removed linkonce sections, or sections discarded by
5228 a linker script. */
5229 dodyn:
5230 if (r_symndx == 0)
5231 break;
5232 /* Fall thru. */
5233
5234 if ((info->shared
5235 && (h == NULL
5236 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5237 || h->root.type != bfd_link_hash_undefweak)
5238 && (MUST_BE_DYN_RELOC (r_type)
5239 || (h != NULL
5240 && !SYMBOL_CALLS_LOCAL (info, h))))
5241 || (ELIMINATE_COPY_RELOCS
5242 && !info->shared
5243 && (input_section->flags & SEC_ALLOC) != 0
5244 && h != NULL
5245 && h->dynindx != -1
5246 && (h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
5247 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
5248 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0))
5249 {
5250 int skip;
5251
5252 #ifdef DEBUG
5253 fprintf (stderr, "ppc_elf_relocate_section needs to "
5254 "create relocation for %s\n",
5255 (h && h->root.root.string
5256 ? h->root.root.string : "<unknown>"));
5257 #endif
5258
5259 /* When generating a shared object, these relocations
5260 are copied into the output file to be resolved at run
5261 time. */
5262 if (sreloc == NULL)
5263 {
5264 const char *name;
5265
5266 name = (bfd_elf_string_from_elf_section
5267 (input_bfd,
5268 elf_elfheader (input_bfd)->e_shstrndx,
5269 elf_section_data (input_section)->rel_hdr.sh_name));
5270 if (name == NULL)
5271 return FALSE;
5272
5273 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
5274 && strcmp (bfd_get_section_name (input_bfd,
5275 input_section),
5276 name + 5) == 0);
5277
5278 sreloc = bfd_get_section_by_name (htab->elf.dynobj, name);
5279 BFD_ASSERT (sreloc != NULL);
5280 }
5281
5282 skip = 0;
5283
5284 outrel.r_offset =
5285 _bfd_elf_section_offset (output_bfd, info, input_section,
5286 rel->r_offset);
5287 if (outrel.r_offset == (bfd_vma) -1
5288 || outrel.r_offset == (bfd_vma) -2)
5289 skip = (int) outrel.r_offset;
5290 outrel.r_offset += (input_section->output_section->vma
5291 + input_section->output_offset);
5292
5293 if (skip)
5294 memset (&outrel, 0, sizeof outrel);
5295 else if (h != NULL
5296 && !SYMBOL_REFERENCES_LOCAL (info, h))
5297 {
5298 unresolved_reloc = FALSE;
5299 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
5300 outrel.r_addend = rel->r_addend;
5301 }
5302 else
5303 {
5304 outrel.r_addend = relocation + rel->r_addend;
5305
5306 if (r_type == R_PPC_ADDR32)
5307 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
5308 else
5309 {
5310 long indx;
5311
5312 if (bfd_is_abs_section (sec))
5313 indx = 0;
5314 else if (sec == NULL || sec->owner == NULL)
5315 {
5316 bfd_set_error (bfd_error_bad_value);
5317 return FALSE;
5318 }
5319 else
5320 {
5321 asection *osec;
5322
5323 /* We are turning this relocation into one
5324 against a section symbol. It would be
5325 proper to subtract the symbol's value,
5326 osec->vma, from the emitted reloc addend,
5327 but ld.so expects buggy relocs. */
5328 osec = sec->output_section;
5329 indx = elf_section_data (osec)->dynindx;
5330 BFD_ASSERT (indx > 0);
5331 #ifdef DEBUG
5332 if (indx <= 0)
5333 printf ("indx=%d section=%s flags=%08x name=%s\n",
5334 indx, osec->name, osec->flags,
5335 h->root.root.string);
5336 #endif
5337 }
5338
5339 outrel.r_info = ELF32_R_INFO (indx, r_type);
5340 }
5341 }
5342
5343 loc = sreloc->contents;
5344 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
5345 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5346
5347 if (skip == -1)
5348 continue;
5349
5350 /* This reloc will be computed at runtime. We clear the memory
5351 so that it contains predictable value. */
5352 if (! skip
5353 && ((input_section->flags & SEC_ALLOC) != 0
5354 || ELF32_R_TYPE (outrel.r_info) != R_PPC_RELATIVE))
5355 {
5356 relocation = howto->pc_relative ? outrel.r_offset : 0;
5357 addend = 0;
5358 break;
5359 }
5360 }
5361 break;
5362
5363 /* Indirect .sdata relocation. */
5364 case R_PPC_EMB_SDAI16:
5365 BFD_ASSERT (htab->sdata != NULL);
5366 relocation
5367 = elf_finish_pointer_linker_section (output_bfd, input_bfd, info,
5368 htab->sdata, h, relocation,
5369 rel, R_PPC_RELATIVE);
5370 break;
5371
5372 /* Indirect .sdata2 relocation. */
5373 case R_PPC_EMB_SDA2I16:
5374 BFD_ASSERT (htab->sdata2 != NULL);
5375 relocation
5376 = elf_finish_pointer_linker_section (output_bfd, input_bfd, info,
5377 htab->sdata2, h, relocation,
5378 rel, R_PPC_RELATIVE);
5379 break;
5380
5381 /* Handle the TOC16 reloc. We want to use the offset within the .got
5382 section, not the actual VMA. This is appropriate when generating
5383 an embedded ELF object, for which the .got section acts like the
5384 AIX .toc section. */
5385 case R_PPC_TOC16: /* phony GOT16 relocations */
5386 BFD_ASSERT (sec != NULL);
5387 BFD_ASSERT (bfd_is_und_section (sec)
5388 || strcmp (bfd_get_section_name (abfd, sec), ".got") == 0
5389 || strcmp (bfd_get_section_name (abfd, sec), ".cgot") == 0)
5390
5391 addend -= sec->output_section->vma + sec->output_offset + 0x8000;
5392 break;
5393
5394 case R_PPC_PLTREL24:
5395 /* Relocation is to the entry for this symbol in the
5396 procedure linkage table. */
5397 BFD_ASSERT (h != NULL);
5398
5399 if (h->plt.offset == (bfd_vma) -1
5400 || htab->plt == NULL)
5401 {
5402 /* We didn't make a PLT entry for this symbol. This
5403 happens when statically linking PIC code, or when
5404 using -Bsymbolic. */
5405 break;
5406 }
5407
5408 unresolved_reloc = FALSE;
5409 relocation = (htab->plt->output_section->vma
5410 + htab->plt->output_offset
5411 + h->plt.offset);
5412 break;
5413
5414 /* Relocate against _SDA_BASE_. */
5415 case R_PPC_SDAREL16:
5416 {
5417 const char *name;
5418 const struct elf_link_hash_entry *sh;
5419
5420 BFD_ASSERT (sec != NULL);
5421 name = bfd_get_section_name (abfd, sec->output_section);
5422 if (! ((strncmp (name, ".sdata", 6) == 0
5423 && (name[6] == 0 || name[6] == '.'))
5424 || (strncmp (name, ".sbss", 5) == 0
5425 && (name[5] == 0 || name[5] == '.'))))
5426 {
5427 (*_bfd_error_handler)
5428 (_("%s: the target (%s) of a %s relocation is "
5429 "in the wrong output section (%s)"),
5430 bfd_archive_filename (input_bfd),
5431 sym_name,
5432 howto->name,
5433 name);
5434 }
5435 sh = htab->sdata->sym_hash;
5436 addend -= (sh->root.u.def.value
5437 + sh->root.u.def.section->output_section->vma
5438 + sh->root.u.def.section->output_offset);
5439 }
5440 break;
5441
5442 /* Relocate against _SDA2_BASE_. */
5443 case R_PPC_EMB_SDA2REL:
5444 {
5445 const char *name;
5446 const struct elf_link_hash_entry *sh;
5447
5448 BFD_ASSERT (sec != NULL);
5449 name = bfd_get_section_name (abfd, sec->output_section);
5450 if (! (strncmp (name, ".sdata2", 7) == 0
5451 || strncmp (name, ".sbss2", 6) == 0))
5452 {
5453 (*_bfd_error_handler)
5454 (_("%s: the target (%s) of a %s relocation is "
5455 "in the wrong output section (%s)"),
5456 bfd_archive_filename (input_bfd),
5457 sym_name,
5458 howto->name,
5459 name);
5460
5461 bfd_set_error (bfd_error_bad_value);
5462 ret = FALSE;
5463 continue;
5464 }
5465 sh = htab->sdata2->sym_hash;
5466 addend -= (sh->root.u.def.value
5467 + sh->root.u.def.section->output_section->vma
5468 + sh->root.u.def.section->output_offset);
5469 }
5470 break;
5471
5472 /* Relocate against either _SDA_BASE_, _SDA2_BASE_, or 0. */
5473 case R_PPC_EMB_SDA21:
5474 case R_PPC_EMB_RELSDA:
5475 {
5476 const char *name;
5477 const struct elf_link_hash_entry *sh;
5478 int reg;
5479
5480 BFD_ASSERT (sec != NULL);
5481 name = bfd_get_section_name (abfd, sec->output_section);
5482 if (((strncmp (name, ".sdata", 6) == 0
5483 && (name[6] == 0 || name[6] == '.'))
5484 || (strncmp (name, ".sbss", 5) == 0
5485 && (name[5] == 0 || name[5] == '.'))))
5486 {
5487 reg = 13;
5488 sh = htab->sdata->sym_hash;
5489 addend -= (sh->root.u.def.value
5490 + sh->root.u.def.section->output_section->vma
5491 + sh->root.u.def.section->output_offset);
5492 }
5493
5494 else if (strncmp (name, ".sdata2", 7) == 0
5495 || strncmp (name, ".sbss2", 6) == 0)
5496 {
5497 reg = 2;
5498 sh = htab->sdata2->sym_hash;
5499 addend -= (sh->root.u.def.value
5500 + sh->root.u.def.section->output_section->vma
5501 + sh->root.u.def.section->output_offset);
5502 }
5503
5504 else if (strcmp (name, ".PPC.EMB.sdata0") == 0
5505 || strcmp (name, ".PPC.EMB.sbss0") == 0)
5506 {
5507 reg = 0;
5508 }
5509
5510 else
5511 {
5512 (*_bfd_error_handler)
5513 (_("%s: the target (%s) of a %s relocation is "
5514 "in the wrong output section (%s)"),
5515 bfd_archive_filename (input_bfd),
5516 sym_name,
5517 howto->name,
5518 name);
5519
5520 bfd_set_error (bfd_error_bad_value);
5521 ret = FALSE;
5522 continue;
5523 }
5524
5525 if (r_type == R_PPC_EMB_SDA21)
5526 { /* fill in register field */
5527 insn = bfd_get_32 (output_bfd, contents + rel->r_offset);
5528 insn = (insn & ~RA_REGISTER_MASK) | (reg << RA_REGISTER_SHIFT);
5529 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
5530 }
5531 }
5532 break;
5533
5534 /* Relocate against the beginning of the section. */
5535 case R_PPC_SECTOFF:
5536 case R_PPC_SECTOFF_LO:
5537 case R_PPC_SECTOFF_HI:
5538 case R_PPC_SECTOFF_HA:
5539 BFD_ASSERT (sec != NULL);
5540 addend -= sec->output_section->vma;
5541 break;
5542
5543 /* Negative relocations. */
5544 case R_PPC_EMB_NADDR32:
5545 case R_PPC_EMB_NADDR16:
5546 case R_PPC_EMB_NADDR16_LO:
5547 case R_PPC_EMB_NADDR16_HI:
5548 case R_PPC_EMB_NADDR16_HA:
5549 addend -= 2 * relocation;
5550 break;
5551
5552 case R_PPC_COPY:
5553 case R_PPC_GLOB_DAT:
5554 case R_PPC_JMP_SLOT:
5555 case R_PPC_RELATIVE:
5556 case R_PPC_PLT32:
5557 case R_PPC_PLTREL32:
5558 case R_PPC_PLT16_LO:
5559 case R_PPC_PLT16_HI:
5560 case R_PPC_PLT16_HA:
5561 case R_PPC_ADDR30:
5562 case R_PPC_EMB_RELSEC16:
5563 case R_PPC_EMB_RELST_LO:
5564 case R_PPC_EMB_RELST_HI:
5565 case R_PPC_EMB_RELST_HA:
5566 case R_PPC_EMB_BIT_FLD:
5567 (*_bfd_error_handler)
5568 (_("%s: relocation %s is not yet supported for symbol %s."),
5569 bfd_archive_filename (input_bfd),
5570 howto->name,
5571 sym_name);
5572
5573 bfd_set_error (bfd_error_invalid_operation);
5574 ret = FALSE;
5575 continue;
5576 }
5577
5578 /* Do any further special processing. */
5579 switch (r_type)
5580 {
5581 default:
5582 break;
5583
5584 case R_PPC_ADDR16_HA:
5585 case R_PPC_GOT16_HA:
5586 case R_PPC_PLT16_HA:
5587 case R_PPC_SECTOFF_HA:
5588 case R_PPC_TPREL16_HA:
5589 case R_PPC_DTPREL16_HA:
5590 case R_PPC_GOT_TLSGD16_HA:
5591 case R_PPC_GOT_TLSLD16_HA:
5592 case R_PPC_GOT_TPREL16_HA:
5593 case R_PPC_GOT_DTPREL16_HA:
5594 case R_PPC_EMB_NADDR16_HA:
5595 case R_PPC_EMB_RELST_HA:
5596 /* It's just possible that this symbol is a weak symbol
5597 that's not actually defined anywhere. In that case,
5598 'sec' would be NULL, and we should leave the symbol
5599 alone (it will be set to zero elsewhere in the link). */
5600 if (sec != NULL)
5601 /* Add 0x10000 if sign bit in 0:15 is set.
5602 Bits 0:15 are not used. */
5603 addend += 0x8000;
5604 break;
5605 }
5606
5607 #ifdef DEBUG
5608 fprintf (stderr, "\ttype = %s (%d), name = %s, symbol index = %ld, "
5609 "offset = %ld, addend = %ld\n",
5610 howto->name,
5611 (int) r_type,
5612 sym_name,
5613 r_symndx,
5614 (long) rel->r_offset,
5615 (long) addend);
5616 #endif
5617
5618 if (unresolved_reloc
5619 && !((input_section->flags & SEC_DEBUGGING) != 0
5620 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
5621 {
5622 (*_bfd_error_handler)
5623 (_("%s(%s+0x%lx): unresolvable %s relocation against symbol `%s'"),
5624 bfd_archive_filename (input_bfd),
5625 bfd_get_section_name (input_bfd, input_section),
5626 (long) rel->r_offset,
5627 howto->name,
5628 sym_name);
5629 ret = FALSE;
5630 }
5631
5632 r = _bfd_final_link_relocate (howto,
5633 input_bfd,
5634 input_section,
5635 contents,
5636 rel->r_offset,
5637 relocation,
5638 addend);
5639
5640 if (r != bfd_reloc_ok)
5641 {
5642 if (sym_name == NULL)
5643 sym_name = "(null)";
5644 if (r == bfd_reloc_overflow)
5645 {
5646 if (warned)
5647 continue;
5648 if (h != NULL
5649 && h->root.type == bfd_link_hash_undefweak
5650 && howto->pc_relative)
5651 {
5652 /* Assume this is a call protected by other code that
5653 detect the symbol is undefined. If this is the case,
5654 we can safely ignore the overflow. If not, the
5655 program is hosed anyway, and a little warning isn't
5656 going to help. */
5657
5658 continue;
5659 }
5660
5661 if (! (*info->callbacks->reloc_overflow) (info,
5662 sym_name,
5663 howto->name,
5664 rel->r_addend,
5665 input_bfd,
5666 input_section,
5667 rel->r_offset))
5668 return FALSE;
5669 }
5670 else
5671 {
5672 (*_bfd_error_handler)
5673 (_("%s(%s+0x%lx): %s reloc against `%s': error %d"),
5674 bfd_archive_filename (input_bfd),
5675 bfd_get_section_name (input_bfd, input_section),
5676 (long) rel->r_offset, howto->name, sym_name, (int) r);
5677 ret = FALSE;
5678 }
5679 }
5680 }
5681
5682 #ifdef DEBUG
5683 fprintf (stderr, "\n");
5684 #endif
5685
5686 return ret;
5687 }
5688
5689 static enum elf_reloc_type_class
5690 ppc_elf_reloc_type_class (const Elf_Internal_Rela *rela)
5691 {
5692 switch (ELF32_R_TYPE (rela->r_info))
5693 {
5694 case R_PPC_RELATIVE:
5695 return reloc_class_relative;
5696 case R_PPC_REL24:
5697 case R_PPC_ADDR24:
5698 case R_PPC_JMP_SLOT:
5699 return reloc_class_plt;
5700 case R_PPC_COPY:
5701 return reloc_class_copy;
5702 default:
5703 return reloc_class_normal;
5704 }
5705 }
5706 \f
5707 /* Support for core dump NOTE sections. */
5708
5709 static bfd_boolean
5710 ppc_elf_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
5711 {
5712 int offset;
5713 unsigned int raw_size;
5714
5715 switch (note->descsz)
5716 {
5717 default:
5718 return FALSE;
5719
5720 case 268: /* Linux/PPC. */
5721 /* pr_cursig */
5722 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
5723
5724 /* pr_pid */
5725 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
5726
5727 /* pr_reg */
5728 offset = 72;
5729 raw_size = 192;
5730
5731 break;
5732 }
5733
5734 /* Make a ".reg/999" section. */
5735 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
5736 raw_size, note->descpos + offset);
5737 }
5738
5739 static bfd_boolean
5740 ppc_elf_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
5741 {
5742 switch (note->descsz)
5743 {
5744 default:
5745 return FALSE;
5746
5747 case 128: /* Linux/PPC elf_prpsinfo. */
5748 elf_tdata (abfd)->core_program
5749 = _bfd_elfcore_strndup (abfd, note->descdata + 32, 16);
5750 elf_tdata (abfd)->core_command
5751 = _bfd_elfcore_strndup (abfd, note->descdata + 48, 80);
5752 }
5753
5754 /* Note that for some reason, a spurious space is tacked
5755 onto the end of the args in some (at least one anyway)
5756 implementations, so strip it off if it exists. */
5757
5758 {
5759 char *command = elf_tdata (abfd)->core_command;
5760 int n = strlen (command);
5761
5762 if (0 < n && command[n - 1] == ' ')
5763 command[n - 1] = '\0';
5764 }
5765
5766 return TRUE;
5767 }
5768 \f
5769 /* Very simple linked list structure for recording apuinfo values. */
5770 typedef struct apuinfo_list
5771 {
5772 struct apuinfo_list *next;
5773 unsigned long value;
5774 }
5775 apuinfo_list;
5776
5777 static apuinfo_list *head;
5778
5779
5780 static void
5781 apuinfo_list_init (void)
5782 {
5783 head = NULL;
5784 }
5785
5786 static void
5787 apuinfo_list_add (unsigned long value)
5788 {
5789 apuinfo_list *entry = head;
5790
5791 while (entry != NULL)
5792 {
5793 if (entry->value == value)
5794 return;
5795 entry = entry->next;
5796 }
5797
5798 entry = bfd_malloc (sizeof (* entry));
5799 if (entry == NULL)
5800 return;
5801
5802 entry->value = value;
5803 entry->next = head;
5804 head = entry;
5805 }
5806
5807 static unsigned
5808 apuinfo_list_length (void)
5809 {
5810 apuinfo_list *entry;
5811 unsigned long count;
5812
5813 for (entry = head, count = 0;
5814 entry;
5815 entry = entry->next)
5816 ++ count;
5817
5818 return count;
5819 }
5820
5821 static inline unsigned long
5822 apuinfo_list_element (unsigned long number)
5823 {
5824 apuinfo_list * entry;
5825
5826 for (entry = head;
5827 entry && number --;
5828 entry = entry->next)
5829 ;
5830
5831 return entry ? entry->value : 0;
5832 }
5833
5834 static void
5835 apuinfo_list_finish (void)
5836 {
5837 apuinfo_list *entry;
5838
5839 for (entry = head; entry;)
5840 {
5841 apuinfo_list *next = entry->next;
5842 free (entry);
5843 entry = next;
5844 }
5845
5846 head = NULL;
5847 }
5848
5849 #define APUINFO_SECTION_NAME ".PPC.EMB.apuinfo"
5850 #define APUINFO_LABEL "APUinfo"
5851
5852 /* Scan the input BFDs and create a linked list of
5853 the APUinfo values that will need to be emitted. */
5854
5855 static void
5856 ppc_elf_begin_write_processing (bfd *abfd, struct bfd_link_info *link_info)
5857 {
5858 bfd *ibfd;
5859 asection *asec;
5860 char *buffer;
5861 unsigned num_input_sections;
5862 bfd_size_type output_section_size;
5863 unsigned i;
5864 unsigned num_entries;
5865 unsigned long offset;
5866 unsigned long length;
5867 const char *error_message = NULL;
5868
5869 if (link_info == NULL)
5870 return;
5871
5872 /* Scan the input bfds, looking for apuinfo sections. */
5873 num_input_sections = 0;
5874 output_section_size = 0;
5875
5876 for (ibfd = link_info->input_bfds; ibfd; ibfd = ibfd->link_next)
5877 {
5878 asec = bfd_get_section_by_name (ibfd, APUINFO_SECTION_NAME);
5879 if (asec)
5880 {
5881 ++ num_input_sections;
5882 output_section_size += asec->_raw_size;
5883 }
5884 }
5885
5886 /* We need at least one input sections
5887 in order to make merging worthwhile. */
5888 if (num_input_sections < 1)
5889 return;
5890
5891 /* Just make sure that the output section exists as well. */
5892 asec = bfd_get_section_by_name (abfd, APUINFO_SECTION_NAME);
5893 if (asec == NULL)
5894 return;
5895
5896 /* Allocate a buffer for the contents of the input sections. */
5897 buffer = bfd_malloc (output_section_size);
5898 if (buffer == NULL)
5899 return;
5900
5901 offset = 0;
5902 apuinfo_list_init ();
5903
5904 /* Read in the input sections contents. */
5905 for (ibfd = link_info->input_bfds; ibfd; ibfd = ibfd->link_next)
5906 {
5907 unsigned long datum;
5908 char *ptr;
5909
5910 asec = bfd_get_section_by_name (ibfd, APUINFO_SECTION_NAME);
5911 if (asec == NULL)
5912 continue;
5913
5914 length = asec->_raw_size;
5915 if (length < 24)
5916 {
5917 error_message = _("corrupt or empty %s section in %s");
5918 goto fail;
5919 }
5920
5921 if (bfd_seek (ibfd, asec->filepos, SEEK_SET) != 0
5922 || (bfd_bread (buffer + offset, length, ibfd) != length))
5923 {
5924 error_message = _("unable to read in %s section from %s");
5925 goto fail;
5926 }
5927
5928 /* Process the contents of the section. */
5929 ptr = buffer + offset;
5930 error_message = _("corrupt %s section in %s");
5931
5932 /* Verify the contents of the header. Note - we have to
5933 extract the values this way in order to allow for a
5934 host whose endian-ness is different from the target. */
5935 datum = bfd_get_32 (ibfd, ptr);
5936 if (datum != sizeof APUINFO_LABEL)
5937 goto fail;
5938
5939 datum = bfd_get_32 (ibfd, ptr + 8);
5940 if (datum != 0x2)
5941 goto fail;
5942
5943 if (strcmp (ptr + 12, APUINFO_LABEL) != 0)
5944 goto fail;
5945
5946 /* Get the number of bytes used for apuinfo entries. */
5947 datum = bfd_get_32 (ibfd, ptr + 4);
5948 if (datum + 20 != length)
5949 goto fail;
5950
5951 /* Make sure that we do not run off the end of the section. */
5952 if (offset + length > output_section_size)
5953 goto fail;
5954
5955 /* Scan the apuinfo section, building a list of apuinfo numbers. */
5956 for (i = 0; i < datum; i += 4)
5957 apuinfo_list_add (bfd_get_32 (ibfd, ptr + 20 + i));
5958
5959 /* Update the offset. */
5960 offset += length;
5961 }
5962
5963 error_message = NULL;
5964
5965 /* Compute the size of the output section. */
5966 num_entries = apuinfo_list_length ();
5967 output_section_size = 20 + num_entries * 4;
5968
5969 asec = bfd_get_section_by_name (abfd, APUINFO_SECTION_NAME);
5970
5971 if (! bfd_set_section_size (abfd, asec, output_section_size))
5972 ibfd = abfd,
5973 error_message = _("warning: unable to set size of %s section in %s");
5974
5975 fail:
5976 free (buffer);
5977
5978 if (error_message)
5979 (*_bfd_error_handler) (error_message, APUINFO_SECTION_NAME,
5980 bfd_archive_filename (ibfd));
5981 }
5982
5983
5984 /* Prevent the output section from accumulating the input sections'
5985 contents. We have already stored this in our linked list structure. */
5986
5987 static bfd_boolean
5988 ppc_elf_write_section (bfd *abfd ATTRIBUTE_UNUSED,
5989 asection *asec,
5990 bfd_byte *contents ATTRIBUTE_UNUSED)
5991 {
5992 return (apuinfo_list_length ()
5993 && strcmp (asec->name, APUINFO_SECTION_NAME) == 0);
5994 }
5995
5996
5997 /* Finally we can generate the output section. */
5998
5999 static void
6000 ppc_elf_final_write_processing (bfd *abfd, bfd_boolean linker ATTRIBUTE_UNUSED)
6001 {
6002 bfd_byte *buffer;
6003 asection *asec;
6004 unsigned i;
6005 unsigned num_entries;
6006 bfd_size_type length;
6007
6008 asec = bfd_get_section_by_name (abfd, APUINFO_SECTION_NAME);
6009 if (asec == NULL)
6010 return;
6011
6012 if (apuinfo_list_length () == 0)
6013 return;
6014
6015 length = asec->_raw_size;
6016 if (length < 20)
6017 return;
6018
6019 buffer = bfd_malloc (length);
6020 if (buffer == NULL)
6021 {
6022 (*_bfd_error_handler)
6023 (_("failed to allocate space for new APUinfo section."));
6024 return;
6025 }
6026
6027 /* Create the apuinfo header. */
6028 num_entries = apuinfo_list_length ();
6029 bfd_put_32 (abfd, sizeof APUINFO_LABEL, buffer);
6030 bfd_put_32 (abfd, num_entries * 4, buffer + 4);
6031 bfd_put_32 (abfd, 0x2, buffer + 8);
6032 strcpy (buffer + 12, APUINFO_LABEL);
6033
6034 length = 20;
6035 for (i = 0; i < num_entries; i++)
6036 {
6037 bfd_put_32 (abfd, apuinfo_list_element (i), buffer + length);
6038 length += 4;
6039 }
6040
6041 if (length != asec->_raw_size)
6042 (*_bfd_error_handler) (_("failed to compute new APUinfo section."));
6043
6044 if (! bfd_set_section_contents (abfd, asec, buffer, (file_ptr) 0, length))
6045 (*_bfd_error_handler) (_("failed to install new APUinfo section."));
6046
6047 free (buffer);
6048
6049 apuinfo_list_finish ();
6050 }
6051 \f
6052 #define TARGET_LITTLE_SYM bfd_elf32_powerpcle_vec
6053 #define TARGET_LITTLE_NAME "elf32-powerpcle"
6054 #define TARGET_BIG_SYM bfd_elf32_powerpc_vec
6055 #define TARGET_BIG_NAME "elf32-powerpc"
6056 #define ELF_ARCH bfd_arch_powerpc
6057 #define ELF_MACHINE_CODE EM_PPC
6058 #define ELF_MAXPAGESIZE 0x10000
6059 #define elf_info_to_howto ppc_elf_info_to_howto
6060
6061 #ifdef EM_CYGNUS_POWERPC
6062 #define ELF_MACHINE_ALT1 EM_CYGNUS_POWERPC
6063 #endif
6064
6065 #ifdef EM_PPC_OLD
6066 #define ELF_MACHINE_ALT2 EM_PPC_OLD
6067 #endif
6068
6069 #define elf_backend_plt_not_loaded 1
6070 #define elf_backend_got_symbol_offset 4
6071 #define elf_backend_can_gc_sections 1
6072 #define elf_backend_can_refcount 1
6073 #define elf_backend_got_header_size 12
6074 #define elf_backend_plt_header_size PLT_INITIAL_ENTRY_SIZE
6075 #define elf_backend_rela_normal 1
6076
6077 #define bfd_elf32_bfd_merge_private_bfd_data ppc_elf_merge_private_bfd_data
6078 #define bfd_elf32_bfd_relax_section ppc_elf_relax_section
6079 #define bfd_elf32_bfd_reloc_type_lookup ppc_elf_reloc_type_lookup
6080 #define bfd_elf32_bfd_set_private_flags ppc_elf_set_private_flags
6081 #define bfd_elf32_bfd_link_hash_table_create ppc_elf_link_hash_table_create
6082
6083 #define elf_backend_object_p ppc_elf_object_p
6084 #define elf_backend_gc_mark_hook ppc_elf_gc_mark_hook
6085 #define elf_backend_gc_sweep_hook ppc_elf_gc_sweep_hook
6086 #define elf_backend_section_from_shdr ppc_elf_section_from_shdr
6087 #define elf_backend_relocate_section ppc_elf_relocate_section
6088 #define elf_backend_create_dynamic_sections ppc_elf_create_dynamic_sections
6089 #define elf_backend_check_relocs ppc_elf_check_relocs
6090 #define elf_backend_copy_indirect_symbol ppc_elf_copy_indirect_symbol
6091 #define elf_backend_adjust_dynamic_symbol ppc_elf_adjust_dynamic_symbol
6092 #define elf_backend_add_symbol_hook ppc_elf_add_symbol_hook
6093 #define elf_backend_size_dynamic_sections ppc_elf_size_dynamic_sections
6094 #define elf_backend_finish_dynamic_symbol ppc_elf_finish_dynamic_symbol
6095 #define elf_backend_finish_dynamic_sections ppc_elf_finish_dynamic_sections
6096 #define elf_backend_fake_sections ppc_elf_fake_sections
6097 #define elf_backend_additional_program_headers ppc_elf_additional_program_headers
6098 #define elf_backend_modify_segment_map ppc_elf_modify_segment_map
6099 #define elf_backend_grok_prstatus ppc_elf_grok_prstatus
6100 #define elf_backend_grok_psinfo ppc_elf_grok_psinfo
6101 #define elf_backend_reloc_type_class ppc_elf_reloc_type_class
6102 #define elf_backend_begin_write_processing ppc_elf_begin_write_processing
6103 #define elf_backend_final_write_processing ppc_elf_final_write_processing
6104 #define elf_backend_write_section ppc_elf_write_section
6105
6106 #include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.158603 seconds and 5 git commands to generate.