]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - bfd/elf32-v850.c
projects / thirdparty / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
PR 3958
[thirdparty/binutils-gdb.git] / bfd / elf32-v850.c
1 /* V850-specific support for 32-bit ELF
2 Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
3 2006, 2007 Free Software Foundation, Inc.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
21
22 /* 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 "bfd.h"
26 #include "sysdep.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 24-bit number. */
34 #define SEXT24(x) ((((x) & 0xffffff) ^ 0x800000) - 0x800000)
35
36 static reloc_howto_type v850_elf_howto_table[];
37
38 /* Look through the relocs for a section during the first phase, and
39 allocate space in the global offset table or procedure linkage
40 table. */
41
42 static bfd_boolean
43 v850_elf_check_relocs (bfd *abfd,
44 struct bfd_link_info *info,
45 asection *sec,
46 const Elf_Internal_Rela *relocs)
47 {
48 bfd_boolean ret = TRUE;
49 bfd *dynobj;
50 Elf_Internal_Shdr *symtab_hdr;
51 struct elf_link_hash_entry **sym_hashes;
52 const Elf_Internal_Rela *rel;
53 const Elf_Internal_Rela *rel_end;
54 asection *sreloc;
55 enum v850_reloc_type r_type;
56 int other = 0;
57 const char *common = NULL;
58
59 if (info->relocatable)
60 return TRUE;
61
62 #ifdef DEBUG
63 _bfd_error_handler ("v850_elf_check_relocs called for section %A in %B",
64 sec, abfd);
65 #endif
66
67 dynobj = elf_hash_table (info)->dynobj;
68 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
69 sym_hashes = elf_sym_hashes (abfd);
70 sreloc = NULL;
71
72 rel_end = relocs + sec->reloc_count;
73 for (rel = relocs; rel < rel_end; rel++)
74 {
75 unsigned long r_symndx;
76 struct elf_link_hash_entry *h;
77
78 r_symndx = ELF32_R_SYM (rel->r_info);
79 if (r_symndx < symtab_hdr->sh_info)
80 h = NULL;
81 else
82 {
83 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
84 while (h->root.type == bfd_link_hash_indirect
85 || h->root.type == bfd_link_hash_warning)
86 h = (struct elf_link_hash_entry *) h->root.u.i.link;
87 }
88
89 r_type = (enum v850_reloc_type) ELF32_R_TYPE (rel->r_info);
90 switch (r_type)
91 {
92 default:
93 case R_V850_NONE:
94 case R_V850_9_PCREL:
95 case R_V850_22_PCREL:
96 case R_V850_HI16_S:
97 case R_V850_HI16:
98 case R_V850_LO16:
99 case R_V850_LO16_SPLIT_OFFSET:
100 case R_V850_ABS32:
101 case R_V850_REL32:
102 case R_V850_16:
103 case R_V850_8:
104 case R_V850_CALLT_6_7_OFFSET:
105 case R_V850_CALLT_16_16_OFFSET:
106 break;
107
108 /* This relocation describes the C++ object vtable hierarchy.
109 Reconstruct it for later use during GC. */
110 case R_V850_GNU_VTINHERIT:
111 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
112 return FALSE;
113 break;
114
115 /* This relocation describes which C++ vtable entries
116 are actually used. Record for later use during GC. */
117 case R_V850_GNU_VTENTRY:
118 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
119 return FALSE;
120 break;
121
122 case R_V850_SDA_16_16_SPLIT_OFFSET:
123 case R_V850_SDA_16_16_OFFSET:
124 case R_V850_SDA_15_16_OFFSET:
125 other = V850_OTHER_SDA;
126 common = ".scommon";
127 goto small_data_common;
128
129 case R_V850_ZDA_16_16_SPLIT_OFFSET:
130 case R_V850_ZDA_16_16_OFFSET:
131 case R_V850_ZDA_15_16_OFFSET:
132 other = V850_OTHER_ZDA;
133 common = ".zcommon";
134 goto small_data_common;
135
136 case R_V850_TDA_4_5_OFFSET:
137 case R_V850_TDA_4_4_OFFSET:
138 case R_V850_TDA_6_8_OFFSET:
139 case R_V850_TDA_7_8_OFFSET:
140 case R_V850_TDA_7_7_OFFSET:
141 case R_V850_TDA_16_16_OFFSET:
142 other = V850_OTHER_TDA;
143 common = ".tcommon";
144 /* fall through */
145
146 #define V850_OTHER_MASK (V850_OTHER_TDA | V850_OTHER_SDA | V850_OTHER_ZDA)
147
148 small_data_common:
149 if (h)
150 {
151 /* Flag which type of relocation was used. */
152 h->other |= other;
153 if ((h->other & V850_OTHER_MASK) != (other & V850_OTHER_MASK)
154 && (h->other & V850_OTHER_ERROR) == 0)
155 {
156 const char * msg;
157 static char buff[200]; /* XXX */
158
159 switch (h->other & V850_OTHER_MASK)
160 {
161 default:
162 msg = _("Variable `%s' cannot occupy in multiple small data regions");
163 break;
164 case V850_OTHER_SDA | V850_OTHER_ZDA | V850_OTHER_TDA:
165 msg = _("Variable `%s' can only be in one of the small, zero, and tiny data regions");
166 break;
167 case V850_OTHER_SDA | V850_OTHER_ZDA:
168 msg = _("Variable `%s' cannot be in both small and zero data regions simultaneously");
169 break;
170 case V850_OTHER_SDA | V850_OTHER_TDA:
171 msg = _("Variable `%s' cannot be in both small and tiny data regions simultaneously");
172 break;
173 case V850_OTHER_ZDA | V850_OTHER_TDA:
174 msg = _("Variable `%s' cannot be in both zero and tiny data regions simultaneously");
175 break;
176 }
177
178 sprintf (buff, msg, h->root.root.string);
179 info->callbacks->warning (info, buff, h->root.root.string,
180 abfd, h->root.u.def.section,
181 (bfd_vma) 0);
182
183 bfd_set_error (bfd_error_bad_value);
184 h->other |= V850_OTHER_ERROR;
185 ret = FALSE;
186 }
187 }
188
189 if (h && h->root.type == bfd_link_hash_common
190 && h->root.u.c.p
191 && !strcmp (bfd_get_section_name (abfd, h->root.u.c.p->section), "COMMON"))
192 {
193 asection * section;
194
195 section = h->root.u.c.p->section = bfd_make_section_old_way (abfd, common);
196 section->flags |= SEC_IS_COMMON;
197 }
198
199 #ifdef DEBUG
200 fprintf (stderr, "v850_elf_check_relocs, found %s relocation for %s%s\n",
201 v850_elf_howto_table[ (int)r_type ].name,
202 (h && h->root.root.string) ? h->root.root.string : "<unknown>",
203 (h->root.type == bfd_link_hash_common) ? ", symbol is common" : "");
204 #endif
205 break;
206 }
207 }
208
209 return ret;
210 }
211
212 /* In the old version, when an entry was checked out from the table,
213 it was deleted. This produced an error if the entry was needed
214 more than once, as the second attempted retry failed.
215
216 In the current version, the entry is not deleted, instead we set
217 the field 'found' to TRUE. If a second lookup matches the same
218 entry, then we know that the hi16s reloc has already been updated
219 and does not need to be updated a second time.
220
221 TODO - TOFIX: If it is possible that we need to restore 2 different
222 addresses from the same table entry, where the first generates an
223 overflow, whilst the second do not, then this code will fail. */
224
225 typedef struct hi16s_location
226 {
227 bfd_vma addend;
228 bfd_byte * address;
229 unsigned long counter;
230 bfd_boolean found;
231 struct hi16s_location * next;
232 }
233 hi16s_location;
234
235 static hi16s_location * previous_hi16s;
236 static hi16s_location * free_hi16s;
237 static unsigned long hi16s_counter;
238
239 static void
240 remember_hi16s_reloc (bfd *abfd, bfd_vma addend, bfd_byte *address)
241 {
242 hi16s_location * entry = NULL;
243 bfd_size_type amt = sizeof (* free_hi16s);
244
245 /* Find a free structure. */
246 if (free_hi16s == NULL)
247 free_hi16s = bfd_zalloc (abfd, amt);
248
249 entry = free_hi16s;
250 free_hi16s = free_hi16s->next;
251
252 entry->addend = addend;
253 entry->address = address;
254 entry->counter = hi16s_counter ++;
255 entry->found = FALSE;
256 entry->next = previous_hi16s;
257 previous_hi16s = entry;
258
259 /* Cope with wrap around of our counter. */
260 if (hi16s_counter == 0)
261 {
262 /* XXX: Assume that all counter entries differ only in their low 16 bits. */
263 for (entry = previous_hi16s; entry != NULL; entry = entry->next)
264 entry->counter &= 0xffff;
265
266 hi16s_counter = 0x10000;
267 }
268 }
269
270 static bfd_byte *
271 find_remembered_hi16s_reloc (bfd_vma addend, bfd_boolean *already_found)
272 {
273 hi16s_location *match = NULL;
274 hi16s_location *entry;
275 hi16s_location *previous = NULL;
276 hi16s_location *prev;
277 bfd_byte *addr;
278
279 /* Search the table. Record the most recent entry that matches. */
280 for (entry = previous_hi16s; entry; entry = entry->next)
281 {
282 if (entry->addend == addend
283 && (match == NULL || match->counter < entry->counter))
284 {
285 previous = prev;
286 match = entry;
287 }
288
289 prev = entry;
290 }
291
292 if (match == NULL)
293 return NULL;
294
295 /* Extract the address. */
296 addr = match->address;
297
298 /* Remember if this entry has already been used before. */
299 if (already_found)
300 * already_found = match->found;
301
302 /* Note that this entry has now been used. */
303 match->found = TRUE;
304
305 return addr;
306 }
307
308 /* Calculate the final operand value for a R_V850_LO16 or
309 R_V850_LO16_SPLIT_OFFSET. *INSN is the current operand value and
310 ADDEND is the sum of the relocation symbol and offset. Store the
311 operand value in *INSN and return true on success.
312
313 The assembler has already done some of this: If the value stored in
314 the instruction has its 15th bit set, (counting from zero) then the
315 assembler will have added 1 to the value stored in the associated
316 HI16S reloc. So for example, these relocations:
317
318 movhi hi( fred ), r0, r1
319 movea lo( fred ), r1, r1
320
321 will store 0 in the value fields for the MOVHI and MOVEA instructions
322 and addend will be the address of fred, but for these instructions:
323
324 movhi hi( fred + 0x123456), r0, r1
325 movea lo( fred + 0x123456), r1, r1
326
327 the value stored in the MOVHI instruction will be 0x12 and the value
328 stored in the MOVEA instruction will be 0x3456. If however the
329 instructions were:
330
331 movhi hi( fred + 0x10ffff), r0, r1
332 movea lo( fred + 0x10ffff), r1, r1
333
334 then the value stored in the MOVHI instruction would be 0x11 (not
335 0x10) and the value stored in the MOVEA instruction would be 0xffff.
336 Thus (assuming for the moment that the addend is 0), at run time the
337 MOVHI instruction loads 0x110000 into r1, then the MOVEA instruction
338 adds 0xffffffff (sign extension!) producing 0x10ffff. Similarly if
339 the instructions were:
340
341 movhi hi( fred - 1), r0, r1
342 movea lo( fred - 1), r1, r1
343
344 then 0 is stored in the MOVHI instruction and -1 is stored in the
345 MOVEA instruction.
346
347 Overflow can occur if the addition of the value stored in the
348 instruction plus the addend sets the 15th bit when before it was clear.
349 This is because the 15th bit will be sign extended into the high part,
350 thus reducing its value by one, but since the 15th bit was originally
351 clear, the assembler will not have added 1 to the previous HI16S reloc
352 to compensate for this effect. For example:
353
354 movhi hi( fred + 0x123456), r0, r1
355 movea lo( fred + 0x123456), r1, r1
356
357 The value stored in HI16S reloc is 0x12, the value stored in the LO16
358 reloc is 0x3456. If we assume that the address of fred is 0x00007000
359 then the relocations become:
360
361 HI16S: 0x0012 + (0x00007000 >> 16) = 0x12
362 LO16: 0x3456 + (0x00007000 & 0xffff) = 0xa456
363
364 but when the instructions are executed, the MOVEA instruction's value
365 is signed extended, so the sum becomes:
366
367 0x00120000
368 + 0xffffa456
369 ------------
370 0x0011a456 but 'fred + 0x123456' = 0x0012a456
371
372 Note that if the 15th bit was set in the value stored in the LO16
373 reloc, then we do not have to do anything:
374
375 movhi hi( fred + 0x10ffff), r0, r1
376 movea lo( fred + 0x10ffff), r1, r1
377
378 HI16S: 0x0011 + (0x00007000 >> 16) = 0x11
379 LO16: 0xffff + (0x00007000 & 0xffff) = 0x6fff
380
381 0x00110000
382 + 0x00006fff
383 ------------
384 0x00116fff = fred + 0x10ffff = 0x7000 + 0x10ffff
385
386 Overflow can also occur if the computation carries into the 16th bit
387 and it also results in the 15th bit having the same value as the 15th
388 bit of the original value. What happens is that the HI16S reloc
389 will have already examined the 15th bit of the original value and
390 added 1 to the high part if the bit is set. This compensates for the
391 sign extension of 15th bit of the result of the computation. But now
392 there is a carry into the 16th bit, and this has not been allowed for.
393
394 So, for example if fred is at address 0xf000:
395
396 movhi hi( fred + 0xffff), r0, r1 [bit 15 of the offset is set]
397 movea lo( fred + 0xffff), r1, r1
398
399 HI16S: 0x0001 + (0x0000f000 >> 16) = 0x0001
400 LO16: 0xffff + (0x0000f000 & 0xffff) = 0xefff (carry into bit 16 is lost)
401
402 0x00010000
403 + 0xffffefff
404 ------------
405 0x0000efff but 'fred + 0xffff' = 0x0001efff
406
407 Similarly, if the 15th bit remains clear, but overflow occurs into
408 the 16th bit then (assuming the address of fred is 0xf000):
409
410 movhi hi( fred + 0x7000), r0, r1 [bit 15 of the offset is clear]
411 movea lo( fred + 0x7000), r1, r1
412
413 HI16S: 0x0000 + (0x0000f000 >> 16) = 0x0000
414 LO16: 0x7000 + (0x0000f000 & 0xffff) = 0x6fff (carry into bit 16 is lost)
415
416 0x00000000
417 + 0x00006fff
418 ------------
419 0x00006fff but 'fred + 0x7000' = 0x00016fff
420
421 Note - there is no need to change anything if a carry occurs, and the
422 15th bit changes its value from being set to being clear, as the HI16S
423 reloc will have already added in 1 to the high part for us:
424
425 movhi hi( fred + 0xffff), r0, r1 [bit 15 of the offset is set]
426 movea lo( fred + 0xffff), r1, r1
427
428 HI16S: 0x0001 + (0x00007000 >> 16)
429 LO16: 0xffff + (0x00007000 & 0xffff) = 0x6fff (carry into bit 16 is lost)
430
431 0x00010000
432 + 0x00006fff (bit 15 not set, so the top half is zero)
433 ------------
434 0x00016fff which is right (assuming that fred is at 0x7000)
435
436 but if the 15th bit goes from being clear to being set, then we must
437 once again handle overflow:
438
439 movhi hi( fred + 0x7000), r0, r1 [bit 15 of the offset is clear]
440 movea lo( fred + 0x7000), r1, r1
441
442 HI16S: 0x0000 + (0x0000ffff >> 16)
443 LO16: 0x7000 + (0x0000ffff & 0xffff) = 0x6fff (carry into bit 16)
444
445 0x00000000
446 + 0x00006fff (bit 15 not set, so the top half is zero)
447 ------------
448 0x00006fff which is wrong (assuming that fred is at 0xffff). */
449
450 static bfd_boolean
451 v850_elf_perform_lo16_relocation (bfd *abfd, unsigned long *insn,
452 unsigned long addend)
453 {
454 #define BIT15_SET(x) ((x) & 0x8000)
455 #define OVERFLOWS(a,i) ((((a) & 0xffff) + (i)) > 0xffff)
456
457 if ((BIT15_SET (*insn + addend) && ! BIT15_SET (addend))
458 || (OVERFLOWS (addend, *insn)
459 && ((! BIT15_SET (*insn)) || (BIT15_SET (addend)))))
460 {
461 bfd_boolean already_updated;
462 bfd_byte *hi16s_address = find_remembered_hi16s_reloc
463 (addend, & already_updated);
464
465 /* Amend the matching HI16_S relocation. */
466 if (hi16s_address != NULL)
467 {
468 if (! already_updated)
469 {
470 unsigned long hi_insn = bfd_get_16 (abfd, hi16s_address);
471 hi_insn += 1;
472 bfd_put_16 (abfd, hi_insn, hi16s_address);
473 }
474 }
475 else
476 {
477 fprintf (stderr, _("FAILED to find previous HI16 reloc\n"));
478 return FALSE;
479 }
480 }
481 #undef OVERFLOWS
482 #undef BIT15_SET
483
484 /* Do not complain if value has top bit set, as this has been
485 anticipated. */
486 *insn = (*insn + addend) & 0xffff;
487 return TRUE;
488 }
489
490 /* FIXME: The code here probably ought to be removed and the code in reloc.c
491 allowed to do its stuff instead. At least for most of the relocs, anyway. */
492
493 static bfd_reloc_status_type
494 v850_elf_perform_relocation (bfd *abfd,
495 unsigned int r_type,
496 bfd_vma addend,
497 bfd_byte *address)
498 {
499 unsigned long insn;
500 unsigned long result;
501 bfd_signed_vma saddend = (bfd_signed_vma) addend;
502
503 switch (r_type)
504 {
505 default:
506 return bfd_reloc_notsupported;
507
508 case R_V850_REL32:
509 case R_V850_ABS32:
510 bfd_put_32 (abfd, addend, address);
511 return bfd_reloc_ok;
512
513 case R_V850_22_PCREL:
514 if (saddend > 0x1fffff || saddend < -0x200000)
515 return bfd_reloc_overflow;
516
517 if ((addend % 2) != 0)
518 return bfd_reloc_dangerous;
519
520 insn = bfd_get_32 (abfd, address);
521 insn &= ~0xfffe003f;
522 insn |= (((addend & 0xfffe) << 16) | ((addend & 0x3f0000) >> 16));
523 bfd_put_32 (abfd, (bfd_vma) insn, address);
524 return bfd_reloc_ok;
525
526 case R_V850_9_PCREL:
527 if (saddend > 0xff || saddend < -0x100)
528 return bfd_reloc_overflow;
529
530 if ((addend % 2) != 0)
531 return bfd_reloc_dangerous;
532
533 insn = bfd_get_16 (abfd, address);
534 insn &= ~ 0xf870;
535 insn |= ((addend & 0x1f0) << 7) | ((addend & 0x0e) << 3);
536 break;
537
538 case R_V850_HI16:
539 addend += (bfd_get_16 (abfd, address) << 16);
540 addend = (addend >> 16);
541 insn = addend;
542 break;
543
544 case R_V850_HI16_S:
545 /* Remember where this relocation took place. */
546 remember_hi16s_reloc (abfd, addend, address);
547
548 addend += (bfd_get_16 (abfd, address) << 16);
549 addend = (addend >> 16) + ((addend & 0x8000) != 0);
550
551 /* This relocation cannot overflow. */
552 if (addend > 0x7fff)
553 addend = 0;
554
555 insn = addend;
556 break;
557
558 case R_V850_LO16:
559 insn = bfd_get_16 (abfd, address);
560 if (! v850_elf_perform_lo16_relocation (abfd, &insn, addend))
561 return bfd_reloc_overflow;
562 break;
563
564 case R_V850_8:
565 addend += (char) bfd_get_8 (abfd, address);
566
567 saddend = (bfd_signed_vma) addend;
568
569 if (saddend > 0x7f || saddend < -0x80)
570 return bfd_reloc_overflow;
571
572 bfd_put_8 (abfd, addend, address);
573 return bfd_reloc_ok;
574
575 case R_V850_CALLT_16_16_OFFSET:
576 addend += bfd_get_16 (abfd, address);
577
578 saddend = (bfd_signed_vma) addend;
579
580 if (saddend > 0xffff || saddend < 0)
581 return bfd_reloc_overflow;
582
583 insn = addend;
584 break;
585
586 case R_V850_16:
587 case R_V850_SDA_16_16_OFFSET:
588 case R_V850_ZDA_16_16_OFFSET:
589 case R_V850_TDA_16_16_OFFSET:
590 addend += bfd_get_16 (abfd, address);
591
592 saddend = (bfd_signed_vma) addend;
593
594 if (saddend > 0x7fff || saddend < -0x8000)
595 return bfd_reloc_overflow;
596
597 insn = addend;
598 break;
599
600 case R_V850_SDA_15_16_OFFSET:
601 case R_V850_ZDA_15_16_OFFSET:
602 insn = bfd_get_16 (abfd, address);
603 addend += (insn & 0xfffe);
604
605 saddend = (bfd_signed_vma) addend;
606
607 if (saddend > 0x7ffe || saddend < -0x8000)
608 return bfd_reloc_overflow;
609
610 if (addend & 1)
611 return bfd_reloc_dangerous;
612
613 insn = (addend &~ (bfd_vma) 1) | (insn & 1);
614 break;
615
616 case R_V850_TDA_6_8_OFFSET:
617 insn = bfd_get_16 (abfd, address);
618 addend += ((insn & 0x7e) << 1);
619
620 saddend = (bfd_signed_vma) addend;
621
622 if (saddend > 0xfc || saddend < 0)
623 return bfd_reloc_overflow;
624
625 if (addend & 3)
626 return bfd_reloc_dangerous;
627
628 insn &= 0xff81;
629 insn |= (addend >> 1);
630 break;
631
632 case R_V850_TDA_7_8_OFFSET:
633 insn = bfd_get_16 (abfd, address);
634 addend += ((insn & 0x7f) << 1);
635
636 saddend = (bfd_signed_vma) addend;
637
638 if (saddend > 0xfe || saddend < 0)
639 return bfd_reloc_overflow;
640
641 if (addend & 1)
642 return bfd_reloc_dangerous;
643
644 insn &= 0xff80;
645 insn |= (addend >> 1);
646 break;
647
648 case R_V850_TDA_7_7_OFFSET:
649 insn = bfd_get_16 (abfd, address);
650 addend += insn & 0x7f;
651
652 saddend = (bfd_signed_vma) addend;
653
654 if (saddend > 0x7f || saddend < 0)
655 return bfd_reloc_overflow;
656
657 insn &= 0xff80;
658 insn |= addend;
659 break;
660
661 case R_V850_TDA_4_5_OFFSET:
662 insn = bfd_get_16 (abfd, address);
663 addend += ((insn & 0xf) << 1);
664
665 saddend = (bfd_signed_vma) addend;
666
667 if (saddend > 0x1e || saddend < 0)
668 return bfd_reloc_overflow;
669
670 if (addend & 1)
671 return bfd_reloc_dangerous;
672
673 insn &= 0xfff0;
674 insn |= (addend >> 1);
675 break;
676
677 case R_V850_TDA_4_4_OFFSET:
678 insn = bfd_get_16 (abfd, address);
679 addend += insn & 0xf;
680
681 saddend = (bfd_signed_vma) addend;
682
683 if (saddend > 0xf || saddend < 0)
684 return bfd_reloc_overflow;
685
686 insn &= 0xfff0;
687 insn |= addend;
688 break;
689
690 case R_V850_LO16_SPLIT_OFFSET:
691 insn = bfd_get_32 (abfd, address);
692 result = ((insn & 0xfffe0000) >> 16) | ((insn & 0x20) >> 5);
693 if (! v850_elf_perform_lo16_relocation (abfd, &result, addend))
694 return bfd_reloc_overflow;
695 insn = (((result << 16) & 0xfffe0000)
696 | ((result << 5) & 0x20)
697 | (insn & ~0xfffe0020));
698 bfd_put_32 (abfd, insn, address);
699 return bfd_reloc_ok;
700
701 case R_V850_ZDA_16_16_SPLIT_OFFSET:
702 case R_V850_SDA_16_16_SPLIT_OFFSET:
703 insn = bfd_get_32 (abfd, address);
704 addend += ((insn & 0xfffe0000) >> 16) + ((insn & 0x20) >> 5);
705
706 saddend = (bfd_signed_vma) addend;
707
708 if (saddend > 0x7fff || saddend < -0x8000)
709 return bfd_reloc_overflow;
710
711 insn &= 0x0001ffdf;
712 insn |= (addend & 1) << 5;
713 insn |= (addend &~ (bfd_vma) 1) << 16;
714
715 bfd_put_32 (abfd, (bfd_vma) insn, address);
716 return bfd_reloc_ok;
717
718 case R_V850_CALLT_6_7_OFFSET:
719 insn = bfd_get_16 (abfd, address);
720 addend += ((insn & 0x3f) << 1);
721
722 saddend = (bfd_signed_vma) addend;
723
724 if (saddend > 0x7e || saddend < 0)
725 return bfd_reloc_overflow;
726
727 if (addend & 1)
728 return bfd_reloc_dangerous;
729
730 insn &= 0xff80;
731 insn |= (addend >> 1);
732 break;
733
734 case R_V850_GNU_VTINHERIT:
735 case R_V850_GNU_VTENTRY:
736 return bfd_reloc_ok;
737
738 }
739
740 bfd_put_16 (abfd, (bfd_vma) insn, address);
741 return bfd_reloc_ok;
742 }
743 \f
744 /* Insert the addend into the instruction. */
745
746 static bfd_reloc_status_type
747 v850_elf_reloc (bfd *abfd ATTRIBUTE_UNUSED,
748 arelent *reloc,
749 asymbol *symbol,
750 void * data ATTRIBUTE_UNUSED,
751 asection *isection,
752 bfd *obfd,
753 char **err ATTRIBUTE_UNUSED)
754 {
755 long relocation;
756
757 /* If there is an output BFD,
758 and the symbol is not a section name (which is only defined at final link time),
759 and either we are not putting the addend into the instruction
760 or the addend is zero, so there is nothing to add into the instruction
761 then just fixup the address and return. */
762 if (obfd != NULL
763 && (symbol->flags & BSF_SECTION_SYM) == 0
764 && (! reloc->howto->partial_inplace
765 || reloc->addend == 0))
766 {
767 reloc->address += isection->output_offset;
768 return bfd_reloc_ok;
769 }
770
771 /* Catch relocs involving undefined symbols. */
772 if (bfd_is_und_section (symbol->section)
773 && (symbol->flags & BSF_WEAK) == 0
774 && obfd == NULL)
775 return bfd_reloc_undefined;
776
777 /* We handle final linking of some relocs ourselves. */
778
779 /* Is the address of the relocation really within the section? */
780 if (reloc->address > bfd_get_section_limit (abfd, isection))
781 return bfd_reloc_outofrange;
782
783 /* Work out which section the relocation is targeted at and the
784 initial relocation command value. */
785
786 if (reloc->howto->pc_relative)
787 return bfd_reloc_ok;
788
789 /* Get symbol value. (Common symbols are special.) */
790 if (bfd_is_com_section (symbol->section))
791 relocation = 0;
792 else
793 relocation = symbol->value;
794
795 /* Convert input-section-relative symbol value to absolute + addend. */
796 relocation += symbol->section->output_section->vma;
797 relocation += symbol->section->output_offset;
798 relocation += reloc->addend;
799
800 reloc->addend = relocation;
801 return bfd_reloc_ok;
802 }
803
804 /* This function is used for relocs which are only used
805 for relaxing, which the linker should otherwise ignore. */
806
807 static bfd_reloc_status_type
808 v850_elf_ignore_reloc (bfd *abfd ATTRIBUTE_UNUSED,
809 arelent *reloc_entry,
810 asymbol *symbol ATTRIBUTE_UNUSED,
811 void * data ATTRIBUTE_UNUSED,
812 asection *input_section,
813 bfd *output_bfd,
814 char **error_message ATTRIBUTE_UNUSED)
815 {
816 if (output_bfd != NULL)
817 reloc_entry->address += input_section->output_offset;
818
819 return bfd_reloc_ok;
820 }
821 /* Note: It is REQUIRED that the 'type' value of each entry
822 in this array match the index of the entry in the array. */
823 static reloc_howto_type v850_elf_howto_table[] =
824 {
825 /* This reloc does nothing. */
826 HOWTO (R_V850_NONE, /* Type. */
827 0, /* Rightshift. */
828 2, /* Size (0 = byte, 1 = short, 2 = long). */
829 32, /* Bitsize. */
830 FALSE, /* PC_relative. */
831 0, /* Bitpos. */
832 complain_overflow_bitfield, /* Complain_on_overflow. */
833 bfd_elf_generic_reloc, /* Special_function. */
834 "R_V850_NONE", /* Name. */
835 FALSE, /* Partial_inplace. */
836 0, /* Src_mask. */
837 0, /* Dst_mask. */
838 FALSE), /* PCrel_offset. */
839
840 /* A PC relative 9 bit branch. */
841 HOWTO (R_V850_9_PCREL, /* Type. */
842 2, /* Rightshift. */
843 2, /* Size (0 = byte, 1 = short, 2 = long). */
844 26, /* Bitsize. */
845 TRUE, /* PC_relative. */
846 0, /* Bitpos. */
847 complain_overflow_bitfield, /* Complain_on_overflow. */
848 v850_elf_reloc, /* Special_function. */
849 "R_V850_9_PCREL", /* Name. */
850 FALSE, /* Partial_inplace. */
851 0x00ffffff, /* Src_mask. */
852 0x00ffffff, /* Dst_mask. */
853 TRUE), /* PCrel_offset. */
854
855 /* A PC relative 22 bit branch. */
856 HOWTO (R_V850_22_PCREL, /* Type. */
857 2, /* Rightshift. */
858 2, /* Size (0 = byte, 1 = short, 2 = long). */
859 22, /* Bitsize. */
860 TRUE, /* PC_relative. */
861 7, /* Bitpos. */
862 complain_overflow_signed, /* Complain_on_overflow. */
863 v850_elf_reloc, /* Special_function. */
864 "R_V850_22_PCREL", /* Name. */
865 FALSE, /* Partial_inplace. */
866 0x07ffff80, /* Src_mask. */
867 0x07ffff80, /* Dst_mask. */
868 TRUE), /* PCrel_offset. */
869
870 /* High 16 bits of symbol value. */
871 HOWTO (R_V850_HI16_S, /* Type. */
872 0, /* Rightshift. */
873 1, /* Size (0 = byte, 1 = short, 2 = long). */
874 16, /* Bitsize. */
875 FALSE, /* PC_relative. */
876 0, /* Bitpos. */
877 complain_overflow_dont, /* Complain_on_overflow. */
878 v850_elf_reloc, /* Special_function. */
879 "R_V850_HI16_S", /* Name. */
880 FALSE, /* Partial_inplace. */
881 0xffff, /* Src_mask. */
882 0xffff, /* Dst_mask. */
883 FALSE), /* PCrel_offset. */
884
885 /* High 16 bits of symbol value. */
886 HOWTO (R_V850_HI16, /* Type. */
887 0, /* Rightshift. */
888 1, /* Size (0 = byte, 1 = short, 2 = long). */
889 16, /* Bitsize. */
890 FALSE, /* PC_relative. */
891 0, /* Bitpos. */
892 complain_overflow_dont, /* Complain_on_overflow. */
893 v850_elf_reloc, /* Special_function. */
894 "R_V850_HI16", /* Name. */
895 FALSE, /* Partial_inplace. */
896 0xffff, /* Src_mask. */
897 0xffff, /* Dst_mask. */
898 FALSE), /* PCrel_offset. */
899
900 /* Low 16 bits of symbol value. */
901 HOWTO (R_V850_LO16, /* Type. */
902 0, /* Rightshift. */
903 1, /* Size (0 = byte, 1 = short, 2 = long). */
904 16, /* Bitsize. */
905 FALSE, /* PC_relative. */
906 0, /* Bitpos. */
907 complain_overflow_dont, /* Complain_on_overflow. */
908 v850_elf_reloc, /* Special_function. */
909 "R_V850_LO16", /* Name. */
910 FALSE, /* Partial_inplace. */
911 0xffff, /* Src_mask. */
912 0xffff, /* Dst_mask. */
913 FALSE), /* PCrel_offset. */
914
915 /* Simple 32bit reloc. */
916 HOWTO (R_V850_ABS32, /* Type. */
917 0, /* Rightshift. */
918 2, /* Size (0 = byte, 1 = short, 2 = long). */
919 32, /* Bitsize. */
920 FALSE, /* PC_relative. */
921 0, /* Bitpos. */
922 complain_overflow_dont, /* Complain_on_overflow. */
923 v850_elf_reloc, /* Special_function. */
924 "R_V850_ABS32", /* Name. */
925 FALSE, /* Partial_inplace. */
926 0xffffffff, /* Src_mask. */
927 0xffffffff, /* Dst_mask. */
928 FALSE), /* PCrel_offset. */
929
930 /* Simple 16bit reloc. */
931 HOWTO (R_V850_16, /* Type. */
932 0, /* Rightshift. */
933 1, /* Size (0 = byte, 1 = short, 2 = long). */
934 16, /* Bitsize. */
935 FALSE, /* PC_relative. */
936 0, /* Bitpos. */
937 complain_overflow_dont, /* Complain_on_overflow. */
938 bfd_elf_generic_reloc, /* Special_function. */
939 "R_V850_16", /* Name. */
940 FALSE, /* Partial_inplace. */
941 0xffff, /* Src_mask. */
942 0xffff, /* Dst_mask. */
943 FALSE), /* PCrel_offset. */
944
945 /* Simple 8bit reloc. */
946 HOWTO (R_V850_8, /* Type. */
947 0, /* Rightshift. */
948 0, /* Size (0 = byte, 1 = short, 2 = long). */
949 8, /* Bitsize. */
950 FALSE, /* PC_relative. */
951 0, /* Bitpos. */
952 complain_overflow_dont, /* Complain_on_overflow. */
953 bfd_elf_generic_reloc, /* Special_function. */
954 "R_V850_8", /* Name. */
955 FALSE, /* Partial_inplace. */
956 0xff, /* Src_mask. */
957 0xff, /* Dst_mask. */
958 FALSE), /* PCrel_offset. */
959
960 /* 16 bit offset from the short data area pointer. */
961 HOWTO (R_V850_SDA_16_16_OFFSET, /* Type. */
962 0, /* Rightshift. */
963 1, /* Size (0 = byte, 1 = short, 2 = long). */
964 16, /* Bitsize. */
965 FALSE, /* PC_relative. */
966 0, /* Bitpos. */
967 complain_overflow_dont, /* Complain_on_overflow. */
968 v850_elf_reloc, /* Special_function. */
969 "R_V850_SDA_16_16_OFFSET", /* Name. */
970 FALSE, /* Partial_inplace. */
971 0xffff, /* Src_mask. */
972 0xffff, /* Dst_mask. */
973 FALSE), /* PCrel_offset. */
974
975 /* 15 bit offset from the short data area pointer. */
976 HOWTO (R_V850_SDA_15_16_OFFSET, /* Type. */
977 1, /* Rightshift. */
978 1, /* Size (0 = byte, 1 = short, 2 = long). */
979 16, /* Bitsize. */
980 FALSE, /* PC_relative. */
981 1, /* Bitpos. */
982 complain_overflow_dont, /* Complain_on_overflow. */
983 v850_elf_reloc, /* Special_function. */
984 "R_V850_SDA_15_16_OFFSET", /* Name. */
985 FALSE, /* Partial_inplace. */
986 0xfffe, /* Src_mask. */
987 0xfffe, /* Dst_mask. */
988 FALSE), /* PCrel_offset. */
989
990 /* 16 bit offset from the zero data area pointer. */
991 HOWTO (R_V850_ZDA_16_16_OFFSET, /* Type. */
992 0, /* Rightshift. */
993 1, /* Size (0 = byte, 1 = short, 2 = long). */
994 16, /* Bitsize. */
995 FALSE, /* PC_relative. */
996 0, /* Bitpos. */
997 complain_overflow_dont, /* Complain_on_overflow. */
998 v850_elf_reloc, /* Special_function. */
999 "R_V850_ZDA_16_16_OFFSET", /* Name. */
1000 FALSE, /* Partial_inplace. */
1001 0xffff, /* Src_mask. */
1002 0xffff, /* Dst_mask. */
1003 FALSE), /* PCrel_offset. */
1004
1005 /* 15 bit offset from the zero data area pointer. */
1006 HOWTO (R_V850_ZDA_15_16_OFFSET, /* Type. */
1007 1, /* Rightshift. */
1008 1, /* Size (0 = byte, 1 = short, 2 = long). */
1009 16, /* Bitsize. */
1010 FALSE, /* PC_relative. */
1011 1, /* Bitpos. */
1012 complain_overflow_dont, /* Complain_on_overflow. */
1013 v850_elf_reloc, /* Special_function. */
1014 "R_V850_ZDA_15_16_OFFSET", /* Name. */
1015 FALSE, /* Partial_inplace. */
1016 0xfffe, /* Src_mask. */
1017 0xfffe, /* Dst_mask. */
1018 FALSE), /* PCrel_offset. */
1019
1020 /* 6 bit offset from the tiny data area pointer. */
1021 HOWTO (R_V850_TDA_6_8_OFFSET, /* Type. */
1022 2, /* Rightshift. */
1023 1, /* Size (0 = byte, 1 = short, 2 = long). */
1024 8, /* Bitsize. */
1025 FALSE, /* PC_relative. */
1026 1, /* Bitpos. */
1027 complain_overflow_dont, /* Complain_on_overflow. */
1028 v850_elf_reloc, /* Special_function. */
1029 "R_V850_TDA_6_8_OFFSET", /* Name. */
1030 FALSE, /* Partial_inplace. */
1031 0x7e, /* Src_mask. */
1032 0x7e, /* Dst_mask. */
1033 FALSE), /* PCrel_offset. */
1034
1035 /* 8 bit offset from the tiny data area pointer. */
1036 HOWTO (R_V850_TDA_7_8_OFFSET, /* Type. */
1037 1, /* Rightshift. */
1038 1, /* Size (0 = byte, 1 = short, 2 = long). */
1039 8, /* Bitsize. */
1040 FALSE, /* PC_relative. */
1041 0, /* Bitpos. */
1042 complain_overflow_dont, /* Complain_on_overflow. */
1043 v850_elf_reloc, /* Special_function. */
1044 "R_V850_TDA_7_8_OFFSET", /* Name. */
1045 FALSE, /* Partial_inplace. */
1046 0x7f, /* Src_mask. */
1047 0x7f, /* Dst_mask. */
1048 FALSE), /* PCrel_offset. */
1049
1050 /* 7 bit offset from the tiny data area pointer. */
1051 HOWTO (R_V850_TDA_7_7_OFFSET, /* Type. */
1052 0, /* Rightshift. */
1053 1, /* Size (0 = byte, 1 = short, 2 = long). */
1054 7, /* Bitsize. */
1055 FALSE, /* PC_relative. */
1056 0, /* Bitpos. */
1057 complain_overflow_dont, /* Complain_on_overflow. */
1058 v850_elf_reloc, /* Special_function. */
1059 "R_V850_TDA_7_7_OFFSET", /* Name. */
1060 FALSE, /* Partial_inplace. */
1061 0x7f, /* Src_mask. */
1062 0x7f, /* Dst_mask. */
1063 FALSE), /* PCrel_offset. */
1064
1065 /* 16 bit offset from the tiny data area pointer! */
1066 HOWTO (R_V850_TDA_16_16_OFFSET, /* Type. */
1067 0, /* Rightshift. */
1068 1, /* Size (0 = byte, 1 = short, 2 = long). */
1069 16, /* Bitsize. */
1070 FALSE, /* PC_relative. */
1071 0, /* Bitpos. */
1072 complain_overflow_dont, /* Complain_on_overflow. */
1073 v850_elf_reloc, /* Special_function. */
1074 "R_V850_TDA_16_16_OFFSET", /* Name. */
1075 FALSE, /* Partial_inplace. */
1076 0xffff, /* Src_mask. */
1077 0xfff, /* Dst_mask. */
1078 FALSE), /* PCrel_offset. */
1079
1080 /* 5 bit offset from the tiny data area pointer. */
1081 HOWTO (R_V850_TDA_4_5_OFFSET, /* Type. */
1082 1, /* Rightshift. */
1083 1, /* Size (0 = byte, 1 = short, 2 = long). */
1084 5, /* Bitsize. */
1085 FALSE, /* PC_relative. */
1086 0, /* Bitpos. */
1087 complain_overflow_dont, /* Complain_on_overflow. */
1088 v850_elf_reloc, /* Special_function. */
1089 "R_V850_TDA_4_5_OFFSET", /* Name. */
1090 FALSE, /* Partial_inplace. */
1091 0x0f, /* Src_mask. */
1092 0x0f, /* Dst_mask. */
1093 FALSE), /* PCrel_offset. */
1094
1095 /* 4 bit offset from the tiny data area pointer. */
1096 HOWTO (R_V850_TDA_4_4_OFFSET, /* Type. */
1097 0, /* Rightshift. */
1098 1, /* Size (0 = byte, 1 = short, 2 = long). */
1099 4, /* Bitsize. */
1100 FALSE, /* PC_relative. */
1101 0, /* Bitpos. */
1102 complain_overflow_dont, /* Complain_on_overflow. */
1103 v850_elf_reloc, /* Special_function. */
1104 "R_V850_TDA_4_4_OFFSET", /* Name. */
1105 FALSE, /* Partial_inplace. */
1106 0x0f, /* Src_mask. */
1107 0x0f, /* Dst_mask. */
1108 FALSE), /* PCrel_offset. */
1109
1110 /* 16 bit offset from the short data area pointer. */
1111 HOWTO (R_V850_SDA_16_16_SPLIT_OFFSET, /* Type. */
1112 0, /* Rightshift. */
1113 2, /* Size (0 = byte, 1 = short, 2 = long). */
1114 16, /* Bitsize. */
1115 FALSE, /* PC_relative. */
1116 0, /* Bitpos. */
1117 complain_overflow_dont, /* Complain_on_overflow. */
1118 v850_elf_reloc, /* Special_function. */
1119 "R_V850_SDA_16_16_SPLIT_OFFSET",/* Name. */
1120 FALSE, /* Partial_inplace. */
1121 0xfffe0020, /* Src_mask. */
1122 0xfffe0020, /* Dst_mask. */
1123 FALSE), /* PCrel_offset. */
1124
1125 /* 16 bit offset from the zero data area pointer. */
1126 HOWTO (R_V850_ZDA_16_16_SPLIT_OFFSET, /* Type. */
1127 0, /* Rightshift. */
1128 2, /* Size (0 = byte, 1 = short, 2 = long). */
1129 16, /* Bitsize. */
1130 FALSE, /* PC_relative. */
1131 0, /* Bitpos. */
1132 complain_overflow_dont, /* Complain_on_overflow. */
1133 v850_elf_reloc, /* Special_function. */
1134 "R_V850_ZDA_16_16_SPLIT_OFFSET",/* Name. */
1135 FALSE, /* Partial_inplace. */
1136 0xfffe0020, /* Src_mask. */
1137 0xfffe0020, /* Dst_mask. */
1138 FALSE), /* PCrel_offset. */
1139
1140 /* 6 bit offset from the call table base pointer. */
1141 HOWTO (R_V850_CALLT_6_7_OFFSET, /* Type. */
1142 0, /* Rightshift. */
1143 1, /* Size (0 = byte, 1 = short, 2 = long). */
1144 7, /* Bitsize. */
1145 FALSE, /* PC_relative. */
1146 0, /* Bitpos. */
1147 complain_overflow_dont, /* Complain_on_overflow. */
1148 v850_elf_reloc, /* Special_function. */
1149 "R_V850_CALLT_6_7_OFFSET", /* Name. */
1150 FALSE, /* Partial_inplace. */
1151 0x3f, /* Src_mask. */
1152 0x3f, /* Dst_mask. */
1153 FALSE), /* PCrel_offset. */
1154
1155 /* 16 bit offset from the call table base pointer. */
1156 HOWTO (R_V850_CALLT_16_16_OFFSET, /* Type. */
1157 0, /* Rightshift. */
1158 1, /* Size (0 = byte, 1 = short, 2 = long). */
1159 16, /* Bitsize. */
1160 FALSE, /* PC_relative. */
1161 0, /* Bitpos. */
1162 complain_overflow_dont, /* Complain_on_overflow. */
1163 v850_elf_reloc, /* Special_function. */
1164 "R_V850_CALLT_16_16_OFFSET", /* Name. */
1165 FALSE, /* Partial_inplace. */
1166 0xffff, /* Src_mask. */
1167 0xffff, /* Dst_mask. */
1168 FALSE), /* PCrel_offset. */
1169
1170 /* GNU extension to record C++ vtable hierarchy */
1171 HOWTO (R_V850_GNU_VTINHERIT, /* Type. */
1172 0, /* Rightshift. */
1173 2, /* Size (0 = byte, 1 = short, 2 = long). */
1174 0, /* Bitsize. */
1175 FALSE, /* PC_relative. */
1176 0, /* Bitpos. */
1177 complain_overflow_dont, /* Complain_on_overflow. */
1178 NULL, /* Special_function. */
1179 "R_V850_GNU_VTINHERIT", /* Name. */
1180 FALSE, /* Partial_inplace. */
1181 0, /* Src_mask. */
1182 0, /* Dst_mask. */
1183 FALSE), /* PCrel_offset. */
1184
1185 /* GNU extension to record C++ vtable member usage */
1186 HOWTO (R_V850_GNU_VTENTRY, /* Type. */
1187 0, /* Rightshift. */
1188 2, /* Size (0 = byte, 1 = short, 2 = long). */
1189 0, /* Bitsize. */
1190 FALSE, /* PC_relative. */
1191 0, /* Bitpos. */
1192 complain_overflow_dont, /* Complain_on_overflow. */
1193 _bfd_elf_rel_vtable_reloc_fn, /* Special_function. */
1194 "R_V850_GNU_VTENTRY", /* Name. */
1195 FALSE, /* Partial_inplace. */
1196 0, /* Src_mask. */
1197 0, /* Dst_mask. */
1198 FALSE), /* PCrel_offset. */
1199
1200 /* Indicates a .longcall pseudo-op. The compiler will generate a .longcall
1201 pseudo-op when it finds a function call which can be relaxed. */
1202 HOWTO (R_V850_LONGCALL, /* Type. */
1203 0, /* Rightshift. */
1204 2, /* Size (0 = byte, 1 = short, 2 = long). */
1205 32, /* Bitsize. */
1206 TRUE, /* PC_relative. */
1207 0, /* Bitpos. */
1208 complain_overflow_signed, /* Complain_on_overflow. */
1209 v850_elf_ignore_reloc, /* Special_function. */
1210 "R_V850_LONGCALL", /* Name. */
1211 FALSE, /* Partial_inplace. */
1212 0, /* Src_mask. */
1213 0, /* Dst_mask. */
1214 TRUE), /* PCrel_offset. */
1215
1216 /* Indicates a .longjump pseudo-op. The compiler will generate a
1217 .longjump pseudo-op when it finds a branch which can be relaxed. */
1218 HOWTO (R_V850_LONGJUMP, /* Type. */
1219 0, /* Rightshift. */
1220 2, /* Size (0 = byte, 1 = short, 2 = long). */
1221 32, /* Bitsize. */
1222 TRUE, /* PC_relative. */
1223 0, /* Bitpos. */
1224 complain_overflow_signed, /* Complain_on_overflow. */
1225 v850_elf_ignore_reloc, /* Special_function. */
1226 "R_V850_LONGJUMP", /* Name. */
1227 FALSE, /* Partial_inplace. */
1228 0, /* Src_mask. */
1229 0, /* Dst_mask. */
1230 TRUE), /* PCrel_offset. */
1231
1232 HOWTO (R_V850_ALIGN, /* Type. */
1233 0, /* Rightshift. */
1234 1, /* Size (0 = byte, 1 = short, 2 = long). */
1235 0, /* Bitsize. */
1236 FALSE, /* PC_relative. */
1237 0, /* Bitpos. */
1238 complain_overflow_unsigned, /* Complain_on_overflow. */
1239 v850_elf_ignore_reloc, /* Special_function. */
1240 "R_V850_ALIGN", /* Name. */
1241 FALSE, /* Partial_inplace. */
1242 0, /* Src_mask. */
1243 0, /* Dst_mask. */
1244 TRUE), /* PCrel_offset. */
1245
1246 /* Simple pc-relative 32bit reloc. */
1247 HOWTO (R_V850_REL32, /* Type. */
1248 0, /* Rightshift. */
1249 2, /* Size (0 = byte, 1 = short, 2 = long). */
1250 32, /* Bitsize. */
1251 TRUE, /* PC_relative. */
1252 0, /* Bitpos. */
1253 complain_overflow_dont, /* Complain_on_overflow. */
1254 v850_elf_reloc, /* Special_function. */
1255 "R_V850_REL32", /* Name. */
1256 FALSE, /* Partial_inplace. */
1257 0xffffffff, /* Src_mask. */
1258 0xffffffff, /* Dst_mask. */
1259 FALSE), /* PCrel_offset. */
1260
1261 /* An ld.bu version of R_V850_LO16. */
1262 HOWTO (R_V850_LO16_SPLIT_OFFSET, /* Type. */
1263 0, /* Rightshift. */
1264 2, /* Size (0 = byte, 1 = short, 2 = long). */
1265 16, /* Bitsize. */
1266 FALSE, /* PC_relative. */
1267 0, /* Bitpos. */
1268 complain_overflow_dont, /* Complain_on_overflow. */
1269 v850_elf_reloc, /* Special_function. */
1270 "R_V850_LO16_SPLIT_OFFSET", /* Name. */
1271 FALSE, /* Partial_inplace. */
1272 0xfffe0020, /* Src_mask. */
1273 0xfffe0020, /* Dst_mask. */
1274 FALSE), /* PCrel_offset. */
1275 };
1276
1277 /* Map BFD reloc types to V850 ELF reloc types. */
1278
1279 struct v850_elf_reloc_map
1280 {
1281 /* BFD_RELOC_V850_CALLT_16_16_OFFSET is 258, which will not fix in an
1282 unsigned char. */
1283 bfd_reloc_code_real_type bfd_reloc_val;
1284 unsigned int elf_reloc_val;
1285 };
1286
1287 static const struct v850_elf_reloc_map v850_elf_reloc_map[] =
1288 {
1289 { BFD_RELOC_NONE, R_V850_NONE },
1290 { BFD_RELOC_V850_9_PCREL, R_V850_9_PCREL },
1291 { BFD_RELOC_V850_22_PCREL, R_V850_22_PCREL },
1292 { BFD_RELOC_HI16_S, R_V850_HI16_S },
1293 { BFD_RELOC_HI16, R_V850_HI16 },
1294 { BFD_RELOC_LO16, R_V850_LO16 },
1295 { BFD_RELOC_32, R_V850_ABS32 },
1296 { BFD_RELOC_32_PCREL, R_V850_REL32 },
1297 { BFD_RELOC_16, R_V850_16 },
1298 { BFD_RELOC_8, R_V850_8 },
1299 { BFD_RELOC_V850_SDA_16_16_OFFSET, R_V850_SDA_16_16_OFFSET },
1300 { BFD_RELOC_V850_SDA_15_16_OFFSET, R_V850_SDA_15_16_OFFSET },
1301 { BFD_RELOC_V850_ZDA_16_16_OFFSET, R_V850_ZDA_16_16_OFFSET },
1302 { BFD_RELOC_V850_ZDA_15_16_OFFSET, R_V850_ZDA_15_16_OFFSET },
1303 { BFD_RELOC_V850_TDA_6_8_OFFSET, R_V850_TDA_6_8_OFFSET },
1304 { BFD_RELOC_V850_TDA_7_8_OFFSET, R_V850_TDA_7_8_OFFSET },
1305 { BFD_RELOC_V850_TDA_7_7_OFFSET, R_V850_TDA_7_7_OFFSET },
1306 { BFD_RELOC_V850_TDA_16_16_OFFSET, R_V850_TDA_16_16_OFFSET },
1307 { BFD_RELOC_V850_TDA_4_5_OFFSET, R_V850_TDA_4_5_OFFSET },
1308 { BFD_RELOC_V850_TDA_4_4_OFFSET, R_V850_TDA_4_4_OFFSET },
1309 { BFD_RELOC_V850_LO16_SPLIT_OFFSET, R_V850_LO16_SPLIT_OFFSET },
1310 { BFD_RELOC_V850_SDA_16_16_SPLIT_OFFSET, R_V850_SDA_16_16_SPLIT_OFFSET },
1311 { BFD_RELOC_V850_ZDA_16_16_SPLIT_OFFSET, R_V850_ZDA_16_16_SPLIT_OFFSET },
1312 { BFD_RELOC_V850_CALLT_6_7_OFFSET, R_V850_CALLT_6_7_OFFSET },
1313 { BFD_RELOC_V850_CALLT_16_16_OFFSET, R_V850_CALLT_16_16_OFFSET },
1314 { BFD_RELOC_VTABLE_INHERIT, R_V850_GNU_VTINHERIT },
1315 { BFD_RELOC_VTABLE_ENTRY, R_V850_GNU_VTENTRY },
1316 { BFD_RELOC_V850_LONGCALL, R_V850_LONGCALL },
1317 { BFD_RELOC_V850_LONGJUMP, R_V850_LONGJUMP },
1318 { BFD_RELOC_V850_ALIGN, R_V850_ALIGN },
1319
1320 };
1321 \f
1322 /* Map a bfd relocation into the appropriate howto structure. */
1323
1324 static reloc_howto_type *
1325 v850_elf_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1326 bfd_reloc_code_real_type code)
1327 {
1328 unsigned int i;
1329
1330 for (i = ARRAY_SIZE (v850_elf_reloc_map); i --;)
1331 if (v850_elf_reloc_map[i].bfd_reloc_val == code)
1332 {
1333 unsigned int elf_reloc_val = v850_elf_reloc_map[i].elf_reloc_val;
1334
1335 BFD_ASSERT (v850_elf_howto_table[elf_reloc_val].type == elf_reloc_val);
1336
1337 return v850_elf_howto_table + elf_reloc_val;
1338 }
1339
1340 return NULL;
1341 }
1342 \f
1343 /* Set the howto pointer for an V850 ELF reloc. */
1344
1345 static void
1346 v850_elf_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
1347 arelent *cache_ptr,
1348 Elf_Internal_Rela *dst)
1349 {
1350 unsigned int r_type;
1351
1352 r_type = ELF32_R_TYPE (dst->r_info);
1353 BFD_ASSERT (r_type < (unsigned int) R_V850_max);
1354 cache_ptr->howto = &v850_elf_howto_table[r_type];
1355 }
1356
1357 /* Set the howto pointer for a V850 ELF reloc (type RELA). */
1358
1359 static void
1360 v850_elf_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
1361 arelent * cache_ptr,
1362 Elf_Internal_Rela *dst)
1363 {
1364 unsigned int r_type;
1365
1366 r_type = ELF32_R_TYPE (dst->r_info);
1367 BFD_ASSERT (r_type < (unsigned int) R_V850_max);
1368 cache_ptr->howto = &v850_elf_howto_table[r_type];
1369 }
1370 \f
1371 static bfd_boolean
1372 v850_elf_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, const char *name)
1373 {
1374 return ( (name[0] == '.' && (name[1] == 'L' || name[1] == '.'))
1375 || (name[0] == '_' && name[1] == '.' && name[2] == 'L' && name[3] == '_'));
1376 }
1377 \f
1378 /* We overload some of the bfd_reloc error codes for own purposes. */
1379 #define bfd_reloc_gp_not_found bfd_reloc_other
1380 #define bfd_reloc_ep_not_found bfd_reloc_continue
1381 #define bfd_reloc_ctbp_not_found (bfd_reloc_dangerous + 1)
1382
1383 /* Perform a relocation as part of a final link. */
1384
1385 static bfd_reloc_status_type
1386 v850_elf_final_link_relocate (reloc_howto_type *howto,
1387 bfd *input_bfd,
1388 bfd *output_bfd ATTRIBUTE_UNUSED,
1389 asection *input_section,
1390 bfd_byte *contents,
1391 bfd_vma offset,
1392 bfd_vma value,
1393 bfd_vma addend,
1394 struct bfd_link_info *info,
1395 asection *sym_sec,
1396 int is_local ATTRIBUTE_UNUSED)
1397 {
1398 unsigned int r_type = howto->type;
1399 bfd_byte *hit_data = contents + offset;
1400
1401 /* Adjust the value according to the relocation. */
1402 switch (r_type)
1403 {
1404 case R_V850_9_PCREL:
1405 value -= (input_section->output_section->vma
1406 + input_section->output_offset);
1407 value -= offset;
1408 break;
1409
1410 case R_V850_22_PCREL:
1411 value -= (input_section->output_section->vma
1412 + input_section->output_offset
1413 + offset);
1414
1415 /* If the sign extension will corrupt the value then we have overflowed. */
1416 if (((value & 0xff000000) != 0x0) && ((value & 0xff000000) != 0xff000000))
1417 return bfd_reloc_overflow;
1418
1419 /* Only the bottom 24 bits of the PC are valid. */
1420 value = SEXT24 (value);
1421 break;
1422
1423 case R_V850_REL32:
1424 value -= (input_section->output_section->vma
1425 + input_section->output_offset
1426 + offset);
1427 break;
1428
1429 case R_V850_HI16_S:
1430 case R_V850_HI16:
1431 case R_V850_LO16:
1432 case R_V850_LO16_SPLIT_OFFSET:
1433 case R_V850_16:
1434 case R_V850_ABS32:
1435 case R_V850_8:
1436 break;
1437
1438 case R_V850_ZDA_15_16_OFFSET:
1439 case R_V850_ZDA_16_16_OFFSET:
1440 case R_V850_ZDA_16_16_SPLIT_OFFSET:
1441 if (sym_sec == NULL)
1442 return bfd_reloc_undefined;
1443
1444 value -= sym_sec->output_section->vma;
1445 break;
1446
1447 case R_V850_SDA_15_16_OFFSET:
1448 case R_V850_SDA_16_16_OFFSET:
1449 case R_V850_SDA_16_16_SPLIT_OFFSET:
1450 {
1451 unsigned long gp;
1452 struct bfd_link_hash_entry * h;
1453
1454 if (sym_sec == NULL)
1455 return bfd_reloc_undefined;
1456
1457 /* Get the value of __gp. */
1458 h = bfd_link_hash_lookup (info->hash, "__gp", FALSE, FALSE, TRUE);
1459 if (h == NULL
1460 || h->type != bfd_link_hash_defined)
1461 return bfd_reloc_gp_not_found;
1462
1463 gp = (h->u.def.value
1464 + h->u.def.section->output_section->vma
1465 + h->u.def.section->output_offset);
1466
1467 value -= sym_sec->output_section->vma;
1468 value -= (gp - sym_sec->output_section->vma);
1469 }
1470 break;
1471
1472 case R_V850_TDA_4_4_OFFSET:
1473 case R_V850_TDA_4_5_OFFSET:
1474 case R_V850_TDA_16_16_OFFSET:
1475 case R_V850_TDA_7_7_OFFSET:
1476 case R_V850_TDA_7_8_OFFSET:
1477 case R_V850_TDA_6_8_OFFSET:
1478 {
1479 unsigned long ep;
1480 struct bfd_link_hash_entry * h;
1481
1482 /* Get the value of __ep. */
1483 h = bfd_link_hash_lookup (info->hash, "__ep", FALSE, FALSE, TRUE);
1484 if (h == NULL
1485 || h->type != bfd_link_hash_defined)
1486 return bfd_reloc_ep_not_found;
1487
1488 ep = (h->u.def.value
1489 + h->u.def.section->output_section->vma
1490 + h->u.def.section->output_offset);
1491
1492 value -= ep;
1493 }
1494 break;
1495
1496 case R_V850_CALLT_6_7_OFFSET:
1497 {
1498 unsigned long ctbp;
1499 struct bfd_link_hash_entry * h;
1500
1501 /* Get the value of __ctbp. */
1502 h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE);
1503 if (h == NULL
1504 || h->type != bfd_link_hash_defined)
1505 return bfd_reloc_ctbp_not_found;
1506
1507 ctbp = (h->u.def.value
1508 + h->u.def.section->output_section->vma
1509 + h->u.def.section->output_offset);
1510 value -= ctbp;
1511 }
1512 break;
1513
1514 case R_V850_CALLT_16_16_OFFSET:
1515 {
1516 unsigned long ctbp;
1517 struct bfd_link_hash_entry * h;
1518
1519 if (sym_sec == NULL)
1520 return bfd_reloc_undefined;
1521
1522 /* Get the value of __ctbp. */
1523 h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE);
1524 if (h == NULL
1525 || h->type != bfd_link_hash_defined)
1526 return bfd_reloc_ctbp_not_found;
1527
1528 ctbp = (h->u.def.value
1529 + h->u.def.section->output_section->vma
1530 + h->u.def.section->output_offset);
1531
1532 value -= sym_sec->output_section->vma;
1533 value -= (ctbp - sym_sec->output_section->vma);
1534 }
1535 break;
1536
1537 case R_V850_NONE:
1538 case R_V850_GNU_VTINHERIT:
1539 case R_V850_GNU_VTENTRY:
1540 case R_V850_LONGCALL:
1541 case R_V850_LONGJUMP:
1542 case R_V850_ALIGN:
1543 return bfd_reloc_ok;
1544
1545 default:
1546 return bfd_reloc_notsupported;
1547 }
1548
1549 /* Perform the relocation. */
1550 return v850_elf_perform_relocation (input_bfd, r_type, value + addend, hit_data);
1551 }
1552 \f
1553 /* Relocate an V850 ELF section. */
1554
1555 static bfd_boolean
1556 v850_elf_relocate_section (bfd *output_bfd,
1557 struct bfd_link_info *info,
1558 bfd *input_bfd,
1559 asection *input_section,
1560 bfd_byte *contents,
1561 Elf_Internal_Rela *relocs,
1562 Elf_Internal_Sym *local_syms,
1563 asection **local_sections)
1564 {
1565 Elf_Internal_Shdr *symtab_hdr;
1566 struct elf_link_hash_entry **sym_hashes;
1567 Elf_Internal_Rela *rel;
1568 Elf_Internal_Rela *relend;
1569
1570 symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
1571 sym_hashes = elf_sym_hashes (input_bfd);
1572
1573 /* Reset the list of remembered HI16S relocs to empty. */
1574 free_hi16s = previous_hi16s;
1575 previous_hi16s = NULL;
1576 hi16s_counter = 0;
1577
1578 rel = relocs;
1579 relend = relocs + input_section->reloc_count;
1580 for (; rel < relend; rel++)
1581 {
1582 int r_type;
1583 reloc_howto_type *howto;
1584 unsigned long r_symndx;
1585 Elf_Internal_Sym *sym;
1586 asection *sec;
1587 struct elf_link_hash_entry *h;
1588 bfd_vma relocation;
1589 bfd_reloc_status_type r;
1590
1591 r_symndx = ELF32_R_SYM (rel->r_info);
1592 r_type = ELF32_R_TYPE (rel->r_info);
1593
1594 if (r_type == R_V850_GNU_VTENTRY
1595 || r_type == R_V850_GNU_VTINHERIT)
1596 continue;
1597
1598 howto = v850_elf_howto_table + r_type;
1599 h = NULL;
1600 sym = NULL;
1601 sec = NULL;
1602 if (r_symndx < symtab_hdr->sh_info)
1603 {
1604 sym = local_syms + r_symndx;
1605 sec = local_sections[r_symndx];
1606 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1607 }
1608 else
1609 {
1610 bfd_boolean unresolved_reloc, warned;
1611
1612 /* Note - this check is delayed until now as it is possible and
1613 valid to have a file without any symbols but with relocs that
1614 can be processed. */
1615 if (sym_hashes == NULL)
1616 {
1617 info->callbacks->warning
1618 (info, "no hash table available",
1619 NULL, input_bfd, input_section, (bfd_vma) 0);
1620
1621 return FALSE;
1622 }
1623
1624 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1625 r_symndx, symtab_hdr, sym_hashes,
1626 h, sec, relocation,
1627 unresolved_reloc, warned);
1628 }
1629
1630 if (sec != NULL && elf_discarded_section (sec))
1631 {
1632 /* For relocs against symbols from removed linkonce sections,
1633 or sections discarded by a linker script, we just want the
1634 section contents zeroed. Avoid any special processing. */
1635 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
1636 rel->r_info = 0;
1637 rel->r_addend = 0;
1638 continue;
1639 }
1640
1641 if (info->relocatable)
1642 continue;
1643
1644 /* FIXME: We should use the addend, but the COFF relocations don't. */
1645 r = v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
1646 input_section,
1647 contents, rel->r_offset,
1648 relocation, rel->r_addend,
1649 info, sec, h == NULL);
1650
1651 if (r != bfd_reloc_ok)
1652 {
1653 const char * name;
1654 const char * msg = NULL;
1655
1656 if (h != NULL)
1657 name = h->root.root.string;
1658 else
1659 {
1660 name = (bfd_elf_string_from_elf_section
1661 (input_bfd, symtab_hdr->sh_link, sym->st_name));
1662 if (name == NULL || *name == '\0')
1663 name = bfd_section_name (input_bfd, sec);
1664 }
1665
1666 switch (r)
1667 {
1668 case bfd_reloc_overflow:
1669 if (! ((*info->callbacks->reloc_overflow)
1670 (info, (h ? &h->root : NULL), name, howto->name,
1671 (bfd_vma) 0, input_bfd, input_section,
1672 rel->r_offset)))
1673 return FALSE;
1674 break;
1675
1676 case bfd_reloc_undefined:
1677 if (! ((*info->callbacks->undefined_symbol)
1678 (info, name, input_bfd, input_section,
1679 rel->r_offset, TRUE)))
1680 return FALSE;
1681 break;
1682
1683 case bfd_reloc_outofrange:
1684 msg = _("internal error: out of range error");
1685 goto common_error;
1686
1687 case bfd_reloc_notsupported:
1688 msg = _("internal error: unsupported relocation error");
1689 goto common_error;
1690
1691 case bfd_reloc_dangerous:
1692 msg = _("internal error: dangerous relocation");
1693 goto common_error;
1694
1695 case bfd_reloc_gp_not_found:
1696 msg = _("could not locate special linker symbol __gp");
1697 goto common_error;
1698
1699 case bfd_reloc_ep_not_found:
1700 msg = _("could not locate special linker symbol __ep");
1701 goto common_error;
1702
1703 case bfd_reloc_ctbp_not_found:
1704 msg = _("could not locate special linker symbol __ctbp");
1705 goto common_error;
1706
1707 default:
1708 msg = _("internal error: unknown error");
1709 /* fall through */
1710
1711 common_error:
1712 if (!((*info->callbacks->warning)
1713 (info, msg, name, input_bfd, input_section,
1714 rel->r_offset)))
1715 return FALSE;
1716 break;
1717 }
1718 }
1719 }
1720
1721 return TRUE;
1722 }
1723
1724 static asection *
1725 v850_elf_gc_mark_hook (asection *sec,
1726 struct bfd_link_info *info,
1727 Elf_Internal_Rela *rel,
1728 struct elf_link_hash_entry *h,
1729 Elf_Internal_Sym *sym)
1730 {
1731 if (h != NULL)
1732 switch (ELF32_R_TYPE (rel->r_info))
1733 {
1734 case R_V850_GNU_VTINHERIT:
1735 case R_V850_GNU_VTENTRY:
1736 return NULL;
1737 }
1738
1739 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1740 }
1741
1742 /* Set the right machine number. */
1743
1744 static bfd_boolean
1745 v850_elf_object_p (bfd *abfd)
1746 {
1747 switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
1748 {
1749 default:
1750 case E_V850_ARCH:
1751 bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850);
1752 break;
1753 case E_V850E_ARCH:
1754 bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850e);
1755 break;
1756 case E_V850E1_ARCH:
1757 bfd_default_set_arch_mach (abfd, bfd_arch_v850, bfd_mach_v850e1);
1758 break;
1759 }
1760 return TRUE;
1761 }
1762
1763 /* Store the machine number in the flags field. */
1764
1765 static void
1766 v850_elf_final_write_processing (bfd *abfd,
1767 bfd_boolean linker ATTRIBUTE_UNUSED)
1768 {
1769 unsigned long val;
1770
1771 switch (bfd_get_mach (abfd))
1772 {
1773 default:
1774 case bfd_mach_v850: val = E_V850_ARCH; break;
1775 case bfd_mach_v850e: val = E_V850E_ARCH; break;
1776 case bfd_mach_v850e1: val = E_V850E1_ARCH; break;
1777 }
1778
1779 elf_elfheader (abfd)->e_flags &=~ EF_V850_ARCH;
1780 elf_elfheader (abfd)->e_flags |= val;
1781 }
1782
1783 /* Function to keep V850 specific file flags. */
1784
1785 static bfd_boolean
1786 v850_elf_set_private_flags (bfd *abfd, flagword flags)
1787 {
1788 BFD_ASSERT (!elf_flags_init (abfd)
1789 || elf_elfheader (abfd)->e_flags == flags);
1790
1791 elf_elfheader (abfd)->e_flags = flags;
1792 elf_flags_init (abfd) = TRUE;
1793 return TRUE;
1794 }
1795
1796 /* Merge backend specific data from an object file
1797 to the output object file when linking. */
1798
1799 static bfd_boolean
1800 v850_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
1801 {
1802 flagword out_flags;
1803 flagword in_flags;
1804
1805 if ( bfd_get_flavour (ibfd) != bfd_target_elf_flavour
1806 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
1807 return TRUE;
1808
1809 in_flags = elf_elfheader (ibfd)->e_flags;
1810 out_flags = elf_elfheader (obfd)->e_flags;
1811
1812 if (! elf_flags_init (obfd))
1813 {
1814 /* If the input is the default architecture then do not
1815 bother setting the flags for the output architecture,
1816 instead allow future merges to do this. If no future
1817 merges ever set these flags then they will retain their
1818 unitialised values, which surprise surprise, correspond
1819 to the default values. */
1820 if (bfd_get_arch_info (ibfd)->the_default)
1821 return TRUE;
1822
1823 elf_flags_init (obfd) = TRUE;
1824 elf_elfheader (obfd)->e_flags = in_flags;
1825
1826 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
1827 && bfd_get_arch_info (obfd)->the_default)
1828 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd), bfd_get_mach (ibfd));
1829
1830 return TRUE;
1831 }
1832
1833 /* Check flag compatibility. */
1834 if (in_flags == out_flags)
1835 return TRUE;
1836
1837 if ((in_flags & EF_V850_ARCH) != (out_flags & EF_V850_ARCH)
1838 && (in_flags & EF_V850_ARCH) != E_V850_ARCH)
1839 {
1840 /* Allow v850e1 binaries to be linked with v850e binaries.
1841 Set the output binary to v850e. */
1842 if ((in_flags & EF_V850_ARCH) == E_V850E1_ARCH
1843 && (out_flags & EF_V850_ARCH) == E_V850E_ARCH)
1844 return TRUE;
1845
1846 if ((in_flags & EF_V850_ARCH) == E_V850E_ARCH
1847 && (out_flags & EF_V850_ARCH) == E_V850E1_ARCH)
1848 {
1849 elf_elfheader (obfd)->e_flags =
1850 ((out_flags & ~ EF_V850_ARCH) | E_V850E_ARCH);
1851 return TRUE;
1852 }
1853
1854 _bfd_error_handler (_("%B: Architecture mismatch with previous modules"),
1855 ibfd);
1856 }
1857
1858 return TRUE;
1859 }
1860
1861 /* Display the flags field. */
1862
1863 static bfd_boolean
1864 v850_elf_print_private_bfd_data (bfd *abfd, void * ptr)
1865 {
1866 FILE * file = (FILE *) ptr;
1867
1868 BFD_ASSERT (abfd != NULL && ptr != NULL);
1869
1870 _bfd_elf_print_private_bfd_data (abfd, ptr);
1871
1872 /* xgettext:c-format */
1873 fprintf (file, _("private flags = %lx: "), elf_elfheader (abfd)->e_flags);
1874
1875 switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
1876 {
1877 default:
1878 case E_V850_ARCH: fprintf (file, _("v850 architecture")); break;
1879 case E_V850E_ARCH: fprintf (file, _("v850e architecture")); break;
1880 case E_V850E1_ARCH: fprintf (file, _("v850e1 architecture")); break;
1881 }
1882
1883 fputc ('\n', file);
1884
1885 return TRUE;
1886 }
1887
1888 /* V850 ELF uses four common sections. One is the usual one, and the
1889 others are for (small) objects in one of the special data areas:
1890 small, tiny and zero. All the objects are kept together, and then
1891 referenced via the gp register, the ep register or the r0 register
1892 respectively, which yields smaller, faster assembler code. This
1893 approach is copied from elf32-mips.c. */
1894
1895 static asection v850_elf_scom_section;
1896 static asymbol v850_elf_scom_symbol;
1897 static asymbol * v850_elf_scom_symbol_ptr;
1898 static asection v850_elf_tcom_section;
1899 static asymbol v850_elf_tcom_symbol;
1900 static asymbol * v850_elf_tcom_symbol_ptr;
1901 static asection v850_elf_zcom_section;
1902 static asymbol v850_elf_zcom_symbol;
1903 static asymbol * v850_elf_zcom_symbol_ptr;
1904
1905 /* Given a BFD section, try to locate the
1906 corresponding ELF section index. */
1907
1908 static bfd_boolean
1909 v850_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
1910 asection *sec,
1911 int *retval)
1912 {
1913 if (strcmp (bfd_get_section_name (abfd, sec), ".scommon") == 0)
1914 *retval = SHN_V850_SCOMMON;
1915 else if (strcmp (bfd_get_section_name (abfd, sec), ".tcommon") == 0)
1916 *retval = SHN_V850_TCOMMON;
1917 else if (strcmp (bfd_get_section_name (abfd, sec), ".zcommon") == 0)
1918 *retval = SHN_V850_ZCOMMON;
1919 else
1920 return FALSE;
1921
1922 return TRUE;
1923 }
1924
1925 /* Handle the special V850 section numbers that a symbol may use. */
1926
1927 static void
1928 v850_elf_symbol_processing (bfd *abfd, asymbol *asym)
1929 {
1930 elf_symbol_type * elfsym = (elf_symbol_type *) asym;
1931 unsigned int indx;
1932
1933 indx = elfsym->internal_elf_sym.st_shndx;
1934
1935 /* If the section index is an "ordinary" index, then it may
1936 refer to a v850 specific section created by the assembler.
1937 Check the section's type and change the index it matches.
1938
1939 FIXME: Should we alter the st_shndx field as well ? */
1940
1941 if (indx < elf_numsections (abfd))
1942 switch (elf_elfsections(abfd)[indx]->sh_type)
1943 {
1944 case SHT_V850_SCOMMON:
1945 indx = SHN_V850_SCOMMON;
1946 break;
1947
1948 case SHT_V850_TCOMMON:
1949 indx = SHN_V850_TCOMMON;
1950 break;
1951
1952 case SHT_V850_ZCOMMON:
1953 indx = SHN_V850_ZCOMMON;
1954 break;
1955
1956 default:
1957 break;
1958 }
1959
1960 switch (indx)
1961 {
1962 case SHN_V850_SCOMMON:
1963 if (v850_elf_scom_section.name == NULL)
1964 {
1965 /* Initialize the small common section. */
1966 v850_elf_scom_section.name = ".scommon";
1967 v850_elf_scom_section.flags = SEC_IS_COMMON | SEC_ALLOC | SEC_DATA;
1968 v850_elf_scom_section.output_section = & v850_elf_scom_section;
1969 v850_elf_scom_section.symbol = & v850_elf_scom_symbol;
1970 v850_elf_scom_section.symbol_ptr_ptr = & v850_elf_scom_symbol_ptr;
1971 v850_elf_scom_symbol.name = ".scommon";
1972 v850_elf_scom_symbol.flags = BSF_SECTION_SYM;
1973 v850_elf_scom_symbol.section = & v850_elf_scom_section;
1974 v850_elf_scom_symbol_ptr = & v850_elf_scom_symbol;
1975 }
1976 asym->section = & v850_elf_scom_section;
1977 asym->value = elfsym->internal_elf_sym.st_size;
1978 break;
1979
1980 case SHN_V850_TCOMMON:
1981 if (v850_elf_tcom_section.name == NULL)
1982 {
1983 /* Initialize the tcommon section. */
1984 v850_elf_tcom_section.name = ".tcommon";
1985 v850_elf_tcom_section.flags = SEC_IS_COMMON;
1986 v850_elf_tcom_section.output_section = & v850_elf_tcom_section;
1987 v850_elf_tcom_section.symbol = & v850_elf_tcom_symbol;
1988 v850_elf_tcom_section.symbol_ptr_ptr = & v850_elf_tcom_symbol_ptr;
1989 v850_elf_tcom_symbol.name = ".tcommon";
1990 v850_elf_tcom_symbol.flags = BSF_SECTION_SYM;
1991 v850_elf_tcom_symbol.section = & v850_elf_tcom_section;
1992 v850_elf_tcom_symbol_ptr = & v850_elf_tcom_symbol;
1993 }
1994 asym->section = & v850_elf_tcom_section;
1995 asym->value = elfsym->internal_elf_sym.st_size;
1996 break;
1997
1998 case SHN_V850_ZCOMMON:
1999 if (v850_elf_zcom_section.name == NULL)
2000 {
2001 /* Initialize the zcommon section. */
2002 v850_elf_zcom_section.name = ".zcommon";
2003 v850_elf_zcom_section.flags = SEC_IS_COMMON;
2004 v850_elf_zcom_section.output_section = & v850_elf_zcom_section;
2005 v850_elf_zcom_section.symbol = & v850_elf_zcom_symbol;
2006 v850_elf_zcom_section.symbol_ptr_ptr = & v850_elf_zcom_symbol_ptr;
2007 v850_elf_zcom_symbol.name = ".zcommon";
2008 v850_elf_zcom_symbol.flags = BSF_SECTION_SYM;
2009 v850_elf_zcom_symbol.section = & v850_elf_zcom_section;
2010 v850_elf_zcom_symbol_ptr = & v850_elf_zcom_symbol;
2011 }
2012 asym->section = & v850_elf_zcom_section;
2013 asym->value = elfsym->internal_elf_sym.st_size;
2014 break;
2015 }
2016 }
2017
2018 /* Hook called by the linker routine which adds symbols from an object
2019 file. We must handle the special v850 section numbers here. */
2020
2021 static bfd_boolean
2022 v850_elf_add_symbol_hook (bfd *abfd,
2023 struct bfd_link_info *info ATTRIBUTE_UNUSED,
2024 Elf_Internal_Sym *sym,
2025 const char **namep ATTRIBUTE_UNUSED,
2026 flagword *flagsp ATTRIBUTE_UNUSED,
2027 asection **secp,
2028 bfd_vma *valp)
2029 {
2030 unsigned int indx = sym->st_shndx;
2031
2032 /* If the section index is an "ordinary" index, then it may
2033 refer to a v850 specific section created by the assembler.
2034 Check the section's type and change the index it matches.
2035
2036 FIXME: Should we alter the st_shndx field as well ? */
2037
2038 if (indx < elf_numsections (abfd))
2039 switch (elf_elfsections(abfd)[indx]->sh_type)
2040 {
2041 case SHT_V850_SCOMMON:
2042 indx = SHN_V850_SCOMMON;
2043 break;
2044
2045 case SHT_V850_TCOMMON:
2046 indx = SHN_V850_TCOMMON;
2047 break;
2048
2049 case SHT_V850_ZCOMMON:
2050 indx = SHN_V850_ZCOMMON;
2051 break;
2052
2053 default:
2054 break;
2055 }
2056
2057 switch (indx)
2058 {
2059 case SHN_V850_SCOMMON:
2060 *secp = bfd_make_section_old_way (abfd, ".scommon");
2061 (*secp)->flags |= SEC_IS_COMMON;
2062 *valp = sym->st_size;
2063 break;
2064
2065 case SHN_V850_TCOMMON:
2066 *secp = bfd_make_section_old_way (abfd, ".tcommon");
2067 (*secp)->flags |= SEC_IS_COMMON;
2068 *valp = sym->st_size;
2069 break;
2070
2071 case SHN_V850_ZCOMMON:
2072 *secp = bfd_make_section_old_way (abfd, ".zcommon");
2073 (*secp)->flags |= SEC_IS_COMMON;
2074 *valp = sym->st_size;
2075 break;
2076 }
2077
2078 return TRUE;
2079 }
2080
2081 static bfd_boolean
2082 v850_elf_link_output_symbol_hook (struct bfd_link_info *info ATTRIBUTE_UNUSED,
2083 const char *name ATTRIBUTE_UNUSED,
2084 Elf_Internal_Sym *sym,
2085 asection *input_sec,
2086 struct elf_link_hash_entry *h ATTRIBUTE_UNUSED)
2087 {
2088 /* If we see a common symbol, which implies a relocatable link, then
2089 if a symbol was in a special common section in an input file, mark
2090 it as a special common in the output file. */
2091
2092 if (sym->st_shndx == SHN_COMMON)
2093 {
2094 if (strcmp (input_sec->name, ".scommon") == 0)
2095 sym->st_shndx = SHN_V850_SCOMMON;
2096 else if (strcmp (input_sec->name, ".tcommon") == 0)
2097 sym->st_shndx = SHN_V850_TCOMMON;
2098 else if (strcmp (input_sec->name, ".zcommon") == 0)
2099 sym->st_shndx = SHN_V850_ZCOMMON;
2100 }
2101
2102 return TRUE;
2103 }
2104
2105 static bfd_boolean
2106 v850_elf_section_from_shdr (bfd *abfd,
2107 Elf_Internal_Shdr *hdr,
2108 const char *name,
2109 int shindex)
2110 {
2111 /* There ought to be a place to keep ELF backend specific flags, but
2112 at the moment there isn't one. We just keep track of the
2113 sections by their name, instead. */
2114
2115 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
2116 return FALSE;
2117
2118 switch (hdr->sh_type)
2119 {
2120 case SHT_V850_SCOMMON:
2121 case SHT_V850_TCOMMON:
2122 case SHT_V850_ZCOMMON:
2123 if (! bfd_set_section_flags (abfd, hdr->bfd_section,
2124 (bfd_get_section_flags (abfd,
2125 hdr->bfd_section)
2126 | SEC_IS_COMMON)))
2127 return FALSE;
2128 }
2129
2130 return TRUE;
2131 }
2132
2133 /* Set the correct type for a V850 ELF section. We do this
2134 by the section name, which is a hack, but ought to work. */
2135
2136 static bfd_boolean
2137 v850_elf_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
2138 Elf_Internal_Shdr *hdr,
2139 asection *sec)
2140 {
2141 const char * name;
2142
2143 name = bfd_get_section_name (abfd, sec);
2144
2145 if (strcmp (name, ".scommon") == 0)
2146 hdr->sh_type = SHT_V850_SCOMMON;
2147 else if (strcmp (name, ".tcommon") == 0)
2148 hdr->sh_type = SHT_V850_TCOMMON;
2149 else if (strcmp (name, ".zcommon") == 0)
2150 hdr->sh_type = SHT_V850_ZCOMMON;
2151
2152 return TRUE;
2153 }
2154
2155 /* Delete some bytes from a section while relaxing. */
2156
2157 static bfd_boolean
2158 v850_elf_relax_delete_bytes (bfd *abfd,
2159 asection *sec,
2160 bfd_vma addr,
2161 bfd_vma toaddr,
2162 int count)
2163 {
2164 Elf_Internal_Shdr *symtab_hdr;
2165 Elf32_External_Sym *extsyms;
2166 Elf32_External_Sym *esym;
2167 Elf32_External_Sym *esymend;
2168 int index;
2169 unsigned int sec_shndx;
2170 bfd_byte *contents;
2171 Elf_Internal_Rela *irel;
2172 Elf_Internal_Rela *irelend;
2173 struct elf_link_hash_entry *sym_hash;
2174 Elf_Internal_Shdr *shndx_hdr;
2175 Elf_External_Sym_Shndx *shndx;
2176
2177 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2178 extsyms = (Elf32_External_Sym *) symtab_hdr->contents;
2179
2180 sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
2181
2182 contents = elf_section_data (sec)->this_hdr.contents;
2183
2184 /* The deletion must stop at the next ALIGN reloc for an alignment
2185 power larger than the number of bytes we are deleting. */
2186
2187 /* Actually delete the bytes. */
2188 #if (DEBUG_RELAX & 2)
2189 fprintf (stderr, "relax_delete: contents: sec: %s %p .. %p %x\n",
2190 sec->name, addr, toaddr, count );
2191 #endif
2192 memmove (contents + addr, contents + addr + count,
2193 toaddr - addr - count);
2194 memset (contents + toaddr-count, 0, count);
2195
2196 /* Adjust all the relocs. */
2197 irel = elf_section_data (sec)->relocs;
2198 irelend = irel + sec->reloc_count;
2199 shndx_hdr = &elf_tdata (abfd)->symtab_shndx_hdr;
2200 shndx = (Elf_External_Sym_Shndx *) shndx_hdr->contents;
2201
2202 for (; irel < irelend; irel++)
2203 {
2204 bfd_vma raddr, paddr, symval;
2205 Elf_Internal_Sym isym;
2206
2207 /* Get the new reloc address. */
2208 raddr = irel->r_offset;
2209 if ((raddr >= (addr + count) && raddr < toaddr))
2210 irel->r_offset -= count;
2211
2212 if (raddr >= addr && raddr < addr + count)
2213 {
2214 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
2215 (int) R_V850_NONE);
2216 continue;
2217 }
2218
2219 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN)
2220 continue;
2221
2222 bfd_elf32_swap_symbol_in (abfd,
2223 extsyms + ELF32_R_SYM (irel->r_info),
2224 shndx ? shndx + ELF32_R_SYM (irel->r_info) : NULL,
2225 & isym);
2226
2227 if (isym.st_shndx != sec_shndx)
2228 continue;
2229
2230 /* Get the value of the symbol referred to by the reloc. */
2231 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
2232 {
2233 symval = isym.st_value;
2234 #if (DEBUG_RELAX & 2)
2235 {
2236 char * name = bfd_elf_string_from_elf_section
2237 (abfd, symtab_hdr->sh_link, isym.st_name);
2238 fprintf (stderr,
2239 "relax_delete: local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n",
2240 sec->name, name, isym.st_name,
2241 sec->output_section->vma, sec->output_offset,
2242 isym.st_value, irel->r_addend);
2243 }
2244 #endif
2245 }
2246 else
2247 {
2248 unsigned long indx;
2249 struct elf_link_hash_entry * h;
2250
2251 /* An external symbol. */
2252 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
2253
2254 h = elf_sym_hashes (abfd) [indx];
2255 BFD_ASSERT (h != NULL);
2256
2257 symval = h->root.u.def.value;
2258 #if (DEBUG_RELAX & 2)
2259 fprintf (stderr,
2260 "relax_delete: defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n",
2261 sec->name, h->root.root.string, h->root.u.def.value,
2262 sec->output_section->vma, sec->output_offset, irel->r_addend);
2263 #endif
2264 }
2265
2266 paddr = symval + irel->r_addend;
2267
2268 if ( (symval >= addr + count && symval < toaddr)
2269 && (paddr < addr + count || paddr >= toaddr))
2270 irel->r_addend += count;
2271 else if ( (symval < addr + count || symval >= toaddr)
2272 && (paddr >= addr + count && paddr < toaddr))
2273 irel->r_addend -= count;
2274 }
2275
2276 /* Adjust the local symbols defined in this section. */
2277 esym = extsyms;
2278 esymend = esym + symtab_hdr->sh_info;
2279
2280 for (; esym < esymend; esym++, shndx = (shndx ? shndx + 1 : NULL))
2281 {
2282 Elf_Internal_Sym isym;
2283
2284 bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym);
2285
2286 if (isym.st_shndx == sec_shndx
2287 && isym.st_value >= addr + count
2288 && isym.st_value < toaddr)
2289 {
2290 isym.st_value -= count;
2291
2292 if (isym.st_value + isym.st_size >= toaddr)
2293 isym.st_size += count;
2294
2295 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
2296 }
2297 else if (isym.st_shndx == sec_shndx
2298 && isym.st_value < addr + count)
2299 {
2300 if (isym.st_value+isym.st_size >= addr + count
2301 && isym.st_value+isym.st_size < toaddr)
2302 isym.st_size -= count;
2303
2304 if (isym.st_value >= addr
2305 && isym.st_value < addr + count)
2306 isym.st_value = addr;
2307
2308 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
2309 }
2310 }
2311
2312 /* Now adjust the global symbols defined in this section. */
2313 esym = extsyms + symtab_hdr->sh_info;
2314 esymend = extsyms + (symtab_hdr->sh_size / sizeof (Elf32_External_Sym));
2315
2316 for (index = 0; esym < esymend; esym ++, index ++)
2317 {
2318 Elf_Internal_Sym isym;
2319
2320 bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym);
2321 sym_hash = elf_sym_hashes (abfd) [index];
2322
2323 if (isym.st_shndx == sec_shndx
2324 && ((sym_hash)->root.type == bfd_link_hash_defined
2325 || (sym_hash)->root.type == bfd_link_hash_defweak)
2326 && (sym_hash)->root.u.def.section == sec
2327 && (sym_hash)->root.u.def.value >= addr + count
2328 && (sym_hash)->root.u.def.value < toaddr)
2329 {
2330 if ((sym_hash)->root.u.def.value + isym.st_size >= toaddr)
2331 {
2332 isym.st_size += count;
2333 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
2334 }
2335
2336 (sym_hash)->root.u.def.value -= count;
2337 }
2338 else if (isym.st_shndx == sec_shndx
2339 && ((sym_hash)->root.type == bfd_link_hash_defined
2340 || (sym_hash)->root.type == bfd_link_hash_defweak)
2341 && (sym_hash)->root.u.def.section == sec
2342 && (sym_hash)->root.u.def.value < addr + count)
2343 {
2344 if ((sym_hash)->root.u.def.value+isym.st_size >= addr + count
2345 && (sym_hash)->root.u.def.value+isym.st_size < toaddr)
2346 isym.st_size -= count;
2347
2348 if ((sym_hash)->root.u.def.value >= addr
2349 && (sym_hash)->root.u.def.value < addr + count)
2350 (sym_hash)->root.u.def.value = addr;
2351
2352 bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
2353 }
2354
2355 if (shndx)
2356 ++ shndx;
2357 }
2358
2359 return TRUE;
2360 }
2361
2362 #define NOP_OPCODE (0x0000)
2363 #define MOVHI 0x0640 /* 4byte */
2364 #define MOVHI_MASK 0x07e0
2365 #define MOVHI_R1(insn) ((insn) & 0x1f) /* 4byte */
2366 #define MOVHI_R2(insn) ((insn) >> 11)
2367 #define MOVEA 0x0620 /* 2byte */
2368 #define MOVEA_MASK 0x07e0
2369 #define MOVEA_R1(insn) ((insn) & 0x1f)
2370 #define MOVEA_R2(insn) ((insn) >> 11)
2371 #define JARL_4 0x00040780 /* 4byte */
2372 #define JARL_4_MASK 0xFFFF07FF
2373 #define JARL_R2(insn) (int)(((insn) & (~JARL_4_MASK)) >> 11)
2374 #define ADD_I 0x0240 /* 2byte */
2375 #define ADD_I_MASK 0x07e0
2376 #define ADD_I5(insn) ((((insn) & 0x001f) << 11) >> 11) /* 2byte */
2377 #define ADD_R2(insn) ((insn) >> 11)
2378 #define JMP_R 0x0060 /* 2byte */
2379 #define JMP_R_MASK 0xFFE0
2380 #define JMP_R1(insn) ((insn) & 0x1f)
2381
2382 static bfd_boolean
2383 v850_elf_relax_section (bfd *abfd,
2384 asection *sec,
2385 struct bfd_link_info *link_info,
2386 bfd_boolean *again)
2387 {
2388 Elf_Internal_Shdr *symtab_hdr;
2389 Elf_Internal_Rela *internal_relocs;
2390 Elf_Internal_Rela *irel;
2391 Elf_Internal_Rela *irelend;
2392 Elf_Internal_Rela *irelalign = NULL;
2393 Elf_Internal_Sym *isymbuf = NULL;
2394 bfd_byte *contents = NULL;
2395 bfd_vma addr = 0;
2396 bfd_vma toaddr;
2397 int align_pad_size = 0;
2398 bfd_boolean result = TRUE;
2399
2400 *again = FALSE;
2401
2402 if (link_info->relocatable
2403 || (sec->flags & SEC_RELOC) == 0
2404 || sec->reloc_count == 0)
2405 return TRUE;
2406
2407 symtab_hdr = & elf_tdata (abfd)->symtab_hdr;
2408
2409 internal_relocs = (_bfd_elf_link_read_relocs
2410 (abfd, sec, NULL, NULL, link_info->keep_memory));
2411 if (internal_relocs == NULL)
2412 goto error_return;
2413
2414 irelend = internal_relocs + sec->reloc_count;
2415
2416 while (addr < sec->size)
2417 {
2418 toaddr = sec->size;
2419
2420 for (irel = internal_relocs; irel < irelend; irel ++)
2421 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN
2422 && irel->r_offset > addr
2423 && irel->r_offset < toaddr)
2424 toaddr = irel->r_offset;
2425
2426 #ifdef DEBUG_RELAX
2427 fprintf (stderr, "relax region 0x%x to 0x%x align pad %d\n",
2428 addr, toaddr, align_pad_size);
2429 #endif
2430 if (irelalign)
2431 {
2432 bfd_vma alignto;
2433 bfd_vma alignmoveto;
2434
2435 alignmoveto = BFD_ALIGN (addr - align_pad_size, 1 << irelalign->r_addend);
2436 alignto = BFD_ALIGN (addr, 1 << irelalign->r_addend);
2437
2438 if (alignmoveto < alignto)
2439 {
2440 unsigned int i;
2441
2442 align_pad_size = alignto - alignmoveto;
2443 #ifdef DEBUG_RELAX
2444 fprintf (stderr, "relax move region 0x%x to 0x%x delete size 0x%x\n",
2445 alignmoveto, toaddr, align_pad_size);
2446 #endif
2447 if (!v850_elf_relax_delete_bytes (abfd, sec, alignmoveto,
2448 toaddr, align_pad_size))
2449 goto error_return;
2450
2451 for (i = BFD_ALIGN (toaddr - align_pad_size, 1);
2452 (i + 1) < toaddr; i += 2)
2453 bfd_put_16 (abfd, NOP_OPCODE, contents + i);
2454
2455 addr = alignmoveto;
2456 }
2457 else
2458 align_pad_size = 0;
2459 }
2460
2461 for (irel = internal_relocs; irel < irelend; irel++)
2462 {
2463 bfd_vma laddr;
2464 bfd_vma addend;
2465 bfd_vma symval;
2466 int insn[5];
2467 int no_match = -1;
2468 Elf_Internal_Rela *hi_irelfn;
2469 Elf_Internal_Rela *lo_irelfn;
2470 Elf_Internal_Rela *irelcall;
2471 bfd_signed_vma foff;
2472
2473 if (! (irel->r_offset >= addr && irel->r_offset < toaddr
2474 && (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL
2475 || ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP)))
2476 continue;
2477
2478 #ifdef DEBUG_RELAX
2479 fprintf (stderr, "relax check r_info 0x%x r_offset 0x%x r_addend 0x%x\n",
2480 irel->r_info,
2481 irel->r_offset,
2482 irel->r_addend );
2483 #endif
2484
2485 /* Get the section contents. */
2486 if (contents == NULL)
2487 {
2488 if (elf_section_data (sec)->this_hdr.contents != NULL)
2489 contents = elf_section_data (sec)->this_hdr.contents;
2490 else
2491 {
2492 if (! bfd_malloc_and_get_section (abfd, sec, &contents))
2493 goto error_return;
2494 }
2495 }
2496
2497 /* Read this BFD's local symbols if we haven't done so already. */
2498 if (isymbuf == NULL && symtab_hdr->sh_info != 0)
2499 {
2500 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
2501 if (isymbuf == NULL)
2502 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
2503 symtab_hdr->sh_info, 0,
2504 NULL, NULL, NULL);
2505 if (isymbuf == NULL)
2506 goto error_return;
2507 }
2508
2509 laddr = irel->r_offset;
2510
2511 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL)
2512 {
2513 /* Check code for -mlong-calls output. */
2514 if (laddr + 16 <= (bfd_vma) sec->size)
2515 {
2516 insn[0] = bfd_get_16 (abfd, contents + laddr);
2517 insn[1] = bfd_get_16 (abfd, contents + laddr + 4);
2518 insn[2] = bfd_get_32 (abfd, contents + laddr + 8);
2519 insn[3] = bfd_get_16 (abfd, contents + laddr + 12);
2520 insn[4] = bfd_get_16 (abfd, contents + laddr + 14);
2521
2522 if ((insn[0] & MOVHI_MASK) != MOVHI
2523 || MOVHI_R1 (insn[0]) != 0)
2524 no_match = 0;
2525
2526 if (no_match < 0
2527 && ((insn[1] & MOVEA_MASK) != MOVEA
2528 || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1])))
2529 no_match = 1;
2530
2531 if (no_match < 0
2532 && (insn[2] & JARL_4_MASK) != JARL_4)
2533 no_match = 2;
2534
2535 if (no_match < 0
2536 && ((insn[3] & ADD_I_MASK) != ADD_I
2537 || ADD_I5 (insn[3]) != 4
2538 || JARL_R2 (insn[2]) != ADD_R2 (insn[3])))
2539 no_match = 3;
2540
2541 if (no_match < 0
2542 && ((insn[4] & JMP_R_MASK) != JMP_R
2543 || MOVEA_R2 (insn[1]) != JMP_R1 (insn[4])))
2544 no_match = 4;
2545 }
2546 else
2547 {
2548 ((*_bfd_error_handler)
2549 ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized insns",
2550 bfd_get_filename (abfd), (unsigned long) irel->r_offset));
2551
2552 continue;
2553 }
2554
2555 if (no_match >= 0)
2556 {
2557 ((*_bfd_error_handler)
2558 ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized insn 0x%x",
2559 bfd_get_filename (abfd), (unsigned long) irel->r_offset+no_match, insn[no_match]));
2560
2561 continue;
2562 }
2563
2564 /* Get the reloc for the address from which the register is
2565 being loaded. This reloc will tell us which function is
2566 actually being called. */
2567 for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++)
2568 if (hi_irelfn->r_offset == laddr + 2
2569 && ELF32_R_TYPE (hi_irelfn->r_info)
2570 == (int) R_V850_HI16_S)
2571 break;
2572
2573 for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++)
2574 if (lo_irelfn->r_offset == laddr + 6
2575 && ELF32_R_TYPE (lo_irelfn->r_info)
2576 == (int) R_V850_LO16)
2577 break;
2578
2579 for (irelcall = internal_relocs; irelcall < irelend; irelcall ++)
2580 if (irelcall->r_offset == laddr + 8
2581 && ELF32_R_TYPE (irelcall->r_info)
2582 == (int) R_V850_22_PCREL)
2583 break;
2584
2585 if ( hi_irelfn == irelend
2586 || lo_irelfn == irelend
2587 || irelcall == irelend)
2588 {
2589 ((*_bfd_error_handler)
2590 ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized reloc",
2591 bfd_get_filename (abfd), (unsigned long) irel->r_offset ));
2592
2593 continue;
2594 }
2595
2596 if (ELF32_R_SYM (irelcall->r_info) < symtab_hdr->sh_info)
2597 {
2598 Elf_Internal_Sym * isym;
2599
2600 /* A local symbol. */
2601 isym = isymbuf + ELF32_R_SYM (irelcall->r_info);
2602
2603 symval = isym->st_value;
2604 }
2605 else
2606 {
2607 unsigned long indx;
2608 struct elf_link_hash_entry * h;
2609
2610 /* An external symbol. */
2611 indx = ELF32_R_SYM (irelcall->r_info) - symtab_hdr->sh_info;
2612 h = elf_sym_hashes (abfd)[indx];
2613 BFD_ASSERT (h != NULL);
2614
2615 if ( h->root.type != bfd_link_hash_defined
2616 && h->root.type != bfd_link_hash_defweak)
2617 /* This appears to be a reference to an undefined
2618 symbol. Just ignore it--it will be caught by the
2619 regular reloc processing. */
2620 continue;
2621
2622 symval = h->root.u.def.value;
2623 }
2624
2625 if (symval + irelcall->r_addend != irelcall->r_offset + 4)
2626 {
2627 ((*_bfd_error_handler)
2628 ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized reloc 0x%lx",
2629 bfd_get_filename (abfd), (unsigned long) irel->r_offset, irelcall->r_offset ));
2630
2631 continue;
2632 }
2633
2634 /* Get the value of the symbol referred to by the reloc. */
2635 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
2636 {
2637 Elf_Internal_Sym *isym;
2638 asection *sym_sec;
2639
2640 /* A local symbol. */
2641 isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info);
2642
2643 if (isym->st_shndx == SHN_UNDEF)
2644 sym_sec = bfd_und_section_ptr;
2645 else if (isym->st_shndx == SHN_ABS)
2646 sym_sec = bfd_abs_section_ptr;
2647 else if (isym->st_shndx == SHN_COMMON)
2648 sym_sec = bfd_com_section_ptr;
2649 else
2650 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
2651 symval = (isym->st_value
2652 + sym_sec->output_section->vma
2653 + sym_sec->output_offset);
2654 }
2655 else
2656 {
2657 unsigned long indx;
2658 struct elf_link_hash_entry *h;
2659
2660 /* An external symbol. */
2661 indx = ELF32_R_SYM (hi_irelfn->r_info) - symtab_hdr->sh_info;
2662 h = elf_sym_hashes (abfd)[indx];
2663 BFD_ASSERT (h != NULL);
2664
2665 if ( h->root.type != bfd_link_hash_defined
2666 && h->root.type != bfd_link_hash_defweak)
2667 /* This appears to be a reference to an undefined
2668 symbol. Just ignore it--it will be caught by the
2669 regular reloc processing. */
2670 continue;
2671
2672 symval = (h->root.u.def.value
2673 + h->root.u.def.section->output_section->vma
2674 + h->root.u.def.section->output_offset);
2675 }
2676
2677 addend = irel->r_addend;
2678
2679 foff = (symval + addend
2680 - (irel->r_offset
2681 + sec->output_section->vma
2682 + sec->output_offset
2683 + 4));
2684 #ifdef DEBUG_RELAX
2685 fprintf (stderr, "relax longcall r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n",
2686 irel->r_offset,
2687 (irel->r_offset
2688 + sec->output_section->vma
2689 + sec->output_offset),
2690 symval, addend, foff);
2691 #endif
2692
2693 if (foff < -0x100000 || foff >= 0x100000)
2694 /* After all that work, we can't shorten this function call. */
2695 continue;
2696
2697 /* For simplicity of coding, we are going to modify the section
2698 contents, the section relocs, and the BFD symbol table. We
2699 must tell the rest of the code not to free up this
2700 information. It would be possible to instead create a table
2701 of changes which have to be made, as is done in coff-mips.c;
2702 that would be more work, but would require less memory when
2703 the linker is run. */
2704 elf_section_data (sec)->relocs = internal_relocs;
2705 elf_section_data (sec)->this_hdr.contents = contents;
2706 symtab_hdr->contents = (bfd_byte *) isymbuf;
2707
2708 /* Replace the long call with a jarl. */
2709 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_22_PCREL);
2710
2711 addend = 0;
2712
2713 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
2714 /* If this needs to be changed because of future relaxing,
2715 it will be handled here like other internal IND12W
2716 relocs. */
2717 bfd_put_32 (abfd,
2718 0x00000780 | (JARL_R2 (insn[2])<<11) | ((addend << 16) & 0xffff) | ((addend >> 16) & 0xf),
2719 contents + irel->r_offset);
2720 else
2721 /* We can't fully resolve this yet, because the external
2722 symbol value may be changed by future relaxing.
2723 We let the final link phase handle it. */
2724 bfd_put_32 (abfd, 0x00000780 | (JARL_R2 (insn[2])<<11),
2725 contents + irel->r_offset);
2726
2727 hi_irelfn->r_info =
2728 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
2729 lo_irelfn->r_info =
2730 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
2731 irelcall->r_info =
2732 ELF32_R_INFO (ELF32_R_SYM (irelcall->r_info), R_V850_NONE);
2733
2734 if (! v850_elf_relax_delete_bytes (abfd, sec,
2735 irel->r_offset + 4, toaddr, 12))
2736 goto error_return;
2737
2738 align_pad_size += 12;
2739 }
2740 else if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP)
2741 {
2742 /* Check code for -mlong-jumps output. */
2743 if (laddr + 10 <= (bfd_vma) sec->size)
2744 {
2745 insn[0] = bfd_get_16 (abfd, contents + laddr);
2746 insn[1] = bfd_get_16 (abfd, contents + laddr + 4);
2747 insn[2] = bfd_get_16 (abfd, contents + laddr + 8);
2748
2749 if ((insn[0] & MOVHI_MASK) != MOVHI
2750 || MOVHI_R1 (insn[0]) != 0)
2751 no_match = 0;
2752
2753 if (no_match < 0
2754 && ((insn[1] & MOVEA_MASK) != MOVEA
2755 || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1])))
2756 no_match = 1;
2757
2758 if (no_match < 0
2759 && ((insn[2] & JMP_R_MASK) != JMP_R
2760 || MOVEA_R2 (insn[1]) != JMP_R1 (insn[2])))
2761 no_match = 4;
2762 }
2763 else
2764 {
2765 ((*_bfd_error_handler)
2766 ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized insns",
2767 bfd_get_filename (abfd), (unsigned long) irel->r_offset));
2768
2769 continue;
2770 }
2771
2772 if (no_match >= 0)
2773 {
2774 ((*_bfd_error_handler)
2775 ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized insn 0x%x",
2776 bfd_get_filename (abfd), (unsigned long) irel->r_offset+no_match, insn[no_match]));
2777
2778 continue;
2779 }
2780
2781 /* Get the reloc for the address from which the register is
2782 being loaded. This reloc will tell us which function is
2783 actually being called. */
2784 for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++)
2785 if (hi_irelfn->r_offset == laddr + 2
2786 && ELF32_R_TYPE (hi_irelfn->r_info) == (int) R_V850_HI16_S)
2787 break;
2788
2789 for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++)
2790 if (lo_irelfn->r_offset == laddr + 6
2791 && ELF32_R_TYPE (lo_irelfn->r_info) == (int) R_V850_LO16)
2792 break;
2793
2794 if ( hi_irelfn == irelend
2795 || lo_irelfn == irelend)
2796 {
2797 ((*_bfd_error_handler)
2798 ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized reloc",
2799 bfd_get_filename (abfd), (unsigned long) irel->r_offset ));
2800
2801 continue;
2802 }
2803
2804 /* Get the value of the symbol referred to by the reloc. */
2805 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
2806 {
2807 Elf_Internal_Sym * isym;
2808 asection * sym_sec;
2809
2810 /* A local symbol. */
2811 isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info);
2812
2813 if (isym->st_shndx == SHN_UNDEF)
2814 sym_sec = bfd_und_section_ptr;
2815 else if (isym->st_shndx == SHN_ABS)
2816 sym_sec = bfd_abs_section_ptr;
2817 else if (isym->st_shndx == SHN_COMMON)
2818 sym_sec = bfd_com_section_ptr;
2819 else
2820 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
2821 symval = (isym->st_value
2822 + sym_sec->output_section->vma
2823 + sym_sec->output_offset);
2824 #ifdef DEBUG_RELAX
2825 {
2826 char * name = bfd_elf_string_from_elf_section
2827 (abfd, symtab_hdr->sh_link, isym->st_name);
2828
2829 fprintf (stderr, "relax long jump local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n",
2830 sym_sec->name, name, isym->st_name,
2831 sym_sec->output_section->vma,
2832 sym_sec->output_offset,
2833 isym->st_value, irel->r_addend);
2834 }
2835 #endif
2836 }
2837 else
2838 {
2839 unsigned long indx;
2840 struct elf_link_hash_entry * h;
2841
2842 /* An external symbol. */
2843 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
2844 h = elf_sym_hashes (abfd)[indx];
2845 BFD_ASSERT (h != NULL);
2846
2847 if ( h->root.type != bfd_link_hash_defined
2848 && h->root.type != bfd_link_hash_defweak)
2849 /* This appears to be a reference to an undefined
2850 symbol. Just ignore it--it will be caught by the
2851 regular reloc processing. */
2852 continue;
2853
2854 symval = (h->root.u.def.value
2855 + h->root.u.def.section->output_section->vma
2856 + h->root.u.def.section->output_offset);
2857 #ifdef DEBUG_RELAX
2858 fprintf (stderr,
2859 "relax longjump defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n",
2860 sec->name, h->root.root.string, h->root.u.def.value,
2861 sec->output_section->vma, sec->output_offset, irel->r_addend);
2862 #endif
2863 }
2864
2865 addend = irel->r_addend;
2866
2867 foff = (symval + addend
2868 - (irel->r_offset
2869 + sec->output_section->vma
2870 + sec->output_offset
2871 + 4));
2872 #ifdef DEBUG_RELAX
2873 fprintf (stderr, "relax longjump r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n",
2874 irel->r_offset,
2875 (irel->r_offset
2876 + sec->output_section->vma
2877 + sec->output_offset),
2878 symval, addend, foff);
2879 #endif
2880 if (foff < -0x100000 || foff >= 0x100000)
2881 /* After all that work, we can't shorten this function call. */
2882 continue;
2883
2884 /* For simplicity of coding, we are going to modify the section
2885 contents, the section relocs, and the BFD symbol table. We
2886 must tell the rest of the code not to free up this
2887 information. It would be possible to instead create a table
2888 of changes which have to be made, as is done in coff-mips.c;
2889 that would be more work, but would require less memory when
2890 the linker is run. */
2891 elf_section_data (sec)->relocs = internal_relocs;
2892 elf_section_data (sec)->this_hdr.contents = contents;
2893 symtab_hdr->contents = (bfd_byte *) isymbuf;
2894
2895 if (foff < -0x100 || foff >= 0x100)
2896 {
2897 /* Replace the long jump with a jr. */
2898
2899 irel->r_info =
2900 ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_22_PCREL);
2901
2902 irel->r_addend = addend;
2903 addend = 0;
2904
2905 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
2906 /* If this needs to be changed because of future relaxing,
2907 it will be handled here like other internal IND12W
2908 relocs. */
2909 bfd_put_32 (abfd,
2910 0x00000780 | ((addend << 15) & 0xffff0000) | ((addend >> 17) & 0xf),
2911 contents + irel->r_offset);
2912 else
2913 /* We can't fully resolve this yet, because the external
2914 symbol value may be changed by future relaxing.
2915 We let the final link phase handle it. */
2916 bfd_put_32 (abfd, 0x00000780, contents + irel->r_offset);
2917
2918 hi_irelfn->r_info =
2919 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
2920 lo_irelfn->r_info =
2921 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
2922 if (!v850_elf_relax_delete_bytes (abfd, sec,
2923 irel->r_offset + 4, toaddr, 6))
2924 goto error_return;
2925
2926 align_pad_size += 6;
2927 }
2928 else
2929 {
2930 /* Replace the long jump with a br. */
2931
2932 irel->r_info =
2933 ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_9_PCREL);
2934
2935 irel->r_addend = addend;
2936 addend = 0;
2937
2938 if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
2939 /* If this needs to be changed because of future relaxing,
2940 it will be handled here like other internal IND12W
2941 relocs. */
2942 bfd_put_16 (abfd,
2943 0x0585 | ((addend << 10) & 0xf800) | ((addend << 3) & 0x0070),
2944 contents + irel->r_offset);
2945 else
2946 /* We can't fully resolve this yet, because the external
2947 symbol value may be changed by future relaxing.
2948 We let the final link phase handle it. */
2949 bfd_put_16 (abfd, 0x0585, contents + irel->r_offset);
2950
2951 hi_irelfn->r_info =
2952 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
2953 lo_irelfn->r_info =
2954 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
2955 if (!v850_elf_relax_delete_bytes (abfd, sec,
2956 irel->r_offset + 2, toaddr, 8))
2957 goto error_return;
2958
2959 align_pad_size += 8;
2960 }
2961 }
2962 }
2963
2964 irelalign = NULL;
2965 for (irel = internal_relocs; irel < irelend; irel++)
2966 {
2967 if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN
2968 && irel->r_offset == toaddr)
2969 {
2970 irel->r_offset -= align_pad_size;
2971
2972 if (irelalign == NULL || irelalign->r_addend > irel->r_addend)
2973 irelalign = irel;
2974 }
2975 }
2976
2977 addr = toaddr;
2978 }
2979
2980 if (!irelalign)
2981 {
2982 #ifdef DEBUG_RELAX
2983 fprintf (stderr, "relax pad %d shorten %d -> %d\n",
2984 align_pad_size,
2985 sec->size,
2986 sec->size - align_pad_size);
2987 #endif
2988 sec->size -= align_pad_size;
2989 }
2990
2991 finish:
2992 if (internal_relocs != NULL
2993 && elf_section_data (sec)->relocs != internal_relocs)
2994 free (internal_relocs);
2995
2996 if (contents != NULL
2997 && elf_section_data (sec)->this_hdr.contents != (unsigned char *) contents)
2998 free (contents);
2999
3000 if (isymbuf != NULL
3001 && symtab_hdr->contents != (bfd_byte *) isymbuf)
3002 free (isymbuf);
3003
3004 return result;
3005
3006 error_return:
3007 result = FALSE;
3008 goto finish;
3009 }
3010
3011 static const struct bfd_elf_special_section v850_elf_special_sections[] =
3012 {
3013 { STRING_COMMA_LEN (".call_table_data"), 0, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE) },
3014 { STRING_COMMA_LEN (".call_table_text"), 0, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE
3015 + SHF_EXECINSTR) },
3016 { STRING_COMMA_LEN (".rosdata"), -2, SHT_PROGBITS, (SHF_ALLOC
3017 + SHF_V850_GPREL) },
3018 { STRING_COMMA_LEN (".rozdata"), -2, SHT_PROGBITS, (SHF_ALLOC
3019 + SHF_V850_R0REL) },
3020 { STRING_COMMA_LEN (".sbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE
3021 + SHF_V850_GPREL) },
3022 { STRING_COMMA_LEN (".scommon"), -2, SHT_V850_SCOMMON, (SHF_ALLOC + SHF_WRITE
3023 + SHF_V850_GPREL) },
3024 { STRING_COMMA_LEN (".sdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE
3025 + SHF_V850_GPREL) },
3026 { STRING_COMMA_LEN (".tbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE
3027 + SHF_V850_EPREL) },
3028 { STRING_COMMA_LEN (".tcommon"), -2, SHT_V850_TCOMMON, (SHF_ALLOC + SHF_WRITE
3029 + SHF_V850_R0REL) },
3030 { STRING_COMMA_LEN (".tdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE
3031 + SHF_V850_EPREL) },
3032 { STRING_COMMA_LEN (".zbss"), -2, SHT_NOBITS, (SHF_ALLOC + SHF_WRITE
3033 + SHF_V850_R0REL) },
3034 { STRING_COMMA_LEN (".zcommon"), -2, SHT_V850_ZCOMMON, (SHF_ALLOC + SHF_WRITE
3035 + SHF_V850_R0REL) },
3036 { STRING_COMMA_LEN (".zdata"), -2, SHT_PROGBITS, (SHF_ALLOC + SHF_WRITE
3037 + SHF_V850_R0REL) },
3038 { NULL, 0, 0, 0, 0 }
3039 };
3040 \f
3041 #define TARGET_LITTLE_SYM bfd_elf32_v850_vec
3042 #define TARGET_LITTLE_NAME "elf32-v850"
3043 #define ELF_ARCH bfd_arch_v850
3044 #define ELF_MACHINE_CODE EM_V850
3045 #define ELF_MACHINE_ALT1 EM_CYGNUS_V850
3046 #define ELF_MACHINE_ALT2 EM_V800 /* This is the value used by the GreenHills toolchain. */
3047 #define ELF_MAXPAGESIZE 0x1000
3048
3049 #define elf_info_to_howto v850_elf_info_to_howto_rela
3050 #define elf_info_to_howto_rel v850_elf_info_to_howto_rel
3051
3052 #define elf_backend_check_relocs v850_elf_check_relocs
3053 #define elf_backend_relocate_section v850_elf_relocate_section
3054 #define elf_backend_object_p v850_elf_object_p
3055 #define elf_backend_final_write_processing v850_elf_final_write_processing
3056 #define elf_backend_section_from_bfd_section v850_elf_section_from_bfd_section
3057 #define elf_backend_symbol_processing v850_elf_symbol_processing
3058 #define elf_backend_add_symbol_hook v850_elf_add_symbol_hook
3059 #define elf_backend_link_output_symbol_hook v850_elf_link_output_symbol_hook
3060 #define elf_backend_section_from_shdr v850_elf_section_from_shdr
3061 #define elf_backend_fake_sections v850_elf_fake_sections
3062 #define elf_backend_gc_mark_hook v850_elf_gc_mark_hook
3063 #define elf_backend_special_sections v850_elf_special_sections
3064
3065 #define elf_backend_can_gc_sections 1
3066 #define elf_backend_rela_normal 1
3067
3068 #define bfd_elf32_bfd_is_local_label_name v850_elf_is_local_label_name
3069 #define bfd_elf32_bfd_reloc_type_lookup v850_elf_reloc_type_lookup
3070 #define bfd_elf32_bfd_merge_private_bfd_data v850_elf_merge_private_bfd_data
3071 #define bfd_elf32_bfd_set_private_flags v850_elf_set_private_flags
3072 #define bfd_elf32_bfd_print_private_bfd_data v850_elf_print_private_bfd_data
3073 #define bfd_elf32_bfd_relax_section v850_elf_relax_section
3074
3075 #define elf_symbol_leading_char '_'
3076
3077 #include "elf32-target.h"
A mirror of the official binutils-gdb repository