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