projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
* scripttempl/elf.sc: Put linkonce reloc section in other
[deliverable/binutils-gdb.git] / bfd / elf32-ppc.c
CommitLineData
bcbe2c71 1/* PowerPC-specific support for 32-bit ELF
71897943 2 Copyright 1994, 1995, 1996 Free Software Foundation, Inc.
bcbe2c71
MM		 3 Written by Ian Lance Taylor, Cygnus Support.
4
5This file is part of BFD, the Binary File Descriptor library.
6
7This program is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation; either version 2 of the License, or
10(at your option) any later version.
11
12This program is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with this program; if not, write to the Free Software
dd82c578 19Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
bcbe2c71
MM		 20
21/* This file is based on a preliminary PowerPC ELF ABI. The
22 information may not match the final PowerPC ELF ABI. It includes
23 suggestions from the in-progress Embedded PowerPC ABI, and that
24 information may also not match. */
25
26#include "bfd.h"
27#include "sysdep.h"
ede4eed4 28#include "bfdlink.h"
bcbe2c71 29#include "libbfd.h"
08556813 30#include "elf-bfd.h"
ede4eed4 31#include "elf/ppc.h"
bcbe2c71 32
08556813
MM		 33#define USE_RELA /* we want RELA relocations, not REL */
34
35/* PowerPC relocations defined by the ABIs */
36enum ppc_reloc_type
37{
38 R_PPC_NONE = 0,
39 R_PPC_ADDR32 = 1,
40 R_PPC_ADDR24 = 2,
41 R_PPC_ADDR16 = 3,
42 R_PPC_ADDR16_LO = 4,
43 R_PPC_ADDR16_HI = 5,
44 R_PPC_ADDR16_HA = 6,
45 R_PPC_ADDR14 = 7,
46 R_PPC_ADDR14_BRTAKEN = 8,
47 R_PPC_ADDR14_BRNTAKEN = 9,
48 R_PPC_REL24 = 10,
49 R_PPC_REL14 = 11,
50 R_PPC_REL14_BRTAKEN = 12,
51 R_PPC_REL14_BRNTAKEN = 13,
52 R_PPC_GOT16 = 14,
53 R_PPC_GOT16_LO = 15,
54 R_PPC_GOT16_HI = 16,
55 R_PPC_GOT16_HA = 17,
56 R_PPC_PLTREL24 = 18,
57 R_PPC_COPY = 19,
58 R_PPC_GLOB_DAT = 20,
59 R_PPC_JMP_SLOT = 21,
60 R_PPC_RELATIVE = 22,
61 R_PPC_LOCAL24PC = 23,
62 R_PPC_UADDR32 = 24,
63 R_PPC_UADDR16 = 25,
64 R_PPC_REL32 = 26,
65 R_PPC_PLT32 = 27,
66 R_PPC_PLTREL32 = 28,
67 R_PPC_PLT16_LO = 29,
68 R_PPC_PLT16_HI = 30,
69 R_PPC_PLT16_HA = 31,
70 R_PPC_SDAREL16 = 32,
71 R_PPC_SECTOFF = 33,
72 R_PPC_SECTOFF_LO = 34,
73 R_PPC_SECTOFF_HI = 35,
74 R_PPC_SECTOFF_HA = 36,
75
76 /* The remaining relocs are from the Embedded ELF ABI, and are not
77 in the SVR4 ELF ABI. */
78 R_PPC_EMB_NADDR32 = 101,
79 R_PPC_EMB_NADDR16 = 102,
80 R_PPC_EMB_NADDR16_LO = 103,
81 R_PPC_EMB_NADDR16_HI = 104,
82 R_PPC_EMB_NADDR16_HA = 105,
83 R_PPC_EMB_SDAI16 = 106,
84 R_PPC_EMB_SDA2I16 = 107,
85 R_PPC_EMB_SDA2REL = 108,
86 R_PPC_EMB_SDA21 = 109,
87 R_PPC_EMB_MRKREF = 110,
88 R_PPC_EMB_RELSEC16 = 111,
89 R_PPC_EMB_RELST_LO = 112,
90 R_PPC_EMB_RELST_HI = 113,
91 R_PPC_EMB_RELST_HA = 114,
92 R_PPC_EMB_BIT_FLD = 115,
93 R_PPC_EMB_RELSDA = 116,
94
95 /* This is a phony reloc to handle any old fashioned TOC16 references
96 that may still be in object files. */
97 R_PPC_TOC16 = 255,
98
99 R_PPC_max
100};
101
ede4eed4 102static reloc_howto_type *ppc_elf_reloc_type_lookup
bcbe2c71 103 PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
ede4eed4 104static void ppc_elf_info_to_howto
bcbe2c71 105 PARAMS ((bfd *abfd, arelent *cache_ptr, Elf32_Internal_Rela *dst));
ede4eed4 106static void ppc_elf_howto_init PARAMS ((void));
dab45734
ILT		 107static bfd_reloc_status_type ppc_elf_addr16_ha_reloc
108 PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
ede4eed4
KR		 109static boolean ppc_elf_set_private_flags PARAMS ((bfd *, flagword));
110static boolean ppc_elf_copy_private_bfd_data PARAMS ((bfd *, bfd *));
111static boolean ppc_elf_merge_private_bfd_data PARAMS ((bfd *, bfd *));
112
3f7ca26b
MM		 113static int ppc_elf_additional_program_headers PARAMS ((bfd *));
114static boolean ppc_elf_modify_segment_map PARAMS ((bfd *));
115
83f4323e
MM		 116static boolean ppc_elf_section_from_shdr PARAMS ((bfd *,
117 Elf32_Internal_Shdr *,
118 char *));
119
3b3753b8
MM		 120static elf_linker_section_t *ppc_elf_create_linker_section
121 PARAMS ((bfd *abfd,
122 struct bfd_link_info *info,
123 enum elf_linker_section_enum));
1c3a295b 124
08556813
MM		 125static boolean ppc_elf_check_relocs PARAMS ((bfd *,
126 struct bfd_link_info *,
127 asection *,
128 const Elf_Internal_Rela *));
129
130static boolean ppc_elf_adjust_dynamic_symbol PARAMS ((struct bfd_link_info *,
131 struct elf_link_hash_entry *));
132
133static boolean ppc_elf_adjust_dynindx PARAMS ((struct elf_link_hash_entry *, PTR));
134
135static boolean ppc_elf_size_dynamic_sections PARAMS ((bfd *, struct bfd_link_info *));
136
ede4eed4
KR		 137static boolean ppc_elf_relocate_section PARAMS ((bfd *,
138 struct bfd_link_info *info,
139 bfd *,
140 asection *,
141 bfd_byte *,
142 Elf_Internal_Rela *relocs,
143 Elf_Internal_Sym *local_syms,
144 asection **));
bcbe2c71 145
9d621c7d
MM		 146static boolean ppc_elf_add_symbol_hook PARAMS ((bfd *,
147 struct bfd_link_info *,
148 const Elf_Internal_Sym *,
149 const char **,
150 flagword *,
151 asection **,
152 bfd_vma *));
153
08556813
MM		 154static boolean ppc_elf_finish_dynamic_symbol PARAMS ((bfd *,
155 struct bfd_link_info *,
156 struct elf_link_hash_entry *,
157 Elf_Internal_Sym *));
bcbe2c71 158
08556813 159static boolean ppc_elf_finish_dynamic_sections PARAMS ((bfd *, struct bfd_link_info *));
bcbe2c71 160
d8fd85ad
MM		 161#define BRANCH_PREDICT_BIT 0x200000 /* branch prediction bit for branch taken relocs */
162#define RA_REGISTER_MASK 0x001f0000 /* mask to set RA in memory instructions */
163#define RA_REGISTER_SHIFT 16 /* value to shift register by to insert RA */
08556813
MM		 164
165/* The name of the dynamic interpreter. This is put in the .interp
166 section. */
167
168#define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
bcbe2c71 169
3f7ca26b
MM		 170/* The size in bytes of an entry in the procedure linkage table, and of the initial size
171 of the plt reserved for the dynamic linker. */
172
173#define PLT_ENTRY_SIZE 12
174#define PLT_INITIAL_ENTRY_SIZE 72
175
ede4eed4
KR		 176\f
177static reloc_howto_type *ppc_elf_howto_table[ (int)R_PPC_max ];
178
179static reloc_howto_type ppc_elf_howto_raw[] =
bcbe2c71
MM		 180{
181 /* This reloc does nothing. */
08556813
MM		 182 HOWTO (R_PPC_NONE, /* type */
183 0, /* rightshift */
184 2, /* size (0 = byte, 1 = short, 2 = long) */
185 32, /* bitsize */
186 false, /* pc_relative */
187 0, /* bitpos */
bcbe2c71 188 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 189 bfd_elf_generic_reloc, /* special_function */
08556813
MM		 190 "R_PPC_NONE", /* name */
191 false, /* partial_inplace */
192 0, /* src_mask */
193 0, /* dst_mask */
194 false), /* pcrel_offset */
bcbe2c71
MM		 195
196 /* A standard 32 bit relocation. */
08556813
MM		 197 HOWTO (R_PPC_ADDR32, /* type */
198 0, /* rightshift */
199 2, /* size (0 = byte, 1 = short, 2 = long) */
200 32, /* bitsize */
201 false, /* pc_relative */
202 0, /* bitpos */
bcbe2c71 203 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 204 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 205 "R_PPC_ADDR32", /* name */
08556813
MM		 206 false, /* partial_inplace */
207 0, /* src_mask */
208 0xffffffff, /* dst_mask */
209 false), /* pcrel_offset */
bcbe2c71
MM		 210
211 /* An absolute 26 bit branch; the lower two bits must be zero.
212 FIXME: we don't check that, we just clear them. */
08556813
MM		 213 HOWTO (R_PPC_ADDR24, /* type */
214 0, /* rightshift */
215 2, /* size (0 = byte, 1 = short, 2 = long) */
216 26, /* bitsize */
217 false, /* pc_relative */
218 0, /* bitpos */
bcbe2c71 219 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 220 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 221 "R_PPC_ADDR24", /* name */
08556813
MM		 222 false, /* partial_inplace */
223 0, /* src_mask */
224 0x3fffffc, /* dst_mask */
225 false), /* pcrel_offset */
bcbe2c71
MM		 226
227 /* A standard 16 bit relocation. */
08556813
MM		 228 HOWTO (R_PPC_ADDR16, /* type */
229 0, /* rightshift */
230 1, /* size (0 = byte, 1 = short, 2 = long) */
231 16, /* bitsize */
232 false, /* pc_relative */
233 0, /* bitpos */
bcbe2c71 234 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 235 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 236 "R_PPC_ADDR16", /* name */
08556813
MM		 237 false, /* partial_inplace */
238 0, /* src_mask */
239 0xffff, /* dst_mask */
240 false), /* pcrel_offset */
bcbe2c71
MM		 241
242 /* A 16 bit relocation without overflow. */
08556813
MM		 243 HOWTO (R_PPC_ADDR16_LO, /* type */
244 0, /* rightshift */
245 1, /* size (0 = byte, 1 = short, 2 = long) */
246 16, /* bitsize */
247 false, /* pc_relative */
248 0, /* bitpos */
bcbe2c71 249 complain_overflow_dont,/* complain_on_overflow */
bd2d10c0 250 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 251 "R_PPC_ADDR16_LO", /* name */
08556813
MM		 252 false, /* partial_inplace */
253 0, /* src_mask */
254 0xffff, /* dst_mask */
255 false), /* pcrel_offset */
bcbe2c71
MM		 256
257 /* The high order 16 bits of an address. */
08556813
MM		 258 HOWTO (R_PPC_ADDR16_HI, /* type */
259 16, /* rightshift */
260 1, /* size (0 = byte, 1 = short, 2 = long) */
261 16, /* bitsize */
262 false, /* pc_relative */
263 0, /* bitpos */
bcbe2c71 264 complain_overflow_dont, /* complain_on_overflow */
bd2d10c0 265 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 266 "R_PPC_ADDR16_HI", /* name */
08556813
MM		 267 false, /* partial_inplace */
268 0, /* src_mask */
269 0xffff, /* dst_mask */
270 false), /* pcrel_offset */
bcbe2c71
MM		 271
272 /* The high order 16 bits of an address, plus 1 if the contents of
08556813
MM		 273 the low 16 bits, treated as a signed number, is negative. */
274 HOWTO (R_PPC_ADDR16_HA, /* type */
275 16, /* rightshift */
276 1, /* size (0 = byte, 1 = short, 2 = long) */
277 16, /* bitsize */
278 false, /* pc_relative */
279 0, /* bitpos */
bcbe2c71 280 complain_overflow_dont, /* complain_on_overflow */
dab45734 281 ppc_elf_addr16_ha_reloc, /* special_function */
bcbe2c71 282 "R_PPC_ADDR16_HA", /* name */
08556813
MM		 283 false, /* partial_inplace */
284 0, /* src_mask */
285 0xffff, /* dst_mask */
286 false), /* pcrel_offset */
bcbe2c71
MM		 287
288 /* An absolute 16 bit branch; the lower two bits must be zero.
289 FIXME: we don't check that, we just clear them. */
08556813
MM		 290 HOWTO (R_PPC_ADDR14, /* type */
291 0, /* rightshift */
292 2, /* size (0 = byte, 1 = short, 2 = long) */
293 16, /* bitsize */
294 false, /* pc_relative */
295 0, /* bitpos */
bcbe2c71 296 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 297 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 298 "R_PPC_ADDR14", /* name */
08556813
MM		 299 false, /* partial_inplace */
300 0, /* src_mask */
301 0xfffc, /* dst_mask */
302 false), /* pcrel_offset */
bcbe2c71
MM		 303
304 /* An absolute 16 bit branch, for which bit 10 should be set to
08556813
MM		 305 indicate that the branch is expected to be taken. The lower two
306 bits must be zero. */
307 HOWTO (R_PPC_ADDR14_BRTAKEN, /* type */
308 0, /* rightshift */
309 2, /* size (0 = byte, 1 = short, 2 = long) */
310 16, /* bitsize */
311 false, /* pc_relative */
312 0, /* bitpos */
bcbe2c71 313 complain_overflow_bitfield, /* complain_on_overflow */
07a159db 314 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 315 "R_PPC_ADDR14_BRTAKEN",/* name */
08556813
MM		 316 false, /* partial_inplace */
317 0, /* src_mask */
318 0xfffc, /* dst_mask */
319 false), /* pcrel_offset */
bcbe2c71
MM		 320
321 /* An absolute 16 bit branch, for which bit 10 should be set to
322 indicate that the branch is not expected to be taken. The lower
323 two bits must be zero. */
324 HOWTO (R_PPC_ADDR14_BRNTAKEN, /* type */
08556813
MM		 325 0, /* rightshift */
326 2, /* size (0 = byte, 1 = short, 2 = long) */
327 16, /* bitsize */
328 false, /* pc_relative */
329 0, /* bitpos */
bcbe2c71 330 complain_overflow_bitfield, /* complain_on_overflow */
07a159db 331 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 332 "R_PPC_ADDR14_BRNTAKEN",/* name */
08556813
MM		 333 false, /* partial_inplace */
334 0, /* src_mask */
335 0xfffc, /* dst_mask */
336 false), /* pcrel_offset */
337
338 /* A relative 26 bit branch; the lower two bits must be zero. */
339 HOWTO (R_PPC_REL24, /* type */
340 0, /* rightshift */
341 2, /* size (0 = byte, 1 = short, 2 = long) */
342 26, /* bitsize */
343 true, /* pc_relative */
344 0, /* bitpos */
bcbe2c71 345 complain_overflow_signed, /* complain_on_overflow */
bd2d10c0 346 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 347 "R_PPC_REL24", /* name */
08556813
MM		 348 false, /* partial_inplace */
349 0, /* src_mask */
350 0x3fffffc, /* dst_mask */
351 true), /* pcrel_offset */
352
353 /* A relative 16 bit branch; the lower two bits must be zero. */
354 HOWTO (R_PPC_REL14, /* type */
355 0, /* rightshift */
356 2, /* size (0 = byte, 1 = short, 2 = long) */
357 16, /* bitsize */
358 true, /* pc_relative */
359 0, /* bitpos */
bcbe2c71 360 complain_overflow_signed, /* complain_on_overflow */
bd2d10c0 361 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 362 "R_PPC_REL14", /* name */
08556813
MM		 363 false, /* partial_inplace */
364 0, /* src_mask */
365 0xfffc, /* dst_mask */
366 true), /* pcrel_offset */
bcbe2c71 367
08556813 368 /* A relative 16 bit branch. Bit 10 should be set to indicate that
bcbe2c71
MM		 369 the branch is expected to be taken. The lower two bits must be
370 zero. */
08556813
MM		 371 HOWTO (R_PPC_REL14_BRTAKEN, /* type */
372 0, /* rightshift */
373 2, /* size (0 = byte, 1 = short, 2 = long) */
374 16, /* bitsize */
375 true, /* pc_relative */
376 0, /* bitpos */
bcbe2c71 377 complain_overflow_signed, /* complain_on_overflow */
07a159db 378 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 379 "R_PPC_REL14_BRTAKEN", /* name */
08556813
MM		 380 false, /* partial_inplace */
381 0, /* src_mask */
382 0xfffc, /* dst_mask */
383 true), /* pcrel_offset */
bcbe2c71 384
08556813 385 /* A relative 16 bit branch. Bit 10 should be set to indicate that
bcbe2c71
MM		 386 the branch is not expected to be taken. The lower two bits must
387 be zero. */
08556813
MM		 388 HOWTO (R_PPC_REL14_BRNTAKEN, /* type */
389 0, /* rightshift */
390 2, /* size (0 = byte, 1 = short, 2 = long) */
391 16, /* bitsize */
392 true, /* pc_relative */
393 0, /* bitpos */
bcbe2c71 394 complain_overflow_signed, /* complain_on_overflow */
07a159db 395 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 396 "R_PPC_REL14_BRNTAKEN",/* name */
08556813
MM		 397 false, /* partial_inplace */
398 0, /* src_mask */
399 0xfffc, /* dst_mask */
400 true), /* pcrel_offset */
bcbe2c71
MM		 401
402 /* Like R_PPC_ADDR16, but referring to the GOT table entry for the
403 symbol. */
08556813
MM		 404 HOWTO (R_PPC_GOT16, /* type */
405 0, /* rightshift */
406 1, /* size (0 = byte, 1 = short, 2 = long) */
407 16, /* bitsize */
408 false, /* pc_relative */
409 0, /* bitpos */
ede4eed4 410 complain_overflow_signed, /* complain_on_overflow */
07a159db 411 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 412 "R_PPC_GOT16", /* name */
08556813
MM		 413 false, /* partial_inplace */
414 0, /* src_mask */
415 0xffff, /* dst_mask */
416 false), /* pcrel_offset */
bcbe2c71
MM		 417
418 /* Like R_PPC_ADDR16_LO, but referring to the GOT table entry for
419 the symbol. */
08556813
MM		 420 HOWTO (R_PPC_GOT16_LO, /* type */
421 0, /* rightshift */
422 1, /* size (0 = byte, 1 = short, 2 = long) */
423 16, /* bitsize */
424 false, /* pc_relative */
425 0, /* bitpos */
bcbe2c71 426 complain_overflow_bitfield, /* complain_on_overflow */
07a159db 427 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 428 "R_PPC_GOT16_LO", /* name */
08556813
MM		 429 false, /* partial_inplace */
430 0, /* src_mask */
431 0xffff, /* dst_mask */
432 false), /* pcrel_offset */
bcbe2c71
MM		 433
434 /* Like R_PPC_ADDR16_HI, but referring to the GOT table entry for
435 the symbol. */
08556813
MM		 436 HOWTO (R_PPC_GOT16_HI, /* type */
437 16, /* rightshift */
438 1, /* size (0 = byte, 1 = short, 2 = long) */
439 16, /* bitsize */
440 false, /* pc_relative */
441 0, /* bitpos */
bcbe2c71 442 complain_overflow_bitfield, /* complain_on_overflow */
07a159db 443 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 444 "R_PPC_GOT16_HI", /* name */
08556813
MM		 445 false, /* partial_inplace */
446 0, /* src_mask */
447 0xffff, /* dst_mask */
448 false), /* pcrel_offset */
bcbe2c71
MM		 449
450 /* Like R_PPC_ADDR16_HA, but referring to the GOT table entry for
cf5138e3 451 the symbol. */
08556813
MM		 452 HOWTO (R_PPC_GOT16_HA, /* type */
453 0, /* rightshift */
454 1, /* size (0 = byte, 1 = short, 2 = long) */
455 16, /* bitsize */
456 false, /* pc_relative */
457 0, /* bitpos */
bcbe2c71 458 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 459 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 460 "R_PPC_GOT16_HA", /* name */
08556813
MM		 461 false, /* partial_inplace */
462 0, /* src_mask */
463 0xffff, /* dst_mask */
464 false), /* pcrel_offset */
bcbe2c71
MM		 465
466 /* Like R_PPC_REL24, but referring to the procedure linkage table
467 entry for the symbol. FIXME: Not supported. */
02f85cda 468 HOWTO (R_PPC_PLTREL24, /* type */
08556813
MM		 469 0, /* rightshift */
470 2, /* size (0 = byte, 1 = short, 2 = long) */
471 26, /* bitsize */
472 true, /* pc_relative */
473 0, /* bitpos */
474 complain_overflow_signed, /* complain_on_overflow */
bd2d10c0 475 bfd_elf_generic_reloc, /* special_function */
02f85cda 476 "R_PPC_PLTREL24", /* name */
08556813
MM		 477 false, /* partial_inplace */
478 0, /* src_mask */
479 0x3fffffc, /* dst_mask */
480 true), /* pcrel_offset */
bcbe2c71
MM		 481
482 /* This is used only by the dynamic linker. The symbol should exist
483 both in the object being run and in some shared library. The
484 dynamic linker copies the data addressed by the symbol from the
485 shared library into the object. I have no idea what the purpose
486 of this is. */
08556813
MM		 487 HOWTO (R_PPC_COPY, /* type */
488 0, /* rightshift */
489 2, /* size (0 = byte, 1 = short, 2 = long) */
490 32, /* bitsize */
491 false, /* pc_relative */
492 0, /* bitpos */
bcbe2c71 493 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 494 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 495 "R_PPC_COPY", /* name */
08556813
MM		 496 false, /* partial_inplace */
497 0, /* src_mask */
498 0, /* dst_mask */
499 false), /* pcrel_offset */
bcbe2c71
MM		 500
501 /* Like R_PPC_ADDR32, but used when setting global offset table
502 entries. */
08556813
MM		 503 HOWTO (R_PPC_GLOB_DAT, /* type */
504 0, /* rightshift */
505 2, /* size (0 = byte, 1 = short, 2 = long) */
506 32, /* bitsize */
507 false, /* pc_relative */
508 0, /* bitpos */
bcbe2c71 509 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 510 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 511 "R_PPC_GLOB_DAT", /* name */
08556813
MM		 512 false, /* partial_inplace */
513 0, /* src_mask */
514 0xffffffff, /* dst_mask */
515 false), /* pcrel_offset */
bcbe2c71
MM		 516
517 /* Marks a procedure linkage table entry for a symbol. */
08556813
MM		 518 HOWTO (R_PPC_JMP_SLOT, /* type */
519 0, /* rightshift */
520 2, /* size (0 = byte, 1 = short, 2 = long) */
521 32, /* bitsize */
522 false, /* pc_relative */
523 0, /* bitpos */
bcbe2c71 524 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 525 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 526 "R_PPC_JMP_SLOT", /* name */
08556813
MM		 527 false, /* partial_inplace */
528 0, /* src_mask */
529 0, /* dst_mask */
530 false), /* pcrel_offset */
bcbe2c71
MM		 531
532 /* Used only by the dynamic linker. When the object is run, this
533 longword is set to the load address of the object, plus the
534 addend. */
08556813
MM		 535 HOWTO (R_PPC_RELATIVE, /* type */
536 0, /* rightshift */
537 2, /* size (0 = byte, 1 = short, 2 = long) */
538 32, /* bitsize */
539 false, /* pc_relative */
540 0, /* bitpos */
bcbe2c71 541 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 542 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 543 "R_PPC_RELATIVE", /* name */
08556813
MM		 544 false, /* partial_inplace */
545 0, /* src_mask */
546 0xffffffff, /* dst_mask */
547 false), /* pcrel_offset */
bcbe2c71
MM		 548
549 /* Like R_PPC_REL24, but uses the value of the symbol within the
550 object rather than the final value. Normally used for
551 _GLOBAL_OFFSET_TABLE_. FIXME: Not supported. */
08556813
MM		 552 HOWTO (R_PPC_LOCAL24PC, /* type */
553 0, /* rightshift */
554 2, /* size (0 = byte, 1 = short, 2 = long) */
555 26, /* bitsize */
556 true, /* pc_relative */
557 0, /* bitpos */
bcbe2c71 558 complain_overflow_signed, /* complain_on_overflow */
bd2d10c0 559 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 560 "R_PPC_LOCAL24PC", /* name */
08556813
MM		 561 false, /* partial_inplace */
562 0, /* src_mask */
563 0x3fffffc, /* dst_mask */
564 true), /* pcrel_offset */
bcbe2c71
MM		 565
566 /* Like R_PPC_ADDR32, but may be unaligned. */
08556813
MM		 567 HOWTO (R_PPC_UADDR32, /* type */
568 0, /* rightshift */
569 2, /* size (0 = byte, 1 = short, 2 = long) */
570 32, /* bitsize */
571 false, /* pc_relative */
572 0, /* bitpos */
bcbe2c71 573 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 574 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 575 "R_PPC_UADDR32", /* name */
08556813
MM		 576 false, /* partial_inplace */
577 0, /* src_mask */
578 0xffffffff, /* dst_mask */
579 false), /* pcrel_offset */
bcbe2c71
MM		 580
581 /* Like R_PPC_ADDR16, but may be unaligned. */
08556813
MM		 582 HOWTO (R_PPC_UADDR16, /* type */
583 0, /* rightshift */
584 1, /* size (0 = byte, 1 = short, 2 = long) */
585 16, /* bitsize */
586 false, /* pc_relative */
587 0, /* bitpos */
bcbe2c71 588 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 589 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 590 "R_PPC_UADDR16", /* name */
08556813
MM		 591 false, /* partial_inplace */
592 0, /* src_mask */
593 0xffff, /* dst_mask */
594 false), /* pcrel_offset */
bcbe2c71
MM		 595
596 /* 32-bit PC relative */
597 HOWTO (R_PPC_REL32, /* type */
08556813
MM		 598 0, /* rightshift */
599 2, /* size (0 = byte, 1 = short, 2 = long) */
600 32, /* bitsize */
601 true, /* pc_relative */
602 0, /* bitpos */
bcbe2c71 603 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 604 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 605 "R_PPC_REL32", /* name */
08556813
MM		 606 false, /* partial_inplace */
607 0, /* src_mask */
608 0xffffffff, /* dst_mask */
bcbe2c71
MM		 609 true), /* pcrel_offset */
610
611 /* 32-bit relocation to the symbol's procedure linkage table.
612 FIXEME: not supported. */
613 HOWTO (R_PPC_PLT32, /* type */
08556813
MM		 614 0, /* rightshift */
615 2, /* size (0 = byte, 1 = short, 2 = long) */
616 32, /* bitsize */
617 false, /* pc_relative */
618 0, /* bitpos */
bcbe2c71 619 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 620 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 621 "R_PPC_PLT32", /* name */
08556813
MM		 622 false, /* partial_inplace */
623 0, /* src_mask */
624 0, /* dst_mask */
625 false), /* pcrel_offset */
bcbe2c71
MM		 626
627 /* 32-bit PC relative relocation to the symbol's procedure linkage table.
628 FIXEME: not supported. */
629 HOWTO (R_PPC_PLTREL32, /* type */
08556813
MM		 630 0, /* rightshift */
631 2, /* size (0 = byte, 1 = short, 2 = long) */
632 32, /* bitsize */
633 true, /* pc_relative */
634 0, /* bitpos */
bcbe2c71 635 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 636 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 637 "R_PPC_PLTREL32", /* name */
08556813
MM		 638 false, /* partial_inplace */
639 0, /* src_mask */
640 0, /* dst_mask */
bcbe2c71
MM		 641 true), /* pcrel_offset */
642
643 /* Like R_PPC_ADDR16_LO, but referring to the PLT table entry for
644 the symbol. */
08556813
MM		 645 HOWTO (R_PPC_PLT16_LO, /* type */
646 0, /* rightshift */
647 1, /* size (0 = byte, 1 = short, 2 = long) */
648 16, /* bitsize */
649 false, /* pc_relative */
650 0, /* bitpos */
bcbe2c71 651 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 652 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 653 "R_PPC_PLT16_LO", /* name */
08556813
MM		 654 false, /* partial_inplace */
655 0, /* src_mask */
656 0xffff, /* dst_mask */
657 false), /* pcrel_offset */
bcbe2c71
MM		 658
659 /* Like R_PPC_ADDR16_HI, but referring to the PLT table entry for
660 the symbol. */
08556813
MM		 661 HOWTO (R_PPC_PLT16_HI, /* type */
662 16, /* rightshift */
663 1, /* size (0 = byte, 1 = short, 2 = long) */
664 16, /* bitsize */
665 false, /* pc_relative */
666 0, /* bitpos */
bcbe2c71 667 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 668 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 669 "R_PPC_PLT16_HI", /* name */
08556813
MM		 670 false, /* partial_inplace */
671 0, /* src_mask */
672 0xffff, /* dst_mask */
673 false), /* pcrel_offset */
bcbe2c71
MM		 674
675 /* Like R_PPC_ADDR16_HA, but referring to the PLT table entry for
08556813
MM		 676 the symbol. FIXME: Not supported. */
677 HOWTO (R_PPC_PLT16_HA, /* type */
678 0, /* rightshift */
679 1, /* size (0 = byte, 1 = short, 2 = long) */
680 16, /* bitsize */
681 false, /* pc_relative */
682 0, /* bitpos */
bcbe2c71 683 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 684 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 685 "R_PPC_PLT16_HA", /* name */
08556813
MM		 686 false, /* partial_inplace */
687 0, /* src_mask */
688 0xffff, /* dst_mask */
689 false), /* pcrel_offset */
bcbe2c71 690
4500a112 691 /* A sign-extended 16 bit value relative to _SDA_BASE_, for use with
cf5138e3 692 small data items. */
02f85cda 693 HOWTO (R_PPC_SDAREL16, /* type */
08556813
MM		 694 0, /* rightshift */
695 1, /* size (0 = byte, 1 = short, 2 = long) */
696 16, /* bitsize */
697 false, /* pc_relative */
698 0, /* bitpos */
dd82c578 699 complain_overflow_signed, /* complain_on_overflow */
07a159db 700 bfd_elf_generic_reloc, /* special_function */
02f85cda 701 "R_PPC_SDAREL16", /* name */
08556813
MM		 702 false, /* partial_inplace */
703 0, /* src_mask */
704 0xffff, /* dst_mask */
705 false), /* pcrel_offset */
bcbe2c71 706
cf5138e3 707 /* 32-bit section relative relocation. */
bcbe2c71 708 HOWTO (R_PPC_SECTOFF, /* type */
08556813
MM		 709 0, /* rightshift */
710 2, /* size (0 = byte, 1 = short, 2 = long) */
711 32, /* bitsize */
712 true, /* pc_relative */
713 0, /* bitpos */
bcbe2c71 714 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 715 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 716 "R_PPC_SECTOFF", /* name */
08556813
MM		 717 false, /* partial_inplace */
718 0, /* src_mask */
719 0, /* dst_mask */
bcbe2c71
MM		 720 true), /* pcrel_offset */
721
cf5138e3 722 /* 16-bit lower half section relative relocation. */
08556813
MM		 723 HOWTO (R_PPC_SECTOFF_LO, /* type */
724 0, /* rightshift */
725 1, /* size (0 = byte, 1 = short, 2 = long) */
726 16, /* bitsize */
727 false, /* pc_relative */
728 0, /* bitpos */
bcbe2c71 729 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 730 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 731 "R_PPC_SECTOFF_LO", /* name */
08556813
MM		 732 false, /* partial_inplace */
733 0, /* src_mask */
734 0xffff, /* dst_mask */
735 false), /* pcrel_offset */
bcbe2c71 736
cf5138e3 737 /* 16-bit upper half section relative relocation. */
bcbe2c71 738 HOWTO (R_PPC_SECTOFF_HI, /* type */
08556813
MM		 739 16, /* rightshift */
740 1, /* size (0 = byte, 1 = short, 2 = long) */
741 16, /* bitsize */
742 false, /* pc_relative */
743 0, /* bitpos */
bcbe2c71 744 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 745 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 746 "R_PPC_SECTOFF_HI", /* name */
08556813
MM		 747 false, /* partial_inplace */
748 0, /* src_mask */
749 0xffff, /* dst_mask */
750 false), /* pcrel_offset */
bcbe2c71 751
cf5138e3 752 /* 16-bit upper half adjusted section relative relocation. */
bcbe2c71 753 HOWTO (R_PPC_SECTOFF_HA, /* type */
08556813
MM		 754 0, /* rightshift */
755 1, /* size (0 = byte, 1 = short, 2 = long) */
756 16, /* bitsize */
757 false, /* pc_relative */
758 0, /* bitpos */
bcbe2c71 759 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 760 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 761 "R_PPC_SECTOFF_HA", /* name */
08556813
MM		 762 false, /* partial_inplace */
763 0, /* src_mask */
764 0xffff, /* dst_mask */
765 false), /* pcrel_offset */
bcbe2c71
MM		 766
767 /* The remaining relocs are from the Embedded ELF ABI, and are not
768 in the SVR4 ELF ABI. */
769
770 /* 32 bit value resulting from the addend minus the symbol */
771 HOWTO (R_PPC_EMB_NADDR32, /* type */
08556813
MM		 772 0, /* rightshift */
773 2, /* size (0 = byte, 1 = short, 2 = long) */
774 32, /* bitsize */
775 false, /* pc_relative */
776 0, /* bitpos */
bcbe2c71 777 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 778 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 779 "R_PPC_EMB_NADDR32", /* name */
08556813
MM		 780 false, /* partial_inplace */
781 0, /* src_mask */
782 0xffffffff, /* dst_mask */
783 false), /* pcrel_offset */
bcbe2c71 784
4500a112 785 /* 16 bit value resulting from the addend minus the symbol */
bcbe2c71 786 HOWTO (R_PPC_EMB_NADDR16, /* type */
08556813
MM		 787 0, /* rightshift */
788 1, /* size (0 = byte, 1 = short, 2 = long) */
789 16, /* bitsize */
790 false, /* pc_relative */
791 0, /* bitpos */
bcbe2c71 792 complain_overflow_bitfield, /* complain_on_overflow */
bd2d10c0 793 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 794 "R_PPC_EMB_NADDR16", /* name */
08556813
MM		 795 false, /* partial_inplace */
796 0, /* src_mask */
797 0xffff, /* dst_mask */
798 false), /* pcrel_offset */
bcbe2c71
MM		 799
800 /* 16 bit value resulting from the addend minus the symbol */
801 HOWTO (R_PPC_EMB_NADDR16_LO, /* type */
08556813
MM		 802 0, /* rightshift */
803 1, /* size (0 = byte, 1 = short, 2 = long) */
804 16, /* bitsize */
805 false, /* pc_relative */
806 0, /* bitpos */
bcbe2c71 807 complain_overflow_dont,/* complain_on_overflow */
bd2d10c0 808 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 809 "R_PPC_EMB_ADDR16_LO", /* name */
08556813
MM		 810 false, /* partial_inplace */
811 0, /* src_mask */
812 0xffff, /* dst_mask */
813 false), /* pcrel_offset */
bcbe2c71
MM		 814
815 /* The high order 16 bits of the addend minus the symbol */
816 HOWTO (R_PPC_EMB_NADDR16_HI, /* type */
08556813
MM		 817 16, /* rightshift */
818 1, /* size (0 = byte, 1 = short, 2 = long) */
819 16, /* bitsize */
820 false, /* pc_relative */
821 0, /* bitpos */
bcbe2c71 822 complain_overflow_dont, /* complain_on_overflow */
bd2d10c0 823 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 824 "R_PPC_EMB_NADDR16_HI", /* name */
08556813
MM		 825 false, /* partial_inplace */
826 0, /* src_mask */
827 0xffff, /* dst_mask */
828 false), /* pcrel_offset */
bcbe2c71
MM		 829
830 /* The high order 16 bits of the result of the addend minus the address,
831 plus 1 if the contents of the low 16 bits, treated as a signed number,
832 is negative. */
833 HOWTO (R_PPC_EMB_NADDR16_HA, /* type */
08556813
MM		 834 16, /* rightshift */
835 1, /* size (0 = byte, 1 = short, 2 = long) */
836 16, /* bitsize */
837 false, /* pc_relative */
838 0, /* bitpos */
bcbe2c71 839 complain_overflow_dont, /* complain_on_overflow */
bd2d10c0 840 bfd_elf_generic_reloc, /* special_function */
bcbe2c71 841 "R_PPC_EMB_NADDR16_HA", /* name */
08556813
MM		 842 false, /* partial_inplace */
843 0, /* src_mask */
844 0xffff, /* dst_mask */
845 false), /* pcrel_offset */
846
4500a112
MM		 847 /* 16 bit value resulting from allocating a 4 byte word to hold an
848 address in the .sdata section, and returning the offset from
849 _SDA_BASE_ for that relocation */
850 HOWTO (R_PPC_EMB_SDAI16, /* type */
851 0, /* rightshift */
852 1, /* size (0 = byte, 1 = short, 2 = long) */
853 16, /* bitsize */
854 false, /* pc_relative */
855 0, /* bitpos */
856 complain_overflow_bitfield, /* complain_on_overflow */
857 bfd_elf_generic_reloc, /* special_function */
858 "R_PPC_EMB_SDAI16", /* name */
859 false, /* partial_inplace */
860 0, /* src_mask */
861 0xffff, /* dst_mask */
862 false), /* pcrel_offset */
863
864 /* 16 bit value resulting from allocating a 4 byte word to hold an
865 address in the .sdata2 section, and returning the offset from
866 _SDA2_BASE_ for that relocation */
867 HOWTO (R_PPC_EMB_SDA2I16, /* type */
868 0, /* rightshift */
869 1, /* size (0 = byte, 1 = short, 2 = long) */
870 16, /* bitsize */
871 false, /* pc_relative */
872 0, /* bitpos */
873 complain_overflow_bitfield, /* complain_on_overflow */
874 bfd_elf_generic_reloc, /* special_function */
875 "R_PPC_EMB_SDA2I16", /* name */
876 false, /* partial_inplace */
877 0, /* src_mask */
878 0xffff, /* dst_mask */
879 false), /* pcrel_offset */
880
881 /* A sign-extended 16 bit value relative to _SDA2_BASE_, for use with
cf5138e3 882 small data items. */
4500a112
MM		 883 HOWTO (R_PPC_EMB_SDA2REL, /* type */
884 0, /* rightshift */
885 1, /* size (0 = byte, 1 = short, 2 = long) */
886 16, /* bitsize */
887 false, /* pc_relative */
888 0, /* bitpos */
889 complain_overflow_signed, /* complain_on_overflow */
890 bfd_elf_generic_reloc, /* special_function */
891 "R_PPC_EMB_SDA2REL", /* name */
892 false, /* partial_inplace */
893 0, /* src_mask */
894 0xffff, /* dst_mask */
895 false), /* pcrel_offset */
896
897 /* Relocate against either _SDA_BASE_ or _SDA2_BASE_, filling in the 16 bit
898 signed offset from the appropriate base, and filling in the register
899 field with the appropriate register (0, 2, or 13). */
900 HOWTO (R_PPC_EMB_SDA21, /* type */
901 0, /* rightshift */
cf5138e3 902 2, /* size (0 = byte, 1 = short, 2 = long) */
4500a112
MM		 903 16, /* bitsize */
904 false, /* pc_relative */
905 0, /* bitpos */
906 complain_overflow_signed, /* complain_on_overflow */
907 bfd_elf_generic_reloc, /* special_function */
908 "R_PPC_EMB_SDA21", /* name */
909 false, /* partial_inplace */
910 0, /* src_mask */
911 0xffff, /* dst_mask */
912 false), /* pcrel_offset */
913
914 /* Relocation not handled: R_PPC_EMB_MRKREF */
915 /* Relocation not handled: R_PPC_EMB_RELSEC16 */
916 /* Relocation not handled: R_PPC_EMB_RELST_LO */
917 /* Relocation not handled: R_PPC_EMB_RELST_HI */
918 /* Relocation not handled: R_PPC_EMB_RELST_HA */
919 /* Relocation not handled: R_PPC_EMB_BIT_FLD */
920
921 /* PC relative relocation against either _SDA_BASE_ or _SDA2_BASE_, filling
922 in the 16 bit signed offset from the appropriate base, and filling in the
923 register field with the appropriate register (0, 2, or 13). */
924 HOWTO (R_PPC_EMB_RELSDA, /* type */
925 0, /* rightshift */
926 1, /* size (0 = byte, 1 = short, 2 = long) */
927 16, /* bitsize */
928 true, /* pc_relative */
929 0, /* bitpos */
930 complain_overflow_signed, /* complain_on_overflow */
931 bfd_elf_generic_reloc, /* special_function */
932 "R_PPC_EMB_RELSDA", /* name */
933 false, /* partial_inplace */
934 0, /* src_mask */
935 0xffff, /* dst_mask */
936 false), /* pcrel_offset */
937
08556813
MM		 938 /* Phony reloc to handle AIX style TOC entries */
939 HOWTO (R_PPC_TOC16, /* type */
940 0, /* rightshift */
941 1, /* size (0 = byte, 1 = short, 2 = long) */
942 16, /* bitsize */
943 false, /* pc_relative */
944 0, /* bitpos */
945 complain_overflow_signed, /* complain_on_overflow */
07a159db 946 bfd_elf_generic_reloc, /* special_function */
08556813
MM		 947 "R_PPC_TOC16", /* name */
948 false, /* partial_inplace */
949 0, /* src_mask */
950 0xffff, /* dst_mask */
951 false), /* pcrel_offset */
bcbe2c71
MM		 952};
953
ede4eed4
KR		 954\f
955/* Initialize the ppc_elf_howto_table, so that linear accesses can be done. */
956
957static void
958ppc_elf_howto_init ()
959{
960 unsigned int i, type;
961
962 for (i = 0; i < sizeof (ppc_elf_howto_raw) / sizeof (ppc_elf_howto_raw[0]); i++)
963 {
964 type = ppc_elf_howto_raw[i].type;
965 BFD_ASSERT (type < sizeof(ppc_elf_howto_table) / sizeof(ppc_elf_howto_table[0]));
966 ppc_elf_howto_table[type] = &ppc_elf_howto_raw[i];
967 }
968}
969
970\f
971static reloc_howto_type *
972ppc_elf_reloc_type_lookup (abfd, code)
973 bfd *abfd;
974 bfd_reloc_code_real_type code;
975{
08556813 976 enum ppc_reloc_type ppc_reloc = R_PPC_NONE;
02f85cda 977
ede4eed4
KR		 978 if (!ppc_elf_howto_table[ R_PPC_ADDR32 ]) /* Initialize howto table if needed */
979 ppc_elf_howto_init ();
980
981 switch ((int)code)
982 {
02f85cda
MM		 983 default:
984 return (reloc_howto_type *)NULL;
985
986 case BFD_RELOC_NONE: ppc_reloc = R_PPC_NONE; break;
987 case BFD_RELOC_32: ppc_reloc = R_PPC_ADDR32; break;
988 case BFD_RELOC_PPC_BA26: ppc_reloc = R_PPC_ADDR24; break;
989 case BFD_RELOC_16: ppc_reloc = R_PPC_ADDR16; break;
990 case BFD_RELOC_LO16: ppc_reloc = R_PPC_ADDR16_LO; break;
991 case BFD_RELOC_HI16: ppc_reloc = R_PPC_ADDR16_HI; break;
992 case BFD_RELOC_HI16_S: ppc_reloc = R_PPC_ADDR16_HA; break;
993 case BFD_RELOC_PPC_BA16: ppc_reloc = R_PPC_ADDR14; break;
994 case BFD_RELOC_PPC_BA16_BRTAKEN: ppc_reloc = R_PPC_ADDR14_BRTAKEN; break;
995 case BFD_RELOC_PPC_BA16_BRNTAKEN: ppc_reloc = R_PPC_ADDR14_BRNTAKEN; break;
996 case BFD_RELOC_PPC_B26: ppc_reloc = R_PPC_REL24; break;
997 case BFD_RELOC_PPC_B16: ppc_reloc = R_PPC_REL14; break;
998 case BFD_RELOC_PPC_B16_BRTAKEN: ppc_reloc = R_PPC_REL14_BRTAKEN; break;
999 case BFD_RELOC_PPC_B16_BRNTAKEN: ppc_reloc = R_PPC_REL14_BRNTAKEN; break;
08556813 1000 case BFD_RELOC_16_GOTOFF: ppc_reloc = R_PPC_GOT16; break;
02f85cda
MM		 1001 case BFD_RELOC_LO16_GOTOFF: ppc_reloc = R_PPC_GOT16_LO; break;
1002 case BFD_RELOC_HI16_GOTOFF: ppc_reloc = R_PPC_GOT16_HI; break;
1003 case BFD_RELOC_HI16_S_GOTOFF: ppc_reloc = R_PPC_GOT16_HA; break;
1004 case BFD_RELOC_24_PLT_PCREL: ppc_reloc = R_PPC_PLTREL24; break;
1005 case BFD_RELOC_PPC_COPY: ppc_reloc = R_PPC_COPY; break;
1006 case BFD_RELOC_PPC_GLOB_DAT: ppc_reloc = R_PPC_GLOB_DAT; break;
1007 case BFD_RELOC_PPC_LOCAL24PC: ppc_reloc = R_PPC_LOCAL24PC; break;
1008 case BFD_RELOC_32_PCREL: ppc_reloc = R_PPC_REL32; break;
1009 case BFD_RELOC_32_PLTOFF: ppc_reloc = R_PPC_PLT32; break;
1010 case BFD_RELOC_32_PLT_PCREL: ppc_reloc = R_PPC_PLTREL32; break;
1011 case BFD_RELOC_LO16_PLTOFF: ppc_reloc = R_PPC_PLT16_LO; break;
1012 case BFD_RELOC_HI16_PLTOFF: ppc_reloc = R_PPC_PLT16_HI; break;
1013 case BFD_RELOC_HI16_S_PLTOFF: ppc_reloc = R_PPC_PLT16_HA; break;
1014 case BFD_RELOC_GPREL16: ppc_reloc = R_PPC_SDAREL16; break;
1015 case BFD_RELOC_32_BASEREL: ppc_reloc = R_PPC_SECTOFF; break;
1016 case BFD_RELOC_LO16_BASEREL: ppc_reloc = R_PPC_SECTOFF_LO; break;
1017 case BFD_RELOC_HI16_BASEREL: ppc_reloc = R_PPC_SECTOFF_HI; break;
1018 case BFD_RELOC_HI16_S_BASEREL: ppc_reloc = R_PPC_SECTOFF_HA; break;
1019 case BFD_RELOC_CTOR: ppc_reloc = R_PPC_ADDR32; break;
08556813 1020 case BFD_RELOC_PPC_TOC16: ppc_reloc = R_PPC_TOC16; break;
4500a112
MM		 1021 case BFD_RELOC_PPC_EMB_NADDR32: ppc_reloc = R_PPC_EMB_NADDR32; break;
1022 case BFD_RELOC_PPC_EMB_NADDR16: ppc_reloc = R_PPC_EMB_NADDR16; break;
1023 case BFD_RELOC_PPC_EMB_NADDR16_LO: ppc_reloc = R_PPC_EMB_NADDR16_LO; break;
1024 case BFD_RELOC_PPC_EMB_NADDR16_HI: ppc_reloc = R_PPC_EMB_NADDR16_HI; break;
1025 case BFD_RELOC_PPC_EMB_NADDR16_HA: ppc_reloc = R_PPC_EMB_NADDR16_HA; break;
1026 case BFD_RELOC_PPC_EMB_SDAI16: ppc_reloc = R_PPC_EMB_SDAI16; break;
1027 case BFD_RELOC_PPC_EMB_SDA2I16: ppc_reloc = R_PPC_EMB_SDA2I16; break;
1028 case BFD_RELOC_PPC_EMB_SDA2REL: ppc_reloc = R_PPC_EMB_SDA2REL; break;
1029 case BFD_RELOC_PPC_EMB_SDA21: ppc_reloc = R_PPC_EMB_SDA21; break;
1030 case BFD_RELOC_PPC_EMB_MRKREF: ppc_reloc = R_PPC_EMB_MRKREF; break;
1031 case BFD_RELOC_PPC_EMB_RELSEC16: ppc_reloc = R_PPC_EMB_RELSEC16; break;
1032 case BFD_RELOC_PPC_EMB_RELST_LO: ppc_reloc = R_PPC_EMB_RELST_LO; break;
1033 case BFD_RELOC_PPC_EMB_RELST_HI: ppc_reloc = R_PPC_EMB_RELST_HI; break;
1034 case BFD_RELOC_PPC_EMB_RELST_HA: ppc_reloc = R_PPC_EMB_RELST_HA; break;
1035 case BFD_RELOC_PPC_EMB_BIT_FLD: ppc_reloc = R_PPC_EMB_BIT_FLD; break;
1036 case BFD_RELOC_PPC_EMB_RELSDA: ppc_reloc = R_PPC_EMB_RELSDA; break;
ede4eed4
KR		 1037 }
1038
02f85cda 1039 return ppc_elf_howto_table[ (int)ppc_reloc ];
ede4eed4
KR		 1040};
1041
1042/* Set the howto pointer for a PowerPC ELF reloc. */
1043
1044static void
1045ppc_elf_info_to_howto (abfd, cache_ptr, dst)
1046 bfd *abfd;
1047 arelent *cache_ptr;
1048 Elf32_Internal_Rela *dst;
1049{
1050 if (!ppc_elf_howto_table[ R_PPC_ADDR32 ]) /* Initialize howto table if needed */
1051 ppc_elf_howto_init ();
1052
1053 BFD_ASSERT (ELF32_R_TYPE (dst->r_info) < (unsigned int) R_PPC_max);
1054 cache_ptr->howto = ppc_elf_howto_table[ELF32_R_TYPE (dst->r_info)];
1055}
1056
dab45734
ILT		 1057/* Handle the R_PPC_ADDR16_HA reloc. */
1058
1059static bfd_reloc_status_type
1060ppc_elf_addr16_ha_reloc (abfd, reloc_entry, symbol, data, input_section,
1061 output_bfd, error_message)
1062 bfd *abfd;
1063 arelent *reloc_entry;
1064 asymbol *symbol;
1065 PTR data;
1066 asection *input_section;
1067 bfd *output_bfd;
1068 char **error_message;
1069{
1070 bfd_vma relocation;
1071
1072 if (output_bfd != NULL)
1073 {
1074 reloc_entry->address += input_section->output_offset;
1075 return bfd_reloc_ok;
1076 }
1077
1078 if (reloc_entry->address > input_section->_cooked_size)
1079 return bfd_reloc_outofrange;
1080
1081 if (bfd_is_com_section (symbol->section))
1082 relocation = 0;
1083 else
1084 relocation = symbol->value;
1085
1086 relocation += symbol->section->output_section->vma;
1087 relocation += symbol->section->output_offset;
1088 relocation += reloc_entry->addend;
1089
1090 reloc_entry->addend += (relocation & 0x8000) << 1;
1091
1092 return bfd_reloc_continue;
1093}
1094
ede4eed4
KR		 1095/* Function to set whether a module needs the -mrelocatable bit set. */
1096
1097static boolean
1098ppc_elf_set_private_flags (abfd, flags)
1099 bfd *abfd;
1100 flagword flags;
1101{
761f377f 1102 BFD_ASSERT (!elf_flags_init (abfd)
ede4eed4
KR		 1103 || elf_elfheader (abfd)->e_flags == flags);
1104
1105 elf_elfheader (abfd)->e_flags = flags;
761f377f 1106 elf_flags_init (abfd) = true;
ede4eed4
KR		 1107 return true;
1108}
1109
1110/* Copy backend specific data from one object module to another */
1111static boolean
1112ppc_elf_copy_private_bfd_data (ibfd, obfd)
1113 bfd *ibfd;
1114 bfd *obfd;
1115{
e7bab9df
MM		 1116 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
1117 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
ede4eed4
KR		 1118 return true;
1119
761f377f 1120 BFD_ASSERT (!elf_flags_init (obfd)
ede4eed4
KR		 1121 || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
1122
1123 elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
761f377f 1124 elf_flags_init (obfd) = true;
ede4eed4
KR		 1125 return true;
1126}
1127
1128/* Merge backend specific data from an object file to the output
1129 object file when linking */
1130static boolean
1131ppc_elf_merge_private_bfd_data (ibfd, obfd)
1132 bfd *ibfd;
1133 bfd *obfd;
1134{
1135 flagword old_flags;
1136 flagword new_flags;
08556813 1137 boolean error;
ede4eed4
KR		 1138
1139 /* Check if we have the same endianess */
07a159db
MM		 1140 if (ibfd->xvec->byteorder != obfd->xvec->byteorder
1141 && obfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN)
ede4eed4 1142 {
7a7fbffb 1143 (*_bfd_error_handler)
07a159db 1144 ("%s: compiled for a %s endian system and target is %s endian",
7a7fbffb 1145 bfd_get_filename (ibfd),
08556813
MM		 1146 bfd_big_endian (ibfd) ? "big" : "little",
1147 bfd_big_endian (obfd) ? "big" : "little");
ede4eed4
KR		 1148
1149 bfd_set_error (bfd_error_wrong_format);
1150 return false;
1151 }
1152
e7bab9df
MM		 1153 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
1154 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
ede4eed4
KR		 1155 return true;
1156
1157 new_flags = elf_elfheader (ibfd)->e_flags;
1158 old_flags = elf_elfheader (obfd)->e_flags;
761f377f 1159 if (!elf_flags_init (obfd)) /* First call, no flags set */
ede4eed4 1160 {
761f377f 1161 elf_flags_init (obfd) = true;
ede4eed4
KR		 1162 elf_elfheader (obfd)->e_flags = new_flags;
1163 }
1164
1165 else if (new_flags == old_flags) /* Compatible flags are ok */
1166 ;
1167
1168 else /* Incompatible flags */
1169 {
dd82c578
MM		 1170 /* Warn about -mrelocatable mismatch. Allow -mrelocatable-lib to be linked
1171 with either. */
08556813 1172 error = false;
dd82c578
MM		 1173 if ((new_flags & EF_PPC_RELOCATABLE) != 0
1174 && (old_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0)
ede4eed4 1175 {
08556813 1176 error = true;
7a7fbffb 1177 (*_bfd_error_handler)
07a159db 1178 ("%s: compiled with -mrelocatable and linked with modules compiled normally",
7a7fbffb 1179 bfd_get_filename (ibfd));
ede4eed4 1180 }
08eb30b6 1181 else if ((new_flags & (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB)) == 0
dd82c578 1182 && (old_flags & EF_PPC_RELOCATABLE) != 0)
ede4eed4 1183 {
08556813 1184 error = true;
7a7fbffb 1185 (*_bfd_error_handler)
07a159db 1186 ("%s: compiled normally and linked with modules compiled with -mrelocatable",
7a7fbffb 1187 bfd_get_filename (ibfd));
ede4eed4 1188 }
e7bab9df
MM		 1189 /* If -mrelocatable-lib is linked with an object without -mrelocatable-lib, turn off
1190 the -mrelocatable-lib, since at least one module isn't relocatable. */
1191 else if ((old_flags & EF_PPC_RELOCATABLE_LIB) != 0
1192 && (new_flags & EF_PPC_RELOCATABLE_LIB) == 0)
1193 elf_elfheader (obfd)->e_flags &= ~EF_PPC_RELOCATABLE_LIB;
dd82c578 1194
ede4eed4 1195
3cbe19d2
MM		 1196 /* Do not warn about eabi vs. V.4 mismatch, just or in the bit if any module uses it */
1197 elf_elfheader (obfd)->e_flags |= (new_flags & EF_PPC_EMB);
1198
1199 new_flags &= ~ (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
1200 old_flags &= ~ (EF_PPC_RELOCATABLE | EF_PPC_RELOCATABLE_LIB | EF_PPC_EMB);
ede4eed4
KR		 1201
1202 /* Warn about any other mismatches */
1203 if (new_flags != old_flags)
08556813
MM		 1204 {
1205 error = true;
1206 (*_bfd_error_handler)
07a159db 1207 ("%s: uses different e_flags (0x%lx) fields than previous modules (0x%lx)",
08556813
MM		 1208 bfd_get_filename (ibfd), (long)new_flags, (long)old_flags);
1209 }
ede4eed4 1210
08556813
MM		 1211 if (error)
1212 {
1213 bfd_set_error (bfd_error_bad_value);
1214 return false;
1215 }
ede4eed4
KR		 1216 }
1217
1218 return true;
1219}
1220
83f4323e
MM		 1221\f
1222/* Handle a PowerPC specific section when reading an object file. This
1223 is called when elfcode.h finds a section with an unknown type. */
1224
1225static boolean
1226ppc_elf_section_from_shdr (abfd, hdr, name)
1227 bfd *abfd;
1228 Elf32_Internal_Shdr *hdr;
1229 char *name;
1230{
1231 asection *newsect;
1232 flagword flags;
1233
1234 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name))
1235 return false;
1236
1237 newsect = hdr->bfd_section;
1238 flags = bfd_get_section_flags (abfd, newsect);
1239 if (hdr->sh_flags & SHF_EXCLUDE)
1240 flags |= SEC_EXCLUDE;
1241
1242 if (hdr->sh_type == SHT_ORDERED)
1243 flags |= SEC_SORT_ENTRIES;
1244
1245 bfd_set_section_flags (abfd, newsect, flags);
1246 return true;
1247}
1248
57081126
MM		 1249\f
1250/* Set up any other section flags and such that may be necessary. */
1251
1252boolean
1253ppc_elf_fake_sections (abfd, shdr, asect)
1254 bfd *abfd;
1255 Elf32_Internal_Shdr *shdr;
1256 asection *asect;
1257{
1258 if ((asect->flags & SEC_EXCLUDE) != 0)
1259 shdr->sh_flags |= SHF_EXCLUDE;
1260
1261 if ((asect->flags & SEC_SORT_ENTRIES) != 0)
1262 shdr->sh_type = SHT_ORDERED;
3f7ca26b
MM		 1263
1264 return true;
57081126
MM		 1265}
1266
1c3a295b 1267\f
3b3753b8
MM		 1268/* Create a special linker section */
1269static elf_linker_section_t *
1270ppc_elf_create_linker_section (abfd, info, which)
1c3a295b
MM		 1271 bfd *abfd;
1272 struct bfd_link_info *info;
3b3753b8 1273 enum elf_linker_section_enum which;
1c3a295b 1274{
3b3753b8
MM		 1275 bfd *dynobj = elf_hash_table (info)->dynobj;
1276 elf_linker_section_t *lsect;
1c3a295b 1277
3b3753b8
MM		 1278 /* Record the first bfd section that needs the special section */
1279 if (!dynobj)
1280 dynobj = elf_hash_table (info)->dynobj = abfd;
1c3a295b 1281
3b3753b8
MM		 1282 /* If this is the first time, create the section */
1283 lsect = elf_linker_section (dynobj, which);
1284 if (!lsect)
1c3a295b 1285 {
3b3753b8
MM		 1286 elf_linker_section_t defaults;
1287 static elf_linker_section_t zero_section;
1288
1289 defaults = zero_section;
1290 defaults.which = which;
1291 defaults.hole_written_p = false;
1292 defaults.alignment = 2;
ff12f303
ILT		 1293 defaults.flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
1294 | SEC_IN_MEMORY | SEC_LINKER_CREATED);
3b3753b8
MM		 1295
1296 switch (which)
1297 {
1298 default:
1299 (*_bfd_error_handler) ("%s: Unknown special linker type %d",
1300 bfd_get_filename (abfd),
1301 (int)which);
1302
1303 bfd_set_error (bfd_error_bad_value);
1304 return (elf_linker_section_t *)0;
1305
1306 case LINKER_SECTION_GOT: /* .got section */
1307 defaults.name = ".got";
1308 defaults.rel_name = ".rela.got";
1309 defaults.sym_name = "_GLOBAL_OFFSET_TABLE_";
1310 defaults.max_hole_offset = 32764;
1311 defaults.hole_size = 16;
1312 defaults.sym_offset = 4;
1313 break;
1314
3f7ca26b
MM		 1315 case LINKER_SECTION_PLT: /* .plt section */
1316 defaults.name = ".plt";
1317 defaults.rel_name = ".rela.plt";
1318 defaults.sym_name = (char *)0;
1319 defaults.max_hole_offset = 0;
1320 defaults.hole_size = 0;
1321 defaults.sym_offset = 0;
1322 defaults.flags &= ~SEC_LOAD;
1323 break;
1324
3b3753b8
MM		 1325 case LINKER_SECTION_SDATA: /* .sdata/.sbss section */
1326 defaults.name = ".sdata";
1327 defaults.rel_name = ".rela.sdata";
1328 defaults.bss_name = ".sbss";
1329 defaults.sym_name = "_SDA_BASE_";
05f927dd 1330 defaults.sym_offset = 32768;
3b3753b8
MM		 1331 break;
1332
1333 case LINKER_SECTION_SDATA2: /* .sdata2/.sbss2 section */
1334 defaults.name = ".sdata2";
1335 defaults.rel_name = ".rela.sdata2";
1336 defaults.bss_name = ".sbss2";
1337 defaults.sym_name = "_SDA2_BASE_";
05f927dd 1338 defaults.sym_offset = 32768;
3f7ca26b 1339 defaults.flags |= SEC_READONLY;
3b3753b8
MM		 1340 break;
1341 }
1342
1343 lsect = _bfd_elf_create_linker_section (abfd, info, which, &defaults);
1c3a295b
MM		 1344 }
1345
3b3753b8 1346 return lsect;
1c3a295b
MM		 1347}
1348
3f7ca26b
MM		 1349\f
1350/* If we have a non-zero sized .sbss2 or .PPC.EMB.sbss0 sections, we need to bump up
1351 the number of section headers. */
1352
1353static int
1354ppc_elf_additional_program_headers (abfd)
1355 bfd *abfd;
1356{
1357 asection *s;
1358 int ret;
1359
1360 ret = 0;
1361
1362 s = bfd_get_section_by_name (abfd, ".interp");
1363 if (s != NULL)
1364 ++ret;
1365
1366 s = bfd_get_section_by_name (abfd, ".sbss2");
1367 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
1368 ++ret;
1369
1370 s = bfd_get_section_by_name (abfd, ".PPC.EMB.sbss0");
1371 if (s != NULL && (s->flags & SEC_LOAD) != 0 && s->_raw_size > 0)
1372 ++ret;
1373
1374 return ret;
1375}
1376
1377/* Modify the segment map if needed */
1378
1379static boolean
1380ppc_elf_modify_segment_map (abfd)
1381 bfd *abfd;
1382{
1383 return true;
1384}
08556813
MM		 1385\f
1386/* Adjust a symbol defined by a dynamic object and referenced by a
1387 regular object. The current definition is in some section of the
1388 dynamic object, but we're not including those sections. We have to
1389 change the definition to something the rest of the link can
1390 understand. */
1391
1392static boolean
1393ppc_elf_adjust_dynamic_symbol (info, h)
1394 struct bfd_link_info *info;
1395 struct elf_link_hash_entry *h;
1396{
3f7ca26b
MM		 1397 bfd *dynobj = elf_hash_table (info)->dynobj;
1398 asection *s;
1399 unsigned int power_of_two;
1400 bfd_vma plt_offset;
1401
08556813 1402#ifdef DEBUG
3f7ca26b 1403 fprintf (stderr, "ppc_elf_adjust_dynamic_symbol called for %s\n", h->root.root.string);
08556813 1404#endif
3f7ca26b
MM		 1405
1406 /* Make sure we know what is going on here. */
1407 BFD_ASSERT (dynobj != NULL
1408 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
1409 || h->weakdef != NULL
1410 || ((h->elf_link_hash_flags
1411 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
1412 && (h->elf_link_hash_flags
1413 & ELF_LINK_HASH_REF_REGULAR) != 0
1414 && (h->elf_link_hash_flags
1415 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
1416
1417
1418 /* If this is a function, put it in the procedure linkage table. We
1419 will fill in the contents of the procedure linkage table later,
1420 when we know the address of the .got section. */
1421 if (h->type == STT_FUNC
1422 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
1423 {
1424 if (! info->shared
1425 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
1426 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0)
1427 {
1428 /* This case can occur if we saw a PLT32 reloc in an input
1429 file, but the symbol was never referred to by a dynamic
1430 object. In such a case, we don't actually need to build
1431 a procedure linkage table, and we can just do a PC32
1432 reloc instead. */
1433 BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
1434 return true;
1435 }
1436
1437 /* Make sure this symbol is output as a dynamic symbol. */
1438 if (h->dynindx == -1)
1439 {
1440 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1441 return false;
1442 }
1443
1444 s = bfd_get_section_by_name (dynobj, ".plt");
1445 BFD_ASSERT (s != NULL);
1446
1447 /* If this is the first .plt entry, make room for the special
1448 first entry. */
1449 if (s->_raw_size == 0)
1450 s->_raw_size += PLT_INITIAL_ENTRY_SIZE;
1451
1452 /* The PowerPC PLT is actually composed of two parts, the first part
1453 is 2 words (for a load and a jump), and then there is a remaining
1454 word available at the end. */
1455 plt_offset = (PLT_INITIAL_ENTRY_SIZE
1456 + 8 * ((s->_raw_size - PLT_INITIAL_ENTRY_SIZE) / PLT_ENTRY_SIZE));
1457
1458 /* If this symbol is not defined in a regular file, and we are
1459 not generating a shared library, then set the symbol to this
1460 location in the .plt. This is required to make function
1461 pointers compare as equal between the normal executable and
1462 the shared library. */
1463 if (! info->shared
1464 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1465 {
1466 h->root.u.def.section = s;
1467 h->root.u.def.value = plt_offset;
1468 }
1469
1470 h->plt_offset = plt_offset;
1471
1472 /* Make room for this entry. */
1473 s->_raw_size += PLT_ENTRY_SIZE;
1474
e7bab9df
MM		 1475#if 0
1476 /* We also need to make an entry in the .got.plt section, which
1477 will be placed in the .got section by the linker script. */
1478
1479 s = bfd_get_section_by_name (dynobj, ".got.plt");
1480 BFD_ASSERT (s != NULL);
1481 s->_raw_size += 4;
1482#endif
1483
3f7ca26b
MM		 1484 /* We also need to make an entry in the .rela.plt section. */
1485
1486 s = bfd_get_section_by_name (dynobj, ".rela.plt");
1487 BFD_ASSERT (s != NULL);
1488 s->_raw_size += sizeof (Elf32_External_Rela);
1489
1490 return true;
1491 }
1492
1493 /* If this is a weak symbol, and there is a real definition, the
1494 processor independent code will have arranged for us to see the
1495 real definition first, and we can just use the same value. */
1496 if (h->weakdef != NULL)
1497 {
1498 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1499 || h->weakdef->root.type == bfd_link_hash_defweak);
1500 h->root.u.def.section = h->weakdef->root.u.def.section;
1501 h->root.u.def.value = h->weakdef->root.u.def.value;
1502 return true;
1503 }
1504
1505 /* This is a reference to a symbol defined by a dynamic object which
1506 is not a function. */
1507
1508 /* If we are creating a shared library, we must presume that the
1509 only references to the symbol are via the global offset table.
1510 For such cases we need not do anything here; the relocations will
1511 be handled correctly by relocate_section. */
1512 if (info->shared)
1513 return true;
1514
1515 /* We must allocate the symbol in our .dynbss section, which will
1516 become part of the .bss section of the executable. There will be
1517 an entry for this symbol in the .dynsym section. The dynamic
1518 object will contain position independent code, so all references
1519 from the dynamic object to this symbol will go through the global
1520 offset table. The dynamic linker will use the .dynsym entry to
1521 determine the address it must put in the global offset table, so
1522 both the dynamic object and the regular object will refer to the
1523 same memory location for the variable. */
1524
1525 s = bfd_get_section_by_name (dynobj, ".dynbss");
1526 BFD_ASSERT (s != NULL);
1527
1528 /* If the symbol is currently defined in the .bss section of the
1529 dynamic object, then it is OK to simply initialize it to zero.
1530 If the symbol is in some other section, we must generate a
dab45734 1531 R_PPC_COPY reloc to tell the dynamic linker to copy the initial
3f7ca26b
MM		 1532 value out of the dynamic object and into the runtime process
1533 image. We need to remember the offset into the .rela.bss section
1534 we are going to use. */
1535 if ((h->root.u.def.section->flags & SEC_LOAD) != 0)
1536 {
1537 asection *srel;
1538
1539 srel = bfd_get_section_by_name (dynobj, ".rela.bss");
1540 BFD_ASSERT (srel != NULL);
1541 srel->_raw_size += sizeof (Elf32_External_Rel);
1542 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1543 }
1544
1545 /* We need to figure out the alignment required for this symbol. I
1546 have no idea how ELF linkers handle this. */
1547 power_of_two = bfd_log2 (h->size);
1548 if (power_of_two > 3)
1549 power_of_two = 3;
1550
1551 /* Apply the required alignment. */
1552 s->_raw_size = BFD_ALIGN (s->_raw_size,
1553 (bfd_size_type) (1 << power_of_two));
1554 if (power_of_two > bfd_get_section_alignment (dynobj, s))
1555 {
1556 if (! bfd_set_section_alignment (dynobj, s, power_of_two))
1557 return false;
1558 }
1559
1560 /* Define the symbol as being at this point in the section. */
1561 h->root.u.def.section = s;
1562 h->root.u.def.value = s->_raw_size;
1563
1564 /* Increment the section size to make room for the symbol. */
1565 s->_raw_size += h->size;
1566
08556813
MM		 1567 return true;
1568}
1569
1570\f
1571/* Increment the index of a dynamic symbol by a given amount. Called
1572 via elf_link_hash_traverse. */
1573
1574static boolean
1575ppc_elf_adjust_dynindx (h, cparg)
1576 struct elf_link_hash_entry *h;
1577 PTR cparg;
1578{
1579 int *cp = (int *) cparg;
1580
1581#ifdef DEBUG
1582 fprintf (stderr, "ppc_elf_adjust_dynindx called, h->dynindx = %d, *cp = %d\n", h->dynindx, *cp);
1583#endif
1584
1585 if (h->dynindx != -1)
1586 h->dynindx += *cp;
1587
1588 return true;
1589}
1590
1591\f
1592/* Set the sizes of the dynamic sections. */
1593
1594static boolean
1595ppc_elf_size_dynamic_sections (output_bfd, info)
1596 bfd *output_bfd;
1597 struct bfd_link_info *info;
1598{
1599 bfd *dynobj;
1600 asection *s;
3f7ca26b
MM		 1601 boolean plt;
1602 boolean relocs;
08556813 1603 boolean reltext;
08556813
MM		 1604
1605#ifdef DEBUG
1606 fprintf (stderr, "ppc_elf_size_dynamic_sections called\n");
1607#endif
1608
1609 dynobj = elf_hash_table (info)->dynobj;
1610 BFD_ASSERT (dynobj != NULL);
1611
1612 if (elf_hash_table (info)->dynamic_sections_created)
1613 {
1614 /* Set the contents of the .interp section to the interpreter. */
1615 if (! info->shared)
1616 {
1617 s = bfd_get_section_by_name (dynobj, ".interp");
1618 BFD_ASSERT (s != NULL);
1619 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
1620 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1621 }
08556813
MM		 1622 }
1623 else
1624 {
3b3753b8 1625 /* We may have created entries in the .rela.got, .rela.sdata, and
e7bab9df 1626 .rela.sdata2 sections. However, if we are not creating the
3b3753b8
MM		 1627 dynamic sections, we will not actually use these entries. Reset
1628 the size of .rela.got, et al, which will cause it to get
1629 stripped from the output file below. */
1630 static char *rela_sections[] = { ".rela.got", ".rela.sdata", ".rela.sdata", (char *)0 };
1631 char **p;
1632
1633 for (p = rela_sections; *p != (char *)0; p++)
1634 {
1635 s = bfd_get_section_by_name (dynobj, *p);
1636 if (s != NULL)
1637 s->_raw_size = 0;
1638 }
08556813
MM		 1639 }
1640
1641 /* The check_relocs and adjust_dynamic_symbol entry points have
1642 determined the sizes of the various dynamic sections. Allocate
1643 memory for them. */
3f7ca26b
MM		 1644 plt = false;
1645 relocs = false;
08556813 1646 reltext = false;
08556813
MM		 1647 for (s = dynobj->sections; s != NULL; s = s->next)
1648 {
1649 const char *name;
1650 boolean strip;
1651
ff12f303 1652 if ((s->flags & SEC_LINKER_CREATED) == 0)
08556813
MM		 1653 continue;
1654
1655 /* It's OK to base decisions on the section name, because none
1656 of the dynobj section names depend upon the input files. */
1657 name = bfd_get_section_name (dynobj, s);
1658
1659 strip = false;
1660
3f7ca26b
MM		 1661 if (strcmp (name, ".plt") == 0)
1662 {
1663 if (s->_raw_size == 0)
1664 {
1665 /* Strip this section if we don't need it; see the
1666 comment below. */
1667 strip = true;
1668 }
1669 else
1670 {
1671 /* Remember whether there is a PLT. */
1672 plt = true;
1673 }
1674 }
1675 else if (strncmp (name, ".rela", 5) == 0)
08556813
MM		 1676 {
1677 if (s->_raw_size == 0)
1678 {
1679 /* If we don't need this section, strip it from the
3f7ca26b
MM		 1680 output file. This is mostly to handle .rela.bss and
1681 .rela.plt. We must create both sections in
1682 create_dynamic_sections, because they must be created
08556813
MM		 1683 before the linker maps input sections to output
1684 sections. The linker does that before
1685 adjust_dynamic_symbol is called, and it is that
1686 function which decides whether anything needs to go
1687 into these sections. */
1688 strip = true;
1689 }
1690 else
1691 {
1692 asection *target;
1693
3f7ca26b
MM		 1694 /* Remember whether there are any reloc sections other
1695 than .rel.plt. */
1696 if (strcmp (name, ".rela.plt") != 0)
1697 {
1698 relocs = true;
1699
1700 /* If this relocation section applies to a read only
1701 section, then we probably need a DT_TEXTREL
1702 entry. The entries in the .rel.plt section
1703 really apply to the .got section, which we
1704 created ourselves and so know is not readonly. */
1705 target = bfd_get_section_by_name (output_bfd, name + 4);
1706 if (target != NULL
1707 && (target->flags & SEC_READONLY) != 0)
1708 reltext = true;
1709 }
08556813
MM		 1710
1711 /* We use the reloc_count field as a counter if we need
1712 to copy relocs into the output file. */
1713 s->reloc_count = 0;
1714 }
1715 }
3f7ca26b
MM		 1716 else if (strcmp (name, ".got") != 0
1717 && strcmp (name, ".sdata") != 0
1718 && strcmp (name, ".sdata2") != 0)
08556813
MM		 1719 {
1720 /* It's not one of our sections, so don't allocate space. */
1721 continue;
1722 }
1723
1724 if (strip)
1725 {
1726 asection **spp;
1727
1728 for (spp = &s->output_section->owner->sections;
1729 *spp != s->output_section;
1730 spp = &(*spp)->next)
1731 ;
1732 *spp = s->output_section->next;
1733 --s->output_section->owner->section_count;
1734
1735 continue;
1736 }
1737
1738 /* Allocate memory for the section contents. */
eb82bc60 1739 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
08556813
MM		 1740 if (s->contents == NULL && s->_raw_size != 0)
1741 return false;
1742 }
1743
1744 if (elf_hash_table (info)->dynamic_sections_created)
1745 {
1746 /* Add some entries to the .dynamic section. We fill in the
1747 values later, in ppc_elf_finish_dynamic_sections, but we
1748 must add the entries now so that we get the correct size for
1749 the .dynamic section. The DT_DEBUG entry is filled in by the
1750 dynamic linker and used by the debugger. */
1751 if (! info->shared)
1752 {
1753 if (! bfd_elf32_add_dynamic_entry (info, DT_DEBUG, 0))
1754 return false;
1755 }
1756
3f7ca26b 1757 if (plt)
08556813 1758 {
3f7ca26b
MM		 1759 if (! bfd_elf32_add_dynamic_entry (info, DT_PLTGOT, 0)
1760 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTRELSZ, 0)
1761 || ! bfd_elf32_add_dynamic_entry (info, DT_PLTREL, DT_REL)
08556813
MM		 1762 || ! bfd_elf32_add_dynamic_entry (info, DT_JMPREL, 0))
1763 return false;
1764 }
1765
3f7ca26b
MM		 1766 if (relocs)
1767 {
1768 if (! bfd_elf32_add_dynamic_entry (info, DT_RELA, 0)
1769 || ! bfd_elf32_add_dynamic_entry (info, DT_RELASZ, DT_RELA)
1770 || ! bfd_elf32_add_dynamic_entry (info, DT_RELENT,
1771 sizeof (Elf32_External_Rela)))
1772 return false;
1773 }
08556813
MM		 1774
1775 if (reltext)
1776 {
1777 if (! bfd_elf32_add_dynamic_entry (info, DT_TEXTREL, 0))
1778 return false;
1779 }
1780 }
1781
1782 /* If we are generating a shared library, we generate a section
1783 symbol for each output section. These are local symbols, which
1784 means that they must come first in the dynamic symbol table.
1785 That means we must increment the dynamic symbol index of every
1786 other dynamic symbol. */
1787 if (info->shared)
1788 {
1789 int c, i;
1790
1791 c = bfd_count_sections (output_bfd);
1792 elf_link_hash_traverse (elf_hash_table (info),
1793 ppc_elf_adjust_dynindx,
1794 (PTR) &c);
1795 elf_hash_table (info)->dynsymcount += c;
1796
1797 for (i = 1, s = output_bfd->sections; s != NULL; s = s->next, i++)
1798 {
1799 elf_section_data (s)->dynindx = i;
1800 /* These symbols will have no names, so we don't need to
1801 fiddle with dynstr_index. */
1802 }
1803 }
1804
1805 return true;
1806}
1807
1808\f
1809/* Look through the relocs for a section during the first phase, and
1810 allocate space in the global offset table or procedure linkage
1811 table. */
1812
1813static boolean
1814ppc_elf_check_relocs (abfd, info, sec, relocs)
1815 bfd *abfd;
1816 struct bfd_link_info *info;
1817 asection *sec;
1818 const Elf_Internal_Rela *relocs;
1819{
e25a7988 1820 boolean ret = true;
08556813
MM		 1821 bfd *dynobj;
1822 Elf_Internal_Shdr *symtab_hdr;
1823 struct elf_link_hash_entry **sym_hashes;
08556813
MM		 1824 const Elf_Internal_Rela *rel;
1825 const Elf_Internal_Rela *rel_end;
e7bab9df 1826 bfd_vma *local_got_offsets;
3b3753b8 1827 elf_linker_section_t *got;
3f7ca26b 1828 elf_linker_section_t *plt;
3b3753b8
MM		 1829 elf_linker_section_t *sdata;
1830 elf_linker_section_t *sdata2;
08556813
MM		 1831 asection *sreloc;
1832
1833 if (info->relocateable)
1834 return true;
1835
1836#ifdef DEBUG
3f7ca26b
MM		 1837 fprintf (stderr, "ppc_elf_check_relocs called for section %s in %s\n",
1838 bfd_get_section_name (abfd, sec),
1839 bfd_get_filename (abfd));
08556813
MM		 1840#endif
1841
3b3753b8
MM		 1842 /* Create the linker generated sections all the time so that the special
1843 symbols are created. */
1844 if ((got = elf_linker_section (abfd, LINKER_SECTION_GOT)) == NULL)
1845 {
1846 got = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_GOT);
1847 if (!got)
e25a7988 1848 ret = false;
3b3753b8
MM		 1849 }
1850
3f7ca26b
MM		 1851#if 0
1852 if ((plt = elf_linker_section (abfd, LINKER_SECTION_PLT)) == NULL)
1853 {
1854 plt = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_PLT);
1855 if (!plt)
e25a7988 1856 ret = false;
3f7ca26b
MM		 1857 }
1858#endif
1859
3b3753b8
MM		 1860 if ((sdata = elf_linker_section (abfd, LINKER_SECTION_SDATA)) == NULL)
1861 {
1862 sdata = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA);
1863 if (!sdata)
e25a7988 1864 ret = false;
3b3753b8
MM		 1865 }
1866
1867
1868 if ((sdata2 = elf_linker_section (abfd, LINKER_SECTION_SDATA2)) == NULL)
1869 {
1870 sdata2 = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA2);
1871 if (!sdata2)
e25a7988 1872 ret = false;
3b3753b8
MM		 1873 }
1874
08556813
MM		 1875 dynobj = elf_hash_table (info)->dynobj;
1876 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1877 sym_hashes = elf_sym_hashes (abfd);
e7bab9df 1878 local_got_offsets = elf_local_got_offsets (abfd);
08556813 1879
08556813
MM		 1880 sreloc = NULL;
1881
1882 rel_end = relocs + sec->reloc_count;
1883 for (rel = relocs; rel < rel_end; rel++)
1884 {
1885 unsigned long r_symndx;
1886 struct elf_link_hash_entry *h;
1887
1888 r_symndx = ELF32_R_SYM (rel->r_info);
1889 if (r_symndx < symtab_hdr->sh_info)
1890 h = NULL;
1891 else
1892 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1893
1894 switch (ELF32_R_TYPE (rel->r_info))
1895 {
3b3753b8 1896 /* GOT16 relocations */
08556813
MM		 1897 case R_PPC_GOT16:
1898 case R_PPC_GOT16_LO:
1899 case R_PPC_GOT16_HI:
1900 case R_PPC_GOT16_HA:
3b3753b8
MM		 1901 if (got->rel_section == NULL
1902 && (h != NULL || info->shared)
1903 && !_bfd_elf_make_linker_section_rela (dynobj, got, 2))
e25a7988
MM		 1904 {
1905 ret = false;
1906 break;
1907 }
1c3a295b 1908
3b3753b8 1909 if (!bfd_elf32_create_pointer_linker_section (abfd, info, got, h, rel))
e25a7988 1910 ret = false;
08556813 1911
3b3753b8 1912 break;
08556813 1913
3b3753b8
MM		 1914 /* Indirect .sdata relocation */
1915 case R_PPC_EMB_SDAI16:
e25a7988
MM		 1916 if (info->shared)
1917 {
1918 (*_bfd_error_handler) ("%s: relocation %s cannot be used when making a shared object",
1919 bfd_get_filename (abfd),
1920 "R_PPC_EMB_SDAI16");
1921 ret = false;
1922 break;
1923 }
1924
3b3753b8
MM		 1925 if (got->rel_section == NULL
1926 && (h != NULL || info->shared)
1927 && !_bfd_elf_make_linker_section_rela (dynobj, got, 2))
e25a7988
MM		 1928 {
1929 ret = false;
1930 break;
1931 }
08556813 1932
3b3753b8 1933 if (!bfd_elf32_create_pointer_linker_section (abfd, info, sdata, h, rel))
e25a7988 1934 ret = false;
08556813 1935
3b3753b8 1936 break;
08556813 1937
3b3753b8
MM		 1938 /* Indirect .sdata2 relocation */
1939 case R_PPC_EMB_SDA2I16:
e25a7988
MM		 1940 if (info->shared)
1941 {
1942 (*_bfd_error_handler) ("%s: relocation %s cannot be used when making a shared object",
1943 bfd_get_filename (abfd),
1944 "R_PPC_EMB_SDA2I16");
1945 ret = false;
1946 break;
1947 }
1948
3b3753b8
MM		 1949 if (got->rel_section == NULL
1950 && (h != NULL || info->shared)
1951 && !_bfd_elf_make_linker_section_rela (dynobj, got, 2))
1952 return false;
08556813 1953
3b3753b8
MM		 1954 if (!bfd_elf32_create_pointer_linker_section (abfd, info, sdata2, h, rel))
1955 return false;
08556813
MM		 1956
1957 break;
1958
e25a7988
MM		 1959 case R_PPC_SDAREL16:
1960 case R_PPC_EMB_SDA2REL:
1961 case R_PPC_EMB_SDA21:
1962 if (info->shared)
1963 {
1964 (*_bfd_error_handler) ("%s: relocation %s cannot be used when making a shared object",
1965 bfd_get_filename (abfd),
1966 ppc_elf_howto_table[(int)ELF32_R_TYPE (rel->r_info)]->name);
1967 ret = false;
1968 }
1969 break;
1970
08556813
MM		 1971 case R_PPC_PLT32:
1972 case R_PPC_PLTREL24:
1973 case R_PPC_PLT16_LO:
1974 case R_PPC_PLT16_HI:
1975 case R_PPC_PLT16_HA:
1976#ifdef DEBUG
1977 fprintf (stderr, "Reloc requires a PLT entry\n");
1978#endif
1979 /* This symbol requires a procedure linkage table entry. We
1980 actually build the entry in adjust_dynamic_symbol,
1981 because this might be a case of linking PIC code without
1982 linking in any dynamic objects, in which case we don't
1983 need to generate a procedure linkage table after all. */
1984
1985 if (h == NULL)
1986 {
1987 /* It does not make sense to have a procedure linkage
1988 table entry for a local symbol. */
1989 bfd_set_error (bfd_error_bad_value);
e25a7988
MM		 1990 ret = false;
1991 break;
08556813
MM		 1992 }
1993
1994 /* Make sure this symbol is output as a dynamic symbol. */
1995 if (h->dynindx == -1)
1996 {
1997 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
e25a7988
MM		 1998 {
1999 ret = false;
2000 break;
2001 }
08556813
MM		 2002 }
2003
2004 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
2005 break;
2006
e25a7988
MM		 2007 /* the following relocations don't need to propigate the relocation if
2008 linking a shared object since they are section relative. */
2009 case R_PPC_SECTOFF:
2010 case R_PPC_SECTOFF_LO:
2011 case R_PPC_SECTOFF_HI:
2012 case R_PPC_SECTOFF_HA:
2013 break;
2014
e7bab9df
MM		 2015 /* This refers only to functions defined in the shared library */
2016 case R_PPC_LOCAL24PC:
2017 break;
2018
e25a7988
MM		 2019 /* When creating a shared object, we must copy these
2020 relocs into the output file. We create a reloc
2021 section in dynobj and make room for the reloc. */
2022 case R_PPC_REL24:
08556813
MM		 2023 if (h != NULL
2024 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2025 break;
0293d5b0 2026 /* fall through */
e25a7988
MM		 2027
2028 case R_PPC_REL14:
2029 case R_PPC_REL14_BRTAKEN:
2030 case R_PPC_REL14_BRNTAKEN:
08556813
MM		 2031 if (h == NULL)
2032 break;
0293d5b0 2033 /* fall through */
e25a7988
MM		 2034
2035 default:
08556813
MM		 2036 if (info->shared
2037 && (sec->flags & SEC_ALLOC) != 0)
2038 {
e7bab9df
MM		 2039#ifdef DEBUG
2040 fprintf (stderr, "ppc_elf_check_relocs need to create relocation for %s\n",
2041 (h && h->root.root.string) ? h->root.root.string : "<unknown>");
2042#endif
08556813
MM		 2043 if (sreloc == NULL)
2044 {
2045 const char *name;
2046
2047 name = (bfd_elf_string_from_elf_section
2048 (abfd,
2049 elf_elfheader (abfd)->e_shstrndx,
2050 elf_section_data (sec)->rel_hdr.sh_name));
2051 if (name == NULL)
e25a7988
MM		 2052 {
2053 ret = false;
2054 break;
2055 }
08556813
MM		 2056
2057 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
2058 && strcmp (bfd_get_section_name (abfd, sec),
2059 name + 5) == 0);
2060
2061 sreloc = bfd_get_section_by_name (dynobj, name);
2062 if (sreloc == NULL)
2063 {
2064 sreloc = bfd_make_section (dynobj, name);
2065 if (sreloc == NULL
2066 || ! bfd_set_section_flags (dynobj, sreloc,
2067 (SEC_ALLOC
2068 | SEC_LOAD
2069 | SEC_HAS_CONTENTS
2070 | SEC_IN_MEMORY
ff12f303 2071 | SEC_LINKER_CREATED
08556813
MM		 2072 | SEC_READONLY))
2073 || ! bfd_set_section_alignment (dynobj, sreloc, 2))
e25a7988
MM		 2074 {
2075 ret = false;
2076 break;
2077 }
08556813
MM		 2078 }
2079 }
2080
2081 sreloc->_raw_size += sizeof (Elf32_External_Rela);
2082 }
2083
2084 break;
08556813
MM		 2085 }
2086 }
2087
e25a7988 2088 return ret;
08556813
MM		 2089}
2090
9d621c7d
MM		 2091\f
2092/* Hook called by the linker routine which adds symbols from an object
2093 file. We use it to put .comm items in .sbss, and not .bss. */
2094
2095/*ARGSUSED*/
2096static boolean
2097ppc_elf_add_symbol_hook (abfd, info, sym, namep, flagsp, secp, valp)
2098 bfd *abfd;
2099 struct bfd_link_info *info;
2100 const Elf_Internal_Sym *sym;
2101 const char **namep;
2102 flagword *flagsp;
2103 asection **secp;
2104 bfd_vma *valp;
2105{
0293d5b0 2106 if (sym->st_shndx == SHN_COMMON && !info->relocateable && sym->st_size <= bfd_get_gp_size (abfd))
9d621c7d 2107 {
eb82bc60 2108 /* Common symbols less than or equal to -G nn bytes are automatically
9d621c7d 2109 put into .sdata. */
3f7ca26b 2110 elf_linker_section_t *sdata = ppc_elf_create_linker_section (abfd, info, LINKER_SECTION_SDATA);
9d621c7d 2111 if (!sdata->bss_section)
3f7ca26b 2112 {
e7bab9df
MM		 2113 /* We don't go through bfd_make_section, because we don't
2114 want to attach this common section to DYNOBJ. The linker
2115 will move the symbols to the appropriate output section
2116 when it defines common symbols. */
2117 sdata->bss_section = ((asection *)
2118 bfd_zalloc (abfd, sizeof (asection)));
2119 if (sdata->bss_section == NULL)
2120 return false;
2121 sdata->bss_section->name = sdata->bss_name;
2122 sdata->bss_section->flags = SEC_IS_COMMON;
2123 sdata->bss_section->output_section = sdata->bss_section;
2124 sdata->bss_section->symbol =
2125 (asymbol *) bfd_zalloc (abfd, sizeof (asymbol));
2126 sdata->bss_section->symbol_ptr_ptr =
2127 (asymbol **) bfd_zalloc (abfd, sizeof (asymbol *));
2128 if (sdata->bss_section->symbol == NULL
2129 || sdata->bss_section->symbol_ptr_ptr == NULL)
2130 return false;
2131 sdata->bss_section->symbol->name = sdata->bss_name;
2132 sdata->bss_section->symbol->flags = BSF_SECTION_SYM;
2133 sdata->bss_section->symbol->section = sdata->bss_section;
2134 *sdata->bss_section->symbol_ptr_ptr = sdata->bss_section->symbol;
3f7ca26b
MM		 2135 }
2136
9d621c7d 2137 *secp = sdata->bss_section;
9d621c7d
MM		 2138 *valp = sym->st_size;
2139 }
2140
2141 return true;
2142}
2143
08556813
MM		 2144\f
2145/* Finish up dynamic symbol handling. We set the contents of various
2146 dynamic sections here. */
2147
2148static boolean
2149ppc_elf_finish_dynamic_symbol (output_bfd, info, h, sym)
2150 bfd *output_bfd;
2151 struct bfd_link_info *info;
2152 struct elf_link_hash_entry *h;
2153 Elf_Internal_Sym *sym;
2154{
2155 bfd *dynobj;
2156
2157#ifdef DEBUG
3f7ca26b 2158 fprintf (stderr, "ppc_elf_finish_dynamic_symbol called for %s", h->root.root.string);
08556813
MM		 2159#endif
2160
2161 dynobj = elf_hash_table (info)->dynobj;
3b3753b8 2162 BFD_ASSERT (dynobj != NULL);
08556813
MM		 2163
2164 if (h->plt_offset != (bfd_vma) -1)
2165 {
2166 asection *splt;
2167 asection *srela;
2168 Elf_Internal_Rela rela;
2169
3f7ca26b
MM		 2170#ifdef DEBUG
2171 fprintf (stderr, ", plt_offset = %d", h->plt_offset);
2172#endif
2173
08556813
MM		 2174 /* This symbol has an entry in the procedure linkage table. Set
2175 it up. */
2176
2177 BFD_ASSERT (h->dynindx != -1);
2178
2179 splt = bfd_get_section_by_name (dynobj, ".plt");
2180 srela = bfd_get_section_by_name (dynobj, ".rela.plt");
2181 BFD_ASSERT (splt != NULL && srela != NULL);
2182
3f7ca26b
MM		 2183 /* We don't need to fill in the .plt. The solaris dynamic linker will
2184 fill it in. */
08556813
MM		 2185
2186 /* Fill in the entry in the .rela.plt section. */
2187 rela.r_offset = (splt->output_section->vma
2188 + splt->output_offset
2189 + h->plt_offset);
3f7ca26b 2190 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_JMP_SLOT);
08556813
MM		 2191 rela.r_addend = 0;
2192 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2193 ((Elf32_External_Rela *) srela->contents
3f7ca26b 2194 + ((h->plt_offset - PLT_INITIAL_ENTRY_SIZE) / 8)));
08556813
MM		 2195
2196 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
2197 {
2198 /* Mark the symbol as undefined, rather than as defined in
2199 the .plt section. Leave the value alone. */
2200 sym->st_shndx = SHN_UNDEF;
2201 }
2202 }
2203
08556813
MM		 2204 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
2205 {
2206 asection *s;
2207 Elf_Internal_Rela rela;
2208
2209 /* This symbols needs a copy reloc. Set it up. */
2210
3f7ca26b
MM		 2211#ifdef DEBUG
2212 fprintf (stderr, ", copy");
2213#endif
2214
08556813
MM		 2215 BFD_ASSERT (h->dynindx != -1);
2216
2217 s = bfd_get_section_by_name (h->root.u.def.section->owner,
2218 ".rela.bss");
2219 BFD_ASSERT (s != NULL);
2220
2221 rela.r_offset = (h->root.u.def.value
2222 + h->root.u.def.section->output_section->vma
2223 + h->root.u.def.section->output_offset);
2224 rela.r_info = ELF32_R_INFO (h->dynindx, R_PPC_COPY);
2225 rela.r_addend = 0;
2226 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2227 ((Elf32_External_Rela *) s->contents
2228 + s->reloc_count));
2229 ++s->reloc_count;
2230 }
2231
3f7ca26b
MM		 2232#ifdef DEBUG
2233 fprintf (stderr, "\n");
2234#endif
2235
08556813
MM		 2236 /* Mark some specially defined symbols as absolute. */
2237 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2238 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
2239 || strcmp (h->root.root.string, "_PROCEDURE_LINKAGE_TABLE_") == 0)
2240 sym->st_shndx = SHN_ABS;
2241
2242 return true;
2243}
2244
2245\f
2246/* Finish up the dynamic sections. */
2247
2248static boolean
2249ppc_elf_finish_dynamic_sections (output_bfd, info)
2250 bfd *output_bfd;
2251 struct bfd_link_info *info;
2252{
08556813 2253 asection *sdyn;
3b3753b8
MM		 2254 bfd *dynobj = elf_hash_table (info)->dynobj;
2255 elf_linker_section_t *got = elf_linker_section (dynobj, LINKER_SECTION_GOT);
08556813
MM		 2256
2257#ifdef DEBUG
2258 fprintf (stderr, "ppc_elf_finish_dynamic_sections called\n");
2259#endif
2260
08556813
MM		 2261 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2262
2263 if (elf_hash_table (info)->dynamic_sections_created)
2264 {
2265 asection *splt;
2266 Elf32_External_Dyn *dyncon, *dynconend;
2267
2268 splt = bfd_get_section_by_name (dynobj, ".plt");
2269 BFD_ASSERT (splt != NULL && sdyn != NULL);
2270
2271 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2272 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
2273 for (; dyncon < dynconend; dyncon++)
2274 {
2275 Elf_Internal_Dyn dyn;
2276 const char *name;
2277 boolean size;
2278
2279 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
2280
2281 switch (dyn.d_tag)
2282 {
3f7ca26b
MM		 2283 case DT_PLTGOT: name = ".plt"; size = false; break;
2284 case DT_PLTRELSZ: name = ".rela.plt"; size = true; break;
08556813 2285 case DT_JMPREL: name = ".rela.plt"; size = false; break;
3f7ca26b 2286 default: name = NULL; size = false; break;
08556813
MM		 2287 }
2288
2289 if (name != NULL)
2290 {
2291 asection *s;
2292
2293 s = bfd_get_section_by_name (output_bfd, name);
2294 if (s == NULL)
2295 dyn.d_un.d_val = 0;
2296 else
2297 {
2298 if (! size)
2299 dyn.d_un.d_ptr = s->vma;
2300 else
2301 {
2302 if (s->_cooked_size != 0)
2303 dyn.d_un.d_val = s->_cooked_size;
2304 else
2305 dyn.d_un.d_val = s->_raw_size;
2306 }
2307 }
2308 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2309 }
2310 }
08556813
MM		 2311 }
2312
3b3753b8
MM		 2313 /* Add a blrl instruction at _GLOBAL_OFFSET_TABLE_-4 so that a function can
2314 easily find the address of the _GLOBAL_OFFSET_TABLE_. */
2315 if (got)
08556813 2316 {
3b3753b8
MM		 2317 unsigned char *contents = got->section->contents + got->hole_offset;
2318 bfd_put_32 (output_bfd, 0x4e800021 /* blrl */, contents);
2319
08556813 2320 if (sdyn == NULL)
3b3753b8 2321 bfd_put_32 (output_bfd, (bfd_vma) 0, contents+4);
08556813
MM		 2322 else
2323 bfd_put_32 (output_bfd,
2324 sdyn->output_section->vma + sdyn->output_offset,
3b3753b8 2325 contents+4);
08556813 2326
3b3753b8
MM		 2327 elf_section_data (got->section->output_section)->this_hdr.sh_entsize = 4;
2328 }
08556813
MM		 2329
2330 if (info->shared)
2331 {
2332 asection *sdynsym;
2333 asection *s;
2334 Elf_Internal_Sym sym;
2335
2336 /* Set up the section symbols for the output sections. */
2337
2338 sdynsym = bfd_get_section_by_name (dynobj, ".dynsym");
2339 BFD_ASSERT (sdynsym != NULL);
2340
2341 sym.st_size = 0;
2342 sym.st_name = 0;
2343 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_SECTION);
2344 sym.st_other = 0;
2345
2346 for (s = output_bfd->sections; s != NULL; s = s->next)
2347 {
2348 int indx;
2349
2350 sym.st_value = s->vma;
2351
2352 indx = elf_section_data (s)->this_idx;
2353 BFD_ASSERT (indx > 0);
2354 sym.st_shndx = indx;
2355
2356 bfd_elf32_swap_symbol_out (output_bfd, &sym,
2357 (PTR) (((Elf32_External_Sym *)
2358 sdynsym->contents)
2359 + elf_section_data (s)->dynindx));
2360 }
2361
2362 /* Set the sh_info field of the output .dynsym section to the
2363 index of the first global symbol. */
2364 elf_section_data (sdynsym->output_section)->this_hdr.sh_info =
2365 bfd_count_sections (output_bfd) + 1;
2366 }
2367
2368 return true;
2369}
2370
ede4eed4
KR		 2371\f
2372/* The RELOCATE_SECTION function is called by the ELF backend linker
2373 to handle the relocations for a section.
bcbe2c71 2374
ede4eed4
KR		 2375 The relocs are always passed as Rela structures; if the section
2376 actually uses Rel structures, the r_addend field will always be
2377 zero.
bcbe2c71 2378
ede4eed4
KR		 2379 This function is responsible for adjust the section contents as
2380 necessary, and (if using Rela relocs and generating a
2381 relocateable output file) adjusting the reloc addend as
2382 necessary.
bcbe2c71 2383
ede4eed4
KR		 2384 This function does not have to worry about setting the reloc
2385 address or the reloc symbol index.
2386
2387 LOCAL_SYMS is a pointer to the swapped in local symbols.
2388
2389 LOCAL_SECTIONS is an array giving the section in the input file
2390 corresponding to the st_shndx field of each local symbol.
2391
2392 The global hash table entry for the global symbols can be found
2393 via elf_sym_hashes (input_bfd).
2394
2395 When generating relocateable output, this function must handle
2396 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
2397 going to be the section symbol corresponding to the output
2398 section, which means that the addend must be adjusted
2399 accordingly. */
2400
2401static boolean
2402ppc_elf_relocate_section (output_bfd, info, input_bfd, input_section,
2403 contents, relocs, local_syms, local_sections)
2404 bfd *output_bfd;
2405 struct bfd_link_info *info;
2406 bfd *input_bfd;
2407 asection *input_section;
2408 bfd_byte *contents;
2409 Elf_Internal_Rela *relocs;
2410 Elf_Internal_Sym *local_syms;
2411 asection **local_sections;
bcbe2c71 2412{
08556813 2413 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
ede4eed4 2414 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
08556813 2415 bfd *dynobj = elf_hash_table (info)->dynobj;
3f7ca26b
MM		 2416 elf_linker_section_t *got = (dynobj) ? elf_linker_section (dynobj, LINKER_SECTION_GOT) : NULL;
2417 elf_linker_section_t *sdata = (dynobj) ? elf_linker_section (dynobj, LINKER_SECTION_SDATA) : NULL;
2418 elf_linker_section_t *sdata2 = (dynobj) ? elf_linker_section (dynobj, LINKER_SECTION_SDATA2) : NULL;
07a159db
MM		 2419 Elf_Internal_Rela *rel = relocs;
2420 Elf_Internal_Rela *relend = relocs + input_section->reloc_count;
e7bab9df 2421 asection *sreloc = NULL;
07a159db 2422 boolean ret = true;
08556813 2423 long insn;
ede4eed4
KR		 2424
2425#ifdef DEBUG
2426 fprintf (stderr, "ppc_elf_relocate_section called for %s section %s, %ld relocations%s\n",
2427 bfd_get_filename (input_bfd),
2428 bfd_section_name(input_bfd, input_section),
2429 (long)input_section->reloc_count,
2430 (info->relocateable) ? " (relocatable)" : "");
2431#endif
2432
2433 if (!ppc_elf_howto_table[ R_PPC_ADDR32 ]) /* Initialize howto table if needed */
2434 ppc_elf_howto_init ();
bcbe2c71 2435
ede4eed4 2436 for (; rel < relend; rel++)
bcbe2c71 2437 {
07a159db
MM		 2438 enum ppc_reloc_type r_type = (enum ppc_reloc_type)ELF32_R_TYPE (rel->r_info);
2439 bfd_vma offset = rel->r_offset;
2440 bfd_vma addend = rel->r_addend;
2441 bfd_reloc_status_type r = bfd_reloc_other;
2442 Elf_Internal_Sym *sym = (Elf_Internal_Sym *)0;
2443 asection *sec = (asection *)0;
2444 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *)0;
c1e65e24 2445 const char *sym_name = (const char *)0;
ede4eed4
KR		 2446 reloc_howto_type *howto;
2447 unsigned long r_symndx;
2448 bfd_vma relocation;
2449
2450 /* Unknown relocation handling */
2451 if ((unsigned)r_type >= (unsigned)R_PPC_max || !ppc_elf_howto_table[(int)r_type])
2452 {
1c3a295b
MM		 2453 (*_bfd_error_handler) ("%s: unknown relocation type %d",
2454 bfd_get_filename (input_bfd),
2455 (int)r_type);
ede4eed4
KR		 2456
2457 bfd_set_error (bfd_error_bad_value);
2458 ret = false;
2459 continue;
2460 }
2461
2462 howto = ppc_elf_howto_table[(int)r_type];
2463 r_symndx = ELF32_R_SYM (rel->r_info);
2464
2465 if (info->relocateable)
2466 {
2467 /* This is a relocateable link. We don't have to change
2468 anything, unless the reloc is against a section symbol,
2469 in which case we have to adjust according to where the
2470 section symbol winds up in the output section. */
2471 if (r_symndx < symtab_hdr->sh_info)
2472 {
2473 sym = local_syms + r_symndx;
2474 if ((unsigned)ELF_ST_TYPE (sym->st_info) == STT_SECTION)
2475 {
2476 sec = local_sections[r_symndx];
2477 addend = rel->r_addend += sec->output_offset + sym->st_value;
2478 }
2479 }
2480
2481#ifdef DEBUG
2482 fprintf (stderr, "\ttype = %s (%d), symbol index = %ld, offset = %ld, addend = %ld\n",
2483 howto->name,
2484 (int)r_type,
2485 r_symndx,
2486 (long)offset,
2487 (long)addend);
2488#endif
2489 continue;
2490 }
2491
2492 /* This is a final link. */
ede4eed4
KR		 2493 if (r_symndx < symtab_hdr->sh_info)
2494 {
2495 sym = local_syms + r_symndx;
2496 sec = local_sections[r_symndx];
c1e65e24
MM		 2497 sym_name = "<local symbol>";
2498
ede4eed4
KR		 2499 relocation = (sec->output_section->vma
2500 + sec->output_offset
2501 + sym->st_value);
2502 }
2503 else
2504 {
2505 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
cf5138e3
ILT		 2506 while (h->root.type == bfd_link_hash_indirect
2507 || h->root.type == bfd_link_hash_warning)
2508 h = (struct elf_link_hash_entry *) h->root.u.i.link;
c1e65e24 2509 sym_name = h->root.root.string;
ede4eed4
KR		 2510 if (h->root.type == bfd_link_hash_defined
2511 || h->root.type == bfd_link_hash_defweak)
2512 {
2513 sec = h->root.u.def.section;
e7bab9df
MM		 2514 if ((r_type == R_PPC_PLT32
2515 && h->plt_offset != (bfd_vma) -1)
2516 || ((r_type == R_PPC_GOT16
2517 || r_type == R_PPC_GOT16_LO
2518 || r_type == R_PPC_GOT16_HI
2519 || r_type == R_PPC_GOT16_HA)
2520 && elf_hash_table (info)->dynamic_sections_created
2521 && (! info->shared
2522 || ! info->symbolic
2523 || (h->elf_link_hash_flags
2524 & ELF_LINK_HASH_DEF_REGULAR) == 0))
2525 || (info->shared
2526 && (! info->symbolic
2527 || (h->elf_link_hash_flags
2528 & ELF_LINK_HASH_DEF_REGULAR) == 0)
2529 && (input_section->flags & SEC_ALLOC) != 0
2530 && (r_type == R_PPC_ADDR32
2531 || r_type == R_PPC_ADDR24
2532 || r_type == R_PPC_ADDR16
2533 || r_type == R_PPC_ADDR16_LO
2534 || r_type == R_PPC_ADDR16_HI
2535 || r_type == R_PPC_ADDR16_HA
2536 || r_type == R_PPC_ADDR14
2537 || r_type == R_PPC_ADDR14_BRTAKEN
2538 || r_type == R_PPC_ADDR14_BRNTAKEN
2539 || r_type == R_PPC_PLTREL24
2540 || r_type == R_PPC_COPY
2541 || r_type == R_PPC_GLOB_DAT
2542 || r_type == R_PPC_JMP_SLOT
2543 || r_type == R_PPC_UADDR32
2544 || r_type == R_PPC_UADDR16
2545 || r_type == R_PPC_REL32
2546 || r_type == R_PPC_SDAREL16
2547 || r_type == R_PPC_EMB_NADDR32
2548 || r_type == R_PPC_EMB_NADDR16
2549 || r_type == R_PPC_EMB_NADDR16_LO
2550 || r_type == R_PPC_EMB_NADDR16_HI
2551 || r_type == R_PPC_EMB_NADDR16_HA
2552 || r_type == R_PPC_EMB_SDAI16
2553 || r_type == R_PPC_EMB_SDA2I16
2554 || r_type == R_PPC_EMB_SDA2REL
2555 || r_type == R_PPC_EMB_SDA21
2556 || r_type == R_PPC_EMB_MRKREF
2557 || r_type == R_PPC_EMB_BIT_FLD
2558 || r_type == R_PPC_EMB_RELSDA
2559 || ((r_type == R_PPC_REL24
2560 || r_type == R_PPC_REL14
2561 || r_type == R_PPC_REL14_BRTAKEN
2562 || r_type == R_PPC_REL14_BRNTAKEN
2563 || r_type == R_PPC_RELATIVE)
2564 && strcmp (h->root.root.string,
2565 "_GLOBAL_OFFSET_TABLE_") != 0))))
3f7ca26b 2566 {
e7bab9df
MM		 2567 /* In these cases, we don't need the relocation
2568 value. We check specially because in some
2569 obscure cases sec->output_section will be NULL. */
3f7ca26b
MM		 2570 relocation = 0;
2571 }
2572 else
2573 relocation = (h->root.u.def.value
2574 + sec->output_section->vma
2575 + sec->output_offset);
ede4eed4
KR		 2576 }
2577 else if (h->root.type == bfd_link_hash_undefweak)
2578 relocation = 0;
2579 else if (info->shared)
2580 relocation = 0;
2581 else
2582 {
2583 (*info->callbacks->undefined_symbol)(info,
2584 h->root.root.string,
2585 input_bfd,
2586 input_section,
2587 rel->r_offset);
2588 ret = false;
2589 continue;
2590 }
2591 }
2592
2593 switch ((int)r_type)
2594 {
2595 default:
c1e65e24 2596 (*_bfd_error_handler) ("%s: unknown relocation type %d for symbol %s",
1c3a295b 2597 bfd_get_filename (input_bfd),
c1e65e24 2598 (int)r_type, sym_name);
1c3a295b
MM		 2599
2600 bfd_set_error (bfd_error_bad_value);
2601 ret = false;
2602 continue;
2603
3b3753b8 2604 /* relocations that need no special processing */
e7bab9df
MM		 2605 case (int)R_PPC_LOCAL24PC:
2606 break;
2607
2608 case (int)R_PPC_REL24:
2609 case (int)R_PPC_REL14:
2610 if (h != NULL
2611 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2612 break;
2613 /* fall through */
2614
2615 /* Relocations that need to be propigated if this is a shared object */
3b3753b8
MM		 2616 case (int)R_PPC_NONE:
2617 case (int)R_PPC_ADDR32:
2618 case (int)R_PPC_ADDR24:
2619 case (int)R_PPC_ADDR16:
2620 case (int)R_PPC_ADDR16_LO:
2621 case (int)R_PPC_ADDR16_HI:
2622 case (int)R_PPC_ADDR14:
3b3753b8
MM		 2623 case (int)R_PPC_UADDR32:
2624 case (int)R_PPC_UADDR16:
2625 case (int)R_PPC_REL32:
e7bab9df
MM		 2626 case (int)R_PPC_PLTREL24:
2627 if (info->shared
2628 && (input_section->flags & SEC_ALLOC) != 0)
2629 {
2630 Elf_Internal_Rela outrel;
2631
2632#ifdef DEBUG
2633 fprintf (stderr, "ppc_elf_relocate_section need to create relocation for %s\n",
2634 (h && h->root.root.string) ? h->root.root.string : "<unknown>");
2635#endif
2636
2637 /* When generating a shared object, these relocations
2638 are copied into the output file to be resolved at run
2639 time. */
2640
2641 if (sreloc == NULL)
2642 {
2643 const char *name;
2644
2645 name = (bfd_elf_string_from_elf_section
2646 (input_bfd,
2647 elf_elfheader (input_bfd)->e_shstrndx,
2648 elf_section_data (input_section)->rel_hdr.sh_name));
2649 if (name == NULL)
2650 return false;
2651
2652 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
2653 && strcmp (bfd_get_section_name (input_bfd,
2654 input_section),
2655 name + 5) == 0);
2656
2657 sreloc = bfd_get_section_by_name (dynobj, name);
2658 BFD_ASSERT (sreloc != NULL);
2659 }
2660
2661 outrel.r_offset = (rel->r_offset
2662 + input_section->output_section->vma
2663 + input_section->output_offset);
2664 if (h != NULL
2665 && (! info->symbolic
2666 || (h->elf_link_hash_flags
2667 & ELF_LINK_HASH_DEF_REGULAR) == 0))
2668 {
2669 BFD_ASSERT (h->dynindx != -1);
2670 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
2671 outrel.r_addend = rel->r_addend;
2672 }
2673 else
2674 {
2675 if (r_type == R_PPC_ADDR32)
2676 {
2677 outrel.r_info = ELF32_R_INFO (0, R_PPC_RELATIVE);
2678 outrel.r_addend = relocation + rel->r_addend;
2679 }
2680 else
2681 {
2682 long indx;
2683
2684 if (h == NULL)
2685 sec = local_sections[r_symndx];
2686 else
2687 {
2688 BFD_ASSERT (h->root.type == bfd_link_hash_defined
2689 || (h->root.type
2690 == bfd_link_hash_defweak));
2691 sec = h->root.u.def.section;
2692 }
2693 if (sec != NULL && bfd_is_abs_section (sec))
2694 indx = 0;
2695 else if (sec == NULL || sec->owner == NULL)
2696 {
2697 bfd_set_error (bfd_error_bad_value);
2698 return false;
2699 }
2700 else
2701 {
2702 asection *osec;
2703
2704 osec = sec->output_section;
2705 indx = elf_section_data (osec)->dynindx;
2706 if (indx == 0)
2707 abort ();
2708 }
2709
2710 outrel.r_info = ELF32_R_INFO (indx, r_type);
2711 outrel.r_addend = relocation + rel->r_addend;
2712 }
2713 }
2714
2715 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
2716 (((Elf32_External_Rela *)
2717 sreloc->contents)
2718 + sreloc->reloc_count));
2719 ++sreloc->reloc_count;
2720
2721 /* This reloc will be computed at runtime, so there's no
2722 need to do anything now. */
2723 continue;
2724 }
ede4eed4
KR		 2725 break;
2726
3b3753b8
MM		 2727 /* branch taken prediction relocations */
2728 case (int)R_PPC_ADDR14_BRTAKEN:
08556813 2729 case (int)R_PPC_REL14_BRTAKEN:
07a159db
MM		 2730 insn = bfd_get_32 (output_bfd, contents + offset);
2731 if ((relocation - offset) & 0x8000)
2732 insn &= ~BRANCH_PREDICT_BIT;
2733 else
2734 insn |= BRANCH_PREDICT_BIT;
2735 bfd_put_32 (output_bfd, insn, contents + offset);
2736 break;
2737
3b3753b8
MM		 2738 /* branch not taken predicition relocations */
2739 case (int)R_PPC_ADDR14_BRNTAKEN:
08556813 2740 case (int)R_PPC_REL14_BRNTAKEN:
08556813 2741 insn = bfd_get_32 (output_bfd, contents + offset);
07a159db
MM		 2742 if ((relocation - offset) & 0x8000)
2743 insn |= BRANCH_PREDICT_BIT;
2744 else
2745 insn &= ~BRANCH_PREDICT_BIT;
08556813
MM		 2746 bfd_put_32 (output_bfd, insn, contents + offset);
2747 break;
2748
3b3753b8
MM		 2749 /* GOT16 relocations */
2750 case (int)R_PPC_GOT16:
ede4eed4
KR		 2751 case (int)R_PPC_GOT16_LO:
2752 case (int)R_PPC_GOT16_HI:
1c3a295b 2753 case (int)R_PPC_GOT16_HA:
3b3753b8
MM		 2754 relocation = bfd_elf32_finish_pointer_linker_section (output_bfd, input_bfd, info,
2755 got, h, relocation, rel,
2756 R_PPC_RELATIVE);
2757 break;
07a159db 2758
3b3753b8
MM		 2759 /* Indirect .sdata relocation */
2760 case (int)R_PPC_EMB_SDAI16:
2761 BFD_ASSERT (sdata != NULL);
2762 relocation = bfd_elf32_finish_pointer_linker_section (output_bfd, input_bfd, info,
2763 sdata, h, relocation, rel,
2764 R_PPC_RELATIVE);
2765 break;
07a159db 2766
3b3753b8
MM		 2767 /* Indirect .sdata2 relocation */
2768 case (int)R_PPC_EMB_SDA2I16:
2769 BFD_ASSERT (sdata2 != NULL);
2770 relocation = bfd_elf32_finish_pointer_linker_section (output_bfd, input_bfd, info,
2771 sdata2, h, relocation, rel,
2772 R_PPC_RELATIVE);
ede4eed4
KR		 2773 break;
2774
07a159db
MM		 2775 /* Handle the TOC16 reloc. We want to use the offset within the .got
2776 section, not the actual VMA. This is appropriate when generating
2777 an embedded ELF object, for which the .got section acts like the
2778 AIX .toc section. */
08556813
MM		 2779 case (int)R_PPC_TOC16: /* phony GOT16 relocations */
2780 BFD_ASSERT (sec != (asection *)0);
07a159db
MM		 2781 BFD_ASSERT (bfd_is_und_section (sec)
2782 || strcmp (bfd_get_section_name (abfd, sec), ".got") == 0
bd2d10c0 2783 || strcmp (bfd_get_section_name (abfd, sec), ".cgot") == 0)
07a159db 2784
eb82bc60 2785 addend -= sec->output_section->vma + sec->output_offset + 0x8000;
08556813
MM		 2786 break;
2787
3b3753b8
MM		 2788 /* arithmetic adjust relocations */
2789 case (int)R_PPC_ADDR16_HA:
ede4eed4 2790 BFD_ASSERT (sec != (asection *)0);
07a159db 2791 addend += ((relocation + addend) & 0x8000) << 1;
ede4eed4 2792 break;
1c3a295b 2793
3b3753b8
MM		 2794 /* relocate against _SDA_BASE_ */
2795 case (int)R_PPC_SDAREL16:
bd2d10c0
MM		 2796 BFD_ASSERT (sec != (asection *)0);
2797 if (strcmp (bfd_get_section_name (abfd, sec), ".sdata") != 0
2798 && strcmp (bfd_get_section_name (abfd, sec), ".sbss") != 0)
2799 {
c1e65e24 2800 (*_bfd_error_handler) ("%s: The target (%s) of a %s relocation is in the wrong section (%s)",
bd2d10c0 2801 bfd_get_filename (input_bfd),
c1e65e24 2802 sym_name,
3b3753b8 2803 ppc_elf_howto_table[ (int)r_type ]->name,
bd2d10c0
MM		 2804 bfd_get_section_name (abfd, sec));
2805
2806 bfd_set_error (bfd_error_bad_value);
2807 ret = false;
2808 continue;
2809 }
9d621c7d 2810 addend -= (sdata->sym_hash->root.u.def.value
eb82bc60
MM		 2811 + sdata->sym_hash->root.u.def.section->output_section->vma
2812 + sdata->sym_hash->root.u.def.section->output_offset);
3b3753b8 2813 break;
bd2d10c0 2814
05f927dd 2815
3b3753b8
MM		 2816 /* relocate against _SDA2_BASE_ */
2817 case (int)R_PPC_EMB_SDA2REL:
bd2d10c0
MM		 2818 BFD_ASSERT (sec != (asection *)0);
2819 if (strcmp (bfd_get_section_name (abfd, sec), ".sdata2") != 0
2820 && strcmp (bfd_get_section_name (abfd, sec), ".sbss2") != 0)
2821 {
c1e65e24 2822 (*_bfd_error_handler) ("%s: The target (%s) of a %s relocation is in the wrong section (%s)",
bd2d10c0 2823 bfd_get_filename (input_bfd),
c1e65e24 2824 sym_name,
3b3753b8 2825 ppc_elf_howto_table[ (int)r_type ]->name,
bd2d10c0
MM		 2826 bfd_get_section_name (abfd, sec));
2827
2828 bfd_set_error (bfd_error_bad_value);
2829 ret = false;
2830 continue;
2831 }
9d621c7d 2832 addend -= (sdata2->sym_hash->root.u.def.value
eb82bc60
MM		 2833 + sdata2->sym_hash->root.u.def.section->output_section->vma
2834 + sdata2->sym_hash->root.u.def.section->output_offset);
3b3753b8 2835 break;
bd2d10c0
MM		 2836
2837
3b3753b8
MM		 2838 /* relocate against either _SDA_BASE_, _SDA2_BASE_, or 0 */
2839 case (int)R_PPC_EMB_SDA21:
2840 case (int)R_PPC_EMB_RELSDA:
2841 {
2842 const char *name = bfd_get_section_name (abfd, sec);
2843 int reg;
2844
2845 BFD_ASSERT (sec != (asection *)0);
2846 if (strcmp (name, ".sdata") == 0 || strcmp (name, ".sbss") == 0)
2847 {
2848 reg = 13;
9d621c7d 2849 addend -= (sdata->sym_hash->root.u.def.value
eb82bc60
MM		 2850 + sdata->sym_hash->root.u.def.section->output_section->vma
2851 + sdata->sym_hash->root.u.def.section->output_offset);
3b3753b8
MM		 2852 }
2853
2854 else if (strcmp (name, ".sdata2") == 0 || strcmp (name, ".sbss2") == 0)
2855 {
2856 reg = 2;
9d621c7d 2857 addend -= (sdata2->sym_hash->root.u.def.value
eb82bc60
MM		 2858 + sdata2->sym_hash->root.u.def.section->output_section->vma
2859 + sdata2->sym_hash->root.u.def.section->output_offset);
3b3753b8
MM		 2860 }
2861
2862 else if (strcmp (name, ".PPC.EMB.sdata0") == 0 || strcmp (name, ".PPC.EMB.sbss0") == 0)
2863 {
2864 reg = 0;
2865 }
2866
2867 else
2868 {
c1e65e24 2869 (*_bfd_error_handler) ("%s: The target (%s) of a %s relocation is in the wrong section (%s)",
3b3753b8 2870 bfd_get_filename (input_bfd),
c1e65e24 2871 sym_name,
3b3753b8
MM		 2872 ppc_elf_howto_table[ (int)r_type ]->name,
2873 bfd_get_section_name (abfd, sec));
2874
2875 bfd_set_error (bfd_error_bad_value);
2876 ret = false;
2877 continue;
2878 }
d8fd85ad
MM		 2879
2880 if (r_type == R_PPC_EMB_SDA21)
2881 { /* fill in register field */
cf5138e3 2882 insn = bfd_get_32 (output_bfd, contents + offset);
d8fd85ad 2883 insn = (insn & ~RA_REGISTER_MASK) | (reg << RA_REGISTER_SHIFT);
cf5138e3 2884 bfd_put_32 (output_bfd, insn, contents + offset);
d8fd85ad 2885 }
3b3753b8 2886 }
d8fd85ad 2887 break;
3b3753b8 2888
eb82bc60
MM		 2889 /* Relocate against the beginning of the section */
2890 case (int)R_PPC_SECTOFF:
2891 case (int)R_PPC_SECTOFF_LO:
2892 case (int)R_PPC_SECTOFF_HI:
2893 BFD_ASSERT (sec != (asection *)0);
2894 addend -= sec->output_section->vma;
2895 break;
2896
2897 case (int)R_PPC_SECTOFF_HA:
2898 BFD_ASSERT (sec != (asection *)0);
2899 addend -= sec->output_section->vma;
2900 addend += ((relocation + addend) & 0x8000) << 1;
2901 break;
2902
2903 /* Negative relocations */
2904 case (int)R_PPC_EMB_NADDR32:
2905 case (int)R_PPC_EMB_NADDR16:
2906 case (int)R_PPC_EMB_NADDR16_LO:
2907 case (int)R_PPC_EMB_NADDR16_HI:
2908 addend -= 2*relocation;
2909 break;
2910
2911 case (int)R_PPC_EMB_NADDR16_HA:
2912 addend -= 2*relocation;
2913 addend += ((relocation + addend) & 0x8000) << 1;
2914 break;
2915
2916 /* NOP relocation that prevents garbage collecting linkers from omitting a
2917 reference. */
2918 case (int)R_PPC_EMB_MRKREF:
2919 continue;
2920
3b3753b8
MM		 2921 case (int)R_PPC_COPY:
2922 case (int)R_PPC_GLOB_DAT:
2923 case (int)R_PPC_JMP_SLOT:
2924 case (int)R_PPC_RELATIVE:
3b3753b8
MM		 2925 case (int)R_PPC_PLT32:
2926 case (int)R_PPC_PLTREL32:
2927 case (int)R_PPC_PLT16_LO:
2928 case (int)R_PPC_PLT16_HI:
2929 case (int)R_PPC_PLT16_HA:
3b3753b8
MM		 2930 case (int)R_PPC_EMB_RELSEC16:
2931 case (int)R_PPC_EMB_RELST_LO:
2932 case (int)R_PPC_EMB_RELST_HI:
2933 case (int)R_PPC_EMB_RELST_HA:
2934 case (int)R_PPC_EMB_BIT_FLD:
c1e65e24 2935 (*_bfd_error_handler) ("%s: Relocation %s is not yet supported for symbol %s.",
1c3a295b 2936 bfd_get_filename (input_bfd),
c1e65e24
MM		 2937 ppc_elf_howto_table[ (int)r_type ]->name,
2938 sym_name);
1c3a295b 2939
3b3753b8 2940 bfd_set_error (bfd_error_invalid_operation);
1c3a295b
MM		 2941 ret = false;
2942 continue;
ede4eed4
KR		 2943 }
2944
2945
2946#ifdef DEBUG
c1e65e24 2947 fprintf (stderr, "\ttype = %s (%d), name = %s, symbol index = %ld, offset = %ld, addend = %ld\n",
ede4eed4
KR		 2948 howto->name,
2949 (int)r_type,
c1e65e24 2950 sym_name,
ede4eed4
KR		 2951 r_symndx,
2952 (long)offset,
2953 (long)addend);
2954#endif
2955
2956 r = _bfd_final_link_relocate (howto,
2957 input_bfd,
2958 input_section,
2959 contents,
2960 offset,
2961 relocation,
2962 addend);
2963
2964 if (r != bfd_reloc_ok)
2965 {
2966 ret = false;
2967 switch (r)
2968 {
2969 default:
2970 break;
2971
2972 case bfd_reloc_overflow:
2973 {
2974 const char *name;
2975
2976 if (h != NULL)
2977 name = h->root.root.string;
2978 else
2979 {
2980 name = bfd_elf_string_from_elf_section (input_bfd,
2981 symtab_hdr->sh_link,
2982 sym->st_name);
2983 if (name == NULL)
2984 break;
2985
2986 if (*name == '\0')
2987 name = bfd_section_name (input_bfd, sec);
2988 }
2989
2990 (*info->callbacks->reloc_overflow)(info,
2991 name,
2992 howto->name,
2993 (bfd_vma) 0,
2994 input_bfd,
2995 input_section,
2996 offset);
2997 }
2998 break;
2999
3000 }
3001 }
bcbe2c71
MM		 3002 }
3003
bcbe2c71 3004
ede4eed4
KR		 3005#ifdef DEBUG
3006 fprintf (stderr, "\n");
3007#endif
bcbe2c71 3008
ede4eed4 3009 return ret;
bcbe2c71
MM		 3010}
3011
57081126 3012\f
ede4eed4
KR		 3013#define TARGET_LITTLE_SYM bfd_elf32_powerpcle_vec
3014#define TARGET_LITTLE_NAME "elf32-powerpcle"
bcbe2c71
MM		 3015#define TARGET_BIG_SYM bfd_elf32_powerpc_vec
3016#define TARGET_BIG_NAME "elf32-powerpc"
3017#define ELF_ARCH bfd_arch_powerpc
3018#define ELF_MACHINE_CODE EM_PPC
3019#define ELF_MAXPAGESIZE 0x10000
ede4eed4 3020#define elf_info_to_howto ppc_elf_info_to_howto
bcbe2c71
MM		 3021
3022#ifdef EM_CYGNUS_POWERPC
3023#define ELF_MACHINE_ALT1 EM_CYGNUS_POWERPC
3024#endif
3025
3026#ifdef EM_PPC_OLD
3027#define ELF_MACHINE_ALT2 EM_PPC_OLD
3028#endif
3029
ede4eed4
KR		 3030#define bfd_elf32_bfd_copy_private_bfd_data ppc_elf_copy_private_bfd_data
3031#define bfd_elf32_bfd_merge_private_bfd_data ppc_elf_merge_private_bfd_data
3032#define bfd_elf32_bfd_set_private_flags ppc_elf_set_private_flags
3033#define bfd_elf32_bfd_reloc_type_lookup ppc_elf_reloc_type_lookup
83f4323e 3034#define elf_backend_section_from_shdr ppc_elf_section_from_shdr
ede4eed4 3035#define elf_backend_relocate_section ppc_elf_relocate_section
08556813
MM		 3036#define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
3037#define elf_backend_check_relocs ppc_elf_check_relocs
3038#define elf_backend_adjust_dynamic_symbol ppc_elf_adjust_dynamic_symbol
9d621c7d 3039#define elf_backend_add_symbol_hook ppc_elf_add_symbol_hook
08556813
MM		 3040#define elf_backend_size_dynamic_sections ppc_elf_size_dynamic_sections
3041#define elf_backend_finish_dynamic_symbol ppc_elf_finish_dynamic_symbol
3042#define elf_backend_finish_dynamic_sections ppc_elf_finish_dynamic_sections
57081126 3043#define elf_backend_fake_sections ppc_elf_fake_sections
3f7ca26b
MM		 3044#define elf_backend_additional_program_headers ppc_elf_additional_program_headers
3045#define elf_backend_modify_segment_map ppc_elf_modify_segment_map
ede4eed4 3046
bcbe2c71 3047#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.220432 seconds and 4 git commands to generate.