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