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