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
67 PARAMS ((const Elf_Internal_Rela *));
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 == 0)
539 /* Make sure this symbol is output as a dynamic symbol. */
540 if (h->dynindx == -1)
542 if (!bfd_elf32_link_record_dynamic_symbol (info, h))
546 /* Allocate space in the .got section. */
547 sgot->_raw_size += 4;
548 /* Allocate relocation space. */
549 srelgot->_raw_size += sizeof (Elf32_External_Rela);
555 /* This is a global offset table entry for a local symbol. */
556 if (local_got_refcounts == NULL)
560 size = symtab_hdr->sh_info;
561 size *= sizeof (bfd_signed_vma);
562 local_got_refcounts = ((bfd_signed_vma *)
563 bfd_zalloc (abfd, size));
564 if (local_got_refcounts == NULL)
566 elf_local_got_refcounts (abfd) = local_got_refcounts;
568 if (local_got_refcounts[r_symndx] == 0)
570 sgot->_raw_size += 4;
573 /* If we are generating a shared object, we need to
574 output a R_68K_RELATIVE reloc so that the dynamic
575 linker can adjust this GOT entry. */
576 srelgot->_raw_size += sizeof (Elf32_External_Rela);
579 local_got_refcounts[r_symndx]++;
586 /* This symbol requires a procedure linkage table entry. We
587 actually build the entry in adjust_dynamic_symbol,
588 because this might be a case of linking PIC code which is
589 never referenced by a dynamic object, in which case we
590 don't need to generate a procedure linkage table entry
593 /* If this is a local symbol, we resolve it directly without
594 creating a procedure linkage table entry. */
598 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
605 /* This symbol requires a procedure linkage table entry. */
609 /* It does not make sense to have this relocation for a
610 local symbol. FIXME: does it? How to handle it if
611 it does make sense? */
612 bfd_set_error (bfd_error_bad_value);
616 /* Make sure this symbol is output as a dynamic symbol. */
617 if (h->dynindx == -1)
619 if (!bfd_elf32_link_record_dynamic_symbol (info, h))
623 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
630 /* If we are creating a shared library and this is not a local
631 symbol, we need to copy the reloc into the shared library.
632 However when linking with -Bsymbolic and this is a global
633 symbol which is defined in an object we are including in the
634 link (i.e., DEF_REGULAR is set), then we can resolve the
635 reloc directly. At this point we have not seen all the input
636 files, so it is possible that DEF_REGULAR is not set now but
637 will be set later (it is never cleared). We account for that
638 possibility below by storing information in the
639 pcrel_relocs_copied field of the hash table entry. */
641 && (sec->flags & SEC_ALLOC) != 0
644 || (h->elf_link_hash_flags
645 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
649 /* Make sure a plt entry is created for this symbol if
650 it turns out to be a function defined by a dynamic
662 /* Make sure a plt entry is created for this symbol if it
663 turns out to be a function defined by a dynamic object. */
667 /* If we are creating a shared library, we need to copy the
668 reloc into the shared library. */
670 && (sec->flags & SEC_ALLOC) != 0)
672 /* When creating a shared object, we must copy these
673 reloc types into the output file. We create a reloc
674 section in dynobj and make room for this reloc. */
679 name = (bfd_elf_string_from_elf_section
681 elf_elfheader (abfd)->e_shstrndx,
682 elf_section_data (sec)->rel_hdr.sh_name));
686 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
687 && strcmp (bfd_get_section_name (abfd, sec),
690 sreloc = bfd_get_section_by_name (dynobj, name);
693 sreloc = bfd_make_section (dynobj, name);
695 || !bfd_set_section_flags (dynobj, sreloc,
702 || !bfd_set_section_alignment (dynobj, sreloc, 2))
705 if (sec->flags & SEC_READONLY)
706 info->flags |= DF_TEXTREL;
709 sreloc->_raw_size += sizeof (Elf32_External_Rela);
711 /* If we are linking with -Bsymbolic, we count the number of
712 PC relative relocations we have entered for this symbol,
713 so that we can discard them again if the symbol is later
714 defined by a regular object. Note that this function is
715 only called if we are using an m68kelf linker hash table,
716 which means that h is really a pointer to an
717 elf_m68k_link_hash_entry. */
718 if ((ELF32_R_TYPE (rel->r_info) == R_68K_PC8
719 || ELF32_R_TYPE (rel->r_info) == R_68K_PC16
720 || ELF32_R_TYPE (rel->r_info) == R_68K_PC32)
723 struct elf_m68k_link_hash_entry *eh;
724 struct elf_m68k_pcrel_relocs_copied *p;
726 eh = (struct elf_m68k_link_hash_entry *) h;
728 for (p = eh->pcrel_relocs_copied; p != NULL; p = p->next)
729 if (p->section == sreloc)
734 p = ((struct elf_m68k_pcrel_relocs_copied *)
735 bfd_alloc (dynobj, (bfd_size_type) sizeof *p));
738 p->next = eh->pcrel_relocs_copied;
739 eh->pcrel_relocs_copied = p;
750 /* This relocation describes the C++ object vtable hierarchy.
751 Reconstruct it for later use during GC. */
752 case R_68K_GNU_VTINHERIT:
753 if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
757 /* This relocation describes which C++ vtable entries are actually
758 used. Record for later use during GC. */
759 case R_68K_GNU_VTENTRY:
760 if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
772 /* Return the section that should be marked against GC for a given
776 elf_m68k_gc_mark_hook (abfd, info, rel, h, sym)
778 struct bfd_link_info *info ATTRIBUTE_UNUSED;
779 Elf_Internal_Rela *rel;
780 struct elf_link_hash_entry *h;
781 Elf_Internal_Sym *sym;
785 switch (ELF32_R_TYPE (rel->r_info))
787 case R_68K_GNU_VTINHERIT:
788 case R_68K_GNU_VTENTRY:
792 switch (h->root.type)
797 case bfd_link_hash_defined:
798 case bfd_link_hash_defweak:
799 return h->root.u.def.section;
801 case bfd_link_hash_common:
802 return h->root.u.c.p->section;
808 if (!(elf_bad_symtab (abfd)
809 && ELF_ST_BIND (sym->st_info) != STB_LOCAL)
810 && ! ((sym->st_shndx <= 0 || sym->st_shndx >= SHN_LORESERVE)
811 && sym->st_shndx != SHN_COMMON))
813 return bfd_section_from_elf_index (abfd, sym->st_shndx);
820 /* Update the got entry reference counts for the section being removed. */
823 elf_m68k_gc_sweep_hook (abfd, info, sec, relocs)
825 struct bfd_link_info *info;
827 const Elf_Internal_Rela *relocs;
829 Elf_Internal_Shdr *symtab_hdr;
830 struct elf_link_hash_entry **sym_hashes;
831 bfd_signed_vma *local_got_refcounts;
832 const Elf_Internal_Rela *rel, *relend;
833 unsigned long r_symndx;
834 struct elf_link_hash_entry *h;
839 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
840 sym_hashes = elf_sym_hashes (abfd);
841 local_got_refcounts = elf_local_got_refcounts (abfd);
843 dynobj = elf_hash_table (info)->dynobj;
847 sgot = bfd_get_section_by_name (dynobj, ".got");
848 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
850 relend = relocs + sec->reloc_count;
851 for (rel = relocs; rel < relend; rel++)
853 switch (ELF32_R_TYPE (rel->r_info))
861 r_symndx = ELF32_R_SYM (rel->r_info);
862 if (r_symndx >= symtab_hdr->sh_info)
864 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
865 if (h->got.refcount > 0)
868 if (h->got.refcount == 0)
870 /* We don't need the .got entry any more. */
871 sgot->_raw_size -= 4;
872 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
876 else if (local_got_refcounts != NULL)
878 if (local_got_refcounts[r_symndx] > 0)
880 --local_got_refcounts[r_symndx];
881 if (local_got_refcounts[r_symndx] == 0)
883 /* We don't need the .got entry any more. */
884 sgot->_raw_size -= 4;
886 srelgot->_raw_size -= sizeof (Elf32_External_Rela);
904 r_symndx = ELF32_R_SYM (rel->r_info);
905 if (r_symndx >= symtab_hdr->sh_info)
907 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
908 if (h->plt.refcount > 0)
921 /* Adjust a symbol defined by a dynamic object and referenced by a
922 regular object. The current definition is in some section of the
923 dynamic object, but we're not including those sections. We have to
924 change the definition to something the rest of the link can
928 elf_m68k_adjust_dynamic_symbol (info, h)
929 struct bfd_link_info *info;
930 struct elf_link_hash_entry *h;
934 unsigned int power_of_two;
936 dynobj = elf_hash_table (info)->dynobj;
938 /* Make sure we know what is going on here. */
939 BFD_ASSERT (dynobj != NULL
940 && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
941 || h->weakdef != NULL
942 || ((h->elf_link_hash_flags
943 & ELF_LINK_HASH_DEF_DYNAMIC) != 0
944 && (h->elf_link_hash_flags
945 & ELF_LINK_HASH_REF_REGULAR) != 0
946 && (h->elf_link_hash_flags
947 & ELF_LINK_HASH_DEF_REGULAR) == 0)));
949 /* If this is a function, put it in the procedure linkage table. We
950 will fill in the contents of the procedure linkage table later,
951 when we know the address of the .got section. */
952 if (h->type == STT_FUNC
953 || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
956 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
957 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0
958 /* We must always create the plt entry if it was referenced
959 by a PLTxxO relocation. In this case we already recorded
960 it as a dynamic symbol. */
963 /* This case can occur if we saw a PLTxx reloc in an input
964 file, but the symbol was never referred to by a dynamic
965 object. In such a case, we don't actually need to build
966 a procedure linkage table, and we can just do a PCxx
968 BFD_ASSERT ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0);
969 h->plt.offset = (bfd_vma) -1;
973 /* GC may have rendered this entry unused. */
974 if (h->plt.refcount <= 0)
976 h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
977 h->plt.offset = (bfd_vma) -1;
981 /* Make sure this symbol is output as a dynamic symbol. */
982 if (h->dynindx == -1)
984 if (! bfd_elf32_link_record_dynamic_symbol (info, h))
988 s = bfd_get_section_by_name (dynobj, ".plt");
989 BFD_ASSERT (s != NULL);
991 /* If this is the first .plt entry, make room for the special
993 if (s->_raw_size == 0)
995 if (CPU32_FLAG (dynobj))
996 s->_raw_size += PLT_CPU32_ENTRY_SIZE;
998 s->_raw_size += PLT_ENTRY_SIZE;
1001 /* If this symbol is not defined in a regular file, and we are
1002 not generating a shared library, then set the symbol to this
1003 location in the .plt. This is required to make function
1004 pointers compare as equal between the normal executable and
1005 the shared library. */
1007 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1009 h->root.u.def.section = s;
1010 h->root.u.def.value = s->_raw_size;
1013 h->plt.offset = s->_raw_size;
1015 /* Make room for this entry. */
1016 if (CPU32_FLAG (dynobj))
1017 s->_raw_size += PLT_CPU32_ENTRY_SIZE;
1019 s->_raw_size += PLT_ENTRY_SIZE;
1021 /* We also need to make an entry in the .got.plt section, which
1022 will be placed in the .got section by the linker script. */
1024 s = bfd_get_section_by_name (dynobj, ".got.plt");
1025 BFD_ASSERT (s != NULL);
1028 /* We also need to make an entry in the .rela.plt section. */
1030 s = bfd_get_section_by_name (dynobj, ".rela.plt");
1031 BFD_ASSERT (s != NULL);
1032 s->_raw_size += sizeof (Elf32_External_Rela);
1037 /* Reinitialize the plt offset now that it is not used as a reference
1039 h->plt.offset = (bfd_vma) -1;
1041 /* If this is a weak symbol, and there is a real definition, the
1042 processor independent code will have arranged for us to see the
1043 real definition first, and we can just use the same value. */
1044 if (h->weakdef != NULL)
1046 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
1047 || h->weakdef->root.type == bfd_link_hash_defweak);
1048 h->root.u.def.section = h->weakdef->root.u.def.section;
1049 h->root.u.def.value = h->weakdef->root.u.def.value;
1053 /* This is a reference to a symbol defined by a dynamic object which
1054 is not a function. */
1056 /* If we are creating a shared library, we must presume that the
1057 only references to the symbol are via the global offset table.
1058 For such cases we need not do anything here; the relocations will
1059 be handled correctly by relocate_section. */
1063 /* We must allocate the symbol in our .dynbss section, which will
1064 become part of the .bss section of the executable. There will be
1065 an entry for this symbol in the .dynsym section. The dynamic
1066 object will contain position independent code, so all references
1067 from the dynamic object to this symbol will go through the global
1068 offset table. The dynamic linker will use the .dynsym entry to
1069 determine the address it must put in the global offset table, so
1070 both the dynamic object and the regular object will refer to the
1071 same memory location for the variable. */
1073 s = bfd_get_section_by_name (dynobj, ".dynbss");
1074 BFD_ASSERT (s != NULL);
1076 /* We must generate a R_68K_COPY reloc to tell the dynamic linker to
1077 copy the initial value out of the dynamic object and into the
1078 runtime process image. We need to remember the offset into the
1079 .rela.bss section we are going to use. */
1080 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
1084 srel = bfd_get_section_by_name (dynobj, ".rela.bss");
1085 BFD_ASSERT (srel != NULL);
1086 srel->_raw_size += sizeof (Elf32_External_Rela);
1087 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
1090 /* We need to figure out the alignment required for this symbol. I
1091 have no idea how ELF linkers handle this. */
1092 power_of_two = bfd_log2 (h->size);
1093 if (power_of_two > 3)
1096 /* Apply the required alignment. */
1097 s->_raw_size = BFD_ALIGN (s->_raw_size,
1098 (bfd_size_type) (1 << power_of_two));
1099 if (power_of_two > bfd_get_section_alignment (dynobj, s))
1101 if (!bfd_set_section_alignment (dynobj, s, power_of_two))
1105 /* Define the symbol as being at this point in the section. */
1106 h->root.u.def.section = s;
1107 h->root.u.def.value = s->_raw_size;
1109 /* Increment the section size to make room for the symbol. */
1110 s->_raw_size += h->size;
1115 /* Set the sizes of the dynamic sections. */
1118 elf_m68k_size_dynamic_sections (output_bfd, info)
1119 bfd *output_bfd ATTRIBUTE_UNUSED;
1120 struct bfd_link_info *info;
1127 dynobj = elf_hash_table (info)->dynobj;
1128 BFD_ASSERT (dynobj != NULL);
1130 if (elf_hash_table (info)->dynamic_sections_created)
1132 /* Set the contents of the .interp section to the interpreter. */
1135 s = bfd_get_section_by_name (dynobj, ".interp");
1136 BFD_ASSERT (s != NULL);
1137 s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
1138 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
1143 /* We may have created entries in the .rela.got section.
1144 However, if we are not creating the dynamic sections, we will
1145 not actually use these entries. Reset the size of .rela.got,
1146 which will cause it to get stripped from the output file
1148 s = bfd_get_section_by_name (dynobj, ".rela.got");
1153 /* If this is a -Bsymbolic shared link, then we need to discard all PC
1154 relative relocs against symbols defined in a regular object. We
1155 allocated space for them in the check_relocs routine, but we will not
1156 fill them in in the relocate_section routine. */
1157 if (info->shared && info->symbolic)
1158 elf_m68k_link_hash_traverse (elf_m68k_hash_table (info),
1159 elf_m68k_discard_copies,
1162 /* The check_relocs and adjust_dynamic_symbol entry points have
1163 determined the sizes of the various dynamic sections. Allocate
1167 for (s = dynobj->sections; s != NULL; s = s->next)
1172 if ((s->flags & SEC_LINKER_CREATED) == 0)
1175 /* It's OK to base decisions on the section name, because none
1176 of the dynobj section names depend upon the input files. */
1177 name = bfd_get_section_name (dynobj, s);
1181 if (strcmp (name, ".plt") == 0)
1183 if (s->_raw_size == 0)
1185 /* Strip this section if we don't need it; see the
1191 /* Remember whether there is a PLT. */
1195 else if (strncmp (name, ".rela", 5) == 0)
1197 if (s->_raw_size == 0)
1199 /* If we don't need this section, strip it from the
1200 output file. This is mostly to handle .rela.bss and
1201 .rela.plt. We must create both sections in
1202 create_dynamic_sections, because they must be created
1203 before the linker maps input sections to output
1204 sections. The linker does that before
1205 adjust_dynamic_symbol is called, and it is that
1206 function which decides whether anything needs to go
1207 into these sections. */
1214 /* We use the reloc_count field as a counter if we need
1215 to copy relocs into the output file. */
1219 else if (strncmp (name, ".got", 4) != 0)
1221 /* It's not one of our sections, so don't allocate space. */
1227 _bfd_strip_section_from_output (info, s);
1231 /* Allocate memory for the section contents. */
1232 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
1233 Unused entries should be reclaimed before the section's contents
1234 are written out, but at the moment this does not happen. Thus in
1235 order to prevent writing out garbage, we initialise the section's
1236 contents to zero. */
1237 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
1238 if (s->contents == NULL && s->_raw_size != 0)
1242 if (elf_hash_table (info)->dynamic_sections_created)
1244 /* Add some entries to the .dynamic section. We fill in the
1245 values later, in elf_m68k_finish_dynamic_sections, but we
1246 must add the entries now so that we get the correct size for
1247 the .dynamic section. The DT_DEBUG entry is filled in by the
1248 dynamic linker and used by the debugger. */
1249 #define add_dynamic_entry(TAG, VAL) \
1250 bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
1254 if (!add_dynamic_entry (DT_DEBUG, 0))
1260 if (!add_dynamic_entry (DT_PLTGOT, 0)
1261 || !add_dynamic_entry (DT_PLTRELSZ, 0)
1262 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
1263 || !add_dynamic_entry (DT_JMPREL, 0))
1269 if (!add_dynamic_entry (DT_RELA, 0)
1270 || !add_dynamic_entry (DT_RELASZ, 0)
1271 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
1275 if ((info->flags & DF_TEXTREL) != 0)
1277 if (!add_dynamic_entry (DT_TEXTREL, 0))
1281 #undef add_dynamic_entry
1286 /* This function is called via elf_m68k_link_hash_traverse if we are
1287 creating a shared object with -Bsymbolic. It discards the space
1288 allocated to copy PC relative relocs against symbols which are defined
1289 in regular objects. We allocated space for them in the check_relocs
1290 routine, but we won't fill them in in the relocate_section routine. */
1293 elf_m68k_discard_copies (h, ignore)
1294 struct elf_m68k_link_hash_entry *h;
1295 PTR ignore ATTRIBUTE_UNUSED;
1297 struct elf_m68k_pcrel_relocs_copied *s;
1299 /* We only discard relocs for symbols defined in a regular object. */
1300 if ((h->root.elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1303 for (s = h->pcrel_relocs_copied; s != NULL; s = s->next)
1304 s->section->_raw_size -= s->count * sizeof (Elf32_External_Rela);
1309 /* Relocate an M68K ELF section. */
1312 elf_m68k_relocate_section (output_bfd, info, input_bfd, input_section,
1313 contents, relocs, local_syms, local_sections)
1315 struct bfd_link_info *info;
1317 asection *input_section;
1319 Elf_Internal_Rela *relocs;
1320 Elf_Internal_Sym *local_syms;
1321 asection **local_sections;
1324 Elf_Internal_Shdr *symtab_hdr;
1325 struct elf_link_hash_entry **sym_hashes;
1326 bfd_vma *local_got_offsets;
1330 Elf_Internal_Rela *rel;
1331 Elf_Internal_Rela *relend;
1333 dynobj = elf_hash_table (info)->dynobj;
1334 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1335 sym_hashes = elf_sym_hashes (input_bfd);
1336 local_got_offsets = elf_local_got_offsets (input_bfd);
1343 relend = relocs + input_section->reloc_count;
1344 for (; rel < relend; rel++)
1347 reloc_howto_type *howto;
1348 unsigned long r_symndx;
1349 struct elf_link_hash_entry *h;
1350 Elf_Internal_Sym *sym;
1353 bfd_reloc_status_type r;
1355 r_type = ELF32_R_TYPE (rel->r_info);
1356 if (r_type < 0 || r_type >= (int) R_68K_max)
1358 bfd_set_error (bfd_error_bad_value);
1361 howto = howto_table + r_type;
1363 r_symndx = ELF32_R_SYM (rel->r_info);
1365 if (info->relocateable)
1367 /* This is a relocateable link. We don't have to change
1368 anything, unless the reloc is against a section symbol,
1369 in which case we have to adjust according to where the
1370 section symbol winds up in the output section. */
1371 if (r_symndx < symtab_hdr->sh_info)
1373 sym = local_syms + r_symndx;
1374 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1376 sec = local_sections[r_symndx];
1377 rel->r_addend += sec->output_offset + sym->st_value;
1384 /* This is a final link. */
1388 if (r_symndx < symtab_hdr->sh_info)
1390 sym = local_syms + r_symndx;
1391 sec = local_sections[r_symndx];
1392 relocation = (sec->output_section->vma
1393 + sec->output_offset
1398 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1399 while (h->root.type == bfd_link_hash_indirect
1400 || h->root.type == bfd_link_hash_warning)
1401 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1402 if (h->root.type == bfd_link_hash_defined
1403 || h->root.type == bfd_link_hash_defweak)
1405 sec = h->root.u.def.section;
1406 if (((r_type == R_68K_PLT8
1407 || r_type == R_68K_PLT16
1408 || r_type == R_68K_PLT32
1409 || r_type == R_68K_PLT8O
1410 || r_type == R_68K_PLT16O
1411 || r_type == R_68K_PLT32O)
1412 && h->plt.offset != (bfd_vma) -1
1413 && elf_hash_table (info)->dynamic_sections_created)
1414 || ((r_type == R_68K_GOT8O
1415 || r_type == R_68K_GOT16O
1416 || r_type == R_68K_GOT32O
1417 || ((r_type == R_68K_GOT8
1418 || r_type == R_68K_GOT16
1419 || r_type == R_68K_GOT32)
1420 && strcmp (h->root.root.string,
1421 "_GLOBAL_OFFSET_TABLE_") != 0))
1422 && elf_hash_table (info)->dynamic_sections_created
1424 || (! info->symbolic && h->dynindx != -1)
1425 || (h->elf_link_hash_flags
1426 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1428 && ((! info->symbolic && h->dynindx != -1)
1429 || (h->elf_link_hash_flags
1430 & ELF_LINK_HASH_DEF_REGULAR) == 0)
1431 && ((input_section->flags & SEC_ALLOC) != 0
1432 /* DWARF will emit R_68K_32 relocations in its
1433 sections against symbols defined externally
1434 in shared libraries. We can't do anything
1436 || ((input_section->flags & SEC_DEBUGGING) != 0
1437 && (h->elf_link_hash_flags
1438 & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
1439 && (r_type == R_68K_8
1440 || r_type == R_68K_16
1441 || r_type == R_68K_32
1442 || r_type == R_68K_PC8
1443 || r_type == R_68K_PC16
1444 || r_type == R_68K_PC32)))
1446 /* In these cases, we don't need the relocation
1447 value. We check specially because in some
1448 obscure cases sec->output_section will be NULL. */
1452 relocation = (h->root.u.def.value
1453 + sec->output_section->vma
1454 + sec->output_offset);
1456 else if (h->root.type == bfd_link_hash_undefweak)
1458 else if (info->shared
1459 && (!info->symbolic || info->allow_shlib_undefined)
1460 && !info->no_undefined
1461 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
1465 if (!(info->callbacks->undefined_symbol
1466 (info, h->root.root.string, input_bfd,
1467 input_section, rel->r_offset,
1468 (!info->shared || info->no_undefined
1469 || ELF_ST_VISIBILITY (h->other)))))
1480 /* Relocation is to the address of the entry for this symbol
1481 in the global offset table. */
1483 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1489 /* Relocation is the offset of the entry for this symbol in
1490 the global offset table. */
1497 sgot = bfd_get_section_by_name (dynobj, ".got");
1498 BFD_ASSERT (sgot != NULL);
1503 off = h->got.offset;
1504 BFD_ASSERT (off != (bfd_vma) -1);
1506 if (!elf_hash_table (info)->dynamic_sections_created
1508 && (info->symbolic || h->dynindx == -1)
1509 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
1511 /* This is actually a static link, or it is a
1512 -Bsymbolic link and the symbol is defined
1513 locally, or the symbol was forced to be local
1514 because of a version file.. We must initialize
1515 this entry in the global offset table. Since
1516 the offset must always be a multiple of 4, we
1517 use the least significant bit to record whether
1518 we have initialized it already.
1520 When doing a dynamic link, we create a .rela.got
1521 relocation entry to initialize the value. This
1522 is done in the finish_dynamic_symbol routine. */
1527 bfd_put_32 (output_bfd, relocation,
1528 sgot->contents + off);
1535 BFD_ASSERT (local_got_offsets != NULL
1536 && local_got_offsets[r_symndx] != (bfd_vma) -1);
1538 off = local_got_offsets[r_symndx];
1540 /* The offset must always be a multiple of 4. We use
1541 the least significant bit to record whether we have
1542 already generated the necessary reloc. */
1547 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
1552 Elf_Internal_Rela outrel;
1554 srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
1555 BFD_ASSERT (srelgot != NULL);
1557 outrel.r_offset = (sgot->output_section->vma
1558 + sgot->output_offset
1560 outrel.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1561 outrel.r_addend = relocation;
1562 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
1563 (((Elf32_External_Rela *)
1565 + srelgot->reloc_count));
1566 ++srelgot->reloc_count;
1569 local_got_offsets[r_symndx] |= 1;
1573 relocation = sgot->output_offset + off;
1574 if (r_type == R_68K_GOT8O
1575 || r_type == R_68K_GOT16O
1576 || r_type == R_68K_GOT32O)
1578 /* This relocation does not use the addend. */
1582 relocation += sgot->output_section->vma;
1589 /* Relocation is to the entry for this symbol in the
1590 procedure linkage table. */
1592 /* Resolve a PLTxx reloc against a local symbol directly,
1593 without using the procedure linkage table. */
1597 if (h->plt.offset == (bfd_vma) -1
1598 || !elf_hash_table (info)->dynamic_sections_created)
1600 /* We didn't make a PLT entry for this symbol. This
1601 happens when statically linking PIC code, or when
1602 using -Bsymbolic. */
1608 splt = bfd_get_section_by_name (dynobj, ".plt");
1609 BFD_ASSERT (splt != NULL);
1612 relocation = (splt->output_section->vma
1613 + splt->output_offset
1620 /* Relocation is the offset of the entry for this symbol in
1621 the procedure linkage table. */
1622 BFD_ASSERT (h != NULL && h->plt.offset != (bfd_vma) -1);
1626 splt = bfd_get_section_by_name (dynobj, ".plt");
1627 BFD_ASSERT (splt != NULL);
1630 relocation = h->plt.offset;
1632 /* This relocation does not use the addend. */
1647 && (input_section->flags & SEC_ALLOC) != 0
1648 && ((r_type != R_68K_PC8
1649 && r_type != R_68K_PC16
1650 && r_type != R_68K_PC32)
1652 || (h->elf_link_hash_flags
1653 & ELF_LINK_HASH_DEF_REGULAR) == 0)))
1655 Elf_Internal_Rela outrel;
1656 boolean skip, relocate;
1658 /* When generating a shared object, these relocations
1659 are copied into the output file to be resolved at run
1666 name = (bfd_elf_string_from_elf_section
1668 elf_elfheader (input_bfd)->e_shstrndx,
1669 elf_section_data (input_section)->rel_hdr.sh_name));
1673 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
1674 && strcmp (bfd_get_section_name (input_bfd,
1678 sreloc = bfd_get_section_by_name (dynobj, name);
1679 BFD_ASSERT (sreloc != NULL);
1684 if (elf_section_data (input_section)->stab_info == NULL)
1685 outrel.r_offset = rel->r_offset;
1690 off = (_bfd_stab_section_offset
1691 (output_bfd, &elf_hash_table (info)->stab_info,
1693 &elf_section_data (input_section)->stab_info,
1695 if (off == (bfd_vma) -1)
1697 outrel.r_offset = off;
1700 outrel.r_offset += (input_section->output_section->vma
1701 + input_section->output_offset);
1705 memset (&outrel, 0, sizeof outrel);
1708 /* h->dynindx may be -1 if the symbol was marked to
1711 && ((! info->symbolic && h->dynindx != -1)
1712 || (h->elf_link_hash_flags
1713 & ELF_LINK_HASH_DEF_REGULAR) == 0))
1715 BFD_ASSERT (h->dynindx != -1);
1717 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1718 outrel.r_addend = relocation + rel->r_addend;
1722 if (r_type == R_68K_32)
1725 outrel.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1726 outrel.r_addend = relocation + rel->r_addend;
1733 sec = local_sections[r_symndx];
1736 BFD_ASSERT (h->root.type == bfd_link_hash_defined
1738 == bfd_link_hash_defweak));
1739 sec = h->root.u.def.section;
1741 if (sec != NULL && bfd_is_abs_section (sec))
1743 else if (sec == NULL || sec->owner == NULL)
1745 bfd_set_error (bfd_error_bad_value);
1752 osec = sec->output_section;
1753 indx = elf_section_data (osec)->dynindx;
1754 BFD_ASSERT (indx > 0);
1758 outrel.r_info = ELF32_R_INFO (indx, r_type);
1759 outrel.r_addend = relocation + rel->r_addend;
1763 bfd_elf32_swap_reloca_out (output_bfd, &outrel,
1764 (((Elf32_External_Rela *)
1766 + sreloc->reloc_count));
1767 ++sreloc->reloc_count;
1769 /* This reloc will be computed at runtime, so there's no
1770 need to do anything now, except for R_68K_32
1771 relocations that have been turned into
1779 case R_68K_GNU_VTINHERIT:
1780 case R_68K_GNU_VTENTRY:
1781 /* These are no-ops in the end. */
1788 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
1789 contents, rel->r_offset,
1790 relocation, rel->r_addend);
1792 if (r != bfd_reloc_ok)
1797 case bfd_reloc_outofrange:
1799 case bfd_reloc_overflow:
1804 name = h->root.root.string;
1807 name = bfd_elf_string_from_elf_section (input_bfd,
1808 symtab_hdr->sh_link,
1813 name = bfd_section_name (input_bfd, sec);
1815 if (!(info->callbacks->reloc_overflow
1816 (info, name, howto->name, (bfd_vma) 0,
1817 input_bfd, input_section, rel->r_offset)))
1828 /* Finish up dynamic symbol handling. We set the contents of various
1829 dynamic sections here. */
1832 elf_m68k_finish_dynamic_symbol (output_bfd, info, h, sym)
1834 struct bfd_link_info *info;
1835 struct elf_link_hash_entry *h;
1836 Elf_Internal_Sym *sym;
1839 int plt_off1, plt_off2, plt_off3;
1841 dynobj = elf_hash_table (info)->dynobj;
1843 if (h->plt.offset != (bfd_vma) -1)
1850 Elf_Internal_Rela rela;
1852 /* This symbol has an entry in the procedure linkage table. Set
1855 BFD_ASSERT (h->dynindx != -1);
1857 splt = bfd_get_section_by_name (dynobj, ".plt");
1858 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
1859 srela = bfd_get_section_by_name (dynobj, ".rela.plt");
1860 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1862 /* Get the index in the procedure linkage table which
1863 corresponds to this symbol. This is the index of this symbol
1864 in all the symbols for which we are making plt entries. The
1865 first entry in the procedure linkage table is reserved. */
1866 if ( CPU32_FLAG (output_bfd))
1867 plt_index = h->plt.offset / PLT_CPU32_ENTRY_SIZE - 1;
1869 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1871 /* Get the offset into the .got table of the entry that
1872 corresponds to this function. Each .got entry is 4 bytes.
1873 The first three are reserved. */
1874 got_offset = (plt_index + 3) * 4;
1876 if ( CPU32_FLAG (output_bfd))
1878 /* Fill in the entry in the procedure linkage table. */
1879 memcpy (splt->contents + h->plt.offset, elf_cpu32_plt_entry,
1880 PLT_CPU32_ENTRY_SIZE);
1887 /* Fill in the entry in the procedure linkage table. */
1888 memcpy (splt->contents + h->plt.offset, elf_m68k_plt_entry,
1895 /* The offset is relative to the first extension word. */
1896 bfd_put_32 (output_bfd,
1897 (sgot->output_section->vma
1898 + sgot->output_offset
1900 - (splt->output_section->vma
1901 + h->plt.offset + 2)),
1902 splt->contents + h->plt.offset + plt_off1);
1904 bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rela),
1905 splt->contents + h->plt.offset + plt_off2);
1906 bfd_put_32 (output_bfd, - (h->plt.offset + plt_off3),
1907 splt->contents + h->plt.offset + plt_off3);
1909 /* Fill in the entry in the global offset table. */
1910 bfd_put_32 (output_bfd,
1911 (splt->output_section->vma
1912 + splt->output_offset
1915 sgot->contents + got_offset);
1917 /* Fill in the entry in the .rela.plt section. */
1918 rela.r_offset = (sgot->output_section->vma
1919 + sgot->output_offset
1921 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_JMP_SLOT);
1923 bfd_elf32_swap_reloca_out (output_bfd, &rela,
1924 ((Elf32_External_Rela *) srela->contents
1927 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
1929 /* Mark the symbol as undefined, rather than as defined in
1930 the .plt section. Leave the value alone. */
1931 sym->st_shndx = SHN_UNDEF;
1935 if (h->got.offset != (bfd_vma) -1)
1939 Elf_Internal_Rela rela;
1941 /* This symbol has an entry in the global offset table. Set it
1944 sgot = bfd_get_section_by_name (dynobj, ".got");
1945 srela = bfd_get_section_by_name (dynobj, ".rela.got");
1946 BFD_ASSERT (sgot != NULL && srela != NULL);
1948 rela.r_offset = (sgot->output_section->vma
1949 + sgot->output_offset
1950 + (h->got.offset &~ (bfd_vma) 1));
1952 /* If this is a -Bsymbolic link, and the symbol is defined
1953 locally, we just want to emit a RELATIVE reloc. Likewise if
1954 the symbol was forced to be local because of a version file.
1955 The entry in the global offset table will already have been
1956 initialized in the relocate_section function. */
1958 && (info->symbolic || h->dynindx == -1)
1959 && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
1961 rela.r_info = ELF32_R_INFO (0, R_68K_RELATIVE);
1962 rela.r_addend = bfd_get_signed_32 (output_bfd,
1964 + (h->got.offset &~ (bfd_vma) 1)));
1968 bfd_put_32 (output_bfd, (bfd_vma) 0,
1969 sgot->contents + (h->got.offset &~ (bfd_vma) 1));
1970 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_GLOB_DAT);
1974 bfd_elf32_swap_reloca_out (output_bfd, &rela,
1975 ((Elf32_External_Rela *) srela->contents
1976 + srela->reloc_count));
1977 ++srela->reloc_count;
1980 if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
1983 Elf_Internal_Rela rela;
1985 /* This symbol needs a copy reloc. Set it up. */
1987 BFD_ASSERT (h->dynindx != -1
1988 && (h->root.type == bfd_link_hash_defined
1989 || h->root.type == bfd_link_hash_defweak));
1991 s = bfd_get_section_by_name (h->root.u.def.section->owner,
1993 BFD_ASSERT (s != NULL);
1995 rela.r_offset = (h->root.u.def.value
1996 + h->root.u.def.section->output_section->vma
1997 + h->root.u.def.section->output_offset);
1998 rela.r_info = ELF32_R_INFO (h->dynindx, R_68K_COPY);
2000 bfd_elf32_swap_reloca_out (output_bfd, &rela,
2001 ((Elf32_External_Rela *) s->contents
2006 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2007 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2008 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2009 sym->st_shndx = SHN_ABS;
2014 /* Finish up the dynamic sections. */
2017 elf_m68k_finish_dynamic_sections (output_bfd, info)
2019 struct bfd_link_info *info;
2025 dynobj = elf_hash_table (info)->dynobj;
2027 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
2028 BFD_ASSERT (sgot != NULL);
2029 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
2031 if (elf_hash_table (info)->dynamic_sections_created)
2034 Elf32_External_Dyn *dyncon, *dynconend;
2036 splt = bfd_get_section_by_name (dynobj, ".plt");
2037 BFD_ASSERT (splt != NULL && sdyn != NULL);
2039 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2040 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
2041 for (; dyncon < dynconend; dyncon++)
2043 Elf_Internal_Dyn dyn;
2047 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
2060 s = bfd_get_section_by_name (output_bfd, name);
2061 BFD_ASSERT (s != NULL);
2062 dyn.d_un.d_ptr = s->vma;
2063 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2067 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
2068 BFD_ASSERT (s != NULL);
2069 if (s->_cooked_size != 0)
2070 dyn.d_un.d_val = s->_cooked_size;
2072 dyn.d_un.d_val = s->_raw_size;
2073 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2077 /* The procedure linkage table relocs (DT_JMPREL) should
2078 not be included in the overall relocs (DT_RELA).
2079 Therefore, we override the DT_RELASZ entry here to
2080 make it not include the JMPREL relocs. Since the
2081 linker script arranges for .rela.plt to follow all
2082 other relocation sections, we don't have to worry
2083 about changing the DT_RELA entry. */
2084 s = bfd_get_section_by_name (output_bfd, ".rela.plt");
2087 if (s->_cooked_size != 0)
2088 dyn.d_un.d_val -= s->_cooked_size;
2090 dyn.d_un.d_val -= s->_raw_size;
2092 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
2097 /* Fill in the first entry in the procedure linkage table. */
2098 if (splt->_raw_size > 0)
2100 if (!CPU32_FLAG (output_bfd))
2102 memcpy (splt->contents, elf_m68k_plt0_entry, PLT_ENTRY_SIZE);
2103 bfd_put_32 (output_bfd,
2104 (sgot->output_section->vma
2105 + sgot->output_offset + 4
2106 - (splt->output_section->vma + 2)),
2107 splt->contents + 4);
2108 bfd_put_32 (output_bfd,
2109 (sgot->output_section->vma
2110 + sgot->output_offset + 8
2111 - (splt->output_section->vma + 10)),
2112 splt->contents + 12);
2113 elf_section_data (splt->output_section)->this_hdr.sh_entsize
2118 memcpy (splt->contents, elf_cpu32_plt0_entry, PLT_CPU32_ENTRY_SIZE);
2119 bfd_put_32 (output_bfd,
2120 (sgot->output_section->vma
2121 + sgot->output_offset + 4
2122 - (splt->output_section->vma + 2)),
2123 splt->contents + 4);
2124 bfd_put_32 (output_bfd,
2125 (sgot->output_section->vma
2126 + sgot->output_offset + 8
2127 - (splt->output_section->vma + 10)),
2128 splt->contents + 12);
2129 elf_section_data (splt->output_section)->this_hdr.sh_entsize
2130 = PLT_CPU32_ENTRY_SIZE;
2135 /* Fill in the first three entries in the global offset table. */
2136 if (sgot->_raw_size > 0)
2139 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
2141 bfd_put_32 (output_bfd,
2142 sdyn->output_section->vma + sdyn->output_offset,
2144 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
2145 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
2148 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
2153 /* Given a .data section and a .emreloc in-memory section, store
2154 relocation information into the .emreloc section which can be
2155 used at runtime to relocate the section. This is called by the
2156 linker when the --embedded-relocs switch is used. This is called
2157 after the add_symbols entry point has been called for all the
2158 objects, and before the final_link entry point is called. */
2161 bfd_m68k_elf32_create_embedded_relocs (abfd, info, datasec, relsec, errmsg)
2163 struct bfd_link_info *info;
2168 Elf_Internal_Shdr *symtab_hdr;
2169 Elf32_External_Sym *extsyms;
2170 Elf32_External_Sym *free_extsyms = NULL;
2171 Elf_Internal_Rela *internal_relocs;
2172 Elf_Internal_Rela *free_relocs = NULL;
2173 Elf_Internal_Rela *irel, *irelend;
2177 BFD_ASSERT (! info->relocateable);
2181 if (datasec->reloc_count == 0)
2184 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2185 /* Read this BFD's symbols if we haven't done so already, or get the cached
2186 copy if it exists. */
2187 if (symtab_hdr->contents != NULL)
2188 extsyms = (Elf32_External_Sym *) symtab_hdr->contents;
2191 /* Go get them off disk. */
2192 if (info->keep_memory)
2193 extsyms = (Elf32_External_Sym *) bfd_alloc (abfd, symtab_hdr->sh_size);
2195 extsyms = (Elf32_External_Sym *) bfd_malloc (symtab_hdr->sh_size);
2196 if (extsyms == NULL)
2198 if (! info->keep_memory)
2199 free_extsyms = extsyms;
2200 if (bfd_seek (abfd, symtab_hdr->sh_offset, SEEK_SET) != 0
2201 || (bfd_bread (extsyms, symtab_hdr->sh_size, abfd)
2202 != symtab_hdr->sh_size))
2204 if (info->keep_memory)
2205 symtab_hdr->contents = (unsigned char *) extsyms;
2208 /* Get a copy of the native relocations. */
2209 internal_relocs = (_bfd_elf32_link_read_relocs
2210 (abfd, datasec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
2211 info->keep_memory));
2212 if (internal_relocs == NULL)
2214 if (! info->keep_memory)
2215 free_relocs = internal_relocs;
2217 amt = (bfd_size_type) datasec->reloc_count * 12;
2218 relsec->contents = (bfd_byte *) bfd_alloc (abfd, amt);
2219 if (relsec->contents == NULL)
2222 p = relsec->contents;
2224 irelend = internal_relocs + datasec->reloc_count;
2225 for (irel = internal_relocs; irel < irelend; irel++, p += 12)
2227 asection *targetsec;
2229 /* We are going to write a four byte longword into the runtime
2230 reloc section. The longword will be the address in the data
2231 section which must be relocated. It is followed by the name
2232 of the target section NUL-padded or truncated to 8
2235 /* We can only relocate absolute longword relocs at run time. */
2236 if (ELF32_R_TYPE (irel->r_info) != (int) R_68K_32)
2238 *errmsg = _("unsupported reloc type");
2239 bfd_set_error (bfd_error_bad_value);
2243 /* Get the target section referred to by the reloc. */
2244 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
2246 Elf_Internal_Sym isym;
2248 /* A local symbol. */
2249 bfd_elf32_swap_symbol_in (abfd,
2250 extsyms + ELF32_R_SYM (irel->r_info),
2253 targetsec = bfd_section_from_elf_index (abfd, isym.st_shndx);
2258 struct elf_link_hash_entry *h;
2260 /* An external symbol. */
2261 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
2262 h = elf_sym_hashes (abfd)[indx];
2263 BFD_ASSERT (h != NULL);
2264 if (h->root.type == bfd_link_hash_defined
2265 || h->root.type == bfd_link_hash_defweak)
2266 targetsec = h->root.u.def.section;
2271 bfd_put_32 (abfd, irel->r_offset + datasec->output_offset, p);
2272 memset (p + 4, 0, 8);
2273 if (targetsec != NULL)
2274 strncpy (p + 4, targetsec->output_section->name, 8);
2277 if (free_extsyms != NULL)
2278 free (free_extsyms);
2279 if (free_relocs != NULL)
2284 if (free_extsyms != NULL)
2285 free (free_extsyms);
2286 if (free_relocs != NULL)
2291 static enum elf_reloc_type_class
2292 elf32_m68k_reloc_type_class (rela)
2293 const Elf_Internal_Rela *rela;
2295 switch ((int) ELF32_R_TYPE (rela->r_info))
2297 case R_68K_RELATIVE:
2298 return reloc_class_relative;
2299 case R_68K_JMP_SLOT:
2300 return reloc_class_plt;
2302 return reloc_class_copy;
2304 return reloc_class_normal;
2308 #define TARGET_BIG_SYM bfd_elf32_m68k_vec
2309 #define TARGET_BIG_NAME "elf32-m68k"
2310 #define ELF_MACHINE_CODE EM_68K
2311 #define ELF_MAXPAGESIZE 0x2000
2312 #define elf_backend_create_dynamic_sections \
2313 _bfd_elf_create_dynamic_sections
2314 #define bfd_elf32_bfd_link_hash_table_create \
2315 elf_m68k_link_hash_table_create
2316 #define bfd_elf32_bfd_final_link _bfd_elf32_gc_common_final_link
2318 #define elf_backend_check_relocs elf_m68k_check_relocs
2319 #define elf_backend_adjust_dynamic_symbol \
2320 elf_m68k_adjust_dynamic_symbol
2321 #define elf_backend_size_dynamic_sections \
2322 elf_m68k_size_dynamic_sections
2323 #define elf_backend_relocate_section elf_m68k_relocate_section
2324 #define elf_backend_finish_dynamic_symbol \
2325 elf_m68k_finish_dynamic_symbol
2326 #define elf_backend_finish_dynamic_sections \
2327 elf_m68k_finish_dynamic_sections
2328 #define elf_backend_gc_mark_hook elf_m68k_gc_mark_hook
2329 #define elf_backend_gc_sweep_hook elf_m68k_gc_sweep_hook
2330 #define bfd_elf32_bfd_copy_private_bfd_data \
2331 elf32_m68k_copy_private_bfd_data
2332 #define bfd_elf32_bfd_merge_private_bfd_data \
2333 elf32_m68k_merge_private_bfd_data
2334 #define bfd_elf32_bfd_set_private_flags \
2335 elf32_m68k_set_private_flags
2336 #define bfd_elf32_bfd_print_private_bfd_data \
2337 elf32_m68k_print_private_bfd_data
2338 #define elf_backend_reloc_type_class elf32_m68k_reloc_type_class
2340 #define elf_backend_can_gc_sections 1
2341 #define elf_backend_can_refcount 1
2342 #define elf_backend_want_got_plt 1
2343 #define elf_backend_plt_readonly 1
2344 #define elf_backend_want_plt_sym 0
2345 #define elf_backend_got_header_size 12
2347 #include "elf32-target.h"