1 /* Motorola 68k series support for 32-bit ELF
2 Copyright 1993, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
3 2004, 2005, 2006, 2007 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 3 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., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
28 #include "opcode/m68k.h"
30 static reloc_howto_type
*reloc_type_lookup
31 PARAMS ((bfd
*, bfd_reloc_code_real_type
));
32 static void rtype_to_howto
33 PARAMS ((bfd
*, arelent
*, Elf_Internal_Rela
*));
34 static struct bfd_hash_entry
*elf_m68k_link_hash_newfunc
35 PARAMS ((struct bfd_hash_entry
*, struct bfd_hash_table
*, const char *));
36 static struct bfd_link_hash_table
*elf_m68k_link_hash_table_create
38 static bfd_boolean elf_m68k_check_relocs
39 PARAMS ((bfd
*, struct bfd_link_info
*, asection
*,
40 const Elf_Internal_Rela
*));
41 static bfd_boolean elf_m68k_adjust_dynamic_symbol
42 PARAMS ((struct bfd_link_info
*, struct elf_link_hash_entry
*));
43 static bfd_boolean elf_m68k_size_dynamic_sections
44 PARAMS ((bfd
*, struct bfd_link_info
*));
45 static bfd_boolean elf_m68k_discard_copies
46 PARAMS ((struct elf_link_hash_entry
*, PTR
));
47 static bfd_boolean elf_m68k_relocate_section
48 PARAMS ((bfd
*, struct bfd_link_info
*, bfd
*, asection
*, bfd_byte
*,
49 Elf_Internal_Rela
*, Elf_Internal_Sym
*, asection
**));
50 static bfd_boolean elf_m68k_finish_dynamic_symbol
51 PARAMS ((bfd
*, struct bfd_link_info
*, struct elf_link_hash_entry
*,
53 static bfd_boolean elf_m68k_finish_dynamic_sections
54 PARAMS ((bfd
*, struct bfd_link_info
*));
56 static bfd_boolean elf32_m68k_set_private_flags
57 PARAMS ((bfd
*, flagword
));
58 static bfd_boolean elf32_m68k_merge_private_bfd_data
59 PARAMS ((bfd
*, bfd
*));
60 static bfd_boolean elf32_m68k_print_private_bfd_data
61 PARAMS ((bfd
*, PTR
));
62 static enum elf_reloc_type_class elf32_m68k_reloc_type_class
63 PARAMS ((const Elf_Internal_Rela
*));
65 static reloc_howto_type howto_table
[] = {
66 HOWTO(R_68K_NONE
, 0, 0, 0, FALSE
,0, complain_overflow_dont
, bfd_elf_generic_reloc
, "R_68K_NONE", FALSE
, 0, 0x00000000,FALSE
),
67 HOWTO(R_68K_32
, 0, 2,32, FALSE
,0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_32", FALSE
, 0, 0xffffffff,FALSE
),
68 HOWTO(R_68K_16
, 0, 1,16, FALSE
,0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_16", FALSE
, 0, 0x0000ffff,FALSE
),
69 HOWTO(R_68K_8
, 0, 0, 8, FALSE
,0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_8", FALSE
, 0, 0x000000ff,FALSE
),
70 HOWTO(R_68K_PC32
, 0, 2,32, TRUE
, 0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_PC32", FALSE
, 0, 0xffffffff,TRUE
),
71 HOWTO(R_68K_PC16
, 0, 1,16, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PC16", FALSE
, 0, 0x0000ffff,TRUE
),
72 HOWTO(R_68K_PC8
, 0, 0, 8, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PC8", FALSE
, 0, 0x000000ff,TRUE
),
73 HOWTO(R_68K_GOT32
, 0, 2,32, TRUE
, 0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_GOT32", FALSE
, 0, 0xffffffff,TRUE
),
74 HOWTO(R_68K_GOT16
, 0, 1,16, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_GOT16", FALSE
, 0, 0x0000ffff,TRUE
),
75 HOWTO(R_68K_GOT8
, 0, 0, 8, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_GOT8", FALSE
, 0, 0x000000ff,TRUE
),
76 HOWTO(R_68K_GOT32O
, 0, 2,32, FALSE
,0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_GOT32O", FALSE
, 0, 0xffffffff,FALSE
),
77 HOWTO(R_68K_GOT16O
, 0, 1,16, FALSE
,0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_GOT16O", FALSE
, 0, 0x0000ffff,FALSE
),
78 HOWTO(R_68K_GOT8O
, 0, 0, 8, FALSE
,0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_GOT8O", FALSE
, 0, 0x000000ff,FALSE
),
79 HOWTO(R_68K_PLT32
, 0, 2,32, TRUE
, 0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_PLT32", FALSE
, 0, 0xffffffff,TRUE
),
80 HOWTO(R_68K_PLT16
, 0, 1,16, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PLT16", FALSE
, 0, 0x0000ffff,TRUE
),
81 HOWTO(R_68K_PLT8
, 0, 0, 8, TRUE
, 0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PLT8", FALSE
, 0, 0x000000ff,TRUE
),
82 HOWTO(R_68K_PLT32O
, 0, 2,32, FALSE
,0, complain_overflow_bitfield
, bfd_elf_generic_reloc
, "R_68K_PLT32O", FALSE
, 0, 0xffffffff,FALSE
),
83 HOWTO(R_68K_PLT16O
, 0, 1,16, FALSE
,0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PLT16O", FALSE
, 0, 0x0000ffff,FALSE
),
84 HOWTO(R_68K_PLT8O
, 0, 0, 8, FALSE
,0, complain_overflow_signed
, bfd_elf_generic_reloc
, "R_68K_PLT8O", FALSE
, 0, 0x000000ff,FALSE
),
85 HOWTO(R_68K_COPY
, 0, 0, 0, FALSE
,0, complain_overflow_dont
, bfd_elf_generic_reloc
, "R_68K_COPY", FALSE
, 0, 0xffffffff,FALSE
),
86 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
),
87 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
),
88 HOWTO(R_68K_RELATIVE
, 0, 2,32, FALSE
,0, complain_overflow_dont
, bfd_elf_generic_reloc
, "R_68K_RELATIVE", FALSE
, 0, 0xffffffff,FALSE
),
89 /* GNU extension to record C++ vtable hierarchy. */
90 HOWTO (R_68K_GNU_VTINHERIT
, /* type */
92 2, /* size (0 = byte, 1 = short, 2 = long) */
94 FALSE
, /* pc_relative */
96 complain_overflow_dont
, /* complain_on_overflow */
97 NULL
, /* special_function */
98 "R_68K_GNU_VTINHERIT", /* name */
99 FALSE
, /* partial_inplace */
103 /* GNU extension to record C++ vtable member usage. */
104 HOWTO (R_68K_GNU_VTENTRY
, /* type */
106 2, /* size (0 = byte, 1 = short, 2 = long) */
108 FALSE
, /* pc_relative */
110 complain_overflow_dont
, /* complain_on_overflow */
111 _bfd_elf_rel_vtable_reloc_fn
, /* special_function */
112 "R_68K_GNU_VTENTRY", /* name */
113 FALSE
, /* partial_inplace */
120 rtype_to_howto (abfd
, cache_ptr
, dst
)
121 bfd
*abfd ATTRIBUTE_UNUSED
;
123 Elf_Internal_Rela
*dst
;
125 BFD_ASSERT (ELF32_R_TYPE(dst
->r_info
) < (unsigned int) R_68K_max
);
126 cache_ptr
->howto
= &howto_table
[ELF32_R_TYPE(dst
->r_info
)];
129 #define elf_info_to_howto rtype_to_howto
133 bfd_reloc_code_real_type bfd_val
;
136 { BFD_RELOC_NONE
, R_68K_NONE
},
137 { BFD_RELOC_32
, R_68K_32
},
138 { BFD_RELOC_16
, R_68K_16
},
139 { BFD_RELOC_8
, R_68K_8
},
140 { BFD_RELOC_32_PCREL
, R_68K_PC32
},
141 { BFD_RELOC_16_PCREL
, R_68K_PC16
},
142 { BFD_RELOC_8_PCREL
, R_68K_PC8
},
143 { BFD_RELOC_32_GOT_PCREL
, R_68K_GOT32
},
144 { BFD_RELOC_16_GOT_PCREL
, R_68K_GOT16
},
145 { BFD_RELOC_8_GOT_PCREL
, R_68K_GOT8
},
146 { BFD_RELOC_32_GOTOFF
, R_68K_GOT32O
},
147 { BFD_RELOC_16_GOTOFF
, R_68K_GOT16O
},
148 { BFD_RELOC_8_GOTOFF
, R_68K_GOT8O
},
149 { BFD_RELOC_32_PLT_PCREL
, R_68K_PLT32
},
150 { BFD_RELOC_16_PLT_PCREL
, R_68K_PLT16
},
151 { BFD_RELOC_8_PLT_PCREL
, R_68K_PLT8
},
152 { BFD_RELOC_32_PLTOFF
, R_68K_PLT32O
},
153 { BFD_RELOC_16_PLTOFF
, R_68K_PLT16O
},
154 { BFD_RELOC_8_PLTOFF
, R_68K_PLT8O
},
155 { BFD_RELOC_NONE
, R_68K_COPY
},
156 { BFD_RELOC_68K_GLOB_DAT
, R_68K_GLOB_DAT
},
157 { BFD_RELOC_68K_JMP_SLOT
, R_68K_JMP_SLOT
},
158 { BFD_RELOC_68K_RELATIVE
, R_68K_RELATIVE
},
159 { BFD_RELOC_CTOR
, R_68K_32
},
160 { BFD_RELOC_VTABLE_INHERIT
, R_68K_GNU_VTINHERIT
},
161 { BFD_RELOC_VTABLE_ENTRY
, R_68K_GNU_VTENTRY
},
164 static reloc_howto_type
*
165 reloc_type_lookup (abfd
, code
)
166 bfd
*abfd ATTRIBUTE_UNUSED
;
167 bfd_reloc_code_real_type code
;
170 for (i
= 0; i
< sizeof (reloc_map
) / sizeof (reloc_map
[0]); i
++)
172 if (reloc_map
[i
].bfd_val
== code
)
173 return &howto_table
[reloc_map
[i
].elf_val
];
178 static reloc_howto_type
*
179 reloc_name_lookup (bfd
*abfd ATTRIBUTE_UNUSED
, const char *r_name
)
183 for (i
= 0; i
< sizeof (howto_table
) / sizeof (howto_table
[0]); i
++)
184 if (howto_table
[i
].name
!= NULL
185 && strcasecmp (howto_table
[i
].name
, r_name
) == 0)
186 return &howto_table
[i
];
191 #define bfd_elf32_bfd_reloc_type_lookup reloc_type_lookup
192 #define bfd_elf32_bfd_reloc_name_lookup reloc_name_lookup
193 #define ELF_ARCH bfd_arch_m68k
195 /* Functions for the m68k ELF linker. */
197 /* The name of the dynamic interpreter. This is put in the .interp
200 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
202 /* Describes one of the various PLT styles. */
204 struct elf_m68k_plt_info
206 /* The size of each PLT entry. */
209 /* The template for the first PLT entry. */
210 const bfd_byte
*plt0_entry
;
212 /* Offsets of fields in PLT0_ENTRY that require R_68K_PC32 relocations.
213 The comments by each member indicate the value that the relocation
216 unsigned int got4
; /* .got + 4 */
217 unsigned int got8
; /* .got + 8 */
220 /* The template for a symbol's PLT entry. */
221 const bfd_byte
*symbol_entry
;
223 /* Offsets of fields in SYMBOL_ENTRY that require R_68K_PC32 relocations.
224 The comments by each member indicate the value that the relocation
227 unsigned int got
; /* the symbol's .got.plt entry */
228 unsigned int plt
; /* .plt */
231 /* The offset of the resolver stub from the start of SYMBOL_ENTRY.
232 The stub starts with "move.l #relocoffset,%d0". */
233 bfd_vma symbol_resolve_entry
;
236 /* The size in bytes of an entry in the procedure linkage table. */
238 #define PLT_ENTRY_SIZE 20
240 /* The first entry in a procedure linkage table looks like this. See
241 the SVR4 ABI m68k supplement to see how this works. */
243 static const bfd_byte elf_m68k_plt0_entry
[PLT_ENTRY_SIZE
] =
245 0x2f, 0x3b, 0x01, 0x70, /* move.l (%pc,addr),-(%sp) */
246 0, 0, 0, 2, /* + (.got + 4) - . */
247 0x4e, 0xfb, 0x01, 0x71, /* jmp ([%pc,addr]) */
248 0, 0, 0, 2, /* + (.got + 8) - . */
249 0, 0, 0, 0 /* pad out to 20 bytes. */
252 /* Subsequent entries in a procedure linkage table look like this. */
254 static const bfd_byte elf_m68k_plt_entry
[PLT_ENTRY_SIZE
] =
256 0x4e, 0xfb, 0x01, 0x71, /* jmp ([%pc,symbol@GOTPC]) */
257 0, 0, 0, 2, /* + (.got.plt entry) - . */
258 0x2f, 0x3c, /* move.l #offset,-(%sp) */
259 0, 0, 0, 0, /* + reloc index */
260 0x60, 0xff, /* bra.l .plt */
261 0, 0, 0, 0 /* + .plt - . */
264 static const struct elf_m68k_plt_info elf_m68k_plt_info
= {
266 elf_m68k_plt0_entry
, { 4, 12 },
267 elf_m68k_plt_entry
, { 4, 16 }, 8
270 #define ISAB_PLT_ENTRY_SIZE 24
272 static const bfd_byte elf_isab_plt0_entry
[ISAB_PLT_ENTRY_SIZE
] =
274 0x20, 0x3c, /* move.l #offset,%d0 */
275 0, 0, 0, 0, /* + (.got + 4) - . */
276 0x2f, 0x3b, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l),-(%sp) */
277 0x20, 0x3c, /* move.l #offset,%d0 */
278 0, 0, 0, 0, /* + (.got + 8) - . */
279 0x20, 0x7b, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l), %a0 */
280 0x4e, 0xd0, /* jmp (%a0) */
284 /* Subsequent entries in a procedure linkage table look like this. */
286 static const bfd_byte elf_isab_plt_entry
[ISAB_PLT_ENTRY_SIZE
] =
288 0x20, 0x3c, /* move.l #offset,%d0 */
289 0, 0, 0, 0, /* + (.got.plt entry) - . */
290 0x20, 0x7b, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l), %a0 */
291 0x4e, 0xd0, /* jmp (%a0) */
292 0x2f, 0x3c, /* move.l #offset,-(%sp) */
293 0, 0, 0, 0, /* + reloc index */
294 0x60, 0xff, /* bra.l .plt */
295 0, 0, 0, 0 /* + .plt - . */
298 static const struct elf_m68k_plt_info elf_isab_plt_info
= {
300 elf_isab_plt0_entry
, { 2, 12 },
301 elf_isab_plt_entry
, { 2, 20 }, 12
304 #define ISAC_PLT_ENTRY_SIZE 24
306 static const bfd_byte elf_isac_plt0_entry
[ISAC_PLT_ENTRY_SIZE
] =
308 0x20, 0x3c, /* move.l #offset,%d0 */
309 0, 0, 0, 0, /* replaced with .got + 4 - . */
310 0x2e, 0xbb, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l),(%sp) */
311 0x20, 0x3c, /* move.l #offset,%d0 */
312 0, 0, 0, 0, /* replaced with .got + 8 - . */
313 0x20, 0x7b, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l), %a0 */
314 0x4e, 0xd0, /* jmp (%a0) */
318 /* Subsequent entries in a procedure linkage table look like this. */
320 static const bfd_byte elf_isac_plt_entry
[ISAC_PLT_ENTRY_SIZE
] =
322 0x20, 0x3c, /* move.l #offset,%d0 */
323 0, 0, 0, 0, /* replaced with (.got entry) - . */
324 0x20, 0x7b, 0x08, 0xfa, /* move.l (-6,%pc,%d0:l), %a0 */
325 0x4e, 0xd0, /* jmp (%a0) */
326 0x2f, 0x3c, /* move.l #offset,-(%sp) */
327 0, 0, 0, 0, /* replaced with offset into relocation table */
328 0x61, 0xff, /* bsr.l .plt */
329 0, 0, 0, 0 /* replaced with .plt - . */
332 static const struct elf_m68k_plt_info elf_isac_plt_info
= {
334 elf_isac_plt0_entry
, { 2, 12},
335 elf_isac_plt_entry
, { 2, 20 }, 12
338 #define CPU32_PLT_ENTRY_SIZE 24
339 /* Procedure linkage table entries for the cpu32 */
340 static const bfd_byte elf_cpu32_plt0_entry
[CPU32_PLT_ENTRY_SIZE
] =
342 0x2f, 0x3b, 0x01, 0x70, /* move.l (%pc,addr),-(%sp) */
343 0, 0, 0, 2, /* + (.got + 4) - . */
344 0x22, 0x7b, 0x01, 0x70, /* moveal %pc@(0xc), %a1 */
345 0, 0, 0, 2, /* + (.got + 8) - . */
346 0x4e, 0xd1, /* jmp %a1@ */
347 0, 0, 0, 0, /* pad out to 24 bytes. */
351 static const bfd_byte elf_cpu32_plt_entry
[CPU32_PLT_ENTRY_SIZE
] =
353 0x22, 0x7b, 0x01, 0x70, /* moveal %pc@(0xc), %a1 */
354 0, 0, 0, 2, /* + (.got.plt entry) - . */
355 0x4e, 0xd1, /* jmp %a1@ */
356 0x2f, 0x3c, /* move.l #offset,-(%sp) */
357 0, 0, 0, 0, /* + reloc index */
358 0x60, 0xff, /* bra.l .plt */
359 0, 0, 0, 0, /* + .plt - . */
363 static const struct elf_m68k_plt_info elf_cpu32_plt_info
= {
364 CPU32_PLT_ENTRY_SIZE
,
365 elf_cpu32_plt0_entry
, { 4, 12 },
366 elf_cpu32_plt_entry
, { 4, 18 }, 10
369 /* The m68k linker needs to keep track of the number of relocs that it
370 decides to copy in check_relocs for each symbol. This is so that it
371 can discard PC relative relocs if it doesn't need them when linking
372 with -Bsymbolic. We store the information in a field extending the
373 regular ELF linker hash table. */
375 /* This structure keeps track of the number of PC relative relocs we have
376 copied for a given symbol. */
378 struct elf_m68k_pcrel_relocs_copied
381 struct elf_m68k_pcrel_relocs_copied
*next
;
382 /* A section in dynobj. */
384 /* Number of relocs copied in this section. */
388 /* m68k ELF linker hash entry. */
390 struct elf_m68k_link_hash_entry
392 struct elf_link_hash_entry root
;
394 /* Number of PC relative relocs copied for this symbol. */
395 struct elf_m68k_pcrel_relocs_copied
*pcrel_relocs_copied
;
398 #define elf_m68k_hash_entry(ent) ((struct elf_m68k_link_hash_entry *) (ent))
400 /* m68k ELF linker hash table. */
402 struct elf_m68k_link_hash_table
404 struct elf_link_hash_table root
;
406 /* Small local sym to section mapping cache. */
407 struct sym_sec_cache sym_sec
;
409 /* The PLT format used by this link, or NULL if the format has not
411 const struct elf_m68k_plt_info
*plt_info
;
414 /* Get the m68k ELF linker hash table from a link_info structure. */
416 #define elf_m68k_hash_table(p) \
417 ((struct elf_m68k_link_hash_table *) (p)->hash)
419 /* Create an entry in an m68k ELF linker hash table. */
421 static struct bfd_hash_entry
*
422 elf_m68k_link_hash_newfunc (entry
, table
, string
)
423 struct bfd_hash_entry
*entry
;
424 struct bfd_hash_table
*table
;
427 struct bfd_hash_entry
*ret
= entry
;
429 /* Allocate the structure if it has not already been allocated by a
432 ret
= bfd_hash_allocate (table
,
433 sizeof (struct elf_m68k_link_hash_entry
));
437 /* Call the allocation method of the superclass. */
438 ret
= _bfd_elf_link_hash_newfunc (ret
, table
, string
);
440 elf_m68k_hash_entry (ret
)->pcrel_relocs_copied
= NULL
;
445 /* Create an m68k ELF linker hash table. */
447 static struct bfd_link_hash_table
*
448 elf_m68k_link_hash_table_create (abfd
)
451 struct elf_m68k_link_hash_table
*ret
;
452 bfd_size_type amt
= sizeof (struct elf_m68k_link_hash_table
);
454 ret
= (struct elf_m68k_link_hash_table
*) bfd_malloc (amt
);
455 if (ret
== (struct elf_m68k_link_hash_table
*) NULL
)
458 if (!_bfd_elf_link_hash_table_init (&ret
->root
, abfd
,
459 elf_m68k_link_hash_newfunc
,
460 sizeof (struct elf_m68k_link_hash_entry
)))
466 ret
->sym_sec
.abfd
= NULL
;
467 ret
->plt_info
= NULL
;
469 return &ret
->root
.root
;
472 /* Set the right machine number. */
475 elf32_m68k_object_p (bfd
*abfd
)
477 unsigned int mach
= 0;
478 unsigned features
= 0;
479 flagword eflags
= elf_elfheader (abfd
)->e_flags
;
481 if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_M68000
)
483 else if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_CPU32
)
485 else if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_FIDO
)
489 switch (eflags
& EF_M68K_CF_ISA_MASK
)
491 case EF_M68K_CF_ISA_A_NODIV
:
492 features
|= mcfisa_a
;
494 case EF_M68K_CF_ISA_A
:
495 features
|= mcfisa_a
|mcfhwdiv
;
497 case EF_M68K_CF_ISA_A_PLUS
:
498 features
|= mcfisa_a
|mcfisa_aa
|mcfhwdiv
|mcfusp
;
500 case EF_M68K_CF_ISA_B_NOUSP
:
501 features
|= mcfisa_a
|mcfisa_b
|mcfhwdiv
;
503 case EF_M68K_CF_ISA_B
:
504 features
|= mcfisa_a
|mcfisa_b
|mcfhwdiv
|mcfusp
;
506 case EF_M68K_CF_ISA_C
:
507 features
|= mcfisa_a
|mcfisa_c
|mcfhwdiv
|mcfusp
;
510 switch (eflags
& EF_M68K_CF_MAC_MASK
)
515 case EF_M68K_CF_EMAC
:
519 if (eflags
& EF_M68K_CF_FLOAT
)
523 mach
= bfd_m68k_features_to_mach (features
);
524 bfd_default_set_arch_mach (abfd
, bfd_arch_m68k
, mach
);
529 /* Keep m68k-specific flags in the ELF header. */
531 elf32_m68k_set_private_flags (abfd
, flags
)
535 elf_elfheader (abfd
)->e_flags
= flags
;
536 elf_flags_init (abfd
) = TRUE
;
540 /* Merge backend specific data from an object file to the output
541 object file when linking. */
543 elf32_m68k_merge_private_bfd_data (ibfd
, obfd
)
551 const bfd_arch_info_type
*arch_info
;
553 if ( bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
554 || bfd_get_flavour (obfd
) != bfd_target_elf_flavour
)
557 /* Get the merged machine. This checks for incompatibility between
558 Coldfire & non-Coldfire flags, incompability between different
559 Coldfire ISAs, and incompability between different MAC types. */
560 arch_info
= bfd_arch_get_compatible (ibfd
, obfd
, FALSE
);
564 bfd_set_arch_mach (obfd
, bfd_arch_m68k
, arch_info
->mach
);
566 in_flags
= elf_elfheader (ibfd
)->e_flags
;
567 if (!elf_flags_init (obfd
))
569 elf_flags_init (obfd
) = TRUE
;
570 out_flags
= in_flags
;
574 out_flags
= elf_elfheader (obfd
)->e_flags
;
575 unsigned int variant_mask
;
577 if ((in_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_M68000
)
579 else if ((in_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_CPU32
)
581 else if ((in_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_FIDO
)
584 variant_mask
= EF_M68K_CF_ISA_MASK
;
586 in_isa
= (in_flags
& variant_mask
);
587 out_isa
= (out_flags
& variant_mask
);
588 if (in_isa
> out_isa
)
589 out_flags
^= in_isa
^ out_isa
;
590 if (((in_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_CPU32
591 && (out_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_FIDO
)
592 || ((in_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_FIDO
593 && (out_flags
& EF_M68K_ARCH_MASK
) == EF_M68K_CPU32
))
594 out_flags
= EF_M68K_FIDO
;
596 out_flags
|= in_flags
^ in_isa
;
598 elf_elfheader (obfd
)->e_flags
= out_flags
;
603 /* Display the flags field. */
605 elf32_m68k_print_private_bfd_data (abfd
, ptr
)
609 FILE *file
= (FILE *) ptr
;
610 flagword eflags
= elf_elfheader (abfd
)->e_flags
;
612 BFD_ASSERT (abfd
!= NULL
&& ptr
!= NULL
);
614 /* Print normal ELF private data. */
615 _bfd_elf_print_private_bfd_data (abfd
, ptr
);
617 /* Ignore init flag - it may not be set, despite the flags field containing valid data. */
619 /* xgettext:c-format */
620 fprintf (file
, _("private flags = %lx:"), elf_elfheader (abfd
)->e_flags
);
622 if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_M68000
)
623 fprintf (file
, " [m68000]");
624 else if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_CPU32
)
625 fprintf (file
, " [cpu32]");
626 else if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_FIDO
)
627 fprintf (file
, " [fido]");
630 if ((eflags
& EF_M68K_ARCH_MASK
) == EF_M68K_CFV4E
)
631 fprintf (file
, " [cfv4e]");
633 if (eflags
& EF_M68K_CF_ISA_MASK
)
635 char const *isa
= _("unknown");
636 char const *mac
= _("unknown");
637 char const *additional
= "";
639 switch (eflags
& EF_M68K_CF_ISA_MASK
)
641 case EF_M68K_CF_ISA_A_NODIV
:
643 additional
= " [nodiv]";
645 case EF_M68K_CF_ISA_A
:
648 case EF_M68K_CF_ISA_A_PLUS
:
651 case EF_M68K_CF_ISA_B_NOUSP
:
653 additional
= " [nousp]";
655 case EF_M68K_CF_ISA_B
:
658 case EF_M68K_CF_ISA_C
:
662 fprintf (file
, " [isa %s]%s", isa
, additional
);
663 if (eflags
& EF_M68K_CF_FLOAT
)
664 fprintf (file
, " [float]");
665 switch (eflags
& EF_M68K_CF_MAC_MASK
)
673 case EF_M68K_CF_EMAC
:
678 fprintf (file
, " [%s]", mac
);
686 /* Look through the relocs for a section during the first phase, and
687 allocate space in the global offset table or procedure linkage
691 elf_m68k_check_relocs (abfd
, info
, sec
, relocs
)
693 struct bfd_link_info
*info
;
695 const Elf_Internal_Rela
*relocs
;
698 Elf_Internal_Shdr
*symtab_hdr
;
699 struct elf_link_hash_entry
**sym_hashes
;
700 bfd_signed_vma
*local_got_refcounts
;
701 const Elf_Internal_Rela
*rel
;
702 const Elf_Internal_Rela
*rel_end
;
707 if (info
->relocatable
)
710 dynobj
= elf_hash_table (info
)->dynobj
;
711 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
712 sym_hashes
= elf_sym_hashes (abfd
);
713 local_got_refcounts
= elf_local_got_refcounts (abfd
);
719 rel_end
= relocs
+ sec
->reloc_count
;
720 for (rel
= relocs
; rel
< rel_end
; rel
++)
722 unsigned long r_symndx
;
723 struct elf_link_hash_entry
*h
;
725 r_symndx
= ELF32_R_SYM (rel
->r_info
);
727 if (r_symndx
< symtab_hdr
->sh_info
)
731 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
732 while (h
->root
.type
== bfd_link_hash_indirect
733 || h
->root
.type
== bfd_link_hash_warning
)
734 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
737 switch (ELF32_R_TYPE (rel
->r_info
))
743 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
749 /* This symbol requires a global offset table entry. */
753 /* Create the .got section. */
754 elf_hash_table (info
)->dynobj
= dynobj
= abfd
;
755 if (!_bfd_elf_create_got_section (dynobj
, info
))
761 sgot
= bfd_get_section_by_name (dynobj
, ".got");
762 BFD_ASSERT (sgot
!= NULL
);
766 && (h
!= NULL
|| info
->shared
))
768 srelgot
= bfd_get_section_by_name (dynobj
, ".rela.got");
771 srelgot
= bfd_make_section_with_flags (dynobj
,
780 || !bfd_set_section_alignment (dynobj
, srelgot
, 2))
787 if (h
->got
.refcount
== 0)
789 /* Make sure this symbol is output as a dynamic symbol. */
793 if (!bfd_elf_link_record_dynamic_symbol (info
, h
))
797 /* Allocate space in the .got section. */
799 /* Allocate relocation space. */
800 srelgot
->size
+= sizeof (Elf32_External_Rela
);
806 /* This is a global offset table entry for a local symbol. */
807 if (local_got_refcounts
== NULL
)
811 size
= symtab_hdr
->sh_info
;
812 size
*= sizeof (bfd_signed_vma
);
813 local_got_refcounts
= ((bfd_signed_vma
*)
814 bfd_zalloc (abfd
, size
));
815 if (local_got_refcounts
== NULL
)
817 elf_local_got_refcounts (abfd
) = local_got_refcounts
;
819 if (local_got_refcounts
[r_symndx
] == 0)
824 /* If we are generating a shared object, we need to
825 output a R_68K_RELATIVE reloc so that the dynamic
826 linker can adjust this GOT entry. */
827 srelgot
->size
+= sizeof (Elf32_External_Rela
);
830 local_got_refcounts
[r_symndx
]++;
837 /* This symbol requires a procedure linkage table entry. We
838 actually build the entry in adjust_dynamic_symbol,
839 because this might be a case of linking PIC code which is
840 never referenced by a dynamic object, in which case we
841 don't need to generate a procedure linkage table entry
844 /* If this is a local symbol, we resolve it directly without
845 creating a procedure linkage table entry. */
856 /* This symbol requires a procedure linkage table entry. */
860 /* It does not make sense to have this relocation for a
861 local symbol. FIXME: does it? How to handle it if
862 it does make sense? */
863 bfd_set_error (bfd_error_bad_value
);
867 /* Make sure this symbol is output as a dynamic symbol. */
871 if (!bfd_elf_link_record_dynamic_symbol (info
, h
))
882 /* If we are creating a shared library and this is not a local
883 symbol, we need to copy the reloc into the shared library.
884 However when linking with -Bsymbolic and this is a global
885 symbol which is defined in an object we are including in the
886 link (i.e., DEF_REGULAR is set), then we can resolve the
887 reloc directly. At this point we have not seen all the input
888 files, so it is possible that DEF_REGULAR is not set now but
889 will be set later (it is never cleared). We account for that
890 possibility below by storing information in the
891 pcrel_relocs_copied field of the hash table entry. */
893 && (sec
->flags
& SEC_ALLOC
) != 0
896 || h
->root
.type
== bfd_link_hash_defweak
897 || !h
->def_regular
)))
901 /* Make sure a plt entry is created for this symbol if
902 it turns out to be a function defined by a dynamic
914 /* Make sure a plt entry is created for this symbol if it
915 turns out to be a function defined by a dynamic object. */
919 /* If we are creating a shared library, we need to copy the
920 reloc into the shared library. */
922 && (sec
->flags
& SEC_ALLOC
) != 0)
924 /* When creating a shared object, we must copy these
925 reloc types into the output file. We create a reloc
926 section in dynobj and make room for this reloc. */
931 name
= (bfd_elf_string_from_elf_section
933 elf_elfheader (abfd
)->e_shstrndx
,
934 elf_section_data (sec
)->rel_hdr
.sh_name
));
938 BFD_ASSERT (CONST_STRNEQ (name
, ".rela")
939 && strcmp (bfd_get_section_name (abfd
, sec
),
942 sreloc
= bfd_get_section_by_name (dynobj
, name
);
945 sreloc
= bfd_make_section_with_flags (dynobj
,
954 || !bfd_set_section_alignment (dynobj
, sreloc
, 2))
957 elf_section_data (sec
)->sreloc
= sreloc
;
960 if (sec
->flags
& SEC_READONLY
961 /* Don't set DF_TEXTREL yet for PC relative
962 relocations, they might be discarded later. */
963 && !(ELF32_R_TYPE (rel
->r_info
) == R_68K_PC8
964 || ELF32_R_TYPE (rel
->r_info
) == R_68K_PC16
965 || ELF32_R_TYPE (rel
->r_info
) == R_68K_PC32
))
966 info
->flags
|= DF_TEXTREL
;
968 sreloc
->size
+= sizeof (Elf32_External_Rela
);
970 /* We count the number of PC relative relocations we have
971 entered for this symbol, so that we can discard them
972 again if, in the -Bsymbolic case, the symbol is later
973 defined by a regular object, or, in the normal shared
974 case, the symbol is forced to be local. Note that this
975 function is only called if we are using an m68kelf linker
976 hash table, which means that h is really a pointer to an
977 elf_m68k_link_hash_entry. */
978 if (ELF32_R_TYPE (rel
->r_info
) == R_68K_PC8
979 || ELF32_R_TYPE (rel
->r_info
) == R_68K_PC16
980 || ELF32_R_TYPE (rel
->r_info
) == R_68K_PC32
)
982 struct elf_m68k_pcrel_relocs_copied
*p
;
983 struct elf_m68k_pcrel_relocs_copied
**head
;
987 struct elf_m68k_link_hash_entry
*eh
988 = elf_m68k_hash_entry (h
);
989 head
= &eh
->pcrel_relocs_copied
;
996 s
= (bfd_section_from_r_symndx
997 (abfd
, &elf_m68k_hash_table (info
)->sym_sec
,
1002 vpp
= &elf_section_data (s
)->local_dynrel
;
1003 head
= (struct elf_m68k_pcrel_relocs_copied
**) vpp
;
1006 for (p
= *head
; p
!= NULL
; p
= p
->next
)
1007 if (p
->section
== sreloc
)
1012 p
= ((struct elf_m68k_pcrel_relocs_copied
*)
1013 bfd_alloc (dynobj
, (bfd_size_type
) sizeof *p
));
1018 p
->section
= sreloc
;
1028 /* This relocation describes the C++ object vtable hierarchy.
1029 Reconstruct it for later use during GC. */
1030 case R_68K_GNU_VTINHERIT
:
1031 if (!bfd_elf_gc_record_vtinherit (abfd
, sec
, h
, rel
->r_offset
))
1035 /* This relocation describes which C++ vtable entries are actually
1036 used. Record for later use during GC. */
1037 case R_68K_GNU_VTENTRY
:
1038 if (!bfd_elf_gc_record_vtentry (abfd
, sec
, h
, rel
->r_addend
))
1050 /* Return the section that should be marked against GC for a given
1054 elf_m68k_gc_mark_hook (asection
*sec
,
1055 struct bfd_link_info
*info
,
1056 Elf_Internal_Rela
*rel
,
1057 struct elf_link_hash_entry
*h
,
1058 Elf_Internal_Sym
*sym
)
1061 switch (ELF32_R_TYPE (rel
->r_info
))
1063 case R_68K_GNU_VTINHERIT
:
1064 case R_68K_GNU_VTENTRY
:
1068 return _bfd_elf_gc_mark_hook (sec
, info
, rel
, h
, sym
);
1071 /* Update the got entry reference counts for the section being removed. */
1074 elf_m68k_gc_sweep_hook (bfd
*abfd
,
1075 struct bfd_link_info
*info
,
1077 const Elf_Internal_Rela
*relocs
)
1079 Elf_Internal_Shdr
*symtab_hdr
;
1080 struct elf_link_hash_entry
**sym_hashes
;
1081 bfd_signed_vma
*local_got_refcounts
;
1082 const Elf_Internal_Rela
*rel
, *relend
;
1087 dynobj
= elf_hash_table (info
)->dynobj
;
1091 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
1092 sym_hashes
= elf_sym_hashes (abfd
);
1093 local_got_refcounts
= elf_local_got_refcounts (abfd
);
1095 sgot
= bfd_get_section_by_name (dynobj
, ".got");
1096 srelgot
= bfd_get_section_by_name (dynobj
, ".rela.got");
1098 relend
= relocs
+ sec
->reloc_count
;
1099 for (rel
= relocs
; rel
< relend
; rel
++)
1101 unsigned long r_symndx
;
1102 struct elf_link_hash_entry
*h
= NULL
;
1104 r_symndx
= ELF32_R_SYM (rel
->r_info
);
1105 if (r_symndx
>= symtab_hdr
->sh_info
)
1107 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
1108 while (h
->root
.type
== bfd_link_hash_indirect
1109 || h
->root
.type
== bfd_link_hash_warning
)
1110 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
1113 switch (ELF32_R_TYPE (rel
->r_info
))
1123 if (h
->got
.refcount
> 0)
1126 if (h
->got
.refcount
== 0)
1128 /* We don't need the .got entry any more. */
1130 srelgot
->size
-= sizeof (Elf32_External_Rela
);
1134 else if (local_got_refcounts
!= NULL
)
1136 if (local_got_refcounts
[r_symndx
] > 0)
1138 --local_got_refcounts
[r_symndx
];
1139 if (local_got_refcounts
[r_symndx
] == 0)
1141 /* We don't need the .got entry any more. */
1144 srelgot
->size
-= sizeof (Elf32_External_Rela
);
1164 if (h
->plt
.refcount
> 0)
1177 /* Return the type of PLT associated with OUTPUT_BFD. */
1179 static const struct elf_m68k_plt_info
*
1180 elf_m68k_get_plt_info (bfd
*output_bfd
)
1182 unsigned int features
;
1184 features
= bfd_m68k_mach_to_features (bfd_get_mach (output_bfd
));
1185 if (features
& cpu32
)
1186 return &elf_cpu32_plt_info
;
1187 if (features
& mcfisa_b
)
1188 return &elf_isab_plt_info
;
1189 if (features
& mcfisa_c
)
1190 return &elf_isac_plt_info
;
1191 return &elf_m68k_plt_info
;
1194 /* This function is called after all the input files have been read,
1195 and the input sections have been assigned to output sections.
1196 It's a convenient place to determine the PLT style. */
1199 elf_m68k_always_size_sections (bfd
*output_bfd
, struct bfd_link_info
*info
)
1201 elf_m68k_hash_table (info
)->plt_info
= elf_m68k_get_plt_info (output_bfd
);
1205 /* Adjust a symbol defined by a dynamic object and referenced by a
1206 regular object. The current definition is in some section of the
1207 dynamic object, but we're not including those sections. We have to
1208 change the definition to something the rest of the link can
1212 elf_m68k_adjust_dynamic_symbol (info
, h
)
1213 struct bfd_link_info
*info
;
1214 struct elf_link_hash_entry
*h
;
1216 struct elf_m68k_link_hash_table
*htab
;
1220 htab
= elf_m68k_hash_table (info
);
1221 dynobj
= elf_hash_table (info
)->dynobj
;
1223 /* Make sure we know what is going on here. */
1224 BFD_ASSERT (dynobj
!= NULL
1226 || h
->u
.weakdef
!= NULL
1229 && !h
->def_regular
)));
1231 /* If this is a function, put it in the procedure linkage table. We
1232 will fill in the contents of the procedure linkage table later,
1233 when we know the address of the .got section. */
1234 if (h
->type
== STT_FUNC
1237 if ((h
->plt
.refcount
<= 0
1238 || SYMBOL_CALLS_LOCAL (info
, h
)
1239 || (ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
1240 && h
->root
.type
== bfd_link_hash_undefweak
))
1241 /* We must always create the plt entry if it was referenced
1242 by a PLTxxO relocation. In this case we already recorded
1243 it as a dynamic symbol. */
1244 && h
->dynindx
== -1)
1246 /* This case can occur if we saw a PLTxx reloc in an input
1247 file, but the symbol was never referred to by a dynamic
1248 object, or if all references were garbage collected. In
1249 such a case, we don't actually need to build a procedure
1250 linkage table, and we can just do a PCxx reloc instead. */
1251 h
->plt
.offset
= (bfd_vma
) -1;
1256 /* Make sure this symbol is output as a dynamic symbol. */
1257 if (h
->dynindx
== -1
1258 && !h
->forced_local
)
1260 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
1264 s
= bfd_get_section_by_name (dynobj
, ".plt");
1265 BFD_ASSERT (s
!= NULL
);
1267 /* If this is the first .plt entry, make room for the special
1270 s
->size
= htab
->plt_info
->size
;
1272 /* If this symbol is not defined in a regular file, and we are
1273 not generating a shared library, then set the symbol to this
1274 location in the .plt. This is required to make function
1275 pointers compare as equal between the normal executable and
1276 the shared library. */
1280 h
->root
.u
.def
.section
= s
;
1281 h
->root
.u
.def
.value
= s
->size
;
1284 h
->plt
.offset
= s
->size
;
1286 /* Make room for this entry. */
1287 s
->size
+= htab
->plt_info
->size
;
1289 /* We also need to make an entry in the .got.plt section, which
1290 will be placed in the .got section by the linker script. */
1291 s
= bfd_get_section_by_name (dynobj
, ".got.plt");
1292 BFD_ASSERT (s
!= NULL
);
1295 /* We also need to make an entry in the .rela.plt section. */
1296 s
= bfd_get_section_by_name (dynobj
, ".rela.plt");
1297 BFD_ASSERT (s
!= NULL
);
1298 s
->size
+= sizeof (Elf32_External_Rela
);
1303 /* Reinitialize the plt offset now that it is not used as a reference
1305 h
->plt
.offset
= (bfd_vma
) -1;
1307 /* If this is a weak symbol, and there is a real definition, the
1308 processor independent code will have arranged for us to see the
1309 real definition first, and we can just use the same value. */
1310 if (h
->u
.weakdef
!= NULL
)
1312 BFD_ASSERT (h
->u
.weakdef
->root
.type
== bfd_link_hash_defined
1313 || h
->u
.weakdef
->root
.type
== bfd_link_hash_defweak
);
1314 h
->root
.u
.def
.section
= h
->u
.weakdef
->root
.u
.def
.section
;
1315 h
->root
.u
.def
.value
= h
->u
.weakdef
->root
.u
.def
.value
;
1319 /* This is a reference to a symbol defined by a dynamic object which
1320 is not a function. */
1322 /* If we are creating a shared library, we must presume that the
1323 only references to the symbol are via the global offset table.
1324 For such cases we need not do anything here; the relocations will
1325 be handled correctly by relocate_section. */
1331 (*_bfd_error_handler
) (_("dynamic variable `%s' is zero size"),
1332 h
->root
.root
.string
);
1336 /* We must allocate the symbol in our .dynbss section, which will
1337 become part of the .bss section of the executable. There will be
1338 an entry for this symbol in the .dynsym section. The dynamic
1339 object will contain position independent code, so all references
1340 from the dynamic object to this symbol will go through the global
1341 offset table. The dynamic linker will use the .dynsym entry to
1342 determine the address it must put in the global offset table, so
1343 both the dynamic object and the regular object will refer to the
1344 same memory location for the variable. */
1346 s
= bfd_get_section_by_name (dynobj
, ".dynbss");
1347 BFD_ASSERT (s
!= NULL
);
1349 /* We must generate a R_68K_COPY reloc to tell the dynamic linker to
1350 copy the initial value out of the dynamic object and into the
1351 runtime process image. We need to remember the offset into the
1352 .rela.bss section we are going to use. */
1353 if ((h
->root
.u
.def
.section
->flags
& SEC_ALLOC
) != 0)
1357 srel
= bfd_get_section_by_name (dynobj
, ".rela.bss");
1358 BFD_ASSERT (srel
!= NULL
);
1359 srel
->size
+= sizeof (Elf32_External_Rela
);
1363 return _bfd_elf_adjust_dynamic_copy (h
, s
);
1366 /* Set the sizes of the dynamic sections. */
1369 elf_m68k_size_dynamic_sections (output_bfd
, info
)
1370 bfd
*output_bfd ATTRIBUTE_UNUSED
;
1371 struct bfd_link_info
*info
;
1378 dynobj
= elf_hash_table (info
)->dynobj
;
1379 BFD_ASSERT (dynobj
!= NULL
);
1381 if (elf_hash_table (info
)->dynamic_sections_created
)
1383 /* Set the contents of the .interp section to the interpreter. */
1384 if (info
->executable
)
1386 s
= bfd_get_section_by_name (dynobj
, ".interp");
1387 BFD_ASSERT (s
!= NULL
);
1388 s
->size
= sizeof ELF_DYNAMIC_INTERPRETER
;
1389 s
->contents
= (unsigned char *) ELF_DYNAMIC_INTERPRETER
;
1394 /* We may have created entries in the .rela.got section.
1395 However, if we are not creating the dynamic sections, we will
1396 not actually use these entries. Reset the size of .rela.got,
1397 which will cause it to get stripped from the output file
1399 s
= bfd_get_section_by_name (dynobj
, ".rela.got");
1404 /* If this is a -Bsymbolic shared link, then we need to discard all
1405 PC relative relocs against symbols defined in a regular object.
1406 For the normal shared case we discard the PC relative relocs
1407 against symbols that have become local due to visibility changes.
1408 We allocated space for them in the check_relocs routine, but we
1409 will not fill them in in the relocate_section routine. */
1411 elf_link_hash_traverse (elf_hash_table (info
),
1412 elf_m68k_discard_copies
,
1415 /* The check_relocs and adjust_dynamic_symbol entry points have
1416 determined the sizes of the various dynamic sections. Allocate
1420 for (s
= dynobj
->sections
; s
!= NULL
; s
= s
->next
)
1424 if ((s
->flags
& SEC_LINKER_CREATED
) == 0)
1427 /* It's OK to base decisions on the section name, because none
1428 of the dynobj section names depend upon the input files. */
1429 name
= bfd_get_section_name (dynobj
, s
);
1431 if (strcmp (name
, ".plt") == 0)
1433 /* Remember whether there is a PLT. */
1436 else if (CONST_STRNEQ (name
, ".rela"))
1442 /* We use the reloc_count field as a counter if we need
1443 to copy relocs into the output file. */
1447 else if (! CONST_STRNEQ (name
, ".got")
1448 && strcmp (name
, ".dynbss") != 0)
1450 /* It's not one of our sections, so don't allocate space. */
1456 /* If we don't need this section, strip it from the
1457 output file. This is mostly to handle .rela.bss and
1458 .rela.plt. We must create both sections in
1459 create_dynamic_sections, because they must be created
1460 before the linker maps input sections to output
1461 sections. The linker does that before
1462 adjust_dynamic_symbol is called, and it is that
1463 function which decides whether anything needs to go
1464 into these sections. */
1465 s
->flags
|= SEC_EXCLUDE
;
1469 if ((s
->flags
& SEC_HAS_CONTENTS
) == 0)
1472 /* Allocate memory for the section contents. */
1473 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
1474 Unused entries should be reclaimed before the section's contents
1475 are written out, but at the moment this does not happen. Thus in
1476 order to prevent writing out garbage, we initialise the section's
1477 contents to zero. */
1478 s
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, s
->size
);
1479 if (s
->contents
== NULL
)
1483 if (elf_hash_table (info
)->dynamic_sections_created
)
1485 /* Add some entries to the .dynamic section. We fill in the
1486 values later, in elf_m68k_finish_dynamic_sections, but we
1487 must add the entries now so that we get the correct size for
1488 the .dynamic section. The DT_DEBUG entry is filled in by the
1489 dynamic linker and used by the debugger. */
1490 #define add_dynamic_entry(TAG, VAL) \
1491 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
1495 if (!add_dynamic_entry (DT_DEBUG
, 0))
1501 if (!add_dynamic_entry (DT_PLTGOT
, 0)
1502 || !add_dynamic_entry (DT_PLTRELSZ
, 0)
1503 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
1504 || !add_dynamic_entry (DT_JMPREL
, 0))
1510 if (!add_dynamic_entry (DT_RELA
, 0)
1511 || !add_dynamic_entry (DT_RELASZ
, 0)
1512 || !add_dynamic_entry (DT_RELAENT
, sizeof (Elf32_External_Rela
)))
1516 if ((info
->flags
& DF_TEXTREL
) != 0)
1518 if (!add_dynamic_entry (DT_TEXTREL
, 0))
1522 #undef add_dynamic_entry
1527 /* This function is called via elf_link_hash_traverse if we are
1528 creating a shared object. In the -Bsymbolic case it discards the
1529 space allocated to copy PC relative relocs against symbols which
1530 are defined in regular objects. For the normal shared case, it
1531 discards space for pc-relative relocs that have become local due to
1532 symbol visibility changes. We allocated space for them in the
1533 check_relocs routine, but we won't fill them in in the
1534 relocate_section routine.
1536 We also check whether any of the remaining relocations apply
1537 against a readonly section, and set the DF_TEXTREL flag in this
1541 elf_m68k_discard_copies (h
, inf
)
1542 struct elf_link_hash_entry
*h
;
1545 struct bfd_link_info
*info
= (struct bfd_link_info
*) inf
;
1546 struct elf_m68k_pcrel_relocs_copied
*s
;
1548 if (h
->root
.type
== bfd_link_hash_warning
)
1549 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
1553 && !h
->forced_local
))
1555 if ((info
->flags
& DF_TEXTREL
) == 0)
1557 /* Look for relocations against read-only sections. */
1558 for (s
= elf_m68k_hash_entry (h
)->pcrel_relocs_copied
;
1561 if ((s
->section
->flags
& SEC_READONLY
) != 0)
1563 info
->flags
|= DF_TEXTREL
;
1571 for (s
= elf_m68k_hash_entry (h
)->pcrel_relocs_copied
;
1574 s
->section
->size
-= s
->count
* sizeof (Elf32_External_Rela
);
1579 /* Relocate an M68K ELF section. */
1582 elf_m68k_relocate_section (output_bfd
, info
, input_bfd
, input_section
,
1583 contents
, relocs
, local_syms
, local_sections
)
1585 struct bfd_link_info
*info
;
1587 asection
*input_section
;
1589 Elf_Internal_Rela
*relocs
;
1590 Elf_Internal_Sym
*local_syms
;
1591 asection
**local_sections
;
1594 Elf_Internal_Shdr
*symtab_hdr
;
1595 struct elf_link_hash_entry
**sym_hashes
;
1596 bfd_vma
*local_got_offsets
;
1600 Elf_Internal_Rela
*rel
;
1601 Elf_Internal_Rela
*relend
;
1603 dynobj
= elf_hash_table (info
)->dynobj
;
1604 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
1605 sym_hashes
= elf_sym_hashes (input_bfd
);
1606 local_got_offsets
= elf_local_got_offsets (input_bfd
);
1613 relend
= relocs
+ input_section
->reloc_count
;
1614 for (; rel
< relend
; rel
++)
1617 reloc_howto_type
*howto
;
1618 unsigned long r_symndx
;
1619 struct elf_link_hash_entry
*h
;
1620 Elf_Internal_Sym
*sym
;
1623 bfd_boolean unresolved_reloc
;
1624 bfd_reloc_status_type r
;
1626 r_type
= ELF32_R_TYPE (rel
->r_info
);
1627 if (r_type
< 0 || r_type
>= (int) R_68K_max
)
1629 bfd_set_error (bfd_error_bad_value
);
1632 howto
= howto_table
+ r_type
;
1634 r_symndx
= ELF32_R_SYM (rel
->r_info
);
1639 unresolved_reloc
= FALSE
;
1641 if (r_symndx
< symtab_hdr
->sh_info
)
1643 sym
= local_syms
+ r_symndx
;
1644 sec
= local_sections
[r_symndx
];
1645 relocation
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &sec
, rel
);
1651 RELOC_FOR_GLOBAL_SYMBOL (info
, input_bfd
, input_section
, rel
,
1652 r_symndx
, symtab_hdr
, sym_hashes
,
1654 unresolved_reloc
, warned
);
1657 if (sec
!= NULL
&& elf_discarded_section (sec
))
1659 /* For relocs against symbols from removed linkonce sections,
1660 or sections discarded by a linker script, we just want the
1661 section contents zeroed. Avoid any special processing. */
1662 _bfd_clear_contents (howto
, input_bfd
, contents
+ rel
->r_offset
);
1668 if (info
->relocatable
)
1676 /* Relocation is to the address of the entry for this symbol
1677 in the global offset table. */
1679 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
1685 /* Relocation is the offset of the entry for this symbol in
1686 the global offset table. */
1693 sgot
= bfd_get_section_by_name (dynobj
, ".got");
1694 BFD_ASSERT (sgot
!= NULL
);
1701 off
= h
->got
.offset
;
1702 BFD_ASSERT (off
!= (bfd_vma
) -1);
1704 dyn
= elf_hash_table (info
)->dynamic_sections_created
;
1705 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn
, info
->shared
, h
)
1712 /* This is actually a static link, or it is a
1713 -Bsymbolic link and the symbol is defined
1714 locally, or the symbol was forced to be local
1715 because of a version file.. We must initialize
1716 this entry in the global offset table. Since
1717 the offset must always be a multiple of 4, we
1718 use the least significant bit to record whether
1719 we have initialized it already.
1721 When doing a dynamic link, we create a .rela.got
1722 relocation entry to initialize the value. This
1723 is done in the finish_dynamic_symbol routine. */
1728 bfd_put_32 (output_bfd
, relocation
,
1729 sgot
->contents
+ off
);
1734 unresolved_reloc
= FALSE
;
1738 BFD_ASSERT (local_got_offsets
!= NULL
1739 && local_got_offsets
[r_symndx
] != (bfd_vma
) -1);
1741 off
= local_got_offsets
[r_symndx
];
1743 /* The offset must always be a multiple of 4. We use
1744 the least significant bit to record whether we have
1745 already generated the necessary reloc. */
1750 bfd_put_32 (output_bfd
, relocation
, sgot
->contents
+ off
);
1755 Elf_Internal_Rela outrel
;
1758 s
= bfd_get_section_by_name (dynobj
, ".rela.got");
1759 BFD_ASSERT (s
!= NULL
);
1761 outrel
.r_offset
= (sgot
->output_section
->vma
1762 + sgot
->output_offset
1764 outrel
.r_info
= ELF32_R_INFO (0, R_68K_RELATIVE
);
1765 outrel
.r_addend
= relocation
;
1767 loc
+= s
->reloc_count
++ * sizeof (Elf32_External_Rela
);
1768 bfd_elf32_swap_reloca_out (output_bfd
, &outrel
, loc
);
1771 local_got_offsets
[r_symndx
] |= 1;
1775 relocation
= sgot
->output_offset
+ off
;
1776 if (r_type
== R_68K_GOT8O
1777 || r_type
== R_68K_GOT16O
1778 || r_type
== R_68K_GOT32O
)
1780 /* This relocation does not use the addend. */
1784 relocation
+= sgot
->output_section
->vma
;
1791 /* Relocation is to the entry for this symbol in the
1792 procedure linkage table. */
1794 /* Resolve a PLTxx reloc against a local symbol directly,
1795 without using the procedure linkage table. */
1799 if (h
->plt
.offset
== (bfd_vma
) -1
1800 || !elf_hash_table (info
)->dynamic_sections_created
)
1802 /* We didn't make a PLT entry for this symbol. This
1803 happens when statically linking PIC code, or when
1804 using -Bsymbolic. */
1810 splt
= bfd_get_section_by_name (dynobj
, ".plt");
1811 BFD_ASSERT (splt
!= NULL
);
1814 relocation
= (splt
->output_section
->vma
1815 + splt
->output_offset
1817 unresolved_reloc
= FALSE
;
1823 /* Relocation is the offset of the entry for this symbol in
1824 the procedure linkage table. */
1825 BFD_ASSERT (h
!= NULL
&& h
->plt
.offset
!= (bfd_vma
) -1);
1829 splt
= bfd_get_section_by_name (dynobj
, ".plt");
1830 BFD_ASSERT (splt
!= NULL
);
1833 relocation
= h
->plt
.offset
;
1834 unresolved_reloc
= FALSE
;
1836 /* This relocation does not use the addend. */
1846 && h
->forced_local
))
1854 && (input_section
->flags
& SEC_ALLOC
) != 0
1856 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
1857 || h
->root
.type
!= bfd_link_hash_undefweak
)
1858 && ((r_type
!= R_68K_PC8
1859 && r_type
!= R_68K_PC16
1860 && r_type
!= R_68K_PC32
)
1864 || !h
->def_regular
))))
1866 Elf_Internal_Rela outrel
;
1868 bfd_boolean skip
, relocate
;
1870 /* When generating a shared object, these relocations
1871 are copied into the output file to be resolved at run
1878 _bfd_elf_section_offset (output_bfd
, info
, input_section
,
1880 if (outrel
.r_offset
== (bfd_vma
) -1)
1882 else if (outrel
.r_offset
== (bfd_vma
) -2)
1883 skip
= TRUE
, relocate
= TRUE
;
1884 outrel
.r_offset
+= (input_section
->output_section
->vma
1885 + input_section
->output_offset
);
1888 memset (&outrel
, 0, sizeof outrel
);
1891 && (r_type
== R_68K_PC8
1892 || r_type
== R_68K_PC16
1893 || r_type
== R_68K_PC32
1896 || !h
->def_regular
))
1898 outrel
.r_info
= ELF32_R_INFO (h
->dynindx
, r_type
);
1899 outrel
.r_addend
= rel
->r_addend
;
1903 /* This symbol is local, or marked to become local. */
1904 outrel
.r_addend
= relocation
+ rel
->r_addend
;
1906 if (r_type
== R_68K_32
)
1909 outrel
.r_info
= ELF32_R_INFO (0, R_68K_RELATIVE
);
1915 if (bfd_is_abs_section (sec
))
1917 else if (sec
== NULL
|| sec
->owner
== NULL
)
1919 bfd_set_error (bfd_error_bad_value
);
1926 /* We are turning this relocation into one
1927 against a section symbol. It would be
1928 proper to subtract the symbol's value,
1929 osec->vma, from the emitted reloc addend,
1930 but ld.so expects buggy relocs. */
1931 osec
= sec
->output_section
;
1932 indx
= elf_section_data (osec
)->dynindx
;
1935 struct elf_link_hash_table
*htab
;
1936 htab
= elf_hash_table (info
);
1937 osec
= htab
->text_index_section
;
1938 indx
= elf_section_data (osec
)->dynindx
;
1940 BFD_ASSERT (indx
!= 0);
1943 outrel
.r_info
= ELF32_R_INFO (indx
, r_type
);
1947 sreloc
= elf_section_data (input_section
)->sreloc
;
1951 loc
= sreloc
->contents
;
1952 loc
+= sreloc
->reloc_count
++ * sizeof (Elf32_External_Rela
);
1953 bfd_elf32_swap_reloca_out (output_bfd
, &outrel
, loc
);
1955 /* This reloc will be computed at runtime, so there's no
1956 need to do anything now, except for R_68K_32
1957 relocations that have been turned into
1965 case R_68K_GNU_VTINHERIT
:
1966 case R_68K_GNU_VTENTRY
:
1967 /* These are no-ops in the end. */
1974 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
1975 because such sections are not SEC_ALLOC and thus ld.so will
1976 not process them. */
1977 if (unresolved_reloc
1978 && !((input_section
->flags
& SEC_DEBUGGING
) != 0
1981 (*_bfd_error_handler
)
1982 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
1985 (long) rel
->r_offset
,
1987 h
->root
.root
.string
);
1991 r
= _bfd_final_link_relocate (howto
, input_bfd
, input_section
,
1992 contents
, rel
->r_offset
,
1993 relocation
, rel
->r_addend
);
1995 if (r
!= bfd_reloc_ok
)
2000 name
= h
->root
.root
.string
;
2003 name
= bfd_elf_string_from_elf_section (input_bfd
,
2004 symtab_hdr
->sh_link
,
2009 name
= bfd_section_name (input_bfd
, sec
);
2012 if (r
== bfd_reloc_overflow
)
2014 if (!(info
->callbacks
->reloc_overflow
2015 (info
, (h
? &h
->root
: NULL
), name
, howto
->name
,
2016 (bfd_vma
) 0, input_bfd
, input_section
,
2022 (*_bfd_error_handler
)
2023 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
2024 input_bfd
, input_section
,
2025 (long) rel
->r_offset
, name
, (int) r
);
2034 /* Install an M_68K_PC32 relocation against VALUE at offset OFFSET
2035 into section SEC. */
2038 elf_m68k_install_pc32 (asection
*sec
, bfd_vma offset
, bfd_vma value
)
2040 /* Make VALUE PC-relative. */
2041 value
-= sec
->output_section
->vma
+ offset
;
2043 /* Apply any in-place addend. */
2044 value
+= bfd_get_32 (sec
->owner
, sec
->contents
+ offset
);
2046 bfd_put_32 (sec
->owner
, value
, sec
->contents
+ offset
);
2049 /* Finish up dynamic symbol handling. We set the contents of various
2050 dynamic sections here. */
2053 elf_m68k_finish_dynamic_symbol (output_bfd
, info
, h
, sym
)
2055 struct bfd_link_info
*info
;
2056 struct elf_link_hash_entry
*h
;
2057 Elf_Internal_Sym
*sym
;
2061 dynobj
= elf_hash_table (info
)->dynobj
;
2063 if (h
->plt
.offset
!= (bfd_vma
) -1)
2065 const struct elf_m68k_plt_info
*plt_info
;
2071 Elf_Internal_Rela rela
;
2074 /* This symbol has an entry in the procedure linkage table. Set
2077 BFD_ASSERT (h
->dynindx
!= -1);
2079 plt_info
= elf_m68k_hash_table (info
)->plt_info
;
2080 splt
= bfd_get_section_by_name (dynobj
, ".plt");
2081 sgot
= bfd_get_section_by_name (dynobj
, ".got.plt");
2082 srela
= bfd_get_section_by_name (dynobj
, ".rela.plt");
2083 BFD_ASSERT (splt
!= NULL
&& sgot
!= NULL
&& srela
!= NULL
);
2085 /* Get the index in the procedure linkage table which
2086 corresponds to this symbol. This is the index of this symbol
2087 in all the symbols for which we are making plt entries. The
2088 first entry in the procedure linkage table is reserved. */
2089 plt_index
= (h
->plt
.offset
/ plt_info
->size
) - 1;
2091 /* Get the offset into the .got table of the entry that
2092 corresponds to this function. Each .got entry is 4 bytes.
2093 The first three are reserved. */
2094 got_offset
= (plt_index
+ 3) * 4;
2096 memcpy (splt
->contents
+ h
->plt
.offset
,
2097 plt_info
->symbol_entry
,
2100 elf_m68k_install_pc32 (splt
, h
->plt
.offset
+ plt_info
->symbol_relocs
.got
,
2101 (sgot
->output_section
->vma
2102 + sgot
->output_offset
2105 bfd_put_32 (output_bfd
, plt_index
* sizeof (Elf32_External_Rela
),
2108 + plt_info
->symbol_resolve_entry
+ 2);
2110 elf_m68k_install_pc32 (splt
, h
->plt
.offset
+ plt_info
->symbol_relocs
.plt
,
2111 splt
->output_section
->vma
);
2113 /* Fill in the entry in the global offset table. */
2114 bfd_put_32 (output_bfd
,
2115 (splt
->output_section
->vma
2116 + splt
->output_offset
2118 + plt_info
->symbol_resolve_entry
),
2119 sgot
->contents
+ got_offset
);
2121 /* Fill in the entry in the .rela.plt section. */
2122 rela
.r_offset
= (sgot
->output_section
->vma
2123 + sgot
->output_offset
2125 rela
.r_info
= ELF32_R_INFO (h
->dynindx
, R_68K_JMP_SLOT
);
2127 loc
= srela
->contents
+ plt_index
* sizeof (Elf32_External_Rela
);
2128 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
2130 if (!h
->def_regular
)
2132 /* Mark the symbol as undefined, rather than as defined in
2133 the .plt section. Leave the value alone. */
2134 sym
->st_shndx
= SHN_UNDEF
;
2138 if (h
->got
.offset
!= (bfd_vma
) -1)
2142 Elf_Internal_Rela rela
;
2145 /* This symbol has an entry in the global offset table. Set it
2148 sgot
= bfd_get_section_by_name (dynobj
, ".got");
2149 srela
= bfd_get_section_by_name (dynobj
, ".rela.got");
2150 BFD_ASSERT (sgot
!= NULL
&& srela
!= NULL
);
2152 rela
.r_offset
= (sgot
->output_section
->vma
2153 + sgot
->output_offset
2154 + (h
->got
.offset
&~ (bfd_vma
) 1));
2156 /* If this is a -Bsymbolic link, and the symbol is defined
2157 locally, we just want to emit a RELATIVE reloc. Likewise if
2158 the symbol was forced to be local because of a version file.
2159 The entry in the global offset table will already have been
2160 initialized in the relocate_section function. */
2167 rela
.r_info
= ELF32_R_INFO (0, R_68K_RELATIVE
);
2168 rela
.r_addend
= bfd_get_signed_32 (output_bfd
,
2170 + (h
->got
.offset
&~ (bfd_vma
) 1)));
2174 bfd_put_32 (output_bfd
, (bfd_vma
) 0,
2175 sgot
->contents
+ (h
->got
.offset
&~ (bfd_vma
) 1));
2176 rela
.r_info
= ELF32_R_INFO (h
->dynindx
, R_68K_GLOB_DAT
);
2180 loc
= srela
->contents
;
2181 loc
+= srela
->reloc_count
++ * sizeof (Elf32_External_Rela
);
2182 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
2188 Elf_Internal_Rela rela
;
2191 /* This symbol needs a copy reloc. Set it up. */
2193 BFD_ASSERT (h
->dynindx
!= -1
2194 && (h
->root
.type
== bfd_link_hash_defined
2195 || h
->root
.type
== bfd_link_hash_defweak
));
2197 s
= bfd_get_section_by_name (h
->root
.u
.def
.section
->owner
,
2199 BFD_ASSERT (s
!= NULL
);
2201 rela
.r_offset
= (h
->root
.u
.def
.value
2202 + h
->root
.u
.def
.section
->output_section
->vma
2203 + h
->root
.u
.def
.section
->output_offset
);
2204 rela
.r_info
= ELF32_R_INFO (h
->dynindx
, R_68K_COPY
);
2206 loc
= s
->contents
+ s
->reloc_count
++ * sizeof (Elf32_External_Rela
);
2207 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
2210 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2211 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
2212 || h
== elf_hash_table (info
)->hgot
)
2213 sym
->st_shndx
= SHN_ABS
;
2218 /* Finish up the dynamic sections. */
2221 elf_m68k_finish_dynamic_sections (output_bfd
, info
)
2223 struct bfd_link_info
*info
;
2229 dynobj
= elf_hash_table (info
)->dynobj
;
2231 sgot
= bfd_get_section_by_name (dynobj
, ".got.plt");
2232 BFD_ASSERT (sgot
!= NULL
);
2233 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
2235 if (elf_hash_table (info
)->dynamic_sections_created
)
2238 Elf32_External_Dyn
*dyncon
, *dynconend
;
2240 splt
= bfd_get_section_by_name (dynobj
, ".plt");
2241 BFD_ASSERT (splt
!= NULL
&& sdyn
!= NULL
);
2243 dyncon
= (Elf32_External_Dyn
*) sdyn
->contents
;
2244 dynconend
= (Elf32_External_Dyn
*) (sdyn
->contents
+ sdyn
->size
);
2245 for (; dyncon
< dynconend
; dyncon
++)
2247 Elf_Internal_Dyn dyn
;
2251 bfd_elf32_swap_dyn_in (dynobj
, dyncon
, &dyn
);
2264 s
= bfd_get_section_by_name (output_bfd
, name
);
2265 BFD_ASSERT (s
!= NULL
);
2266 dyn
.d_un
.d_ptr
= s
->vma
;
2267 bfd_elf32_swap_dyn_out (output_bfd
, &dyn
, dyncon
);
2271 s
= bfd_get_section_by_name (output_bfd
, ".rela.plt");
2272 BFD_ASSERT (s
!= NULL
);
2273 dyn
.d_un
.d_val
= s
->size
;
2274 bfd_elf32_swap_dyn_out (output_bfd
, &dyn
, dyncon
);
2278 /* The procedure linkage table relocs (DT_JMPREL) should
2279 not be included in the overall relocs (DT_RELA).
2280 Therefore, we override the DT_RELASZ entry here to
2281 make it not include the JMPREL relocs. Since the
2282 linker script arranges for .rela.plt to follow all
2283 other relocation sections, we don't have to worry
2284 about changing the DT_RELA entry. */
2285 s
= bfd_get_section_by_name (output_bfd
, ".rela.plt");
2287 dyn
.d_un
.d_val
-= s
->size
;
2288 bfd_elf32_swap_dyn_out (output_bfd
, &dyn
, dyncon
);
2293 /* Fill in the first entry in the procedure linkage table. */
2296 const struct elf_m68k_plt_info
*plt_info
;
2298 plt_info
= elf_m68k_hash_table (info
)->plt_info
;
2299 memcpy (splt
->contents
, plt_info
->plt0_entry
, plt_info
->size
);
2301 elf_m68k_install_pc32 (splt
, plt_info
->plt0_relocs
.got4
,
2302 (sgot
->output_section
->vma
2303 + sgot
->output_offset
2306 elf_m68k_install_pc32 (splt
, plt_info
->plt0_relocs
.got8
,
2307 (sgot
->output_section
->vma
2308 + sgot
->output_offset
2311 elf_section_data (splt
->output_section
)->this_hdr
.sh_entsize
2316 /* Fill in the first three entries in the global offset table. */
2320 bfd_put_32 (output_bfd
, (bfd_vma
) 0, sgot
->contents
);
2322 bfd_put_32 (output_bfd
,
2323 sdyn
->output_section
->vma
+ sdyn
->output_offset
,
2325 bfd_put_32 (output_bfd
, (bfd_vma
) 0, sgot
->contents
+ 4);
2326 bfd_put_32 (output_bfd
, (bfd_vma
) 0, sgot
->contents
+ 8);
2329 elf_section_data (sgot
->output_section
)->this_hdr
.sh_entsize
= 4;
2334 /* Given a .data section and a .emreloc in-memory section, store
2335 relocation information into the .emreloc section which can be
2336 used at runtime to relocate the section. This is called by the
2337 linker when the --embedded-relocs switch is used. This is called
2338 after the add_symbols entry point has been called for all the
2339 objects, and before the final_link entry point is called. */
2342 bfd_m68k_elf32_create_embedded_relocs (abfd
, info
, datasec
, relsec
, errmsg
)
2344 struct bfd_link_info
*info
;
2349 Elf_Internal_Shdr
*symtab_hdr
;
2350 Elf_Internal_Sym
*isymbuf
= NULL
;
2351 Elf_Internal_Rela
*internal_relocs
= NULL
;
2352 Elf_Internal_Rela
*irel
, *irelend
;
2356 BFD_ASSERT (! info
->relocatable
);
2360 if (datasec
->reloc_count
== 0)
2363 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
2365 /* Get a copy of the native relocations. */
2366 internal_relocs
= (_bfd_elf_link_read_relocs
2367 (abfd
, datasec
, (PTR
) NULL
, (Elf_Internal_Rela
*) NULL
,
2368 info
->keep_memory
));
2369 if (internal_relocs
== NULL
)
2372 amt
= (bfd_size_type
) datasec
->reloc_count
* 12;
2373 relsec
->contents
= (bfd_byte
*) bfd_alloc (abfd
, amt
);
2374 if (relsec
->contents
== NULL
)
2377 p
= relsec
->contents
;
2379 irelend
= internal_relocs
+ datasec
->reloc_count
;
2380 for (irel
= internal_relocs
; irel
< irelend
; irel
++, p
+= 12)
2382 asection
*targetsec
;
2384 /* We are going to write a four byte longword into the runtime
2385 reloc section. The longword will be the address in the data
2386 section which must be relocated. It is followed by the name
2387 of the target section NUL-padded or truncated to 8
2390 /* We can only relocate absolute longword relocs at run time. */
2391 if (ELF32_R_TYPE (irel
->r_info
) != (int) R_68K_32
)
2393 *errmsg
= _("unsupported reloc type");
2394 bfd_set_error (bfd_error_bad_value
);
2398 /* Get the target section referred to by the reloc. */
2399 if (ELF32_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
2401 /* A local symbol. */
2402 Elf_Internal_Sym
*isym
;
2404 /* Read this BFD's local symbols if we haven't done so already. */
2405 if (isymbuf
== NULL
)
2407 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
2408 if (isymbuf
== NULL
)
2409 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
2410 symtab_hdr
->sh_info
, 0,
2412 if (isymbuf
== NULL
)
2416 isym
= isymbuf
+ ELF32_R_SYM (irel
->r_info
);
2417 targetsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
2422 struct elf_link_hash_entry
*h
;
2424 /* An external symbol. */
2425 indx
= ELF32_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
2426 h
= elf_sym_hashes (abfd
)[indx
];
2427 BFD_ASSERT (h
!= NULL
);
2428 if (h
->root
.type
== bfd_link_hash_defined
2429 || h
->root
.type
== bfd_link_hash_defweak
)
2430 targetsec
= h
->root
.u
.def
.section
;
2435 bfd_put_32 (abfd
, irel
->r_offset
+ datasec
->output_offset
, p
);
2436 memset (p
+ 4, 0, 8);
2437 if (targetsec
!= NULL
)
2438 strncpy ((char *) p
+ 4, targetsec
->output_section
->name
, 8);
2441 if (isymbuf
!= NULL
&& symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
2443 if (internal_relocs
!= NULL
2444 && elf_section_data (datasec
)->relocs
!= internal_relocs
)
2445 free (internal_relocs
);
2449 if (isymbuf
!= NULL
&& symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
2451 if (internal_relocs
!= NULL
2452 && elf_section_data (datasec
)->relocs
!= internal_relocs
)
2453 free (internal_relocs
);
2457 static enum elf_reloc_type_class
2458 elf32_m68k_reloc_type_class (rela
)
2459 const Elf_Internal_Rela
*rela
;
2461 switch ((int) ELF32_R_TYPE (rela
->r_info
))
2463 case R_68K_RELATIVE
:
2464 return reloc_class_relative
;
2465 case R_68K_JMP_SLOT
:
2466 return reloc_class_plt
;
2468 return reloc_class_copy
;
2470 return reloc_class_normal
;
2474 /* Return address for Ith PLT stub in section PLT, for relocation REL
2475 or (bfd_vma) -1 if it should not be included. */
2478 elf_m68k_plt_sym_val (bfd_vma i
, const asection
*plt
,
2479 const arelent
*rel ATTRIBUTE_UNUSED
)
2481 return plt
->vma
+ (i
+ 1) * elf_m68k_get_plt_info (plt
->owner
)->size
;
2484 #define TARGET_BIG_SYM bfd_elf32_m68k_vec
2485 #define TARGET_BIG_NAME "elf32-m68k"
2486 #define ELF_MACHINE_CODE EM_68K
2487 #define ELF_MAXPAGESIZE 0x2000
2488 #define elf_backend_create_dynamic_sections \
2489 _bfd_elf_create_dynamic_sections
2490 #define bfd_elf32_bfd_link_hash_table_create \
2491 elf_m68k_link_hash_table_create
2492 #define bfd_elf32_bfd_final_link bfd_elf_gc_common_final_link
2494 #define elf_backend_check_relocs elf_m68k_check_relocs
2495 #define elf_backend_always_size_sections \
2496 elf_m68k_always_size_sections
2497 #define elf_backend_adjust_dynamic_symbol \
2498 elf_m68k_adjust_dynamic_symbol
2499 #define elf_backend_size_dynamic_sections \
2500 elf_m68k_size_dynamic_sections
2501 #define elf_backend_init_index_section _bfd_elf_init_1_index_section
2502 #define elf_backend_relocate_section elf_m68k_relocate_section
2503 #define elf_backend_finish_dynamic_symbol \
2504 elf_m68k_finish_dynamic_symbol
2505 #define elf_backend_finish_dynamic_sections \
2506 elf_m68k_finish_dynamic_sections
2507 #define elf_backend_gc_mark_hook elf_m68k_gc_mark_hook
2508 #define elf_backend_gc_sweep_hook elf_m68k_gc_sweep_hook
2509 #define bfd_elf32_bfd_merge_private_bfd_data \
2510 elf32_m68k_merge_private_bfd_data
2511 #define bfd_elf32_bfd_set_private_flags \
2512 elf32_m68k_set_private_flags
2513 #define bfd_elf32_bfd_print_private_bfd_data \
2514 elf32_m68k_print_private_bfd_data
2515 #define elf_backend_reloc_type_class elf32_m68k_reloc_type_class
2516 #define elf_backend_plt_sym_val elf_m68k_plt_sym_val
2517 #define elf_backend_object_p elf32_m68k_object_p
2519 #define elf_backend_can_gc_sections 1
2520 #define elf_backend_can_refcount 1
2521 #define elf_backend_want_got_plt 1
2522 #define elf_backend_plt_readonly 1
2523 #define elf_backend_want_plt_sym 0
2524 #define elf_backend_got_header_size 12
2525 #define elf_backend_rela_normal 1
2527 #include "elf32-target.h"