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