1 /* ARC-specific support for 32-bit ELF
2 Copyright (C) 1994-2017 Free Software Foundation, Inc.
3 Contributed by Cupertino Miranda (cmiranda@synopsys.com).
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. */
27 #include "libiberty.h"
28 #include "opcode/arc-func.h"
29 #include "opcode/arc.h"
32 #define FEATURE_LIST_NAME bfd_feature_list
33 #define CONFLICT_LIST bfd_conflict_list
34 #include "opcode/arc-attrs.h"
36 /* #define ARC_ENABLE_DEBUG 1 */
37 #ifdef ARC_ENABLE_DEBUG
39 name_for_global_symbol (struct elf_link_hash_entry *h)
41 static char *local_str = "(local)";
44 return h->root.root.string;
46 #define ARC_DEBUG(fmt, args...) fprintf (stderr, fmt, ##args)
48 #define ARC_DEBUG(...)
52 #define ADD_RELA(BFD, SECTION, OFFSET, SYM_IDX, TYPE, ADDEND) \
54 struct elf_link_hash_table *_htab = elf_hash_table (info); \
55 Elf_Internal_Rela _rel; \
58 if (_htab->dynamic_sections_created == TRUE) \
60 BFD_ASSERT (_htab->srel##SECTION &&_htab->srel##SECTION->contents); \
61 _loc = _htab->srel##SECTION->contents \
62 + ((_htab->srel##SECTION->reloc_count) \
63 * sizeof (Elf32_External_Rela)); \
64 _htab->srel##SECTION->reloc_count++; \
65 _rel.r_addend = ADDEND; \
66 _rel.r_offset = (_htab->s##SECTION)->output_section->vma \
67 + (_htab->s##SECTION)->output_offset + OFFSET; \
68 BFD_ASSERT ((long) SYM_IDX != -1); \
69 _rel.r_info = ELF32_R_INFO (SYM_IDX, TYPE); \
70 bfd_elf32_swap_reloca_out (BFD, &_rel, _loc); \
75 /* The default symbols representing the init and fini dyn values.
76 TODO: Check what is the relation of those strings with arclinux.em
78 #define INIT_SYM_STRING "_init"
79 #define FINI_SYM_STRING "_fini"
81 char * init_str = INIT_SYM_STRING;
82 char * fini_str = FINI_SYM_STRING;
84 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
89 static ATTRIBUTE_UNUSED const char *
90 reloc_type_to_name (unsigned int type)
94 #include "elf/arc-reloc.def"
101 #undef ARC_RELOC_HOWTO
103 /* Try to minimize the amount of space occupied by relocation tables
104 on the ROM (not that the ROM won't be swamped by other ELF overhead). */
108 static ATTRIBUTE_UNUSED bfd_boolean
109 is_reloc_PC_relative (reloc_howto_type *howto)
111 return (strstr (howto->name, "PC") != NULL) ? TRUE : FALSE;
115 is_reloc_SDA_relative (reloc_howto_type *howto)
117 return (strstr (howto->name, "SDA") != NULL) ? TRUE : FALSE;
121 is_reloc_for_GOT (reloc_howto_type * howto)
123 if (strstr (howto->name, "TLS") != NULL)
125 return (strstr (howto->name, "GOT") != NULL) ? TRUE : FALSE;
129 is_reloc_for_PLT (reloc_howto_type * howto)
131 return (strstr (howto->name, "PLT") != NULL) ? TRUE : FALSE;
135 is_reloc_for_TLS (reloc_howto_type *howto)
137 return (strstr (howto->name, "TLS") != NULL) ? TRUE : FALSE;
140 struct arc_relocation_data
142 bfd_signed_vma reloc_offset;
143 bfd_signed_vma reloc_addend;
144 bfd_signed_vma got_offset_value;
146 bfd_signed_vma sym_value;
147 asection * sym_section;
149 reloc_howto_type *howto;
151 asection * input_section;
153 bfd_signed_vma sdata_begin_symbol_vma;
154 bfd_boolean sdata_begin_symbol_vma_set;
155 bfd_signed_vma got_symbol_vma;
157 bfd_boolean should_relocate;
159 const char * symbol_name;
162 /* Should be included at this location due to static declarations
163 * defined before this point. */
166 #define arc_bfd_get_8(A,B,C) bfd_get_8(A,B)
167 #define arc_bfd_get_16(A,B,C) bfd_get_16(A,B)
168 #define arc_bfd_get_32(A,B,C) bfd_get_32(A,B)
169 #define arc_bfd_put_8(A,B,C,D) bfd_put_8(A,B,C)
170 #define arc_bfd_put_16(A,B,C,D) bfd_put_16(A,B,C)
171 #define arc_bfd_put_32(A,B,C,D) bfd_put_32(A,B,C)
174 static bfd_reloc_status_type
175 arc_elf_reloc (bfd *abfd ATTRIBUTE_UNUSED,
176 arelent *reloc_entry,
178 void *data ATTRIBUTE_UNUSED,
179 asection *input_section,
181 char ** error_message ATTRIBUTE_UNUSED)
183 if (output_bfd != NULL)
185 reloc_entry->address += input_section->output_offset;
187 /* In case of relocateable link and if the reloc is against a
188 section symbol, the addend needs to be adjusted according to
189 where the section symbol winds up in the output section. */
190 if ((symbol_in->flags & BSF_SECTION_SYM) && symbol_in->section)
191 reloc_entry->addend += symbol_in->section->output_offset;
196 return bfd_reloc_continue;
200 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
204 #include "elf/arc-reloc.def"
207 #undef ARC_RELOC_HOWTO
209 #define ARC_RELOC_HOWTO(TYPE, VALUE, RSIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
210 [TYPE] = HOWTO (R_##TYPE, 0, RSIZE, BITSIZE, FALSE, 0, \
211 complain_overflow_##OVERFLOW, arc_elf_reloc, \
212 "R_" #TYPE, FALSE, 0, 0, FALSE),
214 static struct reloc_howto_struct elf_arc_howto_table[] =
216 #include "elf/arc-reloc.def"
217 /* Example of what is generated by the preprocessor. Currently kept as an
219 HOWTO (R_ARC_NONE, // Type.
221 2, // Size (0 = byte, 1 = short, 2 = long).
223 FALSE, // PC_relative.
225 complain_overflow_bitfield, // Complain_on_overflow.
226 bfd_elf_generic_reloc, // Special_function.
227 "R_ARC_NONE", // Name.
228 TRUE, // Partial_inplace.
231 FALSE), // PCrel_offset.
234 #undef ARC_RELOC_HOWTO
236 static void arc_elf_howto_init (void)
238 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
239 elf_arc_howto_table[TYPE].pc_relative = \
240 (strstr (#FORMULA, " P ") != NULL || strstr (#FORMULA, " PDATA ") != NULL); \
241 elf_arc_howto_table[TYPE].dst_mask = RELOC_FUNCTION(0, ~0); \
242 /* Only 32 bit data relocations should be marked as ME. */ \
243 if (strstr (#FORMULA, " ME ") != NULL) \
245 BFD_ASSERT (SIZE == 2); \
248 #include "elf/arc-reloc.def"
251 #undef ARC_RELOC_HOWTO
254 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
256 const int howto_table_lookup[] =
258 #include "elf/arc-reloc.def"
260 #undef ARC_RELOC_HOWTO
262 static reloc_howto_type *
263 arc_elf_howto (unsigned int r_type)
265 if (elf_arc_howto_table[R_ARC_32].dst_mask == 0)
266 arc_elf_howto_init ();
267 return &elf_arc_howto_table[r_type];
270 /* Map BFD reloc types to ARC ELF reloc types. */
274 bfd_reloc_code_real_type bfd_reloc_val;
275 unsigned char elf_reloc_val;
278 /* ARC ELF linker hash entry. */
279 struct elf_arc_link_hash_entry
281 struct elf_link_hash_entry root;
283 /* Track dynamic relocs copied for this symbol. */
284 struct elf_dyn_relocs *dyn_relocs;
287 /* ARC ELF linker hash table. */
288 struct elf_arc_link_hash_table
290 struct elf_link_hash_table elf;
293 static struct bfd_hash_entry *
294 elf_arc_link_hash_newfunc (struct bfd_hash_entry *entry,
295 struct bfd_hash_table *table,
298 /* Allocate the structure if it has not already been allocated by a
302 entry = (struct bfd_hash_entry *)
303 bfd_hash_allocate (table,
304 sizeof (struct elf_arc_link_hash_entry));
309 /* Call the allocation method of the superclass. */
310 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
313 struct elf_arc_link_hash_entry *eh;
315 eh = (struct elf_arc_link_hash_entry *) entry;
316 eh->dyn_relocs = NULL;
322 /* Destroy an ARC ELF linker hash table. */
324 elf_arc_link_hash_table_free (bfd *obfd)
326 _bfd_elf_link_hash_table_free (obfd);
329 /* Create an ARC ELF linker hash table. */
331 static struct bfd_link_hash_table *
332 arc_elf_link_hash_table_create (bfd *abfd)
334 struct elf_arc_link_hash_table *ret;
336 ret = (struct elf_arc_link_hash_table *) bfd_zmalloc (sizeof (*ret));
340 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
341 elf_arc_link_hash_newfunc,
342 sizeof (struct elf_arc_link_hash_entry),
349 ret->elf.init_got_refcount.refcount = 0;
350 ret->elf.init_got_refcount.glist = NULL;
351 ret->elf.init_got_offset.offset = 0;
352 ret->elf.init_got_offset.glist = NULL;
354 ret->elf.root.hash_table_free = elf_arc_link_hash_table_free;
356 return &ret->elf.root;
359 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
360 { BFD_RELOC_##TYPE, R_##TYPE },
361 static const struct arc_reloc_map arc_reloc_map[] =
363 #include "elf/arc-reloc.def"
365 {BFD_RELOC_NONE, R_ARC_NONE},
366 {BFD_RELOC_8, R_ARC_8},
367 {BFD_RELOC_16, R_ARC_16},
368 {BFD_RELOC_24, R_ARC_24},
369 {BFD_RELOC_32, R_ARC_32},
371 #undef ARC_RELOC_HOWTO
373 typedef ATTRIBUTE_UNUSED bfd_vma (*replace_func) (unsigned, int ATTRIBUTE_UNUSED);
375 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
377 func = (void *) RELOC_FUNCTION; \
380 get_replace_function (bfd *abfd, unsigned int r_type)
386 #include "elf/arc-reloc.def"
389 if (func == replace_bits24 && bfd_big_endian (abfd))
390 return (replace_func) replace_bits24_be;
392 return (replace_func) func;
394 #undef ARC_RELOC_HOWTO
396 static reloc_howto_type *
397 arc_elf32_bfd_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
398 bfd_reloc_code_real_type code)
402 for (i = ARRAY_SIZE (arc_reloc_map); i--;)
404 if (arc_reloc_map[i].bfd_reloc_val == code)
405 return arc_elf_howto (arc_reloc_map[i].elf_reloc_val);
411 /* Function to set the ELF flag bits. */
413 arc_elf_set_private_flags (bfd *abfd, flagword flags)
415 elf_elfheader (abfd)->e_flags = flags;
416 elf_flags_init (abfd) = TRUE;
420 /* Print private flags. */
422 arc_elf_print_private_bfd_data (bfd *abfd, void * ptr)
424 FILE *file = (FILE *) ptr;
427 BFD_ASSERT (abfd != NULL && ptr != NULL);
429 /* Print normal ELF private data. */
430 _bfd_elf_print_private_bfd_data (abfd, ptr);
432 flags = elf_elfheader (abfd)->e_flags;
433 fprintf (file, _("private flags = 0x%lx:"), (unsigned long) flags);
435 switch (flags & EF_ARC_MACH_MSK)
437 case EF_ARC_CPU_ARCV2HS : fprintf (file, " -mcpu=ARCv2HS"); break;
438 case EF_ARC_CPU_ARCV2EM : fprintf (file, " -mcpu=ARCv2EM"); break;
439 case E_ARC_MACH_ARC600 : fprintf (file, " -mcpu=ARC600"); break;
440 case E_ARC_MACH_ARC601 : fprintf (file, " -mcpu=ARC601"); break;
441 case E_ARC_MACH_ARC700 : fprintf (file, " -mcpu=ARC700"); break;
443 fprintf (file, "-mcpu=unknown");
447 switch (flags & EF_ARC_OSABI_MSK)
449 case E_ARC_OSABI_ORIG : fprintf (file, " (ABI:legacy)"); break;
450 case E_ARC_OSABI_V2 : fprintf (file, " (ABI:v2)"); break;
451 case E_ARC_OSABI_V3 : fprintf (file, " (ABI:v3)"); break;
452 case E_ARC_OSABI_V4 : fprintf (file, " (ABI:v4)"); break;
454 fprintf (file, " (ABI:unknown)");
462 /* Copy backend specific data from one object module to another. */
465 arc_elf_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
467 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
468 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
471 BFD_ASSERT (!elf_flags_init (obfd)
472 || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
474 elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
475 elf_flags_init (obfd) = TRUE;
477 /* Copy object attributes. */
478 _bfd_elf_copy_obj_attributes (ibfd, obfd);
480 return _bfd_elf_copy_private_bfd_data (ibfd, obfd);
483 static reloc_howto_type *
484 bfd_elf32_bfd_reloc_name_lookup (bfd * abfd ATTRIBUTE_UNUSED,
489 for (i = 0; i < ARRAY_SIZE (elf_arc_howto_table); i++)
490 if (elf_arc_howto_table[i].name != NULL
491 && strcasecmp (elf_arc_howto_table[i].name, r_name) == 0)
492 return arc_elf_howto (i);
497 /* Set the howto pointer for an ARC ELF reloc. */
500 arc_info_to_howto_rel (bfd * abfd ATTRIBUTE_UNUSED,
502 Elf_Internal_Rela * dst)
506 r_type = ELF32_R_TYPE (dst->r_info);
507 BFD_ASSERT (r_type < (unsigned int) R_ARC_max);
508 cache_ptr->howto = arc_elf_howto (r_type);
511 /* Extract CPU features from an NTBS. */
514 arc_extract_features (const char *p)
521 for (i = 0; i < ARRAY_SIZE (bfd_feature_list); i++)
523 char *t = strstr (p, bfd_feature_list[i].attr);
524 unsigned l = strlen (bfd_feature_list[i].attr);
528 r |= bfd_feature_list[i].feature;
534 /* Concatenate two strings. s1 can be NULL but not
538 arc_stralloc (char * s1, const char * s2)
542 /* Only s1 can be null. */
545 p = s1 ? concat (s1, ",", s2, NULL) : (char *)s2;
550 /* Merge ARC object attributes from IBFD into OBFD. Raise an error if
551 there are conflicting attributes. */
554 arc_elf_merge_attributes (bfd *ibfd, struct bfd_link_info *info)
556 bfd *obfd = info->output_bfd;
557 obj_attribute *in_attr;
558 obj_attribute *out_attr;
560 bfd_boolean result = TRUE;
561 const char *sec_name = get_elf_backend_data (ibfd)->obj_attrs_section;
562 char *tagname = NULL;
564 /* Skip the linker stubs file. This preserves previous behavior
565 of accepting unknown attributes in the first input file - but
567 if (ibfd->flags & BFD_LINKER_CREATED)
570 /* Skip any input that hasn't attribute section.
571 This enables to link object files without attribute section with
573 if (bfd_get_section_by_name (ibfd, sec_name) == NULL)
576 if (!elf_known_obj_attributes_proc (obfd)[0].i)
578 /* This is the first object. Copy the attributes. */
579 _bfd_elf_copy_obj_attributes (ibfd, obfd);
581 out_attr = elf_known_obj_attributes_proc (obfd);
583 /* Use the Tag_null value to indicate the attributes have been
590 in_attr = elf_known_obj_attributes_proc (ibfd);
591 out_attr = elf_known_obj_attributes_proc (obfd);
593 for (i = LEAST_KNOWN_OBJ_ATTRIBUTE; i < NUM_KNOWN_OBJ_ATTRIBUTES; i++)
595 /* Merge this attribute with existing attributes. */
598 case Tag_ARC_PCS_config:
599 if (out_attr[i].i == 0)
600 out_attr[i].i = in_attr[i].i;
601 else if (in_attr[i].i != 0 && out_attr[i].i != in_attr[i].i)
603 const char *tagval[] = { "Absent", "Bare-metal/mwdt",
604 "Bare-metal/newlib", "Linux/uclibc",
606 BFD_ASSERT (in_attr[i].i < 5);
607 BFD_ASSERT (out_attr[i].i < 5);
608 /* It's sometimes ok to mix different configs, so this is only
611 (_("Warning: %B: Conflicting platform configuration "
612 "%s with %s.\n"), ibfd,
613 tagval[in_attr[i].i],
614 tagval[out_attr[i].i]);
618 case Tag_ARC_CPU_base:
619 if (out_attr[i].i == 0)
620 out_attr[i].i = in_attr[i].i;
621 else if (in_attr[i].i != 0 && out_attr[i].i != in_attr[i].i
622 && ((out_attr[i].i + in_attr[i].i) < 6))
624 const char *tagval[] = { "Absent", "ARC6xx", "ARC7xx",
626 BFD_ASSERT (in_attr[i].i < 5);
627 BFD_ASSERT (out_attr[i].i < 5);
628 /* We cannot mix code for different CPUs. */
630 (_("error: %B: unable to merge CPU base attributes "
633 tagval[in_attr[i].i],
634 tagval[out_attr[i].i]);
640 /* The CPUs may be different, check if we can still mix
641 the objects against the output choosen CPU. */
642 unsigned in_feature = 0;
643 unsigned out_feature = 0;
644 char *p1 = in_attr[Tag_ARC_ISA_config].s;
645 char *p2 = out_attr[Tag_ARC_ISA_config].s;
648 unsigned opcode_map[] = {0, ARC_OPCODE_ARC600, ARC_OPCODE_ARC700,
649 ARC_OPCODE_ARCv2EM, ARC_OPCODE_ARCv2HS};
651 BFD_ASSERT (in_attr[i].i < (sizeof (opcode_map)
652 / sizeof (unsigned)));
653 BFD_ASSERT (out_attr[i].i < (sizeof (opcode_map)
654 / sizeof (unsigned)));
655 cpu_out = opcode_map[out_attr[i].i];
657 in_feature = arc_extract_features (p1);
658 out_feature = arc_extract_features (p2);
660 /* First, check if a feature is compatible with the
661 output object chosen CPU. */
662 for (j = 0; j < ARRAY_SIZE (bfd_feature_list); j++)
663 if (((in_feature | out_feature) & bfd_feature_list[j].feature)
664 && (!(cpu_out & bfd_feature_list[j].cpus)))
667 (_("error: %B: unable to merge ISA extension attributes "
669 obfd, bfd_feature_list[j].name);
673 /* Second, if we have compatible features with the
674 chosen CPU, check if they are compatible among
676 for (j = 0; j < ARRAY_SIZE (bfd_conflict_list); j++)
677 if (((in_feature | out_feature) & bfd_conflict_list[j])
678 == bfd_conflict_list[j])
681 for (k = 0; k < ARRAY_SIZE (bfd_feature_list); k++)
683 if (in_feature & bfd_feature_list[k].feature
684 & bfd_conflict_list[j])
685 p1 = (char *) bfd_feature_list[k].name;
686 if (out_feature & bfd_feature_list[k].feature
687 & bfd_conflict_list[j])
688 p2 = (char *) bfd_feature_list[k].name;
691 (_("error: %B: conflicting ISA extension attributes "
697 /* Everithing is alright. */
698 out_feature |= in_feature;
700 for (j = 0; j < ARRAY_SIZE (bfd_feature_list); j++)
701 if (out_feature & bfd_feature_list[j].feature)
702 p1 = arc_stralloc (p1, bfd_feature_list[j].attr);
704 out_attr[Tag_ARC_ISA_config].s =
705 _bfd_elf_attr_strdup (obfd, p1);
708 case Tag_ARC_CPU_variation:
709 case Tag_ARC_ISA_mpy_option:
710 case Tag_ARC_ABI_osver:
711 /* Use the largest value specified. */
712 if (in_attr[i].i > out_attr[i].i)
713 out_attr[i].i = in_attr[i].i;
716 case Tag_ARC_CPU_name:
719 case Tag_ARC_ABI_rf16:
720 if (out_attr[i].i == 0)
721 out_attr[i].i = in_attr[i].i;
722 else if (out_attr[i].i != in_attr[i].i)
724 /* We cannot mix code with rf16 and without. */
726 (_("error: %B: cannot mix rf16 with full register set %B.\n"),
732 case Tag_ARC_ABI_pic:
735 case Tag_ARC_ABI_sda:
739 case Tag_ARC_ABI_tls:
741 const char *tagval[] = { "Absent", "MWDT", "GNU" };
746 BFD_ASSERT (in_attr[i].i < 3);
747 BFD_ASSERT (out_attr[i].i < 3);
748 if (out_attr[i].i != 0 && in_attr[i].i != 0
749 && out_attr[i].i != in_attr[i].i)
752 (_("error: %B: conflicting attributes %s: %s with %s.\n"),
754 tagval[in_attr[i].i],
755 tagval[out_attr[i].i]);
762 case Tag_ARC_ABI_double_size:
763 tagname = "Double size";
765 case Tag_ARC_ABI_enumsize:
767 tagname = "Enum size";
769 case Tag_ARC_ABI_exceptions:
771 tagname = "ABI exceptions";
773 if (out_attr[i].i != 0 && in_attr[i].i != 0
774 && out_attr[i].i != in_attr[i].i)
777 (_("error: %B: conflicting attributes %s.\n"),
783 case Tag_ARC_ISA_apex:
784 break; /* Do nothing for APEX attributes. */
786 case Tag_ARC_ISA_config:
787 /* It is handled in Tag_ARC_CPU_base. */
792 = result && _bfd_elf_merge_unknown_attribute_low (ibfd, obfd, i);
795 /* If out_attr was copied from in_attr then it won't have a type yet. */
796 if (in_attr[i].type && !out_attr[i].type)
797 out_attr[i].type = in_attr[i].type;
800 /* Merge Tag_compatibility attributes and any common GNU ones. */
801 if (!_bfd_elf_merge_object_attributes (ibfd, info))
804 /* Check for any attributes not known on ARC. */
805 result &= _bfd_elf_merge_unknown_attribute_list (ibfd, obfd);
810 /* Merge backend specific data from an object file to the output
811 object file when linking. */
814 arc_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
816 bfd *obfd = info->output_bfd;
817 unsigned short mach_ibfd;
818 static unsigned short mach_obfd = EM_NONE;
823 /* Check if we have the same endianess. */
824 if (! _bfd_generic_verify_endian_match (ibfd, info))
827 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
828 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
831 /* Collect ELF flags. */
832 in_flags = elf_elfheader (ibfd)->e_flags & EF_ARC_MACH_MSK;
833 out_flags = elf_elfheader (obfd)->e_flags & EF_ARC_MACH_MSK;
835 if (!elf_flags_init (obfd)) /* First call, no flags set. */
837 elf_flags_init (obfd) = TRUE;
838 out_flags = in_flags;
841 if (!arc_elf_merge_attributes (ibfd, info))
844 /* Check to see if the input BFD actually contains any sections. Do
845 not short-circuit dynamic objects; their section list may be
846 emptied by elf_link_add_object_symbols. */
847 if (!(ibfd->flags & DYNAMIC))
849 bfd_boolean null_input_bfd = TRUE;
850 bfd_boolean only_data_sections = TRUE;
852 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
854 if ((bfd_get_section_flags (ibfd, sec)
855 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
856 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
857 only_data_sections = FALSE;
859 null_input_bfd = FALSE;
862 if (null_input_bfd || only_data_sections)
866 /* Complain about various flag/architecture mismatches. */
867 mach_ibfd = elf_elfheader (ibfd)->e_machine;
868 if (mach_obfd == EM_NONE)
870 mach_obfd = mach_ibfd;
874 if (mach_ibfd != mach_obfd)
876 /* xgettext:c-format */
877 _bfd_error_handler (_("ERROR: Attempting to link %B "
878 "with a binary %B of different architecture"),
882 else if ((in_flags != out_flags)
883 /* If we have object attributes, then we already
884 checked the objects compatibility, skip it. */
885 && !bfd_elf_get_obj_attr_int (ibfd, OBJ_ATTR_PROC,
888 /* Warn if different flags. */
890 /* xgettext:c-format */
891 (_("%B: uses different e_flags (%#x) fields than "
892 "previous modules (%#x)"),
893 ibfd, in_flags, out_flags);
894 if (in_flags && out_flags)
896 /* MWDT doesnt set the eflags hence make sure we choose the
897 eflags set by gcc. */
898 in_flags = in_flags > out_flags ? in_flags : out_flags;
902 /* Everything is correct; don't change the output flags. */
903 in_flags = out_flags;
907 /* Update the flags. */
908 elf_elfheader (obfd)->e_flags = in_flags;
910 if (bfd_get_mach (obfd) < bfd_get_mach (ibfd))
912 return bfd_set_arch_mach (obfd, bfd_arch_arc, bfd_get_mach (ibfd));
918 /* Return a best guess for the machine number based on the attributes. */
921 bfd_arc_get_mach_from_attributes (bfd * abfd)
923 int arch = bfd_elf_get_obj_attr_int (abfd, OBJ_ATTR_PROC, Tag_ARC_CPU_base);
924 unsigned e_machine = elf_elfheader (abfd)->e_machine;
929 return bfd_mach_arc_arc600;
931 return bfd_mach_arc_arc700;
934 return bfd_mach_arc_arcv2;
938 return (e_machine == EM_ARC_COMPACT)
939 ? bfd_mach_arc_arc700 : bfd_mach_arc_arcv2;
942 /* Set the right machine number for an ARC ELF file. */
944 arc_elf_object_p (bfd * abfd)
946 /* Make sure this is initialised, or you'll have the potential of passing
947 garbage---or misleading values---into the call to
948 bfd_default_set_arch_mach (). */
949 unsigned int mach = bfd_mach_arc_arc700;
950 unsigned long arch = elf_elfheader (abfd)->e_flags & EF_ARC_MACH_MSK;
951 unsigned e_machine = elf_elfheader (abfd)->e_machine;
953 if (e_machine == EM_ARC_COMPACT || e_machine == EM_ARC_COMPACT2)
957 case E_ARC_MACH_ARC600:
958 mach = bfd_mach_arc_arc600;
960 case E_ARC_MACH_ARC601:
961 mach = bfd_mach_arc_arc601;
963 case E_ARC_MACH_ARC700:
964 mach = bfd_mach_arc_arc700;
966 case EF_ARC_CPU_ARCV2HS:
967 case EF_ARC_CPU_ARCV2EM:
968 mach = bfd_mach_arc_arcv2;
971 mach = bfd_arc_get_mach_from_attributes (abfd);
977 if (e_machine == EM_ARC)
980 (_("Error: The ARC4 architecture is no longer supported.\n"));
986 (_("Warning: unset or old architecture flags. \n"
987 " Use default machine.\n"));
991 return bfd_default_set_arch_mach (abfd, bfd_arch_arc, mach);
994 /* The final processing done just before writing out an ARC ELF object file.
995 This gets the ARC architecture right based on the machine number. */
998 arc_elf_final_write_processing (bfd * abfd,
999 bfd_boolean linker ATTRIBUTE_UNUSED)
1002 int osver = bfd_elf_get_obj_attr_int (abfd, OBJ_ATTR_PROC,
1004 flagword e_flags = elf_elfheader (abfd)->e_flags & ~EF_ARC_OSABI_MSK;
1006 switch (bfd_get_mach (abfd))
1008 case bfd_mach_arc_arc600:
1009 emf = EM_ARC_COMPACT;
1011 case bfd_mach_arc_arc601:
1012 emf = EM_ARC_COMPACT;
1014 case bfd_mach_arc_arc700:
1015 emf = EM_ARC_COMPACT;
1017 case bfd_mach_arc_arcv2:
1018 emf = EM_ARC_COMPACT2;
1024 elf_elfheader (abfd)->e_machine = emf;
1026 /* Record whatever is the current syscall ABI version. */
1028 e_flags |= ((osver & 0x0f) << 8);
1030 e_flags |= E_ARC_OSABI_V3;
1032 elf_elfheader (abfd)->e_flags |= e_flags;
1035 #ifdef ARC_ENABLE_DEBUG
1036 #define DEBUG_ARC_RELOC(A) debug_arc_reloc (A)
1039 debug_arc_reloc (struct arc_relocation_data reloc_data)
1041 ARC_DEBUG ("Reloc type=%s, should_relocate = %s\n",
1042 reloc_data.howto->name,
1043 reloc_data.should_relocate ? "true" : "false");
1044 ARC_DEBUG (" offset = 0x%x, addend = 0x%x\n",
1045 (unsigned int) reloc_data.reloc_offset,
1046 (unsigned int) reloc_data.reloc_addend);
1047 ARC_DEBUG (" Symbol:\n");
1048 ARC_DEBUG (" value = 0x%08x\n",
1049 (unsigned int) reloc_data.sym_value);
1050 if (reloc_data.sym_section != NULL)
1052 ARC_DEBUG (" Symbol Section:\n");
1053 ARC_DEBUG (" section name = %s, output_offset 0x%08x",
1054 reloc_data.sym_section->name,
1055 (unsigned int) reloc_data.sym_section->output_offset);
1056 if (reloc_data.sym_section->output_section != NULL)
1057 ARC_DEBUG (", output_section->vma = 0x%08x",
1058 ((unsigned int) reloc_data.sym_section->output_section->vma));
1060 if (reloc_data.sym_section->owner && reloc_data.sym_section->owner->filename)
1061 ARC_DEBUG (" file: %s\n", reloc_data.sym_section->owner->filename);
1065 ARC_DEBUG (" symbol section is NULL\n");
1068 ARC_DEBUG (" Input_section:\n");
1069 if (reloc_data.input_section != NULL)
1071 ARC_DEBUG (" section name = %s, output_offset 0x%08x, output_section->vma = 0x%08x\n",
1072 reloc_data.input_section->name,
1073 (unsigned int) reloc_data.input_section->output_offset,
1074 (unsigned int) reloc_data.input_section->output_section->vma);
1075 ARC_DEBUG (" changed_address = 0x%08x\n",
1076 (unsigned int) (reloc_data.input_section->output_section->vma
1077 + reloc_data.input_section->output_offset
1078 + reloc_data.reloc_offset));
1079 ARC_DEBUG (" file: %s\n", reloc_data.input_section->owner->filename);
1083 ARC_DEBUG (" input section is NULL\n");
1087 #define DEBUG_ARC_RELOC(A)
1088 #endif /* ARC_ENABLE_DEBUG */
1091 middle_endian_convert (bfd_vma insn, bfd_boolean do_it)
1096 = ((insn & 0xffff0000) >> 16)
1097 | ((insn & 0xffff) << 16);
1102 /* This function is called for relocations that are otherwise marked as NOT
1103 requiring overflow checks. In here we perform non-standard checks of
1104 the relocation value. */
1106 static inline bfd_reloc_status_type
1107 arc_special_overflow_checks (const struct arc_relocation_data reloc_data,
1108 bfd_signed_vma relocation,
1109 struct bfd_link_info *info ATTRIBUTE_UNUSED)
1111 switch (reloc_data.howto->type)
1113 case R_ARC_NPS_CMEM16:
1114 if (((relocation >> 16) & 0xffff) != NPS_CMEM_HIGH_VALUE)
1116 if (reloc_data.reloc_addend == 0)
1118 /* xgettext:c-format */
1119 (_("%B(%A+%#Lx): CMEM relocation to `%s' is invalid, "
1120 "16 MSB should be %#x (value is %#Lx)"),
1121 reloc_data.input_section->owner,
1122 reloc_data.input_section,
1123 reloc_data.reloc_offset,
1124 reloc_data.symbol_name,
1125 NPS_CMEM_HIGH_VALUE,
1129 /* xgettext:c-format */
1130 (_("%B(%A+%#Lx): CMEM relocation to `%s+%#Lx' is invalid, "
1131 "16 MSB should be %#x (value is %#Lx)"),
1132 reloc_data.input_section->owner,
1133 reloc_data.input_section,
1134 reloc_data.reloc_offset,
1135 reloc_data.symbol_name,
1136 reloc_data.reloc_addend,
1137 NPS_CMEM_HIGH_VALUE,
1139 return bfd_reloc_overflow;
1147 return bfd_reloc_ok;
1150 #define ME(reloc) (reloc)
1152 #define IS_ME(FORMULA,BFD) ((strstr (FORMULA, "ME") != NULL) \
1153 && (!bfd_big_endian (BFD)))
1155 #define S ((bfd_signed_vma) (reloc_data.sym_value \
1156 + (reloc_data.sym_section->output_section != NULL ? \
1157 (reloc_data.sym_section->output_offset \
1158 + reloc_data.sym_section->output_section->vma) : 0)))
1159 #define L ((bfd_signed_vma) (reloc_data.sym_value \
1160 + (reloc_data.sym_section->output_section != NULL ? \
1161 (reloc_data.sym_section->output_offset \
1162 + reloc_data.sym_section->output_section->vma) : 0)))
1163 #define A (reloc_data.reloc_addend)
1165 #define G (reloc_data.got_offset_value)
1166 #define GOT (reloc_data.got_symbol_vma)
1167 #define GOT_BEGIN (htab->sgot->output_section->vma)
1170 /* P: relative offset to PCL The offset should be to the
1171 current location aligned to 32 bits. */
1172 #define P ((bfd_signed_vma) ( \
1174 (reloc_data.input_section->output_section != NULL ? \
1175 reloc_data.input_section->output_section->vma : 0) \
1176 + reloc_data.input_section->output_offset \
1177 + (reloc_data.reloc_offset - (bitsize >= 32 ? 4 : 0))) \
1179 #define PDATA ((bfd_signed_vma) ( \
1180 (reloc_data.input_section->output_section->vma \
1181 + reloc_data.input_section->output_offset \
1182 + (reloc_data.reloc_offset))))
1183 #define SECTSTART (bfd_signed_vma) (reloc_data.sym_section->output_section->vma \
1184 + reloc_data.sym_section->output_offset)
1186 #define _SDA_BASE_ (bfd_signed_vma) (reloc_data.sdata_begin_symbol_vma)
1187 #define TLS_REL (bfd_signed_vma) \
1188 ((elf_hash_table (info))->tls_sec->output_section->vma)
1189 #define TLS_TBSS (8)
1193 #ifdef ARC_ENABLE_DEBUG
1194 #define PRINT_DEBUG_RELOC_INFO_BEFORE(FORMULA, TYPE) \
1197 asection *sym_section = reloc_data.sym_section; \
1198 asection *input_section = reloc_data.input_section; \
1199 ARC_DEBUG ("RELOC_TYPE = " TYPE "\n"); \
1200 ARC_DEBUG ("FORMULA = " FORMULA "\n"); \
1201 ARC_DEBUG ("S = %#lx\n", S); \
1202 ARC_DEBUG ("A = %#lx\n", A); \
1203 ARC_DEBUG ("L = %lx\n", L); \
1204 if (sym_section->output_section != NULL) \
1205 ARC_DEBUG ("symbol_section->vma = %#lx\n", \
1206 sym_section->output_section->vma \
1207 + sym_section->output_offset); \
1209 ARC_DEBUG ("symbol_section->vma = NULL\n"); \
1210 if (input_section->output_section != NULL) \
1211 ARC_DEBUG ("symbol_section->vma = %#lx\n", \
1212 input_section->output_section->vma \
1213 + input_section->output_offset); \
1215 ARC_DEBUG ("symbol_section->vma = NULL\n"); \
1216 ARC_DEBUG ("PCL = %#lx\n", P); \
1217 ARC_DEBUG ("P = %#lx\n", P); \
1218 ARC_DEBUG ("G = %#lx\n", G); \
1219 ARC_DEBUG ("SDA_OFFSET = %#lx\n", _SDA_BASE_); \
1220 ARC_DEBUG ("SDA_SET = %d\n", reloc_data.sdata_begin_symbol_vma_set); \
1221 ARC_DEBUG ("GOT_OFFSET = %#lx\n", GOT); \
1222 ARC_DEBUG ("relocation = %#08lx\n", relocation); \
1223 ARC_DEBUG ("before = %#08x\n", (unsigned) insn); \
1224 ARC_DEBUG ("data = %08x (%u) (%d)\n", (unsigned) relocation, \
1225 (unsigned) relocation, (int) relocation); \
1229 #define PRINT_DEBUG_RELOC_INFO_AFTER \
1232 ARC_DEBUG ("after = 0x%08x\n", (unsigned int) insn); \
1238 #define PRINT_DEBUG_RELOC_INFO_BEFORE(...)
1239 #define PRINT_DEBUG_RELOC_INFO_AFTER
1241 #endif /* ARC_ENABLE_DEBUG */
1243 #define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
1246 bfd_signed_vma bitsize ATTRIBUTE_UNUSED = BITSIZE; \
1247 relocation = FORMULA ; \
1248 PRINT_DEBUG_RELOC_INFO_BEFORE (#FORMULA, #TYPE); \
1249 insn = middle_endian_convert (insn, IS_ME (#FORMULA, abfd)); \
1250 insn = (* get_replace_function (abfd, TYPE)) (insn, relocation); \
1251 insn = middle_endian_convert (insn, IS_ME (#FORMULA, abfd)); \
1252 PRINT_DEBUG_RELOC_INFO_AFTER; \
1256 static bfd_reloc_status_type
1257 arc_do_relocation (bfd_byte * contents,
1258 struct arc_relocation_data reloc_data,
1259 struct bfd_link_info *info)
1261 bfd_signed_vma relocation = 0;
1263 bfd_vma orig_insn ATTRIBUTE_UNUSED;
1264 bfd * abfd = reloc_data.input_section->owner;
1265 struct elf_link_hash_table *htab ATTRIBUTE_UNUSED = elf_hash_table (info);
1266 bfd_reloc_status_type flag;
1268 if (!reloc_data.should_relocate)
1269 return bfd_reloc_ok;
1271 switch (reloc_data.howto->size)
1274 insn = arc_bfd_get_32 (abfd,
1275 contents + reloc_data.reloc_offset,
1276 reloc_data.input_section);
1279 insn = arc_bfd_get_16 (abfd,
1280 contents + reloc_data.reloc_offset,
1281 reloc_data.input_section);
1284 insn = arc_bfd_get_8 (abfd,
1285 contents + reloc_data.reloc_offset,
1286 reloc_data.input_section);
1296 switch (reloc_data.howto->type)
1298 #include "elf/arc-reloc.def"
1305 /* Check for relocation overflow. */
1306 if (reloc_data.howto->complain_on_overflow != complain_overflow_dont)
1307 flag = bfd_check_overflow (reloc_data.howto->complain_on_overflow,
1308 reloc_data.howto->bitsize,
1309 reloc_data.howto->rightshift,
1310 bfd_arch_bits_per_address (abfd),
1313 flag = arc_special_overflow_checks (reloc_data, relocation, info);
1315 if (flag != bfd_reloc_ok)
1317 ARC_DEBUG ("Relocation overflows !\n");
1318 DEBUG_ARC_RELOC (reloc_data);
1319 ARC_DEBUG ("Relocation value = signed -> %d, unsigned -> %u"
1320 ", hex -> (0x%08x)\n",
1321 (int) relocation, (unsigned) relocation, (int) relocation);
1326 /* Write updated instruction back to memory. */
1327 switch (reloc_data.howto->size)
1330 arc_bfd_put_32 (abfd, insn,
1331 contents + reloc_data.reloc_offset,
1332 reloc_data.input_section);
1335 arc_bfd_put_16 (abfd, insn,
1336 contents + reloc_data.reloc_offset,
1337 reloc_data.input_section);
1340 arc_bfd_put_8 (abfd, insn,
1341 contents + reloc_data.reloc_offset,
1342 reloc_data.input_section);
1345 ARC_DEBUG ("size = %d\n", reloc_data.howto->size);
1350 return bfd_reloc_ok;
1365 #undef ARC_RELOC_HOWTO
1368 /* Relocate an arc ELF section.
1369 Function : elf_arc_relocate_section
1370 Brief : Relocate an arc section, by handling all the relocations
1371 appearing in that section.
1372 Args : output_bfd : The bfd being written to.
1373 info : Link information.
1374 input_bfd : The input bfd.
1375 input_section : The section being relocated.
1376 contents : contents of the section being relocated.
1377 relocs : List of relocations in the section.
1378 local_syms : is a pointer to the swapped in local symbols.
1379 local_section : is an array giving the section in the input file
1380 corresponding to the st_shndx field of each
1383 elf_arc_relocate_section (bfd * output_bfd,
1384 struct bfd_link_info * info,
1386 asection * input_section,
1387 bfd_byte * contents,
1388 Elf_Internal_Rela * relocs,
1389 Elf_Internal_Sym * local_syms,
1390 asection ** local_sections)
1392 Elf_Internal_Shdr * symtab_hdr;
1393 struct elf_link_hash_entry ** sym_hashes;
1394 Elf_Internal_Rela * rel;
1395 Elf_Internal_Rela * wrel;
1396 Elf_Internal_Rela * relend;
1397 struct elf_link_hash_table * htab = elf_hash_table (info);
1399 symtab_hdr = &((elf_tdata (input_bfd))->symtab_hdr);
1400 sym_hashes = elf_sym_hashes (input_bfd);
1402 rel = wrel = relocs;
1403 relend = relocs + input_section->reloc_count;
1404 for (; rel < relend; wrel++, rel++)
1406 enum elf_arc_reloc_type r_type;
1407 reloc_howto_type * howto;
1408 unsigned long r_symndx;
1409 struct elf_link_hash_entry * h;
1410 Elf_Internal_Sym * sym;
1412 struct elf_link_hash_entry * h2;
1414 bfd_boolean unresolved_reloc = FALSE;
1416 struct arc_relocation_data reloc_data =
1420 .got_offset_value = 0,
1422 .sym_section = NULL,
1424 .input_section = NULL,
1425 .sdata_begin_symbol_vma = 0,
1426 .sdata_begin_symbol_vma_set = FALSE,
1427 .got_symbol_vma = 0,
1428 .should_relocate = FALSE
1431 r_type = ELF32_R_TYPE (rel->r_info);
1433 if (r_type >= (int) R_ARC_max)
1435 bfd_set_error (bfd_error_bad_value);
1438 howto = arc_elf_howto (r_type);
1440 r_symndx = ELF32_R_SYM (rel->r_info);
1442 /* If we are generating another .o file and the symbol in not
1443 local, skip this relocation. */
1444 if (bfd_link_relocatable (info))
1446 /* This is a relocateable link. We don't have to change
1447 anything, unless the reloc is against a section symbol,
1448 in which case we have to adjust according to where the
1449 section symbol winds up in the output section. */
1451 /* Checks if this is a local symbol and thus the reloc
1452 might (will??) be against a section symbol. */
1453 if (r_symndx < symtab_hdr->sh_info)
1455 sym = local_syms + r_symndx;
1456 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1458 sec = local_sections[r_symndx];
1460 /* For RELA relocs. Just adjust the addend
1461 value in the relocation entry. */
1462 rel->r_addend += sec->output_offset + sym->st_value;
1464 ARC_DEBUG ("local symbols reloc (section=%d %s) seen in %s\n",
1465 (int) r_symndx, local_sections[r_symndx]->name,
1466 __PRETTY_FUNCTION__);
1471 h2 = elf_link_hash_lookup (elf_hash_table (info), "__SDATA_BEGIN__",
1472 FALSE, FALSE, TRUE);
1474 if (!reloc_data.sdata_begin_symbol_vma_set
1475 && h2 != NULL && h2->root.type != bfd_link_hash_undefined
1476 && h2->root.u.def.section->output_section != NULL)
1477 /* TODO: Verify this condition. */
1479 reloc_data.sdata_begin_symbol_vma =
1480 (h2->root.u.def.value
1481 + h2->root.u.def.section->output_section->vma);
1482 reloc_data.sdata_begin_symbol_vma_set = TRUE;
1485 reloc_data.input_section = input_section;
1486 reloc_data.howto = howto;
1487 reloc_data.reloc_offset = rel->r_offset;
1488 reloc_data.reloc_addend = rel->r_addend;
1490 /* This is a final link. */
1495 if (r_symndx < symtab_hdr->sh_info) /* A local symbol. */
1497 sym = local_syms + r_symndx;
1498 sec = local_sections[r_symndx];
1502 bfd_boolean warned, ignored;
1503 bfd_vma relocation ATTRIBUTE_UNUSED;
1505 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1506 r_symndx, symtab_hdr, sym_hashes,
1508 unresolved_reloc, warned, ignored);
1510 /* TODO: This code is repeated from below. We should
1511 clean it and remove duplications.
1512 Sec is used check for discarded sections.
1513 Need to redesign code below. */
1515 /* Get the symbol's entry in the symtab. */
1516 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1518 while (h->root.type == bfd_link_hash_indirect
1519 || h->root.type == bfd_link_hash_warning)
1520 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1522 /* If we have encountered a definition for this symbol. */
1523 if (h->root.type == bfd_link_hash_defined
1524 || h->root.type == bfd_link_hash_defweak)
1526 reloc_data.sym_value = h->root.u.def.value;
1527 sec = h->root.u.def.section;
1531 /* Clean relocs for symbols in discarded sections. */
1532 if (sec != NULL && discarded_section (sec))
1534 _bfd_clear_contents (howto, input_bfd, input_section,
1535 contents + rel->r_offset);
1536 rel->r_offset = rel->r_offset;
1540 /* For ld -r, remove relocations in debug sections against
1541 sections defined in discarded sections. Not done for
1542 eh_frame editing code expects to be present. */
1543 if (bfd_link_relocatable (info)
1544 && (input_section->flags & SEC_DEBUGGING))
1550 if (bfd_link_relocatable (info))
1557 if (r_symndx < symtab_hdr->sh_info) /* A local symbol. */
1559 reloc_data.sym_value = sym->st_value;
1560 reloc_data.sym_section = sec;
1561 reloc_data.symbol_name =
1562 bfd_elf_string_from_elf_section (input_bfd,
1563 symtab_hdr->sh_link,
1566 /* Mergeable section handling. */
1567 if ((sec->flags & SEC_MERGE)
1568 && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1572 rel->r_addend = _bfd_elf_rel_local_sym (output_bfd, sym,
1573 &msec, rel->r_addend);
1574 rel->r_addend -= (sec->output_section->vma
1575 + sec->output_offset
1577 rel->r_addend += msec->output_section->vma + msec->output_offset;
1579 reloc_data.reloc_addend = rel->r_addend;
1582 BFD_ASSERT (htab->sgot != NULL || !is_reloc_for_GOT (howto));
1583 if (htab->sgot != NULL)
1584 reloc_data.got_symbol_vma = htab->sgot->output_section->vma
1585 + htab->sgot->output_offset;
1587 reloc_data.should_relocate = TRUE;
1589 else /* Global symbol. */
1591 /* FIXME: We should use the RELOC_FOR_GLOBAL_SYMBOL macro
1592 (defined in elf-bfd.h) here. */
1594 /* Get the symbol's entry in the symtab. */
1595 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1597 while (h->root.type == bfd_link_hash_indirect
1598 || h->root.type == bfd_link_hash_warning)
1600 struct elf_link_hash_entry *h_old = h;
1601 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1602 if (h->got.glist == 0 && h_old->got.glist != h->got.glist)
1603 h->got.glist = h_old->got.glist;
1606 /* TODO: Need to validate what was the intention. */
1607 /* BFD_ASSERT ((h->dynindx == -1) || (h->forced_local != 0)); */
1608 reloc_data.symbol_name = h->root.root.string;
1610 /* If we have encountered a definition for this symbol. */
1611 if (h->root.type == bfd_link_hash_defined
1612 || h->root.type == bfd_link_hash_defweak)
1614 reloc_data.sym_value = h->root.u.def.value;
1615 reloc_data.sym_section = h->root.u.def.section;
1617 reloc_data.should_relocate = TRUE;
1619 if (is_reloc_for_GOT (howto) && !bfd_link_pic (info))
1621 /* TODO: Change it to use arc_do_relocation with
1622 ARC_32 reloc. Try to use ADD_RELA macro. */
1623 bfd_vma relocation =
1624 reloc_data.sym_value + reloc_data.reloc_addend
1625 + (reloc_data.sym_section->output_section != NULL ?
1626 (reloc_data.sym_section->output_offset
1627 + reloc_data.sym_section->output_section->vma)
1630 BFD_ASSERT (h->got.glist);
1631 bfd_vma got_offset = h->got.glist->offset;
1632 bfd_put_32 (output_bfd, relocation,
1633 htab->sgot->contents + got_offset);
1635 if (is_reloc_for_PLT (howto) && h->plt.offset != (bfd_vma) -1)
1637 /* TODO: This is repeated up here. */
1638 reloc_data.sym_value = h->plt.offset;
1639 reloc_data.sym_section = htab->splt;
1642 else if (h->root.type == bfd_link_hash_undefweak)
1644 /* Is weak symbol and has no definition. */
1645 if (is_reloc_for_GOT (howto))
1647 reloc_data.sym_value = h->root.u.def.value;
1648 reloc_data.sym_section = htab->sgot;
1649 reloc_data.should_relocate = TRUE;
1651 else if (is_reloc_for_PLT (howto)
1652 && h->plt.offset != (bfd_vma) -1)
1654 /* TODO: This is repeated up here. */
1655 reloc_data.sym_value = h->plt.offset;
1656 reloc_data.sym_section = htab->splt;
1657 reloc_data.should_relocate = TRUE;
1664 if (is_reloc_for_GOT (howto))
1666 reloc_data.sym_value = h->root.u.def.value;
1667 reloc_data.sym_section = htab->sgot;
1669 reloc_data.should_relocate = TRUE;
1671 else if (is_reloc_for_PLT (howto))
1673 /* Fail if it is linking for PIE and the symbol is
1675 if (bfd_link_executable (info))
1676 (*info->callbacks->undefined_symbol)
1677 (info, h->root.root.string, input_bfd, input_section,
1678 rel->r_offset, TRUE);
1679 reloc_data.sym_value = h->plt.offset;
1680 reloc_data.sym_section = htab->splt;
1682 reloc_data.should_relocate = TRUE;
1684 else if (!bfd_link_pic (info) || bfd_link_executable (info))
1685 (*info->callbacks->undefined_symbol)
1686 (info, h->root.root.string, input_bfd, input_section,
1687 rel->r_offset, TRUE);
1690 BFD_ASSERT (htab->sgot != NULL || !is_reloc_for_GOT (howto));
1691 if (htab->sgot != NULL)
1692 reloc_data.got_symbol_vma = htab->sgot->output_section->vma
1693 + htab->sgot->output_offset;
1696 if ((is_reloc_for_GOT (howto)
1697 || is_reloc_for_TLS (howto)))
1699 reloc_data.should_relocate = TRUE;
1701 struct got_entry **list
1702 = get_got_entry_list_for_symbol (output_bfd, r_symndx, h);
1704 reloc_data.got_offset_value
1705 = relocate_fix_got_relocs_for_got_info (list,
1706 tls_type_for_reloc (howto),
1717 create_got_dynrelocs_for_single_entry (
1718 got_entry_for_type (list,
1719 arc_got_entry_type_for_reloc (howto)),
1720 output_bfd, info, NULL);
1725 #define IS_ARC_PCREL_TYPE(TYPE) \
1726 ( (TYPE == R_ARC_PC32) \
1727 || (TYPE == R_ARC_32_PCREL))
1734 case R_ARC_32_PCREL:
1735 if (bfd_link_pic (info)
1736 && (!IS_ARC_PCREL_TYPE (r_type)
1740 && (!info->symbolic || !h->def_regular))))
1742 Elf_Internal_Rela outrel;
1744 bfd_boolean skip = FALSE;
1745 bfd_boolean relocate = FALSE;
1746 asection *sreloc = _bfd_elf_get_dynamic_reloc_section
1747 (input_bfd, input_section,
1750 BFD_ASSERT (sreloc != NULL);
1752 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
1757 if (outrel.r_offset == (bfd_vma) -1)
1760 outrel.r_addend = rel->r_addend;
1761 outrel.r_offset += (input_section->output_section->vma
1762 + input_section->output_offset);
1766 memset (&outrel, 0, sizeof outrel);
1771 && (IS_ARC_PCREL_TYPE (r_type)
1772 || !(bfd_link_executable (info)
1773 || SYMBOLIC_BIND (info, h))
1774 || ! h->def_regular))
1776 BFD_ASSERT (h != NULL);
1777 if ((input_section->flags & SEC_ALLOC) != 0)
1782 BFD_ASSERT (h->dynindx != -1);
1783 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1787 /* Handle local symbols, they either do not have a
1788 global hash table entry (h == NULL), or are
1789 forced local due to a version script
1790 (h->forced_local), or the third condition is
1791 legacy, it appears to say something like, for
1792 links where we are pre-binding the symbols, or
1793 there's not an entry for this symbol in the
1794 dynamic symbol table, and it's a regular symbol
1795 not defined in a shared object, then treat the
1796 symbol as local, resolve it now. */
1798 /* outrel.r_addend = 0; */
1799 outrel.r_info = ELF32_R_INFO (0, R_ARC_RELATIVE);
1802 BFD_ASSERT (sreloc->contents != 0);
1804 loc = sreloc->contents;
1805 loc += sreloc->reloc_count * sizeof (Elf32_External_Rela);
1806 sreloc->reloc_count += 1;
1808 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1818 if (is_reloc_SDA_relative (howto)
1819 && !reloc_data.sdata_begin_symbol_vma_set)
1822 ("Error: Linker symbol __SDATA_BEGIN__ not found");
1823 bfd_set_error (bfd_error_bad_value);
1827 DEBUG_ARC_RELOC (reloc_data);
1829 /* Make sure we have with a dynamic linker. In case of GOT and PLT
1830 the sym_section should point to .got or .plt respectively. */
1831 if ((is_reloc_for_GOT (howto) || is_reloc_for_PLT (howto))
1832 && reloc_data.sym_section == NULL)
1835 (_("GOT and PLT relocations cannot be fixed with a non dynamic linker."));
1836 bfd_set_error (bfd_error_bad_value);
1841 switch (arc_do_relocation (contents, reloc_data, info))
1844 continue; /* The reloc processing loop. */
1846 case bfd_reloc_overflow:
1847 (*info->callbacks->reloc_overflow)
1848 (info, (h ? &h->root : NULL), reloc_data.symbol_name, howto->name, (bfd_vma) 0,
1849 input_bfd, input_section, rel->r_offset);
1852 case bfd_reloc_undefined:
1853 (*info->callbacks->undefined_symbol)
1854 (info, reloc_data.symbol_name, input_bfd, input_section, rel->r_offset, TRUE);
1857 case bfd_reloc_other:
1858 /* xgettext:c-format */
1859 msg = _("%B(%A): warning: unaligned access to symbol '%s' in the small data area");
1862 case bfd_reloc_outofrange:
1863 /* xgettext:c-format */
1864 msg = _("%B(%A): internal error: out of range error");
1867 case bfd_reloc_notsupported:
1868 /* xgettext:c-format */
1869 msg = _("%B(%A): internal error: unsupported relocation error");
1872 case bfd_reloc_dangerous:
1873 /* xgettext:c-format */
1874 msg = _("%B(%A): internal error: dangerous relocation");
1878 /* xgettext:c-format */
1879 msg = _("%B(%A): internal error: unknown error");
1884 _bfd_error_handler (msg, input_bfd, input_section, reloc_data.symbol_name);
1891 #define elf_arc_hash_table(p) \
1892 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
1893 == ARC_ELF_DATA ? ((struct elf_arc_link_hash_table *) ((p)->hash)) : NULL)
1896 elf_arc_check_relocs (bfd * abfd,
1897 struct bfd_link_info * info,
1899 const Elf_Internal_Rela * relocs)
1901 Elf_Internal_Shdr * symtab_hdr;
1902 struct elf_link_hash_entry ** sym_hashes;
1903 const Elf_Internal_Rela * rel;
1904 const Elf_Internal_Rela * rel_end;
1906 asection * sreloc = NULL;
1907 struct elf_link_hash_table * htab = elf_hash_table (info);
1909 if (bfd_link_relocatable (info))
1912 if (htab->dynobj == NULL)
1913 htab->dynobj = abfd;
1915 dynobj = (elf_hash_table (info))->dynobj;
1916 symtab_hdr = &((elf_tdata (abfd))->symtab_hdr);
1917 sym_hashes = elf_sym_hashes (abfd);
1919 rel_end = relocs + sec->reloc_count;
1920 for (rel = relocs; rel < rel_end; rel++)
1922 enum elf_arc_reloc_type r_type;
1923 reloc_howto_type *howto;
1924 unsigned long r_symndx;
1925 struct elf_link_hash_entry *h;
1927 r_type = ELF32_R_TYPE (rel->r_info);
1929 if (r_type >= (int) R_ARC_max)
1931 bfd_set_error (bfd_error_bad_value);
1934 howto = arc_elf_howto (r_type);
1936 /* Load symbol information. */
1937 r_symndx = ELF32_R_SYM (rel->r_info);
1938 if (r_symndx < symtab_hdr->sh_info) /* Is a local symbol. */
1940 else /* Global one. */
1941 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1947 /* During shared library creation, these relocs should not
1948 appear in a shared library (as memory will be read only
1949 and the dynamic linker can not resolve these. However
1950 the error should not occur for e.g. debugging or
1951 non-readonly sections. */
1953 && (bfd_link_dll (info) && !bfd_link_pie (info))
1954 && (sec->flags & SEC_ALLOC) != 0
1955 && (sec->flags & SEC_READONLY) != 0
1956 && ((sec->flags & SEC_CODE) != 0
1957 || (sec->flags & SEC_DEBUGGING) != 0))
1961 name = h->root.root.string;
1963 /* bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL); */
1966 /* xgettext:c-format */
1968 %B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1970 arc_elf_howto (r_type)->name,
1972 bfd_set_error (bfd_error_bad_value);
1976 /* In some cases we are not setting the 'non_got_ref'
1977 flag, even though the relocations don't require a GOT
1978 access. We should extend the testing in this area to
1979 ensure that no significant cases are being missed. */
1984 case R_ARC_32_PCREL:
1985 if ((bfd_link_pic (info))
1986 && ((r_type != R_ARC_PC32 && r_type != R_ARC_32_PCREL)
1988 && (!info->symbolic || !h->def_regular))))
1993 && ! htab->dynamic_sections_created
1994 && ! _bfd_elf_link_create_dynamic_sections (abfd, info))
1996 sreloc = _bfd_elf_make_dynamic_reloc_section (sec, dynobj,
2004 sreloc->size += sizeof (Elf32_External_Rela);
2011 if (is_reloc_for_PLT (howto))
2019 /* Add info to the symbol got_entry_list. */
2020 if (is_reloc_for_GOT (howto)
2021 || is_reloc_for_TLS (howto))
2023 if (! _bfd_elf_create_got_section (dynobj, info))
2026 arc_fill_got_info_for_reloc (
2027 arc_got_entry_type_for_reloc (howto),
2028 get_got_entry_list_for_symbol (abfd, r_symndx, h),
2037 #define ELF_DYNAMIC_INTERPRETER "/sbin/ld-uClibc.so"
2039 static struct plt_version_t *
2040 arc_get_plt_version (struct bfd_link_info *info)
2044 for (i = 0; i < 1; i++)
2046 ARC_DEBUG ("%d: size1 = %d, size2 = %d\n", i,
2047 (int) plt_versions[i].entry_size,
2048 (int) plt_versions[i].elem_size);
2051 if (bfd_get_mach (info->output_bfd) == bfd_mach_arc_arcv2)
2053 if (bfd_link_pic (info))
2054 return &(plt_versions[ELF_ARCV2_PIC]);
2056 return &(plt_versions[ELF_ARCV2_ABS]);
2060 if (bfd_link_pic (info))
2061 return &(plt_versions[ELF_ARC_PIC]);
2063 return &(plt_versions[ELF_ARC_ABS]);
2068 add_symbol_to_plt (struct bfd_link_info *info)
2070 struct elf_link_hash_table *htab = elf_hash_table (info);
2073 struct plt_version_t *plt_data = arc_get_plt_version (info);
2075 /* If this is the first .plt entry, make room for the special first
2077 if (htab->splt->size == 0)
2078 htab->splt->size += plt_data->entry_size;
2080 ret = htab->splt->size;
2082 htab->splt->size += plt_data->elem_size;
2083 ARC_DEBUG ("PLT_SIZE = %d\n", (int) htab->splt->size);
2085 htab->sgotplt->size += 4;
2086 htab->srelplt->size += sizeof (Elf32_External_Rela);
2091 #define PLT_DO_RELOCS_FOR_ENTRY(ABFD, DS, RELOCS) \
2092 plt_do_relocs_for_symbol (ABFD, DS, RELOCS, 0, 0)
2095 plt_do_relocs_for_symbol (bfd *abfd,
2096 struct elf_link_hash_table *htab,
2097 const struct plt_reloc *reloc,
2099 bfd_vma symbol_got_offset)
2101 while (SYM_ONLY (reloc->symbol) != LAST_RELOC)
2103 bfd_vma relocation = 0;
2105 switch (SYM_ONLY (reloc->symbol))
2109 = htab->sgotplt->output_section->vma
2110 + htab->sgotplt->output_offset + symbol_got_offset;
2113 relocation += reloc->addend;
2115 if (IS_RELATIVE (reloc->symbol))
2117 bfd_vma reloc_offset = reloc->offset;
2118 reloc_offset -= (IS_INSN_32 (reloc->symbol)) ? 4 : 0;
2119 reloc_offset -= (IS_INSN_24 (reloc->symbol)) ? 2 : 0;
2121 relocation -= htab->splt->output_section->vma
2122 + htab->splt->output_offset
2123 + plt_offset + reloc_offset;
2126 /* TODO: being ME is not a property of the relocation but of the
2127 section of which is applying the relocation. */
2128 if (IS_MIDDLE_ENDIAN (reloc->symbol) && !bfd_big_endian (abfd))
2131 = ((relocation & 0xffff0000) >> 16)
2132 | ((relocation & 0xffff) << 16);
2135 switch (reloc->size)
2138 bfd_put_32 (htab->splt->output_section->owner,
2140 htab->splt->contents + plt_offset + reloc->offset);
2144 reloc = &(reloc[1]); /* Jump to next relocation. */
2149 relocate_plt_for_symbol (bfd *output_bfd,
2150 struct bfd_link_info *info,
2151 struct elf_link_hash_entry *h)
2153 struct plt_version_t *plt_data = arc_get_plt_version (info);
2154 struct elf_link_hash_table *htab = elf_hash_table (info);
2156 bfd_vma plt_index = (h->plt.offset - plt_data->entry_size)
2157 / plt_data->elem_size;
2158 bfd_vma got_offset = (plt_index + 3) * 4;
2160 ARC_DEBUG ("arc_info: PLT_OFFSET = %#lx, PLT_ENTRY_VMA = %#lx, \
2161 GOT_ENTRY_OFFSET = %#lx, GOT_ENTRY_VMA = %#lx, for symbol %s\n",
2162 (long) h->plt.offset,
2163 (long) (htab->splt->output_section->vma
2164 + htab->splt->output_offset
2167 (long) (htab->sgotplt->output_section->vma
2168 + htab->sgotplt->output_offset
2170 h->root.root.string);
2174 uint16_t *ptr = (uint16_t *) plt_data->elem;
2176 for (i = 0; i < plt_data->elem_size/2; i++)
2178 uint16_t data = ptr[i];
2179 bfd_put_16 (output_bfd,
2181 htab->splt->contents + h->plt.offset + (i*2));
2185 plt_do_relocs_for_symbol (output_bfd, htab,
2186 plt_data->elem_relocs,
2190 /* Fill in the entry in the global offset table. */
2191 bfd_put_32 (output_bfd,
2192 (bfd_vma) (htab->splt->output_section->vma
2193 + htab->splt->output_offset),
2194 htab->sgotplt->contents + got_offset);
2196 /* TODO: Fill in the entry in the .rela.plt section. */
2198 Elf_Internal_Rela rel;
2201 rel.r_offset = (htab->sgotplt->output_section->vma
2202 + htab->sgotplt->output_offset
2206 BFD_ASSERT (h->dynindx != -1);
2207 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARC_JMP_SLOT);
2209 loc = htab->srelplt->contents;
2210 loc += plt_index * sizeof (Elf32_External_Rela); /* relA */
2211 bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
2216 relocate_plt_for_entry (bfd *abfd,
2217 struct bfd_link_info *info)
2219 struct plt_version_t *plt_data = arc_get_plt_version (info);
2220 struct elf_link_hash_table *htab = elf_hash_table (info);
2224 uint16_t *ptr = (uint16_t *) plt_data->entry;
2225 for (i = 0; i < plt_data->entry_size/2; i++)
2227 uint16_t data = ptr[i];
2230 htab->splt->contents + (i*2));
2233 PLT_DO_RELOCS_FOR_ENTRY (abfd, htab, plt_data->entry_relocs);
2236 /* Desc : Adjust a symbol defined by a dynamic object and referenced
2237 by a regular object. The current definition is in some section of
2238 the dynamic object, but we're not including those sections. We
2239 have to change the definition to something the rest of the link can
2243 elf_arc_adjust_dynamic_symbol (struct bfd_link_info *info,
2244 struct elf_link_hash_entry *h)
2247 bfd *dynobj = (elf_hash_table (info))->dynobj;
2248 struct elf_link_hash_table *htab = elf_hash_table (info);
2250 if (h->type == STT_FUNC
2251 || h->type == STT_GNU_IFUNC
2252 || h->needs_plt == 1)
2254 if (!bfd_link_pic (info) && !h->def_dynamic && !h->ref_dynamic)
2256 /* This case can occur if we saw a PLT32 reloc in an input
2257 file, but the symbol was never referred to by a dynamic
2258 object. In such a case, we don't actually need to build
2259 a procedure linkage table, and we can just do a PC32
2261 BFD_ASSERT (h->needs_plt);
2265 /* Make sure this symbol is output as a dynamic symbol. */
2266 if (h->dynindx == -1 && !h->forced_local
2267 && !bfd_elf_link_record_dynamic_symbol (info, h))
2270 if (bfd_link_pic (info)
2271 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
2273 bfd_vma loc = add_symbol_to_plt (info);
2275 if (bfd_link_executable (info) && !h->def_regular)
2277 h->root.u.def.section = htab->splt;
2278 h->root.u.def.value = loc;
2280 h->plt.offset = loc;
2284 h->plt.offset = (bfd_vma) -1;
2290 /* If this is a weak symbol, and there is a real definition, the
2291 processor independent code will have arranged for us to see the
2292 real definition first, and we can just use the same value. */
2293 if (h->u.weakdef != NULL)
2295 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2296 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2297 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2298 h->root.u.def.value = h->u.weakdef->root.u.def.value;
2302 /* This is a reference to a symbol defined by a dynamic object which
2303 is not a function. */
2305 /* If we are creating a shared library, we must presume that the
2306 only references to the symbol are via the global offset table.
2307 For such cases we need not do anything here; the relocations will
2308 be handled correctly by relocate_section. */
2309 if (!bfd_link_executable (info))
2312 /* If there are no non-GOT references, we do not need a copy
2314 if (!h->non_got_ref)
2317 /* If -z nocopyreloc was given, we won't generate them either. */
2318 if (info->nocopyreloc)
2324 /* We must allocate the symbol in our .dynbss section, which will
2325 become part of the .bss section of the executable. There will be
2326 an entry for this symbol in the .dynsym section. The dynamic
2327 object will contain position independent code, so all references
2328 from the dynamic object to this symbol will go through the global
2329 offset table. The dynamic linker will use the .dynsym entry to
2330 determine the address it must put in the global offset table, so
2331 both the dynamic object and the regular object will refer to the
2332 same memory location for the variable. */
2337 /* We must generate a R_ARC_COPY reloc to tell the dynamic linker to
2338 copy the initial value out of the dynamic object and into the
2339 runtime process image. We need to remember the offset into the
2340 .rela.bss section we are going to use. */
2341 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2343 struct elf_arc_link_hash_table *arc_htab = elf_arc_hash_table (info);
2345 BFD_ASSERT (arc_htab->elf.srelbss != NULL);
2346 arc_htab->elf.srelbss->size += sizeof (Elf32_External_Rela);
2350 /* TODO: Move this also to arc_hash_table. */
2351 s = bfd_get_section_by_name (dynobj, ".dynbss");
2352 BFD_ASSERT (s != NULL);
2354 return _bfd_elf_adjust_dynamic_copy (info, h, s);
2357 /* Function : elf_arc_finish_dynamic_symbol
2358 Brief : Finish up dynamic symbol handling. We set the
2359 contents of various dynamic sections here.
2364 Returns : True/False as the return status. */
2367 elf_arc_finish_dynamic_symbol (bfd * output_bfd,
2368 struct bfd_link_info *info,
2369 struct elf_link_hash_entry *h,
2370 Elf_Internal_Sym * sym)
2372 if (h->plt.offset != (bfd_vma) -1)
2374 relocate_plt_for_symbol (output_bfd, info, h);
2376 if (!h->def_regular)
2378 /* Mark the symbol as undefined, rather than as defined in
2379 the .plt section. Leave the value alone. */
2380 sym->st_shndx = SHN_UNDEF;
2385 /* This function traverses list of GOT entries and
2386 create respective dynamic relocs. */
2387 /* TODO: Make function to get list and not access the list directly. */
2388 /* TODO: Move function to relocate_section create this relocs eagerly. */
2389 create_got_dynrelocs_for_got_info (&h->got.glist,
2396 struct elf_arc_link_hash_table *arc_htab = elf_arc_hash_table (info);
2398 if (h->dynindx == -1
2399 || (h->root.type != bfd_link_hash_defined
2400 && h->root.type != bfd_link_hash_defweak)
2401 || arc_htab->elf.srelbss == NULL)
2404 bfd_vma rel_offset = (h->root.u.def.value
2405 + h->root.u.def.section->output_section->vma
2406 + h->root.u.def.section->output_offset);
2408 bfd_byte * loc = arc_htab->elf.srelbss->contents
2409 + (arc_htab->elf.srelbss->reloc_count * sizeof (Elf32_External_Rela));
2410 arc_htab->elf.srelbss->reloc_count++;
2412 Elf_Internal_Rela rel;
2414 rel.r_offset = rel_offset;
2416 BFD_ASSERT (h->dynindx != -1);
2417 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARC_COPY);
2419 bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
2422 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2423 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2424 || strcmp (h->root.root.string, "__DYNAMIC") == 0
2425 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2426 sym->st_shndx = SHN_ABS;
2431 #define GET_SYMBOL_OR_SECTION(TAG, SYMBOL, SECTION) \
2433 if (SYMBOL != NULL) \
2434 h = elf_link_hash_lookup (elf_hash_table (info), \
2435 SYMBOL, FALSE, FALSE, TRUE); \
2436 else if (SECTION != NULL) \
2437 s = bfd_get_linker_section (dynobj, SECTION); \
2440 /* Function : elf_arc_finish_dynamic_sections
2441 Brief : Finish up the dynamic sections handling.
2446 Returns : True/False as the return status. */
2449 elf_arc_finish_dynamic_sections (bfd * output_bfd,
2450 struct bfd_link_info *info)
2452 struct elf_link_hash_table *htab = elf_hash_table (info);
2453 bfd *dynobj = (elf_hash_table (info))->dynobj;
2454 asection *sdyn = bfd_get_linker_section (dynobj, ".dynamic");
2458 Elf32_External_Dyn *dyncon, *dynconend;
2460 dyncon = (Elf32_External_Dyn *) sdyn->contents;
2462 = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
2463 for (; dyncon < dynconend; dyncon++)
2465 Elf_Internal_Dyn internal_dyn;
2466 bfd_boolean do_it = FALSE;
2468 struct elf_link_hash_entry *h = NULL;
2471 bfd_elf32_swap_dyn_in (dynobj, dyncon, &internal_dyn);
2473 switch (internal_dyn.d_tag)
2475 GET_SYMBOL_OR_SECTION (DT_INIT, info->init_function, NULL)
2476 GET_SYMBOL_OR_SECTION (DT_FINI, info->fini_function, NULL)
2477 GET_SYMBOL_OR_SECTION (DT_PLTGOT, NULL, ".plt")
2478 GET_SYMBOL_OR_SECTION (DT_JMPREL, NULL, ".rela.plt")
2479 GET_SYMBOL_OR_SECTION (DT_PLTRELSZ, NULL, ".rela.plt")
2480 GET_SYMBOL_OR_SECTION (DT_VERSYM, NULL, ".gnu.version")
2481 GET_SYMBOL_OR_SECTION (DT_VERDEF, NULL, ".gnu.version_d")
2482 GET_SYMBOL_OR_SECTION (DT_VERNEED, NULL, ".gnu.version_r")
2487 /* In case the dynamic symbols should be updated with a symbol. */
2489 && (h->root.type == bfd_link_hash_defined
2490 || h->root.type == bfd_link_hash_defweak))
2494 internal_dyn.d_un.d_val = h->root.u.def.value;
2495 asec_ptr = h->root.u.def.section;
2496 if (asec_ptr->output_section != NULL)
2498 internal_dyn.d_un.d_val +=
2499 (asec_ptr->output_section->vma
2500 + asec_ptr->output_offset);
2504 /* The symbol is imported from another shared
2505 library and does not apply to this one. */
2506 internal_dyn.d_un.d_val = 0;
2510 else if (s != NULL) /* With a section information. */
2512 switch (internal_dyn.d_tag)
2519 internal_dyn.d_un.d_ptr = (s->output_section->vma
2520 + s->output_offset);
2525 internal_dyn.d_un.d_val = s->size;
2535 bfd_elf32_swap_dyn_out (output_bfd, &internal_dyn, dyncon);
2538 if (htab->splt->size > 0)
2540 relocate_plt_for_entry (output_bfd, info);
2543 /* TODO: Validate this. */
2544 if (htab->srelplt->output_section != bfd_abs_section_ptr)
2545 elf_section_data (htab->srelplt->output_section)
2546 ->this_hdr.sh_entsize = 12;
2549 /* Fill in the first three entries in the global offset table. */
2552 struct elf_link_hash_entry *h;
2553 h = elf_link_hash_lookup (elf_hash_table (info), "_GLOBAL_OFFSET_TABLE_",
2554 FALSE, FALSE, TRUE);
2556 if (h != NULL && h->root.type != bfd_link_hash_undefined
2557 && h->root.u.def.section != NULL)
2559 asection *sec = h->root.u.def.section;
2562 bfd_put_32 (output_bfd, (bfd_vma) 0,
2565 bfd_put_32 (output_bfd,
2566 sdyn->output_section->vma + sdyn->output_offset,
2568 bfd_put_32 (output_bfd, (bfd_vma) 0, sec->contents + 4);
2569 bfd_put_32 (output_bfd, (bfd_vma) 0, sec->contents + 8);
2576 #define ADD_DYNAMIC_SYMBOL(NAME, TAG) \
2577 h = elf_link_hash_lookup (elf_hash_table (info), \
2578 NAME, FALSE, FALSE, FALSE); \
2579 if ((h != NULL && (h->ref_regular || h->def_regular))) \
2580 if (! _bfd_elf_add_dynamic_entry (info, TAG, 0)) \
2583 /* Set the sizes of the dynamic sections. */
2585 elf_arc_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
2586 struct bfd_link_info *info)
2590 bfd_boolean relocs_exist = FALSE;
2591 bfd_boolean reltext_exist = FALSE;
2592 struct elf_link_hash_table *htab = elf_hash_table (info);
2594 dynobj = htab->dynobj;
2595 BFD_ASSERT (dynobj != NULL);
2597 if (htab->dynamic_sections_created)
2599 struct elf_link_hash_entry *h;
2601 /* Set the contents of the .interp section to the
2603 if (bfd_link_executable (info) && !info->nointerp)
2605 s = bfd_get_section_by_name (dynobj, ".interp");
2606 BFD_ASSERT (s != NULL);
2607 s->size = sizeof (ELF_DYNAMIC_INTERPRETER);
2608 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2611 /* Add some entries to the .dynamic section. We fill in some of
2612 the values later, in elf_bfd_final_link, but we must add the
2613 entries now so that we know the final size of the .dynamic
2614 section. Checking if the .init section is present. We also
2615 create DT_INIT and DT_FINI entries if the init_str has been
2616 changed by the user. */
2617 ADD_DYNAMIC_SYMBOL (info->init_function, DT_INIT);
2618 ADD_DYNAMIC_SYMBOL (info->fini_function, DT_FINI);
2622 /* We may have created entries in the .rela.got section.
2623 However, if we are not creating the dynamic sections, we will
2624 not actually use these entries. Reset the size of .rela.got,
2625 which will cause it to get stripped from the output file
2627 if (htab->srelgot != NULL)
2628 htab->srelgot->size = 0;
2631 for (s = dynobj->sections; s != NULL; s = s->next)
2633 if ((s->flags & SEC_LINKER_CREATED) == 0)
2638 || s == htab->sgotplt
2639 || s == htab->sdynbss)
2641 /* Strip this section if we don't need it. */
2643 else if (strncmp (s->name, ".rela", 5) == 0)
2645 if (s->size != 0 && s != htab->srelplt)
2649 const char *name = s->name + 5;
2651 for (ibfd = info->input_bfds; ibfd; ibfd = ibfd->link.next)
2652 if (bfd_get_flavour (ibfd) == bfd_target_elf_flavour
2653 && ibfd->flags & DYNAMIC)
2655 asection *target = bfd_get_section_by_name (ibfd, name);
2657 && elf_section_data (target)->sreloc == s
2658 && ((target->output_section->flags
2659 & (SEC_READONLY | SEC_ALLOC))
2660 == (SEC_READONLY | SEC_ALLOC)))
2662 reltext_exist = TRUE;
2667 relocs_exist = TRUE;
2670 /* We use the reloc_count field as a counter if we need to
2671 copy relocs into the output file. */
2676 /* It's not one of our sections, so don't allocate space. */
2682 s->flags |= SEC_EXCLUDE;
2686 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2689 /* Allocate memory for the section contents. */
2690 s->contents = bfd_zalloc (dynobj, s->size);
2691 if (s->contents == NULL)
2695 if (htab->dynamic_sections_created)
2697 /* TODO: Check if this is needed. */
2698 if (!bfd_link_pic (info))
2699 if (!_bfd_elf_add_dynamic_entry (info, DT_DEBUG, 0))
2702 if (htab->splt && (htab->splt->flags & SEC_EXCLUDE) == 0)
2703 if (!_bfd_elf_add_dynamic_entry (info, DT_PLTGOT, 0)
2704 || !_bfd_elf_add_dynamic_entry (info, DT_PLTRELSZ, 0)
2705 || !_bfd_elf_add_dynamic_entry (info, DT_PLTREL, DT_RELA)
2706 || !_bfd_elf_add_dynamic_entry (info, DT_JMPREL, 0))
2710 if (!_bfd_elf_add_dynamic_entry (info, DT_RELA, 0)
2711 || !_bfd_elf_add_dynamic_entry (info, DT_RELASZ, 0)
2712 || !_bfd_elf_add_dynamic_entry (info, DT_RELAENT,
2713 sizeof (Elf32_External_Rela)))
2717 if (!_bfd_elf_add_dynamic_entry (info, DT_TEXTREL, 0))
2725 /* Classify dynamic relocs such that -z combreloc can reorder and combine
2727 static enum elf_reloc_type_class
2728 elf32_arc_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
2729 const asection *rel_sec ATTRIBUTE_UNUSED,
2730 const Elf_Internal_Rela *rela)
2732 switch ((int) ELF32_R_TYPE (rela->r_info))
2734 case R_ARC_RELATIVE:
2735 return reloc_class_relative;
2736 case R_ARC_JMP_SLOT:
2737 return reloc_class_plt;
2739 return reloc_class_copy;
2740 /* TODO: Needed in future to support ifunc. */
2742 case R_ARC_IRELATIVE:
2743 return reloc_class_ifunc;
2746 return reloc_class_normal;
2750 const struct elf_size_info arc_elf32_size_info =
2752 sizeof (Elf32_External_Ehdr),
2753 sizeof (Elf32_External_Phdr),
2754 sizeof (Elf32_External_Shdr),
2755 sizeof (Elf32_External_Rel),
2756 sizeof (Elf32_External_Rela),
2757 sizeof (Elf32_External_Sym),
2758 sizeof (Elf32_External_Dyn),
2759 sizeof (Elf_External_Note),
2763 ELFCLASS32, EV_CURRENT,
2764 bfd_elf32_write_out_phdrs,
2765 bfd_elf32_write_shdrs_and_ehdr,
2766 bfd_elf32_checksum_contents,
2767 bfd_elf32_write_relocs,
2768 bfd_elf32_swap_symbol_in,
2769 bfd_elf32_swap_symbol_out,
2770 bfd_elf32_slurp_reloc_table,
2771 bfd_elf32_slurp_symbol_table,
2772 bfd_elf32_swap_dyn_in,
2773 bfd_elf32_swap_dyn_out,
2774 bfd_elf32_swap_reloc_in,
2775 bfd_elf32_swap_reloc_out,
2776 bfd_elf32_swap_reloca_in,
2777 bfd_elf32_swap_reloca_out
2780 #define elf_backend_size_info arc_elf32_size_info
2782 /* Hook called by the linker routine which adds symbols from an object
2786 elf_arc_add_symbol_hook (bfd * abfd,
2787 struct bfd_link_info * info,
2788 Elf_Internal_Sym * sym,
2789 const char ** namep ATTRIBUTE_UNUSED,
2790 flagword * flagsp ATTRIBUTE_UNUSED,
2791 asection ** secp ATTRIBUTE_UNUSED,
2792 bfd_vma * valp ATTRIBUTE_UNUSED)
2794 if (ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC
2795 && (abfd->flags & DYNAMIC) == 0
2796 && bfd_get_flavour (info->output_bfd) == bfd_target_elf_flavour)
2797 elf_tdata (info->output_bfd)->has_gnu_symbols |= elf_gnu_symbol_ifunc;
2802 /* GDB expects general purpose registers to be in section .reg. However Linux
2803 kernel doesn't create this section and instead writes registers to NOTE
2804 section. It is up to the binutils to create a pseudo-section .reg from the
2805 contents of NOTE. Also BFD will read pid and signal number from NOTE. This
2806 function relies on offsets inside elf_prstatus structure in Linux to be
2810 elf32_arc_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
2815 switch (note->descsz)
2820 case 236: /* sizeof (struct elf_prstatus) on Linux/arc. */
2822 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
2824 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
2827 size = (40 * 4); /* There are 40 registers in user_regs_struct. */
2830 /* Make a ".reg/999" section. */
2831 return _bfd_elfcore_make_pseudosection (abfd, ".reg", size,
2832 note->descpos + offset);
2835 /* Determine whether an object attribute tag takes an integer, a
2839 elf32_arc_obj_attrs_arg_type (int tag)
2841 if (tag == Tag_ARC_CPU_name
2842 || tag == Tag_ARC_ISA_config
2843 || tag == Tag_ARC_ISA_apex)
2844 return ATTR_TYPE_FLAG_STR_VAL;
2845 else if (tag < (Tag_ARC_ISA_mpy_option + 1))
2846 return ATTR_TYPE_FLAG_INT_VAL;
2848 return (tag & 1) != 0 ? ATTR_TYPE_FLAG_STR_VAL : ATTR_TYPE_FLAG_INT_VAL;
2851 /* Attribute numbers >=14 can be safely ignored. */
2854 elf32_arc_obj_attrs_handle_unknown (bfd *abfd, int tag)
2856 if ((tag & 127) < (Tag_ARC_ISA_mpy_option + 1))
2859 (_("%B: Unknown mandatory ARC object attribute %d."),
2861 bfd_set_error (bfd_error_bad_value);
2867 (_("Warning: %B: Unknown ARC object attribute %d."),
2873 /* Handle an ARC specific section when reading an object file. This is
2874 called when bfd_section_from_shdr finds a section with an unknown
2878 elf32_arc_section_from_shdr (bfd *abfd,
2879 Elf_Internal_Shdr * hdr,
2883 switch (hdr->sh_type)
2885 case SHT_ARC_ATTRIBUTES:
2892 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
2898 #define TARGET_LITTLE_SYM arc_elf32_le_vec
2899 #define TARGET_LITTLE_NAME "elf32-littlearc"
2900 #define TARGET_BIG_SYM arc_elf32_be_vec
2901 #define TARGET_BIG_NAME "elf32-bigarc"
2902 #define ELF_ARCH bfd_arch_arc
2903 #define ELF_TARGET_ID ARC_ELF_DATA
2904 #define ELF_MACHINE_CODE EM_ARC_COMPACT
2905 #define ELF_MACHINE_ALT1 EM_ARC_COMPACT2
2906 #define ELF_MAXPAGESIZE 0x2000
2908 #define bfd_elf32_bfd_link_hash_table_create arc_elf_link_hash_table_create
2910 #define bfd_elf32_bfd_merge_private_bfd_data arc_elf_merge_private_bfd_data
2911 #define bfd_elf32_bfd_reloc_type_lookup arc_elf32_bfd_reloc_type_lookup
2912 #define bfd_elf32_bfd_set_private_flags arc_elf_set_private_flags
2913 #define bfd_elf32_bfd_print_private_bfd_data arc_elf_print_private_bfd_data
2914 #define bfd_elf32_bfd_copy_private_bfd_data arc_elf_copy_private_bfd_data
2916 #define elf_info_to_howto_rel arc_info_to_howto_rel
2917 #define elf_backend_object_p arc_elf_object_p
2918 #define elf_backend_final_write_processing arc_elf_final_write_processing
2920 #define elf_backend_relocate_section elf_arc_relocate_section
2921 #define elf_backend_check_relocs elf_arc_check_relocs
2922 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
2924 #define elf_backend_reloc_type_class elf32_arc_reloc_type_class
2926 #define elf_backend_adjust_dynamic_symbol elf_arc_adjust_dynamic_symbol
2927 #define elf_backend_finish_dynamic_symbol elf_arc_finish_dynamic_symbol
2929 #define elf_backend_finish_dynamic_sections elf_arc_finish_dynamic_sections
2930 #define elf_backend_size_dynamic_sections elf_arc_size_dynamic_sections
2931 #define elf_backend_add_symbol_hook elf_arc_add_symbol_hook
2933 #define elf_backend_can_gc_sections 1
2934 #define elf_backend_want_got_plt 1
2935 #define elf_backend_plt_readonly 1
2936 #define elf_backend_rela_plts_and_copies_p 1
2937 #define elf_backend_want_plt_sym 0
2938 #define elf_backend_got_header_size 12
2939 #define elf_backend_dtrel_excludes_plt 1
2941 #define elf_backend_may_use_rel_p 0
2942 #define elf_backend_may_use_rela_p 1
2943 #define elf_backend_default_use_rela_p 1
2945 #define elf_backend_grok_prstatus elf32_arc_grok_prstatus
2947 #define elf_backend_default_execstack 0
2949 #undef elf_backend_obj_attrs_vendor
2950 #define elf_backend_obj_attrs_vendor "ARC"
2951 #undef elf_backend_obj_attrs_section
2952 #define elf_backend_obj_attrs_section ".ARC.attributes"
2953 #undef elf_backend_obj_attrs_arg_type
2954 #define elf_backend_obj_attrs_arg_type elf32_arc_obj_attrs_arg_type
2955 #undef elf_backend_obj_attrs_section_type
2956 #define elf_backend_obj_attrs_section_type SHT_ARC_ATTRIBUTES
2957 #define elf_backend_obj_attrs_handle_unknown elf32_arc_obj_attrs_handle_unknown
2959 #define elf_backend_section_from_shdr elf32_arc_section_from_shdr
2961 #include "elf32-target.h"