projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
dyn_relocs tidy
[deliverable/binutils-gdb.git] / bfd / elf32-lm32.c
1 /* Lattice Mico32-specific support for 32-bit ELF
2 Copyright (C) 2008-2017 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 (_("%B: 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 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1169 sym_hashes = elf_sym_hashes (abfd);
1170 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
1171 if (!elf_bad_symtab (abfd))
1172 sym_hashes_end -= symtab_hdr->sh_info;
1173
1174 htab = lm32_elf_hash_table (info);
1175 if (htab == NULL)
1176 return FALSE;
1177
1178 dynobj = htab->root.dynobj;
1179
1180 rel_end = relocs + sec->reloc_count;
1181 for (rel = relocs; rel < rel_end; rel++)
1182 {
1183 int r_type;
1184 struct elf_link_hash_entry *h;
1185 unsigned long r_symndx;
1186
1187 r_symndx = ELF32_R_SYM (rel->r_info);
1188 r_type = ELF32_R_TYPE (rel->r_info);
1189 if (r_symndx < symtab_hdr->sh_info)
1190 h = NULL;
1191 else
1192 {
1193 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1194 while (h->root.type == bfd_link_hash_indirect
1195 || h->root.type == bfd_link_hash_warning)
1196 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1197 }
1198
1199 /* Some relocs require a global offset table. */
1200 if (htab->root.sgot == NULL)
1201 {
1202 switch (r_type)
1203 {
1204 case R_LM32_16_GOT:
1205 case R_LM32_GOTOFF_HI16:
1206 case R_LM32_GOTOFF_LO16:
1207 if (dynobj == NULL)
1208 htab->root.dynobj = dynobj = abfd;
1209 if (!_bfd_elf_create_got_section (dynobj, info))
1210 return FALSE;
1211 break;
1212 }
1213 }
1214
1215 /* Some relocs require a rofixup table. */
1216 if (IS_FDPIC (abfd))
1217 {
1218 switch (r_type)
1219 {
1220 case R_LM32_32:
1221 /* FDPIC requires a GOT if there is a .rofixup section
1222 (Normal ELF doesn't). */
1223 if (dynobj == NULL)
1224 htab->root.dynobj = dynobj = abfd;
1225 if (!_bfd_elf_create_got_section (dynobj, info))
1226 return FALSE;
1227 /* Create .rofixup section */
1228 if (htab->sfixup32 == NULL)
1229 {
1230 if (! create_rofixup_section (dynobj, info))
1231 return FALSE;
1232 }
1233 break;
1234 case R_LM32_16_GOT:
1235 case R_LM32_GOTOFF_HI16:
1236 case R_LM32_GOTOFF_LO16:
1237 /* Create .rofixup section. */
1238 if (htab->sfixup32 == NULL)
1239 {
1240 if (dynobj == NULL)
1241 htab->root.dynobj = dynobj = abfd;
1242 if (! create_rofixup_section (dynobj, info))
1243 return FALSE;
1244 }
1245 break;
1246 }
1247 }
1248
1249 switch (r_type)
1250 {
1251 case R_LM32_16_GOT:
1252 if (h != NULL)
1253 h->got.refcount += 1;
1254 else
1255 {
1256 bfd_signed_vma *local_got_refcounts;
1257
1258 /* This is a global offset table entry for a local symbol. */
1259 local_got_refcounts = elf_local_got_refcounts (abfd);
1260 if (local_got_refcounts == NULL)
1261 {
1262 bfd_size_type size;
1263
1264 size = symtab_hdr->sh_info;
1265 size *= sizeof (bfd_signed_vma);
1266 local_got_refcounts = bfd_zalloc (abfd, size);
1267 if (local_got_refcounts == NULL)
1268 return FALSE;
1269 elf_local_got_refcounts (abfd) = local_got_refcounts;
1270 }
1271 local_got_refcounts[r_symndx] += 1;
1272 }
1273 break;
1274
1275 /* This relocation describes the C++ object vtable hierarchy.
1276 Reconstruct it for later use during GC. */
1277 case R_LM32_GNU_VTINHERIT:
1278 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1279 return FALSE;
1280 break;
1281
1282 /* This relocation describes which C++ vtable entries are actually
1283 used. Record for later use during GC. */
1284 case R_LM32_GNU_VTENTRY:
1285 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1286 return FALSE;
1287 break;
1288
1289 }
1290 }
1291
1292 return TRUE;
1293 }
1294
1295 /* Finish up the dynamic sections. */
1296
1297 static bfd_boolean
1298 lm32_elf_finish_dynamic_sections (bfd *output_bfd,
1299 struct bfd_link_info *info)
1300 {
1301 struct elf_lm32_link_hash_table *htab;
1302 bfd *dynobj;
1303 asection *sdyn;
1304 asection *sgot;
1305
1306 htab = lm32_elf_hash_table (info);
1307 if (htab == NULL)
1308 return FALSE;
1309
1310 dynobj = htab->root.dynobj;
1311
1312 sgot = htab->root.sgotplt;
1313 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
1314
1315 if (htab->root.dynamic_sections_created)
1316 {
1317 asection *splt;
1318 Elf32_External_Dyn *dyncon, *dynconend;
1319
1320 BFD_ASSERT (sgot != NULL && sdyn != NULL);
1321
1322 dyncon = (Elf32_External_Dyn *) sdyn->contents;
1323 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
1324
1325 for (; dyncon < dynconend; dyncon++)
1326 {
1327 Elf_Internal_Dyn dyn;
1328 asection *s;
1329
1330 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
1331
1332 switch (dyn.d_tag)
1333 {
1334 default:
1335 break;
1336
1337 case DT_PLTGOT:
1338 s = htab->root.sgotplt;
1339 goto get_vma;
1340 case DT_JMPREL:
1341 s = htab->root.srelplt;
1342 get_vma:
1343 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
1344 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1345 break;
1346
1347 case DT_PLTRELSZ:
1348 s = htab->root.srelplt;
1349 dyn.d_un.d_val = s->size;
1350 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1351 break;
1352 }
1353 }
1354
1355 /* Fill in the first entry in the procedure linkage table. */
1356 splt = htab->root.splt;
1357 if (splt && splt->size > 0)
1358 {
1359 if (bfd_link_pic (info))
1360 {
1361 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD0, splt->contents);
1362 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD1, splt->contents + 4);
1363 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD2, splt->contents + 8);
1364 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD3, splt->contents + 12);
1365 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD4, splt->contents + 16);
1366 }
1367 else
1368 {
1369 unsigned long addr;
1370 /* addr = .got + 4 */
1371 addr = sgot->output_section->vma + sgot->output_offset + 4;
1372 bfd_put_32 (output_bfd,
1373 PLT0_ENTRY_WORD0 | ((addr >> 16) & 0xffff),
1374 splt->contents);
1375 bfd_put_32 (output_bfd,
1376 PLT0_ENTRY_WORD1 | (addr & 0xffff),
1377 splt->contents + 4);
1378 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD2, splt->contents + 8);
1379 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD3, splt->contents + 12);
1380 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD4, splt->contents + 16);
1381 }
1382
1383 elf_section_data (splt->output_section)->this_hdr.sh_entsize =
1384 PLT_ENTRY_SIZE;
1385 }
1386 }
1387
1388 /* Fill in the first three entries in the global offset table. */
1389 if (sgot && sgot->size > 0)
1390 {
1391 if (sdyn == NULL)
1392 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
1393 else
1394 bfd_put_32 (output_bfd,
1395 sdyn->output_section->vma + sdyn->output_offset,
1396 sgot->contents);
1397 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
1398 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
1399
1400 /* FIXME: This can be null if create_dynamic_sections wasn't called. */
1401 if (elf_section_data (sgot->output_section) != NULL)
1402 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
1403 }
1404
1405 if (lm32fdpic_fixup32_section (info))
1406 {
1407 struct elf_link_hash_entry *hgot = elf_hash_table (info)->hgot;
1408 bfd_vma got_value = hgot->root.u.def.value
1409 + hgot->root.u.def.section->output_section->vma
1410 + hgot->root.u.def.section->output_offset;
1411 struct bfd_link_hash_entry *hend;
1412
1413 /* Last entry is pointer to GOT. */
1414 _lm32fdpic_add_rofixup (output_bfd, lm32fdpic_fixup32_section (info), got_value);
1415
1416 /* Check we wrote enough entries. */
1417 if (lm32fdpic_fixup32_section (info)->size
1418 != (lm32fdpic_fixup32_section (info)->reloc_count * 4))
1419 {
1420 _bfd_error_handler
1421 ("LINKER BUG: .rofixup section size mismatch: size/4 %Ld != relocs %d",
1422 lm32fdpic_fixup32_section (info)->size/4,
1423 lm32fdpic_fixup32_section (info)->reloc_count);
1424 return FALSE;
1425 }
1426
1427 hend = bfd_link_hash_lookup (info->hash, "__ROFIXUP_END__",
1428 FALSE, FALSE, TRUE);
1429 if (hend
1430 && (hend->type == bfd_link_hash_defined
1431 || hend->type == bfd_link_hash_defweak))
1432 {
1433 bfd_vma value =
1434 lm32fdpic_fixup32_section (info)->output_section->vma
1435 + lm32fdpic_fixup32_section (info)->output_offset
1436 + lm32fdpic_fixup32_section (info)->size
1437 - hend->u.def.section->output_section->vma
1438 - hend->u.def.section->output_offset;
1439 BFD_ASSERT (hend->u.def.value == value);
1440 if (hend->u.def.value != value)
1441 {
1442 _bfd_error_handler
1443 ("LINKER BUG: .rofixup section hend->u.def.value != value: %Ld != %Ld", hend->u.def.value, value);
1444 return FALSE;
1445 }
1446 }
1447 }
1448
1449 return TRUE;
1450 }
1451
1452 /* Finish up dynamic symbol handling. We set the contents of various
1453 dynamic sections here. */
1454
1455 static bfd_boolean
1456 lm32_elf_finish_dynamic_symbol (bfd *output_bfd,
1457 struct bfd_link_info *info,
1458 struct elf_link_hash_entry *h,
1459 Elf_Internal_Sym *sym)
1460 {
1461 struct elf_lm32_link_hash_table *htab;
1462 bfd_byte *loc;
1463
1464 htab = lm32_elf_hash_table (info);
1465 if (htab == NULL)
1466 return FALSE;
1467
1468 if (h->plt.offset != (bfd_vma) -1)
1469 {
1470 asection *splt;
1471 asection *sgot;
1472 asection *srela;
1473
1474 bfd_vma plt_index;
1475 bfd_vma got_offset;
1476 Elf_Internal_Rela rela;
1477
1478 /* This symbol has an entry in the procedure linkage table. Set
1479 it up. */
1480 BFD_ASSERT (h->dynindx != -1);
1481
1482 splt = htab->root.splt;
1483 sgot = htab->root.sgotplt;
1484 srela = htab->root.srelplt;
1485 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1486
1487 /* Get the index in the procedure linkage table which
1488 corresponds to this symbol. This is the index of this symbol
1489 in all the symbols for which we are making plt entries. The
1490 first entry in the procedure linkage table is reserved. */
1491 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1492
1493 /* Get the offset into the .got table of the entry that
1494 corresponds to this function. Each .got entry is 4 bytes.
1495 The first three are reserved. */
1496 got_offset = (plt_index + 3) * 4;
1497
1498 /* Fill in the entry in the procedure linkage table. */
1499 if (! bfd_link_pic (info))
1500 {
1501 /* TODO */
1502 }
1503 else
1504 {
1505 /* TODO */
1506 }
1507
1508 /* Fill in the entry in the global offset table. */
1509 bfd_put_32 (output_bfd,
1510 (splt->output_section->vma
1511 + splt->output_offset
1512 + h->plt.offset
1513 + 12), /* same offset */
1514 sgot->contents + got_offset);
1515
1516 /* Fill in the entry in the .rela.plt section. */
1517 rela.r_offset = (sgot->output_section->vma
1518 + sgot->output_offset
1519 + got_offset);
1520 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_JMP_SLOT);
1521 rela.r_addend = 0;
1522 loc = srela->contents;
1523 loc += plt_index * sizeof (Elf32_External_Rela);
1524 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1525
1526 if (!h->def_regular)
1527 {
1528 /* Mark the symbol as undefined, rather than as defined in
1529 the .plt section. Leave the value alone. */
1530 sym->st_shndx = SHN_UNDEF;
1531 }
1532
1533 }
1534
1535 if (h->got.offset != (bfd_vma) -1)
1536 {
1537 asection *sgot;
1538 asection *srela;
1539 Elf_Internal_Rela rela;
1540
1541 /* This symbol has an entry in the global offset table. Set it
1542 up. */
1543 sgot = htab->root.sgot;
1544 srela = htab->root.srelgot;
1545 BFD_ASSERT (sgot != NULL && srela != NULL);
1546
1547 rela.r_offset = (sgot->output_section->vma
1548 + sgot->output_offset
1549 + (h->got.offset &~ 1));
1550
1551 /* If this is a -Bsymbolic link, and the symbol is defined
1552 locally, we just want to emit a RELATIVE reloc. Likewise if
1553 the symbol was forced to be local because of a version file.
1554 The entry in the global offset table will already have been
1555 initialized in the relocate_section function. */
1556 if (bfd_link_pic (info)
1557 && (info->symbolic
1558 || h->dynindx == -1
1559 || h->forced_local)
1560 && h->def_regular)
1561 {
1562 rela.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
1563 rela.r_addend = (h->root.u.def.value
1564 + h->root.u.def.section->output_section->vma
1565 + h->root.u.def.section->output_offset);
1566 }
1567 else
1568 {
1569 BFD_ASSERT ((h->got.offset & 1) == 0);
1570 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
1571 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_GLOB_DAT);
1572 rela.r_addend = 0;
1573 }
1574
1575 loc = srela->contents;
1576 loc += srela->reloc_count * sizeof (Elf32_External_Rela);
1577 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1578 ++srela->reloc_count;
1579 }
1580
1581 if (h->needs_copy)
1582 {
1583 asection *s;
1584 Elf_Internal_Rela rela;
1585
1586 /* This symbols needs a copy reloc. Set it up. */
1587 BFD_ASSERT (h->dynindx != -1
1588 && (h->root.type == bfd_link_hash_defined
1589 || h->root.type == bfd_link_hash_defweak));
1590
1591 s = bfd_get_linker_section (htab->root.dynobj, ".rela.bss");
1592 BFD_ASSERT (s != NULL);
1593
1594 rela.r_offset = (h->root.u.def.value
1595 + h->root.u.def.section->output_section->vma
1596 + h->root.u.def.section->output_offset);
1597 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_COPY);
1598 rela.r_addend = 0;
1599 loc = s->contents;
1600 loc += s->reloc_count * sizeof (Elf32_External_Rela);
1601 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1602 ++s->reloc_count;
1603 }
1604
1605 /* Mark some specially defined symbols as absolute. */
1606 if (h == htab->root.hdynamic || h == htab->root.hgot)
1607 sym->st_shndx = SHN_ABS;
1608
1609 return TRUE;
1610 }
1611
1612 static enum elf_reloc_type_class
1613 lm32_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
1614 const asection *rel_sec ATTRIBUTE_UNUSED,
1615 const Elf_Internal_Rela *rela)
1616 {
1617 switch ((int) ELF32_R_TYPE (rela->r_info))
1618 {
1619 case R_LM32_RELATIVE: return reloc_class_relative;
1620 case R_LM32_JMP_SLOT: return reloc_class_plt;
1621 case R_LM32_COPY: return reloc_class_copy;
1622 default: return reloc_class_normal;
1623 }
1624 }
1625
1626 /* Find dynamic relocs for H that apply to read-only sections. */
1627
1628 static asection *
1629 readonly_dynrelocs (struct elf_link_hash_entry *h)
1630 {
1631 struct elf_dyn_relocs *p;
1632 struct elf_lm32_link_hash_entry *eh = (struct elf_lm32_link_hash_entry *) h;
1633
1634 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1635 {
1636 asection *s = p->sec->output_section;
1637
1638 if (s != NULL && (s->flags & SEC_READONLY) != 0)
1639 return p->sec;
1640 }
1641 return NULL;
1642 }
1643
1644 /* Adjust a symbol defined by a dynamic object and referenced by a
1645 regular object. The current definition is in some section of the
1646 dynamic object, but we're not including those sections. We have to
1647 change the definition to something the rest of the link can
1648 understand. */
1649
1650 static bfd_boolean
1651 lm32_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1652 struct elf_link_hash_entry *h)
1653 {
1654 struct elf_lm32_link_hash_table *htab;
1655 bfd *dynobj;
1656 asection *s;
1657
1658 dynobj = elf_hash_table (info)->dynobj;
1659
1660 /* Make sure we know what is going on here. */
1661 BFD_ASSERT (dynobj != NULL
1662 && (h->needs_plt
1663 || h->is_weakalias
1664 || (h->def_dynamic
1665 && h->ref_regular
1666 && !h->def_regular)));
1667
1668 /* If this is a function, put it in the procedure linkage table. We
1669 will fill in the contents of the procedure linkage table later,
1670 when we know the address of the .got section. */
1671 if (h->type == STT_FUNC
1672 || h->needs_plt)
1673 {
1674 if (! bfd_link_pic (info)
1675 && !h->def_dynamic
1676 && !h->ref_dynamic
1677 && h->root.type != bfd_link_hash_undefweak
1678 && h->root.type != bfd_link_hash_undefined)
1679 {
1680 /* This case can occur if we saw a PLT reloc in an input
1681 file, but the symbol was never referred to by a dynamic
1682 object. In such a case, we don't actually need to build
1683 a procedure linkage table, and we can just do a PCREL
1684 reloc instead. */
1685 h->plt.offset = (bfd_vma) -1;
1686 h->needs_plt = 0;
1687 }
1688
1689 return TRUE;
1690 }
1691 else
1692 h->plt.offset = (bfd_vma) -1;
1693
1694 /* If this is a weak symbol, and there is a real definition, the
1695 processor independent code will have arranged for us to see the
1696 real definition first, and we can just use the same value. */
1697 if (h->is_weakalias)
1698 {
1699 struct elf_link_hash_entry *def = weakdef (h);
1700 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
1701 h->root.u.def.section = def->root.u.def.section;
1702 h->root.u.def.value = def->root.u.def.value;
1703 return TRUE;
1704 }
1705
1706 /* This is a reference to a symbol defined by a dynamic object which
1707 is not a function. */
1708
1709 /* If we are creating a shared library, we must presume that the
1710 only references to the symbol are via the global offset table.
1711 For such cases we need not do anything here; the relocations will
1712 be handled correctly by relocate_section. */
1713 if (bfd_link_pic (info))
1714 return TRUE;
1715
1716 /* If there are no references to this symbol that do not use the
1717 GOT, we don't need to generate a copy reloc. */
1718 if (!h->non_got_ref)
1719 return TRUE;
1720
1721 /* If -z nocopyreloc was given, we won't generate them either. */
1722 if (0 && info->nocopyreloc)
1723 {
1724 h->non_got_ref = 0;
1725 return TRUE;
1726 }
1727
1728 /* If we don't find any dynamic relocs in read-only sections, then
1729 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
1730 if (0 && !readonly_dynrelocs (h))
1731 {
1732 h->non_got_ref = 0;
1733 return TRUE;
1734 }
1735
1736 /* We must allocate the symbol in our .dynbss section, which will
1737 become part of the .bss section of the executable. There will be
1738 an entry for this symbol in the .dynsym section. The dynamic
1739 object will contain position independent code, so all references
1740 from the dynamic object to this symbol will go through the global
1741 offset table. The dynamic linker will use the .dynsym entry to
1742 determine the address it must put in the global offset table, so
1743 both the dynamic object and the regular object will refer to the
1744 same memory location for the variable. */
1745
1746 htab = lm32_elf_hash_table (info);
1747 if (htab == NULL)
1748 return FALSE;
1749
1750 s = htab->sdynbss;
1751 BFD_ASSERT (s != NULL);
1752
1753 /* We must generate a R_LM32_COPY reloc to tell the dynamic linker
1754 to copy the initial value out of the dynamic object and into the
1755 runtime process image. We need to remember the offset into the
1756 .rela.bss section we are going to use. */
1757 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
1758 {
1759 asection *srel;
1760
1761 srel = htab->srelbss;
1762 BFD_ASSERT (srel != NULL);
1763 srel->size += sizeof (Elf32_External_Rela);
1764 h->needs_copy = 1;
1765 }
1766
1767 return _bfd_elf_adjust_dynamic_copy (info, h, s);
1768 }
1769
1770 /* Allocate space in .plt, .got and associated reloc sections for
1771 dynamic relocs. */
1772
1773 static bfd_boolean
1774 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
1775 {
1776 struct bfd_link_info *info;
1777 struct elf_lm32_link_hash_table *htab;
1778 struct elf_lm32_link_hash_entry *eh;
1779 struct elf_dyn_relocs *p;
1780
1781 if (h->root.type == bfd_link_hash_indirect)
1782 return TRUE;
1783
1784 info = (struct bfd_link_info *) inf;
1785 htab = lm32_elf_hash_table (info);
1786 if (htab == NULL)
1787 return FALSE;
1788
1789 eh = (struct elf_lm32_link_hash_entry *) h;
1790
1791 if (htab->root.dynamic_sections_created
1792 && h->plt.refcount > 0)
1793 {
1794 /* Make sure this symbol is output as a dynamic symbol.
1795 Undefined weak syms won't yet be marked as dynamic. */
1796 if (h->dynindx == -1
1797 && !h->forced_local)
1798 {
1799 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1800 return FALSE;
1801 }
1802
1803 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
1804 {
1805 asection *s = htab->root.splt;
1806
1807 /* If this is the first .plt entry, make room for the special
1808 first entry. */
1809 if (s->size == 0)
1810 s->size += PLT_ENTRY_SIZE;
1811
1812 h->plt.offset = s->size;
1813
1814 /* If this symbol is not defined in a regular file, and we are
1815 not generating a shared library, then set the symbol to this
1816 location in the .plt. This is required to make function
1817 pointers compare as equal between the normal executable and
1818 the shared library. */
1819 if (! bfd_link_pic (info)
1820 && !h->def_regular)
1821 {
1822 h->root.u.def.section = s;
1823 h->root.u.def.value = h->plt.offset;
1824 }
1825
1826 /* Make room for this entry. */
1827 s->size += PLT_ENTRY_SIZE;
1828
1829 /* We also need to make an entry in the .got.plt section, which
1830 will be placed in the .got section by the linker script. */
1831 htab->root.sgotplt->size += 4;
1832
1833 /* We also need to make an entry in the .rel.plt section. */
1834 htab->root.srelplt->size += sizeof (Elf32_External_Rela);
1835 }
1836 else
1837 {
1838 h->plt.offset = (bfd_vma) -1;
1839 h->needs_plt = 0;
1840 }
1841 }
1842 else
1843 {
1844 h->plt.offset = (bfd_vma) -1;
1845 h->needs_plt = 0;
1846 }
1847
1848 if (h->got.refcount > 0)
1849 {
1850 asection *s;
1851 bfd_boolean dyn;
1852
1853 /* Make sure this symbol is output as a dynamic symbol.
1854 Undefined weak syms won't yet be marked as dynamic. */
1855 if (h->dynindx == -1
1856 && !h->forced_local)
1857 {
1858 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1859 return FALSE;
1860 }
1861
1862 s = htab->root.sgot;
1863
1864 h->got.offset = s->size;
1865 s->size += 4;
1866 dyn = htab->root.dynamic_sections_created;
1867 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h))
1868 htab->root.srelgot->size += sizeof (Elf32_External_Rela);
1869 }
1870 else
1871 h->got.offset = (bfd_vma) -1;
1872
1873 if (eh->dyn_relocs == NULL)
1874 return TRUE;
1875
1876 /* In the shared -Bsymbolic case, discard space allocated for
1877 dynamic pc-relative relocs against symbols which turn out to be
1878 defined in regular objects. For the normal shared case, discard
1879 space for pc-relative relocs that have become local due to symbol
1880 visibility changes. */
1881
1882 if (bfd_link_pic (info))
1883 {
1884 if (h->def_regular
1885 && (h->forced_local
1886 || info->symbolic))
1887 {
1888 struct elf_dyn_relocs **pp;
1889
1890 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
1891 {
1892 p->count -= p->pc_count;
1893 p->pc_count = 0;
1894 if (p->count == 0)
1895 *pp = p->next;
1896 else
1897 pp = &p->next;
1898 }
1899 }
1900
1901 /* Also discard relocs on undefined weak syms with non-default
1902 visibility. */
1903 if (eh->dyn_relocs != NULL
1904 && h->root.type == bfd_link_hash_undefweak)
1905 {
1906 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1907 eh->dyn_relocs = NULL;
1908
1909 /* Make sure undefined weak symbols are output as a dynamic
1910 symbol in PIEs. */
1911 else if (h->dynindx == -1
1912 && !h->forced_local)
1913 {
1914 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1915 return FALSE;
1916 }
1917 }
1918 }
1919 else
1920 {
1921 /* For the non-shared case, discard space for relocs against
1922 symbols which turn out to need copy relocs or are not
1923 dynamic. */
1924
1925 if (!h->non_got_ref
1926 && ((h->def_dynamic
1927 && !h->def_regular)
1928 || (htab->root.dynamic_sections_created
1929 && (h->root.type == bfd_link_hash_undefweak
1930 || h->root.type == bfd_link_hash_undefined))))
1931 {
1932 /* Make sure this symbol is output as a dynamic symbol.
1933 Undefined weak syms won't yet be marked as dynamic. */
1934 if (h->dynindx == -1
1935 && !h->forced_local)
1936 {
1937 if (! bfd_elf_link_record_dynamic_symbol (info, h))
1938 return FALSE;
1939 }
1940
1941 /* If that succeeded, we know we'll be keeping all the
1942 relocs. */
1943 if (h->dynindx != -1)
1944 goto keep;
1945 }
1946
1947 eh->dyn_relocs = NULL;
1948
1949 keep: ;
1950 }
1951
1952 /* Finally, allocate space. */
1953 for (p = eh->dyn_relocs; p != NULL; p = p->next)
1954 {
1955 asection *sreloc = elf_section_data (p->sec)->sreloc;
1956 sreloc->size += p->count * sizeof (Elf32_External_Rela);
1957 }
1958
1959 return TRUE;
1960 }
1961
1962 /* Set DF_TEXTREL if we find any dynamic relocs that apply to
1963 read-only sections. */
1964
1965 static bfd_boolean
1966 maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p)
1967 {
1968 asection *sec;
1969
1970 if (h->root.type == bfd_link_hash_indirect)
1971 return TRUE;
1972
1973 sec = readonly_dynrelocs (h);
1974 if (sec != NULL)
1975 {
1976 struct bfd_link_info *info = (struct bfd_link_info *) info_p;
1977
1978 info->flags |= DF_TEXTREL;
1979 info->callbacks->minfo
1980 (_("%B: dynamic relocation against `%T' in read-only section `%A'\n"),
1981 sec->owner, h->root.root.string, sec);
1982
1983 /* Not an error, just cut short the traversal. */
1984 return FALSE;
1985 }
1986 return TRUE;
1987 }
1988
1989 /* Set the sizes of the dynamic sections. */
1990
1991 static bfd_boolean
1992 lm32_elf_size_dynamic_sections (bfd *output_bfd,
1993 struct bfd_link_info *info)
1994 {
1995 struct elf_lm32_link_hash_table *htab;
1996 bfd *dynobj;
1997 asection *s;
1998 bfd_boolean relocs;
1999 bfd *ibfd;
2000
2001 htab = lm32_elf_hash_table (info);
2002 if (htab == NULL)
2003 return FALSE;
2004
2005 dynobj = htab->root.dynobj;
2006 BFD_ASSERT (dynobj != NULL);
2007
2008 if (htab->root.dynamic_sections_created)
2009 {
2010 /* Set the contents of the .interp section to the interpreter. */
2011 if (bfd_link_executable (info) && !info->nointerp)
2012 {
2013 s = bfd_get_linker_section (dynobj, ".interp");
2014 BFD_ASSERT (s != NULL);
2015 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
2016 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2017 }
2018 }
2019
2020 /* Set up .got offsets for local syms, and space for local dynamic
2021 relocs. */
2022 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2023 {
2024 bfd_signed_vma *local_got;
2025 bfd_signed_vma *end_local_got;
2026 bfd_size_type locsymcount;
2027 Elf_Internal_Shdr *symtab_hdr;
2028 asection *srel;
2029
2030 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
2031 continue;
2032
2033 for (s = ibfd->sections; s != NULL; s = s->next)
2034 {
2035 struct elf_dyn_relocs *p;
2036
2037 for (p = ((struct elf_dyn_relocs *)
2038 elf_section_data (s)->local_dynrel);
2039 p != NULL;
2040 p = p->next)
2041 {
2042 if (! bfd_is_abs_section (p->sec)
2043 && bfd_is_abs_section (p->sec->output_section))
2044 {
2045 /* Input section has been discarded, either because
2046 it is a copy of a linkonce section or due to
2047 linker script /DISCARD/, so we'll be discarding
2048 the relocs too. */
2049 }
2050 else if (p->count != 0)
2051 {
2052 srel = elf_section_data (p->sec)->sreloc;
2053 srel->size += p->count * sizeof (Elf32_External_Rela);
2054 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2055 info->flags |= DF_TEXTREL;
2056 }
2057 }
2058 }
2059
2060 local_got = elf_local_got_refcounts (ibfd);
2061 if (!local_got)
2062 continue;
2063
2064 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2065 locsymcount = symtab_hdr->sh_info;
2066 end_local_got = local_got + locsymcount;
2067 s = htab->root.sgot;
2068 srel = htab->root.srelgot;
2069 for (; local_got < end_local_got; ++local_got)
2070 {
2071 if (*local_got > 0)
2072 {
2073 *local_got = s->size;
2074 s->size += 4;
2075 if (bfd_link_pic (info))
2076 srel->size += sizeof (Elf32_External_Rela);
2077 }
2078 else
2079 *local_got = (bfd_vma) -1;
2080 }
2081 }
2082
2083 /* Allocate global sym .plt and .got entries, and space for global
2084 sym dynamic relocs. */
2085 elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info);
2086
2087 /* We now have determined the sizes of the various dynamic sections.
2088 Allocate memory for them. */
2089 relocs = FALSE;
2090 for (s = dynobj->sections; s != NULL; s = s->next)
2091 {
2092 if ((s->flags & SEC_LINKER_CREATED) == 0)
2093 continue;
2094
2095 if (s == htab->root.splt
2096 || s == htab->root.sgot
2097 || s == htab->root.sgotplt
2098 || s == htab->sdynbss)
2099 {
2100 /* Strip this section if we don't need it; see the
2101 comment below. */
2102 }
2103 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
2104 {
2105 if (s->size != 0 && s != htab->root.srelplt)
2106 relocs = TRUE;
2107
2108 /* We use the reloc_count field as a counter if we need
2109 to copy relocs into the output file. */
2110 s->reloc_count = 0;
2111 }
2112 else
2113 /* It's not one of our sections, so don't allocate space. */
2114 continue;
2115
2116 if (s->size == 0)
2117 {
2118 /* If we don't need this section, strip it from the
2119 output file. This is mostly to handle .rela.bss and
2120 .rela.plt. We must create both sections in
2121 create_dynamic_sections, because they must be created
2122 before the linker maps input sections to output
2123 sections. The linker does that before
2124 adjust_dynamic_symbol is called, and it is that
2125 function which decides whether anything needs to go
2126 into these sections. */
2127 s->flags |= SEC_EXCLUDE;
2128 continue;
2129 }
2130
2131 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2132 continue;
2133
2134 /* Allocate memory for the section contents. We use bfd_zalloc
2135 here in case unused entries are not reclaimed before the
2136 section's contents are written out. This should not happen,
2137 but this way if it does, we get a R_LM32_NONE reloc instead
2138 of garbage. */
2139 s->contents = bfd_zalloc (dynobj, s->size);
2140 if (s->contents == NULL)
2141 return FALSE;
2142 }
2143
2144 if (htab->root.dynamic_sections_created)
2145 {
2146 /* Add some entries to the .dynamic section. We fill in the
2147 values later, in lm32_elf_finish_dynamic_sections, but we
2148 must add the entries now so that we get the correct size for
2149 the .dynamic section. The DT_DEBUG entry is filled in by the
2150 dynamic linker and used by the debugger. */
2151 #define add_dynamic_entry(TAG, VAL) \
2152 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2153
2154 if (bfd_link_executable (info))
2155 {
2156 if (! add_dynamic_entry (DT_DEBUG, 0))
2157 return FALSE;
2158 }
2159
2160 if (htab->root.splt->size != 0)
2161 {
2162 if (! add_dynamic_entry (DT_PLTGOT, 0)
2163 || ! add_dynamic_entry (DT_PLTRELSZ, 0)
2164 || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
2165 || ! add_dynamic_entry (DT_JMPREL, 0))
2166 return FALSE;
2167 }
2168
2169 if (relocs)
2170 {
2171 if (! add_dynamic_entry (DT_RELA, 0)
2172 || ! add_dynamic_entry (DT_RELASZ, 0)
2173 || ! add_dynamic_entry (DT_RELAENT,
2174 sizeof (Elf32_External_Rela)))
2175 return FALSE;
2176
2177 /* If any dynamic relocs apply to a read-only section,
2178 then we need a DT_TEXTREL entry. */
2179 if ((info->flags & DF_TEXTREL) == 0)
2180 elf_link_hash_traverse (&htab->root, maybe_set_textrel, info);
2181
2182 if ((info->flags & DF_TEXTREL) != 0)
2183 {
2184 if (! add_dynamic_entry (DT_TEXTREL, 0))
2185 return FALSE;
2186 }
2187 }
2188 }
2189 #undef add_dynamic_entry
2190
2191 /* Allocate .rofixup section. */
2192 if (IS_FDPIC (output_bfd))
2193 {
2194 struct weak_symbol_list *list_start = NULL, *list_end = NULL;
2195 int rgot_weak_count = 0;
2196 int r32_count = 0;
2197 int rgot_count = 0;
2198 /* Look for deleted sections. */
2199 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2200 {
2201 for (s = ibfd->sections; s != NULL; s = s->next)
2202 {
2203 if (s->reloc_count)
2204 {
2205 /* Count relocs that need .rofixup entires. */
2206 Elf_Internal_Rela *internal_relocs, *end;
2207 internal_relocs = elf_section_data (s)->relocs;
2208 if (internal_relocs == NULL)
2209 internal_relocs = (_bfd_elf_link_read_relocs (ibfd, s, NULL, NULL, FALSE));
2210 if (internal_relocs != NULL)
2211 {
2212 end = internal_relocs + s->reloc_count;
2213 while (internal_relocs < end)
2214 {
2215 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2216 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd);
2217 unsigned long r_symndx;
2218 struct elf_link_hash_entry *h;
2219
2220 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2221 sym_hashes = elf_sym_hashes (ibfd);
2222 r_symndx = ELF32_R_SYM (internal_relocs->r_info);
2223 h = NULL;
2224 if (r_symndx < symtab_hdr->sh_info)
2225 {
2226 }
2227 else
2228 {
2229 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2230 while (h->root.type == bfd_link_hash_indirect
2231 || h->root.type == bfd_link_hash_warning)
2232 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2233 }
2234
2235 /* Don't generate entries for weak symbols. */
2236 if (!h || (h && h->root.type != bfd_link_hash_undefweak))
2237 {
2238 if (!discarded_section (s) && !((bfd_get_section_flags (ibfd, s) & SEC_ALLOC) == 0))
2239 {
2240 switch (ELF32_R_TYPE (internal_relocs->r_info))
2241 {
2242 case R_LM32_32:
2243 r32_count++;
2244 break;
2245 case R_LM32_16_GOT:
2246 rgot_count++;
2247 break;
2248 }
2249 }
2250 }
2251 else
2252 {
2253 struct weak_symbol_list *current, *new_entry;
2254 /* Is this symbol already in the list? */
2255 for (current = list_start; current; current = current->next)
2256 {
2257 if (!strcmp (current->name, h->root.root.string))
2258 break;
2259 }
2260 if (!current && !discarded_section (s) && (bfd_get_section_flags (ibfd, s) & SEC_ALLOC))
2261 {
2262 /* Will this have an entry in the GOT. */
2263 if (ELF32_R_TYPE (internal_relocs->r_info) == R_LM32_16_GOT)
2264 {
2265 /* Create a new entry. */
2266 new_entry = malloc (sizeof (struct weak_symbol_list));
2267 if (!new_entry)
2268 return FALSE;
2269 new_entry->name = h->root.root.string;
2270 new_entry->next = NULL;
2271 /* Add to list */
2272 if (list_start == NULL)
2273 {
2274 list_start = new_entry;
2275 list_end = new_entry;
2276 }
2277 else
2278 {
2279 list_end->next = new_entry;
2280 list_end = new_entry;
2281 }
2282 /* Increase count of undefined weak symbols in the got. */
2283 rgot_weak_count++;
2284 }
2285 }
2286 }
2287 internal_relocs++;
2288 }
2289 }
2290 else
2291 return FALSE;
2292 }
2293 }
2294 }
2295 /* Free list. */
2296 while (list_start)
2297 {
2298 list_end = list_start->next;
2299 free (list_start);
2300 list_start = list_end;
2301 }
2302
2303 /* Size sections. */
2304 lm32fdpic_fixup32_section (info)->size
2305 = (r32_count + (htab->root.sgot->size / 4) - rgot_weak_count + 1) * 4;
2306 if (lm32fdpic_fixup32_section (info)->size == 0)
2307 lm32fdpic_fixup32_section (info)->flags |= SEC_EXCLUDE;
2308 else
2309 {
2310 lm32fdpic_fixup32_section (info)->contents =
2311 bfd_zalloc (dynobj, lm32fdpic_fixup32_section (info)->size);
2312 if (lm32fdpic_fixup32_section (info)->contents == NULL)
2313 return FALSE;
2314 }
2315 }
2316
2317 return TRUE;
2318 }
2319
2320 /* Create dynamic sections when linking against a dynamic object. */
2321
2322 static bfd_boolean
2323 lm32_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
2324 {
2325 struct elf_lm32_link_hash_table *htab;
2326 flagword flags, pltflags;
2327 asection *s;
2328 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
2329 int ptralign = 2; /* 32bit */
2330
2331 htab = lm32_elf_hash_table (info);
2332 if (htab == NULL)
2333 return FALSE;
2334
2335 /* Make sure we have a GOT - For the case where we have a dynamic object
2336 but none of the relocs in check_relocs */
2337 if (!_bfd_elf_create_got_section (abfd, info))
2338 return FALSE;
2339 if (IS_FDPIC (abfd) && (htab->sfixup32 == NULL))
2340 {
2341 if (! create_rofixup_section (abfd, info))
2342 return FALSE;
2343 }
2344
2345 /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
2346 .rel[a].bss sections. */
2347 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2348 | SEC_LINKER_CREATED);
2349
2350 pltflags = flags;
2351 pltflags |= SEC_CODE;
2352 if (bed->plt_not_loaded)
2353 pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
2354 if (bed->plt_readonly)
2355 pltflags |= SEC_READONLY;
2356
2357 s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags);
2358 htab->root.splt = s;
2359 if (s == NULL
2360 || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
2361 return FALSE;
2362
2363 if (bed->want_plt_sym)
2364 {
2365 /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
2366 .plt section. */
2367 struct bfd_link_hash_entry *bh = NULL;
2368 struct elf_link_hash_entry *h;
2369
2370 if (! (_bfd_generic_link_add_one_symbol
2371 (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
2372 (bfd_vma) 0, NULL, FALSE,
2373 get_elf_backend_data (abfd)->collect, &bh)))
2374 return FALSE;
2375 h = (struct elf_link_hash_entry *) bh;
2376 h->def_regular = 1;
2377 h->type = STT_OBJECT;
2378 htab->root.hplt = h;
2379
2380 if (bfd_link_pic (info)
2381 && ! bfd_elf_link_record_dynamic_symbol (info, h))
2382 return FALSE;
2383 }
2384
2385 s = bfd_make_section_anyway_with_flags (abfd,
2386 bed->default_use_rela_p
2387 ? ".rela.plt" : ".rel.plt",
2388 flags | SEC_READONLY);
2389 htab->root.srelplt = s;
2390 if (s == NULL
2391 || ! bfd_set_section_alignment (abfd, s, ptralign))
2392 return FALSE;
2393
2394 if (htab->root.sgot == NULL
2395 && !_bfd_elf_create_got_section (abfd, info))
2396 return FALSE;
2397
2398 if (bed->want_dynbss)
2399 {
2400 /* The .dynbss section is a place to put symbols which are defined
2401 by dynamic objects, are referenced by regular objects, and are
2402 not functions. We must allocate space for them in the process
2403 image and use a R_*_COPY reloc to tell the dynamic linker to
2404 initialize them at run time. The linker script puts the .dynbss
2405 section into the .bss section of the final image. */
2406 s = bfd_make_section_anyway_with_flags (abfd, ".dynbss",
2407 SEC_ALLOC | SEC_LINKER_CREATED);
2408 htab->sdynbss = s;
2409 if (s == NULL)
2410 return FALSE;
2411 /* The .rel[a].bss section holds copy relocs. This section is not
2412 normally needed. We need to create it here, though, so that the
2413 linker will map it to an output section. We can't just create it
2414 only if we need it, because we will not know whether we need it
2415 until we have seen all the input files, and the first time the
2416 main linker code calls BFD after examining all the input files
2417 (size_dynamic_sections) the input sections have already been
2418 mapped to the output sections. If the section turns out not to
2419 be needed, we can discard it later. We will never need this
2420 section when generating a shared object, since they do not use
2421 copy relocs. */
2422 if (! bfd_link_pic (info))
2423 {
2424 s = bfd_make_section_anyway_with_flags (abfd,
2425 (bed->default_use_rela_p
2426 ? ".rela.bss" : ".rel.bss"),
2427 flags | SEC_READONLY);
2428 htab->srelbss = s;
2429 if (s == NULL
2430 || ! bfd_set_section_alignment (abfd, s, ptralign))
2431 return FALSE;
2432 }
2433 }
2434
2435 return TRUE;
2436 }
2437
2438 /* Copy the extra info we tack onto an elf_link_hash_entry. */
2439
2440 static void
2441 lm32_elf_copy_indirect_symbol (struct bfd_link_info *info,
2442 struct elf_link_hash_entry *dir,
2443 struct elf_link_hash_entry *ind)
2444 {
2445 struct elf_lm32_link_hash_entry * edir;
2446 struct elf_lm32_link_hash_entry * eind;
2447
2448 edir = (struct elf_lm32_link_hash_entry *) dir;
2449 eind = (struct elf_lm32_link_hash_entry *) ind;
2450
2451 if (eind->dyn_relocs != NULL)
2452 {
2453 if (edir->dyn_relocs != NULL)
2454 {
2455 struct elf_dyn_relocs **pp;
2456 struct elf_dyn_relocs *p;
2457
2458 /* Add reloc counts against the indirect sym to the direct sym
2459 list. Merge any entries against the same section. */
2460 for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2461 {
2462 struct elf_dyn_relocs *q;
2463
2464 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2465 if (q->sec == p->sec)
2466 {
2467 q->pc_count += p->pc_count;
2468 q->count += p->count;
2469 *pp = p->next;
2470 break;
2471 }
2472 if (q == NULL)
2473 pp = &p->next;
2474 }
2475 *pp = edir->dyn_relocs;
2476 }
2477
2478 edir->dyn_relocs = eind->dyn_relocs;
2479 eind->dyn_relocs = NULL;
2480 }
2481
2482 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2483 }
2484
2485 static bfd_boolean
2486 lm32_elf_always_size_sections (bfd *output_bfd, struct bfd_link_info *info)
2487 {
2488 if (!bfd_link_relocatable (info))
2489 {
2490 if (!bfd_elf_stack_segment_size (output_bfd, info,
2491 "__stacksize", DEFAULT_STACK_SIZE))
2492 return FALSE;
2493
2494 asection *sec = bfd_get_section_by_name (output_bfd, ".stack");
2495 if (sec)
2496 sec->size = info->stacksize >= 0 ? info->stacksize : 0;
2497 }
2498
2499 return TRUE;
2500 }
2501
2502 static bfd_boolean
2503 lm32_elf_fdpic_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
2504 {
2505 unsigned i;
2506
2507 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2508 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2509 return TRUE;
2510
2511 if (! _bfd_elf_copy_private_bfd_data (ibfd, obfd))
2512 return FALSE;
2513
2514 if (! elf_tdata (ibfd) || ! elf_tdata (ibfd)->phdr
2515 || ! elf_tdata (obfd) || ! elf_tdata (obfd)->phdr)
2516 return TRUE;
2517
2518 /* Copy the stack size. */
2519 for (i = 0; i < elf_elfheader (ibfd)->e_phnum; i++)
2520 if (elf_tdata (ibfd)->phdr[i].p_type == PT_GNU_STACK)
2521 {
2522 Elf_Internal_Phdr *iphdr = &elf_tdata (ibfd)->phdr[i];
2523
2524 for (i = 0; i < elf_elfheader (obfd)->e_phnum; i++)
2525 if (elf_tdata (obfd)->phdr[i].p_type == PT_GNU_STACK)
2526 {
2527 memcpy (&elf_tdata (obfd)->phdr[i], iphdr, sizeof (*iphdr));
2528
2529 /* Rewrite the phdrs, since we're only called after they were first written. */
2530 if (bfd_seek (obfd, (bfd_signed_vma) get_elf_backend_data (obfd)
2531 ->s->sizeof_ehdr, SEEK_SET) != 0
2532 || get_elf_backend_data (obfd)->s->write_out_phdrs (obfd, elf_tdata (obfd)->phdr,
2533 elf_elfheader (obfd)->e_phnum) != 0)
2534 return FALSE;
2535 break;
2536 }
2537
2538 break;
2539 }
2540
2541 return TRUE;
2542 }
2543
2544
2545 #define ELF_ARCH bfd_arch_lm32
2546 #define ELF_TARGET_ID LM32_ELF_DATA
2547 #define ELF_MACHINE_CODE EM_LATTICEMICO32
2548 #define ELF_MAXPAGESIZE 0x1000
2549
2550 #define TARGET_BIG_SYM lm32_elf32_vec
2551 #define TARGET_BIG_NAME "elf32-lm32"
2552
2553 #define bfd_elf32_bfd_reloc_type_lookup lm32_reloc_type_lookup
2554 #define bfd_elf32_bfd_reloc_name_lookup lm32_reloc_name_lookup
2555 #define elf_info_to_howto lm32_info_to_howto_rela
2556 #define elf_info_to_howto_rel 0
2557 #define elf_backend_rela_normal 1
2558 #define elf_backend_object_p lm32_elf_object_p
2559 #define elf_backend_final_write_processing lm32_elf_final_write_processing
2560 #define elf_backend_stack_align 8
2561 #define elf_backend_can_gc_sections 1
2562 #define elf_backend_can_refcount 1
2563 #define elf_backend_gc_mark_hook lm32_elf_gc_mark_hook
2564 #define elf_backend_plt_readonly 1
2565 #define elf_backend_want_got_plt 1
2566 #define elf_backend_want_plt_sym 0
2567 #define elf_backend_got_header_size 12
2568 #define elf_backend_dtrel_excludes_plt 1
2569 #define bfd_elf32_bfd_link_hash_table_create lm32_elf_link_hash_table_create
2570 #define elf_backend_check_relocs lm32_elf_check_relocs
2571 #define elf_backend_reloc_type_class lm32_elf_reloc_type_class
2572 #define elf_backend_copy_indirect_symbol lm32_elf_copy_indirect_symbol
2573 #define elf_backend_size_dynamic_sections lm32_elf_size_dynamic_sections
2574 #define elf_backend_omit_section_dynsym ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
2575 #define elf_backend_create_dynamic_sections lm32_elf_create_dynamic_sections
2576 #define elf_backend_finish_dynamic_sections lm32_elf_finish_dynamic_sections
2577 #define elf_backend_adjust_dynamic_symbol lm32_elf_adjust_dynamic_symbol
2578 #define elf_backend_finish_dynamic_symbol lm32_elf_finish_dynamic_symbol
2579 #define elf_backend_relocate_section lm32_elf_relocate_section
2580
2581 #include "elf32-target.h"
2582
2583 #undef ELF_MAXPAGESIZE
2584 #define ELF_MAXPAGESIZE 0x4000
2585
2586
2587 #undef TARGET_BIG_SYM
2588 #define TARGET_BIG_SYM lm32_elf32_fdpic_vec
2589 #undef TARGET_BIG_NAME
2590 #define TARGET_BIG_NAME "elf32-lm32fdpic"
2591 #undef elf32_bed
2592 #define elf32_bed elf32_lm32fdpic_bed
2593
2594 #undef elf_backend_always_size_sections
2595 #define elf_backend_always_size_sections lm32_elf_always_size_sections
2596 #undef bfd_elf32_bfd_copy_private_bfd_data
2597 #define bfd_elf32_bfd_copy_private_bfd_data lm32_elf_fdpic_copy_private_bfd_data
2598
2599 #include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.123771 seconds and 5 git commands to generate.