1/* V850-specific support for 32-bit ELF 2 Copyright (C) 1996-2017 Free Software Foundation, Inc. 3 4 This file is part of BFD, the Binary File Descriptor library. 5 6 This program is free software; you can redistribute it and/or modify 7 it under the terms of the GNU General Public License as published by 8 the Free Software Foundation; either version 3 of the License, or 9 (at your option) any later version. 10 11 This program is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 GNU General Public License for more details. 15 16 You should have received a copy of the GNU General Public License 17 along with this program; if not, write to the Free Software 18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 19 MA 02110-1301, USA. */ 20 21 22/* XXX FIXME: This code is littered with 32bit int, 16bit short, 8bit char 23 dependencies. As is the gas & simulator code for the v850. */ 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/v850.h" 31#include "libiberty.h" 32 33/* Sign-extend a 17-bit number. */ 34#define SEXT17(x) ((((x) & 0x1ffff) ^ 0x10000) - 0x10000) 35 36/* Sign-extend a 22-bit number. */ 37#define SEXT22(x) ((((x) & 0x3fffff) ^ 0x200000) - 0x200000) 38 39static reloc_howto_type v850_elf_howto_table[]; 40 41/* Look through the relocs for a section during the first phase, and 42 allocate space in the global offset table or procedure linkage 43 table. */ 44 45static bfd_boolean 46v850_elf_check_relocs (bfd *abfd, 47 struct bfd_link_info *info, 48 asection *sec, 49 const Elf_Internal_Rela *relocs) 50{ 51 bfd_boolean ret = TRUE; 52 Elf_Internal_Shdr *symtab_hdr; 53 struct elf_link_hash_entry **sym_hashes; 54 const Elf_Internal_Rela *rel; 55 const Elf_Internal_Rela *rel_end; 56 unsigned int r_type; 57 int other = 0; 58 const char *common = NULL; 59 60 if (bfd_link_relocatable (info)) 61 return TRUE; 62 63#ifdef DEBUG 64 _bfd_error_handler ("v850_elf_check_relocs called for section %A in %B", 65 sec, abfd); 66#endif 67 68 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 69 sym_hashes = elf_sym_hashes (abfd); 70 71 rel_end = relocs + sec->reloc_count; 72 for (rel = relocs; rel < rel_end; rel++) 73 { 74 unsigned long r_symndx; 75 struct elf_link_hash_entry *h; 76 77 r_symndx = ELF32_R_SYM (rel->r_info); 78 if (r_symndx < symtab_hdr->sh_info) 79 h = NULL; 80 else 81 { 82 h = sym_hashes[r_symndx - symtab_hdr->sh_info]; 83 while (h->root.type == bfd_link_hash_indirect 84 || h->root.type == bfd_link_hash_warning) 85 h = (struct elf_link_hash_entry *) h->root.u.i.link; 86 87 /* PR15323, ref flags aren't set for references in the same 88 object. */ 89 h->root.non_ir_ref = 1; 90 } 91 92 r_type = ELF32_R_TYPE (rel->r_info); 93 switch (r_type) 94 { 95 default: 96 break; 97 98 /* This relocation describes the C++ object vtable hierarchy. 99 Reconstruct it for later use during GC. */ 100 case R_V850_GNU_VTINHERIT: 101 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset)) 102 return FALSE; 103 break; 104 105 /* This relocation describes which C++ vtable entries 106 are actually used. Record for later use during GC. */ 107 case R_V850_GNU_VTENTRY: 108 BFD_ASSERT (h != NULL); 109 if (h != NULL 110 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend)) 111 return FALSE; 112 break; 113 114 case R_V850_SDA_16_16_SPLIT_OFFSET: 115 case R_V850_SDA_16_16_OFFSET: 116 case R_V850_SDA_15_16_OFFSET: 117 case R_V810_GPWLO_1: 118 case R_V850_HWLO: 119 case R_V850_HWLO_1: 120 other = V850_OTHER_SDA; 121 common = ".scommon"; 122 goto small_data_common; 123 124 case R_V850_ZDA_16_16_SPLIT_OFFSET: 125 case R_V850_ZDA_16_16_OFFSET: 126 case R_V850_ZDA_15_16_OFFSET: 127 other = V850_OTHER_ZDA; 128 common = ".zcommon"; 129 goto small_data_common; 130 131 case R_V850_TDA_4_4_OFFSET: 132 case R_V850_TDA_4_5_OFFSET: 133 case R_V850_TDA_7_7_OFFSET: 134 case R_V850_TDA_6_8_OFFSET: 135 case R_V850_TDA_7_8_OFFSET: 136 case R_V850_TDA_16_16_OFFSET: 137 other = V850_OTHER_TDA; 138 common = ".tcommon"; 139 /* fall through */ 140 141#define V850_OTHER_MASK (V850_OTHER_TDA | V850_OTHER_SDA | V850_OTHER_ZDA) 142 143 small_data_common: 144 if (h) 145 { 146 /* Flag which type of relocation was used. */ 147 h->other |= other; 148 if ((h->other & V850_OTHER_MASK) != (other & V850_OTHER_MASK) 149 && (h->other & V850_OTHER_ERROR) == 0) 150 { 151 const char * msg; 152 static char buff[200]; /* XXX */ 153 154 switch (h->other & V850_OTHER_MASK) 155 { 156 default: 157 msg = _("Variable `%s' cannot occupy in multiple small data regions"); 158 break; 159 case V850_OTHER_SDA | V850_OTHER_ZDA | V850_OTHER_TDA: 160 msg = _("Variable `%s' can only be in one of the small, zero, and tiny data regions"); 161 break; 162 case V850_OTHER_SDA | V850_OTHER_ZDA: 163 msg = _("Variable `%s' cannot be in both small and zero data regions simultaneously"); 164 break; 165 case V850_OTHER_SDA | V850_OTHER_TDA: 166 msg = _("Variable `%s' cannot be in both small and tiny data regions simultaneously"); 167 break; 168 case V850_OTHER_ZDA | V850_OTHER_TDA: 169 msg = _("Variable `%s' cannot be in both zero and tiny data regions simultaneously"); 170 break; 171 } 172 173 sprintf (buff, msg, h->root.root.string); 174 info->callbacks->warning (info, buff, h->root.root.string, 175 abfd, h->root.u.def.section, 176 (bfd_vma) 0); 177 178 bfd_set_error (bfd_error_bad_value); 179 h->other |= V850_OTHER_ERROR; 180 ret = FALSE; 181 } 182 } 183 184 if (h && h->root.type == bfd_link_hash_common 185 && h->root.u.c.p 186 && !strcmp (bfd_get_section_name (abfd, h->root.u.c.p->section), "COMMON")) 187 { 188 asection * section; 189 190 section = h->root.u.c.p->section = bfd_make_section_old_way (abfd, common); 191 section->flags |= SEC_IS_COMMON; 192 } 193 194#ifdef DEBUG 195 fprintf (stderr, "v850_elf_check_relocs, found %s relocation for %s%s\n", 196 v850_elf_howto_table[ (int)r_type ].name, 197 (h && h->root.root.string) ? h->root.root.string : "<unknown>", 198 (h->root.type == bfd_link_hash_common) ? ", symbol is common" : ""); 199#endif 200 break; 201 } 202 } 203 204 return ret; 205} 206 207/* In the old version, when an entry was checked out from the table, 208 it was deleted. This produced an error if the entry was needed 209 more than once, as the second attempted retry failed. 210 211 In the current version, the entry is not deleted, instead we set 212 the field 'found' to TRUE. If a second lookup matches the same 213 entry, then we know that the hi16s reloc has already been updated 214 and does not need to be updated a second time. 215 216 TODO - TOFIX: If it is possible that we need to restore 2 different 217 addresses from the same table entry, where the first generates an 218 overflow, whilst the second do not, then this code will fail. */ 219 220typedef struct hi16s_location 221{ 222 bfd_vma addend; 223 bfd_byte * address; 224 unsigned long counter; 225 bfd_boolean found; 226 struct hi16s_location * next; 227} 228hi16s_location; 229 230static hi16s_location * previous_hi16s; 231static hi16s_location * free_hi16s; 232static unsigned long hi16s_counter; 233 234static void 235remember_hi16s_reloc (bfd *abfd, bfd_vma addend, bfd_byte *address) 236{ 237 hi16s_location * entry = NULL; 238 bfd_size_type amt = sizeof (* free_hi16s); 239 240 /* Find a free structure. */ 241 if (free_hi16s == NULL) 242 free_hi16s = bfd_zalloc (abfd, amt); 243 244 entry = free_hi16s; 245 free_hi16s = free_hi16s->next; 246 247 entry->addend = addend; 248 entry->address = address; 249 entry->counter = hi16s_counter ++; 250 entry->found = FALSE; 251 entry->next = previous_hi16s; 252 previous_hi16s = entry; 253 254 /* Cope with wrap around of our counter. */ 255 if (hi16s_counter == 0) 256 { 257 /* XXX: Assume that all counter entries differ only in their low 16 bits. */ 258 for (entry = previous_hi16s; entry != NULL; entry = entry->next) 259 entry->counter &= 0xffff; 260 261 hi16s_counter = 0x10000; 262 } 263} 264 265static bfd_byte * 266find_remembered_hi16s_reloc (bfd_vma addend, bfd_boolean *already_found) 267{ 268 hi16s_location *match = NULL; 269 hi16s_location *entry; 270 bfd_byte *addr; 271 272 /* Search the table. Record the most recent entry that matches. */ 273 for (entry = previous_hi16s; entry; entry = entry->next) 274 { 275 if (entry->addend == addend 276 && (match == NULL || match->counter < entry->counter)) 277 { 278 match = entry; 279 } 280 } 281 282 if (match == NULL) 283 return NULL; 284 285 /* Extract the address. */ 286 addr = match->address; 287 288 /* Remember if this entry has already been used before. */ 289 if (already_found) 290 * already_found = match->found; 291 292 /* Note that this entry has now been used. */ 293 match->found = TRUE; 294 295 return addr; 296} 297 298/* Calculate the final operand value for a R_V850_LO16 or 299 R_V850_LO16_SPLIT_OFFSET. *INSN is the current operand value and 300 ADDEND is the sum of the relocation symbol and offset. Store the 301 operand value in *INSN and return true on success. 302 303 The assembler has already done some of this: If the value stored in 304 the instruction has its 15th bit set, (counting from zero) then the 305 assembler will have added 1 to the value stored in the associated 306 HI16S reloc. So for example, these relocations: 307 308 movhi hi( fred ), r0, r1 309 movea lo( fred ), r1, r1 310 311 will store 0 in the value fields for the MOVHI and MOVEA instructions 312 and addend will be the address of fred, but for these instructions: 313 314 movhi hi( fred + 0x123456 ), r0, r1 315 movea lo( fred + 0x123456 ), r1, r1 316 317 the value stored in the MOVHI instruction will be 0x12 and the value 318 stored in the MOVEA instruction will be 0x3456. If however the 319 instructions were: 320 321 movhi hi( fred + 0x10ffff ), r0, r1 322 movea lo( fred + 0x10ffff ), r1, r1 323 324 then the value stored in the MOVHI instruction would be 0x11 (not 325 0x10) and the value stored in the MOVEA instruction would be 0xffff. 326 Thus (assuming for the moment that the addend is 0), at run time the 327 MOVHI instruction loads 0x110000 into r1, then the MOVEA instruction 328 adds 0xffffffff (sign extension!) producing 0x10ffff. Similarly if 329 the instructions were: 330 331 movhi hi( fred - 1 ), r0, r1 332 movea lo( fred - 1 ), r1, r1 333 334 then 0 is stored in the MOVHI instruction and -1 is stored in the 335 MOVEA instruction. 336 337 Overflow can occur if the addition of the value stored in the 338 instruction plus the addend sets the 15th bit when before it was clear. 339 This is because the 15th bit will be sign extended into the high part, 340 thus reducing its value by one, but since the 15th bit was originally 341 clear, the assembler will not have added 1 to the previous HI16S reloc 342 to compensate for this effect. For example: 343 344 movhi hi( fred + 0x123456 ), r0, r1 345 movea lo( fred + 0x123456 ), r1, r1 346 347 The value stored in HI16S reloc is 0x12, the value stored in the LO16 348 reloc is 0x3456. If we assume that the address of fred is 0x00007000 349 then the relocations become: 350 351 HI16S: 0x0012 + (0x00007000 >> 16) = 0x12 352 LO16: 0x3456 + (0x00007000 & 0xffff) = 0xa456 353 354 but when the instructions are executed, the MOVEA instruction's value 355 is signed extended, so the sum becomes: 356 357 0x00120000 358 + 0xffffa456 359 ------------ 360 0x0011a456 but 'fred + 0x123456' = 0x0012a456 361 362 Note that if the 15th bit was set in the value stored in the LO16 363 reloc, then we do not have to do anything: 364 365 movhi hi( fred + 0x10ffff ), r0, r1 366 movea lo( fred + 0x10ffff ), r1, r1 367 368 HI16S: 0x0011 + (0x00007000 >> 16) = 0x11 369 LO16: 0xffff + (0x00007000 & 0xffff) = 0x6fff 370 371 0x00110000 372 + 0x00006fff 373 ------------ 374 0x00116fff = fred + 0x10ffff = 0x7000 + 0x10ffff 375 376 Overflow can also occur if the computation carries into the 16th bit 377 and it also results in the 15th bit having the same value as the 15th 378 bit of the original value. What happens is that the HI16S reloc 379 will have already examined the 15th bit of the original value and 380 added 1 to the high part if the bit is set. This compensates for the 381 sign extension of 15th bit of the result of the computation. But now 382 there is a carry into the 16th bit, and this has not been allowed for. 383 384 So, for example if fred is at address 0xf000: 385 386 movhi hi( fred + 0xffff ), r0, r1 [bit 15 of the offset is set] 387 movea lo( fred + 0xffff ), r1, r1 388 389 HI16S: 0x0001 + (0x0000f000 >> 16) = 0x0001 390 LO16: 0xffff + (0x0000f000 & 0xffff) = 0xefff (carry into bit 16 is lost) 391 392 0x00010000 393 + 0xffffefff 394 ------------ 395 0x0000efff but 'fred + 0xffff' = 0x0001efff 396 397 Similarly, if the 15th bit remains clear, but overflow occurs into 398 the 16th bit then (assuming the address of fred is 0xf000): 399 400 movhi hi( fred + 0x7000 ), r0, r1 [bit 15 of the offset is clear] 401 movea lo( fred + 0x7000 ), r1, r1 402 403 HI16S: 0x0000 + (0x0000f000 >> 16) = 0x0000 404 LO16: 0x7000 + (0x0000f000 & 0xffff) = 0x6fff (carry into bit 16 is lost) 405 406 0x00000000 407 + 0x00006fff 408 ------------ 409 0x00006fff but 'fred + 0x7000' = 0x00016fff 410 411 Note - there is no need to change anything if a carry occurs, and the 412 15th bit changes its value from being set to being clear, as the HI16S 413 reloc will have already added in 1 to the high part for us: 414 415 movhi hi( fred + 0xffff ), r0, r1 [bit 15 of the offset is set] 416 movea lo( fred + 0xffff ), r1, r1 417 418 HI16S: 0x0001 + (0x00007000 >> 16) 419 LO16: 0xffff + (0x00007000 & 0xffff) = 0x6fff (carry into bit 16 is lost) 420 421 0x00010000 422 + 0x00006fff (bit 15 not set, so the top half is zero) 423 ------------ 424 0x00016fff which is right (assuming that fred is at 0x7000) 425 426 but if the 15th bit goes from being clear to being set, then we must 427 once again handle overflow: 428 429 movhi hi( fred + 0x7000 ), r0, r1 [bit 15 of the offset is clear] 430 movea lo( fred + 0x7000 ), r1, r1 431 432 HI16S: 0x0000 + (0x0000ffff >> 16) 433 LO16: 0x7000 + (0x0000ffff & 0xffff) = 0x6fff (carry into bit 16) 434 435 0x00000000 436 + 0x00006fff (bit 15 not set, so the top half is zero) 437 ------------ 438 0x00006fff which is wrong (assuming that fred is at 0xffff). */ 439 440static bfd_boolean 441v850_elf_perform_lo16_relocation (bfd *abfd, unsigned long *insn, 442 unsigned long addend) 443{ 444#define BIT15_SET(x) ((x) & 0x8000) 445#define OVERFLOWS(a,i) ((((a) & 0xffff) + (i)) > 0xffff) 446 447 if ((BIT15_SET (*insn + addend) && ! BIT15_SET (addend)) 448 || (OVERFLOWS (addend, *insn) 449 && ((! BIT15_SET (*insn)) || (BIT15_SET (addend))))) 450 { 451 bfd_boolean already_updated; 452 bfd_byte *hi16s_address = find_remembered_hi16s_reloc 453 (addend, & already_updated); 454 455 /* Amend the matching HI16_S relocation. */ 456 if (hi16s_address != NULL) 457 { 458 if (! already_updated) 459 { 460 unsigned long hi_insn = bfd_get_16 (abfd, hi16s_address); 461 hi_insn += 1; 462 bfd_put_16 (abfd, hi_insn, hi16s_address); 463 } 464 } 465 else 466 { 467 _bfd_error_handler (_("FAILED to find previous HI16 reloc")); 468 return FALSE; 469 } 470 } 471#undef OVERFLOWS 472#undef BIT15_SET 473 474 /* Do not complain if value has top bit set, as this has been 475 anticipated. */ 476 *insn = (*insn + addend) & 0xffff; 477 return TRUE; 478} 479 480/* FIXME: The code here probably ought to be removed and the code in reloc.c 481 allowed to do its stuff instead. At least for most of the relocs, anyway. */ 482 483static bfd_reloc_status_type 484v850_elf_perform_relocation (bfd *abfd, 485 unsigned int r_type, 486 bfd_vma addend, 487 bfd_byte *address) 488{ 489 unsigned long insn; 490 unsigned long result; 491 bfd_signed_vma saddend = (bfd_signed_vma) addend; 492 493 switch (r_type) 494 { 495 default: 496#ifdef DEBUG 497 fprintf (stderr, "%B: reloc number %d not recognised\n", abfd, r_type); 498#endif 499 return bfd_reloc_notsupported; 500 501 case R_V850_REL32: 502 case R_V850_ABS32: 503 case R_V810_WORD: 504 case R_V850_PC32: 505 bfd_put_32 (abfd, addend, address); 506 return bfd_reloc_ok; 507 508 case R_V850_WLO23: 509 case R_V850_23: 510 insn = bfd_get_32 (abfd, address); 511 insn &= ~((0x7f << 4) | (0x7fff80 << (16-7))); 512 insn |= ((addend & 0x7f) << 4) | ((addend & 0x7fff80) << (16-7)); 513 bfd_put_32 (abfd, (bfd_vma) insn, address); 514 return bfd_reloc_ok; 515 516 case R_V850_PCR22: 517 case R_V850_22_PCREL: 518 if (saddend > 0x1fffff || saddend < -0x200000) 519 return bfd_reloc_overflow; 520 521 if ((addend % 2) != 0) 522 return bfd_reloc_dangerous; 523 524 insn = bfd_get_32 (abfd, address); 525 insn &= ~0xfffe003f; 526 insn |= (((addend & 0xfffe) << 16) | ((addend & 0x3f0000) >> 16)); 527 bfd_put_32 (abfd, (bfd_vma) insn, address); 528 return bfd_reloc_ok; 529 530 case R_V850_PC17: 531 case R_V850_17_PCREL: 532 if (saddend > 0xffff || saddend < -0x10000) 533 return bfd_reloc_overflow; 534 535 if ((addend % 2) != 0) 536 return bfd_reloc_dangerous; 537 538 insn = bfd_get_32 (abfd, address); 539 insn &= ~ 0xfffe0010; 540 insn |= ((addend & 0xfffe) << 16) | ((addend & 0x10000) >> (16-4)); 541 break; 542 543 case R_V850_PC16U: 544 case R_V850_16_PCREL: 545 if ((saddend < -0xffff) || (saddend > 0)) 546 return bfd_reloc_overflow; 547 548 if ((addend % 2) != 0) 549 return bfd_reloc_dangerous; 550 551 insn = bfd_get_16 (abfd, address); 552 insn &= ~0xfffe; 553 insn |= (-addend & 0xfffe); 554 break; 555 556 case R_V850_PC9: 557 case R_V850_9_PCREL: 558 if (saddend > 0xff || saddend < -0x100) 559 return bfd_reloc_overflow; 560 561 if ((addend % 2) != 0) 562 return bfd_reloc_dangerous; 563 564 insn = bfd_get_16 (abfd, address); 565 insn &= ~ 0xf870; 566 insn |= ((addend & 0x1f0) << 7) | ((addend & 0x0e) << 3); 567 break; 568 569 case R_V810_WHI: 570 case R_V850_HI16: 571 addend += (bfd_get_16 (abfd, address) << 16); 572 addend = (addend >> 16); 573 insn = addend; 574 break; 575 576 case R_V810_WHI1: 577 case R_V850_HI16_S: 578 /* Remember where this relocation took place. */ 579 remember_hi16s_reloc (abfd, addend, address); 580 581 addend += (bfd_get_16 (abfd, address) << 16); 582 addend = (addend >> 16) + ((addend & 0x8000) != 0); 583 584 /* This relocation cannot overflow. */ 585 if (addend > 0xffff) 586 addend = 0; 587 588 insn = addend; 589 break; 590 591 case R_V810_WLO: 592 case R_V850_LO16: 593 insn = bfd_get_16 (abfd, address); 594 if (! v850_elf_perform_lo16_relocation (abfd, &insn, addend)) 595 return bfd_reloc_overflow; 596 break; 597 598 case R_V810_BYTE: 599 case R_V850_8: 600 addend += (char) bfd_get_8 (abfd, address); 601 602 saddend = (bfd_signed_vma) addend; 603 604 if (saddend > 0x7f || saddend < -0x80) 605 return bfd_reloc_overflow; 606 607 bfd_put_8 (abfd, addend, address); 608 return bfd_reloc_ok; 609 610 case R_V850_CALLT_16_16_OFFSET: 611 addend += bfd_get_16 (abfd, address); 612 613 saddend = (bfd_signed_vma) addend; 614 615 if (saddend > 0xffff || saddend < 0) 616 return bfd_reloc_overflow; 617 618 insn = addend; 619 break; 620 621 case R_V850_CALLT_15_16_OFFSET: 622 insn = bfd_get_16 (abfd, address); 623 624 addend += insn & 0xfffe; 625 626 saddend = (bfd_signed_vma) addend; 627 628 if (saddend > 0xffff || saddend < 0) 629 return bfd_reloc_overflow; 630 631 insn = (0xfffe & addend) 632 | (insn & ~0xfffe); 633 break; 634 635 case R_V850_CALLT_6_7_OFFSET: 636 insn = bfd_get_16 (abfd, address); 637 addend += ((insn & 0x3f) << 1); 638 639 saddend = (bfd_signed_vma) addend; 640 641 if (saddend > 0x7e || saddend < 0) 642 return bfd_reloc_overflow; 643 644 if (addend & 1) 645 return bfd_reloc_dangerous; 646 647 insn &= 0xff80; 648 insn |= (addend >> 1); 649 break; 650 651 case R_V850_16: 652 case R_V810_HWORD: 653 case R_V850_SDA_16_16_OFFSET: 654 case R_V850_ZDA_16_16_OFFSET: 655 case R_V850_TDA_16_16_OFFSET: 656 addend += bfd_get_16 (abfd, address); 657 658 saddend = (bfd_signed_vma) addend; 659 660 if (saddend > 0x7fff || saddend < -0x8000) 661 return bfd_reloc_overflow; 662 663 insn = addend; 664 break; 665 666 case R_V850_16_S1: 667 case R_V850_SDA_15_16_OFFSET: 668 case R_V850_ZDA_15_16_OFFSET: 669 case R_V810_GPWLO_1: 670 insn = bfd_get_16 (abfd, address); 671 addend += (insn & 0xfffe); 672 673 saddend = (bfd_signed_vma) addend; 674 675 if (saddend > 0x7ffe || saddend < -0x8000) 676 return bfd_reloc_overflow; 677 678 if (addend & 1) 679 return bfd_reloc_dangerous; 680 681 insn = (addend &~ (bfd_vma) 1) | (insn & 1); 682 break; 683 684 case R_V850_TDA_6_8_OFFSET: 685 insn = bfd_get_16 (abfd, address); 686 addend += ((insn & 0x7e) << 1); 687 688 saddend = (bfd_signed_vma) addend; 689 690 if (saddend > 0xfc || saddend < 0) 691 return bfd_reloc_overflow; 692 693 if (addend & 3) 694 return bfd_reloc_dangerous; 695 696 insn &= 0xff81; 697 insn |= (addend >> 1); 698 break; 699 700 case R_V850_TDA_7_8_OFFSET: 701 insn = bfd_get_16 (abfd, address); 702 addend += ((insn & 0x7f) << 1); 703 704 saddend = (bfd_signed_vma) addend; 705 706 if (saddend > 0xfe || saddend < 0) 707 return bfd_reloc_overflow; 708 709 if (addend & 1) 710 return bfd_reloc_dangerous; 711 712 insn &= 0xff80; 713 insn |= (addend >> 1); 714 break; 715 716 case R_V850_TDA_7_7_OFFSET: 717 insn = bfd_get_16 (abfd, address); 718 addend += insn & 0x7f; 719 720 saddend = (bfd_signed_vma) addend; 721 722 if (saddend > 0x7f || saddend < 0) 723 return bfd_reloc_overflow; 724 725 insn &= 0xff80; 726 insn |= addend; 727 break; 728 729 case R_V850_TDA_4_5_OFFSET: 730 insn = bfd_get_16 (abfd, address); 731 addend += ((insn & 0xf) << 1); 732 733 saddend = (bfd_signed_vma) addend; 734 735 if (saddend > 0x1e || saddend < 0) 736 return bfd_reloc_overflow; 737 738 if (addend & 1) 739 return bfd_reloc_dangerous; 740 741 insn &= 0xfff0; 742 insn |= (addend >> 1); 743 break; 744 745 case R_V850_TDA_4_4_OFFSET: 746 insn = bfd_get_16 (abfd, address); 747 addend += insn & 0xf; 748 749 saddend = (bfd_signed_vma) addend; 750 751 if (saddend > 0xf || saddend < 0) 752 return bfd_reloc_overflow; 753 754 insn &= 0xfff0; 755 insn |= addend; 756 break; 757 758 case R_V810_WLO_1: 759 case R_V850_HWLO: 760 case R_V850_HWLO_1: 761 case R_V850_LO16_S1: 762 insn = bfd_get_16 (abfd, address); 763 result = insn & 0xfffe; 764 if (! v850_elf_perform_lo16_relocation (abfd, &result, addend)) 765 return bfd_reloc_overflow; 766 if (result & 1) 767 return bfd_reloc_overflow; 768 insn = (result & 0xfffe) 769 | (insn & ~0xfffe); 770 bfd_put_16 (abfd, insn, address); 771 return bfd_reloc_ok; 772 773 case R_V850_BLO: 774 case R_V850_LO16_SPLIT_OFFSET: 775 insn = bfd_get_32 (abfd, address); 776 result = ((insn & 0xfffe0000) >> 16) | ((insn & 0x20) >> 5); 777 if (! v850_elf_perform_lo16_relocation (abfd, &result, addend)) 778 return bfd_reloc_overflow; 779 insn = (((result << 16) & 0xfffe0000) 780 | ((result << 5) & 0x20) 781 | (insn & ~0xfffe0020)); 782 bfd_put_32 (abfd, insn, address); 783 return bfd_reloc_ok; 784 785 case R_V850_16_SPLIT_OFFSET: 786 case R_V850_SDA_16_16_SPLIT_OFFSET: 787 case R_V850_ZDA_16_16_SPLIT_OFFSET: 788 insn = bfd_get_32 (abfd, address); 789 addend += ((insn & 0xfffe0000) >> 16) + ((insn & 0x20) >> 5); 790 791 saddend = (bfd_signed_vma) addend; 792 793 if (saddend > 0x7fff || saddend < -0x8000) 794 return bfd_reloc_overflow; 795 796 insn &= 0x0001ffdf; 797 insn |= (addend & 1) << 5; 798 insn |= (addend &~ (bfd_vma) 1) << 16; 799 800 bfd_put_32 (abfd, (bfd_vma) insn, address); 801 return bfd_reloc_ok; 802 803 case R_V850_GNU_VTINHERIT: 804 case R_V850_GNU_VTENTRY: 805 return bfd_reloc_ok; 806 807 } 808 809 bfd_put_16 (abfd, (bfd_vma) insn, address); 810 return bfd_reloc_ok; 811} 812 813/* Insert the addend into the instruction. */ 814 815static bfd_reloc_status_type 816v850_elf_reloc (bfd *abfd ATTRIBUTE_UNUSED, 817 arelent *reloc, 818 asymbol *symbol, 819 void * data ATTRIBUTE_UNUSED, 820 asection *isection, 821 bfd *obfd, 822 char **err ATTRIBUTE_UNUSED) 823{ 824 long relocation; 825 826 /* If there is an output BFD, 827 and the symbol is not a section name (which is only defined at final link time), 828 and either we are not putting the addend into the instruction 829 or the addend is zero, so there is nothing to add into the instruction 830 then just fixup the address and return. */ 831 if (obfd != NULL 832 && (symbol->flags & BSF_SECTION_SYM) == 0 833 && (! reloc->howto->partial_inplace 834 || reloc->addend == 0)) 835 { 836 reloc->address += isection->output_offset; 837 return bfd_reloc_ok; 838 } 839 840 /* Catch relocs involving undefined symbols. */ 841 if (bfd_is_und_section (symbol->section) 842 && (symbol->flags & BSF_WEAK) == 0 843 && obfd == NULL) 844 return bfd_reloc_undefined; 845 846 /* We handle final linking of some relocs ourselves. */ 847 848 /* Is the address of the relocation really within the section? */ 849 if (reloc->address > bfd_get_section_limit (abfd, isection)) 850 return bfd_reloc_outofrange; 851 852 /* Work out which section the relocation is targeted at and the 853 initial relocation command value. */ 854 855 if (reloc->howto->pc_relative) 856 return bfd_reloc_ok; 857 858 /* Get symbol value. (Common symbols are special.) */ 859 if (bfd_is_com_section (symbol->section)) 860 relocation = 0; 861 else 862 relocation = symbol->value; 863 864 /* Convert input-section-relative symbol value to absolute + addend. */ 865 relocation += symbol->section->output_section->vma; 866 relocation += symbol->section->output_offset; 867 relocation += reloc->addend; 868 869 reloc->addend = relocation; 870 return bfd_reloc_ok; 871} 872 873/* This function is used for relocs which are only used 874 for relaxing, which the linker should otherwise ignore. */ 875 876static bfd_reloc_status_type 877v850_elf_ignore_reloc (bfd *abfd ATTRIBUTE_UNUSED, 878 arelent *reloc_entry, 879 asymbol *symbol ATTRIBUTE_UNUSED, 880 void * data ATTRIBUTE_UNUSED, 881 asection *input_section, 882 bfd *output_bfd, 883 char **error_message ATTRIBUTE_UNUSED) 884{ 885 if (output_bfd != NULL) 886 reloc_entry->address += input_section->output_offset; 887 888 return bfd_reloc_ok; 889} 890/* Note: It is REQUIRED that the 'type' value of each entry 891 in this array match the index of the entry in the array. 892 SeeAlso: RELOC_NUBMER in include/elf/v850.h. */ 893static reloc_howto_type v850_elf_howto_table[] = 894{ 895 /* This reloc does nothing. */ 896 HOWTO (R_V850_NONE, /* Type. */ 897 0, /* Rightshift. */ 898 3, /* Size (0 = byte, 1 = short, 2 = long). */ 899 0, /* Bitsize. */ 900 FALSE, /* PC_relative. */ 901 0, /* Bitpos. */ 902 complain_overflow_dont, /* Complain_on_overflow. */ 903 bfd_elf_generic_reloc, /* Special_function. */ 904 "R_V850_NONE", /* Name. */ 905 FALSE, /* Partial_inplace. */ 906 0, /* Src_mask. */ 907 0, /* Dst_mask. */ 908 FALSE), /* PCrel_offset. */ 909 910 /* A PC relative 9 bit branch. */ 911 HOWTO (R_V850_9_PCREL, /* Type. */ 912 0, /* Rightshift. */ 913 1, /* Size (0 = byte, 1 = short, 2 = long). */ 914 9, /* Bitsize. */ 915 TRUE, /* PC_relative. */ 916 0, /* Bitpos. */ 917 complain_overflow_bitfield, /* Complain_on_overflow. */ 918 v850_elf_reloc, /* Special_function. */ 919 "R_V850_9_PCREL", /* Name. */ 920 FALSE, /* Partial_inplace. */ 921 0x00ffffff, /* Src_mask. */ 922 0x00ffffff, /* Dst_mask. */ 923 TRUE), /* PCrel_offset. */ 924 925 /* A PC relative 22 bit branch. */ 926 HOWTO (R_V850_22_PCREL, /* Type. */ 927 0, /* Rightshift. */ 928 2, /* Size (0 = byte, 1 = short, 2 = long). */ 929 22, /* Bitsize. */ 930 TRUE, /* PC_relative. */ 931 0, /* Bitpos. */ 932 complain_overflow_signed, /* Complain_on_overflow. */ 933 v850_elf_reloc, /* Special_function. */ 934 "R_V850_22_PCREL", /* Name. */ 935 FALSE, /* Partial_inplace. */ 936 0x07ffff80, /* Src_mask. */ 937 0x07ffff80, /* Dst_mask. */ 938 TRUE), /* PCrel_offset. */ 939 940 /* High 16 bits of symbol value. */ 941 HOWTO (R_V850_HI16_S, /* Type. */ 942 0, /* Rightshift. */ 943 1, /* Size (0 = byte, 1 = short, 2 = long). */ 944 16, /* Bitsize. */ 945 FALSE, /* PC_relative. */ 946 0, /* Bitpos. */ 947 complain_overflow_dont, /* Complain_on_overflow. */ 948 v850_elf_reloc, /* Special_function. */ 949 "R_V850_HI16_S", /* Name. */ 950 FALSE, /* Partial_inplace. */ 951 0xffff, /* Src_mask. */ 952 0xffff, /* Dst_mask. */ 953 FALSE), /* PCrel_offset. */ 954 955 /* High 16 bits of symbol value. */ 956 HOWTO (R_V850_HI16, /* Type. */ 957 0, /* Rightshift. */ 958 1, /* Size (0 = byte, 1 = short, 2 = long). */ 959 16, /* Bitsize. */ 960 FALSE, /* PC_relative. */ 961 0, /* Bitpos. */ 962 complain_overflow_dont, /* Complain_on_overflow. */ 963 v850_elf_reloc, /* Special_function. */ 964 "R_V850_HI16", /* Name. */ 965 FALSE, /* Partial_inplace. */ 966 0xffff, /* Src_mask. */ 967 0xffff, /* Dst_mask. */ 968 FALSE), /* PCrel_offset. */ 969 970 /* Low 16 bits of symbol value. */ 971 HOWTO (R_V850_LO16, /* Type. */ 972 0, /* Rightshift. */ 973 1, /* Size (0 = byte, 1 = short, 2 = long). */ 974 16, /* Bitsize. */ 975 FALSE, /* PC_relative. */ 976 0, /* Bitpos. */ 977 complain_overflow_dont, /* Complain_on_overflow. */ 978 v850_elf_reloc, /* Special_function. */ 979 "R_V850_LO16", /* Name. */ 980 FALSE, /* Partial_inplace. */ 981 0xffff, /* Src_mask. */ 982 0xffff, /* Dst_mask. */ 983 FALSE), /* PCrel_offset. */ 984 985 /* Simple 32bit reloc. */ 986 HOWTO (R_V850_ABS32, /* Type. */ 987 0, /* Rightshift. */ 988 2, /* Size (0 = byte, 1 = short, 2 = long). */ 989 32, /* Bitsize. */ 990 FALSE, /* PC_relative. */ 991 0, /* Bitpos. */ 992 complain_overflow_dont, /* Complain_on_overflow. */ 993 v850_elf_reloc, /* Special_function. */ 994 "R_V850_ABS32", /* Name. */ 995 FALSE, /* Partial_inplace. */ 996 0xffffffff, /* Src_mask. */ 997 0xffffffff, /* Dst_mask. */ 998 FALSE), /* PCrel_offset. */ 999 1000 /* Simple 16bit reloc. */ 1001 HOWTO (R_V850_16, /* Type. */ 1002 0, /* Rightshift. */ 1003 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1004 16, /* Bitsize. */ 1005 FALSE, /* PC_relative. */ 1006 0, /* Bitpos. */ 1007 complain_overflow_dont, /* Complain_on_overflow. */ 1008 bfd_elf_generic_reloc, /* Special_function. */ 1009 "R_V850_16", /* Name. */ 1010 FALSE, /* Partial_inplace. */ 1011 0xffff, /* Src_mask. */ 1012 0xffff, /* Dst_mask. */ 1013 FALSE), /* PCrel_offset. */ 1014 1015 /* Simple 8bit reloc. */ 1016 HOWTO (R_V850_8, /* Type. */ 1017 0, /* Rightshift. */ 1018 0, /* Size (0 = byte, 1 = short, 2 = long). */ 1019 8, /* Bitsize. */ 1020 FALSE, /* PC_relative. */ 1021 0, /* Bitpos. */ 1022 complain_overflow_dont, /* Complain_on_overflow. */ 1023 bfd_elf_generic_reloc, /* Special_function. */ 1024 "R_V850_8", /* Name. */ 1025 FALSE, /* Partial_inplace. */ 1026 0xff, /* Src_mask. */ 1027 0xff, /* Dst_mask. */ 1028 FALSE), /* PCrel_offset. */ 1029 1030 /* 16 bit offset from the short data area pointer. */ 1031 HOWTO (R_V850_SDA_16_16_OFFSET, /* Type. */ 1032 0, /* Rightshift. */ 1033 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1034 16, /* Bitsize. */ 1035 FALSE, /* PC_relative. */ 1036 0, /* Bitpos. */ 1037 complain_overflow_dont, /* Complain_on_overflow. */ 1038 v850_elf_reloc, /* Special_function. */ 1039 "R_V850_SDA_16_16_OFFSET", /* Name. */ 1040 FALSE, /* Partial_inplace. */ 1041 0xffff, /* Src_mask. */ 1042 0xffff, /* Dst_mask. */ 1043 FALSE), /* PCrel_offset. */ 1044 1045 /* 15 bit offset from the short data area pointer. */ 1046 HOWTO (R_V850_SDA_15_16_OFFSET, /* Type. */ 1047 1, /* Rightshift. */ 1048 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1049 16, /* Bitsize. */ 1050 FALSE, /* PC_relative. */ 1051 1, /* Bitpos. */ 1052 complain_overflow_dont, /* Complain_on_overflow. */ 1053 v850_elf_reloc, /* Special_function. */ 1054 "R_V850_SDA_15_16_OFFSET", /* Name. */ 1055 FALSE, /* Partial_inplace. */ 1056 0xfffe, /* Src_mask. */ 1057 0xfffe, /* Dst_mask. */ 1058 FALSE), /* PCrel_offset. */ 1059 1060 /* 16 bit offset from the zero data area pointer. */ 1061 HOWTO (R_V850_ZDA_16_16_OFFSET, /* Type. */ 1062 0, /* Rightshift. */ 1063 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1064 16, /* Bitsize. */ 1065 FALSE, /* PC_relative. */ 1066 0, /* Bitpos. */ 1067 complain_overflow_dont, /* Complain_on_overflow. */ 1068 v850_elf_reloc, /* Special_function. */ 1069 "R_V850_ZDA_16_16_OFFSET", /* Name. */ 1070 FALSE, /* Partial_inplace. */ 1071 0xffff, /* Src_mask. */ 1072 0xffff, /* Dst_mask. */ 1073 FALSE), /* PCrel_offset. */ 1074 1075 /* 15 bit offset from the zero data area pointer. */ 1076 HOWTO (R_V850_ZDA_15_16_OFFSET, /* Type. */ 1077 1, /* Rightshift. */ 1078 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1079 16, /* Bitsize. */ 1080 FALSE, /* PC_relative. */ 1081 1, /* Bitpos. */ 1082 complain_overflow_dont, /* Complain_on_overflow. */ 1083 v850_elf_reloc, /* Special_function. */ 1084 "R_V850_ZDA_15_16_OFFSET", /* Name. */ 1085 FALSE, /* Partial_inplace. */ 1086 0xfffe, /* Src_mask. */ 1087 0xfffe, /* Dst_mask. */ 1088 FALSE), /* PCrel_offset. */ 1089 1090 /* 6 bit offset from the tiny data area pointer. */ 1091 HOWTO (R_V850_TDA_6_8_OFFSET, /* Type. */ 1092 2, /* Rightshift. */ 1093 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1094 8, /* Bitsize. */ 1095 FALSE, /* PC_relative. */ 1096 1, /* Bitpos. */ 1097 complain_overflow_dont, /* Complain_on_overflow. */ 1098 v850_elf_reloc, /* Special_function. */ 1099 "R_V850_TDA_6_8_OFFSET", /* Name. */ 1100 FALSE, /* Partial_inplace. */ 1101 0x7e, /* Src_mask. */ 1102 0x7e, /* Dst_mask. */ 1103 FALSE), /* PCrel_offset. */ 1104 1105 /* 8 bit offset from the tiny data area pointer. */ 1106 HOWTO (R_V850_TDA_7_8_OFFSET, /* Type. */ 1107 1, /* Rightshift. */ 1108 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1109 8, /* Bitsize. */ 1110 FALSE, /* PC_relative. */ 1111 0, /* Bitpos. */ 1112 complain_overflow_dont, /* Complain_on_overflow. */ 1113 v850_elf_reloc, /* Special_function. */ 1114 "R_V850_TDA_7_8_OFFSET", /* Name. */ 1115 FALSE, /* Partial_inplace. */ 1116 0x7f, /* Src_mask. */ 1117 0x7f, /* Dst_mask. */ 1118 FALSE), /* PCrel_offset. */ 1119 1120 /* 7 bit offset from the tiny data area pointer. */ 1121 HOWTO (R_V850_TDA_7_7_OFFSET, /* Type. */ 1122 0, /* Rightshift. */ 1123 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1124 7, /* Bitsize. */ 1125 FALSE, /* PC_relative. */ 1126 0, /* Bitpos. */ 1127 complain_overflow_dont, /* Complain_on_overflow. */ 1128 v850_elf_reloc, /* Special_function. */ 1129 "R_V850_TDA_7_7_OFFSET", /* Name. */ 1130 FALSE, /* Partial_inplace. */ 1131 0x7f, /* Src_mask. */ 1132 0x7f, /* Dst_mask. */ 1133 FALSE), /* PCrel_offset. */ 1134 1135 /* 16 bit offset from the tiny data area pointer! */ 1136 HOWTO (R_V850_TDA_16_16_OFFSET, /* Type. */ 1137 0, /* Rightshift. */ 1138 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1139 16, /* Bitsize. */ 1140 FALSE, /* PC_relative. */ 1141 0, /* Bitpos. */ 1142 complain_overflow_dont, /* Complain_on_overflow. */ 1143 v850_elf_reloc, /* Special_function. */ 1144 "R_V850_TDA_16_16_OFFSET", /* Name. */ 1145 FALSE, /* Partial_inplace. */ 1146 0xffff, /* Src_mask. */ 1147 0xfff, /* Dst_mask. */ 1148 FALSE), /* PCrel_offset. */ 1149 1150 /* 5 bit offset from the tiny data area pointer. */ 1151 HOWTO (R_V850_TDA_4_5_OFFSET, /* Type. */ 1152 1, /* Rightshift. */ 1153 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1154 5, /* Bitsize. */ 1155 FALSE, /* PC_relative. */ 1156 0, /* Bitpos. */ 1157 complain_overflow_dont, /* Complain_on_overflow. */ 1158 v850_elf_reloc, /* Special_function. */ 1159 "R_V850_TDA_4_5_OFFSET", /* Name. */ 1160 FALSE, /* Partial_inplace. */ 1161 0x0f, /* Src_mask. */ 1162 0x0f, /* Dst_mask. */ 1163 FALSE), /* PCrel_offset. */ 1164 1165 /* 4 bit offset from the tiny data area pointer. */ 1166 HOWTO (R_V850_TDA_4_4_OFFSET, /* Type. */ 1167 0, /* Rightshift. */ 1168 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1169 4, /* Bitsize. */ 1170 FALSE, /* PC_relative. */ 1171 0, /* Bitpos. */ 1172 complain_overflow_dont, /* Complain_on_overflow. */ 1173 v850_elf_reloc, /* Special_function. */ 1174 "R_V850_TDA_4_4_OFFSET", /* Name. */ 1175 FALSE, /* Partial_inplace. */ 1176 0x0f, /* Src_mask. */ 1177 0x0f, /* Dst_mask. */ 1178 FALSE), /* PCrel_offset. */ 1179 1180 /* 16 bit offset from the short data area pointer. */ 1181 HOWTO (R_V850_SDA_16_16_SPLIT_OFFSET, /* Type. */ 1182 0, /* Rightshift. */ 1183 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1184 16, /* Bitsize. */ 1185 FALSE, /* PC_relative. */ 1186 0, /* Bitpos. */ 1187 complain_overflow_dont, /* Complain_on_overflow. */ 1188 v850_elf_reloc, /* Special_function. */ 1189 "R_V850_SDA_16_16_SPLIT_OFFSET",/* Name. */ 1190 FALSE, /* Partial_inplace. */ 1191 0xfffe0020, /* Src_mask. */ 1192 0xfffe0020, /* Dst_mask. */ 1193 FALSE), /* PCrel_offset. */ 1194 1195 /* 16 bit offset from the zero data area pointer. */ 1196 HOWTO (R_V850_ZDA_16_16_SPLIT_OFFSET, /* Type. */ 1197 0, /* Rightshift. */ 1198 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1199 16, /* Bitsize. */ 1200 FALSE, /* PC_relative. */ 1201 0, /* Bitpos. */ 1202 complain_overflow_dont, /* Complain_on_overflow. */ 1203 v850_elf_reloc, /* Special_function. */ 1204 "R_V850_ZDA_16_16_SPLIT_OFFSET",/* Name. */ 1205 FALSE, /* Partial_inplace. */ 1206 0xfffe0020, /* Src_mask. */ 1207 0xfffe0020, /* Dst_mask. */ 1208 FALSE), /* PCrel_offset. */ 1209 1210 /* 6 bit offset from the call table base pointer. */ 1211 HOWTO (R_V850_CALLT_6_7_OFFSET, /* Type. */ 1212 0, /* Rightshift. */ 1213 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1214 7, /* Bitsize. */ 1215 FALSE, /* PC_relative. */ 1216 0, /* Bitpos. */ 1217 complain_overflow_dont, /* Complain_on_overflow. */ 1218 v850_elf_reloc, /* Special_function. */ 1219 "R_V850_CALLT_6_7_OFFSET", /* Name. */ 1220 FALSE, /* Partial_inplace. */ 1221 0x3f, /* Src_mask. */ 1222 0x3f, /* Dst_mask. */ 1223 FALSE), /* PCrel_offset. */ 1224 1225 /* 16 bit offset from the call table base pointer. */ 1226 HOWTO (R_V850_CALLT_16_16_OFFSET, /* Type. */ 1227 0, /* Rightshift. */ 1228 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1229 16, /* Bitsize. */ 1230 FALSE, /* PC_relative. */ 1231 0, /* Bitpos. */ 1232 complain_overflow_dont, /* Complain_on_overflow. */ 1233 v850_elf_reloc, /* Special_function. */ 1234 "R_V850_CALLT_16_16_OFFSET", /* Name. */ 1235 FALSE, /* Partial_inplace. */ 1236 0xffff, /* Src_mask. */ 1237 0xffff, /* Dst_mask. */ 1238 FALSE), /* PCrel_offset. */ 1239 1240 1241 /* GNU extension to record C++ vtable hierarchy */ 1242 HOWTO (R_V850_GNU_VTINHERIT, /* Type. */ 1243 0, /* Rightshift. */ 1244 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1245 0, /* Bitsize. */ 1246 FALSE, /* PC_relative. */ 1247 0, /* Bitpos. */ 1248 complain_overflow_dont, /* Complain_on_overflow. */ 1249 NULL, /* Special_function. */ 1250 "R_V850_GNU_VTINHERIT", /* Name. */ 1251 FALSE, /* Partial_inplace. */ 1252 0, /* Src_mask. */ 1253 0, /* Dst_mask. */ 1254 FALSE), /* PCrel_offset. */ 1255 1256 /* GNU extension to record C++ vtable member usage. */ 1257 HOWTO (R_V850_GNU_VTENTRY, /* Type. */ 1258 0, /* Rightshift. */ 1259 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1260 0, /* Bitsize. */ 1261 FALSE, /* PC_relative. */ 1262 0, /* Bitpos. */ 1263 complain_overflow_dont, /* Complain_on_overflow. */ 1264 _bfd_elf_rel_vtable_reloc_fn, /* Special_function. */ 1265 "R_V850_GNU_VTENTRY", /* Name. */ 1266 FALSE, /* Partial_inplace. */ 1267 0, /* Src_mask. */ 1268 0, /* Dst_mask. */ 1269 FALSE), /* PCrel_offset. */ 1270 1271 /* Indicates a .longcall pseudo-op. The compiler will generate a .longcall 1272 pseudo-op when it finds a function call which can be relaxed. */ 1273 HOWTO (R_V850_LONGCALL, /* Type. */ 1274 0, /* Rightshift. */ 1275 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1276 32, /* Bitsize. */ 1277 TRUE, /* PC_relative. */ 1278 0, /* Bitpos. */ 1279 complain_overflow_signed, /* Complain_on_overflow. */ 1280 v850_elf_ignore_reloc, /* Special_function. */ 1281 "R_V850_LONGCALL", /* Name. */ 1282 FALSE, /* Partial_inplace. */ 1283 0, /* Src_mask. */ 1284 0, /* Dst_mask. */ 1285 TRUE), /* PCrel_offset. */ 1286 1287 /* Indicates a .longjump pseudo-op. The compiler will generate a 1288 .longjump pseudo-op when it finds a branch which can be relaxed. */ 1289 HOWTO (R_V850_LONGJUMP, /* Type. */ 1290 0, /* Rightshift. */ 1291 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1292 32, /* Bitsize. */ 1293 TRUE, /* PC_relative. */ 1294 0, /* Bitpos. */ 1295 complain_overflow_signed, /* Complain_on_overflow. */ 1296 v850_elf_ignore_reloc, /* Special_function. */ 1297 "R_V850_LONGJUMP", /* Name. */ 1298 FALSE, /* Partial_inplace. */ 1299 0, /* Src_mask. */ 1300 0, /* Dst_mask. */ 1301 TRUE), /* PCrel_offset. */ 1302 1303 HOWTO (R_V850_ALIGN, /* Type. */ 1304 0, /* Rightshift. */ 1305 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1306 0, /* Bitsize. */ 1307 FALSE, /* PC_relative. */ 1308 0, /* Bitpos. */ 1309 complain_overflow_unsigned, /* Complain_on_overflow. */ 1310 v850_elf_ignore_reloc, /* Special_function. */ 1311 "R_V850_ALIGN", /* Name. */ 1312 FALSE, /* Partial_inplace. */ 1313 0, /* Src_mask. */ 1314 0, /* Dst_mask. */ 1315 TRUE), /* PCrel_offset. */ 1316 1317 /* Simple pc-relative 32bit reloc. */ 1318 HOWTO (R_V850_REL32, /* Type. */ 1319 0, /* Rightshift. */ 1320 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1321 32, /* Bitsize. */ 1322 TRUE, /* PC_relative. */ 1323 0, /* Bitpos. */ 1324 complain_overflow_dont, /* Complain_on_overflow. */ 1325 v850_elf_reloc, /* Special_function. */ 1326 "R_V850_REL32", /* Name. */ 1327 FALSE, /* Partial_inplace. */ 1328 0xffffffff, /* Src_mask. */ 1329 0xffffffff, /* Dst_mask. */ 1330 FALSE), /* PCrel_offset. */ 1331 1332 /* An ld.bu version of R_V850_LO16. */ 1333 HOWTO (R_V850_LO16_SPLIT_OFFSET, /* Type. */ 1334 0, /* Rightshift. */ 1335 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1336 16, /* Bitsize. */ 1337 FALSE, /* PC_relative. */ 1338 0, /* Bitpos. */ 1339 complain_overflow_dont, /* Complain_on_overflow. */ 1340 v850_elf_reloc, /* Special_function. */ 1341 "R_V850_LO16_SPLIT_OFFSET", /* Name. */ 1342 FALSE, /* Partial_inplace. */ 1343 0xfffe0020, /* Src_mask. */ 1344 0xfffe0020, /* Dst_mask. */ 1345 FALSE), /* PCrel_offset. */ 1346 1347 /* A unsigned PC relative 16 bit loop. */ 1348 HOWTO (R_V850_16_PCREL, /* Type. */ 1349 0, /* Rightshift. */ 1350 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1351 16, /* Bitsize. */ 1352 TRUE, /* PC_relative. */ 1353 0, /* Bitpos. */ 1354 complain_overflow_bitfield, /* Complain_on_overflow. */ 1355 v850_elf_reloc, /* Special_function. */ 1356 "R_V850_16_PCREL", /* Name. */ 1357 FALSE, /* Partial_inplace. */ 1358 0xfffe, /* Src_mask. */ 1359 0xfffe, /* Dst_mask. */ 1360 TRUE), /* PCrel_offset. */ 1361 1362 /* A PC relative 17 bit branch. */ 1363 HOWTO (R_V850_17_PCREL, /* Type. */ 1364 0, /* Rightshift. */ 1365 2, /* Size (0 = byte, 1 = short, 2 = long). */ 1366 17, /* Bitsize. */ 1367 TRUE, /* PC_relative. */ 1368 0, /* Bitpos. */ 1369 complain_overflow_bitfield, /* Complain_on_overflow. */ 1370 v850_elf_reloc, /* Special_function. */ 1371 "R_V850_17_PCREL", /* Name. */ 1372 FALSE, /* Partial_inplace. */ 1373 0x0010fffe, /* Src_mask. */ 1374 0x0010fffe, /* Dst_mask. */ 1375 TRUE), /* PCrel_offset. */ 1376 1377 /* A 23bit offset ld/st. */ 1378 HOWTO (R_V850_23, /* type. */ 1379 0, /* rightshift. */ 1380 2, /* size (0 = byte, 1 = short, 2 = long). */ 1381 23, /* bitsize. */ 1382 FALSE, /* pc_relative. */ 1383 0, /* bitpos. */ 1384 complain_overflow_dont, /* complain_on_overflow. */ 1385 v850_elf_reloc, /* special_function. */ 1386 "R_V850_23", /* name. */ 1387 FALSE, /* partial_inplace. */ 1388 0xffff07f0, /* src_mask. */ 1389 0xffff07f0, /* dst_mask. */ 1390 FALSE), /* pcrel_offset. */ 1391 1392 /* A PC relative 32 bit branch. */ 1393 HOWTO (R_V850_32_PCREL, /* type. */ 1394 1, /* rightshift. */ 1395 2, /* size (0 = byte, 1 = short, 2 = long). */ 1396 32, /* bitsize. */ 1397 TRUE, /* pc_relative. */ 1398 1, /* bitpos. */ 1399 complain_overflow_signed, /* complain_on_overflow. */ 1400 v850_elf_reloc, /* special_function. */ 1401 "R_V850_32_PCREL", /* name. */ 1402 FALSE, /* partial_inplace. */ 1403 0xfffffffe, /* src_mask. */ 1404 0xfffffffe, /* dst_mask. */ 1405 TRUE), /* pcrel_offset. */ 1406 1407 /* A absolute 32 bit branch. */ 1408 HOWTO (R_V850_32_ABS, /* type. */ 1409 1, /* rightshift. */ 1410 2, /* size (0 = byte, 1 = short, 2 = long). */ 1411 32, /* bitsize. */ 1412 TRUE, /* pc_relative. */ 1413 1, /* bitpos. */ 1414 complain_overflow_signed, /* complain_on_overflow. */ 1415 v850_elf_reloc, /* special_function. */ 1416 "R_V850_32_ABS", /* name. */ 1417 FALSE, /* partial_inplace. */ 1418 0xfffffffe, /* src_mask. */ 1419 0xfffffffe, /* dst_mask. */ 1420 FALSE), /* pcrel_offset. */ 1421 1422 /* High 16 bits of symbol value. */ 1423 HOWTO (R_V850_HI16, /* Type. */ 1424 0, /* Rightshift. */ 1425 1, /* Size (0 = byte, 1 = short, 2 = long). */ 1426 16, /* Bitsize. */ 1427 FALSE, /* PC_relative. */ 1428 0, /* Bitpos. */ 1429 complain_overflow_dont, /* Complain_on_overflow. */ 1430 v850_elf_reloc, /* Special_function. */ 1431 "R_V850_HI16", /* Name. */ 1432 FALSE, /* Partial_inplace. */ 1433 0xffff, /* Src_mask. */ 1434 0xffff, /* Dst_mask. */ 1435 FALSE), /* PCrel_offset. */ 1436 1437 /* Low 16 bits of symbol value. */ 1438 HOWTO (R_V850_16_S1, /* type. */ 1439 1, /* rightshift. */ 1440 1, /* size (0 = byte, 1 = short, 2 = long). */ 1441 16, /* bitsize. */ 1442 FALSE, /* pc_relative. */ 1443 1, /* bitpos. */ 1444 complain_overflow_dont, /* complain_on_overflow. */ 1445 v850_elf_reloc, /* special_function. */ 1446 "R_V850_16_S1", /* name. */ 1447 FALSE, /* partial_inplace. */ 1448 0xfffe, /* src_mask. */ 1449 0xfffe, /* dst_mask. */ 1450 FALSE), /* pcrel_offset. */ 1451 1452 /* Low 16 bits of symbol value. */ 1453 HOWTO (R_V850_LO16_S1, /* type. */ 1454 1, /* rightshift. */ 1455 1, /* size (0 = byte, 1 = short, 2 = long). */ 1456 16, /* bitsize. */ 1457 FALSE, /* pc_relative. */ 1458 1, /* bitpos. */ 1459 complain_overflow_dont, /* complain_on_overflow. */ 1460 v850_elf_reloc, /* special_function. */ 1461 "R_V850_LO16_S1", /* name. */ 1462 FALSE, /* partial_inplace. */ 1463 0xfffe, /* src_mask. */ 1464 0xfffe, /* dst_mask. */ 1465 FALSE), /* pcrel_offset. */ 1466 1467 /* 16 bit offset from the call table base pointer. */ 1468 HOWTO (R_V850_CALLT_15_16_OFFSET, /* type. */ 1469 1, /* rightshift. */ 1470 1, /* size (0 = byte, 1 = short, 2 = long). */ 1471 16, /* bitsize. */ 1472 FALSE, /* pc_relative. */ 1473 1, /* bitpos. */ 1474 complain_overflow_dont, /* complain_on_overflow. */ 1475 v850_elf_reloc, /* special_function. */ 1476 "R_V850_CALLT_15_16_OFFSET", /* name. */ 1477 FALSE, /* partial_inplace. */ 1478 0xfffe, /* src_mask. */ 1479 0xfffe, /* dst_mask. */ 1480 FALSE), /* pcrel_offset. */ 1481 1482 /* Like R_V850_32 PCREL, but referring to the GOT table entry for 1483 the symbol. */ 1484 HOWTO (R_V850_32_GOTPCREL, /* type. */ 1485 0, /* rightshift. */ 1486 2, /* size (0 = byte, 1 = short, 2 = long). */ 1487 32, /* bitsize. */ 1488 TRUE, /* pc_relative. */ 1489 0, /* bitpos. */ 1490 complain_overflow_unsigned, /* complain_on_overflow. */ 1491 v850_elf_reloc, /* special_function. */ 1492 "R_V850_32_GOTPCREL", /* name. */ 1493 FALSE, /* partial_inplace. */ 1494 0xffffffff, /* src_mask. */ 1495 0xffffffff, /* dst_mask. */ 1496 TRUE), /* pcrel_offset. */ 1497 1498 /* Like R_V850_SDA_, but referring to the GOT table entry for 1499 the symbol. */ 1500 HOWTO (R_V850_16_GOT, /* type. */ 1501 0, /* rightshift. */ 1502 2, /* size (0 = byte, 1 = short, 2 = long). */ 1503 16, /* bitsize. */ 1504 FALSE, /* pc_relative. */ 1505 0, /* bitpos. */ 1506 complain_overflow_unsigned, /* complain_on_overflow. */ 1507 bfd_elf_generic_reloc, /* special_function. */ 1508 "R_V850_16_GOT", /* name. */ 1509 FALSE, /* partial_inplace. */ 1510 0xffff, /* src_mask. */ 1511 0xffff, /* dst_mask. */ 1512 FALSE), /* pcrel_offset. */ 1513 1514 HOWTO (R_V850_32_GOT, /* type. */ 1515 0, /* rightshift. */ 1516 2, /* size (0 = byte, 1 = short, 2 = long). */ 1517 32, /* bitsize. */ 1518 FALSE, /* pc_relative. */ 1519 0, /* bitpos. */ 1520 complain_overflow_unsigned, /* complain_on_overflow. */ 1521 bfd_elf_generic_reloc, /* special_function. */ 1522 "R_V850_32_GOT", /* name. */ 1523 FALSE, /* partial_inplace. */ 1524 0xffffffff, /* src_mask. */ 1525 0xffffffff, /* dst_mask. */ 1526 FALSE), /* pcrel_offset. */ 1527 1528 /* Like R_V850_22_PCREL, but referring to the procedure linkage table 1529 entry for the symbol. */ 1530 HOWTO (R_V850_22_PLT, /* type. */ 1531 1, /* rightshift. */ 1532 2, /* size (0 = byte, 1 = short, 2 = long). */ 1533 22, /* bitsize. */ 1534 TRUE, /* pc_relative. */ 1535 7, /* bitpos. */ 1536 complain_overflow_signed, /* complain_on_overflow. */ 1537 bfd_elf_generic_reloc, /* special_function. */ 1538 "R_V850_22_PLT", /* name. */ 1539 FALSE, /* partial_inplace. */ 1540 0x07ffff80, /* src_mask. */ 1541 0x07ffff80, /* dst_mask. */ 1542 TRUE), /* pcrel_offset. */ 1543 1544 HOWTO (R_V850_32_PLT, /* type. */ 1545 1, /* rightshift. */ 1546 2, /* size (0 = byte, 1 = short, 2 = long). */ 1547 32, /* bitsize. */ 1548 TRUE, /* pc_relative. */ 1549 1, /* bitpos. */ 1550 complain_overflow_signed, /* complain_on_overflow. */ 1551 bfd_elf_generic_reloc, /* special_function. */ 1552 "R_V850_32_PLT", /* name. */ 1553 FALSE, /* partial_inplace. */ 1554 0xffffffff, /* src_mask. */ 1555 0xffffffff, /* dst_mask. */ 1556 TRUE), /* pcrel_offset. */ 1557 1558 /* This is used only by the dynamic linker. The symbol should exist 1559 both in the object being run and in some shared library. The 1560 dynamic linker copies the data addressed by the symbol from the 1561 shared library into the object, because the object being 1562 run has to have the data at some particular address. */ 1563 HOWTO (R_V850_COPY, /* type. */ 1564 0, /* rightshift. */ 1565 2, /* size (0 = byte, 1 = short, 2 = long). */ 1566 32, /* bitsize. */ 1567 FALSE, /* pc_relative. */ 1568 0, /* bitpos. */ 1569 complain_overflow_bitfield, /* complain_on_overflow. */ 1570 bfd_elf_generic_reloc, /* special_function. */ 1571 "R_V850_COPY", /* name. */ 1572 FALSE, /* partial_inplace. */ 1573 0xffffffff, /* src_mask. */ 1574 0xffffffff, /* dst_mask. */ 1575 FALSE), /* pcrel_offset. */ 1576 1577 /* Like R_M32R_24, but used when setting global offset table 1578 entries. */ 1579 HOWTO (R_V850_GLOB_DAT, /* type. */ 1580 0, /* rightshift. */ 1581 2, /* size (0 = byte, 1 = short, 2 = long) */ 1582 32, /* bitsize. */ 1583 FALSE, /* pc_relative. */ 1584 0, /* bitpos. */ 1585 complain_overflow_bitfield, /* complain_on_overflow. */ 1586 bfd_elf_generic_reloc, /* special_function. */ 1587 "R_V850_GLOB_DAT", /* name. */ 1588 FALSE, /* partial_inplace. */ 1589 0xffffffff, /* src_mask. */ 1590 0xffffffff, /* dst_mask. */ 1591 FALSE), /* pcrel_offset. */ 1592 1593 /* Marks a procedure linkage table entry for a symbol. */ 1594 HOWTO (R_V850_JMP_SLOT, /* type. */ 1595 0, /* rightshift. */ 1596 2, /* size (0 = byte, 1 = short, 2 = long) */ 1597 32, /* bitsize. */ 1598 FALSE, /* pc_relative. */ 1599 0, /* bitpos. */ 1600 complain_overflow_bitfield, /* complain_on_overflow. */ 1601 bfd_elf_generic_reloc, /* special_function. */ 1602 "R_V850_JMP_SLOT", /* name. */ 1603 FALSE, /* partial_inplace. */ 1604 0xffffffff, /* src_mask. */ 1605 0xffffffff, /* dst_mask. */ 1606 FALSE), /* pcrel_offset. */ 1607 1608 /* Used only by the dynamic linker. When the object is run, this 1609 longword is set to the load address of the object, plus the 1610 addend. */ 1611 HOWTO (R_V850_RELATIVE, /* type. */ 1612 0, /* rightshift. */ 1613 2, /* size (0 = byte, 1 = short, 2 = long) */ 1614 32, /* bitsize. */ 1615 FALSE, /* pc_relative. */ 1616 0, /* bitpos. */ 1617 complain_overflow_bitfield, /* complain_on_overflow. */ 1618 bfd_elf_generic_reloc, /* special_function. */ 1619 "R_V850_RELATIVE", /* name. */ 1620 FALSE, /* partial_inplace. */ 1621 0xffffffff, /* src_mask. */ 1622 0xffffffff, /* dst_mask. */ 1623 FALSE), /* pcrel_offset. */ 1624 1625 HOWTO (R_V850_16_GOTOFF, /* type. */ 1626 0, /* rightshift. */ 1627 2, /* size (0 = byte, 1 = short, 2 = long) */ 1628 16, /* bitsize. */ 1629 FALSE, /* pc_relative. */ 1630 0, /* bitpos. */ 1631 complain_overflow_bitfield, /* complain_on_overflow. */ 1632 bfd_elf_generic_reloc, /* special_function. */ 1633 "R_V850_16_GOTOFF", /* name. */ 1634 FALSE, /* partial_inplace. */ 1635 0xffff, /* src_mask. */ 1636 0xffff, /* dst_mask. */ 1637 FALSE), /* pcrel_offset. */ 1638 1639 HOWTO (R_V850_32_GOTOFF, /* type. */ 1640 0, /* rightshift. */ 1641 2, /* size (0 = byte, 1 = short, 2 = long) */ 1642 32, /* bitsize. */ 1643 FALSE, /* pc_relative. */ 1644 0, /* bitpos. */ 1645 complain_overflow_bitfield, /* complain_on_overflow. */ 1646 bfd_elf_generic_reloc, /* special_function. */ 1647 "R_V850_32_GOTOFF", /* name. */ 1648 FALSE, /* partial_inplace. */ 1649 0xffffffff, /* src_mask. */ 1650 0xffffffff, /* dst_mask. */ 1651 FALSE), /* pcrel_offset. */ 1652 1653 HOWTO (R_V850_CODE, /* type. */ 1654 0, /* rightshift. */ 1655 1, /* size (0 = byte, 1 = short, 2 = long) */ 1656 0, /* bitsize. */ 1657 FALSE, /* pc_relative. */ 1658 0, /* bitpos. */ 1659 complain_overflow_unsigned, /* complain_on_overflow. */ 1660 v850_elf_ignore_reloc, /* special_function. */ 1661 "R_V850_CODE", /* name. */ 1662 FALSE, /* partial_inplace. */ 1663 0, /* src_mask. */ 1664 0, /* dst_mask. */ 1665 TRUE), /* pcrel_offset. */ 1666 1667 HOWTO (R_V850_DATA, /* type. */ 1668 0, /* rightshift. */ 1669 1, /* size (0 = byte, 1 = short, 2 = long) */ 1670 0, /* bitsize. */ 1671 FALSE, /* pc_relative. */ 1672 0, /* bitpos. */ 1673 complain_overflow_unsigned, /* complain_on_overflow. */ 1674 v850_elf_ignore_reloc, /* special_function. */ 1675 "R_V850_DATA", /* name. */ 1676 FALSE, /* partial_inplace. */ 1677 0, /* src_mask. */ 1678 0, /* dst_mask. */ 1679 TRUE), /* pcrel_offset. */ 1680 1681}; 1682 1683/* Map BFD reloc types to V850 ELF reloc types. */ 1684 1685struct v850_elf_reloc_map 1686{ 1687 /* BFD_RELOC_V850_CALLT_16_16_OFFSET is 258, which will not fix in an 1688 unsigned char. */ 1689 bfd_reloc_code_real_type bfd_reloc_val; 1690 unsigned int elf_reloc_val; 1691}; 1692 1693static const struct v850_elf_reloc_map v850_elf_reloc_map[] = 1694{ 1695 { BFD_RELOC_NONE, R_V850_NONE }, 1696 { BFD_RELOC_V850_9_PCREL, R_V850_9_PCREL }, 1697 { BFD_RELOC_V850_22_PCREL, R_V850_22_PCREL }, 1698 { BFD_RELOC_HI16_S, R_V850_HI16_S }, 1699 { BFD_RELOC_HI16, R_V850_HI16 }, 1700 { BFD_RELOC_LO16, R_V850_LO16 }, 1701 { BFD_RELOC_32, R_V850_ABS32 }, 1702 { BFD_RELOC_32_PCREL, R_V850_REL32 }, 1703 { BFD_RELOC_16, R_V850_16 }, 1704 { BFD_RELOC_8, R_V850_8 }, 1705 { BFD_RELOC_V850_SDA_16_16_OFFSET, R_V850_SDA_16_16_OFFSET }, 1706 { BFD_RELOC_V850_SDA_15_16_OFFSET, R_V850_SDA_15_16_OFFSET }, 1707 { BFD_RELOC_V850_ZDA_16_16_OFFSET, R_V850_ZDA_16_16_OFFSET }, 1708 { BFD_RELOC_V850_ZDA_15_16_OFFSET, R_V850_ZDA_15_16_OFFSET }, 1709 { BFD_RELOC_V850_TDA_6_8_OFFSET, R_V850_TDA_6_8_OFFSET }, 1710 { BFD_RELOC_V850_TDA_7_8_OFFSET, R_V850_TDA_7_8_OFFSET }, 1711 { BFD_RELOC_V850_TDA_7_7_OFFSET, R_V850_TDA_7_7_OFFSET }, 1712 { BFD_RELOC_V850_TDA_16_16_OFFSET, R_V850_TDA_16_16_OFFSET }, 1713 { BFD_RELOC_V850_TDA_4_5_OFFSET, R_V850_TDA_4_5_OFFSET }, 1714 { BFD_RELOC_V850_TDA_4_4_OFFSET, R_V850_TDA_4_4_OFFSET }, 1715 { BFD_RELOC_V850_LO16_SPLIT_OFFSET, R_V850_LO16_SPLIT_OFFSET }, 1716 { BFD_RELOC_V850_SDA_16_16_SPLIT_OFFSET, R_V850_SDA_16_16_SPLIT_OFFSET }, 1717 { BFD_RELOC_V850_ZDA_16_16_SPLIT_OFFSET, R_V850_ZDA_16_16_SPLIT_OFFSET }, 1718 { BFD_RELOC_V850_CALLT_6_7_OFFSET, R_V850_CALLT_6_7_OFFSET }, 1719 { BFD_RELOC_V850_CALLT_16_16_OFFSET, R_V850_CALLT_16_16_OFFSET }, 1720 { BFD_RELOC_VTABLE_INHERIT, R_V850_GNU_VTINHERIT }, 1721 { BFD_RELOC_VTABLE_ENTRY, R_V850_GNU_VTENTRY }, 1722 { BFD_RELOC_V850_LONGCALL, R_V850_LONGCALL }, 1723 { BFD_RELOC_V850_LONGJUMP, R_V850_LONGJUMP }, 1724 { BFD_RELOC_V850_ALIGN, R_V850_ALIGN }, 1725 { BFD_RELOC_V850_16_PCREL, R_V850_16_PCREL }, 1726 { BFD_RELOC_V850_17_PCREL, R_V850_17_PCREL }, 1727 { BFD_RELOC_V850_23, R_V850_23 }, 1728 { BFD_RELOC_V850_32_PCREL, R_V850_32_PCREL }, 1729 { BFD_RELOC_V850_32_ABS, R_V850_32_ABS }, 1730 { BFD_RELOC_V850_16_SPLIT_OFFSET, R_V850_HI16 }, 1731 { BFD_RELOC_V850_16_S1, R_V850_16_S1 }, 1732 { BFD_RELOC_V850_LO16_S1, R_V850_LO16_S1 }, 1733 { BFD_RELOC_V850_CALLT_15_16_OFFSET, R_V850_CALLT_15_16_OFFSET }, 1734 { BFD_RELOC_V850_32_GOTPCREL, R_V850_32_GOTPCREL }, 1735 { BFD_RELOC_V850_16_GOT, R_V850_16_GOT }, 1736 { BFD_RELOC_V850_32_GOT, R_V850_32_GOT }, 1737 { BFD_RELOC_V850_22_PLT_PCREL, R_V850_22_PLT }, 1738 { BFD_RELOC_V850_32_PLT_PCREL, R_V850_32_PLT }, 1739 { BFD_RELOC_V850_COPY, R_V850_COPY }, 1740 { BFD_RELOC_V850_GLOB_DAT, R_V850_GLOB_DAT }, 1741 { BFD_RELOC_V850_JMP_SLOT, R_V850_JMP_SLOT }, 1742 { BFD_RELOC_V850_RELATIVE, R_V850_RELATIVE }, 1743 { BFD_RELOC_V850_16_GOTOFF, R_V850_16_GOTOFF }, 1744 { BFD_RELOC_V850_32_GOTOFF, R_V850_32_GOTOFF }, 1745 { BFD_RELOC_V850_CODE, R_V850_CODE }, 1746 { BFD_RELOC_V850_DATA, R_V850_DATA }, 1747}; 1748 1749#define V800_RELOC(name,sz,bit,shift,complain,pcrel,resolver) \ 1750 HOWTO (name, shift, sz, bit, pcrel, 0, complain_overflow_ ## complain, \ 1751 bfd_elf_ ## resolver ## _reloc, #name, FALSE, 0, ~0, FALSE) 1752 1753#define V800_EMPTY(name) EMPTY_HOWTO (name - R_V810_NONE) 1754 1755#define bfd_elf_v850_reloc v850_elf_reloc 1756 1757/* Note: It is REQUIRED that the 'type' value (R_V810_...) of each entry 1758 in this array match the index of the entry in the array minus 0x30. 1759 See: bfd_elf_v850_relocate_section(), v800_elf_reloc_type_lookup() 1760 and v800_elf_info_to_howto(). */ 1761 1762static reloc_howto_type v800_elf_howto_table[] = 1763{ 1764 V800_RELOC (R_V810_NONE, 0, 0, 0, dont, FALSE, generic), /* Type = 0x30 */ 1765 V800_RELOC (R_V810_BYTE, 0, 8, 0, dont, FALSE, generic), 1766 V800_RELOC (R_V810_HWORD, 1, 16, 0, dont, FALSE, generic), 1767 V800_RELOC (R_V810_WORD, 2, 32, 0, dont, FALSE, generic), 1768 V800_RELOC (R_V810_WLO, 1, 16, 0, dont, FALSE, generic), 1769 V800_RELOC (R_V810_WHI, 1, 16, 0, dont, FALSE, generic), 1770 V800_RELOC (R_V810_WHI1, 1, 16, 0, dont, FALSE, generic), 1771 V800_RELOC (R_V810_GPBYTE, 0, 8, 0, dont, FALSE, v850), 1772 V800_RELOC (R_V810_GPHWORD, 1, 16, 0, dont, FALSE, v850), 1773 V800_RELOC (R_V810_GPWORD, 2, 32, 0, dont, FALSE, v850), 1774 V800_RELOC (R_V810_GPWLO, 1, 16, 0, dont, FALSE, v850), 1775 V800_RELOC (R_V810_GPWHI, 1, 16, 0, dont, FALSE, v850), 1776 V800_RELOC (R_V810_GPWHI1, 1, 16, 0, dont, FALSE, v850), 1777 V800_RELOC (R_V850_HWLO, 1, 16, 0, dont, FALSE, generic), 1778 V800_EMPTY (R_V810_reserved1), 1779 V800_RELOC (R_V850_EP7BIT, 0, 7, 0, unsigned, FALSE, v850), 1780 V800_RELOC (R_V850_EPHBYTE, 0, 8, 1, unsigned, FALSE, v850), 1781 V800_RELOC (R_V850_EPWBYTE, 0, 8, 2, unsigned, FALSE, v850), 1782 V800_RELOC (R_V850_REGHWLO, 1, 16, 0, dont, FALSE, v850), 1783 V800_EMPTY (R_V810_reserved2), 1784 V800_RELOC (R_V850_GPHWLO, 1, 16, 0, dont, FALSE, v850), 1785 V800_EMPTY (R_V810_reserved3), 1786 V800_RELOC (R_V850_PCR22, 2, 22, 0, signed, TRUE, generic), 1787 V800_RELOC (R_V850_BLO, 2, 24, 0, dont, FALSE, v850), 1788 V800_RELOC (R_V850_EP4BIT, 0, 4, 0, unsigned, FALSE, v850), 1789 V800_RELOC (R_V850_EP5BIT, 0, 5, 0, unsigned, FALSE, v850), 1790 V800_RELOC (R_V850_REGBLO, 2, 24, 0, dont, FALSE, v850), 1791 V800_RELOC (R_V850_GPBLO, 2, 24, 0, dont, FALSE, v850), 1792 V800_RELOC (R_V810_WLO_1, 1, 16, 0, dont, FALSE, v850), 1793 V800_RELOC (R_V810_GPWLO_1, 1, 16, 0, signed, FALSE, v850), 1794 V800_RELOC (R_V850_BLO_1, 2, 16, 0, signed, FALSE, v850), 1795 V800_RELOC (R_V850_HWLO_1, 1, 16, 0, signed, FALSE, v850), 1796 V800_EMPTY (R_V810_reserved4), 1797 V800_RELOC (R_V850_GPBLO_1, 2, 16, 1, signed, FALSE, v850), 1798 V800_RELOC (R_V850_GPHWLO_1, 1, 16, 1, signed, FALSE, v850), 1799 V800_EMPTY (R_V810_reserved5), 1800 V800_RELOC (R_V850_EPBLO, 2, 16, 1, signed, FALSE, v850), 1801 V800_RELOC (R_V850_EPHWLO, 1, 16, 1, signed, FALSE, v850), 1802 V800_EMPTY (R_V810_reserved6), 1803 V800_RELOC (R_V850_EPWLO_N, 1, 16, 1, signed, FALSE, v850), 1804 V800_RELOC (R_V850_PC32, 2, 32, 1, signed, TRUE, v850), 1805 V800_RELOC (R_V850_W23BIT, 2, 23, 1, signed, FALSE, v850), 1806 V800_RELOC (R_V850_GPW23BIT, 2, 23, 1, signed, FALSE, v850), 1807 V800_RELOC (R_V850_EPW23BIT, 2, 23, 1, signed, FALSE, v850), 1808 V800_RELOC (R_V850_B23BIT, 2, 23, 1, signed, FALSE, v850), 1809 V800_RELOC (R_V850_GPB23BIT, 2, 23, 1, signed, FALSE, v850), 1810 V800_RELOC (R_V850_EPB23BIT, 2, 23, 1, signed, FALSE, v850), 1811 V800_RELOC (R_V850_PC16U, 1, 16, 1, unsigned, TRUE, generic), 1812 V800_RELOC (R_V850_PC17, 2, 17, 1, signed, TRUE, generic), 1813 V800_RELOC (R_V850_DW8, 2, 8, 2, signed, FALSE, v850), 1814 V800_RELOC (R_V850_GPDW8, 2, 8, 2, signed, FALSE, v850), 1815 V800_RELOC (R_V850_EPDW8, 2, 8, 2, signed, FALSE, v850), 1816 V800_RELOC (R_V850_PC9, 1, 9, 3, signed, TRUE, v850), 1817 V800_RELOC (R_V810_REGBYTE, 0, 8, 0, dont, FALSE, v850), 1818 V800_RELOC (R_V810_REGHWORD, 1, 16, 0, dont, FALSE, v850), 1819 V800_RELOC (R_V810_REGWORD, 2, 32, 0, dont, FALSE, v850), 1820 V800_RELOC (R_V810_REGWLO, 1, 16, 0, dont, FALSE, v850), 1821 V800_RELOC (R_V810_REGWHI, 1, 16, 0, dont, FALSE, v850), 1822 V800_RELOC (R_V810_REGWHI1, 1, 16, 0, dont, FALSE, v850), 1823 V800_RELOC (R_V850_REGW23BIT, 2, 23, 1, signed, FALSE, v850), 1824 V800_RELOC (R_V850_REGB23BIT, 2, 23, 1, signed, FALSE, v850), 1825 V800_RELOC (R_V850_REGDW8, 2, 8, 2, signed, FALSE, v850), 1826 V800_RELOC (R_V810_EPBYTE, 0, 8, 0, dont, FALSE, v850), 1827 V800_RELOC (R_V810_EPHWORD, 1, 16, 0, dont, FALSE, v850), 1828 V800_RELOC (R_V810_EPWORD, 2, 32, 0, dont, FALSE, v850), 1829 V800_RELOC (R_V850_WLO23, 2, 32, 1, dont, FALSE, v850), 1830 V800_RELOC (R_V850_WORD_E, 2, 32, 1, dont, FALSE, v850), 1831 V800_RELOC (R_V850_REGWORD_E, 2, 32, 1, dont, FALSE, v850), 1832 V800_RELOC (R_V850_WORD, 2, 32, 0, dont, FALSE, v850), 1833 V800_RELOC (R_V850_GPWORD, 2, 32, 0, dont, FALSE, v850), 1834 V800_RELOC (R_V850_REGWORD, 2, 32, 0, dont, FALSE, v850), 1835 V800_RELOC (R_V850_EPWORD, 2, 32, 0, dont, FALSE, v850), 1836 V800_RELOC (R_V810_TPBYTE, 0, 8, 0, dont, FALSE, v850), 1837 V800_RELOC (R_V810_TPHWORD, 1, 16, 0, dont, FALSE, v850), 1838 V800_RELOC (R_V810_TPWORD, 2, 32, 0, dont, FALSE, v850), 1839 V800_RELOC (R_V810_TPWLO, 1, 16, 0, dont, FALSE, v850), 1840 V800_RELOC (R_V810_TPWHI, 1, 16, 0, dont, FALSE, v850), 1841 V800_RELOC (R_V810_TPWHI1, 1, 16, 0, dont, FALSE, v850), 1842 V800_RELOC (R_V850_TPHWLO, 1, 16, 1, dont, FALSE, v850), 1843 V800_RELOC (R_V850_TPBLO, 2, 24, 0, dont, FALSE, v850), 1844 V800_RELOC (R_V810_TPWLO_1, 1, 16, 0, signed, FALSE, v850), 1845 V800_RELOC (R_V850_TPBLO_1, 2, 16, 0, signed, FALSE, v850), 1846 V800_RELOC (R_V850_TPHWLO_1, 1, 16, 0, signed, FALSE, v850), 1847 V800_RELOC (R_V850_TP23BIT, 2, 23, 0, signed, FALSE, v850), 1848 V800_RELOC (R_V850_TPW23BIT, 2, 23, 0, signed, FALSE, v850), 1849 V800_RELOC (R_V850_TPDW8, 2, 8, 0, signed, FALSE, v850) 1850}; 1851 1852/* Map a bfd relocation into the appropriate howto structure. */ 1853 1854static reloc_howto_type * 1855v850_elf_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED, 1856 bfd_reloc_code_real_type code) 1857{ 1858 unsigned int i; 1859 1860 for (i = ARRAY_SIZE (v850_elf_reloc_map); i --;) 1861 if (v850_elf_reloc_map[i].bfd_reloc_val == code) 1862 { 1863 unsigned int elf_reloc_val = v850_elf_reloc_map[i].elf_reloc_val; 1864 1865 BFD_ASSERT (v850_elf_howto_table[elf_reloc_val].type == elf_reloc_val); 1866 1867 return v850_elf_howto_table + elf_reloc_val; 1868 } 1869 1870 return NULL; 1871} 1872 1873static reloc_howto_type * 1874v850_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 1875 const char *r_name) 1876{ 1877 unsigned int i; 1878 1879 for (i = 0; 1880 i < sizeof (v850_elf_howto_table) / sizeof (v850_elf_howto_table[0]); 1881 i++) 1882 if (v850_elf_howto_table[i].name != NULL 1883 && strcasecmp (v850_elf_howto_table[i].name, r_name) == 0) 1884 return &v850_elf_howto_table[i]; 1885 1886 return NULL; 1887} 1888 1889/* Set the howto pointer for an V850 ELF reloc. */ 1890 1891static void 1892v850_elf_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED, 1893 arelent *cache_ptr, 1894 Elf_Internal_Rela *dst) 1895{ 1896 unsigned int r_type; 1897 1898 r_type = ELF32_R_TYPE (dst->r_info); 1899 if (r_type >= (unsigned int) R_V850_max) 1900 { 1901 /* xgettext:c-format */ 1902 _bfd_error_handler (_("%B: invalid V850 reloc number: %d"), abfd, r_type); 1903 r_type = 0; 1904 } 1905 cache_ptr->howto = &v850_elf_howto_table[r_type]; 1906} 1907 1908/* Set the howto pointer for a V850 ELF reloc (type RELA). */ 1909 1910static void 1911v850_elf_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED, 1912 arelent * cache_ptr, 1913 Elf_Internal_Rela *dst) 1914{ 1915 unsigned int r_type; 1916 1917 r_type = ELF32_R_TYPE (dst->r_info); 1918 if (r_type >= (unsigned int) R_V850_max) 1919 { 1920 /* xgettext:c-format */ 1921 _bfd_error_handler (_("%B: invalid V850 reloc number: %d"), abfd, r_type); 1922 r_type = 0; 1923 } 1924 cache_ptr->howto = &v850_elf_howto_table[r_type]; 1925} 1926 1927static bfd_boolean 1928v850_elf_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, const char *name) 1929{ 1930 return ( (name[0] == '.' && (name[1] == 'L' || name[1] == '.')) 1931 || (name[0] == '_' && name[1] == '.' && name[2] == 'L' && name[3] == '_')); 1932} 1933 1934static bfd_boolean 1935v850_elf_is_target_special_symbol (bfd *abfd, asymbol *sym) 1936{ 1937 return v850_elf_is_local_label_name (abfd, sym->name); 1938} 1939 1940/* We overload some of the bfd_reloc error codes for own purposes. */ 1941#define bfd_reloc_gp_not_found bfd_reloc_other 1942#define bfd_reloc_ep_not_found bfd_reloc_continue 1943#define bfd_reloc_ctbp_not_found (bfd_reloc_dangerous + 1) 1944 1945/* Perform a relocation as part of a final link. */ 1946 1947static bfd_reloc_status_type 1948v850_elf_final_link_relocate (reloc_howto_type *howto, 1949 bfd *input_bfd, 1950 bfd *output_bfd ATTRIBUTE_UNUSED, 1951 asection *input_section, 1952 bfd_byte *contents, 1953 bfd_vma offset, 1954 bfd_vma value, 1955 bfd_vma addend, 1956 struct bfd_link_info *info, 1957 asection *sym_sec, 1958 int is_local ATTRIBUTE_UNUSED) 1959{ 1960 unsigned int r_type = howto->type; 1961 bfd_byte *hit_data = contents + offset; 1962 1963 /* Adjust the value according to the relocation. */ 1964 switch (r_type) 1965 { 1966 case R_V850_PC9: 1967 case R_V850_9_PCREL: 1968 value -= (input_section->output_section->vma 1969 + input_section->output_offset); 1970 value -= offset; 1971 break; 1972 1973 case R_V850_PC16U: 1974 case R_V850_16_PCREL: 1975 value -= (input_section->output_section->vma 1976 + input_section->output_offset 1977 + offset); 1978 1979 /* If the sign extension will corrupt the value then we have overflowed. */ 1980 if ((value & 0xffff0000) != 0xffff0000) 1981 return bfd_reloc_overflow; 1982 1983 break; 1984 1985 case R_V850_PC17: 1986 case R_V850_17_PCREL: 1987 value -= (input_section->output_section->vma 1988 + input_section->output_offset 1989 + offset); 1990 1991 /* If the sign extension will corrupt the value then we have overflowed. */ 1992 if (((value & 0xffff0000) != 0x0) && ((value & 0xffff0000) != 0xffff0000)) 1993 return bfd_reloc_overflow; 1994 1995 value = SEXT17 (value); 1996 break; 1997 1998 case R_V850_PCR22: 1999 case R_V850_22_PCREL: 2000 value -= (input_section->output_section->vma 2001 + input_section->output_offset 2002 + offset); 2003 2004 /* If the sign extension will corrupt the value then we have overflowed. */ 2005 if (((value & 0xffe00000) != 0x0) && ((value & 0xffe00000) != 0xffe00000)) 2006 return bfd_reloc_overflow; 2007 2008 /* Only the bottom 22 bits of the PC are valid. */ 2009 value = SEXT22 (value); 2010 break; 2011 2012 case R_V850_PC32: 2013 case R_V850_32_PCREL: 2014 value -= (input_section->output_section->vma 2015 + input_section->output_offset 2016 + offset); 2017 break; 2018 2019 case R_V850_32_ABS: 2020 case R_V850_23: 2021 case R_V850_HI16_S: 2022 case R_V850_HI16: 2023 case R_V850_LO16: 2024 case R_V850_LO16_S1: 2025 case R_V850_LO16_SPLIT_OFFSET: 2026 case R_V850_16: 2027 case R_V850_ABS32: 2028 case R_V850_8: 2029 case R_V810_BYTE: 2030 case R_V810_HWORD: 2031 case R_V810_WORD: 2032 case R_V810_WLO: 2033 case R_V810_WHI: 2034 case R_V810_WHI1: 2035 case R_V810_WLO_1: 2036 case R_V850_WLO23: 2037 case R_V850_BLO: 2038 break; 2039 2040 case R_V850_ZDA_15_16_OFFSET: 2041 case R_V850_ZDA_16_16_OFFSET: 2042 case R_V850_ZDA_16_16_SPLIT_OFFSET: 2043 if (sym_sec == NULL) 2044 return bfd_reloc_undefined; 2045 2046 value -= sym_sec->output_section->vma; 2047 break; 2048 2049 case R_V850_SDA_15_16_OFFSET: 2050 case R_V850_SDA_16_16_OFFSET: 2051 case R_V850_SDA_16_16_SPLIT_OFFSET: 2052 case R_V810_GPWLO_1: 2053 { 2054 unsigned long gp; 2055 struct bfd_link_hash_entry * h; 2056 2057 if (sym_sec == NULL) 2058 return bfd_reloc_undefined; 2059 2060 /* Get the value of __gp. */ 2061 h = bfd_link_hash_lookup (info->hash, "__gp", FALSE, FALSE, TRUE); 2062 if (h == NULL 2063 || h->type != bfd_link_hash_defined) 2064 return bfd_reloc_gp_not_found; 2065 2066 gp = (h->u.def.value 2067 + h->u.def.section->output_section->vma 2068 + h->u.def.section->output_offset); 2069 2070 value -= sym_sec->output_section->vma; 2071 value -= (gp - sym_sec->output_section->vma); 2072 } 2073 break; 2074 2075 case R_V850_TDA_4_4_OFFSET: 2076 case R_V850_TDA_4_5_OFFSET: 2077 case R_V850_TDA_7_7_OFFSET: 2078 case R_V850_TDA_7_8_OFFSET: 2079 case R_V850_TDA_6_8_OFFSET: 2080 case R_V850_TDA_16_16_OFFSET: 2081 { 2082 unsigned long ep; 2083 struct bfd_link_hash_entry * h; 2084 2085 /* Get the value of __ep. */ 2086 h = bfd_link_hash_lookup (info->hash, "__ep", FALSE, FALSE, TRUE); 2087 if (h == NULL 2088 || h->type != bfd_link_hash_defined) 2089 return bfd_reloc_ep_not_found; 2090 2091 ep = (h->u.def.value 2092 + h->u.def.section->output_section->vma 2093 + h->u.def.section->output_offset); 2094 2095 value -= ep; 2096 } 2097 break; 2098 2099 case R_V850_CALLT_6_7_OFFSET: 2100 { 2101 unsigned long ctbp; 2102 struct bfd_link_hash_entry * h; 2103 2104 /* Get the value of __ctbp. */ 2105 h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE); 2106 if (h == NULL 2107 || h->type != bfd_link_hash_defined) 2108 return bfd_reloc_ctbp_not_found; 2109 2110 ctbp = (h->u.def.value 2111 + h->u.def.section->output_section->vma 2112 + h->u.def.section->output_offset); 2113 value -= ctbp; 2114 } 2115 break; 2116 2117 case R_V850_CALLT_15_16_OFFSET: 2118 case R_V850_CALLT_16_16_OFFSET: 2119 { 2120 unsigned long ctbp; 2121 struct bfd_link_hash_entry * h; 2122 2123 if (sym_sec == NULL) 2124 return bfd_reloc_undefined; 2125 2126 /* Get the value of __ctbp. */ 2127 h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE); 2128 if (h == NULL 2129 || h->type != bfd_link_hash_defined) 2130 return bfd_reloc_ctbp_not_found; 2131 2132 ctbp = (h->u.def.value 2133 + h->u.def.section->output_section->vma 2134 + h->u.def.section->output_offset); 2135 2136 value -= sym_sec->output_section->vma; 2137 value -= (ctbp - sym_sec->output_section->vma); 2138 } 2139 break; 2140 2141 case R_V850_NONE: 2142 case R_V810_NONE: 2143 case R_V850_GNU_VTINHERIT: 2144 case R_V850_GNU_VTENTRY: 2145 case R_V850_LONGCALL: 2146 case R_V850_LONGJUMP: 2147 case R_V850_ALIGN: 2148 return bfd_reloc_ok; 2149 2150 default: 2151#ifdef DEBUG 2152 fprintf (stderr, "%B: reloc number %d not recognised\n", input_bfd, r_type); 2153#endif 2154 return bfd_reloc_notsupported; 2155 } 2156 2157 /* Perform the relocation. */ 2158 return v850_elf_perform_relocation (input_bfd, r_type, value + addend, hit_data); 2159} 2160 2161/* Relocate an V850 ELF section. */ 2162 2163static bfd_boolean 2164v850_elf_relocate_section (bfd *output_bfd, 2165 struct bfd_link_info *info, 2166 bfd *input_bfd, 2167 asection *input_section, 2168 bfd_byte *contents, 2169 Elf_Internal_Rela *relocs, 2170 Elf_Internal_Sym *local_syms, 2171 asection **local_sections) 2172{ 2173 Elf_Internal_Shdr *symtab_hdr; 2174 struct elf_link_hash_entry **sym_hashes; 2175 Elf_Internal_Rela *rel; 2176 Elf_Internal_Rela *relend; 2177 2178 symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr; 2179 sym_hashes = elf_sym_hashes (input_bfd); 2180 2181 /* Reset the list of remembered HI16S relocs to empty. */ 2182 free_hi16s = previous_hi16s; 2183 previous_hi16s = NULL; 2184 hi16s_counter = 0; 2185 2186 rel = relocs; 2187 relend = relocs + input_section->reloc_count; 2188 for (; rel < relend; rel++) 2189 { 2190 unsigned int r_type; 2191 reloc_howto_type *howto; 2192 unsigned long r_symndx; 2193 Elf_Internal_Sym *sym; 2194 asection *sec; 2195 struct elf_link_hash_entry *h; 2196 bfd_vma relocation; 2197 bfd_reloc_status_type r; 2198 2199 r_symndx = ELF32_R_SYM (rel->r_info); 2200 r_type = ELF32_R_TYPE (rel->r_info); 2201 2202 if (r_type == R_V850_GNU_VTENTRY 2203 || r_type == R_V850_GNU_VTINHERIT) 2204 continue; 2205 2206 if (bfd_get_arch (input_bfd) == bfd_arch_v850_rh850) 2207 howto = v800_elf_howto_table + (r_type - R_V810_NONE); 2208 else 2209 howto = v850_elf_howto_table + r_type; 2210 2211 BFD_ASSERT (r_type == howto->type); 2212 2213 h = NULL; 2214 sym = NULL; 2215 sec = NULL; 2216 if (r_symndx < symtab_hdr->sh_info) 2217 { 2218 sym = local_syms + r_symndx; 2219 sec = local_sections[r_symndx]; 2220 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel); 2221 } 2222 else 2223 { 2224 bfd_boolean unresolved_reloc, warned, ignored; 2225 2226 /* Note - this check is delayed until now as it is possible and 2227 valid to have a file without any symbols but with relocs that 2228 can be processed. */ 2229 if (sym_hashes == NULL) 2230 { 2231 info->callbacks->warning 2232 (info, "no hash table available", 2233 NULL, input_bfd, input_section, (bfd_vma) 0); 2234 2235 return FALSE; 2236 } 2237 2238 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel, 2239 r_symndx, symtab_hdr, sym_hashes, 2240 h, sec, relocation, 2241 unresolved_reloc, warned, ignored); 2242 } 2243 2244 if (sec != NULL && discarded_section (sec)) 2245 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section, 2246 rel, 1, relend, howto, 0, contents); 2247 2248 if (bfd_link_relocatable (info)) 2249 continue; 2250 2251 /* FIXME: We should use the addend, but the COFF relocations don't. */ 2252 r = v850_elf_final_link_relocate (howto, input_bfd, output_bfd, 2253 input_section, 2254 contents, rel->r_offset, 2255 relocation, rel->r_addend, 2256 info, sec, h == NULL); 2257 2258 if (r != bfd_reloc_ok) 2259 { 2260 const char * name; 2261 const char * msg = NULL; 2262 2263 if (h != NULL) 2264 name = h->root.root.string; 2265 else 2266 { 2267 name = (bfd_elf_string_from_elf_section 2268 (input_bfd, symtab_hdr->sh_link, sym->st_name)); 2269 if (name == NULL || *name == '\0') 2270 name = bfd_section_name (input_bfd, sec); 2271 } 2272 2273 switch ((int) r) 2274 { 2275 case bfd_reloc_overflow: 2276 (*info->callbacks->reloc_overflow) 2277 (info, (h ? &h->root : NULL), name, howto->name, 2278 (bfd_vma) 0, input_bfd, input_section, rel->r_offset); 2279 break; 2280 2281 case bfd_reloc_undefined: 2282 (*info->callbacks->undefined_symbol) 2283 (info, name, input_bfd, input_section, rel->r_offset, TRUE); 2284 break; 2285 2286 case bfd_reloc_outofrange: 2287 msg = _("internal error: out of range error"); 2288 goto common_error; 2289 2290 case bfd_reloc_notsupported: 2291 msg = _("internal error: unsupported relocation error"); 2292 goto common_error; 2293 2294 case bfd_reloc_dangerous: 2295 msg = _("internal error: dangerous relocation"); 2296 goto common_error; 2297 2298 case bfd_reloc_gp_not_found: 2299 msg = _("could not locate special linker symbol __gp"); 2300 goto common_error; 2301 2302 case bfd_reloc_ep_not_found: 2303 msg = _("could not locate special linker symbol __ep"); 2304 goto common_error; 2305 2306 case bfd_reloc_ctbp_not_found: 2307 msg = _("could not locate special linker symbol __ctbp"); 2308 goto common_error; 2309 2310 default: 2311 msg = _("internal error: unknown error"); 2312 /* fall through */ 2313 2314 common_error: 2315 (*info->callbacks->warning) (info, msg, name, input_bfd, 2316 input_section, rel->r_offset); 2317 break; 2318 } 2319 } 2320 } 2321 2322 return TRUE; 2323} 2324 2325static asection * 2326v850_elf_gc_mark_hook (asection *sec, 2327 struct bfd_link_info *info, 2328 Elf_Internal_Rela *rel, 2329 struct elf_link_hash_entry *h, 2330 Elf_Internal_Sym *sym) 2331{ 2332 if (h != NULL) 2333 switch (ELF32_R_TYPE (rel->r_info)) 2334 { 2335 case R_V850_GNU_VTINHERIT: 2336 case R_V850_GNU_VTENTRY: 2337 return NULL; 2338 } 2339 2340 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym); 2341} 2342 2343static void 2344v850_set_note (bfd * abfd, asection * s, enum v850_notes note, unsigned int val) 2345{ 2346 bfd_byte * data = s->contents + ((note - 1) * SIZEOF_V850_NOTE); 2347 2348 bfd_put_32 (abfd, 4, data + 0); 2349 bfd_put_32 (abfd, 4, data + 4); 2350 bfd_put_32 (abfd, note, data + 8); 2351 memcpy (data + 12, V850_NOTE_NAME, 4); 2352 bfd_put_32 (abfd, val, data + 16); 2353} 2354 2355/* Create the note section if not already present. This is done early so 2356 that the linker maps the sections to the right place in the output. */ 2357 2358static asection * 2359v850_elf_make_note_section (bfd * abfd) 2360{ 2361 asection *s; 2362 bfd_byte *data; 2363 flagword flags; 2364 enum v850_notes id; 2365 2366 /* Make the note section. */ 2367 flags = SEC_READONLY | SEC_HAS_CONTENTS | SEC_IN_MEMORY | SEC_MERGE; 2368 2369 s = bfd_make_section_anyway_with_flags (abfd, V850_NOTE_SECNAME, flags); 2370 if (s == NULL) 2371 return NULL; 2372 2373 if (!bfd_set_section_alignment (abfd, s, 2)) 2374 return NULL; 2375 2376 /* Allocate space for all known notes. */ 2377 if (!bfd_set_section_size (abfd, s, NUM_V850_NOTES * SIZEOF_V850_NOTE)) 2378 return NULL; 2379 2380 data = bfd_zalloc (abfd, NUM_V850_NOTES * SIZEOF_V850_NOTE); 2381 if (data == NULL) 2382 return NULL; 2383 2384 s->contents = data; 2385 2386 /* Provide default (= uninitilaised) values for all of the notes. */ 2387 for (id = V850_NOTE_ALIGNMENT; id <= NUM_V850_NOTES; id++) 2388 v850_set_note (abfd, s, id, 0); 2389 2390 return s; 2391} 2392 2393/* Create the note section if not already present. This is done early so 2394 that the linker maps the sections to the right place in the output. */ 2395 2396bfd_boolean 2397v850_elf_create_sections (struct bfd_link_info * info) 2398{ 2399 bfd * ibfd; 2400 2401 /* If we already have a note section, do not make another. */ 2402 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next) 2403 if (bfd_get_section_by_name (ibfd, V850_NOTE_SECNAME) != NULL) 2404 return TRUE; 2405 2406 return v850_elf_make_note_section (info->input_bfds) != NULL; 2407} 2408 2409bfd_boolean 2410v850_elf_set_note (bfd * abfd, enum v850_notes note, unsigned int val) 2411{ 2412 asection * notes = bfd_get_section_by_name (abfd, V850_NOTE_SECNAME); 2413 2414 if (val > 2) 2415 /* At the moment, no known note has a value over 2. */ 2416 return FALSE; 2417 2418 if (notes == NULL) 2419 notes = v850_elf_make_note_section (abfd); 2420 if (notes == NULL) 2421 return FALSE; 2422 2423 v850_set_note (abfd, notes, note, val); 2424 return TRUE; 2425} 2426 2427/* Copy a v850 note section from one object module to another. */ 2428 2429static void 2430v850_elf_copy_notes (bfd *ibfd, bfd *obfd) 2431{ 2432 asection * onotes; 2433 asection * inotes; 2434 2435 /* If the output bfd does not have a note section, then 2436 skip the merge. The normal input to output section 2437 copying will take care of everythng for us. */ 2438 if ((onotes = bfd_get_section_by_name (obfd, V850_NOTE_SECNAME)) == NULL) 2439 return; 2440 2441 if ((inotes = bfd_get_section_by_name (ibfd, V850_NOTE_SECNAME)) == NULL) 2442 return; 2443 2444 if (bfd_section_size (ibfd, inotes) == bfd_section_size (obfd, onotes)) 2445 { 2446 bfd_byte * icont; 2447 bfd_byte * ocont; 2448 2449 if ((icont = elf_section_data (inotes)->this_hdr.contents) == NULL) 2450 BFD_ASSERT (bfd_malloc_and_get_section (ibfd, inotes, & icont)); 2451 2452 if ((ocont = elf_section_data (onotes)->this_hdr.contents) == NULL) 2453 BFD_ASSERT (bfd_malloc_and_get_section (obfd, onotes, & ocont)); 2454 2455 /* Copy/overwrite notes from the input to the output. */ 2456 memcpy (ocont, icont, bfd_section_size (obfd, onotes)); 2457 } 2458} 2459 2460/* Copy backend specific data from one object module to another. */ 2461 2462static bfd_boolean 2463v850_elf_copy_private_bfd_data (bfd *ibfd, bfd *obfd) 2464{ 2465 v850_elf_copy_notes (ibfd, obfd); 2466 return _bfd_elf_copy_private_bfd_data (ibfd, obfd); 2467} 2468#define bfd_elf32_bfd_copy_private_bfd_data v850_elf_copy_private_bfd_data 2469 2470static bfd_boolean 2471v850_elf_merge_notes (bfd * ibfd, bfd *obfd) 2472{ 2473 asection * onotes; 2474 asection * inotes; 2475 bfd_boolean result = TRUE; 2476 2477 /* If the output bfd does not have a note section, then 2478 skip the merge. The normal input to output section 2479 copying will take care of everythng for us. */ 2480 if ((onotes = bfd_get_section_by_name (obfd, V850_NOTE_SECNAME)) == NULL) 2481 return TRUE; 2482 2483 if ((inotes = bfd_get_section_by_name (ibfd, V850_NOTE_SECNAME)) != NULL) 2484 { 2485 enum v850_notes id; 2486 bfd_byte * icont; 2487 bfd_byte * ocont; 2488 2489 BFD_ASSERT (bfd_section_size (ibfd, inotes) == bfd_section_size (obfd, onotes)); 2490 2491 if ((icont = elf_section_data (inotes)->this_hdr.contents) == NULL) 2492 BFD_ASSERT (bfd_malloc_and_get_section (ibfd, inotes, & icont)); 2493 2494 if ((ocont = elf_section_data (onotes)->this_hdr.contents) == NULL) 2495 BFD_ASSERT (bfd_malloc_and_get_section (obfd, onotes, & ocont)); 2496 2497 for (id = V850_NOTE_ALIGNMENT; id <= NUM_V850_NOTES; id++) 2498 { 2499 unsigned int ival; 2500 unsigned int oval; 2501 bfd_byte * idata = icont + ((id - 1) * SIZEOF_V850_NOTE) + 16; 2502 bfd_byte * odata = ocont + ((id - 1) * SIZEOF_V850_NOTE) + 16; 2503 2504 ival = bfd_get_32 (ibfd, idata); 2505 oval = bfd_get_32 (obfd, odata); 2506 2507 if (ival == 0 || ival == oval) 2508 continue; 2509 2510 if (oval == 0) 2511 { 2512 bfd_put_32 (obfd, ival, odata); 2513 v850_set_note (obfd, onotes, id, ival); 2514 continue; 2515 } 2516 2517 /* We have a mismatch. The ABI defines how to handle 2518 this siutation on a per note type basis. */ 2519 switch (id) 2520 { 2521 case V850_NOTE_ALIGNMENT: 2522 if (oval == EF_RH850_DATA_ALIGN4) 2523 { 2524 _bfd_error_handler 2525 /* xgettext:c-format */ 2526 (_("error: %B needs 8-byte aligment but %B is set for 4-byte alignment"), 2527 ibfd, obfd); 2528 result = FALSE; 2529 } 2530 else 2531 /* ibfd uses 4-byte alignment, obfd uses 8-byte alignment. 2532 Leave the obfd alignment as it is. */ 2533 BFD_ASSERT (oval == EF_RH850_DATA_ALIGN8); 2534 2535 break; 2536 2537 case V850_NOTE_DATA_SIZE: 2538 if (oval == EF_RH850_DOUBLE32) 2539 { 2540 _bfd_error_handler 2541 /* xgettext:c-format */ 2542 (_("error: %B uses 64-bit doubles but " 2543 "%B uses 32-bit doubles"), ibfd, obfd); 2544 result = FALSE; 2545 } 2546 else 2547 /* ibfd uses 32-bit doubles, obfd uses 64-bit doubles. 2548 This is acceptable. Honest, that is what the ABI says. */ 2549 BFD_ASSERT (oval == EF_RH850_DOUBLE64); 2550 break; 2551 2552 case V850_NOTE_FPU_INFO: 2553 if (oval == EF_RH850_FPU20) 2554 { 2555 _bfd_error_handler 2556 /* xgettext:c-format */ 2557 (_("error: %B uses FPU-3.0 but %B only supports FPU-2.0"), 2558 ibfd, obfd); 2559 result = FALSE; 2560 } 2561 else 2562 /* ibfd uses FPU-2.0, obfd uses FPU-3.0. Leave obfd as it is. */ 2563 BFD_ASSERT (oval == EF_RH850_FPU30); 2564 2565 break; 2566 2567 default: 2568 /* None of the other conflicts matter. 2569 Stick with the current output values. */ 2570 break; 2571 } 2572 } 2573 2574 /* FIXME: We should also check for conflicts between the notes 2575 and the EF flags in the ELF header. */ 2576 } 2577 2578 return result; 2579} 2580 2581static void 2582print_v850_note (bfd * abfd, FILE * file, bfd_byte * data, enum v850_notes id) 2583{ 2584 unsigned int value = bfd_get_32 (abfd, data + ((id - 1) * SIZEOF_V850_NOTE) + 16); 2585 2586 switch (id) 2587 { 2588 case V850_NOTE_ALIGNMENT: 2589 fprintf (file, _(" alignment of 8-byte entities: ")); 2590 switch (value) 2591 { 2592 case EF_RH850_DATA_ALIGN4: fprintf (file, _("4-byte")); break; 2593 case EF_RH850_DATA_ALIGN8: fprintf (file, _("8-byte")); break; 2594 case 0: fprintf (file, _("not set")); break; 2595 default: fprintf (file, _("unknown: %x"), value); break; 2596 } 2597 fputc ('\n', file); 2598 break; 2599 2600 case V850_NOTE_DATA_SIZE: 2601 fprintf (file, _(" size of doubles: ")); 2602 switch (value) 2603 { 2604 case EF_RH850_DOUBLE32: fprintf (file, _("4-bytes")); break; 2605 case EF_RH850_DOUBLE64: fprintf (file, _("8-bytes")); break; 2606 case 0: fprintf (file, _("not set")); break; 2607 default: fprintf (file, _("unknown: %x"), value); break; 2608 } 2609 fputc ('\n', file); 2610 break; 2611 2612 case V850_NOTE_FPU_INFO: 2613 fprintf (file, _(" FPU support required: ")); 2614 switch (value) 2615 { 2616 case EF_RH850_FPU20: fprintf (file, _("FPU-2.0")); break; 2617 case EF_RH850_FPU30: fprintf (file, _("FPU-3.0")); break; 2618 case 0: fprintf (file, _("none")); break; 2619 default: fprintf (file, _("unknown: %x"), value); break; 2620 } 2621 fputc ('\n', file); 2622 break; 2623 2624 case V850_NOTE_SIMD_INFO: 2625 fprintf (file, _("SIMD use: ")); 2626 switch (value) 2627 { 2628 case EF_RH850_SIMD: fprintf (file, _("yes")); break; 2629 case 0: fprintf (file, _("no")); break; 2630 default: fprintf (file, _("unknown: %x"), value); break; 2631 } 2632 fputc ('\n', file); 2633 break; 2634 2635 case V850_NOTE_CACHE_INFO: 2636 fprintf (file, _("CACHE use: ")); 2637 switch (value) 2638 { 2639 case EF_RH850_CACHE: fprintf (file, _("yes")); break; 2640 case 0: fprintf (file, _("no")); break; 2641 default: fprintf (file, _("unknown: %x"), value); break; 2642 } 2643 fputc ('\n', file); 2644 break; 2645 2646 case V850_NOTE_MMU_INFO: 2647 fprintf (file, _("MMU use: ")); 2648 switch (value) 2649 { 2650 case EF_RH850_MMU: fprintf (file, _("yes")); break; 2651 case 0: fprintf (file, _("no")); break; 2652 default: fprintf (file, _("unknown: %x"), value); break; 2653 } 2654 fputc ('\n', file); 2655 break; 2656 2657 default: 2658 BFD_ASSERT (0); 2659 } 2660} 2661 2662static void 2663v850_elf_print_notes (bfd * abfd, FILE * file) 2664{ 2665 asection * notes = bfd_get_section_by_name (abfd, V850_NOTE_SECNAME); 2666 enum v850_notes id; 2667 2668 if (notes == NULL || notes->contents == NULL) 2669 return; 2670 2671 BFD_ASSERT (bfd_section_size (abfd, notes) == NUM_V850_NOTES * SIZEOF_V850_NOTE); 2672 2673 for (id = V850_NOTE_ALIGNMENT; id <= NUM_V850_NOTES; id++) 2674 print_v850_note (abfd, file, notes->contents, id); 2675} 2676 2677/* Set the right machine number and architecture. */ 2678 2679static bfd_boolean 2680v850_elf_object_p (bfd *abfd) 2681{ 2682 enum bfd_architecture arch; 2683 unsigned long mach; 2684 2685 switch (elf_elfheader (abfd)->e_machine) 2686 { 2687 case EM_V800: 2688 arch = bfd_arch_v850_rh850; 2689 mach = (elf_elfheader (abfd)->e_flags & EF_V800_850E3) 2690 ? bfd_mach_v850e3v5 : bfd_mach_v850e2v3; 2691 break; 2692 2693 case EM_CYGNUS_V850: 2694 case EM_V850: 2695 arch = bfd_arch_v850; 2696 switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH) 2697 { 2698 default: 2699 case E_V850_ARCH: mach = bfd_mach_v850; break; 2700 case E_V850E_ARCH: mach = bfd_mach_v850e; break; 2701 case E_V850E1_ARCH: mach = bfd_mach_v850e1; break; 2702 case E_V850E2_ARCH: mach = bfd_mach_v850e2; break; 2703 case E_V850E2V3_ARCH: mach = bfd_mach_v850e2v3; break; 2704 case E_V850E3V5_ARCH: mach = bfd_mach_v850e3v5; break; 2705 } 2706 break; 2707 2708 default: 2709 return FALSE; 2710 } 2711 2712 return bfd_default_set_arch_mach (abfd, arch, mach); 2713} 2714 2715/* Store the machine number in the flags field. */ 2716 2717static void 2718v850_elf_final_write_processing (bfd *abfd, 2719 bfd_boolean linker ATTRIBUTE_UNUSED) 2720{ 2721 unsigned long val; 2722 2723 switch (bfd_get_arch (abfd)) 2724 { 2725 case bfd_arch_v850_rh850: 2726 val = EF_RH850_ABI; 2727 if (bfd_get_mach (abfd) == bfd_mach_v850e3v5) 2728 val |= EF_V800_850E3; 2729 elf_elfheader (abfd)->e_flags |= val; 2730 break; 2731 2732 case bfd_arch_v850: 2733 switch (bfd_get_mach (abfd)) 2734 { 2735 default: 2736 case bfd_mach_v850: val = E_V850_ARCH; break; 2737 case bfd_mach_v850e: val = E_V850E_ARCH; break; 2738 case bfd_mach_v850e1: val = E_V850E1_ARCH; break; 2739 case bfd_mach_v850e2: val = E_V850E2_ARCH; break; 2740 case bfd_mach_v850e2v3: val = E_V850E2V3_ARCH; break; 2741 case bfd_mach_v850e3v5: val = E_V850E3V5_ARCH; break; 2742 } 2743 elf_elfheader (abfd)->e_flags &=~ EF_V850_ARCH; 2744 elf_elfheader (abfd)->e_flags |= val; 2745 break; 2746 default: 2747 break; 2748 } 2749} 2750 2751/* Function to keep V850 specific file flags. */ 2752 2753static bfd_boolean 2754v850_elf_set_private_flags (bfd *abfd, flagword flags) 2755{ 2756 BFD_ASSERT (!elf_flags_init (abfd) 2757 || elf_elfheader (abfd)->e_flags == flags); 2758 2759 elf_elfheader (abfd)->e_flags = flags; 2760 elf_flags_init (abfd) = TRUE; 2761 return TRUE; 2762} 2763 2764/* Merge backend specific data from an object file 2765 to the output object file when linking. */ 2766 2767static bfd_boolean 2768v850_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info) 2769{ 2770 bfd *obfd = info->output_bfd; 2771 flagword out_flags; 2772 flagword in_flags; 2773 bfd_boolean result = TRUE; 2774 2775 if ( bfd_get_flavour (ibfd) != bfd_target_elf_flavour 2776 || bfd_get_flavour (obfd) != bfd_target_elf_flavour) 2777 return TRUE; 2778 2779 result &= v850_elf_merge_notes (ibfd, obfd); 2780 2781 in_flags = elf_elfheader (ibfd)->e_flags; 2782 out_flags = elf_elfheader (obfd)->e_flags; 2783 2784 if (! elf_flags_init (obfd)) 2785 { 2786 /* If the input is the default architecture then do not 2787 bother setting the flags for the output architecture, 2788 instead allow future merges to do this. If no future 2789 merges ever set these flags then they will retain their 2790 unitialised values, which surprise surprise, correspond 2791 to the default values. */ 2792 if (bfd_get_arch_info (ibfd)->the_default) 2793 return TRUE; 2794 2795 elf_flags_init (obfd) = TRUE; 2796 elf_elfheader (obfd)->e_flags = in_flags; 2797 2798 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd) 2799 && bfd_get_arch_info (obfd)->the_default) 2800 result &= bfd_set_arch_mach (obfd, bfd_get_arch (ibfd), bfd_get_mach (ibfd)); 2801 2802 return result; 2803 } 2804 2805 /* Check flag compatibility. */ 2806 if (in_flags == out_flags) 2807 return result; 2808 2809 if (bfd_get_arch (obfd) == bfd_arch_v850_rh850) 2810 { 2811 if ((in_flags & EF_V800_850E3) != (out_flags & EF_V800_850E3)) 2812 { 2813 _bfd_error_handler 2814 (_("%B: Architecture mismatch with previous modules"), ibfd); 2815 elf_elfheader (obfd)->e_flags |= EF_V800_850E3; 2816 } 2817 2818 return result; 2819 } 2820 2821 if ((in_flags & EF_V850_ARCH) != (out_flags & EF_V850_ARCH) 2822 && (in_flags & EF_V850_ARCH) != E_V850_ARCH) 2823 { 2824 /* Allow earlier architecture binaries to be linked with later binaries. 2825 Set the output binary to the later architecture, except for v850e1, 2826 which we set to v850e. */ 2827 if ( (in_flags & EF_V850_ARCH) == E_V850E1_ARCH 2828 && (out_flags & EF_V850_ARCH) == E_V850E_ARCH) 2829 return result; 2830 2831 if ( (in_flags & EF_V850_ARCH) == E_V850_ARCH 2832 && (out_flags & EF_V850_ARCH) == E_V850E_ARCH) 2833 { 2834 elf_elfheader (obfd)->e_flags = 2835 ((out_flags & ~ EF_V850_ARCH) | E_V850E_ARCH); 2836 return result; 2837 } 2838 2839 if (( (in_flags & EF_V850_ARCH) == E_V850_ARCH 2840 || (in_flags & EF_V850_ARCH) == E_V850E_ARCH) 2841 && (out_flags & EF_V850_ARCH) == E_V850E2_ARCH) 2842 { 2843 elf_elfheader (obfd)->e_flags = 2844 ((out_flags & ~ EF_V850_ARCH) | E_V850E2_ARCH); 2845 return result; 2846 } 2847 2848 if (( (in_flags & EF_V850_ARCH) == E_V850_ARCH 2849 || (in_flags & EF_V850_ARCH) == E_V850E_ARCH 2850 || (in_flags & EF_V850_ARCH) == E_V850E2_ARCH) 2851 && (out_flags & EF_V850_ARCH) == E_V850E2V3_ARCH) 2852 { 2853 elf_elfheader (obfd)->e_flags = 2854 ((out_flags & ~ EF_V850_ARCH) | E_V850E2V3_ARCH); 2855 return result; 2856 } 2857 2858 if (( (in_flags & EF_V850_ARCH) == E_V850_ARCH 2859 || (in_flags & EF_V850_ARCH) == E_V850E_ARCH 2860 || (in_flags & EF_V850_ARCH) == E_V850E2_ARCH 2861 || (in_flags & EF_V850_ARCH) == E_V850E2V3_ARCH) 2862 && (out_flags & EF_V850_ARCH) == E_V850E3V5_ARCH) 2863 { 2864 elf_elfheader (obfd)->e_flags = 2865 ((out_flags & ~ EF_V850_ARCH) | E_V850E3V5_ARCH); 2866 return result; 2867 } 2868 2869 _bfd_error_handler 2870 (_("%B: Architecture mismatch with previous modules"), ibfd); 2871 } 2872 2873 return result; 2874} 2875 2876/* Display the flags field. */ 2877 2878static bfd_boolean 2879v850_elf_print_private_bfd_data (bfd *abfd, void * ptr) 2880{ 2881 FILE * file = (FILE *) ptr; 2882 2883 BFD_ASSERT (abfd != NULL && ptr != NULL); 2884 2885 _bfd_elf_print_private_bfd_data (abfd, ptr); 2886 2887 /* xgettext:c-format. */ 2888 fprintf (file, _("private flags = %lx: "), elf_elfheader (abfd)->e_flags); 2889 2890 if (bfd_get_arch (abfd) == bfd_arch_v850_rh850) 2891 { 2892 if ((elf_elfheader (abfd)->e_flags & EF_RH850_ABI) != EF_RH850_ABI) 2893 fprintf (file, _("unknown v850 architecture")); 2894 else if (elf_elfheader (abfd)->e_flags & EF_V800_850E3) 2895 fprintf (file, _("v850 E3 architecture")); 2896 else 2897 fprintf (file, _("v850 architecture")); 2898 } 2899 else 2900 { 2901 switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH) 2902 { 2903 default: 2904 case E_V850_ARCH: fprintf (file, _("v850 architecture")); break; 2905 case E_V850E_ARCH: fprintf (file, _("v850e architecture")); break; 2906 case E_V850E1_ARCH: fprintf (file, _("v850e1 architecture")); break; 2907 case E_V850E2_ARCH: fprintf (file, _("v850e2 architecture")); break; 2908 case E_V850E2V3_ARCH: fprintf (file, _("v850e2v3 architecture")); break; 2909 case E_V850E3V5_ARCH: fprintf (file, _("v850e3v5 architecture")); break; 2910 } 2911 } 2912 2913 fputc ('\n', file); 2914 2915 v850_elf_print_notes (abfd, file); 2916 2917 return TRUE; 2918} 2919 2920/* V850 ELF uses four common sections. One is the usual one, and the 2921 others are for (small) objects in one of the special data areas: 2922 small, tiny and zero. All the objects are kept together, and then 2923 referenced via the gp register, the ep register or the r0 register 2924 respectively, which yields smaller, faster assembler code. This 2925 approach is copied from elf32-mips.c. */ 2926 2927static asection v850_elf_scom_section; 2928static asymbol v850_elf_scom_symbol; 2929static asymbol * v850_elf_scom_symbol_ptr; 2930static asection v850_elf_tcom_section; 2931static asymbol v850_elf_tcom_symbol; 2932static asymbol * v850_elf_tcom_symbol_ptr; 2933static asection v850_elf_zcom_section; 2934static asymbol v850_elf_zcom_symbol; 2935static asymbol * v850_elf_zcom_symbol_ptr; 2936 2937/* Given a BFD section, try to locate the 2938 corresponding ELF section index. */ 2939 2940static bfd_boolean 2941v850_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED, 2942 asection *sec, 2943 int *retval) 2944{ 2945 if (strcmp (bfd_get_section_name (abfd, sec), ".scommon") == 0) 2946 *retval = SHN_V850_SCOMMON; 2947 else if (strcmp (bfd_get_section_name (abfd, sec), ".tcommon") == 0) 2948 *retval = SHN_V850_TCOMMON; 2949 else if (strcmp (bfd_get_section_name (abfd, sec), ".zcommon") == 0) 2950 *retval = SHN_V850_ZCOMMON; 2951 else 2952 return FALSE; 2953 2954 return TRUE; 2955} 2956 2957/* Handle the special V850 section numbers that a symbol may use. */ 2958 2959static void 2960v850_elf_symbol_processing (bfd *abfd, asymbol *asym) 2961{ 2962 elf_symbol_type * elfsym = (elf_symbol_type *) asym; 2963 unsigned int indx; 2964 2965 indx = elfsym->internal_elf_sym.st_shndx; 2966 2967 /* If the section index is an "ordinary" index, then it may 2968 refer to a v850 specific section created by the assembler. 2969 Check the section's type and change the index it matches. 2970 2971 FIXME: Should we alter the st_shndx field as well ? */ 2972 2973 if (indx < elf_numsections (abfd)) 2974 switch (elf_elfsections (abfd)[indx]->sh_type) 2975 { 2976 case SHT_V850_SCOMMON: 2977 indx = SHN_V850_SCOMMON; 2978 break; 2979 2980 case SHT_V850_TCOMMON: 2981 indx = SHN_V850_TCOMMON; 2982 break; 2983 2984 case SHT_V850_ZCOMMON: 2985 indx = SHN_V850_ZCOMMON; 2986 break; 2987 2988 default: 2989 break; 2990 } 2991 2992 switch (indx) 2993 { 2994 case SHN_V850_SCOMMON: 2995 if (v850_elf_scom_section.name == NULL) 2996 { 2997 /* Initialize the small common section. */ 2998 v850_elf_scom_section.name = ".scommon"; 2999 v850_elf_scom_section.flags = SEC_IS_COMMON | SEC_ALLOC | SEC_DATA; 3000 v850_elf_scom_section.output_section = & v850_elf_scom_section; 3001 v850_elf_scom_section.symbol = & v850_elf_scom_symbol; 3002 v850_elf_scom_section.symbol_ptr_ptr = & v850_elf_scom_symbol_ptr; 3003 v850_elf_scom_symbol.name = ".scommon"; 3004 v850_elf_scom_symbol.flags = BSF_SECTION_SYM; 3005 v850_elf_scom_symbol.section = & v850_elf_scom_section; 3006 v850_elf_scom_symbol_ptr = & v850_elf_scom_symbol; 3007 } 3008 asym->section = & v850_elf_scom_section; 3009 asym->value = elfsym->internal_elf_sym.st_size; 3010 break; 3011 3012 case SHN_V850_TCOMMON: 3013 if (v850_elf_tcom_section.name == NULL) 3014 { 3015 /* Initialize the tcommon section. */ 3016 v850_elf_tcom_section.name = ".tcommon"; 3017 v850_elf_tcom_section.flags = SEC_IS_COMMON; 3018 v850_elf_tcom_section.output_section = & v850_elf_tcom_section; 3019 v850_elf_tcom_section.symbol = & v850_elf_tcom_symbol; 3020 v850_elf_tcom_section.symbol_ptr_ptr = & v850_elf_tcom_symbol_ptr; 3021 v850_elf_tcom_symbol.name = ".tcommon"; 3022 v850_elf_tcom_symbol.flags = BSF_SECTION_SYM; 3023 v850_elf_tcom_symbol.section = & v850_elf_tcom_section; 3024 v850_elf_tcom_symbol_ptr = & v850_elf_tcom_symbol; 3025 } 3026 asym->section = & v850_elf_tcom_section; 3027 asym->value = elfsym->internal_elf_sym.st_size; 3028 break; 3029 3030 case SHN_V850_ZCOMMON: 3031 if (v850_elf_zcom_section.name == NULL) 3032 { 3033 /* Initialize the zcommon section. */ 3034 v850_elf_zcom_section.name = ".zcommon"; 3035 v850_elf_zcom_section.flags = SEC_IS_COMMON; 3036 v850_elf_zcom_section.output_section = & v850_elf_zcom_section; 3037 v850_elf_zcom_section.symbol = & v850_elf_zcom_symbol; 3038 v850_elf_zcom_section.symbol_ptr_ptr = & v850_elf_zcom_symbol_ptr; 3039 v850_elf_zcom_symbol.name = ".zcommon"; 3040 v850_elf_zcom_symbol.flags = BSF_SECTION_SYM; 3041 v850_elf_zcom_symbol.section = & v850_elf_zcom_section; 3042 v850_elf_zcom_symbol_ptr = & v850_elf_zcom_symbol; 3043 } 3044 asym->section = & v850_elf_zcom_section; 3045 asym->value = elfsym->internal_elf_sym.st_size; 3046 break; 3047 } 3048} 3049 3050/* Hook called by the linker routine which adds symbols from an object 3051 file. We must handle the special v850 section numbers here. */ 3052 3053static bfd_boolean 3054v850_elf_add_symbol_hook (bfd *abfd, 3055 struct bfd_link_info *info ATTRIBUTE_UNUSED, 3056 Elf_Internal_Sym *sym, 3057 const char **namep ATTRIBUTE_UNUSED, 3058 flagword *flagsp ATTRIBUTE_UNUSED, 3059 asection **secp, 3060 bfd_vma *valp) 3061{ 3062 unsigned int indx = sym->st_shndx; 3063 3064 /* If the section index is an "ordinary" index, then it may 3065 refer to a v850 specific section created by the assembler. 3066 Check the section's type and change the index it matches. 3067 3068 FIXME: Should we alter the st_shndx field as well ? */ 3069 3070 if (indx < elf_numsections (abfd)) 3071 switch (elf_elfsections (abfd)[indx]->sh_type) 3072 { 3073 case SHT_V850_SCOMMON: 3074 indx = SHN_V850_SCOMMON; 3075 break; 3076 3077 case SHT_V850_TCOMMON: 3078 indx = SHN_V850_TCOMMON; 3079 break; 3080 3081 case SHT_V850_ZCOMMON: 3082 indx = SHN_V850_ZCOMMON; 3083 break; 3084 3085 default: 3086 break; 3087 } 3088 3089 switch (indx) 3090 { 3091 case SHN_V850_SCOMMON: 3092 *secp = bfd_make_section_old_way (abfd, ".scommon"); 3093 (*secp)->flags |= SEC_IS_COMMON; 3094 *valp = sym->st_size; 3095 break; 3096 3097 case SHN_V850_TCOMMON: 3098 *secp = bfd_make_section_old_way (abfd, ".tcommon"); 3099 (*secp)->flags |= SEC_IS_COMMON; 3100 *valp = sym->st_size; 3101 break; 3102 3103 case SHN_V850_ZCOMMON: 3104 *secp = bfd_make_section_old_way (abfd, ".zcommon"); 3105 (*secp)->flags |= SEC_IS_COMMON; 3106 *valp = sym->st_size; 3107 break; 3108 } 3109 3110 return TRUE; 3111} 3112 3113static int 3114v850_elf_link_output_symbol_hook (struct bfd_link_info *info ATTRIBUTE_UNUSED, 3115 const char *name ATTRIBUTE_UNUSED, 3116 Elf_Internal_Sym *sym, 3117 asection *input_sec, 3118 struct elf_link_hash_entry *h ATTRIBUTE_UNUSED) 3119{ 3120 /* If we see a common symbol, which implies a relocatable link, then 3121 if a symbol was in a special common section in an input file, mark 3122 it as a special common in the output file. */ 3123 3124 if (sym->st_shndx == SHN_COMMON) 3125 { 3126 if (strcmp (input_sec->name, ".scommon") == 0) 3127 sym->st_shndx = SHN_V850_SCOMMON; 3128 else if (strcmp (input_sec->name, ".tcommon") == 0) 3129 sym->st_shndx = SHN_V850_TCOMMON; 3130 else if (strcmp (input_sec->name, ".zcommon") == 0) 3131 sym->st_shndx = SHN_V850_ZCOMMON; 3132 } 3133 3134 /* The price we pay for using h->other unused bits as flags in the 3135 linker is cleaning up after ourselves. */ 3136 3137 sym->st_other &= ~(V850_OTHER_SDA | V850_OTHER_ZDA | V850_OTHER_TDA 3138 | V850_OTHER_ERROR); 3139 3140 return 1; 3141} 3142 3143static bfd_boolean 3144v850_elf_section_from_shdr (bfd *abfd, 3145 Elf_Internal_Shdr *hdr, 3146 const char *name, 3147 int shindex) 3148{ 3149 /* There ought to be a place to keep ELF backend specific flags, but 3150 at the moment there isn't one. We just keep track of the 3151 sections by their name, instead. */ 3152 3153 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex)) 3154 return FALSE; 3155 3156 switch (hdr->sh_type) 3157 { 3158 case SHT_V850_SCOMMON: 3159 case SHT_V850_TCOMMON: 3160 case SHT_V850_ZCOMMON: 3161 if (! bfd_set_section_flags (abfd, hdr->bfd_section, 3162 (bfd_get_section_flags (abfd, 3163 hdr->bfd_section) 3164 | SEC_IS_COMMON))) 3165 return FALSE; 3166 } 3167 3168 return TRUE; 3169} 3170 3171/* Set the correct type for a V850 ELF section. We do this 3172 by the section name, which is a hack, but ought to work. */ 3173 3174static bfd_boolean 3175v850_elf_fake_sections (bfd *abfd ATTRIBUTE_UNUSED, 3176 Elf_Internal_Shdr *hdr, 3177 asection *sec) 3178{ 3179 const char * name; 3180 3181 name = bfd_get_section_name (abfd, sec); 3182 3183 if (strcmp (name, ".scommon") == 0) 3184 hdr->sh_type = SHT_V850_SCOMMON; 3185 else if (strcmp (name, ".tcommon") == 0) 3186 hdr->sh_type = SHT_V850_TCOMMON; 3187 else if (strcmp (name, ".zcommon") == 0) 3188 hdr->sh_type = SHT_V850_ZCOMMON; 3189 /* Tweak the section type of .note.renesas. */ 3190 else if (strcmp (name, V850_NOTE_SECNAME) == 0) 3191 { 3192 hdr->sh_type = SHT_RENESAS_INFO; 3193 hdr->sh_entsize = SIZEOF_V850_NOTE; 3194 } 3195 3196 return TRUE; 3197} 3198 3199/* Delete some bytes from a section while relaxing. */ 3200 3201static bfd_boolean 3202v850_elf_relax_delete_bytes (bfd *abfd, 3203 asection *sec, 3204 bfd_vma addr, 3205 bfd_vma toaddr, 3206 int count) 3207{ 3208 Elf_Internal_Shdr *symtab_hdr; 3209 Elf32_External_Sym *extsyms; 3210 Elf32_External_Sym *esym; 3211 Elf32_External_Sym *esymend; 3212 int sym_index; 3213 unsigned int sec_shndx; 3214 bfd_byte *contents; 3215 Elf_Internal_Rela *irel; 3216 Elf_Internal_Rela *irelend; 3217 struct elf_link_hash_entry *sym_hash; 3218 Elf_External_Sym_Shndx *shndx; 3219 3220 symtab_hdr = &elf_tdata (abfd)->symtab_hdr; 3221 extsyms = (Elf32_External_Sym *) symtab_hdr->contents; 3222 3223 sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec); 3224 3225 contents = elf_section_data (sec)->this_hdr.contents; 3226 3227 /* The deletion must stop at the next ALIGN reloc for an alignment 3228 power larger than the number of bytes we are deleting. */ 3229 3230 /* Actually delete the bytes. */ 3231#if (DEBUG_RELAX & 2) 3232 fprintf (stderr, "relax_delete: contents: sec: %s %p .. %p %x\n", 3233 sec->name, addr, toaddr, count ); 3234#endif 3235 memmove (contents + addr, contents + addr + count, 3236 toaddr - addr - count); 3237 memset (contents + toaddr-count, 0, count); 3238 3239 /* Adjust all the relocs. */ 3240 irel = elf_section_data (sec)->relocs; 3241 irelend = irel + sec->reloc_count; 3242 if (elf_symtab_shndx_list (abfd)) 3243 { 3244 Elf_Internal_Shdr *shndx_hdr; 3245 3246 shndx_hdr = & elf_symtab_shndx_list (abfd)->hdr; 3247 shndx = (Elf_External_Sym_Shndx *) shndx_hdr->contents; 3248 } 3249 else 3250 { 3251 shndx = NULL; 3252 } 3253 3254 for (; irel < irelend; irel++) 3255 { 3256 bfd_vma raddr, paddr, symval; 3257 Elf_Internal_Sym isym; 3258 3259 /* Get the new reloc address. */ 3260 raddr = irel->r_offset; 3261 if ((raddr >= (addr + count) && raddr < toaddr)) 3262 irel->r_offset -= count; 3263 3264 if (raddr >= addr && raddr < addr + count) 3265 { 3266 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), 3267 (int) R_V850_NONE); 3268 continue; 3269 } 3270 3271 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN) 3272 continue; 3273 3274 bfd_elf32_swap_symbol_in (abfd, 3275 extsyms + ELF32_R_SYM (irel->r_info), 3276 shndx ? shndx + ELF32_R_SYM (irel->r_info) : NULL, 3277 & isym); 3278 3279 if (isym.st_shndx != sec_shndx) 3280 continue; 3281 3282 /* Get the value of the symbol referred to by the reloc. */ 3283 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info) 3284 { 3285 symval = isym.st_value; 3286#if (DEBUG_RELAX & 2) 3287 { 3288 char * name = bfd_elf_string_from_elf_section 3289 (abfd, symtab_hdr->sh_link, isym.st_name); 3290 fprintf (stderr, 3291 "relax_delete: local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n", 3292 sec->name, name, isym.st_name, 3293 sec->output_section->vma, sec->output_offset, 3294 isym.st_value, irel->r_addend); 3295 } 3296#endif 3297 } 3298 else 3299 { 3300 unsigned long indx; 3301 struct elf_link_hash_entry * h; 3302 3303 /* An external symbol. */ 3304 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info; 3305 3306 h = elf_sym_hashes (abfd) [indx]; 3307 BFD_ASSERT (h != NULL); 3308 3309 symval = h->root.u.def.value; 3310#if (DEBUG_RELAX & 2) 3311 fprintf (stderr, 3312 "relax_delete: defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n", 3313 sec->name, h->root.root.string, h->root.u.def.value, 3314 sec->output_section->vma, sec->output_offset, irel->r_addend); 3315#endif 3316 } 3317 3318 paddr = symval + irel->r_addend; 3319 3320 if ( (symval >= addr + count && symval < toaddr) 3321 && (paddr < addr + count || paddr >= toaddr)) 3322 irel->r_addend += count; 3323 else if ( (symval < addr + count || symval >= toaddr) 3324 && (paddr >= addr + count && paddr < toaddr)) 3325 irel->r_addend -= count; 3326 } 3327 3328 /* Adjust the local symbols defined in this section. */ 3329 esym = extsyms; 3330 esymend = esym + symtab_hdr->sh_info; 3331 3332 for (; esym < esymend; esym++, shndx = (shndx ? shndx + 1 : NULL)) 3333 { 3334 Elf_Internal_Sym isym; 3335 3336 bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym); 3337 3338 if (isym.st_shndx == sec_shndx 3339 && isym.st_value >= addr + count 3340 && isym.st_value < toaddr) 3341 { 3342 isym.st_value -= count; 3343 3344 if (isym.st_value + isym.st_size >= toaddr) 3345 isym.st_size += count; 3346 3347 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx); 3348 } 3349 else if (isym.st_shndx == sec_shndx 3350 && isym.st_value < addr + count) 3351 { 3352 if (isym.st_value+isym.st_size >= addr + count 3353 && isym.st_value+isym.st_size < toaddr) 3354 isym.st_size -= count; 3355 3356 if (isym.st_value >= addr 3357 && isym.st_value < addr + count) 3358 isym.st_value = addr; 3359 3360 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx); 3361 } 3362 } 3363 3364 /* Now adjust the global symbols defined in this section. */ 3365 esym = extsyms + symtab_hdr->sh_info; 3366 esymend = extsyms + (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)); 3367 3368 for (sym_index = 0; esym < esymend; esym ++, sym_index ++) 3369 { 3370 Elf_Internal_Sym isym; 3371 3372 bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym); 3373 sym_hash = elf_sym_hashes (abfd) [sym_index]; 3374 3375 if (isym.st_shndx == sec_shndx 3376 && ((sym_hash)->root.type == bfd_link_hash_defined 3377 || (sym_hash)->root.type == bfd_link_hash_defweak) 3378 && (sym_hash)->root.u.def.section == sec 3379 && (sym_hash)->root.u.def.value >= addr + count 3380 && (sym_hash)->root.u.def.value < toaddr) 3381 { 3382 if ((sym_hash)->root.u.def.value + isym.st_size >= toaddr) 3383 { 3384 isym.st_size += count; 3385 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx); 3386 } 3387 3388 (sym_hash)->root.u.def.value -= count; 3389 } 3390 else if (isym.st_shndx == sec_shndx 3391 && ((sym_hash)->root.type == bfd_link_hash_defined 3392 || (sym_hash)->root.type == bfd_link_hash_defweak) 3393 && (sym_hash)->root.u.def.section == sec 3394 && (sym_hash)->root.u.def.value < addr + count) 3395 { 3396 if ((sym_hash)->root.u.def.value+isym.st_size >= addr + count 3397 && (sym_hash)->root.u.def.value+isym.st_size < toaddr) 3398 isym.st_size -= count; 3399 3400 if ((sym_hash)->root.u.def.value >= addr 3401 && (sym_hash)->root.u.def.value < addr + count) 3402 (sym_hash)->root.u.def.value = addr; 3403 3404 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx); 3405 } 3406 3407 if (shndx) 3408 ++ shndx; 3409 } 3410 3411 return TRUE; 3412} 3413 3414#define NOP_OPCODE (0x0000) 3415#define MOVHI 0x0640 /* 4byte. */ 3416#define MOVHI_MASK 0x07e0 3417#define MOVHI_R1(insn) ((insn) & 0x1f) /* 4byte. */ 3418#define MOVHI_R2(insn) ((insn) >> 11) 3419#define MOVEA 0x0620 /* 2byte. */ 3420#define MOVEA_MASK 0x07e0 3421#define MOVEA_R1(insn) ((insn) & 0x1f) 3422#define MOVEA_R2(insn) ((insn) >> 11) 3423#define JARL_4 0x00040780 /* 4byte. */ 3424#define JARL_4_MASK 0xFFFF07FF 3425#define JARL_R2(insn) (int)(((insn) & (~JARL_4_MASK)) >> 11) 3426#define ADD_I 0x0240 /* 2byte. */ 3427#define ADD_I_MASK 0x07e0 3428#define ADD_I5(insn) ((((insn) & 0x001f) << 11) >> 11) /* 2byte. */ 3429#define ADD_R2(insn) ((insn) >> 11) 3430#define JMP_R 0x0060 /* 2byte. */ 3431#define JMP_R_MASK 0xFFE0 3432#define JMP_R1(insn) ((insn) & 0x1f) 3433 3434static bfd_boolean 3435v850_elf_relax_section (bfd *abfd, 3436 asection *sec, 3437 struct bfd_link_info *link_info, 3438 bfd_boolean *again) 3439{ 3440 Elf_Internal_Shdr *symtab_hdr; 3441 Elf_Internal_Rela *internal_relocs; 3442 Elf_Internal_Rela *irel; 3443 Elf_Internal_Rela *irelend; 3444 Elf_Internal_Rela *irelalign = NULL; 3445 Elf_Internal_Sym *isymbuf = NULL; 3446 bfd_byte *contents = NULL; 3447 bfd_vma addr = 0; 3448 bfd_vma toaddr; 3449 int align_pad_size = 0; 3450 bfd_boolean result = TRUE; 3451 3452 *again = FALSE; 3453 3454 if (bfd_link_relocatable (link_info) 3455 || (sec->flags & SEC_RELOC) == 0 3456 || sec->reloc_count == 0) 3457 return TRUE; 3458 3459 symtab_hdr = & elf_tdata (abfd)->symtab_hdr; 3460 3461 internal_relocs = (_bfd_elf_link_read_relocs 3462 (abfd, sec, NULL, NULL, link_info->keep_memory)); 3463 if (internal_relocs == NULL) 3464 goto error_return; 3465 3466 irelend = internal_relocs + sec->reloc_count; 3467 3468 while (addr < sec->size) 3469 { 3470 toaddr = sec->size; 3471 3472 for (irel = internal_relocs; irel < irelend; irel ++) 3473 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN 3474 && irel->r_offset > addr 3475 && irel->r_offset < toaddr) 3476 toaddr = irel->r_offset; 3477 3478#ifdef DEBUG_RELAX 3479 fprintf (stderr, "relax region 0x%x to 0x%x align pad %d\n", 3480 addr, toaddr, align_pad_size); 3481#endif 3482 if (irelalign) 3483 { 3484 bfd_vma alignto; 3485 bfd_vma alignmoveto; 3486 3487 alignmoveto = BFD_ALIGN (addr - align_pad_size, 1 << irelalign->r_addend); 3488 alignto = BFD_ALIGN (addr, 1 << irelalign->r_addend); 3489 3490 if (alignmoveto < alignto) 3491 { 3492 bfd_vma i; 3493 3494 align_pad_size = alignto - alignmoveto; 3495#ifdef DEBUG_RELAX 3496 fprintf (stderr, "relax move region 0x%x to 0x%x delete size 0x%x\n", 3497 alignmoveto, toaddr, align_pad_size); 3498#endif 3499 if (!v850_elf_relax_delete_bytes (abfd, sec, alignmoveto, 3500 toaddr, align_pad_size)) 3501 goto error_return; 3502 3503 for (i = BFD_ALIGN (toaddr - align_pad_size, 1); 3504 (i + 1) < toaddr; i += 2) 3505 bfd_put_16 (abfd, NOP_OPCODE, contents + i); 3506 3507 addr = alignmoveto; 3508 } 3509 else 3510 align_pad_size = 0; 3511 } 3512 3513 for (irel = internal_relocs; irel < irelend; irel++) 3514 { 3515 bfd_vma laddr; 3516 bfd_vma addend; 3517 bfd_vma symval; 3518 int insn[5]; 3519 int no_match = -1; 3520 Elf_Internal_Rela *hi_irelfn; 3521 Elf_Internal_Rela *lo_irelfn; 3522 Elf_Internal_Rela *irelcall; 3523 bfd_signed_vma foff; 3524 unsigned int r_type; 3525 3526 if (! (irel->r_offset >= addr && irel->r_offset < toaddr 3527 && (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL 3528 || ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP))) 3529 continue; 3530 3531#ifdef DEBUG_RELAX 3532 fprintf (stderr, "relax check r_info 0x%x r_offset 0x%x r_addend 0x%x\n", 3533 irel->r_info, 3534 irel->r_offset, 3535 irel->r_addend ); 3536#endif 3537 3538 /* Get the section contents. */ 3539 if (contents == NULL) 3540 { 3541 if (elf_section_data (sec)->this_hdr.contents != NULL) 3542 contents = elf_section_data (sec)->this_hdr.contents; 3543 else 3544 { 3545 if (! bfd_malloc_and_get_section (abfd, sec, &contents)) 3546 goto error_return; 3547 } 3548 } 3549 3550 /* Read this BFD's local symbols if we haven't done so already. */ 3551 if (isymbuf == NULL && symtab_hdr->sh_info != 0) 3552 { 3553 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents; 3554 if (isymbuf == NULL) 3555 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr, 3556 symtab_hdr->sh_info, 0, 3557 NULL, NULL, NULL); 3558 if (isymbuf == NULL) 3559 goto error_return; 3560 } 3561 3562 laddr = irel->r_offset; 3563 3564 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL) 3565 { 3566 /* Check code for -mlong-calls output. */ 3567 if (laddr + 16 <= (bfd_vma) sec->size) 3568 { 3569 insn[0] = bfd_get_16 (abfd, contents + laddr); 3570 insn[1] = bfd_get_16 (abfd, contents + laddr + 4); 3571 insn[2] = bfd_get_32 (abfd, contents + laddr + 8); 3572 insn[3] = bfd_get_16 (abfd, contents + laddr + 12); 3573 insn[4] = bfd_get_16 (abfd, contents + laddr + 14); 3574 3575 if ((insn[0] & MOVHI_MASK) != MOVHI 3576 || MOVHI_R1 (insn[0]) != 0) 3577 no_match = 0; 3578 3579 if (no_match < 0 3580 && ((insn[1] & MOVEA_MASK) != MOVEA 3581 || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1]))) 3582 no_match = 1; 3583 3584 if (no_match < 0 3585 && (insn[2] & JARL_4_MASK) != JARL_4) 3586 no_match = 2; 3587 3588 if (no_match < 0 3589 && ((insn[3] & ADD_I_MASK) != ADD_I 3590 || ADD_I5 (insn[3]) != 4 3591 || JARL_R2 (insn[2]) != ADD_R2 (insn[3]))) 3592 no_match = 3; 3593 3594 if (no_match < 0 3595 && ((insn[4] & JMP_R_MASK) != JMP_R 3596 || MOVEA_R2 (insn[1]) != JMP_R1 (insn[4]))) 3597 no_match = 4; 3598 } 3599 else 3600 { 3601 _bfd_error_handler 3602 /* xgettext:c-format */ 3603 (_("%s: 0x%lx: warning: R_V850_LONGCALL points to " 3604 "unrecognized insns"), 3605 bfd_get_filename (abfd), (unsigned long) irel->r_offset); 3606 continue; 3607 } 3608 3609 if (no_match >= 0) 3610 { 3611 _bfd_error_handler 3612 /* xgettext:c-format */ 3613 (_("%s: 0x%lx: warning: R_V850_LONGCALL points to " 3614 "unrecognized insn 0x%x"), 3615 bfd_get_filename (abfd), 3616 (unsigned long) irel->r_offset + no_match, 3617 insn[no_match]); 3618 continue; 3619 } 3620 3621 /* Get the reloc for the address from which the register is 3622 being loaded. This reloc will tell us which function is 3623 actually being called. */ 3624 3625 for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++) 3626 { 3627 r_type = ELF32_R_TYPE (hi_irelfn->r_info); 3628 3629 if (hi_irelfn->r_offset == laddr + 2 3630 && (r_type == (int) R_V850_HI16_S || r_type == (int) R_V810_WHI1)) 3631 break; 3632 } 3633 3634 for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++) 3635 { 3636 r_type = ELF32_R_TYPE (lo_irelfn->r_info); 3637 3638 if (lo_irelfn->r_offset == laddr + 6 3639 && (r_type == (int) R_V850_LO16 || r_type == (int) R_V810_WLO)) 3640 break; 3641 } 3642 3643 for (irelcall = internal_relocs; irelcall < irelend; irelcall ++) 3644 { 3645 r_type = ELF32_R_TYPE (irelcall->r_info); 3646 3647 if (irelcall->r_offset == laddr + 8 3648 && (r_type == (int) R_V850_22_PCREL || r_type == (int) R_V850_PCR22)) 3649 break; 3650 } 3651 3652 if ( hi_irelfn == irelend 3653 || lo_irelfn == irelend 3654 || irelcall == irelend) 3655 { 3656 _bfd_error_handler 3657 /* xgettext:c-format */ 3658 (_("%s: 0x%lx: warning: R_V850_LONGCALL points to " 3659 "unrecognized reloc"), 3660 bfd_get_filename (abfd), (unsigned long) irel->r_offset); 3661 3662 continue; 3663 } 3664 3665 if (ELF32_R_SYM (irelcall->r_info) < symtab_hdr->sh_info) 3666 { 3667 Elf_Internal_Sym * isym; 3668 3669 /* A local symbol. */ 3670 isym = isymbuf + ELF32_R_SYM (irelcall->r_info); 3671 3672 symval = isym->st_value; 3673 } 3674 else 3675 { 3676 unsigned long indx; 3677 struct elf_link_hash_entry * h; 3678 3679 /* An external symbol. */ 3680 indx = ELF32_R_SYM (irelcall->r_info) - symtab_hdr->sh_info; 3681 h = elf_sym_hashes (abfd)[indx]; 3682 BFD_ASSERT (h != NULL); 3683 3684 if ( h->root.type != bfd_link_hash_defined 3685 && h->root.type != bfd_link_hash_defweak) 3686 /* This appears to be a reference to an undefined 3687 symbol. Just ignore it--it will be caught by the 3688 regular reloc processing. */ 3689 continue; 3690 3691 symval = h->root.u.def.value; 3692 } 3693 3694 if (symval + irelcall->r_addend != irelcall->r_offset + 4) 3695 { 3696 _bfd_error_handler 3697 /* xgettext:c-format */ 3698 (_("%s: 0x%lx: warning: R_V850_LONGCALL points to " 3699 "unrecognized reloc 0x%lx"), 3700 bfd_get_filename (abfd), (unsigned long) irel->r_offset, 3701 irelcall->r_offset); 3702 continue; 3703 } 3704 3705 /* Get the value of the symbol referred to by the reloc. */ 3706 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info) 3707 { 3708 Elf_Internal_Sym *isym; 3709 asection *sym_sec; 3710 3711 /* A local symbol. */ 3712 isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info); 3713 3714 if (isym->st_shndx == SHN_UNDEF) 3715 sym_sec = bfd_und_section_ptr; 3716 else if (isym->st_shndx == SHN_ABS) 3717 sym_sec = bfd_abs_section_ptr; 3718 else if (isym->st_shndx == SHN_COMMON) 3719 sym_sec = bfd_com_section_ptr; 3720 else 3721 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx); 3722 symval = (isym->st_value 3723 + sym_sec->output_section->vma 3724 + sym_sec->output_offset); 3725 } 3726 else 3727 { 3728 unsigned long indx; 3729 struct elf_link_hash_entry *h; 3730 3731 /* An external symbol. */ 3732 indx = ELF32_R_SYM (hi_irelfn->r_info) - symtab_hdr->sh_info; 3733 h = elf_sym_hashes (abfd)[indx]; 3734 BFD_ASSERT (h != NULL); 3735 3736 if ( h->root.type != bfd_link_hash_defined 3737 && h->root.type != bfd_link_hash_defweak) 3738 /* This appears to be a reference to an undefined 3739 symbol. Just ignore it--it will be caught by the 3740 regular reloc processing. */ 3741 continue; 3742 3743 symval = (h->root.u.def.value 3744 + h->root.u.def.section->output_section->vma 3745 + h->root.u.def.section->output_offset); 3746 } 3747 3748 addend = irel->r_addend; 3749 3750 foff = (symval + addend 3751 - (irel->r_offset 3752 + sec->output_section->vma 3753 + sec->output_offset 3754 + 4)); 3755#ifdef DEBUG_RELAX 3756 fprintf (stderr, "relax longcall r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n", 3757 irel->r_offset, 3758 (irel->r_offset 3759 + sec->output_section->vma 3760 + sec->output_offset), 3761 symval, addend, foff); 3762#endif 3763 3764 if (foff < -0x100000 || foff >= 0x100000) 3765 /* After all that work, we can't shorten this function call. */ 3766 continue; 3767 3768 /* For simplicity of coding, we are going to modify the section 3769 contents, the section relocs, and the BFD symbol table. We 3770 must tell the rest of the code not to free up this 3771 information. It would be possible to instead create a table 3772 of changes which have to be made, as is done in coff-mips.c; 3773 that would be more work, but would require less memory when 3774 the linker is run. */ 3775 elf_section_data (sec)->relocs = internal_relocs; 3776 elf_section_data (sec)->this_hdr.contents = contents; 3777 symtab_hdr->contents = (bfd_byte *) isymbuf; 3778 3779 /* Replace the long call with a jarl. */ 3780 if (bfd_get_arch (abfd) == bfd_arch_v850_rh850) 3781 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_PCR22); 3782 else 3783 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_22_PCREL); 3784 3785 addend = 0; 3786 3787 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info) 3788 /* If this needs to be changed because of future relaxing, 3789 it will be handled here like other internal IND12W 3790 relocs. */ 3791 bfd_put_32 (abfd, 3792 0x00000780 | (JARL_R2 (insn[2])<<11) | ((addend << 16) & 0xffff) | ((addend >> 16) & 0xf), 3793 contents + irel->r_offset); 3794 else 3795 /* We can't fully resolve this yet, because the external 3796 symbol value may be changed by future relaxing. 3797 We let the final link phase handle it. */ 3798 bfd_put_32 (abfd, 0x00000780 | (JARL_R2 (insn[2])<<11), 3799 contents + irel->r_offset); 3800 3801 hi_irelfn->r_info = 3802 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE); 3803 lo_irelfn->r_info = 3804 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE); 3805 irelcall->r_info = 3806 ELF32_R_INFO (ELF32_R_SYM (irelcall->r_info), R_V850_NONE); 3807 3808 if (! v850_elf_relax_delete_bytes (abfd, sec, 3809 irel->r_offset + 4, toaddr, 12)) 3810 goto error_return; 3811 3812 align_pad_size += 12; 3813 } 3814 else if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP) 3815 { 3816 /* Check code for -mlong-jumps output. */ 3817 if (laddr + 10 <= (bfd_vma) sec->size) 3818 { 3819 insn[0] = bfd_get_16 (abfd, contents + laddr); 3820 insn[1] = bfd_get_16 (abfd, contents + laddr + 4); 3821 insn[2] = bfd_get_16 (abfd, contents + laddr + 8); 3822 3823 if ((insn[0] & MOVHI_MASK) != MOVHI 3824 || MOVHI_R1 (insn[0]) != 0) 3825 no_match = 0; 3826 3827 if (no_match < 0 3828 && ((insn[1] & MOVEA_MASK) != MOVEA 3829 || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1]))) 3830 no_match = 1; 3831 3832 if (no_match < 0 3833 && ((insn[2] & JMP_R_MASK) != JMP_R 3834 || MOVEA_R2 (insn[1]) != JMP_R1 (insn[2]))) 3835 no_match = 4; 3836 } 3837 else 3838 { 3839 _bfd_error_handler 3840 /* xgettext:c-format */ 3841 (_("%s: 0x%lx: warning: R_V850_LONGJUMP points to " 3842 "unrecognized insns"), 3843 bfd_get_filename (abfd), (unsigned long) irel->r_offset); 3844 continue; 3845 } 3846 3847 if (no_match >= 0) 3848 { 3849 _bfd_error_handler 3850 /* xgettext:c-format */ 3851 (_("%s: 0x%lx: warning: R_V850_LONGJUMP points to " 3852 "unrecognized insn 0x%x"), 3853 bfd_get_filename (abfd), 3854 (unsigned long) irel->r_offset + no_match, 3855 insn[no_match]); 3856 continue; 3857 } 3858 3859 /* Get the reloc for the address from which the register is 3860 being loaded. This reloc will tell us which function is 3861 actually being called. */ 3862 for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++) 3863 { 3864 r_type = ELF32_R_TYPE (hi_irelfn->r_info); 3865 3866 if (hi_irelfn->r_offset == laddr + 2 3867 && ((r_type == (int) R_V850_HI16_S) || r_type == (int) R_V810_WHI1)) 3868 break; 3869 } 3870 3871 for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++) 3872 { 3873 r_type = ELF32_R_TYPE (lo_irelfn->r_info); 3874 3875 if (lo_irelfn->r_offset == laddr + 6 3876 && (r_type == (int) R_V850_LO16 || r_type == (int) R_V810_WLO)) 3877 break; 3878 } 3879 3880 if ( hi_irelfn == irelend 3881 || lo_irelfn == irelend) 3882 { 3883 _bfd_error_handler 3884 /* xgettext:c-format */ 3885 (_("%s: 0x%lx: warning: R_V850_LONGJUMP points to " 3886 "unrecognized reloc"), 3887 bfd_get_filename (abfd), (unsigned long) irel->r_offset); 3888 continue; 3889 } 3890 3891 /* Get the value of the symbol referred to by the reloc. */ 3892 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info) 3893 { 3894 Elf_Internal_Sym * isym; 3895 asection * sym_sec; 3896 3897 /* A local symbol. */ 3898 isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info); 3899 3900 if (isym->st_shndx == SHN_UNDEF) 3901 sym_sec = bfd_und_section_ptr; 3902 else if (isym->st_shndx == SHN_ABS) 3903 sym_sec = bfd_abs_section_ptr; 3904 else if (isym->st_shndx == SHN_COMMON) 3905 sym_sec = bfd_com_section_ptr; 3906 else 3907 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx); 3908 symval = (isym->st_value 3909 + sym_sec->output_section->vma 3910 + sym_sec->output_offset); 3911#ifdef DEBUG_RELAX 3912 { 3913 char * name = bfd_elf_string_from_elf_section 3914 (abfd, symtab_hdr->sh_link, isym->st_name); 3915 3916 fprintf (stderr, "relax long jump local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n", 3917 sym_sec->name, name, isym->st_name, 3918 sym_sec->output_section->vma, 3919 sym_sec->output_offset, 3920 isym->st_value, irel->r_addend); 3921 } 3922#endif 3923 } 3924 else 3925 { 3926 unsigned long indx; 3927 struct elf_link_hash_entry * h; 3928 3929 /* An external symbol. */ 3930 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info; 3931 h = elf_sym_hashes (abfd)[indx]; 3932 BFD_ASSERT (h != NULL); 3933 3934 if ( h->root.type != bfd_link_hash_defined 3935 && h->root.type != bfd_link_hash_defweak) 3936 /* This appears to be a reference to an undefined 3937 symbol. Just ignore it--it will be caught by the 3938 regular reloc processing. */ 3939 continue; 3940 3941 symval = (h->root.u.def.value 3942 + h->root.u.def.section->output_section->vma 3943 + h->root.u.def.section->output_offset); 3944#ifdef DEBUG_RELAX 3945 fprintf (stderr, 3946 "relax longjump defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n", 3947 sec->name, h->root.root.string, h->root.u.def.value, 3948 sec->output_section->vma, sec->output_offset, irel->r_addend); 3949#endif 3950 } 3951 3952 addend = irel->r_addend; 3953 3954 foff = (symval + addend 3955 - (irel->r_offset 3956 + sec->output_section->vma 3957 + sec->output_offset 3958 + 4)); 3959#ifdef DEBUG_RELAX 3960 fprintf (stderr, "relax longjump r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n", 3961 irel->r_offset, 3962 (irel->r_offset 3963 + sec->output_section->vma 3964 + sec->output_offset), 3965 symval, addend, foff); 3966#endif 3967 if (foff < -0x100000 || foff >= 0x100000) 3968 /* After all that work, we can't shorten this function call. */ 3969 continue; 3970 3971 /* For simplicity of coding, we are going to modify the section 3972 contents, the section relocs, and the BFD symbol table. We 3973 must tell the rest of the code not to free up this 3974 information. It would be possible to instead create a table 3975 of changes which have to be made, as is done in coff-mips.c; 3976 that would be more work, but would require less memory when 3977 the linker is run. */ 3978 elf_section_data (sec)->relocs = internal_relocs; 3979 elf_section_data (sec)->this_hdr.contents = contents; 3980 symtab_hdr->contents = (bfd_byte *) isymbuf; 3981 3982 if (foff < -0x100 || foff >= 0x100) 3983 { 3984 /* Replace the long jump with a jr. */ 3985 3986 if (bfd_get_arch (abfd) == bfd_arch_v850_rh850) 3987 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_PCR22); 3988 else 3989 irel->r_info = 3990 ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_22_PCREL); 3991 3992 irel->r_addend = addend; 3993 addend = 0; 3994 3995 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info) 3996 /* If this needs to be changed because of future relaxing, 3997 it will be handled here like other internal IND12W 3998 relocs. */ 3999 bfd_put_32 (abfd, 4000 0x00000780 | ((addend << 15) & 0xffff0000) | ((addend >> 17) & 0xf), 4001 contents + irel->r_offset); 4002 else 4003 /* We can't fully resolve this yet, because the external 4004 symbol value may be changed by future relaxing. 4005 We let the final link phase handle it. */ 4006 bfd_put_32 (abfd, 0x00000780, contents + irel->r_offset); 4007 4008 hi_irelfn->r_info = 4009 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE); 4010 lo_irelfn->r_info = 4011 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE); 4012 if (!v850_elf_relax_delete_bytes (abfd, sec, 4013 irel->r_offset + 4, toaddr, 6)) 4014 goto error_return; 4015 4016 align_pad_size += 6; 4017 } 4018 else 4019 { 4020 /* Replace the long jump with a br. */ 4021 4022 if (bfd_get_arch (abfd) == bfd_arch_v850_rh850) 4023 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_PC9); 4024 else 4025 irel->r_info = 4026 ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_9_PCREL); 4027 4028 irel->r_addend = addend; 4029 addend = 0; 4030 4031 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info) 4032 /* If this needs to be changed because of future relaxing, 4033 it will be handled here like other internal IND12W 4034 relocs. */ 4035 bfd_put_16 (abfd, 4036 0x0585 | ((addend << 10) & 0xf800) | ((addend << 3) & 0x0070), 4037 contents + irel->r_offset); 4038 else 4039 /* We can't fully resolve this yet, because the external 4040 symbol value may be changed by future relaxing. 4041 We let the final link phase handle it. */ 4042 bfd_put_16 (abfd, 0x0585, contents + irel->r_offset); 4043 4044 hi_irelfn->r_info = 4045 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE); 4046 lo_irelfn->r_info = 4047 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE); 4048 if (!v850_elf_relax_delete_bytes (abfd, sec, 4049 irel->r_offset + 2, toaddr, 8)) 4050 goto error_return; 4051 4052 align_pad_size += 8; 4053 } 4054 } 4055 } 4056 4057 irelalign = NULL; 4058 for (irel = internal_relocs; irel < irelend; irel++) 4059 { 4060 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN 4061 && irel->r_offset == toaddr) 4062 { 4063 irel->r_offset -= align_pad_size; 4064 4065 if (irelalign == NULL || irelalign->r_addend > irel->r_addend) 4066 irelalign = irel; 4067 } 4068 } 4069 4070 addr = toaddr; 4071 } 4072 4073 if (!irelalign) 4074 { 4075#ifdef DEBUG_RELAX 4076 fprintf (stderr, "relax pad %d shorten %d -> %d\n", 4077 align_pad_size, 4078 sec->size, 4079 sec->size - align_pad_size); 4080#endif 4081 sec->size -= align_pad_size; 4082 } 4083 4084 finish: 4085 if (internal_relocs != NULL 4086 && elf_section_data (sec)->relocs != internal_relocs) 4087 free (internal_relocs); 4088 4089 if (contents != NULL 4090 && elf_section_data (sec)->this_hdr.contents != (unsigned char *) contents) 4091 free (contents); 4092 4093 if (isymbuf != NULL 4094 && symtab_hdr->contents != (bfd_byte *) isymbuf) 4095 free (isymbuf); 4096 4097 return result; 4098 4099 error_return: 4100 result = FALSE; 4101 goto finish; 4102} 4103 4104static const struct bfd_elf_special_section v850_elf_special_sections[] = 4105{ 4106 { STRING_COMMA_LEN (".call_table_data"), 0, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE) }, 4107 { STRING_COMMA_LEN (".call_table_text"), 0, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE 4108 + SHF_EXECINSTR) }, 4109 { STRING_COMMA_LEN (".rosdata"), -2, SHT_PROGBITS, (SHF_ALLOC 4110 + SHF_V850_GPREL) }, 4111 { STRING_COMMA_LEN (".rozdata"), -2, SHT_PROGBITS, (SHF_ALLOC 4112 + SHF_V850_R0REL) }, 4113 { STRING_COMMA_LEN (".sbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE 4114 + SHF_V850_GPREL) }, 4115 { STRING_COMMA_LEN (".scommon"), -2, SHT_V850_SCOMMON, (SHF_ALLOC + SHF_WRITE 4116 + SHF_V850_GPREL) }, 4117 { STRING_COMMA_LEN (".sdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE 4118 + SHF_V850_GPREL) }, 4119 { STRING_COMMA_LEN (".tbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE 4120 + SHF_V850_EPREL) }, 4121 { STRING_COMMA_LEN (".tcommon"), -2, SHT_V850_TCOMMON, (SHF_ALLOC + SHF_WRITE 4122 + SHF_V850_R0REL) }, 4123 { STRING_COMMA_LEN (".tdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE 4124 + SHF_V850_EPREL) }, 4125 { STRING_COMMA_LEN (".zbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE 4126 + SHF_V850_R0REL) }, 4127 { STRING_COMMA_LEN (".zcommon"), -2, SHT_V850_ZCOMMON, (SHF_ALLOC + SHF_WRITE 4128 + SHF_V850_R0REL) }, 4129 { STRING_COMMA_LEN (".zdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE 4130 + SHF_V850_R0REL) }, 4131 { NULL, 0, 0, 0, 0 } 4132}; 4133 4134#define TARGET_LITTLE_SYM v850_elf32_vec 4135#define TARGET_LITTLE_NAME "elf32-v850" 4136#define ELF_ARCH bfd_arch_v850 4137#define ELF_MACHINE_CODE EM_V850 4138#define ELF_MACHINE_ALT1 EM_CYGNUS_V850 4139#define ELF_MAXPAGESIZE 0x1000 4140 4141#define elf_info_to_howto v850_elf_info_to_howto_rela 4142#define elf_info_to_howto_rel v850_elf_info_to_howto_rel 4143 4144#define elf_backend_check_relocs v850_elf_check_relocs 4145#define elf_backend_relocate_section v850_elf_relocate_section 4146#define elf_backend_object_p v850_elf_object_p 4147#define elf_backend_final_write_processing v850_elf_final_write_processing 4148#define elf_backend_section_from_bfd_section v850_elf_section_from_bfd_section 4149#define elf_backend_symbol_processing v850_elf_symbol_processing 4150#define elf_backend_add_symbol_hook v850_elf_add_symbol_hook 4151#define elf_backend_link_output_symbol_hook v850_elf_link_output_symbol_hook 4152#define elf_backend_section_from_shdr v850_elf_section_from_shdr 4153#define elf_backend_fake_sections v850_elf_fake_sections 4154#define elf_backend_gc_mark_hook v850_elf_gc_mark_hook 4155#define elf_backend_special_sections v850_elf_special_sections 4156 4157#define elf_backend_can_gc_sections 1 4158#define elf_backend_rela_normal 1 4159 4160#define bfd_elf32_bfd_is_local_label_name v850_elf_is_local_label_name 4161#define bfd_elf32_bfd_is_target_special_symbol v850_elf_is_target_special_symbol 4162 4163#define bfd_elf32_bfd_reloc_type_lookup v850_elf_reloc_type_lookup 4164#define bfd_elf32_bfd_reloc_name_lookup v850_elf_reloc_name_lookup 4165#define bfd_elf32_bfd_merge_private_bfd_data v850_elf_merge_private_bfd_data 4166#define bfd_elf32_bfd_set_private_flags v850_elf_set_private_flags 4167#define bfd_elf32_bfd_print_private_bfd_data v850_elf_print_private_bfd_data 4168#define bfd_elf32_bfd_relax_section v850_elf_relax_section 4169 4170#define elf_symbol_leading_char '_' 4171 4172#undef elf32_bed 4173#define elf32_bed elf32_v850_bed 4174 4175#include "elf32-target.h" 4176 4177/* Map BFD reloc types to V800 ELF reloc types. */ 4178 4179static const struct v850_elf_reloc_map v800_elf_reloc_map[] = 4180{ 4181 { BFD_RELOC_NONE, R_V810_NONE }, 4182 { BFD_RELOC_8, R_V810_BYTE }, 4183 { BFD_RELOC_16, R_V810_HWORD }, 4184 { BFD_RELOC_32, R_V810_WORD }, 4185 { BFD_RELOC_LO16, R_V810_WLO }, 4186 { BFD_RELOC_HI16, R_V810_WHI }, 4187 { BFD_RELOC_HI16_S, R_V810_WHI1 }, 4188 { BFD_RELOC_V850_32_PCREL, R_V850_PC32 }, 4189 { BFD_RELOC_V850_22_PCREL, R_V850_PCR22 }, 4190 { BFD_RELOC_V850_17_PCREL, R_V850_PC17 }, 4191 { BFD_RELOC_V850_16_PCREL, R_V850_PC16U }, 4192 { BFD_RELOC_V850_9_PCREL, R_V850_PC9 }, 4193 { BFD_RELOC_V850_LO16_S1, R_V810_WLO_1 }, /* Or R_V850_HWLO or R_V850_HWLO_1. */ 4194 { BFD_RELOC_V850_23, R_V850_WLO23 }, 4195 { BFD_RELOC_V850_LO16_SPLIT_OFFSET, R_V850_BLO }, 4196 { BFD_RELOC_V850_ZDA_16_16_OFFSET, R_V810_HWORD }, 4197 { BFD_RELOC_V850_TDA_16_16_OFFSET, R_V810_HWORD }, 4198 { BFD_RELOC_V850_SDA_16_16_OFFSET, R_V810_HWORD }, 4199 { BFD_RELOC_V850_SDA_15_16_OFFSET, R_V810_GPWLO_1 } 4200}; 4201 4202/* Map a bfd relocation into the appropriate howto structure. */ 4203 4204static reloc_howto_type * 4205v800_elf_reloc_type_lookup (bfd * abfd, bfd_reloc_code_real_type code) 4206{ 4207 unsigned int i; 4208 4209 BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850); 4210 4211 for (i = ARRAY_SIZE (v800_elf_reloc_map); i --;) 4212 if (v800_elf_reloc_map[i].bfd_reloc_val == code) 4213 { 4214 unsigned int elf_reloc_val = v800_elf_reloc_map[i].elf_reloc_val; 4215 unsigned int idx = elf_reloc_val - R_V810_NONE; 4216 4217 BFD_ASSERT (v800_elf_howto_table[idx].type == elf_reloc_val); 4218 4219 return v800_elf_howto_table + idx; 4220 } 4221 4222#ifdef DEBUG 4223 fprintf (stderr, "failed to find v800 equiv of bfd reloc code %d\n", code); 4224#endif 4225 return NULL; 4226} 4227 4228static reloc_howto_type * 4229v800_elf_reloc_name_lookup (bfd * abfd, const char * r_name) 4230{ 4231 unsigned int i; 4232 4233 BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850); 4234 4235 for (i = ARRAY_SIZE (v800_elf_howto_table); i--;) 4236 if (v800_elf_howto_table[i].name != NULL 4237 && strcasecmp (v800_elf_howto_table[i].name, r_name) == 0) 4238 return v800_elf_howto_table + i; 4239 4240 return NULL; 4241} 4242 4243 4244/* Set the howto pointer in CACHE_PTR for a V800 ELF reloc. */ 4245 4246static void 4247v800_elf_info_to_howto (bfd * abfd, 4248 arelent * cache_ptr, 4249 Elf_Internal_Rela * dst) 4250{ 4251 unsigned int r_type = ELF32_R_TYPE (dst->r_info); 4252 4253 BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850); 4254 4255 BFD_ASSERT (r_type < (unsigned int) R_V800_max); 4256 4257 if (r_type == R_V800_NONE) 4258 r_type = R_V810_NONE; 4259 4260 BFD_ASSERT (r_type >= (unsigned int) R_V810_NONE); 4261 r_type -= R_V810_NONE; 4262 BFD_ASSERT (r_type < ARRAY_SIZE (v800_elf_howto_table)); 4263 4264 cache_ptr->howto = v800_elf_howto_table + r_type; 4265} 4266 4267#undef TARGET_LITTLE_SYM 4268#define TARGET_LITTLE_SYM v800_elf32_vec 4269#undef TARGET_LITTLE_NAME 4270#define TARGET_LITTLE_NAME "elf32-v850-rh850" 4271#undef ELF_ARCH 4272#define ELF_ARCH bfd_arch_v850_rh850 4273#undef ELF_MACHINE_CODE 4274#define ELF_MACHINE_CODE EM_V800 4275#undef ELF_MACHINE_ALT1 4276 4277#undef elf32_bed 4278#define elf32_bed elf32_v850_rh850_bed 4279 4280#undef elf_info_to_howto 4281#define elf_info_to_howto v800_elf_info_to_howto 4282#undef elf_info_to_howto_rel 4283#define elf_info_to_howto_rel NULL 4284#undef bfd_elf32_bfd_reloc_type_lookup 4285#define bfd_elf32_bfd_reloc_type_lookup v800_elf_reloc_type_lookup 4286#undef bfd_elf32_bfd_reloc_name_lookup 4287#define bfd_elf32_bfd_reloc_name_lookup v800_elf_reloc_name_lookup 4288 4289#include "elf32-target.h" 4290