1 /* Xilinx MicroBlaze-specific support for 32-bit ELF 2 3 Copyright (C) 2009-2015 Free Software Foundation, Inc. 4 5 This file is part of BFD, the Binary File Descriptor library. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 3 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the 19 Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor, 20 Boston, MA 02110-1301, USA. */ 21 22 23 int dbg = 0; 24 25 #include "sysdep.h" 26 #include "bfd.h" 27 #include "bfdlink.h" 28 #include "libbfd.h" 29 #include "elf-bfd.h" 30 #include "elf/microblaze.h" 31 #include <assert.h> 32 33 #define USE_RELA /* Only USE_REL is actually significant, but this is 34 here are a reminder... */ 35 #define INST_WORD_SIZE 4 36 37 static int ro_small_data_pointer = 0; 38 static int rw_small_data_pointer = 0; 39 40 static reloc_howto_type * microblaze_elf_howto_table [(int) R_MICROBLAZE_max]; 41 42 static reloc_howto_type microblaze_elf_howto_raw[] = 43 { 44 /* This reloc does nothing. */ 45 HOWTO (R_MICROBLAZE_NONE, /* Type. */ 46 0, /* Rightshift. */ 47 3, /* Size (0 = byte, 1 = short, 2 = long). */ 48 0, /* Bitsize. */ 49 FALSE, /* PC_relative. */ 50 0, /* Bitpos. */ 51 complain_overflow_dont, /* Complain on overflow. */ 52 NULL, /* Special Function. */ 53 "R_MICROBLAZE_NONE", /* Name. */ 54 FALSE, /* Partial Inplace. */ 55 0, /* Source Mask. */ 56 0, /* Dest Mask. */ 57 FALSE), /* PC relative offset? */ 58 59 /* A standard 32 bit relocation. */ 60 HOWTO (R_MICROBLAZE_32, /* Type. */ 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_bitfield, /* Complain on overflow. */ 67 bfd_elf_generic_reloc,/* Special Function. */ 68 "R_MICROBLAZE_32", /* Name. */ 69 FALSE, /* Partial Inplace. */ 70 0, /* Source Mask. */ 71 0xffffffff, /* Dest Mask. */ 72 FALSE), /* PC relative offset? */ 73 74 /* A standard PCREL 32 bit relocation. */ 75 HOWTO (R_MICROBLAZE_32_PCREL,/* Type. */ 76 0, /* Rightshift. */ 77 2, /* Size (0 = byte, 1 = short, 2 = long). */ 78 32, /* Bitsize. */ 79 TRUE, /* PC_relative. */ 80 0, /* Bitpos. */ 81 complain_overflow_bitfield, /* Complain on overflow. */ 82 bfd_elf_generic_reloc,/* Special Function. */ 83 "R_MICROBLAZE_32_PCREL", /* Name. */ 84 TRUE, /* Partial Inplace. */ 85 0, /* Source Mask. */ 86 0xffffffff, /* Dest Mask. */ 87 TRUE), /* PC relative offset? */ 88 89 /* A 64 bit PCREL relocation. Table-entry not really used. */ 90 HOWTO (R_MICROBLAZE_64_PCREL,/* Type. */ 91 0, /* Rightshift. */ 92 2, /* Size (0 = byte, 1 = short, 2 = long). */ 93 16, /* Bitsize. */ 94 TRUE, /* PC_relative. */ 95 0, /* Bitpos. */ 96 complain_overflow_dont, /* Complain on overflow. */ 97 bfd_elf_generic_reloc,/* Special Function. */ 98 "R_MICROBLAZE_64_PCREL", /* Name. */ 99 FALSE, /* Partial Inplace. */ 100 0, /* Source Mask. */ 101 0x0000ffff, /* Dest Mask. */ 102 TRUE), /* PC relative offset? */ 103 104 /* The low half of a PCREL 32 bit relocation. */ 105 HOWTO (R_MICROBLAZE_32_PCREL_LO, /* Type. */ 106 0, /* Rightshift. */ 107 2, /* Size (0 = byte, 1 = short, 2 = long). */ 108 16, /* Bitsize. */ 109 TRUE, /* PC_relative. */ 110 0, /* Bitpos. */ 111 complain_overflow_signed, /* Complain on overflow. */ 112 bfd_elf_generic_reloc, /* Special Function. */ 113 "R_MICROBLAZE_32_PCREL_LO", /* Name. */ 114 FALSE, /* Partial Inplace. */ 115 0, /* Source Mask. */ 116 0x0000ffff, /* Dest Mask. */ 117 TRUE), /* PC relative offset? */ 118 119 /* A 64 bit relocation. Table entry not really used. */ 120 HOWTO (R_MICROBLAZE_64, /* Type. */ 121 0, /* Rightshift. */ 122 2, /* Size (0 = byte, 1 = short, 2 = long). */ 123 16, /* Bitsize. */ 124 FALSE, /* PC_relative. */ 125 0, /* Bitpos. */ 126 complain_overflow_dont, /* Complain on overflow. */ 127 bfd_elf_generic_reloc,/* Special Function. */ 128 "R_MICROBLAZE_64", /* Name. */ 129 FALSE, /* Partial Inplace. */ 130 0, /* Source Mask. */ 131 0x0000ffff, /* Dest Mask. */ 132 FALSE), /* PC relative offset? */ 133 134 /* The low half of a 32 bit relocation. */ 135 HOWTO (R_MICROBLAZE_32_LO, /* Type. */ 136 0, /* Rightshift. */ 137 2, /* Size (0 = byte, 1 = short, 2 = long). */ 138 16, /* Bitsize. */ 139 FALSE, /* PC_relative. */ 140 0, /* Bitpos. */ 141 complain_overflow_signed, /* Complain on overflow. */ 142 bfd_elf_generic_reloc,/* Special Function. */ 143 "R_MICROBLAZE_32_LO", /* Name. */ 144 FALSE, /* Partial Inplace. */ 145 0, /* Source Mask. */ 146 0x0000ffff, /* Dest Mask. */ 147 FALSE), /* PC relative offset? */ 148 149 /* Read-only small data section relocation. */ 150 HOWTO (R_MICROBLAZE_SRO32, /* Type. */ 151 0, /* Rightshift. */ 152 2, /* Size (0 = byte, 1 = short, 2 = long). */ 153 16, /* Bitsize. */ 154 FALSE, /* PC_relative. */ 155 0, /* Bitpos. */ 156 complain_overflow_bitfield, /* Complain on overflow. */ 157 bfd_elf_generic_reloc,/* Special Function. */ 158 "R_MICROBLAZE_SRO32", /* Name. */ 159 FALSE, /* Partial Inplace. */ 160 0, /* Source Mask. */ 161 0x0000ffff, /* Dest Mask. */ 162 FALSE), /* PC relative offset? */ 163 164 /* Read-write small data area relocation. */ 165 HOWTO (R_MICROBLAZE_SRW32, /* Type. */ 166 0, /* Rightshift. */ 167 2, /* Size (0 = byte, 1 = short, 2 = long). */ 168 16, /* Bitsize. */ 169 FALSE, /* PC_relative. */ 170 0, /* Bitpos. */ 171 complain_overflow_bitfield, /* Complain on overflow. */ 172 bfd_elf_generic_reloc,/* Special Function. */ 173 "R_MICROBLAZE_SRW32", /* Name. */ 174 FALSE, /* Partial Inplace. */ 175 0, /* Source Mask. */ 176 0x0000ffff, /* Dest Mask. */ 177 FALSE), /* PC relative offset? */ 178 179 /* This reloc does nothing. Used for relaxation. */ 180 HOWTO (R_MICROBLAZE_64_NONE, /* Type. */ 181 0, /* Rightshift. */ 182 3, /* Size (0 = byte, 1 = short, 2 = long). */ 183 0, /* Bitsize. */ 184 TRUE, /* PC_relative. */ 185 0, /* Bitpos. */ 186 complain_overflow_dont, /* Complain on overflow. */ 187 NULL, /* Special Function. */ 188 "R_MICROBLAZE_64_NONE",/* Name. */ 189 FALSE, /* Partial Inplace. */ 190 0, /* Source Mask. */ 191 0, /* Dest Mask. */ 192 FALSE), /* PC relative offset? */ 193 194 /* Symbol Op Symbol relocation. */ 195 HOWTO (R_MICROBLAZE_32_SYM_OP_SYM, /* Type. */ 196 0, /* Rightshift. */ 197 2, /* Size (0 = byte, 1 = short, 2 = long). */ 198 32, /* Bitsize. */ 199 FALSE, /* PC_relative. */ 200 0, /* Bitpos. */ 201 complain_overflow_bitfield, /* Complain on overflow. */ 202 bfd_elf_generic_reloc,/* Special Function. */ 203 "R_MICROBLAZE_32_SYM_OP_SYM", /* Name. */ 204 FALSE, /* Partial Inplace. */ 205 0, /* Source Mask. */ 206 0xffffffff, /* Dest Mask. */ 207 FALSE), /* PC relative offset? */ 208 209 /* GNU extension to record C++ vtable hierarchy. */ 210 HOWTO (R_MICROBLAZE_GNU_VTINHERIT, /* Type. */ 211 0, /* Rightshift. */ 212 2, /* Size (0 = byte, 1 = short, 2 = long). */ 213 0, /* Bitsize. */ 214 FALSE, /* PC_relative. */ 215 0, /* Bitpos. */ 216 complain_overflow_dont,/* Complain on overflow. */ 217 NULL, /* Special Function. */ 218 "R_MICROBLAZE_GNU_VTINHERIT", /* Name. */ 219 FALSE, /* Partial Inplace. */ 220 0, /* Source Mask. */ 221 0, /* Dest Mask. */ 222 FALSE), /* PC relative offset? */ 223 224 /* GNU extension to record C++ vtable member usage. */ 225 HOWTO (R_MICROBLAZE_GNU_VTENTRY, /* Type. */ 226 0, /* Rightshift. */ 227 2, /* Size (0 = byte, 1 = short, 2 = long). */ 228 0, /* Bitsize. */ 229 FALSE, /* PC_relative. */ 230 0, /* Bitpos. */ 231 complain_overflow_dont,/* Complain on overflow. */ 232 _bfd_elf_rel_vtable_reloc_fn, /* Special Function. */ 233 "R_MICROBLAZE_GNU_VTENTRY", /* Name. */ 234 FALSE, /* Partial Inplace. */ 235 0, /* Source Mask. */ 236 0, /* Dest Mask. */ 237 FALSE), /* PC relative offset? */ 238 239 /* A 64 bit GOTPC relocation. Table-entry not really used. */ 240 HOWTO (R_MICROBLAZE_GOTPC_64, /* Type. */ 241 0, /* Rightshift. */ 242 2, /* Size (0 = byte, 1 = short, 2 = long). */ 243 16, /* Bitsize. */ 244 TRUE, /* PC_relative. */ 245 0, /* Bitpos. */ 246 complain_overflow_dont, /* Complain on overflow. */ 247 bfd_elf_generic_reloc, /* Special Function. */ 248 "R_MICROBLAZE_GOTPC_64", /* Name. */ 249 FALSE, /* Partial Inplace. */ 250 0, /* Source Mask. */ 251 0x0000ffff, /* Dest Mask. */ 252 TRUE), /* PC relative offset? */ 253 254 /* A 64 bit GOT relocation. Table-entry not really used. */ 255 HOWTO (R_MICROBLAZE_GOT_64, /* Type. */ 256 0, /* Rightshift. */ 257 2, /* Size (0 = byte, 1 = short, 2 = long). */ 258 16, /* Bitsize. */ 259 FALSE, /* PC_relative. */ 260 0, /* Bitpos. */ 261 complain_overflow_dont, /* Complain on overflow. */ 262 bfd_elf_generic_reloc,/* Special Function. */ 263 "R_MICROBLAZE_GOT_64",/* Name. */ 264 FALSE, /* Partial Inplace. */ 265 0, /* Source Mask. */ 266 0x0000ffff, /* Dest Mask. */ 267 FALSE), /* PC relative offset? */ 268 269 /* A 64 bit PLT relocation. Table-entry not really used. */ 270 HOWTO (R_MICROBLAZE_PLT_64, /* Type. */ 271 0, /* Rightshift. */ 272 2, /* Size (0 = byte, 1 = short, 2 = long). */ 273 16, /* Bitsize. */ 274 TRUE, /* PC_relative. */ 275 0, /* Bitpos. */ 276 complain_overflow_dont, /* Complain on overflow. */ 277 bfd_elf_generic_reloc,/* Special Function. */ 278 "R_MICROBLAZE_PLT_64",/* Name. */ 279 FALSE, /* Partial Inplace. */ 280 0, /* Source Mask. */ 281 0x0000ffff, /* Dest Mask. */ 282 TRUE), /* PC relative offset? */ 283 284 /* Table-entry not really used. */ 285 HOWTO (R_MICROBLAZE_REL, /* Type. */ 286 0, /* Rightshift. */ 287 2, /* Size (0 = byte, 1 = short, 2 = long). */ 288 16, /* Bitsize. */ 289 TRUE, /* PC_relative. */ 290 0, /* Bitpos. */ 291 complain_overflow_dont, /* Complain on overflow. */ 292 bfd_elf_generic_reloc,/* Special Function. */ 293 "R_MICROBLAZE_REL", /* Name. */ 294 FALSE, /* Partial Inplace. */ 295 0, /* Source Mask. */ 296 0x0000ffff, /* Dest Mask. */ 297 TRUE), /* PC relative offset? */ 298 299 /* Table-entry not really used. */ 300 HOWTO (R_MICROBLAZE_JUMP_SLOT,/* Type. */ 301 0, /* Rightshift. */ 302 2, /* Size (0 = byte, 1 = short, 2 = long). */ 303 16, /* Bitsize. */ 304 TRUE, /* PC_relative. */ 305 0, /* Bitpos. */ 306 complain_overflow_dont, /* Complain on overflow. */ 307 bfd_elf_generic_reloc,/* Special Function. */ 308 "R_MICROBLAZE_JUMP_SLOT", /* Name. */ 309 FALSE, /* Partial Inplace. */ 310 0, /* Source Mask. */ 311 0x0000ffff, /* Dest Mask. */ 312 TRUE), /* PC relative offset? */ 313 314 /* Table-entry not really used. */ 315 HOWTO (R_MICROBLAZE_GLOB_DAT,/* Type. */ 316 0, /* Rightshift. */ 317 2, /* Size (0 = byte, 1 = short, 2 = long). */ 318 16, /* Bitsize. */ 319 TRUE, /* PC_relative. */ 320 0, /* Bitpos. */ 321 complain_overflow_dont, /* Complain on overflow. */ 322 bfd_elf_generic_reloc,/* Special Function. */ 323 "R_MICROBLAZE_GLOB_DAT", /* Name. */ 324 FALSE, /* Partial Inplace. */ 325 0, /* Source Mask. */ 326 0x0000ffff, /* Dest Mask. */ 327 TRUE), /* PC relative offset? */ 328 329 /* A 64 bit GOT relative relocation. Table-entry not really used. */ 330 HOWTO (R_MICROBLAZE_GOTOFF_64, /* Type. */ 331 0, /* Rightshift. */ 332 2, /* Size (0 = byte, 1 = short, 2 = long). */ 333 16, /* Bitsize. */ 334 FALSE, /* PC_relative. */ 335 0, /* Bitpos. */ 336 complain_overflow_dont, /* Complain on overflow. */ 337 bfd_elf_generic_reloc,/* Special Function. */ 338 "R_MICROBLAZE_GOTOFF_64", /* Name. */ 339 FALSE, /* Partial Inplace. */ 340 0, /* Source Mask. */ 341 0x0000ffff, /* Dest Mask. */ 342 FALSE), /* PC relative offset? */ 343 344 /* A 32 bit GOT relative relocation. Table-entry not really used. */ 345 HOWTO (R_MICROBLAZE_GOTOFF_32, /* Type. */ 346 0, /* Rightshift. */ 347 2, /* Size (0 = byte, 1 = short, 2 = long). */ 348 16, /* Bitsize. */ 349 FALSE, /* PC_relative. */ 350 0, /* Bitpos. */ 351 complain_overflow_dont, /* Complain on overflow. */ 352 bfd_elf_generic_reloc, /* Special Function. */ 353 "R_MICROBLAZE_GOTOFF_32", /* Name. */ 354 FALSE, /* Partial Inplace. */ 355 0, /* Source Mask. */ 356 0x0000ffff, /* Dest Mask. */ 357 FALSE), /* PC relative offset? */ 358 359 /* COPY relocation. Table-entry not really used. */ 360 HOWTO (R_MICROBLAZE_COPY, /* Type. */ 361 0, /* Rightshift. */ 362 2, /* Size (0 = byte, 1 = short, 2 = long). */ 363 16, /* Bitsize. */ 364 FALSE, /* PC_relative. */ 365 0, /* Bitpos. */ 366 complain_overflow_dont, /* Complain on overflow. */ 367 bfd_elf_generic_reloc,/* Special Function. */ 368 "R_MICROBLAZE_COPY", /* Name. */ 369 FALSE, /* Partial Inplace. */ 370 0, /* Source Mask. */ 371 0x0000ffff, /* Dest Mask. */ 372 FALSE), /* PC relative offset? */ 373 374 /* Marker relocs for TLS. */ 375 HOWTO (R_MICROBLAZE_TLS, 376 0, /* rightshift */ 377 2, /* size (0 = byte, 1 = short, 2 = long) */ 378 32, /* bitsize */ 379 FALSE, /* pc_relative */ 380 0, /* bitpos */ 381 complain_overflow_dont, /* complain_on_overflow */ 382 bfd_elf_generic_reloc, /* special_function */ 383 "R_MICROBLAZE_TLS", /* name */ 384 FALSE, /* partial_inplace */ 385 0, /* src_mask */ 386 0x0000ffff, /* dst_mask */ 387 FALSE), /* pcrel_offset */ 388 389 HOWTO (R_MICROBLAZE_TLSGD, 390 0, /* rightshift */ 391 2, /* size (0 = byte, 1 = short, 2 = long) */ 392 32, /* bitsize */ 393 FALSE, /* pc_relative */ 394 0, /* bitpos */ 395 complain_overflow_dont, /* complain_on_overflow */ 396 bfd_elf_generic_reloc, /* special_function */ 397 "R_MICROBLAZE_TLSGD", /* name */ 398 FALSE, /* partial_inplace */ 399 0, /* src_mask */ 400 0x0000ffff, /* dst_mask */ 401 FALSE), /* pcrel_offset */ 402 403 HOWTO (R_MICROBLAZE_TLSLD, 404 0, /* rightshift */ 405 2, /* size (0 = byte, 1 = short, 2 = long) */ 406 32, /* bitsize */ 407 FALSE, /* pc_relative */ 408 0, /* bitpos */ 409 complain_overflow_dont, /* complain_on_overflow */ 410 bfd_elf_generic_reloc, /* special_function */ 411 "R_MICROBLAZE_TLSLD", /* name */ 412 FALSE, /* partial_inplace */ 413 0, /* src_mask */ 414 0x0000ffff, /* dst_mask */ 415 FALSE), /* pcrel_offset */ 416 417 /* Computes the load module index of the load module that contains the 418 definition of its TLS sym. */ 419 HOWTO (R_MICROBLAZE_TLSDTPMOD32, 420 0, /* rightshift */ 421 2, /* size (0 = byte, 1 = short, 2 = long) */ 422 32, /* bitsize */ 423 FALSE, /* pc_relative */ 424 0, /* bitpos */ 425 complain_overflow_dont, /* complain_on_overflow */ 426 bfd_elf_generic_reloc, /* special_function */ 427 "R_MICROBLAZE_TLSDTPMOD32", /* name */ 428 FALSE, /* partial_inplace */ 429 0, /* src_mask */ 430 0x0000ffff, /* dst_mask */ 431 FALSE), /* pcrel_offset */ 432 433 /* Computes a dtv-relative displacement, the difference between the value 434 of sym+add and the base address of the thread-local storage block that 435 contains the definition of sym, minus 0x8000. Used for initializing GOT */ 436 HOWTO (R_MICROBLAZE_TLSDTPREL32, 437 0, /* rightshift */ 438 2, /* size (0 = byte, 1 = short, 2 = long) */ 439 32, /* bitsize */ 440 FALSE, /* pc_relative */ 441 0, /* bitpos */ 442 complain_overflow_dont, /* complain_on_overflow */ 443 bfd_elf_generic_reloc, /* special_function */ 444 "R_MICROBLAZE_TLSDTPREL32", /* name */ 445 FALSE, /* partial_inplace */ 446 0, /* src_mask */ 447 0x0000ffff, /* dst_mask */ 448 FALSE), /* pcrel_offset */ 449 450 /* Computes a dtv-relative displacement, the difference between the value 451 of sym+add and the base address of the thread-local storage block that 452 contains the definition of sym, minus 0x8000. */ 453 HOWTO (R_MICROBLAZE_TLSDTPREL64, 454 0, /* rightshift */ 455 2, /* size (0 = byte, 1 = short, 2 = long) */ 456 32, /* bitsize */ 457 FALSE, /* pc_relative */ 458 0, /* bitpos */ 459 complain_overflow_dont, /* complain_on_overflow */ 460 bfd_elf_generic_reloc, /* special_function */ 461 "R_MICROBLAZE_TLSDTPREL64", /* name */ 462 FALSE, /* partial_inplace */ 463 0, /* src_mask */ 464 0x0000ffff, /* dst_mask */ 465 FALSE), /* pcrel_offset */ 466 467 /* Computes a tp-relative displacement, the difference between the value of 468 sym+add and the value of the thread pointer (r13). */ 469 HOWTO (R_MICROBLAZE_TLSGOTTPREL32, 470 0, /* rightshift */ 471 2, /* size (0 = byte, 1 = short, 2 = long) */ 472 32, /* bitsize */ 473 FALSE, /* pc_relative */ 474 0, /* bitpos */ 475 complain_overflow_dont, /* complain_on_overflow */ 476 bfd_elf_generic_reloc, /* special_function */ 477 "R_MICROBLAZE_TLSGOTTPREL32", /* name */ 478 FALSE, /* partial_inplace */ 479 0, /* src_mask */ 480 0x0000ffff, /* dst_mask */ 481 FALSE), /* pcrel_offset */ 482 483 /* Computes a tp-relative displacement, the difference between the value of 484 sym+add and the value of the thread pointer (r13). */ 485 HOWTO (R_MICROBLAZE_TLSTPREL32, 486 0, /* rightshift */ 487 2, /* size (0 = byte, 1 = short, 2 = long) */ 488 32, /* bitsize */ 489 FALSE, /* pc_relative */ 490 0, /* bitpos */ 491 complain_overflow_dont, /* complain_on_overflow */ 492 bfd_elf_generic_reloc, /* special_function */ 493 "R_MICROBLAZE_TLSTPREL32", /* name */ 494 FALSE, /* partial_inplace */ 495 0, /* src_mask */ 496 0x0000ffff, /* dst_mask */ 497 FALSE), /* pcrel_offset */ 498 499 }; 500 501 #ifndef NUM_ELEM 502 #define NUM_ELEM(a) (sizeof (a) / sizeof (a)[0]) 503 #endif 504 505 /* Initialize the microblaze_elf_howto_table, so that linear accesses can be done. */ 506 507 static void 508 microblaze_elf_howto_init (void) 509 { 510 unsigned int i; 511 512 for (i = NUM_ELEM (microblaze_elf_howto_raw); i--;) 513 { 514 unsigned int type; 515 516 type = microblaze_elf_howto_raw[i].type; 517 518 BFD_ASSERT (type < NUM_ELEM (microblaze_elf_howto_table)); 519 520 microblaze_elf_howto_table [type] = & microblaze_elf_howto_raw [i]; 521 } 522 } 523 524 static reloc_howto_type * 525 microblaze_elf_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED, 526 bfd_reloc_code_real_type code) 527 { 528 enum elf_microblaze_reloc_type microblaze_reloc = R_MICROBLAZE_NONE; 529 530 switch (code) 531 { 532 case BFD_RELOC_NONE: 533 microblaze_reloc = R_MICROBLAZE_NONE; 534 break; 535 case BFD_RELOC_MICROBLAZE_64_NONE: 536 microblaze_reloc = R_MICROBLAZE_64_NONE; 537 break; 538 case BFD_RELOC_32: 539 microblaze_reloc = R_MICROBLAZE_32; 540 break; 541 /* RVA is treated the same as 32 */ 542 case BFD_RELOC_RVA: 543 microblaze_reloc = R_MICROBLAZE_32; 544 break; 545 case BFD_RELOC_32_PCREL: 546 microblaze_reloc = R_MICROBLAZE_32_PCREL; 547 break; 548 case BFD_RELOC_64_PCREL: 549 microblaze_reloc = R_MICROBLAZE_64_PCREL; 550 break; 551 case BFD_RELOC_MICROBLAZE_32_LO_PCREL: 552 microblaze_reloc = R_MICROBLAZE_32_PCREL_LO; 553 break; 554 case BFD_RELOC_64: 555 microblaze_reloc = R_MICROBLAZE_64; 556 break; 557 case BFD_RELOC_MICROBLAZE_32_LO: 558 microblaze_reloc = R_MICROBLAZE_32_LO; 559 break; 560 case BFD_RELOC_MICROBLAZE_32_ROSDA: 561 microblaze_reloc = R_MICROBLAZE_SRO32; 562 break; 563 case BFD_RELOC_MICROBLAZE_32_RWSDA: 564 microblaze_reloc = R_MICROBLAZE_SRW32; 565 break; 566 case BFD_RELOC_MICROBLAZE_32_SYM_OP_SYM: 567 microblaze_reloc = R_MICROBLAZE_32_SYM_OP_SYM; 568 break; 569 case BFD_RELOC_VTABLE_INHERIT: 570 microblaze_reloc = R_MICROBLAZE_GNU_VTINHERIT; 571 break; 572 case BFD_RELOC_VTABLE_ENTRY: 573 microblaze_reloc = R_MICROBLAZE_GNU_VTENTRY; 574 break; 575 case BFD_RELOC_MICROBLAZE_64_GOTPC: 576 microblaze_reloc = R_MICROBLAZE_GOTPC_64; 577 break; 578 case BFD_RELOC_MICROBLAZE_64_GOT: 579 microblaze_reloc = R_MICROBLAZE_GOT_64; 580 break; 581 case BFD_RELOC_MICROBLAZE_64_PLT: 582 microblaze_reloc = R_MICROBLAZE_PLT_64; 583 break; 584 case BFD_RELOC_MICROBLAZE_64_GOTOFF: 585 microblaze_reloc = R_MICROBLAZE_GOTOFF_64; 586 break; 587 case BFD_RELOC_MICROBLAZE_32_GOTOFF: 588 microblaze_reloc = R_MICROBLAZE_GOTOFF_32; 589 break; 590 case BFD_RELOC_MICROBLAZE_64_TLSGD: 591 microblaze_reloc = R_MICROBLAZE_TLSGD; 592 break; 593 case BFD_RELOC_MICROBLAZE_64_TLSLD: 594 microblaze_reloc = R_MICROBLAZE_TLSLD; 595 break; 596 case BFD_RELOC_MICROBLAZE_32_TLSDTPREL: 597 microblaze_reloc = R_MICROBLAZE_TLSDTPREL32; 598 break; 599 case BFD_RELOC_MICROBLAZE_64_TLSDTPREL: 600 microblaze_reloc = R_MICROBLAZE_TLSDTPREL64; 601 break; 602 case BFD_RELOC_MICROBLAZE_32_TLSDTPMOD: 603 microblaze_reloc = R_MICROBLAZE_TLSDTPMOD32; 604 break; 605 case BFD_RELOC_MICROBLAZE_64_TLSGOTTPREL: 606 microblaze_reloc = R_MICROBLAZE_TLSGOTTPREL32; 607 break; 608 case BFD_RELOC_MICROBLAZE_64_TLSTPREL: 609 microblaze_reloc = R_MICROBLAZE_TLSTPREL32; 610 break; 611 case BFD_RELOC_MICROBLAZE_COPY: 612 microblaze_reloc = R_MICROBLAZE_COPY; 613 break; 614 default: 615 return (reloc_howto_type *) NULL; 616 } 617 618 if (!microblaze_elf_howto_table [R_MICROBLAZE_32]) 619 /* Initialize howto table if needed. */ 620 microblaze_elf_howto_init (); 621 622 return microblaze_elf_howto_table [(int) microblaze_reloc]; 623 }; 624 625 static reloc_howto_type * 626 microblaze_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 627 const char *r_name) 628 { 629 unsigned int i; 630 631 for (i = 0; i < NUM_ELEM (microblaze_elf_howto_raw); i++) 632 if (microblaze_elf_howto_raw[i].name != NULL 633 && strcasecmp (microblaze_elf_howto_raw[i].name, r_name) == 0) 634 return µblaze_elf_howto_raw[i]; 635 636 return NULL; 637 } 638 639 /* Set the howto pointer for a RCE ELF reloc. */ 640 641 static void 642 microblaze_elf_info_to_howto (bfd * abfd ATTRIBUTE_UNUSED, 643 arelent * cache_ptr, 644 Elf_Internal_Rela * dst) 645 { 646 unsigned int r_type; 647 648 if (!microblaze_elf_howto_table [R_MICROBLAZE_32]) 649 /* Initialize howto table if needed. */ 650 microblaze_elf_howto_init (); 651 652 r_type = ELF32_R_TYPE (dst->r_info); 653 if (r_type >= R_MICROBLAZE_max) 654 { 655 (*_bfd_error_handler) (_("%B: unrecognised MicroBlaze reloc number: %d"), 656 abfd, r_type); 657 bfd_set_error (bfd_error_bad_value); 658 r_type = R_MICROBLAZE_NONE; 659 } 660 661 cache_ptr->howto = microblaze_elf_howto_table [r_type]; 662 } 663 664 /* Microblaze ELF local labels start with 'L.' or '$L', not '.L'. */ 665 666 static bfd_boolean 667 microblaze_elf_is_local_label_name (bfd *abfd, const char *name) 668 { 669 if (name[0] == 'L' && name[1] == '.') 670 return TRUE; 671 672 if (name[0] == '$' && name[1] == 'L') 673 return TRUE; 674 675 /* With gcc, the labels go back to starting with '.', so we accept 676 the generic ELF local label syntax as well. */ 677 return _bfd_elf_is_local_label_name (abfd, name); 678 } 679 680 /* The microblaze linker (like many others) needs to keep track of 681 the number of relocs that it decides to copy as dynamic relocs in 682 check_relocs for each symbol. This is so that it can later discard 683 them if they are found to be unnecessary. We store the information 684 in a field extending the regular ELF linker hash table. */ 685 686 struct elf32_mb_dyn_relocs 687 { 688 struct elf32_mb_dyn_relocs *next; 689 690 /* The input section of the reloc. */ 691 asection *sec; 692 693 /* Total number of relocs copied for the input section. */ 694 bfd_size_type count; 695 696 /* Number of pc-relative relocs copied for the input section. */ 697 bfd_size_type pc_count; 698 }; 699 700 /* ELF linker hash entry. */ 701 702 struct elf32_mb_link_hash_entry 703 { 704 struct elf_link_hash_entry elf; 705 706 /* Track dynamic relocs copied for this symbol. */ 707 struct elf32_mb_dyn_relocs *dyn_relocs; 708 709 /* TLS Reference Types for the symbol; Updated by check_relocs */ 710 #define TLS_GD 1 /* GD reloc. */ 711 #define TLS_LD 2 /* LD reloc. */ 712 #define TLS_TPREL 4 /* TPREL reloc, => IE. */ 713 #define TLS_DTPREL 8 /* DTPREL reloc, => LD. */ 714 #define TLS_TLS 16 /* Any TLS reloc. */ 715 unsigned char tls_mask; 716 717 }; 718 719 #define IS_TLS_GD(x) (x == (TLS_TLS | TLS_GD)) 720 #define IS_TLS_LD(x) (x == (TLS_TLS | TLS_LD)) 721 #define IS_TLS_DTPREL(x) (x == (TLS_TLS | TLS_DTPREL)) 722 #define IS_TLS_NONE(x) (x == 0) 723 724 #define elf32_mb_hash_entry(ent) ((struct elf32_mb_link_hash_entry *)(ent)) 725 726 /* ELF linker hash table. */ 727 728 struct elf32_mb_link_hash_table 729 { 730 struct elf_link_hash_table elf; 731 732 /* Short-cuts to get to dynamic linker sections. */ 733 asection *sgot; 734 asection *sgotplt; 735 asection *srelgot; 736 asection *splt; 737 asection *srelplt; 738 asection *sdynbss; 739 asection *srelbss; 740 741 /* Small local sym to section mapping cache. */ 742 struct sym_cache sym_sec; 743 744 /* TLS Local Dynamic GOT Entry */ 745 union { 746 bfd_signed_vma refcount; 747 bfd_vma offset; 748 } tlsld_got; 749 }; 750 751 /* Nonzero if this section has TLS related relocations. */ 752 #define has_tls_reloc sec_flg0 753 754 /* Get the ELF linker hash table from a link_info structure. */ 755 756 #define elf32_mb_hash_table(p) \ 757 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \ 758 == MICROBLAZE_ELF_DATA ? ((struct elf32_mb_link_hash_table *) ((p)->hash)) : NULL) 759 760 /* Create an entry in a microblaze ELF linker hash table. */ 761 762 static struct bfd_hash_entry * 763 link_hash_newfunc (struct bfd_hash_entry *entry, 764 struct bfd_hash_table *table, 765 const char *string) 766 { 767 /* Allocate the structure if it has not already been allocated by a 768 subclass. */ 769 if (entry == NULL) 770 { 771 entry = bfd_hash_allocate (table, 772 sizeof (struct elf32_mb_link_hash_entry)); 773 if (entry == NULL) 774 return entry; 775 } 776 777 /* Call the allocation method of the superclass. */ 778 entry = _bfd_elf_link_hash_newfunc (entry, table, string); 779 if (entry != NULL) 780 { 781 struct elf32_mb_link_hash_entry *eh; 782 783 eh = (struct elf32_mb_link_hash_entry *) entry; 784 eh->dyn_relocs = NULL; 785 eh->tls_mask = 0; 786 } 787 788 return entry; 789 } 790 791 /* Create a mb ELF linker hash table. */ 792 793 static struct bfd_link_hash_table * 794 microblaze_elf_link_hash_table_create (bfd *abfd) 795 { 796 struct elf32_mb_link_hash_table *ret; 797 bfd_size_type amt = sizeof (struct elf32_mb_link_hash_table); 798 799 ret = (struct elf32_mb_link_hash_table *) bfd_zmalloc (amt); 800 if (ret == NULL) 801 return NULL; 802 803 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc, 804 sizeof (struct elf32_mb_link_hash_entry), 805 MICROBLAZE_ELF_DATA)) 806 { 807 free (ret); 808 return NULL; 809 } 810 811 return &ret->elf.root; 812 } 813 814 /* Set the values of the small data pointers. */ 815 816 static void 817 microblaze_elf_final_sdp (struct bfd_link_info *info) 818 { 819 struct bfd_link_hash_entry *h; 820 821 h = bfd_link_hash_lookup (info->hash, RO_SDA_ANCHOR_NAME, FALSE, FALSE, TRUE); 822 if (h != (struct bfd_link_hash_entry *) NULL 823 && h->type == bfd_link_hash_defined) 824 ro_small_data_pointer = (h->u.def.value 825 + h->u.def.section->output_section->vma 826 + h->u.def.section->output_offset); 827 828 h = bfd_link_hash_lookup (info->hash, RW_SDA_ANCHOR_NAME, FALSE, FALSE, TRUE); 829 if (h != (struct bfd_link_hash_entry *) NULL 830 && h->type == bfd_link_hash_defined) 831 rw_small_data_pointer = (h->u.def.value 832 + h->u.def.section->output_section->vma 833 + h->u.def.section->output_offset); 834 } 835 836 static bfd_vma 837 dtprel_base (struct bfd_link_info *info) 838 { 839 /* If tls_sec is NULL, we should have signalled an error already. */ 840 if (elf_hash_table (info)->tls_sec == NULL) 841 return 0; 842 return elf_hash_table (info)->tls_sec->vma; 843 } 844 845 /* The size of the thread control block. */ 846 #define TCB_SIZE 8 847 848 /* Output a simple dynamic relocation into SRELOC. */ 849 850 static void 851 microblaze_elf_output_dynamic_relocation (bfd *output_bfd, 852 asection *sreloc, 853 unsigned long reloc_index, 854 unsigned long indx, 855 int r_type, 856 bfd_vma offset, 857 bfd_vma addend) 858 { 859 860 Elf_Internal_Rela rel; 861 862 rel.r_info = ELF32_R_INFO (indx, r_type); 863 rel.r_offset = offset; 864 rel.r_addend = addend; 865 866 bfd_elf32_swap_reloca_out (output_bfd, &rel, 867 (sreloc->contents + reloc_index * sizeof (Elf32_External_Rela))); 868 } 869 870 /* This code is taken from elf32-m32r.c 871 There is some attempt to make this function usable for many architectures, 872 both USE_REL and USE_RELA ['twould be nice if such a critter existed], 873 if only to serve as a learning tool. 874 875 The RELOCATE_SECTION function is called by the new ELF backend linker 876 to handle the relocations for a section. 877 878 The relocs are always passed as Rela structures; if the section 879 actually uses Rel structures, the r_addend field will always be 880 zero. 881 882 This function is responsible for adjust the section contents as 883 necessary, and (if using Rela relocs and generating a 884 relocatable output file) adjusting the reloc addend as 885 necessary. 886 887 This function does not have to worry about setting the reloc 888 address or the reloc symbol index. 889 890 LOCAL_SYMS is a pointer to the swapped in local symbols. 891 892 LOCAL_SECTIONS is an array giving the section in the input file 893 corresponding to the st_shndx field of each local symbol. 894 895 The global hash table entry for the global symbols can be found 896 via elf_sym_hashes (input_bfd). 897 898 When generating relocatable output, this function must handle 899 STB_LOCAL/STT_SECTION symbols specially. The output symbol is 900 going to be the section symbol corresponding to the output 901 section, which means that the addend must be adjusted 902 accordingly. */ 903 904 static bfd_boolean 905 microblaze_elf_relocate_section (bfd *output_bfd, 906 struct bfd_link_info *info, 907 bfd *input_bfd, 908 asection *input_section, 909 bfd_byte *contents, 910 Elf_Internal_Rela *relocs, 911 Elf_Internal_Sym *local_syms, 912 asection **local_sections) 913 { 914 struct elf32_mb_link_hash_table *htab; 915 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr; 916 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd); 917 Elf_Internal_Rela *rel, *relend; 918 int endian = (bfd_little_endian (output_bfd)) ? 0 : 2; 919 /* Assume success. */ 920 bfd_boolean ret = TRUE; 921 asection *sreloc; 922 bfd_vma *local_got_offsets; 923 unsigned int tls_type; 924 925 if (!microblaze_elf_howto_table[R_MICROBLAZE_max-1]) 926 microblaze_elf_howto_init (); 927 928 htab = elf32_mb_hash_table (info); 929 if (htab == NULL) 930 return FALSE; 931 932 local_got_offsets = elf_local_got_offsets (input_bfd); 933 934 sreloc = elf_section_data (input_section)->sreloc; 935 936 rel = relocs; 937 relend = relocs + input_section->reloc_count; 938 for (; rel < relend; rel++) 939 { 940 int r_type; 941 reloc_howto_type *howto; 942 unsigned long r_symndx; 943 bfd_vma addend = rel->r_addend; 944 bfd_vma offset = rel->r_offset; 945 struct elf_link_hash_entry *h; 946 Elf_Internal_Sym *sym; 947 asection *sec; 948 const char *sym_name; 949 bfd_reloc_status_type r = bfd_reloc_ok; 950 const char *errmsg = NULL; 951 bfd_boolean unresolved_reloc = FALSE; 952 953 h = NULL; 954 r_type = ELF32_R_TYPE (rel->r_info); 955 tls_type = 0; 956 957 if (r_type < 0 || r_type >= (int) R_MICROBLAZE_max) 958 { 959 (*_bfd_error_handler) (_("%s: unknown relocation type %d"), 960 bfd_get_filename (input_bfd), (int) r_type); 961 bfd_set_error (bfd_error_bad_value); 962 ret = FALSE; 963 continue; 964 } 965 966 howto = microblaze_elf_howto_table[r_type]; 967 r_symndx = ELF32_R_SYM (rel->r_info); 968 969 if (bfd_link_relocatable (info)) 970 { 971 /* This is a relocatable link. We don't have to change 972 anything, unless the reloc is against a section symbol, 973 in which case we have to adjust according to where the 974 section symbol winds up in the output section. */ 975 sec = NULL; 976 if (r_symndx >= symtab_hdr->sh_info) 977 /* External symbol. */ 978 continue; 979 980 /* Local symbol. */ 981 sym = local_syms + r_symndx; 982 sym_name = "<local symbol>"; 983 /* STT_SECTION: symbol is associated with a section. */ 984 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION) 985 /* Symbol isn't associated with a section. Nothing to do. */ 986 continue; 987 988 sec = local_sections[r_symndx]; 989 addend += sec->output_offset + sym->st_value; 990 #ifndef USE_REL 991 /* This can't be done for USE_REL because it doesn't mean anything 992 and elf_link_input_bfd asserts this stays zero. */ 993 /* rel->r_addend = addend; */ 994 #endif 995 996 #ifndef USE_REL 997 /* Addends are stored with relocs. We're done. */ 998 continue; 999 #else /* USE_REL */ 1000 /* If partial_inplace, we need to store any additional addend 1001 back in the section. */ 1002 if (!howto->partial_inplace) 1003 continue; 1004 /* ??? Here is a nice place to call a special_function like handler. */ 1005 r = _bfd_relocate_contents (howto, input_bfd, addend, 1006 contents + offset); 1007 #endif /* USE_REL */ 1008 } 1009 else 1010 { 1011 bfd_vma relocation; 1012 1013 /* This is a final link. */ 1014 sym = NULL; 1015 sec = NULL; 1016 unresolved_reloc = FALSE; 1017 1018 if (r_symndx < symtab_hdr->sh_info) 1019 { 1020 /* Local symbol. */ 1021 sym = local_syms + r_symndx; 1022 sec = local_sections[r_symndx]; 1023 if (sec == 0) 1024 continue; 1025 sym_name = "<local symbol>"; 1026 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel); 1027 /* r_addend may have changed if the reference section was 1028 a merge section. */ 1029 addend = rel->r_addend; 1030 } 1031 else 1032 { 1033 /* External symbol. */ 1034 bfd_boolean warned ATTRIBUTE_UNUSED; 1035 bfd_boolean ignored ATTRIBUTE_UNUSED; 1036 1037 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel, 1038 r_symndx, symtab_hdr, sym_hashes, 1039 h, sec, relocation, 1040 unresolved_reloc, warned, ignored); 1041 sym_name = h->root.root.string; 1042 } 1043 1044 /* Sanity check the address. */ 1045 if (offset > bfd_get_section_limit (input_bfd, input_section)) 1046 { 1047 r = bfd_reloc_outofrange; 1048 goto check_reloc; 1049 } 1050 1051 switch ((int) r_type) 1052 { 1053 case (int) R_MICROBLAZE_SRO32 : 1054 { 1055 const char *name; 1056 1057 /* Only relocate if the symbol is defined. */ 1058 if (sec) 1059 { 1060 name = bfd_get_section_name (sec->owner, sec); 1061 1062 if (strcmp (name, ".sdata2") == 0 1063 || strcmp (name, ".sbss2") == 0) 1064 { 1065 if (ro_small_data_pointer == 0) 1066 microblaze_elf_final_sdp (info); 1067 if (ro_small_data_pointer == 0) 1068 { 1069 ret = FALSE; 1070 r = bfd_reloc_undefined; 1071 goto check_reloc; 1072 } 1073 1074 /* At this point `relocation' contains the object's 1075 address. */ 1076 relocation -= ro_small_data_pointer; 1077 /* Now it contains the offset from _SDA2_BASE_. */ 1078 r = _bfd_final_link_relocate (howto, input_bfd, 1079 input_section, 1080 contents, offset, 1081 relocation, addend); 1082 } 1083 else 1084 { 1085 (*_bfd_error_handler) (_("%s: The target (%s) of an %s relocation is in the wrong section (%s)"), 1086 bfd_get_filename (input_bfd), 1087 sym_name, 1088 microblaze_elf_howto_table[(int) r_type]->name, 1089 bfd_get_section_name (sec->owner, sec)); 1090 /*bfd_set_error (bfd_error_bad_value); ??? why? */ 1091 ret = FALSE; 1092 continue; 1093 } 1094 } 1095 } 1096 break; 1097 1098 case (int) R_MICROBLAZE_SRW32 : 1099 { 1100 const char *name; 1101 1102 /* Only relocate if the symbol is defined. */ 1103 if (sec) 1104 { 1105 name = bfd_get_section_name (sec->owner, sec); 1106 1107 if (strcmp (name, ".sdata") == 0 1108 || strcmp (name, ".sbss") == 0) 1109 { 1110 if (rw_small_data_pointer == 0) 1111 microblaze_elf_final_sdp (info); 1112 if (rw_small_data_pointer == 0) 1113 { 1114 ret = FALSE; 1115 r = bfd_reloc_undefined; 1116 goto check_reloc; 1117 } 1118 1119 /* At this point `relocation' contains the object's 1120 address. */ 1121 relocation -= rw_small_data_pointer; 1122 /* Now it contains the offset from _SDA_BASE_. */ 1123 r = _bfd_final_link_relocate (howto, input_bfd, 1124 input_section, 1125 contents, offset, 1126 relocation, addend); 1127 } 1128 else 1129 { 1130 (*_bfd_error_handler) (_("%s: The target (%s) of an %s relocation is in the wrong section (%s)"), 1131 bfd_get_filename (input_bfd), 1132 sym_name, 1133 microblaze_elf_howto_table[(int) r_type]->name, 1134 bfd_get_section_name (sec->owner, sec)); 1135 /*bfd_set_error (bfd_error_bad_value); ??? why? */ 1136 ret = FALSE; 1137 continue; 1138 } 1139 } 1140 } 1141 break; 1142 1143 case (int) R_MICROBLAZE_32_SYM_OP_SYM: 1144 break; /* Do nothing. */ 1145 1146 case (int) R_MICROBLAZE_GOTPC_64: 1147 relocation = htab->sgotplt->output_section->vma 1148 + htab->sgotplt->output_offset; 1149 relocation -= (input_section->output_section->vma 1150 + input_section->output_offset 1151 + offset + INST_WORD_SIZE); 1152 relocation += addend; 1153 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff, 1154 contents + offset + endian); 1155 bfd_put_16 (input_bfd, relocation & 0xffff, 1156 contents + offset + endian + INST_WORD_SIZE); 1157 break; 1158 1159 case (int) R_MICROBLAZE_PLT_64: 1160 { 1161 bfd_vma immediate; 1162 if (htab->splt != NULL && h != NULL 1163 && h->plt.offset != (bfd_vma) -1) 1164 { 1165 relocation = (htab->splt->output_section->vma 1166 + htab->splt->output_offset 1167 + h->plt.offset); 1168 unresolved_reloc = FALSE; 1169 immediate = relocation - (input_section->output_section->vma 1170 + input_section->output_offset 1171 + offset + INST_WORD_SIZE); 1172 bfd_put_16 (input_bfd, (immediate >> 16) & 0xffff, 1173 contents + offset + endian); 1174 bfd_put_16 (input_bfd, immediate & 0xffff, 1175 contents + offset + endian + INST_WORD_SIZE); 1176 } 1177 else 1178 { 1179 relocation -= (input_section->output_section->vma 1180 + input_section->output_offset 1181 + offset + INST_WORD_SIZE); 1182 immediate = relocation; 1183 bfd_put_16 (input_bfd, (immediate >> 16) & 0xffff, 1184 contents + offset + endian); 1185 bfd_put_16 (input_bfd, immediate & 0xffff, 1186 contents + offset + endian + INST_WORD_SIZE); 1187 } 1188 break; 1189 } 1190 1191 case (int) R_MICROBLAZE_TLSGD: 1192 tls_type = (TLS_TLS | TLS_GD); 1193 goto dogot; 1194 case (int) R_MICROBLAZE_TLSLD: 1195 tls_type = (TLS_TLS | TLS_LD); 1196 dogot: 1197 case (int) R_MICROBLAZE_GOT_64: 1198 { 1199 bfd_vma *offp; 1200 bfd_vma off, off2; 1201 unsigned long indx; 1202 bfd_vma static_value; 1203 1204 bfd_boolean need_relocs = FALSE; 1205 if (htab->sgot == NULL) 1206 abort (); 1207 1208 indx = 0; 1209 offp = NULL; 1210 1211 /* 1. Identify GOT Offset; 1212 2. Compute Static Values 1213 3. Process Module Id, Process Offset 1214 4. Fixup Relocation with GOT offset value. */ 1215 1216 /* 1. Determine GOT Offset to use : TLS_LD, global, local */ 1217 if (IS_TLS_LD (tls_type)) 1218 offp = &htab->tlsld_got.offset; 1219 else if (h != NULL) 1220 { 1221 if (htab->sgotplt != NULL && h->got.offset != (bfd_vma) -1) 1222 offp = &h->got.offset; 1223 else 1224 abort (); 1225 } 1226 else 1227 { 1228 if (local_got_offsets == NULL) 1229 abort (); 1230 offp = &local_got_offsets[r_symndx]; 1231 } 1232 1233 if (!offp) 1234 abort (); 1235 1236 off = (*offp) & ~1; 1237 off2 = off; 1238 1239 if (IS_TLS_LD(tls_type) || IS_TLS_GD(tls_type)) 1240 off2 = off + 4; 1241 1242 /* Symbol index to use for relocs */ 1243 if (h != NULL) 1244 { 1245 bfd_boolean dyn = 1246 elf_hash_table (info)->dynamic_sections_created; 1247 1248 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 1249 bfd_link_pic (info), 1250 h) 1251 && (!bfd_link_pic (info) 1252 || !SYMBOL_REFERENCES_LOCAL (info, h))) 1253 indx = h->dynindx; 1254 } 1255 1256 /* Need to generate relocs ? */ 1257 if ((bfd_link_pic (info) || indx != 0) 1258 && (h == NULL 1259 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 1260 || h->root.type != bfd_link_hash_undefweak)) 1261 need_relocs = TRUE; 1262 1263 /* 2. Compute/Emit Static value of r-expression */ 1264 static_value = relocation + addend; 1265 1266 /* 3. Process module-id and offset */ 1267 if (! ((*offp) & 1) ) 1268 { 1269 bfd_vma got_offset; 1270 1271 got_offset = (htab->sgot->output_section->vma 1272 + htab->sgot->output_offset 1273 + off); 1274 1275 /* Process module-id */ 1276 if (IS_TLS_LD(tls_type)) 1277 { 1278 if (! bfd_link_pic (info)) 1279 { 1280 bfd_put_32 (output_bfd, 1, htab->sgot->contents + off); 1281 } 1282 else 1283 { 1284 microblaze_elf_output_dynamic_relocation (output_bfd, 1285 htab->srelgot, htab->srelgot->reloc_count++, 1286 /* symindex= */ 0, R_MICROBLAZE_TLSDTPMOD32, 1287 got_offset, 0); 1288 } 1289 } 1290 else if (IS_TLS_GD(tls_type)) 1291 { 1292 if (! need_relocs) 1293 { 1294 bfd_put_32 (output_bfd, 1, htab->sgot->contents + off); 1295 } 1296 else 1297 { 1298 microblaze_elf_output_dynamic_relocation (output_bfd, 1299 htab->srelgot, 1300 htab->srelgot->reloc_count++, 1301 /* symindex= */ indx, R_MICROBLAZE_TLSDTPMOD32, 1302 got_offset, indx ? 0 : static_value); 1303 } 1304 } 1305 1306 /* Process Offset */ 1307 if (htab->srelgot == NULL) 1308 abort (); 1309 1310 got_offset = (htab->sgot->output_section->vma 1311 + htab->sgot->output_offset 1312 + off2); 1313 if (IS_TLS_LD(tls_type)) 1314 { 1315 /* For LD, offset should be 0 */ 1316 *offp |= 1; 1317 bfd_put_32 (output_bfd, 0, htab->sgot->contents + off2); 1318 } 1319 else if (IS_TLS_GD(tls_type)) 1320 { 1321 *offp |= 1; 1322 static_value -= dtprel_base(info); 1323 if (need_relocs) 1324 { 1325 microblaze_elf_output_dynamic_relocation (output_bfd, 1326 htab->srelgot, htab->srelgot->reloc_count++, 1327 /* symindex= */ indx, R_MICROBLAZE_TLSDTPREL32, 1328 got_offset, indx ? 0 : static_value); 1329 } 1330 else 1331 { 1332 bfd_put_32 (output_bfd, static_value, 1333 htab->sgot->contents + off2); 1334 } 1335 } 1336 else 1337 { 1338 bfd_put_32 (output_bfd, static_value, 1339 htab->sgot->contents + off2); 1340 1341 /* Relocs for dyn symbols generated by 1342 finish_dynamic_symbols */ 1343 if (bfd_link_pic (info) && h == NULL) 1344 { 1345 *offp |= 1; 1346 microblaze_elf_output_dynamic_relocation (output_bfd, 1347 htab->srelgot, htab->srelgot->reloc_count++, 1348 /* symindex= */ indx, R_MICROBLAZE_REL, 1349 got_offset, static_value); 1350 } 1351 } 1352 } 1353 1354 /* 4. Fixup Relocation with GOT offset value 1355 Compute relative address of GOT entry for applying 1356 the current relocation */ 1357 relocation = htab->sgot->output_section->vma 1358 + htab->sgot->output_offset 1359 + off 1360 - htab->sgotplt->output_section->vma 1361 - htab->sgotplt->output_offset; 1362 1363 /* Apply Current Relocation */ 1364 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff, 1365 contents + offset + endian); 1366 bfd_put_16 (input_bfd, relocation & 0xffff, 1367 contents + offset + endian + INST_WORD_SIZE); 1368 1369 unresolved_reloc = FALSE; 1370 break; 1371 } 1372 1373 case (int) R_MICROBLAZE_GOTOFF_64: 1374 { 1375 bfd_vma immediate; 1376 unsigned short lo, high; 1377 relocation += addend; 1378 relocation -= htab->sgotplt->output_section->vma 1379 + htab->sgotplt->output_offset; 1380 /* Write this value into correct location. */ 1381 immediate = relocation; 1382 lo = immediate & 0x0000ffff; 1383 high = (immediate >> 16) & 0x0000ffff; 1384 bfd_put_16 (input_bfd, high, contents + offset + endian); 1385 bfd_put_16 (input_bfd, lo, contents + offset + INST_WORD_SIZE + endian); 1386 break; 1387 } 1388 1389 case (int) R_MICROBLAZE_GOTOFF_32: 1390 { 1391 relocation += addend; 1392 relocation -= htab->sgotplt->output_section->vma 1393 + htab->sgotplt->output_offset; 1394 /* Write this value into correct location. */ 1395 bfd_put_32 (input_bfd, relocation, contents + offset); 1396 break; 1397 } 1398 1399 case (int) R_MICROBLAZE_TLSDTPREL64: 1400 relocation += addend; 1401 relocation -= dtprel_base(info); 1402 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff, 1403 contents + offset + 2); 1404 bfd_put_16 (input_bfd, relocation & 0xffff, 1405 contents + offset + 2 + INST_WORD_SIZE); 1406 break; 1407 case (int) R_MICROBLAZE_64_PCREL : 1408 case (int) R_MICROBLAZE_64: 1409 case (int) R_MICROBLAZE_32: 1410 { 1411 /* r_symndx will be STN_UNDEF (zero) only for relocs against symbols 1412 from removed linkonce sections, or sections discarded by 1413 a linker script. */ 1414 if (r_symndx == STN_UNDEF || (input_section->flags & SEC_ALLOC) == 0) 1415 { 1416 relocation += addend; 1417 if (r_type == R_MICROBLAZE_32) 1418 bfd_put_32 (input_bfd, relocation, contents + offset); 1419 else 1420 { 1421 if (r_type == R_MICROBLAZE_64_PCREL) 1422 relocation -= (input_section->output_section->vma 1423 + input_section->output_offset 1424 + offset + INST_WORD_SIZE); 1425 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff, 1426 contents + offset + endian); 1427 bfd_put_16 (input_bfd, relocation & 0xffff, 1428 contents + offset + endian + INST_WORD_SIZE); 1429 } 1430 break; 1431 } 1432 1433 if ((bfd_link_pic (info) 1434 && (h == NULL 1435 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT 1436 || h->root.type != bfd_link_hash_undefweak) 1437 && (!howto->pc_relative 1438 || (h != NULL 1439 && h->dynindx != -1 1440 && (!info->symbolic 1441 || !h->def_regular)))) 1442 || (!bfd_link_pic (info) 1443 && h != NULL 1444 && h->dynindx != -1 1445 && !h->non_got_ref 1446 && ((h->def_dynamic 1447 && !h->def_regular) 1448 || h->root.type == bfd_link_hash_undefweak 1449 || h->root.type == bfd_link_hash_undefined))) 1450 { 1451 Elf_Internal_Rela outrel; 1452 bfd_byte *loc; 1453 bfd_boolean skip; 1454 1455 /* When generating a shared object, these relocations 1456 are copied into the output file to be resolved at run 1457 time. */ 1458 1459 BFD_ASSERT (sreloc != NULL); 1460 1461 skip = FALSE; 1462 1463 outrel.r_offset = 1464 _bfd_elf_section_offset (output_bfd, info, input_section, 1465 rel->r_offset); 1466 if (outrel.r_offset == (bfd_vma) -1) 1467 skip = TRUE; 1468 else if (outrel.r_offset == (bfd_vma) -2) 1469 skip = TRUE; 1470 outrel.r_offset += (input_section->output_section->vma 1471 + input_section->output_offset); 1472 1473 if (skip) 1474 memset (&outrel, 0, sizeof outrel); 1475 /* h->dynindx may be -1 if the symbol was marked to 1476 become local. */ 1477 else if (h != NULL 1478 && ((! info->symbolic && h->dynindx != -1) 1479 || !h->def_regular)) 1480 { 1481 BFD_ASSERT (h->dynindx != -1); 1482 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type); 1483 outrel.r_addend = addend; 1484 } 1485 else 1486 { 1487 if (r_type == R_MICROBLAZE_32) 1488 { 1489 outrel.r_info = ELF32_R_INFO (0, R_MICROBLAZE_REL); 1490 outrel.r_addend = relocation + addend; 1491 } 1492 else 1493 { 1494 BFD_FAIL (); 1495 (*_bfd_error_handler) 1496 (_("%B: probably compiled without -fPIC?"), 1497 input_bfd); 1498 bfd_set_error (bfd_error_bad_value); 1499 return FALSE; 1500 } 1501 } 1502 1503 loc = sreloc->contents; 1504 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela); 1505 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc); 1506 break; 1507 } 1508 else 1509 { 1510 relocation += addend; 1511 if (r_type == R_MICROBLAZE_32) 1512 bfd_put_32 (input_bfd, relocation, contents + offset); 1513 else 1514 { 1515 if (r_type == R_MICROBLAZE_64_PCREL) 1516 relocation -= (input_section->output_section->vma 1517 + input_section->output_offset 1518 + offset + INST_WORD_SIZE); 1519 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff, 1520 contents + offset + endian); 1521 bfd_put_16 (input_bfd, relocation & 0xffff, 1522 contents + offset + endian + INST_WORD_SIZE); 1523 } 1524 break; 1525 } 1526 } 1527 1528 default : 1529 r = _bfd_final_link_relocate (howto, input_bfd, input_section, 1530 contents, offset, 1531 relocation, addend); 1532 break; 1533 } 1534 } 1535 1536 check_reloc: 1537 1538 if (r != bfd_reloc_ok) 1539 { 1540 /* FIXME: This should be generic enough to go in a utility. */ 1541 const char *name; 1542 1543 if (h != NULL) 1544 name = h->root.root.string; 1545 else 1546 { 1547 name = (bfd_elf_string_from_elf_section 1548 (input_bfd, symtab_hdr->sh_link, sym->st_name)); 1549 if (name == NULL || *name == '\0') 1550 name = bfd_section_name (input_bfd, sec); 1551 } 1552 1553 if (errmsg != NULL) 1554 goto common_error; 1555 1556 switch (r) 1557 { 1558 case bfd_reloc_overflow: 1559 if (!((*info->callbacks->reloc_overflow) 1560 (info, (h ? &h->root : NULL), name, howto->name, 1561 (bfd_vma) 0, input_bfd, input_section, offset))) 1562 return FALSE; 1563 break; 1564 1565 case bfd_reloc_undefined: 1566 if (!((*info->callbacks->undefined_symbol) 1567 (info, name, input_bfd, input_section, offset, TRUE))) 1568 return FALSE; 1569 break; 1570 1571 case bfd_reloc_outofrange: 1572 errmsg = _("internal error: out of range error"); 1573 goto common_error; 1574 1575 case bfd_reloc_notsupported: 1576 errmsg = _("internal error: unsupported relocation error"); 1577 goto common_error; 1578 1579 case bfd_reloc_dangerous: 1580 errmsg = _("internal error: dangerous error"); 1581 goto common_error; 1582 1583 default: 1584 errmsg = _("internal error: unknown error"); 1585 /* Fall through. */ 1586 common_error: 1587 if (!((*info->callbacks->warning) 1588 (info, errmsg, name, input_bfd, input_section, offset))) 1589 return FALSE; 1590 break; 1591 } 1592 } 1593 } 1594 1595 return ret; 1596 } 1597 1598 /* Merge backend specific data from an object file to the output 1599 object file when linking. 1600 1601 Note: We only use this hook to catch endian mismatches. */ 1602 static bfd_boolean 1603 microblaze_elf_merge_private_bfd_data (bfd * ibfd, bfd * obfd) 1604 { 1605 /* Check if we have the same endianess. */ 1606 if (! _bfd_generic_verify_endian_match (ibfd, obfd)) 1607 return FALSE; 1608 1609 return TRUE; 1610 } 1611 1612 1613 /* Calculate fixup value for reference. */ 1614 1615 static int 1616 calc_fixup (bfd_vma start, bfd_vma size, asection *sec) 1617 { 1618 bfd_vma end = start + size; 1619 int i, fixup = 0; 1620 1621 if (sec == NULL || sec->relax == NULL) 1622 return 0; 1623 1624 /* Look for addr in relax table, total fixup value. */ 1625 for (i = 0; i < sec->relax_count; i++) 1626 { 1627 if (end <= sec->relax[i].addr) 1628 break; 1629 if ((end != start) && (start > sec->relax[i].addr)) 1630 continue; 1631 fixup += sec->relax[i].size; 1632 } 1633 return fixup; 1634 } 1635 1636 /* Read-modify-write into the bfd, an immediate value into appropriate fields of 1637 a 32-bit instruction. */ 1638 static void 1639 microblaze_bfd_write_imm_value_32 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val) 1640 { 1641 unsigned long instr = bfd_get_32 (abfd, bfd_addr); 1642 instr &= ~0x0000ffff; 1643 instr |= (val & 0x0000ffff); 1644 bfd_put_32 (abfd, instr, bfd_addr); 1645 } 1646 1647 /* Read-modify-write into the bfd, an immediate value into appropriate fields of 1648 two consecutive 32-bit instructions. */ 1649 static void 1650 microblaze_bfd_write_imm_value_64 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val) 1651 { 1652 unsigned long instr_hi; 1653 unsigned long instr_lo; 1654 1655 instr_hi = bfd_get_32 (abfd, bfd_addr); 1656 instr_hi &= ~0x0000ffff; 1657 instr_hi |= ((val >> 16) & 0x0000ffff); 1658 bfd_put_32 (abfd, instr_hi, bfd_addr); 1659 1660 instr_lo = bfd_get_32 (abfd, bfd_addr + INST_WORD_SIZE); 1661 instr_lo &= ~0x0000ffff; 1662 instr_lo |= (val & 0x0000ffff); 1663 bfd_put_32 (abfd, instr_lo, bfd_addr + INST_WORD_SIZE); 1664 } 1665 1666 static bfd_boolean 1667 microblaze_elf_relax_section (bfd *abfd, 1668 asection *sec, 1669 struct bfd_link_info *link_info, 1670 bfd_boolean *again) 1671 { 1672 Elf_Internal_Shdr *symtab_hdr; 1673 Elf_Internal_Rela *internal_relocs; 1674 Elf_Internal_Rela *free_relocs = NULL; 1675 Elf_Internal_Rela *irel, *irelend; 1676 bfd_byte *contents = NULL; 1677 bfd_byte *free_contents = NULL; 1678 int rel_count; 1679 unsigned int shndx; 1680 int i, sym_index; 1681 asection *o; 1682 struct elf_link_hash_entry *sym_hash; 1683 Elf_Internal_Sym *isymbuf, *isymend; 1684 Elf_Internal_Sym *isym; 1685 int symcount; 1686 int offset; 1687 bfd_vma src, dest; 1688 1689 /* We only do this once per section. We may be able to delete some code 1690 by running multiple passes, but it is not worth it. */ 1691 *again = FALSE; 1692 1693 /* Only do this for a text section. */ 1694 if (bfd_link_relocatable (link_info) 1695 || (sec->flags & SEC_RELOC) == 0 1696 || (sec->reloc_count == 0) 1697 || (sec->flags & SEC_CODE) == 0) 1698 return TRUE; 1699 1700 BFD_ASSERT ((sec->size > 0) || (sec->rawsize > 0)); 1701 1702 /* If this is the first time we have been called for this section, 1703 initialize the cooked size. */ 1704 if (sec->size == 0) 1705 sec->size = sec->rawsize; 1706 1707 /* Get symbols for this section. */ 1708 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 1709 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents; 1710 symcount = symtab_hdr->sh_size / sizeof (Elf32_External_Sym); 1711 if (isymbuf == NULL) 1712 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr, symcount, 1713 0, NULL, NULL, NULL); 1714 BFD_ASSERT (isymbuf != NULL); 1715 1716 internal_relocs = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL, link_info->keep_memory); 1717 if (internal_relocs == NULL) 1718 goto error_return; 1719 if (! link_info->keep_memory) 1720 free_relocs = internal_relocs; 1721 1722 sec->relax = (struct relax_table *) bfd_malloc ((sec->reloc_count + 1) 1723 * sizeof (struct relax_table)); 1724 if (sec->relax == NULL) 1725 goto error_return; 1726 sec->relax_count = 0; 1727 1728 irelend = internal_relocs + sec->reloc_count; 1729 rel_count = 0; 1730 for (irel = internal_relocs; irel < irelend; irel++, rel_count++) 1731 { 1732 bfd_vma symval; 1733 if ((ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64_PCREL) 1734 && (ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64 )) 1735 continue; /* Can't delete this reloc. */ 1736 1737 /* Get the section contents. */ 1738 if (contents == NULL) 1739 { 1740 if (elf_section_data (sec)->this_hdr.contents != NULL) 1741 contents = elf_section_data (sec)->this_hdr.contents; 1742 else 1743 { 1744 contents = (bfd_byte *) bfd_malloc (sec->size); 1745 if (contents == NULL) 1746 goto error_return; 1747 free_contents = contents; 1748 1749 if (!bfd_get_section_contents (abfd, sec, contents, 1750 (file_ptr) 0, sec->size)) 1751 goto error_return; 1752 elf_section_data (sec)->this_hdr.contents = contents; 1753 } 1754 } 1755 1756 /* Get the value of the symbol referred to by the reloc. */ 1757 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info) 1758 { 1759 /* A local symbol. */ 1760 asection *sym_sec; 1761 1762 isym = isymbuf + ELF32_R_SYM (irel->r_info); 1763 if (isym->st_shndx == SHN_UNDEF) 1764 sym_sec = bfd_und_section_ptr; 1765 else if (isym->st_shndx == SHN_ABS) 1766 sym_sec = bfd_abs_section_ptr; 1767 else if (isym->st_shndx == SHN_COMMON) 1768 sym_sec = bfd_com_section_ptr; 1769 else 1770 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx); 1771 1772 symval = _bfd_elf_rela_local_sym (abfd, isym, &sym_sec, irel); 1773 } 1774 else 1775 { 1776 unsigned long indx; 1777 struct elf_link_hash_entry *h; 1778 1779 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info; 1780 h = elf_sym_hashes (abfd)[indx]; 1781 BFD_ASSERT (h != NULL); 1782 1783 if (h->root.type != bfd_link_hash_defined 1784 && h->root.type != bfd_link_hash_defweak) 1785 /* This appears to be a reference to an undefined 1786 symbol. Just ignore it--it will be caught by the 1787 regular reloc processing. */ 1788 continue; 1789 1790 symval = (h->root.u.def.value 1791 + h->root.u.def.section->output_section->vma 1792 + h->root.u.def.section->output_offset); 1793 } 1794 1795 /* If this is a PC-relative reloc, subtract the instr offset from 1796 the symbol value. */ 1797 if (ELF32_R_TYPE (irel->r_info) == (int) R_MICROBLAZE_64_PCREL) 1798 { 1799 symval = symval + irel->r_addend 1800 - (irel->r_offset 1801 + sec->output_section->vma 1802 + sec->output_offset); 1803 } 1804 else 1805 symval += irel->r_addend; 1806 1807 if ((symval & 0xffff8000) == 0 1808 || (symval & 0xffff8000) == 0xffff8000) 1809 { 1810 /* We can delete this instruction. */ 1811 sec->relax[sec->relax_count].addr = irel->r_offset; 1812 sec->relax[sec->relax_count].size = INST_WORD_SIZE; 1813 sec->relax_count++; 1814 1815 /* Rewrite relocation type. */ 1816 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info)) 1817 { 1818 case R_MICROBLAZE_64_PCREL: 1819 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1820 (int) R_MICROBLAZE_32_PCREL_LO); 1821 break; 1822 case R_MICROBLAZE_64: 1823 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1824 (int) R_MICROBLAZE_32_LO); 1825 break; 1826 default: 1827 /* Cannot happen. */ 1828 BFD_ASSERT (FALSE); 1829 } 1830 } 1831 } /* Loop through all relocations. */ 1832 1833 /* Loop through the relocs again, and see if anything needs to change. */ 1834 if (sec->relax_count > 0) 1835 { 1836 shndx = _bfd_elf_section_from_bfd_section (abfd, sec); 1837 rel_count = 0; 1838 sec->relax[sec->relax_count].addr = sec->size; 1839 1840 for (irel = internal_relocs; irel < irelend; irel++, rel_count++) 1841 { 1842 bfd_vma nraddr; 1843 1844 /* Get the new reloc address. */ 1845 nraddr = irel->r_offset - calc_fixup (irel->r_offset, 0, sec); 1846 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info)) 1847 { 1848 default: 1849 break; 1850 case R_MICROBLAZE_64_PCREL: 1851 break; 1852 case R_MICROBLAZE_64: 1853 case R_MICROBLAZE_32_LO: 1854 /* If this reloc is against a symbol defined in this 1855 section, we must check the addend to see it will put the value in 1856 range to be adjusted, and hence must be changed. */ 1857 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info) 1858 { 1859 isym = isymbuf + ELF32_R_SYM (irel->r_info); 1860 /* Only handle relocs against .text. */ 1861 if (isym->st_shndx == shndx 1862 && ELF32_ST_TYPE (isym->st_info) == STT_SECTION) 1863 irel->r_addend -= calc_fixup (irel->r_addend, 0, sec); 1864 } 1865 break; 1866 case R_MICROBLAZE_NONE: 1867 { 1868 /* This was a PC-relative instruction that was 1869 completely resolved. */ 1870 int sfix, efix; 1871 bfd_vma target_address; 1872 target_address = irel->r_addend + irel->r_offset; 1873 sfix = calc_fixup (irel->r_offset, 0, sec); 1874 efix = calc_fixup (target_address, 0, sec); 1875 irel->r_addend -= (efix - sfix); 1876 /* Should use HOWTO. */ 1877 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset, 1878 irel->r_addend); 1879 } 1880 break; 1881 case R_MICROBLAZE_64_NONE: 1882 { 1883 /* This was a PC-relative 64-bit instruction that was 1884 completely resolved. */ 1885 int sfix, efix; 1886 bfd_vma target_address; 1887 target_address = irel->r_addend + irel->r_offset + INST_WORD_SIZE; 1888 sfix = calc_fixup (irel->r_offset + INST_WORD_SIZE, 0, sec); 1889 efix = calc_fixup (target_address, 0, sec); 1890 irel->r_addend -= (efix - sfix); 1891 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset 1892 + INST_WORD_SIZE, irel->r_addend); 1893 } 1894 break; 1895 } 1896 irel->r_offset = nraddr; 1897 } /* Change all relocs in this section. */ 1898 1899 /* Look through all other sections. */ 1900 for (o = abfd->sections; o != NULL; o = o->next) 1901 { 1902 Elf_Internal_Rela *irelocs; 1903 Elf_Internal_Rela *irelscan, *irelscanend; 1904 bfd_byte *ocontents; 1905 1906 if (o == sec 1907 || (o->flags & SEC_RELOC) == 0 1908 || o->reloc_count == 0) 1909 continue; 1910 1911 /* We always cache the relocs. Perhaps, if info->keep_memory is 1912 FALSE, we should free them, if we are permitted to. */ 1913 1914 irelocs = _bfd_elf_link_read_relocs (abfd, o, NULL, NULL, TRUE); 1915 if (irelocs == NULL) 1916 goto error_return; 1917 1918 ocontents = NULL; 1919 irelscanend = irelocs + o->reloc_count; 1920 for (irelscan = irelocs; irelscan < irelscanend; irelscan++) 1921 { 1922 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32) 1923 { 1924 isym = isymbuf + ELF32_R_SYM (irelscan->r_info); 1925 1926 /* Look at the reloc only if the value has been resolved. */ 1927 if (isym->st_shndx == shndx 1928 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION)) 1929 { 1930 if (ocontents == NULL) 1931 { 1932 if (elf_section_data (o)->this_hdr.contents != NULL) 1933 ocontents = elf_section_data (o)->this_hdr.contents; 1934 else 1935 { 1936 /* We always cache the section contents. 1937 Perhaps, if info->keep_memory is FALSE, we 1938 should free them, if we are permitted to. */ 1939 if (o->rawsize == 0) 1940 o->rawsize = o->size; 1941 ocontents = (bfd_byte *) bfd_malloc (o->rawsize); 1942 if (ocontents == NULL) 1943 goto error_return; 1944 if (!bfd_get_section_contents (abfd, o, ocontents, 1945 (file_ptr) 0, 1946 o->rawsize)) 1947 goto error_return; 1948 elf_section_data (o)->this_hdr.contents = ocontents; 1949 } 1950 1951 } 1952 irelscan->r_addend -= calc_fixup (irelscan->r_addend, 0, sec); 1953 } 1954 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_SYM_OP_SYM) 1955 { 1956 isym = isymbuf + ELF32_R_SYM (irelscan->r_info); 1957 1958 /* Look at the reloc only if the value has been resolved. */ 1959 if (ocontents == NULL) 1960 { 1961 if (elf_section_data (o)->this_hdr.contents != NULL) 1962 ocontents = elf_section_data (o)->this_hdr.contents; 1963 else 1964 { 1965 /* We always cache the section contents. 1966 Perhaps, if info->keep_memory is FALSE, we 1967 should free them, if we are permitted to. */ 1968 1969 if (o->rawsize == 0) 1970 o->rawsize = o->size; 1971 ocontents = (bfd_byte *) bfd_malloc (o->rawsize); 1972 if (ocontents == NULL) 1973 goto error_return; 1974 if (!bfd_get_section_contents (abfd, o, ocontents, 1975 (file_ptr) 0, 1976 o->rawsize)) 1977 goto error_return; 1978 elf_section_data (o)->this_hdr.contents = ocontents; 1979 } 1980 } 1981 irelscan->r_addend -= calc_fixup (irel->r_addend 1982 + isym->st_value, 1983 0, 1984 sec); 1985 } 1986 } 1987 else if ((ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_PCREL_LO) 1988 || (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_LO)) 1989 { 1990 isym = isymbuf + ELF32_R_SYM (irelscan->r_info); 1991 1992 /* Look at the reloc only if the value has been resolved. */ 1993 if (isym->st_shndx == shndx 1994 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION)) 1995 { 1996 bfd_vma immediate; 1997 bfd_vma target_address; 1998 1999 if (ocontents == NULL) 2000 { 2001 if (elf_section_data (o)->this_hdr.contents != NULL) 2002 ocontents = elf_section_data (o)->this_hdr.contents; 2003 else 2004 { 2005 /* We always cache the section contents. 2006 Perhaps, if info->keep_memory is FALSE, we 2007 should free them, if we are permitted to. */ 2008 if (o->rawsize == 0) 2009 o->rawsize = o->size; 2010 ocontents = (bfd_byte *) bfd_malloc (o->rawsize); 2011 if (ocontents == NULL) 2012 goto error_return; 2013 if (!bfd_get_section_contents (abfd, o, ocontents, 2014 (file_ptr) 0, 2015 o->rawsize)) 2016 goto error_return; 2017 elf_section_data (o)->this_hdr.contents = ocontents; 2018 } 2019 } 2020 2021 unsigned long instr = bfd_get_32 (abfd, ocontents + irelscan->r_offset); 2022 immediate = instr & 0x0000ffff; 2023 target_address = immediate; 2024 offset = calc_fixup (target_address, 0, sec); 2025 immediate -= offset; 2026 irelscan->r_addend -= offset; 2027 microblaze_bfd_write_imm_value_32 (abfd, ocontents + irelscan->r_offset, 2028 irelscan->r_addend); 2029 } 2030 } 2031 2032 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64) 2033 { 2034 isym = isymbuf + ELF32_R_SYM (irelscan->r_info); 2035 2036 /* Look at the reloc only if the value has been resolved. */ 2037 if (isym->st_shndx == shndx 2038 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION)) 2039 { 2040 bfd_vma immediate; 2041 2042 if (ocontents == NULL) 2043 { 2044 if (elf_section_data (o)->this_hdr.contents != NULL) 2045 ocontents = elf_section_data (o)->this_hdr.contents; 2046 else 2047 { 2048 /* We always cache the section contents. 2049 Perhaps, if info->keep_memory is FALSE, we 2050 should free them, if we are permitted to. */ 2051 2052 if (o->rawsize == 0) 2053 o->rawsize = o->size; 2054 ocontents = (bfd_byte *) bfd_malloc (o->rawsize); 2055 if (ocontents == NULL) 2056 goto error_return; 2057 if (!bfd_get_section_contents (abfd, o, ocontents, 2058 (file_ptr) 0, 2059 o->rawsize)) 2060 goto error_return; 2061 elf_section_data (o)->this_hdr.contents = ocontents; 2062 } 2063 } 2064 unsigned long instr_hi = bfd_get_32 (abfd, ocontents 2065 + irelscan->r_offset); 2066 unsigned long instr_lo = bfd_get_32 (abfd, ocontents 2067 + irelscan->r_offset 2068 + INST_WORD_SIZE); 2069 immediate = (instr_hi & 0x0000ffff) << 16; 2070 immediate |= (instr_lo & 0x0000ffff); 2071 offset = calc_fixup (irelscan->r_addend, 0, sec); 2072 immediate -= offset; 2073 irelscan->r_addend -= offset; 2074 } 2075 } 2076 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64_PCREL) 2077 { 2078 isym = isymbuf + ELF32_R_SYM (irelscan->r_info); 2079 2080 /* Look at the reloc only if the value has been resolved. */ 2081 if (isym->st_shndx == shndx 2082 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION)) 2083 { 2084 bfd_vma immediate; 2085 bfd_vma target_address; 2086 2087 if (ocontents == NULL) 2088 { 2089 if (elf_section_data (o)->this_hdr.contents != NULL) 2090 ocontents = elf_section_data (o)->this_hdr.contents; 2091 else 2092 { 2093 /* We always cache the section contents. 2094 Perhaps, if info->keep_memory is FALSE, we 2095 should free them, if we are permitted to. */ 2096 if (o->rawsize == 0) 2097 o->rawsize = o->size; 2098 ocontents = (bfd_byte *) bfd_malloc (o->rawsize); 2099 if (ocontents == NULL) 2100 goto error_return; 2101 if (!bfd_get_section_contents (abfd, o, ocontents, 2102 (file_ptr) 0, 2103 o->rawsize)) 2104 goto error_return; 2105 elf_section_data (o)->this_hdr.contents = ocontents; 2106 } 2107 } 2108 unsigned long instr_hi = bfd_get_32 (abfd, ocontents 2109 + irelscan->r_offset); 2110 unsigned long instr_lo = bfd_get_32 (abfd, ocontents 2111 + irelscan->r_offset 2112 + INST_WORD_SIZE); 2113 immediate = (instr_hi & 0x0000ffff) << 16; 2114 immediate |= (instr_lo & 0x0000ffff); 2115 target_address = immediate; 2116 offset = calc_fixup (target_address, 0, sec); 2117 immediate -= offset; 2118 irelscan->r_addend -= offset; 2119 microblaze_bfd_write_imm_value_64 (abfd, ocontents 2120 + irelscan->r_offset, immediate); 2121 } 2122 } 2123 } 2124 } 2125 2126 /* Adjust the local symbols defined in this section. */ 2127 isymend = isymbuf + symtab_hdr->sh_info; 2128 for (isym = isymbuf; isym < isymend; isym++) 2129 { 2130 if (isym->st_shndx == shndx) 2131 { 2132 isym->st_value -= calc_fixup (isym->st_value, 0, sec); 2133 if (isym->st_size) 2134 isym->st_size -= calc_fixup (isym->st_value, isym->st_size, sec); 2135 } 2136 } 2137 2138 /* Now adjust the global symbols defined in this section. */ 2139 isym = isymbuf + symtab_hdr->sh_info; 2140 symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)) - symtab_hdr->sh_info; 2141 for (sym_index = 0; sym_index < symcount; sym_index++) 2142 { 2143 sym_hash = elf_sym_hashes (abfd)[sym_index]; 2144 if ((sym_hash->root.type == bfd_link_hash_defined 2145 || sym_hash->root.type == bfd_link_hash_defweak) 2146 && sym_hash->root.u.def.section == sec) 2147 { 2148 sym_hash->root.u.def.value -= calc_fixup (sym_hash->root.u.def.value, 2149 0, sec); 2150 if (sym_hash->size) 2151 sym_hash->size -= calc_fixup (sym_hash->root.u.def.value, 2152 sym_hash->size, sec); 2153 } 2154 } 2155 2156 /* Physically move the code and change the cooked size. */ 2157 dest = sec->relax[0].addr; 2158 for (i = 0; i < sec->relax_count; i++) 2159 { 2160 int len; 2161 src = sec->relax[i].addr + sec->relax[i].size; 2162 len = sec->relax[i+1].addr - sec->relax[i].addr - sec->relax[i].size; 2163 2164 memmove (contents + dest, contents + src, len); 2165 sec->size -= sec->relax[i].size; 2166 dest += len; 2167 } 2168 2169 elf_section_data (sec)->relocs = internal_relocs; 2170 free_relocs = NULL; 2171 2172 elf_section_data (sec)->this_hdr.contents = contents; 2173 free_contents = NULL; 2174 2175 symtab_hdr->contents = (bfd_byte *) isymbuf; 2176 } 2177 2178 if (free_relocs != NULL) 2179 { 2180 free (free_relocs); 2181 free_relocs = NULL; 2182 } 2183 2184 if (free_contents != NULL) 2185 { 2186 if (!link_info->keep_memory) 2187 free (free_contents); 2188 else 2189 /* Cache the section contents for elf_link_input_bfd. */ 2190 elf_section_data (sec)->this_hdr.contents = contents; 2191 free_contents = NULL; 2192 } 2193 2194 if (sec->relax_count == 0) 2195 { 2196 *again = FALSE; 2197 free (sec->relax); 2198 sec->relax = NULL; 2199 } 2200 else 2201 *again = TRUE; 2202 return TRUE; 2203 2204 error_return: 2205 if (free_relocs != NULL) 2206 free (free_relocs); 2207 if (free_contents != NULL) 2208 free (free_contents); 2209 if (sec->relax != NULL) 2210 { 2211 free (sec->relax); 2212 sec->relax = NULL; 2213 sec->relax_count = 0; 2214 } 2215 return FALSE; 2216 } 2217 2218 /* Return the section that should be marked against GC for a given 2219 relocation. */ 2220 2221 static asection * 2222 microblaze_elf_gc_mark_hook (asection *sec, 2223 struct bfd_link_info * info, 2224 Elf_Internal_Rela * rel, 2225 struct elf_link_hash_entry * h, 2226 Elf_Internal_Sym * sym) 2227 { 2228 if (h != NULL) 2229 switch (ELF32_R_TYPE (rel->r_info)) 2230 { 2231 case R_MICROBLAZE_GNU_VTINHERIT: 2232 case R_MICROBLAZE_GNU_VTENTRY: 2233 return NULL; 2234 } 2235 2236 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym); 2237 } 2238 2239 /* Update the got entry reference counts for the section being removed. */ 2240 2241 static bfd_boolean 2242 microblaze_elf_gc_sweep_hook (bfd * abfd ATTRIBUTE_UNUSED, 2243 struct bfd_link_info * info ATTRIBUTE_UNUSED, 2244 asection * sec ATTRIBUTE_UNUSED, 2245 const Elf_Internal_Rela * relocs ATTRIBUTE_UNUSED) 2246 { 2247 return TRUE; 2248 } 2249 2250 /* PIC support. */ 2251 2252 #define PLT_ENTRY_SIZE 16 2253 2254 #define PLT_ENTRY_WORD_0 0xb0000000 /* "imm 0". */ 2255 #define PLT_ENTRY_WORD_1 0xe9940000 /* "lwi r12,r20,0" - relocated to lwi r12,r20,func@GOT. */ 2256 #define PLT_ENTRY_WORD_1_NOPIC 0xe9800000 /* "lwi r12,r0,0" - non-PIC object. */ 2257 #define PLT_ENTRY_WORD_2 0x98186000 /* "brad r12". */ 2258 #define PLT_ENTRY_WORD_3 0x80000000 /* "nop". */ 2259 2260 /* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up 2261 shortcuts to them in our hash table. */ 2262 2263 static bfd_boolean 2264 create_got_section (bfd *dynobj, struct bfd_link_info *info) 2265 { 2266 struct elf32_mb_link_hash_table *htab; 2267 2268 if (! _bfd_elf_create_got_section (dynobj, info)) 2269 return FALSE; 2270 htab = elf32_mb_hash_table (info); 2271 if (htab == NULL) 2272 return FALSE; 2273 2274 htab->sgot = bfd_get_linker_section (dynobj, ".got"); 2275 htab->sgotplt = bfd_get_linker_section (dynobj, ".got.plt"); 2276 if (!htab->sgot || !htab->sgotplt) 2277 return FALSE; 2278 2279 if ((htab->srelgot = bfd_get_linker_section (dynobj, ".rela.got")) == NULL) 2280 htab->srelgot = bfd_make_section_anyway (dynobj, ".rela.got"); 2281 if (htab->srelgot == NULL 2282 || ! bfd_set_section_flags (dynobj, htab->srelgot, SEC_ALLOC 2283 | SEC_LOAD 2284 | SEC_HAS_CONTENTS 2285 | SEC_IN_MEMORY 2286 | SEC_LINKER_CREATED 2287 | SEC_READONLY) 2288 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 2)) 2289 return FALSE; 2290 return TRUE; 2291 } 2292 2293 static bfd_boolean 2294 update_local_sym_info (bfd *abfd, 2295 Elf_Internal_Shdr *symtab_hdr, 2296 unsigned long r_symndx, 2297 unsigned int tls_type) 2298 { 2299 bfd_signed_vma *local_got_refcounts = elf_local_got_refcounts (abfd); 2300 unsigned char *local_got_tls_masks; 2301 2302 if (local_got_refcounts == NULL) 2303 { 2304 bfd_size_type size = symtab_hdr->sh_info; 2305 2306 size *= (sizeof (*local_got_refcounts) + sizeof (*local_got_tls_masks)); 2307 local_got_refcounts = bfd_zalloc (abfd, size); 2308 if (local_got_refcounts == NULL) 2309 return FALSE; 2310 elf_local_got_refcounts (abfd) = local_got_refcounts; 2311 } 2312 2313 local_got_tls_masks = 2314 (unsigned char *) (local_got_refcounts + symtab_hdr->sh_info); 2315 local_got_tls_masks[r_symndx] |= tls_type; 2316 local_got_refcounts[r_symndx] += 1; 2317 2318 return TRUE; 2319 } 2320 /* Look through the relocs for a section during the first phase. */ 2321 2322 static bfd_boolean 2323 microblaze_elf_check_relocs (bfd * abfd, 2324 struct bfd_link_info * info, 2325 asection * sec, 2326 const Elf_Internal_Rela * relocs) 2327 { 2328 Elf_Internal_Shdr * symtab_hdr; 2329 struct elf_link_hash_entry ** sym_hashes; 2330 struct elf_link_hash_entry ** sym_hashes_end; 2331 const Elf_Internal_Rela * rel; 2332 const Elf_Internal_Rela * rel_end; 2333 struct elf32_mb_link_hash_table *htab; 2334 asection *sreloc = NULL; 2335 2336 if (bfd_link_relocatable (info)) 2337 return TRUE; 2338 2339 htab = elf32_mb_hash_table (info); 2340 if (htab == NULL) 2341 return FALSE; 2342 2343 symtab_hdr = & elf_tdata (abfd)->symtab_hdr; 2344 sym_hashes = elf_sym_hashes (abfd); 2345 sym_hashes_end = sym_hashes + symtab_hdr->sh_size / sizeof (Elf32_External_Sym); 2346 if (!elf_bad_symtab (abfd)) 2347 sym_hashes_end -= symtab_hdr->sh_info; 2348 2349 rel_end = relocs + sec->reloc_count; 2350 2351 for (rel = relocs; rel < rel_end; rel++) 2352 { 2353 unsigned int r_type; 2354 struct elf_link_hash_entry * h; 2355 unsigned long r_symndx; 2356 unsigned char tls_type = 0; 2357 2358 r_symndx = ELF32_R_SYM (rel->r_info); 2359 r_type = ELF32_R_TYPE (rel->r_info); 2360 2361 if (r_symndx < symtab_hdr->sh_info) 2362 h = NULL; 2363 else 2364 { 2365 h = sym_hashes [r_symndx - symtab_hdr->sh_info]; 2366 2367 /* PR15323, ref flags aren't set for references in the same 2368 object. */ 2369 h->root.non_ir_ref = 1; 2370 } 2371 2372 switch (r_type) 2373 { 2374 /* This relocation describes the C++ object vtable hierarchy. 2375 Reconstruct it for later use during GC. */ 2376 case R_MICROBLAZE_GNU_VTINHERIT: 2377 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset)) 2378 return FALSE; 2379 break; 2380 2381 /* This relocation describes which C++ vtable entries are actually 2382 used. Record for later use during GC. */ 2383 case R_MICROBLAZE_GNU_VTENTRY: 2384 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend)) 2385 return FALSE; 2386 break; 2387 2388 /* This relocation requires .plt entry. */ 2389 case R_MICROBLAZE_PLT_64: 2390 if (h != NULL) 2391 { 2392 h->needs_plt = 1; 2393 h->plt.refcount += 1; 2394 } 2395 break; 2396 2397 /* This relocation requires .got entry. */ 2398 case R_MICROBLAZE_TLSGD: 2399 tls_type |= (TLS_TLS | TLS_GD); 2400 goto dogottls; 2401 case R_MICROBLAZE_TLSLD: 2402 tls_type |= (TLS_TLS | TLS_LD); 2403 dogottls: 2404 sec->has_tls_reloc = 1; 2405 case R_MICROBLAZE_GOT_64: 2406 if (htab->sgot == NULL) 2407 { 2408 if (htab->elf.dynobj == NULL) 2409 htab->elf.dynobj = abfd; 2410 if (!create_got_section (htab->elf.dynobj, info)) 2411 return FALSE; 2412 } 2413 if (h != NULL) 2414 { 2415 h->got.refcount += 1; 2416 elf32_mb_hash_entry (h)->tls_mask |= tls_type; 2417 } 2418 else 2419 { 2420 if (! update_local_sym_info(abfd, symtab_hdr, r_symndx, tls_type) ) 2421 return FALSE; 2422 } 2423 break; 2424 2425 case R_MICROBLAZE_64: 2426 case R_MICROBLAZE_64_PCREL: 2427 case R_MICROBLAZE_32: 2428 { 2429 if (h != NULL && !bfd_link_pic (info)) 2430 { 2431 /* we may need a copy reloc. */ 2432 h->non_got_ref = 1; 2433 2434 /* we may also need a .plt entry. */ 2435 h->plt.refcount += 1; 2436 if (ELF32_R_TYPE (rel->r_info) != R_MICROBLAZE_64_PCREL) 2437 h->pointer_equality_needed = 1; 2438 } 2439 2440 2441 /* If we are creating a shared library, and this is a reloc 2442 against a global symbol, or a non PC relative reloc 2443 against a local symbol, then we need to copy the reloc 2444 into the shared library. However, if we are linking with 2445 -Bsymbolic, we do not need to copy a reloc against a 2446 global symbol which is defined in an object we are 2447 including in the link (i.e., DEF_REGULAR is set). At 2448 this point we have not seen all the input files, so it is 2449 possible that DEF_REGULAR is not set now but will be set 2450 later (it is never cleared). In case of a weak definition, 2451 DEF_REGULAR may be cleared later by a strong definition in 2452 a shared library. We account for that possibility below by 2453 storing information in the relocs_copied field of the hash 2454 table entry. A similar situation occurs when creating 2455 shared libraries and symbol visibility changes render the 2456 symbol local. 2457 2458 If on the other hand, we are creating an executable, we 2459 may need to keep relocations for symbols satisfied by a 2460 dynamic library if we manage to avoid copy relocs for the 2461 symbol. */ 2462 2463 if ((bfd_link_pic (info) 2464 && (sec->flags & SEC_ALLOC) != 0 2465 && (r_type != R_MICROBLAZE_64_PCREL 2466 || (h != NULL 2467 && (! info->symbolic 2468 || h->root.type == bfd_link_hash_defweak 2469 || !h->def_regular)))) 2470 || (!bfd_link_pic (info) 2471 && (sec->flags & SEC_ALLOC) != 0 2472 && h != NULL 2473 && (h->root.type == bfd_link_hash_defweak 2474 || !h->def_regular))) 2475 { 2476 struct elf32_mb_dyn_relocs *p; 2477 struct elf32_mb_dyn_relocs **head; 2478 2479 /* When creating a shared object, we must copy these 2480 relocs into the output file. We create a reloc 2481 section in dynobj and make room for the reloc. */ 2482 2483 if (sreloc == NULL) 2484 { 2485 bfd *dynobj; 2486 2487 if (htab->elf.dynobj == NULL) 2488 htab->elf.dynobj = abfd; 2489 dynobj = htab->elf.dynobj; 2490 2491 sreloc = _bfd_elf_make_dynamic_reloc_section (sec, dynobj, 2492 2, abfd, 1); 2493 if (sreloc == NULL) 2494 return FALSE; 2495 } 2496 2497 /* If this is a global symbol, we count the number of 2498 relocations we need for this symbol. */ 2499 if (h != NULL) 2500 head = &((struct elf32_mb_link_hash_entry *) h)->dyn_relocs; 2501 else 2502 { 2503 /* Track dynamic relocs needed for local syms too. 2504 We really need local syms available to do this 2505 easily. Oh well. */ 2506 2507 asection *s; 2508 Elf_Internal_Sym *isym; 2509 void *vpp; 2510 2511 isym = bfd_sym_from_r_symndx (&htab->sym_sec, 2512 abfd, r_symndx); 2513 if (isym == NULL) 2514 return FALSE; 2515 2516 s = bfd_section_from_elf_index (abfd, isym->st_shndx); 2517 if (s == NULL) 2518 return FALSE; 2519 2520 vpp = &elf_section_data (s)->local_dynrel; 2521 head = (struct elf32_mb_dyn_relocs **) vpp; 2522 } 2523 2524 p = *head; 2525 if (p == NULL || p->sec != sec) 2526 { 2527 bfd_size_type amt = sizeof *p; 2528 p = ((struct elf32_mb_dyn_relocs *) 2529 bfd_alloc (htab->elf.dynobj, amt)); 2530 if (p == NULL) 2531 return FALSE; 2532 p->next = *head; 2533 *head = p; 2534 p->sec = sec; 2535 p->count = 0; 2536 p->pc_count = 0; 2537 } 2538 2539 p->count += 1; 2540 if (r_type == R_MICROBLAZE_64_PCREL) 2541 p->pc_count += 1; 2542 } 2543 } 2544 break; 2545 } 2546 } 2547 2548 return TRUE; 2549 } 2550 2551 static bfd_boolean 2552 microblaze_elf_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info) 2553 { 2554 struct elf32_mb_link_hash_table *htab; 2555 2556 htab = elf32_mb_hash_table (info); 2557 if (htab == NULL) 2558 return FALSE; 2559 2560 if (!htab->sgot && !create_got_section (dynobj, info)) 2561 return FALSE; 2562 2563 if (!_bfd_elf_create_dynamic_sections (dynobj, info)) 2564 return FALSE; 2565 2566 htab->splt = bfd_get_linker_section (dynobj, ".plt"); 2567 htab->srelplt = bfd_get_linker_section (dynobj, ".rela.plt"); 2568 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss"); 2569 if (!bfd_link_pic (info)) 2570 htab->srelbss = bfd_get_linker_section (dynobj, ".rela.bss"); 2571 2572 if (!htab->splt || !htab->srelplt || !htab->sdynbss 2573 || (!bfd_link_pic (info) && !htab->srelbss)) 2574 abort (); 2575 2576 return TRUE; 2577 } 2578 2579 /* Copy the extra info we tack onto an elf_link_hash_entry. */ 2580 2581 static void 2582 microblaze_elf_copy_indirect_symbol (struct bfd_link_info *info, 2583 struct elf_link_hash_entry *dir, 2584 struct elf_link_hash_entry *ind) 2585 { 2586 struct elf32_mb_link_hash_entry *edir, *eind; 2587 2588 edir = (struct elf32_mb_link_hash_entry *) dir; 2589 eind = (struct elf32_mb_link_hash_entry *) ind; 2590 2591 if (eind->dyn_relocs != NULL) 2592 { 2593 if (edir->dyn_relocs != NULL) 2594 { 2595 struct elf32_mb_dyn_relocs **pp; 2596 struct elf32_mb_dyn_relocs *p; 2597 2598 if (ind->root.type == bfd_link_hash_indirect) 2599 abort (); 2600 2601 /* Add reloc counts against the weak sym to the strong sym 2602 list. Merge any entries against the same section. */ 2603 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; ) 2604 { 2605 struct elf32_mb_dyn_relocs *q; 2606 2607 for (q = edir->dyn_relocs; q != NULL; q = q->next) 2608 if (q->sec == p->sec) 2609 { 2610 q->pc_count += p->pc_count; 2611 q->count += p->count; 2612 *pp = p->next; 2613 break; 2614 } 2615 if (q == NULL) 2616 pp = &p->next; 2617 } 2618 *pp = edir->dyn_relocs; 2619 } 2620 2621 edir->dyn_relocs = eind->dyn_relocs; 2622 eind->dyn_relocs = NULL; 2623 } 2624 2625 edir->tls_mask |= eind->tls_mask; 2626 2627 _bfd_elf_link_hash_copy_indirect (info, dir, ind); 2628 } 2629 2630 static bfd_boolean 2631 microblaze_elf_adjust_dynamic_symbol (struct bfd_link_info *info, 2632 struct elf_link_hash_entry *h) 2633 { 2634 struct elf32_mb_link_hash_table *htab; 2635 struct elf32_mb_link_hash_entry * eh; 2636 struct elf32_mb_dyn_relocs *p; 2637 asection *sdynbss, *s; 2638 unsigned int power_of_two; 2639 bfd *dynobj; 2640 2641 htab = elf32_mb_hash_table (info); 2642 if (htab == NULL) 2643 return FALSE; 2644 2645 /* If this is a function, put it in the procedure linkage table. We 2646 will fill in the contents of the procedure linkage table later, 2647 when we know the address of the .got section. */ 2648 if (h->type == STT_FUNC 2649 || h->needs_plt) 2650 { 2651 if (h->plt.refcount <= 0 2652 || SYMBOL_CALLS_LOCAL (info, h) 2653 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT 2654 && h->root.type == bfd_link_hash_undefweak)) 2655 { 2656 /* This case can occur if we saw a PLT reloc in an input 2657 file, but the symbol was never referred to by a dynamic 2658 object, or if all references were garbage collected. In 2659 such a case, we don't actually need to build a procedure 2660 linkage table, and we can just do a PC32 reloc instead. */ 2661 h->plt.offset = (bfd_vma) -1; 2662 h->needs_plt = 0; 2663 } 2664 2665 return TRUE; 2666 } 2667 else 2668 /* It's possible that we incorrectly decided a .plt reloc was 2669 needed for an R_MICROBLAZE_64_PCREL reloc to a non-function sym in 2670 check_relocs. We can't decide accurately between function and 2671 non-function syms in check-relocs; Objects loaded later in 2672 the link may change h->type. So fix it now. */ 2673 h->plt.offset = (bfd_vma) -1; 2674 2675 /* If this is a weak symbol, and there is a real definition, the 2676 processor independent code will have arranged for us to see the 2677 real definition first, and we can just use the same value. */ 2678 if (h->u.weakdef != NULL) 2679 { 2680 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined 2681 || h->u.weakdef->root.type == bfd_link_hash_defweak); 2682 h->root.u.def.section = h->u.weakdef->root.u.def.section; 2683 h->root.u.def.value = h->u.weakdef->root.u.def.value; 2684 return TRUE; 2685 } 2686 2687 /* This is a reference to a symbol defined by a dynamic object which 2688 is not a function. */ 2689 2690 /* If we are creating a shared library, we must presume that the 2691 only references to the symbol are via the global offset table. 2692 For such cases we need not do anything here; the relocations will 2693 be handled correctly by relocate_section. */ 2694 if (bfd_link_pic (info)) 2695 return TRUE; 2696 2697 /* If there are no references to this symbol that do not use the 2698 GOT, we don't need to generate a copy reloc. */ 2699 if (!h->non_got_ref) 2700 return TRUE; 2701 2702 /* If -z nocopyreloc was given, we won't generate them either. */ 2703 if (info->nocopyreloc) 2704 { 2705 h->non_got_ref = 0; 2706 return TRUE; 2707 } 2708 2709 eh = (struct elf32_mb_link_hash_entry *) h; 2710 for (p = eh->dyn_relocs; p != NULL; p = p->next) 2711 { 2712 s = p->sec->output_section; 2713 if (s != NULL && (s->flags & SEC_READONLY) != 0) 2714 break; 2715 } 2716 2717 /* If we didn't find any dynamic relocs in read-only sections, then 2718 we'll be keeping the dynamic relocs and avoiding the copy reloc. */ 2719 if (p == NULL) 2720 { 2721 h->non_got_ref = 0; 2722 return TRUE; 2723 } 2724 2725 /* We must allocate the symbol in our .dynbss section, which will 2726 become part of the .bss section of the executable. There will be 2727 an entry for this symbol in the .dynsym section. The dynamic 2728 object will contain position independent code, so all references 2729 from the dynamic object to this symbol will go through the global 2730 offset table. The dynamic linker will use the .dynsym entry to 2731 determine the address it must put in the global offset table, so 2732 both the dynamic object and the regular object will refer to the 2733 same memory location for the variable. */ 2734 2735 /* We must generate a R_MICROBLAZE_COPY reloc to tell the dynamic linker 2736 to copy the initial value out of the dynamic object and into the 2737 runtime process image. */ 2738 dynobj = elf_hash_table (info)->dynobj; 2739 BFD_ASSERT (dynobj != NULL); 2740 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0) 2741 { 2742 htab->srelbss->size += sizeof (Elf32_External_Rela); 2743 h->needs_copy = 1; 2744 } 2745 2746 /* We need to figure out the alignment required for this symbol. I 2747 have no idea how ELF linkers handle this. */ 2748 power_of_two = bfd_log2 (h->size); 2749 if (power_of_two > 3) 2750 power_of_two = 3; 2751 2752 sdynbss = htab->sdynbss; 2753 /* Apply the required alignment. */ 2754 sdynbss->size = BFD_ALIGN (sdynbss->size, (bfd_size_type) (1 << power_of_two)); 2755 if (power_of_two > bfd_get_section_alignment (dynobj, sdynbss)) 2756 { 2757 if (! bfd_set_section_alignment (dynobj, sdynbss, power_of_two)) 2758 return FALSE; 2759 } 2760 2761 /* Define the symbol as being at this point in the section. */ 2762 h->root.u.def.section = sdynbss; 2763 h->root.u.def.value = sdynbss->size; 2764 2765 /* Increment the section size to make room for the symbol. */ 2766 sdynbss->size += h->size; 2767 return TRUE; 2768 } 2769 2770 /* Allocate space in .plt, .got and associated reloc sections for 2771 dynamic relocs. */ 2772 2773 static bfd_boolean 2774 allocate_dynrelocs (struct elf_link_hash_entry *h, void * dat) 2775 { 2776 struct bfd_link_info *info; 2777 struct elf32_mb_link_hash_table *htab; 2778 struct elf32_mb_link_hash_entry *eh; 2779 struct elf32_mb_dyn_relocs *p; 2780 2781 if (h->root.type == bfd_link_hash_indirect) 2782 return TRUE; 2783 2784 info = (struct bfd_link_info *) dat; 2785 htab = elf32_mb_hash_table (info); 2786 if (htab == NULL) 2787 return FALSE; 2788 2789 if (htab->elf.dynamic_sections_created 2790 && h->plt.refcount > 0) 2791 { 2792 /* Make sure this symbol is output as a dynamic symbol. 2793 Undefined weak syms won't yet be marked as dynamic. */ 2794 if (h->dynindx == -1 2795 && !h->forced_local) 2796 { 2797 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2798 return FALSE; 2799 } 2800 2801 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)) 2802 { 2803 asection *s = htab->splt; 2804 2805 /* The first entry in .plt is reserved. */ 2806 if (s->size == 0) 2807 s->size = PLT_ENTRY_SIZE; 2808 2809 h->plt.offset = s->size; 2810 2811 /* If this symbol is not defined in a regular file, and we are 2812 not generating a shared library, then set the symbol to this 2813 location in the .plt. This is required to make function 2814 pointers compare as equal between the normal executable and 2815 the shared library. */ 2816 if (! bfd_link_pic (info) 2817 && !h->def_regular) 2818 { 2819 h->root.u.def.section = s; 2820 h->root.u.def.value = h->plt.offset; 2821 } 2822 2823 /* Make room for this entry. */ 2824 s->size += PLT_ENTRY_SIZE; 2825 2826 /* We also need to make an entry in the .got.plt section, which 2827 will be placed in the .got section by the linker script. */ 2828 htab->sgotplt->size += 4; 2829 2830 /* We also need to make an entry in the .rel.plt section. */ 2831 htab->srelplt->size += sizeof (Elf32_External_Rela); 2832 } 2833 else 2834 { 2835 h->plt.offset = (bfd_vma) -1; 2836 h->needs_plt = 0; 2837 } 2838 } 2839 else 2840 { 2841 h->plt.offset = (bfd_vma) -1; 2842 h->needs_plt = 0; 2843 } 2844 2845 eh = (struct elf32_mb_link_hash_entry *) h; 2846 if (h->got.refcount > 0) 2847 { 2848 unsigned int need; 2849 asection *s; 2850 2851 /* Make sure this symbol is output as a dynamic symbol. 2852 Undefined weak syms won't yet be marked as dynamic. */ 2853 if (h->dynindx == -1 2854 && !h->forced_local) 2855 { 2856 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2857 return FALSE; 2858 } 2859 2860 need = 0; 2861 if ((eh->tls_mask & TLS_TLS) != 0) 2862 { 2863 /* Handle TLS Symbol */ 2864 if ((eh->tls_mask & TLS_LD) != 0) 2865 { 2866 if (!eh->elf.def_dynamic) 2867 /* We'll just use htab->tlsld_got.offset. This should 2868 always be the case. It's a little odd if we have 2869 a local dynamic reloc against a non-local symbol. */ 2870 htab->tlsld_got.refcount += 1; 2871 else 2872 need += 8; 2873 } 2874 if ((eh->tls_mask & TLS_GD) != 0) 2875 need += 8; 2876 } 2877 else 2878 { 2879 /* Regular (non-TLS) symbol */ 2880 need += 4; 2881 } 2882 if (need == 0) 2883 { 2884 h->got.offset = (bfd_vma) -1; 2885 } 2886 else 2887 { 2888 s = htab->sgot; 2889 h->got.offset = s->size; 2890 s->size += need; 2891 htab->srelgot->size += need * (sizeof (Elf32_External_Rela) / 4); 2892 } 2893 } 2894 else 2895 h->got.offset = (bfd_vma) -1; 2896 2897 if (eh->dyn_relocs == NULL) 2898 return TRUE; 2899 2900 /* In the shared -Bsymbolic case, discard space allocated for 2901 dynamic pc-relative relocs against symbols which turn out to be 2902 defined in regular objects. For the normal shared case, discard 2903 space for pc-relative relocs that have become local due to symbol 2904 visibility changes. */ 2905 2906 if (bfd_link_pic (info)) 2907 { 2908 if (h->def_regular 2909 && (h->forced_local 2910 || info->symbolic)) 2911 { 2912 struct elf32_mb_dyn_relocs **pp; 2913 2914 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; ) 2915 { 2916 p->count -= p->pc_count; 2917 p->pc_count = 0; 2918 if (p->count == 0) 2919 *pp = p->next; 2920 else 2921 pp = &p->next; 2922 } 2923 } 2924 } 2925 else 2926 { 2927 /* For the non-shared case, discard space for relocs against 2928 symbols which turn out to need copy relocs or are not 2929 dynamic. */ 2930 2931 if (!h->non_got_ref 2932 && ((h->def_dynamic 2933 && !h->def_regular) 2934 || (htab->elf.dynamic_sections_created 2935 && (h->root.type == bfd_link_hash_undefweak 2936 || h->root.type == bfd_link_hash_undefined)))) 2937 { 2938 /* Make sure this symbol is output as a dynamic symbol. 2939 Undefined weak syms won't yet be marked as dynamic. */ 2940 if (h->dynindx == -1 2941 && !h->forced_local) 2942 { 2943 if (! bfd_elf_link_record_dynamic_symbol (info, h)) 2944 return FALSE; 2945 } 2946 2947 /* If that succeeded, we know we'll be keeping all the 2948 relocs. */ 2949 if (h->dynindx != -1) 2950 goto keep; 2951 } 2952 2953 eh->dyn_relocs = NULL; 2954 2955 keep: ; 2956 } 2957 2958 /* Finally, allocate space. */ 2959 for (p = eh->dyn_relocs; p != NULL; p = p->next) 2960 { 2961 asection *sreloc = elf_section_data (p->sec)->sreloc; 2962 sreloc->size += p->count * sizeof (Elf32_External_Rela); 2963 } 2964 2965 return TRUE; 2966 } 2967 2968 /* Set the sizes of the dynamic sections. */ 2969 2970 static bfd_boolean 2971 microblaze_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED, 2972 struct bfd_link_info *info) 2973 { 2974 struct elf32_mb_link_hash_table *htab; 2975 bfd *dynobj; 2976 asection *s; 2977 bfd *ibfd; 2978 2979 htab = elf32_mb_hash_table (info); 2980 if (htab == NULL) 2981 return FALSE; 2982 2983 dynobj = htab->elf.dynobj; 2984 BFD_ASSERT (dynobj != NULL); 2985 2986 /* Set up .got offsets for local syms, and space for local dynamic 2987 relocs. */ 2988 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 2989 { 2990 bfd_signed_vma *local_got; 2991 bfd_signed_vma *end_local_got; 2992 bfd_size_type locsymcount; 2993 Elf_Internal_Shdr *symtab_hdr; 2994 unsigned char *lgot_masks; 2995 asection *srel; 2996 2997 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour) 2998 continue; 2999 3000 for (s = ibfd->sections; s != NULL; s = s->next) 3001 { 3002 struct elf32_mb_dyn_relocs *p; 3003 3004 for (p = ((struct elf32_mb_dyn_relocs *) 3005 elf_section_data (s)->local_dynrel); 3006 p != NULL; 3007 p = p->next) 3008 { 3009 if (!bfd_is_abs_section (p->sec) 3010 && bfd_is_abs_section (p->sec->output_section)) 3011 { 3012 /* Input section has been discarded, either because 3013 it is a copy of a linkonce section or due to 3014 linker script /DISCARD/, so we'll be discarding 3015 the relocs too. */ 3016 } 3017 else if (p->count != 0) 3018 { 3019 srel = elf_section_data (p->sec)->sreloc; 3020 srel->size += p->count * sizeof (Elf32_External_Rela); 3021 if ((p->sec->output_section->flags & SEC_READONLY) != 0) 3022 info->flags |= DF_TEXTREL; 3023 } 3024 } 3025 } 3026 3027 local_got = elf_local_got_refcounts (ibfd); 3028 if (!local_got) 3029 continue; 3030 3031 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr; 3032 locsymcount = symtab_hdr->sh_info; 3033 end_local_got = local_got + locsymcount; 3034 lgot_masks = (unsigned char *) end_local_got; 3035 s = htab->sgot; 3036 srel = htab->srelgot; 3037 3038 for (; local_got < end_local_got; ++local_got, ++lgot_masks) 3039 { 3040 if (*local_got > 0) 3041 { 3042 unsigned int need = 0; 3043 if ((*lgot_masks & TLS_TLS) != 0) 3044 { 3045 if ((*lgot_masks & TLS_GD) != 0) 3046 need += 8; 3047 if ((*lgot_masks & TLS_LD) != 0) 3048 htab->tlsld_got.refcount += 1; 3049 } 3050 else 3051 need += 4; 3052 3053 if (need == 0) 3054 { 3055 *local_got = (bfd_vma) -1; 3056 } 3057 else 3058 { 3059 *local_got = s->size; 3060 s->size += need; 3061 if (bfd_link_pic (info)) 3062 srel->size += need * (sizeof (Elf32_External_Rela) / 4); 3063 } 3064 } 3065 else 3066 *local_got = (bfd_vma) -1; 3067 } 3068 } 3069 3070 /* Allocate global sym .plt and .got entries, and space for global 3071 sym dynamic relocs. */ 3072 elf_link_hash_traverse (elf_hash_table (info), allocate_dynrelocs, info); 3073 3074 if (htab->tlsld_got.refcount > 0) 3075 { 3076 htab->tlsld_got.offset = htab->sgot->size; 3077 htab->sgot->size += 8; 3078 if (bfd_link_pic (info)) 3079 htab->srelgot->size += sizeof (Elf32_External_Rela); 3080 } 3081 else 3082 htab->tlsld_got.offset = (bfd_vma) -1; 3083 3084 if (elf_hash_table (info)->dynamic_sections_created) 3085 { 3086 /* Make space for the trailing nop in .plt. */ 3087 if (htab->splt->size > 0) 3088 htab->splt->size += 4; 3089 } 3090 3091 /* The check_relocs and adjust_dynamic_symbol entry points have 3092 determined the sizes of the various dynamic sections. Allocate 3093 memory for them. */ 3094 for (s = dynobj->sections; s != NULL; s = s->next) 3095 { 3096 const char *name; 3097 bfd_boolean strip = FALSE; 3098 3099 if ((s->flags & SEC_LINKER_CREATED) == 0) 3100 continue; 3101 3102 /* It's OK to base decisions on the section name, because none 3103 of the dynobj section names depend upon the input files. */ 3104 name = bfd_get_section_name (dynobj, s); 3105 3106 if (strncmp (name, ".rela", 5) == 0) 3107 { 3108 if (s->size == 0) 3109 { 3110 /* If we don't need this section, strip it from the 3111 output file. This is to handle .rela.bss and 3112 .rela.plt. We must create it in 3113 create_dynamic_sections, because it must be created 3114 before the linker maps input sections to output 3115 sections. The linker does that before 3116 adjust_dynamic_symbol is called, and it is that 3117 function which decides whether anything needs to go 3118 into these sections. */ 3119 strip = TRUE; 3120 } 3121 else 3122 { 3123 /* We use the reloc_count field as a counter if we need 3124 to copy relocs into the output file. */ 3125 s->reloc_count = 0; 3126 } 3127 } 3128 else if (s != htab->splt && s != htab->sgot && s != htab->sgotplt) 3129 { 3130 /* It's not one of our sections, so don't allocate space. */ 3131 continue; 3132 } 3133 3134 if (strip) 3135 { 3136 s->flags |= SEC_EXCLUDE; 3137 continue; 3138 } 3139 3140 /* Allocate memory for the section contents. */ 3141 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc. 3142 Unused entries should be reclaimed before the section's contents 3143 are written out, but at the moment this does not happen. Thus in 3144 order to prevent writing out garbage, we initialise the section's 3145 contents to zero. */ 3146 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size); 3147 if (s->contents == NULL && s->size != 0) 3148 return FALSE; 3149 } 3150 3151 if (elf_hash_table (info)->dynamic_sections_created) 3152 { 3153 /* Add some entries to the .dynamic section. We fill in the 3154 values later, in microblaze_elf_finish_dynamic_sections, but we 3155 must add the entries now so that we get the correct size for 3156 the .dynamic section. The DT_DEBUG entry is filled in by the 3157 dynamic linker and used by the debugger. */ 3158 #define add_dynamic_entry(TAG, VAL) \ 3159 _bfd_elf_add_dynamic_entry (info, TAG, VAL) 3160 3161 if (bfd_link_executable (info)) 3162 { 3163 if (!add_dynamic_entry (DT_DEBUG, 0)) 3164 return FALSE; 3165 } 3166 3167 if (!add_dynamic_entry (DT_RELA, 0) 3168 || !add_dynamic_entry (DT_RELASZ, 0) 3169 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela))) 3170 return FALSE; 3171 3172 if (htab->splt->size != 0) 3173 { 3174 if (!add_dynamic_entry (DT_PLTGOT, 0) 3175 || !add_dynamic_entry (DT_PLTRELSZ, 0) 3176 || !add_dynamic_entry (DT_PLTREL, DT_RELA) 3177 || !add_dynamic_entry (DT_JMPREL, 0) 3178 || !add_dynamic_entry (DT_BIND_NOW, 1)) 3179 return FALSE; 3180 } 3181 3182 if (info->flags & DF_TEXTREL) 3183 { 3184 if (!add_dynamic_entry (DT_TEXTREL, 0)) 3185 return FALSE; 3186 } 3187 } 3188 #undef add_dynamic_entry 3189 return TRUE; 3190 } 3191 3192 /* Finish up dynamic symbol handling. We set the contents of various 3193 dynamic sections here. */ 3194 3195 static bfd_boolean 3196 microblaze_elf_finish_dynamic_symbol (bfd *output_bfd, 3197 struct bfd_link_info *info, 3198 struct elf_link_hash_entry *h, 3199 Elf_Internal_Sym *sym) 3200 { 3201 struct elf32_mb_link_hash_table *htab; 3202 struct elf32_mb_link_hash_entry *eh = elf32_mb_hash_entry(h); 3203 3204 htab = elf32_mb_hash_table (info); 3205 if (htab == NULL) 3206 return FALSE; 3207 3208 if (h->plt.offset != (bfd_vma) -1) 3209 { 3210 asection *splt; 3211 asection *srela; 3212 asection *sgotplt; 3213 Elf_Internal_Rela rela; 3214 bfd_byte *loc; 3215 bfd_vma plt_index; 3216 bfd_vma got_offset; 3217 bfd_vma got_addr; 3218 3219 /* This symbol has an entry in the procedure linkage table. Set 3220 it up. */ 3221 BFD_ASSERT (h->dynindx != -1); 3222 3223 splt = htab->splt; 3224 srela = htab->srelplt; 3225 sgotplt = htab->sgotplt; 3226 BFD_ASSERT (splt != NULL && srela != NULL && sgotplt != NULL); 3227 3228 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1; /* first entry reserved. */ 3229 got_offset = (plt_index + 3) * 4; /* 3 reserved ??? */ 3230 got_addr = got_offset; 3231 3232 /* For non-PIC objects we need absolute address of the GOT entry. */ 3233 if (!bfd_link_pic (info)) 3234 got_addr += htab->sgotplt->output_section->vma + sgotplt->output_offset; 3235 3236 /* Fill in the entry in the procedure linkage table. */ 3237 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_0 + ((got_addr >> 16) & 0xffff), 3238 splt->contents + h->plt.offset); 3239 if (bfd_link_pic (info)) 3240 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1 + (got_addr & 0xffff), 3241 splt->contents + h->plt.offset + 4); 3242 else 3243 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1_NOPIC + (got_addr & 0xffff), 3244 splt->contents + h->plt.offset + 4); 3245 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_2, 3246 splt->contents + h->plt.offset + 8); 3247 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_3, 3248 splt->contents + h->plt.offset + 12); 3249 3250 /* Any additions to the .got section??? */ 3251 /* bfd_put_32 (output_bfd, 3252 splt->output_section->vma + splt->output_offset + h->plt.offset + 4, 3253 sgotplt->contents + got_offset); */ 3254 3255 /* Fill in the entry in the .rela.plt section. */ 3256 rela.r_offset = (sgotplt->output_section->vma 3257 + sgotplt->output_offset 3258 + got_offset); 3259 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_JUMP_SLOT); 3260 rela.r_addend = 0; 3261 loc = srela->contents; 3262 loc += plt_index * sizeof (Elf32_External_Rela); 3263 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 3264 3265 if (!h->def_regular) 3266 { 3267 /* Mark the symbol as undefined, rather than as defined in 3268 the .plt section. Zero the value. */ 3269 sym->st_shndx = SHN_UNDEF; 3270 sym->st_value = 0; 3271 } 3272 } 3273 3274 /* h->got.refcount to be checked ? */ 3275 if (h->got.offset != (bfd_vma) -1 && 3276 ! ((h->got.offset & 1) || 3277 IS_TLS_LD(eh->tls_mask) || IS_TLS_GD(eh->tls_mask))) 3278 { 3279 asection *sgot; 3280 asection *srela; 3281 bfd_vma offset; 3282 3283 /* This symbol has an entry in the global offset table. Set it 3284 up. */ 3285 3286 sgot = htab->sgot; 3287 srela = htab->srelgot; 3288 BFD_ASSERT (sgot != NULL && srela != NULL); 3289 3290 offset = (sgot->output_section->vma + sgot->output_offset 3291 + (h->got.offset &~ (bfd_vma) 1)); 3292 3293 /* If this is a -Bsymbolic link, and the symbol is defined 3294 locally, we just want to emit a RELATIVE reloc. Likewise if 3295 the symbol was forced to be local because of a version file. 3296 The entry in the global offset table will already have been 3297 initialized in the relocate_section function. */ 3298 if (bfd_link_pic (info) 3299 && (info->symbolic || h->dynindx == -1) 3300 && h->def_regular) 3301 { 3302 asection *sec = h->root.u.def.section; 3303 microblaze_elf_output_dynamic_relocation (output_bfd, 3304 srela, srela->reloc_count++, 3305 /* symindex= */ 0, 3306 R_MICROBLAZE_REL, offset, 3307 h->root.u.def.value 3308 + sec->output_section->vma 3309 + sec->output_offset); 3310 } 3311 else 3312 { 3313 microblaze_elf_output_dynamic_relocation (output_bfd, 3314 srela, srela->reloc_count++, 3315 h->dynindx, 3316 R_MICROBLAZE_GLOB_DAT, 3317 offset, 0); 3318 } 3319 3320 bfd_put_32 (output_bfd, (bfd_vma) 0, 3321 sgot->contents + (h->got.offset &~ (bfd_vma) 1)); 3322 } 3323 3324 if (h->needs_copy) 3325 { 3326 asection *s; 3327 Elf_Internal_Rela rela; 3328 bfd_byte *loc; 3329 3330 /* This symbols needs a copy reloc. Set it up. */ 3331 3332 BFD_ASSERT (h->dynindx != -1); 3333 3334 s = bfd_get_linker_section (htab->elf.dynobj, ".rela.bss"); 3335 BFD_ASSERT (s != NULL); 3336 3337 rela.r_offset = (h->root.u.def.value 3338 + h->root.u.def.section->output_section->vma 3339 + h->root.u.def.section->output_offset); 3340 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_COPY); 3341 rela.r_addend = 0; 3342 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela); 3343 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc); 3344 } 3345 3346 /* Mark some specially defined symbols as absolute. */ 3347 if (h == htab->elf.hdynamic 3348 || h == htab->elf.hgot 3349 || h == htab->elf.hplt) 3350 sym->st_shndx = SHN_ABS; 3351 3352 return TRUE; 3353 } 3354 3355 3356 /* Finish up the dynamic sections. */ 3357 3358 static bfd_boolean 3359 microblaze_elf_finish_dynamic_sections (bfd *output_bfd, 3360 struct bfd_link_info *info) 3361 { 3362 bfd *dynobj; 3363 asection *sdyn, *sgot; 3364 struct elf32_mb_link_hash_table *htab; 3365 3366 htab = elf32_mb_hash_table (info); 3367 if (htab == NULL) 3368 return FALSE; 3369 3370 dynobj = htab->elf.dynobj; 3371 3372 sdyn = bfd_get_linker_section (dynobj, ".dynamic"); 3373 3374 if (htab->elf.dynamic_sections_created) 3375 { 3376 asection *splt; 3377 Elf32_External_Dyn *dyncon, *dynconend; 3378 3379 splt = bfd_get_linker_section (dynobj, ".plt"); 3380 BFD_ASSERT (splt != NULL && sdyn != NULL); 3381 3382 dyncon = (Elf32_External_Dyn *) sdyn->contents; 3383 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size); 3384 for (; dyncon < dynconend; dyncon++) 3385 { 3386 Elf_Internal_Dyn dyn; 3387 const char *name; 3388 bfd_boolean size; 3389 3390 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn); 3391 3392 switch (dyn.d_tag) 3393 { 3394 case DT_PLTGOT: name = ".got.plt"; size = FALSE; break; 3395 case DT_PLTRELSZ: name = ".rela.plt"; size = TRUE; break; 3396 case DT_JMPREL: name = ".rela.plt"; size = FALSE; break; 3397 case DT_RELA: name = ".rela.dyn"; size = FALSE; break; 3398 case DT_RELASZ: name = ".rela.dyn"; size = TRUE; break; 3399 default: name = NULL; size = FALSE; break; 3400 } 3401 3402 if (name != NULL) 3403 { 3404 asection *s; 3405 3406 s = bfd_get_section_by_name (output_bfd, name); 3407 if (s == NULL) 3408 dyn.d_un.d_val = 0; 3409 else 3410 { 3411 if (! size) 3412 dyn.d_un.d_ptr = s->vma; 3413 else 3414 dyn.d_un.d_val = s->size; 3415 } 3416 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon); 3417 } 3418 } 3419 3420 /* Clear the first entry in the procedure linkage table, 3421 and put a nop in the last four bytes. */ 3422 if (splt->size > 0) 3423 { 3424 memset (splt->contents, 0, PLT_ENTRY_SIZE); 3425 bfd_put_32 (output_bfd, (bfd_vma) 0x80000000 /* nop. */, 3426 splt->contents + splt->size - 4); 3427 } 3428 3429 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4; 3430 } 3431 3432 /* Set the first entry in the global offset table to the address of 3433 the dynamic section. */ 3434 sgot = bfd_get_linker_section (dynobj, ".got.plt"); 3435 if (sgot && sgot->size > 0) 3436 { 3437 if (sdyn == NULL) 3438 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents); 3439 else 3440 bfd_put_32 (output_bfd, 3441 sdyn->output_section->vma + sdyn->output_offset, 3442 sgot->contents); 3443 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4; 3444 } 3445 3446 if (htab->sgot && htab->sgot->size > 0) 3447 elf_section_data (htab->sgot->output_section)->this_hdr.sh_entsize = 4; 3448 3449 return TRUE; 3450 } 3451 3452 /* Hook called by the linker routine which adds symbols from an object 3453 file. We use it to put .comm items in .sbss, and not .bss. */ 3454 3455 static bfd_boolean 3456 microblaze_elf_add_symbol_hook (bfd *abfd, 3457 struct bfd_link_info *info, 3458 Elf_Internal_Sym *sym, 3459 const char **namep ATTRIBUTE_UNUSED, 3460 flagword *flagsp ATTRIBUTE_UNUSED, 3461 asection **secp, 3462 bfd_vma *valp) 3463 { 3464 if (sym->st_shndx == SHN_COMMON 3465 && !bfd_link_relocatable (info) 3466 && sym->st_size <= elf_gp_size (abfd)) 3467 { 3468 /* Common symbols less than or equal to -G nn bytes are automatically 3469 put into .sbss. */ 3470 *secp = bfd_make_section_old_way (abfd, ".sbss"); 3471 if (*secp == NULL 3472 || ! bfd_set_section_flags (abfd, *secp, SEC_IS_COMMON)) 3473 return FALSE; 3474 3475 *valp = sym->st_size; 3476 } 3477 3478 return TRUE; 3479 } 3480 3481 #define TARGET_LITTLE_SYM microblaze_elf32_le_vec 3482 #define TARGET_LITTLE_NAME "elf32-microblazeel" 3483 3484 #define TARGET_BIG_SYM microblaze_elf32_vec 3485 #define TARGET_BIG_NAME "elf32-microblaze" 3486 3487 #define ELF_ARCH bfd_arch_microblaze 3488 #define ELF_TARGET_ID MICROBLAZE_ELF_DATA 3489 #define ELF_MACHINE_CODE EM_MICROBLAZE 3490 #define ELF_MACHINE_ALT1 EM_MICROBLAZE_OLD 3491 #define ELF_MAXPAGESIZE 0x1000 3492 #define elf_info_to_howto microblaze_elf_info_to_howto 3493 #define elf_info_to_howto_rel NULL 3494 3495 #define bfd_elf32_bfd_reloc_type_lookup microblaze_elf_reloc_type_lookup 3496 #define bfd_elf32_bfd_is_local_label_name microblaze_elf_is_local_label_name 3497 #define elf_backend_relocate_section microblaze_elf_relocate_section 3498 #define bfd_elf32_bfd_relax_section microblaze_elf_relax_section 3499 #define bfd_elf32_bfd_merge_private_bfd_data microblaze_elf_merge_private_bfd_data 3500 #define bfd_elf32_bfd_reloc_name_lookup microblaze_elf_reloc_name_lookup 3501 3502 #define elf_backend_gc_mark_hook microblaze_elf_gc_mark_hook 3503 #define elf_backend_gc_sweep_hook microblaze_elf_gc_sweep_hook 3504 #define elf_backend_check_relocs microblaze_elf_check_relocs 3505 #define elf_backend_copy_indirect_symbol microblaze_elf_copy_indirect_symbol 3506 #define bfd_elf32_bfd_link_hash_table_create microblaze_elf_link_hash_table_create 3507 #define elf_backend_can_gc_sections 1 3508 #define elf_backend_can_refcount 1 3509 #define elf_backend_want_got_plt 1 3510 #define elf_backend_plt_readonly 1 3511 #define elf_backend_got_header_size 12 3512 #define elf_backend_rela_normal 1 3513 3514 #define elf_backend_adjust_dynamic_symbol microblaze_elf_adjust_dynamic_symbol 3515 #define elf_backend_create_dynamic_sections microblaze_elf_create_dynamic_sections 3516 #define elf_backend_finish_dynamic_sections microblaze_elf_finish_dynamic_sections 3517 #define elf_backend_finish_dynamic_symbol microblaze_elf_finish_dynamic_symbol 3518 #define elf_backend_size_dynamic_sections microblaze_elf_size_dynamic_sections 3519 #define elf_backend_add_symbol_hook microblaze_elf_add_symbol_hook 3520 3521 #include "elf32-target.h" 3522