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