1 /* Or1k-specific support for 32-bit ELF. 2 Copyright (C) 2001-2020 Free Software Foundation, Inc. 3 Contributed for OR32 by Johan Rydberg, jrydberg@opencores.org 4 5 PIC parts added by Stefan Kristiansson, stefan.kristiansson@saunalahti.fi, 6 largely based on elf32-m32r.c and elf32-microblaze.c. 7 8 This file is part of BFD, the Binary File Descriptor library. 9 10 This program is free software; you can redistribute it and/or modify 11 it under the terms of the GNU General Public License as published by 12 the Free Software Foundation; either version 3 of the License, or 13 (at your option) any later version. 14 15 This program is distributed in the hope that it will be useful, 16 but WITHOUT ANY WARRANTY; without even the implied warranty of 17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 GNU General Public License for more details. 19 20 You should have received a copy of the GNU General Public License 21 along with this program; if not, see <http://www.gnu.org/licenses/>. */ 22 23 #include "sysdep.h" 24 #include "bfd.h" 25 #include "libbfd.h" 26 #include "elf-bfd.h" 27 #include "elf/or1k.h" 28 #include "libiberty.h" 29 30 #define N_ONES(X) (((bfd_vma)2 << (X)) - 1) 31 32 #define PLT_ENTRY_SIZE 16 33 34 #define OR1K_MOVHI(D) (0x18000000 | (D << 21)) 35 #define OR1K_ADRP(D) (0x08000000 | (D << 21)) 36 #define OR1K_LWZ(D,A) (0x84000000 | (D << 21) | (A << 16)) 37 #define OR1K_ORI0(D) (0xA8000000 | (D << 21)) 38 #define OR1K_JR(B) (0x44000000 | (B << 11)) 39 #define OR1K_NOP 0x15000000 40 41 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1" 42 43 static reloc_howto_type or1k_elf_howto_table[] = 44 { 45 /* This reloc does nothing. */ 46 HOWTO (R_OR1K_NONE, /* type */ 47 0, /* rightshift */ 48 3, /* size (0 = byte, 1 = short, 2 = long) */ 49 0, /* bitsize */ 50 FALSE, /* pc_relative */ 51 0, /* bitpos */ 52 complain_overflow_dont, /* complain_on_overflow */ 53 bfd_elf_generic_reloc, /* special_function */ 54 "R_OR1K_NONE", /* name */ 55 FALSE, /* partial_inplace */ 56 0, /* src_mask */ 57 0, /* dst_mask */ 58 FALSE), /* pcrel_offset */ 59 60 HOWTO (R_OR1K_32, 61 0, /* rightshift */ 62 2, /* size (0 = byte, 1 = short, 2 = long) */ 63 32, /* bitsize */ 64 FALSE, /* pc_relative */ 65 0, /* bitpos */ 66 complain_overflow_unsigned, /* complain_on_overflow */ 67 bfd_elf_generic_reloc, /* special_function */ 68 "R_OR1K_32", /* name */ 69 FALSE, /* partial_inplace */ 70 0, /* src_mask */ 71 0xffffffff, /* dst_mask */ 72 FALSE), /* pcrel_offset */ 73 74 HOWTO (R_OR1K_16, 75 0, /* rightshift */ 76 1, /* size (0 = byte, 1 = short, 2 = long) */ 77 16, /* bitsize */ 78 FALSE, /* pc_relative */ 79 0, /* bitpos */ 80 complain_overflow_unsigned, /* complain_on_overflow */ 81 bfd_elf_generic_reloc, /* special_function */ 82 "R_OR1K_16", /* name */ 83 FALSE, /* partial_inplace */ 84 0, /* src_mask */ 85 0xffff, /* dst_mask */ 86 FALSE), /* pcrel_offset */ 87 88 HOWTO (R_OR1K_8, 89 0, /* rightshift */ 90 0, /* size (0 = byte, 1 = short, 2 = long) */ 91 8, /* bitsize */ 92 FALSE, /* pc_relative */ 93 0, /* bitpos */ 94 complain_overflow_unsigned, /* complain_on_overflow */ 95 bfd_elf_generic_reloc, /* special_function */ 96 "R_OR1K_8", /* name */ 97 FALSE, /* partial_inplace */ 98 0, /* src_mask */ 99 0xff, /* dst_mask */ 100 FALSE), /* pcrel_offset */ 101 102 HOWTO (R_OR1K_LO_16_IN_INSN, /* type */ 103 0, /* rightshift */ 104 2, /* size (0 = byte, 1 = short, 2 = long) */ 105 16, /* bitsize */ 106 FALSE, /* pc_relative */ 107 0, /* bitpos */ 108 complain_overflow_dont, /* complain_on_overflow */ 109 bfd_elf_generic_reloc, /* special_function */ 110 "R_OR1K_LO_16_IN_INSN", /* name */ 111 FALSE, /* partial_inplace */ 112 0, /* src_mask */ 113 0x0000ffff, /* dst_mask */ 114 FALSE), /* pcrel_offset */ 115 116 HOWTO (R_OR1K_HI_16_IN_INSN, /* type */ 117 16, /* rightshift */ 118 2, /* size (0 = byte, 1 = short, 2 = long) */ 119 16, /* bitsize */ 120 FALSE, /* pc_relative */ 121 0, /* bitpos */ 122 complain_overflow_dont, /* complain_on_overflow */ 123 bfd_elf_generic_reloc, /* special_function */ 124 "R_OR1K_HI_16_IN_INSN", /* name */ 125 FALSE, /* partial_inplace */ 126 0, /* src_mask */ 127 0x0000ffff, /* dst_mask */ 128 FALSE), /* pcrel_offset */ 129 130 /* A PC relative 26 bit relocation, right shifted by 2. */ 131 HOWTO (R_OR1K_INSN_REL_26, /* type */ 132 2, /* rightshift */ 133 2, /* size (0 = byte, 1 = short, 2 = long) */ 134 26, /* bitsize */ 135 TRUE, /* pc_relative */ 136 0, /* bitpos */ 137 complain_overflow_signed, /* complain_on_overflow */ 138 bfd_elf_generic_reloc, /* special_function */ 139 "R_OR1K_INSN_REL_26", /* name */ 140 FALSE, /* partial_inplace */ 141 0, /* src_mask */ 142 0x03ffffff, /* dst_mask */ 143 TRUE), /* pcrel_offset */ 144 145 /* GNU extension to record C++ vtable hierarchy. */ 146 HOWTO (R_OR1K_GNU_VTINHERIT, /* type */ 147 0, /* rightshift */ 148 2, /* size (0 = byte, 1 = short, 2 = long) */ 149 0, /* bitsize */ 150 FALSE, /* pc_relative */ 151 0, /* bitpos */ 152 complain_overflow_dont, /* complain_on_overflow */ 153 NULL, /* special_function */ 154 "R_OR1K_GNU_VTINHERIT", /* name */ 155 FALSE, /* partial_inplace */ 156 0, /* src_mask */ 157 0, /* dst_mask */ 158 FALSE), /* pcrel_offset */ 159 160 /* GNU extension to record C++ vtable member usage. */ 161 HOWTO (R_OR1K_GNU_VTENTRY, /* type */ 162 0, /* rightshift */ 163 2, /* size (0 = byte, 1 = short, 2 = long) */ 164 0, /* bitsize */ 165 FALSE, /* pc_relative */ 166 0, /* bitpos */ 167 complain_overflow_dont, /* complain_on_overflow */ 168 _bfd_elf_rel_vtable_reloc_fn, /* special_function */ 169 "R_OR1K_GNU_VTENTRY", /* name */ 170 FALSE, /* partial_inplace */ 171 0, /* src_mask */ 172 0, /* dst_mask */ 173 FALSE), /* pcrel_offset */ 174 175 HOWTO (R_OR1K_32_PCREL, 176 0, /* rightshift */ 177 2, /* size (0 = byte, 1 = short, 2 = long) */ 178 32, /* bitsize */ 179 TRUE, /* pc_relative */ 180 0, /* bitpos */ 181 complain_overflow_signed, /* complain_on_overflow */ 182 bfd_elf_generic_reloc, /* special_function */ 183 "R_OR1K_32_PCREL", /* name */ 184 FALSE, /* partial_inplace */ 185 0, /* src_mask */ 186 0xffffffff, /* dst_mask */ 187 TRUE), /* pcrel_offset */ 188 189 HOWTO (R_OR1K_16_PCREL, 190 0, /* rightshift */ 191 1, /* size (0 = byte, 1 = short, 2 = long) */ 192 16, /* bitsize */ 193 TRUE, /* pc_relative */ 194 0, /* bitpos */ 195 complain_overflow_signed, /* complain_on_overflow */ 196 bfd_elf_generic_reloc, /* special_function */ 197 "R_OR1K_16_PCREL", /* name */ 198 FALSE, /* partial_inplace */ 199 0, /* src_mask */ 200 0xffff, /* dst_mask */ 201 TRUE), /* pcrel_offset */ 202 203 HOWTO (R_OR1K_8_PCREL, 204 0, /* rightshift */ 205 0, /* size (0 = byte, 1 = short, 2 = long) */ 206 8, /* bitsize */ 207 TRUE, /* pc_relative */ 208 0, /* bitpos */ 209 complain_overflow_signed, /* complain_on_overflow */ 210 bfd_elf_generic_reloc, /* special_function */ 211 "R_OR1K_8_PCREL", /* name */ 212 FALSE, /* partial_inplace */ 213 0, /* src_mask */ 214 0xff, /* dst_mask */ 215 TRUE), /* pcrel_offset */ 216 217 HOWTO (R_OR1K_GOTPC_HI16, /* Type. */ 218 16, /* Rightshift. */ 219 2, /* Size (0 = byte, 1 = short, 2 = long). */ 220 16, /* Bitsize. */ 221 TRUE, /* PC_relative. */ 222 0, /* Bitpos. */ 223 complain_overflow_dont, /* Complain on overflow. */ 224 bfd_elf_generic_reloc, /* Special Function. */ 225 "R_OR1K_GOTPC_HI16", /* Name. */ 226 FALSE, /* Partial Inplace. */ 227 0, /* Source Mask. */ 228 0xffff, /* Dest Mask. */ 229 TRUE), /* PC relative offset? */ 230 231 HOWTO (R_OR1K_GOTPC_LO16, /* Type. */ 232 0, /* Rightshift. */ 233 2, /* Size (0 = byte, 1 = short, 2 = long). */ 234 16, /* Bitsize. */ 235 TRUE, /* PC_relative. */ 236 0, /* Bitpos. */ 237 complain_overflow_dont, /* Complain on overflow. */ 238 bfd_elf_generic_reloc, /* Special Function. */ 239 "R_OR1K_GOTPC_LO16", /* Name. */ 240 FALSE, /* Partial Inplace. */ 241 0, /* Source Mask. */ 242 0xffff, /* Dest Mask. */ 243 TRUE), /* PC relative offset? */ 244 245 HOWTO (R_OR1K_GOT16, /* type */ 246 0, /* rightshift */ 247 2, /* size (0 = byte, 1 = short, 2 = long) */ 248 16, /* bitsize */ 249 FALSE, /* pc_relative */ 250 0, /* bitpos */ 251 complain_overflow_signed, /* complain_on_overflow */ 252 bfd_elf_generic_reloc, /* special_function */ 253 "R_OR1K_GOT16", /* name */ 254 FALSE, /* partial_inplace */ 255 0, /* src_mask */ 256 0xffff, /* dst_mask */ 257 FALSE), /* pcrel_offset */ 258 259 /* A 26 bit PLT relocation. Shifted by 2. */ 260 HOWTO (R_OR1K_PLT26, /* Type. */ 261 2, /* Rightshift. */ 262 2, /* Size (0 = byte, 1 = short, 2 = long). */ 263 26, /* Bitsize. */ 264 TRUE, /* pc_relative. */ 265 0, /* Bitpos. */ 266 complain_overflow_signed, /* Complain on overflow. */ 267 bfd_elf_generic_reloc, /* Special Function. */ 268 "R_OR1K_PLT26", /* Name. */ 269 FALSE, /* Partial Inplace. */ 270 0, /* Source Mask. */ 271 0x03ffffff, /* Dest Mask. */ 272 TRUE), /* PC relative offset? */ 273 274 HOWTO (R_OR1K_GOTOFF_HI16, /* type */ 275 16, /* rightshift */ 276 2, /* size (0 = byte, 1 = short, 2 = long) */ 277 16, /* bitsize */ 278 FALSE, /* pc_relative */ 279 0, /* bitpos */ 280 complain_overflow_dont, /* complain_on_overflow */ 281 bfd_elf_generic_reloc, /* special_function */ 282 "R_OR1K_GOTOFF_HI16", /* name */ 283 FALSE, /* partial_inplace */ 284 0x0, /* src_mask */ 285 0xffff, /* dst_mask */ 286 FALSE), /* pcrel_offset */ 287 288 HOWTO (R_OR1K_GOTOFF_LO16, /* type */ 289 0, /* rightshift */ 290 2, /* size (0 = byte, 1 = short, 2 = long) */ 291 16, /* bitsize */ 292 FALSE, /* pc_relative */ 293 0, /* bitpos */ 294 complain_overflow_dont, /* complain_on_overflow */ 295 bfd_elf_generic_reloc, /* special_function */ 296 "R_OR1K_GOTOFF_LO16", /* name */ 297 FALSE, /* partial_inplace */ 298 0x0, /* src_mask */ 299 0xffff, /* dst_mask */ 300 FALSE), /* pcrel_offset */ 301 302 HOWTO (R_OR1K_COPY, /* type */ 303 0, /* rightshift */ 304 2, /* size (0 = byte, 1 = short, 2 = long) */ 305 32, /* bitsize */ 306 FALSE, /* pc_relative */ 307 0, /* bitpos */ 308 complain_overflow_bitfield, /* complain_on_overflow */ 309 bfd_elf_generic_reloc, /* special_function */ 310 "R_OR1K_COPY", /* name */ 311 FALSE, /* partial_inplace */ 312 0xffffffff, /* src_mask */ 313 0xffffffff, /* dst_mask */ 314 FALSE), /* pcrel_offset */ 315 316 HOWTO (R_OR1K_GLOB_DAT, /* type */ 317 0, /* rightshift */ 318 2, /* size (0 = byte, 1 = short, 2 = long) */ 319 32, /* bitsize */ 320 FALSE, /* pc_relative */ 321 0, /* bitpos */ 322 complain_overflow_bitfield, /* complain_on_overflow */ 323 bfd_elf_generic_reloc, /* special_function */ 324 "R_OR1K_GLOB_DAT", /* name */ 325 FALSE, /* partial_inplace */ 326 0xffffffff, /* src_mask */ 327 0xffffffff, /* dst_mask */ 328 FALSE), /* pcrel_offset */ 329 330 HOWTO (R_OR1K_JMP_SLOT, /* type */ 331 0, /* rightshift */ 332 2, /* size (0 = byte, 1 = short, 2 = long) */ 333 32, /* bitsize */ 334 FALSE, /* pc_relative */ 335 0, /* bitpos */ 336 complain_overflow_bitfield, /* complain_on_overflow */ 337 bfd_elf_generic_reloc, /* special_function */ 338 "R_OR1K_JMP_SLOT", /* name */ 339 FALSE, /* partial_inplace */ 340 0xffffffff, /* src_mask */ 341 0xffffffff, /* dst_mask */ 342 FALSE), /* pcrel_offset */ 343 344 HOWTO (R_OR1K_RELATIVE, /* type */ 345 0, /* rightshift */ 346 2, /* size (0 = byte, 1 = short, 2 = long) */ 347 32, /* bitsize */ 348 FALSE, /* pc_relative */ 349 0, /* bitpos */ 350 complain_overflow_bitfield, /* complain_on_overflow */ 351 bfd_elf_generic_reloc, /* special_function */ 352 "R_OR1K_RELATIVE", /* name */ 353 FALSE, /* partial_inplace */ 354 0xffffffff, /* src_mask */ 355 0xffffffff, /* dst_mask */ 356 FALSE), /* pcrel_offset */ 357 358 HOWTO (R_OR1K_TLS_GD_HI16, /* type */ 359 16, /* rightshift */ 360 2, /* size (0 = byte, 1 = short, 2 = long) */ 361 16, /* bitsize */ 362 FALSE, /* pc_relative */ 363 0, /* bitpos */ 364 complain_overflow_dont, /* complain_on_overflow */ 365 bfd_elf_generic_reloc, /* special_function */ 366 "R_OR1K_TLS_GD_HI16", /* name */ 367 FALSE, /* partial_inplace */ 368 0x0, /* src_mask */ 369 0xffff, /* dst_mask */ 370 FALSE), /* pcrel_offset */ 371 372 HOWTO (R_OR1K_TLS_GD_LO16, /* type */ 373 0, /* rightshift */ 374 2, /* size (0 = byte, 1 = short, 2 = long) */ 375 16, /* bitsize */ 376 FALSE, /* pc_relative */ 377 0, /* bitpos */ 378 complain_overflow_dont, /* complain_on_overflow */ 379 bfd_elf_generic_reloc, /* special_function */ 380 "R_OR1K_TLS_GD_LO16", /* name */ 381 FALSE, /* partial_inplace */ 382 0x0, /* src_mask */ 383 0xffff, /* dst_mask */ 384 FALSE), /* pcrel_offset */ 385 386 HOWTO (R_OR1K_TLS_LDM_HI16, /* type */ 387 16, /* rightshift */ 388 2, /* size (0 = byte, 1 = short, 2 = long) */ 389 16, /* bitsize */ 390 FALSE, /* pc_relative */ 391 0, /* bitpos */ 392 complain_overflow_dont, /* complain_on_overflow */ 393 bfd_elf_generic_reloc, /* special_function */ 394 "R_OR1K_TLS_LDM_HI16", /* name */ 395 FALSE, /* partial_inplace */ 396 0x0, /* src_mask */ 397 0xffff, /* dst_mask */ 398 FALSE), /* pcrel_offset */ 399 400 HOWTO (R_OR1K_TLS_LDM_LO16, /* type */ 401 0, /* rightshift */ 402 2, /* size (0 = byte, 1 = short, 2 = long) */ 403 16, /* bitsize */ 404 FALSE, /* pc_relative */ 405 0, /* bitpos */ 406 complain_overflow_dont, /* complain_on_overflow */ 407 bfd_elf_generic_reloc, /* special_function */ 408 "R_OR1K_TLS_LDM_LO16", /* name */ 409 FALSE, /* partial_inplace */ 410 0x0, /* src_mask */ 411 0xffff, /* dst_mask */ 412 FALSE), /* pcrel_offset */ 413 414 HOWTO (R_OR1K_TLS_LDO_HI16, /* type */ 415 16, /* rightshift */ 416 2, /* size (0 = byte, 1 = short, 2 = long) */ 417 16, /* bitsize */ 418 FALSE, /* pc_relative */ 419 0, /* bitpos */ 420 complain_overflow_dont, /* complain_on_overflow */ 421 bfd_elf_generic_reloc, /* special_function */ 422 "R_OR1K_TLS_LDO_HI16", /* name */ 423 FALSE, /* partial_inplace */ 424 0x0, /* src_mask */ 425 0xffff, /* dst_mask */ 426 FALSE), /* pcrel_offset */ 427 428 HOWTO (R_OR1K_TLS_LDO_LO16, /* type */ 429 0, /* rightshift */ 430 2, /* size (0 = byte, 1 = short, 2 = long) */ 431 16, /* bitsize */ 432 FALSE, /* pc_relative */ 433 0, /* bitpos */ 434 complain_overflow_dont, /* complain_on_overflow */ 435 bfd_elf_generic_reloc, /* special_function */ 436 "R_OR1K_TLS_LDO_LO16", /* name */ 437 FALSE, /* partial_inplace */ 438 0x0, /* src_mask */ 439 0xffff, /* dst_mask */ 440 FALSE), /* pcrel_offset */ 441 442 HOWTO (R_OR1K_TLS_IE_HI16, /* type */ 443 16, /* rightshift */ 444 2, /* size (0 = byte, 1 = short, 2 = long) */ 445 16, /* bitsize */ 446 FALSE, /* pc_relative */ 447 0, /* bitpos */ 448 complain_overflow_dont, /* complain_on_overflow */ 449 bfd_elf_generic_reloc, /* special_function */ 450 "R_OR1K_TLS_IE_HI16", /* name */ 451 FALSE, /* partial_inplace */ 452 0x0, /* src_mask */ 453 0xffff, /* dst_mask */ 454 FALSE), /* pcrel_offset */ 455 456 HOWTO (R_OR1K_TLS_IE_LO16, /* type */ 457 0, /* rightshift */ 458 2, /* size (0 = byte, 1 = short, 2 = long) */ 459 16, /* bitsize */ 460 FALSE, /* pc_relative */ 461 0, /* bitpos */ 462 complain_overflow_dont, /* complain_on_overflow */ 463 bfd_elf_generic_reloc, /* special_function */ 464 "R_OR1K_TLS_IE_LO16", /* name */ 465 FALSE, /* partial_inplace */ 466 0x0, /* src_mask */ 467 0xffff, /* dst_mask */ 468 FALSE), /* pcrel_offset */ 469 470 HOWTO (R_OR1K_TLS_LE_HI16, /* type */ 471 16, /* rightshift */ 472 2, /* size (0 = byte, 1 = short, 2 = long) */ 473 16, /* bitsize */ 474 FALSE, /* pc_relative */ 475 0, /* bitpos */ 476 complain_overflow_dont, /* complain_on_overflow */ 477 bfd_elf_generic_reloc, /* special_function */ 478 "R_OR1K_TLS_LE_HI16", /* name */ 479 FALSE, /* partial_inplace */ 480 0x0, /* src_mask */ 481 0xffff, /* dst_mask */ 482 FALSE), /* pcrel_offset */ 483 484 HOWTO (R_OR1K_TLS_LE_LO16, /* type */ 485 0, /* rightshift */ 486 2, /* size (0 = byte, 1 = short, 2 = long) */ 487 16, /* bitsize */ 488 FALSE, /* pc_relative */ 489 0, /* bitpos */ 490 complain_overflow_dont, /* complain_on_overflow */ 491 bfd_elf_generic_reloc, /* special_function */ 492 "R_OR1K_TLS_LE_LO16", /* name */ 493 FALSE, /* partial_inplace */ 494 0x0, /* src_mask */ 495 0xffff, /* dst_mask */ 496 FALSE), /* pcrel_offset */ 497 498 HOWTO (R_OR1K_TLS_TPOFF, /* type */ 499 0, /* rightshift */ 500 2, /* size (0 = byte, 1 = short, 2 = long) */ 501 32, /* bitsize */ 502 FALSE, /* pc_relative */ 503 0, /* bitpos */ 504 complain_overflow_bitfield, /* complain_on_overflow */ 505 bfd_elf_generic_reloc, /* special_function */ 506 "R_OR1K_TLS_TPOFF", /* name */ 507 FALSE, /* partial_inplace */ 508 0xffffffff, /* src_mask */ 509 0xffffffff, /* dst_mask */ 510 FALSE), /* pcrel_offset */ 511 512 HOWTO (R_OR1K_TLS_DTPOFF, /* type */ 513 0, /* rightshift */ 514 2, /* size (0 = byte, 1 = short, 2 = long) */ 515 32, /* bitsize */ 516 FALSE, /* pc_relative */ 517 0, /* bitpos */ 518 complain_overflow_bitfield, /* complain_on_overflow */ 519 bfd_elf_generic_reloc, /* special_function */ 520 "R_OR1K_TLS_DTPOFF", /* name */ 521 FALSE, /* partial_inplace */ 522 0xffffffff, /* src_mask */ 523 0xffffffff, /* dst_mask */ 524 FALSE), /* pcrel_offset */ 525 526 HOWTO (R_OR1K_TLS_DTPMOD, /* type */ 527 0, /* rightshift */ 528 2, /* size (0 = byte, 1 = short, 2 = long) */ 529 32, /* bitsize */ 530 FALSE, /* pc_relative */ 531 0, /* bitpos */ 532 complain_overflow_bitfield, /* complain_on_overflow */ 533 bfd_elf_generic_reloc, /* special_function */ 534 "R_OR1K_TLS_DTPMOD", /* name */ 535 FALSE, /* partial_inplace */ 536 0xffffffff, /* src_mask */ 537 0xffffffff, /* dst_mask */ 538 FALSE), /* pcrel_offset */ 539 540 HOWTO (R_OR1K_AHI16, /* type */ 541 16, /* rightshift */ 542 2, /* size (0 = byte, 1 = short, 2 = long) */ 543 16, /* bitsize */ 544 FALSE, /* pc_relative */ 545 0, /* bitpos */ 546 complain_overflow_dont, /* complain_on_overflow */ 547 bfd_elf_generic_reloc, /* special_function */ 548 "R_OR1K_AHI16", /* name */ 549 FALSE, /* partial_inplace */ 550 0x0, /* src_mask */ 551 0xffff, /* dst_mask */ 552 FALSE), /* pcrel_offset */ 553 554 HOWTO (R_OR1K_GOTOFF_AHI16, /* type */ 555 16, /* rightshift */ 556 2, /* size (0 = byte, 1 = short, 2 = long) */ 557 16, /* bitsize */ 558 FALSE, /* pc_relative */ 559 0, /* bitpos */ 560 complain_overflow_dont, /* complain_on_overflow */ 561 bfd_elf_generic_reloc, /* special_function */ 562 "R_OR1K_GOTOFF_AHI16", /* name */ 563 FALSE, /* partial_inplace */ 564 0x0, /* src_mask */ 565 0xffff, /* dst_mask */ 566 FALSE), /* pcrel_offset */ 567 568 HOWTO (R_OR1K_TLS_IE_AHI16, /* type */ 569 16, /* rightshift */ 570 2, /* size (0 = byte, 1 = short, 2 = long) */ 571 16, /* bitsize */ 572 FALSE, /* pc_relative */ 573 0, /* bitpos */ 574 complain_overflow_dont, /* complain_on_overflow */ 575 bfd_elf_generic_reloc, /* special_function */ 576 "R_OR1K_TLS_IE_AHI16", /* name */ 577 FALSE, /* partial_inplace */ 578 0x0, /* src_mask */ 579 0xffff, /* dst_mask */ 580 FALSE), /* pcrel_offset */ 581 582 HOWTO (R_OR1K_TLS_LE_AHI16, /* type */ 583 16, /* rightshift */ 584 2, /* size (0 = byte, 1 = short, 2 = long) */ 585 16, /* bitsize */ 586 FALSE, /* pc_relative */ 587 0, /* bitpos */ 588 complain_overflow_dont, /* complain_on_overflow */ 589 bfd_elf_generic_reloc, /* special_function */ 590 "R_OR1K_TLS_LE_AHI16", /* name */ 591 FALSE, /* partial_inplace */ 592 0x0, /* src_mask */ 593 0xffff, /* dst_mask */ 594 FALSE), /* pcrel_offset */ 595 596 HOWTO (R_OR1K_SLO16, /* type */ 597 0, /* rightshift */ 598 2, /* size (0 = byte, 1 = short, 2 = long) */ 599 16, /* bitsize */ 600 FALSE, /* pc_relative */ 601 0, /* bitpos */ 602 complain_overflow_dont, /* complain_on_overflow */ 603 bfd_elf_generic_reloc, /* special_function */ 604 "R_OR1K_SLO16", /* name */ 605 FALSE, /* partial_inplace */ 606 0x0, /* src_mask */ 607 0xffff, /* dst_mask */ 608 FALSE), /* pcrel_offset */ 609 610 HOWTO (R_OR1K_GOTOFF_SLO16, /* type */ 611 0, /* rightshift */ 612 2, /* size (0 = byte, 1 = short, 2 = long) */ 613 16, /* bitsize */ 614 FALSE, /* pc_relative */ 615 0, /* bitpos */ 616 complain_overflow_dont, /* complain_on_overflow */ 617 bfd_elf_generic_reloc, /* special_function */ 618 "R_OR1K_GOTOFF_SLO16", /* name */ 619 FALSE, /* partial_inplace */ 620 0x0, /* src_mask */ 621 0xffff, /* dst_mask */ 622 FALSE), /* pcrel_offset */ 623 624 HOWTO (R_OR1K_TLS_LE_SLO16, /* type */ 625 0, /* rightshift */ 626 2, /* size (0 = byte, 1 = short, 2 = long) */ 627 16, /* bitsize */ 628 FALSE, /* pc_relative */ 629 0, /* bitpos */ 630 complain_overflow_dont, /* complain_on_overflow */ 631 bfd_elf_generic_reloc, /* special_function */ 632 "R_OR1K_TLS_LE_SLO16", /* name */ 633 FALSE, /* partial_inplace */ 634 0x0, /* src_mask */ 635 0xffff, /* dst_mask */ 636 FALSE), /* pcrel_offset */ 637 638 /* A page relative 21 bit relocation, right shifted by 13, aligned. 639 Note that this is *page* relative, not pc relative. The idea is 640 similar, but normally the section alignment is not such that the 641 assembler can infer a final value, which it attempts to do with 642 pc-relative relocations to local symbols. */ 643 HOWTO (R_OR1K_PCREL_PG21, /* type */ 644 13, /* rightshift */ 645 2, /* size (0 = byte, 1 = short, 2 = long) */ 646 21, /* bitsize */ 647 FALSE, /* pc_relative */ 648 0, /* bitpos */ 649 complain_overflow_signed, /* complain_on_overflow */ 650 bfd_elf_generic_reloc, /* special_function */ 651 "R_OR1K_PCREL_PG21", /* name */ 652 FALSE, /* partial_inplace */ 653 0, /* src_mask */ 654 0x001fffff, /* dst_mask */ 655 TRUE), /* pcrel_offset */ 656 657 HOWTO (R_OR1K_GOT_PG21, /* type */ 658 13, /* rightshift */ 659 2, /* size (0 = byte, 1 = short, 2 = long) */ 660 21, /* bitsize */ 661 FALSE, /* pc_relative */ 662 0, /* bitpos */ 663 complain_overflow_signed, /* complain_on_overflow */ 664 bfd_elf_generic_reloc, /* special_function */ 665 "R_OR1K_GOT_PG21", /* name */ 666 FALSE, /* partial_inplace */ 667 0, /* src_mask */ 668 0x001fffff, /* dst_mask */ 669 TRUE), /* pcrel_offset */ 670 671 HOWTO (R_OR1K_TLS_GD_PG21, /* type */ 672 13, /* rightshift */ 673 2, /* size (0 = byte, 1 = short, 2 = long) */ 674 21, /* bitsize */ 675 FALSE, /* pc_relative */ 676 0, /* bitpos */ 677 complain_overflow_signed, /* complain_on_overflow */ 678 bfd_elf_generic_reloc, /* special_function */ 679 "R_OR1K_TLS_GD_PG21", /* name */ 680 FALSE, /* partial_inplace */ 681 0, /* src_mask */ 682 0x001fffff, /* dst_mask */ 683 TRUE), /* pcrel_offset */ 684 685 HOWTO (R_OR1K_TLS_LDM_PG21, /* type */ 686 13, /* rightshift */ 687 2, /* size (0 = byte, 1 = short, 2 = long) */ 688 21, /* bitsize */ 689 FALSE, /* pc_relative */ 690 0, /* bitpos */ 691 complain_overflow_signed, /* complain_on_overflow */ 692 bfd_elf_generic_reloc, /* special_function */ 693 "R_OR1K_TLS_LDM_PG21", /* name */ 694 FALSE, /* partial_inplace */ 695 0, /* src_mask */ 696 0x001fffff, /* dst_mask */ 697 TRUE), /* pcrel_offset */ 698 699 HOWTO (R_OR1K_TLS_IE_PG21, /* type */ 700 13, /* rightshift */ 701 2, /* size (0 = byte, 1 = short, 2 = long) */ 702 21, /* bitsize */ 703 FALSE, /* pc_relative */ 704 0, /* bitpos */ 705 complain_overflow_signed, /* complain_on_overflow */ 706 bfd_elf_generic_reloc, /* special_function */ 707 "R_OR1K_TLS_IE_PG21", /* name */ 708 FALSE, /* partial_inplace */ 709 0, /* src_mask */ 710 0x001fffff, /* dst_mask */ 711 TRUE), /* pcrel_offset */ 712 713 HOWTO (R_OR1K_LO13, /* type */ 714 0, /* rightshift */ 715 2, /* size (0 = byte, 1 = short, 2 = long) */ 716 16, /* bitsize */ 717 FALSE, /* pc_relative */ 718 0, /* bitpos */ 719 complain_overflow_dont, /* complain_on_overflow */ 720 bfd_elf_generic_reloc, /* special_function */ 721 "R_OR1K_LO13", /* name */ 722 FALSE, /* partial_inplace */ 723 0x0, /* src_mask */ 724 0xffff, /* dst_mask */ 725 FALSE), /* pcrel_offset */ 726 727 HOWTO (R_OR1K_GOT_LO13, /* type */ 728 0, /* rightshift */ 729 2, /* size (0 = byte, 1 = short, 2 = long) */ 730 16, /* bitsize */ 731 FALSE, /* pc_relative */ 732 0, /* bitpos */ 733 complain_overflow_dont, /* complain_on_overflow */ 734 bfd_elf_generic_reloc, /* special_function */ 735 "R_OR1K_GOT_LO13", /* name */ 736 FALSE, /* partial_inplace */ 737 0x0, /* src_mask */ 738 0xffff, /* dst_mask */ 739 FALSE), /* pcrel_offset */ 740 741 HOWTO (R_OR1K_TLS_GD_LO13, /* type */ 742 0, /* rightshift */ 743 2, /* size (0 = byte, 1 = short, 2 = long) */ 744 16, /* bitsize */ 745 FALSE, /* pc_relative */ 746 0, /* bitpos */ 747 complain_overflow_dont, /* complain_on_overflow */ 748 bfd_elf_generic_reloc, /* special_function */ 749 "R_OR1K_TLS_GD_LO13", /* name */ 750 FALSE, /* partial_inplace */ 751 0x0, /* src_mask */ 752 0xffff, /* dst_mask */ 753 FALSE), /* pcrel_offset */ 754 755 HOWTO (R_OR1K_TLS_LDM_LO13, /* type */ 756 0, /* rightshift */ 757 2, /* size (0 = byte, 1 = short, 2 = long) */ 758 16, /* bitsize */ 759 FALSE, /* pc_relative */ 760 0, /* bitpos */ 761 complain_overflow_dont, /* complain_on_overflow */ 762 bfd_elf_generic_reloc, /* special_function */ 763 "R_OR1K_TLD_LDM_LO13", /* name */ 764 FALSE, /* partial_inplace */ 765 0x0, /* src_mask */ 766 0xffff, /* dst_mask */ 767 FALSE), /* pcrel_offset */ 768 769 HOWTO (R_OR1K_TLS_IE_LO13, /* type */ 770 0, /* rightshift */ 771 2, /* size (0 = byte, 1 = short, 2 = long) */ 772 16, /* bitsize */ 773 FALSE, /* pc_relative */ 774 0, /* bitpos */ 775 complain_overflow_dont, /* complain_on_overflow */ 776 bfd_elf_generic_reloc, /* special_function */ 777 "R_OR1K_TLS_IE_LO13", /* name */ 778 FALSE, /* partial_inplace */ 779 0x0, /* src_mask */ 780 0xffff, /* dst_mask */ 781 FALSE), /* pcrel_offset */ 782 783 HOWTO (R_OR1K_SLO13, /* type */ 784 0, /* rightshift */ 785 2, /* size (0 = byte, 1 = short, 2 = long) */ 786 16, /* bitsize */ 787 FALSE, /* pc_relative */ 788 0, /* bitpos */ 789 complain_overflow_dont, /* complain_on_overflow */ 790 bfd_elf_generic_reloc, /* special_function */ 791 "R_OR1K_SLO13", /* name */ 792 FALSE, /* partial_inplace */ 793 0x0, /* src_mask */ 794 0xffff, /* dst_mask */ 795 FALSE), /* pcrel_offset */ 796 797 /* A 26 bit PLT relocation, using ADRP. Shifted by 2. */ 798 HOWTO (R_OR1K_PLTA26, /* Type. */ 799 2, /* Rightshift. */ 800 2, /* Size (0 = byte, 1 = short, 2 = long). */ 801 26, /* Bitsize. */ 802 TRUE, /* pc_relative. */ 803 0, /* Bitpos. */ 804 complain_overflow_signed, /* Complain on overflow. */ 805 bfd_elf_generic_reloc, /* Special Function. */ 806 "R_OR1K_PLTA26", /* Name. */ 807 FALSE, /* Partial Inplace. */ 808 0, /* Source Mask. */ 809 0x03ffffff, /* Dest Mask. */ 810 TRUE), /* PC relative offset? */ 811 }; 812 813 /* Map BFD reloc types to Or1k ELF reloc types. */ 814 815 struct or1k_reloc_map 816 { 817 bfd_reloc_code_real_type bfd_reloc_val; 818 unsigned int or1k_reloc_val; 819 }; 820 821 static const struct or1k_reloc_map or1k_reloc_map[] = 822 { 823 { BFD_RELOC_NONE, R_OR1K_NONE }, 824 { BFD_RELOC_32, R_OR1K_32 }, 825 { BFD_RELOC_16, R_OR1K_16 }, 826 { BFD_RELOC_8, R_OR1K_8 }, 827 { BFD_RELOC_LO16, R_OR1K_LO_16_IN_INSN }, 828 { BFD_RELOC_HI16, R_OR1K_HI_16_IN_INSN }, 829 { BFD_RELOC_HI16_S, R_OR1K_AHI16 }, 830 { BFD_RELOC_OR1K_REL_26, R_OR1K_INSN_REL_26 }, 831 { BFD_RELOC_VTABLE_ENTRY, R_OR1K_GNU_VTENTRY }, 832 { BFD_RELOC_VTABLE_INHERIT, R_OR1K_GNU_VTINHERIT }, 833 { BFD_RELOC_32_PCREL, R_OR1K_32_PCREL }, 834 { BFD_RELOC_16_PCREL, R_OR1K_16_PCREL }, 835 { BFD_RELOC_8_PCREL, R_OR1K_8_PCREL }, 836 { BFD_RELOC_LO16_GOTOFF, R_OR1K_GOTOFF_LO16 }, 837 { BFD_RELOC_HI16_GOTOFF, R_OR1K_GOTOFF_HI16 }, 838 { BFD_RELOC_HI16_S_GOTOFF, R_OR1K_GOTOFF_AHI16 }, 839 { BFD_RELOC_OR1K_GOTPC_HI16, R_OR1K_GOTPC_HI16 }, 840 { BFD_RELOC_OR1K_GOTPC_LO16, R_OR1K_GOTPC_LO16 }, 841 { BFD_RELOC_OR1K_GOT16, R_OR1K_GOT16 }, 842 { BFD_RELOC_OR1K_PLT26, R_OR1K_PLT26 }, 843 { BFD_RELOC_OR1K_GLOB_DAT, R_OR1K_GLOB_DAT }, 844 { BFD_RELOC_OR1K_COPY, R_OR1K_COPY }, 845 { BFD_RELOC_OR1K_JMP_SLOT, R_OR1K_JMP_SLOT }, 846 { BFD_RELOC_OR1K_RELATIVE, R_OR1K_RELATIVE }, 847 { BFD_RELOC_OR1K_TLS_GD_HI16, R_OR1K_TLS_GD_HI16 }, 848 { BFD_RELOC_OR1K_TLS_GD_LO16, R_OR1K_TLS_GD_LO16 }, 849 { BFD_RELOC_OR1K_TLS_LDM_HI16, R_OR1K_TLS_LDM_HI16 }, 850 { BFD_RELOC_OR1K_TLS_LDM_LO16, R_OR1K_TLS_LDM_LO16 }, 851 { BFD_RELOC_OR1K_TLS_LDO_HI16, R_OR1K_TLS_LDO_HI16 }, 852 { BFD_RELOC_OR1K_TLS_LDO_LO16, R_OR1K_TLS_LDO_LO16 }, 853 { BFD_RELOC_OR1K_TLS_IE_HI16, R_OR1K_TLS_IE_HI16 }, 854 { BFD_RELOC_OR1K_TLS_IE_LO16, R_OR1K_TLS_IE_LO16 }, 855 { BFD_RELOC_OR1K_TLS_IE_AHI16, R_OR1K_TLS_IE_AHI16 }, 856 { BFD_RELOC_OR1K_TLS_LE_HI16, R_OR1K_TLS_LE_HI16 }, 857 { BFD_RELOC_OR1K_TLS_LE_LO16, R_OR1K_TLS_LE_LO16 }, 858 { BFD_RELOC_OR1K_TLS_LE_AHI16, R_OR1K_TLS_LE_AHI16 }, 859 { BFD_RELOC_OR1K_SLO16, R_OR1K_SLO16 }, 860 { BFD_RELOC_OR1K_GOTOFF_SLO16, R_OR1K_GOTOFF_SLO16 }, 861 { BFD_RELOC_OR1K_TLS_LE_SLO16, R_OR1K_TLS_LE_SLO16 }, 862 { BFD_RELOC_OR1K_PCREL_PG21, R_OR1K_PCREL_PG21 }, 863 { BFD_RELOC_OR1K_GOT_PG21, R_OR1K_GOT_PG21 }, 864 { BFD_RELOC_OR1K_TLS_GD_PG21, R_OR1K_TLS_GD_PG21 }, 865 { BFD_RELOC_OR1K_TLS_LDM_PG21, R_OR1K_TLS_LDM_PG21 }, 866 { BFD_RELOC_OR1K_TLS_IE_PG21, R_OR1K_TLS_IE_PG21 }, 867 { BFD_RELOC_OR1K_LO13, R_OR1K_LO13 }, 868 { BFD_RELOC_OR1K_GOT_LO13, R_OR1K_GOT_LO13 }, 869 { BFD_RELOC_OR1K_TLS_GD_LO13, R_OR1K_TLS_GD_LO13 }, 870 { BFD_RELOC_OR1K_TLS_LDM_LO13, R_OR1K_TLS_LDM_LO13 }, 871 { BFD_RELOC_OR1K_TLS_IE_LO13, R_OR1K_TLS_IE_LO13 }, 872 { BFD_RELOC_OR1K_SLO13, R_OR1K_SLO13 }, 873 { BFD_RELOC_OR1K_PLTA26, R_OR1K_PLTA26 }, 874 }; 875 876 /* tls_type is a mask used to track how each symbol is accessed, 877 it may be accessed via multiple types of TLS access methods. 878 We track this for sizing (allocating got + relocation section space) and 879 for how to process relocations. */ 880 #define TLS_UNKNOWN 0 881 #define TLS_NONE 1 882 #define TLS_GD 2 883 #define TLS_LD 4 884 #define TLS_IE 8 885 #define TLS_LE 16 886 887 /* The size of the TLS thread control block, used to offset LE access. */ 888 #define TCB_SIZE 16 889 890 /* ELF linker hash entry. */ 891 struct elf_or1k_link_hash_entry 892 { 893 struct elf_link_hash_entry root; 894 895 /* Track type of TLS access. */ 896 unsigned char tls_type; 897 }; 898 899 /* ELF object data. */ 900 struct elf_or1k_obj_tdata 901 { 902 struct elf_obj_tdata root; 903 904 /* tls_type for each local got entry. */ 905 unsigned char *local_tls_type; 906 }; 907 908 #define elf_or1k_tdata(abfd) \ 909 ((struct elf_or1k_obj_tdata *) (abfd)->tdata.any) 910 911 #define elf_or1k_local_tls_type(abfd) \ 912 (elf_or1k_tdata (abfd)->local_tls_type) 913 914 /* ELF linker hash table. */ 915 struct elf_or1k_link_hash_table 916 { 917 struct elf_link_hash_table root; 918 919 bfd_boolean saw_plta; 920 }; 921 922 /* Get the ELF linker hash table from a link_info structure. */ 923 #define or1k_elf_hash_table(p) \ 924 ((is_elf_hash_table ((p)->hash) \ 925 && elf_hash_table_id (elf_hash_table (p)) == OR1K_ELF_DATA) \ 926 ? (struct elf_or1k_link_hash_table *) (p)->hash : NULL) 927 928 static bfd_boolean 929 elf_or1k_mkobject (bfd *abfd) 930 { 931 return bfd_elf_allocate_object (abfd, sizeof (struct elf_or1k_obj_tdata), 932 OR1K_ELF_DATA); 933 } 934 935 /* Create an entry in an or1k ELF linker hash table. */ 936 937 static struct bfd_hash_entry * 938 or1k_elf_link_hash_newfunc (struct bfd_hash_entry *entry, 939 struct bfd_hash_table *table, 940 const char *string) 941 { 942 struct elf_or1k_link_hash_entry *ret = 943 (struct elf_or1k_link_hash_entry *) entry; 944 945 /* Allocate the structure if it has not already been allocated by a 946 subclass. */ 947 if (ret == NULL) 948 ret = bfd_hash_allocate (table, 949 sizeof (struct elf_or1k_link_hash_entry)); 950 if (ret == NULL) 951 return NULL; 952 953 /* Call the allocation method of the superclass. */ 954 ret = ((struct elf_or1k_link_hash_entry *) 955 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret, 956 table, string)); 957 if (ret != NULL) 958 { 959 struct elf_or1k_link_hash_entry *eh; 960 961 eh = (struct elf_or1k_link_hash_entry *) ret; 962 eh->tls_type = TLS_UNKNOWN; 963 } 964 965 return (struct bfd_hash_entry *) ret; 966 } 967 968 /* Create an or1k ELF linker hash table. */ 969 970 static struct bfd_link_hash_table * 971 or1k_elf_link_hash_table_create (bfd *abfd) 972 { 973 struct elf_or1k_link_hash_table *ret; 974 size_t amt = sizeof (struct elf_or1k_link_hash_table); 975 976 ret = bfd_zmalloc (amt); 977 if (ret == NULL) 978 return NULL; 979 980 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd, 981 or1k_elf_link_hash_newfunc, 982 sizeof (struct elf_or1k_link_hash_entry), 983 OR1K_ELF_DATA)) 984 { 985 free (ret); 986 return NULL; 987 } 988 989 return &ret->root.root; 990 } 991 992 static reloc_howto_type * 993 or1k_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED, 994 bfd_reloc_code_real_type bcode) 995 { 996 unsigned int i; 997 998 for (i = 0; i < ARRAY_SIZE (or1k_reloc_map); i++) 999 if (or1k_reloc_map[i].bfd_reloc_val == bcode) 1000 { 1001 unsigned int ocode = or1k_reloc_map[i].or1k_reloc_val; 1002 if (ocode < (unsigned int) R_OR1K_max) 1003 return &or1k_elf_howto_table[ocode]; 1004 else 1005 break; 1006 } 1007 1008 return NULL; 1009 } 1010 1011 static reloc_howto_type * 1012 or1k_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 1013 const char *r_name) 1014 { 1015 unsigned int i; 1016 1017 for (i = 0; i < R_OR1K_max; i++) 1018 if (or1k_elf_howto_table[i].name != NULL 1019 && strcasecmp (or1k_elf_howto_table[i].name, r_name) == 0) 1020 return &or1k_elf_howto_table[i]; 1021 1022 return NULL; 1023 } 1024 1025 /* Set the howto pointer for an Or1k ELF reloc. */ 1026 1027 static bfd_boolean 1028 or1k_info_to_howto_rela (bfd * abfd, 1029 arelent * cache_ptr, 1030 Elf_Internal_Rela * dst) 1031 { 1032 unsigned int r_type; 1033 1034 r_type = ELF32_R_TYPE (dst->r_info); 1035 if (r_type >= (unsigned int) R_OR1K_max) 1036 { 1037 /* xgettext:c-format */ 1038 _bfd_error_handler (_("%pB: unsupported relocation type %#x"), 1039 abfd, r_type); 1040 bfd_set_error (bfd_error_bad_value); 1041 return FALSE; 1042 } 1043 cache_ptr->howto = & or1k_elf_howto_table[r_type]; 1044 return TRUE; 1045 } 1046 1047 /* Return the relocation value for @tpoff relocations.. */ 1048 static bfd_vma 1049 tpoff (struct bfd_link_info *info, bfd_vma address, bfd_boolean dynamic) 1050 { 1051 struct elf_link_hash_table *htab = elf_hash_table (info); 1052 bfd_vma base; 1053 1054 /* If tls_sec is NULL, we should have signalled an error already. */ 1055 if (htab->tls_sec == NULL) 1056 return 0; 1057 1058 if (dynamic) 1059 return address - htab->tls_sec->vma; 1060 else 1061 { 1062 /* On or1k, the tp points to just after the tcb, if we have an alignment 1063 greater than the tcb size we need to offset by the alignment difference. */ 1064 base = align_power ((bfd_vma) TCB_SIZE, htab->tls_sec->alignment_power) 1065 - TCB_SIZE; 1066 1067 /* The thread pointer on or1k stores the address after the TCB where 1068 the data is, just compute the difference. No need to compensate 1069 for the size of TCB. */ 1070 return address - htab->tls_sec->vma + base; 1071 } 1072 } 1073 1074 /* If we have both IE and GD accesses to a symbol the IE relocations should be 1075 offset by 8 bytes because the got contains both GD and IE entries. */ 1076 static bfd_vma 1077 or1k_initial_exec_offset (reloc_howto_type *howto, unsigned char tls_type_mask) 1078 { 1079 switch (howto->type) 1080 { 1081 case R_OR1K_TLS_IE_HI16: 1082 case R_OR1K_TLS_IE_LO16: 1083 case R_OR1K_TLS_IE_PG21: 1084 case R_OR1K_TLS_IE_LO13: 1085 case R_OR1K_TLS_IE_AHI16: 1086 return (tls_type_mask & TLS_GD) != 0 ? 8 : 0; 1087 default: 1088 return 0; 1089 } 1090 } 1091 1092 /* Like _bfd_final_link_relocate, but handles non-contiguous fields. */ 1093 1094 static bfd_reloc_status_type 1095 or1k_final_link_relocate (reloc_howto_type *howto, bfd *input_bfd, 1096 asection *input_section, bfd_byte *contents, 1097 bfd_vma offset, bfd_vma value) 1098 { 1099 bfd_reloc_status_type status = bfd_reloc_ok; 1100 int size = bfd_get_reloc_size (howto); 1101 bfd_vma x, place; 1102 1103 /* Sanity check the address. */ 1104 if (offset + size > bfd_get_section_limit_octets (input_bfd, input_section)) 1105 return bfd_reloc_outofrange; 1106 1107 place = (input_section->output_section->vma 1108 + input_section->output_offset 1109 + (howto->pcrel_offset ? offset : 0)); 1110 1111 switch (howto->type) 1112 { 1113 case R_OR1K_AHI16: 1114 case R_OR1K_GOTOFF_AHI16: 1115 case R_OR1K_TLS_IE_AHI16: 1116 case R_OR1K_TLS_LE_AHI16: 1117 /* Adjust the operand to match with a signed LO16. */ 1118 value += 0x8000; 1119 break; 1120 1121 case R_OR1K_INSN_REL_26: 1122 value -= place; 1123 /* Diagnose mis-aligned branch targets. */ 1124 if (value & 3) 1125 status = bfd_reloc_dangerous; 1126 break; 1127 1128 case R_OR1K_PCREL_PG21: 1129 case R_OR1K_GOT_PG21: 1130 case R_OR1K_TLS_GD_PG21: 1131 case R_OR1K_TLS_LDM_PG21: 1132 case R_OR1K_TLS_IE_PG21: 1133 value = (value & -8192) - (place & -8192); 1134 break; 1135 1136 case R_OR1K_LO13: 1137 case R_OR1K_GOT_LO13: 1138 case R_OR1K_TLS_GD_LO13: 1139 case R_OR1K_TLS_LDM_LO13: 1140 case R_OR1K_TLS_IE_LO13: 1141 case R_OR1K_SLO13: 1142 value &= 8191; 1143 break; 1144 1145 default: 1146 if (howto->pc_relative) 1147 value -= place; 1148 break; 1149 } 1150 1151 status = bfd_check_overflow (howto->complain_on_overflow, 1152 howto->bitsize, 1153 howto->rightshift, 1154 bfd_arch_bits_per_address (input_bfd), 1155 value); 1156 value >>= howto->rightshift; 1157 1158 /* If we're overwriting the entire destination, 1159 then no need to read the current contents. */ 1160 if (size == 0 || howto->dst_mask == N_ONES (size)) 1161 x = 0; 1162 else 1163 { 1164 BFD_ASSERT (size == 4); 1165 x = bfd_get_32 (input_bfd, contents + offset); 1166 } 1167 1168 switch (howto->type) 1169 { 1170 case R_OR1K_SLO16: 1171 case R_OR1K_GOTOFF_SLO16: 1172 case R_OR1K_TLS_LE_SLO16: 1173 case R_OR1K_SLO13: 1174 /* The split imm16 field used for stores. */ 1175 x = (x & ~0x3e007ff) | ((value & 0xf800) << 10) | (value & 0x7ff); 1176 break; 1177 1178 default: 1179 { 1180 bfd_vma fieldmask = howto->dst_mask; 1181 value <<= howto->bitpos; 1182 x = (x & ~fieldmask) | (value & fieldmask); 1183 } 1184 break; 1185 } 1186 1187 /* Put the relocated value back in the object file. */ 1188 switch (size) 1189 { 1190 case 0: 1191 break; 1192 case 1: 1193 bfd_put_8 (input_bfd, x, contents + offset); 1194 break; 1195 case 2: 1196 bfd_put_16 (input_bfd, x, contents + offset); 1197 break; 1198 case 4: 1199 bfd_put_32 (input_bfd, x, contents + offset); 1200 break; 1201 #ifdef BFD64 1202 case 8: 1203 bfd_put_64 (input_bfd, x, contents + offset); 1204 break; 1205 #endif 1206 default: 1207 _bfd_error_handler 1208 (_("%pB: Cannot handle relocation value size of %d"), 1209 input_bfd, size); 1210 abort (); 1211 } 1212 return status; 1213 } 1214 1215 /* Relocate an Or1k ELF section. 1216 1217 The RELOCATE_SECTION function is called by the new ELF backend linker 1218 to handle the relocations for a section. 1219 1220 The relocs are always passed as Rela structures; if the section 1221 actually uses Rel structures, the r_addend field will always be 1222 zero. 1223 1224 This function is responsible for adjusting the section contents as 1225 necessary, and (if using Rela relocs and generating a relocatable 1226 output file) adjusting the reloc addend as necessary. 1227 1228 This function does not have to worry about setting the reloc 1229 address or the reloc symbol index. 1230 1231 LOCAL_SYMS is a pointer to the swapped in local symbols. 1232 1233 LOCAL_SECTIONS is an array giving the section in the input file 1234 corresponding to the st_shndx field of each local symbol. 1235 1236 The global hash table entry for the global symbols can be found 1237 via elf_sym_hashes (input_bfd). 1238 1239 When generating relocatable output, this function must handle 1240 STB_LOCAL/STT_SECTION symbols specially. The output symbol is 1241 going to be the section symbol corresponding to the output 1242 section, which means that the addend must be adjusted 1243 accordingly. */ 1244 1245 static bfd_boolean 1246 or1k_elf_relocate_section (bfd *output_bfd, 1247 struct bfd_link_info *info, 1248 bfd *input_bfd, 1249 asection *input_section, 1250 bfd_byte *contents, 1251 Elf_Internal_Rela *relocs, 1252 Elf_Internal_Sym *local_syms, 1253 asection **local_sections) 1254 { 1255 Elf_Internal_Shdr *symtab_hdr; 1256 struct elf_link_hash_entry **sym_hashes; 1257 Elf_Internal_Rela *rel; 1258 Elf_Internal_Rela *relend; 1259 struct elf_or1k_link_hash_table *htab = or1k_elf_hash_table (info); 1260 asection *sreloc; 1261 bfd_vma *local_got_offsets; 1262 asection *sgot, *splt; 1263 bfd_vma plt_base, got_base, got_sym_value; 1264 bfd_boolean ret_val = TRUE; 1265 1266 if (htab == NULL) 1267 return FALSE; 1268 1269 local_got_offsets = elf_local_got_offsets (input_bfd); 1270 1271 sreloc = elf_section_data (input_section)->sreloc; 1272 1273 splt = htab->root.splt; 1274 plt_base = 0; 1275 if (splt != NULL) 1276 plt_base = splt->output_section->vma + splt->output_offset; 1277 1278 sgot = htab->root.sgot; 1279 got_sym_value = got_base = 0; 1280 if (sgot != NULL) 1281 { 1282 struct elf_link_hash_entry *hgot = htab->root.hgot; 1283 got_sym_value = (hgot->root.u.def.value 1284 + hgot->root.u.def.section->output_section->vma 1285 + hgot->root.u.def.section->output_offset); 1286 got_base = sgot->output_section->vma + sgot->output_offset; 1287 } 1288 1289 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr; 1290 sym_hashes = elf_sym_hashes (input_bfd); 1291 relend = relocs + input_section->reloc_count; 1292 1293 for (rel = relocs; rel < relend; rel++) 1294 { 1295 reloc_howto_type *howto; 1296 unsigned long r_symndx; 1297 Elf_Internal_Sym *sym; 1298 asection *sec; 1299 struct elf_link_hash_entry *h; 1300 bfd_vma relocation; 1301 bfd_reloc_status_type r; 1302 const char *name = NULL; 1303 int r_type; 1304 1305 r_type = ELF32_R_TYPE (rel->r_info); 1306 r_symndx = ELF32_R_SYM (rel->r_info); 1307 1308 if (r_type == R_OR1K_GNU_VTINHERIT 1309 || r_type == R_OR1K_GNU_VTENTRY) 1310 continue; 1311 1312 if (r_type < 0 || r_type >= (int) R_OR1K_max) 1313 { 1314 _bfd_error_handler 1315 (_("%pB: unknown relocation type %d"), 1316 input_bfd, (int) r_type); 1317 bfd_set_error (bfd_error_bad_value); 1318 ret_val = FALSE; 1319 continue; 1320 } 1321 1322 howto = or1k_elf_howto_table + ELF32_R_TYPE (rel->r_info); 1323 h = NULL; 1324 sym = NULL; 1325 sec = NULL; 1326 1327 if (r_symndx < symtab_hdr->sh_info) 1328 { 1329 sym = local_syms + r_symndx; 1330 sec = local_sections[r_symndx]; 1331 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel); 1332 1333 name = bfd_elf_string_from_elf_section 1334 (input_bfd, symtab_hdr->sh_link, sym->st_name); 1335 name = name == NULL ? bfd_section_name (sec) : name; 1336 } 1337 else 1338 { 1339 bfd_boolean unresolved_reloc, warned, ignored; 1340 1341 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel, 1342 r_symndx, symtab_hdr, sym_hashes, 1343 h, sec, relocation, 1344 unresolved_reloc, warned, ignored); 1345 name = h->root.root.string; 1346 } 1347 1348 if (sec != NULL && discarded_section (sec)) 1349 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section, 1350 rel, 1, relend, howto, 0, contents); 1351 1352 if (bfd_link_relocatable (info)) 1353 continue; 1354 1355 switch (howto->type) 1356 { 1357 case R_OR1K_PLT26: 1358 case R_OR1K_PLTA26: 1359 /* If the call is not local, redirect the branch to the PLT. 1360 Otherwise do nothing to send the branch to the symbol direct. */ 1361 if (!SYMBOL_CALLS_LOCAL (info, h) 1362 && h->plt.offset != (bfd_vma) -1) 1363 relocation = plt_base + h->plt.offset; 1364 1365 /* Addend should be zero. */ 1366 if (rel->r_addend != 0) 1367 { 1368 _bfd_error_handler 1369 (_("%pB: addend should be zero for plt relocations"), 1370 input_bfd); 1371 bfd_set_error (bfd_error_bad_value); 1372 ret_val = FALSE; 1373 } 1374 break; 1375 1376 case R_OR1K_GOT16: 1377 case R_OR1K_GOT_PG21: 1378 case R_OR1K_GOT_LO13: 1379 { 1380 bfd_vma off; 1381 1382 /* Relocation is to the entry for this symbol 1383 in the global offset table. */ 1384 BFD_ASSERT (sgot != NULL); 1385 if (h != NULL) 1386 { 1387 bfd_boolean dyn; 1388 1389 off = h->got.offset; 1390 BFD_ASSERT (off != (bfd_vma) -1); 1391 1392 dyn = htab->root.dynamic_sections_created; 1393 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 1394 bfd_link_pic (info), 1395 h) 1396 || (bfd_link_pic (info) 1397 && SYMBOL_REFERENCES_LOCAL (info, h))) 1398 { 1399 /* This is actually a static link, or it is a -Bsymbolic 1400 link and the symbol is defined locally, or the symbol 1401 was forced to be local because of a version file. 1402 We must initialize this entry in the GOT. Since the 1403 offset must always be a multiple of 4, we use the least 1404 significant bit to record whether we have initialized 1405 it already. 1406 1407 When doing a dynamic link, we create a .rela.got 1408 relocation entry to initialize the value. This 1409 is done in the finish_dynamic_symbol routine. */ 1410 if ((off & 1) != 0) 1411 off &= ~1; 1412 else 1413 { 1414 /* Write entry in GOT. */ 1415 bfd_put_32 (output_bfd, relocation, 1416 sgot->contents + off); 1417 /* Mark GOT entry as having been written. */ 1418 h->got.offset |= 1; 1419 } 1420 } 1421 } 1422 else 1423 { 1424 bfd_byte *loc; 1425 1426 BFD_ASSERT (local_got_offsets != NULL 1427 && local_got_offsets[r_symndx] != (bfd_vma) -1); 1428 1429 /* Get offset into GOT table. */ 1430 off = local_got_offsets[r_symndx]; 1431 1432 /* The offset must always be a multiple of 4. We use 1433 the least significant bit to record whether we have 1434 already processed this entry. */ 1435 if ((off & 1) != 0) 1436 off &= ~1; 1437 else 1438 { 1439 /* Write entry in GOT. */ 1440 bfd_put_32 (output_bfd, relocation, sgot->contents + off); 1441 if (bfd_link_pic (info)) 1442 { 1443 asection *srelgot; 1444 Elf_Internal_Rela outrel; 1445 1446 /* We need to generate a R_OR1K_RELATIVE reloc 1447 for the dynamic linker. */ 1448 srelgot = htab->root.srelgot; 1449 BFD_ASSERT (srelgot != NULL); 1450 1451 outrel.r_offset = got_base + off; 1452 outrel.r_info = ELF32_R_INFO (0, R_OR1K_RELATIVE); 1453 outrel.r_addend = relocation; 1454 loc = srelgot->contents; 1455 loc += (srelgot->reloc_count 1456 * sizeof (Elf32_External_Rela)); 1457 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc); 1458 ++srelgot->reloc_count; 1459 } 1460 local_got_offsets[r_symndx] |= 1; 1461 } 1462 } 1463 1464 /* The GOT_PG21 and GOT_LO13 relocs are pc-relative, 1465 while the GOT16 reloc is GOT relative. */ 1466 relocation = got_base + off; 1467 if (r_type == R_OR1K_GOT16) 1468 relocation -= got_sym_value; 1469 1470 /* Addend should be zero. */ 1471 if (rel->r_addend != 0) 1472 { 1473 _bfd_error_handler 1474 (_("%pB: addend should be zero for got relocations"), 1475 input_bfd); 1476 bfd_set_error (bfd_error_bad_value); 1477 ret_val = FALSE; 1478 } 1479 } 1480 break; 1481 1482 case R_OR1K_GOTOFF_LO16: 1483 case R_OR1K_GOTOFF_HI16: 1484 case R_OR1K_GOTOFF_AHI16: 1485 case R_OR1K_GOTOFF_SLO16: 1486 /* Relocation is offset from GOT. */ 1487 BFD_ASSERT (sgot != NULL); 1488 if (!SYMBOL_REFERENCES_LOCAL (info, h)) 1489 { 1490 _bfd_error_handler 1491 (_("%pB: gotoff relocation against dynamic symbol %s"), 1492 input_bfd, h->root.root.string); 1493 ret_val = FALSE; 1494 bfd_set_error (bfd_error_bad_value); 1495 } 1496 relocation -= got_sym_value; 1497 break; 1498 1499 case R_OR1K_INSN_REL_26: 1500 case R_OR1K_PCREL_PG21: 1501 case R_OR1K_LO13: 1502 case R_OR1K_SLO13: 1503 /* For a non-shared link, these will reference either the plt 1504 or a .dynbss copy of the symbol. */ 1505 if (bfd_link_pic (info) && !SYMBOL_REFERENCES_LOCAL (info, h)) 1506 { 1507 _bfd_error_handler 1508 (_("%pB: pc-relative relocation against dynamic symbol %s"), 1509 input_bfd, name); 1510 ret_val = FALSE; 1511 bfd_set_error (bfd_error_bad_value); 1512 } 1513 break; 1514 1515 case R_OR1K_HI_16_IN_INSN: 1516 case R_OR1K_LO_16_IN_INSN: 1517 case R_OR1K_AHI16: 1518 case R_OR1K_SLO16: 1519 if (bfd_link_pic (info)) 1520 { 1521 _bfd_error_handler 1522 (_("%pB: non-pic relocation against symbol %s"), 1523 input_bfd, name); 1524 ret_val = FALSE; 1525 bfd_set_error (bfd_error_bad_value); 1526 } 1527 break; 1528 1529 case R_OR1K_32: 1530 /* R_OR1K_16? */ 1531 { 1532 /* r_symndx will be STN_UNDEF (zero) only for relocs against symbols 1533 from removed linkonce sections, or sections discarded by 1534 a linker script. */ 1535 if (r_symndx == STN_UNDEF 1536 || (input_section->flags & SEC_ALLOC) == 0) 1537 break; 1538 1539 /* Emit a direct relocation if the symbol is dynamic, 1540 or a RELATIVE reloc for shared objects. We can omit 1541 RELATIVE relocs to local undefweak symbols. */ 1542 if (bfd_link_pic (info) 1543 ? (h == NULL 1544 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 1545 || h->root.type != bfd_link_hash_undefweak) 1546 : (h != NULL 1547 && h->dynindx != -1 1548 && !h->non_got_ref 1549 && ((h->def_dynamic && !h->def_regular) 1550 || h->root.type == bfd_link_hash_undefweak 1551 || h->root.type == bfd_link_hash_undefined))) 1552 { 1553 Elf_Internal_Rela outrel; 1554 bfd_byte *loc; 1555 bfd_boolean skip; 1556 1557 /* When generating a shared object, these relocations 1558 are copied into the output file to be resolved at run 1559 time. */ 1560 1561 BFD_ASSERT (sreloc != NULL); 1562 1563 skip = FALSE; 1564 1565 outrel.r_offset = 1566 _bfd_elf_section_offset (output_bfd, info, input_section, 1567 rel->r_offset); 1568 if (outrel.r_offset == (bfd_vma) -1) 1569 skip = TRUE; 1570 else if (outrel.r_offset == (bfd_vma) -2) 1571 skip = TRUE; 1572 outrel.r_offset += (input_section->output_section->vma 1573 + input_section->output_offset); 1574 1575 if (skip) 1576 memset (&outrel, 0, sizeof outrel); 1577 else if (SYMBOL_REFERENCES_LOCAL (info, h)) 1578 { 1579 outrel.r_info = ELF32_R_INFO (0, R_OR1K_RELATIVE); 1580 outrel.r_addend = relocation + rel->r_addend; 1581 } 1582 else 1583 { 1584 BFD_ASSERT (h->dynindx != -1); 1585 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type); 1586 outrel.r_addend = rel->r_addend; 1587 } 1588 1589 loc = sreloc->contents; 1590 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela); 1591 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc); 1592 break; 1593 } 1594 break; 1595 } 1596 1597 case R_OR1K_TLS_LDM_HI16: 1598 case R_OR1K_TLS_LDM_LO16: 1599 case R_OR1K_TLS_LDM_PG21: 1600 case R_OR1K_TLS_LDM_LO13: 1601 case R_OR1K_TLS_LDO_HI16: 1602 case R_OR1K_TLS_LDO_LO16: 1603 /* TODO: implement support for local dynamic. */ 1604 BFD_FAIL (); 1605 _bfd_error_handler 1606 (_("%pB: support for local dynamic not implemented"), 1607 input_bfd); 1608 bfd_set_error (bfd_error_bad_value); 1609 return FALSE; 1610 1611 case R_OR1K_TLS_GD_HI16: 1612 case R_OR1K_TLS_GD_LO16: 1613 case R_OR1K_TLS_GD_PG21: 1614 case R_OR1K_TLS_GD_LO13: 1615 case R_OR1K_TLS_IE_HI16: 1616 case R_OR1K_TLS_IE_LO16: 1617 case R_OR1K_TLS_IE_PG21: 1618 case R_OR1K_TLS_IE_LO13: 1619 case R_OR1K_TLS_IE_AHI16: 1620 { 1621 bfd_vma gotoff; 1622 Elf_Internal_Rela rela; 1623 asection *srelgot; 1624 bfd_byte *loc; 1625 bfd_boolean dynamic; 1626 int indx = 0; 1627 unsigned char tls_type; 1628 1629 srelgot = htab->root.srelgot; 1630 1631 /* Mark as TLS related GOT entry by setting 1632 bit 2 to indcate TLS and bit 1 to indicate GOT. */ 1633 if (h != NULL) 1634 { 1635 gotoff = h->got.offset; 1636 tls_type = ((struct elf_or1k_link_hash_entry *) h)->tls_type; 1637 h->got.offset |= 3; 1638 } 1639 else 1640 { 1641 unsigned char *local_tls_type; 1642 1643 gotoff = local_got_offsets[r_symndx]; 1644 local_tls_type = (unsigned char *) elf_or1k_local_tls_type (input_bfd); 1645 tls_type = local_tls_type == NULL ? TLS_NONE 1646 : local_tls_type[r_symndx]; 1647 local_got_offsets[r_symndx] |= 3; 1648 } 1649 1650 /* Only process the relocation once. */ 1651 if ((gotoff & 1) != 0) 1652 { 1653 gotoff += or1k_initial_exec_offset (howto, tls_type); 1654 1655 /* The PG21 and LO13 relocs are pc-relative, while the 1656 rest are GOT relative. */ 1657 relocation = got_base + (gotoff & ~3); 1658 if (!(r_type == R_OR1K_TLS_GD_PG21 1659 || r_type == R_OR1K_TLS_GD_LO13 1660 || r_type == R_OR1K_TLS_IE_PG21 1661 || r_type == R_OR1K_TLS_IE_LO13)) 1662 relocation -= got_sym_value; 1663 break; 1664 } 1665 1666 BFD_ASSERT (elf_hash_table (info)->hgot == NULL 1667 || elf_hash_table (info)->hgot->root.u.def.value == 0); 1668 1669 if (h != NULL) 1670 { 1671 bfd_boolean dyn = htab->root.dynamic_sections_created; 1672 bfd_boolean pic = bfd_link_pic (info); 1673 1674 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, pic, h) 1675 && (!pic || !SYMBOL_REFERENCES_LOCAL (info, h))) 1676 indx = h->dynindx; 1677 } 1678 1679 /* Dynamic entries will require relocations. If we do not need 1680 them we will just use the default R_OR1K_NONE and 1681 not set anything. */ 1682 dynamic = (bfd_link_pic (info) || indx != 0) 1683 && (h == NULL 1684 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 1685 || h->root.type != bfd_link_hash_undefweak); 1686 1687 /* Shared GD. */ 1688 if (dynamic && ((tls_type & TLS_GD) != 0)) 1689 { 1690 int i; 1691 1692 /* Add DTPMOD and DTPOFF GOT and rela entries. */ 1693 for (i = 0; i < 2; ++i) 1694 { 1695 BFD_ASSERT (srelgot->contents != NULL); 1696 1697 rela.r_offset = got_base + gotoff + i*4; 1698 if (h != NULL && h->dynindx != -1) 1699 { 1700 rela.r_info = ELF32_R_INFO (h->dynindx, 1701 (i == 0 ? R_OR1K_TLS_DTPMOD : R_OR1K_TLS_DTPOFF)); 1702 rela.r_addend = 0; 1703 } 1704 else 1705 { 1706 rela.r_info = ELF32_R_INFO (0, 1707 (i == 0 ? R_OR1K_TLS_DTPMOD : R_OR1K_TLS_DTPOFF)); 1708 rela.r_addend = 1709 (i == 0 ? 0 : tpoff (info, relocation, dynamic)); 1710 } 1711 1712 loc = srelgot->contents; 1713 loc += (srelgot->reloc_count++ 1714 * sizeof (Elf32_External_Rela)); 1715 1716 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 1717 bfd_put_32 (output_bfd, 0, sgot->contents + gotoff + i*4); 1718 } 1719 } 1720 /* Static GD. */ 1721 else if ((tls_type & TLS_GD) != 0) 1722 { 1723 bfd_put_32 (output_bfd, 1, sgot->contents + gotoff); 1724 bfd_put_32 (output_bfd, tpoff (info, relocation, dynamic), 1725 sgot->contents + gotoff + 4); 1726 } 1727 1728 gotoff += or1k_initial_exec_offset (howto, tls_type); 1729 1730 /* Shared IE. */ 1731 if (dynamic && ((tls_type & TLS_IE) != 0)) 1732 { 1733 BFD_ASSERT (srelgot->contents != NULL); 1734 1735 /* Add TPOFF GOT and rela entries. */ 1736 rela.r_offset = got_base + gotoff; 1737 if (h != NULL && h->dynindx != -1) 1738 { 1739 rela.r_info = ELF32_R_INFO (h->dynindx, R_OR1K_TLS_TPOFF); 1740 rela.r_addend = 0; 1741 } 1742 else 1743 { 1744 rela.r_info = ELF32_R_INFO (0, R_OR1K_TLS_TPOFF); 1745 rela.r_addend = tpoff (info, relocation, dynamic); 1746 } 1747 1748 loc = srelgot->contents; 1749 loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela); 1750 1751 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 1752 bfd_put_32 (output_bfd, 0, sgot->contents + gotoff); 1753 } 1754 /* Static IE. */ 1755 else if ((tls_type & TLS_IE) != 0) 1756 bfd_put_32 (output_bfd, tpoff (info, relocation, dynamic), 1757 sgot->contents + gotoff); 1758 1759 /* The PG21 and LO13 relocs are pc-relative, while the 1760 rest are GOT relative. */ 1761 relocation = got_base + gotoff; 1762 if (!(r_type == R_OR1K_TLS_GD_PG21 1763 || r_type == R_OR1K_TLS_GD_LO13 1764 || r_type == R_OR1K_TLS_IE_PG21 1765 || r_type == R_OR1K_TLS_IE_LO13)) 1766 relocation -= got_sym_value; 1767 } 1768 break; 1769 1770 case R_OR1K_TLS_LE_HI16: 1771 case R_OR1K_TLS_LE_LO16: 1772 case R_OR1K_TLS_LE_AHI16: 1773 case R_OR1K_TLS_LE_SLO16: 1774 /* Relocation is offset from TP. */ 1775 relocation = tpoff (info, relocation, 0); 1776 break; 1777 1778 case R_OR1K_TLS_DTPMOD: 1779 case R_OR1K_TLS_DTPOFF: 1780 case R_OR1K_TLS_TPOFF: 1781 /* These are resolved dynamically on load and shouldn't 1782 be used as linker input. */ 1783 BFD_FAIL (); 1784 _bfd_error_handler 1785 (_("%pB: will not resolve runtime TLS relocation"), 1786 input_bfd); 1787 bfd_set_error (bfd_error_bad_value); 1788 return FALSE; 1789 1790 default: 1791 break; 1792 } 1793 1794 r = or1k_final_link_relocate (howto, input_bfd, input_section, contents, 1795 rel->r_offset, relocation + rel->r_addend); 1796 1797 if (r != bfd_reloc_ok) 1798 { 1799 const char *msg = NULL; 1800 1801 switch (r) 1802 { 1803 case bfd_reloc_overflow: 1804 (*info->callbacks->reloc_overflow) 1805 (info, (h ? &h->root : NULL), name, howto->name, 1806 (bfd_vma) 0, input_bfd, input_section, rel->r_offset); 1807 break; 1808 1809 case bfd_reloc_undefined: 1810 (*info->callbacks->undefined_symbol) 1811 (info, name, input_bfd, input_section, rel->r_offset, TRUE); 1812 break; 1813 1814 case bfd_reloc_outofrange: 1815 msg = _("internal error: out of range error"); 1816 break; 1817 1818 case bfd_reloc_notsupported: 1819 msg = _("internal error: unsupported relocation error"); 1820 break; 1821 1822 case bfd_reloc_dangerous: 1823 msg = _("internal error: dangerous relocation"); 1824 break; 1825 1826 default: 1827 msg = _("internal error: unknown error"); 1828 break; 1829 } 1830 1831 if (msg) 1832 (*info->callbacks->warning) (info, msg, name, input_bfd, 1833 input_section, rel->r_offset); 1834 } 1835 } 1836 1837 return ret_val; 1838 } 1839 1840 /* Return the section that should be marked against GC for a given 1841 relocation. */ 1842 1843 static asection * 1844 or1k_elf_gc_mark_hook (asection *sec, 1845 struct bfd_link_info *info, 1846 Elf_Internal_Rela *rel, 1847 struct elf_link_hash_entry *h, 1848 Elf_Internal_Sym *sym) 1849 { 1850 if (h != NULL) 1851 switch (ELF32_R_TYPE (rel->r_info)) 1852 { 1853 case R_OR1K_GNU_VTINHERIT: 1854 case R_OR1K_GNU_VTENTRY: 1855 return NULL; 1856 } 1857 1858 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym); 1859 } 1860 1861 /* Look through the relocs for a section during the first phase. */ 1862 1863 static bfd_boolean 1864 or1k_elf_check_relocs (bfd *abfd, 1865 struct bfd_link_info *info, 1866 asection *sec, 1867 const Elf_Internal_Rela *relocs) 1868 { 1869 Elf_Internal_Shdr *symtab_hdr; 1870 struct elf_link_hash_entry **sym_hashes; 1871 const Elf_Internal_Rela *rel; 1872 1873 const Elf_Internal_Rela *rel_end; 1874 struct elf_or1k_link_hash_table *htab; 1875 bfd *dynobj; 1876 asection *sreloc = NULL; 1877 1878 if (bfd_link_relocatable (info)) 1879 return TRUE; 1880 1881 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 1882 sym_hashes = elf_sym_hashes (abfd); 1883 1884 htab = or1k_elf_hash_table (info); 1885 if (htab == NULL) 1886 return FALSE; 1887 1888 dynobj = htab->root.dynobj; 1889 1890 rel_end = relocs + sec->reloc_count; 1891 for (rel = relocs; rel < rel_end; rel++) 1892 { 1893 struct elf_link_hash_entry *h; 1894 unsigned long r_symndx; 1895 unsigned char tls_type; 1896 int r_type; 1897 1898 r_symndx = ELF32_R_SYM (rel->r_info); 1899 if (r_symndx < symtab_hdr->sh_info) 1900 h = NULL; 1901 else 1902 { 1903 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 1904 while (h->root.type == bfd_link_hash_indirect 1905 || h->root.type == bfd_link_hash_warning) 1906 h = (struct elf_link_hash_entry *) h->root.u.i.link; 1907 } 1908 1909 r_type = ELF32_R_TYPE (rel->r_info); 1910 switch (r_type) 1911 { 1912 case R_OR1K_TLS_GD_HI16: 1913 case R_OR1K_TLS_GD_LO16: 1914 case R_OR1K_TLS_GD_PG21: 1915 case R_OR1K_TLS_GD_LO13: 1916 tls_type = TLS_GD; 1917 break; 1918 case R_OR1K_TLS_LDM_HI16: 1919 case R_OR1K_TLS_LDM_LO16: 1920 case R_OR1K_TLS_LDM_PG21: 1921 case R_OR1K_TLS_LDM_LO13: 1922 case R_OR1K_TLS_LDO_HI16: 1923 case R_OR1K_TLS_LDO_LO16: 1924 tls_type = TLS_LD; 1925 break; 1926 case R_OR1K_TLS_IE_HI16: 1927 case R_OR1K_TLS_IE_LO16: 1928 case R_OR1K_TLS_IE_PG21: 1929 case R_OR1K_TLS_IE_LO13: 1930 case R_OR1K_TLS_IE_AHI16: 1931 tls_type = TLS_IE; 1932 break; 1933 case R_OR1K_TLS_LE_HI16: 1934 case R_OR1K_TLS_LE_LO16: 1935 case R_OR1K_TLS_LE_AHI16: 1936 case R_OR1K_TLS_LE_SLO16: 1937 tls_type = TLS_LE; 1938 break; 1939 default: 1940 tls_type = TLS_NONE; 1941 } 1942 1943 /* Record TLS type. */ 1944 if (h != NULL) 1945 ((struct elf_or1k_link_hash_entry *) h)->tls_type |= tls_type; 1946 else 1947 { 1948 unsigned char *local_tls_type; 1949 1950 /* This is a TLS type record for a local symbol. */ 1951 local_tls_type = (unsigned char *) elf_or1k_local_tls_type (abfd); 1952 if (local_tls_type == NULL) 1953 { 1954 bfd_size_type size; 1955 1956 size = symtab_hdr->sh_info; 1957 local_tls_type = bfd_zalloc (abfd, size); 1958 if (local_tls_type == NULL) 1959 return FALSE; 1960 elf_or1k_local_tls_type (abfd) = local_tls_type; 1961 } 1962 local_tls_type[r_symndx] |= tls_type; 1963 } 1964 1965 switch (r_type) 1966 { 1967 /* This relocation describes the C++ object vtable hierarchy. 1968 Reconstruct it for later use during GC. */ 1969 case R_OR1K_GNU_VTINHERIT: 1970 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset)) 1971 return FALSE; 1972 break; 1973 1974 /* This relocation describes which C++ vtable entries are actually 1975 used. Record for later use during GC. */ 1976 case R_OR1K_GNU_VTENTRY: 1977 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend)) 1978 return FALSE; 1979 break; 1980 1981 /* This relocation requires .plt entry. */ 1982 case R_OR1K_PLTA26: 1983 htab->saw_plta = TRUE; 1984 /* FALLTHRU */ 1985 case R_OR1K_PLT26: 1986 if (h != NULL) 1987 { 1988 h->needs_plt = 1; 1989 h->plt.refcount += 1; 1990 } 1991 break; 1992 1993 case R_OR1K_GOT16: 1994 case R_OR1K_GOT_PG21: 1995 case R_OR1K_GOT_LO13: 1996 case R_OR1K_TLS_GD_HI16: 1997 case R_OR1K_TLS_GD_LO16: 1998 case R_OR1K_TLS_GD_PG21: 1999 case R_OR1K_TLS_GD_LO13: 2000 case R_OR1K_TLS_IE_HI16: 2001 case R_OR1K_TLS_IE_LO16: 2002 case R_OR1K_TLS_IE_PG21: 2003 case R_OR1K_TLS_IE_LO13: 2004 case R_OR1K_TLS_IE_AHI16: 2005 if (h != NULL) 2006 h->got.refcount += 1; 2007 else 2008 { 2009 bfd_signed_vma *local_got_refcounts; 2010 2011 /* This is a global offset table entry for a local symbol. */ 2012 local_got_refcounts = elf_local_got_refcounts (abfd); 2013 if (local_got_refcounts == NULL) 2014 { 2015 bfd_size_type size; 2016 2017 size = symtab_hdr->sh_info; 2018 size *= sizeof (bfd_signed_vma); 2019 local_got_refcounts = bfd_zalloc (abfd, size); 2020 if (local_got_refcounts == NULL) 2021 return FALSE; 2022 elf_local_got_refcounts (abfd) = local_got_refcounts; 2023 } 2024 local_got_refcounts[r_symndx] += 1; 2025 } 2026 /* FALLTHRU */ 2027 2028 case R_OR1K_GOTOFF_HI16: 2029 case R_OR1K_GOTOFF_LO16: 2030 case R_OR1K_GOTOFF_AHI16: 2031 case R_OR1K_GOTOFF_SLO16: 2032 if (htab->root.sgot == NULL) 2033 { 2034 if (dynobj == NULL) 2035 htab->root.dynobj = dynobj = abfd; 2036 if (!_bfd_elf_create_got_section (dynobj, info)) 2037 return FALSE; 2038 } 2039 break; 2040 2041 case R_OR1K_INSN_REL_26: 2042 case R_OR1K_HI_16_IN_INSN: 2043 case R_OR1K_LO_16_IN_INSN: 2044 case R_OR1K_AHI16: 2045 case R_OR1K_SLO16: 2046 case R_OR1K_32: 2047 case R_OR1K_PCREL_PG21: 2048 case R_OR1K_LO13: 2049 case R_OR1K_SLO13: 2050 { 2051 if (h != NULL && !bfd_link_pic (info)) 2052 { 2053 /* We may need a copy reloc. */ 2054 h->non_got_ref = 1; 2055 2056 /* We may also need a .plt entry. */ 2057 h->plt.refcount += 1; 2058 if (r_type != R_OR1K_INSN_REL_26) 2059 h->pointer_equality_needed = 1; 2060 } 2061 2062 /* If we are creating a shared library, and this is a reloc 2063 against a global symbol, or a non PC relative reloc 2064 against a local symbol, then we need to copy the reloc 2065 into the shared library. However, if we are linking with 2066 -Bsymbolic, we do not need to copy a reloc against a 2067 global symbol which is defined in an object we are 2068 including in the link (i.e., DEF_REGULAR is set). At 2069 this point we have not seen all the input files, so it is 2070 possible that DEF_REGULAR is not set now but will be set 2071 later (it is never cleared). In case of a weak definition, 2072 DEF_REGULAR may be cleared later by a strong definition in 2073 a shared library. We account for that possibility below by 2074 storing information in the relocs_copied field of the hash 2075 table entry. A similar situation occurs when creating 2076 shared libraries and symbol visibility changes render the 2077 symbol local. 2078 2079 If on the other hand, we are creating an executable, we 2080 may need to keep relocations for symbols satisfied by a 2081 dynamic library if we manage to avoid copy relocs for the 2082 symbol. */ 2083 2084 if ((bfd_link_pic (info) 2085 && (sec->flags & SEC_ALLOC) != 0 2086 && (r_type != R_OR1K_INSN_REL_26 2087 || (h != NULL 2088 && (!SYMBOLIC_BIND (info, h) 2089 || h->root.type == bfd_link_hash_defweak 2090 || !h->def_regular)))) 2091 || (!bfd_link_pic (info) 2092 && (sec->flags & SEC_ALLOC) != 0 2093 && h != NULL 2094 && (h->root.type == bfd_link_hash_defweak 2095 || !h->def_regular))) 2096 { 2097 struct elf_dyn_relocs *sec_relocs; 2098 struct elf_dyn_relocs **head; 2099 2100 /* When creating a shared object, we must copy these 2101 relocs into the output file. We create a reloc 2102 section in dynobj and make room for the reloc. */ 2103 if (sreloc == NULL) 2104 { 2105 const char *name; 2106 unsigned int strndx = elf_elfheader (abfd)->e_shstrndx; 2107 unsigned int shnam = _bfd_elf_single_rel_hdr (sec)->sh_name; 2108 2109 name = bfd_elf_string_from_elf_section (abfd, strndx, shnam); 2110 if (name == NULL) 2111 return FALSE; 2112 2113 if (strncmp (name, ".rela", 5) != 0 2114 || strcmp (bfd_section_name (sec), name + 5) != 0) 2115 { 2116 _bfd_error_handler 2117 /* xgettext:c-format */ 2118 (_("%pB: bad relocation section name `%s\'"), 2119 abfd, name); 2120 } 2121 2122 if (htab->root.dynobj == NULL) 2123 htab->root.dynobj = abfd; 2124 dynobj = htab->root.dynobj; 2125 2126 sreloc = bfd_get_section_by_name (dynobj, name); 2127 if (sreloc == NULL) 2128 { 2129 sreloc = _bfd_elf_make_dynamic_reloc_section 2130 (sec, dynobj, 2, abfd, /*rela?*/ TRUE); 2131 2132 if (sreloc == NULL) 2133 return FALSE; 2134 } 2135 elf_section_data (sec)->sreloc = sreloc; 2136 } 2137 2138 /* If this is a global symbol, we count the number of 2139 relocations we need for this symbol. */ 2140 if (h != NULL) 2141 head = &h->dyn_relocs; 2142 else 2143 { 2144 /* Track dynamic relocs needed for local syms too. 2145 We really need local syms available to do this 2146 easily. Oh well. */ 2147 2148 asection *s; 2149 Elf_Internal_Sym *isym; 2150 void *vpp; 2151 2152 isym = bfd_sym_from_r_symndx (&htab->root.sym_cache, 2153 abfd, r_symndx); 2154 if (isym == NULL) 2155 return FALSE; 2156 2157 s = bfd_section_from_elf_index (abfd, isym->st_shndx); 2158 if (s == NULL) 2159 return FALSE; 2160 2161 vpp = &elf_section_data (s)->local_dynrel; 2162 head = (struct elf_dyn_relocs **) vpp; 2163 } 2164 2165 sec_relocs = *head; 2166 /* Allocate this sections dynamic reolcations structure if this 2167 is a new section. */ 2168 if (sec_relocs == NULL || sec_relocs->sec != sec) 2169 { 2170 size_t amt = sizeof *sec_relocs; 2171 sec_relocs = ((struct elf_dyn_relocs *) 2172 bfd_alloc (htab->root.dynobj, amt)); 2173 if (sec_relocs == NULL) 2174 return FALSE; 2175 sec_relocs->next = *head; 2176 *head = sec_relocs; 2177 sec_relocs->sec = sec; 2178 sec_relocs->count = 0; 2179 sec_relocs->pc_count = 0; 2180 } 2181 2182 sec_relocs->count += 1; 2183 if (r_type == R_OR1K_INSN_REL_26) 2184 sec_relocs->pc_count += 1; 2185 } 2186 } 2187 break; 2188 } 2189 } 2190 2191 return TRUE; 2192 } 2193 2194 static void 2195 or1k_write_plt_entry (bfd *output_bfd, bfd_byte *contents, unsigned insn1, 2196 unsigned insn2, unsigned insn3, unsigned insnj) 2197 { 2198 unsigned nodelay = elf_elfheader (output_bfd)->e_flags & EF_OR1K_NODELAY; 2199 unsigned insn4; 2200 2201 /* Honor the no-delay-slot setting. */ 2202 if (insn3 == OR1K_NOP) 2203 { 2204 insn4 = insn3; 2205 if (nodelay) 2206 insn3 = insnj; 2207 else 2208 insn3 = insn2, insn2 = insnj; 2209 } 2210 else 2211 { 2212 if (nodelay) 2213 insn4 = insnj; 2214 else 2215 insn4 = insn3, insn3 = insnj; 2216 } 2217 2218 bfd_put_32 (output_bfd, insn1, contents); 2219 bfd_put_32 (output_bfd, insn2, contents + 4); 2220 bfd_put_32 (output_bfd, insn3, contents + 8); 2221 bfd_put_32 (output_bfd, insn4, contents + 12); 2222 } 2223 2224 /* Finish up the dynamic sections. */ 2225 2226 static bfd_boolean 2227 or1k_elf_finish_dynamic_sections (bfd *output_bfd, 2228 struct bfd_link_info *info) 2229 { 2230 bfd *dynobj; 2231 asection *sdyn, *sgot; 2232 struct elf_or1k_link_hash_table *htab; 2233 2234 htab = or1k_elf_hash_table (info); 2235 if (htab == NULL) 2236 return FALSE; 2237 2238 dynobj = htab->root.dynobj; 2239 2240 sgot = htab->root.sgotplt; 2241 sdyn = bfd_get_section_by_name (dynobj, ".dynamic"); 2242 2243 if (htab->root.dynamic_sections_created) 2244 { 2245 asection *splt; 2246 Elf32_External_Dyn *dyncon, *dynconend; 2247 2248 BFD_ASSERT (sgot != NULL && sdyn != NULL); 2249 2250 dyncon = (Elf32_External_Dyn *) sdyn->contents; 2251 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size); 2252 2253 for (; dyncon < dynconend; dyncon++) 2254 { 2255 Elf_Internal_Dyn dyn; 2256 asection *s; 2257 2258 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn); 2259 2260 switch (dyn.d_tag) 2261 { 2262 default: 2263 continue; 2264 2265 case DT_PLTGOT: 2266 s = htab->root.sgotplt; 2267 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset; 2268 break; 2269 2270 case DT_JMPREL: 2271 s = htab->root.srelplt; 2272 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset; 2273 break; 2274 2275 case DT_PLTRELSZ: 2276 s = htab->root.srelplt; 2277 dyn.d_un.d_val = s->size; 2278 break; 2279 } 2280 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon); 2281 } 2282 2283 2284 /* Fill in the first entry in the procedure linkage table. */ 2285 splt = htab->root.splt; 2286 if (splt && splt->size > 0) 2287 { 2288 unsigned plt0, plt1, plt2; 2289 bfd_vma got_addr = sgot->output_section->vma + sgot->output_offset; 2290 2291 /* Note we force 16 byte alignment on the .got, so that 2292 the movhi/adrp can be shared between the two loads. */ 2293 2294 if (htab->saw_plta) 2295 { 2296 bfd_vma pc = splt->output_section->vma + splt->output_offset; 2297 unsigned pa = ((got_addr >> 13) - (pc >> 13)) & 0x1fffff; 2298 unsigned po = got_addr & 0x1fff; 2299 plt0 = OR1K_ADRP(12) | pa; 2300 plt1 = OR1K_LWZ(15,12) | (po + 8); 2301 plt2 = OR1K_LWZ(12,12) | (po + 4); 2302 } 2303 else if (bfd_link_pic (info)) 2304 { 2305 plt0 = OR1K_LWZ(15, 16) | 8; /* .got+8 */ 2306 plt1 = OR1K_LWZ(12, 16) | 4; /* .got+4 */ 2307 plt2 = OR1K_NOP; 2308 } 2309 else 2310 { 2311 unsigned ha = ((got_addr + 0x8000) >> 16) & 0xffff; 2312 unsigned lo = got_addr & 0xffff; 2313 plt0 = OR1K_MOVHI(12) | ha; 2314 plt1 = OR1K_LWZ(15,12) | (lo + 8); 2315 plt2 = OR1K_LWZ(12,12) | (lo + 4); 2316 } 2317 2318 or1k_write_plt_entry (output_bfd, splt->contents, 2319 plt0, plt1, plt2, OR1K_JR(15)); 2320 2321 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4; 2322 } 2323 } 2324 2325 /* Set the first entry in the global offset table to the address of 2326 the dynamic section. */ 2327 if (sgot && sgot->size > 0) 2328 { 2329 if (sdyn == NULL) 2330 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents); 2331 else 2332 bfd_put_32 (output_bfd, 2333 sdyn->output_section->vma + sdyn->output_offset, 2334 sgot->contents); 2335 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4; 2336 } 2337 2338 if (htab->root.sgot && htab->root.sgot->size > 0) 2339 elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize = 4; 2340 2341 return TRUE; 2342 } 2343 2344 /* Finish up dynamic symbol handling. We set the contents of various 2345 dynamic sections here. */ 2346 2347 static bfd_boolean 2348 or1k_elf_finish_dynamic_symbol (bfd *output_bfd, 2349 struct bfd_link_info *info, 2350 struct elf_link_hash_entry *h, 2351 Elf_Internal_Sym *sym) 2352 { 2353 struct elf_or1k_link_hash_table *htab; 2354 bfd_byte *loc; 2355 2356 htab = or1k_elf_hash_table (info); 2357 if (htab == NULL) 2358 return FALSE; 2359 2360 if (h->plt.offset != (bfd_vma) -1) 2361 { 2362 unsigned int plt0, plt1, plt2; 2363 asection *splt; 2364 asection *sgot; 2365 asection *srela; 2366 bfd_vma plt_base_addr; 2367 bfd_vma plt_addr; 2368 bfd_vma plt_index; 2369 bfd_vma plt_reloc; 2370 bfd_vma got_base_addr; 2371 bfd_vma got_offset; 2372 bfd_vma got_addr; 2373 Elf_Internal_Rela rela; 2374 2375 /* This symbol has an entry in the procedure linkage table. Set 2376 it up. */ 2377 BFD_ASSERT (h->dynindx != -1); 2378 2379 splt = htab->root.splt; 2380 sgot = htab->root.sgotplt; 2381 srela = htab->root.srelplt; 2382 BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL); 2383 2384 plt_base_addr = splt->output_section->vma + splt->output_offset; 2385 got_base_addr = sgot->output_section->vma + sgot->output_offset; 2386 2387 /* Get the index in the procedure linkage table which 2388 corresponds to this symbol. This is the index of this symbol 2389 in all the symbols for which we are making plt entries. The 2390 first entry in the procedure linkage table is reserved. */ 2391 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1; 2392 plt_addr = plt_base_addr + h->plt.offset; 2393 plt_reloc = plt_index * sizeof (Elf32_External_Rela); 2394 2395 /* Get the offset into the .got table of the entry that 2396 corresponds to this function. Each .got entry is 4 bytes. 2397 The first three are reserved. */ 2398 got_offset = (plt_index + 3) * 4; 2399 got_addr = got_base_addr + got_offset; 2400 2401 /* Fill in the entry in the procedure linkage table. */ 2402 if (htab->saw_plta) 2403 { 2404 unsigned pa = ((got_addr >> 13) - (plt_addr >> 13)) & 0x1fffff; 2405 unsigned po = (got_addr & 0x1fff); 2406 plt0 = OR1K_ADRP(12) | pa; 2407 plt1 = OR1K_LWZ(12,12) | po; 2408 plt2 = OR1K_ORI0(11) | plt_reloc; 2409 } 2410 else if (bfd_link_pic (info)) 2411 { 2412 plt0 = OR1K_LWZ(12,16) | got_offset; 2413 plt1 = OR1K_ORI0(11) | plt_reloc; 2414 plt2 = OR1K_NOP; 2415 } 2416 else 2417 { 2418 unsigned ha = ((got_addr + 0x8000) >> 16) & 0xffff; 2419 unsigned lo = got_addr & 0xffff; 2420 plt0 = OR1K_MOVHI(12) | ha; 2421 plt1 = OR1K_LWZ(12,12) | lo; 2422 plt2 = OR1K_ORI0(11) | plt_reloc; 2423 } 2424 2425 or1k_write_plt_entry (output_bfd, splt->contents + h->plt.offset, 2426 plt0, plt1, plt2, OR1K_JR(12)); 2427 2428 /* Fill in the entry in the global offset table. We initialize it to 2429 point to the top of the plt. This is done to lazy lookup the actual 2430 symbol as the first plt entry will be setup by libc to call the 2431 runtime dynamic linker. */ 2432 bfd_put_32 (output_bfd, plt_base_addr, sgot->contents + got_offset); 2433 2434 /* Fill in the entry in the .rela.plt section. */ 2435 rela.r_offset = got_addr; 2436 rela.r_info = ELF32_R_INFO (h->dynindx, R_OR1K_JMP_SLOT); 2437 rela.r_addend = 0; 2438 loc = srela->contents; 2439 loc += plt_index * sizeof (Elf32_External_Rela); 2440 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 2441 2442 if (!h->def_regular) 2443 { 2444 /* Mark the symbol as undefined, rather than as defined in 2445 the .plt section. Leave the value alone. */ 2446 sym->st_shndx = SHN_UNDEF; 2447 } 2448 } 2449 2450 if (h->got.offset != (bfd_vma) -1 2451 && (h->got.offset & 2) == 0) /* Homemade TLS check. */ 2452 { 2453 asection *sgot; 2454 asection *srelgot; 2455 Elf_Internal_Rela rela; 2456 2457 /* This symbol has an entry in the global offset table. Set it 2458 up. */ 2459 sgot = htab->root.sgot; 2460 srelgot = htab->root.srelgot; 2461 BFD_ASSERT (sgot != NULL && srelgot != NULL); 2462 2463 rela.r_offset = (sgot->output_section->vma 2464 + sgot->output_offset 2465 + (h->got.offset &~ 1)); 2466 2467 /* If this is a -Bsymbolic link, and the symbol is defined 2468 locally, we just want to emit a RELATIVE reloc. Likewise if 2469 the symbol was forced to be local because of a version file. 2470 The entry in the global offset table will already have been 2471 initialized in the relocate_section function. */ 2472 if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h)) 2473 { 2474 rela.r_info = ELF32_R_INFO (0, R_OR1K_RELATIVE); 2475 rela.r_addend = (h->root.u.def.value 2476 + h->root.u.def.section->output_section->vma 2477 + h->root.u.def.section->output_offset); 2478 } 2479 else 2480 { 2481 BFD_ASSERT ((h->got.offset & 1) == 0); 2482 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset); 2483 rela.r_info = ELF32_R_INFO (h->dynindx, R_OR1K_GLOB_DAT); 2484 rela.r_addend = 0; 2485 } 2486 2487 loc = srelgot->contents; 2488 loc += srelgot->reloc_count * sizeof (Elf32_External_Rela); 2489 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 2490 ++srelgot->reloc_count; 2491 } 2492 2493 if (h->needs_copy) 2494 { 2495 asection *s; 2496 Elf_Internal_Rela rela; 2497 2498 /* This symbols needs a copy reloc. Set it up. */ 2499 BFD_ASSERT (h->dynindx != -1 2500 && (h->root.type == bfd_link_hash_defined 2501 || h->root.type == bfd_link_hash_defweak)); 2502 2503 rela.r_offset = (h->root.u.def.value 2504 + h->root.u.def.section->output_section->vma 2505 + h->root.u.def.section->output_offset); 2506 rela.r_info = ELF32_R_INFO (h->dynindx, R_OR1K_COPY); 2507 rela.r_addend = 0; 2508 if (h->root.u.def.section == htab->root.sdynrelro) 2509 s = htab->root.sreldynrelro; 2510 else 2511 s = htab->root.srelbss; 2512 loc = s->contents + s->reloc_count * sizeof (Elf32_External_Rela); 2513 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 2514 ++s->reloc_count; 2515 } 2516 2517 /* Mark some specially defined symbols as absolute. */ 2518 if (strcmp (h->root.root.string, "_DYNAMIC") == 0 2519 || h == htab->root.hgot) 2520 sym->st_shndx = SHN_ABS; 2521 2522 return TRUE; 2523 } 2524 2525 static enum elf_reloc_type_class 2526 or1k_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED, 2527 const asection *rel_sec ATTRIBUTE_UNUSED, 2528 const Elf_Internal_Rela *rela) 2529 { 2530 switch ((int) ELF32_R_TYPE (rela->r_info)) 2531 { 2532 case R_OR1K_RELATIVE: return reloc_class_relative; 2533 case R_OR1K_JMP_SLOT: return reloc_class_plt; 2534 case R_OR1K_COPY: return reloc_class_copy; 2535 default: return reloc_class_normal; 2536 } 2537 } 2538 2539 /* Adjust a symbol defined by a dynamic object and referenced by a 2540 regular object. The current definition is in some section of the 2541 dynamic object, but we're not including those sections. We have to 2542 change the definition to something the rest of the link can 2543 understand. */ 2544 2545 static bfd_boolean 2546 or1k_elf_adjust_dynamic_symbol (struct bfd_link_info *info, 2547 struct elf_link_hash_entry *h) 2548 { 2549 struct elf_or1k_link_hash_table *htab; 2550 bfd *dynobj; 2551 asection *s, *srel; 2552 2553 dynobj = elf_hash_table (info)->dynobj; 2554 2555 /* Make sure we know what is going on here. */ 2556 BFD_ASSERT (dynobj != NULL 2557 && (h->needs_plt 2558 || h->is_weakalias 2559 || (h->def_dynamic 2560 && h->ref_regular 2561 && !h->def_regular))); 2562 2563 /* If this is a function, put it in the procedure linkage table. We 2564 will fill in the contents of the procedure linkage table later, 2565 when we know the address of the .got section. */ 2566 if (h->type == STT_FUNC 2567 || h->needs_plt) 2568 { 2569 if (! bfd_link_pic (info) 2570 && !h->def_dynamic 2571 && !h->ref_dynamic 2572 && h->root.type != bfd_link_hash_undefweak 2573 && h->root.type != bfd_link_hash_undefined) 2574 { 2575 /* This case can occur if we saw a PLT reloc in an input 2576 file, but the symbol was never referred to by a dynamic 2577 object. In such a case, we don't actually need to build 2578 a procedure linkage table, and we can just do a PCREL 2579 reloc instead. */ 2580 h->plt.offset = (bfd_vma) -1; 2581 h->needs_plt = 0; 2582 } 2583 2584 return TRUE; 2585 } 2586 else 2587 h->plt.offset = (bfd_vma) -1; 2588 2589 /* If this is a weak symbol, and there is a real definition, the 2590 processor independent code will have arranged for us to see the 2591 real definition first, and we can just use the same value. */ 2592 if (h->is_weakalias) 2593 { 2594 struct elf_link_hash_entry *def = weakdef (h); 2595 BFD_ASSERT (def->root.type == bfd_link_hash_defined); 2596 h->root.u.def.section = def->root.u.def.section; 2597 h->root.u.def.value = def->root.u.def.value; 2598 return TRUE; 2599 } 2600 2601 /* This is a reference to a symbol defined by a dynamic object which 2602 is not a function. */ 2603 2604 /* If we are creating a shared library, we must presume that the 2605 only references to the symbol are via the global offset table. 2606 For such cases we need not do anything here; the relocations will 2607 be handled correctly by relocate_section. */ 2608 if (bfd_link_pic (info)) 2609 return TRUE; 2610 2611 /* If there are no references to this symbol that do not use the 2612 GOT, we don't need to generate a copy reloc. */ 2613 if (!h->non_got_ref) 2614 return TRUE; 2615 2616 /* If -z nocopyreloc was given, we won't generate them either. */ 2617 if (info->nocopyreloc) 2618 { 2619 h->non_got_ref = 0; 2620 return TRUE; 2621 } 2622 2623 /* If we don't find any dynamic relocs in read-only sections, then 2624 we'll be keeping the dynamic relocs and avoiding the copy reloc. */ 2625 if (!_bfd_elf_readonly_dynrelocs (h)) 2626 { 2627 h->non_got_ref = 0; 2628 return TRUE; 2629 } 2630 2631 /* We must allocate the symbol in our .dynbss section, which will 2632 become part of the .bss section of the executable. There will be 2633 an entry for this symbol in the .dynsym section. The dynamic 2634 object will contain position independent code, so all references 2635 from the dynamic object to this symbol will go through the global 2636 offset table. The dynamic linker will use the .dynsym entry to 2637 determine the address it must put in the global offset table, so 2638 both the dynamic object and the regular object will refer to the 2639 same memory location for the variable. */ 2640 2641 htab = or1k_elf_hash_table (info); 2642 if (htab == NULL) 2643 return FALSE; 2644 2645 /* We must generate a R_OR1K_COPY reloc to tell the dynamic linker 2646 to copy the initial value out of the dynamic object and into the 2647 runtime process image. We need to remember the offset into the 2648 .rela.bss section we are going to use. */ 2649 if ((h->root.u.def.section->flags & SEC_READONLY) != 0) 2650 { 2651 s = htab->root.sdynrelro; 2652 srel = htab->root.sreldynrelro; 2653 } 2654 else 2655 { 2656 s = htab->root.sdynbss; 2657 srel = htab->root.srelbss; 2658 } 2659 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0) 2660 { 2661 srel->size += sizeof (Elf32_External_Rela); 2662 h->needs_copy = 1; 2663 } 2664 2665 return _bfd_elf_adjust_dynamic_copy (info, h, s); 2666 } 2667 2668 /* Caclulate an update the sizes required for a symbol in the GOT and 2669 RELA relocation section based on the TLS_TYPE and whether or not the symbol 2670 is DYNAMIC. 2671 2672 Symbols with TLS_GD access require 8 bytes in the GOT and, if dynamic, 2673 require two relocation entries. Symbols with TLS_IE access require 4 bytes 2674 in the GOT and, if dynamic, require one relocation entry. Symbols may have 2675 both TLS_GD and TLS_IE access to be accounted for. 2676 2677 Other symbols require 4 bytes in the GOT table and, if dynamic, require one 2678 relocation entry. */ 2679 2680 static void 2681 or1k_set_got_and_rela_sizes (const unsigned char tls_type, 2682 const bfd_boolean dynamic, 2683 bfd_vma *got_size, 2684 bfd_vma *rela_size) 2685 { 2686 bfd_boolean is_tls_entry = FALSE; 2687 2688 /* TLS GD requires two GOT entries and two relocs. */ 2689 if ((tls_type & TLS_GD) != 0) 2690 { 2691 *got_size += 8; 2692 is_tls_entry = TRUE; 2693 } 2694 2695 if ((tls_type & TLS_IE) != 0) 2696 { 2697 *got_size += 4; 2698 is_tls_entry = TRUE; 2699 } 2700 2701 if (is_tls_entry == FALSE) 2702 *got_size += 4; 2703 2704 if (dynamic) 2705 { 2706 if ((tls_type & TLS_GD) != 0) 2707 *rela_size += 2 * sizeof (Elf32_External_Rela); 2708 2709 if ((tls_type & TLS_IE) != 0) 2710 *rela_size += sizeof (Elf32_External_Rela); 2711 2712 if (is_tls_entry == FALSE) 2713 *rela_size += sizeof (Elf32_External_Rela); 2714 } 2715 } 2716 2717 2718 /* Allocate space in .plt, .got and associated reloc sections for 2719 dynamic relocs. */ 2720 2721 static bfd_boolean 2722 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf) 2723 { 2724 struct bfd_link_info *info; 2725 struct elf_or1k_link_hash_table *htab; 2726 struct elf_dyn_relocs *sec_relocs; 2727 2728 if (h->root.type == bfd_link_hash_indirect) 2729 return TRUE; 2730 2731 info = (struct bfd_link_info *) inf; 2732 htab = or1k_elf_hash_table (info); 2733 if (htab == NULL) 2734 return FALSE; 2735 2736 if (htab->root.dynamic_sections_created 2737 && h->plt.refcount > 0) 2738 { 2739 /* Make sure this symbol is output as a dynamic symbol. 2740 Undefined weak syms won't yet be marked as dynamic. */ 2741 if (h->dynindx == -1 2742 && !h->forced_local) 2743 { 2744 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2745 return FALSE; 2746 } 2747 2748 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)) 2749 { 2750 asection *splt = htab->root.splt; 2751 2752 /* If this is the first .plt entry, make room for the special 2753 first entry. */ 2754 if (splt->size == 0) 2755 splt->size = PLT_ENTRY_SIZE; 2756 2757 h->plt.offset = splt->size; 2758 2759 /* If this symbol is not defined in a regular file, and we are 2760 not generating a shared library, then set the symbol to this 2761 location in the .plt. This is required to make function 2762 pointers compare as equal between the normal executable and 2763 the shared library. */ 2764 if (! bfd_link_pic (info) 2765 && !h->def_regular) 2766 { 2767 h->root.u.def.section = splt; 2768 h->root.u.def.value = h->plt.offset; 2769 } 2770 2771 /* Make room for this entry. */ 2772 splt->size += PLT_ENTRY_SIZE; 2773 2774 /* We also need to make an entry in the .got.plt section, which 2775 will be placed in the .got section by the linker script. */ 2776 htab->root.sgotplt->size += 4; 2777 2778 /* We also need to make an entry in the .rel.plt section. */ 2779 htab->root.srelplt->size += sizeof (Elf32_External_Rela); 2780 } 2781 else 2782 { 2783 h->plt.offset = (bfd_vma) -1; 2784 h->needs_plt = 0; 2785 } 2786 } 2787 else 2788 { 2789 h->plt.offset = (bfd_vma) -1; 2790 h->needs_plt = 0; 2791 } 2792 2793 if (h->got.refcount > 0) 2794 { 2795 asection *sgot; 2796 bfd_boolean dyn; 2797 unsigned char tls_type; 2798 2799 /* Make sure this symbol is output as a dynamic symbol. 2800 Undefined weak syms won't yet be marked as dynamic. */ 2801 if (h->dynindx == -1 2802 && !h->forced_local) 2803 { 2804 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2805 return FALSE; 2806 } 2807 2808 sgot = htab->root.sgot; 2809 2810 h->got.offset = sgot->size; 2811 2812 tls_type = ((struct elf_or1k_link_hash_entry *) h)->tls_type; 2813 2814 dyn = htab->root.dynamic_sections_created; 2815 dyn = WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h); 2816 or1k_set_got_and_rela_sizes (tls_type, dyn, 2817 &sgot->size, &htab->root.srelgot->size); 2818 } 2819 else 2820 h->got.offset = (bfd_vma) -1; 2821 2822 if (h->dyn_relocs == NULL) 2823 return TRUE; 2824 2825 /* In the shared -Bsymbolic case, discard space allocated for 2826 dynamic pc-relative relocs against symbols which turn out to be 2827 defined in regular objects. For the normal shared case, discard 2828 space for pc-relative relocs that have become local due to symbol 2829 visibility changes. */ 2830 2831 if (bfd_link_pic (info)) 2832 { 2833 if (SYMBOL_CALLS_LOCAL (info, h)) 2834 { 2835 struct elf_dyn_relocs **pp; 2836 2837 for (pp = &h->dyn_relocs; (sec_relocs = *pp) != NULL;) 2838 { 2839 sec_relocs->count -= sec_relocs->pc_count; 2840 sec_relocs->pc_count = 0; 2841 if (sec_relocs->count == 0) 2842 *pp = sec_relocs->next; 2843 else 2844 pp = &sec_relocs->next; 2845 } 2846 } 2847 2848 /* Also discard relocs on undefined weak syms with non-default 2849 visibility. */ 2850 if (h->dyn_relocs != NULL 2851 && h->root.type == bfd_link_hash_undefweak) 2852 { 2853 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT) 2854 h->dyn_relocs = NULL; 2855 2856 /* Make sure undefined weak symbols are output as a dynamic 2857 symbol in PIEs. */ 2858 else if (h->dynindx == -1 2859 && !h->forced_local) 2860 { 2861 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2862 return FALSE; 2863 } 2864 } 2865 } 2866 else 2867 { 2868 /* For the non-shared case, discard space for relocs against 2869 symbols which turn out to need copy relocs or are not 2870 dynamic. */ 2871 2872 if (!h->non_got_ref 2873 && ((h->def_dynamic 2874 && !h->def_regular) 2875 || (htab->root.dynamic_sections_created 2876 && (h->root.type == bfd_link_hash_undefweak 2877 || h->root.type == bfd_link_hash_undefined)))) 2878 { 2879 /* Make sure this symbol is output as a dynamic symbol. 2880 Undefined weak syms won't yet be marked as dynamic. */ 2881 if (h->dynindx == -1 2882 && !h->forced_local) 2883 { 2884 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2885 return FALSE; 2886 } 2887 2888 /* If that succeeded, we know we'll be keeping all the 2889 relocs. */ 2890 if (h->dynindx != -1) 2891 goto keep; 2892 } 2893 2894 h->dyn_relocs = NULL; 2895 2896 keep: ; 2897 } 2898 2899 /* Finally, allocate space. */ 2900 for (sec_relocs = h->dyn_relocs; 2901 sec_relocs != NULL; 2902 sec_relocs = sec_relocs->next) 2903 { 2904 asection *sreloc = elf_section_data (sec_relocs->sec)->sreloc; 2905 sreloc->size += sec_relocs->count * sizeof (Elf32_External_Rela); 2906 } 2907 2908 return TRUE; 2909 } 2910 2911 /* Set the sizes of the dynamic sections. */ 2912 2913 static bfd_boolean 2914 or1k_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED, 2915 struct bfd_link_info *info) 2916 { 2917 struct elf_or1k_link_hash_table *htab; 2918 bfd *dynobj; 2919 asection *s; 2920 bfd_boolean relocs; 2921 bfd *ibfd; 2922 2923 htab = or1k_elf_hash_table (info); 2924 if (htab == NULL) 2925 return FALSE; 2926 2927 dynobj = htab->root.dynobj; 2928 BFD_ASSERT (dynobj != NULL); 2929 2930 if (htab->root.dynamic_sections_created) 2931 { 2932 /* Set the contents of the .interp section to the interpreter. */ 2933 if (bfd_link_executable (info) && !info->nointerp) 2934 { 2935 s = bfd_get_section_by_name (dynobj, ".interp"); 2936 BFD_ASSERT (s != NULL); 2937 s->size = sizeof ELF_DYNAMIC_INTERPRETER; 2938 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER; 2939 } 2940 } 2941 2942 /* Set up .got offsets for local syms, and space for local dynamic 2943 relocs. */ 2944 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 2945 { 2946 bfd_signed_vma *local_got; 2947 bfd_signed_vma *end_local_got; 2948 bfd_size_type locsymcount; 2949 Elf_Internal_Shdr *symtab_hdr; 2950 unsigned char *local_tls_type; 2951 asection *srel; 2952 2953 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour) 2954 continue; 2955 2956 for (s = ibfd->sections; s != NULL; s = s->next) 2957 { 2958 struct elf_dyn_relocs *sec_relocs; 2959 2960 for (sec_relocs = ((struct elf_dyn_relocs *) 2961 elf_section_data (s)->local_dynrel); 2962 sec_relocs != NULL; 2963 sec_relocs = sec_relocs->next) 2964 { 2965 if (! bfd_is_abs_section (sec_relocs->sec) 2966 && bfd_is_abs_section (sec_relocs->sec->output_section)) 2967 { 2968 /* Input section has been discarded, either because 2969 it is a copy of a linkonce section or due to 2970 linker script /DISCARD/, so we'll be discarding 2971 the relocs too. */ 2972 } 2973 else if (sec_relocs->count != 0) 2974 { 2975 srel = elf_section_data (sec_relocs->sec)->sreloc; 2976 srel->size += sec_relocs->count 2977 * sizeof (Elf32_External_Rela); 2978 if ((sec_relocs->sec->output_section->flags & SEC_READONLY) 2979 != 0) 2980 info->flags |= DF_TEXTREL; 2981 } 2982 } 2983 } 2984 2985 local_got = elf_local_got_refcounts (ibfd); 2986 if (!local_got) 2987 continue; 2988 2989 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr; 2990 locsymcount = symtab_hdr->sh_info; 2991 end_local_got = local_got + locsymcount; 2992 s = htab->root.sgot; 2993 srel = htab->root.srelgot; 2994 local_tls_type = (unsigned char *) elf_or1k_local_tls_type (ibfd); 2995 for (; local_got < end_local_got; ++local_got) 2996 { 2997 if (*local_got > 0) 2998 { 2999 unsigned char tls_type = (local_tls_type == NULL) 3000 ? TLS_UNKNOWN 3001 : *local_tls_type; 3002 3003 *local_got = s->size; 3004 or1k_set_got_and_rela_sizes (tls_type, bfd_link_pic (info), 3005 &s->size, &srel->size); 3006 } 3007 else 3008 3009 *local_got = (bfd_vma) -1; 3010 3011 if (local_tls_type) 3012 ++local_tls_type; 3013 } 3014 } 3015 3016 /* Allocate global sym .plt and .got entries, and space for global 3017 sym dynamic relocs. */ 3018 elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info); 3019 3020 /* We now have determined the sizes of the various dynamic sections. 3021 Allocate memory for them. */ 3022 relocs = FALSE; 3023 for (s = dynobj->sections; s != NULL; s = s->next) 3024 { 3025 if ((s->flags & SEC_LINKER_CREATED) == 0) 3026 continue; 3027 3028 if (s == htab->root.splt 3029 || s == htab->root.sgot 3030 || s == htab->root.sgotplt 3031 || s == htab->root.sdynbss 3032 || s == htab->root.sdynrelro) 3033 { 3034 /* Strip this section if we don't need it; see the 3035 comment below. */ 3036 } 3037 else if (CONST_STRNEQ (bfd_section_name (s), ".rela")) 3038 { 3039 if (s->size != 0 && s != htab->root.srelplt) 3040 relocs = TRUE; 3041 3042 /* We use the reloc_count field as a counter if we need 3043 to copy relocs into the output file. */ 3044 s->reloc_count = 0; 3045 } 3046 else 3047 /* It's not one of our sections, so don't allocate space. */ 3048 continue; 3049 3050 if (s->size == 0) 3051 { 3052 /* If we don't need this section, strip it from the 3053 output file. This is mostly to handle .rela.bss and 3054 .rela.plt. We must create both sections in 3055 create_dynamic_sections, because they must be created 3056 before the linker maps input sections to output 3057 sections. The linker does that before 3058 adjust_dynamic_symbol is called, and it is that 3059 function which decides whether anything needs to go 3060 into these sections. */ 3061 s->flags |= SEC_EXCLUDE; 3062 continue; 3063 } 3064 3065 if ((s->flags & SEC_HAS_CONTENTS) == 0) 3066 continue; 3067 3068 /* Allocate memory for the section contents. We use bfd_zalloc 3069 here in case unused entries are not reclaimed before the 3070 section's contents are written out. This should not happen, 3071 but this way if it does, we get a R_OR1K_NONE reloc instead 3072 of garbage. */ 3073 s->contents = bfd_zalloc (dynobj, s->size); 3074 3075 if (s->contents == NULL) 3076 return FALSE; 3077 } 3078 3079 return _bfd_elf_add_dynamic_tags (output_bfd, info, relocs); 3080 } 3081 3082 /* Copy the extra info we tack onto an elf_link_hash_entry. */ 3083 3084 static void 3085 or1k_elf_copy_indirect_symbol (struct bfd_link_info *info, 3086 struct elf_link_hash_entry *dir, 3087 struct elf_link_hash_entry *ind) 3088 { 3089 struct elf_or1k_link_hash_entry * edir; 3090 struct elf_or1k_link_hash_entry * eind; 3091 3092 edir = (struct elf_or1k_link_hash_entry *) dir; 3093 eind = (struct elf_or1k_link_hash_entry *) ind; 3094 3095 if (ind->root.type == bfd_link_hash_indirect) 3096 { 3097 if (dir->got.refcount <= 0) 3098 { 3099 edir->tls_type = eind->tls_type; 3100 eind->tls_type = TLS_UNKNOWN; 3101 } 3102 } 3103 3104 _bfd_elf_link_hash_copy_indirect (info, dir, ind); 3105 } 3106 3107 /* Set the right machine number. */ 3108 3109 static bfd_boolean 3110 or1k_elf_object_p (bfd *abfd) 3111 { 3112 unsigned long mach = bfd_mach_or1k; 3113 3114 if (elf_elfheader (abfd)->e_flags & EF_OR1K_NODELAY) 3115 mach = bfd_mach_or1knd; 3116 3117 return bfd_default_set_arch_mach (abfd, bfd_arch_or1k, mach); 3118 } 3119 3120 /* Store the machine number in the flags field. */ 3121 3122 static bfd_boolean 3123 or1k_elf_final_write_processing (bfd *abfd) 3124 { 3125 switch (bfd_get_mach (abfd)) 3126 { 3127 default: 3128 case bfd_mach_or1k: 3129 break; 3130 case bfd_mach_or1knd: 3131 elf_elfheader (abfd)->e_flags |= EF_OR1K_NODELAY; 3132 break; 3133 } 3134 return _bfd_elf_final_write_processing (abfd); 3135 } 3136 3137 static bfd_boolean 3138 or1k_elf_set_private_flags (bfd *abfd, flagword flags) 3139 { 3140 BFD_ASSERT (!elf_flags_init (abfd) 3141 || elf_elfheader (abfd)->e_flags == flags); 3142 3143 elf_elfheader (abfd)->e_flags = flags; 3144 elf_flags_init (abfd) = TRUE; 3145 return TRUE; 3146 } 3147 3148 /* Make sure all input files are consistent with respect to 3149 EF_OR1K_NODELAY flag setting. */ 3150 3151 static bfd_boolean 3152 elf32_or1k_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info) 3153 { 3154 bfd *obfd = info->output_bfd; 3155 flagword out_flags; 3156 flagword in_flags; 3157 3158 in_flags = elf_elfheader (ibfd)->e_flags; 3159 out_flags = elf_elfheader (obfd)->e_flags; 3160 3161 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour 3162 || bfd_get_flavour (obfd) != bfd_target_elf_flavour) 3163 return TRUE; 3164 3165 if (!elf_flags_init (obfd)) 3166 { 3167 elf_flags_init (obfd) = TRUE; 3168 elf_elfheader (obfd)->e_flags = in_flags; 3169 3170 return TRUE; 3171 } 3172 3173 if (in_flags == out_flags) 3174 return TRUE; 3175 3176 if ((in_flags & EF_OR1K_NODELAY) != (out_flags & EF_OR1K_NODELAY)) 3177 { 3178 _bfd_error_handler 3179 (_("%pB: %s flag mismatch with previous modules"), 3180 ibfd, "EF_OR1K_NODELAY"); 3181 3182 bfd_set_error (bfd_error_bad_value); 3183 return FALSE; 3184 } 3185 3186 return TRUE; 3187 3188 } 3189 3190 /* Implement elf_backend_grok_prstatus: 3191 Support for core dump NOTE sections. */ 3192 static bfd_boolean 3193 or1k_grok_prstatus (bfd *abfd, Elf_Internal_Note *note) 3194 { 3195 int offset; 3196 size_t size; 3197 3198 switch (note->descsz) 3199 { 3200 default: 3201 return FALSE; 3202 3203 case 212: /* Linux/OpenRISC */ 3204 /* pr_cursig */ 3205 elf_tdata (abfd)->core->signal = bfd_get_16 (abfd, note->descdata + 12); 3206 3207 /* pr_pid */ 3208 elf_tdata (abfd)->core->pid = bfd_get_32 (abfd, note->descdata + 24); 3209 3210 /* pr_reg */ 3211 offset = 72; 3212 size = 132; 3213 3214 break; 3215 } 3216 3217 /* Make a ".reg/999" section. */ 3218 return _bfd_elfcore_make_pseudosection (abfd, ".reg", 3219 size, note->descpos + offset); 3220 } 3221 3222 /* Implement elf_backend_grok_psinfo. */ 3223 static bfd_boolean 3224 or1k_grok_psinfo (bfd *abfd, Elf_Internal_Note *note) 3225 { 3226 switch (note->descsz) 3227 { 3228 default: 3229 return FALSE; 3230 3231 case 128: /* Linux/OpenRISC elf_prpsinfo */ 3232 elf_tdata (abfd)->core->program 3233 = _bfd_elfcore_strndup (abfd, note->descdata + 32, 16); 3234 elf_tdata (abfd)->core->command 3235 = _bfd_elfcore_strndup (abfd, note->descdata + 48, 80); 3236 } 3237 3238 return TRUE; 3239 } 3240 3241 3242 #define ELF_ARCH bfd_arch_or1k 3243 #define ELF_MACHINE_CODE EM_OR1K 3244 #define ELF_TARGET_ID OR1K_ELF_DATA 3245 #define ELF_MAXPAGESIZE 0x2000 3246 3247 #define TARGET_BIG_SYM or1k_elf32_vec 3248 #define TARGET_BIG_NAME "elf32-or1k" 3249 3250 #define elf_info_to_howto_rel NULL 3251 #define elf_info_to_howto or1k_info_to_howto_rela 3252 #define elf_backend_relocate_section or1k_elf_relocate_section 3253 #define elf_backend_gc_mark_hook or1k_elf_gc_mark_hook 3254 #define elf_backend_check_relocs or1k_elf_check_relocs 3255 #define elf_backend_reloc_type_class or1k_elf_reloc_type_class 3256 #define elf_backend_can_gc_sections 1 3257 #define elf_backend_rela_normal 1 3258 3259 #define bfd_elf32_mkobject elf_or1k_mkobject 3260 3261 #define bfd_elf32_bfd_merge_private_bfd_data elf32_or1k_merge_private_bfd_data 3262 #define bfd_elf32_bfd_set_private_flags or1k_elf_set_private_flags 3263 #define bfd_elf32_bfd_reloc_type_lookup or1k_reloc_type_lookup 3264 #define bfd_elf32_bfd_reloc_name_lookup or1k_reloc_name_lookup 3265 3266 #define elf_backend_object_p or1k_elf_object_p 3267 #define elf_backend_final_write_processing or1k_elf_final_write_processing 3268 #define elf_backend_can_refcount 1 3269 3270 #define elf_backend_plt_readonly 1 3271 #define elf_backend_want_got_plt 1 3272 #define elf_backend_want_plt_sym 0 3273 #define elf_backend_got_header_size 12 3274 #define elf_backend_dtrel_excludes_plt 1 3275 #define elf_backend_want_dynrelro 1 3276 3277 #define bfd_elf32_bfd_link_hash_table_create or1k_elf_link_hash_table_create 3278 #define elf_backend_copy_indirect_symbol or1k_elf_copy_indirect_symbol 3279 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections 3280 #define elf_backend_finish_dynamic_sections or1k_elf_finish_dynamic_sections 3281 #define elf_backend_size_dynamic_sections or1k_elf_size_dynamic_sections 3282 #define elf_backend_adjust_dynamic_symbol or1k_elf_adjust_dynamic_symbol 3283 #define elf_backend_finish_dynamic_symbol or1k_elf_finish_dynamic_symbol 3284 3285 #define elf_backend_grok_prstatus or1k_grok_prstatus 3286 #define elf_backend_grok_psinfo or1k_grok_psinfo 3287 3288 #include "elf32-target.h" 3289