]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf32-arc.c
projects / thirdparty / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
[ARC] Don't convert _DYNAMIC@ to _GLOBAL_OFFSET_TABLE_
[thirdparty/binutils-gdb.git] / bfd / elf32-arc.c
CommitLineData
252b5132 1/* ARC-specific support for 32-bit ELF
2571583a 2 Copyright (C) 1994-2017 Free Software Foundation, Inc.
886a2506 3 Contributed by Cupertino Miranda (cmiranda@synopsys.com).
252b5132 4
0d2bcfaf 5 This file is part of BFD, the Binary File Descriptor library.
252b5132 6
0d2bcfaf
NC		 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
cd123cb7 9 the Free Software Foundation; either version 3 of the License, or
0d2bcfaf 10 (at your option) any later version.
252b5132 11
0d2bcfaf
NC		 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.
252b5132 16
0d2bcfaf
NC		 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
47b0e7ad
NC		 19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
252b5132 21
252b5132 22#include "sysdep.h"
3db64b00 23#include "bfd.h"
252b5132
RH		 24#include "libbfd.h"
25#include "elf-bfd.h"
26#include "elf/arc.h"
ea04a8f6 27#include "libiberty.h"
886a2506 28#include "opcode/arc-func.h"
4b0c052e 29#include "opcode/arc.h"
34e967a5 30#include "arc-plt.h"
886a2506 31
53a346d8
CZ		 32#define FEATURE_LIST_NAME bfd_feature_list
33#define CONFLICT_LIST bfd_conflict_list
34#include "opcode/arc-attrs.h"
35
08759e0f 36/* #define ARC_ENABLE_DEBUG 1 */
f7e8b360
NC		 37#ifdef ARC_ENABLE_DEBUG
38static const char *
34e967a5
MC		 39name_for_global_symbol (struct elf_link_hash_entry *h)
40{
41 static char *local_str = "(local)";
42 if (h == NULL)
43 return local_str;
f7e8b360 44 return h->root.root.string;
34e967a5 45}
f7e8b360
NC		 46#define ARC_DEBUG(fmt, args...) fprintf (stderr, fmt, ##args)
47#else
48#define ARC_DEBUG(...)
34e967a5
MC		 49#endif
50
51
52#define ADD_RELA(BFD, SECTION, OFFSET, SYM_IDX, TYPE, ADDEND) \
53 { \
54 struct elf_link_hash_table *_htab = elf_hash_table (info); \
55 Elf_Internal_Rela _rel; \
23a42089 56 bfd_byte * _loc; \
34e967a5 57 \
be9e3704
CM		 58 if (_htab->dynamic_sections_created == TRUE) \
59 { \
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); \
71 } \
34e967a5 72 }
886a2506 73
34e967a5 74
886a2506
NC		 75/* The default symbols representing the init and fini dyn values.
76 TODO: Check what is the relation of those strings with arclinux.em
77 and DT_INIT. */
78#define INIT_SYM_STRING "_init"
79#define FINI_SYM_STRING "_fini"
80
81char * init_str = INIT_SYM_STRING;
82char * fini_str = FINI_SYM_STRING;
83
886a2506
NC		 84#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
85 case VALUE: \
b05a65d0 86 return "R_" #TYPE; \
886a2506
NC		 87 break;
88
89static ATTRIBUTE_UNUSED const char *
90reloc_type_to_name (unsigned int type)
91{
92 switch (type)
93 {
94 #include "elf/arc-reloc.def"
95
96 default:
97 return "UNKNOWN";
98 break;
99 }
100}
101#undef ARC_RELOC_HOWTO
252b5132 102
252b5132
RH		 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). */
0d2bcfaf 105
886a2506
NC		 106#define USE_REL 1
107
108static ATTRIBUTE_UNUSED bfd_boolean
109is_reloc_PC_relative (reloc_howto_type *howto)
110{
111 return (strstr (howto->name, "PC") != NULL) ? TRUE : FALSE;
112}
113
114static bfd_boolean
115is_reloc_SDA_relative (reloc_howto_type *howto)
116{
117 return (strstr (howto->name, "SDA") != NULL) ? TRUE : FALSE;
118}
119
120static bfd_boolean
121is_reloc_for_GOT (reloc_howto_type * howto)
122{
34e967a5
MC		 123 if (strstr (howto->name, "TLS") != NULL)
124 return FALSE;
886a2506
NC		 125 return (strstr (howto->name, "GOT") != NULL) ? TRUE : FALSE;
126}
127
128static bfd_boolean
129is_reloc_for_PLT (reloc_howto_type * howto)
130{
131 return (strstr (howto->name, "PLT") != NULL) ? TRUE : FALSE;
132}
133
34e967a5
MC		 134static bfd_boolean
135is_reloc_for_TLS (reloc_howto_type *howto)
136{
137 return (strstr (howto->name, "TLS") != NULL) ? TRUE : FALSE;
138}
139
08759e0f
CM		 140struct arc_relocation_data
141{
142 bfd_signed_vma reloc_offset;
143 bfd_signed_vma reloc_addend;
144 bfd_signed_vma got_offset_value;
145
146 bfd_signed_vma sym_value;
147 asection * sym_section;
148
149 reloc_howto_type *howto;
150
151 asection * input_section;
152
153 bfd_signed_vma sdata_begin_symbol_vma;
154 bfd_boolean sdata_begin_symbol_vma_set;
155 bfd_signed_vma got_symbol_vma;
156
157 bfd_boolean should_relocate;
158
159 const char * symbol_name;
160};
161
162/* Should be included at this location due to static declarations
163 * defined before this point. */
164#include "arc-got.h"
165
886a2506
NC		 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)
72f3b6aa 168#define arc_bfd_get_32(A,B,C) bfd_get_32(A,B)
886a2506
NC		 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)
72f3b6aa 171#define arc_bfd_put_32(A,B,C,D) bfd_put_32(A,B,C)
886a2506 172
252b5132 173
47b0e7ad 174static bfd_reloc_status_type
886a2506
NC		 175arc_elf_reloc (bfd *abfd ATTRIBUTE_UNUSED,
176 arelent *reloc_entry,
177 asymbol *symbol_in,
178 void *data ATTRIBUTE_UNUSED,
179 asection *input_section,
180 bfd *output_bfd,
181 char ** error_message ATTRIBUTE_UNUSED)
182{
183 if (output_bfd != NULL)
184 {
185 reloc_entry->address += input_section->output_offset;
186
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;
192
193 return bfd_reloc_ok;
194 }
195
196 return bfd_reloc_continue;
197}
198
199
200#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
201 TYPE = VALUE,
202enum howto_list
203{
204#include "elf/arc-reloc.def"
205 HOWTO_LIST_LAST
206};
207#undef ARC_RELOC_HOWTO
208
209#define ARC_RELOC_HOWTO(TYPE, VALUE, RSIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
f7e8b360
NC		 210 [TYPE] = HOWTO (R_##TYPE, 0, RSIZE, BITSIZE, FALSE, 0, \
211 complain_overflow_##OVERFLOW, arc_elf_reloc, \
212 "R_" #TYPE, FALSE, 0, 0, FALSE),
886a2506
NC		 213
214static struct reloc_howto_struct elf_arc_howto_table[] =
215{
216#include "elf/arc-reloc.def"
34e967a5
MC		 217/* Example of what is generated by the preprocessor. Currently kept as an
218 example.
886a2506
NC		 219 HOWTO (R_ARC_NONE, // Type.
220 0, // Rightshift.
221 2, // Size (0 = byte, 1 = short, 2 = long).
222 32, // Bitsize.
223 FALSE, // PC_relative.
224 0, // Bitpos.
225 complain_overflow_bitfield, // Complain_on_overflow.
226 bfd_elf_generic_reloc, // Special_function.
227 "R_ARC_NONE", // Name.
228 TRUE, // Partial_inplace.
229 0, // Src_mask.
230 0, // Dst_mask.
231 FALSE), // PCrel_offset.
232*/
233};
234#undef ARC_RELOC_HOWTO
235
236static void arc_elf_howto_init (void)
237{
238#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
6f4b1afc 239 elf_arc_howto_table[TYPE].pc_relative = \
0a5ff21b 240 (strstr (#FORMULA, " P ") != NULL || strstr (#FORMULA, " PDATA ") != NULL); \
72f3b6aa
CZ		 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) \
244 { \
245 BFD_ASSERT (SIZE == 2); \
246 }
886a2506 247
34e967a5 248#include "elf/arc-reloc.def"
72f3b6aa 249
47b0e7ad 250}
886a2506 251#undef ARC_RELOC_HOWTO
47b0e7ad 252
886a2506
NC		 253
254#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
255 [TYPE] = VALUE,
256const int howto_table_lookup[] =
257{
34e967a5 258#include "elf/arc-reloc.def"
252b5132 259};
886a2506
NC		 260#undef ARC_RELOC_HOWTO
261
f26dd308
AM		 262static reloc_howto_type *
263arc_elf_howto (unsigned int r_type)
264{
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];
268}
252b5132
RH		 269
270/* Map BFD reloc types to ARC ELF reloc types. */
271
272struct arc_reloc_map
273{
34e967a5 274 bfd_reloc_code_real_type bfd_reloc_val;
08759e0f 275 unsigned char elf_reloc_val;
252b5132
RH		 276};
277
8a36df4d
CM		 278/* ARC ELF linker hash entry. */
279struct elf_arc_link_hash_entry
280{
281 struct elf_link_hash_entry root;
282
283 /* Track dynamic relocs copied for this symbol. */
284 struct elf_dyn_relocs *dyn_relocs;
285};
286
287/* ARC ELF linker hash table. */
288struct elf_arc_link_hash_table
289{
290 struct elf_link_hash_table elf;
8a36df4d
CM		 291};
292
293static struct bfd_hash_entry *
294elf_arc_link_hash_newfunc (struct bfd_hash_entry *entry,
295 struct bfd_hash_table *table,
296 const char *string)
297{
298 /* Allocate the structure if it has not already been allocated by a
299 subclass. */
300 if (entry == NULL)
301 {
302 entry = (struct bfd_hash_entry *)
303 bfd_hash_allocate (table,
304 sizeof (struct elf_arc_link_hash_entry));
305 if (entry == NULL)
306 return entry;
307 }
308
309 /* Call the allocation method of the superclass. */
310 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
311 if (entry != NULL)
312 {
313 struct elf_arc_link_hash_entry *eh;
314
315 eh = (struct elf_arc_link_hash_entry *) entry;
316 eh->dyn_relocs = NULL;
317 }
318
319 return entry;
320}
321
322/* Destroy an ARC ELF linker hash table. */
323static void
324elf_arc_link_hash_table_free (bfd *obfd)
325{
326 _bfd_elf_link_hash_table_free (obfd);
327}
328
329/* Create an ARC ELF linker hash table. */
330
331static struct bfd_link_hash_table *
332arc_elf_link_hash_table_create (bfd *abfd)
333{
334 struct elf_arc_link_hash_table *ret;
335
336 ret = (struct elf_arc_link_hash_table *) bfd_zmalloc (sizeof (*ret));
337 if (ret == NULL)
338 return NULL;
339
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),
343 ARC_ELF_DATA))
344 {
345 free (ret);
346 return NULL;
347 }
348
8a36df4d
CM		 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;
353
354 ret->elf.root.hash_table_free = elf_arc_link_hash_table_free;
355
356 return &ret->elf.root;
357}
358
886a2506
NC		 359#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
360 { BFD_RELOC_##TYPE, R_##TYPE },
252b5132
RH		 361static const struct arc_reloc_map arc_reloc_map[] =
362{
34e967a5
MC		 363#include "elf/arc-reloc.def"
364
886a2506
NC		 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},
252b5132 370};
886a2506 371#undef ARC_RELOC_HOWTO
252b5132 372
094fb063
CZ		 373typedef ATTRIBUTE_UNUSED bfd_vma (*replace_func) (unsigned, int ATTRIBUTE_UNUSED);
374
375#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
376 case TYPE: \
377 func = (void *) RELOC_FUNCTION; \
378 break;
379static replace_func
380get_replace_function (bfd *abfd, unsigned int r_type)
381{
382 void *func = NULL;
383
384 switch (r_type)
385 {
386 #include "elf/arc-reloc.def"
387 }
388
389 if (func == replace_bits24 && bfd_big_endian (abfd))
390 return (replace_func) replace_bits24_be;
391
392 return (replace_func) func;
393}
394#undef ARC_RELOC_HOWTO
395
252b5132 396static reloc_howto_type *
34e967a5 397arc_elf32_bfd_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
47b0e7ad 398 bfd_reloc_code_real_type code)
252b5132
RH		 399{
400 unsigned int i;
401
ea04a8f6 402 for (i = ARRAY_SIZE (arc_reloc_map); i--;)
886a2506
NC		 403 {
404 if (arc_reloc_map[i].bfd_reloc_val == code)
f26dd308 405 return arc_elf_howto (arc_reloc_map[i].elf_reloc_val);
886a2506 406 }
ea04a8f6 407
252b5132
RH		 408 return NULL;
409}
410
34e967a5
MC		 411/* Function to set the ELF flag bits. */
412static bfd_boolean
413arc_elf_set_private_flags (bfd *abfd, flagword flags)
414{
415 elf_elfheader (abfd)->e_flags = flags;
416 elf_flags_init (abfd) = TRUE;
417 return TRUE;
418}
419
420/* Print private flags. */
421static bfd_boolean
422arc_elf_print_private_bfd_data (bfd *abfd, void * ptr)
423{
424 FILE *file = (FILE *) ptr;
425 flagword flags;
426
427 BFD_ASSERT (abfd != NULL && ptr != NULL);
428
429 /* Print normal ELF private data. */
430 _bfd_elf_print_private_bfd_data (abfd, ptr);
431
432 flags = elf_elfheader (abfd)->e_flags;
433 fprintf (file, _("private flags = 0x%lx:"), (unsigned long) flags);
434
435 switch (flags & EF_ARC_MACH_MSK)
436 {
34e967a5
MC		 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;
442 default:
443 fprintf (file, "-mcpu=unknown");
444 break;
445 }
446
447 switch (flags & EF_ARC_OSABI_MSK)
448 {
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;
53a346d8 452 case E_ARC_OSABI_V4 : fprintf (file, " (ABI:v4)"); break;
34e967a5 453 default:
53a346d8 454 fprintf (file, " (ABI:unknown)");
34e967a5
MC		 455 break;
456 }
457
458 fputc ('\n', file);
459 return TRUE;
460}
461
462/* Copy backend specific data from one object module to another. */
463
464static bfd_boolean
465arc_elf_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
466{
467 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
468 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
469 return TRUE;
470
471 BFD_ASSERT (!elf_flags_init (obfd)
472 || elf_elfheader (obfd)->e_flags == elf_elfheader (ibfd)->e_flags);
473
474 elf_elfheader (obfd)->e_flags = elf_elfheader (ibfd)->e_flags;
475 elf_flags_init (obfd) = TRUE;
476
477 /* Copy object attributes. */
478 _bfd_elf_copy_obj_attributes (ibfd, obfd);
479
480 return _bfd_elf_copy_private_bfd_data (ibfd, obfd);
481}
482
157090f7 483static reloc_howto_type *
34e967a5
MC		 484bfd_elf32_bfd_reloc_name_lookup (bfd * abfd ATTRIBUTE_UNUSED,
485 const char *r_name)
157090f7
AM		 486{
487 unsigned int i;
488
886a2506 489 for (i = 0; i < ARRAY_SIZE (elf_arc_howto_table); i++)
157090f7
AM		 490 if (elf_arc_howto_table[i].name != NULL
491 && strcasecmp (elf_arc_howto_table[i].name, r_name) == 0)
f26dd308 492 return arc_elf_howto (i);
157090f7
AM		 493
494 return NULL;
495}
496
886a2506 497/* Set the howto pointer for an ARC ELF reloc. */
34e967a5 498
252b5132 499static void
886a2506
NC		 500arc_info_to_howto_rel (bfd * abfd ATTRIBUTE_UNUSED,
501 arelent * cache_ptr,
502 Elf_Internal_Rela * dst)
252b5132
RH		 503{
504 unsigned int r_type;
505
506 r_type = ELF32_R_TYPE (dst->r_info);
886a2506 507 BFD_ASSERT (r_type < (unsigned int) R_ARC_max);
f26dd308 508 cache_ptr->howto = arc_elf_howto (r_type);
252b5132
RH		 509}
510
53a346d8
CZ		 511/* Extract CPU features from an NTBS. */
512
513static unsigned
514arc_extract_features (const char *p)
515{
516 unsigned i, r = 0;
517
518 if (!p)
519 return 0;
520
521 for (i = 0; i < ARRAY_SIZE (bfd_feature_list); i++)
522 {
523 char *t = strstr (p, bfd_feature_list[i].attr);
524 unsigned l = strlen (bfd_feature_list[i].attr);
525 if ((t != NULL)
526 && (t[l] == ','
527 || t[l] == '\0'))
528 r |= bfd_feature_list[i].feature;
529 }
530
531 return r;
532}
533
534/* Concatenate two strings. s1 can be NULL but not
535 s2. */
536
537static char *
538arc_stralloc (char * s1, const char * s2)
539{
540 char *p;
541
542 /* Only s1 can be null. */
543 BFD_ASSERT (s2);
544
545 p = s1 ? concat (s1, ",", s2, NULL) : (char *)s2;
546
547 return p;
548}
549
550/* Merge ARC object attributes from IBFD into OBFD. Raise an error if
551 there are conflicting attributes. */
552
553static bfd_boolean
554arc_elf_merge_attributes (bfd *ibfd, struct bfd_link_info *info)
555{
556 bfd *obfd = info->output_bfd;
557 obj_attribute *in_attr;
558 obj_attribute *out_attr;
559 int i;
560 bfd_boolean result = TRUE;
561 const char *sec_name = get_elf_backend_data (ibfd)->obj_attrs_section;
562 char *tagname = NULL;
563
564 /* Skip the linker stubs file. This preserves previous behavior
565 of accepting unknown attributes in the first input file - but
566 is that a bug? */
567 if (ibfd->flags & BFD_LINKER_CREATED)
568 return TRUE;
569
570 /* Skip any input that hasn't attribute section.
571 This enables to link object files without attribute section with
572 any others. */
573 if (bfd_get_section_by_name (ibfd, sec_name) == NULL)
574 return TRUE;
575
576 if (!elf_known_obj_attributes_proc (obfd)[0].i)
577 {
578 /* This is the first object. Copy the attributes. */
579 _bfd_elf_copy_obj_attributes (ibfd, obfd);
580
581 out_attr = elf_known_obj_attributes_proc (obfd);
582
583 /* Use the Tag_null value to indicate the attributes have been
584 initialized. */
585 out_attr[0].i = 1;
586
587 return TRUE;
588 }
589
590 in_attr = elf_known_obj_attributes_proc (ibfd);
591 out_attr = elf_known_obj_attributes_proc (obfd);
592
593 for (i = LEAST_KNOWN_OBJ_ATTRIBUTE; i < NUM_KNOWN_OBJ_ATTRIBUTES; i++)
594 {
595 /* Merge this attribute with existing attributes. */
596 switch (i)
597 {
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)
602 {
603 const char *tagval[] = { "Absent", "Bare-metal/mwdt",
604 "Bare-metal/newlib", "Linux/uclibc",
605 "Linux/glibc" };
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
609 a warning. */
610 _bfd_error_handler
611 (_("Warning: %B: Conflicting platform configuration "
612 "%s with %s.\n"), ibfd,
613 tagval[in_attr[i].i],
614 tagval[out_attr[i].i]);
615 }
616 break;
617
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))
623 {
624 const char *tagval[] = { "Absent", "ARC6xx", "ARC7xx",
625 "ARCEM", "ARCHS" };
626 BFD_ASSERT (in_attr[i].i < 5);
627 BFD_ASSERT (out_attr[i].i < 5);
628 /* We cannot mix code for different CPUs. */
629 _bfd_error_handler
630 (_("error: %B: unable to merge CPU base attributes "
631 "%s with %s.\n"),
632 obfd,
633 tagval[in_attr[i].i],
634 tagval[out_attr[i].i]);
635 result = FALSE;
636 break;
637 }
638 else
639 {
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;
646 unsigned j;
647 unsigned cpu_out;
648 unsigned opcode_map[] = {0, ARC_OPCODE_ARC600, ARC_OPCODE_ARC700,
649 ARC_OPCODE_ARCv2EM, ARC_OPCODE_ARCv2HS};
650
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];
656
657 in_feature = arc_extract_features (p1);
658 out_feature = arc_extract_features (p2);
659
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)))
665 {
666 _bfd_error_handler
667 (_("error: %B: unable to merge ISA extension attributes "
668 "%s.\n"),
669 obfd, bfd_feature_list[j].name);
670 result = FALSE;
671 break;
672 }
673 /* Second, if we have compatible features with the
674 chosen CPU, check if they are compatible among
675 them. */
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])
679 {
680 unsigned k;
681 for (k = 0; k < ARRAY_SIZE (bfd_feature_list); k++)
682 {
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;
689 }
690 _bfd_error_handler
691 (_("error: %B: conflicting ISA extension attributes "
692 "%s with %s.\n"),
693 obfd, p1, p2);
694 result = FALSE;
695 break;
696 }
697 /* Everithing is alright. */
698 out_feature |= in_feature;
699 p1 = NULL;
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);
703 if (p1)
704 out_attr[Tag_ARC_ISA_config].s =
705 _bfd_elf_attr_strdup (obfd, p1);
706 }
707 /* Fall through. */
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;
714 break;
715
716 case Tag_ARC_CPU_name:
717 break;
718
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)
723 {
724 /* We cannot mix code with rf16 and without. */
725 _bfd_error_handler
726 (_("error: %B: cannot mix rf16 with full register set %B.\n"),
727 obfd, ibfd);
728 result = FALSE;
729 }
730 break;
731
732 case Tag_ARC_ABI_pic:
733 tagname = "PIC";
8e7f04f1 734 /* fall through */
53a346d8
CZ		 735 case Tag_ARC_ABI_sda:
736 if (!tagname)
737 tagname = "SDA";
8e7f04f1 738 /* fall through */
53a346d8
CZ		 739 case Tag_ARC_ABI_tls:
740 {
741 const char *tagval[] = { "Absent", "MWDT", "GNU" };
742
743 if (!tagname)
744 tagname = "TLS";
745
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)
750 {
751 _bfd_error_handler
752 (_("error: %B: conflicting attributes %s: %s with %s.\n"),
753 obfd, tagname,
754 tagval[in_attr[i].i],
755 tagval[out_attr[i].i]);
756 result = FALSE;
757 }
758 tagname = NULL;
759 break;
760 }
761
762 case Tag_ARC_ABI_double_size:
763 tagname = "Double size";
8e7f04f1 764 /* fall through */
53a346d8
CZ		 765 case Tag_ARC_ABI_enumsize:
766 if (!tagname)
767 tagname = "Enum size";
8e7f04f1 768 /* fall through */
53a346d8
CZ		 769 case Tag_ARC_ABI_exceptions:
770 if (!tagname)
771 tagname = "ABI exceptions";
772
773 if (out_attr[i].i != 0 && in_attr[i].i != 0
774 && out_attr[i].i != in_attr[i].i)
775 {
776 _bfd_error_handler
777 (_("error: %B: conflicting attributes %s.\n"),
778 obfd, tagname);
779 result = FALSE;
780 }
781 break;
782
783 case Tag_ARC_ISA_apex:
784 break; /* Do nothing for APEX attributes. */
785
786 case Tag_ARC_ISA_config:
787 /* It is handled in Tag_ARC_CPU_base. */
788 break;
789
790 default:
791 result
792 = result && _bfd_elf_merge_unknown_attribute_low (ibfd, obfd, i);
793 }
794
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;
798 }
799
800 /* Merge Tag_compatibility attributes and any common GNU ones. */
801 if (!_bfd_elf_merge_object_attributes (ibfd, info))
802 return FALSE;
803
804 /* Check for any attributes not known on ARC. */
805 result &= _bfd_elf_merge_unknown_attribute_list (ibfd, obfd);
806
807 return result;
808}
809
34e967a5
MC		 810/* Merge backend specific data from an object file to the output
811 object file when linking. */
812
813static bfd_boolean
50e03d47 814arc_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
34e967a5 815{
50e03d47 816 bfd *obfd = info->output_bfd;
34e967a5
MC		 817 unsigned short mach_ibfd;
818 static unsigned short mach_obfd = EM_NONE;
819 flagword out_flags;
820 flagword in_flags;
821 asection *sec;
822
823 /* Check if we have the same endianess. */
50e03d47 824 if (! _bfd_generic_verify_endian_match (ibfd, info))
1047201f 825 return FALSE;
34e967a5 826
53a346d8
CZ		 827 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
828 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
829 return TRUE;
830
34e967a5
MC		 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;
834
835 if (!elf_flags_init (obfd)) /* First call, no flags set. */
836 {
837 elf_flags_init (obfd) = TRUE;
838 out_flags = in_flags;
839 }
840
53a346d8
CZ		 841 if (!arc_elf_merge_attributes (ibfd, info))
842 return FALSE;
34e967a5
MC		 843
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))
848 {
849 bfd_boolean null_input_bfd = TRUE;
850 bfd_boolean only_data_sections = TRUE;
851
852 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
853 {
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;
858
859 null_input_bfd = FALSE;
860 }
861
862 if (null_input_bfd || only_data_sections)
863 return TRUE;
864 }
865
866 /* Complain about various flag/architecture mismatches. */
867 mach_ibfd = elf_elfheader (ibfd)->e_machine;
868 if (mach_obfd == EM_NONE)
869 {
870 mach_obfd = mach_ibfd;
871 }
872 else
873 {
874 if (mach_ibfd != mach_obfd)
875 {
695344c0 876 /* xgettext:c-format */
34e967a5 877 _bfd_error_handler (_("ERROR: Attempting to link %B "
dae82561
AM		 878 "with a binary %B of different architecture"),
879 ibfd, obfd);
34e967a5
MC		 880 return FALSE;
881 }
53a346d8
CZ		 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,
886 Tag_ARC_CPU_base))
34e967a5
MC		 887 {
888 /* Warn if different flags. */
4eca0228 889 _bfd_error_handler
695344c0 890 /* xgettext:c-format */
dae82561 891 (_("%B: uses different e_flags (0x%lx) fields than "
34e967a5 892 "previous modules (0x%lx)"),
dae82561 893 ibfd, (long) in_flags, (long) out_flags);
34e967a5
MC		 894 if (in_flags && out_flags)
895 return FALSE;
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;
899 }
53a346d8
CZ		 900 else
901 {
902 /* Everything is correct; don't change the output flags. */
903 in_flags = out_flags;
904 }
34e967a5
MC		 905 }
906
907 /* Update the flags. */
908 elf_elfheader (obfd)->e_flags = in_flags;
909
910 if (bfd_get_mach (obfd) < bfd_get_mach (ibfd))
911 {
912 return bfd_set_arch_mach (obfd, bfd_arch_arc, bfd_get_mach (ibfd));
913 }
914
915 return TRUE;
916}
917
53a346d8
CZ		 918/* Return a best guess for the machine number based on the attributes. */
919
920static unsigned int
921bfd_arc_get_mach_from_attributes (bfd * abfd)
922{
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;
925
926 switch (arch)
927 {
928 case TAG_CPU_ARC6xx:
929 return bfd_mach_arc_arc600;
930 case TAG_CPU_ARC7xx:
931 return bfd_mach_arc_arc700;
932 case TAG_CPU_ARCEM:
933 case TAG_CPU_ARCHS:
934 return bfd_mach_arc_arcv2;
935 default:
936 break;
937 }
938 return (e_machine == EM_ARC_COMPACT)
939 ? bfd_mach_arc_arc700 : bfd_mach_arc_arcv2;
940}
941
252b5132 942/* Set the right machine number for an ARC ELF file. */
b34976b6 943static bfd_boolean
886a2506 944arc_elf_object_p (bfd * abfd)
252b5132 945{
886a2506
NC		 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 (). */
53a346d8 949 unsigned int mach = bfd_mach_arc_arc700;
886a2506
NC		 950 unsigned long arch = elf_elfheader (abfd)->e_flags & EF_ARC_MACH_MSK;
951 unsigned e_machine = elf_elfheader (abfd)->e_machine;
252b5132 952
886a2506 953 if (e_machine == EM_ARC_COMPACT || e_machine == EM_ARC_COMPACT2)
252b5132 954 {
0d2bcfaf
NC		 955 switch (arch)
956 {
886a2506
NC		 957 case E_ARC_MACH_ARC600:
958 mach = bfd_mach_arc_arc600;
959 break;
960 case E_ARC_MACH_ARC601:
961 mach = bfd_mach_arc_arc601;
962 break;
963 case E_ARC_MACH_ARC700:
964 mach = bfd_mach_arc_arc700;
965 break;
966 case EF_ARC_CPU_ARCV2HS:
967 case EF_ARC_CPU_ARCV2EM:
968 mach = bfd_mach_arc_arcv2;
969 break;
970 default:
53a346d8 971 mach = bfd_arc_get_mach_from_attributes (abfd);
886a2506
NC		 972 break;
973 }
974 }
975 else
976 {
977 if (e_machine == EM_ARC)
978 {
4eca0228 979 _bfd_error_handler
886a2506
NC		 980 (_("Error: The ARC4 architecture is no longer supported.\n"));
981 return FALSE;
982 }
983 else
984 {
4eca0228 985 _bfd_error_handler
886a2506
NC		 986 (_("Warning: unset or old architecture flags. \n"
987 " Use default machine.\n"));
0d2bcfaf 988 }
252b5132 989 }
886a2506 990
0d2bcfaf 991 return bfd_default_set_arch_mach (abfd, bfd_arch_arc, mach);
252b5132
RH		 992}
993
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. */
996
997static void
34e967a5
MC		 998arc_elf_final_write_processing (bfd * abfd,
999 bfd_boolean linker ATTRIBUTE_UNUSED)
252b5132 1000{
886a2506 1001 unsigned long emf;
53a346d8
CZ		 1002 int osver = bfd_elf_get_obj_attr_int (abfd, OBJ_ATTR_PROC,
1003 Tag_ARC_ABI_osver);
1004 flagword e_flags = elf_elfheader (abfd)->e_flags & ~EF_ARC_OSABI_MSK;
252b5132 1005
0d2bcfaf 1006 switch (bfd_get_mach (abfd))
252b5132 1007 {
886a2506 1008 case bfd_mach_arc_arc600:
886a2506 1009 emf = EM_ARC_COMPACT;
0d2bcfaf 1010 break;
886a2506 1011 case bfd_mach_arc_arc601:
886a2506 1012 emf = EM_ARC_COMPACT;
0d2bcfaf 1013 break;
886a2506 1014 case bfd_mach_arc_arc700:
886a2506 1015 emf = EM_ARC_COMPACT;
0d2bcfaf 1016 break;
886a2506 1017 case bfd_mach_arc_arcv2:
886a2506 1018 emf = EM_ARC_COMPACT2;
0d2bcfaf 1019 break;
886a2506 1020 default:
53a346d8 1021 return;
252b5132 1022 }
34e967a5 1023
886a2506 1024 elf_elfheader (abfd)->e_machine = emf;
7e458899 1025
886a2506 1026 /* Record whatever is the current syscall ABI version. */
53a346d8
CZ		 1027 if (osver)
1028 e_flags |= ((osver & 0x0f) << 8);
1029 else
1030 e_flags |= E_ARC_OSABI_V3;
3c8adaca 1031
53a346d8 1032 elf_elfheader (abfd)->e_flags |= e_flags;
252b5132
RH		 1033}
1034
f7e8b360
NC		 1035#ifdef ARC_ENABLE_DEBUG
1036#define DEBUG_ARC_RELOC(A) debug_arc_reloc (A)
886a2506
NC		 1037
1038static void
1039debug_arc_reloc (struct arc_relocation_data reloc_data)
1040{
f7e8b360
NC		 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);
886a2506
NC		 1050 if (reloc_data.sym_section != NULL)
1051 {
f7e8b360
NC		 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);
34e967a5 1056 if (reloc_data.sym_section->output_section != NULL)
f7e8b360 1057 ARC_DEBUG (", output_section->vma = 0x%08x",
34e967a5 1058 ((unsigned int) reloc_data.sym_section->output_section->vma));
f7e8b360
NC		 1059 ARC_DEBUG ("\n");
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);
886a2506
NC		 1062 }
1063 else
34e967a5 1064 {
f7e8b360 1065 ARC_DEBUG (" symbol section is NULL\n");
34e967a5 1066 }
886a2506 1067
f7e8b360 1068 ARC_DEBUG (" Input_section:\n");
886a2506
NC		 1069 if (reloc_data.input_section != NULL)
1070 {
f7e8b360
NC		 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);
886a2506
NC		 1080 }
1081 else
34e967a5 1082 {
f7e8b360 1083 ARC_DEBUG (" input section is NULL\n");
34e967a5 1084 }
886a2506 1085}
f7e8b360
NC		 1086#else
1087#define DEBUG_ARC_RELOC(A)
1088#endif /* ARC_ENABLE_DEBUG */
886a2506 1089
72f3b6aa
CZ		 1090static bfd_vma
1091middle_endian_convert (bfd_vma insn, bfd_boolean do_it)
6f4b1afc 1092{
72f3b6aa
CZ		 1093 if (do_it)
1094 {
08759e0f
CM		 1095 insn
1096 = ((insn & 0xffff0000) >> 16)
1097 | ((insn & 0xffff) << 16);
72f3b6aa
CZ		 1098 }
1099 return insn;
6f4b1afc
CM		 1100}
1101
4b0c052e
AB		 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. */
1105
1106static inline bfd_reloc_status_type
1107arc_special_overflow_checks (const struct arc_relocation_data reloc_data,
08759e0f 1108 bfd_signed_vma relocation,
4b0c052e
AB		 1109 struct bfd_link_info *info ATTRIBUTE_UNUSED)
1110{
1111 switch (reloc_data.howto->type)
1112 {
1113 case R_ARC_NPS_CMEM16:
1114 if (((relocation >> 16) & 0xffff) != NPS_CMEM_HIGH_VALUE)
08759e0f
CM		 1115 {
1116 if (reloc_data.reloc_addend == 0)
4eca0228 1117 _bfd_error_handler
695344c0 1118 /* xgettext:c-format */
08759e0f
CM		 1119 (_("%B(%A+0x%lx): CMEM relocation to `%s' is invalid, "
1120 "16 MSB should be 0x%04x (value is 0x%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,
1126 (relocation));
1127 else
4eca0228 1128 _bfd_error_handler
695344c0 1129 /* xgettext:c-format */
08759e0f
CM		 1130 (_("%B(%A+0x%lx): CMEM relocation to `%s+0x%lx' is invalid, "
1131 "16 MSB should be 0x%04x (value is 0x%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,
1138 (relocation));
1139 return bfd_reloc_overflow;
1140 }
4b0c052e
AB		 1141 break;
1142
1143 default:
1144 break;
1145 }
1146
1147 return bfd_reloc_ok;
1148}
1149
72f3b6aa
CZ		 1150#define ME(reloc) (reloc)
1151
1152#define IS_ME(FORMULA,BFD) ((strstr (FORMULA, "ME") != NULL) \
1153 && (!bfd_big_endian (BFD)))
1154
094fb063 1155#define S ((bfd_signed_vma) (reloc_data.sym_value \
34e967a5
MC		 1156 + (reloc_data.sym_section->output_section != NULL ? \
1157 (reloc_data.sym_section->output_offset \
094fb063
CZ		 1158 + reloc_data.sym_section->output_section->vma) : 0)))
1159#define L ((bfd_signed_vma) (reloc_data.sym_value \
34e967a5
MC		 1160 + (reloc_data.sym_section->output_section != NULL ? \
1161 (reloc_data.sym_section->output_offset \
094fb063 1162 + reloc_data.sym_section->output_section->vma) : 0)))
886a2506
NC		 1163#define A (reloc_data.reloc_addend)
1164#define B (0)
1165#define G (reloc_data.got_offset_value)
34e967a5
MC		 1166#define GOT (reloc_data.got_symbol_vma)
1167#define GOT_BEGIN (htab->sgot->output_section->vma)
1168
886a2506 1169#define MES (0)
34e967a5
MC		 1170 /* P: relative offset to PCL The offset should be to the
1171 current location aligned to 32 bits. */
094fb063 1172#define P ((bfd_signed_vma) ( \
34e967a5
MC		 1173 ( \
1174 (reloc_data.input_section->output_section != NULL ? \
1175 reloc_data.input_section->output_section->vma : 0) \
1176 + reloc_data.input_section->output_offset \
094fb063
CZ		 1177 + (reloc_data.reloc_offset - (bitsize >= 32 ? 4 : 0))) \
1178 & ~0x3))
1179#define PDATA ((bfd_signed_vma) ( \
6f4b1afc
CM		 1180 (reloc_data.input_section->output_section->vma \
1181 + reloc_data.input_section->output_offset \
094fb063 1182 + (reloc_data.reloc_offset))))
2ab2f40d
CM		 1183#define SECTSTART (bfd_signed_vma) (reloc_data.sym_section->output_section->vma \
1184 + reloc_data.sym_section->output_offset)
1185
094fb063
CZ		 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)
34e967a5
MC		 1189#define TLS_TBSS (8)
1190#define TCB_SIZE (8)
1191
886a2506
NC		 1192#define none (0)
1193
f7e8b360
NC		 1194#ifdef ARC_ENABLE_DEBUG
1195#define PRINT_DEBUG_RELOC_INFO_BEFORE(FORMULA, TYPE) \
1196 do \
1197 { \
1198 asection *sym_section = reloc_data.sym_section; \
1199 asection *input_section = reloc_data.input_section; \
1200 ARC_DEBUG ("RELOC_TYPE = " TYPE "\n"); \
1201 ARC_DEBUG ("FORMULA = " FORMULA "\n"); \
1202 ARC_DEBUG ("S = %#lx\n", S); \
1203 ARC_DEBUG ("A = %#lx\n", A); \
1204 ARC_DEBUG ("L = %lx\n", L); \
1205 if (sym_section->output_section != NULL) \
1206 ARC_DEBUG ("symbol_section->vma = %#lx\n", \
1207 sym_section->output_section->vma \
1208 + sym_section->output_offset); \
1209 else \
1210 ARC_DEBUG ("symbol_section->vma = NULL\n"); \
1211 if (input_section->output_section != NULL) \
1212 ARC_DEBUG ("symbol_section->vma = %#lx\n", \
1213 input_section->output_section->vma \
1214 + input_section->output_offset); \
1215 else \
1216 ARC_DEBUG ("symbol_section->vma = NULL\n"); \
1217 ARC_DEBUG ("PCL = %#lx\n", P); \
1218 ARC_DEBUG ("P = %#lx\n", P); \
1219 ARC_DEBUG ("G = %#lx\n", G); \
1220 ARC_DEBUG ("SDA_OFFSET = %#lx\n", _SDA_BASE_); \
34e967a5 1221 ARC_DEBUG ("SDA_SET = %d\n", reloc_data.sdata_begin_symbol_vma_set); \
f7e8b360
NC		 1222 ARC_DEBUG ("GOT_OFFSET = %#lx\n", GOT); \
1223 ARC_DEBUG ("relocation = %#08lx\n", relocation); \
1224 ARC_DEBUG ("before = %#08x\n", (unsigned) insn); \
1225 ARC_DEBUG ("data = %08x (%u) (%d)\n", (unsigned) relocation, \
1226 (unsigned) relocation, (int) relocation); \
1227 } \
1228 while (0)
1229
1230#define PRINT_DEBUG_RELOC_INFO_AFTER \
1231 do \
1232 { \
1233 ARC_DEBUG ("after = 0x%08x\n", (unsigned int) insn); \
1234 } \
1235 while (0)
34e967a5 1236
f7e8b360
NC		 1237#else
1238
1239#define PRINT_DEBUG_RELOC_INFO_BEFORE(...)
1240#define PRINT_DEBUG_RELOC_INFO_AFTER
1241
1242#endif /* ARC_ENABLE_DEBUG */
34e967a5 1243
886a2506 1244#define ARC_RELOC_HOWTO(TYPE, VALUE, SIZE, BITSIZE, RELOC_FUNCTION, OVERFLOW, FORMULA) \
f7e8b360
NC		 1245 case R_##TYPE: \
1246 { \
1247 bfd_signed_vma bitsize ATTRIBUTE_UNUSED = BITSIZE; \
1248 relocation = FORMULA ; \
1249 PRINT_DEBUG_RELOC_INFO_BEFORE (#FORMULA, #TYPE); \
1250 insn = middle_endian_convert (insn, IS_ME (#FORMULA, abfd)); \
1251 insn = (* get_replace_function (abfd, TYPE)) (insn, relocation); \
1252 insn = middle_endian_convert (insn, IS_ME (#FORMULA, abfd)); \
1253 PRINT_DEBUG_RELOC_INFO_AFTER; \
1254 } \
886a2506
NC		 1255 break;
1256
1257static bfd_reloc_status_type
34e967a5
MC		 1258arc_do_relocation (bfd_byte * contents,
1259 struct arc_relocation_data reloc_data,
1260 struct bfd_link_info *info)
886a2506 1261{
094fb063 1262 bfd_signed_vma relocation = 0;
886a2506
NC		 1263 bfd_vma insn;
1264 bfd_vma orig_insn ATTRIBUTE_UNUSED;
72f3b6aa 1265 bfd * abfd = reloc_data.input_section->owner;
34e967a5 1266 struct elf_link_hash_table *htab ATTRIBUTE_UNUSED = elf_hash_table (info);
4b0c052e 1267 bfd_reloc_status_type flag;
886a2506 1268
535b785f 1269 if (!reloc_data.should_relocate)
34e967a5 1270 return bfd_reloc_ok;
886a2506
NC		 1271
1272 switch (reloc_data.howto->size)
1273 {
1274 case 2:
72f3b6aa 1275 insn = arc_bfd_get_32 (abfd,
886a2506
NC		 1276 contents + reloc_data.reloc_offset,
1277 reloc_data.input_section);
1278 break;
1279 case 1:
72f3b6aa
CZ		 1280 insn = arc_bfd_get_16 (abfd,
1281 contents + reloc_data.reloc_offset,
1282 reloc_data.input_section);
1283 break;
886a2506 1284 case 0:
72f3b6aa 1285 insn = arc_bfd_get_8 (abfd,
886a2506
NC		 1286 contents + reloc_data.reloc_offset,
1287 reloc_data.input_section);
1288 break;
1289 default:
1290 insn = 0;
1291 BFD_ASSERT (0);
1292 break;
1293 }
1294
1295 orig_insn = insn;
1296
1297 switch (reloc_data.howto->type)
1298 {
34e967a5 1299#include "elf/arc-reloc.def"
886a2506
NC		 1300
1301 default:
1302 BFD_ASSERT (0);
1303 break;
1304 }
1305
1306 /* Check for relocation overflow. */
1307 if (reloc_data.howto->complain_on_overflow != complain_overflow_dont)
4b0c052e 1308 flag = bfd_check_overflow (reloc_data.howto->complain_on_overflow,
08759e0f
CM		 1309 reloc_data.howto->bitsize,
1310 reloc_data.howto->rightshift,
1311 bfd_arch_bits_per_address (abfd),
1312 relocation);
4b0c052e
AB		 1313 else
1314 flag = arc_special_overflow_checks (reloc_data, relocation, info);
886a2506 1315
4b0c052e
AB		 1316 if (flag != bfd_reloc_ok)
1317 {
f7e8b360 1318 ARC_DEBUG ("Relocation overflows !\n");
4b0c052e 1319 DEBUG_ARC_RELOC (reloc_data);
f7e8b360
NC		 1320 ARC_DEBUG ("Relocation value = signed -> %d, unsigned -> %u"
1321 ", hex -> (0x%08x)\n",
1322 (int) relocation, (unsigned) relocation, (int) relocation);
886a2506 1323
4b0c052e 1324 return flag;
886a2506 1325 }
886a2506 1326
4b0c052e 1327 /* Write updated instruction back to memory. */
886a2506
NC		 1328 switch (reloc_data.howto->size)
1329 {
1330 case 2:
72f3b6aa 1331 arc_bfd_put_32 (abfd, insn,
886a2506
NC		 1332 contents + reloc_data.reloc_offset,
1333 reloc_data.input_section);
1334 break;
1335 case 1:
72f3b6aa
CZ		 1336 arc_bfd_put_16 (abfd, insn,
1337 contents + reloc_data.reloc_offset,
1338 reloc_data.input_section);
1339 break;
886a2506 1340 case 0:
72f3b6aa 1341 arc_bfd_put_8 (abfd, insn,
886a2506
NC		 1342 contents + reloc_data.reloc_offset,
1343 reloc_data.input_section);
1344 break;
1345 default:
1346 ARC_DEBUG ("size = %d\n", reloc_data.howto->size);
1347 BFD_ASSERT (0);
1348 break;
1349 }
1350
1351 return bfd_reloc_ok;
1352}
1353#undef S
1354#undef A
1355#undef B
1356#undef G
1357#undef GOT
1358#undef L
1359#undef MES
1360#undef P
1361#undef SECTSTAR
1362#undef SECTSTART
1363#undef _SDA_BASE_
1364#undef none
1365
1366#undef ARC_RELOC_HOWTO
1367
886a2506 1368
886a2506
NC		 1369/* Relocate an arc ELF section.
1370 Function : elf_arc_relocate_section
1371 Brief : Relocate an arc section, by handling all the relocations
34e967a5 1372 appearing in that section.
886a2506 1373 Args : output_bfd : The bfd being written to.
34e967a5
MC		 1374 info : Link information.
1375 input_bfd : The input bfd.
1376 input_section : The section being relocated.
1377 contents : contents of the section being relocated.
1378 relocs : List of relocations in the section.
1379 local_syms : is a pointer to the swapped in local symbols.
1380 local_section : is an array giving the section in the input file
1381 corresponding to the st_shndx field of each
1382 local symbol. */
886a2506 1383static bfd_boolean
f7e8b360 1384elf_arc_relocate_section (bfd * output_bfd,
886a2506 1385 struct bfd_link_info * info,
f7e8b360
NC		 1386 bfd * input_bfd,
1387 asection * input_section,
1388 bfd_byte * contents,
886a2506
NC		 1389 Elf_Internal_Rela * relocs,
1390 Elf_Internal_Sym * local_syms,
f7e8b360 1391 asection ** local_sections)
886a2506 1392{
f7e8b360
NC		 1393 Elf_Internal_Shdr * symtab_hdr;
1394 struct elf_link_hash_entry ** sym_hashes;
1395 Elf_Internal_Rela * rel;
1396 Elf_Internal_Rela * wrel;
1397 Elf_Internal_Rela * relend;
1398 struct elf_link_hash_table * htab = elf_hash_table (info);
886a2506
NC		 1399
1400 symtab_hdr = &((elf_tdata (input_bfd))->symtab_hdr);
1401 sym_hashes = elf_sym_hashes (input_bfd);
1402
3c8adaca 1403 rel = wrel = relocs;
886a2506 1404 relend = relocs + input_section->reloc_count;
3c8adaca 1405 for (; rel < relend; wrel++, rel++)
886a2506
NC		 1406 {
1407 enum elf_arc_reloc_type r_type;
34e967a5 1408 reloc_howto_type * howto;
f7e8b360 1409 unsigned long r_symndx;
886a2506 1410 struct elf_link_hash_entry * h;
34e967a5
MC		 1411 Elf_Internal_Sym * sym;
1412 asection * sec;
f7e8b360
NC		 1413 struct elf_link_hash_entry * h2;
1414 const char * msg;
886a2506
NC		 1415
1416 struct arc_relocation_data reloc_data =
1417 {
34e967a5
MC		 1418 .reloc_offset = 0,
1419 .reloc_addend = 0,
1420 .got_offset_value = 0,
1421 .sym_value = 0,
1422 .sym_section = NULL,
1423 .howto = 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
886a2506
NC		 1429 };
1430
34e967a5
MC		 1431 r_type = ELF32_R_TYPE (rel->r_info);
1432
1433 if (r_type >= (int) R_ARC_max)
1434 {
1435 bfd_set_error (bfd_error_bad_value);
1436 return FALSE;
1437 }
3c8adaca 1438 howto = arc_elf_howto (r_type);
34e967a5
MC		 1439
1440 r_symndx = ELF32_R_SYM (rel->r_info);
1441
1442 /* If we are generating another .o file and the symbol in not
1443 local, skip this relocation. */
1444 if (bfd_link_relocatable (info))
1445 {
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. */
1450
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)
1454 {
1455 sym = local_syms + r_symndx;
1456 if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1457 {
1458 sec = local_sections[r_symndx];
1459
f7e8b360 1460 /* For RELA relocs. Just adjust the addend
34e967a5
MC		 1461 value in the relocation entry. */
1462 rel->r_addend += sec->output_offset + sym->st_value;
1463
f7e8b360
NC		 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__);
34e967a5
MC		 1467 }
1468 }
34e967a5 1469 }
886a2506
NC		 1470
1471 h2 = elf_link_hash_lookup (elf_hash_table (info), "__SDATA_BEGIN__",
1472 FALSE, FALSE, TRUE);
1473
535b785f
AM		 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)
34e967a5 1477 /* TODO: Verify this condition. */
886a2506
NC		 1478 {
1479 reloc_data.sdata_begin_symbol_vma =
08759e0f
CM		 1480 (h2->root.u.def.value
1481 + h2->root.u.def.section->output_section->vma);
886a2506
NC		 1482 reloc_data.sdata_begin_symbol_vma_set = TRUE;
1483 }
1484
886a2506
NC		 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;
1489
886a2506
NC		 1490 /* This is a final link. */
1491 h = NULL;
1492 sym = NULL;
1493 sec = NULL;
1494
1495 if (r_symndx < symtab_hdr->sh_info) /* A local symbol. */
1496 {
1497 sym = local_syms + r_symndx;
1498 sec = local_sections[r_symndx];
3c8adaca
CZ		 1499 }
1500 else
1501 {
1502 /* TODO: This code is repeated from below. We should
1503 clean it and remove duplications.
1504 Sec is used check for discarded sections.
1505 Need to redesign code below. */
1506
1507 /* Get the symbol's entry in the symtab. */
1508 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1509
1510 while (h->root.type == bfd_link_hash_indirect
1511 || h->root.type == bfd_link_hash_warning)
1512 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1513
1514 /* If we have encountered a definition for this symbol. */
1515 if (h->root.type == bfd_link_hash_defined
1516 || h->root.type == bfd_link_hash_defweak)
1517 {
1518 reloc_data.sym_value = h->root.u.def.value;
1519 sec = h->root.u.def.section;
1520 }
1521 }
1522
1523 /* Clean relocs for symbols in discarded sections. */
1524 if (sec != NULL && discarded_section (sec))
1525 {
1526 _bfd_clear_contents (howto, input_bfd, input_section,
1527 contents + rel->r_offset);
1528 rel->r_offset = rel->r_offset;
1529 rel->r_info = 0;
1530 rel->r_addend = 0;
1531
1532 /* For ld -r, remove relocations in debug sections against
1533 sections defined in discarded sections. Not done for
1534 eh_frame editing code expects to be present. */
1535 if (bfd_link_relocatable (info)
1536 && (input_section->flags & SEC_DEBUGGING))
1537 wrel--;
1538
1539 continue;
1540 }
1541
1542 if (bfd_link_relocatable (info))
1543 {
1544 if (wrel != rel)
1545 *wrel = *rel;
1546 continue;
1547 }
1548
1549 if (r_symndx < symtab_hdr->sh_info) /* A local symbol. */
1550 {
886a2506
NC		 1551 reloc_data.sym_value = sym->st_value;
1552 reloc_data.sym_section = sec;
4b0c052e 1553 reloc_data.symbol_name =
3c8adaca
CZ		 1554 bfd_elf_string_from_elf_section (input_bfd,
1555 symtab_hdr->sh_link,
1556 sym->st_name);
886a2506 1557
841fdfcd
CZ		 1558 /* Mergeable section handling. */
1559 if ((sec->flags & SEC_MERGE)
1560 && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
1561 {
1562 asection *msec;
1563 msec = sec;
1564 rel->r_addend = _bfd_elf_rel_local_sym (output_bfd, sym,
1565 &msec, rel->r_addend);
1566 rel->r_addend -= (sec->output_section->vma
1567 + sec->output_offset
1568 + sym->st_value);
1569 rel->r_addend += msec->output_section->vma + msec->output_offset;
1570
1571 reloc_data.reloc_addend = rel->r_addend;
1572 }
1573
34e967a5
MC		 1574 BFD_ASSERT (htab->sgot != NULL || !is_reloc_for_GOT (howto));
1575 if (htab->sgot != NULL)
1576 reloc_data.got_symbol_vma = htab->sgot->output_section->vma
1577 + htab->sgot->output_offset;
886a2506
NC		 1578
1579 reloc_data.should_relocate = TRUE;
1580 }
1581 else /* Global symbol. */
1582 {
f7e8b360
NC		 1583 /* FIXME: We should use the RELOC_FOR_GLOBAL_SYMBOL macro
1584 (defined in elf-bfd.h) here. */
1585
886a2506
NC		 1586 /* Get the symbol's entry in the symtab. */
1587 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1588
1589 while (h->root.type == bfd_link_hash_indirect
1590 || h->root.type == bfd_link_hash_warning)
cc89d0b3
CM		 1591 {
1592 struct elf_link_hash_entry *h_old = h;
886a2506 1593 h = (struct elf_link_hash_entry *) h->root.u.i.link;
cc89d0b3
CM		 1594 if (h->got.glist == 0 && h_old->got.glist != h->got.glist)
1595 h->got.glist = h_old->got.glist;
1596 }
886a2506 1597
3c8adaca
CZ		 1598 /* TODO: Need to validate what was the intention. */
1599 /* BFD_ASSERT ((h->dynindx == -1) || (h->forced_local != 0)); */
4b0c052e 1600 reloc_data.symbol_name = h->root.root.string;
3c8adaca 1601
886a2506
NC		 1602 /* If we have encountered a definition for this symbol. */
1603 if (h->root.type == bfd_link_hash_defined
1604 || h->root.type == bfd_link_hash_defweak)
1605 {
1606 reloc_data.sym_value = h->root.u.def.value;
1607 reloc_data.sym_section = h->root.u.def.section;
1608
1609 reloc_data.should_relocate = TRUE;
1610
34e967a5 1611 if (is_reloc_for_GOT (howto) && !bfd_link_pic (info))
886a2506 1612 {
34e967a5
MC		 1613 /* TODO: Change it to use arc_do_relocation with
1614 ARC_32 reloc. Try to use ADD_RELA macro. */
886a2506
NC		 1615 bfd_vma relocation =
1616 reloc_data.sym_value + reloc_data.reloc_addend
34e967a5
MC		 1617 + (reloc_data.sym_section->output_section != NULL ?
1618 (reloc_data.sym_section->output_offset
1619 + reloc_data.sym_section->output_section->vma)
1620 : 0);
1621
1622 BFD_ASSERT (h->got.glist);
1623 bfd_vma got_offset = h->got.glist->offset;
1624 bfd_put_32 (output_bfd, relocation,
1625 htab->sgot->contents + got_offset);
1626 }
1627 if (is_reloc_for_PLT (howto) && h->plt.offset != (bfd_vma) -1)
1628 {
1629 /* TODO: This is repeated up here. */
1630 reloc_data.sym_value = h->plt.offset;
1631 reloc_data.sym_section = htab->splt;
886a2506
NC		 1632 }
1633 }
1634 else if (h->root.type == bfd_link_hash_undefweak)
1635 {
1636 /* Is weak symbol and has no definition. */
34e967a5
MC		 1637 if (is_reloc_for_GOT (howto))
1638 {
1639 reloc_data.sym_value = h->root.u.def.value;
1640 reloc_data.sym_section = htab->sgot;
1641 reloc_data.should_relocate = TRUE;
1642 }
1643 else if (is_reloc_for_PLT (howto)
1644 && h->plt.offset != (bfd_vma) -1)
1645 {
1646 /* TODO: This is repeated up here. */
1647 reloc_data.sym_value = h->plt.offset;
1648 reloc_data.sym_section = htab->splt;
1649 reloc_data.should_relocate = TRUE;
1650 }
1651 else
1652 continue;
886a2506
NC		 1653 }
1654 else
1655 {
1656 if (is_reloc_for_GOT (howto))
1657 {
886a2506 1658 reloc_data.sym_value = h->root.u.def.value;
34e967a5 1659 reloc_data.sym_section = htab->sgot;
886a2506
NC		 1660
1661 reloc_data.should_relocate = TRUE;
1662 }
1663 else if (is_reloc_for_PLT (howto))
1664 {
7e458899
CZ		 1665 /* Fail if it is linking for PIE and the symbol is
1666 undefined. */
1a72702b
AM		 1667 if (bfd_link_executable (info))
1668 (*info->callbacks->undefined_symbol)
1669 (info, h->root.root.string, input_bfd, input_section,
1670 rel->r_offset, TRUE);
886a2506 1671 reloc_data.sym_value = h->plt.offset;
34e967a5 1672 reloc_data.sym_section = htab->splt;
886a2506
NC		 1673
1674 reloc_data.should_relocate = TRUE;
1675 }
8a36df4d 1676 else if (!bfd_link_pic (info) || bfd_link_executable (info))
1a72702b
AM		 1677 (*info->callbacks->undefined_symbol)
1678 (info, h->root.root.string, input_bfd, input_section,
1679 rel->r_offset, TRUE);
886a2506
NC		 1680 }
1681
34e967a5
MC		 1682 BFD_ASSERT (htab->sgot != NULL || !is_reloc_for_GOT (howto));
1683 if (htab->sgot != NULL)
1684 reloc_data.got_symbol_vma = htab->sgot->output_section->vma
1685 + htab->sgot->output_offset;
886a2506
NC		 1686 }
1687
08759e0f
CM		 1688 if ((is_reloc_for_GOT (howto)
1689 || is_reloc_for_TLS (howto)))
1690 {
980aa3e6
CM		 1691 reloc_data.should_relocate = TRUE;
1692
08759e0f
CM		 1693 struct got_entry **list
1694 = get_got_entry_list_for_symbol (output_bfd, r_symndx, h);
1695
1696 reloc_data.got_offset_value
1697 = relocate_fix_got_relocs_for_got_info (list,
1698 tls_type_for_reloc (howto),
1699 info,
1700 output_bfd,
1701 r_symndx,
1702 local_syms,
1703 local_sections,
1704 h,
1705 &reloc_data);
1706
1707 if (h == NULL)
1708 {
1709 create_got_dynrelocs_for_single_entry (
1710 got_entry_for_type (list,
1711 arc_got_entry_type_for_reloc (howto)),
1712 output_bfd, info, NULL);
1713 }
1714 }
f7e8b360 1715
34e967a5
MC		 1716 switch (r_type)
1717 {
1718 case R_ARC_32:
1719 case R_ARC_32_ME:
1720 case R_ARC_PC32:
1721 case R_ARC_32_PCREL:
8a36df4d 1722 if ((bfd_link_pic (info))
34e967a5
MC		 1723 && ((r_type != R_ARC_PC32 && r_type != R_ARC_32_PCREL)
1724 || (h != NULL
1725 && h->dynindx != -1
1726 && (!info->symbolic || !h->def_regular))))
1727 {
1728 Elf_Internal_Rela outrel;
1729 bfd_byte *loc;
1730 bfd_boolean skip = FALSE;
1731 bfd_boolean relocate = FALSE;
1732 asection *sreloc = _bfd_elf_get_dynamic_reloc_section
1733 (input_bfd, input_section,
1734 /*RELA*/ TRUE);
1735
1736 BFD_ASSERT (sreloc != NULL);
1737
1738 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
1739 info,
1740 input_section,
1741 rel->r_offset);
1742 if (outrel.r_offset == (bfd_vma) -1)
1743 skip = TRUE;
1744
1745 outrel.r_addend = rel->r_addend;
1746 outrel.r_offset += (input_section->output_section->vma
1747 + input_section->output_offset);
1748
3c8adaca 1749#define IS_ARC_PCREL_TYPE(TYPE) \
f7e8b360 1750 ( (TYPE == R_ARC_PC32) \
3c8adaca 1751 || (TYPE == R_ARC_32_PCREL))
f7e8b360 1752
34e967a5
MC		 1753 if (skip)
1754 {
1755 memset (&outrel, 0, sizeof outrel);
1756 relocate = FALSE;
1757 }
3c8adaca
CZ		 1758 else if (h != NULL
1759 && h->dynindx != -1
1760 && ((IS_ARC_PCREL_TYPE (r_type))
1761 || !(bfd_link_executable (info)
1762 || SYMBOLIC_BIND (info, h))
1763 || ! h->def_regular))
34e967a5 1764 {
94e5c971 1765 BFD_ASSERT (h != NULL);
34e967a5
MC		 1766 if ((input_section->flags & SEC_ALLOC) != 0)
1767 relocate = FALSE;
1768 else
1769 relocate = TRUE;
94e5c971
CZ		 1770
1771 BFD_ASSERT (h->dynindx != -1);
34e967a5
MC		 1772 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1773 }
1774 else
1775 {
1776 /* Handle local symbols, they either do not have a
1777 global hash table entry (h == NULL), or are
1778 forced local due to a version script
1779 (h->forced_local), or the third condition is
1780 legacy, it appears to say something like, for
1781 links where we are pre-binding the symbols, or
1782 there's not an entry for this symbol in the
1783 dynamic symbol table, and it's a regular symbol
1784 not defined in a shared object, then treat the
1785 symbol as local, resolve it now. */
3c8adaca
CZ		 1786 relocate = TRUE;
1787 /* outrel.r_addend = 0; */
1788 outrel.r_info = ELF32_R_INFO (0, R_ARC_RELATIVE);
34e967a5
MC		 1789 }
1790
1791 BFD_ASSERT (sreloc->contents != 0);
1792
1793 loc = sreloc->contents;
1794 loc += sreloc->reloc_count * sizeof (Elf32_External_Rela);
1795 sreloc->reloc_count += 1;
1796
1797 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1798
535b785f 1799 if (!relocate)
34e967a5
MC		 1800 continue;
1801 }
1802 break;
1803 default:
1804 break;
1805 }
1806
1807 if (is_reloc_SDA_relative (howto)
535b785f 1808 && !reloc_data.sdata_begin_symbol_vma_set)
886a2506 1809 {
4eca0228
AM		 1810 _bfd_error_handler
1811 ("Error: Linker symbol __SDATA_BEGIN__ not found");
886a2506
NC		 1812 bfd_set_error (bfd_error_bad_value);
1813 return FALSE;
1814 }
1815
1816 DEBUG_ARC_RELOC (reloc_data);
34e967a5 1817
2ab2f40d 1818 /* Make sure we have with a dynamic linker. In case of GOT and PLT
08759e0f 1819 the sym_section should point to .got or .plt respectively. */
815dc1bc
CZ		 1820 if ((is_reloc_for_GOT (howto) || is_reloc_for_PLT (howto))
1821 && reloc_data.sym_section == NULL)
2ab2f40d 1822 {
4eca0228 1823 _bfd_error_handler
2ab2f40d
CM		 1824 (_("GOT and PLT relocations cannot be fixed with a non dynamic linker."));
1825 bfd_set_error (bfd_error_bad_value);
1826 return FALSE;
1827 }
1828
f7e8b360
NC		 1829 msg = NULL;
1830 switch (arc_do_relocation (contents, reloc_data, info))
1831 {
1832 case bfd_reloc_ok:
1833 continue; /* The reloc processing loop. */
1834
1835 case bfd_reloc_overflow:
1836 (*info->callbacks->reloc_overflow)
1837 (info, (h ? &h->root : NULL), reloc_data.symbol_name, howto->name, (bfd_vma) 0,
1838 input_bfd, input_section, rel->r_offset);
1839 break;
1840
1841 case bfd_reloc_undefined:
1842 (*info->callbacks->undefined_symbol)
1843 (info, reloc_data.symbol_name, input_bfd, input_section, rel->r_offset, TRUE);
1844 break;
1845
1846 case bfd_reloc_other:
695344c0 1847 /* xgettext:c-format */
f7e8b360
NC		 1848 msg = _("%B(%A): warning: unaligned access to symbol '%s' in the small data area");
1849 break;
1850
1851 case bfd_reloc_outofrange:
695344c0 1852 /* xgettext:c-format */
f7e8b360
NC		 1853 msg = _("%B(%A): internal error: out of range error");
1854 break;
1855
1856 case bfd_reloc_notsupported:
695344c0 1857 /* xgettext:c-format */
f7e8b360
NC		 1858 msg = _("%B(%A): internal error: unsupported relocation error");
1859 break;
1860
1861 case bfd_reloc_dangerous:
695344c0 1862 /* xgettext:c-format */
f7e8b360
NC		 1863 msg = _("%B(%A): internal error: dangerous relocation");
1864 break;
1865
1866 default:
695344c0 1867 /* xgettext:c-format */
f7e8b360
NC		 1868 msg = _("%B(%A): internal error: unknown error");
1869 break;
1870 }
1871
1872 if (msg)
1873 _bfd_error_handler (msg, input_bfd, input_section, reloc_data.symbol_name);
1874 return FALSE;
886a2506
NC		 1875 }
1876
1877 return TRUE;
1878}
1879
8a36df4d
CM		 1880#define elf_arc_hash_table(p) \
1881 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
1882 == ARC_ELF_DATA ? ((struct elf_arc_link_hash_table *) ((p)->hash)) : NULL)
1883
886a2506 1884static bfd_boolean
08759e0f 1885elf_arc_check_relocs (bfd * abfd,
886a2506 1886 struct bfd_link_info * info,
34e967a5 1887 asection * sec,
886a2506
NC		 1888 const Elf_Internal_Rela * relocs)
1889{
34e967a5
MC		 1890 Elf_Internal_Shdr * symtab_hdr;
1891 struct elf_link_hash_entry ** sym_hashes;
34e967a5
MC		 1892 const Elf_Internal_Rela * rel;
1893 const Elf_Internal_Rela * rel_end;
1894 bfd * dynobj;
1895 asection * sreloc = NULL;
34e967a5
MC		 1896
1897 if (bfd_link_relocatable (info))
1898 return TRUE;
886a2506
NC		 1899
1900 dynobj = (elf_hash_table (info))->dynobj;
1901 symtab_hdr = &((elf_tdata (abfd))->symtab_hdr);
1902 sym_hashes = elf_sym_hashes (abfd);
886a2506
NC		 1903
1904 rel_end = relocs + sec->reloc_count;
1905 for (rel = relocs; rel < rel_end; rel++)
1906 {
1907 enum elf_arc_reloc_type r_type;
1908 reloc_howto_type *howto;
1909 unsigned long r_symndx;
1910 struct elf_link_hash_entry *h;
1911
1912 r_type = ELF32_R_TYPE (rel->r_info);
1913
1914 if (r_type >= (int) R_ARC_max)
1915 {
1916 bfd_set_error (bfd_error_bad_value);
1917 return FALSE;
1918 }
3c8adaca 1919 howto = arc_elf_howto (r_type);
34e967a5
MC		 1920
1921 if (dynobj == NULL
535b785f
AM		 1922 && (is_reloc_for_GOT (howto)
1923 || is_reloc_for_TLS (howto)))
34e967a5
MC		 1924 {
1925 dynobj = elf_hash_table (info)->dynobj = abfd;
1926 if (! _bfd_elf_create_got_section (abfd, info))
1927 return FALSE;
1928 }
886a2506
NC		 1929
1930 /* Load symbol information. */
1931 r_symndx = ELF32_R_SYM (rel->r_info);
1932 if (r_symndx < symtab_hdr->sh_info) /* Is a local symbol. */
1933 h = NULL;
1934 else /* Global one. */
1935 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1936
34e967a5
MC		 1937 switch (r_type)
1938 {
1939 case R_ARC_32:
1940 case R_ARC_32_ME:
1941 /* During shared library creation, these relocs should not
1942 appear in a shared library (as memory will be read only
1943 and the dynamic linker can not resolve these. However
1944 the error should not occur for e.g. debugging or
1945 non-readonly sections. */
9d5c718b
CM		 1946 if (h != NULL
1947 && (bfd_link_dll (info) && !bfd_link_pie (info))
34e967a5 1948 && (sec->flags & SEC_ALLOC) != 0
3c8adaca
CZ		 1949 && (sec->flags & SEC_READONLY) != 0
1950 && ((sec->flags & SEC_CODE) != 0
1951 || (sec->flags & SEC_DEBUGGING) != 0))
34e967a5
MC		 1952 {
1953 const char *name;
1954 if (h)
1955 name = h->root.root.string;
1956 else
1957 /* bfd_elf_sym_name (abfd, symtab_hdr, isym, NULL); */
1958 name = "UNKNOWN";
4eca0228 1959 _bfd_error_handler
695344c0 1960 /* xgettext:c-format */
34e967a5
MC		 1961 (_("\
1962%B: relocation %s against `%s' can not be used when making a shared object; recompile with -fPIC"),
1963 abfd,
1964 arc_elf_howto (r_type)->name,
1965 name);
1966 bfd_set_error (bfd_error_bad_value);
1967 return FALSE;
1968 }
1969
1970 /* In some cases we are not setting the 'non_got_ref'
1971 flag, even though the relocations don't require a GOT
1972 access. We should extend the testing in this area to
1973 ensure that no significant cases are being missed. */
1974 if (h)
1975 h->non_got_ref = 1;
1976 /* FALLTHROUGH */
1977 case R_ARC_PC32:
1978 case R_ARC_32_PCREL:
8a36df4d 1979 if ((bfd_link_pic (info))
34e967a5
MC		 1980 && ((r_type != R_ARC_PC32 && r_type != R_ARC_32_PCREL)
1981 || (h != NULL
34e967a5
MC		 1982 && (!info->symbolic || !h->def_regular))))
1983 {
1984 if (sreloc == NULL)
1985 {
1986 sreloc = _bfd_elf_make_dynamic_reloc_section (sec, dynobj,
1987 2, abfd,
1988 /*rela*/
1989 TRUE);
1990
1991 if (sreloc == NULL)
1992 return FALSE;
1993 }
1994 sreloc->size += sizeof (Elf32_External_Rela);
1995
1996 }
1997 default:
1998 break;
1999 }
2000
535b785f 2001 if (is_reloc_for_PLT (howto))
886a2506
NC		 2002 {
2003 if (h == NULL)
2004 continue;
2005 else
2006 h->needs_plt = 1;
2007 }
2008
08759e0f 2009 /* Add info to the symbol got_entry_list. */
535b785f
AM		 2010 if (is_reloc_for_GOT (howto)
2011 || is_reloc_for_TLS (howto))
34e967a5 2012 {
08759e0f
CM		 2013 arc_fill_got_info_for_reloc (
2014 arc_got_entry_type_for_reloc (howto),
2015 get_got_entry_list_for_symbol (abfd, r_symndx, h),
2016 info,
2017 h);
34e967a5
MC		 2018 }
2019 }
886a2506 2020
34e967a5
MC		 2021 return TRUE;
2022}
886a2506 2023
34e967a5 2024#define ELF_DYNAMIC_INTERPRETER "/sbin/ld-uClibc.so"
886a2506 2025
34e967a5
MC		 2026static struct plt_version_t *
2027arc_get_plt_version (struct bfd_link_info *info)
886a2506 2028{
34e967a5 2029 int i;
886a2506 2030
34e967a5
MC		 2031 for (i = 0; i < 1; i++)
2032 {
2033 ARC_DEBUG ("%d: size1 = %d, size2 = %d\n", i,
f7e8b360
NC		 2034 (int) plt_versions[i].entry_size,
2035 (int) plt_versions[i].elem_size);
34e967a5 2036 }
886a2506 2037
34e967a5 2038 if (bfd_get_mach (info->output_bfd) == bfd_mach_arc_arcv2)
886a2506 2039 {
34e967a5
MC		 2040 if (bfd_link_pic (info))
2041 return &(plt_versions[ELF_ARCV2_PIC]);
2042 else
2043 return &(plt_versions[ELF_ARCV2_ABS]);
2044 }
2045 else
886a2506 2046 {
34e967a5
MC		 2047 if (bfd_link_pic (info))
2048 return &(plt_versions[ELF_ARC_PIC]);
2049 else
2050 return &(plt_versions[ELF_ARC_ABS]);
886a2506 2051 }
886a2506
NC		 2052}
2053
2054static bfd_vma
2055add_symbol_to_plt (struct bfd_link_info *info)
2056{
34e967a5 2057 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506
NC		 2058 bfd_vma ret;
2059
34e967a5 2060 struct plt_version_t *plt_data = arc_get_plt_version (info);
886a2506 2061
34e967a5
MC		 2062 /* If this is the first .plt entry, make room for the special first
2063 entry. */
2064 if (htab->splt->size == 0)
2065 htab->splt->size += plt_data->entry_size;
886a2506 2066
34e967a5
MC		 2067 ret = htab->splt->size;
2068
2069 htab->splt->size += plt_data->elem_size;
f7e8b360 2070 ARC_DEBUG ("PLT_SIZE = %d\n", (int) htab->splt->size);
34e967a5
MC		 2071
2072 htab->sgotplt->size += 4;
2073 htab->srelplt->size += sizeof (Elf32_External_Rela);
886a2506
NC		 2074
2075 return ret;
2076}
2077
34e967a5
MC		 2078#define PLT_DO_RELOCS_FOR_ENTRY(ABFD, DS, RELOCS) \
2079 plt_do_relocs_for_symbol (ABFD, DS, RELOCS, 0, 0)
886a2506
NC		 2080
2081static void
34e967a5
MC		 2082plt_do_relocs_for_symbol (bfd *abfd,
2083 struct elf_link_hash_table *htab,
2084 const struct plt_reloc *reloc,
886a2506
NC		 2085 bfd_vma plt_offset,
2086 bfd_vma symbol_got_offset)
2087{
2088 while (SYM_ONLY (reloc->symbol) != LAST_RELOC)
2089 {
2090 bfd_vma relocation = 0;
2091
2092 switch (SYM_ONLY (reloc->symbol))
2093 {
2094 case SGOT:
08759e0f
CM		 2095 relocation
2096 = htab->sgotplt->output_section->vma
2097 + htab->sgotplt->output_offset + symbol_got_offset;
886a2506
NC		 2098 break;
2099 }
2100 relocation += reloc->addend;
2101
34e967a5
MC		 2102 if (IS_RELATIVE (reloc->symbol))
2103 {
2104 bfd_vma reloc_offset = reloc->offset;
2105 reloc_offset -= (IS_INSN_32 (reloc->symbol)) ? 4 : 0;
2106 reloc_offset -= (IS_INSN_24 (reloc->symbol)) ? 2 : 0;
886a2506 2107
34e967a5
MC		 2108 relocation -= htab->splt->output_section->vma
2109 + htab->splt->output_offset
2110 + plt_offset + reloc_offset;
2111 }
2112
2113 /* TODO: being ME is not a property of the relocation but of the
2114 section of which is applying the relocation. */
1e5885b7 2115 if (IS_MIDDLE_ENDIAN (reloc->symbol) && !bfd_big_endian (abfd))
886a2506 2116 {
08759e0f
CM		 2117 relocation
2118 = ((relocation & 0xffff0000) >> 16)
2119 | ((relocation & 0xffff) << 16);
886a2506
NC		 2120 }
2121
2122 switch (reloc->size)
2123 {
2124 case 32:
34e967a5 2125 bfd_put_32 (htab->splt->output_section->owner,
886a2506 2126 relocation,
34e967a5 2127 htab->splt->contents + plt_offset + reloc->offset);
886a2506
NC		 2128 break;
2129 }
2130
34e967a5 2131 reloc = &(reloc[1]); /* Jump to next relocation. */
886a2506
NC		 2132 }
2133}
2134
2135static void
34e967a5
MC		 2136relocate_plt_for_symbol (bfd *output_bfd,
2137 struct bfd_link_info *info,
886a2506
NC		 2138 struct elf_link_hash_entry *h)
2139{
34e967a5
MC		 2140 struct plt_version_t *plt_data = arc_get_plt_version (info);
2141 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506 2142
34e967a5
MC		 2143 bfd_vma plt_index = (h->plt.offset - plt_data->entry_size)
2144 / plt_data->elem_size;
886a2506
NC		 2145 bfd_vma got_offset = (plt_index + 3) * 4;
2146
f7e8b360
NC		 2147 ARC_DEBUG ("arc_info: PLT_OFFSET = %#lx, PLT_ENTRY_VMA = %#lx, \
2148GOT_ENTRY_OFFSET = %#lx, GOT_ENTRY_VMA = %#lx, for symbol %s\n",
2149 (long) h->plt.offset,
2150 (long) (htab->splt->output_section->vma
2151 + htab->splt->output_offset
2152 + h->plt.offset),
2153 (long) got_offset,
2154 (long) (htab->sgotplt->output_section->vma
2155 + htab->sgotplt->output_offset
2156 + got_offset),
34e967a5
MC		 2157 h->root.root.string);
2158
1e5885b7
CZ		 2159 {
2160 bfd_vma i = 0;
2161 uint16_t *ptr = (uint16_t *) plt_data->elem;
f7e8b360 2162
1e5885b7
CZ		 2163 for (i = 0; i < plt_data->elem_size/2; i++)
2164 {
2165 uint16_t data = ptr[i];
2166 bfd_put_16 (output_bfd,
2167 (bfd_vma) data,
2168 htab->splt->contents + h->plt.offset + (i*2));
2169 }
2170 }
2171
34e967a5
MC		 2172 plt_do_relocs_for_symbol (output_bfd, htab,
2173 plt_data->elem_relocs,
2174 h->plt.offset,
886a2506 2175 got_offset);
34e967a5
MC		 2176
2177 /* Fill in the entry in the global offset table. */
2178 bfd_put_32 (output_bfd,
2179 (bfd_vma) (htab->splt->output_section->vma
2180 + htab->splt->output_offset),
2181 htab->sgotplt->contents + got_offset);
2182
2183 /* TODO: Fill in the entry in the .rela.plt section. */
2184 {
2185 Elf_Internal_Rela rel;
2186 bfd_byte *loc;
2187
2188 rel.r_offset = (htab->sgotplt->output_section->vma
2189 + htab->sgotplt->output_offset
2190 + got_offset);
2191 rel.r_addend = 0;
94e5c971
CZ		 2192
2193 BFD_ASSERT (h->dynindx != -1);
34e967a5
MC		 2194 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARC_JMP_SLOT);
2195
2196 loc = htab->srelplt->contents;
2197 loc += plt_index * sizeof (Elf32_External_Rela); /* relA */
2198 bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
2199 }
886a2506
NC		 2200}
2201
2202static void
34e967a5
MC		 2203relocate_plt_for_entry (bfd *abfd,
2204 struct bfd_link_info *info)
886a2506 2205{
34e967a5
MC		 2206 struct plt_version_t *plt_data = arc_get_plt_version (info);
2207 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506 2208
1e5885b7
CZ		 2209 {
2210 bfd_vma i = 0;
2211 uint16_t *ptr = (uint16_t *) plt_data->entry;
2212 for (i = 0; i < plt_data->entry_size/2; i++)
2213 {
2214 uint16_t data = ptr[i];
2215 bfd_put_16 (abfd,
2216 (bfd_vma) data,
2217 htab->splt->contents + (i*2));
2218 }
2219 }
34e967a5 2220 PLT_DO_RELOCS_FOR_ENTRY (abfd, htab, plt_data->entry_relocs);
886a2506
NC		 2221}
2222
34e967a5
MC		 2223/* Desc : Adjust a symbol defined by a dynamic object and referenced
2224 by a regular object. The current definition is in some section of
2225 the dynamic object, but we're not including those sections. We
2226 have to change the definition to something the rest of the link can
886a2506
NC		 2227 understand. */
2228
2229static bfd_boolean
2230elf_arc_adjust_dynamic_symbol (struct bfd_link_info *info,
2231 struct elf_link_hash_entry *h)
2232{
34e967a5 2233 asection *s;
886a2506 2234 bfd *dynobj = (elf_hash_table (info))->dynobj;
34e967a5 2235 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506 2236
34e967a5
MC		 2237 if (h->type == STT_FUNC
2238 || h->type == STT_GNU_IFUNC
2239 || h->needs_plt == 1)
886a2506
NC		 2240 {
2241 if (!bfd_link_pic (info) && !h->def_dynamic && !h->ref_dynamic)
2242 {
2243 /* This case can occur if we saw a PLT32 reloc in an input
2244 file, but the symbol was never referred to by a dynamic
2245 object. In such a case, we don't actually need to build
2246 a procedure linkage table, and we can just do a PC32
2247 reloc instead. */
2248 BFD_ASSERT (h->needs_plt);
2249 return TRUE;
2250 }
2251
2252 /* Make sure this symbol is output as a dynamic symbol. */
2253 if (h->dynindx == -1 && !h->forced_local
2254 && !bfd_elf_link_record_dynamic_symbol (info, h))
2255 return FALSE;
2256
34e967a5
MC		 2257 if (bfd_link_pic (info)
2258 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
886a2506
NC		 2259 {
2260 bfd_vma loc = add_symbol_to_plt (info);
2261
08759e0f 2262 if (bfd_link_executable (info) && !h->def_regular)
886a2506 2263 {
34e967a5 2264 h->root.u.def.section = htab->splt;
886a2506
NC		 2265 h->root.u.def.value = loc;
2266 }
2267 h->plt.offset = loc;
2268 }
34e967a5
MC		 2269 else
2270 {
2271 h->plt.offset = (bfd_vma) -1;
2272 h->needs_plt = 0;
2273 }
2274 return TRUE;
886a2506 2275 }
34e967a5
MC		 2276
2277 /* If this is a weak symbol, and there is a real definition, the
2278 processor independent code will have arranged for us to see the
2279 real definition first, and we can just use the same value. */
2280 if (h->u.weakdef != NULL)
886a2506 2281 {
34e967a5
MC		 2282 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2283 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2284 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2285 h->root.u.def.value = h->u.weakdef->root.u.def.value;
2286 return TRUE;
886a2506
NC		 2287 }
2288
34e967a5
MC		 2289 /* This is a reference to a symbol defined by a dynamic object which
2290 is not a function. */
2291
2292 /* If we are creating a shared library, we must presume that the
2293 only references to the symbol are via the global offset table.
2294 For such cases we need not do anything here; the relocations will
2295 be handled correctly by relocate_section. */
3c8adaca
CZ		 2296 if (!bfd_link_executable (info))
2297 return TRUE;
2298
2299 /* If there are no non-GOT references, we do not need a copy
2300 relocation. */
2301 if (!h->non_got_ref)
34e967a5
MC		 2302 return TRUE;
2303
3c8adaca
CZ		 2304 /* If -z nocopyreloc was given, we won't generate them either. */
2305 if (info->nocopyreloc)
2306 {
2307 h->non_got_ref = 0;
2308 return TRUE;
2309 }
2310
34e967a5
MC		 2311 /* We must allocate the symbol in our .dynbss section, which will
2312 become part of the .bss section of the executable. There will be
2313 an entry for this symbol in the .dynsym section. The dynamic
2314 object will contain position independent code, so all references
2315 from the dynamic object to this symbol will go through the global
2316 offset table. The dynamic linker will use the .dynsym entry to
2317 determine the address it must put in the global offset table, so
2318 both the dynamic object and the regular object will refer to the
2319 same memory location for the variable. */
2320
3c8adaca
CZ		 2321 if (htab == NULL)
2322 return FALSE;
34e967a5
MC		 2323
2324 /* We must generate a R_ARC_COPY reloc to tell the dynamic linker to
2325 copy the initial value out of the dynamic object and into the
2326 runtime process image. We need to remember the offset into the
2327 .rela.bss section we are going to use. */
2328 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2329 {
8a36df4d 2330 struct elf_arc_link_hash_table *arc_htab = elf_arc_hash_table (info);
34e967a5 2331
9d19e4fd
AM		 2332 BFD_ASSERT (arc_htab->elf.srelbss != NULL);
2333 arc_htab->elf.srelbss->size += sizeof (Elf32_External_Rela);
34e967a5
MC		 2334 h->needs_copy = 1;
2335 }
2336
8a36df4d 2337 /* TODO: Move this also to arc_hash_table. */
3c8adaca
CZ		 2338 s = bfd_get_section_by_name (dynobj, ".dynbss");
2339 BFD_ASSERT (s != NULL);
34e967a5 2340
3c8adaca 2341 return _bfd_elf_adjust_dynamic_copy (info, h, s);
886a2506
NC		 2342}
2343
2344/* Function : elf_arc_finish_dynamic_symbol
2345 Brief : Finish up dynamic symbol handling. We set the
34e967a5 2346 contents of various dynamic sections here.
886a2506 2347 Args : output_bfd :
34e967a5
MC		 2348 info :
2349 h :
2350 sym :
886a2506 2351 Returns : True/False as the return status. */
34e967a5 2352
886a2506
NC		 2353static bfd_boolean
2354elf_arc_finish_dynamic_symbol (bfd * output_bfd,
2355 struct bfd_link_info *info,
2356 struct elf_link_hash_entry *h,
2357 Elf_Internal_Sym * sym)
2358{
34e967a5 2359 if (h->plt.offset != (bfd_vma) -1)
886a2506 2360 {
34e967a5
MC		 2361 relocate_plt_for_symbol (output_bfd, info, h);
2362
2363 if (!h->def_regular)
886a2506 2364 {
34e967a5
MC		 2365 /* Mark the symbol as undefined, rather than as defined in
2366 the .plt section. Leave the value alone. */
2367 sym->st_shndx = SHN_UNDEF;
886a2506 2368 }
34e967a5
MC		 2369 }
2370
34e967a5 2371
08759e0f
CM		 2372 /* This function traverses list of GOT entries and
2373 create respective dynamic relocs. */
2374 /* TODO: Make function to get list and not access the list directly. */
2375 /* TODO: Move function to relocate_section create this relocs eagerly. */
2376 create_got_dynrelocs_for_got_info (&h->got.glist,
2377 output_bfd,
2378 info,
2379 h);
34e967a5
MC		 2380
2381 if (h->needs_copy)
2382 {
8a36df4d
CM		 2383 struct elf_arc_link_hash_table *arc_htab = elf_arc_hash_table (info);
2384
2385 if (h->dynindx == -1
2386 || (h->root.type != bfd_link_hash_defined
2387 && h->root.type != bfd_link_hash_defweak)
9d19e4fd 2388 || arc_htab->elf.srelbss == NULL)
8a36df4d
CM		 2389 abort ();
2390
34e967a5
MC		 2391 bfd_vma rel_offset = (h->root.u.def.value
2392 + h->root.u.def.section->output_section->vma
2393 + h->root.u.def.section->output_offset);
2394
9d19e4fd
AM		 2395 bfd_byte * loc = arc_htab->elf.srelbss->contents
2396 + (arc_htab->elf.srelbss->reloc_count * sizeof (Elf32_External_Rela));
2397 arc_htab->elf.srelbss->reloc_count++;
34e967a5
MC		 2398
2399 Elf_Internal_Rela rel;
2400 rel.r_addend = 0;
2401 rel.r_offset = rel_offset;
94e5c971
CZ		 2402
2403 BFD_ASSERT (h->dynindx != -1);
34e967a5
MC		 2404 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARC_COPY);
2405
23a42089 2406 bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
886a2506
NC		 2407 }
2408
2409 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
2410 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
2411 || strcmp (h->root.root.string, "__DYNAMIC") == 0
2412 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2413 sym->st_shndx = SHN_ABS;
2414
2415 return TRUE;
2416}
2417
4ade44b7 2418#define GET_SYMBOL_OR_SECTION(TAG, SYMBOL, SECTION) \
34e967a5
MC		 2419 case TAG: \
2420 if (SYMBOL != NULL) \
4ade44b7
AM		 2421 h = elf_link_hash_lookup (elf_hash_table (info), \
2422 SYMBOL, FALSE, FALSE, TRUE); \
34e967a5 2423 else if (SECTION != NULL) \
4ade44b7 2424 s = bfd_get_linker_section (dynobj, SECTION); \
34e967a5 2425 break;
886a2506
NC		 2426
2427/* Function : elf_arc_finish_dynamic_sections
2428 Brief : Finish up the dynamic sections handling.
2429 Args : output_bfd :
34e967a5
MC		 2430 info :
2431 h :
2432 sym :
886a2506 2433 Returns : True/False as the return status. */
34e967a5 2434
886a2506 2435static bfd_boolean
34e967a5
MC		 2436elf_arc_finish_dynamic_sections (bfd * output_bfd,
2437 struct bfd_link_info *info)
886a2506 2438{
34e967a5 2439 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506 2440 bfd *dynobj = (elf_hash_table (info))->dynobj;
034fed0b 2441 asection *sdyn = bfd_get_linker_section (dynobj, ".dynamic");
886a2506 2442
034fed0b 2443 if (sdyn)
886a2506
NC		 2444 {
2445 Elf32_External_Dyn *dyncon, *dynconend;
2446
034fed0b 2447 dyncon = (Elf32_External_Dyn *) sdyn->contents;
08759e0f 2448 dynconend
034fed0b 2449 = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
886a2506
NC		 2450 for (; dyncon < dynconend; dyncon++)
2451 {
2452 Elf_Internal_Dyn internal_dyn;
2453 bfd_boolean do_it = FALSE;
2454
2455 struct elf_link_hash_entry *h = NULL;
2456 asection *s = NULL;
2457
2458 bfd_elf32_swap_dyn_in (dynobj, dyncon, &internal_dyn);
2459
2460 switch (internal_dyn.d_tag)
2461 {
65b94e90
CM		 2462 GET_SYMBOL_OR_SECTION (DT_INIT, info->init_function, NULL)
2463 GET_SYMBOL_OR_SECTION (DT_FINI, info->fini_function, NULL)
4ade44b7
AM		 2464 GET_SYMBOL_OR_SECTION (DT_PLTGOT, NULL, ".plt")
2465 GET_SYMBOL_OR_SECTION (DT_JMPREL, NULL, ".rela.plt")
2466 GET_SYMBOL_OR_SECTION (DT_PLTRELSZ, NULL, ".rela.plt")
4ade44b7
AM		 2467 GET_SYMBOL_OR_SECTION (DT_VERSYM, NULL, ".gnu.version")
2468 GET_SYMBOL_OR_SECTION (DT_VERDEF, NULL, ".gnu.version_d")
2469 GET_SYMBOL_OR_SECTION (DT_VERNEED, NULL, ".gnu.version_r")
886a2506
NC		 2470 default:
2471 break;
2472 }
2473
34e967a5 2474 /* In case the dynamic symbols should be updated with a symbol. */
886a2506
NC		 2475 if (h != NULL
2476 && (h->root.type == bfd_link_hash_defined
34e967a5 2477 || h->root.type == bfd_link_hash_defweak))
886a2506
NC		 2478 {
2479 asection *asec_ptr;
2480
2481 internal_dyn.d_un.d_val = h->root.u.def.value;
2482 asec_ptr = h->root.u.def.section;
2483 if (asec_ptr->output_section != NULL)
2484 {
2485 internal_dyn.d_un.d_val +=
08759e0f
CM		 2486 (asec_ptr->output_section->vma
2487 + asec_ptr->output_offset);
886a2506
NC		 2488 }
2489 else
2490 {
34e967a5
MC		 2491 /* The symbol is imported from another shared
2492 library and does not apply to this one. */
886a2506
NC		 2493 internal_dyn.d_un.d_val = 0;
2494 }
2495 do_it = TRUE;
2496 }
2497 else if (s != NULL) /* With a section information. */
2498 {
2499 switch (internal_dyn.d_tag)
2500 {
2501 case DT_PLTGOT:
2502 case DT_JMPREL:
34e967a5
MC		 2503 case DT_VERSYM:
2504 case DT_VERDEF:
2505 case DT_VERNEED:
4ade44b7
AM		 2506 internal_dyn.d_un.d_ptr = (s->output_section->vma
2507 + s->output_offset);
886a2506
NC		 2508 do_it = TRUE;
2509 break;
2510
2511 case DT_PLTRELSZ:
2512 internal_dyn.d_un.d_val = s->size;
2513 do_it = TRUE;
2514 break;
2515
886a2506
NC		 2516 default:
2517 break;
2518 }
2519 }
2520
4ade44b7 2521 if (do_it)
886a2506
NC		 2522 bfd_elf32_swap_dyn_out (output_bfd, &internal_dyn, dyncon);
2523 }
2524
34e967a5 2525 if (htab->splt->size > 0)
886a2506 2526 {
34e967a5 2527 relocate_plt_for_entry (output_bfd, info);
886a2506
NC		 2528 }
2529
34e967a5 2530 /* TODO: Validate this. */
034fed0b
AM		 2531 if (htab->srelplt->output_section != bfd_abs_section_ptr)
2532 elf_section_data (htab->srelplt->output_section)
2533 ->this_hdr.sh_entsize = 12;
886a2506
NC		 2534 }
2535
2536 /* Fill in the first three entries in the global offset table. */
34e967a5 2537 if (htab->sgot)
886a2506 2538 {
3b63d2ce
CM		 2539 struct elf_link_hash_entry *h;
2540 h = elf_link_hash_lookup (elf_hash_table (info), "_GLOBAL_OFFSET_TABLE_",
2541 FALSE, FALSE, TRUE);
2542
2543 if (h != NULL && h->root.type != bfd_link_hash_undefined
2544 && h->root.u.def.section != NULL)
886a2506 2545 {
3b63d2ce
CM		 2546 asection *sec = h->root.u.def.section;
2547
034fed0b 2548 if (sdyn == NULL)
886a2506 2549 bfd_put_32 (output_bfd, (bfd_vma) 0,
3b63d2ce 2550 sec->contents);
886a2506
NC		 2551 else
2552 bfd_put_32 (output_bfd,
034fed0b 2553 sdyn->output_section->vma + sdyn->output_offset,
3b63d2ce
CM		 2554 sec->contents);
2555 bfd_put_32 (output_bfd, (bfd_vma) 0, sec->contents + 4);
2556 bfd_put_32 (output_bfd, (bfd_vma) 0, sec->contents + 8);
886a2506
NC		 2557 }
2558 }
2559
886a2506
NC		 2560 return TRUE;
2561}
2562
34e967a5
MC		 2563#define ADD_DYNAMIC_SYMBOL(NAME, TAG) \
2564 h = elf_link_hash_lookup (elf_hash_table (info), \
2565 NAME, FALSE, FALSE, FALSE); \
2566 if ((h != NULL && (h->ref_regular || h->def_regular))) \
2567 if (! _bfd_elf_add_dynamic_entry (info, TAG, 0)) \
886a2506
NC		 2568 return FALSE;
2569
2570/* Set the sizes of the dynamic sections. */
2571static bfd_boolean
034fed0b 2572elf_arc_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
34e967a5 2573 struct bfd_link_info *info)
886a2506 2574{
034fed0b
AM		 2575 bfd *dynobj;
2576 asection *s;
2577 bfd_boolean relocs_exist = FALSE;
2578 bfd_boolean reltext_exist = FALSE;
34e967a5 2579 struct elf_link_hash_table *htab = elf_hash_table (info);
886a2506 2580
034fed0b 2581 dynobj = htab->dynobj;
886a2506
NC		 2582 BFD_ASSERT (dynobj != NULL);
2583
034fed0b 2584 if (htab->dynamic_sections_created)
886a2506
NC		 2585 {
2586 struct elf_link_hash_entry *h;
2587
34e967a5
MC		 2588 /* Set the contents of the .interp section to the
2589 interpreter. */
034fed0b 2590 if (bfd_link_executable (info) && !info->nointerp)
886a2506
NC		 2591 {
2592 s = bfd_get_section_by_name (dynobj, ".interp");
2593 BFD_ASSERT (s != NULL);
34e967a5 2594 s->size = sizeof (ELF_DYNAMIC_INTERPRETER);
886a2506
NC		 2595 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2596 }
2597
34e967a5
MC		 2598 /* Add some entries to the .dynamic section. We fill in some of
2599 the values later, in elf_bfd_final_link, but we must add the
2600 entries now so that we know the final size of the .dynamic
2601 section. Checking if the .init section is present. We also
2602 create DT_INIT and DT_FINI entries if the init_str has been
2603 changed by the user. */
65b94e90
CM		 2604 ADD_DYNAMIC_SYMBOL (info->init_function, DT_INIT);
2605 ADD_DYNAMIC_SYMBOL (info->fini_function, DT_FINI);
886a2506
NC		 2606 }
2607 else
2608 {
34e967a5
MC		 2609 /* We may have created entries in the .rela.got section.
2610 However, if we are not creating the dynamic sections, we will
2611 not actually use these entries. Reset the size of .rela.got,
2612 which will cause it to get stripped from the output file
2613 below. */
2614 if (htab->srelgot != NULL)
2615 htab->srelgot->size = 0;
886a2506
NC		 2616 }
2617
2618 for (s = dynobj->sections; s != NULL; s = s->next)
2619 {
34e967a5 2620 if ((s->flags & SEC_LINKER_CREATED) == 0)
886a2506
NC		 2621 continue;
2622
034fed0b
AM		 2623 if (s == htab->splt
2624 || s == htab->sgot
2625 || s == htab->sgotplt
2626 || s == htab->sdynbss)
886a2506 2627 {
034fed0b
AM		 2628 /* Strip this section if we don't need it. */
2629 }
2630 else if (strncmp (s->name, ".rela", 5) == 0)
2631 {
2632 if (s->size != 0 && s != htab->srelplt)
34e967a5 2633 {
034fed0b 2634 if (!reltext_exist)
34e967a5 2635 {
034fed0b
AM		 2636 const char *name = s->name + 5;
2637 bfd *ibfd;
2638 for (ibfd = info->input_bfds; ibfd; ibfd = ibfd->link.next)
2639 if (bfd_get_flavour (ibfd) == bfd_target_elf_flavour)
2640 {
2641 asection *target = bfd_get_section_by_name (ibfd, name);
2642 if (target != NULL
2643 && elf_section_data (target)->sreloc == s
2644 && ((target->output_section->flags
2645 & (SEC_READONLY | SEC_ALLOC))
2646 == (SEC_READONLY | SEC_ALLOC)))
2647 {
2648 reltext_exist = TRUE;
2649 break;
2650 }
2651 }
34e967a5 2652 }
034fed0b 2653 relocs_exist = TRUE;
34e967a5 2654 }
886a2506 2655
34e967a5
MC		 2656 /* We use the reloc_count field as a counter if we need to
2657 copy relocs into the output file. */
2658 s->reloc_count = 0;
886a2506 2659 }
034fed0b
AM		 2660 else
2661 {
2662 /* It's not one of our sections, so don't allocate space. */
2663 continue;
2664 }
34e967a5 2665
034fed0b
AM		 2666 if (s->size == 0)
2667 {
2668 s->flags |= SEC_EXCLUDE;
2669 continue;
2670 }
34e967a5 2671
034fed0b
AM		 2672 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2673 continue;
34e967a5 2674
034fed0b
AM		 2675 /* Allocate memory for the section contents. */
2676 s->contents = bfd_zalloc (dynobj, s->size);
2677 if (s->contents == NULL)
34e967a5 2678 return FALSE;
886a2506
NC		 2679 }
2680
034fed0b 2681 if (htab->dynamic_sections_created)
886a2506 2682 {
34e967a5
MC		 2683 /* TODO: Check if this is needed. */
2684 if (!bfd_link_pic (info))
2685 if (!_bfd_elf_add_dynamic_entry (info, DT_DEBUG, 0))
2686 return FALSE;
2687
2688 if (htab->splt && (htab->splt->flags & SEC_EXCLUDE) == 0)
886a2506
NC		 2689 if (!_bfd_elf_add_dynamic_entry (info, DT_PLTGOT, 0)
2690 || !_bfd_elf_add_dynamic_entry (info, DT_PLTRELSZ, 0)
2691 || !_bfd_elf_add_dynamic_entry (info, DT_PLTREL, DT_RELA)
034fed0b 2692 || !_bfd_elf_add_dynamic_entry (info, DT_JMPREL, 0))
886a2506
NC		 2693 return FALSE;
2694
034fed0b 2695 if (relocs_exist)
886a2506
NC		 2696 if (!_bfd_elf_add_dynamic_entry (info, DT_RELA, 0)
2697 || !_bfd_elf_add_dynamic_entry (info, DT_RELASZ, 0)
2ab2f40d 2698 || !_bfd_elf_add_dynamic_entry (info, DT_RELAENT,
034fed0b 2699 sizeof (Elf32_External_Rela)))
886a2506
NC		 2700 return FALSE;
2701
034fed0b 2702 if (reltext_exist)
886a2506
NC		 2703 if (!_bfd_elf_add_dynamic_entry (info, DT_TEXTREL, 0))
2704 return FALSE;
2705 }
2706
2707 return TRUE;
2708}
2709
0f7f3789
CM		 2710
2711/* Classify dynamic relocs such that -z combreloc can reorder and combine
2712 them. */
2713static enum elf_reloc_type_class
2714elf32_arc_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
2715 const asection *rel_sec ATTRIBUTE_UNUSED,
2716 const Elf_Internal_Rela *rela)
2717{
2718 switch ((int) ELF32_R_TYPE (rela->r_info))
2719 {
2720 case R_ARC_RELATIVE:
2721 return reloc_class_relative;
2722 case R_ARC_JMP_SLOT:
2723 return reloc_class_plt;
2724 case R_ARC_COPY:
2725 return reloc_class_copy;
2726 /* TODO: Needed in future to support ifunc. */
2727 /*
2728 case R_ARC_IRELATIVE:
2729 return reloc_class_ifunc;
2730 */
2731 default:
2732 return reloc_class_normal;
2733 }
2734}
2735
34e967a5
MC		 2736const struct elf_size_info arc_elf32_size_info =
2737{
2738 sizeof (Elf32_External_Ehdr),
2739 sizeof (Elf32_External_Phdr),
2740 sizeof (Elf32_External_Shdr),
2741 sizeof (Elf32_External_Rel),
2742 sizeof (Elf32_External_Rela),
2743 sizeof (Elf32_External_Sym),
2744 sizeof (Elf32_External_Dyn),
2745 sizeof (Elf_External_Note),
2746 4,
2747 1,
2748 32, 2,
2749 ELFCLASS32, EV_CURRENT,
2750 bfd_elf32_write_out_phdrs,
2751 bfd_elf32_write_shdrs_and_ehdr,
2752 bfd_elf32_checksum_contents,
2753 bfd_elf32_write_relocs,
2754 bfd_elf32_swap_symbol_in,
2755 bfd_elf32_swap_symbol_out,
2756 bfd_elf32_slurp_reloc_table,
2757 bfd_elf32_slurp_symbol_table,
2758 bfd_elf32_swap_dyn_in,
2759 bfd_elf32_swap_dyn_out,
2760 bfd_elf32_swap_reloc_in,
2761 bfd_elf32_swap_reloc_out,
2762 bfd_elf32_swap_reloca_in,
2763 bfd_elf32_swap_reloca_out
2764};
2765
2766#define elf_backend_size_info arc_elf32_size_info
2767
34e967a5
MC		 2768/* Hook called by the linker routine which adds symbols from an object
2769 file. */
2770
2771static bfd_boolean
2772elf_arc_add_symbol_hook (bfd * abfd,
2773 struct bfd_link_info * info,
2774 Elf_Internal_Sym * sym,
2775 const char ** namep ATTRIBUTE_UNUSED,
2776 flagword * flagsp ATTRIBUTE_UNUSED,
2777 asection ** secp ATTRIBUTE_UNUSED,
2778 bfd_vma * valp ATTRIBUTE_UNUSED)
2779{
a43942db 2780 if (ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC
34e967a5
MC		 2781 && (abfd->flags & DYNAMIC) == 0
2782 && bfd_get_flavour (info->output_bfd) == bfd_target_elf_flavour)
a43942db 2783 elf_tdata (info->output_bfd)->has_gnu_symbols |= elf_gnu_symbol_ifunc;
34e967a5
MC		 2784
2785 return TRUE;
2786}
886a2506 2787
47f7f636
AK		 2788/* GDB expects general purpose registers to be in section .reg. However Linux
2789 kernel doesn't create this section and instead writes registers to NOTE
2790 section. It is up to the binutils to create a pseudo-section .reg from the
2791 contents of NOTE. Also BFD will read pid and signal number from NOTE. This
2792 function relies on offsets inside elf_prstatus structure in Linux to be
2793 stable. */
2794
2795static bfd_boolean
2796elf32_arc_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
2797{
2798 int offset;
2799 size_t size;
2800
2801 switch (note->descsz)
2802 {
2803 default:
2804 return FALSE;
2805
2806 case 236: /* sizeof (struct elf_prstatus) on Linux/arc. */
2807 /* pr_cursig */
2808 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12);
2809 /* pr_pid */
2810 elf_tdata (abfd)->core->lwpid = bfd_get_32 (abfd, note->descdata + 24);
2811 /* pr_regs */
2812 offset = 72;
2813 size = (40 * 4); /* There are 40 registers in user_regs_struct. */
2814 break;
2815 }
2816 /* Make a ".reg/999" section. */
2817 return _bfd_elfcore_make_pseudosection (abfd, ".reg", size,
2818 note->descpos + offset);
2819}
2820
53a346d8
CZ		 2821/* Determine whether an object attribute tag takes an integer, a
2822 string or both. */
2823
2824static int
2825elf32_arc_obj_attrs_arg_type (int tag)
2826{
2827 if (tag == Tag_ARC_CPU_name
2828 || tag == Tag_ARC_ISA_config
2829 || tag == Tag_ARC_ISA_apex)
2830 return ATTR_TYPE_FLAG_STR_VAL;
2831 else if (tag < (Tag_ARC_ISA_mpy_option + 1))
2832 return ATTR_TYPE_FLAG_INT_VAL;
2833 else
2834 return (tag & 1) != 0 ? ATTR_TYPE_FLAG_STR_VAL : ATTR_TYPE_FLAG_INT_VAL;
2835}
2836
2837/* Attribute numbers >=14 can be safely ignored. */
2838
2839static bfd_boolean
2840elf32_arc_obj_attrs_handle_unknown (bfd *abfd, int tag)
2841{
2842 if ((tag & 127) < (Tag_ARC_ISA_mpy_option + 1))
2843 {
2844 _bfd_error_handler
2845 (_("%B: Unknown mandatory ARC object attribute %d."),
2846 abfd, tag);
2847 bfd_set_error (bfd_error_bad_value);
2848 return FALSE;
2849 }
2850 else
2851 {
2852 _bfd_error_handler
2853 (_("Warning: %B: Unknown ARC object attribute %d."),
2854 abfd, tag);
2855 return TRUE;
2856 }
2857}
2858
2859/* Handle an ARC specific section when reading an object file. This is
2860 called when bfd_section_from_shdr finds a section with an unknown
2861 type. */
2862
2863static bfd_boolean
2864elf32_arc_section_from_shdr (bfd *abfd,
2865 Elf_Internal_Shdr * hdr,
2866 const char *name,
2867 int shindex)
2868{
2869 switch (hdr->sh_type)
2870 {
2871 case SHT_ARC_ATTRIBUTES:
2872 break;
2873
2874 default:
2875 return FALSE;
2876 }
2877
2878 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
2879 return FALSE;
2880
2881 return TRUE;
2882}
2883
6d00b590 2884#define TARGET_LITTLE_SYM arc_elf32_le_vec
47b0e7ad 2885#define TARGET_LITTLE_NAME "elf32-littlearc"
886a2506
NC		 2886#define TARGET_BIG_SYM arc_elf32_be_vec
2887#define TARGET_BIG_NAME "elf32-bigarc"
2888#define ELF_ARCH bfd_arch_arc
8a36df4d 2889#define ELF_TARGET_ID ARC_ELF_DATA
886a2506
NC		 2890#define ELF_MACHINE_CODE EM_ARC_COMPACT
2891#define ELF_MACHINE_ALT1 EM_ARC_COMPACT2
2892#define ELF_MAXPAGESIZE 0x2000
2893
34e967a5
MC		 2894#define bfd_elf32_bfd_link_hash_table_create arc_elf_link_hash_table_create
2895
2896#define bfd_elf32_bfd_merge_private_bfd_data arc_elf_merge_private_bfd_data
2897#define bfd_elf32_bfd_reloc_type_lookup arc_elf32_bfd_reloc_type_lookup
2898#define bfd_elf32_bfd_set_private_flags arc_elf_set_private_flags
2899#define bfd_elf32_bfd_print_private_bfd_data arc_elf_print_private_bfd_data
2900#define bfd_elf32_bfd_copy_private_bfd_data arc_elf_copy_private_bfd_data
2901
886a2506
NC		 2902#define elf_info_to_howto_rel arc_info_to_howto_rel
2903#define elf_backend_object_p arc_elf_object_p
2904#define elf_backend_final_write_processing arc_elf_final_write_processing
2905
2906#define elf_backend_relocate_section elf_arc_relocate_section
2907#define elf_backend_check_relocs elf_arc_check_relocs
9d19e4fd 2908#define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
886a2506 2909
0f7f3789
CM		 2910#define elf_backend_reloc_type_class elf32_arc_reloc_type_class
2911
886a2506
NC		 2912#define elf_backend_adjust_dynamic_symbol elf_arc_adjust_dynamic_symbol
2913#define elf_backend_finish_dynamic_symbol elf_arc_finish_dynamic_symbol
2914
2915#define elf_backend_finish_dynamic_sections elf_arc_finish_dynamic_sections
2916#define elf_backend_size_dynamic_sections elf_arc_size_dynamic_sections
08759e0f 2917#define elf_backend_add_symbol_hook elf_arc_add_symbol_hook
886a2506
NC		 2918
2919#define elf_backend_can_gc_sections 1
2920#define elf_backend_want_got_plt 1
2921#define elf_backend_plt_readonly 1
34e967a5 2922#define elf_backend_rela_plts_and_copies_p 1
886a2506
NC		 2923#define elf_backend_want_plt_sym 0
2924#define elf_backend_got_header_size 12
64f52338 2925#define elf_backend_dtrel_excludes_plt 1
886a2506
NC		 2926
2927#define elf_backend_may_use_rel_p 0
2928#define elf_backend_may_use_rela_p 1
2929#define elf_backend_default_use_rela_p 1
252b5132 2930
47f7f636
AK		 2931#define elf_backend_grok_prstatus elf32_arc_grok_prstatus
2932
3c8adaca
CZ		 2933#define elf_backend_default_execstack 0
2934
53a346d8
CZ		 2935#undef elf_backend_obj_attrs_vendor
2936#define elf_backend_obj_attrs_vendor "ARC"
2937#undef elf_backend_obj_attrs_section
2938#define elf_backend_obj_attrs_section ".ARC.attributes"
2939#undef elf_backend_obj_attrs_arg_type
2940#define elf_backend_obj_attrs_arg_type elf32_arc_obj_attrs_arg_type
2941#undef elf_backend_obj_attrs_section_type
2942#define elf_backend_obj_attrs_section_type SHT_ARC_ATTRIBUTES
2943#define elf_backend_obj_attrs_handle_unknown elf32_arc_obj_attrs_handle_unknown
2944
2945#define elf_backend_section_from_shdr elf32_arc_section_from_shdr
2946
252b5132 2947#include "elf32-target.h"
A mirror of the official binutils-gdb repository