PR ld/15323
[external/binutils.git] / bfd / elf32-v850.c
1 /* V850-specific support for 32-bit ELF
2    Copyright 1996-2013 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 (info->relocatable)
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, "reloc number %d not recognised\n", 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          2,                             /* Size (0 = byte, 1 = short, 2 = long).  */
899          32,                            /* Bitsize.  */
900          FALSE,                         /* PC_relative.  */
901          0,                             /* Bitpos.  */
902          complain_overflow_bitfield,    /* 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   BFD_ASSERT (r_type < (unsigned int) R_V850_max);
1900   cache_ptr->howto = &v850_elf_howto_table[r_type];
1901 }
1902
1903 /* Set the howto pointer for a V850 ELF reloc (type RELA).  */
1904
1905 static void
1906 v850_elf_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
1907                              arelent * cache_ptr,
1908                              Elf_Internal_Rela *dst)
1909 {
1910   unsigned int r_type;
1911
1912   r_type = ELF32_R_TYPE (dst->r_info);
1913   BFD_ASSERT (r_type < (unsigned int) R_V850_max);
1914   cache_ptr->howto = &v850_elf_howto_table[r_type];
1915 }
1916 \f
1917 static bfd_boolean
1918 v850_elf_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, const char *name)
1919 {
1920   return (   (name[0] == '.' && (name[1] == 'L' || name[1] == '.'))
1921           || (name[0] == '_' &&  name[1] == '.' && name[2] == 'L' && name[3] == '_'));
1922 }
1923 \f
1924 /* We overload some of the bfd_reloc error codes for own purposes.  */
1925 #define bfd_reloc_gp_not_found          bfd_reloc_other
1926 #define bfd_reloc_ep_not_found          bfd_reloc_continue
1927 #define bfd_reloc_ctbp_not_found        (bfd_reloc_dangerous + 1)
1928
1929 /* Perform a relocation as part of a final link.  */
1930
1931 static bfd_reloc_status_type
1932 v850_elf_final_link_relocate (reloc_howto_type *howto,
1933                               bfd *input_bfd,
1934                               bfd *output_bfd ATTRIBUTE_UNUSED,
1935                               asection *input_section,
1936                               bfd_byte *contents,
1937                               bfd_vma offset,
1938                               bfd_vma value,
1939                               bfd_vma addend,
1940                               struct bfd_link_info *info,
1941                               asection *sym_sec,
1942                               int is_local ATTRIBUTE_UNUSED)
1943 {
1944   unsigned int r_type = howto->type;
1945   bfd_byte *hit_data = contents + offset;
1946
1947   /* Adjust the value according to the relocation.  */
1948   switch (r_type)
1949     {
1950     case R_V850_PC9:
1951     case R_V850_9_PCREL:
1952       value -= (input_section->output_section->vma
1953                 + input_section->output_offset);
1954       value -= offset;
1955       break;
1956
1957     case R_V850_PC16U:
1958     case R_V850_16_PCREL:
1959       value -= (input_section->output_section->vma
1960                 + input_section->output_offset
1961                 + offset);
1962
1963       /* If the sign extension will corrupt the value then we have overflowed.  */
1964       if ((value & 0xffff0000) != 0xffff0000)
1965         return bfd_reloc_overflow;
1966
1967       break;
1968
1969     case R_V850_PC17:
1970     case R_V850_17_PCREL:
1971       value -= (input_section->output_section->vma
1972                 + input_section->output_offset
1973                 + offset);
1974
1975       /* If the sign extension will corrupt the value then we have overflowed.  */
1976       if (((value & 0xffff0000) != 0x0) && ((value & 0xffff0000) != 0xffff0000))
1977         return bfd_reloc_overflow;
1978
1979       value = SEXT17 (value);
1980       break;
1981
1982     case R_V850_PCR22:
1983     case R_V850_22_PCREL:
1984       value -= (input_section->output_section->vma
1985                 + input_section->output_offset
1986                 + offset);
1987
1988       /* If the sign extension will corrupt the value then we have overflowed.  */
1989       if (((value & 0xffe00000) != 0x0) && ((value & 0xffe00000) != 0xffe00000))
1990         return bfd_reloc_overflow;
1991
1992       /* Only the bottom 22 bits of the PC are valid.  */
1993       value = SEXT22 (value);
1994       break;
1995
1996     case R_V850_PC32:
1997     case R_V850_32_PCREL:
1998       value -= (input_section->output_section->vma
1999                 + input_section->output_offset
2000                 + offset);
2001       break;
2002
2003     case R_V850_32_ABS:
2004     case R_V850_23:
2005     case R_V850_HI16_S:
2006     case R_V850_HI16:
2007     case R_V850_LO16:
2008     case R_V850_LO16_S1:
2009     case R_V850_LO16_SPLIT_OFFSET:
2010     case R_V850_16:
2011     case R_V850_ABS32:
2012     case R_V850_8:
2013     case R_V810_BYTE:
2014     case R_V810_HWORD:
2015     case R_V810_WORD:
2016     case R_V810_WLO:
2017     case R_V810_WHI:
2018     case R_V810_WHI1:
2019     case R_V810_WLO_1:
2020     case R_V850_WLO23:
2021     case R_V850_BLO:
2022       break;
2023
2024     case R_V850_ZDA_15_16_OFFSET:
2025     case R_V850_ZDA_16_16_OFFSET:
2026     case R_V850_ZDA_16_16_SPLIT_OFFSET:
2027       if (sym_sec == NULL)
2028         return bfd_reloc_undefined;
2029
2030       value -= sym_sec->output_section->vma;
2031       break;
2032
2033     case R_V850_SDA_15_16_OFFSET:
2034     case R_V850_SDA_16_16_OFFSET:
2035     case R_V850_SDA_16_16_SPLIT_OFFSET:
2036     case R_V810_GPWLO_1:
2037       {
2038         unsigned long                gp;
2039         struct bfd_link_hash_entry * h;
2040
2041         if (sym_sec == NULL)
2042           return bfd_reloc_undefined;
2043
2044         /* Get the value of __gp.  */
2045         h = bfd_link_hash_lookup (info->hash, "__gp", FALSE, FALSE, TRUE);
2046         if (h == NULL
2047             || h->type != bfd_link_hash_defined)
2048           return bfd_reloc_gp_not_found;
2049
2050         gp = (h->u.def.value
2051               + h->u.def.section->output_section->vma
2052               + h->u.def.section->output_offset);
2053
2054         value -= sym_sec->output_section->vma;
2055         value -= (gp - sym_sec->output_section->vma);
2056       }
2057     break;
2058
2059     case R_V850_TDA_4_4_OFFSET:
2060     case R_V850_TDA_4_5_OFFSET:
2061     case R_V850_TDA_7_7_OFFSET:
2062     case R_V850_TDA_7_8_OFFSET:
2063     case R_V850_TDA_6_8_OFFSET:
2064     case R_V850_TDA_16_16_OFFSET:
2065       {
2066         unsigned long                ep;
2067         struct bfd_link_hash_entry * h;
2068
2069         /* Get the value of __ep.  */
2070         h = bfd_link_hash_lookup (info->hash, "__ep", FALSE, FALSE, TRUE);
2071         if (h == NULL
2072             || h->type != bfd_link_hash_defined)
2073           return bfd_reloc_ep_not_found;
2074
2075         ep = (h->u.def.value
2076               + h->u.def.section->output_section->vma
2077               + h->u.def.section->output_offset);
2078
2079         value -= ep;
2080       }
2081     break;
2082
2083     case R_V850_CALLT_6_7_OFFSET:
2084       {
2085         unsigned long                ctbp;
2086         struct bfd_link_hash_entry * h;
2087
2088         /* Get the value of __ctbp.  */
2089         h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE);
2090         if (h == NULL
2091             || h->type != bfd_link_hash_defined)
2092           return bfd_reloc_ctbp_not_found;
2093
2094         ctbp = (h->u.def.value
2095               + h->u.def.section->output_section->vma
2096               + h->u.def.section->output_offset);
2097         value -= ctbp;
2098       }
2099     break;
2100
2101     case R_V850_CALLT_15_16_OFFSET:
2102     case R_V850_CALLT_16_16_OFFSET:
2103       {
2104         unsigned long                ctbp;
2105         struct bfd_link_hash_entry * h;
2106
2107         if (sym_sec == NULL)
2108           return bfd_reloc_undefined;
2109
2110         /* Get the value of __ctbp.  */
2111         h = bfd_link_hash_lookup (info->hash, "__ctbp", FALSE, FALSE, TRUE);
2112         if (h == NULL
2113             || h->type != bfd_link_hash_defined)
2114           return bfd_reloc_ctbp_not_found;
2115
2116         ctbp = (h->u.def.value
2117               + h->u.def.section->output_section->vma
2118               + h->u.def.section->output_offset);
2119
2120         value -= sym_sec->output_section->vma;
2121         value -= (ctbp - sym_sec->output_section->vma);
2122       }
2123     break;
2124
2125     case R_V850_NONE:
2126     case R_V810_NONE:
2127     case R_V850_GNU_VTINHERIT:
2128     case R_V850_GNU_VTENTRY:
2129     case R_V850_LONGCALL:
2130     case R_V850_LONGJUMP:
2131     case R_V850_ALIGN:
2132       return bfd_reloc_ok;
2133
2134     default:
2135 #ifdef DEBUG
2136       fprintf (stderr, "reloc number %d not recognised\n", r_type);
2137 #endif
2138       return bfd_reloc_notsupported;
2139     }
2140
2141   /* Perform the relocation.  */
2142   return v850_elf_perform_relocation (input_bfd, r_type, value + addend, hit_data);
2143 }
2144 \f
2145 /* Relocate an V850 ELF section.  */
2146
2147 static bfd_boolean
2148 v850_elf_relocate_section (bfd *output_bfd,
2149                            struct bfd_link_info *info,
2150                            bfd *input_bfd,
2151                            asection *input_section,
2152                            bfd_byte *contents,
2153                            Elf_Internal_Rela *relocs,
2154                            Elf_Internal_Sym *local_syms,
2155                            asection **local_sections)
2156 {
2157   Elf_Internal_Shdr *symtab_hdr;
2158   struct elf_link_hash_entry **sym_hashes;
2159   Elf_Internal_Rela *rel;
2160   Elf_Internal_Rela *relend;
2161
2162   symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
2163   sym_hashes = elf_sym_hashes (input_bfd);
2164
2165   /* Reset the list of remembered HI16S relocs to empty.  */
2166   free_hi16s     = previous_hi16s;
2167   previous_hi16s = NULL;
2168   hi16s_counter  = 0;
2169
2170   rel    = relocs;
2171   relend = relocs + input_section->reloc_count;
2172   for (; rel < relend; rel++)
2173     {
2174       unsigned int r_type;
2175       reloc_howto_type *howto;
2176       unsigned long r_symndx;
2177       Elf_Internal_Sym *sym;
2178       asection *sec;
2179       struct elf_link_hash_entry *h;
2180       bfd_vma relocation;
2181       bfd_reloc_status_type r;
2182
2183       r_symndx = ELF32_R_SYM (rel->r_info);
2184       r_type   = ELF32_R_TYPE (rel->r_info);
2185
2186       if (r_type == R_V850_GNU_VTENTRY
2187           || r_type == R_V850_GNU_VTINHERIT)
2188         continue;
2189
2190       if (bfd_get_arch (input_bfd) == bfd_arch_v850_rh850)
2191         howto = v800_elf_howto_table + (r_type - R_V810_NONE);
2192       else
2193         howto = v850_elf_howto_table + r_type;
2194
2195       BFD_ASSERT (r_type == howto->type);
2196
2197       h = NULL;
2198       sym = NULL;
2199       sec = NULL;
2200       if (r_symndx < symtab_hdr->sh_info)
2201         {
2202           sym = local_syms + r_symndx;
2203           sec = local_sections[r_symndx];
2204           relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
2205         }
2206       else
2207         {
2208           bfd_boolean unresolved_reloc, warned;
2209
2210           /* Note - this check is delayed until now as it is possible and
2211              valid to have a file without any symbols but with relocs that
2212              can be processed.  */
2213           if (sym_hashes == NULL)
2214             {
2215               info->callbacks->warning
2216                 (info, "no hash table available",
2217                  NULL, input_bfd, input_section, (bfd_vma) 0);
2218
2219               return FALSE;
2220             }
2221
2222           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2223                                    r_symndx, symtab_hdr, sym_hashes,
2224                                    h, sec, relocation,
2225                                    unresolved_reloc, warned);
2226         }
2227
2228       if (sec != NULL && discarded_section (sec))
2229         RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
2230                                          rel, 1, relend, howto, 0, contents);
2231
2232       if (info->relocatable)
2233         continue;
2234
2235       /* FIXME: We should use the addend, but the COFF relocations don't.  */
2236       r = v850_elf_final_link_relocate (howto, input_bfd, output_bfd,
2237                                         input_section,
2238                                         contents, rel->r_offset,
2239                                         relocation, rel->r_addend,
2240                                         info, sec, h == NULL);
2241
2242       if (r != bfd_reloc_ok)
2243         {
2244           const char * name;
2245           const char * msg = NULL;
2246
2247           if (h != NULL)
2248             name = h->root.root.string;
2249           else
2250             {
2251               name = (bfd_elf_string_from_elf_section
2252                       (input_bfd, symtab_hdr->sh_link, sym->st_name));
2253               if (name == NULL || *name == '\0')
2254                 name = bfd_section_name (input_bfd, sec);
2255             }
2256
2257           switch ((int) r)
2258             {
2259             case bfd_reloc_overflow:
2260               if (! ((*info->callbacks->reloc_overflow)
2261                      (info, (h ? &h->root : NULL), name, howto->name,
2262                       (bfd_vma) 0, input_bfd, input_section,
2263                       rel->r_offset)))
2264                 return FALSE;
2265               break;
2266
2267             case bfd_reloc_undefined:
2268               if (! ((*info->callbacks->undefined_symbol)
2269                      (info, name, input_bfd, input_section,
2270                       rel->r_offset, TRUE)))
2271                 return FALSE;
2272               break;
2273
2274             case bfd_reloc_outofrange:
2275               msg = _("internal error: out of range error");
2276               goto common_error;
2277
2278             case bfd_reloc_notsupported:
2279               msg = _("internal error: unsupported relocation error");
2280               goto common_error;
2281
2282             case bfd_reloc_dangerous:
2283               msg = _("internal error: dangerous relocation");
2284               goto common_error;
2285
2286             case bfd_reloc_gp_not_found:
2287               msg = _("could not locate special linker symbol __gp");
2288               goto common_error;
2289
2290             case bfd_reloc_ep_not_found:
2291               msg = _("could not locate special linker symbol __ep");
2292               goto common_error;
2293
2294             case bfd_reloc_ctbp_not_found:
2295               msg = _("could not locate special linker symbol __ctbp");
2296               goto common_error;
2297
2298             default:
2299               msg = _("internal error: unknown error");
2300               /* fall through */
2301
2302             common_error:
2303               if (!((*info->callbacks->warning)
2304                     (info, msg, name, input_bfd, input_section,
2305                      rel->r_offset)))
2306                 return FALSE;
2307               break;
2308             }
2309         }
2310     }
2311
2312   return TRUE;
2313 }
2314
2315 static asection *
2316 v850_elf_gc_mark_hook (asection *sec,
2317                        struct bfd_link_info *info,
2318                        Elf_Internal_Rela *rel,
2319                        struct elf_link_hash_entry *h,
2320                        Elf_Internal_Sym *sym)
2321 {
2322   if (h != NULL)
2323     switch (ELF32_R_TYPE (rel->r_info))
2324       {
2325       case R_V850_GNU_VTINHERIT:
2326       case R_V850_GNU_VTENTRY:
2327         return NULL;
2328       }
2329
2330   return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
2331 }
2332
2333 /* Set the right machine number and architecture.  */
2334
2335 static bfd_boolean
2336 v850_elf_object_p (bfd *abfd)
2337 {
2338   enum bfd_architecture arch;
2339   unsigned long mach;
2340
2341   switch (elf_elfheader (abfd)->e_machine)
2342     {
2343     case EM_V800:
2344       arch = bfd_arch_v850_rh850;
2345       mach = (elf_elfheader (abfd)->e_flags & EF_V800_850E3)
2346         ? bfd_mach_v850e3v5 : bfd_mach_v850e2v3;
2347       break;
2348
2349     case EM_CYGNUS_V850:
2350     case EM_V850:
2351       arch = bfd_arch_v850;
2352       switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
2353         {
2354         default:
2355         case E_V850_ARCH:     mach = bfd_mach_v850; break;
2356         case E_V850E_ARCH:    mach = bfd_mach_v850e; break;
2357         case E_V850E1_ARCH:   mach = bfd_mach_v850e1; break;
2358         case E_V850E2_ARCH:   mach = bfd_mach_v850e2; break;
2359         case E_V850E2V3_ARCH: mach = bfd_mach_v850e2v3; break;
2360         case E_V850E3V5_ARCH: mach = bfd_mach_v850e3v5; break;
2361         }
2362       break;
2363
2364     default:
2365       return FALSE;
2366     }
2367
2368   return bfd_default_set_arch_mach (abfd, arch, mach);
2369 }
2370
2371 /* Store the machine number in the flags field.  */
2372
2373 static void
2374 v850_elf_final_write_processing (bfd *abfd,
2375                                  bfd_boolean linker ATTRIBUTE_UNUSED)
2376 {
2377   unsigned long val;
2378
2379   switch (bfd_get_arch (abfd))
2380     {
2381     case bfd_arch_v850_rh850:
2382       val = EF_RH850_ABI;
2383       if (bfd_get_mach (abfd) == bfd_mach_v850e3v5)
2384         val |= EF_V800_850E3;
2385       elf_elfheader (abfd)->e_flags |= val;
2386       break;
2387
2388     case bfd_arch_v850:
2389       switch (bfd_get_mach (abfd))
2390         {
2391         default:
2392         case bfd_mach_v850:     val = E_V850_ARCH; break;
2393         case bfd_mach_v850e:    val = E_V850E_ARCH; break;
2394         case bfd_mach_v850e1:   val = E_V850E1_ARCH; break;
2395         case bfd_mach_v850e2:   val = E_V850E2_ARCH; break;
2396         case bfd_mach_v850e2v3: val = E_V850E2V3_ARCH; break;
2397         case bfd_mach_v850e3v5: val = E_V850E3V5_ARCH; break;
2398         }
2399       elf_elfheader (abfd)->e_flags &=~ EF_V850_ARCH;
2400       elf_elfheader (abfd)->e_flags |= val;
2401       break;
2402     default:
2403       break;
2404     }
2405 }
2406
2407 /* Function to keep V850 specific file flags.  */
2408
2409 static bfd_boolean
2410 v850_elf_set_private_flags (bfd *abfd, flagword flags)
2411 {
2412   BFD_ASSERT (!elf_flags_init (abfd)
2413               || elf_elfheader (abfd)->e_flags == flags);
2414
2415   elf_elfheader (abfd)->e_flags = flags;
2416   elf_flags_init (abfd) = TRUE;
2417   return TRUE;
2418 }
2419
2420 /* Merge backend specific data from an object file
2421    to the output object file when linking.  */
2422
2423 static bfd_boolean
2424 v850_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
2425 {
2426   flagword out_flags;
2427   flagword in_flags;
2428
2429   if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2430       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2431     return TRUE;
2432
2433   in_flags = elf_elfheader (ibfd)->e_flags;
2434   out_flags = elf_elfheader (obfd)->e_flags;
2435
2436   if (! elf_flags_init (obfd))
2437     {
2438       /* If the input is the default architecture then do not
2439          bother setting the flags for the output architecture,
2440          instead allow future merges to do this.  If no future
2441          merges ever set these flags then they will retain their
2442          unitialised values, which surprise surprise, correspond
2443          to the default values.  */
2444       if (bfd_get_arch_info (ibfd)->the_default)
2445         return TRUE;
2446
2447       elf_flags_init (obfd) = TRUE;
2448       elf_elfheader (obfd)->e_flags = in_flags;
2449
2450       if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
2451           && bfd_get_arch_info (obfd)->the_default)
2452         return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd), bfd_get_mach (ibfd));
2453
2454       return TRUE;
2455     }
2456
2457   /* Check flag compatibility.  */
2458   if (in_flags == out_flags)
2459     return TRUE;
2460
2461   if (bfd_get_arch (obfd) == bfd_arch_v850_rh850)
2462     {
2463       if ((in_flags & EF_V800_850E3) != (out_flags & EF_V800_850E3))
2464         {
2465           _bfd_error_handler (_("%B: Architecture mismatch with previous modules"),
2466                               ibfd);
2467           elf_elfheader (obfd)->e_flags |= EF_V800_850E3;
2468         }
2469
2470       if ((in_flags & EF_RH850_DATA_ALIGN8) != (out_flags & EF_RH850_DATA_ALIGN8))
2471         {
2472           _bfd_error_handler (_("%B: Alignment mismatch with previous modules"),
2473                               ibfd);
2474           elf_elfheader (obfd)->e_flags |= EF_RH850_DATA_ALIGN8;
2475         }
2476
2477       return TRUE;
2478     }
2479
2480   if ((in_flags & EF_V850_ARCH) != (out_flags & EF_V850_ARCH)
2481       && (in_flags & EF_V850_ARCH) != E_V850_ARCH)
2482     {
2483       /* Allow earlier architecture binaries to be linked with later binaries.
2484          Set the output binary to the later architecture, except for v850e1,
2485          which we set to v850e.  */
2486       if (   (in_flags  & EF_V850_ARCH) == E_V850E1_ARCH
2487           && (out_flags & EF_V850_ARCH) == E_V850E_ARCH)
2488         return TRUE;
2489
2490       if (   (in_flags  & EF_V850_ARCH) == E_V850_ARCH
2491           && (out_flags & EF_V850_ARCH) == E_V850E_ARCH)
2492         {
2493           elf_elfheader (obfd)->e_flags =
2494             ((out_flags & ~ EF_V850_ARCH) | E_V850E_ARCH);
2495           return TRUE;
2496         }
2497
2498       if ((   (in_flags & EF_V850_ARCH) == E_V850_ARCH
2499            || (in_flags & EF_V850_ARCH) == E_V850E_ARCH)
2500           && (out_flags & EF_V850_ARCH) == E_V850E2_ARCH)
2501         {
2502           elf_elfheader (obfd)->e_flags =
2503             ((out_flags & ~ EF_V850_ARCH) | E_V850E2_ARCH);
2504           return TRUE;
2505         }
2506
2507       if ((   (in_flags & EF_V850_ARCH) == E_V850_ARCH
2508            || (in_flags & EF_V850_ARCH) == E_V850E_ARCH
2509            || (in_flags & EF_V850_ARCH) == E_V850E2_ARCH)
2510           && (out_flags & EF_V850_ARCH) == E_V850E2V3_ARCH)
2511         {
2512           elf_elfheader (obfd)->e_flags =
2513             ((out_flags & ~ EF_V850_ARCH) | E_V850E2V3_ARCH);
2514           return TRUE;
2515         }
2516
2517       if ((   (in_flags & EF_V850_ARCH) == E_V850_ARCH
2518            || (in_flags & EF_V850_ARCH) == E_V850E_ARCH
2519            || (in_flags & EF_V850_ARCH) == E_V850E2_ARCH
2520            || (in_flags & EF_V850_ARCH) == E_V850E2V3_ARCH)
2521           && (out_flags & EF_V850_ARCH) == E_V850E3V5_ARCH)
2522         {
2523           elf_elfheader (obfd)->e_flags =
2524             ((out_flags & ~ EF_V850_ARCH) | E_V850E3V5_ARCH);
2525           return TRUE;
2526         }
2527
2528       _bfd_error_handler (_("%B: Architecture mismatch with previous modules"),
2529                           ibfd);
2530     }
2531
2532   return TRUE;
2533 }
2534
2535 /* Display the flags field.  */
2536
2537 static bfd_boolean
2538 v850_elf_print_private_bfd_data (bfd *abfd, void * ptr)
2539 {
2540   FILE * file = (FILE *) ptr;
2541
2542   BFD_ASSERT (abfd != NULL && ptr != NULL);
2543
2544   _bfd_elf_print_private_bfd_data (abfd, ptr);
2545
2546   /* xgettext:c-format.  */
2547   fprintf (file, _("private flags = %lx: "), elf_elfheader (abfd)->e_flags);
2548
2549   if (bfd_get_arch (abfd) == bfd_arch_v850_rh850)
2550     {
2551       if ((elf_elfheader (abfd)->e_flags & EF_RH850_ABI) != EF_RH850_ABI)
2552         fprintf (file, _("unknown v850 architecture"));
2553       else if (elf_elfheader (abfd)->e_flags & EF_V800_850E3)
2554         fprintf (file, _("v850 E3 architecture"));
2555       else
2556         fprintf (file, _("v850 architecture"));
2557
2558       if (elf_elfheader (abfd)->e_flags & EF_RH850_DATA_ALIGN8)
2559         fprintf (file, _(", 8-byte data alignment"));
2560     }
2561   else
2562     {
2563       switch (elf_elfheader (abfd)->e_flags & EF_V850_ARCH)
2564         {
2565         default:
2566         case E_V850_ARCH: fprintf (file, _("v850 architecture")); break;
2567         case E_V850E_ARCH: fprintf (file, _("v850e architecture")); break;
2568         case E_V850E1_ARCH: fprintf (file, _("v850e1 architecture")); break;
2569         case E_V850E2_ARCH: fprintf (file, _("v850e2 architecture")); break;
2570         case E_V850E2V3_ARCH: fprintf (file, _("v850e2v3 architecture")); break;
2571         case E_V850E3V5_ARCH: fprintf (file, _("v850e3v5 architecture")); break;
2572         }
2573     }
2574
2575   fputc ('\n', file);
2576
2577   return TRUE;
2578 }
2579
2580 /* V850 ELF uses four common sections.  One is the usual one, and the
2581    others are for (small) objects in one of the special data areas:
2582    small, tiny and zero.  All the objects are kept together, and then
2583    referenced via the gp register, the ep register or the r0 register
2584    respectively, which yields smaller, faster assembler code.  This
2585    approach is copied from elf32-mips.c.  */
2586
2587 static asection  v850_elf_scom_section;
2588 static asymbol   v850_elf_scom_symbol;
2589 static asymbol * v850_elf_scom_symbol_ptr;
2590 static asection  v850_elf_tcom_section;
2591 static asymbol   v850_elf_tcom_symbol;
2592 static asymbol * v850_elf_tcom_symbol_ptr;
2593 static asection  v850_elf_zcom_section;
2594 static asymbol   v850_elf_zcom_symbol;
2595 static asymbol * v850_elf_zcom_symbol_ptr;
2596
2597 /* Given a BFD section, try to locate the
2598    corresponding ELF section index.  */
2599
2600 static bfd_boolean
2601 v850_elf_section_from_bfd_section (bfd *abfd ATTRIBUTE_UNUSED,
2602                                    asection *sec,
2603                                    int *retval)
2604 {
2605   if (strcmp (bfd_get_section_name (abfd, sec), ".scommon") == 0)
2606     *retval = SHN_V850_SCOMMON;
2607   else if (strcmp (bfd_get_section_name (abfd, sec), ".tcommon") == 0)
2608     *retval = SHN_V850_TCOMMON;
2609   else if (strcmp (bfd_get_section_name (abfd, sec), ".zcommon") == 0)
2610     *retval = SHN_V850_ZCOMMON;
2611   else
2612     return FALSE;
2613
2614   return TRUE;
2615 }
2616
2617 /* Handle the special V850 section numbers that a symbol may use.  */
2618
2619 static void
2620 v850_elf_symbol_processing (bfd *abfd, asymbol *asym)
2621 {
2622   elf_symbol_type * elfsym = (elf_symbol_type *) asym;
2623   unsigned int indx;
2624
2625   indx = elfsym->internal_elf_sym.st_shndx;
2626
2627   /* If the section index is an "ordinary" index, then it may
2628      refer to a v850 specific section created by the assembler.
2629      Check the section's type and change the index it matches.
2630
2631      FIXME: Should we alter the st_shndx field as well ?  */
2632
2633   if (indx < elf_numsections (abfd))
2634     switch (elf_elfsections (abfd)[indx]->sh_type)
2635       {
2636       case SHT_V850_SCOMMON:
2637         indx = SHN_V850_SCOMMON;
2638         break;
2639
2640       case SHT_V850_TCOMMON:
2641         indx = SHN_V850_TCOMMON;
2642         break;
2643
2644       case SHT_V850_ZCOMMON:
2645         indx = SHN_V850_ZCOMMON;
2646         break;
2647
2648       default:
2649         break;
2650       }
2651
2652   switch (indx)
2653     {
2654     case SHN_V850_SCOMMON:
2655       if (v850_elf_scom_section.name == NULL)
2656         {
2657           /* Initialize the small common section.  */
2658           v850_elf_scom_section.name           = ".scommon";
2659           v850_elf_scom_section.flags          = SEC_IS_COMMON | SEC_ALLOC | SEC_DATA;
2660           v850_elf_scom_section.output_section = & v850_elf_scom_section;
2661           v850_elf_scom_section.symbol         = & v850_elf_scom_symbol;
2662           v850_elf_scom_section.symbol_ptr_ptr = & v850_elf_scom_symbol_ptr;
2663           v850_elf_scom_symbol.name            = ".scommon";
2664           v850_elf_scom_symbol.flags           = BSF_SECTION_SYM;
2665           v850_elf_scom_symbol.section         = & v850_elf_scom_section;
2666           v850_elf_scom_symbol_ptr             = & v850_elf_scom_symbol;
2667         }
2668       asym->section = & v850_elf_scom_section;
2669       asym->value = elfsym->internal_elf_sym.st_size;
2670       break;
2671
2672     case SHN_V850_TCOMMON:
2673       if (v850_elf_tcom_section.name == NULL)
2674         {
2675           /* Initialize the tcommon section.  */
2676           v850_elf_tcom_section.name           = ".tcommon";
2677           v850_elf_tcom_section.flags          = SEC_IS_COMMON;
2678           v850_elf_tcom_section.output_section = & v850_elf_tcom_section;
2679           v850_elf_tcom_section.symbol         = & v850_elf_tcom_symbol;
2680           v850_elf_tcom_section.symbol_ptr_ptr = & v850_elf_tcom_symbol_ptr;
2681           v850_elf_tcom_symbol.name            = ".tcommon";
2682           v850_elf_tcom_symbol.flags           = BSF_SECTION_SYM;
2683           v850_elf_tcom_symbol.section         = & v850_elf_tcom_section;
2684           v850_elf_tcom_symbol_ptr             = & v850_elf_tcom_symbol;
2685         }
2686       asym->section = & v850_elf_tcom_section;
2687       asym->value = elfsym->internal_elf_sym.st_size;
2688       break;
2689
2690     case SHN_V850_ZCOMMON:
2691       if (v850_elf_zcom_section.name == NULL)
2692         {
2693           /* Initialize the zcommon section.  */
2694           v850_elf_zcom_section.name           = ".zcommon";
2695           v850_elf_zcom_section.flags          = SEC_IS_COMMON;
2696           v850_elf_zcom_section.output_section = & v850_elf_zcom_section;
2697           v850_elf_zcom_section.symbol         = & v850_elf_zcom_symbol;
2698           v850_elf_zcom_section.symbol_ptr_ptr = & v850_elf_zcom_symbol_ptr;
2699           v850_elf_zcom_symbol.name            = ".zcommon";
2700           v850_elf_zcom_symbol.flags           = BSF_SECTION_SYM;
2701           v850_elf_zcom_symbol.section         = & v850_elf_zcom_section;
2702           v850_elf_zcom_symbol_ptr             = & v850_elf_zcom_symbol;
2703         }
2704       asym->section = & v850_elf_zcom_section;
2705       asym->value = elfsym->internal_elf_sym.st_size;
2706       break;
2707     }
2708 }
2709
2710 /* Hook called by the linker routine which adds symbols from an object
2711    file.  We must handle the special v850 section numbers here.  */
2712
2713 static bfd_boolean
2714 v850_elf_add_symbol_hook (bfd *abfd,
2715                           struct bfd_link_info *info ATTRIBUTE_UNUSED,
2716                           Elf_Internal_Sym *sym,
2717                           const char **namep ATTRIBUTE_UNUSED,
2718                           flagword *flagsp ATTRIBUTE_UNUSED,
2719                           asection **secp,
2720                           bfd_vma *valp)
2721 {
2722   unsigned int indx = sym->st_shndx;
2723
2724   /* If the section index is an "ordinary" index, then it may
2725      refer to a v850 specific section created by the assembler.
2726      Check the section's type and change the index it matches.
2727
2728      FIXME: Should we alter the st_shndx field as well ?  */
2729
2730   if (indx < elf_numsections (abfd))
2731     switch (elf_elfsections (abfd)[indx]->sh_type)
2732       {
2733       case SHT_V850_SCOMMON:
2734         indx = SHN_V850_SCOMMON;
2735         break;
2736
2737       case SHT_V850_TCOMMON:
2738         indx = SHN_V850_TCOMMON;
2739         break;
2740
2741       case SHT_V850_ZCOMMON:
2742         indx = SHN_V850_ZCOMMON;
2743         break;
2744
2745       default:
2746         break;
2747       }
2748
2749   switch (indx)
2750     {
2751     case SHN_V850_SCOMMON:
2752       *secp = bfd_make_section_old_way (abfd, ".scommon");
2753       (*secp)->flags |= SEC_IS_COMMON;
2754       *valp = sym->st_size;
2755       break;
2756
2757     case SHN_V850_TCOMMON:
2758       *secp = bfd_make_section_old_way (abfd, ".tcommon");
2759       (*secp)->flags |= SEC_IS_COMMON;
2760       *valp = sym->st_size;
2761       break;
2762
2763     case SHN_V850_ZCOMMON:
2764       *secp = bfd_make_section_old_way (abfd, ".zcommon");
2765       (*secp)->flags |= SEC_IS_COMMON;
2766       *valp = sym->st_size;
2767       break;
2768     }
2769
2770   return TRUE;
2771 }
2772
2773 static int
2774 v850_elf_link_output_symbol_hook (struct bfd_link_info *info ATTRIBUTE_UNUSED,
2775                                   const char *name ATTRIBUTE_UNUSED,
2776                                   Elf_Internal_Sym *sym,
2777                                   asection *input_sec,
2778                                   struct elf_link_hash_entry *h ATTRIBUTE_UNUSED)
2779 {
2780   /* If we see a common symbol, which implies a relocatable link, then
2781      if a symbol was in a special common section in an input file, mark
2782      it as a special common in the output file.  */
2783
2784   if (sym->st_shndx == SHN_COMMON)
2785     {
2786       if (strcmp (input_sec->name, ".scommon") == 0)
2787         sym->st_shndx = SHN_V850_SCOMMON;
2788       else if (strcmp (input_sec->name, ".tcommon") == 0)
2789         sym->st_shndx = SHN_V850_TCOMMON;
2790       else if (strcmp (input_sec->name, ".zcommon") == 0)
2791         sym->st_shndx = SHN_V850_ZCOMMON;
2792     }
2793
2794   /* The price we pay for using h->other unused bits as flags in the
2795      linker is cleaning up after ourselves.  */
2796
2797   sym->st_other &= ~(V850_OTHER_SDA | V850_OTHER_ZDA | V850_OTHER_TDA
2798                      | V850_OTHER_ERROR);
2799
2800   return 1;
2801 }
2802
2803 static bfd_boolean
2804 v850_elf_section_from_shdr (bfd *abfd,
2805                             Elf_Internal_Shdr *hdr,
2806                             const char *name,
2807                             int shindex)
2808 {
2809   /* There ought to be a place to keep ELF backend specific flags, but
2810      at the moment there isn't one.  We just keep track of the
2811      sections by their name, instead.  */
2812
2813   if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
2814     return FALSE;
2815
2816   switch (hdr->sh_type)
2817     {
2818     case SHT_V850_SCOMMON:
2819     case SHT_V850_TCOMMON:
2820     case SHT_V850_ZCOMMON:
2821       if (! bfd_set_section_flags (abfd, hdr->bfd_section,
2822                                    (bfd_get_section_flags (abfd,
2823                                                            hdr->bfd_section)
2824                                     | SEC_IS_COMMON)))
2825         return FALSE;
2826     }
2827
2828   return TRUE;
2829 }
2830
2831 /* Set the correct type for a V850 ELF section.  We do this
2832    by the section name, which is a hack, but ought to work.  */
2833
2834 static bfd_boolean
2835 v850_elf_fake_sections (bfd *abfd ATTRIBUTE_UNUSED,
2836                         Elf_Internal_Shdr *hdr,
2837                         asection *sec)
2838 {
2839   const char * name;
2840
2841   name = bfd_get_section_name (abfd, sec);
2842
2843   if (strcmp (name, ".scommon") == 0)
2844     hdr->sh_type = SHT_V850_SCOMMON;
2845   else if (strcmp (name, ".tcommon") == 0)
2846     hdr->sh_type = SHT_V850_TCOMMON;
2847   else if (strcmp (name, ".zcommon") == 0)
2848     hdr->sh_type = SHT_V850_ZCOMMON;
2849
2850   return TRUE;
2851 }
2852
2853 /* Delete some bytes from a section while relaxing.  */
2854
2855 static bfd_boolean
2856 v850_elf_relax_delete_bytes (bfd *abfd,
2857                              asection *sec,
2858                              bfd_vma addr,
2859                              bfd_vma toaddr,
2860                              int count)
2861 {
2862   Elf_Internal_Shdr *symtab_hdr;
2863   Elf32_External_Sym *extsyms;
2864   Elf32_External_Sym *esym;
2865   Elf32_External_Sym *esymend;
2866   int sym_index;
2867   unsigned int sec_shndx;
2868   bfd_byte *contents;
2869   Elf_Internal_Rela *irel;
2870   Elf_Internal_Rela *irelend;
2871   struct elf_link_hash_entry *sym_hash;
2872   Elf_Internal_Shdr *shndx_hdr;
2873   Elf_External_Sym_Shndx *shndx;
2874
2875   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2876   extsyms = (Elf32_External_Sym *) symtab_hdr->contents;
2877
2878   sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
2879
2880   contents = elf_section_data (sec)->this_hdr.contents;
2881
2882   /* The deletion must stop at the next ALIGN reloc for an alignment
2883      power larger than the number of bytes we are deleting.  */
2884
2885   /* Actually delete the bytes.  */
2886 #if (DEBUG_RELAX & 2)
2887   fprintf (stderr, "relax_delete: contents: sec: %s  %p .. %p %x\n",
2888            sec->name, addr, toaddr, count );
2889 #endif
2890   memmove (contents + addr, contents + addr + count,
2891            toaddr - addr - count);
2892   memset (contents + toaddr-count, 0, count);
2893
2894   /* Adjust all the relocs.  */
2895   irel = elf_section_data (sec)->relocs;
2896   irelend = irel + sec->reloc_count;
2897   shndx_hdr = &elf_tdata (abfd)->symtab_shndx_hdr;
2898   shndx = (Elf_External_Sym_Shndx *) shndx_hdr->contents;
2899
2900   for (; irel < irelend; irel++)
2901     {
2902       bfd_vma raddr, paddr, symval;
2903       Elf_Internal_Sym isym;
2904
2905       /* Get the new reloc address.  */
2906       raddr = irel->r_offset;
2907       if ((raddr >= (addr + count) && raddr < toaddr))
2908         irel->r_offset -= count;
2909
2910       if (raddr >= addr && raddr < addr + count)
2911         {
2912           irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
2913                                        (int) R_V850_NONE);
2914           continue;
2915         }
2916
2917       if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN)
2918         continue;
2919
2920       bfd_elf32_swap_symbol_in (abfd,
2921                                 extsyms + ELF32_R_SYM (irel->r_info),
2922                                 shndx ? shndx + ELF32_R_SYM (irel->r_info) : NULL,
2923                                 & isym);
2924
2925       if (isym.st_shndx != sec_shndx)
2926         continue;
2927
2928       /* Get the value of the symbol referred to by the reloc.  */
2929       if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
2930         {
2931           symval = isym.st_value;
2932 #if (DEBUG_RELAX & 2)
2933           {
2934             char * name = bfd_elf_string_from_elf_section
2935                            (abfd, symtab_hdr->sh_link, isym.st_name);
2936             fprintf (stderr,
2937                "relax_delete: local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n",
2938                sec->name, name, isym.st_name,
2939                sec->output_section->vma, sec->output_offset,
2940                isym.st_value, irel->r_addend);
2941           }
2942 #endif
2943         }
2944       else
2945         {
2946           unsigned long indx;
2947           struct elf_link_hash_entry * h;
2948
2949           /* An external symbol.  */
2950           indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
2951
2952           h = elf_sym_hashes (abfd) [indx];
2953           BFD_ASSERT (h != NULL);
2954
2955           symval = h->root.u.def.value;
2956 #if (DEBUG_RELAX & 2)
2957           fprintf (stderr,
2958                    "relax_delete: defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n",
2959                    sec->name, h->root.root.string, h->root.u.def.value,
2960                    sec->output_section->vma, sec->output_offset, irel->r_addend);
2961 #endif
2962         }
2963
2964       paddr = symval + irel->r_addend;
2965
2966       if ( (symval >= addr + count && symval < toaddr)
2967           && (paddr < addr + count || paddr >= toaddr))
2968         irel->r_addend += count;
2969       else if (    (symval < addr + count || symval >= toaddr)
2970                 && (paddr >= addr + count && paddr < toaddr))
2971         irel->r_addend -= count;
2972     }
2973
2974   /* Adjust the local symbols defined in this section.  */
2975   esym = extsyms;
2976   esymend = esym + symtab_hdr->sh_info;
2977
2978   for (; esym < esymend; esym++, shndx = (shndx ? shndx + 1 : NULL))
2979     {
2980       Elf_Internal_Sym isym;
2981
2982       bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym);
2983
2984       if (isym.st_shndx == sec_shndx
2985           && isym.st_value >= addr + count
2986           && isym.st_value < toaddr)
2987         {
2988           isym.st_value -= count;
2989
2990           if (isym.st_value + isym.st_size >= toaddr)
2991             isym.st_size += count;
2992
2993           bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
2994         }
2995       else if (isym.st_shndx == sec_shndx
2996                && isym.st_value < addr + count)
2997         {
2998           if (isym.st_value+isym.st_size >= addr + count
2999               && isym.st_value+isym.st_size < toaddr)
3000             isym.st_size -= count;
3001
3002           if (isym.st_value >= addr
3003               && isym.st_value <  addr + count)
3004             isym.st_value = addr;
3005
3006           bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
3007         }
3008     }
3009
3010   /* Now adjust the global symbols defined in this section.  */
3011   esym = extsyms + symtab_hdr->sh_info;
3012   esymend = extsyms + (symtab_hdr->sh_size / sizeof (Elf32_External_Sym));
3013
3014   for (sym_index = 0; esym < esymend; esym ++, sym_index ++)
3015     {
3016       Elf_Internal_Sym isym;
3017
3018       bfd_elf32_swap_symbol_in (abfd, esym, shndx, & isym);
3019       sym_hash = elf_sym_hashes (abfd) [sym_index];
3020
3021       if (isym.st_shndx == sec_shndx
3022           && ((sym_hash)->root.type == bfd_link_hash_defined
3023               || (sym_hash)->root.type == bfd_link_hash_defweak)
3024           && (sym_hash)->root.u.def.section == sec
3025           && (sym_hash)->root.u.def.value >= addr + count
3026           && (sym_hash)->root.u.def.value < toaddr)
3027         {
3028           if ((sym_hash)->root.u.def.value + isym.st_size >= toaddr)
3029             {
3030               isym.st_size += count;
3031               bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
3032             }
3033
3034           (sym_hash)->root.u.def.value -= count;
3035         }
3036       else if (isym.st_shndx == sec_shndx
3037                && ((sym_hash)->root.type == bfd_link_hash_defined
3038                    || (sym_hash)->root.type == bfd_link_hash_defweak)
3039                && (sym_hash)->root.u.def.section == sec
3040                && (sym_hash)->root.u.def.value < addr + count)
3041         {
3042           if ((sym_hash)->root.u.def.value+isym.st_size >= addr + count
3043               && (sym_hash)->root.u.def.value+isym.st_size < toaddr)
3044             isym.st_size -= count;
3045
3046           if ((sym_hash)->root.u.def.value >= addr
3047               && (sym_hash)->root.u.def.value < addr + count)
3048             (sym_hash)->root.u.def.value = addr;
3049
3050           bfd_elf32_swap_symbol_out (abfd, & isym, esym, shndx);
3051         }
3052
3053       if (shndx)
3054         ++ shndx;
3055     }
3056
3057   return TRUE;
3058 }
3059
3060 #define NOP_OPCODE      (0x0000)
3061 #define MOVHI           0x0640                          /* 4byte.  */
3062 #define MOVHI_MASK      0x07e0
3063 #define MOVHI_R1(insn)  ((insn) & 0x1f)                 /* 4byte.  */
3064 #define MOVHI_R2(insn)  ((insn) >> 11)
3065 #define MOVEA           0x0620                          /* 2byte.  */
3066 #define MOVEA_MASK      0x07e0
3067 #define MOVEA_R1(insn)  ((insn) & 0x1f)
3068 #define MOVEA_R2(insn)  ((insn) >> 11)
3069 #define JARL_4          0x00040780                              /* 4byte.  */
3070 #define JARL_4_MASK     0xFFFF07FF
3071 #define JARL_R2(insn)   (int)(((insn) & (~JARL_4_MASK)) >> 11)
3072 #define ADD_I           0x0240                                  /* 2byte.  */
3073 #define ADD_I_MASK      0x07e0
3074 #define ADD_I5(insn)    ((((insn) & 0x001f) << 11) >> 11)       /* 2byte.  */
3075 #define ADD_R2(insn)    ((insn) >> 11)
3076 #define JMP_R           0x0060                                  /* 2byte.  */
3077 #define JMP_R_MASK      0xFFE0
3078 #define JMP_R1(insn)    ((insn) & 0x1f)
3079
3080 static bfd_boolean
3081 v850_elf_relax_section (bfd *abfd,
3082                         asection *sec,
3083                         struct bfd_link_info *link_info,
3084                         bfd_boolean *again)
3085 {
3086   Elf_Internal_Shdr *symtab_hdr;
3087   Elf_Internal_Rela *internal_relocs;
3088   Elf_Internal_Rela *irel;
3089   Elf_Internal_Rela *irelend;
3090   Elf_Internal_Rela *irelalign = NULL;
3091   Elf_Internal_Sym *isymbuf = NULL;
3092   bfd_byte *contents = NULL;
3093   bfd_vma addr = 0;
3094   bfd_vma toaddr;
3095   int align_pad_size = 0;
3096   bfd_boolean result = TRUE;
3097
3098   *again = FALSE;
3099
3100   if (link_info->relocatable
3101       || (sec->flags & SEC_RELOC) == 0
3102       || sec->reloc_count == 0)
3103     return TRUE;
3104
3105   symtab_hdr = & elf_tdata (abfd)->symtab_hdr;
3106
3107   internal_relocs = (_bfd_elf_link_read_relocs
3108                      (abfd, sec, NULL, NULL, link_info->keep_memory));
3109   if (internal_relocs == NULL)
3110     goto error_return;
3111
3112   irelend = internal_relocs + sec->reloc_count;
3113
3114   while (addr < sec->size)
3115     {
3116       toaddr = sec->size;
3117
3118       for (irel = internal_relocs; irel < irelend; irel ++)
3119         if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN
3120             && irel->r_offset > addr
3121             && irel->r_offset < toaddr)
3122           toaddr = irel->r_offset;
3123
3124 #ifdef DEBUG_RELAX
3125       fprintf (stderr, "relax region 0x%x to 0x%x align pad %d\n",
3126                addr, toaddr, align_pad_size);
3127 #endif
3128       if (irelalign)
3129         {
3130           bfd_vma alignto;
3131           bfd_vma alignmoveto;
3132
3133           alignmoveto = BFD_ALIGN (addr - align_pad_size, 1 << irelalign->r_addend);
3134           alignto = BFD_ALIGN (addr, 1 << irelalign->r_addend);
3135
3136           if (alignmoveto < alignto)
3137             {
3138               unsigned int i;
3139
3140               align_pad_size = alignto - alignmoveto;
3141 #ifdef DEBUG_RELAX
3142               fprintf (stderr, "relax move region 0x%x to 0x%x delete size 0x%x\n",
3143                        alignmoveto, toaddr, align_pad_size);
3144 #endif
3145               if (!v850_elf_relax_delete_bytes (abfd, sec, alignmoveto,
3146                                                 toaddr, align_pad_size))
3147                 goto error_return;
3148
3149               for (i  = BFD_ALIGN (toaddr - align_pad_size, 1);
3150                    (i + 1) < toaddr; i += 2)
3151                 bfd_put_16 (abfd, NOP_OPCODE, contents + i);
3152
3153               addr = alignmoveto;
3154             }
3155           else
3156             align_pad_size = 0;
3157         }
3158
3159       for (irel = internal_relocs; irel < irelend; irel++)
3160         {
3161           bfd_vma laddr;
3162           bfd_vma addend;
3163           bfd_vma symval;
3164           int insn[5];
3165           int no_match = -1;
3166           Elf_Internal_Rela *hi_irelfn;
3167           Elf_Internal_Rela *lo_irelfn;
3168           Elf_Internal_Rela *irelcall;
3169           bfd_signed_vma foff;
3170           unsigned int r_type;
3171
3172           if (! (irel->r_offset >= addr && irel->r_offset < toaddr
3173                  && (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL
3174                      || ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP)))
3175             continue;
3176
3177 #ifdef DEBUG_RELAX
3178           fprintf (stderr, "relax check r_info 0x%x r_offset 0x%x r_addend 0x%x\n",
3179                    irel->r_info,
3180                    irel->r_offset,
3181                    irel->r_addend );
3182 #endif
3183
3184           /* Get the section contents.  */
3185           if (contents == NULL)
3186             {
3187               if (elf_section_data (sec)->this_hdr.contents != NULL)
3188                 contents = elf_section_data (sec)->this_hdr.contents;
3189               else
3190                 {
3191                   if (! bfd_malloc_and_get_section (abfd, sec, &contents))
3192                     goto error_return;
3193                 }
3194             }
3195
3196           /* Read this BFD's local symbols if we haven't done so already.  */
3197           if (isymbuf == NULL && symtab_hdr->sh_info != 0)
3198             {
3199               isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
3200               if (isymbuf == NULL)
3201                 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
3202                                                 symtab_hdr->sh_info, 0,
3203                                                 NULL, NULL, NULL);
3204               if (isymbuf == NULL)
3205                 goto error_return;
3206             }
3207
3208           laddr = irel->r_offset;
3209
3210           if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGCALL)
3211             {
3212               /* Check code for -mlong-calls output. */
3213               if (laddr + 16 <= (bfd_vma) sec->size)
3214                 {
3215                   insn[0] = bfd_get_16 (abfd, contents + laddr);
3216                   insn[1] = bfd_get_16 (abfd, contents + laddr + 4);
3217                   insn[2] = bfd_get_32 (abfd, contents + laddr + 8);
3218                   insn[3] = bfd_get_16 (abfd, contents + laddr + 12);
3219                   insn[4] = bfd_get_16 (abfd, contents + laddr + 14);
3220
3221                   if ((insn[0] & MOVHI_MASK) != MOVHI
3222                        || MOVHI_R1 (insn[0]) != 0)
3223                     no_match = 0;
3224
3225                   if (no_match < 0
3226                       && ((insn[1] & MOVEA_MASK) != MOVEA
3227                            || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1])))
3228                     no_match = 1;
3229
3230                   if (no_match < 0
3231                       && (insn[2] & JARL_4_MASK) != JARL_4)
3232                     no_match = 2;
3233
3234                   if (no_match < 0
3235                       && ((insn[3] & ADD_I_MASK) != ADD_I
3236                            || ADD_I5 (insn[3]) != 4
3237                            || JARL_R2 (insn[2]) != ADD_R2 (insn[3])))
3238                     no_match = 3;
3239
3240                   if (no_match < 0
3241                       && ((insn[4] & JMP_R_MASK) != JMP_R
3242                            || MOVEA_R2 (insn[1]) != JMP_R1 (insn[4])))
3243                     no_match = 4;
3244                 }
3245               else
3246                 {
3247                   ((*_bfd_error_handler)
3248                    ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized insns",
3249                     bfd_get_filename (abfd), (unsigned long) irel->r_offset));
3250
3251                   continue;
3252                 }
3253
3254               if (no_match >= 0)
3255                 {
3256                   ((*_bfd_error_handler)
3257                    ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized insn 0x%x",
3258                     bfd_get_filename (abfd), (unsigned long) irel->r_offset+no_match, insn[no_match]));
3259
3260                   continue;
3261                 }
3262
3263               /* Get the reloc for the address from which the register is
3264                  being loaded.  This reloc will tell us which function is
3265                  actually being called.  */
3266
3267               for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++)
3268                 {
3269                   r_type = ELF32_R_TYPE (hi_irelfn->r_info);
3270
3271                   if (hi_irelfn->r_offset == laddr + 2
3272                       && (r_type == (int) R_V850_HI16_S || r_type == (int) R_V810_WHI1))
3273                     break;
3274                 }
3275
3276               for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++)
3277                 {
3278                   r_type = ELF32_R_TYPE (lo_irelfn->r_info);
3279
3280                   if (lo_irelfn->r_offset == laddr + 6
3281                       && (r_type == (int) R_V850_LO16 || r_type == (int) R_V810_WLO))
3282                     break;
3283                 }
3284
3285               for (irelcall = internal_relocs; irelcall < irelend; irelcall ++)
3286                 {
3287                   r_type = ELF32_R_TYPE (irelcall->r_info);
3288
3289                   if (irelcall->r_offset == laddr + 8
3290                       && (r_type == (int) R_V850_22_PCREL || r_type == (int) R_V850_PCR22))
3291                     break;
3292                 }
3293
3294               if (   hi_irelfn == irelend
3295                   || lo_irelfn == irelend
3296                   || irelcall  == irelend)
3297                 {
3298                   ((*_bfd_error_handler)
3299                    ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized reloc",
3300                     bfd_get_filename (abfd), (unsigned long) irel->r_offset ));
3301
3302                   continue;
3303                 }
3304
3305               if (ELF32_R_SYM (irelcall->r_info) < symtab_hdr->sh_info)
3306                 {
3307                   Elf_Internal_Sym *  isym;
3308
3309                   /* A local symbol.  */
3310                   isym = isymbuf + ELF32_R_SYM (irelcall->r_info);
3311
3312                   symval = isym->st_value;
3313                 }
3314               else
3315                 {
3316                   unsigned long indx;
3317                   struct elf_link_hash_entry * h;
3318
3319                   /* An external symbol.  */
3320                   indx = ELF32_R_SYM (irelcall->r_info) - symtab_hdr->sh_info;
3321                   h = elf_sym_hashes (abfd)[indx];
3322                   BFD_ASSERT (h != NULL);
3323
3324                   if (   h->root.type != bfd_link_hash_defined
3325                       && h->root.type != bfd_link_hash_defweak)
3326                     /* This appears to be a reference to an undefined
3327                        symbol.  Just ignore it--it will be caught by the
3328                        regular reloc processing.  */
3329                     continue;
3330
3331                   symval = h->root.u.def.value;
3332                 }
3333
3334               if (symval + irelcall->r_addend != irelcall->r_offset + 4)
3335                 {
3336                   ((*_bfd_error_handler)
3337                    ("%s: 0x%lx: warning: R_V850_LONGCALL points to unrecognized reloc 0x%lx",
3338                     bfd_get_filename (abfd), (unsigned long) irel->r_offset, irelcall->r_offset ));
3339
3340                   continue;
3341                 }
3342
3343               /* Get the value of the symbol referred to by the reloc.  */
3344               if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
3345                 {
3346                   Elf_Internal_Sym *isym;
3347                   asection *sym_sec;
3348
3349                   /* A local symbol.  */
3350                   isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info);
3351
3352                   if (isym->st_shndx == SHN_UNDEF)
3353                     sym_sec = bfd_und_section_ptr;
3354                   else if (isym->st_shndx == SHN_ABS)
3355                     sym_sec = bfd_abs_section_ptr;
3356                   else if (isym->st_shndx == SHN_COMMON)
3357                     sym_sec = bfd_com_section_ptr;
3358                   else
3359                     sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
3360                   symval = (isym->st_value
3361                             + sym_sec->output_section->vma
3362                             + sym_sec->output_offset);
3363                 }
3364               else
3365                 {
3366                   unsigned long indx;
3367                   struct elf_link_hash_entry *h;
3368
3369                   /* An external symbol.  */
3370                   indx = ELF32_R_SYM (hi_irelfn->r_info) - symtab_hdr->sh_info;
3371                   h = elf_sym_hashes (abfd)[indx];
3372                   BFD_ASSERT (h != NULL);
3373
3374                   if (   h->root.type != bfd_link_hash_defined
3375                       && h->root.type != bfd_link_hash_defweak)
3376                     /* This appears to be a reference to an undefined
3377                        symbol.  Just ignore it--it will be caught by the
3378                        regular reloc processing.  */
3379                     continue;
3380
3381                   symval = (h->root.u.def.value
3382                             + h->root.u.def.section->output_section->vma
3383                             + h->root.u.def.section->output_offset);
3384                 }
3385
3386               addend = irel->r_addend;
3387
3388               foff = (symval + addend
3389                       - (irel->r_offset
3390                          + sec->output_section->vma
3391                          + sec->output_offset
3392                          + 4));
3393 #ifdef DEBUG_RELAX
3394               fprintf (stderr, "relax longcall r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n",
3395                        irel->r_offset,
3396                        (irel->r_offset
3397                         + sec->output_section->vma
3398                         + sec->output_offset),
3399                        symval, addend, foff);
3400 #endif
3401
3402               if (foff < -0x100000 || foff >= 0x100000)
3403                 /* After all that work, we can't shorten this function call.  */
3404                 continue;
3405
3406               /* For simplicity of coding, we are going to modify the section
3407                  contents, the section relocs, and the BFD symbol table.  We
3408                  must tell the rest of the code not to free up this
3409                  information.  It would be possible to instead create a table
3410                  of changes which have to be made, as is done in coff-mips.c;
3411                  that would be more work, but would require less memory when
3412                  the linker is run.  */
3413               elf_section_data (sec)->relocs = internal_relocs;
3414               elf_section_data (sec)->this_hdr.contents = contents;
3415               symtab_hdr->contents = (bfd_byte *) isymbuf;
3416
3417               /* Replace the long call with a jarl.  */
3418               if (bfd_get_arch (abfd) == bfd_arch_v850_rh850)
3419                 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_PCR22);
3420               else
3421                 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_22_PCREL);
3422
3423               addend = 0;
3424
3425               if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
3426                 /* If this needs to be changed because of future relaxing,
3427                    it will be handled here like other internal IND12W
3428                    relocs.  */
3429                 bfd_put_32 (abfd,
3430                             0x00000780 | (JARL_R2 (insn[2])<<11) | ((addend << 16) & 0xffff) | ((addend >> 16) & 0xf),
3431                             contents + irel->r_offset);
3432               else
3433                 /* We can't fully resolve this yet, because the external
3434                    symbol value may be changed by future relaxing.
3435                    We let the final link phase handle it.  */
3436                 bfd_put_32 (abfd, 0x00000780 | (JARL_R2 (insn[2])<<11),
3437                             contents + irel->r_offset);
3438
3439               hi_irelfn->r_info =
3440                 ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
3441               lo_irelfn->r_info =
3442                 ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
3443               irelcall->r_info =
3444                 ELF32_R_INFO (ELF32_R_SYM (irelcall->r_info), R_V850_NONE);
3445
3446               if (! v850_elf_relax_delete_bytes (abfd, sec,
3447                                                  irel->r_offset + 4, toaddr, 12))
3448                 goto error_return;
3449
3450               align_pad_size += 12;
3451             }
3452           else if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_LONGJUMP)
3453             {
3454               /* Check code for -mlong-jumps output.  */
3455               if (laddr + 10 <= (bfd_vma) sec->size)
3456                 {
3457                   insn[0] = bfd_get_16 (abfd, contents + laddr);
3458                   insn[1] = bfd_get_16 (abfd, contents + laddr + 4);
3459                   insn[2] = bfd_get_16 (abfd, contents + laddr + 8);
3460
3461                   if ((insn[0] & MOVHI_MASK) != MOVHI
3462                        || MOVHI_R1 (insn[0]) != 0)
3463                     no_match = 0;
3464
3465                   if (no_match < 0
3466                       && ((insn[1] & MOVEA_MASK) != MOVEA
3467                            || MOVHI_R2 (insn[0]) != MOVEA_R1 (insn[1])))
3468                     no_match = 1;
3469
3470                   if (no_match < 0
3471                       && ((insn[2] & JMP_R_MASK) != JMP_R
3472                            || MOVEA_R2 (insn[1]) != JMP_R1 (insn[2])))
3473                     no_match = 4;
3474                 }
3475               else
3476                 {
3477                   ((*_bfd_error_handler)
3478                    ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized insns",
3479                     bfd_get_filename (abfd), (unsigned long) irel->r_offset));
3480
3481                   continue;
3482                 }
3483
3484               if (no_match >= 0)
3485                 {
3486                   ((*_bfd_error_handler)
3487                    ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized insn 0x%x",
3488                     bfd_get_filename (abfd), (unsigned long) irel->r_offset+no_match, insn[no_match]));
3489
3490                   continue;
3491                 }
3492
3493               /* Get the reloc for the address from which the register is
3494                  being loaded.  This reloc will tell us which function is
3495                  actually being called.  */
3496               for (hi_irelfn = internal_relocs; hi_irelfn < irelend; hi_irelfn ++)
3497                 {
3498                   r_type = ELF32_R_TYPE (hi_irelfn->r_info);
3499
3500                   if (hi_irelfn->r_offset == laddr + 2
3501                       && ((r_type == (int) R_V850_HI16_S) || r_type == (int) R_V810_WHI1))
3502                     break;
3503                 }
3504
3505               for (lo_irelfn = internal_relocs; lo_irelfn < irelend; lo_irelfn ++)
3506                 {
3507                   r_type = ELF32_R_TYPE (lo_irelfn->r_info);
3508
3509                   if (lo_irelfn->r_offset == laddr + 6
3510                       && (r_type == (int) R_V850_LO16 || r_type == (int) R_V810_WLO))
3511                     break;
3512                 }
3513
3514               if (   hi_irelfn == irelend
3515                   || lo_irelfn == irelend)
3516                 {
3517                   ((*_bfd_error_handler)
3518                    ("%s: 0x%lx: warning: R_V850_LONGJUMP points to unrecognized reloc",
3519                     bfd_get_filename (abfd), (unsigned long) irel->r_offset ));
3520
3521                   continue;
3522                 }
3523
3524               /* Get the value of the symbol referred to by the reloc.  */
3525               if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
3526                 {
3527                   Elf_Internal_Sym *  isym;
3528                   asection *          sym_sec;
3529
3530                   /* A local symbol.  */
3531                   isym = isymbuf + ELF32_R_SYM (hi_irelfn->r_info);
3532
3533                   if (isym->st_shndx == SHN_UNDEF)
3534                     sym_sec = bfd_und_section_ptr;
3535                   else if (isym->st_shndx == SHN_ABS)
3536                     sym_sec = bfd_abs_section_ptr;
3537                   else if (isym->st_shndx == SHN_COMMON)
3538                     sym_sec = bfd_com_section_ptr;
3539                   else
3540                     sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
3541                   symval = (isym->st_value
3542                             + sym_sec->output_section->vma
3543                             + sym_sec->output_offset);
3544 #ifdef DEBUG_RELAX
3545                   {
3546                     char * name = bfd_elf_string_from_elf_section
3547                       (abfd, symtab_hdr->sh_link, isym->st_name);
3548
3549                     fprintf (stderr, "relax long jump local: sec: %s, sym: %s (%d), value: %x + %x + %x addend %x\n",
3550                              sym_sec->name, name, isym->st_name,
3551                              sym_sec->output_section->vma,
3552                              sym_sec->output_offset,
3553                              isym->st_value, irel->r_addend);
3554                   }
3555 #endif
3556                 }
3557               else
3558                 {
3559                   unsigned long indx;
3560                   struct elf_link_hash_entry * h;
3561
3562                   /* An external symbol.  */
3563                   indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
3564                   h = elf_sym_hashes (abfd)[indx];
3565                   BFD_ASSERT (h != NULL);
3566
3567                   if (   h->root.type != bfd_link_hash_defined
3568                       && h->root.type != bfd_link_hash_defweak)
3569                     /* This appears to be a reference to an undefined
3570                        symbol.  Just ignore it--it will be caught by the
3571                        regular reloc processing.  */
3572                     continue;
3573
3574                   symval = (h->root.u.def.value
3575                             + h->root.u.def.section->output_section->vma
3576                             + h->root.u.def.section->output_offset);
3577 #ifdef DEBUG_RELAX
3578                   fprintf (stderr,
3579                            "relax longjump defined: sec: %s, name: %s, value: %x + %x + %x addend %x\n",
3580                            sec->name, h->root.root.string, h->root.u.def.value,
3581                            sec->output_section->vma, sec->output_offset, irel->r_addend);
3582 #endif
3583                 }
3584
3585               addend = irel->r_addend;
3586
3587               foff = (symval + addend
3588                       - (irel->r_offset
3589                          + sec->output_section->vma
3590                          + sec->output_offset
3591                          + 4));
3592 #ifdef DEBUG_RELAX
3593               fprintf (stderr, "relax longjump r_offset 0x%x ptr 0x%x symbol 0x%x addend 0x%x distance 0x%x\n",
3594                        irel->r_offset,
3595                        (irel->r_offset
3596                         + sec->output_section->vma
3597                         + sec->output_offset),
3598                        symval, addend, foff);
3599 #endif
3600               if (foff < -0x100000 || foff >= 0x100000)
3601                 /* After all that work, we can't shorten this function call.  */
3602                 continue;
3603
3604               /* For simplicity of coding, we are going to modify the section
3605                  contents, the section relocs, and the BFD symbol table.  We
3606                  must tell the rest of the code not to free up this
3607                  information.  It would be possible to instead create a table
3608                  of changes which have to be made, as is done in coff-mips.c;
3609                  that would be more work, but would require less memory when
3610                  the linker is run.  */
3611               elf_section_data (sec)->relocs = internal_relocs;
3612               elf_section_data (sec)->this_hdr.contents = contents;
3613               symtab_hdr->contents = (bfd_byte *) isymbuf;
3614
3615               if (foff < -0x100 || foff >= 0x100)
3616                 {
3617                   /* Replace the long jump with a jr.  */
3618
3619                   if (bfd_get_arch (abfd) == bfd_arch_v850_rh850)
3620                     irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_PCR22);
3621                   else
3622                     irel->r_info =
3623                       ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_22_PCREL);
3624
3625                   irel->r_addend = addend;
3626                   addend = 0;
3627
3628                   if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
3629                     /* If this needs to be changed because of future relaxing,
3630                        it will be handled here like other internal IND12W
3631                        relocs.  */
3632                     bfd_put_32 (abfd,
3633                                 0x00000780 | ((addend << 15) & 0xffff0000) | ((addend >> 17) & 0xf),
3634                                 contents + irel->r_offset);
3635                   else
3636                     /* We can't fully resolve this yet, because the external
3637                        symbol value may be changed by future relaxing.
3638                        We let the final link phase handle it.  */
3639                     bfd_put_32 (abfd, 0x00000780, contents + irel->r_offset);
3640
3641                   hi_irelfn->r_info =
3642                         ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
3643                   lo_irelfn->r_info =
3644                         ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
3645                   if (!v850_elf_relax_delete_bytes (abfd, sec,
3646                                                     irel->r_offset + 4, toaddr, 6))
3647                     goto error_return;
3648
3649                   align_pad_size += 6;
3650                 }
3651               else
3652                 {
3653                   /* Replace the long jump with a br.  */
3654
3655                   if (bfd_get_arch (abfd) == bfd_arch_v850_rh850)
3656                     irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_PC9);
3657                   else
3658                     irel->r_info =
3659                       ELF32_R_INFO (ELF32_R_SYM (irel->r_info), R_V850_9_PCREL);
3660
3661                   irel->r_addend = addend;
3662                   addend = 0;
3663
3664                   if (ELF32_R_SYM (hi_irelfn->r_info) < symtab_hdr->sh_info)
3665                     /* If this needs to be changed because of future relaxing,
3666                        it will be handled here like other internal IND12W
3667                        relocs.  */
3668                     bfd_put_16 (abfd,
3669                                 0x0585 | ((addend << 10) & 0xf800) | ((addend << 3) & 0x0070),
3670                                 contents + irel->r_offset);
3671                   else
3672                     /* We can't fully resolve this yet, because the external
3673                        symbol value may be changed by future relaxing.
3674                        We let the final link phase handle it.  */
3675                     bfd_put_16 (abfd, 0x0585, contents + irel->r_offset);
3676
3677                   hi_irelfn->r_info =
3678                         ELF32_R_INFO (ELF32_R_SYM (hi_irelfn->r_info), R_V850_NONE);
3679                   lo_irelfn->r_info =
3680                         ELF32_R_INFO (ELF32_R_SYM (lo_irelfn->r_info), R_V850_NONE);
3681                   if (!v850_elf_relax_delete_bytes (abfd, sec,
3682                                                     irel->r_offset + 2, toaddr, 8))
3683                     goto error_return;
3684
3685                   align_pad_size += 8;
3686                 }
3687             }
3688         }
3689
3690       irelalign = NULL;
3691       for (irel = internal_relocs; irel < irelend; irel++)
3692         {
3693           if (ELF32_R_TYPE (irel->r_info) == (int) R_V850_ALIGN
3694               && irel->r_offset == toaddr)
3695             {
3696               irel->r_offset -= align_pad_size;
3697
3698               if (irelalign == NULL || irelalign->r_addend > irel->r_addend)
3699                 irelalign = irel;
3700             }
3701         }
3702
3703       addr = toaddr;
3704     }
3705
3706   if (!irelalign)
3707     {
3708 #ifdef DEBUG_RELAX
3709       fprintf (stderr, "relax pad %d shorten %d -> %d\n",
3710                align_pad_size,
3711                sec->size,
3712                sec->size - align_pad_size);
3713 #endif
3714       sec->size -= align_pad_size;
3715     }
3716
3717  finish:
3718   if (internal_relocs != NULL
3719       && elf_section_data (sec)->relocs != internal_relocs)
3720     free (internal_relocs);
3721
3722   if (contents != NULL
3723       && elf_section_data (sec)->this_hdr.contents != (unsigned char *) contents)
3724     free (contents);
3725
3726   if (isymbuf != NULL
3727       && symtab_hdr->contents != (bfd_byte *) isymbuf)
3728     free (isymbuf);
3729
3730   return result;
3731
3732  error_return:
3733   result = FALSE;
3734   goto finish;
3735 }
3736
3737 static const struct bfd_elf_special_section v850_elf_special_sections[] =
3738 {
3739   { STRING_COMMA_LEN (".call_table_data"), 0, SHT_PROGBITS,     (SHF_ALLOC + SHF_WRITE) },
3740   { STRING_COMMA_LEN (".call_table_text"), 0, SHT_PROGBITS,     (SHF_ALLOC + SHF_WRITE
3741                                                                  + SHF_EXECINSTR) },
3742   { STRING_COMMA_LEN (".rosdata"),        -2, SHT_PROGBITS,     (SHF_ALLOC
3743                                                                  + SHF_V850_GPREL) },
3744   { STRING_COMMA_LEN (".rozdata"),        -2, SHT_PROGBITS,     (SHF_ALLOC
3745                                                                  + SHF_V850_R0REL) },
3746   { STRING_COMMA_LEN (".sbss"),           -2, SHT_NOBITS,       (SHF_ALLOC + SHF_WRITE
3747                                                                  + SHF_V850_GPREL) },
3748   { STRING_COMMA_LEN (".scommon"),        -2, SHT_V850_SCOMMON, (SHF_ALLOC + SHF_WRITE
3749                                                                  + SHF_V850_GPREL) },
3750   { STRING_COMMA_LEN (".sdata"),          -2, SHT_PROGBITS,     (SHF_ALLOC + SHF_WRITE
3751                                                                  + SHF_V850_GPREL) },
3752   { STRING_COMMA_LEN (".tbss"),           -2, SHT_NOBITS,       (SHF_ALLOC + SHF_WRITE
3753                                                                  + SHF_V850_EPREL) },
3754   { STRING_COMMA_LEN (".tcommon"),        -2, SHT_V850_TCOMMON, (SHF_ALLOC + SHF_WRITE
3755                                                                  + SHF_V850_R0REL) },
3756   { STRING_COMMA_LEN (".tdata"),          -2, SHT_PROGBITS,     (SHF_ALLOC + SHF_WRITE
3757                                                                  + SHF_V850_EPREL) },
3758   { STRING_COMMA_LEN (".zbss"),           -2, SHT_NOBITS,       (SHF_ALLOC + SHF_WRITE
3759                                                                  + SHF_V850_R0REL) },
3760   { STRING_COMMA_LEN (".zcommon"),        -2, SHT_V850_ZCOMMON, (SHF_ALLOC + SHF_WRITE
3761                                                                  + SHF_V850_R0REL) },
3762   { STRING_COMMA_LEN (".zdata"),          -2, SHT_PROGBITS,     (SHF_ALLOC + SHF_WRITE
3763                                                                  + SHF_V850_R0REL) },
3764   { NULL,                     0,           0, 0,                0 }
3765 };
3766 \f
3767 #define TARGET_LITTLE_SYM                       bfd_elf32_v850_vec
3768 #define TARGET_LITTLE_NAME                      "elf32-v850"
3769 #define ELF_ARCH                                bfd_arch_v850
3770 #define ELF_MACHINE_CODE                        EM_V850
3771 #define ELF_MACHINE_ALT1                        EM_CYGNUS_V850
3772 #define ELF_MAXPAGESIZE                         0x1000
3773
3774 #define elf_info_to_howto                       v850_elf_info_to_howto_rela
3775 #define elf_info_to_howto_rel                   v850_elf_info_to_howto_rel
3776
3777 #define elf_backend_check_relocs                v850_elf_check_relocs
3778 #define elf_backend_relocate_section            v850_elf_relocate_section
3779 #define elf_backend_object_p                    v850_elf_object_p
3780 #define elf_backend_final_write_processing      v850_elf_final_write_processing
3781 #define elf_backend_section_from_bfd_section    v850_elf_section_from_bfd_section
3782 #define elf_backend_symbol_processing           v850_elf_symbol_processing
3783 #define elf_backend_add_symbol_hook             v850_elf_add_symbol_hook
3784 #define elf_backend_link_output_symbol_hook     v850_elf_link_output_symbol_hook
3785 #define elf_backend_section_from_shdr           v850_elf_section_from_shdr
3786 #define elf_backend_fake_sections               v850_elf_fake_sections
3787 #define elf_backend_gc_mark_hook                v850_elf_gc_mark_hook
3788 #define elf_backend_special_sections            v850_elf_special_sections
3789
3790 #define elf_backend_can_gc_sections 1
3791 #define elf_backend_rela_normal 1
3792
3793 #define bfd_elf32_bfd_is_local_label_name       v850_elf_is_local_label_name
3794 #define bfd_elf32_bfd_reloc_type_lookup         v850_elf_reloc_type_lookup
3795 #define bfd_elf32_bfd_reloc_name_lookup         v850_elf_reloc_name_lookup
3796 #define bfd_elf32_bfd_merge_private_bfd_data    v850_elf_merge_private_bfd_data
3797 #define bfd_elf32_bfd_set_private_flags         v850_elf_set_private_flags
3798 #define bfd_elf32_bfd_print_private_bfd_data    v850_elf_print_private_bfd_data
3799 #define bfd_elf32_bfd_relax_section             v850_elf_relax_section
3800
3801 #define elf_symbol_leading_char                 '_'
3802
3803 #undef  elf32_bed
3804 #define elf32_bed elf32_v850_bed
3805
3806 #include "elf32-target.h"
3807
3808 /* Map BFD reloc types to V800 ELF reloc types.  */
3809
3810 static const struct v850_elf_reloc_map v800_elf_reloc_map[] =
3811 {
3812   { BFD_RELOC_NONE,                   R_V810_NONE    },
3813   { BFD_RELOC_8,                      R_V810_BYTE    },
3814   { BFD_RELOC_16,                     R_V810_HWORD   },
3815   { BFD_RELOC_32,                     R_V810_WORD    },
3816   { BFD_RELOC_LO16,                   R_V810_WLO     },
3817   { BFD_RELOC_HI16,                   R_V810_WHI     },
3818   { BFD_RELOC_HI16_S,                 R_V810_WHI1    },
3819   { BFD_RELOC_V850_32_PCREL,          R_V850_PC32    },
3820   { BFD_RELOC_V850_22_PCREL,          R_V850_PCR22   },
3821   { BFD_RELOC_V850_17_PCREL,          R_V850_PC17    },
3822   { BFD_RELOC_V850_16_PCREL,          R_V850_PC16U   },
3823   { BFD_RELOC_V850_9_PCREL,           R_V850_PC9     },
3824   { BFD_RELOC_V850_LO16_S1,           R_V810_WLO_1   }, /* Or R_V850_HWLO or R_V850_HWLO_1.  */
3825   { BFD_RELOC_V850_23,                R_V850_WLO23   },
3826   { BFD_RELOC_V850_LO16_SPLIT_OFFSET, R_V850_BLO     },
3827   { BFD_RELOC_V850_ZDA_16_16_OFFSET,  R_V810_HWORD   },
3828   { BFD_RELOC_V850_TDA_16_16_OFFSET,  R_V810_HWORD   },
3829   { BFD_RELOC_V850_SDA_16_16_OFFSET,  R_V810_HWORD   },
3830   { BFD_RELOC_V850_SDA_15_16_OFFSET,  R_V810_GPWLO_1 }
3831 };
3832
3833 /* Map a bfd relocation into the appropriate howto structure.  */
3834
3835 static reloc_howto_type *
3836 v800_elf_reloc_type_lookup (bfd * abfd, bfd_reloc_code_real_type code)
3837 {
3838   unsigned int i;
3839
3840   BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850);
3841
3842   for (i = ARRAY_SIZE (v800_elf_reloc_map); i --;)
3843     if (v800_elf_reloc_map[i].bfd_reloc_val == code)
3844       {
3845         unsigned int elf_reloc_val = v800_elf_reloc_map[i].elf_reloc_val;
3846         unsigned int idx = elf_reloc_val - R_V810_NONE;
3847
3848         BFD_ASSERT (v800_elf_howto_table[idx].type == elf_reloc_val);
3849
3850         return v800_elf_howto_table + idx;
3851       }
3852
3853 #ifdef DEBUG
3854   fprintf (stderr, "failed to find v800 equiv of bfd reloc code %d\n", code);
3855 #endif
3856   return NULL;
3857 }
3858
3859 static reloc_howto_type *
3860 v800_elf_reloc_name_lookup (bfd * abfd, const char * r_name)
3861 {
3862   unsigned int i;
3863
3864   BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850);
3865
3866   for (i = ARRAY_SIZE (v800_elf_howto_table); i--;)
3867     if (v800_elf_howto_table[i].name != NULL
3868         && strcasecmp (v800_elf_howto_table[i].name, r_name) == 0)
3869       return v800_elf_howto_table + i;
3870
3871   return NULL;
3872 }
3873
3874
3875 /* Set the howto pointer in CACHE_PTR for a V800 ELF reloc.  */
3876
3877 static void
3878 v800_elf_info_to_howto (bfd *               abfd,
3879                         arelent *           cache_ptr,
3880                         Elf_Internal_Rela * dst)
3881 {
3882   unsigned int r_type = ELF32_R_TYPE (dst->r_info);
3883
3884   BFD_ASSERT (bfd_get_arch (abfd) == bfd_arch_v850_rh850);
3885
3886   BFD_ASSERT (r_type < (unsigned int) R_V800_max);
3887
3888   if (r_type == R_V800_NONE)
3889     r_type = R_V810_NONE;
3890
3891   BFD_ASSERT (r_type >= (unsigned int) R_V810_NONE);
3892   r_type -= R_V810_NONE;
3893   BFD_ASSERT (r_type < ARRAY_SIZE (v800_elf_howto_table));
3894
3895   cache_ptr->howto = v800_elf_howto_table + r_type;
3896 }
3897 \f
3898
3899 #undef  TARGET_LITTLE_SYM
3900 #define TARGET_LITTLE_SYM                       bfd_elf32_v850_rh850_vec
3901 #undef  TARGET_LITTLE_NAME
3902 #define TARGET_LITTLE_NAME                      "elf32-v850-rh850"
3903 #undef  ELF_ARCH
3904 #define ELF_ARCH                                bfd_arch_v850_rh850
3905 #undef  ELF_MACHINE_CODE
3906 #define ELF_MACHINE_CODE                        EM_V800
3907 #undef  ELF_MACHINE_ALT1
3908
3909 #undef  elf32_bed
3910 #define elf32_bed elf32_v850_rh850_bed
3911
3912 #undef  elf_info_to_howto
3913 #define elf_info_to_howto                       v800_elf_info_to_howto
3914 #undef  elf_info_to_howto_rel
3915 #define elf_info_to_howto_rel                   NULL
3916 #undef  bfd_elf32_bfd_reloc_type_lookup
3917 #define bfd_elf32_bfd_reloc_type_lookup         v800_elf_reloc_type_lookup
3918 #undef  bfd_elf32_bfd_reloc_name_lookup
3919 #define bfd_elf32_bfd_reloc_name_lookup         v800_elf_reloc_name_lookup
3920
3921 #include "elf32-target.h"