1 /* Xstormy16-specific support for 32-bit ELF.
2 Copyright 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
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 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. */
26 #include "elf/xstormy16.h"
27 #include "libiberty.h"
29 /* Handle the R_XSTORMY16_24 reloc, which has an odd bit arrangement. */
31 static bfd_reloc_status_type
32 xstormy16_elf_24_reloc (bfd *abfd,
36 asection *input_section,
38 char **error_message ATTRIBUTE_UNUSED)
40 bfd_vma relocation, x;
42 if (output_bfd != NULL)
44 reloc_entry->address += input_section->output_offset;
48 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
49 return bfd_reloc_outofrange;
51 if (bfd_is_com_section (symbol->section))
54 relocation = symbol->value;
56 relocation += symbol->section->output_section->vma;
57 relocation += symbol->section->output_offset;
58 relocation += reloc_entry->addend;
60 x = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
62 x |= relocation & 0xff;
63 x |= (relocation << 8) & 0xffff0000;
64 bfd_put_32 (abfd, x, (bfd_byte *) data + reloc_entry->address);
66 if (relocation & ~ (bfd_vma) 0xffffff)
67 return bfd_reloc_overflow;
72 static reloc_howto_type xstormy16_elf_howto_table [] =
74 /* This reloc does nothing. */
75 HOWTO (R_XSTORMY16_NONE, /* type */
77 2, /* size (0 = byte, 1 = short, 2 = long) */
79 FALSE, /* pc_relative */
81 complain_overflow_bitfield, /* complain_on_overflow */
82 bfd_elf_generic_reloc, /* special_function */
83 "R_XSTORMY16_NONE", /* name */
84 FALSE, /* partial_inplace */
87 FALSE), /* pcrel_offset */
89 /* A 32 bit absolute relocation. */
90 HOWTO (R_XSTORMY16_32, /* type */
92 2, /* size (0 = byte, 1 = short, 2 = long) */
94 FALSE, /* pc_relative */
96 complain_overflow_dont, /* complain_on_overflow */
97 bfd_elf_generic_reloc, /* special_function */
98 "R_XSTORMY16_32", /* name */
99 FALSE, /* partial_inplace */
101 0xffffffff, /* dst_mask */
102 FALSE), /* pcrel_offset */
104 /* A 16 bit absolute relocation. */
105 HOWTO (R_XSTORMY16_16, /* type */
107 1, /* size (0 = byte, 1 = short, 2 = long) */
109 FALSE, /* pc_relative */
111 complain_overflow_bitfield, /* complain_on_overflow */
112 bfd_elf_generic_reloc, /* special_function */
113 "R_XSTORMY16_16", /* name */
114 FALSE, /* partial_inplace */
116 0xffff, /* dst_mask */
117 FALSE), /* pcrel_offset */
119 /* An 8 bit absolute relocation. */
120 HOWTO (R_XSTORMY16_8, /* type */
122 0, /* size (0 = byte, 1 = short, 2 = long) */
124 FALSE, /* pc_relative */
126 complain_overflow_unsigned, /* complain_on_overflow */
127 bfd_elf_generic_reloc, /* special_function */
128 "R_XSTORMY16_8", /* name */
129 FALSE, /* partial_inplace */
132 FALSE), /* pcrel_offset */
134 /* A 32 bit pc-relative relocation. */
135 HOWTO (R_XSTORMY16_PC32, /* type */
137 2, /* size (0 = byte, 1 = short, 2 = long) */
139 TRUE, /* pc_relative */
141 complain_overflow_dont, /* complain_on_overflow */
142 bfd_elf_generic_reloc, /* special_function */
143 "R_XSTORMY16_PC32", /* name */
144 FALSE, /* partial_inplace */
146 0xffffffff, /* dst_mask */
147 TRUE), /* pcrel_offset */
149 /* A 16 bit pc-relative relocation. */
150 HOWTO (R_XSTORMY16_PC16, /* type */
152 1, /* size (0 = byte, 1 = short, 2 = long) */
154 TRUE, /* pc_relative */
156 complain_overflow_signed, /* complain_on_overflow */
157 bfd_elf_generic_reloc, /* special_function */
158 "R_XSTORMY16_PC16", /* name */
159 FALSE, /* partial_inplace */
161 0xffffffff, /* dst_mask */
162 TRUE), /* pcrel_offset */
164 /* An 8 bit pc-relative relocation. */
165 HOWTO (R_XSTORMY16_PC8, /* type */
167 0, /* size (0 = byte, 1 = short, 2 = long) */
169 TRUE, /* pc_relative */
171 complain_overflow_signed, /* complain_on_overflow */
172 bfd_elf_generic_reloc, /* special_function */
173 "R_XSTORMY16_PC8", /* name */
174 FALSE, /* partial_inplace */
176 0xffffffff, /* dst_mask */
177 TRUE), /* pcrel_offset */
179 /* A 12-bit pc-relative relocation suitable for the branch instructions. */
180 HOWTO (R_XSTORMY16_REL_12, /* type */
182 1, /* size (0 = byte, 1 = short, 2 = long) */
184 TRUE, /* pc_relative */
186 complain_overflow_signed, /* complain_on_overflow */
187 bfd_elf_generic_reloc, /* special_function */
188 "R_XSTORMY16_REL_12", /* name */
189 FALSE, /* partial_inplace */
191 0x0ffe, /* dst_mask */
192 TRUE), /* pcrel_offset */
194 /* A 24-bit absolute relocation suitable for the jump instructions. */
195 HOWTO (R_XSTORMY16_24, /* type */
197 2, /* size (0 = byte, 1 = short, 2 = long) */
199 FALSE, /* pc_relative */
201 complain_overflow_unsigned, /* complain_on_overflow */
202 xstormy16_elf_24_reloc, /* special_function */
203 "R_XSTORMY16_24", /* name */
204 TRUE, /* partial_inplace */
206 0xffff00ff, /* dst_mask */
207 TRUE), /* pcrel_offset */
209 /* A 16 bit absolute relocation to a function pointer. */
210 HOWTO (R_XSTORMY16_FPTR16, /* type */
212 1, /* size (0 = byte, 1 = short, 2 = long) */
214 FALSE, /* pc_relative */
216 complain_overflow_bitfield, /* complain_on_overflow */
217 bfd_elf_generic_reloc, /* special_function */
218 "R_XSTORMY16_FPTR16", /* name */
219 FALSE, /* partial_inplace */
221 0xffffffff, /* dst_mask */
222 FALSE), /* pcrel_offset */
224 /* Low order 16 bit value of a high memory address. */
225 HOWTO (R_XSTORMY16_LO16, /* type */
227 1, /* size (0 = byte, 1 = short, 2 = long) */
229 FALSE, /* pc_relative */
231 complain_overflow_dont, /* complain_on_overflow */
232 bfd_elf_generic_reloc, /* special_function */
233 "R_XSTORMY16_LO16", /* name */
234 FALSE, /* partial_inplace */
236 0xffff, /* dst_mask */
237 FALSE), /* pcrel_offset */
239 /* High order 16 bit value of a high memory address. */
240 HOWTO (R_XSTORMY16_HI16, /* type */
242 1, /* size (0 = byte, 1 = short, 2 = long) */
244 FALSE, /* pc_relative */
246 complain_overflow_dont, /* complain_on_overflow */
247 bfd_elf_generic_reloc, /* special_function */
248 "R_XSTORMY16_HI16", /* name */
249 FALSE, /* partial_inplace */
251 0xffff, /* dst_mask */
252 FALSE), /* pcrel_offset */
254 /* A 12 bit absolute relocation. */
255 HOWTO (R_XSTORMY16_12, /* type */
257 1, /* size (0 = byte, 1 = short, 2 = long) */
259 FALSE, /* pc_relative */
261 complain_overflow_signed, /* complain_on_overflow */
262 bfd_elf_generic_reloc, /* special_function */
263 "R_XSTORMY16_12", /* name */
264 FALSE, /* partial_inplace */
265 0x0000, /* src_mask */
266 0x0fff, /* dst_mask */
267 FALSE), /* pcrel_offset */
270 static reloc_howto_type xstormy16_elf_howto_table2 [] =
272 /* GNU extension to record C++ vtable hierarchy */
273 HOWTO (R_XSTORMY16_GNU_VTINHERIT, /* type */
275 2, /* size (0 = byte, 1 = short, 2 = long) */
277 FALSE, /* pc_relative */
279 complain_overflow_dont, /* complain_on_overflow */
280 NULL, /* special_function */
281 "R_XSTORMY16_GNU_VTINHERIT", /* name */
282 FALSE, /* partial_inplace */
285 FALSE), /* pcrel_offset */
287 /* GNU extension to record C++ vtable member usage */
288 HOWTO (R_XSTORMY16_GNU_VTENTRY, /* type */
290 2, /* size (0 = byte, 1 = short, 2 = long) */
292 FALSE, /* pc_relative */
294 complain_overflow_dont, /* complain_on_overflow */
295 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
296 "R_XSTORMY16_GNU_VTENTRY", /* name */
297 FALSE, /* partial_inplace */
300 FALSE), /* pcrel_offset */
304 /* Map BFD reloc types to XSTORMY16 ELF reloc types. */
306 typedef struct xstormy16_reloc_map
308 bfd_reloc_code_real_type bfd_reloc_val;
309 unsigned int xstormy16_reloc_val;
310 reloc_howto_type * table;
313 static const reloc_map xstormy16_reloc_map [] =
315 { BFD_RELOC_NONE, R_XSTORMY16_NONE, xstormy16_elf_howto_table },
316 { BFD_RELOC_32, R_XSTORMY16_32, xstormy16_elf_howto_table },
317 { BFD_RELOC_16, R_XSTORMY16_16, xstormy16_elf_howto_table },
318 { BFD_RELOC_8, R_XSTORMY16_8, xstormy16_elf_howto_table },
319 { BFD_RELOC_32_PCREL, R_XSTORMY16_PC32, xstormy16_elf_howto_table },
320 { BFD_RELOC_16_PCREL, R_XSTORMY16_PC16, xstormy16_elf_howto_table },
321 { BFD_RELOC_8_PCREL, R_XSTORMY16_PC8, xstormy16_elf_howto_table },
322 { BFD_RELOC_XSTORMY16_REL_12, R_XSTORMY16_REL_12, xstormy16_elf_howto_table },
323 { BFD_RELOC_XSTORMY16_24, R_XSTORMY16_24, xstormy16_elf_howto_table },
324 { BFD_RELOC_XSTORMY16_FPTR16, R_XSTORMY16_FPTR16, xstormy16_elf_howto_table },
325 { BFD_RELOC_LO16, R_XSTORMY16_LO16, xstormy16_elf_howto_table },
326 { BFD_RELOC_HI16, R_XSTORMY16_HI16, xstormy16_elf_howto_table },
327 { BFD_RELOC_XSTORMY16_12, R_XSTORMY16_12, xstormy16_elf_howto_table },
328 { BFD_RELOC_VTABLE_INHERIT, R_XSTORMY16_GNU_VTINHERIT, xstormy16_elf_howto_table2 },
329 { BFD_RELOC_VTABLE_ENTRY, R_XSTORMY16_GNU_VTENTRY, xstormy16_elf_howto_table2 },
332 static reloc_howto_type *
333 xstormy16_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
334 bfd_reloc_code_real_type code)
338 for (i = ARRAY_SIZE (xstormy16_reloc_map); --i;)
340 const reloc_map * entry;
342 entry = xstormy16_reloc_map + i;
344 if (entry->bfd_reloc_val == code)
345 return entry->table + (entry->xstormy16_reloc_val
346 - entry->table[0].type);
352 static reloc_howto_type *
353 xstormy16_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
359 i < (sizeof (xstormy16_elf_howto_table)
360 / sizeof (xstormy16_elf_howto_table[0]));
362 if (xstormy16_elf_howto_table[i].name != NULL
363 && strcasecmp (xstormy16_elf_howto_table[i].name, r_name) == 0)
364 return &xstormy16_elf_howto_table[i];
367 i < (sizeof (xstormy16_elf_howto_table2)
368 / sizeof (xstormy16_elf_howto_table2[0]));
370 if (xstormy16_elf_howto_table2[i].name != NULL
371 && strcasecmp (xstormy16_elf_howto_table2[i].name, r_name) == 0)
372 return &xstormy16_elf_howto_table2[i];
377 /* Set the howto pointer for an XSTORMY16 ELF reloc. */
380 xstormy16_info_to_howto_rela (bfd * abfd ATTRIBUTE_UNUSED,
382 Elf_Internal_Rela * dst)
384 unsigned int r_type = ELF32_R_TYPE (dst->r_info);
386 if (r_type <= (unsigned int) R_XSTORMY16_12)
387 cache_ptr->howto = &xstormy16_elf_howto_table [r_type];
388 else if (r_type - R_XSTORMY16_GNU_VTINHERIT
389 <= (unsigned int) R_XSTORMY16_GNU_VTENTRY)
391 = &xstormy16_elf_howto_table2 [r_type - R_XSTORMY16_GNU_VTINHERIT];
396 /* We support 16-bit pointers to code above 64k by generating a thunk
397 below 64k containing a JMPF instruction to the final address. We
398 cannot, unfortunately, minimize the number of thunks unless the
399 -relax switch is given, as otherwise we have no idea where the
400 sections will fall in the address space. */
403 xstormy16_elf_check_relocs (bfd *abfd,
404 struct bfd_link_info *info,
406 const Elf_Internal_Rela *relocs)
408 const Elf_Internal_Rela *rel, *relend;
409 struct elf_link_hash_entry **sym_hashes;
410 Elf_Internal_Shdr *symtab_hdr;
411 bfd_vma *local_plt_offsets;
415 if (info->relocatable)
418 symtab_hdr = &elf_tdata(abfd)->symtab_hdr;
419 sym_hashes = elf_sym_hashes (abfd);
420 local_plt_offsets = elf_local_got_offsets (abfd);
422 dynobj = elf_hash_table(info)->dynobj;
424 relend = relocs + sec->reloc_count;
425 for (rel = relocs; rel < relend; ++rel)
427 unsigned long r_symndx;
428 struct elf_link_hash_entry *h;
431 r_symndx = ELF32_R_SYM (rel->r_info);
432 if (r_symndx < symtab_hdr->sh_info)
436 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
437 while (h->root.type == bfd_link_hash_indirect
438 || h->root.type == bfd_link_hash_warning)
439 h = (struct elf_link_hash_entry *) h->root.u.i.link;
442 switch (ELF32_R_TYPE (rel->r_info))
444 /* This relocation describes a 16-bit pointer to a function.
445 We may need to allocate a thunk in low memory; reserve memory
447 case R_XSTORMY16_FPTR16:
448 if (rel->r_addend != 0)
450 (*info->callbacks->warning)
451 (info, _("non-zero addend in @fptr reloc"), 0,
456 elf_hash_table (info)->dynobj = dynobj = abfd;
459 splt = bfd_get_section_by_name (dynobj, ".plt");
462 splt = bfd_make_section_with_flags (dynobj, ".plt",
472 || ! bfd_set_section_alignment (dynobj, splt, 1))
478 offset = &h->plt.offset;
481 if (local_plt_offsets == NULL)
486 size = symtab_hdr->sh_info * sizeof (bfd_vma);
487 local_plt_offsets = bfd_alloc (abfd, size);
488 if (local_plt_offsets == NULL)
490 elf_local_got_offsets (abfd) = local_plt_offsets;
492 for (i = 0; i < symtab_hdr->sh_info; i++)
493 local_plt_offsets[i] = (bfd_vma) -1;
495 offset = &local_plt_offsets[r_symndx];
498 if (*offset == (bfd_vma) -1)
500 *offset = splt->size;
505 /* This relocation describes the C++ object vtable hierarchy.
506 Reconstruct it for later use during GC. */
507 case R_XSTORMY16_GNU_VTINHERIT:
508 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
512 /* This relocation describes which C++ vtable entries are actually
513 used. Record for later use during GC. */
514 case R_XSTORMY16_GNU_VTENTRY:
515 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
524 /* A subroutine of xstormy16_elf_relax_section. If the global symbol H
525 is within the low 64k, remove any entry for it in the plt. */
527 struct relax_plt_data
534 xstormy16_relax_plt_check (struct elf_link_hash_entry *h, void * xdata)
536 struct relax_plt_data *data = (struct relax_plt_data *) xdata;
538 if (h->root.type == bfd_link_hash_warning)
539 h = (struct elf_link_hash_entry *) h->root.u.i.link;
541 if (h->plt.offset != (bfd_vma) -1)
545 if (h->root.type == bfd_link_hash_undefined
546 || h->root.type == bfd_link_hash_undefweak)
549 address = (h->root.u.def.section->output_section->vma
550 + h->root.u.def.section->output_offset
551 + h->root.u.def.value);
553 if (address <= 0xffff)
556 data->splt->size -= 4;
564 /* A subroutine of xstormy16_elf_relax_section. If the global symbol H
565 previously had a plt entry, give it a new entry offset. */
568 xstormy16_relax_plt_realloc (struct elf_link_hash_entry *h, void * xdata)
570 bfd_vma *entry = (bfd_vma *) xdata;
572 if (h->root.type == bfd_link_hash_warning)
573 h = (struct elf_link_hash_entry *) h->root.u.i.link;
575 if (h->plt.offset != (bfd_vma) -1)
577 h->plt.offset = *entry;
585 xstormy16_elf_relax_section (bfd *dynobj,
587 struct bfd_link_info *info,
590 struct relax_plt_data relax_plt_data;
593 /* Assume nothing changes. */
596 if (info->relocatable)
599 /* We only relax the .plt section at the moment. */
600 if (dynobj != elf_hash_table (info)->dynobj
601 || strcmp (splt->name, ".plt") != 0)
604 /* Quick check for an empty plt. */
608 /* Map across all global symbols; see which ones happen to
609 fall in the low 64k. */
610 relax_plt_data.splt = splt;
611 relax_plt_data.again = again;
612 elf_link_hash_traverse (elf_hash_table (info), xstormy16_relax_plt_check,
615 /* Likewise for local symbols, though that's somewhat less convenient
616 as we have to walk the list of input bfds and swap in symbol data. */
617 for (ibfd = info->input_bfds; ibfd ; ibfd = ibfd->link_next)
619 bfd_vma *local_plt_offsets = elf_local_got_offsets (ibfd);
620 Elf_Internal_Shdr *symtab_hdr;
621 Elf_Internal_Sym *isymbuf = NULL;
624 if (! local_plt_offsets)
627 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
628 if (symtab_hdr->sh_info != 0)
630 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
632 isymbuf = bfd_elf_get_elf_syms (ibfd, symtab_hdr,
633 symtab_hdr->sh_info, 0,
639 for (idx = 0; idx < symtab_hdr->sh_info; ++idx)
641 Elf_Internal_Sym *isym;
645 if (local_plt_offsets[idx] == (bfd_vma) -1)
648 isym = &isymbuf[idx];
649 if (isym->st_shndx == SHN_UNDEF)
651 else if (isym->st_shndx == SHN_ABS)
652 tsec = bfd_abs_section_ptr;
653 else if (isym->st_shndx == SHN_COMMON)
654 tsec = bfd_com_section_ptr;
656 tsec = bfd_section_from_elf_index (ibfd, isym->st_shndx);
658 address = (tsec->output_section->vma
659 + tsec->output_offset
661 if (address <= 0xffff)
663 local_plt_offsets[idx] = -1;
670 && symtab_hdr->contents != (unsigned char *) isymbuf)
672 if (! info->keep_memory)
676 /* Cache the symbols for elf_link_input_bfd. */
677 symtab_hdr->contents = (unsigned char *) isymbuf;
682 /* If we changed anything, walk the symbols again to reallocate
683 .plt entry addresses. */
684 if (*again && splt->size > 0)
688 elf_link_hash_traverse (elf_hash_table (info),
689 xstormy16_relax_plt_realloc, &entry);
691 for (ibfd = info->input_bfds; ibfd ; ibfd = ibfd->link_next)
693 bfd_vma *local_plt_offsets = elf_local_got_offsets (ibfd);
694 unsigned int nlocals = elf_tdata (ibfd)->symtab_hdr.sh_info;
697 if (! local_plt_offsets)
700 for (idx = 0; idx < nlocals; ++idx)
701 if (local_plt_offsets[idx] != (bfd_vma) -1)
703 local_plt_offsets[idx] = entry;
713 xstormy16_elf_always_size_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
714 struct bfd_link_info *info)
719 if (info->relocatable)
722 dynobj = elf_hash_table (info)->dynobj;
726 splt = bfd_get_section_by_name (dynobj, ".plt");
727 BFD_ASSERT (splt != NULL);
729 splt->contents = bfd_zalloc (dynobj, splt->size);
730 if (splt->contents == NULL)
736 /* Relocate an XSTORMY16 ELF section.
738 The RELOCATE_SECTION function is called by the new ELF backend linker
739 to handle the relocations for a section.
741 The relocs are always passed as Rela structures; if the section
742 actually uses Rel structures, the r_addend field will always be
745 This function is responsible for adjusting the section contents as
746 necessary, and (if using Rela relocs and generating a relocatable
747 output file) adjusting the reloc addend as necessary.
749 This function does not have to worry about setting the reloc
750 address or the reloc symbol index.
752 LOCAL_SYMS is a pointer to the swapped in local symbols.
754 LOCAL_SECTIONS is an array giving the section in the input file
755 corresponding to the st_shndx field of each local symbol.
757 The global hash table entry for the global symbols can be found
758 via elf_sym_hashes (input_bfd).
760 When generating relocatable output, this function must handle
761 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
762 going to be the section symbol corresponding to the output
763 section, which means that the addend must be adjusted
767 xstormy16_elf_relocate_section (bfd * output_bfd ATTRIBUTE_UNUSED,
768 struct bfd_link_info * info,
770 asection * input_section,
772 Elf_Internal_Rela * relocs,
773 Elf_Internal_Sym * local_syms,
774 asection ** local_sections)
776 Elf_Internal_Shdr * symtab_hdr;
777 struct elf_link_hash_entry ** sym_hashes;
778 Elf_Internal_Rela * rel;
779 Elf_Internal_Rela * relend;
783 symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
784 sym_hashes = elf_sym_hashes (input_bfd);
785 relend = relocs + input_section->reloc_count;
787 dynobj = elf_hash_table (info)->dynobj;
790 splt = bfd_get_section_by_name (dynobj, ".plt");
792 for (rel = relocs; rel < relend; rel ++)
794 reloc_howto_type * howto;
795 unsigned long r_symndx;
796 Elf_Internal_Sym * sym;
798 struct elf_link_hash_entry * h;
800 bfd_reloc_status_type r;
801 const char * name = NULL;
804 r_type = ELF32_R_TYPE (rel->r_info);
806 if ( r_type == R_XSTORMY16_GNU_VTINHERIT
807 || r_type == R_XSTORMY16_GNU_VTENTRY)
810 r_symndx = ELF32_R_SYM (rel->r_info);
811 howto = xstormy16_elf_howto_table + ELF32_R_TYPE (rel->r_info);
816 if (r_symndx < symtab_hdr->sh_info)
818 sym = local_syms + r_symndx;
819 sec = local_sections [r_symndx];
820 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
824 bfd_boolean unresolved_reloc, warned;
826 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
827 r_symndx, symtab_hdr, sym_hashes,
829 unresolved_reloc, warned);
832 if (sec != NULL && elf_discarded_section (sec))
834 /* For relocs against symbols from removed linkonce sections,
835 or sections discarded by a linker script, we just want the
836 section contents zeroed. Avoid any special processing. */
837 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
843 if (info->relocatable)
847 name = h->root.root.string;
850 name = (bfd_elf_string_from_elf_section
851 (input_bfd, symtab_hdr->sh_link, sym->st_name));
852 if (name == NULL || *name == '\0')
853 name = bfd_section_name (input_bfd, sec);
856 switch (ELF32_R_TYPE (rel->r_info))
860 bfd_vma reloc = relocation + rel->r_addend;
863 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
866 x |= (reloc << 8) & 0xffff0000;
867 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
869 if (reloc & ~0xffffff)
870 r = bfd_reloc_overflow;
876 case R_XSTORMY16_FPTR16:
881 plt_offset = &h->plt.offset;
883 plt_offset = elf_local_got_offsets (input_bfd) + r_symndx;
885 if (relocation <= 0xffff)
887 /* If the symbol is in range for a 16-bit address, we should
888 have deallocated the plt entry in relax_section. */
889 BFD_ASSERT (*plt_offset == (bfd_vma) -1);
893 /* If the symbol is out of range for a 16-bit address,
894 we must have allocated a plt entry. */
895 BFD_ASSERT (*plt_offset != (bfd_vma) -1);
897 /* If this is the first time we've processed this symbol,
898 fill in the plt entry with the correct symbol address. */
899 if ((*plt_offset & 1) == 0)
903 x = 0x00000200; /* jmpf */
904 x |= relocation & 0xff;
905 x |= (relocation << 8) & 0xffff0000;
906 bfd_put_32 (input_bfd, x, splt->contents + *plt_offset);
910 relocation = (splt->output_section->vma
911 + splt->output_offset
912 + (*plt_offset & -2));
914 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
915 contents, rel->r_offset,
921 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
922 contents, rel->r_offset,
923 relocation, rel->r_addend);
927 if (r != bfd_reloc_ok)
929 const char * msg = NULL;
933 case bfd_reloc_overflow:
934 r = info->callbacks->reloc_overflow
935 (info, (h ? &h->root : NULL), name, howto->name,
936 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
939 case bfd_reloc_undefined:
940 r = info->callbacks->undefined_symbol
941 (info, name, input_bfd, input_section, rel->r_offset,
945 case bfd_reloc_outofrange:
946 msg = _("internal error: out of range error");
949 case bfd_reloc_notsupported:
950 msg = _("internal error: unsupported relocation error");
953 case bfd_reloc_dangerous:
954 msg = _("internal error: dangerous relocation");
958 msg = _("internal error: unknown error");
963 r = info->callbacks->warning
964 (info, msg, name, input_bfd, input_section, rel->r_offset);
974 /* This must exist if dynobj is ever set. */
977 xstormy16_elf_finish_dynamic_sections (bfd *abfd ATTRIBUTE_UNUSED,
978 struct bfd_link_info *info)
983 /* As an extra sanity check, verify that all plt entries have
986 if ((dynobj = elf_hash_table (info)->dynobj) != NULL
987 && (splt = bfd_get_section_by_name (dynobj, ".plt")) != NULL)
989 bfd_byte *contents = splt->contents;
990 unsigned int i, size = splt->size;
992 for (i = 0; i < size; i += 4)
994 unsigned int x = bfd_get_32 (dynobj, contents + i);
1003 /* Return the section that should be marked against GC for a given
1007 xstormy16_elf_gc_mark_hook (asection *sec,
1008 struct bfd_link_info *info,
1009 Elf_Internal_Rela *rel,
1010 struct elf_link_hash_entry *h,
1011 Elf_Internal_Sym *sym)
1014 switch (ELF32_R_TYPE (rel->r_info))
1016 case R_XSTORMY16_GNU_VTINHERIT:
1017 case R_XSTORMY16_GNU_VTENTRY:
1021 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1024 #define ELF_ARCH bfd_arch_xstormy16
1025 #define ELF_MACHINE_CODE EM_XSTORMY16
1026 #define ELF_MAXPAGESIZE 0x100
1028 #define TARGET_LITTLE_SYM bfd_elf32_xstormy16_vec
1029 #define TARGET_LITTLE_NAME "elf32-xstormy16"
1031 #define elf_info_to_howto_rel NULL
1032 #define elf_info_to_howto xstormy16_info_to_howto_rela
1033 #define elf_backend_relocate_section xstormy16_elf_relocate_section
1034 #define elf_backend_gc_mark_hook xstormy16_elf_gc_mark_hook
1035 #define elf_backend_check_relocs xstormy16_elf_check_relocs
1036 #define elf_backend_always_size_sections \
1037 xstormy16_elf_always_size_sections
1038 #define elf_backend_omit_section_dynsym \
1039 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
1040 #define elf_backend_finish_dynamic_sections \
1041 xstormy16_elf_finish_dynamic_sections
1043 #define elf_backend_can_gc_sections 1
1044 #define elf_backend_rela_normal 1
1046 #define bfd_elf32_bfd_reloc_type_lookup xstormy16_reloc_type_lookup
1047 #define bfd_elf32_bfd_reloc_name_lookup \
1048 xstormy16_reloc_name_lookup
1049 #define bfd_elf32_bfd_relax_section xstormy16_elf_relax_section
1051 #include "elf32-target.h"