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