]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - bfd/elf32-lm32.c
projects / thirdparty / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Regen POTFILES.in
[thirdparty/binutils-gdb.git] / bfd / elf32-lm32.c
CommitLineData
84e94c90 1/* Lattice Mico32-specific support for 32-bit ELF
6f2750fe 2 Copyright (C) 2008-2016 Free Software Foundation, Inc.
84e94c90
NC		 3 Contributed by Jon Beniston <jon@beniston.com>
4
5 This file is part of BFD, the Binary File Descriptor library.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
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.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
84e94c90 22#include "sysdep.h"
691bf19c 23#include "bfd.h"
84e94c90
NC		 24#include "libbfd.h"
25#include "elf-bfd.h"
26#include "elf/lm32.h"
27
28#define DEFAULT_STACK_SIZE 0x20000
29
30#define PLT_ENTRY_SIZE 20
31
32#define PLT0_ENTRY_WORD0 0
33#define PLT0_ENTRY_WORD1 0
34#define PLT0_ENTRY_WORD2 0
35#define PLT0_ENTRY_WORD3 0
36#define PLT0_ENTRY_WORD4 0
37
38#define PLT0_PIC_ENTRY_WORD0 0
39#define PLT0_PIC_ENTRY_WORD1 0
40#define PLT0_PIC_ENTRY_WORD2 0
41#define PLT0_PIC_ENTRY_WORD3 0
42#define PLT0_PIC_ENTRY_WORD4 0
43
44#define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
45
6d00b590 46extern const bfd_target lm32_elf32_fdpic_vec;
84e94c90 47
6d00b590 48#define IS_FDPIC(bfd) ((bfd)->xvec == &lm32_elf32_fdpic_vec)
84e94c90
NC		 49
50static bfd_reloc_status_type lm32_elf_gprel_reloc
51 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
52
53/* The linker needs to keep track of the number of relocs that it
54 decides to copy as dynamic relocs in check_relocs for each symbol.
55 This is so that it can later discard them if they are found to be
56 unnecessary. We store the information in a field extending the
57 regular ELF linker hash table. */
58
59struct elf_lm32_dyn_relocs
60{
61 struct elf_lm32_dyn_relocs *next;
62
63 /* The input section of the reloc. */
64 asection *sec;
65
66 /* Total number of relocs copied for the input section. */
67 bfd_size_type count;
68
69 /* Number of pc-relative relocs copied for the input section. */
70 bfd_size_type pc_count;
71};
72
73/* lm32 ELF linker hash entry. */
74
75struct elf_lm32_link_hash_entry
76{
77 struct elf_link_hash_entry root;
78
79 /* Track dynamic relocs copied for this symbol. */
80 struct elf_lm32_dyn_relocs *dyn_relocs;
81};
82
83/* lm32 ELF linker hash table. */
84
85struct elf_lm32_link_hash_table
86{
87 struct elf_link_hash_table root;
88
89 /* Short-cuts to get to dynamic linker sections. */
90 asection *sgot;
91 asection *sgotplt;
92 asection *srelgot;
93 asection *sfixup32;
94 asection *splt;
95 asection *srelplt;
96 asection *sdynbss;
97 asection *srelbss;
98
99 int relocs32;
100};
101
102/* Get the lm32 ELF linker hash table from a link_info structure. */
103
104#define lm32_elf_hash_table(p) \
4dfe6ac6
NC		 105 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
106 == LM32_ELF_DATA ? ((struct elf_lm32_link_hash_table *) ((p)->hash)) : NULL)
84e94c90
NC		 107
108#define lm32fdpic_got_section(info) \
109 (lm32_elf_hash_table (info)->sgot)
110#define lm32fdpic_gotrel_section(info) \
111 (lm32_elf_hash_table (info)->srelgot)
112#define lm32fdpic_fixup32_section(info) \
113 (lm32_elf_hash_table (info)->sfixup32)
114
115struct weak_symbol_list
116{
117 const char *name;
118 struct weak_symbol_list *next;
119};
120
121/* Create an entry in an lm32 ELF linker hash table. */
122
123static struct bfd_hash_entry *
124lm32_elf_link_hash_newfunc (struct bfd_hash_entry *entry,
125 struct bfd_hash_table *table,
126 const char *string)
127{
128 struct elf_lm32_link_hash_entry *ret =
129 (struct elf_lm32_link_hash_entry *) entry;
130
131 /* Allocate the structure if it has not already been allocated by a
132 subclass. */
133 if (ret == NULL)
134 ret = bfd_hash_allocate (table,
135 sizeof (struct elf_lm32_link_hash_entry));
136 if (ret == NULL)
137 return NULL;
138
139 /* Call the allocation method of the superclass. */
140 ret = ((struct elf_lm32_link_hash_entry *)
141 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
142 table, string));
143 if (ret != NULL)
144 {
145 struct elf_lm32_link_hash_entry *eh;
146
147 eh = (struct elf_lm32_link_hash_entry *) ret;
148 eh->dyn_relocs = NULL;
149 }
150
151 return (struct bfd_hash_entry *) ret;
152}
153
154/* Create an lm32 ELF linker hash table. */
155
156static struct bfd_link_hash_table *
157lm32_elf_link_hash_table_create (bfd *abfd)
158{
159 struct elf_lm32_link_hash_table *ret;
160 bfd_size_type amt = sizeof (struct elf_lm32_link_hash_table);
161
7bf52ea2 162 ret = bfd_zmalloc (amt);
84e94c90
NC		 163 if (ret == NULL)
164 return NULL;
165
166 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
167 lm32_elf_link_hash_newfunc,
4dfe6ac6
NC		 168 sizeof (struct elf_lm32_link_hash_entry),
169 LM32_ELF_DATA))
84e94c90
NC		 170 {
171 free (ret);
172 return NULL;
173 }
174
84e94c90
NC		 175 return &ret->root.root;
176}
177
178/* Add a fixup to the ROFIXUP section. */
179
180static bfd_vma
181_lm32fdpic_add_rofixup (bfd *output_bfd, asection *rofixup, bfd_vma relocation)
182{
183 bfd_vma fixup_offset;
184
185 if (rofixup->flags & SEC_EXCLUDE)
186 return -1;
187
188 fixup_offset = rofixup->reloc_count * 4;
189 if (rofixup->contents)
190 {
191 BFD_ASSERT (fixup_offset < rofixup->size);
192 if (fixup_offset < rofixup->size)
193 bfd_put_32 (output_bfd, relocation, rofixup->contents + fixup_offset);
194 }
195 rofixup->reloc_count++;
196
197 return fixup_offset;
198}
199
200/* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up
201 shortcuts to them in our hash table. */
202
203static bfd_boolean
204create_got_section (bfd *dynobj, struct bfd_link_info *info)
205{
206 struct elf_lm32_link_hash_table *htab;
207 asection *s;
208
209 /* This function may be called more than once. */
3d4d4302
AM		 210 s = bfd_get_linker_section (dynobj, ".got");
211 if (s != NULL)
84e94c90
NC		 212 return TRUE;
213
4dfe6ac6
NC		 214 htab = lm32_elf_hash_table (info);
215 if (htab == NULL)
216 return FALSE;
217
84e94c90
NC		 218 if (! _bfd_elf_create_got_section (dynobj, info))
219 return FALSE;
220
3d4d4302
AM		 221 htab->sgot = bfd_get_linker_section (dynobj, ".got");
222 htab->sgotplt = bfd_get_linker_section (dynobj, ".got.plt");
223 htab->srelgot = bfd_get_linker_section (dynobj, ".rela.got");
64e77c6d 224 if (! htab->sgot || ! htab->sgotplt || ! htab->srelgot)
84e94c90
NC		 225 abort ();
226
84e94c90
NC		 227 return TRUE;
228}
229
230/* Create .rofixup sections in DYNOBJ, and set up
231 shortcuts to them in our hash table. */
232
233static bfd_boolean
234create_rofixup_section (bfd *dynobj, struct bfd_link_info *info)
235{
236 struct elf_lm32_link_hash_table *htab;
237 htab = lm32_elf_hash_table (info);
238
4dfe6ac6
NC		 239 if (htab == NULL)
240 return FALSE;
241
242 /* Fixup section for R_LM32_32 relocs. */
3d4d4302
AM		 243 lm32fdpic_fixup32_section (info)
244 = bfd_make_section_anyway_with_flags (dynobj,
245 ".rofixup",
246 (SEC_ALLOC
247 | SEC_LOAD
248 | SEC_HAS_CONTENTS
249 | SEC_IN_MEMORY
250 | SEC_LINKER_CREATED
251 | SEC_READONLY));
84e94c90 252 if (lm32fdpic_fixup32_section (info) == NULL
3d4d4302
AM		 253 || ! bfd_set_section_alignment (dynobj,
254 lm32fdpic_fixup32_section (info), 2))
84e94c90
NC		 255 return FALSE;
256
257 return TRUE;
258}
259
260static reloc_howto_type lm32_elf_howto_table [] =
261{
262 /* This reloc does nothing. */
263 HOWTO (R_LM32_NONE, /* type */
264 0, /* rightshift */
6346d5ca
AM		 265 3, /* size (0 = byte, 1 = short, 2 = long) */
266 0, /* bitsize */
84e94c90
NC		 267 FALSE, /* pc_relative */
268 0, /* bitpos */
6346d5ca 269 complain_overflow_dont, /* complain_on_overflow */
84e94c90
NC		 270 bfd_elf_generic_reloc, /* special_function */
271 "R_LM32_NONE", /* name */
272 FALSE, /* partial_inplace */
273 0, /* src_mask */
274 0, /* dst_mask */
275 FALSE), /* pcrel_offset */
276
277 /* An 8 bit absolute relocation. */
278 HOWTO (R_LM32_8, /* type */
279 0, /* rightshift */
280 0, /* size (0 = byte, 1 = short, 2 = long) */
281 8, /* bitsize */
282 FALSE, /* pc_relative */
283 0, /* bitpos */
284 complain_overflow_bitfield,/* complain_on_overflow */
285 bfd_elf_generic_reloc, /* special_function */
286 "R_LM32_8", /* name */
287 FALSE, /* partial_inplace */
288 0, /* src_mask */
289 0xff, /* dst_mask */
290 FALSE), /* pcrel_offset */
291
292 /* A 16 bit absolute relocation. */
293 HOWTO (R_LM32_16, /* type */
294 0, /* rightshift */
295 1, /* size (0 = byte, 1 = short, 2 = long) */
296 16, /* bitsize */
297 FALSE, /* pc_relative */
298 0, /* bitpos */
299 complain_overflow_bitfield,/* complain_on_overflow */
300 bfd_elf_generic_reloc, /* special_function */
301 "R_LM32_16", /* name */
302 FALSE, /* partial_inplace */
303 0, /* src_mask */
304 0xffff, /* dst_mask */
305 FALSE), /* pcrel_offset */
306
307 /* A 32 bit absolute relocation. */
308 HOWTO (R_LM32_32, /* type */
309 0, /* rightshift */
310 2, /* size (0 = byte, 1 = short, 2 = long) */
311 32, /* bitsize */
312 FALSE, /* pc_relative */
313 0, /* bitpos */
314 complain_overflow_bitfield,/* complain_on_overflow */
315 bfd_elf_generic_reloc, /* special_function */
316 "R_LM32_32", /* name */
317 FALSE, /* partial_inplace */
318 0, /* src_mask */
319 0xffffffff, /* dst_mask */
320 FALSE), /* pcrel_offset */
321
322 HOWTO (R_LM32_HI16, /* type */
323 16, /* rightshift */
324 2, /* size (0 = byte, 1 = short, 2 = long) */
325 16, /* bitsize */
326 FALSE, /* pc_relative */
327 0, /* bitpos */
328 complain_overflow_bitfield,/* complain_on_overflow */
329 bfd_elf_generic_reloc, /* special_function */
330 "R_LM32_HI16", /* name */
331 FALSE, /* partial_inplace */
332 0, /* src_mask */
333 0xffff, /* dst_mask */
334 FALSE), /* pcrel_offset */
335
336 HOWTO (R_LM32_LO16, /* type */
337 0, /* rightshift */
338 2, /* size (0 = byte, 1 = short, 2 = long) */
339 16, /* bitsize */
340 FALSE, /* pc_relative */
341 0, /* bitpos */
342 complain_overflow_dont, /* complain_on_overflow */
343 bfd_elf_generic_reloc, /* special_function */
344 "R_LM32_LO16", /* name */
345 FALSE, /* partial_inplace */
346 0, /* src_mask */
347 0xffff, /* dst_mask */
348 FALSE), /* pcrel_offset */
349
350 HOWTO (R_LM32_GPREL16, /* type */
351 0, /* rightshift */
352 2, /* size (0 = byte, 1 = short, 2 = long) */
353 16, /* bitsize */
354 FALSE, /* pc_relative */
355 0, /* bitpos */
356 complain_overflow_dont, /* complain_on_overflow */
357 lm32_elf_gprel_reloc, /* special_function */
358 "R_LM32_GPREL16", /* name */
359 FALSE, /* partial_inplace */
360 0, /* src_mask */
361 0xffff, /* dst_mask */
362 FALSE), /* pcrel_offset */
363
364 HOWTO (R_LM32_CALL, /* type */
365 2, /* rightshift */
366 2, /* size (0 = byte, 1 = short, 2 = long) */
367 26, /* bitsize */
368 TRUE, /* pc_relative */
369 0, /* bitpos */
370 complain_overflow_signed, /* complain_on_overflow */
371 bfd_elf_generic_reloc, /* special_function */
372 "R_LM32_CALL", /* name */
373 FALSE, /* partial_inplace */
374 0, /* src_mask */
375 0x3ffffff, /* dst_mask */
376 TRUE), /* pcrel_offset */
377
378 HOWTO (R_LM32_BRANCH, /* type */
379 2, /* rightshift */
380 2, /* size (0 = byte, 1 = short, 2 = long) */
381 16, /* bitsize */
382 TRUE, /* pc_relative */
383 0, /* bitpos */
384 complain_overflow_signed, /* complain_on_overflow */
385 bfd_elf_generic_reloc, /* special_function */
386 "R_LM32_BRANCH", /* name */
387 FALSE, /* partial_inplace */
388 0, /* src_mask */
389 0xffff, /* dst_mask */
390 TRUE), /* pcrel_offset */
391
392 /* GNU extension to record C++ vtable hierarchy. */
393 HOWTO (R_LM32_GNU_VTINHERIT, /* type */
394 0, /* rightshift */
395 2, /* size (0 = byte, 1 = short, 2 = long) */
396 0, /* bitsize */
397 FALSE, /* pc_relative */
398 0, /* bitpos */
399 complain_overflow_dont, /* complain_on_overflow */
400 NULL, /* special_function */
401 "R_LM32_GNU_VTINHERIT", /* name */
402 FALSE, /* partial_inplace */
403 0, /* src_mask */
404 0, /* dst_mask */
405 FALSE), /* pcrel_offset */
406
407 /* GNU extension to record C++ vtable member usage. */
408 HOWTO (R_LM32_GNU_VTENTRY, /* type */
409 0, /* rightshift */
410 2, /* size (0 = byte, 1 = short, 2 = long) */
411 0, /* bitsize */
412 FALSE, /* pc_relative */
413 0, /* bitpos */
414 complain_overflow_dont, /* complain_on_overflow */
415 _bfd_elf_rel_vtable_reloc_fn,/* special_function */
416 "R_LM32_GNU_VTENTRY", /* name */
417 FALSE, /* partial_inplace */
418 0, /* src_mask */
419 0, /* dst_mask */
420 FALSE), /* pcrel_offset */
421
422 HOWTO (R_LM32_16_GOT, /* type */
423 0, /* rightshift */
424 2, /* size (0 = byte, 1 = short, 2 = long) */
425 16, /* bitsize */
426 FALSE, /* pc_relative */
427 0, /* bitpos */
428 complain_overflow_signed, /* complain_on_overflow */
429 bfd_elf_generic_reloc, /* special_function */
430 "R_LM32_16_GOT", /* name */
431 FALSE, /* partial_inplace */
432 0, /* src_mask */
433 0xffff, /* dst_mask */
434 FALSE), /* pcrel_offset */
435
436 HOWTO (R_LM32_GOTOFF_HI16, /* type */
437 16, /* rightshift */
438 2, /* size (0 = byte, 1 = short, 2 = long) */
439 16, /* bitsize */
440 FALSE, /* pc_relative */
441 0, /* bitpos */
442 complain_overflow_dont, /* complain_on_overflow */
443 bfd_elf_generic_reloc, /* special_function */
444 "R_LM32_GOTOFF_HI16", /* name */
445 FALSE, /* partial_inplace */
446 0xffff, /* src_mask */
447 0xffff, /* dst_mask */
448 FALSE), /* pcrel_offset */
449
450 HOWTO (R_LM32_GOTOFF_LO16, /* type */
451 0, /* rightshift */
452 2, /* size (0 = byte, 1 = short, 2 = long) */
453 16, /* bitsize */
454 FALSE, /* pc_relative */
455 0, /* bitpos */
456 complain_overflow_dont, /* complain_on_overflow */
457 bfd_elf_generic_reloc, /* special_function */
458 "R_LM32_GOTOFF_LO16", /* name */
459 FALSE, /* partial_inplace */
460 0xffff, /* src_mask */
461 0xffff, /* dst_mask */
462 FALSE), /* pcrel_offset */
463
464 HOWTO (R_LM32_COPY, /* type */
465 0, /* rightshift */
466 2, /* size (0 = byte, 1 = short, 2 = long) */
467 32, /* bitsize */
468 FALSE, /* pc_relative */
469 0, /* bitpos */
470 complain_overflow_bitfield, /* complain_on_overflow */
471 bfd_elf_generic_reloc, /* special_function */
472 "R_LM32_COPY", /* name */
473 FALSE, /* partial_inplace */
474 0xffffffff, /* src_mask */
475 0xffffffff, /* dst_mask */
476 FALSE), /* pcrel_offset */
477
478 HOWTO (R_LM32_GLOB_DAT, /* type */
479 0, /* rightshift */
480 2, /* size (0 = byte, 1 = short, 2 = long) */
481 32, /* bitsize */
482 FALSE, /* pc_relative */
483 0, /* bitpos */
484 complain_overflow_bitfield, /* complain_on_overflow */
485 bfd_elf_generic_reloc, /* special_function */
486 "R_LM32_GLOB_DAT", /* name */
487 FALSE, /* partial_inplace */
488 0xffffffff, /* src_mask */
489 0xffffffff, /* dst_mask */
490 FALSE), /* pcrel_offset */
491
492 HOWTO (R_LM32_JMP_SLOT, /* type */
493 0, /* rightshift */
494 2, /* size (0 = byte, 1 = short, 2 = long) */
495 32, /* bitsize */
496 FALSE, /* pc_relative */
497 0, /* bitpos */
498 complain_overflow_bitfield, /* complain_on_overflow */
499 bfd_elf_generic_reloc, /* special_function */
500 "R_LM32_JMP_SLOT", /* name */
501 FALSE, /* partial_inplace */
502 0xffffffff, /* src_mask */
503 0xffffffff, /* dst_mask */
504 FALSE), /* pcrel_offset */
505
506 HOWTO (R_LM32_RELATIVE, /* type */
507 0, /* rightshift */
508 2, /* size (0 = byte, 1 = short, 2 = long) */
509 32, /* bitsize */
510 FALSE, /* pc_relative */
511 0, /* bitpos */
512 complain_overflow_bitfield, /* complain_on_overflow */
513 bfd_elf_generic_reloc, /* special_function */
514 "R_LM32_RELATIVE", /* name */
515 FALSE, /* partial_inplace */
516 0xffffffff, /* src_mask */
517 0xffffffff, /* dst_mask */
518 FALSE), /* pcrel_offset */
519
520};
521
522/* Map BFD reloc types to lm32 ELF reloc types. */
523
524struct lm32_reloc_map
525{
526 bfd_reloc_code_real_type bfd_reloc_val;
527 unsigned char elf_reloc_val;
528};
529
530static const struct lm32_reloc_map lm32_reloc_map[] =
531{
532 { BFD_RELOC_NONE, R_LM32_NONE },
533 { BFD_RELOC_8, R_LM32_8 },
534 { BFD_RELOC_16, R_LM32_16 },
535 { BFD_RELOC_32, R_LM32_32 },
536 { BFD_RELOC_HI16, R_LM32_HI16 },
537 { BFD_RELOC_LO16, R_LM32_LO16 },
538 { BFD_RELOC_GPREL16, R_LM32_GPREL16 },
539 { BFD_RELOC_LM32_CALL, R_LM32_CALL },
540 { BFD_RELOC_LM32_BRANCH, R_LM32_BRANCH },
541 { BFD_RELOC_VTABLE_INHERIT, R_LM32_GNU_VTINHERIT },
542 { BFD_RELOC_VTABLE_ENTRY, R_LM32_GNU_VTENTRY },
543 { BFD_RELOC_LM32_16_GOT, R_LM32_16_GOT },
544 { BFD_RELOC_LM32_GOTOFF_HI16, R_LM32_GOTOFF_HI16 },
545 { BFD_RELOC_LM32_GOTOFF_LO16, R_LM32_GOTOFF_LO16 },
546 { BFD_RELOC_LM32_COPY, R_LM32_COPY },
547 { BFD_RELOC_LM32_GLOB_DAT, R_LM32_GLOB_DAT },
548 { BFD_RELOC_LM32_JMP_SLOT, R_LM32_JMP_SLOT },
549 { BFD_RELOC_LM32_RELATIVE, R_LM32_RELATIVE },
550};
551
552static reloc_howto_type *
553lm32_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
554 bfd_reloc_code_real_type code)
555{
556 unsigned int i;
557
558 for (i = 0; i < sizeof (lm32_reloc_map) / sizeof (lm32_reloc_map[0]); i++)
559 if (lm32_reloc_map[i].bfd_reloc_val == code)
560 return &lm32_elf_howto_table[lm32_reloc_map[i].elf_reloc_val];
561 return NULL;
562}
563
564static reloc_howto_type *
565lm32_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
566 const char *r_name)
567{
568 unsigned int i;
569
570 for (i = 0;
571 i < sizeof (lm32_elf_howto_table) / sizeof (lm32_elf_howto_table[0]);
572 i++)
573 if (lm32_elf_howto_table[i].name != NULL
574 && strcasecmp (lm32_elf_howto_table[i].name, r_name) == 0)
575 return &lm32_elf_howto_table[i];
576
577 return NULL;
578}
579
580
581/* Set the howto pointer for an Lattice Mico32 ELF reloc. */
582
583static void
584lm32_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
585 arelent *cache_ptr,
586 Elf_Internal_Rela *dst)
587{
588 unsigned int r_type;
589
590 r_type = ELF32_R_TYPE (dst->r_info);
5860e3f8
NC		 591 if (r_type >= (unsigned int) R_LM32_max)
592 {
695344c0 593 /* xgettext:c-format */
64d29018 594 _bfd_error_handler (_("%B: invalid LM32 reloc number: %d"), abfd, r_type);
5860e3f8
NC		 595 r_type = 0;
596 }
84e94c90
NC		 597 cache_ptr->howto = &lm32_elf_howto_table[r_type];
598}
599
600/* Set the right machine number for an Lattice Mico32 ELF file. */
601
602static bfd_boolean
603lm32_elf_object_p (bfd *abfd)
604{
605 return bfd_default_set_arch_mach (abfd, bfd_arch_lm32, bfd_mach_lm32);
606}
607
608/* Set machine type flags just before file is written out. */
609
610static void
611lm32_elf_final_write_processing (bfd *abfd, bfd_boolean linker ATTRIBUTE_UNUSED)
612{
613 elf_elfheader (abfd)->e_machine = EM_LATTICEMICO32;
614 elf_elfheader (abfd)->e_flags &=~ EF_LM32_MACH;
615 switch (bfd_get_mach (abfd))
616 {
617 case bfd_mach_lm32:
618 elf_elfheader (abfd)->e_flags |= E_LM32_MACH;
619 break;
620 default:
621 abort ();
622 }
623}
624
625/* Set the GP value for OUTPUT_BFD. Returns FALSE if this is a
626 dangerous relocation. */
627
628static bfd_boolean
629lm32_elf_assign_gp (bfd *output_bfd, bfd_vma *pgp)
630{
631 unsigned int count;
632 asymbol **sym;
633 unsigned int i;
634
635 /* If we've already figured out what GP will be, just return it. */
636 *pgp = _bfd_get_gp_value (output_bfd);
637 if (*pgp)
638 return TRUE;
639
640 count = bfd_get_symcount (output_bfd);
641 sym = bfd_get_outsymbols (output_bfd);
642
643 /* The linker script will have created a symbol named `_gp' with the
644 appropriate value. */
645 if (sym == NULL)
646 i = count;
647 else
648 {
649 for (i = 0; i < count; i++, sym++)
650 {
651 const char *name;
652
653 name = bfd_asymbol_name (*sym);
654 if (*name == '_' && strcmp (name, "_gp") == 0)
655 {
656 *pgp = bfd_asymbol_value (*sym);
657 _bfd_set_gp_value (output_bfd, *pgp);
658 break;
659 }
660 }
661 }
662
663 if (i >= count)
664 {
665 /* Only get the error once. */
666 *pgp = 4;
667 _bfd_set_gp_value (output_bfd, *pgp);
668 return FALSE;
669 }
670
671 return TRUE;
672}
673
674/* We have to figure out the gp value, so that we can adjust the
675 symbol value correctly. We look up the symbol _gp in the output
676 BFD. If we can't find it, we're stuck. We cache it in the ELF
677 target data. We don't need to adjust the symbol value for an
678 external symbol if we are producing relocatable output. */
679
680static bfd_reloc_status_type
681lm32_elf_final_gp (bfd *output_bfd, asymbol *symbol, bfd_boolean relocatable,
682 char **error_message, bfd_vma *pgp)
683{
684 if (bfd_is_und_section (symbol->section) && !relocatable)
685 {
686 *pgp = 0;
687 return bfd_reloc_undefined;
688 }
689
690 *pgp = _bfd_get_gp_value (output_bfd);
691 if (*pgp == 0 && (!relocatable || (symbol->flags & BSF_SECTION_SYM) != 0))
692 {
693 if (relocatable)
694 {
695 /* Make up a value. */
696 *pgp = symbol->section->output_section->vma + 0x4000;
697 _bfd_set_gp_value (output_bfd, *pgp);
698 }
699 else if (!lm32_elf_assign_gp (output_bfd, pgp))
700 {
701 *error_message =
702 (char *)
703 _("global pointer relative relocation when _gp not defined");
704 return bfd_reloc_dangerous;
705 }
706 }
707
708 return bfd_reloc_ok;
709}
710
711static bfd_reloc_status_type
712lm32_elf_do_gprel_relocate (bfd *abfd,
713 reloc_howto_type *howto,
714 asection *input_section ATTRIBUTE_UNUSED,
715 bfd_byte *data,
716 bfd_vma offset,
717 bfd_vma symbol_value,
718 bfd_vma addend)
719{
720 return _bfd_final_link_relocate (howto, abfd, input_section,
721 data, offset, symbol_value, addend);
722}
723
724static bfd_reloc_status_type
725lm32_elf_gprel_reloc (bfd *abfd,
726 arelent *reloc_entry,
727 asymbol *symbol,
728 void *data,
729 asection *input_section,
730 bfd *output_bfd,
731 char **msg)
732{
733 bfd_vma relocation;
734 bfd_vma gp;
735 bfd_reloc_status_type r;
736
737 if (output_bfd != (bfd *) NULL
738 && (symbol->flags & BSF_SECTION_SYM) == 0
739 && (!reloc_entry->howto->partial_inplace || reloc_entry->addend == 0))
740 {
741 reloc_entry->address += input_section->output_offset;
742 return bfd_reloc_ok;
743 }
744
745 if (output_bfd != NULL)
746 return bfd_reloc_ok;
747
748 relocation = symbol->value
749 + symbol->section->output_section->vma + symbol->section->output_offset;
750
751 if ((r =
752 lm32_elf_final_gp (abfd, symbol, FALSE, msg, &gp)) == bfd_reloc_ok)
753 {
754 relocation = relocation + reloc_entry->addend - gp;
755 reloc_entry->addend = 0;
756 if ((signed) relocation < -32768 || (signed) relocation > 32767)
757 {
758 *msg = _("global pointer relative address out of range");
759 r = bfd_reloc_outofrange;
760 }
761 else
762 {
763 r = lm32_elf_do_gprel_relocate (abfd, reloc_entry->howto,
764 input_section,
765 data, reloc_entry->address,
766 relocation, reloc_entry->addend);
767 }
768 }
769
770 return r;
771}
772
773/* Find the segment number in which OSEC, and output section, is
774 located. */
775
776static unsigned
777_lm32fdpic_osec_to_segment (bfd *output_bfd, asection *osec)
778{
779 struct elf_segment_map *m;
780 Elf_Internal_Phdr *p;
781
782 /* Find the segment that contains the output_section. */
12bd6957 783 for (m = elf_seg_map (output_bfd), p = elf_tdata (output_bfd)->phdr;
84e94c90
NC		 784 m != NULL;
785 m = m->next, p++)
786 {
787 int i;
788
789 for (i = m->count - 1; i >= 0; i--)
790 if (m->sections[i] == osec)
791 break;
792
793 if (i >= 0)
794 break;
795 }
796
797 return p - elf_tdata (output_bfd)->phdr;
798}
799
800/* Determine if an output section is read-only. */
801
802inline static bfd_boolean
803_lm32fdpic_osec_readonly_p (bfd *output_bfd, asection *osec)
804{
805 unsigned seg = _lm32fdpic_osec_to_segment (output_bfd, osec);
806
807 return ! (elf_tdata (output_bfd)->phdr[seg].p_flags & PF_W);
808}
809
810/* Relocate a section */
811
812static bfd_boolean
813lm32_elf_relocate_section (bfd *output_bfd,
814 struct bfd_link_info *info,
815 bfd *input_bfd,
816 asection *input_section,
817 bfd_byte *contents,
818 Elf_Internal_Rela *relocs,
819 Elf_Internal_Sym *local_syms,
820 asection **local_sections)
821{
822 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
823 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
824 Elf_Internal_Rela *rel, *relend;
84e94c90
NC		 825 struct elf_lm32_link_hash_table *htab = lm32_elf_hash_table (info);
826 bfd *dynobj;
827 bfd_vma *local_got_offsets;
c7e2358a 828 asection *sgot;
84e94c90 829
4dfe6ac6
NC		 830 if (htab == NULL)
831 return FALSE;
832
84e94c90
NC		 833 dynobj = htab->root.dynobj;
834 local_got_offsets = elf_local_got_offsets (input_bfd);
835
836 sgot = htab->sgot;
84e94c90
NC		 837
838 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
839 sym_hashes = elf_sym_hashes (input_bfd);
840
841 rel = relocs;
842 relend = relocs + input_section->reloc_count;
843 for (; rel < relend; rel++)
844 {
845 reloc_howto_type *howto;
846 unsigned int r_type;
847 unsigned long r_symndx;
848 Elf_Internal_Sym *sym;
849 asection *sec;
850 struct elf_link_hash_entry *h;
851 bfd_vma relocation;
852 bfd_vma gp;
853 bfd_reloc_status_type r;
854 const char *name = NULL;
84e94c90
NC		 855
856 r_symndx = ELF32_R_SYM (rel->r_info);
857 r_type = ELF32_R_TYPE (rel->r_info);
858
859 if (r_type == R_LM32_GNU_VTENTRY
860 || r_type == R_LM32_GNU_VTINHERIT )
861 continue;
862
863 h = NULL;
864 sym = NULL;
865 sec = NULL;
866
867 howto = lm32_elf_howto_table + r_type;
868
869 if (r_symndx < symtab_hdr->sh_info)
870 {
871 /* It's a local symbol. */
872 sym = local_syms + r_symndx;
c7e2358a 873 sec = local_sections[r_symndx];
84e94c90
NC		 874 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
875 name = bfd_elf_string_from_elf_section
876 (input_bfd, symtab_hdr->sh_link, sym->st_name);
877 name = (name == NULL) ? bfd_section_name (input_bfd, sec) : name;
878 }
879 else
880 {
881 /* It's a global symbol. */
882 bfd_boolean unresolved_reloc;
62d887d4 883 bfd_boolean warned, ignored;
84e94c90
NC		 884
885 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
886 r_symndx, symtab_hdr, sym_hashes,
887 h, sec, relocation,
62d887d4 888 unresolved_reloc, warned, ignored);
84e94c90
NC		 889 name = h->root.root.string;
890 }
891
dbaa2011 892 if (sec != NULL && discarded_section (sec))
e4067dbb 893 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
545fd46b 894 rel, 1, relend, howto, 0, contents);
84e94c90 895
0e1862bb 896 if (bfd_link_relocatable (info))
84e94c90
NC		 897 {
898 /* This is a relocatable link. We don't have to change
899 anything, unless the reloc is against a section symbol,
900 in which case we have to adjust according to where the
901 section symbol winds up in the output section. */
902 if (sym == NULL || ELF_ST_TYPE (sym->st_info) != STT_SECTION)
903 continue;
904
905 /* If partial_inplace, we need to store any additional addend
906 back in the section. */
907 if (! howto->partial_inplace)
908 continue;
909
910 /* Shouldn't reach here. */
911 abort ();
912 r = bfd_reloc_ok;
913 }
914 else
915 {
916 switch (howto->type)
917 {
918 case R_LM32_GPREL16:
919 if (!lm32_elf_assign_gp (output_bfd, &gp))
920 r = bfd_reloc_dangerous;
921 else
922 {
923 relocation = relocation + rel->r_addend - gp;
924 rel->r_addend = 0;
925 if ((signed)relocation < -32768 || (signed)relocation > 32767)
926 r = bfd_reloc_outofrange;
927 else
928 {
929 r = _bfd_final_link_relocate (howto, input_bfd,
930 input_section, contents,
931 rel->r_offset, relocation,
932 rel->r_addend);
933 }
934 }
935 break;
936 case R_LM32_16_GOT:
937 /* Relocation is to the entry for this symbol in the global
938 offset table. */
939 BFD_ASSERT (sgot != NULL);
940 if (h != NULL)
941 {
942 bfd_boolean dyn;
943 bfd_vma off;
944
945 off = h->got.offset;
946 BFD_ASSERT (off != (bfd_vma) -1);
947
948 dyn = htab->root.dynamic_sections_created;
0e1862bb
L		 949 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
950 bfd_link_pic (info),
951 h)
952 || (bfd_link_pic (info)
84e94c90
NC		 953 && (info->symbolic
954 || h->dynindx == -1
955 || h->forced_local)
956 && h->def_regular))
957 {
958 /* This is actually a static link, or it is a
959 -Bsymbolic link and the symbol is defined
960 locally, or the symbol was forced to be local
961 because of a version file. We must initialize
962 this entry in the global offset table. Since the
963 offset must always be a multiple of 4, we use the
964 least significant bit to record whether we have
965 initialized it already.
966
967 When doing a dynamic link, we create a .rela.got
968 relocation entry to initialize the value. This
969 is done in the finish_dynamic_symbol routine. */
970 if ((off & 1) != 0)
971 off &= ~1;
972 else
973 {
974 /* Write entry in GOT */
975 bfd_put_32 (output_bfd, relocation,
976 sgot->contents + off);
977 /* Create entry in .rofixup pointing to GOT entry. */
978 if (IS_FDPIC (output_bfd) && h->root.type != bfd_link_hash_undefweak)
979 {
980 _lm32fdpic_add_rofixup (output_bfd,
981 lm32fdpic_fixup32_section
982 (info),
983 sgot->output_section->vma
984 + sgot->output_offset
985 + off);
986 }
987 /* Mark GOT entry as having been written. */
988 h->got.offset |= 1;
989 }
990 }
991
992 relocation = sgot->output_offset + off;
993 }
994 else
995 {
996 bfd_vma off;
997 bfd_byte *loc;
998
999 BFD_ASSERT (local_got_offsets != NULL
1000 && local_got_offsets[r_symndx] != (bfd_vma) -1);
1001
1002 /* Get offset into GOT table. */
1003 off = local_got_offsets[r_symndx];
1004
1005 /* The offset must always be a multiple of 4. We use
1006 the least significant bit to record whether we have
1007 already processed this entry. */
1008 if ((off & 1) != 0)
1009 off &= ~1;
1010 else
1011 {
1012 /* Write entry in GOT. */
1013 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
1014 /* Create entry in .rofixup pointing to GOT entry. */
1015 if (IS_FDPIC (output_bfd))
1016 {
1017 _lm32fdpic_add_rofixup (output_bfd,
1018 lm32fdpic_fixup32_section
1019 (info),
1020 sgot->output_section->vma
1021 + sgot->output_offset
1022 + off);
1023 }
1024
0e1862bb 1025 if (bfd_link_pic (info))
84e94c90
NC		 1026 {
1027 asection *srelgot;
1028 Elf_Internal_Rela outrel;
1029
1030 /* We need to generate a R_LM32_RELATIVE reloc
1031 for the dynamic linker. */
3d4d4302
AM		 1032 srelgot = bfd_get_linker_section (dynobj,
1033 ".rela.got");
84e94c90
NC		 1034 BFD_ASSERT (srelgot != NULL);
1035
1036 outrel.r_offset = (sgot->output_section->vma
1037 + sgot->output_offset
1038 + off);
1039 outrel.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
1040 outrel.r_addend = relocation;
1041 loc = srelgot->contents;
1042 loc += srelgot->reloc_count * sizeof (Elf32_External_Rela);
1043 bfd_elf32_swap_reloca_out (output_bfd, &outrel,loc);
1044 ++srelgot->reloc_count;
1045 }
1046
1047 local_got_offsets[r_symndx] |= 1;
1048 }
1049
1050
1051 relocation = sgot->output_offset + off;
1052 }
1053
1054 /* Addend should be zero. */
1055 if (rel->r_addend != 0)
4eca0228 1056 _bfd_error_handler (_("internal error: addend should be zero for R_LM32_16_GOT"));
84e94c90
NC		 1057
1058 r = _bfd_final_link_relocate (howto,
1059 input_bfd,
1060 input_section,
1061 contents,
1062 rel->r_offset,
1063 relocation,
1064 rel->r_addend);
1065 break;
1066
1067 case R_LM32_GOTOFF_LO16:
1068 case R_LM32_GOTOFF_HI16:
1069 /* Relocation is offset from GOT. */
1070 BFD_ASSERT (sgot != NULL);
1071 relocation -= sgot->output_section->vma;
1072 /* Account for sign-extension. */
1073 if ((r_type == R_LM32_GOTOFF_HI16)
1074 && ((relocation + rel->r_addend) & 0x8000))
1075 rel->r_addend += 0x10000;
1076 r = _bfd_final_link_relocate (howto,
1077 input_bfd,
1078 input_section,
1079 contents,
1080 rel->r_offset,
1081 relocation,
1082 rel->r_addend);
1083 break;
1084
1085 case R_LM32_32:
1086 if (IS_FDPIC (output_bfd))
1087 {
1088 if ((!h) || (h && h->root.type != bfd_link_hash_undefweak))
1089 {
1090 /* Only create .rofixup entries for relocs in loadable sections. */
1091 if ((bfd_get_section_flags (output_bfd, input_section->output_section)
1092 & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
1093
1094 {
1095 /* Check address to be modified is writable. */
1096 if (_lm32fdpic_osec_readonly_p (output_bfd,
1097 input_section
1098 ->output_section))
1099 {
1100 info->callbacks->warning
1101 (info,
1102 _("cannot emit dynamic relocations in read-only section"),
1103 name, input_bfd, input_section, rel->r_offset);
1104 return FALSE;
1105 }
1106 /* Create entry in .rofixup section. */
1107 _lm32fdpic_add_rofixup (output_bfd,
1108 lm32fdpic_fixup32_section (info),
1109 input_section->output_section->vma
1110 + input_section->output_offset
1111 + rel->r_offset);
1112 }
1113 }
1114 }
1115 /* Fall through. */
1116
1117 default:
1118 r = _bfd_final_link_relocate (howto,
1119 input_bfd,
1120 input_section,
1121 contents,
1122 rel->r_offset,
1123 relocation,
1124 rel->r_addend);
1125 break;
1126 }
1127 }
1128
1129 if (r != bfd_reloc_ok)
1130 {
84e94c90
NC		 1131 const char *msg = NULL;
1132 arelent bfd_reloc;
84e94c90
NC		 1133
1134 lm32_info_to_howto_rela (input_bfd, &bfd_reloc, rel);
1135 howto = bfd_reloc.howto;
1136
1137 if (h != NULL)
1138 name = h->root.root.string;
1139 else
1140 {
1141 name = (bfd_elf_string_from_elf_section
1142 (input_bfd, symtab_hdr->sh_link, sym->st_name));
1143 if (name == NULL || *name == '\0')
1144 name = bfd_section_name (input_bfd, sec);
1145 }
1146
1147 switch (r)
1148 {
1149 case bfd_reloc_overflow:
1150 if ((h != NULL)
1151 && (h->root.type == bfd_link_hash_undefweak))
1152 break;
1a72702b
AM		 1153 (*info->callbacks->reloc_overflow)
1154 (info, (h ? &h->root : NULL), name, howto->name,
1155 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
84e94c90
NC		 1156 break;
1157
1158 case bfd_reloc_undefined:
1a72702b
AM		 1159 (*info->callbacks->undefined_symbol)
1160 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
84e94c90
NC		 1161 break;
1162
1163 case bfd_reloc_outofrange:
1164 msg = _("internal error: out of range error");
1165 goto common_error;
1166
1167 case bfd_reloc_notsupported:
1168 msg = _("internal error: unsupported relocation error");
1169 goto common_error;
1170
1171 case bfd_reloc_dangerous:
1172 msg = _("internal error: dangerous error");
1173 goto common_error;
1174
1175 default:
1176 msg = _("internal error: unknown error");
1177 /* fall through */
1178
1179 common_error:
1a72702b
AM		 1180 (*info->callbacks->warning) (info, msg, name, input_bfd,
1181 input_section, rel->r_offset);
84e94c90
NC		 1182 break;
1183 }
1184 }
1185 }
1186
1187 return TRUE;
1188}
1189
1190static asection *
1191lm32_elf_gc_mark_hook (asection *sec,
1192 struct bfd_link_info *info,
1193 Elf_Internal_Rela *rel,
1194 struct elf_link_hash_entry *h,
1195 Elf_Internal_Sym *sym)
1196{
1197 if (h != NULL)
1198 switch (ELF32_R_TYPE (rel->r_info))
1199 {
1200 case R_LM32_GNU_VTINHERIT:
1201 case R_LM32_GNU_VTENTRY:
1202 return NULL;
1203 }
1204
1205 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1206}
1207
1208static bfd_boolean
1209lm32_elf_gc_sweep_hook (bfd *abfd,
1210 struct bfd_link_info *info ATTRIBUTE_UNUSED,
1211 asection *sec,
1212 const Elf_Internal_Rela *relocs ATTRIBUTE_UNUSED)
1213{
1214 /* Update the got entry reference counts for the section being removed. */
1215 Elf_Internal_Shdr *symtab_hdr;
1216 struct elf_link_hash_entry **sym_hashes;
1217 bfd_signed_vma *local_got_refcounts;
1218 const Elf_Internal_Rela *rel, *relend;
1219
1220 elf_section_data (sec)->local_dynrel = NULL;
1221
1222 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1223 sym_hashes = elf_sym_hashes (abfd);
1224 local_got_refcounts = elf_local_got_refcounts (abfd);
1225
1226 relend = relocs + sec->reloc_count;
1227 for (rel = relocs; rel < relend; rel++)
1228 {
1229 unsigned long r_symndx;
1230 struct elf_link_hash_entry *h = NULL;
1231
1232 r_symndx = ELF32_R_SYM (rel->r_info);
1233 if (r_symndx >= symtab_hdr->sh_info)
1234 {
1235 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1236 while (h->root.type == bfd_link_hash_indirect
1237 || h->root.type == bfd_link_hash_warning)
1238 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1239 }
1240
1241 switch (ELF32_R_TYPE (rel->r_info))
1242 {
1243 case R_LM32_16_GOT:
1244 if (h != NULL)
1245 {
1246 if (h->got.refcount > 0)
1247 h->got.refcount--;
1248 }
1249 else
1250 {
1251 if (local_got_refcounts && local_got_refcounts[r_symndx] > 0)
1252 local_got_refcounts[r_symndx]--;
1253 }
1254 break;
1255
1256 default:
1257 break;
1258 }
1259 }
1260 return TRUE;
1261}
1262
1263/* Look through the relocs for a section during the first phase. */
1264
1265static bfd_boolean
1266lm32_elf_check_relocs (bfd *abfd,
1267 struct bfd_link_info *info,
1268 asection *sec,
1269 const Elf_Internal_Rela *relocs)
1270{
1271 Elf_Internal_Shdr *symtab_hdr;
1272 struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
1273 const Elf_Internal_Rela *rel;
1274 const Elf_Internal_Rela *rel_end;
1275 struct elf_lm32_link_hash_table *htab;
1276 bfd *dynobj;
84e94c90 1277
0e1862bb 1278 if (bfd_link_relocatable (info))
84e94c90
NC		 1279 return TRUE;
1280
84e94c90
NC		 1281 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1282 sym_hashes = elf_sym_hashes (abfd);
1283 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
1284 if (!elf_bad_symtab (abfd))
1285 sym_hashes_end -= symtab_hdr->sh_info;
1286
1287 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 1288 if (htab == NULL)
1289 return FALSE;
1290
84e94c90 1291 dynobj = htab->root.dynobj;
84e94c90
NC		 1292
1293 rel_end = relocs + sec->reloc_count;
1294 for (rel = relocs; rel < rel_end; rel++)
1295 {
1296 int r_type;
1297 struct elf_link_hash_entry *h;
1298 unsigned long r_symndx;
1299
1300 r_symndx = ELF32_R_SYM (rel->r_info);
1301 r_type = ELF32_R_TYPE (rel->r_info);
1302 if (r_symndx < symtab_hdr->sh_info)
1303 h = NULL;
1304 else
1305 {
1306 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1307 while (h->root.type == bfd_link_hash_indirect
1308 || h->root.type == bfd_link_hash_warning)
1309 h = (struct elf_link_hash_entry *) h->root.u.i.link;
81fbe831
AM		 1310
1311 /* PR15323, ref flags aren't set for references in the same
1312 object. */
1313 h->root.non_ir_ref = 1;
84e94c90
NC		 1314 }
1315
1316 /* Some relocs require a global offset table. */
1317 if (htab->sgot == NULL)
1318 {
1319 switch (r_type)
1320 {
1321 case R_LM32_16_GOT:
1322 case R_LM32_GOTOFF_HI16:
1323 case R_LM32_GOTOFF_LO16:
1324 if (dynobj == NULL)
1325 htab->root.dynobj = dynobj = abfd;
1326 if (! create_got_section (dynobj, info))
1327 return FALSE;
1328 break;
1329 }
1330 }
1331
1332 /* Some relocs require a rofixup table. */
1333 if (IS_FDPIC (abfd))
1334 {
1335 switch (r_type)
1336 {
1337 case R_LM32_32:
1338 /* FDPIC requires a GOT if there is a .rofixup section
1339 (Normal ELF doesn't). */
1340 if (dynobj == NULL)
1341 htab->root.dynobj = dynobj = abfd;
1342 if (! create_got_section (dynobj, info))
1343 return FALSE;
1344 /* Create .rofixup section */
1345 if (htab->sfixup32 == NULL)
1346 {
3d4d4302 1347 if (! create_rofixup_section (dynobj, info))
84e94c90
NC		 1348 return FALSE;
1349 }
1350 break;
1351 case R_LM32_16_GOT:
1352 case R_LM32_GOTOFF_HI16:
1353 case R_LM32_GOTOFF_LO16:
1354 /* Create .rofixup section. */
1355 if (htab->sfixup32 == NULL)
1356 {
3d4d4302
AM		 1357 if (dynobj == NULL)
1358 htab->root.dynobj = dynobj = abfd;
1359 if (! create_rofixup_section (dynobj, info))
84e94c90
NC		 1360 return FALSE;
1361 }
1362 break;
1363 }
1364 }
1365
1366 switch (r_type)
1367 {
1368 case R_LM32_16_GOT:
1369 if (h != NULL)
1370 h->got.refcount += 1;
1371 else
1372 {
1373 bfd_signed_vma *local_got_refcounts;
1374
1375 /* This is a global offset table entry for a local symbol. */
1376 local_got_refcounts = elf_local_got_refcounts (abfd);
1377 if (local_got_refcounts == NULL)
1378 {
1379 bfd_size_type size;
1380
1381 size = symtab_hdr->sh_info;
1382 size *= sizeof (bfd_signed_vma);
1383 local_got_refcounts = bfd_zalloc (abfd, size);
1384 if (local_got_refcounts == NULL)
1385 return FALSE;
1386 elf_local_got_refcounts (abfd) = local_got_refcounts;
1387 }
1388 local_got_refcounts[r_symndx] += 1;
1389 }
1390 break;
1391
1392 /* This relocation describes the C++ object vtable hierarchy.
1393 Reconstruct it for later use during GC. */
1394 case R_LM32_GNU_VTINHERIT:
1395 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1396 return FALSE;
1397 break;
1398
1399 /* This relocation describes which C++ vtable entries are actually
1400 used. Record for later use during GC. */
1401 case R_LM32_GNU_VTENTRY:
1402 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1403 return FALSE;
1404 break;
1405
1406 }
1407 }
1408
1409 return TRUE;
1410}
1411
1412/* Finish up the dynamic sections. */
1413
1414static bfd_boolean
1415lm32_elf_finish_dynamic_sections (bfd *output_bfd,
1416 struct bfd_link_info *info)
1417{
1418 struct elf_lm32_link_hash_table *htab;
1419 bfd *dynobj;
1420 asection *sdyn;
1421 asection *sgot;
1422
1423 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 1424 if (htab == NULL)
1425 return FALSE;
1426
84e94c90
NC		 1427 dynobj = htab->root.dynobj;
1428
1429 sgot = htab->sgotplt;
3d4d4302 1430 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
84e94c90
NC		 1431
1432 if (htab->root.dynamic_sections_created)
1433 {
1434 asection *splt;
1435 Elf32_External_Dyn *dyncon, *dynconend;
1436
1437 BFD_ASSERT (sgot != NULL && sdyn != NULL);
1438
1439 dyncon = (Elf32_External_Dyn *) sdyn->contents;
1440 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
1441
1442 for (; dyncon < dynconend; dyncon++)
1443 {
1444 Elf_Internal_Dyn dyn;
84e94c90
NC		 1445 asection *s;
1446
1447 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
1448
1449 switch (dyn.d_tag)
1450 {
1451 default:
1452 break;
1453
1454 case DT_PLTGOT:
4ade44b7 1455 s = htab->sgotplt;
84e94c90
NC		 1456 goto get_vma;
1457 case DT_JMPREL:
4ade44b7 1458 s = htab->srelplt;
84e94c90 1459 get_vma:
4ade44b7 1460 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
84e94c90
NC		 1461 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1462 break;
1463
1464 case DT_PLTRELSZ:
4ade44b7 1465 s = htab->srelplt;
84e94c90
NC		 1466 dyn.d_un.d_val = s->size;
1467 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1468 break;
1469
1470 case DT_RELASZ:
1471 /* My reading of the SVR4 ABI indicates that the
1472 procedure linkage table relocs (DT_JMPREL) should be
1473 included in the overall relocs (DT_RELA). This is
1474 what Solaris does. However, UnixWare can not handle
1475 that case. Therefore, we override the DT_RELASZ entry
1476 here to make it not include the JMPREL relocs. Since
1477 the linker script arranges for .rela.plt to follow all
1478 other relocation sections, we don't have to worry
1479 about changing the DT_RELA entry. */
1480 if (htab->srelplt != NULL)
1481 {
4ade44b7 1482 s = htab->srelplt;
84e94c90
NC		 1483 dyn.d_un.d_val -= s->size;
1484 }
1485 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1486 break;
1487 }
1488 }
1489
1490 /* Fill in the first entry in the procedure linkage table. */
1491 splt = htab->splt;
1492 if (splt && splt->size > 0)
1493 {
0e1862bb 1494 if (bfd_link_pic (info))
84e94c90
NC		 1495 {
1496 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD0, splt->contents);
1497 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD1, splt->contents + 4);
1498 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD2, splt->contents + 8);
1499 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD3, splt->contents + 12);
1500 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD4, splt->contents + 16);
1501 }
1502 else
1503 {
1504 unsigned long addr;
1505 /* addr = .got + 4 */
1506 addr = sgot->output_section->vma + sgot->output_offset + 4;
1507 bfd_put_32 (output_bfd,
1508 PLT0_ENTRY_WORD0 | ((addr >> 16) & 0xffff),
1509 splt->contents);
1510 bfd_put_32 (output_bfd,
1511 PLT0_ENTRY_WORD1 | (addr & 0xffff),
1512 splt->contents + 4);
1513 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD2, splt->contents + 8);
1514 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD3, splt->contents + 12);
1515 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD4, splt->contents + 16);
1516 }
1517
1518 elf_section_data (splt->output_section)->this_hdr.sh_entsize =
1519 PLT_ENTRY_SIZE;
1520 }
1521 }
1522
1523 /* Fill in the first three entries in the global offset table. */
1524 if (sgot && sgot->size > 0)
1525 {
1526 if (sdyn == NULL)
1527 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
1528 else
1529 bfd_put_32 (output_bfd,
1530 sdyn->output_section->vma + sdyn->output_offset,
1531 sgot->contents);
1532 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
1533 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
1534
1535 /* FIXME: This can be null if create_dynamic_sections wasn't called. */
1536 if (elf_section_data (sgot->output_section) != NULL)
1537 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
1538 }
1539
1540 if (lm32fdpic_fixup32_section (info))
1541 {
1542 struct elf_link_hash_entry *hgot = elf_hash_table (info)->hgot;
1543 bfd_vma got_value = hgot->root.u.def.value
1544 + hgot->root.u.def.section->output_section->vma
1545 + hgot->root.u.def.section->output_offset;
1546 struct bfd_link_hash_entry *hend;
1547
1548 /* Last entry is pointer to GOT. */
1549 _lm32fdpic_add_rofixup (output_bfd, lm32fdpic_fixup32_section (info), got_value);
1550
1551 /* Check we wrote enough entries. */
1552 if (lm32fdpic_fixup32_section (info)->size
1553 != (lm32fdpic_fixup32_section (info)->reloc_count * 4))
1554 {
4eca0228 1555 _bfd_error_handler
84e94c90
NC		 1556 ("LINKER BUG: .rofixup section size mismatch: size/4 %d != relocs %d",
1557 lm32fdpic_fixup32_section (info)->size/4,
1558 lm32fdpic_fixup32_section (info)->reloc_count);
1559 return FALSE;
1560 }
1561
1562 hend = bfd_link_hash_lookup (info->hash, "__ROFIXUP_END__",
1563 FALSE, FALSE, TRUE);
1564 if (hend
1565 && (hend->type == bfd_link_hash_defined
1566 || hend->type == bfd_link_hash_defweak))
1567 {
1568 bfd_vma value =
1569 lm32fdpic_fixup32_section (info)->output_section->vma
1570 + lm32fdpic_fixup32_section (info)->output_offset
1571 + lm32fdpic_fixup32_section (info)->size
1572 - hend->u.def.section->output_section->vma
1573 - hend->u.def.section->output_offset;
1574 BFD_ASSERT (hend->u.def.value == value);
1575 if (hend->u.def.value != value)
1576 {
4eca0228 1577 _bfd_error_handler
84e94c90
NC		 1578 ("LINKER BUG: .rofixup section hend->u.def.value != value: %ld != %ld", hend->u.def.value, value);
1579 return FALSE;
1580 }
1581 }
1582 }
1583
1584 return TRUE;
1585}
1586
1587/* Finish up dynamic symbol handling. We set the contents of various
1588 dynamic sections here. */
1589
1590static bfd_boolean
1591lm32_elf_finish_dynamic_symbol (bfd *output_bfd,
1592 struct bfd_link_info *info,
1593 struct elf_link_hash_entry *h,
1594 Elf_Internal_Sym *sym)
1595{
1596 struct elf_lm32_link_hash_table *htab;
84e94c90
NC		 1597 bfd_byte *loc;
1598
1599 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 1600 if (htab == NULL)
1601 return FALSE;
1602
84e94c90
NC		 1603 if (h->plt.offset != (bfd_vma) -1)
1604 {
1605 asection *splt;
1606 asection *sgot;
1607 asection *srela;
1608
1609 bfd_vma plt_index;
1610 bfd_vma got_offset;
1611 Elf_Internal_Rela rela;
1612
1613 /* This symbol has an entry in the procedure linkage table. Set
1614 it up. */
1615 BFD_ASSERT (h->dynindx != -1);
1616
1617 splt = htab->splt;
1618 sgot = htab->sgotplt;
1619 srela = htab->srelplt;
1620 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1621
1622 /* Get the index in the procedure linkage table which
1623 corresponds to this symbol. This is the index of this symbol
1624 in all the symbols for which we are making plt entries. The
1625 first entry in the procedure linkage table is reserved. */
1626 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1627
1628 /* Get the offset into the .got table of the entry that
1629 corresponds to this function. Each .got entry is 4 bytes.
1630 The first three are reserved. */
1631 got_offset = (plt_index + 3) * 4;
1632
1633 /* Fill in the entry in the procedure linkage table. */
0e1862bb 1634 if (! bfd_link_pic (info))
84e94c90
NC		 1635 {
1636 /* TODO */
1637 }
1638 else
1639 {
1640 /* TODO */
1641 }
1642
1643 /* Fill in the entry in the global offset table. */
1644 bfd_put_32 (output_bfd,
1645 (splt->output_section->vma
1646 + splt->output_offset
1647 + h->plt.offset
1648 + 12), /* same offset */
1649 sgot->contents + got_offset);
1650
1651 /* Fill in the entry in the .rela.plt section. */
1652 rela.r_offset = (sgot->output_section->vma
1653 + sgot->output_offset
1654 + got_offset);
1655 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_JMP_SLOT);
1656 rela.r_addend = 0;
1657 loc = srela->contents;
1658 loc += plt_index * sizeof (Elf32_External_Rela);
1659 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1660
1661 if (!h->def_regular)
1662 {
1663 /* Mark the symbol as undefined, rather than as defined in
1664 the .plt section. Leave the value alone. */
1665 sym->st_shndx = SHN_UNDEF;
1666 }
1667
1668 }
1669
1670 if (h->got.offset != (bfd_vma) -1)
1671 {
1672 asection *sgot;
1673 asection *srela;
1674 Elf_Internal_Rela rela;
1675
1676 /* This symbol has an entry in the global offset table. Set it
1677 up. */
1678 sgot = htab->sgot;
1679 srela = htab->srelgot;
1680 BFD_ASSERT (sgot != NULL && srela != NULL);
1681
1682 rela.r_offset = (sgot->output_section->vma
1683 + sgot->output_offset
1684 + (h->got.offset &~ 1));
1685
1686 /* If this is a -Bsymbolic link, and the symbol is defined
1687 locally, we just want to emit a RELATIVE reloc. Likewise if
1688 the symbol was forced to be local because of a version file.
1689 The entry in the global offset table will already have been
1690 initialized in the relocate_section function. */
0e1862bb 1691 if (bfd_link_pic (info)
84e94c90
NC		 1692 && (info->symbolic
1693 || h->dynindx == -1
1694 || h->forced_local)
1695 && h->def_regular)
1696 {
1697 rela.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
1698 rela.r_addend = (h->root.u.def.value
1699 + h->root.u.def.section->output_section->vma
1700 + h->root.u.def.section->output_offset);
1701 }
1702 else
1703 {
1704 BFD_ASSERT ((h->got.offset & 1) == 0);
1705 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
1706 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_GLOB_DAT);
1707 rela.r_addend = 0;
1708 }
1709
1710 loc = srela->contents;
1711 loc += srela->reloc_count * sizeof (Elf32_External_Rela);
1712 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1713 ++srela->reloc_count;
1714 }
1715
1716 if (h->needs_copy)
1717 {
1718 asection *s;
1719 Elf_Internal_Rela rela;
1720
1721 /* This symbols needs a copy reloc. Set it up. */
1722 BFD_ASSERT (h->dynindx != -1
1723 && (h->root.type == bfd_link_hash_defined
1724 || h->root.type == bfd_link_hash_defweak));
1725
3d4d4302 1726 s = bfd_get_linker_section (htab->root.dynobj, ".rela.bss");
84e94c90
NC		 1727 BFD_ASSERT (s != NULL);
1728
1729 rela.r_offset = (h->root.u.def.value
1730 + h->root.u.def.section->output_section->vma
1731 + h->root.u.def.section->output_offset);
1732 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_COPY);
1733 rela.r_addend = 0;
1734 loc = s->contents;
1735 loc += s->reloc_count * sizeof (Elf32_External_Rela);
1736 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1737 ++s->reloc_count;
1738 }
1739
1740 /* Mark some specially defined symbols as absolute. */
9637f6ef 1741 if (h == htab->root.hdynamic || h == htab->root.hgot)
84e94c90
NC		 1742 sym->st_shndx = SHN_ABS;
1743
1744 return TRUE;
1745}
1746
1747static enum elf_reloc_type_class
7e612e98
AM		 1748lm32_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
1749 const asection *rel_sec ATTRIBUTE_UNUSED,
1750 const Elf_Internal_Rela *rela)
84e94c90
NC		 1751{
1752 switch ((int) ELF32_R_TYPE (rela->r_info))
1753 {
1754 case R_LM32_RELATIVE: return reloc_class_relative;
1755 case R_LM32_JMP_SLOT: return reloc_class_plt;
1756 case R_LM32_COPY: return reloc_class_copy;
1757 default: return reloc_class_normal;
1758 }
1759}
1760
1761/* Adjust a symbol defined by a dynamic object and referenced by a
1762 regular object. The current definition is in some section of the
1763 dynamic object, but we're not including those sections. We have to
1764 change the definition to something the rest of the link can
1765 understand. */
1766
1767static bfd_boolean
1768lm32_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1769 struct elf_link_hash_entry *h)
1770{
1771 struct elf_lm32_link_hash_table *htab;
1772 struct elf_lm32_link_hash_entry *eh;
1773 struct elf_lm32_dyn_relocs *p;
1774 bfd *dynobj;
1775 asection *s;
1776
1777 dynobj = elf_hash_table (info)->dynobj;
1778
1779 /* Make sure we know what is going on here. */
1780 BFD_ASSERT (dynobj != NULL
1781 && (h->needs_plt
1782 || h->u.weakdef != NULL
1783 || (h->def_dynamic
1784 && h->ref_regular
1785 && !h->def_regular)));
1786
1787 /* If this is a function, put it in the procedure linkage table. We
1788 will fill in the contents of the procedure linkage table later,
1789 when we know the address of the .got section. */
1790 if (h->type == STT_FUNC
1791 || h->needs_plt)
1792 {
0e1862bb 1793 if (! bfd_link_pic (info)
84e94c90
NC		 1794 && !h->def_dynamic
1795 && !h->ref_dynamic
1796 && h->root.type != bfd_link_hash_undefweak
1797 && h->root.type != bfd_link_hash_undefined)
1798 {
1799 /* This case can occur if we saw a PLT reloc in an input
1800 file, but the symbol was never referred to by a dynamic
1801 object. In such a case, we don't actually need to build
1802 a procedure linkage table, and we can just do a PCREL
1803 reloc instead. */
1804 h->plt.offset = (bfd_vma) -1;
1805 h->needs_plt = 0;
1806 }
1807
1808 return TRUE;
1809 }
1810 else
1811 h->plt.offset = (bfd_vma) -1;
1812
1813 /* If this is a weak symbol, and there is a real definition, the
1814 processor independent code will have arranged for us to see the
1815 real definition first, and we can just use the same value. */
1816 if (h->u.weakdef != NULL)
1817 {
1818 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
1819 || h->u.weakdef->root.type == bfd_link_hash_defweak);
1820 h->root.u.def.section = h->u.weakdef->root.u.def.section;
1821 h->root.u.def.value = h->u.weakdef->root.u.def.value;
1822 return TRUE;
1823 }
1824
1825 /* This is a reference to a symbol defined by a dynamic object which
1826 is not a function. */
1827
1828 /* If we are creating a shared library, we must presume that the
1829 only references to the symbol are via the global offset table.
1830 For such cases we need not do anything here; the relocations will
1831 be handled correctly by relocate_section. */
0e1862bb 1832 if (bfd_link_pic (info))
84e94c90
NC		 1833 return TRUE;
1834
1835 /* If there are no references to this symbol that do not use the
1836 GOT, we don't need to generate a copy reloc. */
1837 if (!h->non_got_ref)
1838 return TRUE;
1839
1840 /* If -z nocopyreloc was given, we won't generate them either. */
1841 if (info->nocopyreloc)
1842 {
1843 h->non_got_ref = 0;
1844 return TRUE;
1845 }
1846
1847 eh = (struct elf_lm32_link_hash_entry *) h;
1848 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1849 {
1850 s = p->sec->output_section;
1851 if (s != NULL && (s->flags & (SEC_READONLY | SEC_HAS_CONTENTS)) != 0)
1852 break;
1853 }
1854
1855 /* If we didn't find any dynamic relocs in sections which needs the
1856 copy reloc, then we'll be keeping the dynamic relocs and avoiding
1857 the copy reloc. */
1858 if (p == NULL)
1859 {
1860 h->non_got_ref = 0;
1861 return TRUE;
1862 }
1863
84e94c90
NC		 1864 /* We must allocate the symbol in our .dynbss section, which will
1865 become part of the .bss section of the executable. There will be
1866 an entry for this symbol in the .dynsym section. The dynamic
1867 object will contain position independent code, so all references
1868 from the dynamic object to this symbol will go through the global
1869 offset table. The dynamic linker will use the .dynsym entry to
1870 determine the address it must put in the global offset table, so
1871 both the dynamic object and the regular object will refer to the
1872 same memory location for the variable. */
1873
1874 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 1875 if (htab == NULL)
1876 return FALSE;
1877
84e94c90
NC		 1878 s = htab->sdynbss;
1879 BFD_ASSERT (s != NULL);
1880
1881 /* We must generate a R_LM32_COPY reloc to tell the dynamic linker
1882 to copy the initial value out of the dynamic object and into the
1883 runtime process image. We need to remember the offset into the
1884 .rela.bss section we are going to use. */
1d7e9d18 1885 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
84e94c90
NC		 1886 {
1887 asection *srel;
1888
1889 srel = htab->srelbss;
1890 BFD_ASSERT (srel != NULL);
1891 srel->size += sizeof (Elf32_External_Rela);
1892 h->needs_copy = 1;
1893 }
1894
6cabe1ea 1895 return _bfd_elf_adjust_dynamic_copy (info, h, s);
84e94c90
NC		 1896}
1897
1898/* Allocate space in .plt, .got and associated reloc sections for
1899 dynamic relocs. */
1900
1901static bfd_boolean
1902allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
1903{
1904 struct bfd_link_info *info;
1905 struct elf_lm32_link_hash_table *htab;
1906 struct elf_lm32_link_hash_entry *eh;
1907 struct elf_lm32_dyn_relocs *p;
1908
1909 if (h->root.type == bfd_link_hash_indirect)
1910 return TRUE;
1911
84e94c90
NC		 1912 info = (struct bfd_link_info *) inf;
1913 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 1914 if (htab == NULL)
1915 return FALSE;
84e94c90
NC		 1916
1917 eh = (struct elf_lm32_link_hash_entry *) h;
1918
1919 if (htab->root.dynamic_sections_created
1920 && h->plt.refcount > 0)
1921 {
1922 /* Make sure this symbol is output as a dynamic symbol.
1923 Undefined weak syms won't yet be marked as dynamic. */
1924 if (h->dynindx == -1
1925 && !h->forced_local)
1926 {
1927 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1928 return FALSE;
1929 }
1930
0e1862bb 1931 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
84e94c90
NC		 1932 {
1933 asection *s = htab->splt;
1934
1935 /* If this is the first .plt entry, make room for the special
1936 first entry. */
1937 if (s->size == 0)
1938 s->size += PLT_ENTRY_SIZE;
1939
1940 h->plt.offset = s->size;
1941
1942 /* If this symbol is not defined in a regular file, and we are
1943 not generating a shared library, then set the symbol to this
1944 location in the .plt. This is required to make function
1945 pointers compare as equal between the normal executable and
1946 the shared library. */
0e1862bb 1947 if (! bfd_link_pic (info)
84e94c90
NC		 1948 && !h->def_regular)
1949 {
1950 h->root.u.def.section = s;
1951 h->root.u.def.value = h->plt.offset;
1952 }
1953
1954 /* Make room for this entry. */
1955 s->size += PLT_ENTRY_SIZE;
1956
1957 /* We also need to make an entry in the .got.plt section, which
1958 will be placed in the .got section by the linker script. */
1959 htab->sgotplt->size += 4;
1960
1961 /* We also need to make an entry in the .rel.plt section. */
1962 htab->srelplt->size += sizeof (Elf32_External_Rela);
1963 }
1964 else
1965 {
1966 h->plt.offset = (bfd_vma) -1;
1967 h->needs_plt = 0;
1968 }
1969 }
1970 else
1971 {
1972 h->plt.offset = (bfd_vma) -1;
1973 h->needs_plt = 0;
1974 }
1975
1976 if (h->got.refcount > 0)
1977 {
1978 asection *s;
1979 bfd_boolean dyn;
1980
1981 /* Make sure this symbol is output as a dynamic symbol.
1982 Undefined weak syms won't yet be marked as dynamic. */
1983 if (h->dynindx == -1
1984 && !h->forced_local)
1985 {
1986 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1987 return FALSE;
1988 }
1989
1990 s = htab->sgot;
1991
1992 h->got.offset = s->size;
1993 s->size += 4;
1994 dyn = htab->root.dynamic_sections_created;
0e1862bb 1995 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h))
84e94c90
NC		 1996 htab->srelgot->size += sizeof (Elf32_External_Rela);
1997 }
1998 else
1999 h->got.offset = (bfd_vma) -1;
2000
2001 if (eh->dyn_relocs == NULL)
2002 return TRUE;
2003
2004 /* In the shared -Bsymbolic case, discard space allocated for
2005 dynamic pc-relative relocs against symbols which turn out to be
2006 defined in regular objects. For the normal shared case, discard
2007 space for pc-relative relocs that have become local due to symbol
2008 visibility changes. */
2009
0e1862bb 2010 if (bfd_link_pic (info))
84e94c90
NC		 2011 {
2012 if (h->def_regular
2013 && (h->forced_local
2014 || info->symbolic))
2015 {
2016 struct elf_lm32_dyn_relocs **pp;
2017
2018 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
2019 {
2020 p->count -= p->pc_count;
2021 p->pc_count = 0;
2022 if (p->count == 0)
2023 *pp = p->next;
2024 else
2025 pp = &p->next;
2026 }
2027 }
2028
2029 /* Also discard relocs on undefined weak syms with non-default
2030 visibility. */
2031 if (eh->dyn_relocs != NULL
2032 && h->root.type == bfd_link_hash_undefweak)
2033 {
2034 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
2035 eh->dyn_relocs = NULL;
2036
2037 /* Make sure undefined weak symbols are output as a dynamic
2038 symbol in PIEs. */
2039 else if (h->dynindx == -1
2040 && !h->forced_local)
2041 {
2042 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2043 return FALSE;
2044 }
2045 }
2046 }
2047 else
2048 {
2049 /* For the non-shared case, discard space for relocs against
2050 symbols which turn out to need copy relocs or are not
2051 dynamic. */
2052
2053 if (!h->non_got_ref
2054 && ((h->def_dynamic
2055 && !h->def_regular)
2056 || (htab->root.dynamic_sections_created
2057 && (h->root.type == bfd_link_hash_undefweak
2058 || h->root.type == bfd_link_hash_undefined))))
2059 {
2060 /* Make sure this symbol is output as a dynamic symbol.
2061 Undefined weak syms won't yet be marked as dynamic. */
2062 if (h->dynindx == -1
2063 && !h->forced_local)
2064 {
2065 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2066 return FALSE;
2067 }
2068
2069 /* If that succeeded, we know we'll be keeping all the
2070 relocs. */
2071 if (h->dynindx != -1)
2072 goto keep;
2073 }
2074
2075 eh->dyn_relocs = NULL;
2076
2077 keep: ;
2078 }
2079
2080 /* Finally, allocate space. */
2081 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2082 {
2083 asection *sreloc = elf_section_data (p->sec)->sreloc;
2084 sreloc->size += p->count * sizeof (Elf32_External_Rela);
2085 }
2086
2087 return TRUE;
2088}
2089
2090/* Find any dynamic relocs that apply to read-only sections. */
2091
2092static bfd_boolean
2093readonly_dynrelocs (struct elf_link_hash_entry *h, void * inf)
2094{
2095 struct elf_lm32_link_hash_entry *eh;
2096 struct elf_lm32_dyn_relocs *p;
2097
84e94c90
NC		 2098 eh = (struct elf_lm32_link_hash_entry *) h;
2099 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2100 {
2101 asection *s = p->sec->output_section;
2102
2103 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2104 {
2105 struct bfd_link_info *info = (struct bfd_link_info *) inf;
2106
2107 info->flags |= DF_TEXTREL;
2108
2109 /* Not an error, just cut short the traversal. */
2110 return FALSE;
2111 }
2112 }
2113 return TRUE;
2114}
2115
2116/* Set the sizes of the dynamic sections. */
2117
2118static bfd_boolean
2119lm32_elf_size_dynamic_sections (bfd *output_bfd,
2120 struct bfd_link_info *info)
2121{
2122 struct elf_lm32_link_hash_table *htab;
2123 bfd *dynobj;
2124 asection *s;
2125 bfd_boolean relocs;
2126 bfd *ibfd;
2127
2128 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 2129 if (htab == NULL)
2130 return FALSE;
2131
84e94c90
NC		 2132 dynobj = htab->root.dynobj;
2133 BFD_ASSERT (dynobj != NULL);
2134
2135 if (htab->root.dynamic_sections_created)
2136 {
2137 /* Set the contents of the .interp section to the interpreter. */
9b8b325a 2138 if (bfd_link_executable (info) && !info->nointerp)
84e94c90 2139 {
3d4d4302 2140 s = bfd_get_linker_section (dynobj, ".interp");
84e94c90
NC		 2141 BFD_ASSERT (s != NULL);
2142 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
2143 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2144 }
2145 }
2146
2147 /* Set up .got offsets for local syms, and space for local dynamic
2148 relocs. */
c72f2fb2 2149 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
84e94c90
NC		 2150 {
2151 bfd_signed_vma *local_got;
2152 bfd_signed_vma *end_local_got;
2153 bfd_size_type locsymcount;
2154 Elf_Internal_Shdr *symtab_hdr;
2155 asection *srel;
2156
2157 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
2158 continue;
2159
2160 for (s = ibfd->sections; s != NULL; s = s->next)
2161 {
2162 struct elf_lm32_dyn_relocs *p;
2163
2164 for (p = ((struct elf_lm32_dyn_relocs *)
2165 elf_section_data (s)->local_dynrel);
2166 p != NULL;
2167 p = p->next)
2168 {
2169 if (! bfd_is_abs_section (p->sec)
2170 && bfd_is_abs_section (p->sec->output_section))
2171 {
2172 /* Input section has been discarded, either because
2173 it is a copy of a linkonce section or due to
2174 linker script /DISCARD/, so we'll be discarding
2175 the relocs too. */
2176 }
2177 else if (p->count != 0)
2178 {
2179 srel = elf_section_data (p->sec)->sreloc;
2180 srel->size += p->count * sizeof (Elf32_External_Rela);
2181 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2182 info->flags |= DF_TEXTREL;
2183 }
2184 }
2185 }
2186
2187 local_got = elf_local_got_refcounts (ibfd);
2188 if (!local_got)
2189 continue;
2190
2191 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2192 locsymcount = symtab_hdr->sh_info;
2193 end_local_got = local_got + locsymcount;
2194 s = htab->sgot;
2195 srel = htab->srelgot;
2196 for (; local_got < end_local_got; ++local_got)
2197 {
2198 if (*local_got > 0)
2199 {
2200 *local_got = s->size;
2201 s->size += 4;
0e1862bb 2202 if (bfd_link_pic (info))
84e94c90
NC		 2203 srel->size += sizeof (Elf32_External_Rela);
2204 }
2205 else
2206 *local_got = (bfd_vma) -1;
2207 }
2208 }
2209
2210 /* Allocate global sym .plt and .got entries, and space for global
2211 sym dynamic relocs. */
2212 elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info);
2213
2214 /* We now have determined the sizes of the various dynamic sections.
2215 Allocate memory for them. */
2216 relocs = FALSE;
2217 for (s = dynobj->sections; s != NULL; s = s->next)
2218 {
2219 if ((s->flags & SEC_LINKER_CREATED) == 0)
2220 continue;
2221
2222 if (s == htab->splt
2223 || s == htab->sgot
2224 || s == htab->sgotplt
2225 || s == htab->sdynbss)
2226 {
2227 /* Strip this section if we don't need it; see the
2228 comment below. */
2229 }
2230 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
2231 {
2232 if (s->size != 0 && s != htab->srelplt)
2233 relocs = TRUE;
2234
2235 /* We use the reloc_count field as a counter if we need
2236 to copy relocs into the output file. */
2237 s->reloc_count = 0;
2238 }
2239 else
2240 /* It's not one of our sections, so don't allocate space. */
2241 continue;
2242
2243 if (s->size == 0)
2244 {
2245 /* If we don't need this section, strip it from the
2246 output file. This is mostly to handle .rela.bss and
2247 .rela.plt. We must create both sections in
2248 create_dynamic_sections, because they must be created
2249 before the linker maps input sections to output
2250 sections. The linker does that before
2251 adjust_dynamic_symbol is called, and it is that
2252 function which decides whether anything needs to go
2253 into these sections. */
2254 s->flags |= SEC_EXCLUDE;
2255 continue;
2256 }
2257
2258 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2259 continue;
2260
2261 /* Allocate memory for the section contents. We use bfd_zalloc
2262 here in case unused entries are not reclaimed before the
2263 section's contents are written out. This should not happen,
2264 but this way if it does, we get a R_LM32_NONE reloc instead
2265 of garbage. */
2266 s->contents = bfd_zalloc (dynobj, s->size);
2267 if (s->contents == NULL)
2268 return FALSE;
2269 }
2270
2271 if (htab->root.dynamic_sections_created)
2272 {
2273 /* Add some entries to the .dynamic section. We fill in the
2274 values later, in lm32_elf_finish_dynamic_sections, but we
2275 must add the entries now so that we get the correct size for
2276 the .dynamic section. The DT_DEBUG entry is filled in by the
2277 dynamic linker and used by the debugger. */
2278#define add_dynamic_entry(TAG, VAL) \
2279 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2280
0e1862bb 2281 if (bfd_link_executable (info))
84e94c90
NC		 2282 {
2283 if (! add_dynamic_entry (DT_DEBUG, 0))
2284 return FALSE;
2285 }
2286
2287 if (htab->splt->size != 0)
2288 {
2289 if (! add_dynamic_entry (DT_PLTGOT, 0)
2290 || ! add_dynamic_entry (DT_PLTRELSZ, 0)
2291 || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
2292 || ! add_dynamic_entry (DT_JMPREL, 0))
2293 return FALSE;
2294 }
2295
2296 if (relocs)
2297 {
2298 if (! add_dynamic_entry (DT_RELA, 0)
2299 || ! add_dynamic_entry (DT_RELASZ, 0)
2300 || ! add_dynamic_entry (DT_RELAENT,
2301 sizeof (Elf32_External_Rela)))
2302 return FALSE;
2303
2304 /* If any dynamic relocs apply to a read-only section,
2305 then we need a DT_TEXTREL entry. */
2306 if ((info->flags & DF_TEXTREL) == 0)
2307 elf_link_hash_traverse (&htab->root, readonly_dynrelocs,
2308 info);
2309
2310 if ((info->flags & DF_TEXTREL) != 0)
2311 {
2312 if (! add_dynamic_entry (DT_TEXTREL, 0))
2313 return FALSE;
2314 }
2315 }
2316 }
2317#undef add_dynamic_entry
2318
2319 /* Allocate .rofixup section. */
2320 if (IS_FDPIC (output_bfd))
2321 {
2322 struct weak_symbol_list *list_start = NULL, *list_end = NULL;
2323 int rgot_weak_count = 0;
2324 int r32_count = 0;
2325 int rgot_count = 0;
2326 /* Look for deleted sections. */
c72f2fb2 2327 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
84e94c90
NC		 2328 {
2329 for (s = ibfd->sections; s != NULL; s = s->next)
2330 {
2331 if (s->reloc_count)
2332 {
2333 /* Count relocs that need .rofixup entires. */
2334 Elf_Internal_Rela *internal_relocs, *end;
2335 internal_relocs = elf_section_data (s)->relocs;
2336 if (internal_relocs == NULL)
2337 internal_relocs = (_bfd_elf_link_read_relocs (ibfd, s, NULL, NULL, FALSE));
2338 if (internal_relocs != NULL)
2339 {
2340 end = internal_relocs + s->reloc_count;
2341 while (internal_relocs < end)
2342 {
2343 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2344 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd);
2345 unsigned long r_symndx;
2346 struct elf_link_hash_entry *h;
2347
2348 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2349 sym_hashes = elf_sym_hashes (ibfd);
2350 r_symndx = ELF32_R_SYM (internal_relocs->r_info);
2351 h = NULL;
2352 if (r_symndx < symtab_hdr->sh_info)
2353 {
2354 }
2355 else
2356 {
2357 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2358 while (h->root.type == bfd_link_hash_indirect
2359 || h->root.type == bfd_link_hash_warning)
2360 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2361 }
2362
2363 /* Don't generate entries for weak symbols. */
2364 if (!h || (h && h->root.type != bfd_link_hash_undefweak))
2365 {
dbaa2011 2366 if (!discarded_section (s) && !((bfd_get_section_flags (ibfd, s) & SEC_ALLOC) == 0))
84e94c90
NC		 2367 {
2368 switch (ELF32_R_TYPE (internal_relocs->r_info))
2369 {
2370 case R_LM32_32:
2371 r32_count++;
2372 break;
2373 case R_LM32_16_GOT:
2374 rgot_count++;
2375 break;
2376 }
2377 }
2378 }
2379 else
2380 {
2381 struct weak_symbol_list *current, *new_entry;
2382 /* Is this symbol already in the list? */
2383 for (current = list_start; current; current = current->next)
2384 {
2385 if (!strcmp (current->name, h->root.root.string))
2386 break;
2387 }
dbaa2011 2388 if (!current && !discarded_section (s) && (bfd_get_section_flags (ibfd, s) & SEC_ALLOC))
84e94c90
NC		 2389 {
2390 /* Will this have an entry in the GOT. */
2391 if (ELF32_R_TYPE (internal_relocs->r_info) == R_LM32_16_GOT)
2392 {
2393 /* Create a new entry. */
2394 new_entry = malloc (sizeof (struct weak_symbol_list));
2395 if (!new_entry)
2396 return FALSE;
2397 new_entry->name = h->root.root.string;
2398 new_entry->next = NULL;
2399 /* Add to list */
2400 if (list_start == NULL)
2401 {
2402 list_start = new_entry;
2403 list_end = new_entry;
2404 }
2405 else
2406 {
2407 list_end->next = new_entry;
2408 list_end = new_entry;
2409 }
2410 /* Increase count of undefined weak symbols in the got. */
2411 rgot_weak_count++;
2412 }
2413 }
2414 }
2415 internal_relocs++;
2416 }
2417 }
2418 else
2419 return FALSE;
2420 }
2421 }
2422 }
2423 /* Free list. */
2424 while (list_start)
2425 {
2426 list_end = list_start->next;
2427 free (list_start);
2428 list_start = list_end;
2429 }
2430
2431 /* Size sections. */
2432 lm32fdpic_fixup32_section (info)->size = (r32_count + (htab->sgot->size / 4) - rgot_weak_count + 1) * 4;
2433 if (lm32fdpic_fixup32_section (info)->size == 0)
2434 lm32fdpic_fixup32_section (info)->flags |= SEC_EXCLUDE;
2435 else
2436 {
2437 lm32fdpic_fixup32_section (info)->contents =
2438 bfd_zalloc (dynobj, lm32fdpic_fixup32_section (info)->size);
2439 if (lm32fdpic_fixup32_section (info)->contents == NULL)
2440 return FALSE;
2441 }
2442 }
2443
2444 return TRUE;
2445}
2446
2447/* Create dynamic sections when linking against a dynamic object. */
2448
2449static bfd_boolean
2450lm32_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
2451{
2452 struct elf_lm32_link_hash_table *htab;
2453 flagword flags, pltflags;
2454 asection *s;
2455 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
2456 int ptralign = 2; /* 32bit */
2457
2458 htab = lm32_elf_hash_table (info);
4dfe6ac6
NC		 2459 if (htab == NULL)
2460 return FALSE;
84e94c90
NC		 2461
2462 /* Make sure we have a GOT - For the case where we have a dynamic object
2463 but none of the relocs in check_relocs */
2464 if (! create_got_section (abfd, info))
2465 return FALSE;
2466 if (IS_FDPIC (abfd) && (htab->sfixup32 == NULL))
2467 {
2468 if (! create_rofixup_section (abfd, info))
2469 return FALSE;
2470 }
2471
2472 /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
2473 .rel[a].bss sections. */
2474 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2475 | SEC_LINKER_CREATED);
2476
2477 pltflags = flags;
2478 pltflags |= SEC_CODE;
2479 if (bed->plt_not_loaded)
2480 pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
2481 if (bed->plt_readonly)
2482 pltflags |= SEC_READONLY;
2483
3d4d4302 2484 s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags);
84e94c90
NC		 2485 htab->splt = s;
2486 if (s == NULL
2487 || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
2488 return FALSE;
2489
2490 if (bed->want_plt_sym)
2491 {
2492 /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
2493 .plt section. */
2494 struct bfd_link_hash_entry *bh = NULL;
2495 struct elf_link_hash_entry *h;
2496
2497 if (! (_bfd_generic_link_add_one_symbol
2498 (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
2499 (bfd_vma) 0, NULL, FALSE,
2500 get_elf_backend_data (abfd)->collect, &bh)))
2501 return FALSE;
2502 h = (struct elf_link_hash_entry *) bh;
2503 h->def_regular = 1;
2504 h->type = STT_OBJECT;
2505 htab->root.hplt = h;
2506
0e1862bb 2507 if (bfd_link_pic (info)
84e94c90
NC		 2508 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2509 return FALSE;
2510 }
2511
3d4d4302
AM		 2512 s = bfd_make_section_anyway_with_flags (abfd,
2513 bed->default_use_rela_p
2514 ? ".rela.plt" : ".rel.plt",
2515 flags | SEC_READONLY);
84e94c90
NC		 2516 htab->srelplt = s;
2517 if (s == NULL
2518 || ! bfd_set_section_alignment (abfd, s, ptralign))
2519 return FALSE;
2520
2521 if (htab->sgot == NULL
2522 && ! create_got_section (abfd, info))
2523 return FALSE;
2524
84e94c90
NC		 2525 if (bed->want_dynbss)
2526 {
2527 /* The .dynbss section is a place to put symbols which are defined
2528 by dynamic objects, are referenced by regular objects, and are
2529 not functions. We must allocate space for them in the process
2530 image and use a R_*_COPY reloc to tell the dynamic linker to
2531 initialize them at run time. The linker script puts the .dynbss
2532 section into the .bss section of the final image. */
3d4d4302
AM		 2533 s = bfd_make_section_anyway_with_flags (abfd, ".dynbss",
2534 SEC_ALLOC | SEC_LINKER_CREATED);
84e94c90
NC		 2535 htab->sdynbss = s;
2536 if (s == NULL)
2537 return FALSE;
2538 /* The .rel[a].bss section holds copy relocs. This section is not
2539 normally needed. We need to create it here, though, so that the
2540 linker will map it to an output section. We can't just create it
2541 only if we need it, because we will not know whether we need it
2542 until we have seen all the input files, and the first time the
2543 main linker code calls BFD after examining all the input files
2544 (size_dynamic_sections) the input sections have already been
2545 mapped to the output sections. If the section turns out not to
2546 be needed, we can discard it later. We will never need this
2547 section when generating a shared object, since they do not use
2548 copy relocs. */
0e1862bb 2549 if (! bfd_link_pic (info))
84e94c90 2550 {
3d4d4302
AM		 2551 s = bfd_make_section_anyway_with_flags (abfd,
2552 (bed->default_use_rela_p
2553 ? ".rela.bss" : ".rel.bss"),
2554 flags | SEC_READONLY);
84e94c90
NC		 2555 htab->srelbss = s;
2556 if (s == NULL
2557 || ! bfd_set_section_alignment (abfd, s, ptralign))
2558 return FALSE;
2559 }
2560 }
2561
2562 return TRUE;
2563}
2564
2565/* Copy the extra info we tack onto an elf_link_hash_entry. */
2566
2567static void
2568lm32_elf_copy_indirect_symbol (struct bfd_link_info *info,
2569 struct elf_link_hash_entry *dir,
2570 struct elf_link_hash_entry *ind)
2571{
2572 struct elf_lm32_link_hash_entry * edir;
2573 struct elf_lm32_link_hash_entry * eind;
2574
2575 edir = (struct elf_lm32_link_hash_entry *) dir;
2576 eind = (struct elf_lm32_link_hash_entry *) ind;
2577
2578 if (eind->dyn_relocs != NULL)
2579 {
2580 if (edir->dyn_relocs != NULL)
2581 {
2582 struct elf_lm32_dyn_relocs **pp;
2583 struct elf_lm32_dyn_relocs *p;
2584
2585 /* Add reloc counts against the indirect sym to the direct sym
2586 list. Merge any entries against the same section. */
2587 for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2588 {
2589 struct elf_lm32_dyn_relocs *q;
2590
2591 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2592 if (q->sec == p->sec)
2593 {
2594 q->pc_count += p->pc_count;
2595 q->count += p->count;
2596 *pp = p->next;
2597 break;
2598 }
2599 if (q == NULL)
2600 pp = &p->next;
2601 }
2602 *pp = edir->dyn_relocs;
2603 }
2604
2605 edir->dyn_relocs = eind->dyn_relocs;
2606 eind->dyn_relocs = NULL;
2607 }
2608
2609 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2610}
2611
2612static bfd_boolean
04c3a755 2613lm32_elf_always_size_sections (bfd *output_bfd, struct bfd_link_info *info)
84e94c90 2614{
0e1862bb 2615 if (!bfd_link_relocatable (info))
84e94c90 2616 {
04c3a755
NS		 2617 if (!bfd_elf_stack_segment_size (output_bfd, info,
2618 "__stacksize", DEFAULT_STACK_SIZE))
2619 return FALSE;
84e94c90 2620
84e94c90 2621 asection *sec = bfd_get_section_by_name (output_bfd, ".stack");
84e94c90 2622 if (sec)
04c3a755 2623 sec->size = info->stacksize >= 0 ? info->stacksize : 0;
84e94c90
NC		 2624 }
2625
2626 return TRUE;
2627}
2628
84e94c90
NC		 2629static bfd_boolean
2630lm32_elf_fdpic_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
2631{
2632 unsigned i;
2633
2634 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2635 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2636 return TRUE;
2637
e2349352 2638 if (! _bfd_elf_copy_private_bfd_data (ibfd, obfd))
84e94c90
NC		 2639 return FALSE;
2640
2641 if (! elf_tdata (ibfd) || ! elf_tdata (ibfd)->phdr
2642 || ! elf_tdata (obfd) || ! elf_tdata (obfd)->phdr)
2643 return TRUE;
2644
2645 /* Copy the stack size. */
2646 for (i = 0; i < elf_elfheader (ibfd)->e_phnum; i++)
2647 if (elf_tdata (ibfd)->phdr[i].p_type == PT_GNU_STACK)
2648 {
2649 Elf_Internal_Phdr *iphdr = &elf_tdata (ibfd)->phdr[i];
2650
2651 for (i = 0; i < elf_elfheader (obfd)->e_phnum; i++)
2652 if (elf_tdata (obfd)->phdr[i].p_type == PT_GNU_STACK)
2653 {
2654 memcpy (&elf_tdata (obfd)->phdr[i], iphdr, sizeof (*iphdr));
2655
2656 /* Rewrite the phdrs, since we're only called after they were first written. */
2657 if (bfd_seek (obfd, (bfd_signed_vma) get_elf_backend_data (obfd)
2658 ->s->sizeof_ehdr, SEEK_SET) != 0
2659 || get_elf_backend_data (obfd)->s->write_out_phdrs (obfd, elf_tdata (obfd)->phdr,
2660 elf_elfheader (obfd)->e_phnum) != 0)
2661 return FALSE;
2662 break;
2663 }
2664
2665 break;
2666 }
2667
2668 return TRUE;
2669}
2670
2671
2672#define ELF_ARCH bfd_arch_lm32
ae95ffa6 2673#define ELF_TARGET_ID LM32_ELF_DATA
84e94c90
NC		 2674#define ELF_MACHINE_CODE EM_LATTICEMICO32
2675#define ELF_MAXPAGESIZE 0x1000
2676
6d00b590 2677#define TARGET_BIG_SYM lm32_elf32_vec
84e94c90
NC		 2678#define TARGET_BIG_NAME "elf32-lm32"
2679
2680#define bfd_elf32_bfd_reloc_type_lookup lm32_reloc_type_lookup
2681#define bfd_elf32_bfd_reloc_name_lookup lm32_reloc_name_lookup
2682#define elf_info_to_howto lm32_info_to_howto_rela
2683#define elf_info_to_howto_rel 0
2684#define elf_backend_rela_normal 1
2685#define elf_backend_object_p lm32_elf_object_p
2686#define elf_backend_final_write_processing lm32_elf_final_write_processing
04c3a755 2687#define elf_backend_stack_align 8
84e94c90
NC		 2688#define elf_backend_can_gc_sections 1
2689#define elf_backend_can_refcount 1
2690#define elf_backend_gc_mark_hook lm32_elf_gc_mark_hook
2691#define elf_backend_gc_sweep_hook lm32_elf_gc_sweep_hook
2692#define elf_backend_plt_readonly 1
2693#define elf_backend_want_got_plt 1
2694#define elf_backend_want_plt_sym 0
2695#define elf_backend_got_header_size 12
2696#define bfd_elf32_bfd_link_hash_table_create lm32_elf_link_hash_table_create
2697#define elf_backend_check_relocs lm32_elf_check_relocs
2698#define elf_backend_reloc_type_class lm32_elf_reloc_type_class
2699#define elf_backend_copy_indirect_symbol lm32_elf_copy_indirect_symbol
2700#define elf_backend_size_dynamic_sections lm32_elf_size_dynamic_sections
2701#define elf_backend_omit_section_dynsym ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
2702#define elf_backend_create_dynamic_sections lm32_elf_create_dynamic_sections
2703#define elf_backend_finish_dynamic_sections lm32_elf_finish_dynamic_sections
2704#define elf_backend_adjust_dynamic_symbol lm32_elf_adjust_dynamic_symbol
2705#define elf_backend_finish_dynamic_symbol lm32_elf_finish_dynamic_symbol
2706#define elf_backend_relocate_section lm32_elf_relocate_section
2707
2708#include "elf32-target.h"
2709
2710#undef ELF_MAXPAGESIZE
2711#define ELF_MAXPAGESIZE 0x4000
2712
2713
2714#undef TARGET_BIG_SYM
6d00b590 2715#define TARGET_BIG_SYM lm32_elf32_fdpic_vec
84e94c90
NC		 2716#undef TARGET_BIG_NAME
2717#define TARGET_BIG_NAME "elf32-lm32fdpic"
2718#undef elf32_bed
2719#define elf32_bed elf32_lm32fdpic_bed
2720
2721#undef elf_backend_always_size_sections
2722#define elf_backend_always_size_sections lm32_elf_always_size_sections
84e94c90
NC		 2723#undef bfd_elf32_bfd_copy_private_bfd_data
2724#define bfd_elf32_bfd_copy_private_bfd_data lm32_elf_fdpic_copy_private_bfd_data
2725
2726#include "elf32-target.h"
A mirror of the official binutils-gdb repository