1 /* Motorola 68k series support for 32-bit ELF
2 Copyright 1993, 1995, 1996, 1997, 1998, 1999, 2000, 2001
3 Free Software Foundation, Inc.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
28 static reloc_howto_type *reloc_type_lookup
29 PARAMS ((bfd *, bfd_reloc_code_real_type));
30 static void rtype_to_howto
31 PARAMS ((bfd *, arelent *, Elf32_Internal_Rela *));
32 static struct bfd_hash_entry *elf_m68k_link_hash_newfunc
33 PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
34 static struct bfd_link_hash_table *elf_m68k_link_hash_table_create
36 static boolean elf_m68k_check_relocs
37 PARAMS ((bfd *, struct bfd_link_info *, asection *,
38 const Elf_Internal_Rela *));
39 static asection *elf_m68k_gc_mark_hook
40 PARAMS ((bfd *, struct bfd_link_info *, Elf_Internal_Rela *,
41 struct elf_link_hash_entry *, Elf_Internal_Sym *));
42 static boolean elf_m68k_gc_sweep_hook
43 PARAMS ((bfd *, struct bfd_link_info *, asection *,
44 const Elf_Internal_Rela *));
45 static boolean elf_m68k_adjust_dynamic_symbol
46 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *));
47 static boolean elf_m68k_size_dynamic_sections
48 PARAMS ((bfd *, struct bfd_link_info *));
49 static boolean elf_m68k_relocate_section
50 PARAMS ((bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *,
51 Elf_Internal_Rela *, Elf_Internal_Sym *, asection **));
52 static boolean elf_m68k_finish_dynamic_symbol
53 PARAMS ((bfd *, struct bfd_link_info *, struct elf_link_hash_entry *,
55 static boolean elf_m68k_finish_dynamic_sections
56 PARAMS ((bfd *, struct bfd_link_info *));
58 static boolean elf32_m68k_set_private_flags
59 PARAMS ((bfd *, flagword));
60 static boolean elf32_m68k_copy_private_bfd_data
61 PARAMS ((bfd *, bfd *));
62 static boolean elf32_m68k_merge_private_bfd_data
63 PARAMS ((bfd *, bfd *));
64 static boolean elf32_m68k_print_private_bfd_data
65 PARAMS ((bfd *, PTR));
66 static enum elf_reloc_type_class elf32_m68k_reloc_type_class
69 static reloc_howto_type howto_table[] = {
70 HOWTO(R_68K_NONE, 0, 0, 0, false,0, complain_overflow_dont, bfd_elf_generic_reloc, "R_68K_NONE", false, 0, 0x00000000,false),
71 HOWTO(R_68K_32, 0, 2,32, false,0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_32", false, 0, 0xffffffff,false),
72 HOWTO(R_68K_16, 0, 1,16, false,0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_16", false, 0, 0x0000ffff,false),
73 HOWTO(R_68K_8, 0, 0, 8, false,0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_8", false, 0, 0x000000ff,false),
74 HOWTO(R_68K_PC32, 0, 2,32, true, 0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_PC32", false, 0, 0xffffffff,true),
75 HOWTO(R_68K_PC16, 0, 1,16, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PC16", false, 0, 0x0000ffff,true),
76 HOWTO(R_68K_PC8, 0, 0, 8, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PC8", false, 0, 0x000000ff,true),
77 HOWTO(R_68K_GOT32, 0, 2,32, true, 0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_GOT32", false, 0, 0xffffffff,true),
78 HOWTO(R_68K_GOT16, 0, 1,16, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_GOT16", false, 0, 0x0000ffff,true),
79 HOWTO(R_68K_GOT8, 0, 0, 8, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_GOT8", false, 0, 0x000000ff,true),
80 HOWTO(R_68K_GOT32O, 0, 2,32, false,0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_GOT32O", false, 0, 0xffffffff,false),
81 HOWTO(R_68K_GOT16O, 0, 1,16, false,0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_GOT16O", false, 0, 0x0000ffff,false),
82 HOWTO(R_68K_GOT8O, 0, 0, 8, false,0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_GOT8O", false, 0, 0x000000ff,false),
83 HOWTO(R_68K_PLT32, 0, 2,32, true, 0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_PLT32", false, 0, 0xffffffff,true),
84 HOWTO(R_68K_PLT16, 0, 1,16, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PLT16", false, 0, 0x0000ffff,true),
85 HOWTO(R_68K_PLT8, 0, 0, 8, true, 0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PLT8", false, 0, 0x000000ff,true),
86 HOWTO(R_68K_PLT32O, 0, 2,32, false,0, complain_overflow_bitfield, bfd_elf_generic_reloc, "R_68K_PLT32O", false, 0, 0xffffffff,false),
87 HOWTO(R_68K_PLT16O, 0, 1,16, false,0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PLT16O", false, 0, 0x0000ffff,false),
88 HOWTO(R_68K_PLT8O, 0, 0, 8, false,0, complain_overflow_signed, bfd_elf_generic_reloc, "R_68K_PLT8O", false, 0, 0x000000ff,false),
89 HOWTO(R_68K_COPY, 0, 0, 0, false,0, complain_overflow_dont, bfd_elf_generic_reloc, "R_68K_COPY", false, 0, 0xffffffff,false),
90 HOWTO(R_68K_GLOB_DAT, 0, 2,32, false,0, complain_overflow_dont, bfd_elf_generic_reloc, "R_68K_GLOB_DAT", false, 0, 0xffffffff,false),
91 HOWTO(R_68K_JMP_SLOT, 0, 2,32, false,0, complain_overflow_dont, bfd_elf_generic_reloc, "R_68K_JMP_SLOT", false, 0, 0xffffffff,false),
92 HOWTO(R_68K_RELATIVE, 0, 2,32, false,0, complain_overflow_dont, bfd_elf_generic_reloc, "R_68K_RELATIVE", false, 0, 0xffffffff,false),
93 /* GNU extension to record C++ vtable hierarchy */
94 HOWTO (R_68K_GNU_VTINHERIT, /* type */
96 2, /* size (0 = byte, 1 = short, 2 = long) */
98 false, /* pc_relative */
100 complain_overflow_dont, /* complain_on_overflow */
101 NULL, /* special_function */
102 "R_68K_GNU_VTINHERIT", /* name */
103 false, /* partial_inplace */
107 /* GNU extension to record C++ vtable member usage */
108 HOWTO (R_68K_GNU_VTENTRY, /* type */
110 2, /* size (0 = byte, 1 = short, 2 = long) */
112 false, /* pc_relative */
114 complain_overflow_dont, /* complain_on_overflow */
115 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
116 "R_68K_GNU_VTENTRY", /* name */
117 false, /* partial_inplace */
124 rtype_to_howto (abfd, cache_ptr, dst)
125 bfd *abfd ATTRIBUTE_UNUSED;
127 Elf_Internal_Rela *dst;
129 BFD_ASSERT (ELF32_R_TYPE(dst->r_info) < (unsigned int) R_68K_max);
130 cache_ptr->howto = &howto_table[ELF32_R_TYPE(dst->r_info)];
133 #define elf_info_to_howto rtype_to_howto
137 bfd_reloc_code_real_type bfd_val;
140 { BFD_RELOC_NONE, R_68K_NONE },
141 { BFD_RELOC_32, R_68K_32 },
142 { BFD_RELOC_16, R_68K_16 },
143 { BFD_RELOC_8, R_68K_8 },
144 { BFD_RELOC_32_PCREL, R_68K_PC32 },
145 { BFD_RELOC_16_PCREL, R_68K_PC16 },
146 { BFD_RELOC_8_PCREL, R_68K_PC8 },
147 { BFD_RELOC_32_GOT_PCREL, R_68K_GOT32 },
148 { BFD_RELOC_16_GOT_PCREL, R_68K_GOT16 },
149 { BFD_RELOC_8_GOT_PCREL, R_68K_GOT8 },
150 { BFD_RELOC_32_GOTOFF, R_68K_GOT32O },
151 { BFD_RELOC_16_GOTOFF, R_68K_GOT16O },
152 { BFD_RELOC_8_GOTOFF, R_68K_GOT8O },
153 { BFD_RELOC_32_PLT_PCREL, R_68K_PLT32 },
154 { BFD_RELOC_16_PLT_PCREL, R_68K_PLT16 },
155 { BFD_RELOC_8_PLT_PCREL, R_68K_PLT8 },
156 { BFD_RELOC_32_PLTOFF, R_68K_PLT32O },
157 { BFD_RELOC_16_PLTOFF, R_68K_PLT16O },
158 { BFD_RELOC_8_PLTOFF, R_68K_PLT8O },
159 { BFD_RELOC_NONE, R_68K_COPY },
160 { BFD_RELOC_68K_GLOB_DAT, R_68K_GLOB_DAT },
161 { BFD_RELOC_68K_JMP_SLOT, R_68K_JMP_SLOT },
162 { BFD_RELOC_68K_RELATIVE, R_68K_RELATIVE },
163 { BFD_RELOC_CTOR, R_68K_32 },
164 { BFD_RELOC_VTABLE_INHERIT, R_68K_GNU_VTINHERIT },
165 { BFD_RELOC_VTABLE_ENTRY, R_68K_GNU_VTENTRY },
168 static reloc_howto_type *
169 reloc_type_lookup (abfd, code)
170 bfd *abfd ATTRIBUTE_UNUSED;
171 bfd_reloc_code_real_type code;
174 for (i = 0; i < sizeof (reloc_map) / sizeof (reloc_map[0]); i++)
176 if (reloc_map[i].bfd_val == code)
177 return &howto_table[reloc_map[i].elf_val];
182 #define bfd_elf32_bfd_reloc_type_lookup reloc_type_lookup
183 #define ELF_ARCH bfd_arch_m68k
184 /* end code generated by elf.el */
188 /* Functions for the m68k ELF linker. */
190 /* The name of the dynamic interpreter. This is put in the .interp
193 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
195 /* The size in bytes of an entry in the procedure linkage table. */
197 #define PLT_ENTRY_SIZE 20
199 /* The first entry in a procedure linkage table looks like this. See
200 the SVR4 ABI m68k supplement to see how this works. */
202 static const bfd_byte elf_m68k_plt0_entry[PLT_ENTRY_SIZE] =
204 0x2f, 0x3b, 0x01, 0x70, /* move.l (%pc,addr),-(%sp) */
205 0, 0, 0, 0, /* replaced with offset to .got + 4. */
206 0x4e, 0xfb, 0x01, 0x71, /* jmp ([%pc,addr]) */
207 0, 0, 0, 0, /* replaced with offset to .got + 8. */
208 0, 0, 0, 0 /* pad out to 20 bytes. */
211 /* Subsequent entries in a procedure linkage table look like this. */
213 static const bfd_byte elf_m68k_plt_entry[PLT_ENTRY_SIZE] =
215 0x4e, 0xfb, 0x01, 0x71, /* jmp ([%pc,symbol@GOTPC]) */
216 0, 0, 0, 0, /* replaced with offset to symbol's .got entry. */
217 0x2f, 0x3c, /* move.l #offset,-(%sp) */
218 0, 0, 0, 0, /* replaced with offset into relocation table. */
219 0x60, 0xff, /* bra.l .plt */
220 0, 0, 0, 0 /* replaced with offset to start of .plt. */
223 #define CPU32_FLAG(abfd) (elf_elfheader (abfd)->e_flags & EF_CPU32)
225 #define PLT_CPU32_ENTRY_SIZE 24
226 /* Procedure linkage table entries for the cpu32 */
227 static const bfd_byte elf_cpu32_plt0_entry[PLT_CPU32_ENTRY_SIZE] =
229 0x2f, 0x3b, 0x01, 0x70, /* move.l (%pc,addr),-(%sp) */
230 0, 0, 0, 0, /* replaced with offset to .got + 4. */
231 0x22, 0x7b, 0x01, 0x70, /* moveal %pc@(0xc), %a1 */
232 0, 0, 0, 0, /* replace with offset to .got +8. */
233 0x4e, 0xd1, /* jmp %a1@ */
234 0, 0, 0, 0, /* pad out to 24 bytes. */
238 static const bfd_byte elf_cpu32_plt_entry[PLT_CPU32_ENTRY_SIZE] =
240 0x22, 0x7b, 0x01, 0x70, /* moveal %pc@(0xc), %a1 */
241 0, 0, 0, 0, /* replaced with offset to symbol's .got entry. */
242 0x4e, 0xd1, /* jmp %a1@ */
243 0x2f, 0x3c, /* move.l #offset,-(%sp) */
244 0, 0, 0, 0, /* replaced with offset into relocation table. */
245 0x60, 0xff, /* bra.l .plt */
246 0, 0, 0, 0, /* replaced with offset to start of .plt. */
250 /* The m68k linker needs to keep track of the number of relocs that it
251 decides to copy in check_relocs for each symbol. This is so that it
252 can discard PC relative relocs if it doesn't need them when linking
253 with -Bsymbolic. We store the information in a field extending the
254 regular ELF linker hash table. */
256 /* This structure keeps track of the number of PC relative relocs we have
257 copied for a given symbol. */
259 struct elf_m68k_pcrel_relocs_copied
262 struct elf_m68k_pcrel_relocs_copied *next;
263 /* A section in dynobj. */
265 /* Number of relocs copied in this section. */
269 /* m68k ELF linker hash entry. */
271 struct elf_m68k_link_hash_entry
273 struct elf_link_hash_entry root;
275 /* Number of PC relative relocs copied for this symbol. */
276 struct elf_m68k_pcrel_relocs_copied *pcrel_relocs_copied;
279 /* m68k ELF linker hash table. */
281 struct elf_m68k_link_hash_table
283 struct elf_link_hash_table root;
286 /* Declare this now that the above structures are defined. */
288 static boolean elf_m68k_discard_copies
289 PARAMS ((struct elf_m68k_link_hash_entry *, PTR));
291 /* Traverse an m68k ELF linker hash table. */
293 #define elf_m68k_link_hash_traverse(table, func, info) \
294 (elf_link_hash_traverse \
296 (boolean (*) PARAMS ((struct elf_link_hash_entry *, PTR))) (func), \
299 /* Get the m68k ELF linker hash table from a link_info structure. */
301 #define elf_m68k_hash_table(p) \
302 ((struct elf_m68k_link_hash_table *) (p)->hash)
304 /* Create an entry in an m68k ELF linker hash table. */
306 static struct bfd_hash_entry *
307 elf_m68k_link_hash_newfunc (entry, table, string)
308 struct bfd_hash_entry *entry;
309 struct bfd_hash_table *table;
312 struct elf_m68k_link_hash_entry *ret =
313 (struct elf_m68k_link_hash_entry *) entry;
315 /* Allocate the structure if it has not already been allocated by a
317 if (ret == (struct elf_m68k_link_hash_entry *) NULL)
318 ret = ((struct elf_m68k_link_hash_entry *)
319 bfd_hash_allocate (table,
320 sizeof (struct elf_m68k_link_hash_entry)));
321 if (ret == (struct elf_m68k_link_hash_entry *) NULL)
322 return (struct bfd_hash_entry *) ret;
324 /* Call the allocation method of the superclass. */
325 ret = ((struct elf_m68k_link_hash_entry *)
326 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
328 if (ret != (struct elf_m68k_link_hash_entry *) NULL)
330 ret->pcrel_relocs_copied = NULL;
333 return (struct bfd_hash_entry *) ret;
336 /* Create an m68k ELF linker hash table. */
338 static struct bfd_link_hash_table *
339 elf_m68k_link_hash_table_create (abfd)
342 struct elf_m68k_link_hash_table *ret;
343 bfd_size_type amt = sizeof (struct elf_m68k_link_hash_table);
345 ret = (struct elf_m68k_link_hash_table *) bfd_alloc (abfd, amt);
346 if (ret == (struct elf_m68k_link_hash_table *) NULL)
349 if (! _bfd_elf_link_hash_table_init (&ret->root, abfd,
350 elf_m68k_link_hash_newfunc))
352 bfd_release (abfd, ret);
356 return &ret->root.root;
359 /* Keep m68k-specific flags in the ELF header */
361 elf32_m68k_set_private_flags (abfd, flags)
365 elf_elfheader (abfd)->e_flags = flags;
366 elf_flags_init (abfd) = true;
370 /* Copy m68k-specific data from one module to another */
372 elf32_m68k_copy_private_bfd_data (ibfd, obfd)
378 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
379 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
382 in_flags = elf_elfheader (ibfd)->e_flags;
384 elf_elfheader (obfd)->e_flags = in_flags;
385 elf_flags_init (obfd) = true;
390 /* Merge backend specific data from an object file to the output
391 object file when linking. */
393 elf32_m68k_merge_private_bfd_data (ibfd, obfd)
400 if ( bfd_get_flavour (ibfd) != bfd_target_elf_flavour
401 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
404 in_flags = elf_elfheader (ibfd)->e_flags;
405 out_flags = elf_elfheader (obfd)->e_flags;
407 if (!elf_flags_init (obfd))
409 elf_flags_init (obfd) = true;
410 elf_elfheader (obfd)->e_flags = in_flags;
416 /* Display the flags field */
418 elf32_m68k_print_private_bfd_data (abfd, ptr)
422 FILE *file = (FILE *) ptr;
424 BFD_ASSERT (abfd != NULL && ptr != NULL);
426 /* Print normal ELF private data. */
427 _bfd_elf_print_private_bfd_data (abfd, ptr);
429 /* Ignore init flag - it may not be set, despite the flags field containing valid data. */
431 /* xgettext:c-format */
432 fprintf (file, _ ("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
434 if (elf_elfheader (abfd)->e_flags & EF_CPU32)
435 fprintf (file, _ (" [cpu32]"));
441 /* Look through the relocs for a section during the first phase, and
442 allocate space in the global offset table or procedure linkage
446 elf_m68k_check_relocs (abfd, info, sec, relocs)
448 struct bfd_link_info *info;
450 const Elf_Internal_Rela *relocs;
453 Elf_Internal_Shdr *symtab_hdr;
454 struct elf_link_hash_entry **sym_hashes;
455 bfd_signed_vma *local_got_refcounts;
456 const Elf_Internal_Rela *rel;
457 const Elf_Internal_Rela *rel_end;
462 if (info->relocateable)
465 dynobj = elf_hash_table (info)->dynobj;
466 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
467 sym_hashes = elf_sym_hashes (abfd);
468 local_got_refcounts = elf_local_got_refcounts (abfd);
474 rel_end = relocs + sec->reloc_count;
475 for (rel = relocs; rel < rel_end; rel++)
477 unsigned long r_symndx;
478 struct elf_link_hash_entry *h;
480 r_symndx = ELF32_R_SYM (rel->r_info);
482 if (r_symndx < symtab_hdr->sh_info)
485 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
487 switch (ELF32_R_TYPE (rel->r_info))
493 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
499 /* This symbol requires a global offset table entry. */
503 /* Create the .got section. */
504 elf_hash_table (info)->dynobj = dynobj = abfd;
505 if (!_bfd_elf_create_got_section (dynobj, info))
511 sgot = bfd_get_section_by_name (dynobj, ".got");
512 BFD_ASSERT (sgot != NULL);
516 && (h != NULL || info->shared))
518 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
521 srelgot = bfd_make_section (dynobj, ".rela.got");
523 || !bfd_set_section_flags (dynobj, srelgot,
530 || !bfd_set_section_alignment (dynobj, srelgot, 2))
537 if (h->got.refcount == -1)
541 /* Make sure this symbol is output as a dynamic symbol. */
542 if (h->dynindx == -1)
544 if (!bfd_elf32_link_record_dynamic_symbol (info, h))
548 /* Allocate space in the .got section. */
549 sgot->_raw_size += 4;
550 /* Allocate relocation space. */
551 srelgot->_raw_size += sizeof (Elf32_External_Rela);
558 /* This is a global offset table entry for a local symbol. */
559 if (local_got_refcounts == NULL)
563 size = symtab_hdr->sh_info;
564 size *= sizeof (bfd_signed_vma);
565 local_got_refcounts = ((bfd_signed_vma *)
566 bfd_alloc (abfd, size));
567 if (local_got_refcounts == NULL)
569 elf_local_got_refcounts (abfd) = local_got_refcounts;
570 memset (local_got_refcounts, -1, (size_t) size);
572 if (local_got_refcounts[r_symndx] == -1)
574 local_got_refcounts[r_symndx] = 1;
576 sgot->_raw_size += 4;
579 /* If we are generating a shared object, we need to
580 output a R_68K_RELATIVE reloc so that the dynamic
581 linker can adjust this GOT entry. */
582 srelgot->_raw_size += sizeof (Elf32_External_Rela);
586 local_got_refcounts[r_symndx]++;
593 /* This symbol requires a procedure linkage table entry. We
594 actually build the entry in adjust_dynamic_symbol,
595 because this might be a case of linking PIC code which is
596 never referenced by a dynamic object, in which case we
597 don't need to generate a procedure linkage table entry
600 /* If this is a local symbol, we resolve it directly without
601 creating a procedure linkage table entry. */
605 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
606 if (h->plt.refcount == -1)
615 /* This symbol requires a procedure linkage table entry. */
619 /* It does not make sense to have this relocation for a
620 local symbol. FIXME: does it? How to handle it if
621 it does make sense? */
622 bfd_set_error (bfd_error_bad_value);
626 /* Make sure this symbol is output as a dynamic symbol. */
627 if (h->dynindx == -1)
629 if (!bfd_elf32_link_record_dynamic_symbol (info, h))
633 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
634 if (h->plt.refcount == -1)
643 /* If we are creating a shared library and this is not a local
644 symbol, we need to copy the reloc into the shared library.
645 However when linking with -Bsymbolic and this is a global
646 symbol which is defined in an object we are including in the
647 link (i.e., DEF_REGULAR is set), then we can resolve the
648 reloc directly. At this point we have not seen all the input
649 files, so it is possible that DEF_REGULAR is not set now but
650 will be set later (it is never cleared). We account for that
651 possibility below by storing information in the
652 pcrel_relocs_copied field of the hash table entry. */
654 && (sec->flags & SEC_ALLOC) != 0
657 || (h->elf_link_hash_flags
658 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
662 /* Make sure a plt entry is created for this symbol if
663 it turns out to be a function defined by a dynamic
665 if (h->plt.refcount == -1)
678 /* Make sure a plt entry is created for this symbol if it
679 turns out to be a function defined by a dynamic object. */
680 if (h->plt.refcount == -1)
686 /* If we are creating a shared library, we need to copy the
687 reloc into the shared library. */
689 && (sec->flags & SEC_ALLOC) != 0)
691 /* When creating a shared object, we must copy these
692 reloc types into the output file. We create a reloc
693 section in dynobj and make room for this reloc. */
698 name = (bfd_elf_string_from_elf_section
700 elf_elfheader (abfd)->e_shstrndx,
701 elf_section_data (sec)->rel_hdr.sh_name));
705 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
706 && strcmp (bfd_get_section_name (abfd, sec),
709 sreloc = bfd_get_section_by_name (dynobj, name);
712 sreloc = bfd_make_section (dynobj, name);
714 || !bfd_set_section_flags (dynobj, sreloc,
721 || !bfd_set_section_alignment (dynobj, sreloc, 2))
724 if (sec->flags & SEC_READONLY)
725 info->flags |= DF_TEXTREL;
728 sreloc->_raw_size += sizeof (Elf32_External_Rela);
730 /* If we are linking with -Bsymbolic, we count the number of
731 PC relative relocations we have entered for this symbol,
732 so that we can discard them again if the symbol is later
733 defined by a regular object. Note that this function is
734 only called if we are using an m68kelf linker hash table,
735 which means that h is really a pointer to an
736 elf_m68k_link_hash_entry. */
737 if ((ELF32_R_TYPE (rel->r_info) == R_68K_PC8
738 || ELF32_R_TYPE (rel->r_info) == R_68K_PC16
739 || ELF32_R_TYPE (rel->r_info) == R_68K_PC32)
742 struct elf_m68k_link_hash_entry *eh;
743 struct elf_m68k_pcrel_relocs_copied *p;
745 eh = (struct elf_m68k_link_hash_entry *) h;
747 for (p = eh->pcrel_relocs_copied; p != NULL; p = p->next)
748 if (p->section == sreloc)
753 p = ((struct elf_m68k_pcrel_relocs_copied *)
754 bfd_alloc (dynobj, (bfd_size_type) sizeof *p));
757 p->next = eh->pcrel_relocs_copied;
758 eh->pcrel_relocs_copied = p;
769 /* This relocation describes the C++ object vtable hierarchy.
770 Reconstruct it for later use during GC. */
771 case R_68K_GNU_VTINHERIT:
772 if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
776 /* This relocation describes which C++ vtable entries are actually
777 used. Record for later use during GC. */
778 case R_68K_GNU_VTENTRY:
779 if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
791 /* Return the section that should be marked against GC for a given
795 elf_m68k_gc_mark_hook (abfd, info, rel, h, sym)
797 struct bfd_link_info *info ATTRIBUTE_UNUSED;
798 Elf_Internal_Rela *rel;
799 struct elf_link_hash_entry *h;
800 Elf_Internal_Sym *sym;
804 switch (ELF32_R_TYPE (rel->r_info))
806 case R_68K_GNU_VTINHERIT:
807 case R_68K_GNU_VTENTRY:
811 switch (h->root.type)
816 case bfd_link_hash_defined:
817 case bfd_link_hash_defweak:
818 return h->root.u.def.section;
820 case bfd_link_hash_common:
821 return h->root.u.c.p->section;
827 if (!(elf_bad_symtab (abfd)
828 && ELF_ST_BIND (sym->st_info) != STB_LOCAL)
829 && ! ((sym->st_shndx <= 0 || sym->st_shndx >= SHN_LORESERVE)
830 && sym->st_shndx != SHN_COMMON))
832 return bfd_section_from_elf_index (abfd, sym->st_shndx);
839 /* Update the got entry reference counts for the section being removed. */
842 elf_m68k_gc_sweep_hook (abfd, info, sec, relocs)
844 struct bfd_link_info *info;
846 const Elf_Internal_Rela *relocs;
848 Elf_Internal_Shdr *symtab_hdr;
849 struct elf_link_hash_entry **sym_hashes;
850 bfd_signed_vma *local_got_refcounts;
851 const Elf_Internal_Rela *rel, *relend;
852 unsigned long r_symndx;
853 struct elf_link_hash_entry *h;
858 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
859 sym_hashes = elf_sym_hashes (abfd);
860 local_got_refcounts = elf_local_got_refcounts (abfd);
862 dynobj = elf_hash_table (info)->dynobj;
866 sgot = bfd_get_section_by_name (dynobj, ".got");
867 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
869 relend = relocs + sec->reloc_count;
870 for (rel = relocs; rel < relend; rel++)
872 switch (ELF32_R_TYPE (rel->r_info))
880 r_symndx = ELF32_R_SYM (rel->r_info);
881 if (r_symndx >= symtab_hdr->sh_info)
883 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
884 if (h->got.refcount > 0)
887 if (h->got.refcount == 0)
889 /* We don't need the .got entry any more. */
890 sgot->_raw_size -= 4;
891 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
895 else if (local_got_refcounts != NULL)
897 if (local_got_refcounts[r_symndx] > 0)
899 --local_got_refcounts[r_symndx];
900 if (local_got_refcounts[r_symndx] == 0)
902 /* We don't need the .got entry any more. */
903 sgot->_raw_size -= 4;
905 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
923 r_symndx = ELF32_R_SYM (rel->r_info);
924 if (r_symndx >= symtab_hdr->sh_info)
926 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
927 if (h->plt.refcount > 0)
940 /* Adjust a symbol defined by a dynamic object and referenced by a
941 regular object. The current definition is in some section of the
942 dynamic object, but we're not including those sections. We have to
943 change the definition to something the rest of the link can
947 elf_m68k_adjust_dynamic_symbol (info, h)
948 struct bfd_link_info *info;
949 struct elf_link_hash_entry *h;
953 unsigned int power_of_two;
955 dynobj = elf_hash_table (info)->dynobj;
957 /* Make sure we know what is going on here. */
958 BFD_ASSERT (dynobj != NULL
959 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
960 || h->weakdef != NULL
961 || ((h->elf_link_hash_flags
962 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
963 && (h->elf_link_hash_flags
964 & ELF_LINK_HASH_REF_REGULAR) != 0
965 && (h->elf_link_hash_flags
966 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
968 /* If this is a function, put it in the procedure linkage table. We
969 will fill in the contents of the procedure linkage table later,
970 when we know the address of the .got section. */
971 if (h->type == STT_FUNC
972 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
975 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
976 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0
977 /* We must always create the plt entry if it was referenced
978 by a PLTxxO relocation. In this case we already recorded
979 it as a dynamic symbol. */
982 /* This case can occur if we saw a PLTxx reloc in an input
983 file, but the symbol was never referred to by a dynamic
984 object. In such a case, we don't actually need to build
985 a procedure linkage table, and we can just do a PCxx
987 BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
988 h->plt.offset = (bfd_vma) -1;
992 /* GC may have rendered this entry unused. */
993 if (h->plt.refcount <= 0)
995 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
996 h->plt.offset = (bfd_vma) -1;
1000 /* Make sure this symbol is output as a dynamic symbol. */
1001 if (h->dynindx == -1)
1003 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
1007 s = bfd_get_section_by_name (dynobj, ".plt");
1008 BFD_ASSERT (s != NULL);
1010 /* If this is the first .plt entry, make room for the special
1012 if (s->_raw_size == 0)
1014 if (CPU32_FLAG (dynobj))
1015 s->_raw_size += PLT_CPU32_ENTRY_SIZE;
1017 s->_raw_size += PLT_ENTRY_SIZE;
1020 /* If this symbol is not defined in a regular file, and we are
1021 not generating a shared library, then set the symbol to this
1022 location in the .plt. This is required to make function
1023 pointers compare as equal between the normal executable and
1024 the shared library. */
1026 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1028 h->root.u.def.section = s;
1029 h->root.u.def.value = s->_raw_size;
1032 h->plt.offset = s->_raw_size;
1034 /* Make room for this entry. */
1035 if (CPU32_FLAG (dynobj))
1036 s->_raw_size += PLT_CPU32_ENTRY_SIZE;
1038 s->_raw_size += PLT_ENTRY_SIZE;
1040 /* We also need to make an entry in the .got.plt section, which
1041 will be placed in the .got section by the linker script. */
1043 s = bfd_get_section_by_name (dynobj, ".got.plt");
1044 BFD_ASSERT (s != NULL);
1047 /* We also need to make an entry in the .rela.plt section. */
1049 s = bfd_get_section_by_name (dynobj, ".rela.plt");
1050 BFD_ASSERT (s != NULL);
1051 s->_raw_size += sizeof (Elf32_External_Rela);
1056 /* Reinitialize the plt offset now that it is not used as a reference
1058 h->plt.offset = (bfd_vma) -1;
1060 /* If this is a weak symbol, and there is a real definition, the
1061 processor independent code will have arranged for us to see the
1062 real definition first, and we can just use the same value. */
1063 if (h->weakdef != NULL)
1065 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1066 || h->weakdef->root.type == bfd_link_hash_defweak);
1067 h->root.u.def.section = h->weakdef->root.u.def.section;
1068 h->root.u.def.value = h->weakdef->root.u.def.value;
1072 /* This is a reference to a symbol defined by a dynamic object which
1073 is not a function. */
1075 /* If we are creating a shared library, we must presume that the
1076 only references to the symbol are via the global offset table.
1077 For such cases we need not do anything here; the relocations will
1078 be handled correctly by relocate_section. */
1082 /* We must allocate the symbol in our .dynbss section, which will
1083 become part of the .bss section of the executable. There will be
1084 an entry for this symbol in the .dynsym section. The dynamic
1085 object will contain position independent code, so all references
1086 from the dynamic object to this symbol will go through the global
1087 offset table. The dynamic linker will use the .dynsym entry to
1088 determine the address it must put in the global offset table, so
1089 both the dynamic object and the regular object will refer to the
1090 same memory location for the variable. */
1092 s = bfd_get_section_by_name (dynobj, ".dynbss");
1093 BFD_ASSERT (s != NULL);
1095 /* We must generate a R_68K_COPY reloc to tell the dynamic linker to
1096 copy the initial value out of the dynamic object and into the
1097 runtime process image. We need to remember the offset into the
1098 .rela.bss section we are going to use. */
1099 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1103 srel = bfd_get_section_by_name (dynobj, ".rela.bss");
1104 BFD_ASSERT (srel != NULL);
1105 srel->_raw_size += sizeof (Elf32_External_Rela);
1106 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1109 /* We need to figure out the alignment required for this symbol. I
1110 have no idea how ELF linkers handle this. */
1111 power_of_two = bfd_log2 (h->size);
1112 if (power_of_two > 3)
1115 /* Apply the required alignment. */
1116 s->_raw_size = BFD_ALIGN (s->_raw_size,
1117 (bfd_size_type) (1 << power_of_two));
1118 if (power_of_two > bfd_get_section_alignment (dynobj, s))
1120 if (!bfd_set_section_alignment (dynobj, s, power_of_two))
1124 /* Define the symbol as being at this point in the section. */
1125 h->root.u.def.section = s;
1126 h->root.u.def.value = s->_raw_size;
1128 /* Increment the section size to make room for the symbol. */
1129 s->_raw_size += h->size;
1134 /* Set the sizes of the dynamic sections. */
1137 elf_m68k_size_dynamic_sections (output_bfd, info)
1138 bfd *output_bfd ATTRIBUTE_UNUSED;
1139 struct bfd_link_info *info;
1146 dynobj = elf_hash_table (info)->dynobj;
1147 BFD_ASSERT (dynobj != NULL);
1149 if (elf_hash_table (info)->dynamic_sections_created)
1151 /* Set the contents of the .interp section to the interpreter. */
1154 s = bfd_get_section_by_name (dynobj, ".interp");
1155 BFD_ASSERT (s != NULL);
1156 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
1157 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1162 /* We may have created entries in the .rela.got section.
1163 However, if we are not creating the dynamic sections, we will
1164 not actually use these entries. Reset the size of .rela.got,
1165 which will cause it to get stripped from the output file
1167 s = bfd_get_section_by_name (dynobj, ".rela.got");
1172 /* If this is a -Bsymbolic shared link, then we need to discard all PC
1173 relative relocs against symbols defined in a regular object. We
1174 allocated space for them in the check_relocs routine, but we will not
1175 fill them in in the relocate_section routine. */
1176 if (info->shared && info->symbolic)
1177 elf_m68k_link_hash_traverse (elf_m68k_hash_table (info),
1178 elf_m68k_discard_copies,
1181 /* The check_relocs and adjust_dynamic_symbol entry points have
1182 determined the sizes of the various dynamic sections. Allocate
1186 for (s = dynobj->sections; s != NULL; s = s->next)
1191 if ((s->flags & SEC_LINKER_CREATED) == 0)
1194 /* It's OK to base decisions on the section name, because none
1195 of the dynobj section names depend upon the input files. */
1196 name = bfd_get_section_name (dynobj, s);
1200 if (strcmp (name, ".plt") == 0)
1202 if (s->_raw_size == 0)
1204 /* Strip this section if we don't need it; see the
1210 /* Remember whether there is a PLT. */
1214 else if (strncmp (name, ".rela", 5) == 0)
1216 if (s->_raw_size == 0)
1218 /* If we don't need this section, strip it from the
1219 output file. This is mostly to handle .rela.bss and
1220 .rela.plt. We must create both sections in
1221 create_dynamic_sections, because they must be created
1222 before the linker maps input sections to output
1223 sections. The linker does that before
1224 adjust_dynamic_symbol is called, and it is that
1225 function which decides whether anything needs to go
1226 into these sections. */
1233 /* We use the reloc_count field as a counter if we need
1234 to copy relocs into the output file. */
1238 else if (strncmp (name, ".got", 4) != 0)
1240 /* It's not one of our sections, so don't allocate space. */
1246 _bfd_strip_section_from_output (info, s);
1250 /* Allocate memory for the section contents. */
1251 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
1252 Unused entries should be reclaimed before the section's contents
1253 are written out, but at the moment this does not happen. Thus in
1254 order to prevent writing out garbage, we initialise the section's
1255 contents to zero. */
1256 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
1257 if (s->contents == NULL && s->_raw_size != 0)
1261 if (elf_hash_table (info)->dynamic_sections_created)
1263 /* Add some entries to the .dynamic section. We fill in the
1264 values later, in elf_m68k_finish_dynamic_sections, but we
1265 must add the entries now so that we get the correct size for
1266 the .dynamic section. The DT_DEBUG entry is filled in by the
1267 dynamic linker and used by the debugger. */
1268 #define add_dynamic_entry(TAG, VAL) \
1269 bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
1273 if (!add_dynamic_entry (DT_DEBUG, 0))
1279 if (!add_dynamic_entry (DT_PLTGOT, 0)
1280 || !add_dynamic_entry (DT_PLTRELSZ, 0)
1281 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
1282 || !add_dynamic_entry (DT_JMPREL, 0))
1288 if (!add_dynamic_entry (DT_RELA, 0)
1289 || !add_dynamic_entry (DT_RELASZ, 0)
1290 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
1294 if ((info->flags & DF_TEXTREL) != 0)
1296 if (!add_dynamic_entry (DT_TEXTREL, 0))
1300 #undef add_dynamic_entry
1305 /* This function is called via elf_m68k_link_hash_traverse if we are
1306 creating a shared object with -Bsymbolic. It discards the space
1307 allocated to copy PC relative relocs against symbols which are defined
1308 in regular objects. We allocated space for them in the check_relocs
1309 routine, but we won't fill them in in the relocate_section routine. */
1312 elf_m68k_discard_copies (h, ignore)
1313 struct elf_m68k_link_hash_entry *h;
1314 PTR ignore ATTRIBUTE_UNUSED;
1316 struct elf_m68k_pcrel_relocs_copied *s;
1318 /* We only discard relocs for symbols defined in a regular object. */
1319 if ((h->root.elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1322 for (s = h->pcrel_relocs_copied; s != NULL; s = s->next)
1323 s->section->_raw_size -= s->count * sizeof (Elf32_External_Rela);
1328 /* Relocate an M68K ELF section. */
1331 elf_m68k_relocate_section (output_bfd, info, input_bfd, input_section,
1332 contents, relocs, local_syms, local_sections)
1334 struct bfd_link_info *info;
1336 asection *input_section;
1338 Elf_Internal_Rela *relocs;
1339 Elf_Internal_Sym *local_syms;
1340 asection **local_sections;
1343 Elf_Internal_Shdr *symtab_hdr;
1344 struct elf_link_hash_entry **sym_hashes;
1345 bfd_vma *local_got_offsets;
1349 Elf_Internal_Rela *rel;
1350 Elf_Internal_Rela *relend;
1352 dynobj = elf_hash_table (info)->dynobj;
1353 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1354 sym_hashes = elf_sym_hashes (input_bfd);
1355 local_got_offsets = elf_local_got_offsets (input_bfd);
1362 relend = relocs + input_section->reloc_count;
1363 for (; rel < relend; rel++)
1366 reloc_howto_type *howto;
1367 unsigned long r_symndx;
1368 struct elf_link_hash_entry *h;
1369 Elf_Internal_Sym *sym;
1372 bfd_reloc_status_type r;
1374 r_type = ELF32_R_TYPE (rel->r_info);
1375 if (r_type < 0 || r_type >= (int) R_68K_max)
1377 bfd_set_error (bfd_error_bad_value);
1380 howto = howto_table + r_type;
1382 r_symndx = ELF32_R_SYM (rel->r_info);
1384 if (info->relocateable)
1386 /* This is a relocateable link. We don't have to change
1387 anything, unless the reloc is against a section symbol,
1388 in which case we have to adjust according to where the
1389 section symbol winds up in the output section. */
1390 if (r_symndx < symtab_hdr->sh_info)
1392 sym = local_syms + r_symndx;
1393 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1395 sec = local_sections[r_symndx];
1396 rel->r_addend += sec->output_offset + sym->st_value;
1403 /* This is a final link. */
1407 if (r_symndx < symtab_hdr->sh_info)
1409 sym = local_syms + r_symndx;
1410 sec = local_sections[r_symndx];
1411 relocation = (sec->output_section->vma
1412 + sec->output_offset
1417 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1418 while (h->root.type == bfd_link_hash_indirect
1419 || h->root.type == bfd_link_hash_warning)
1420 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1421 if (h->root.type == bfd_link_hash_defined
1422 || h->root.type == bfd_link_hash_defweak)
1424 sec = h->root.u.def.section;
1425 if (((r_type == R_68K_PLT8
1426 || r_type == R_68K_PLT16
1427 || r_type == R_68K_PLT32
1428 || r_type == R_68K_PLT8O
1429 || r_type == R_68K_PLT16O
1430 || r_type == R_68K_PLT32O)
1431 && h->plt.offset != (bfd_vma) -1
1432 && elf_hash_table (info)->dynamic_sections_created)
1433 || ((r_type == R_68K_GOT8O
1434 || r_type == R_68K_GOT16O
1435 || r_type == R_68K_GOT32O
1436 || ((r_type == R_68K_GOT8
1437 || r_type == R_68K_GOT16
1438 || r_type == R_68K_GOT32)
1439 && strcmp (h->root.root.string,
1440 "_GLOBAL_OFFSET_TABLE_") != 0))
1441 && elf_hash_table (info)->dynamic_sections_created
1443 || (! info->symbolic && h->dynindx != -1)
1444 || (h->elf_link_hash_flags
1445 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1447 && ((! info->symbolic && h->dynindx != -1)
1448 || (h->elf_link_hash_flags
1449 & ELF_LINK_HASH_DEF_REGULAR) == 0)
1450 && ((input_section->flags & SEC_ALLOC) != 0
1451 /* DWARF will emit R_68K_32 relocations in its
1452 sections against symbols defined externally
1453 in shared libraries. We can't do anything
1455 || ((input_section->flags & SEC_DEBUGGING) != 0
1456 && (h->elf_link_hash_flags
1457 & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
1458 && (r_type == R_68K_8
1459 || r_type == R_68K_16
1460 || r_type == R_68K_32
1461 || r_type == R_68K_PC8
1462 || r_type == R_68K_PC16
1463 || r_type == R_68K_PC32)))
1465 /* In these cases, we don't need the relocation
1466 value. We check specially because in some
1467 obscure cases sec->output_section will be NULL. */
1471 relocation = (h->root.u.def.value
1472 + sec->output_section->vma
1473 + sec->output_offset);
1475 else if (h->root.type == bfd_link_hash_undefweak)
1477 else if (info->shared && !info->symbolic
1478 && !info->no_undefined
1479 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
1483 if (!(info->callbacks->undefined_symbol
1484 (info, h->root.root.string, input_bfd,
1485 input_section, rel->r_offset,
1486 (!info->shared || info->no_undefined
1487 || ELF_ST_VISIBILITY (h->other)))))
1498 /* Relocation is to the address of the entry for this symbol
1499 in the global offset table. */
1501 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1507 /* Relocation is the offset of the entry for this symbol in
1508 the global offset table. */
1515 sgot = bfd_get_section_by_name (dynobj, ".got");
1516 BFD_ASSERT (sgot != NULL);
1521 off = h->got.offset;
1522 BFD_ASSERT (off != (bfd_vma) -1);
1524 if (!elf_hash_table (info)->dynamic_sections_created
1526 && (info->symbolic || h->dynindx == -1)
1527 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
1529 /* This is actually a static link, or it is a
1530 -Bsymbolic link and the symbol is defined
1531 locally, or the symbol was forced to be local
1532 because of a version file.. We must initialize
1533 this entry in the global offset table. Since
1534 the offset must always be a multiple of 4, we
1535 use the least significant bit to record whether
1536 we have initialized it already.
1538 When doing a dynamic link, we create a .rela.got
1539 relocation entry to initialize the value. This
1540 is done in the finish_dynamic_symbol routine. */
1545 bfd_put_32 (output_bfd, relocation,
1546 sgot->contents + off);
1553 BFD_ASSERT (local_got_offsets != NULL
1554 && local_got_offsets[r_symndx] != (bfd_vma) -1);
1556 off = local_got_offsets[r_symndx];
1558 /* The offset must always be a multiple of 4. We use
1559 the least significant bit to record whether we have
1560 already generated the necessary reloc. */
1565 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
1570 Elf_Internal_Rela outrel;
1572 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
1573 BFD_ASSERT (srelgot != NULL);
1575 outrel.r_offset = (sgot->output_section->vma
1576 + sgot->output_offset
1578 outrel.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1579 outrel.r_addend = relocation;
1580 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
1581 (((Elf32_External_Rela *)
1583 + srelgot->reloc_count));
1584 ++srelgot->reloc_count;
1587 local_got_offsets[r_symndx] |= 1;
1591 relocation = sgot->output_offset + off;
1592 if (r_type == R_68K_GOT8O
1593 || r_type == R_68K_GOT16O
1594 || r_type == R_68K_GOT32O)
1596 /* This relocation does not use the addend. */
1600 relocation += sgot->output_section->vma;
1607 /* Relocation is to the entry for this symbol in the
1608 procedure linkage table. */
1610 /* Resolve a PLTxx reloc against a local symbol directly,
1611 without using the procedure linkage table. */
1615 if (h->plt.offset == (bfd_vma) -1
1616 || !elf_hash_table (info)->dynamic_sections_created)
1618 /* We didn't make a PLT entry for this symbol. This
1619 happens when statically linking PIC code, or when
1620 using -Bsymbolic. */
1626 splt = bfd_get_section_by_name (dynobj, ".plt");
1627 BFD_ASSERT (splt != NULL);
1630 relocation = (splt->output_section->vma
1631 + splt->output_offset
1638 /* Relocation is the offset of the entry for this symbol in
1639 the procedure linkage table. */
1640 BFD_ASSERT (h != NULL && h->plt.offset != (bfd_vma) -1);
1644 splt = bfd_get_section_by_name (dynobj, ".plt");
1645 BFD_ASSERT (splt != NULL);
1648 relocation = h->plt.offset;
1650 /* This relocation does not use the addend. */
1665 && (input_section->flags & SEC_ALLOC) != 0
1666 && ((r_type != R_68K_PC8
1667 && r_type != R_68K_PC16
1668 && r_type != R_68K_PC32)
1670 || (h->elf_link_hash_flags
1671 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
1673 Elf_Internal_Rela outrel;
1674 boolean skip, relocate;
1676 /* When generating a shared object, these relocations
1677 are copied into the output file to be resolved at run
1684 name = (bfd_elf_string_from_elf_section
1686 elf_elfheader (input_bfd)->e_shstrndx,
1687 elf_section_data (input_section)->rel_hdr.sh_name));
1691 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
1692 && strcmp (bfd_get_section_name (input_bfd,
1696 sreloc = bfd_get_section_by_name (dynobj, name);
1697 BFD_ASSERT (sreloc != NULL);
1702 if (elf_section_data (input_section)->stab_info == NULL)
1703 outrel.r_offset = rel->r_offset;
1708 off = (_bfd_stab_section_offset
1709 (output_bfd, &elf_hash_table (info)->stab_info,
1711 &elf_section_data (input_section)->stab_info,
1713 if (off == (bfd_vma) -1)
1715 outrel.r_offset = off;
1718 outrel.r_offset += (input_section->output_section->vma
1719 + input_section->output_offset);
1723 memset (&outrel, 0, sizeof outrel);
1726 /* h->dynindx may be -1 if the symbol was marked to
1729 && ((! info->symbolic && h->dynindx != -1)
1730 || (h->elf_link_hash_flags
1731 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1733 BFD_ASSERT (h->dynindx != -1);
1735 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1736 outrel.r_addend = relocation + rel->r_addend;
1740 if (r_type == R_68K_32)
1743 outrel.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1744 outrel.r_addend = relocation + rel->r_addend;
1751 sec = local_sections[r_symndx];
1754 BFD_ASSERT (h->root.type == bfd_link_hash_defined
1756 == bfd_link_hash_defweak));
1757 sec = h->root.u.def.section;
1759 if (sec != NULL && bfd_is_abs_section (sec))
1761 else if (sec == NULL || sec->owner == NULL)
1763 bfd_set_error (bfd_error_bad_value);
1770 osec = sec->output_section;
1771 indx = elf_section_data (osec)->dynindx;
1772 BFD_ASSERT (indx > 0);
1776 outrel.r_info = ELF32_R_INFO (indx, r_type);
1777 outrel.r_addend = relocation + rel->r_addend;
1781 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
1782 (((Elf32_External_Rela *)
1784 + sreloc->reloc_count));
1785 ++sreloc->reloc_count;
1787 /* This reloc will be computed at runtime, so there's no
1788 need to do anything now, except for R_68K_32
1789 relocations that have been turned into
1797 case R_68K_GNU_VTINHERIT:
1798 case R_68K_GNU_VTENTRY:
1799 /* These are no-ops in the end. */
1806 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
1807 contents, rel->r_offset,
1808 relocation, rel->r_addend);
1810 if (r != bfd_reloc_ok)
1815 case bfd_reloc_outofrange:
1817 case bfd_reloc_overflow:
1822 name = h->root.root.string;
1825 name = bfd_elf_string_from_elf_section (input_bfd,
1826 symtab_hdr->sh_link,
1831 name = bfd_section_name (input_bfd, sec);
1833 if (!(info->callbacks->reloc_overflow
1834 (info, name, howto->name, (bfd_vma) 0,
1835 input_bfd, input_section, rel->r_offset)))
1846 /* Finish up dynamic symbol handling. We set the contents of various
1847 dynamic sections here. */
1850 elf_m68k_finish_dynamic_symbol (output_bfd, info, h, sym)
1852 struct bfd_link_info *info;
1853 struct elf_link_hash_entry *h;
1854 Elf_Internal_Sym *sym;
1857 int plt_off1, plt_off2, plt_off3;
1859 dynobj = elf_hash_table (info)->dynobj;
1861 if (h->plt.offset != (bfd_vma) -1)
1868 Elf_Internal_Rela rela;
1870 /* This symbol has an entry in the procedure linkage table. Set
1873 BFD_ASSERT (h->dynindx != -1);
1875 splt = bfd_get_section_by_name (dynobj, ".plt");
1876 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
1877 srela = bfd_get_section_by_name (dynobj, ".rela.plt");
1878 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1880 /* Get the index in the procedure linkage table which
1881 corresponds to this symbol. This is the index of this symbol
1882 in all the symbols for which we are making plt entries. The
1883 first entry in the procedure linkage table is reserved. */
1884 if ( CPU32_FLAG (output_bfd))
1885 plt_index = h->plt.offset / PLT_CPU32_ENTRY_SIZE - 1;
1887 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1889 /* Get the offset into the .got table of the entry that
1890 corresponds to this function. Each .got entry is 4 bytes.
1891 The first three are reserved. */
1892 got_offset = (plt_index + 3) * 4;
1894 if ( CPU32_FLAG (output_bfd))
1896 /* Fill in the entry in the procedure linkage table. */
1897 memcpy (splt->contents + h->plt.offset, elf_cpu32_plt_entry,
1898 PLT_CPU32_ENTRY_SIZE);
1905 /* Fill in the entry in the procedure linkage table. */
1906 memcpy (splt->contents + h->plt.offset, elf_m68k_plt_entry,
1913 /* The offset is relative to the first extension word. */
1914 bfd_put_32 (output_bfd,
1915 (sgot->output_section->vma
1916 + sgot->output_offset
1918 - (splt->output_section->vma
1919 + h->plt.offset + 2)),
1920 splt->contents + h->plt.offset + plt_off1);
1922 bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rela),
1923 splt->contents + h->plt.offset + plt_off2);
1924 bfd_put_32 (output_bfd, - (h->plt.offset + plt_off3),
1925 splt->contents + h->plt.offset + plt_off3);
1927 /* Fill in the entry in the global offset table. */
1928 bfd_put_32 (output_bfd,
1929 (splt->output_section->vma
1930 + splt->output_offset
1933 sgot->contents + got_offset);
1935 /* Fill in the entry in the .rela.plt section. */
1936 rela.r_offset = (sgot->output_section->vma
1937 + sgot->output_offset
1939 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_JMP_SLOT);
1941 bfd_elf32_swap_reloca_out (output_bfd, &rela,
1942 ((Elf32_External_Rela *) srela->contents
1945 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1947 /* Mark the symbol as undefined, rather than as defined in
1948 the .plt section. Leave the value alone. */
1949 sym->st_shndx = SHN_UNDEF;
1953 if (h->got.offset != (bfd_vma) -1)
1957 Elf_Internal_Rela rela;
1959 /* This symbol has an entry in the global offset table. Set it
1962 sgot = bfd_get_section_by_name (dynobj, ".got");
1963 srela = bfd_get_section_by_name (dynobj, ".rela.got");
1964 BFD_ASSERT (sgot != NULL && srela != NULL);
1966 rela.r_offset = (sgot->output_section->vma
1967 + sgot->output_offset
1968 + (h->got.offset &~ (bfd_vma) 1));
1970 /* If this is a -Bsymbolic link, and the symbol is defined
1971 locally, we just want to emit a RELATIVE reloc. Likewise if
1972 the symbol was forced to be local because of a version file.
1973 The entry in the global offset table will already have been
1974 initialized in the relocate_section function. */
1976 && (info->symbolic || h->dynindx == -1)
1977 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
1979 rela.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1980 rela.r_addend = bfd_get_signed_32 (output_bfd,
1982 + (h->got.offset &~ (bfd_vma) 1)));
1986 bfd_put_32 (output_bfd, (bfd_vma) 0,
1987 sgot->contents + (h->got.offset &~ (bfd_vma) 1));
1988 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_GLOB_DAT);
1992 bfd_elf32_swap_reloca_out (output_bfd, &rela,
1993 ((Elf32_External_Rela *) srela->contents
1994 + srela->reloc_count));
1995 ++srela->reloc_count;
1998 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
2001 Elf_Internal_Rela rela;
2003 /* This symbol needs a copy reloc. Set it up. */
2005 BFD_ASSERT (h->dynindx != -1
2006 && (h->root.type == bfd_link_hash_defined
2007 || h->root.type == bfd_link_hash_defweak));
2009 s = bfd_get_section_by_name (h->root.u.def.section->owner,
2011 BFD_ASSERT (s != NULL);
2013 rela.r_offset = (h->root.u.def.value
2014 + h->root.u.def.section->output_section->vma
2015 + h->root.u.def.section->output_offset);
2016 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_COPY);
2018 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2019 ((Elf32_External_Rela *) s->contents
2024 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2025 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2026 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2027 sym->st_shndx = SHN_ABS;
2032 /* Finish up the dynamic sections. */
2035 elf_m68k_finish_dynamic_sections (output_bfd, info)
2037 struct bfd_link_info *info;
2043 dynobj = elf_hash_table (info)->dynobj;
2045 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
2046 BFD_ASSERT (sgot != NULL);
2047 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2049 if (elf_hash_table (info)->dynamic_sections_created)
2052 Elf32_External_Dyn *dyncon, *dynconend;
2054 splt = bfd_get_section_by_name (dynobj, ".plt");
2055 BFD_ASSERT (splt != NULL && sdyn != NULL);
2057 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2058 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
2059 for (; dyncon < dynconend; dyncon++)
2061 Elf_Internal_Dyn dyn;
2065 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
2078 s = bfd_get_section_by_name (output_bfd, name);
2079 BFD_ASSERT (s != NULL);
2080 dyn.d_un.d_ptr = s->vma;
2081 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2085 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
2086 BFD_ASSERT (s != NULL);
2087 if (s->_cooked_size != 0)
2088 dyn.d_un.d_val = s->_cooked_size;
2090 dyn.d_un.d_val = s->_raw_size;
2091 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2095 /* The procedure linkage table relocs (DT_JMPREL) should
2096 not be included in the overall relocs (DT_RELA).
2097 Therefore, we override the DT_RELASZ entry here to
2098 make it not include the JMPREL relocs. Since the
2099 linker script arranges for .rela.plt to follow all
2100 other relocation sections, we don't have to worry
2101 about changing the DT_RELA entry. */
2102 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
2105 if (s->_cooked_size != 0)
2106 dyn.d_un.d_val -= s->_cooked_size;
2108 dyn.d_un.d_val -= s->_raw_size;
2110 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2115 /* Fill in the first entry in the procedure linkage table. */
2116 if (splt->_raw_size > 0)
2118 if (!CPU32_FLAG (output_bfd))
2120 memcpy (splt->contents, elf_m68k_plt0_entry, PLT_ENTRY_SIZE);
2121 bfd_put_32 (output_bfd,
2122 (sgot->output_section->vma
2123 + sgot->output_offset + 4
2124 - (splt->output_section->vma + 2)),
2125 splt->contents + 4);
2126 bfd_put_32 (output_bfd,
2127 (sgot->output_section->vma
2128 + sgot->output_offset + 8
2129 - (splt->output_section->vma + 10)),
2130 splt->contents + 12);
2131 elf_section_data (splt->output_section)->this_hdr.sh_entsize
2136 memcpy (splt->contents, elf_cpu32_plt0_entry, PLT_CPU32_ENTRY_SIZE);
2137 bfd_put_32 (output_bfd,
2138 (sgot->output_section->vma
2139 + sgot->output_offset + 4
2140 - (splt->output_section->vma + 2)),
2141 splt->contents + 4);
2142 bfd_put_32 (output_bfd,
2143 (sgot->output_section->vma
2144 + sgot->output_offset + 8
2145 - (splt->output_section->vma + 10)),
2146 splt->contents + 12);
2147 elf_section_data (splt->output_section)->this_hdr.sh_entsize
2148 = PLT_CPU32_ENTRY_SIZE;
2153 /* Fill in the first three entries in the global offset table. */
2154 if (sgot->_raw_size > 0)
2157 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
2159 bfd_put_32 (output_bfd,
2160 sdyn->output_section->vma + sdyn->output_offset,
2162 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
2163 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
2166 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
2171 /* Given a .data section and a .emreloc in-memory section, store
2172 relocation information into the .emreloc section which can be
2173 used at runtime to relocate the section. This is called by the
2174 linker when the --embedded-relocs switch is used. This is called
2175 after the add_symbols entry point has been called for all the
2176 objects, and before the final_link entry point is called. */
2179 bfd_m68k_elf32_create_embedded_relocs (abfd, info, datasec, relsec, errmsg)
2181 struct bfd_link_info *info;
2186 Elf_Internal_Shdr *symtab_hdr;
2187 Elf32_External_Sym *extsyms;
2188 Elf32_External_Sym *free_extsyms = NULL;
2189 Elf_Internal_Rela *internal_relocs;
2190 Elf_Internal_Rela *free_relocs = NULL;
2191 Elf_Internal_Rela *irel, *irelend;
2195 BFD_ASSERT (! info->relocateable);
2199 if (datasec->reloc_count == 0)
2202 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2203 /* Read this BFD's symbols if we haven't done so already, or get the cached
2204 copy if it exists. */
2205 if (symtab_hdr->contents != NULL)
2206 extsyms = (Elf32_External_Sym *) symtab_hdr->contents;
2209 /* Go get them off disk. */
2210 if (info->keep_memory)
2211 extsyms = (Elf32_External_Sym *) bfd_alloc (abfd, symtab_hdr->sh_size);
2213 extsyms = (Elf32_External_Sym *) bfd_malloc (symtab_hdr->sh_size);
2214 if (extsyms == NULL)
2216 if (! info->keep_memory)
2217 free_extsyms = extsyms;
2218 if (bfd_seek (abfd, symtab_hdr->sh_offset, SEEK_SET) != 0
2219 || (bfd_bread (extsyms, symtab_hdr->sh_size, abfd)
2220 != symtab_hdr->sh_size))
2222 if (info->keep_memory)
2223 symtab_hdr->contents = extsyms;
2226 /* Get a copy of the native relocations. */
2227 internal_relocs = (_bfd_elf32_link_read_relocs
2228 (abfd, datasec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
2229 info->keep_memory));
2230 if (internal_relocs == NULL)
2232 if (! info->keep_memory)
2233 free_relocs = internal_relocs;
2235 amt = (bfd_size_type) datasec->reloc_count * 12;
2236 relsec->contents = (bfd_byte *) bfd_alloc (abfd, amt);
2237 if (relsec->contents == NULL)
2240 p = relsec->contents;
2242 irelend = internal_relocs + datasec->reloc_count;
2243 for (irel = internal_relocs; irel < irelend; irel++, p += 12)
2245 asection *targetsec;
2247 /* We are going to write a four byte longword into the runtime
2248 reloc section. The longword will be the address in the data
2249 section which must be relocated. It is followed by the name
2250 of the target section NUL-padded or truncated to 8
2253 /* We can only relocate absolute longword relocs at run time. */
2254 if (ELF32_R_TYPE (irel->r_info) != (int) R_68K_32)
2256 *errmsg = _("unsupported reloc type");
2257 bfd_set_error (bfd_error_bad_value);
2261 /* Get the target section referred to by the reloc. */
2262 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
2264 Elf_Internal_Sym isym;
2266 /* A local symbol. */
2267 bfd_elf32_swap_symbol_in (abfd,
2268 extsyms + ELF32_R_SYM (irel->r_info),
2271 targetsec = bfd_section_from_elf_index (abfd, isym.st_shndx);
2276 struct elf_link_hash_entry *h;
2278 /* An external symbol. */
2279 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
2280 h = elf_sym_hashes (abfd)[indx];
2281 BFD_ASSERT (h != NULL);
2282 if (h->root.type == bfd_link_hash_defined
2283 || h->root.type == bfd_link_hash_defweak)
2284 targetsec = h->root.u.def.section;
2289 bfd_put_32 (abfd, irel->r_offset + datasec->output_offset, p);
2290 memset (p + 4, 0, 8);
2291 if (targetsec != NULL)
2292 strncpy (p + 4, targetsec->output_section->name, 8);
2295 if (free_extsyms != NULL)
2296 free (free_extsyms);
2297 if (free_relocs != NULL)
2302 if (free_extsyms != NULL)
2303 free (free_extsyms);
2304 if (free_relocs != NULL)
2309 static enum elf_reloc_type_class
2310 elf32_m68k_reloc_type_class (type)
2315 case R_68K_RELATIVE:
2316 return reloc_class_relative;
2317 case R_68K_JMP_SLOT:
2318 return reloc_class_plt;
2320 return reloc_class_copy;
2322 return reloc_class_normal;
2326 #define TARGET_BIG_SYM bfd_elf32_m68k_vec
2327 #define TARGET_BIG_NAME "elf32-m68k"
2328 #define ELF_MACHINE_CODE EM_68K
2329 #define ELF_MAXPAGESIZE 0x2000
2330 #define elf_backend_create_dynamic_sections \
2331 _bfd_elf_create_dynamic_sections
2332 #define bfd_elf32_bfd_link_hash_table_create \
2333 elf_m68k_link_hash_table_create
2334 #define bfd_elf32_bfd_final_link _bfd_elf32_gc_common_final_link
2336 #define elf_backend_check_relocs elf_m68k_check_relocs
2337 #define elf_backend_adjust_dynamic_symbol \
2338 elf_m68k_adjust_dynamic_symbol
2339 #define elf_backend_size_dynamic_sections \
2340 elf_m68k_size_dynamic_sections
2341 #define elf_backend_relocate_section elf_m68k_relocate_section
2342 #define elf_backend_finish_dynamic_symbol \
2343 elf_m68k_finish_dynamic_symbol
2344 #define elf_backend_finish_dynamic_sections \
2345 elf_m68k_finish_dynamic_sections
2346 #define elf_backend_gc_mark_hook elf_m68k_gc_mark_hook
2347 #define elf_backend_gc_sweep_hook elf_m68k_gc_sweep_hook
2348 #define bfd_elf32_bfd_copy_private_bfd_data \
2349 elf32_m68k_copy_private_bfd_data
2350 #define bfd_elf32_bfd_merge_private_bfd_data \
2351 elf32_m68k_merge_private_bfd_data
2352 #define bfd_elf32_bfd_set_private_flags \
2353 elf32_m68k_set_private_flags
2354 #define bfd_elf32_bfd_print_private_bfd_data \
2355 elf32_m68k_print_private_bfd_data
2356 #define elf_backend_reloc_type_class elf32_m68k_reloc_type_class
2358 #define elf_backend_can_gc_sections 1
2359 #define elf_backend_want_got_plt 1
2360 #define elf_backend_plt_readonly 1
2361 #define elf_backend_want_plt_sym 0
2362 #define elf_backend_got_header_size 12
2364 #include "elf32-target.h"