1 /* Lattice Mico32-specific support for 32-bit ELF 2 Copyright (C) 2008-2018 Free Software Foundation, Inc. 3 Contributed by Jon Beniston <jon@beniston.com> 4 5 This file is part of BFD, the Binary File Descriptor library. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 3 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the Free Software 19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 20 MA 02110-1301, USA. */ 21 22 #include "sysdep.h" 23 #include "bfd.h" 24 #include "libbfd.h" 25 #include "elf-bfd.h" 26 #include "elf/lm32.h" 27 28 #define DEFAULT_STACK_SIZE 0x20000 29 30 #define PLT_ENTRY_SIZE 20 31 32 #define PLT0_ENTRY_WORD0 0 33 #define PLT0_ENTRY_WORD1 0 34 #define PLT0_ENTRY_WORD2 0 35 #define PLT0_ENTRY_WORD3 0 36 #define PLT0_ENTRY_WORD4 0 37 38 #define PLT0_PIC_ENTRY_WORD0 0 39 #define PLT0_PIC_ENTRY_WORD1 0 40 #define PLT0_PIC_ENTRY_WORD2 0 41 #define PLT0_PIC_ENTRY_WORD3 0 42 #define PLT0_PIC_ENTRY_WORD4 0 43 44 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1" 45 46 extern const bfd_target lm32_elf32_fdpic_vec; 47 48 #define IS_FDPIC(bfd) ((bfd)->xvec == &lm32_elf32_fdpic_vec) 49 50 static bfd_reloc_status_type lm32_elf_gprel_reloc 51 (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **); 52 53 /* lm32 ELF linker hash entry. */ 54 55 struct elf_lm32_link_hash_entry 56 { 57 struct elf_link_hash_entry root; 58 59 /* Track dynamic relocs copied for this symbol. */ 60 struct elf_dyn_relocs *dyn_relocs; 61 }; 62 63 /* lm32 ELF linker hash table. */ 64 65 struct elf_lm32_link_hash_table 66 { 67 struct elf_link_hash_table root; 68 69 /* Short-cuts to get to dynamic linker sections. */ 70 asection *sfixup32; 71 asection *sdynbss; 72 asection *srelbss; 73 74 int relocs32; 75 }; 76 77 /* Get the lm32 ELF linker hash table from a link_info structure. */ 78 79 #define lm32_elf_hash_table(p) \ 80 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \ 81 == LM32_ELF_DATA ? ((struct elf_lm32_link_hash_table *) ((p)->hash)) : NULL) 82 83 #define lm32fdpic_got_section(info) \ 84 (lm32_elf_hash_table (info)->root.sgot) 85 #define lm32fdpic_gotrel_section(info) \ 86 (lm32_elf_hash_table (info)->root.srelgot) 87 #define lm32fdpic_fixup32_section(info) \ 88 (lm32_elf_hash_table (info)->sfixup32) 89 90 struct weak_symbol_list 91 { 92 const char *name; 93 struct weak_symbol_list *next; 94 }; 95 96 /* Create an entry in an lm32 ELF linker hash table. */ 97 98 static struct bfd_hash_entry * 99 lm32_elf_link_hash_newfunc (struct bfd_hash_entry *entry, 100 struct bfd_hash_table *table, 101 const char *string) 102 { 103 struct elf_lm32_link_hash_entry *ret = 104 (struct elf_lm32_link_hash_entry *) entry; 105 106 /* Allocate the structure if it has not already been allocated by a 107 subclass. */ 108 if (ret == NULL) 109 ret = bfd_hash_allocate (table, 110 sizeof (struct elf_lm32_link_hash_entry)); 111 if (ret == NULL) 112 return NULL; 113 114 /* Call the allocation method of the superclass. */ 115 ret = ((struct elf_lm32_link_hash_entry *) 116 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret, 117 table, string)); 118 if (ret != NULL) 119 { 120 struct elf_lm32_link_hash_entry *eh; 121 122 eh = (struct elf_lm32_link_hash_entry *) ret; 123 eh->dyn_relocs = NULL; 124 } 125 126 return (struct bfd_hash_entry *) ret; 127 } 128 129 /* Create an lm32 ELF linker hash table. */ 130 131 static struct bfd_link_hash_table * 132 lm32_elf_link_hash_table_create (bfd *abfd) 133 { 134 struct elf_lm32_link_hash_table *ret; 135 bfd_size_type amt = sizeof (struct elf_lm32_link_hash_table); 136 137 ret = bfd_zmalloc (amt); 138 if (ret == NULL) 139 return NULL; 140 141 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd, 142 lm32_elf_link_hash_newfunc, 143 sizeof (struct elf_lm32_link_hash_entry), 144 LM32_ELF_DATA)) 145 { 146 free (ret); 147 return NULL; 148 } 149 150 return &ret->root.root; 151 } 152 153 /* Add a fixup to the ROFIXUP section. */ 154 155 static bfd_vma 156 _lm32fdpic_add_rofixup (bfd *output_bfd, asection *rofixup, bfd_vma relocation) 157 { 158 bfd_vma fixup_offset; 159 160 if (rofixup->flags & SEC_EXCLUDE) 161 return -1; 162 163 fixup_offset = rofixup->reloc_count * 4; 164 if (rofixup->contents) 165 { 166 BFD_ASSERT (fixup_offset < rofixup->size); 167 if (fixup_offset < rofixup->size) 168 bfd_put_32 (output_bfd, relocation, rofixup->contents + fixup_offset); 169 } 170 rofixup->reloc_count++; 171 172 return fixup_offset; 173 } 174 175 /* Create .rofixup sections in DYNOBJ, and set up 176 shortcuts to them in our hash table. */ 177 178 static bfd_boolean 179 create_rofixup_section (bfd *dynobj, struct bfd_link_info *info) 180 { 181 struct elf_lm32_link_hash_table *htab; 182 htab = lm32_elf_hash_table (info); 183 184 if (htab == NULL) 185 return FALSE; 186 187 /* Fixup section for R_LM32_32 relocs. */ 188 lm32fdpic_fixup32_section (info) 189 = bfd_make_section_anyway_with_flags (dynobj, 190 ".rofixup", 191 (SEC_ALLOC 192 | SEC_LOAD 193 | SEC_HAS_CONTENTS 194 | SEC_IN_MEMORY 195 | SEC_LINKER_CREATED 196 | SEC_READONLY)); 197 if (lm32fdpic_fixup32_section (info) == NULL 198 || ! bfd_set_section_alignment (dynobj, 199 lm32fdpic_fixup32_section (info), 2)) 200 return FALSE; 201 202 return TRUE; 203 } 204 205 static reloc_howto_type lm32_elf_howto_table [] = 206 { 207 /* This reloc does nothing. */ 208 HOWTO (R_LM32_NONE, /* type */ 209 0, /* rightshift */ 210 3, /* size (0 = byte, 1 = short, 2 = long) */ 211 0, /* bitsize */ 212 FALSE, /* pc_relative */ 213 0, /* bitpos */ 214 complain_overflow_dont, /* complain_on_overflow */ 215 bfd_elf_generic_reloc, /* special_function */ 216 "R_LM32_NONE", /* name */ 217 FALSE, /* partial_inplace */ 218 0, /* src_mask */ 219 0, /* dst_mask */ 220 FALSE), /* pcrel_offset */ 221 222 /* An 8 bit absolute relocation. */ 223 HOWTO (R_LM32_8, /* type */ 224 0, /* rightshift */ 225 0, /* size (0 = byte, 1 = short, 2 = long) */ 226 8, /* bitsize */ 227 FALSE, /* pc_relative */ 228 0, /* bitpos */ 229 complain_overflow_bitfield,/* complain_on_overflow */ 230 bfd_elf_generic_reloc, /* special_function */ 231 "R_LM32_8", /* name */ 232 FALSE, /* partial_inplace */ 233 0, /* src_mask */ 234 0xff, /* dst_mask */ 235 FALSE), /* pcrel_offset */ 236 237 /* A 16 bit absolute relocation. */ 238 HOWTO (R_LM32_16, /* type */ 239 0, /* rightshift */ 240 1, /* size (0 = byte, 1 = short, 2 = long) */ 241 16, /* bitsize */ 242 FALSE, /* pc_relative */ 243 0, /* bitpos */ 244 complain_overflow_bitfield,/* complain_on_overflow */ 245 bfd_elf_generic_reloc, /* special_function */ 246 "R_LM32_16", /* name */ 247 FALSE, /* partial_inplace */ 248 0, /* src_mask */ 249 0xffff, /* dst_mask */ 250 FALSE), /* pcrel_offset */ 251 252 /* A 32 bit absolute relocation. */ 253 HOWTO (R_LM32_32, /* type */ 254 0, /* rightshift */ 255 2, /* size (0 = byte, 1 = short, 2 = long) */ 256 32, /* bitsize */ 257 FALSE, /* pc_relative */ 258 0, /* bitpos */ 259 complain_overflow_bitfield,/* complain_on_overflow */ 260 bfd_elf_generic_reloc, /* special_function */ 261 "R_LM32_32", /* name */ 262 FALSE, /* partial_inplace */ 263 0, /* src_mask */ 264 0xffffffff, /* dst_mask */ 265 FALSE), /* pcrel_offset */ 266 267 HOWTO (R_LM32_HI16, /* type */ 268 16, /* rightshift */ 269 2, /* size (0 = byte, 1 = short, 2 = long) */ 270 16, /* bitsize */ 271 FALSE, /* pc_relative */ 272 0, /* bitpos */ 273 complain_overflow_bitfield,/* complain_on_overflow */ 274 bfd_elf_generic_reloc, /* special_function */ 275 "R_LM32_HI16", /* name */ 276 FALSE, /* partial_inplace */ 277 0, /* src_mask */ 278 0xffff, /* dst_mask */ 279 FALSE), /* pcrel_offset */ 280 281 HOWTO (R_LM32_LO16, /* type */ 282 0, /* rightshift */ 283 2, /* size (0 = byte, 1 = short, 2 = long) */ 284 16, /* bitsize */ 285 FALSE, /* pc_relative */ 286 0, /* bitpos */ 287 complain_overflow_dont, /* complain_on_overflow */ 288 bfd_elf_generic_reloc, /* special_function */ 289 "R_LM32_LO16", /* name */ 290 FALSE, /* partial_inplace */ 291 0, /* src_mask */ 292 0xffff, /* dst_mask */ 293 FALSE), /* pcrel_offset */ 294 295 HOWTO (R_LM32_GPREL16, /* type */ 296 0, /* rightshift */ 297 2, /* size (0 = byte, 1 = short, 2 = long) */ 298 16, /* bitsize */ 299 FALSE, /* pc_relative */ 300 0, /* bitpos */ 301 complain_overflow_dont, /* complain_on_overflow */ 302 lm32_elf_gprel_reloc, /* special_function */ 303 "R_LM32_GPREL16", /* name */ 304 FALSE, /* partial_inplace */ 305 0, /* src_mask */ 306 0xffff, /* dst_mask */ 307 FALSE), /* pcrel_offset */ 308 309 HOWTO (R_LM32_CALL, /* type */ 310 2, /* rightshift */ 311 2, /* size (0 = byte, 1 = short, 2 = long) */ 312 26, /* bitsize */ 313 TRUE, /* pc_relative */ 314 0, /* bitpos */ 315 complain_overflow_signed, /* complain_on_overflow */ 316 bfd_elf_generic_reloc, /* special_function */ 317 "R_LM32_CALL", /* name */ 318 FALSE, /* partial_inplace */ 319 0, /* src_mask */ 320 0x3ffffff, /* dst_mask */ 321 TRUE), /* pcrel_offset */ 322 323 HOWTO (R_LM32_BRANCH, /* type */ 324 2, /* rightshift */ 325 2, /* size (0 = byte, 1 = short, 2 = long) */ 326 16, /* bitsize */ 327 TRUE, /* pc_relative */ 328 0, /* bitpos */ 329 complain_overflow_signed, /* complain_on_overflow */ 330 bfd_elf_generic_reloc, /* special_function */ 331 "R_LM32_BRANCH", /* name */ 332 FALSE, /* partial_inplace */ 333 0, /* src_mask */ 334 0xffff, /* dst_mask */ 335 TRUE), /* pcrel_offset */ 336 337 /* GNU extension to record C++ vtable hierarchy. */ 338 HOWTO (R_LM32_GNU_VTINHERIT, /* type */ 339 0, /* rightshift */ 340 2, /* size (0 = byte, 1 = short, 2 = long) */ 341 0, /* bitsize */ 342 FALSE, /* pc_relative */ 343 0, /* bitpos */ 344 complain_overflow_dont, /* complain_on_overflow */ 345 NULL, /* special_function */ 346 "R_LM32_GNU_VTINHERIT", /* name */ 347 FALSE, /* partial_inplace */ 348 0, /* src_mask */ 349 0, /* dst_mask */ 350 FALSE), /* pcrel_offset */ 351 352 /* GNU extension to record C++ vtable member usage. */ 353 HOWTO (R_LM32_GNU_VTENTRY, /* type */ 354 0, /* rightshift */ 355 2, /* size (0 = byte, 1 = short, 2 = long) */ 356 0, /* bitsize */ 357 FALSE, /* pc_relative */ 358 0, /* bitpos */ 359 complain_overflow_dont, /* complain_on_overflow */ 360 _bfd_elf_rel_vtable_reloc_fn,/* special_function */ 361 "R_LM32_GNU_VTENTRY", /* name */ 362 FALSE, /* partial_inplace */ 363 0, /* src_mask */ 364 0, /* dst_mask */ 365 FALSE), /* pcrel_offset */ 366 367 HOWTO (R_LM32_16_GOT, /* type */ 368 0, /* rightshift */ 369 2, /* size (0 = byte, 1 = short, 2 = long) */ 370 16, /* bitsize */ 371 FALSE, /* pc_relative */ 372 0, /* bitpos */ 373 complain_overflow_signed, /* complain_on_overflow */ 374 bfd_elf_generic_reloc, /* special_function */ 375 "R_LM32_16_GOT", /* name */ 376 FALSE, /* partial_inplace */ 377 0, /* src_mask */ 378 0xffff, /* dst_mask */ 379 FALSE), /* pcrel_offset */ 380 381 HOWTO (R_LM32_GOTOFF_HI16, /* type */ 382 16, /* rightshift */ 383 2, /* size (0 = byte, 1 = short, 2 = long) */ 384 16, /* bitsize */ 385 FALSE, /* pc_relative */ 386 0, /* bitpos */ 387 complain_overflow_dont, /* complain_on_overflow */ 388 bfd_elf_generic_reloc, /* special_function */ 389 "R_LM32_GOTOFF_HI16", /* name */ 390 FALSE, /* partial_inplace */ 391 0xffff, /* src_mask */ 392 0xffff, /* dst_mask */ 393 FALSE), /* pcrel_offset */ 394 395 HOWTO (R_LM32_GOTOFF_LO16, /* type */ 396 0, /* rightshift */ 397 2, /* size (0 = byte, 1 = short, 2 = long) */ 398 16, /* bitsize */ 399 FALSE, /* pc_relative */ 400 0, /* bitpos */ 401 complain_overflow_dont, /* complain_on_overflow */ 402 bfd_elf_generic_reloc, /* special_function */ 403 "R_LM32_GOTOFF_LO16", /* name */ 404 FALSE, /* partial_inplace */ 405 0xffff, /* src_mask */ 406 0xffff, /* dst_mask */ 407 FALSE), /* pcrel_offset */ 408 409 HOWTO (R_LM32_COPY, /* type */ 410 0, /* rightshift */ 411 2, /* size (0 = byte, 1 = short, 2 = long) */ 412 32, /* bitsize */ 413 FALSE, /* pc_relative */ 414 0, /* bitpos */ 415 complain_overflow_bitfield, /* complain_on_overflow */ 416 bfd_elf_generic_reloc, /* special_function */ 417 "R_LM32_COPY", /* name */ 418 FALSE, /* partial_inplace */ 419 0xffffffff, /* src_mask */ 420 0xffffffff, /* dst_mask */ 421 FALSE), /* pcrel_offset */ 422 423 HOWTO (R_LM32_GLOB_DAT, /* type */ 424 0, /* rightshift */ 425 2, /* size (0 = byte, 1 = short, 2 = long) */ 426 32, /* bitsize */ 427 FALSE, /* pc_relative */ 428 0, /* bitpos */ 429 complain_overflow_bitfield, /* complain_on_overflow */ 430 bfd_elf_generic_reloc, /* special_function */ 431 "R_LM32_GLOB_DAT", /* name */ 432 FALSE, /* partial_inplace */ 433 0xffffffff, /* src_mask */ 434 0xffffffff, /* dst_mask */ 435 FALSE), /* pcrel_offset */ 436 437 HOWTO (R_LM32_JMP_SLOT, /* type */ 438 0, /* rightshift */ 439 2, /* size (0 = byte, 1 = short, 2 = long) */ 440 32, /* bitsize */ 441 FALSE, /* pc_relative */ 442 0, /* bitpos */ 443 complain_overflow_bitfield, /* complain_on_overflow */ 444 bfd_elf_generic_reloc, /* special_function */ 445 "R_LM32_JMP_SLOT", /* name */ 446 FALSE, /* partial_inplace */ 447 0xffffffff, /* src_mask */ 448 0xffffffff, /* dst_mask */ 449 FALSE), /* pcrel_offset */ 450 451 HOWTO (R_LM32_RELATIVE, /* type */ 452 0, /* rightshift */ 453 2, /* size (0 = byte, 1 = short, 2 = long) */ 454 32, /* bitsize */ 455 FALSE, /* pc_relative */ 456 0, /* bitpos */ 457 complain_overflow_bitfield, /* complain_on_overflow */ 458 bfd_elf_generic_reloc, /* special_function */ 459 "R_LM32_RELATIVE", /* name */ 460 FALSE, /* partial_inplace */ 461 0xffffffff, /* src_mask */ 462 0xffffffff, /* dst_mask */ 463 FALSE), /* pcrel_offset */ 464 465 }; 466 467 /* Map BFD reloc types to lm32 ELF reloc types. */ 468 469 struct lm32_reloc_map 470 { 471 bfd_reloc_code_real_type bfd_reloc_val; 472 unsigned char elf_reloc_val; 473 }; 474 475 static const struct lm32_reloc_map lm32_reloc_map[] = 476 { 477 { BFD_RELOC_NONE, R_LM32_NONE }, 478 { BFD_RELOC_8, R_LM32_8 }, 479 { BFD_RELOC_16, R_LM32_16 }, 480 { BFD_RELOC_32, R_LM32_32 }, 481 { BFD_RELOC_HI16, R_LM32_HI16 }, 482 { BFD_RELOC_LO16, R_LM32_LO16 }, 483 { BFD_RELOC_GPREL16, R_LM32_GPREL16 }, 484 { BFD_RELOC_LM32_CALL, R_LM32_CALL }, 485 { BFD_RELOC_LM32_BRANCH, R_LM32_BRANCH }, 486 { BFD_RELOC_VTABLE_INHERIT, R_LM32_GNU_VTINHERIT }, 487 { BFD_RELOC_VTABLE_ENTRY, R_LM32_GNU_VTENTRY }, 488 { BFD_RELOC_LM32_16_GOT, R_LM32_16_GOT }, 489 { BFD_RELOC_LM32_GOTOFF_HI16, R_LM32_GOTOFF_HI16 }, 490 { BFD_RELOC_LM32_GOTOFF_LO16, R_LM32_GOTOFF_LO16 }, 491 { BFD_RELOC_LM32_COPY, R_LM32_COPY }, 492 { BFD_RELOC_LM32_GLOB_DAT, R_LM32_GLOB_DAT }, 493 { BFD_RELOC_LM32_JMP_SLOT, R_LM32_JMP_SLOT }, 494 { BFD_RELOC_LM32_RELATIVE, R_LM32_RELATIVE }, 495 }; 496 497 static reloc_howto_type * 498 lm32_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED, 499 bfd_reloc_code_real_type code) 500 { 501 unsigned int i; 502 503 for (i = 0; i < sizeof (lm32_reloc_map) / sizeof (lm32_reloc_map[0]); i++) 504 if (lm32_reloc_map[i].bfd_reloc_val == code) 505 return &lm32_elf_howto_table[lm32_reloc_map[i].elf_reloc_val]; 506 return NULL; 507 } 508 509 static reloc_howto_type * 510 lm32_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 511 const char *r_name) 512 { 513 unsigned int i; 514 515 for (i = 0; 516 i < sizeof (lm32_elf_howto_table) / sizeof (lm32_elf_howto_table[0]); 517 i++) 518 if (lm32_elf_howto_table[i].name != NULL 519 && strcasecmp (lm32_elf_howto_table[i].name, r_name) == 0) 520 return &lm32_elf_howto_table[i]; 521 522 return NULL; 523 } 524 525 526 /* Set the howto pointer for an Lattice Mico32 ELF reloc. */ 527 528 static void 529 lm32_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED, 530 arelent *cache_ptr, 531 Elf_Internal_Rela *dst) 532 { 533 unsigned int r_type; 534 535 r_type = ELF32_R_TYPE (dst->r_info); 536 if (r_type >= (unsigned int) R_LM32_max) 537 { 538 /* xgettext:c-format */ 539 _bfd_error_handler (_("%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 /* Don't do anything special with non-loaded, non-alloced sections. 1169 In particular, any relocs in such sections should not affect GOT 1170 and PLT reference counting (ie. we don't allow them to create GOT 1171 or PLT entries), there's no possibility or desire to optimize TLS 1172 relocs, and there's not much point in propagating relocs to shared 1173 libs that the dynamic linker won't relocate. */ 1174 if ((sec->flags & SEC_ALLOC) == 0) 1175 return TRUE; 1176 1177 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 1178 sym_hashes = elf_sym_hashes (abfd); 1179 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym); 1180 if (!elf_bad_symtab (abfd)) 1181 sym_hashes_end -= symtab_hdr->sh_info; 1182 1183 htab = lm32_elf_hash_table (info); 1184 if (htab == NULL) 1185 return FALSE; 1186 1187 dynobj = htab->root.dynobj; 1188 1189 rel_end = relocs + sec->reloc_count; 1190 for (rel = relocs; rel < rel_end; rel++) 1191 { 1192 int r_type; 1193 struct elf_link_hash_entry *h; 1194 unsigned long r_symndx; 1195 1196 r_symndx = ELF32_R_SYM (rel->r_info); 1197 r_type = ELF32_R_TYPE (rel->r_info); 1198 if (r_symndx < symtab_hdr->sh_info) 1199 h = NULL; 1200 else 1201 { 1202 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 1203 while (h->root.type == bfd_link_hash_indirect 1204 || h->root.type == bfd_link_hash_warning) 1205 h = (struct elf_link_hash_entry *) h->root.u.i.link; 1206 } 1207 1208 /* Some relocs require a global offset table. */ 1209 if (htab->root.sgot == NULL) 1210 { 1211 switch (r_type) 1212 { 1213 case R_LM32_16_GOT: 1214 case R_LM32_GOTOFF_HI16: 1215 case R_LM32_GOTOFF_LO16: 1216 if (dynobj == NULL) 1217 htab->root.dynobj = dynobj = abfd; 1218 if (!_bfd_elf_create_got_section (dynobj, info)) 1219 return FALSE; 1220 break; 1221 } 1222 } 1223 1224 /* Some relocs require a rofixup table. */ 1225 if (IS_FDPIC (abfd)) 1226 { 1227 switch (r_type) 1228 { 1229 case R_LM32_32: 1230 /* FDPIC requires a GOT if there is a .rofixup section 1231 (Normal ELF doesn't). */ 1232 if (dynobj == NULL) 1233 htab->root.dynobj = dynobj = abfd; 1234 if (!_bfd_elf_create_got_section (dynobj, info)) 1235 return FALSE; 1236 /* Create .rofixup section */ 1237 if (htab->sfixup32 == NULL) 1238 { 1239 if (! create_rofixup_section (dynobj, info)) 1240 return FALSE; 1241 } 1242 break; 1243 case R_LM32_16_GOT: 1244 case R_LM32_GOTOFF_HI16: 1245 case R_LM32_GOTOFF_LO16: 1246 /* Create .rofixup section. */ 1247 if (htab->sfixup32 == NULL) 1248 { 1249 if (dynobj == NULL) 1250 htab->root.dynobj = dynobj = abfd; 1251 if (! create_rofixup_section (dynobj, info)) 1252 return FALSE; 1253 } 1254 break; 1255 } 1256 } 1257 1258 switch (r_type) 1259 { 1260 case R_LM32_16_GOT: 1261 if (h != NULL) 1262 h->got.refcount += 1; 1263 else 1264 { 1265 bfd_signed_vma *local_got_refcounts; 1266 1267 /* This is a global offset table entry for a local symbol. */ 1268 local_got_refcounts = elf_local_got_refcounts (abfd); 1269 if (local_got_refcounts == NULL) 1270 { 1271 bfd_size_type size; 1272 1273 size = symtab_hdr->sh_info; 1274 size *= sizeof (bfd_signed_vma); 1275 local_got_refcounts = bfd_zalloc (abfd, size); 1276 if (local_got_refcounts == NULL) 1277 return FALSE; 1278 elf_local_got_refcounts (abfd) = local_got_refcounts; 1279 } 1280 local_got_refcounts[r_symndx] += 1; 1281 } 1282 break; 1283 1284 /* This relocation describes the C++ object vtable hierarchy. 1285 Reconstruct it for later use during GC. */ 1286 case R_LM32_GNU_VTINHERIT: 1287 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset)) 1288 return FALSE; 1289 break; 1290 1291 /* This relocation describes which C++ vtable entries are actually 1292 used. Record for later use during GC. */ 1293 case R_LM32_GNU_VTENTRY: 1294 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend)) 1295 return FALSE; 1296 break; 1297 1298 } 1299 } 1300 1301 return TRUE; 1302 } 1303 1304 /* Finish up the dynamic sections. */ 1305 1306 static bfd_boolean 1307 lm32_elf_finish_dynamic_sections (bfd *output_bfd, 1308 struct bfd_link_info *info) 1309 { 1310 struct elf_lm32_link_hash_table *htab; 1311 bfd *dynobj; 1312 asection *sdyn; 1313 asection *sgot; 1314 1315 htab = lm32_elf_hash_table (info); 1316 if (htab == NULL) 1317 return FALSE; 1318 1319 dynobj = htab->root.dynobj; 1320 1321 sgot = htab->root.sgotplt; 1322 sdyn = bfd_get_linker_section (dynobj, ".dynamic"); 1323 1324 if (htab->root.dynamic_sections_created) 1325 { 1326 asection *splt; 1327 Elf32_External_Dyn *dyncon, *dynconend; 1328 1329 BFD_ASSERT (sgot != NULL && sdyn != NULL); 1330 1331 dyncon = (Elf32_External_Dyn *) sdyn->contents; 1332 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size); 1333 1334 for (; dyncon < dynconend; dyncon++) 1335 { 1336 Elf_Internal_Dyn dyn; 1337 asection *s; 1338 1339 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn); 1340 1341 switch (dyn.d_tag) 1342 { 1343 default: 1344 break; 1345 1346 case DT_PLTGOT: 1347 s = htab->root.sgotplt; 1348 goto get_vma; 1349 case DT_JMPREL: 1350 s = htab->root.srelplt; 1351 get_vma: 1352 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset; 1353 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon); 1354 break; 1355 1356 case DT_PLTRELSZ: 1357 s = htab->root.srelplt; 1358 dyn.d_un.d_val = s->size; 1359 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon); 1360 break; 1361 } 1362 } 1363 1364 /* Fill in the first entry in the procedure linkage table. */ 1365 splt = htab->root.splt; 1366 if (splt && splt->size > 0) 1367 { 1368 if (bfd_link_pic (info)) 1369 { 1370 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD0, splt->contents); 1371 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD1, splt->contents + 4); 1372 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD2, splt->contents + 8); 1373 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD3, splt->contents + 12); 1374 bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD4, splt->contents + 16); 1375 } 1376 else 1377 { 1378 unsigned long addr; 1379 /* addr = .got + 4 */ 1380 addr = sgot->output_section->vma + sgot->output_offset + 4; 1381 bfd_put_32 (output_bfd, 1382 PLT0_ENTRY_WORD0 | ((addr >> 16) & 0xffff), 1383 splt->contents); 1384 bfd_put_32 (output_bfd, 1385 PLT0_ENTRY_WORD1 | (addr & 0xffff), 1386 splt->contents + 4); 1387 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD2, splt->contents + 8); 1388 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD3, splt->contents + 12); 1389 bfd_put_32 (output_bfd, PLT0_ENTRY_WORD4, splt->contents + 16); 1390 } 1391 1392 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 1393 PLT_ENTRY_SIZE; 1394 } 1395 } 1396 1397 /* Fill in the first three entries in the global offset table. */ 1398 if (sgot && sgot->size > 0) 1399 { 1400 if (sdyn == NULL) 1401 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents); 1402 else 1403 bfd_put_32 (output_bfd, 1404 sdyn->output_section->vma + sdyn->output_offset, 1405 sgot->contents); 1406 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4); 1407 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8); 1408 1409 /* FIXME: This can be null if create_dynamic_sections wasn't called. */ 1410 if (elf_section_data (sgot->output_section) != NULL) 1411 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4; 1412 } 1413 1414 if (lm32fdpic_fixup32_section (info)) 1415 { 1416 struct elf_link_hash_entry *hgot = elf_hash_table (info)->hgot; 1417 bfd_vma got_value = hgot->root.u.def.value 1418 + hgot->root.u.def.section->output_section->vma 1419 + hgot->root.u.def.section->output_offset; 1420 struct bfd_link_hash_entry *hend; 1421 1422 /* Last entry is pointer to GOT. */ 1423 _lm32fdpic_add_rofixup (output_bfd, lm32fdpic_fixup32_section (info), got_value); 1424 1425 /* Check we wrote enough entries. */ 1426 if (lm32fdpic_fixup32_section (info)->size 1427 != (lm32fdpic_fixup32_section (info)->reloc_count * 4)) 1428 { 1429 _bfd_error_handler 1430 ("LINKER BUG: .rofixup section size mismatch: size/4 %Ld != relocs %d", 1431 lm32fdpic_fixup32_section (info)->size/4, 1432 lm32fdpic_fixup32_section (info)->reloc_count); 1433 return FALSE; 1434 } 1435 1436 hend = bfd_link_hash_lookup (info->hash, "__ROFIXUP_END__", 1437 FALSE, FALSE, TRUE); 1438 if (hend 1439 && (hend->type == bfd_link_hash_defined 1440 || hend->type == bfd_link_hash_defweak)) 1441 { 1442 bfd_vma value = 1443 lm32fdpic_fixup32_section (info)->output_section->vma 1444 + lm32fdpic_fixup32_section (info)->output_offset 1445 + lm32fdpic_fixup32_section (info)->size 1446 - hend->u.def.section->output_section->vma 1447 - hend->u.def.section->output_offset; 1448 BFD_ASSERT (hend->u.def.value == value); 1449 if (hend->u.def.value != value) 1450 { 1451 _bfd_error_handler 1452 ("LINKER BUG: .rofixup section hend->u.def.value != value: %Ld != %Ld", hend->u.def.value, value); 1453 return FALSE; 1454 } 1455 } 1456 } 1457 1458 return TRUE; 1459 } 1460 1461 /* Finish up dynamic symbol handling. We set the contents of various 1462 dynamic sections here. */ 1463 1464 static bfd_boolean 1465 lm32_elf_finish_dynamic_symbol (bfd *output_bfd, 1466 struct bfd_link_info *info, 1467 struct elf_link_hash_entry *h, 1468 Elf_Internal_Sym *sym) 1469 { 1470 struct elf_lm32_link_hash_table *htab; 1471 bfd_byte *loc; 1472 1473 htab = lm32_elf_hash_table (info); 1474 if (htab == NULL) 1475 return FALSE; 1476 1477 if (h->plt.offset != (bfd_vma) -1) 1478 { 1479 asection *splt; 1480 asection *sgot; 1481 asection *srela; 1482 1483 bfd_vma plt_index; 1484 bfd_vma got_offset; 1485 Elf_Internal_Rela rela; 1486 1487 /* This symbol has an entry in the procedure linkage table. Set 1488 it up. */ 1489 BFD_ASSERT (h->dynindx != -1); 1490 1491 splt = htab->root.splt; 1492 sgot = htab->root.sgotplt; 1493 srela = htab->root.srelplt; 1494 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL); 1495 1496 /* Get the index in the procedure linkage table which 1497 corresponds to this symbol. This is the index of this symbol 1498 in all the symbols for which we are making plt entries. The 1499 first entry in the procedure linkage table is reserved. */ 1500 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1; 1501 1502 /* Get the offset into the .got table of the entry that 1503 corresponds to this function. Each .got entry is 4 bytes. 1504 The first three are reserved. */ 1505 got_offset = (plt_index + 3) * 4; 1506 1507 /* Fill in the entry in the procedure linkage table. */ 1508 if (! bfd_link_pic (info)) 1509 { 1510 /* TODO */ 1511 } 1512 else 1513 { 1514 /* TODO */ 1515 } 1516 1517 /* Fill in the entry in the global offset table. */ 1518 bfd_put_32 (output_bfd, 1519 (splt->output_section->vma 1520 + splt->output_offset 1521 + h->plt.offset 1522 + 12), /* same offset */ 1523 sgot->contents + got_offset); 1524 1525 /* Fill in the entry in the .rela.plt section. */ 1526 rela.r_offset = (sgot->output_section->vma 1527 + sgot->output_offset 1528 + got_offset); 1529 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_JMP_SLOT); 1530 rela.r_addend = 0; 1531 loc = srela->contents; 1532 loc += plt_index * sizeof (Elf32_External_Rela); 1533 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 1534 1535 if (!h->def_regular) 1536 { 1537 /* Mark the symbol as undefined, rather than as defined in 1538 the .plt section. Leave the value alone. */ 1539 sym->st_shndx = SHN_UNDEF; 1540 } 1541 1542 } 1543 1544 if (h->got.offset != (bfd_vma) -1) 1545 { 1546 asection *sgot; 1547 asection *srela; 1548 Elf_Internal_Rela rela; 1549 1550 /* This symbol has an entry in the global offset table. Set it 1551 up. */ 1552 sgot = htab->root.sgot; 1553 srela = htab->root.srelgot; 1554 BFD_ASSERT (sgot != NULL && srela != NULL); 1555 1556 rela.r_offset = (sgot->output_section->vma 1557 + sgot->output_offset 1558 + (h->got.offset &~ 1)); 1559 1560 /* If this is a -Bsymbolic link, and the symbol is defined 1561 locally, we just want to emit a RELATIVE reloc. Likewise if 1562 the symbol was forced to be local because of a version file. 1563 The entry in the global offset table will already have been 1564 initialized in the relocate_section function. */ 1565 if (bfd_link_pic (info) 1566 && (info->symbolic 1567 || h->dynindx == -1 1568 || h->forced_local) 1569 && h->def_regular) 1570 { 1571 rela.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE); 1572 rela.r_addend = (h->root.u.def.value 1573 + h->root.u.def.section->output_section->vma 1574 + h->root.u.def.section->output_offset); 1575 } 1576 else 1577 { 1578 BFD_ASSERT ((h->got.offset & 1) == 0); 1579 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset); 1580 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_GLOB_DAT); 1581 rela.r_addend = 0; 1582 } 1583 1584 loc = srela->contents; 1585 loc += srela->reloc_count * sizeof (Elf32_External_Rela); 1586 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 1587 ++srela->reloc_count; 1588 } 1589 1590 if (h->needs_copy) 1591 { 1592 asection *s; 1593 Elf_Internal_Rela rela; 1594 1595 /* This symbols needs a copy reloc. Set it up. */ 1596 BFD_ASSERT (h->dynindx != -1 1597 && (h->root.type == bfd_link_hash_defined 1598 || h->root.type == bfd_link_hash_defweak)); 1599 1600 s = bfd_get_linker_section (htab->root.dynobj, ".rela.bss"); 1601 BFD_ASSERT (s != NULL); 1602 1603 rela.r_offset = (h->root.u.def.value 1604 + h->root.u.def.section->output_section->vma 1605 + h->root.u.def.section->output_offset); 1606 rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_COPY); 1607 rela.r_addend = 0; 1608 loc = s->contents; 1609 loc += s->reloc_count * sizeof (Elf32_External_Rela); 1610 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 1611 ++s->reloc_count; 1612 } 1613 1614 /* Mark some specially defined symbols as absolute. */ 1615 if (h == htab->root.hdynamic || h == htab->root.hgot) 1616 sym->st_shndx = SHN_ABS; 1617 1618 return TRUE; 1619 } 1620 1621 static enum elf_reloc_type_class 1622 lm32_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED, 1623 const asection *rel_sec ATTRIBUTE_UNUSED, 1624 const Elf_Internal_Rela *rela) 1625 { 1626 switch ((int) ELF32_R_TYPE (rela->r_info)) 1627 { 1628 case R_LM32_RELATIVE: return reloc_class_relative; 1629 case R_LM32_JMP_SLOT: return reloc_class_plt; 1630 case R_LM32_COPY: return reloc_class_copy; 1631 default: return reloc_class_normal; 1632 } 1633 } 1634 1635 /* Find dynamic relocs for H that apply to read-only sections. */ 1636 1637 static asection * 1638 readonly_dynrelocs (struct elf_link_hash_entry *h) 1639 { 1640 struct elf_dyn_relocs *p; 1641 struct elf_lm32_link_hash_entry *eh = (struct elf_lm32_link_hash_entry *) h; 1642 1643 for (p = eh->dyn_relocs; p != NULL; p = p->next) 1644 { 1645 asection *s = p->sec->output_section; 1646 1647 if (s != NULL && (s->flags & SEC_READONLY) != 0) 1648 return p->sec; 1649 } 1650 return NULL; 1651 } 1652 1653 /* Adjust a symbol defined by a dynamic object and referenced by a 1654 regular object. The current definition is in some section of the 1655 dynamic object, but we're not including those sections. We have to 1656 change the definition to something the rest of the link can 1657 understand. */ 1658 1659 static bfd_boolean 1660 lm32_elf_adjust_dynamic_symbol (struct bfd_link_info *info, 1661 struct elf_link_hash_entry *h) 1662 { 1663 struct elf_lm32_link_hash_table *htab; 1664 bfd *dynobj; 1665 asection *s; 1666 1667 dynobj = elf_hash_table (info)->dynobj; 1668 1669 /* Make sure we know what is going on here. */ 1670 BFD_ASSERT (dynobj != NULL 1671 && (h->needs_plt 1672 || h->is_weakalias 1673 || (h->def_dynamic 1674 && h->ref_regular 1675 && !h->def_regular))); 1676 1677 /* If this is a function, put it in the procedure linkage table. We 1678 will fill in the contents of the procedure linkage table later, 1679 when we know the address of the .got section. */ 1680 if (h->type == STT_FUNC 1681 || h->needs_plt) 1682 { 1683 if (! bfd_link_pic (info) 1684 && !h->def_dynamic 1685 && !h->ref_dynamic 1686 && h->root.type != bfd_link_hash_undefweak 1687 && h->root.type != bfd_link_hash_undefined) 1688 { 1689 /* This case can occur if we saw a PLT reloc in an input 1690 file, but the symbol was never referred to by a dynamic 1691 object. In such a case, we don't actually need to build 1692 a procedure linkage table, and we can just do a PCREL 1693 reloc instead. */ 1694 h->plt.offset = (bfd_vma) -1; 1695 h->needs_plt = 0; 1696 } 1697 1698 return TRUE; 1699 } 1700 else 1701 h->plt.offset = (bfd_vma) -1; 1702 1703 /* If this is a weak symbol, and there is a real definition, the 1704 processor independent code will have arranged for us to see the 1705 real definition first, and we can just use the same value. */ 1706 if (h->is_weakalias) 1707 { 1708 struct elf_link_hash_entry *def = weakdef (h); 1709 BFD_ASSERT (def->root.type == bfd_link_hash_defined); 1710 h->root.u.def.section = def->root.u.def.section; 1711 h->root.u.def.value = def->root.u.def.value; 1712 return TRUE; 1713 } 1714 1715 /* This is a reference to a symbol defined by a dynamic object which 1716 is not a function. */ 1717 1718 /* If we are creating a shared library, we must presume that the 1719 only references to the symbol are via the global offset table. 1720 For such cases we need not do anything here; the relocations will 1721 be handled correctly by relocate_section. */ 1722 if (bfd_link_pic (info)) 1723 return TRUE; 1724 1725 /* If there are no references to this symbol that do not use the 1726 GOT, we don't need to generate a copy reloc. */ 1727 if (!h->non_got_ref) 1728 return TRUE; 1729 1730 /* If -z nocopyreloc was given, we won't generate them either. */ 1731 if (0 && info->nocopyreloc) 1732 { 1733 h->non_got_ref = 0; 1734 return TRUE; 1735 } 1736 1737 /* If we don't find any dynamic relocs in read-only sections, then 1738 we'll be keeping the dynamic relocs and avoiding the copy reloc. */ 1739 if (0 && !readonly_dynrelocs (h)) 1740 { 1741 h->non_got_ref = 0; 1742 return TRUE; 1743 } 1744 1745 /* We must allocate the symbol in our .dynbss section, which will 1746 become part of the .bss section of the executable. There will be 1747 an entry for this symbol in the .dynsym section. The dynamic 1748 object will contain position independent code, so all references 1749 from the dynamic object to this symbol will go through the global 1750 offset table. The dynamic linker will use the .dynsym entry to 1751 determine the address it must put in the global offset table, so 1752 both the dynamic object and the regular object will refer to the 1753 same memory location for the variable. */ 1754 1755 htab = lm32_elf_hash_table (info); 1756 if (htab == NULL) 1757 return FALSE; 1758 1759 s = htab->sdynbss; 1760 BFD_ASSERT (s != NULL); 1761 1762 /* We must generate a R_LM32_COPY reloc to tell the dynamic linker 1763 to copy the initial value out of the dynamic object and into the 1764 runtime process image. We need to remember the offset into the 1765 .rela.bss section we are going to use. */ 1766 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0) 1767 { 1768 asection *srel; 1769 1770 srel = htab->srelbss; 1771 BFD_ASSERT (srel != NULL); 1772 srel->size += sizeof (Elf32_External_Rela); 1773 h->needs_copy = 1; 1774 } 1775 1776 return _bfd_elf_adjust_dynamic_copy (info, h, s); 1777 } 1778 1779 /* Allocate space in .plt, .got and associated reloc sections for 1780 dynamic relocs. */ 1781 1782 static bfd_boolean 1783 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf) 1784 { 1785 struct bfd_link_info *info; 1786 struct elf_lm32_link_hash_table *htab; 1787 struct elf_lm32_link_hash_entry *eh; 1788 struct elf_dyn_relocs *p; 1789 1790 if (h->root.type == bfd_link_hash_indirect) 1791 return TRUE; 1792 1793 info = (struct bfd_link_info *) inf; 1794 htab = lm32_elf_hash_table (info); 1795 if (htab == NULL) 1796 return FALSE; 1797 1798 eh = (struct elf_lm32_link_hash_entry *) h; 1799 1800 if (htab->root.dynamic_sections_created 1801 && h->plt.refcount > 0) 1802 { 1803 /* Make sure this symbol is output as a dynamic symbol. 1804 Undefined weak syms won't yet be marked as dynamic. */ 1805 if (h->dynindx == -1 1806 && !h->forced_local) 1807 { 1808 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 1809 return FALSE; 1810 } 1811 1812 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)) 1813 { 1814 asection *s = htab->root.splt; 1815 1816 /* If this is the first .plt entry, make room for the special 1817 first entry. */ 1818 if (s->size == 0) 1819 s->size += PLT_ENTRY_SIZE; 1820 1821 h->plt.offset = s->size; 1822 1823 /* If this symbol is not defined in a regular file, and we are 1824 not generating a shared library, then set the symbol to this 1825 location in the .plt. This is required to make function 1826 pointers compare as equal between the normal executable and 1827 the shared library. */ 1828 if (! bfd_link_pic (info) 1829 && !h->def_regular) 1830 { 1831 h->root.u.def.section = s; 1832 h->root.u.def.value = h->plt.offset; 1833 } 1834 1835 /* Make room for this entry. */ 1836 s->size += PLT_ENTRY_SIZE; 1837 1838 /* We also need to make an entry in the .got.plt section, which 1839 will be placed in the .got section by the linker script. */ 1840 htab->root.sgotplt->size += 4; 1841 1842 /* We also need to make an entry in the .rel.plt section. */ 1843 htab->root.srelplt->size += sizeof (Elf32_External_Rela); 1844 } 1845 else 1846 { 1847 h->plt.offset = (bfd_vma) -1; 1848 h->needs_plt = 0; 1849 } 1850 } 1851 else 1852 { 1853 h->plt.offset = (bfd_vma) -1; 1854 h->needs_plt = 0; 1855 } 1856 1857 if (h->got.refcount > 0) 1858 { 1859 asection *s; 1860 bfd_boolean dyn; 1861 1862 /* Make sure this symbol is output as a dynamic symbol. 1863 Undefined weak syms won't yet be marked as dynamic. */ 1864 if (h->dynindx == -1 1865 && !h->forced_local) 1866 { 1867 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 1868 return FALSE; 1869 } 1870 1871 s = htab->root.sgot; 1872 1873 h->got.offset = s->size; 1874 s->size += 4; 1875 dyn = htab->root.dynamic_sections_created; 1876 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)) 1877 htab->root.srelgot->size += sizeof (Elf32_External_Rela); 1878 } 1879 else 1880 h->got.offset = (bfd_vma) -1; 1881 1882 if (eh->dyn_relocs == NULL) 1883 return TRUE; 1884 1885 /* In the shared -Bsymbolic case, discard space allocated for 1886 dynamic pc-relative relocs against symbols which turn out to be 1887 defined in regular objects. For the normal shared case, discard 1888 space for pc-relative relocs that have become local due to symbol 1889 visibility changes. */ 1890 1891 if (bfd_link_pic (info)) 1892 { 1893 if (h->def_regular 1894 && (h->forced_local 1895 || info->symbolic)) 1896 { 1897 struct elf_dyn_relocs **pp; 1898 1899 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;) 1900 { 1901 p->count -= p->pc_count; 1902 p->pc_count = 0; 1903 if (p->count == 0) 1904 *pp = p->next; 1905 else 1906 pp = &p->next; 1907 } 1908 } 1909 1910 /* Also discard relocs on undefined weak syms with non-default 1911 visibility. */ 1912 if (eh->dyn_relocs != NULL 1913 && h->root.type == bfd_link_hash_undefweak) 1914 { 1915 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT) 1916 eh->dyn_relocs = NULL; 1917 1918 /* Make sure undefined weak symbols are output as a dynamic 1919 symbol in PIEs. */ 1920 else if (h->dynindx == -1 1921 && !h->forced_local) 1922 { 1923 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 1924 return FALSE; 1925 } 1926 } 1927 } 1928 else 1929 { 1930 /* For the non-shared case, discard space for relocs against 1931 symbols which turn out to need copy relocs or are not 1932 dynamic. */ 1933 1934 if (!h->non_got_ref 1935 && ((h->def_dynamic 1936 && !h->def_regular) 1937 || (htab->root.dynamic_sections_created 1938 && (h->root.type == bfd_link_hash_undefweak 1939 || h->root.type == bfd_link_hash_undefined)))) 1940 { 1941 /* Make sure this symbol is output as a dynamic symbol. 1942 Undefined weak syms won't yet be marked as dynamic. */ 1943 if (h->dynindx == -1 1944 && !h->forced_local) 1945 { 1946 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 1947 return FALSE; 1948 } 1949 1950 /* If that succeeded, we know we'll be keeping all the 1951 relocs. */ 1952 if (h->dynindx != -1) 1953 goto keep; 1954 } 1955 1956 eh->dyn_relocs = NULL; 1957 1958 keep: ; 1959 } 1960 1961 /* Finally, allocate space. */ 1962 for (p = eh->dyn_relocs; p != NULL; p = p->next) 1963 { 1964 asection *sreloc = elf_section_data (p->sec)->sreloc; 1965 sreloc->size += p->count * sizeof (Elf32_External_Rela); 1966 } 1967 1968 return TRUE; 1969 } 1970 1971 /* Set DF_TEXTREL if we find any dynamic relocs that apply to 1972 read-only sections. */ 1973 1974 static bfd_boolean 1975 maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p) 1976 { 1977 asection *sec; 1978 1979 if (h->root.type == bfd_link_hash_indirect) 1980 return TRUE; 1981 1982 sec = readonly_dynrelocs (h); 1983 if (sec != NULL) 1984 { 1985 struct bfd_link_info *info = (struct bfd_link_info *) info_p; 1986 1987 info->flags |= DF_TEXTREL; 1988 info->callbacks->minfo 1989 (_("%B: dynamic relocation against `%T' in read-only section `%A'\n"), 1990 sec->owner, h->root.root.string, sec); 1991 1992 /* Not an error, just cut short the traversal. */ 1993 return FALSE; 1994 } 1995 return TRUE; 1996 } 1997 1998 /* Set the sizes of the dynamic sections. */ 1999 2000 static bfd_boolean 2001 lm32_elf_size_dynamic_sections (bfd *output_bfd, 2002 struct bfd_link_info *info) 2003 { 2004 struct elf_lm32_link_hash_table *htab; 2005 bfd *dynobj; 2006 asection *s; 2007 bfd_boolean relocs; 2008 bfd *ibfd; 2009 2010 htab = lm32_elf_hash_table (info); 2011 if (htab == NULL) 2012 return FALSE; 2013 2014 dynobj = htab->root.dynobj; 2015 BFD_ASSERT (dynobj != NULL); 2016 2017 if (htab->root.dynamic_sections_created) 2018 { 2019 /* Set the contents of the .interp section to the interpreter. */ 2020 if (bfd_link_executable (info) && !info->nointerp) 2021 { 2022 s = bfd_get_linker_section (dynobj, ".interp"); 2023 BFD_ASSERT (s != NULL); 2024 s->size = sizeof ELF_DYNAMIC_INTERPRETER; 2025 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER; 2026 } 2027 } 2028 2029 /* Set up .got offsets for local syms, and space for local dynamic 2030 relocs. */ 2031 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 2032 { 2033 bfd_signed_vma *local_got; 2034 bfd_signed_vma *end_local_got; 2035 bfd_size_type locsymcount; 2036 Elf_Internal_Shdr *symtab_hdr; 2037 asection *srel; 2038 2039 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour) 2040 continue; 2041 2042 for (s = ibfd->sections; s != NULL; s = s->next) 2043 { 2044 struct elf_dyn_relocs *p; 2045 2046 for (p = ((struct elf_dyn_relocs *) 2047 elf_section_data (s)->local_dynrel); 2048 p != NULL; 2049 p = p->next) 2050 { 2051 if (! bfd_is_abs_section (p->sec) 2052 && bfd_is_abs_section (p->sec->output_section)) 2053 { 2054 /* Input section has been discarded, either because 2055 it is a copy of a linkonce section or due to 2056 linker script /DISCARD/, so we'll be discarding 2057 the relocs too. */ 2058 } 2059 else if (p->count != 0) 2060 { 2061 srel = elf_section_data (p->sec)->sreloc; 2062 srel->size += p->count * sizeof (Elf32_External_Rela); 2063 if ((p->sec->output_section->flags & SEC_READONLY) != 0) 2064 info->flags |= DF_TEXTREL; 2065 } 2066 } 2067 } 2068 2069 local_got = elf_local_got_refcounts (ibfd); 2070 if (!local_got) 2071 continue; 2072 2073 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr; 2074 locsymcount = symtab_hdr->sh_info; 2075 end_local_got = local_got + locsymcount; 2076 s = htab->root.sgot; 2077 srel = htab->root.srelgot; 2078 for (; local_got < end_local_got; ++local_got) 2079 { 2080 if (*local_got > 0) 2081 { 2082 *local_got = s->size; 2083 s->size += 4; 2084 if (bfd_link_pic (info)) 2085 srel->size += sizeof (Elf32_External_Rela); 2086 } 2087 else 2088 *local_got = (bfd_vma) -1; 2089 } 2090 } 2091 2092 /* Allocate global sym .plt and .got entries, and space for global 2093 sym dynamic relocs. */ 2094 elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info); 2095 2096 /* We now have determined the sizes of the various dynamic sections. 2097 Allocate memory for them. */ 2098 relocs = FALSE; 2099 for (s = dynobj->sections; s != NULL; s = s->next) 2100 { 2101 if ((s->flags & SEC_LINKER_CREATED) == 0) 2102 continue; 2103 2104 if (s == htab->root.splt 2105 || s == htab->root.sgot 2106 || s == htab->root.sgotplt 2107 || s == htab->sdynbss) 2108 { 2109 /* Strip this section if we don't need it; see the 2110 comment below. */ 2111 } 2112 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela")) 2113 { 2114 if (s->size != 0 && s != htab->root.srelplt) 2115 relocs = TRUE; 2116 2117 /* We use the reloc_count field as a counter if we need 2118 to copy relocs into the output file. */ 2119 s->reloc_count = 0; 2120 } 2121 else 2122 /* It's not one of our sections, so don't allocate space. */ 2123 continue; 2124 2125 if (s->size == 0) 2126 { 2127 /* If we don't need this section, strip it from the 2128 output file. This is mostly to handle .rela.bss and 2129 .rela.plt. We must create both sections in 2130 create_dynamic_sections, because they must be created 2131 before the linker maps input sections to output 2132 sections. The linker does that before 2133 adjust_dynamic_symbol is called, and it is that 2134 function which decides whether anything needs to go 2135 into these sections. */ 2136 s->flags |= SEC_EXCLUDE; 2137 continue; 2138 } 2139 2140 if ((s->flags & SEC_HAS_CONTENTS) == 0) 2141 continue; 2142 2143 /* Allocate memory for the section contents. We use bfd_zalloc 2144 here in case unused entries are not reclaimed before the 2145 section's contents are written out. This should not happen, 2146 but this way if it does, we get a R_LM32_NONE reloc instead 2147 of garbage. */ 2148 s->contents = bfd_zalloc (dynobj, s->size); 2149 if (s->contents == NULL) 2150 return FALSE; 2151 } 2152 2153 if (htab->root.dynamic_sections_created) 2154 { 2155 /* Add some entries to the .dynamic section. We fill in the 2156 values later, in lm32_elf_finish_dynamic_sections, but we 2157 must add the entries now so that we get the correct size for 2158 the .dynamic section. The DT_DEBUG entry is filled in by the 2159 dynamic linker and used by the debugger. */ 2160 #define add_dynamic_entry(TAG, VAL) \ 2161 _bfd_elf_add_dynamic_entry (info, TAG, VAL) 2162 2163 if (bfd_link_executable (info)) 2164 { 2165 if (! add_dynamic_entry (DT_DEBUG, 0)) 2166 return FALSE; 2167 } 2168 2169 if (htab->root.splt->size != 0) 2170 { 2171 if (! add_dynamic_entry (DT_PLTGOT, 0) 2172 || ! add_dynamic_entry (DT_PLTRELSZ, 0) 2173 || ! add_dynamic_entry (DT_PLTREL, DT_RELA) 2174 || ! add_dynamic_entry (DT_JMPREL, 0)) 2175 return FALSE; 2176 } 2177 2178 if (relocs) 2179 { 2180 if (! add_dynamic_entry (DT_RELA, 0) 2181 || ! add_dynamic_entry (DT_RELASZ, 0) 2182 || ! add_dynamic_entry (DT_RELAENT, 2183 sizeof (Elf32_External_Rela))) 2184 return FALSE; 2185 2186 /* If any dynamic relocs apply to a read-only section, 2187 then we need a DT_TEXTREL entry. */ 2188 if ((info->flags & DF_TEXTREL) == 0) 2189 elf_link_hash_traverse (&htab->root, maybe_set_textrel, info); 2190 2191 if ((info->flags & DF_TEXTREL) != 0) 2192 { 2193 if (! add_dynamic_entry (DT_TEXTREL, 0)) 2194 return FALSE; 2195 } 2196 } 2197 } 2198 #undef add_dynamic_entry 2199 2200 /* Allocate .rofixup section. */ 2201 if (IS_FDPIC (output_bfd)) 2202 { 2203 struct weak_symbol_list *list_start = NULL, *list_end = NULL; 2204 int rgot_weak_count = 0; 2205 int r32_count = 0; 2206 int rgot_count = 0; 2207 /* Look for deleted sections. */ 2208 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 2209 { 2210 for (s = ibfd->sections; s != NULL; s = s->next) 2211 { 2212 if (s->reloc_count) 2213 { 2214 /* Count relocs that need .rofixup entires. */ 2215 Elf_Internal_Rela *internal_relocs, *end; 2216 internal_relocs = elf_section_data (s)->relocs; 2217 if (internal_relocs == NULL) 2218 internal_relocs = (_bfd_elf_link_read_relocs (ibfd, s, NULL, NULL, FALSE)); 2219 if (internal_relocs != NULL) 2220 { 2221 end = internal_relocs + s->reloc_count; 2222 while (internal_relocs < end) 2223 { 2224 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr; 2225 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd); 2226 unsigned long r_symndx; 2227 struct elf_link_hash_entry *h; 2228 2229 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr; 2230 sym_hashes = elf_sym_hashes (ibfd); 2231 r_symndx = ELF32_R_SYM (internal_relocs->r_info); 2232 h = NULL; 2233 if (r_symndx < symtab_hdr->sh_info) 2234 { 2235 } 2236 else 2237 { 2238 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 2239 while (h->root.type == bfd_link_hash_indirect 2240 || h->root.type == bfd_link_hash_warning) 2241 h = (struct elf_link_hash_entry *) h->root.u.i.link; 2242 } 2243 2244 /* Don't generate entries for weak symbols. */ 2245 if (!h || (h && h->root.type != bfd_link_hash_undefweak)) 2246 { 2247 if (!discarded_section (s) && !((bfd_get_section_flags (ibfd, s) & SEC_ALLOC) == 0)) 2248 { 2249 switch (ELF32_R_TYPE (internal_relocs->r_info)) 2250 { 2251 case R_LM32_32: 2252 r32_count++; 2253 break; 2254 case R_LM32_16_GOT: 2255 rgot_count++; 2256 break; 2257 } 2258 } 2259 } 2260 else 2261 { 2262 struct weak_symbol_list *current, *new_entry; 2263 /* Is this symbol already in the list? */ 2264 for (current = list_start; current; current = current->next) 2265 { 2266 if (!strcmp (current->name, h->root.root.string)) 2267 break; 2268 } 2269 if (!current && !discarded_section (s) && (bfd_get_section_flags (ibfd, s) & SEC_ALLOC)) 2270 { 2271 /* Will this have an entry in the GOT. */ 2272 if (ELF32_R_TYPE (internal_relocs->r_info) == R_LM32_16_GOT) 2273 { 2274 /* Create a new entry. */ 2275 new_entry = malloc (sizeof (struct weak_symbol_list)); 2276 if (!new_entry) 2277 return FALSE; 2278 new_entry->name = h->root.root.string; 2279 new_entry->next = NULL; 2280 /* Add to list */ 2281 if (list_start == NULL) 2282 { 2283 list_start = new_entry; 2284 list_end = new_entry; 2285 } 2286 else 2287 { 2288 list_end->next = new_entry; 2289 list_end = new_entry; 2290 } 2291 /* Increase count of undefined weak symbols in the got. */ 2292 rgot_weak_count++; 2293 } 2294 } 2295 } 2296 internal_relocs++; 2297 } 2298 } 2299 else 2300 return FALSE; 2301 } 2302 } 2303 } 2304 /* Free list. */ 2305 while (list_start) 2306 { 2307 list_end = list_start->next; 2308 free (list_start); 2309 list_start = list_end; 2310 } 2311 2312 /* Size sections. */ 2313 lm32fdpic_fixup32_section (info)->size 2314 = (r32_count + (htab->root.sgot->size / 4) - rgot_weak_count + 1) * 4; 2315 if (lm32fdpic_fixup32_section (info)->size == 0) 2316 lm32fdpic_fixup32_section (info)->flags |= SEC_EXCLUDE; 2317 else 2318 { 2319 lm32fdpic_fixup32_section (info)->contents = 2320 bfd_zalloc (dynobj, lm32fdpic_fixup32_section (info)->size); 2321 if (lm32fdpic_fixup32_section (info)->contents == NULL) 2322 return FALSE; 2323 } 2324 } 2325 2326 return TRUE; 2327 } 2328 2329 /* Create dynamic sections when linking against a dynamic object. */ 2330 2331 static bfd_boolean 2332 lm32_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info) 2333 { 2334 struct elf_lm32_link_hash_table *htab; 2335 flagword flags, pltflags; 2336 asection *s; 2337 const struct elf_backend_data *bed = get_elf_backend_data (abfd); 2338 int ptralign = 2; /* 32bit */ 2339 2340 htab = lm32_elf_hash_table (info); 2341 if (htab == NULL) 2342 return FALSE; 2343 2344 /* Make sure we have a GOT - For the case where we have a dynamic object 2345 but none of the relocs in check_relocs */ 2346 if (!_bfd_elf_create_got_section (abfd, info)) 2347 return FALSE; 2348 if (IS_FDPIC (abfd) && (htab->sfixup32 == NULL)) 2349 { 2350 if (! create_rofixup_section (abfd, info)) 2351 return FALSE; 2352 } 2353 2354 /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and 2355 .rel[a].bss sections. */ 2356 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY 2357 | SEC_LINKER_CREATED); 2358 2359 pltflags = flags; 2360 pltflags |= SEC_CODE; 2361 if (bed->plt_not_loaded) 2362 pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS); 2363 if (bed->plt_readonly) 2364 pltflags |= SEC_READONLY; 2365 2366 s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags); 2367 htab->root.splt = s; 2368 if (s == NULL 2369 || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment)) 2370 return FALSE; 2371 2372 if (bed->want_plt_sym) 2373 { 2374 /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the 2375 .plt section. */ 2376 struct bfd_link_hash_entry *bh = NULL; 2377 struct elf_link_hash_entry *h; 2378 2379 if (! (_bfd_generic_link_add_one_symbol 2380 (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s, 2381 (bfd_vma) 0, NULL, FALSE, 2382 get_elf_backend_data (abfd)->collect, &bh))) 2383 return FALSE; 2384 h = (struct elf_link_hash_entry *) bh; 2385 h->def_regular = 1; 2386 h->type = STT_OBJECT; 2387 htab->root.hplt = h; 2388 2389 if (bfd_link_pic (info) 2390 && ! bfd_elf_link_record_dynamic_symbol (info, h)) 2391 return FALSE; 2392 } 2393 2394 s = bfd_make_section_anyway_with_flags (abfd, 2395 bed->default_use_rela_p 2396 ? ".rela.plt" : ".rel.plt", 2397 flags | SEC_READONLY); 2398 htab->root.srelplt = s; 2399 if (s == NULL 2400 || ! bfd_set_section_alignment (abfd, s, ptralign)) 2401 return FALSE; 2402 2403 if (htab->root.sgot == NULL 2404 && !_bfd_elf_create_got_section (abfd, info)) 2405 return FALSE; 2406 2407 if (bed->want_dynbss) 2408 { 2409 /* The .dynbss section is a place to put symbols which are defined 2410 by dynamic objects, are referenced by regular objects, and are 2411 not functions. We must allocate space for them in the process 2412 image and use a R_*_COPY reloc to tell the dynamic linker to 2413 initialize them at run time. The linker script puts the .dynbss 2414 section into the .bss section of the final image. */ 2415 s = bfd_make_section_anyway_with_flags (abfd, ".dynbss", 2416 SEC_ALLOC | SEC_LINKER_CREATED); 2417 htab->sdynbss = s; 2418 if (s == NULL) 2419 return FALSE; 2420 /* The .rel[a].bss section holds copy relocs. This section is not 2421 normally needed. We need to create it here, though, so that the 2422 linker will map it to an output section. We can't just create it 2423 only if we need it, because we will not know whether we need it 2424 until we have seen all the input files, and the first time the 2425 main linker code calls BFD after examining all the input files 2426 (size_dynamic_sections) the input sections have already been 2427 mapped to the output sections. If the section turns out not to 2428 be needed, we can discard it later. We will never need this 2429 section when generating a shared object, since they do not use 2430 copy relocs. */ 2431 if (! bfd_link_pic (info)) 2432 { 2433 s = bfd_make_section_anyway_with_flags (abfd, 2434 (bed->default_use_rela_p 2435 ? ".rela.bss" : ".rel.bss"), 2436 flags | SEC_READONLY); 2437 htab->srelbss = s; 2438 if (s == NULL 2439 || ! bfd_set_section_alignment (abfd, s, ptralign)) 2440 return FALSE; 2441 } 2442 } 2443 2444 return TRUE; 2445 } 2446 2447 /* Copy the extra info we tack onto an elf_link_hash_entry. */ 2448 2449 static void 2450 lm32_elf_copy_indirect_symbol (struct bfd_link_info *info, 2451 struct elf_link_hash_entry *dir, 2452 struct elf_link_hash_entry *ind) 2453 { 2454 struct elf_lm32_link_hash_entry * edir; 2455 struct elf_lm32_link_hash_entry * eind; 2456 2457 edir = (struct elf_lm32_link_hash_entry *) dir; 2458 eind = (struct elf_lm32_link_hash_entry *) ind; 2459 2460 if (eind->dyn_relocs != NULL) 2461 { 2462 if (edir->dyn_relocs != NULL) 2463 { 2464 struct elf_dyn_relocs **pp; 2465 struct elf_dyn_relocs *p; 2466 2467 /* Add reloc counts against the indirect sym to the direct sym 2468 list. Merge any entries against the same section. */ 2469 for (pp = &eind->dyn_relocs; (p = *pp) != NULL;) 2470 { 2471 struct elf_dyn_relocs *q; 2472 2473 for (q = edir->dyn_relocs; q != NULL; q = q->next) 2474 if (q->sec == p->sec) 2475 { 2476 q->pc_count += p->pc_count; 2477 q->count += p->count; 2478 *pp = p->next; 2479 break; 2480 } 2481 if (q == NULL) 2482 pp = &p->next; 2483 } 2484 *pp = edir->dyn_relocs; 2485 } 2486 2487 edir->dyn_relocs = eind->dyn_relocs; 2488 eind->dyn_relocs = NULL; 2489 } 2490 2491 _bfd_elf_link_hash_copy_indirect (info, dir, ind); 2492 } 2493 2494 static bfd_boolean 2495 lm32_elf_always_size_sections (bfd *output_bfd, struct bfd_link_info *info) 2496 { 2497 if (!bfd_link_relocatable (info)) 2498 { 2499 if (!bfd_elf_stack_segment_size (output_bfd, info, 2500 "__stacksize", DEFAULT_STACK_SIZE)) 2501 return FALSE; 2502 2503 asection *sec = bfd_get_section_by_name (output_bfd, ".stack"); 2504 if (sec) 2505 sec->size = info->stacksize >= 0 ? info->stacksize : 0; 2506 } 2507 2508 return TRUE; 2509 } 2510 2511 static bfd_boolean 2512 lm32_elf_fdpic_copy_private_bfd_data (bfd *ibfd, bfd *obfd) 2513 { 2514 unsigned i; 2515 2516 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour 2517 || bfd_get_flavour (obfd) != bfd_target_elf_flavour) 2518 return TRUE; 2519 2520 if (! _bfd_elf_copy_private_bfd_data (ibfd, obfd)) 2521 return FALSE; 2522 2523 if (! elf_tdata (ibfd) || ! elf_tdata (ibfd)->phdr 2524 || ! elf_tdata (obfd) || ! elf_tdata (obfd)->phdr) 2525 return TRUE; 2526 2527 /* Copy the stack size. */ 2528 for (i = 0; i < elf_elfheader (ibfd)->e_phnum; i++) 2529 if (elf_tdata (ibfd)->phdr[i].p_type == PT_GNU_STACK) 2530 { 2531 Elf_Internal_Phdr *iphdr = &elf_tdata (ibfd)->phdr[i]; 2532 2533 for (i = 0; i < elf_elfheader (obfd)->e_phnum; i++) 2534 if (elf_tdata (obfd)->phdr[i].p_type == PT_GNU_STACK) 2535 { 2536 memcpy (&elf_tdata (obfd)->phdr[i], iphdr, sizeof (*iphdr)); 2537 2538 /* Rewrite the phdrs, since we're only called after they were first written. */ 2539 if (bfd_seek (obfd, (bfd_signed_vma) get_elf_backend_data (obfd) 2540 ->s->sizeof_ehdr, SEEK_SET) != 0 2541 || get_elf_backend_data (obfd)->s->write_out_phdrs (obfd, elf_tdata (obfd)->phdr, 2542 elf_elfheader (obfd)->e_phnum) != 0) 2543 return FALSE; 2544 break; 2545 } 2546 2547 break; 2548 } 2549 2550 return TRUE; 2551 } 2552 2553 2554 #define ELF_ARCH bfd_arch_lm32 2555 #define ELF_TARGET_ID LM32_ELF_DATA 2556 #define ELF_MACHINE_CODE EM_LATTICEMICO32 2557 #define ELF_MAXPAGESIZE 0x1000 2558 2559 #define TARGET_BIG_SYM lm32_elf32_vec 2560 #define TARGET_BIG_NAME "elf32-lm32" 2561 2562 #define bfd_elf32_bfd_reloc_type_lookup lm32_reloc_type_lookup 2563 #define bfd_elf32_bfd_reloc_name_lookup lm32_reloc_name_lookup 2564 #define elf_info_to_howto lm32_info_to_howto_rela 2565 #define elf_info_to_howto_rel 0 2566 #define elf_backend_rela_normal 1 2567 #define elf_backend_object_p lm32_elf_object_p 2568 #define elf_backend_final_write_processing lm32_elf_final_write_processing 2569 #define elf_backend_stack_align 8 2570 #define elf_backend_can_gc_sections 1 2571 #define elf_backend_can_refcount 1 2572 #define elf_backend_gc_mark_hook lm32_elf_gc_mark_hook 2573 #define elf_backend_plt_readonly 1 2574 #define elf_backend_want_got_plt 1 2575 #define elf_backend_want_plt_sym 0 2576 #define elf_backend_got_header_size 12 2577 #define elf_backend_dtrel_excludes_plt 1 2578 #define bfd_elf32_bfd_link_hash_table_create lm32_elf_link_hash_table_create 2579 #define elf_backend_check_relocs lm32_elf_check_relocs 2580 #define elf_backend_reloc_type_class lm32_elf_reloc_type_class 2581 #define elf_backend_copy_indirect_symbol lm32_elf_copy_indirect_symbol 2582 #define elf_backend_size_dynamic_sections lm32_elf_size_dynamic_sections 2583 #define elf_backend_omit_section_dynsym ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true) 2584 #define elf_backend_create_dynamic_sections lm32_elf_create_dynamic_sections 2585 #define elf_backend_finish_dynamic_sections lm32_elf_finish_dynamic_sections 2586 #define elf_backend_adjust_dynamic_symbol lm32_elf_adjust_dynamic_symbol 2587 #define elf_backend_finish_dynamic_symbol lm32_elf_finish_dynamic_symbol 2588 #define elf_backend_relocate_section lm32_elf_relocate_section 2589 2590 #include "elf32-target.h" 2591 2592 #undef ELF_MAXPAGESIZE 2593 #define ELF_MAXPAGESIZE 0x4000 2594 2595 2596 #undef TARGET_BIG_SYM 2597 #define TARGET_BIG_SYM lm32_elf32_fdpic_vec 2598 #undef TARGET_BIG_NAME 2599 #define TARGET_BIG_NAME "elf32-lm32fdpic" 2600 #undef elf32_bed 2601 #define elf32_bed elf32_lm32fdpic_bed 2602 2603 #undef elf_backend_always_size_sections 2604 #define elf_backend_always_size_sections lm32_elf_always_size_sections 2605 #undef bfd_elf32_bfd_copy_private_bfd_data 2606 #define bfd_elf32_bfd_copy_private_bfd_data lm32_elf_fdpic_copy_private_bfd_data 2607 2608 #include "elf32-target.h" 2609