1 /* BFD back-end for National Semiconductor's CRX ELF 2 Copyright 2004, 2005, 2006, 2007 Free Software Foundation, Inc. 3 Written by Tomer Levi, NSC, Israel. 4 5 This file is part of BFD, the Binary File Descriptor library. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 3 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program; if not, write to the Free Software 19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 20 MA 02110-1301, USA. */ 21 22 #include "sysdep.h" 23 #include "bfd.h" 24 #include "bfdlink.h" 25 #include "libbfd.h" 26 #include "elf-bfd.h" 27 #include "elf/crx.h" 28 29 static reloc_howto_type *elf_crx_reloc_type_lookup 30 (bfd *, bfd_reloc_code_real_type); 31 static void elf_crx_info_to_howto 32 (bfd *, arelent *, Elf_Internal_Rela *); 33 static bfd_boolean elf32_crx_relax_delete_bytes 34 (struct bfd_link_info *, bfd *, asection *, bfd_vma, int); 35 static bfd_reloc_status_type crx_elf_final_link_relocate 36 (reloc_howto_type *, bfd *, bfd *, asection *, 37 bfd_byte *, bfd_vma, bfd_vma, bfd_vma, 38 struct bfd_link_info *, asection *, int); 39 static bfd_boolean elf32_crx_relocate_section 40 (bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *, 41 Elf_Internal_Rela *, Elf_Internal_Sym *, asection **); 42 static bfd_boolean elf32_crx_relax_section 43 (bfd *, asection *, struct bfd_link_info *, bfd_boolean *); 44 static bfd_byte * elf32_crx_get_relocated_section_contents 45 (bfd *, struct bfd_link_info *, struct bfd_link_order *, 46 bfd_byte *, bfd_boolean, asymbol **); 47 48 /* crx_reloc_map array maps BFD relocation enum into a CRGAS relocation type. */ 49 50 struct crx_reloc_map 51 { 52 bfd_reloc_code_real_type bfd_reloc_enum; /* BFD relocation enum. */ 53 unsigned short crx_reloc_type; /* CRX relocation type. */ 54 }; 55 56 static const struct crx_reloc_map crx_reloc_map[R_CRX_MAX] = 57 { 58 {BFD_RELOC_NONE, R_CRX_NONE}, 59 {BFD_RELOC_CRX_REL4, R_CRX_REL4}, 60 {BFD_RELOC_CRX_REL8, R_CRX_REL8}, 61 {BFD_RELOC_CRX_REL8_CMP, R_CRX_REL8_CMP}, 62 {BFD_RELOC_CRX_REL16, R_CRX_REL16}, 63 {BFD_RELOC_CRX_REL24, R_CRX_REL24}, 64 {BFD_RELOC_CRX_REL32, R_CRX_REL32}, 65 {BFD_RELOC_CRX_REGREL12, R_CRX_REGREL12}, 66 {BFD_RELOC_CRX_REGREL22, R_CRX_REGREL22}, 67 {BFD_RELOC_CRX_REGREL28, R_CRX_REGREL28}, 68 {BFD_RELOC_CRX_REGREL32, R_CRX_REGREL32}, 69 {BFD_RELOC_CRX_ABS16, R_CRX_ABS16}, 70 {BFD_RELOC_CRX_ABS32, R_CRX_ABS32}, 71 {BFD_RELOC_CRX_NUM8, R_CRX_NUM8}, 72 {BFD_RELOC_CRX_NUM16, R_CRX_NUM16}, 73 {BFD_RELOC_CRX_NUM32, R_CRX_NUM32}, 74 {BFD_RELOC_CRX_IMM16, R_CRX_IMM16}, 75 {BFD_RELOC_CRX_IMM32, R_CRX_IMM32}, 76 {BFD_RELOC_CRX_SWITCH8, R_CRX_SWITCH8}, 77 {BFD_RELOC_CRX_SWITCH16, R_CRX_SWITCH16}, 78 {BFD_RELOC_CRX_SWITCH32, R_CRX_SWITCH32} 79 }; 80 81 static reloc_howto_type crx_elf_howto_table[] = 82 { 83 HOWTO (R_CRX_NONE, /* type */ 84 0, /* rightshift */ 85 2, /* size */ 86 32, /* bitsize */ 87 FALSE, /* pc_relative */ 88 0, /* bitpos */ 89 complain_overflow_dont,/* complain_on_overflow */ 90 bfd_elf_generic_reloc, /* special_function */ 91 "R_CRX_NONE", /* name */ 92 FALSE, /* partial_inplace */ 93 0, /* src_mask */ 94 0, /* dst_mask */ 95 FALSE), /* pcrel_offset */ 96 97 HOWTO (R_CRX_REL4, /* type */ 98 1, /* rightshift */ 99 0, /* size */ 100 4, /* bitsize */ 101 TRUE, /* pc_relative */ 102 0, /* bitpos */ 103 complain_overflow_bitfield,/* complain_on_overflow */ 104 bfd_elf_generic_reloc, /* special_function */ 105 "R_CRX_REL4", /* name */ 106 FALSE, /* partial_inplace */ 107 0xf, /* src_mask */ 108 0xf, /* dst_mask */ 109 FALSE), /* pcrel_offset */ 110 111 HOWTO (R_CRX_REL8, /* type */ 112 1, /* rightshift */ 113 0, /* size */ 114 8, /* bitsize */ 115 TRUE, /* pc_relative */ 116 0, /* bitpos */ 117 complain_overflow_bitfield,/* complain_on_overflow */ 118 bfd_elf_generic_reloc, /* special_function */ 119 "R_CRX_REL8", /* name */ 120 FALSE, /* partial_inplace */ 121 0xff, /* src_mask */ 122 0xff, /* dst_mask */ 123 FALSE), /* pcrel_offset */ 124 125 HOWTO (R_CRX_REL8_CMP, /* type */ 126 1, /* rightshift */ 127 0, /* size */ 128 8, /* bitsize */ 129 TRUE, /* pc_relative */ 130 0, /* bitpos */ 131 complain_overflow_bitfield,/* complain_on_overflow */ 132 bfd_elf_generic_reloc, /* special_function */ 133 "R_CRX_REL8_CMP", /* name */ 134 FALSE, /* partial_inplace */ 135 0xff, /* src_mask */ 136 0xff, /* dst_mask */ 137 FALSE), /* pcrel_offset */ 138 139 HOWTO (R_CRX_REL16, /* type */ 140 1, /* rightshift */ 141 1, /* size */ 142 16, /* bitsize */ 143 TRUE, /* pc_relative */ 144 0, /* bitpos */ 145 complain_overflow_bitfield,/* complain_on_overflow */ 146 bfd_elf_generic_reloc, /* special_function */ 147 "R_CRX_REL16", /* name */ 148 FALSE, /* partial_inplace */ 149 0xffff, /* src_mask */ 150 0xffff, /* dst_mask */ 151 FALSE), /* pcrel_offset */ 152 153 HOWTO (R_CRX_REL24, /* type */ 154 1, /* rightshift */ 155 2, /* size */ 156 24, /* bitsize */ 157 TRUE, /* pc_relative */ 158 0, /* bitpos */ 159 complain_overflow_bitfield,/* complain_on_overflow */ 160 bfd_elf_generic_reloc, /* special_function */ 161 "R_CRX_REL24", /* name */ 162 FALSE, /* partial_inplace */ 163 0xffffff, /* src_mask */ 164 0xffffff, /* dst_mask */ 165 FALSE), /* pcrel_offset */ 166 167 HOWTO (R_CRX_REL32, /* type */ 168 1, /* rightshift */ 169 2, /* size */ 170 32, /* bitsize */ 171 TRUE, /* pc_relative */ 172 0, /* bitpos */ 173 complain_overflow_bitfield,/* complain_on_overflow */ 174 bfd_elf_generic_reloc, /* special_function */ 175 "R_CRX_REL32", /* name */ 176 FALSE, /* partial_inplace */ 177 0xffffffff, /* src_mask */ 178 0xffffffff, /* dst_mask */ 179 FALSE), /* pcrel_offset */ 180 181 HOWTO (R_CRX_REGREL12, /* type */ 182 0, /* rightshift */ 183 1, /* size */ 184 12, /* bitsize */ 185 FALSE, /* pc_relative */ 186 0, /* bitpos */ 187 complain_overflow_bitfield,/* complain_on_overflow */ 188 bfd_elf_generic_reloc, /* special_function */ 189 "R_CRX_REGREL12", /* name */ 190 FALSE, /* partial_inplace */ 191 0xfff, /* src_mask */ 192 0xfff, /* dst_mask */ 193 FALSE), /* pcrel_offset */ 194 195 HOWTO (R_CRX_REGREL22, /* type */ 196 0, /* rightshift */ 197 2, /* size */ 198 22, /* bitsize */ 199 FALSE, /* pc_relative */ 200 0, /* bitpos */ 201 complain_overflow_bitfield,/* complain_on_overflow */ 202 bfd_elf_generic_reloc, /* special_function */ 203 "R_CRX_REGREL22", /* name */ 204 FALSE, /* partial_inplace */ 205 0x3fffff, /* src_mask */ 206 0x3fffff, /* dst_mask */ 207 FALSE), /* pcrel_offset */ 208 209 HOWTO (R_CRX_REGREL28, /* type */ 210 0, /* rightshift */ 211 2, /* size */ 212 28, /* bitsize */ 213 FALSE, /* pc_relative */ 214 0, /* bitpos */ 215 complain_overflow_bitfield,/* complain_on_overflow */ 216 bfd_elf_generic_reloc, /* special_function */ 217 "R_CRX_REGREL28", /* name */ 218 FALSE, /* partial_inplace */ 219 0xfffffff, /* src_mask */ 220 0xfffffff, /* dst_mask */ 221 FALSE), /* pcrel_offset */ 222 223 HOWTO (R_CRX_REGREL32, /* type */ 224 0, /* rightshift */ 225 2, /* size */ 226 32, /* bitsize */ 227 FALSE, /* pc_relative */ 228 0, /* bitpos */ 229 complain_overflow_bitfield,/* complain_on_overflow */ 230 bfd_elf_generic_reloc, /* special_function */ 231 "R_CRX_REGREL32", /* name */ 232 FALSE, /* partial_inplace */ 233 0xffffffff, /* src_mask */ 234 0xffffffff, /* dst_mask */ 235 FALSE), /* pcrel_offset */ 236 237 HOWTO (R_CRX_ABS16, /* type */ 238 0, /* rightshift */ 239 1, /* size */ 240 16, /* bitsize */ 241 FALSE, /* pc_relative */ 242 0, /* bitpos */ 243 complain_overflow_bitfield,/* complain_on_overflow */ 244 bfd_elf_generic_reloc, /* special_function */ 245 "R_CRX_ABS16", /* name */ 246 FALSE, /* partial_inplace */ 247 0xffff, /* src_mask */ 248 0xffff, /* dst_mask */ 249 FALSE), /* pcrel_offset */ 250 251 HOWTO (R_CRX_ABS32, /* type */ 252 0, /* rightshift */ 253 2, /* size */ 254 32, /* bitsize */ 255 FALSE, /* pc_relative */ 256 0, /* bitpos */ 257 complain_overflow_bitfield,/* complain_on_overflow */ 258 bfd_elf_generic_reloc, /* special_function */ 259 "R_CRX_ABS32", /* name */ 260 FALSE, /* partial_inplace */ 261 0xffffffff, /* src_mask */ 262 0xffffffff, /* dst_mask */ 263 FALSE), /* pcrel_offset */ 264 265 HOWTO (R_CRX_NUM8, /* type */ 266 0, /* rightshift */ 267 0, /* size */ 268 8, /* bitsize */ 269 FALSE, /* pc_relative */ 270 0, /* bitpos */ 271 complain_overflow_bitfield,/* complain_on_overflow */ 272 bfd_elf_generic_reloc, /* special_function */ 273 "R_CRX_NUM8", /* name */ 274 FALSE, /* partial_inplace */ 275 0xff, /* src_mask */ 276 0xff, /* dst_mask */ 277 FALSE), /* pcrel_offset */ 278 279 HOWTO (R_CRX_NUM16, /* type */ 280 0, /* rightshift */ 281 1, /* size */ 282 16, /* bitsize */ 283 FALSE, /* pc_relative */ 284 0, /* bitpos */ 285 complain_overflow_bitfield,/* complain_on_overflow */ 286 bfd_elf_generic_reloc, /* special_function */ 287 "R_CRX_NUM16", /* name */ 288 FALSE, /* partial_inplace */ 289 0xffff, /* src_mask */ 290 0xffff, /* dst_mask */ 291 FALSE), /* pcrel_offset */ 292 293 HOWTO (R_CRX_NUM32, /* type */ 294 0, /* rightshift */ 295 2, /* size */ 296 32, /* bitsize */ 297 FALSE, /* pc_relative */ 298 0, /* bitpos */ 299 complain_overflow_bitfield,/* complain_on_overflow */ 300 bfd_elf_generic_reloc, /* special_function */ 301 "R_CRX_NUM32", /* name */ 302 FALSE, /* partial_inplace */ 303 0xffffffff, /* src_mask */ 304 0xffffffff, /* dst_mask */ 305 FALSE), /* pcrel_offset */ 306 307 HOWTO (R_CRX_IMM16, /* type */ 308 0, /* rightshift */ 309 1, /* size */ 310 16, /* bitsize */ 311 FALSE, /* pc_relative */ 312 0, /* bitpos */ 313 complain_overflow_bitfield,/* complain_on_overflow */ 314 bfd_elf_generic_reloc, /* special_function */ 315 "R_CRX_IMM16", /* name */ 316 FALSE, /* partial_inplace */ 317 0xffff, /* src_mask */ 318 0xffff, /* dst_mask */ 319 FALSE), /* pcrel_offset */ 320 321 HOWTO (R_CRX_IMM32, /* type */ 322 0, /* rightshift */ 323 2, /* size */ 324 32, /* bitsize */ 325 FALSE, /* pc_relative */ 326 0, /* bitpos */ 327 complain_overflow_bitfield,/* complain_on_overflow */ 328 bfd_elf_generic_reloc, /* special_function */ 329 "R_CRX_IMM32", /* name */ 330 FALSE, /* partial_inplace */ 331 0xffffffff, /* src_mask */ 332 0xffffffff, /* dst_mask */ 333 FALSE), /* pcrel_offset */ 334 335 /* An 8 bit switch table entry. This is generated for an expression 336 such as ``.byte L1 - L2''. The offset holds the difference 337 between the reloc address and L2. */ 338 HOWTO (R_CRX_SWITCH8, /* type */ 339 0, /* rightshift */ 340 0, /* size (0 = byte, 1 = short, 2 = long) */ 341 8, /* bitsize */ 342 FALSE, /* pc_relative */ 343 0, /* bitpos */ 344 complain_overflow_unsigned, /* complain_on_overflow */ 345 bfd_elf_generic_reloc, /* special_function */ 346 "R_CRX_SWITCH8", /* name */ 347 FALSE, /* partial_inplace */ 348 0xff, /* src_mask */ 349 0xff, /* dst_mask */ 350 TRUE), /* pcrel_offset */ 351 352 /* A 16 bit switch table entry. This is generated for an expression 353 such as ``.word L1 - L2''. The offset holds the difference 354 between the reloc address and L2. */ 355 HOWTO (R_CRX_SWITCH16, /* type */ 356 0, /* rightshift */ 357 1, /* size (0 = byte, 1 = short, 2 = long) */ 358 16, /* bitsize */ 359 FALSE, /* pc_relative */ 360 0, /* bitpos */ 361 complain_overflow_unsigned, /* complain_on_overflow */ 362 bfd_elf_generic_reloc, /* special_function */ 363 "R_CRX_SWITCH16", /* name */ 364 FALSE, /* partial_inplace */ 365 0xffff, /* src_mask */ 366 0xffff, /* dst_mask */ 367 TRUE), /* pcrel_offset */ 368 369 /* A 32 bit switch table entry. This is generated for an expression 370 such as ``.long L1 - L2''. The offset holds the difference 371 between the reloc address and L2. */ 372 HOWTO (R_CRX_SWITCH32, /* type */ 373 0, /* rightshift */ 374 2, /* size (0 = byte, 1 = short, 2 = long) */ 375 32, /* bitsize */ 376 FALSE, /* pc_relative */ 377 0, /* bitpos */ 378 complain_overflow_unsigned, /* complain_on_overflow */ 379 bfd_elf_generic_reloc, /* special_function */ 380 "R_CRX_SWITCH32", /* name */ 381 FALSE, /* partial_inplace */ 382 0xffffffff, /* src_mask */ 383 0xffffffff, /* dst_mask */ 384 TRUE) /* pcrel_offset */ 385 }; 386 387 /* Retrieve a howto ptr using a BFD reloc_code. */ 388 389 static reloc_howto_type * 390 elf_crx_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED, 391 bfd_reloc_code_real_type code) 392 { 393 unsigned int i; 394 395 for (i = 0; i < R_CRX_MAX; i++) 396 if (code == crx_reloc_map[i].bfd_reloc_enum) 397 return &crx_elf_howto_table[crx_reloc_map[i].crx_reloc_type]; 398 399 printf ("This relocation Type is not supported -0x%x\n", code); 400 return 0; 401 } 402 403 static reloc_howto_type * 404 elf_crx_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 405 const char *r_name) 406 { 407 unsigned int i; 408 409 for (i = 0; 410 i < sizeof (crx_elf_howto_table) / sizeof (crx_elf_howto_table[0]); 411 i++) 412 if (crx_elf_howto_table[i].name != NULL 413 && strcasecmp (crx_elf_howto_table[i].name, r_name) == 0) 414 return &crx_elf_howto_table[i]; 415 416 return NULL; 417 } 418 419 /* Retrieve a howto ptr using an internal relocation entry. */ 420 421 static void 422 elf_crx_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr, 423 Elf_Internal_Rela *dst) 424 { 425 unsigned int r_type = ELF32_R_TYPE (dst->r_info); 426 BFD_ASSERT (r_type < (unsigned int) R_CRX_MAX); 427 cache_ptr->howto = &crx_elf_howto_table[r_type]; 428 } 429 430 /* Perform a relocation as part of a final link. */ 431 432 static bfd_reloc_status_type 433 crx_elf_final_link_relocate (reloc_howto_type *howto, bfd *input_bfd, 434 bfd *output_bfd ATTRIBUTE_UNUSED, 435 asection *input_section, bfd_byte *contents, 436 bfd_vma offset, bfd_vma Rvalue, bfd_vma addend, 437 struct bfd_link_info *info ATTRIBUTE_UNUSED, 438 asection *sec ATTRIBUTE_UNUSED, 439 int is_local ATTRIBUTE_UNUSED) 440 { 441 unsigned short r_type = howto->type; 442 bfd_byte *hit_data = contents + offset; 443 bfd_vma reloc_bits, check; 444 445 switch (r_type) 446 { 447 case R_CRX_IMM16: 448 case R_CRX_IMM32: 449 case R_CRX_ABS16: 450 case R_CRX_ABS32: 451 case R_CRX_REL8_CMP: 452 case R_CRX_REL16: 453 case R_CRX_REL24: 454 case R_CRX_REL32: 455 case R_CRX_REGREL12: 456 case R_CRX_REGREL22: 457 case R_CRX_REGREL28: 458 case R_CRX_REGREL32: 459 /* 'hit_data' is relative to the start of the instruction, not the 460 relocation offset. Advance it to account for the exact offset. */ 461 hit_data += 2; 462 break; 463 464 case R_CRX_REL4: 465 /* This relocation type is used only in 'Branch if Equal to 0' 466 instructions and requires special handling. */ 467 Rvalue -= 1; 468 break; 469 470 case R_CRX_NONE: 471 return bfd_reloc_ok; 472 break; 473 474 case R_CRX_SWITCH8: 475 case R_CRX_SWITCH16: 476 case R_CRX_SWITCH32: 477 /* We only care about the addend, where the difference between 478 expressions is kept. */ 479 Rvalue = 0; 480 481 default: 482 break; 483 } 484 485 if (howto->pc_relative) 486 { 487 /* Subtract the address of the section containing the location. */ 488 Rvalue -= (input_section->output_section->vma 489 + input_section->output_offset); 490 /* Subtract the position of the location within the section. */ 491 Rvalue -= offset; 492 } 493 494 /* Add in supplied addend. */ 495 Rvalue += addend; 496 497 /* Complain if the bitfield overflows, whether it is considered 498 as signed or unsigned. */ 499 check = Rvalue >> howto->rightshift; 500 501 /* Assumes two's complement. This expression avoids 502 overflow if howto->bitsize is the number of bits in 503 bfd_vma. */ 504 reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1; 505 506 if (((bfd_vma) check & ~reloc_bits) != 0 507 && (((bfd_vma) check & ~reloc_bits) 508 != (-(bfd_vma) 1 & ~reloc_bits))) 509 { 510 /* The above right shift is incorrect for a signed 511 value. See if turning on the upper bits fixes the 512 overflow. */ 513 if (howto->rightshift && (bfd_signed_vma) Rvalue < 0) 514 { 515 check |= ((bfd_vma) - 1 516 & ~((bfd_vma) - 1 517 >> howto->rightshift)); 518 if (((bfd_vma) check & ~reloc_bits) 519 != (-(bfd_vma) 1 & ~reloc_bits)) 520 return bfd_reloc_overflow; 521 } 522 else 523 return bfd_reloc_overflow; 524 } 525 526 /* Drop unwanted bits from the value we are relocating to. */ 527 Rvalue >>= (bfd_vma) howto->rightshift; 528 529 /* Apply dst_mask to select only relocatable part of the insn. */ 530 Rvalue &= howto->dst_mask; 531 532 switch (howto->size) 533 { 534 case 0: 535 if (r_type == R_CRX_REL4) 536 { 537 Rvalue <<= 4; 538 Rvalue |= (bfd_get_8 (input_bfd, hit_data) & 0x0f); 539 } 540 541 bfd_put_8 (input_bfd, (unsigned char) Rvalue, hit_data); 542 break; 543 544 case 1: 545 if (r_type == R_CRX_REGREL12) 546 Rvalue |= (bfd_get_16 (input_bfd, hit_data) & 0xf000); 547 548 bfd_put_16 (input_bfd, Rvalue, hit_data); 549 break; 550 551 case 2: 552 if (r_type == R_CRX_REL24 553 || r_type == R_CRX_REGREL22 554 || r_type == R_CRX_REGREL28) 555 Rvalue |= (((bfd_get_16 (input_bfd, hit_data) << 16) | 556 bfd_get_16 (input_bfd, hit_data + 2)) & ~howto->dst_mask); 557 558 if (r_type == R_CRX_NUM32 || r_type == R_CRX_SWITCH32) 559 /* Relocation on DATA is purely little-endian, that is, for a 560 multi-byte datum, the lowest address in memory contains the 561 little end of the datum, that is, the least significant byte. 562 Therefore we use BFD's byte Putting functions. */ 563 bfd_put_32 (input_bfd, Rvalue, hit_data); 564 else 565 /* Relocation on INSTRUCTIONS is different : Instructions are 566 word-addressable, that is, each word itself is arranged according 567 to little-endian convention, whereas the words are arranged with 568 respect to one another in BIG ENDIAN fashion. 569 When there is an immediate value that spans a word boundary, it is 570 split in a big-endian way with respect to the words. */ 571 { 572 bfd_put_16 (input_bfd, (Rvalue >> 16) & 0xffff, hit_data); 573 bfd_put_16 (input_bfd, Rvalue & 0xffff, hit_data + 2); 574 } 575 break; 576 577 default: 578 return bfd_reloc_notsupported; 579 } 580 581 return bfd_reloc_ok; 582 } 583 584 /* Delete some bytes from a section while relaxing. */ 585 586 static bfd_boolean 587 elf32_crx_relax_delete_bytes (struct bfd_link_info *link_info, bfd *abfd, 588 asection *sec, bfd_vma addr, int count) 589 { 590 Elf_Internal_Shdr *symtab_hdr; 591 unsigned int sec_shndx; 592 bfd_byte *contents; 593 Elf_Internal_Rela *irel, *irelend; 594 Elf_Internal_Rela *irelalign; 595 bfd_vma toaddr; 596 Elf_Internal_Sym *isym; 597 Elf_Internal_Sym *isymend; 598 struct elf_link_hash_entry **sym_hashes; 599 struct elf_link_hash_entry **end_hashes; 600 struct elf_link_hash_entry **start_hashes; 601 unsigned int symcount; 602 603 sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec); 604 605 contents = elf_section_data (sec)->this_hdr.contents; 606 607 /* The deletion must stop at the next ALIGN reloc for an aligment 608 power larger than the number of bytes we are deleting. */ 609 610 irelalign = NULL; 611 toaddr = sec->size; 612 613 irel = elf_section_data (sec)->relocs; 614 irelend = irel + sec->reloc_count; 615 616 /* Actually delete the bytes. */ 617 memmove (contents + addr, contents + addr + count, 618 (size_t) (toaddr - addr - count)); 619 sec->size -= count; 620 621 /* Adjust all the relocs. */ 622 for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++) 623 { 624 /* Get the new reloc address. */ 625 if ((irel->r_offset > addr 626 && irel->r_offset < toaddr)) 627 irel->r_offset -= count; 628 } 629 630 /* Adjust the local symbols defined in this section. */ 631 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 632 isym = (Elf_Internal_Sym *) symtab_hdr->contents; 633 for (isymend = isym + symtab_hdr->sh_info; isym < isymend; isym++) 634 { 635 if (isym->st_shndx == sec_shndx 636 && isym->st_value > addr 637 && isym->st_value < toaddr) 638 { 639 /* Adjust the addend of SWITCH relocations in this section, 640 which reference this local symbol. */ 641 for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++) 642 { 643 unsigned long r_symndx; 644 Elf_Internal_Sym *rsym; 645 bfd_vma addsym, subsym; 646 647 /* Skip if not a SWITCH relocation. */ 648 if (ELF32_R_TYPE (irel->r_info) != (int) R_CRX_SWITCH8 649 && ELF32_R_TYPE (irel->r_info) != (int) R_CRX_SWITCH16 650 && ELF32_R_TYPE (irel->r_info) != (int) R_CRX_SWITCH32) 651 continue; 652 653 r_symndx = ELF32_R_SYM (irel->r_info); 654 rsym = (Elf_Internal_Sym *) symtab_hdr->contents + r_symndx; 655 656 /* Skip if not the local adjusted symbol. */ 657 if (rsym != isym) 658 continue; 659 660 addsym = isym->st_value; 661 subsym = addsym - irel->r_addend; 662 663 /* Fix the addend only when -->> (addsym > addr >= subsym). */ 664 if (subsym <= addr) 665 irel->r_addend -= count; 666 else 667 continue; 668 } 669 670 isym->st_value -= count; 671 } 672 } 673 674 /* Now adjust the global symbols defined in this section. */ 675 symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym) 676 - symtab_hdr->sh_info); 677 sym_hashes = start_hashes = elf_sym_hashes (abfd); 678 end_hashes = sym_hashes + symcount; 679 680 for (; sym_hashes < end_hashes; sym_hashes++) 681 { 682 struct elf_link_hash_entry *sym_hash = *sym_hashes; 683 684 /* The '--wrap SYMBOL' option is causing a pain when the object file, 685 containing the definition of __wrap_SYMBOL, includes a direct 686 call to SYMBOL as well. Since both __wrap_SYMBOL and SYMBOL reference 687 the same symbol (which is __wrap_SYMBOL), but still exist as two 688 different symbols in 'sym_hashes', we don't want to adjust 689 the global symbol __wrap_SYMBOL twice. 690 This check is only relevant when symbols are being wrapped. */ 691 if (link_info->wrap_hash != NULL) 692 { 693 struct elf_link_hash_entry **cur_sym_hashes; 694 695 /* Loop only over the symbols whom been already checked. */ 696 for (cur_sym_hashes = start_hashes; cur_sym_hashes < sym_hashes; 697 cur_sym_hashes++) 698 { 699 /* If the current symbol is identical to 'sym_hash', that means 700 the symbol was already adjusted (or at least checked). */ 701 if (*cur_sym_hashes == sym_hash) 702 break; 703 } 704 /* Don't adjust the symbol again. */ 705 if (cur_sym_hashes < sym_hashes) 706 continue; 707 } 708 709 if ((sym_hash->root.type == bfd_link_hash_defined 710 || sym_hash->root.type == bfd_link_hash_defweak) 711 && sym_hash->root.u.def.section == sec 712 && sym_hash->root.u.def.value > addr 713 && sym_hash->root.u.def.value < toaddr) 714 sym_hash->root.u.def.value -= count; 715 } 716 717 return TRUE; 718 } 719 720 /* This is a version of bfd_generic_get_relocated_section_contents 721 which uses elf32_crx_relocate_section. */ 722 723 static bfd_byte * 724 elf32_crx_get_relocated_section_contents (bfd *output_bfd, 725 struct bfd_link_info *link_info, 726 struct bfd_link_order *link_order, 727 bfd_byte *data, 728 bfd_boolean relocatable, 729 asymbol **symbols) 730 { 731 Elf_Internal_Shdr *symtab_hdr; 732 asection *input_section = link_order->u.indirect.section; 733 bfd *input_bfd = input_section->owner; 734 asection **sections = NULL; 735 Elf_Internal_Rela *internal_relocs = NULL; 736 Elf_Internal_Sym *isymbuf = NULL; 737 738 /* We only need to handle the case of relaxing, or of having a 739 particular set of section contents, specially. */ 740 if (relocatable 741 || elf_section_data (input_section)->this_hdr.contents == NULL) 742 return bfd_generic_get_relocated_section_contents (output_bfd, link_info, 743 link_order, data, 744 relocatable, 745 symbols); 746 747 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr; 748 749 memcpy (data, elf_section_data (input_section)->this_hdr.contents, 750 (size_t) input_section->size); 751 752 if ((input_section->flags & SEC_RELOC) != 0 753 && input_section->reloc_count > 0) 754 { 755 Elf_Internal_Sym *isym; 756 Elf_Internal_Sym *isymend; 757 asection **secpp; 758 bfd_size_type amt; 759 760 internal_relocs = (_bfd_elf_link_read_relocs 761 (input_bfd, input_section, (PTR) NULL, 762 (Elf_Internal_Rela *) NULL, FALSE)); 763 if (internal_relocs == NULL) 764 goto error_return; 765 766 if (symtab_hdr->sh_info != 0) 767 { 768 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents; 769 if (isymbuf == NULL) 770 isymbuf = bfd_elf_get_elf_syms (input_bfd, symtab_hdr, 771 symtab_hdr->sh_info, 0, 772 NULL, NULL, NULL); 773 if (isymbuf == NULL) 774 goto error_return; 775 } 776 777 amt = symtab_hdr->sh_info; 778 amt *= sizeof (asection *); 779 sections = bfd_malloc (amt); 780 if (sections == NULL && amt != 0) 781 goto error_return; 782 783 isymend = isymbuf + symtab_hdr->sh_info; 784 for (isym = isymbuf, secpp = sections; isym < isymend; ++isym, ++secpp) 785 { 786 asection *isec; 787 788 if (isym->st_shndx == SHN_UNDEF) 789 isec = bfd_und_section_ptr; 790 else if (isym->st_shndx == SHN_ABS) 791 isec = bfd_abs_section_ptr; 792 else if (isym->st_shndx == SHN_COMMON) 793 isec = bfd_com_section_ptr; 794 else 795 isec = bfd_section_from_elf_index (input_bfd, isym->st_shndx); 796 797 *secpp = isec; 798 } 799 800 if (! elf32_crx_relocate_section (output_bfd, link_info, input_bfd, 801 input_section, data, internal_relocs, 802 isymbuf, sections)) 803 goto error_return; 804 805 if (sections != NULL) 806 free (sections); 807 if (isymbuf != NULL 808 && symtab_hdr->contents != (unsigned char *) isymbuf) 809 free (isymbuf); 810 if (elf_section_data (input_section)->relocs != internal_relocs) 811 free (internal_relocs); 812 } 813 814 return data; 815 816 error_return: 817 if (sections != NULL) 818 free (sections); 819 if (isymbuf != NULL 820 && symtab_hdr->contents != (unsigned char *) isymbuf) 821 free (isymbuf); 822 if (internal_relocs != NULL 823 && elf_section_data (input_section)->relocs != internal_relocs) 824 free (internal_relocs); 825 return NULL; 826 } 827 828 /* Relocate a CRX ELF section. */ 829 830 static bfd_boolean 831 elf32_crx_relocate_section (bfd *output_bfd, struct bfd_link_info *info, 832 bfd *input_bfd, asection *input_section, 833 bfd_byte *contents, Elf_Internal_Rela *relocs, 834 Elf_Internal_Sym *local_syms, 835 asection **local_sections) 836 { 837 Elf_Internal_Shdr *symtab_hdr; 838 struct elf_link_hash_entry **sym_hashes; 839 Elf_Internal_Rela *rel, *relend; 840 841 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr; 842 sym_hashes = elf_sym_hashes (input_bfd); 843 844 rel = relocs; 845 relend = relocs + input_section->reloc_count; 846 for (; rel < relend; rel++) 847 { 848 int r_type; 849 reloc_howto_type *howto; 850 unsigned long r_symndx; 851 Elf_Internal_Sym *sym; 852 asection *sec; 853 struct elf_link_hash_entry *h; 854 bfd_vma relocation; 855 bfd_reloc_status_type r; 856 857 r_symndx = ELF32_R_SYM (rel->r_info); 858 r_type = ELF32_R_TYPE (rel->r_info); 859 howto = crx_elf_howto_table + (r_type); 860 861 h = NULL; 862 sym = NULL; 863 sec = NULL; 864 if (r_symndx < symtab_hdr->sh_info) 865 { 866 sym = local_syms + r_symndx; 867 sec = local_sections[r_symndx]; 868 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel); 869 } 870 else 871 { 872 bfd_boolean unresolved_reloc, warned; 873 874 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel, 875 r_symndx, symtab_hdr, sym_hashes, 876 h, sec, relocation, 877 unresolved_reloc, warned); 878 } 879 880 if (sec != NULL && elf_discarded_section (sec)) 881 { 882 /* For relocs against symbols from removed linkonce sections, 883 or sections discarded by a linker script, we just want the 884 section contents zeroed. Avoid any special processing. */ 885 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset); 886 rel->r_info = 0; 887 rel->r_addend = 0; 888 continue; 889 } 890 891 if (info->relocatable) 892 continue; 893 894 r = crx_elf_final_link_relocate (howto, input_bfd, output_bfd, 895 input_section, 896 contents, rel->r_offset, 897 relocation, rel->r_addend, 898 info, sec, h == NULL); 899 900 if (r != bfd_reloc_ok) 901 { 902 const char *name; 903 const char *msg = (const char *) 0; 904 905 if (h != NULL) 906 name = h->root.root.string; 907 else 908 { 909 name = (bfd_elf_string_from_elf_section 910 (input_bfd, symtab_hdr->sh_link, sym->st_name)); 911 if (name == NULL || *name == '\0') 912 name = bfd_section_name (input_bfd, sec); 913 } 914 915 switch (r) 916 { 917 case bfd_reloc_overflow: 918 if (!((*info->callbacks->reloc_overflow) 919 (info, (h ? &h->root : NULL), name, howto->name, 920 (bfd_vma) 0, input_bfd, input_section, 921 rel->r_offset))) 922 return FALSE; 923 break; 924 925 case bfd_reloc_undefined: 926 if (!((*info->callbacks->undefined_symbol) 927 (info, name, input_bfd, input_section, 928 rel->r_offset, TRUE))) 929 return FALSE; 930 break; 931 932 case bfd_reloc_outofrange: 933 msg = _("internal error: out of range error"); 934 goto common_error; 935 936 case bfd_reloc_notsupported: 937 msg = _("internal error: unsupported relocation error"); 938 goto common_error; 939 940 case bfd_reloc_dangerous: 941 msg = _("internal error: dangerous error"); 942 goto common_error; 943 944 default: 945 msg = _("internal error: unknown error"); 946 /* Fall through. */ 947 948 common_error: 949 if (!((*info->callbacks->warning) 950 (info, msg, name, input_bfd, input_section, 951 rel->r_offset))) 952 return FALSE; 953 break; 954 } 955 } 956 } 957 958 return TRUE; 959 } 960 961 /* This function handles relaxing for the CRX. 962 963 There's quite a few relaxing opportunites available on the CRX: 964 965 * bal/bcond:32 -> bal/bcond:16 2 bytes 966 * bcond:16 -> bcond:8 2 bytes 967 * cmpbcond:24 -> cmpbcond:8 2 bytes 968 * arithmetic imm32 -> arithmetic imm16 2 bytes 969 970 Symbol- and reloc-reading infrastructure copied from elf-m10200.c. */ 971 972 static bfd_boolean 973 elf32_crx_relax_section (bfd *abfd, asection *sec, 974 struct bfd_link_info *link_info, bfd_boolean *again) 975 { 976 Elf_Internal_Shdr *symtab_hdr; 977 Elf_Internal_Rela *internal_relocs; 978 Elf_Internal_Rela *irel, *irelend; 979 bfd_byte *contents = NULL; 980 Elf_Internal_Sym *isymbuf = NULL; 981 982 /* Assume nothing changes. */ 983 *again = FALSE; 984 985 /* We don't have to do anything for a relocatable link, if 986 this section does not have relocs, or if this is not a 987 code section. */ 988 if (link_info->relocatable 989 || (sec->flags & SEC_RELOC) == 0 990 || sec->reloc_count == 0 991 || (sec->flags & SEC_CODE) == 0) 992 return TRUE; 993 994 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 995 996 /* Get a copy of the native relocations. */ 997 internal_relocs = (_bfd_elf_link_read_relocs 998 (abfd, sec, (PTR) NULL, (Elf_Internal_Rela *) NULL, 999 link_info->keep_memory)); 1000 if (internal_relocs == NULL) 1001 goto error_return; 1002 1003 /* Walk through them looking for relaxing opportunities. */ 1004 irelend = internal_relocs + sec->reloc_count; 1005 for (irel = internal_relocs; irel < irelend; irel++) 1006 { 1007 bfd_vma symval; 1008 1009 /* If this isn't something that can be relaxed, then ignore 1010 this reloc. */ 1011 if (ELF32_R_TYPE (irel->r_info) != (int) R_CRX_REL32 1012 && ELF32_R_TYPE (irel->r_info) != (int) R_CRX_REL16 1013 && ELF32_R_TYPE (irel->r_info) != (int) R_CRX_REL24 1014 && ELF32_R_TYPE (irel->r_info) != (int) R_CRX_IMM32) 1015 continue; 1016 1017 /* Get the section contents if we haven't done so already. */ 1018 if (contents == NULL) 1019 { 1020 /* Get cached copy if it exists. */ 1021 if (elf_section_data (sec)->this_hdr.contents != NULL) 1022 contents = elf_section_data (sec)->this_hdr.contents; 1023 /* Go get them off disk. */ 1024 else if (!bfd_malloc_and_get_section (abfd, sec, &contents)) 1025 goto error_return; 1026 } 1027 1028 /* Read this BFD's local symbols if we haven't done so already. */ 1029 if (isymbuf == NULL && symtab_hdr->sh_info != 0) 1030 { 1031 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents; 1032 if (isymbuf == NULL) 1033 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr, 1034 symtab_hdr->sh_info, 0, 1035 NULL, NULL, NULL); 1036 if (isymbuf == NULL) 1037 goto error_return; 1038 } 1039 1040 /* Get the value of the symbol referred to by the reloc. */ 1041 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info) 1042 { 1043 /* A local symbol. */ 1044 Elf_Internal_Sym *isym; 1045 asection *sym_sec; 1046 1047 isym = isymbuf + ELF32_R_SYM (irel->r_info); 1048 if (isym->st_shndx == SHN_UNDEF) 1049 sym_sec = bfd_und_section_ptr; 1050 else if (isym->st_shndx == SHN_ABS) 1051 sym_sec = bfd_abs_section_ptr; 1052 else if (isym->st_shndx == SHN_COMMON) 1053 sym_sec = bfd_com_section_ptr; 1054 else 1055 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx); 1056 symval = (isym->st_value 1057 + sym_sec->output_section->vma 1058 + sym_sec->output_offset); 1059 } 1060 else 1061 { 1062 unsigned long indx; 1063 struct elf_link_hash_entry *h; 1064 1065 /* An external symbol. */ 1066 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info; 1067 h = elf_sym_hashes (abfd)[indx]; 1068 BFD_ASSERT (h != NULL); 1069 1070 if (h->root.type != bfd_link_hash_defined 1071 && h->root.type != bfd_link_hash_defweak) 1072 /* This appears to be a reference to an undefined 1073 symbol. Just ignore it--it will be caught by the 1074 regular reloc processing. */ 1075 continue; 1076 1077 symval = (h->root.u.def.value 1078 + h->root.u.def.section->output_section->vma 1079 + h->root.u.def.section->output_offset); 1080 } 1081 1082 /* For simplicity of coding, we are going to modify the section 1083 contents, the section relocs, and the BFD symbol table. We 1084 must tell the rest of the code not to free up this 1085 information. It would be possible to instead create a table 1086 of changes which have to be made, as is done in coff-mips.c; 1087 that would be more work, but would require less memory when 1088 the linker is run. */ 1089 1090 /* Try to turn a 32bit pc-relative branch/call into 1091 a 16bit pc-relative branch/call. */ 1092 if (ELF32_R_TYPE (irel->r_info) == (int) R_CRX_REL32) 1093 { 1094 bfd_vma value = symval; 1095 1096 /* Deal with pc-relative gunk. */ 1097 value -= (sec->output_section->vma + sec->output_offset); 1098 value -= irel->r_offset; 1099 value += irel->r_addend; 1100 1101 /* See if the value will fit in 16 bits, note the high value is 1102 0xfffe + 2 as the target will be two bytes closer if we are 1103 able to relax. */ 1104 if ((long) value < 0x10000 && (long) value > -0x10002) 1105 { 1106 unsigned short code; 1107 1108 /* Get the opcode. */ 1109 code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset); 1110 1111 /* Verify it's a 'bal'/'bcond' and fix the opcode. */ 1112 if ((code & 0xfff0) == 0x3170) 1113 bfd_put_8 (abfd, 0x30, contents + irel->r_offset + 1); 1114 else if ((code & 0xf0ff) == 0x707f) 1115 bfd_put_8 (abfd, 0x7e, contents + irel->r_offset); 1116 else 1117 continue; 1118 1119 /* Note that we've changed the relocs, section contents, etc. */ 1120 elf_section_data (sec)->relocs = internal_relocs; 1121 elf_section_data (sec)->this_hdr.contents = contents; 1122 symtab_hdr->contents = (unsigned char *) isymbuf; 1123 1124 /* Fix the relocation's type. */ 1125 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1126 R_CRX_REL16); 1127 1128 /* Delete two bytes of data. */ 1129 if (!elf32_crx_relax_delete_bytes (link_info, abfd, sec, 1130 irel->r_offset + 2, 2)) 1131 goto error_return; 1132 1133 /* That will change things, so, we should relax again. 1134 Note that this is not required, and it may be slow. */ 1135 *again = TRUE; 1136 } 1137 } 1138 1139 /* Try to turn a 16bit pc-relative branch into an 1140 8bit pc-relative branch. */ 1141 if (ELF32_R_TYPE (irel->r_info) == (int) R_CRX_REL16) 1142 { 1143 bfd_vma value = symval; 1144 1145 /* Deal with pc-relative gunk. */ 1146 value -= (sec->output_section->vma + sec->output_offset); 1147 value -= irel->r_offset; 1148 value += irel->r_addend; 1149 1150 /* See if the value will fit in 8 bits, note the high value is 1151 0xfc + 2 as the target will be two bytes closer if we are 1152 able to relax. */ 1153 if ((long) value < 0xfe && (long) value > -0x100) 1154 { 1155 unsigned short code; 1156 1157 /* Get the opcode. */ 1158 code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset); 1159 1160 /* Verify it's a 'bcond' opcode. */ 1161 if ((code & 0xf0ff) != 0x707e) 1162 continue; 1163 1164 /* Note that we've changed the relocs, section contents, etc. */ 1165 elf_section_data (sec)->relocs = internal_relocs; 1166 elf_section_data (sec)->this_hdr.contents = contents; 1167 symtab_hdr->contents = (unsigned char *) isymbuf; 1168 1169 /* Fix the relocation's type. */ 1170 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1171 R_CRX_REL8); 1172 1173 /* Delete two bytes of data. */ 1174 if (!elf32_crx_relax_delete_bytes (link_info, abfd, sec, 1175 irel->r_offset + 2, 2)) 1176 goto error_return; 1177 1178 /* That will change things, so, we should relax again. 1179 Note that this is not required, and it may be slow. */ 1180 *again = TRUE; 1181 } 1182 } 1183 1184 /* Try to turn a 24bit pc-relative cmp&branch into 1185 an 8bit pc-relative cmp&branch. */ 1186 if (ELF32_R_TYPE (irel->r_info) == (int) R_CRX_REL24) 1187 { 1188 bfd_vma value = symval; 1189 1190 /* Deal with pc-relative gunk. */ 1191 value -= (sec->output_section->vma + sec->output_offset); 1192 value -= irel->r_offset; 1193 value += irel->r_addend; 1194 1195 /* See if the value will fit in 8 bits, note the high value is 1196 0x7e + 2 as the target will be two bytes closer if we are 1197 able to relax. */ 1198 if ((long) value < 0x100 && (long) value > -0x100) 1199 { 1200 unsigned short code; 1201 1202 /* Get the opcode. */ 1203 code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset); 1204 1205 /* Verify it's a 'cmp&branch' opcode. */ 1206 if ((code & 0xfff0) != 0x3180 && (code & 0xfff0) != 0x3190 1207 && (code & 0xfff0) != 0x31a0 && (code & 0xfff0) != 0x31c0 1208 && (code & 0xfff0) != 0x31d0 && (code & 0xfff0) != 0x31e0 1209 /* Or a Co-processor branch ('bcop'). */ 1210 && (code & 0xfff0) != 0x3010 && (code & 0xfff0) != 0x3110) 1211 continue; 1212 1213 /* Note that we've changed the relocs, section contents, etc. */ 1214 elf_section_data (sec)->relocs = internal_relocs; 1215 elf_section_data (sec)->this_hdr.contents = contents; 1216 symtab_hdr->contents = (unsigned char *) isymbuf; 1217 1218 /* Fix the opcode. */ 1219 bfd_put_8 (abfd, 0x30, contents + irel->r_offset + 1); 1220 1221 /* Fix the relocation's type. */ 1222 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1223 R_CRX_REL8_CMP); 1224 1225 /* Delete two bytes of data. */ 1226 if (!elf32_crx_relax_delete_bytes (link_info, abfd, sec, 1227 irel->r_offset + 4, 2)) 1228 goto error_return; 1229 1230 /* That will change things, so, we should relax again. 1231 Note that this is not required, and it may be slow. */ 1232 *again = TRUE; 1233 } 1234 } 1235 1236 /* Try to turn a 32bit immediate address into 1237 a 16bit immediate address. */ 1238 if (ELF32_R_TYPE (irel->r_info) == (int) R_CRX_IMM32) 1239 { 1240 bfd_vma value = symval; 1241 1242 /* See if the value will fit in 16 bits. */ 1243 if ((long) value < 0x7fff && (long) value > -0x8000) 1244 { 1245 unsigned short code; 1246 1247 /* Get the opcode. */ 1248 code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset); 1249 1250 /* Verify it's a 'arithmetic double'. */ 1251 if ((code & 0xf0f0) != 0x20f0) 1252 continue; 1253 1254 /* Note that we've changed the relocs, section contents, etc. */ 1255 elf_section_data (sec)->relocs = internal_relocs; 1256 elf_section_data (sec)->this_hdr.contents = contents; 1257 symtab_hdr->contents = (unsigned char *) isymbuf; 1258 1259 /* Fix the opcode. */ 1260 bfd_put_8 (abfd, (code & 0xff) - 0x10, contents + irel->r_offset); 1261 1262 /* Fix the relocation's type. */ 1263 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 1264 R_CRX_IMM16); 1265 1266 /* Delete two bytes of data. */ 1267 if (!elf32_crx_relax_delete_bytes (link_info, abfd, sec, 1268 irel->r_offset + 2, 2)) 1269 goto error_return; 1270 1271 /* That will change things, so, we should relax again. 1272 Note that this is not required, and it may be slow. */ 1273 *again = TRUE; 1274 } 1275 } 1276 } 1277 1278 if (isymbuf != NULL 1279 && symtab_hdr->contents != (unsigned char *) isymbuf) 1280 { 1281 if (! link_info->keep_memory) 1282 free (isymbuf); 1283 else 1284 { 1285 /* Cache the symbols for elf_link_input_bfd. */ 1286 symtab_hdr->contents = (unsigned char *) isymbuf; 1287 } 1288 } 1289 1290 if (contents != NULL 1291 && elf_section_data (sec)->this_hdr.contents != contents) 1292 { 1293 if (! link_info->keep_memory) 1294 free (contents); 1295 else 1296 { 1297 /* Cache the section contents for elf_link_input_bfd. */ 1298 elf_section_data (sec)->this_hdr.contents = contents; 1299 } 1300 } 1301 1302 if (internal_relocs != NULL 1303 && elf_section_data (sec)->relocs != internal_relocs) 1304 free (internal_relocs); 1305 1306 return TRUE; 1307 1308 error_return: 1309 if (isymbuf != NULL 1310 && symtab_hdr->contents != (unsigned char *) isymbuf) 1311 free (isymbuf); 1312 if (contents != NULL 1313 && elf_section_data (sec)->this_hdr.contents != contents) 1314 free (contents); 1315 if (internal_relocs != NULL 1316 && elf_section_data (sec)->relocs != internal_relocs) 1317 free (internal_relocs); 1318 1319 return FALSE; 1320 } 1321 1322 /* Definitions for setting CRX target vector. */ 1323 #define TARGET_LITTLE_SYM bfd_elf32_crx_vec 1324 #define TARGET_LITTLE_NAME "elf32-crx" 1325 #define ELF_ARCH bfd_arch_crx 1326 #define ELF_MACHINE_CODE EM_CRX 1327 #define ELF_MAXPAGESIZE 0x1 1328 #define elf_symbol_leading_char '_' 1329 1330 #define bfd_elf32_bfd_reloc_type_lookup elf_crx_reloc_type_lookup 1331 #define bfd_elf32_bfd_reloc_name_lookup \ 1332 elf_crx_reloc_name_lookup 1333 #define elf_info_to_howto elf_crx_info_to_howto 1334 #define elf_info_to_howto_rel 0 1335 #define elf_backend_relocate_section elf32_crx_relocate_section 1336 #define bfd_elf32_bfd_relax_section elf32_crx_relax_section 1337 #define bfd_elf32_bfd_get_relocated_section_contents \ 1338 elf32_crx_get_relocated_section_contents 1339 #define elf_backend_can_gc_sections 1 1340 #define elf_backend_rela_normal 1 1341 1342 #include "elf32-target.h" 1343