projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Automatic date update in version.in
[deliverable/binutils-gdb.git] / bfd / elf32-bfin.c
CommitLineData
3b55e94a 1/* ADI Blackfin BFD support for 32-bit ELF.
b90efa5b 2 Copyright (C) 2005-2015 Free Software Foundation, Inc.
0f64bb02
CM		 3
4 This file is part of BFD, the Binary File Descriptor library.
5
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
cd123cb7 8 the Free Software Foundation; either version 3 of the License, or
0f64bb02
CM		 9 (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
cd123cb7
NC		 18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
0f64bb02 20
0f64bb02 21#include "sysdep.h"
3db64b00 22#include "bfd.h"
0f64bb02
CM		 23#include "libbfd.h"
24#include "elf-bfd.h"
25#include "elf/bfin.h"
fa8f86ff 26#include "dwarf2.h"
48d502e1 27#include "hashtab.h"
0f64bb02 28
0f64bb02
CM		 29/* FUNCTION : bfin_pltpc_reloc
30 ABSTRACT : TODO : figure out how to handle pltpc relocs. */
31static bfd_reloc_status_type
32bfin_pltpc_reloc (
33 bfd *abfd ATTRIBUTE_UNUSED,
34 arelent *reloc_entry ATTRIBUTE_UNUSED,
35 asymbol *symbol ATTRIBUTE_UNUSED,
2c3fc389 36 void * data ATTRIBUTE_UNUSED,
0f64bb02
CM		 37 asection *input_section ATTRIBUTE_UNUSED,
38 bfd *output_bfd ATTRIBUTE_UNUSED,
3b55e94a 39 char **error_message ATTRIBUTE_UNUSED)
0f64bb02
CM		 40{
41 bfd_reloc_status_type flag = bfd_reloc_ok;
3b55e94a 42 return flag;
0f64bb02
CM		 43}
44\f
45
46static bfd_reloc_status_type
47bfin_pcrel24_reloc (bfd *abfd,
48 arelent *reloc_entry,
49 asymbol *symbol,
2c3fc389 50 void * data,
0f64bb02
CM		 51 asection *input_section,
52 bfd *output_bfd,
53 char **error_message ATTRIBUTE_UNUSED)
54{
55 bfd_vma relocation;
56 bfd_size_type addr = reloc_entry->address;
57 bfd_vma output_base = 0;
58 reloc_howto_type *howto = reloc_entry->howto;
59 asection *output_section;
60 bfd_boolean relocatable = (output_bfd != NULL);
61
62 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
63 return bfd_reloc_outofrange;
64
3b55e94a
BS		 65 if (bfd_is_und_section (symbol->section)
66 && (symbol->flags & BSF_WEAK) == 0
67 && !relocatable)
68 return bfd_reloc_undefined;
69
70 if (bfd_is_com_section (symbol->section))
71 relocation = 0;
0f64bb02 72 else
3b55e94a 73 relocation = symbol->value;
0f64bb02 74
3b55e94a
BS		 75 output_section = symbol->section->output_section;
76
77 if (relocatable)
78 output_base = 0;
79 else
80 output_base = output_section->vma;
81
82 if (!relocatable || !strcmp (symbol->name, symbol->section->name))
83 relocation += output_base + symbol->section->output_offset;
0f64bb02 84
3b55e94a
BS		 85 if (!relocatable && !strcmp (symbol->name, symbol->section->name))
86 relocation += reloc_entry->addend;
0f64bb02 87
0f64bb02
CM		 88 relocation -= input_section->output_section->vma + input_section->output_offset;
89 relocation -= reloc_entry->address;
90
91 if (howto->complain_on_overflow != complain_overflow_dont)
92 {
93 bfd_reloc_status_type status;
3b55e94a
BS		 94 status = bfd_check_overflow (howto->complain_on_overflow,
95 howto->bitsize,
96 howto->rightshift,
97 bfd_arch_bits_per_address(abfd),
98 relocation);
0f64bb02
CM		 99 if (status != bfd_reloc_ok)
100 return status;
101 }
3b55e94a 102
0f64bb02
CM		 103 /* if rightshift is 1 and the number odd, return error. */
104 if (howto->rightshift && (relocation & 0x01))
105 {
4a97a0e5 106 (*_bfd_error_handler) (_("relocation should be even number"));
0f64bb02
CM		 107 return bfd_reloc_overflow;
108 }
109
110 relocation >>= (bfd_vma) howto->rightshift;
111 /* Shift everything up to where it's going to be used. */
112
113 relocation <<= (bfd_vma) howto->bitpos;
114
115 if (relocatable)
116 {
117 reloc_entry->address += input_section->output_offset;
118 reloc_entry->addend += symbol->section->output_offset;
119 }
120
121 {
122 short x;
123
124 /* We are getting reloc_entry->address 2 byte off from
3b55e94a
BS		 125 the start of instruction. Assuming absolute postion
126 of the reloc data. But, following code had been written assuming
127 reloc address is starting at begining of instruction.
128 To compensate that I have increased the value of
129 relocation by 1 (effectively 2) and used the addr -2 instead of addr. */
0f64bb02
CM		 130
131 relocation += 1;
132 x = bfd_get_16 (abfd, (bfd_byte *) data + addr - 2);
133 x = (x & 0xff00) | ((relocation >> 16) & 0xff);
134 bfd_put_16 (abfd, x, (unsigned char *) data + addr - 2);
135
136 x = bfd_get_16 (abfd, (bfd_byte *) data + addr);
137 x = relocation & 0xFFFF;
138 bfd_put_16 (abfd, x, (unsigned char *) data + addr );
139 }
140 return bfd_reloc_ok;
141}
142
143static bfd_reloc_status_type
3b55e94a
BS		 144bfin_imm16_reloc (bfd *abfd,
145 arelent *reloc_entry,
146 asymbol *symbol,
2c3fc389 147 void * data,
3b55e94a
BS		 148 asection *input_section,
149 bfd *output_bfd,
150 char **error_message ATTRIBUTE_UNUSED)
0f64bb02 151{
3b55e94a
BS		 152 bfd_vma relocation, x;
153 bfd_size_type reloc_addr = reloc_entry->address;
0f64bb02 154 bfd_vma output_base = 0;
3b55e94a 155 reloc_howto_type *howto = reloc_entry->howto;
0f64bb02
CM		 156 asection *output_section;
157 bfd_boolean relocatable = (output_bfd != NULL);
158
3b55e94a
BS		 159 /* Is the address of the relocation really within the section? */
160 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
161 return bfd_reloc_outofrange;
162
0f64bb02
CM		 163 if (bfd_is_und_section (symbol->section)
164 && (symbol->flags & BSF_WEAK) == 0
165 && !relocatable)
166 return bfd_reloc_undefined;
167
0f64bb02 168 output_section = symbol->section->output_section;
3b55e94a 169 relocation = symbol->value;
0f64bb02
CM		 170
171 /* Convert input-section-relative symbol value to absolute. */
172 if (relocatable)
173 output_base = 0;
174 else
175 output_base = output_section->vma;
176
3b55e94a 177 if (!relocatable || !strcmp (symbol->name, symbol->section->name))
0f64bb02
CM		 178 relocation += output_base + symbol->section->output_offset;
179
180 /* Add in supplied addend. */
181 relocation += reloc_entry->addend;
182
183 if (relocatable)
184 {
185 reloc_entry->address += input_section->output_offset;
186 reloc_entry->addend += symbol->section->output_offset;
187 }
0f64bb02
CM		 188 else
189 {
190 reloc_entry->addend = 0;
191 }
192
193 if (howto->complain_on_overflow != complain_overflow_dont)
194 {
195 bfd_reloc_status_type flag;
196 flag = bfd_check_overflow (howto->complain_on_overflow,
3b55e94a
BS		 197 howto->bitsize,
198 howto->rightshift,
199 bfd_arch_bits_per_address(abfd),
200 relocation);
0f64bb02 201 if (flag != bfd_reloc_ok)
3b55e94a 202 return flag;
0f64bb02
CM		 203 }
204
0f64bb02
CM		 205 /* Here the variable relocation holds the final address of the
206 symbol we are relocating against, plus any addend. */
207
0f64bb02
CM		 208 relocation >>= (bfd_vma) howto->rightshift;
209 x = relocation;
210 bfd_put_16 (abfd, x, (unsigned char *) data + reloc_addr);
211 return bfd_reloc_ok;
212}
213
214
215static bfd_reloc_status_type
216bfin_byte4_reloc (bfd *abfd,
217 arelent *reloc_entry,
218 asymbol *symbol,
2c3fc389 219 void * data,
0f64bb02
CM		 220 asection *input_section,
221 bfd *output_bfd,
3b55e94a 222 char **error_message ATTRIBUTE_UNUSED)
0f64bb02
CM		 223{
224 bfd_vma relocation, x;
225 bfd_size_type addr = reloc_entry->address;
226 bfd_vma output_base = 0;
227 asection *output_section;
228 bfd_boolean relocatable = (output_bfd != NULL);
229
230 /* Is the address of the relocation really within the section? */
231 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
232 return bfd_reloc_outofrange;
233
3b55e94a
BS		 234 if (bfd_is_und_section (symbol->section)
235 && (symbol->flags & BSF_WEAK) == 0
236 && !relocatable)
237 return bfd_reloc_undefined;
0f64bb02 238
3b55e94a
BS		 239 output_section = symbol->section->output_section;
240 relocation = symbol->value;
241 /* Convert input-section-relative symbol value to absolute. */
242 if (relocatable)
243 output_base = 0;
0f64bb02 244 else
3b55e94a
BS		 245 output_base = output_section->vma;
246
247 if ((symbol->name
248 && symbol->section->name
249 && !strcmp (symbol->name, symbol->section->name))
250 || !relocatable)
0f64bb02 251 {
3b55e94a 252 relocation += output_base + symbol->section->output_offset;
0f64bb02
CM		 253 }
254
3b55e94a
BS		 255 relocation += reloc_entry->addend;
256
0f64bb02 257 if (relocatable)
3b55e94a 258 {
0f64bb02
CM		 259 /* This output will be relocatable ... like ld -r. */
260 reloc_entry->address += input_section->output_offset;
261 reloc_entry->addend += symbol->section->output_offset;
262 }
263 else
264 {
265 reloc_entry->addend = 0;
266 }
267
268 /* Here the variable relocation holds the final address of the
269 symbol we are relocating against, plus any addend. */
270 x = relocation & 0xFFFF0000;
271 x >>=16;
272 bfd_put_16 (abfd, x, (unsigned char *) data + addr + 2);
3b55e94a 273
0f64bb02
CM		 274 x = relocation & 0x0000FFFF;
275 bfd_put_16 (abfd, x, (unsigned char *) data + addr);
276 return bfd_reloc_ok;
277}
278
279/* bfin_bfd_reloc handles the blackfin arithmetic relocations.
280 Use this instead of bfd_perform_relocation. */
281static bfd_reloc_status_type
282bfin_bfd_reloc (bfd *abfd,
283 arelent *reloc_entry,
284 asymbol *symbol,
2c3fc389 285 void * data,
0f64bb02
CM		 286 asection *input_section,
287 bfd *output_bfd,
288 char **error_message ATTRIBUTE_UNUSED)
289{
290 bfd_vma relocation;
291 bfd_size_type addr = reloc_entry->address;
292 bfd_vma output_base = 0;
293 reloc_howto_type *howto = reloc_entry->howto;
294 asection *output_section;
295 bfd_boolean relocatable = (output_bfd != NULL);
296
297 /* Is the address of the relocation really within the section? */
298 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
299 return bfd_reloc_outofrange;
300
3b55e94a
BS		 301 if (bfd_is_und_section (symbol->section)
302 && (symbol->flags & BSF_WEAK) == 0
303 && !relocatable)
304 return bfd_reloc_undefined;
305
306 /* Get symbol value. (Common symbols are special.) */
307 if (bfd_is_com_section (symbol->section))
308 relocation = 0;
0f64bb02 309 else
3b55e94a
BS		 310 relocation = symbol->value;
311
312 output_section = symbol->section->output_section;
313
314 /* Convert input-section-relative symbol value to absolute. */
315 if (relocatable)
316 output_base = 0;
317 else
318 output_base = output_section->vma;
319
320 if (!relocatable || !strcmp (symbol->name, symbol->section->name))
321 relocation += output_base + symbol->section->output_offset;
322
323 if (!relocatable && !strcmp (symbol->name, symbol->section->name))
0f64bb02 324 {
3b55e94a
BS		 325 /* Add in supplied addend. */
326 relocation += reloc_entry->addend;
0f64bb02 327 }
3b55e94a 328
0f64bb02
CM		 329 /* Here the variable relocation holds the final address of the
330 symbol we are relocating against, plus any addend. */
331
332 if (howto->pc_relative == TRUE)
333 {
334 relocation -= input_section->output_section->vma + input_section->output_offset;
335
336 if (howto->pcrel_offset == TRUE)
337 relocation -= reloc_entry->address;
338 }
339
340 if (relocatable)
341 {
342 reloc_entry->address += input_section->output_offset;
343 reloc_entry->addend += symbol->section->output_offset;
344 }
345
346 if (howto->complain_on_overflow != complain_overflow_dont)
347 {
348 bfd_reloc_status_type status;
349
3b55e94a 350 status = bfd_check_overflow (howto->complain_on_overflow,
0f64bb02 351 howto->bitsize,
3b55e94a 352 howto->rightshift,
0f64bb02
CM		 353 bfd_arch_bits_per_address(abfd),
354 relocation);
355 if (status != bfd_reloc_ok)
356 return status;
357 }
3b55e94a 358
0f64bb02
CM		 359 /* If rightshift is 1 and the number odd, return error. */
360 if (howto->rightshift && (relocation & 0x01))
361 {
4a97a0e5 362 (*_bfd_error_handler) (_("relocation should be even number"));
0f64bb02
CM		 363 return bfd_reloc_overflow;
364 }
365
366 relocation >>= (bfd_vma) howto->rightshift;
367
368 /* Shift everything up to where it's going to be used. */
369
370 relocation <<= (bfd_vma) howto->bitpos;
371
3b55e94a 372#define DOIT(x) \
0f64bb02
CM		 373 x = ( (x & ~howto->dst_mask) | (relocation & howto->dst_mask))
374
375 /* handle 8 and 16 bit relocations here. */
376 switch (howto->size)
377 {
378 case 0:
379 {
380 char x = bfd_get_8 (abfd, (char *) data + addr);
381 DOIT (x);
382 bfd_put_8 (abfd, x, (unsigned char *) data + addr);
383 }
384 break;
385
386 case 1:
387 {
388 unsigned short x = bfd_get_16 (abfd, (bfd_byte *) data + addr);
389 DOIT (x);
390 bfd_put_16 (abfd, (bfd_vma) x, (unsigned char *) data + addr);
391 }
392 break;
393
394 default:
395 return bfd_reloc_other;
396 }
397
3b55e94a 398 return bfd_reloc_ok;
0f64bb02
CM		 399}
400
0f64bb02
CM		 401/* HOWTO Table for blackfin.
402 Blackfin relocations are fairly complicated.
403 Some of the salient features are
404 a. Even numbered offsets. A number of (not all) relocations are
405 even numbered. This means that the rightmost bit is not stored.
406 Needs to right shift by 1 and check to see if value is not odd
407 b. A relocation can be an expression. An expression takes on
408 a variety of relocations arranged in a stack.
409 As a result, we cannot use the standard generic function as special
410 function. We will have our own, which is very similar to the standard
411 generic function except that it understands how to get the value from
412 the relocation stack. . */
413
414#define BFIN_RELOC_MIN 0
48d502e1 415#define BFIN_RELOC_MAX 0x21
0f64bb02
CM		 416#define BFIN_GNUEXT_RELOC_MIN 0x40
417#define BFIN_GNUEXT_RELOC_MAX 0x43
418#define BFIN_ARELOC_MIN 0xE0
419#define BFIN_ARELOC_MAX 0xF3
420
421static reloc_howto_type bfin_howto_table [] =
422{
423 /* This reloc does nothing. . */
cb88ce9f 424 HOWTO (R_BFIN_UNUSED0, /* type. */
0f64bb02 425 0, /* rightshift. */
6346d5ca
AM		 426 3, /* size (0 = byte, 1 = short, 2 = long). */
427 0, /* bitsize. */
0f64bb02
CM		 428 FALSE, /* pc_relative. */
429 0, /* bitpos. */
6346d5ca 430 complain_overflow_dont, /* complain_on_overflow. */
0f64bb02 431 bfd_elf_generic_reloc, /* special_function. */
cb88ce9f 432 "R_BFIN_UNUSED0", /* name. */
0f64bb02
CM		 433 FALSE, /* partial_inplace. */
434 0, /* src_mask. */
435 0, /* dst_mask. */
436 FALSE), /* pcrel_offset. */
437
cb88ce9f 438 HOWTO (R_BFIN_PCREL5M2, /* type. */
0f64bb02
CM		 439 1, /* rightshift. */
440 1, /* size (0 = byte, 1 = short, 2 = long).. */
441 4, /* bitsize. */
442 TRUE, /* pc_relative. */
443 0, /* bitpos. */
444 complain_overflow_unsigned, /* complain_on_overflow. */
445 bfin_bfd_reloc, /* special_function. */
cb88ce9f 446 "R_BFIN_PCREL5M2", /* name. */
0f64bb02 447 FALSE, /* partial_inplace. */
f4707595 448 0, /* src_mask. */
0f64bb02
CM		 449 0x0000000F, /* dst_mask. */
450 FALSE), /* pcrel_offset. */
451
cb88ce9f 452 HOWTO (R_BFIN_UNUSED1, /* type. */
0f64bb02 453 0, /* rightshift. */
6346d5ca
AM		 454 3, /* size (0 = byte, 1 = short, 2 = long). */
455 0, /* bitsize. */
0f64bb02
CM		 456 FALSE, /* pc_relative. */
457 0, /* bitpos. */
6346d5ca 458 complain_overflow_dont, /* complain_on_overflow. */
0f64bb02 459 bfd_elf_generic_reloc, /* special_function. */
cb88ce9f 460 "R_BFIN_UNUSED1", /* name. */
0f64bb02
CM		 461 FALSE, /* partial_inplace. */
462 0, /* src_mask. */
463 0, /* dst_mask. */
464 FALSE), /* pcrel_offset. */
465
cb88ce9f 466 HOWTO (R_BFIN_PCREL10, /* type. */
0f64bb02
CM		 467 1, /* rightshift. */
468 1, /* size (0 = byte, 1 = short, 2 = long). */
469 10, /* bitsize. */
470 TRUE, /* pc_relative. */
471 0, /* bitpos. */
472 complain_overflow_signed, /* complain_on_overflow. */
473 bfin_bfd_reloc, /* special_function. */
cb88ce9f 474 "R_BFIN_PCREL10", /* name. */
0f64bb02 475 FALSE, /* partial_inplace. */
f4707595 476 0, /* src_mask. */
0f64bb02
CM		 477 0x000003FF, /* dst_mask. */
478 TRUE), /* pcrel_offset. */
3b55e94a 479
cb88ce9f 480 HOWTO (R_BFIN_PCREL12_JUMP, /* type. */
0f64bb02
CM		 481 1, /* rightshift. */
482 /* the offset is actually 13 bit
483 aligned on a word boundary so
484 only 12 bits have to be used.
485 Right shift the rightmost bit.. */
486 1, /* size (0 = byte, 1 = short, 2 = long). */
487 12, /* bitsize. */
488 TRUE, /* pc_relative. */
489 0, /* bitpos. */
490 complain_overflow_signed, /* complain_on_overflow. */
491 bfin_bfd_reloc, /* special_function. */
cb88ce9f 492 "R_BFIN_PCREL12_JUMP", /* name. */
0f64bb02 493 FALSE, /* partial_inplace. */
f4707595 494 0, /* src_mask. */
0f64bb02
CM		 495 0x0FFF, /* dst_mask. */
496 TRUE), /* pcrel_offset. */
497
cb88ce9f 498 HOWTO (R_BFIN_RIMM16, /* type. */
0f64bb02
CM		 499 0, /* rightshift. */
500 1, /* size (0 = byte, 1 = short, 2 = long). */
501 16, /* bitsize. */
502 FALSE, /* pc_relative. */
503 0, /* bitpos. */
504 complain_overflow_signed, /* complain_on_overflow. */
505 bfin_imm16_reloc, /* special_function. */
cb88ce9f 506 "R_BFIN_RIMM16", /* name. */
0f64bb02 507 FALSE, /* partial_inplace. */
f4707595 508 0, /* src_mask. */
0f64bb02
CM		 509 0x0000FFFF, /* dst_mask. */
510 TRUE), /* pcrel_offset. */
511
cb88ce9f 512 HOWTO (R_BFIN_LUIMM16, /* type. */
0f64bb02
CM		 513 0, /* rightshift. */
514 1, /* size (0 = byte, 1 = short, 2 = long). */
515 16, /* bitsize. */
516 FALSE, /* pc_relative. */
517 0, /* bitpos. */
518 complain_overflow_dont, /* complain_on_overflow. */
519 bfin_imm16_reloc, /* special_function. */
cb88ce9f 520 "R_BFIN_LUIMM16", /* name. */
0f64bb02 521 FALSE, /* partial_inplace. */
f4707595 522 0, /* src_mask. */
0f64bb02
CM		 523 0x0000FFFF, /* dst_mask. */
524 TRUE), /* pcrel_offset. */
3b55e94a 525
cb88ce9f 526 HOWTO (R_BFIN_HUIMM16, /* type. */
0f64bb02
CM		 527 16, /* rightshift. */
528 1, /* size (0 = byte, 1 = short, 2 = long). */
529 16, /* bitsize. */
530 FALSE, /* pc_relative. */
531 0, /* bitpos. */
532 complain_overflow_unsigned, /* complain_on_overflow. */
533 bfin_imm16_reloc, /* special_function. */
cb88ce9f 534 "R_BFIN_HUIMM16", /* name. */
0f64bb02 535 FALSE, /* partial_inplace. */
f4707595 536 0, /* src_mask. */
0f64bb02
CM		 537 0x0000FFFF, /* dst_mask. */
538 TRUE), /* pcrel_offset. */
539
cb88ce9f 540 HOWTO (R_BFIN_PCREL12_JUMP_S, /* type. */
0f64bb02
CM		 541 1, /* rightshift. */
542 1, /* size (0 = byte, 1 = short, 2 = long). */
543 12, /* bitsize. */
544 TRUE, /* pc_relative. */
545 0, /* bitpos. */
546 complain_overflow_signed, /* complain_on_overflow. */
547 bfin_bfd_reloc, /* special_function. */
cb88ce9f 548 "R_BFIN_PCREL12_JUMP_S", /* name. */
0f64bb02 549 FALSE, /* partial_inplace. */
f4707595 550 0, /* src_mask. */
0f64bb02
CM		 551 0x00000FFF, /* dst_mask. */
552 TRUE), /* pcrel_offset. */
553
cb88ce9f 554 HOWTO (R_BFIN_PCREL24_JUMP_X, /* type. */
0f64bb02
CM		 555 1, /* rightshift. */
556 2, /* size (0 = byte, 1 = short, 2 = long). */
557 24, /* bitsize. */
558 TRUE, /* pc_relative. */
559 0, /* bitpos. */
560 complain_overflow_signed, /* complain_on_overflow. */
561 bfin_pcrel24_reloc, /* special_function. */
cb88ce9f 562 "R_BFIN_PCREL24_JUMP_X", /* name. */
0f64bb02 563 FALSE, /* partial_inplace. */
f4707595 564 0, /* src_mask. */
0f64bb02
CM		 565 0x00FFFFFF, /* dst_mask. */
566 TRUE), /* pcrel_offset. */
567
cb88ce9f 568 HOWTO (R_BFIN_PCREL24, /* type. */
0f64bb02
CM		 569 1, /* rightshift. */
570 2, /* size (0 = byte, 1 = short, 2 = long). */
571 24, /* bitsize. */
572 TRUE, /* pc_relative. */
573 0, /* bitpos. */
574 complain_overflow_signed, /* complain_on_overflow. */
575 bfin_pcrel24_reloc, /* special_function. */
cb88ce9f 576 "R_BFIN_PCREL24", /* name. */
0f64bb02 577 FALSE, /* partial_inplace. */
f4707595 578 0, /* src_mask. */
0f64bb02
CM		 579 0x00FFFFFF, /* dst_mask. */
580 TRUE), /* pcrel_offset. */
581
cb88ce9f 582 HOWTO (R_BFIN_UNUSEDB, /* type. */
0f64bb02 583 0, /* rightshift. */
6346d5ca
AM		 584 3, /* size (0 = byte, 1 = short, 2 = long). */
585 0, /* bitsize. */
0f64bb02
CM		 586 FALSE, /* pc_relative. */
587 0, /* bitpos. */
588 complain_overflow_dont, /* complain_on_overflow. */
589 bfd_elf_generic_reloc, /* special_function. */
cb88ce9f 590 "R_BFIN_UNUSEDB", /* name. */
0f64bb02
CM		 591 FALSE, /* partial_inplace. */
592 0, /* src_mask. */
593 0, /* dst_mask. */
594 FALSE), /* pcrel_offset. */
595
cb88ce9f 596 HOWTO (R_BFIN_UNUSEDC, /* type. */
0f64bb02 597 0, /* rightshift. */
6346d5ca
AM		 598 3, /* size (0 = byte, 1 = short, 2 = long). */
599 0, /* bitsize. */
0f64bb02
CM		 600 FALSE, /* pc_relative. */
601 0, /* bitpos. */
602 complain_overflow_dont, /* complain_on_overflow. */
603 bfd_elf_generic_reloc, /* special_function. */
cb88ce9f 604 "R_BFIN_UNUSEDC", /* name. */
0f64bb02
CM		 605 FALSE, /* partial_inplace. */
606 0, /* src_mask. */
607 0, /* dst_mask. */
608 FALSE), /* pcrel_offset. */
609
cb88ce9f 610 HOWTO (R_BFIN_PCREL24_JUMP_L, /* type. */
0f64bb02
CM		 611 1, /* rightshift. */
612 2, /* size (0 = byte, 1 = short, 2 = long). */
613 24, /* bitsize. */
614 TRUE, /* pc_relative. */
615 0, /* bitpos. */
616 complain_overflow_signed, /* complain_on_overflow. */
617 bfin_pcrel24_reloc, /* special_function. */
cb88ce9f 618 "R_BFIN_PCREL24_JUMP_L", /* name. */
0f64bb02 619 FALSE, /* partial_inplace. */
f4707595 620 0, /* src_mask. */
0f64bb02
CM		 621 0x00FFFFFF, /* dst_mask. */
622 TRUE), /* pcrel_offset. */
623
cb88ce9f 624 HOWTO (R_BFIN_PCREL24_CALL_X, /* type. */
0f64bb02
CM		 625 1, /* rightshift. */
626 2, /* size (0 = byte, 1 = short, 2 = long). */
627 24, /* bitsize. */
628 TRUE, /* pc_relative. */
629 0, /* bitpos. */
630 complain_overflow_signed, /* complain_on_overflow. */
631 bfin_pcrel24_reloc, /* special_function. */
cb88ce9f 632 "R_BFIN_PCREL24_CALL_X", /* name. */
0f64bb02 633 FALSE, /* partial_inplace. */
f4707595 634 0, /* src_mask. */
0f64bb02
CM		 635 0x00FFFFFF, /* dst_mask. */
636 TRUE), /* pcrel_offset. */
637
cb88ce9f 638 HOWTO (R_BFIN_VAR_EQ_SYMB, /* type. */
0f64bb02
CM		 639 0, /* rightshift. */
640 2, /* size (0 = byte, 1 = short, 2 = long). */
641 32, /* bitsize. */
642 FALSE, /* pc_relative. */
643 0, /* bitpos. */
644 complain_overflow_bitfield, /* complain_on_overflow. */
645 bfin_bfd_reloc, /* special_function. */
cb88ce9f 646 "R_BFIN_VAR_EQ_SYMB", /* name. */
0f64bb02
CM		 647 FALSE, /* partial_inplace. */
648 0, /* src_mask. */
649 0, /* dst_mask. */
650 FALSE), /* pcrel_offset. */
651
cb88ce9f 652 HOWTO (R_BFIN_BYTE_DATA, /* type. */
0f64bb02
CM		 653 0, /* rightshift. */
654 0, /* size (0 = byte, 1 = short, 2 = long). */
655 8, /* bitsize. */
656 FALSE, /* pc_relative. */
657 0, /* bitpos. */
658 complain_overflow_unsigned, /* complain_on_overflow. */
659 bfin_bfd_reloc, /* special_function. */
cb88ce9f 660 "R_BFIN_BYTE_DATA", /* name. */
0f64bb02 661 FALSE, /* partial_inplace. */
f4707595 662 0, /* src_mask. */
0f64bb02
CM		 663 0xFF, /* dst_mask. */
664 TRUE), /* pcrel_offset. */
665
cb88ce9f 666 HOWTO (R_BFIN_BYTE2_DATA, /* type. */
0f64bb02
CM		 667 0, /* rightshift. */
668 1, /* size (0 = byte, 1 = short, 2 = long). */
669 16, /* bitsize. */
670 FALSE, /* pc_relative. */
671 0, /* bitpos. */
672 complain_overflow_signed, /* complain_on_overflow. */
673 bfin_bfd_reloc, /* special_function. */
cb88ce9f 674 "R_BFIN_BYTE2_DATA", /* name. */
0f64bb02 675 FALSE, /* partial_inplace. */
f4707595 676 0, /* src_mask. */
0f64bb02
CM		 677 0xFFFF, /* dst_mask. */
678 TRUE), /* pcrel_offset. */
679
cb88ce9f 680 HOWTO (R_BFIN_BYTE4_DATA, /* type. */
0f64bb02
CM		 681 0, /* rightshift. */
682 2, /* size (0 = byte, 1 = short, 2 = long). */
683 32, /* bitsize. */
684 FALSE, /* pc_relative. */
685 0, /* bitpos. */
686 complain_overflow_unsigned, /* complain_on_overflow. */
687 bfin_byte4_reloc, /* special_function. */
cb88ce9f 688 "R_BFIN_BYTE4_DATA", /* name. */
0f64bb02 689 FALSE, /* partial_inplace. */
f4707595 690 0, /* src_mask. */
0f64bb02
CM		 691 0xFFFFFFFF, /* dst_mask. */
692 TRUE), /* pcrel_offset. */
693
cb88ce9f 694 HOWTO (R_BFIN_PCREL11, /* type. */
0f64bb02
CM		 695 1, /* rightshift. */
696 1, /* size (0 = byte, 1 = short, 2 = long). */
697 10, /* bitsize. */
698 TRUE, /* pc_relative. */
699 0, /* bitpos. */
700 complain_overflow_unsigned, /* complain_on_overflow. */
701 bfin_bfd_reloc, /* special_function. */
cb88ce9f 702 "R_BFIN_PCREL11", /* name. */
0f64bb02 703 FALSE, /* partial_inplace. */
f4707595 704 0, /* src_mask. */
0f64bb02
CM		 705 0x000003FF, /* dst_mask. */
706 FALSE), /* pcrel_offset. */
48d502e1
BS		 707
708
709 /* A 18-bit signed operand with the GOT offset for the address of
710 the symbol. */
711 HOWTO (R_BFIN_GOT17M4, /* type */
712 2, /* rightshift */
713 1, /* size (0 = byte, 1 = short, 2 = long) */
714 16, /* bitsize */
715 FALSE, /* pc_relative */
716 0, /* bitpos */
717 complain_overflow_signed, /* complain_on_overflow */
718 bfd_elf_generic_reloc, /* special_function */
5dff4664 719 "R_BFIN_GOT17M4", /* name */
48d502e1
BS		 720 FALSE, /* partial_inplace */
721 0xffff, /* src_mask */
722 0xffff, /* dst_mask */
723 FALSE), /* pcrel_offset */
724
725 /* The upper 16 bits of the GOT offset for the address of the
726 symbol. */
727 HOWTO (R_BFIN_GOTHI, /* type */
728 0, /* rightshift */
729 1, /* size (0 = byte, 1 = short, 2 = long) */
730 16, /* bitsize */
731 FALSE, /* pc_relative */
732 0, /* bitpos */
733 complain_overflow_dont, /* complain_on_overflow */
734 bfd_elf_generic_reloc, /* special_function */
735 "R_BFIN_GOTHI", /* name */
736 FALSE, /* partial_inplace */
737 0xffff, /* src_mask */
738 0xffff, /* dst_mask */
739 FALSE), /* pcrel_offset */
740
741 /* The lower 16 bits of the GOT offset for the address of the
742 symbol. */
743 HOWTO (R_BFIN_GOTLO, /* type */
744 0, /* rightshift */
745 1, /* size (0 = byte, 1 = short, 2 = long) */
746 16, /* bitsize */
747 FALSE, /* pc_relative */
748 0, /* bitpos */
749 complain_overflow_dont, /* complain_on_overflow */
750 bfd_elf_generic_reloc, /* special_function */
751 "R_BFIN_GOTLO", /* name */
752 FALSE, /* partial_inplace */
753 0xffff, /* src_mask */
754 0xffff, /* dst_mask */
755 FALSE), /* pcrel_offset */
756
757 /* The 32-bit address of the canonical descriptor of a function. */
758 HOWTO (R_BFIN_FUNCDESC, /* type */
759 0, /* rightshift */
760 2, /* size (0 = byte, 1 = short, 2 = long) */
761 32, /* bitsize */
762 FALSE, /* pc_relative */
763 0, /* bitpos */
764 complain_overflow_bitfield, /* complain_on_overflow */
765 bfd_elf_generic_reloc, /* special_function */
766 "R_BFIN_FUNCDESC", /* name */
767 FALSE, /* partial_inplace */
768 0xffffffff, /* src_mask */
769 0xffffffff, /* dst_mask */
770 FALSE), /* pcrel_offset */
771
772 /* A 12-bit signed operand with the GOT offset for the address of
773 canonical descriptor of a function. */
774 HOWTO (R_BFIN_FUNCDESC_GOT17M4, /* type */
775 2, /* rightshift */
776 1, /* size (0 = byte, 1 = short, 2 = long) */
777 16, /* bitsize */
778 FALSE, /* pc_relative */
779 0, /* bitpos */
780 complain_overflow_signed, /* complain_on_overflow */
781 bfd_elf_generic_reloc, /* special_function */
782 "R_BFIN_FUNCDESC_GOT17M4", /* name */
783 FALSE, /* partial_inplace */
784 0xffff, /* src_mask */
785 0xffff, /* dst_mask */
786 FALSE), /* pcrel_offset */
787
788 /* The upper 16 bits of the GOT offset for the address of the
789 canonical descriptor of a function. */
790 HOWTO (R_BFIN_FUNCDESC_GOTHI, /* type */
791 0, /* rightshift */
792 1, /* size (0 = byte, 1 = short, 2 = long) */
793 16, /* bitsize */
794 FALSE, /* pc_relative */
795 0, /* bitpos */
796 complain_overflow_dont, /* complain_on_overflow */
797 bfd_elf_generic_reloc, /* special_function */
798 "R_BFIN_FUNCDESC_GOTHI", /* name */
799 FALSE, /* partial_inplace */
800 0xffff, /* src_mask */
801 0xffff, /* dst_mask */
802 FALSE), /* pcrel_offset */
803
804 /* The lower 16 bits of the GOT offset for the address of the
805 canonical descriptor of a function. */
806 HOWTO (R_BFIN_FUNCDESC_GOTLO, /* type */
807 0, /* rightshift */
808 1, /* size (0 = byte, 1 = short, 2 = long) */
809 16, /* bitsize */
810 FALSE, /* pc_relative */
811 0, /* bitpos */
812 complain_overflow_dont, /* complain_on_overflow */
813 bfd_elf_generic_reloc, /* special_function */
814 "R_BFIN_FUNCDESC_GOTLO", /* name */
815 FALSE, /* partial_inplace */
816 0xffff, /* src_mask */
817 0xffff, /* dst_mask */
818 FALSE), /* pcrel_offset */
819
820 /* The 32-bit address of the canonical descriptor of a function. */
821 HOWTO (R_BFIN_FUNCDESC_VALUE, /* type */
822 0, /* rightshift */
823 2, /* size (0 = byte, 1 = short, 2 = long) */
824 64, /* bitsize */
825 FALSE, /* pc_relative */
826 0, /* bitpos */
827 complain_overflow_bitfield, /* complain_on_overflow */
828 bfd_elf_generic_reloc, /* special_function */
829 "R_BFIN_FUNCDESC_VALUE", /* name */
830 FALSE, /* partial_inplace */
831 0xffffffff, /* src_mask */
832 0xffffffff, /* dst_mask */
833 FALSE), /* pcrel_offset */
834
835 /* A 12-bit signed operand with the GOT offset for the address of
836 canonical descriptor of a function. */
837 HOWTO (R_BFIN_FUNCDESC_GOTOFF17M4, /* type */
838 2, /* rightshift */
839 1, /* size (0 = byte, 1 = short, 2 = long) */
840 16, /* bitsize */
841 FALSE, /* pc_relative */
842 0, /* bitpos */
843 complain_overflow_signed, /* complain_on_overflow */
844 bfd_elf_generic_reloc, /* special_function */
845 "R_BFIN_FUNCDESC_GOTOFF17M4", /* name */
846 FALSE, /* partial_inplace */
847 0xffff, /* src_mask */
848 0xffff, /* dst_mask */
849 FALSE), /* pcrel_offset */
850
851 /* The upper 16 bits of the GOT offset for the address of the
852 canonical descriptor of a function. */
853 HOWTO (R_BFIN_FUNCDESC_GOTOFFHI, /* type */
854 0, /* rightshift */
855 1, /* size (0 = byte, 1 = short, 2 = long) */
856 16, /* bitsize */
857 FALSE, /* pc_relative */
858 0, /* bitpos */
859 complain_overflow_dont, /* complain_on_overflow */
860 bfd_elf_generic_reloc, /* special_function */
861 "R_BFIN_FUNCDESC_GOTOFFHI", /* name */
862 FALSE, /* partial_inplace */
863 0xffff, /* src_mask */
864 0xffff, /* dst_mask */
865 FALSE), /* pcrel_offset */
866
867 /* The lower 16 bits of the GOT offset for the address of the
868 canonical descriptor of a function. */
869 HOWTO (R_BFIN_FUNCDESC_GOTOFFLO, /* type */
870 0, /* rightshift */
871 1, /* size (0 = byte, 1 = short, 2 = long) */
872 16, /* bitsize */
873 FALSE, /* pc_relative */
874 0, /* bitpos */
875 complain_overflow_dont, /* complain_on_overflow */
876 bfd_elf_generic_reloc, /* special_function */
877 "R_BFIN_FUNCDESC_GOTOFFLO", /* name */
878 FALSE, /* partial_inplace */
879 0xffff, /* src_mask */
880 0xffff, /* dst_mask */
881 FALSE), /* pcrel_offset */
882
883 /* A 12-bit signed operand with the GOT offset for the address of
884 the symbol. */
885 HOWTO (R_BFIN_GOTOFF17M4, /* type */
886 2, /* rightshift */
887 1, /* size (0 = byte, 1 = short, 2 = long) */
888 16, /* bitsize */
889 FALSE, /* pc_relative */
890 0, /* bitpos */
891 complain_overflow_signed, /* complain_on_overflow */
892 bfd_elf_generic_reloc, /* special_function */
893 "R_BFIN_GOTOFF17M4", /* name */
894 FALSE, /* partial_inplace */
895 0xffff, /* src_mask */
896 0xffff, /* dst_mask */
897 FALSE), /* pcrel_offset */
898
899 /* The upper 16 bits of the GOT offset for the address of the
900 symbol. */
901 HOWTO (R_BFIN_GOTOFFHI, /* type */
902 0, /* rightshift */
903 1, /* size (0 = byte, 1 = short, 2 = long) */
904 16, /* bitsize */
905 FALSE, /* pc_relative */
906 0, /* bitpos */
907 complain_overflow_dont, /* complain_on_overflow */
908 bfd_elf_generic_reloc, /* special_function */
909 "R_BFIN_GOTOFFHI", /* name */
910 FALSE, /* partial_inplace */
911 0xffff, /* src_mask */
912 0xffff, /* dst_mask */
913 FALSE), /* pcrel_offset */
914
915 /* The lower 16 bits of the GOT offset for the address of the
916 symbol. */
917 HOWTO (R_BFIN_GOTOFFLO, /* type */
918 0, /* rightshift */
919 1, /* size (0 = byte, 1 = short, 2 = long) */
920 16, /* bitsize */
921 FALSE, /* pc_relative */
922 0, /* bitpos */
923 complain_overflow_dont, /* complain_on_overflow */
924 bfd_elf_generic_reloc, /* special_function */
925 "R_BFIN_GOTOFFLO", /* name */
926 FALSE, /* partial_inplace */
927 0xffff, /* src_mask */
928 0xffff, /* dst_mask */
929 FALSE), /* pcrel_offset */
0f64bb02
CM		 930};
931
0f64bb02
CM		 932static reloc_howto_type bfin_gnuext_howto_table [] =
933{
cb88ce9f 934 HOWTO (R_BFIN_PLTPC, /* type. */
0f64bb02
CM		 935 0, /* rightshift. */
936 1, /* size (0 = byte, 1 = short, 2 = long). */
937 16, /* bitsize. */
938 FALSE, /* pc_relative. */
939 0, /* bitpos. */
940 complain_overflow_bitfield, /* complain_on_overflow. */
941 bfin_pltpc_reloc, /* special_function. */
cb88ce9f 942 "R_BFIN_PLTPC", /* name. */
0f64bb02
CM		 943 FALSE, /* partial_inplace. */
944 0xffff, /* src_mask. */
945 0xffff, /* dst_mask. */
946 FALSE), /* pcrel_offset. */
947
cb88ce9f 948 HOWTO (R_BFIN_GOT, /* type. */
0f64bb02
CM		 949 0, /* rightshift. */
950 1, /* size (0 = byte, 1 = short, 2 = long). */
951 16, /* bitsize. */
952 FALSE, /* pc_relative. */
953 0, /* bitpos. */
954 complain_overflow_bitfield, /* complain_on_overflow. */
955 bfd_elf_generic_reloc, /* special_function. */
cb88ce9f 956 "R_BFIN_GOT", /* name. */
0f64bb02
CM		 957 FALSE, /* partial_inplace. */
958 0x7fff, /* src_mask. */
959 0x7fff, /* dst_mask. */
960 FALSE), /* pcrel_offset. */
961
962/* GNU extension to record C++ vtable hierarchy. */
963 HOWTO (R_BFIN_GNU_VTINHERIT, /* type. */
964 0, /* rightshift. */
965 2, /* size (0 = byte, 1 = short, 2 = long). */
966 0, /* bitsize. */
967 FALSE, /* pc_relative. */
968 0, /* bitpos. */
969 complain_overflow_dont, /* complain_on_overflow. */
970 NULL, /* special_function. */
971 "R_BFIN_GNU_VTINHERIT", /* name. */
972 FALSE, /* partial_inplace. */
973 0, /* src_mask. */
974 0, /* dst_mask. */
975 FALSE), /* pcrel_offset. */
976
977/* GNU extension to record C++ vtable member usage. */
978 HOWTO (R_BFIN_GNU_VTENTRY, /* type. */
979 0, /* rightshift. */
980 2, /* size (0 = byte, 1 = short, 2 = long). */
981 0, /* bitsize. */
982 FALSE, /* pc_relative. */
983 0, /* bitpos. */
984 complain_overflow_dont, /* complain_on_overflow. */
985 _bfd_elf_rel_vtable_reloc_fn, /* special_function. */
986 "R_BFIN_GNU_VTENTRY", /* name. */
987 FALSE, /* partial_inplace. */
988 0, /* src_mask. */
989 0, /* dst_mask. */
990 FALSE) /* pcrel_offset. */
991};
992
993struct bfin_reloc_map
994{
995 bfd_reloc_code_real_type bfd_reloc_val;
996 unsigned int bfin_reloc_val;
997};
998
999static const struct bfin_reloc_map bfin_reloc_map [] =
1000{
cb88ce9f
BS		 1001 { BFD_RELOC_NONE, R_BFIN_UNUSED0 },
1002 { BFD_RELOC_BFIN_5_PCREL, R_BFIN_PCREL5M2 },
1003 { BFD_RELOC_NONE, R_BFIN_UNUSED1 },
1004 { BFD_RELOC_BFIN_10_PCREL, R_BFIN_PCREL10 },
1005 { BFD_RELOC_BFIN_12_PCREL_JUMP, R_BFIN_PCREL12_JUMP },
1006 { BFD_RELOC_BFIN_16_IMM, R_BFIN_RIMM16 },
1007 { BFD_RELOC_BFIN_16_LOW, R_BFIN_LUIMM16 },
1008 { BFD_RELOC_BFIN_16_HIGH, R_BFIN_HUIMM16 },
1009 { BFD_RELOC_BFIN_12_PCREL_JUMP_S, R_BFIN_PCREL12_JUMP_S },
1010 { BFD_RELOC_24_PCREL, R_BFIN_PCREL24 },
1011 { BFD_RELOC_24_PCREL, R_BFIN_PCREL24 },
1012 { BFD_RELOC_BFIN_24_PCREL_JUMP_L, R_BFIN_PCREL24_JUMP_L },
1013 { BFD_RELOC_NONE, R_BFIN_UNUSEDB },
1014 { BFD_RELOC_NONE, R_BFIN_UNUSEDC },
1015 { BFD_RELOC_BFIN_24_PCREL_CALL_X, R_BFIN_PCREL24_CALL_X },
1016 { BFD_RELOC_8, R_BFIN_BYTE_DATA },
1017 { BFD_RELOC_16, R_BFIN_BYTE2_DATA },
1018 { BFD_RELOC_32, R_BFIN_BYTE4_DATA },
1019 { BFD_RELOC_BFIN_11_PCREL, R_BFIN_PCREL11 },
1020 { BFD_RELOC_BFIN_GOT, R_BFIN_GOT },
1021 { BFD_RELOC_BFIN_PLTPC, R_BFIN_PLTPC },
48d502e1
BS		 1022
1023 { BFD_RELOC_BFIN_GOT17M4, R_BFIN_GOT17M4 },
1024 { BFD_RELOC_BFIN_GOTHI, R_BFIN_GOTHI },
1025 { BFD_RELOC_BFIN_GOTLO, R_BFIN_GOTLO },
1026 { BFD_RELOC_BFIN_FUNCDESC, R_BFIN_FUNCDESC },
1027 { BFD_RELOC_BFIN_FUNCDESC_GOT17M4, R_BFIN_FUNCDESC_GOT17M4 },
1028 { BFD_RELOC_BFIN_FUNCDESC_GOTHI, R_BFIN_FUNCDESC_GOTHI },
1029 { BFD_RELOC_BFIN_FUNCDESC_GOTLO, R_BFIN_FUNCDESC_GOTLO },
1030 { BFD_RELOC_BFIN_FUNCDESC_VALUE, R_BFIN_FUNCDESC_VALUE },
1031 { BFD_RELOC_BFIN_FUNCDESC_GOTOFF17M4, R_BFIN_FUNCDESC_GOTOFF17M4 },
1032 { BFD_RELOC_BFIN_FUNCDESC_GOTOFFHI, R_BFIN_FUNCDESC_GOTOFFHI },
1033 { BFD_RELOC_BFIN_FUNCDESC_GOTOFFLO, R_BFIN_FUNCDESC_GOTOFFLO },
1034 { BFD_RELOC_BFIN_GOTOFF17M4, R_BFIN_GOTOFF17M4 },
1035 { BFD_RELOC_BFIN_GOTOFFHI, R_BFIN_GOTOFFHI },
1036 { BFD_RELOC_BFIN_GOTOFFLO, R_BFIN_GOTOFFLO },
1037
0f64bb02
CM		 1038 { BFD_RELOC_VTABLE_INHERIT, R_BFIN_GNU_VTINHERIT },
1039 { BFD_RELOC_VTABLE_ENTRY, R_BFIN_GNU_VTENTRY },
0f64bb02
CM		 1040};
1041
1042
1043static void
1044bfin_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
1045 arelent *cache_ptr,
1046 Elf_Internal_Rela *dst)
1047{
1048 unsigned int r_type;
1049
1050 r_type = ELF32_R_TYPE (dst->r_info);
1051
1052 if (r_type <= BFIN_RELOC_MAX)
1053 cache_ptr->howto = &bfin_howto_table [r_type];
1054
0f64bb02
CM		 1055 else if (r_type >= BFIN_GNUEXT_RELOC_MIN && r_type <= BFIN_GNUEXT_RELOC_MAX)
1056 cache_ptr->howto = &bfin_gnuext_howto_table [r_type - BFIN_GNUEXT_RELOC_MIN];
1057
1058 else
1059 cache_ptr->howto = (reloc_howto_type *) NULL;
0f64bb02 1060}
157090f7 1061
0f64bb02
CM		 1062/* Given a BFD reloc type, return the howto. */
1063static reloc_howto_type *
1064bfin_bfd_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
1065 bfd_reloc_code_real_type code)
1066{
1067 unsigned int i;
0ba38529 1068 unsigned int r_type = (unsigned int) -1;
0f64bb02 1069
0ba38529 1070 for (i = sizeof (bfin_reloc_map) / sizeof (bfin_reloc_map[0]); i--;)
0f64bb02
CM		 1071 if (bfin_reloc_map[i].bfd_reloc_val == code)
1072 r_type = bfin_reloc_map[i].bfin_reloc_val;
1073
0ba38529 1074 if (r_type <= BFIN_RELOC_MAX)
0f64bb02
CM		 1075 return &bfin_howto_table [r_type];
1076
0f64bb02
CM		 1077 else if (r_type >= BFIN_GNUEXT_RELOC_MIN && r_type <= BFIN_GNUEXT_RELOC_MAX)
1078 return &bfin_gnuext_howto_table [r_type - BFIN_GNUEXT_RELOC_MIN];
1079
1080 return (reloc_howto_type *) NULL;
157090f7 1081}
0f64bb02 1082
157090f7
AM		 1083static reloc_howto_type *
1084bfin_bfd_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1085 const char *r_name)
1086{
1087 unsigned int i;
1088
1089 for (i = 0;
1090 i < (sizeof (bfin_howto_table)
1091 / sizeof (bfin_howto_table[0]));
1092 i++)
1093 if (bfin_howto_table[i].name != NULL
1094 && strcasecmp (bfin_howto_table[i].name, r_name) == 0)
1095 return &bfin_howto_table[i];
1096
1097 for (i = 0;
1098 i < (sizeof (bfin_gnuext_howto_table)
1099 / sizeof (bfin_gnuext_howto_table[0]));
1100 i++)
1101 if (bfin_gnuext_howto_table[i].name != NULL
1102 && strcasecmp (bfin_gnuext_howto_table[i].name, r_name) == 0)
1103 return &bfin_gnuext_howto_table[i];
1104
1105 return NULL;
0f64bb02 1106}
157090f7 1107
0f64bb02
CM		 1108/* Given a bfin relocation type, return the howto. */
1109static reloc_howto_type *
1110bfin_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
2c3fc389 1111 unsigned int r_type)
0f64bb02
CM		 1112{
1113 if (r_type <= BFIN_RELOC_MAX)
1114 return &bfin_howto_table [r_type];
1115
0f64bb02
CM		 1116 else if (r_type >= BFIN_GNUEXT_RELOC_MIN && r_type <= BFIN_GNUEXT_RELOC_MAX)
1117 return &bfin_gnuext_howto_table [r_type - BFIN_GNUEXT_RELOC_MIN];
1118
1119 return (reloc_howto_type *) NULL;
0f64bb02
CM		 1120}
1121
781303ce
MF		 1122/* Set by ld emulation if --code-in-l1. */
1123bfd_boolean elf32_bfin_code_in_l1 = 0;
1124
1125/* Set by ld emulation if --data-in-l1. */
1126bfd_boolean elf32_bfin_data_in_l1 = 0;
1127
1128static void
1129elf32_bfin_final_write_processing (bfd *abfd,
1130 bfd_boolean linker ATTRIBUTE_UNUSED)
1131{
1132 if (elf32_bfin_code_in_l1)
1133 elf_elfheader (abfd)->e_flags |= EF_BFIN_CODE_IN_L1;
1134 if (elf32_bfin_data_in_l1)
1135 elf_elfheader (abfd)->e_flags |= EF_BFIN_DATA_IN_L1;
1136}
1137
0f64bb02
CM		 1138/* Return TRUE if the name is a local label.
1139 bfin local labels begin with L$. */
1140static bfd_boolean
2c3fc389 1141bfin_is_local_label_name (bfd *abfd, const char *label)
0f64bb02
CM		 1142{
1143 if (label[0] == 'L' && label[1] == '$' )
1144 return TRUE;
1145
1146 return _bfd_elf_is_local_label_name (abfd, label);
1147}
c96a8570
BS		 1148\f
1149/* Look through the relocs for a section during the first phase, and
1150 allocate space in the global offset table or procedure linkage
1151 table. */
0f64bb02 1152
c96a8570
BS		 1153static bfd_boolean
1154bfin_check_relocs (bfd * abfd,
1155 struct bfd_link_info *info,
1156 asection *sec,
1157 const Elf_Internal_Rela *relocs)
48d502e1 1158{
c96a8570
BS		 1159 bfd *dynobj;
1160 Elf_Internal_Shdr *symtab_hdr;
1161 struct elf_link_hash_entry **sym_hashes;
1162 bfd_signed_vma *local_got_refcounts;
1163 const Elf_Internal_Rela *rel;
1164 const Elf_Internal_Rela *rel_end;
48d502e1 1165 asection *sgot;
c96a8570 1166 asection *srelgot;
2c3fc389 1167
0e1862bb 1168 if (bfd_link_relocatable (info))
c96a8570 1169 return TRUE;
48d502e1 1170
c96a8570
BS		 1171 dynobj = elf_hash_table (info)->dynobj;
1172 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1173 sym_hashes = elf_sym_hashes (abfd);
1174 local_got_refcounts = elf_local_got_refcounts (abfd);
48d502e1 1175
c96a8570
BS		 1176 sgot = NULL;
1177 srelgot = NULL;
48d502e1 1178
c96a8570
BS		 1179 rel_end = relocs + sec->reloc_count;
1180 for (rel = relocs; rel < rel_end; rel++)
48d502e1 1181 {
c96a8570
BS		 1182 unsigned long r_symndx;
1183 struct elf_link_hash_entry *h;
48d502e1 1184
c96a8570
BS		 1185 r_symndx = ELF32_R_SYM (rel->r_info);
1186 if (r_symndx < symtab_hdr->sh_info)
1187 h = NULL;
1188 else
81fbe831
AM		 1189 {
1190 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1191
1192 /* PR15323, ref flags aren't set for references in the same
1193 object. */
1194 h->root.non_ir_ref = 1;
1195 }
48d502e1 1196
c96a8570
BS		 1197 switch (ELF32_R_TYPE (rel->r_info))
1198 {
1199 /* This relocation describes the C++ object vtable hierarchy.
1200 Reconstruct it for later use during GC. */
1201 case R_BFIN_GNU_VTINHERIT:
1202 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1203 return FALSE;
1204 break;
48d502e1 1205
c96a8570
BS		 1206 /* This relocation describes which C++ vtable entries
1207 are actually used. Record for later use during GC. */
1208 case R_BFIN_GNU_VTENTRY:
1209 BFD_ASSERT (h != NULL);
1210 if (h != NULL
1211 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1212 return FALSE;
1213 break;
48d502e1 1214
cb88ce9f 1215 case R_BFIN_GOT:
c96a8570
BS		 1216 if (h != NULL
1217 && strcmp (h->root.root.string, "__GLOBAL_OFFSET_TABLE_") == 0)
1218 break;
1219 /* Fall through. */
48d502e1 1220
c96a8570
BS		 1221 if (dynobj == NULL)
1222 {
1223 /* Create the .got section. */
1224 elf_hash_table (info)->dynobj = dynobj = abfd;
1225 if (!_bfd_elf_create_got_section (dynobj, info))
1226 return FALSE;
1227 }
48d502e1 1228
c96a8570
BS		 1229 if (sgot == NULL)
1230 {
3d4d4302 1231 sgot = bfd_get_linker_section (dynobj, ".got");
c96a8570
BS		 1232 BFD_ASSERT (sgot != NULL);
1233 }
48d502e1 1234
0e1862bb 1235 if (srelgot == NULL && (h != NULL || bfd_link_pic (info)))
c96a8570 1236 {
3d4d4302 1237 srelgot = bfd_get_linker_section (dynobj, ".rela.got");
c96a8570
BS		 1238 if (srelgot == NULL)
1239 {
1240 flagword flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS
1241 | SEC_IN_MEMORY | SEC_LINKER_CREATED
1242 | SEC_READONLY);
3d4d4302
AM		 1243 srelgot = bfd_make_section_anyway_with_flags (dynobj,
1244 ".rela.got",
1245 flags);
c96a8570
BS		 1246 if (srelgot == NULL
1247 || !bfd_set_section_alignment (dynobj, srelgot, 2))
1248 return FALSE;
1249 }
1250 }
48d502e1 1251
c96a8570
BS		 1252 if (h != NULL)
1253 {
1254 if (h->got.refcount == 0)
1255 {
1256 /* Make sure this symbol is output as a dynamic symbol. */
1257 if (h->dynindx == -1 && !h->forced_local)
1258 {
1259 if (!bfd_elf_link_record_dynamic_symbol (info, h))
1260 return FALSE;
1261 }
48d502e1 1262
c96a8570
BS		 1263 /* Allocate space in the .got section. */
1264 sgot->size += 4;
1265 /* Allocate relocation space. */
1266 srelgot->size += sizeof (Elf32_External_Rela);
1267 }
1268 h->got.refcount++;
1269 }
1270 else
1271 {
1272 /* This is a global offset table entry for a local symbol. */
1273 if (local_got_refcounts == NULL)
1274 {
1275 bfd_size_type size;
48d502e1 1276
c96a8570
BS		 1277 size = symtab_hdr->sh_info;
1278 size *= sizeof (bfd_signed_vma);
1279 local_got_refcounts = ((bfd_signed_vma *)
1280 bfd_zalloc (abfd, size));
1281 if (local_got_refcounts == NULL)
1282 return FALSE;
1283 elf_local_got_refcounts (abfd) = local_got_refcounts;
1284 }
1285 if (local_got_refcounts[r_symndx] == 0)
1286 {
1287 sgot->size += 4;
0e1862bb 1288 if (bfd_link_pic (info))
c96a8570
BS		 1289 {
1290 /* If we are generating a shared object, we need to
1291 output a R_68K_RELATIVE reloc so that the dynamic
1292 linker can adjust this GOT entry. */
1293 srelgot->size += sizeof (Elf32_External_Rela);
1294 }
1295 }
1296 local_got_refcounts[r_symndx]++;
1297 }
1298 break;
48d502e1 1299
c96a8570
BS		 1300 default:
1301 break;
1302 }
1303 }
1304
1305 return TRUE;
48d502e1
BS		 1306}
1307
c96a8570 1308static enum elf_reloc_type_class
7e612e98
AM		 1309elf32_bfin_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
1310 const asection *rel_sec ATTRIBUTE_UNUSED,
1311 const Elf_Internal_Rela * rela)
48d502e1 1312{
c96a8570
BS		 1313 switch ((int) ELF32_R_TYPE (rela->r_info))
1314 {
1315 default:
1316 return reloc_class_normal;
1317 }
1318}
1319\f
1320static bfd_reloc_status_type
1321bfin_final_link_relocate (Elf_Internal_Rela *rel, reloc_howto_type *howto,
1322 bfd *input_bfd, asection *input_section,
1323 bfd_byte *contents, bfd_vma address,
1324 bfd_vma value, bfd_vma addend)
1325{
1326 int r_type = ELF32_R_TYPE (rel->r_info);
48d502e1 1327
cb88ce9f 1328 if (r_type == R_BFIN_PCREL24 || r_type == R_BFIN_PCREL24_JUMP_L)
c96a8570
BS		 1329 {
1330 bfd_reloc_status_type r = bfd_reloc_ok;
1331 bfd_vma x;
48d502e1 1332
c96a8570
BS		 1333 if (address > bfd_get_section_limit (input_bfd, input_section))
1334 return bfd_reloc_outofrange;
48d502e1 1335
c96a8570 1336 value += addend;
48d502e1 1337
c96a8570
BS		 1338 /* Perform usual pc-relative correction. */
1339 value -= input_section->output_section->vma + input_section->output_offset;
1340 value -= address;
48d502e1 1341
c96a8570
BS		 1342 /* We are getting reloc_entry->address 2 byte off from
1343 the start of instruction. Assuming absolute postion
1344 of the reloc data. But, following code had been written assuming
1345 reloc address is starting at begining of instruction.
1346 To compensate that I have increased the value of
1347 relocation by 1 (effectively 2) and used the addr -2 instead of addr. */
48d502e1 1348
c96a8570
BS		 1349 value += 2;
1350 address -= 2;
48d502e1 1351
c96a8570
BS		 1352 if ((value & 0xFF000000) != 0
1353 && (value & 0xFF000000) != 0xFF000000)
1354 r = bfd_reloc_overflow;
48d502e1 1355
c96a8570 1356 value >>= 1;
48d502e1 1357
c96a8570
BS		 1358 x = bfd_get_16 (input_bfd, contents + address);
1359 x = (x & 0xff00) | ((value >> 16) & 0xff);
1360 bfd_put_16 (input_bfd, x, contents + address);
48d502e1 1361
c96a8570
BS		 1362 x = bfd_get_16 (input_bfd, contents + address + 2);
1363 x = value & 0xFFFF;
1364 bfd_put_16 (input_bfd, x, contents + address + 2);
1365 return r;
1366 }
48d502e1 1367
c96a8570
BS		 1368 return _bfd_final_link_relocate (howto, input_bfd, input_section, contents,
1369 rel->r_offset, value, addend);
48d502e1 1370
48d502e1
BS		 1371}
1372
c96a8570
BS		 1373static bfd_boolean
1374bfin_relocate_section (bfd * output_bfd,
1375 struct bfd_link_info *info,
1376 bfd * input_bfd,
1377 asection * input_section,
1378 bfd_byte * contents,
1379 Elf_Internal_Rela * relocs,
1380 Elf_Internal_Sym * local_syms,
1381 asection ** local_sections)
48d502e1 1382{
c96a8570
BS		 1383 bfd *dynobj;
1384 Elf_Internal_Shdr *symtab_hdr;
1385 struct elf_link_hash_entry **sym_hashes;
1386 bfd_vma *local_got_offsets;
1387 asection *sgot;
c96a8570
BS		 1388 Elf_Internal_Rela *rel;
1389 Elf_Internal_Rela *relend;
1390 int i = 0;
48d502e1 1391
c96a8570
BS		 1392 dynobj = elf_hash_table (info)->dynobj;
1393 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1394 sym_hashes = elf_sym_hashes (input_bfd);
1395 local_got_offsets = elf_local_got_offsets (input_bfd);
48d502e1 1396
c96a8570 1397 sgot = NULL;
48d502e1 1398
c96a8570
BS		 1399 rel = relocs;
1400 relend = relocs + input_section->reloc_count;
1401 for (; rel < relend; rel++, i++)
1402 {
1403 int r_type;
1404 reloc_howto_type *howto;
1405 unsigned long r_symndx;
1406 struct elf_link_hash_entry *h;
1407 Elf_Internal_Sym *sym;
1408 asection *sec;
1409 bfd_vma relocation = 0;
1410 bfd_boolean unresolved_reloc;
1411 bfd_reloc_status_type r;
1412 bfd_vma address;
48d502e1 1413
c96a8570
BS		 1414 r_type = ELF32_R_TYPE (rel->r_info);
1415 if (r_type < 0 || r_type >= 243)
1416 {
1417 bfd_set_error (bfd_error_bad_value);
1418 return FALSE;
1419 }
48d502e1 1420
c96a8570
BS		 1421 if (r_type == R_BFIN_GNU_VTENTRY
1422 || r_type == R_BFIN_GNU_VTINHERIT)
1423 continue;
48d502e1 1424
c96a8570
BS		 1425 howto = bfin_reloc_type_lookup (input_bfd, r_type);
1426 if (howto == NULL)
1427 {
1428 bfd_set_error (bfd_error_bad_value);
1429 return FALSE;
1430 }
1431 r_symndx = ELF32_R_SYM (rel->r_info);
48d502e1 1432
c96a8570
BS		 1433 h = NULL;
1434 sym = NULL;
1435 sec = NULL;
1436 unresolved_reloc = FALSE;
48d502e1 1437
c96a8570
BS		 1438 if (r_symndx < symtab_hdr->sh_info)
1439 {
1440 sym = local_syms + r_symndx;
1441 sec = local_sections[r_symndx];
1442 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1443 }
1444 else
1445 {
62d887d4 1446 bfd_boolean warned, ignored;
48d502e1 1447
c96a8570
BS		 1448 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1449 r_symndx, symtab_hdr, sym_hashes,
1450 h, sec, relocation,
62d887d4 1451 unresolved_reloc, warned, ignored);
c96a8570 1452 }
48d502e1 1453
dbaa2011 1454 if (sec != NULL && discarded_section (sec))
e4067dbb 1455 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
545fd46b 1456 rel, 1, relend, howto, 0, contents);
48d502e1 1457
0e1862bb 1458 if (bfd_link_relocatable (info))
c96a8570 1459 continue;
48d502e1 1460
c96a8570 1461 address = rel->r_offset;
48d502e1 1462
c96a8570
BS		 1463 /* Then, process normally. */
1464 switch (r_type)
1465 {
1466 case R_BFIN_GNU_VTINHERIT:
1467 case R_BFIN_GNU_VTENTRY:
1468 return bfd_reloc_ok;
48d502e1 1469
cb88ce9f 1470 case R_BFIN_GOT:
c96a8570
BS		 1471 /* Relocation is to the address of the entry for this symbol
1472 in the global offset table. */
1473 if (h != NULL
1474 && strcmp (h->root.root.string, "__GLOBAL_OFFSET_TABLE_") == 0)
1475 goto do_default;
1476 /* Fall through. */
1477 /* Relocation is the offset of the entry for this symbol in
1478 the global offset table. */
48d502e1 1479
c96a8570
BS		 1480 {
1481 bfd_vma off;
48d502e1 1482
c96a8570
BS		 1483 if (dynobj == NULL)
1484 {
1485 /* Create the .got section. */
1486 elf_hash_table (info)->dynobj = dynobj = output_bfd;
1487 if (!_bfd_elf_create_got_section (dynobj, info))
1488 return FALSE;
1489 }
48d502e1 1490
c96a8570
BS		 1491 if (sgot == NULL)
1492 {
3d4d4302 1493 sgot = bfd_get_linker_section (dynobj, ".got");
c96a8570
BS		 1494 BFD_ASSERT (sgot != NULL);
1495 }
48d502e1 1496
c96a8570
BS		 1497 if (h != NULL)
1498 {
1499 bfd_boolean dyn;
48d502e1 1500
c96a8570
BS		 1501 off = h->got.offset;
1502 BFD_ASSERT (off != (bfd_vma) - 1);
1503 dyn = elf_hash_table (info)->dynamic_sections_created;
48d502e1 1504
0e1862bb
L		 1505 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
1506 bfd_link_pic (info),
1507 h)
1508 || (bfd_link_pic (info)
c96a8570
BS		 1509 && (info->symbolic
1510 || h->dynindx == -1
1511 || h->forced_local)
1512 && h->def_regular))
1513 {
1514 /* This is actually a static link, or it is a
1515 -Bsymbolic link and the symbol is defined
1516 locally, or the symbol was forced to be local
1517 because of a version file.. We must initialize
1518 this entry in the global offset table. Since
1519 the offset must always be a multiple of 4, we
1520 use the least significant bit to record whether
1521 we have initialized it already.
48d502e1 1522
c96a8570
BS		 1523 When doing a dynamic link, we create a .rela.got
1524 relocation entry to initialize the value. This
1525 is done in the finish_dynamic_symbol routine. */
1526 if ((off & 1) != 0)
1527 off &= ~1;
1528 else
1529 {
1530 bfd_put_32 (output_bfd, relocation,
1531 sgot->contents + off);
1532 h->got.offset |= 1;
1533 }
1534 }
1535 else
1536 unresolved_reloc = FALSE;
1537 }
1538 else
1539 {
1540 BFD_ASSERT (local_got_offsets != NULL);
1541 off = local_got_offsets[r_symndx];
1542 BFD_ASSERT (off != (bfd_vma) - 1);
48d502e1 1543
c96a8570
BS		 1544 /* The offset must always be a multiple of 4. We use
1545 the least significant bit to record whether we have
1546 already generated the necessary reloc. */
1547 if ((off & 1) != 0)
1548 off &= ~1;
1549 else
1550 {
1551 bfd_put_32 (output_bfd, relocation, sgot->contents + off);
48d502e1 1552
0e1862bb 1553 if (bfd_link_pic (info))
c96a8570
BS		 1554 {
1555 asection *s;
1556 Elf_Internal_Rela outrel;
1557 bfd_byte *loc;
48d502e1 1558
3d4d4302 1559 s = bfd_get_linker_section (dynobj, ".rela.got");
c96a8570 1560 BFD_ASSERT (s != NULL);
48d502e1 1561
c96a8570
BS		 1562 outrel.r_offset = (sgot->output_section->vma
1563 + sgot->output_offset + off);
1564 outrel.r_info =
cb88ce9f 1565 ELF32_R_INFO (0, R_BFIN_PCREL24);
c96a8570
BS		 1566 outrel.r_addend = relocation;
1567 loc = s->contents;
1568 loc +=
1569 s->reloc_count++ * sizeof (Elf32_External_Rela);
1570 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1571 }
48d502e1 1572
c96a8570
BS		 1573 local_got_offsets[r_symndx] |= 1;
1574 }
1575 }
48d502e1 1576
c96a8570
BS		 1577 relocation = sgot->output_offset + off;
1578 rel->r_addend = 0;
1579 /* bfin : preg = [preg + 17bitdiv4offset] relocation is div by 4. */
1580 relocation /= 4;
1581 }
1582 goto do_default;
1583
1584 default:
1585 do_default:
1586 r = bfin_final_link_relocate (rel, howto, input_bfd, input_section,
1587 contents, address,
1588 relocation, rel->r_addend);
1589
1590 break;
48d502e1
BS		 1591 }
1592
c96a8570
BS		 1593 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
1594 because such sections are not SEC_ALLOC and thus ld.so will
1595 not process them. */
1596 if (unresolved_reloc
1d5316ab
AM		 1597 && !((input_section->flags & SEC_DEBUGGING) != 0 && h->def_dynamic)
1598 && _bfd_elf_section_offset (output_bfd, info, input_section,
1599 rel->r_offset) != (bfd_vma) -1)
48d502e1 1600 {
c96a8570
BS		 1601 (*_bfd_error_handler)
1602 (_("%B(%A+0x%lx): unresolvable relocation against symbol `%s'"),
1603 input_bfd,
1604 input_section, (long) rel->r_offset, h->root.root.string);
1605 return FALSE;
48d502e1 1606 }
48d502e1 1607
c96a8570 1608 if (r != bfd_reloc_ok)
48d502e1 1609 {
c96a8570
BS		 1610 const char *name;
1611
1612 if (h != NULL)
1613 name = h->root.root.string;
1614 else
48d502e1 1615 {
c96a8570
BS		 1616 name = bfd_elf_string_from_elf_section (input_bfd,
1617 symtab_hdr->sh_link,
1618 sym->st_name);
1619 if (name == NULL)
1620 return FALSE;
1621 if (*name == '\0')
1622 name = bfd_section_name (input_bfd, sec);
48d502e1 1623 }
c96a8570
BS		 1624
1625 if (r == bfd_reloc_overflow)
48d502e1 1626 {
c96a8570
BS		 1627 if (!(info->callbacks->reloc_overflow
1628 (info, (h ? &h->root : NULL), name, howto->name,
1629 (bfd_vma) 0, input_bfd, input_section, rel->r_offset)))
48d502e1
BS		 1630 return FALSE;
1631 }
1632 else
1633 {
c96a8570
BS		 1634 (*_bfd_error_handler)
1635 (_("%B(%A+0x%lx): reloc against `%s': error %d"),
1636 input_bfd, input_section,
1637 (long) rel->r_offset, name, (int) r);
1638 return FALSE;
48d502e1 1639 }
48d502e1 1640 }
48d502e1
BS		 1641 }
1642
c96a8570
BS		 1643 return TRUE;
1644}
48d502e1 1645
c96a8570
BS		 1646static asection *
1647bfin_gc_mark_hook (asection * sec,
1648 struct bfd_link_info *info,
1649 Elf_Internal_Rela * rel,
1650 struct elf_link_hash_entry *h,
1651 Elf_Internal_Sym * sym)
1652{
1653 if (h != NULL)
1654 switch (ELF32_R_TYPE (rel->r_info))
1655 {
1656 case R_BFIN_GNU_VTINHERIT:
1657 case R_BFIN_GNU_VTENTRY:
1658 return NULL;
1659 }
48d502e1 1660
c96a8570
BS		 1661 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1662}
48d502e1 1663
c96a8570 1664/* Update the got entry reference counts for the section being removed. */
48d502e1 1665
c96a8570
BS		 1666static bfd_boolean
1667bfin_gc_sweep_hook (bfd * abfd,
1668 struct bfd_link_info *info,
1669 asection * sec,
1670 const Elf_Internal_Rela * relocs)
1671{
1672 Elf_Internal_Shdr *symtab_hdr;
1673 struct elf_link_hash_entry **sym_hashes;
1674 bfd_signed_vma *local_got_refcounts;
1675 const Elf_Internal_Rela *rel, *relend;
1676 bfd *dynobj;
1677 asection *sgot;
1678 asection *srelgot;
48d502e1 1679
c96a8570
BS		 1680 dynobj = elf_hash_table (info)->dynobj;
1681 if (dynobj == NULL)
0f64bb02
CM		 1682 return TRUE;
1683
0f64bb02
CM		 1684 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1685 sym_hashes = elf_sym_hashes (abfd);
1686 local_got_refcounts = elf_local_got_refcounts (abfd);
1687
3d4d4302
AM		 1688 sgot = bfd_get_linker_section (dynobj, ".got");
1689 srelgot = bfd_get_linker_section (dynobj, ".rela.got");
0f64bb02 1690
c96a8570
BS		 1691 relend = relocs + sec->reloc_count;
1692 for (rel = relocs; rel < relend; rel++)
0f64bb02
CM		 1693 {
1694 unsigned long r_symndx;
1695 struct elf_link_hash_entry *h;
1696
0f64bb02
CM		 1697 switch (ELF32_R_TYPE (rel->r_info))
1698 {
cb88ce9f 1699 case R_BFIN_GOT:
c96a8570
BS		 1700 r_symndx = ELF32_R_SYM (rel->r_info);
1701 if (r_symndx >= symtab_hdr->sh_info)
0f64bb02 1702 {
c96a8570
BS		 1703 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1704 if (h->got.refcount > 0)
0f64bb02 1705 {
c96a8570
BS		 1706 --h->got.refcount;
1707 if (h->got.refcount == 0)
0f64bb02 1708 {
c96a8570
BS		 1709 /* We don't need the .got entry any more. */
1710 sgot->size -= 4;
1711 srelgot->size -= sizeof (Elf32_External_Rela);
0f64bb02 1712 }
0f64bb02 1713 }
0f64bb02 1714 }
c96a8570 1715 else if (local_got_refcounts != NULL)
0f64bb02 1716 {
c96a8570 1717 if (local_got_refcounts[r_symndx] > 0)
0f64bb02 1718 {
c96a8570
BS		 1719 --local_got_refcounts[r_symndx];
1720 if (local_got_refcounts[r_symndx] == 0)
0f64bb02 1721 {
c96a8570
BS		 1722 /* We don't need the .got entry any more. */
1723 sgot->size -= 4;
0e1862bb 1724 if (bfd_link_pic (info))
c96a8570 1725 srelgot->size -= sizeof (Elf32_External_Rela);
0f64bb02
CM		 1726 }
1727 }
0f64bb02
CM		 1728 }
1729 break;
0f64bb02
CM		 1730 default:
1731 break;
1732 }
1733 }
0f64bb02
CM		 1734 return TRUE;
1735}
c96a8570 1736\f
6d00b590
AM		 1737extern const bfd_target bfin_elf32_fdpic_vec;
1738#define IS_FDPIC(bfd) ((bfd)->xvec == &bfin_elf32_fdpic_vec)
0f64bb02 1739
4dfe6ac6
NC		 1740/* An extension of the elf hash table data structure,
1741 containing some additional Blackfin-specific data. */
c96a8570 1742struct bfinfdpic_elf_link_hash_table
c35e54f4 1743{
c96a8570 1744 struct elf_link_hash_table elf;
c35e54f4 1745
c96a8570
BS		 1746 /* A pointer to the .got section. */
1747 asection *sgot;
1748 /* A pointer to the .rel.got section. */
1749 asection *sgotrel;
1750 /* A pointer to the .rofixup section. */
1751 asection *sgotfixup;
1752 /* A pointer to the .plt section. */
1753 asection *splt;
1754 /* A pointer to the .rel.plt section. */
1755 asection *spltrel;
1756 /* GOT base offset. */
1757 bfd_vma got0;
1758 /* Location of the first non-lazy PLT entry, i.e., the number of
1759 bytes taken by lazy PLT entries. */
1760 bfd_vma plt0;
1761 /* A hash table holding information about which symbols were
1762 referenced with which PIC-related relocations. */
1763 struct htab *relocs_info;
6a9adeca
BS		 1764 /* Summary reloc information collected by
1765 _bfinfdpic_count_got_plt_entries. */
1766 struct _bfinfdpic_dynamic_got_info *g;
c96a8570 1767};
c35e54f4 1768
c96a8570 1769/* Get the Blackfin ELF linker hash table from a link_info structure. */
c35e54f4 1770
c96a8570 1771#define bfinfdpic_hash_table(info) \
4dfe6ac6
NC		 1772 (elf_hash_table_id ((struct elf_link_hash_table *) ((info)->hash)) \
1773 == BFIN_ELF_DATA ? ((struct bfinfdpic_elf_link_hash_table *) ((info)->hash)) : NULL)
c35e54f4 1774
c96a8570
BS		 1775#define bfinfdpic_got_section(info) \
1776 (bfinfdpic_hash_table (info)->sgot)
1777#define bfinfdpic_gotrel_section(info) \
1778 (bfinfdpic_hash_table (info)->sgotrel)
1779#define bfinfdpic_gotfixup_section(info) \
1780 (bfinfdpic_hash_table (info)->sgotfixup)
1781#define bfinfdpic_plt_section(info) \
1782 (bfinfdpic_hash_table (info)->splt)
1783#define bfinfdpic_pltrel_section(info) \
1784 (bfinfdpic_hash_table (info)->spltrel)
1785#define bfinfdpic_relocs_info(info) \
1786 (bfinfdpic_hash_table (info)->relocs_info)
1787#define bfinfdpic_got_initial_offset(info) \
1788 (bfinfdpic_hash_table (info)->got0)
1789#define bfinfdpic_plt_initial_offset(info) \
1790 (bfinfdpic_hash_table (info)->plt0)
6a9adeca
BS		 1791#define bfinfdpic_dynamic_got_plt_info(info) \
1792 (bfinfdpic_hash_table (info)->g)
c35e54f4 1793
c96a8570
BS		 1794/* The name of the dynamic interpreter. This is put in the .interp
1795 section. */
c35e54f4 1796
c96a8570 1797#define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
c35e54f4 1798
c96a8570 1799#define DEFAULT_STACK_SIZE 0x20000
c35e54f4 1800
c96a8570
BS		 1801/* This structure is used to collect the number of entries present in
1802 each addressable range of the got. */
1803struct _bfinfdpic_dynamic_got_info
1804{
1805 /* Several bits of information about the current link. */
1806 struct bfd_link_info *info;
1807 /* Total size needed for GOT entries within the 18- or 32-bit
1808 ranges. */
1809 bfd_vma got17m4, gothilo;
1810 /* Total size needed for function descriptor entries within the 18-
1811 or 32-bit ranges. */
1812 bfd_vma fd17m4, fdhilo;
1813 /* Total size needed function descriptor entries referenced in PLT
1814 entries, that would be profitable to place in offsets close to
1815 the PIC register. */
1816 bfd_vma fdplt;
1817 /* Total size needed by lazy PLT entries. */
1818 bfd_vma lzplt;
1819 /* Number of relocations carried over from input object files. */
1820 unsigned long relocs;
1821 /* Number of fixups introduced by relocations in input object files. */
1822 unsigned long fixups;
1823};
c35e54f4 1824
c96a8570 1825/* Create a Blackfin ELF linker hash table. */
c35e54f4 1826
c96a8570
BS		 1827static struct bfd_link_hash_table *
1828bfinfdpic_elf_link_hash_table_create (bfd *abfd)
1829{
1830 struct bfinfdpic_elf_link_hash_table *ret;
1831 bfd_size_type amt = sizeof (struct bfinfdpic_elf_link_hash_table);
c35e54f4 1832
22cdc249 1833 ret = bfd_zmalloc (amt);
c96a8570
BS		 1834 if (ret == NULL)
1835 return NULL;
c35e54f4 1836
c96a8570
BS		 1837 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd,
1838 _bfd_elf_link_hash_newfunc,
4dfe6ac6
NC		 1839 sizeof (struct elf_link_hash_entry),
1840 BFIN_ELF_DATA))
c96a8570
BS		 1841 {
1842 free (ret);
1843 return NULL;
1844 }
c35e54f4 1845
c96a8570
BS		 1846 return &ret->elf.root;
1847}
48d502e1 1848
c96a8570
BS		 1849/* Decide whether a reference to a symbol can be resolved locally or
1850 not. If the symbol is protected, we want the local address, but
1851 its function descriptor must be assigned by the dynamic linker. */
1852#define BFINFDPIC_SYM_LOCAL(INFO, H) \
1853 (_bfd_elf_symbol_refs_local_p ((H), (INFO), 1) \
1854 || ! elf_hash_table (INFO)->dynamic_sections_created)
1855#define BFINFDPIC_FUNCDESC_LOCAL(INFO, H) \
1856 ((H)->dynindx == -1 || ! elf_hash_table (INFO)->dynamic_sections_created)
48d502e1 1857
c96a8570
BS		 1858/* This structure collects information on what kind of GOT, PLT or
1859 function descriptors are required by relocations that reference a
1860 certain symbol. */
1861struct bfinfdpic_relocs_info
1862{
1863 /* The index of the symbol, as stored in the relocation r_info, if
1864 we have a local symbol; -1 otherwise. */
1865 long symndx;
1866 union
1867 {
1868 /* The input bfd in which the symbol is defined, if it's a local
1869 symbol. */
1870 bfd *abfd;
1871 /* If symndx == -1, the hash table entry corresponding to a global
1872 symbol (even if it turns out to bind locally, in which case it
1873 should ideally be replaced with section's symndx + addend). */
1874 struct elf_link_hash_entry *h;
1875 } d;
1876 /* The addend of the relocation that references the symbol. */
1877 bfd_vma addend;
48d502e1 1878
c96a8570
BS		 1879 /* The fields above are used to identify an entry. The fields below
1880 contain information on how an entry is used and, later on, which
1881 locations it was assigned. */
1882 /* The following 2 fields record whether the symbol+addend above was
1883 ever referenced with a GOT relocation. The 17M4 suffix indicates a
1884 GOT17M4 relocation; hilo is used for GOTLO/GOTHI pairs. */
1885 unsigned got17m4;
1886 unsigned gothilo;
1887 /* Whether a FUNCDESC relocation references symbol+addend. */
1888 unsigned fd;
1889 /* Whether a FUNCDESC_GOT relocation references symbol+addend. */
1890 unsigned fdgot17m4;
1891 unsigned fdgothilo;
1892 /* Whether a FUNCDESC_GOTOFF relocation references symbol+addend. */
1893 unsigned fdgoff17m4;
1894 unsigned fdgoffhilo;
1895 /* Whether symbol+addend is referenced with GOTOFF17M4, GOTOFFLO or
1896 GOTOFFHI relocations. The addend doesn't really matter, since we
1897 envision that this will only be used to check whether the symbol
1898 is mapped to the same segment as the got. */
1899 unsigned gotoff;
1900 /* Whether symbol+addend is referenced by a LABEL24 relocation. */
1901 unsigned call;
1902 /* Whether symbol+addend is referenced by a 32 or FUNCDESC_VALUE
1903 relocation. */
1904 unsigned sym;
1905 /* Whether we need a PLT entry for a symbol. Should be implied by
1906 something like:
1907 (call && symndx == -1 && ! BFINFDPIC_SYM_LOCAL (info, d.h)) */
1908 unsigned plt:1;
1909 /* Whether a function descriptor should be created in this link unit
1910 for symbol+addend. Should be implied by something like:
1911 (plt || fdgotoff17m4 || fdgotofflohi
1912 || ((fd || fdgot17m4 || fdgothilo)
1913 && (symndx != -1 || BFINFDPIC_FUNCDESC_LOCAL (info, d.h)))) */
1914 unsigned privfd:1;
1915 /* Whether a lazy PLT entry is needed for this symbol+addend.
1916 Should be implied by something like:
1917 (privfd && symndx == -1 && ! BFINFDPIC_SYM_LOCAL (info, d.h)
1918 && ! (info->flags & DF_BIND_NOW)) */
1919 unsigned lazyplt:1;
1920 /* Whether we've already emitted GOT relocations and PLT entries as
1921 needed for this symbol. */
1922 unsigned done:1;
48d502e1 1923
cb88ce9f 1924 /* The number of R_BFIN_BYTE4_DATA, R_BFIN_FUNCDESC and R_BFIN_FUNCDESC_VALUE
c96a8570
BS		 1925 relocations referencing the symbol. */
1926 unsigned relocs32, relocsfd, relocsfdv;
48d502e1 1927
c96a8570
BS		 1928 /* The number of .rofixups entries and dynamic relocations allocated
1929 for this symbol, minus any that might have already been used. */
1930 unsigned fixups, dynrelocs;
48d502e1 1931
c96a8570
BS		 1932 /* The offsets of the GOT entries assigned to symbol+addend, to the
1933 function descriptor's address, and to a function descriptor,
1934 respectively. Should be zero if unassigned. The offsets are
1935 counted from the value that will be assigned to the PIC register,
1936 not from the beginning of the .got section. */
1937 bfd_signed_vma got_entry, fdgot_entry, fd_entry;
1938 /* The offsets of the PLT entries assigned to symbol+addend,
1939 non-lazy and lazy, respectively. If unassigned, should be
1940 (bfd_vma)-1. */
1941 bfd_vma plt_entry, lzplt_entry;
1942};
48d502e1 1943
c96a8570
BS		 1944/* Compute a hash with the key fields of an bfinfdpic_relocs_info entry. */
1945static hashval_t
1946bfinfdpic_relocs_info_hash (const void *entry_)
1947{
1948 const struct bfinfdpic_relocs_info *entry = entry_;
48d502e1 1949
c96a8570
BS		 1950 return (entry->symndx == -1
1951 ? (long) entry->d.h->root.root.hash
1952 : entry->symndx + (long) entry->d.abfd->id * 257) + entry->addend;
1953}
f4707595 1954
c96a8570
BS		 1955/* Test whether the key fields of two bfinfdpic_relocs_info entries are
1956 identical. */
1957static int
1958bfinfdpic_relocs_info_eq (const void *entry1, const void *entry2)
0f64bb02 1959{
c96a8570
BS		 1960 const struct bfinfdpic_relocs_info *e1 = entry1;
1961 const struct bfinfdpic_relocs_info *e2 = entry2;
0f64bb02 1962
c96a8570
BS		 1963 return e1->symndx == e2->symndx && e1->addend == e2->addend
1964 && (e1->symndx == -1 ? e1->d.h == e2->d.h : e1->d.abfd == e2->d.abfd);
1965}
48d502e1 1966
c96a8570
BS		 1967/* Find or create an entry in a hash table HT that matches the key
1968 fields of the given ENTRY. If it's not found, memory for a new
1969 entry is allocated in ABFD's obstack. */
1970static struct bfinfdpic_relocs_info *
1971bfinfdpic_relocs_info_find (struct htab *ht,
1972 bfd *abfd,
1973 const struct bfinfdpic_relocs_info *entry,
1974 enum insert_option insert)
1975{
83fd9437
JZ		 1976 struct bfinfdpic_relocs_info **loc;
1977
1978 if (!ht)
1979 return NULL;
1980
1981 loc = (struct bfinfdpic_relocs_info **) htab_find_slot (ht, entry, insert);
0f64bb02 1982
c96a8570
BS		 1983 if (! loc)
1984 return NULL;
0f64bb02 1985
c96a8570
BS		 1986 if (*loc)
1987 return *loc;
0f64bb02 1988
c96a8570 1989 *loc = bfd_zalloc (abfd, sizeof (**loc));
0f64bb02 1990
c96a8570
BS		 1991 if (! *loc)
1992 return *loc;
0f64bb02 1993
c96a8570
BS		 1994 (*loc)->symndx = entry->symndx;
1995 (*loc)->d = entry->d;
1996 (*loc)->addend = entry->addend;
1997 (*loc)->plt_entry = (bfd_vma)-1;
1998 (*loc)->lzplt_entry = (bfd_vma)-1;
0f64bb02 1999
c96a8570
BS		 2000 return *loc;
2001}
48d502e1 2002
c96a8570
BS		 2003/* Obtain the address of the entry in HT associated with H's symbol +
2004 addend, creating a new entry if none existed. ABFD is only used
2005 for memory allocation purposes. */
2006inline static struct bfinfdpic_relocs_info *
2007bfinfdpic_relocs_info_for_global (struct htab *ht,
2c3fc389
NC		 2008 bfd *abfd,
2009 struct elf_link_hash_entry *h,
2010 bfd_vma addend,
2011 enum insert_option insert)
c96a8570
BS		 2012{
2013 struct bfinfdpic_relocs_info entry;
0f64bb02 2014
c96a8570
BS		 2015 entry.symndx = -1;
2016 entry.d.h = h;
2017 entry.addend = addend;
f4707595 2018
c96a8570
BS		 2019 return bfinfdpic_relocs_info_find (ht, abfd, &entry, insert);
2020}
48d502e1 2021
c96a8570
BS		 2022/* Obtain the address of the entry in HT associated with the SYMNDXth
2023 local symbol of the input bfd ABFD, plus the addend, creating a new
2024 entry if none existed. */
2025inline static struct bfinfdpic_relocs_info *
2026bfinfdpic_relocs_info_for_local (struct htab *ht,
2027 bfd *abfd,
2028 long symndx,
2029 bfd_vma addend,
2030 enum insert_option insert)
2031{
2032 struct bfinfdpic_relocs_info entry;
ab96bf03 2033
c96a8570
BS		 2034 entry.symndx = symndx;
2035 entry.d.abfd = abfd;
2036 entry.addend = addend;
48d502e1 2037
c96a8570
BS		 2038 return bfinfdpic_relocs_info_find (ht, abfd, &entry, insert);
2039}
48d502e1 2040
c96a8570
BS		 2041/* Merge fields set by check_relocs() of two entries that end up being
2042 mapped to the same (presumably global) symbol. */
0f64bb02 2043
c96a8570
BS		 2044inline static void
2045bfinfdpic_pic_merge_early_relocs_info (struct bfinfdpic_relocs_info *e2,
2c3fc389 2046 struct bfinfdpic_relocs_info const *e1)
c96a8570
BS		 2047{
2048 e2->got17m4 |= e1->got17m4;
2049 e2->gothilo |= e1->gothilo;
2050 e2->fd |= e1->fd;
2051 e2->fdgot17m4 |= e1->fdgot17m4;
2052 e2->fdgothilo |= e1->fdgothilo;
2053 e2->fdgoff17m4 |= e1->fdgoff17m4;
2054 e2->fdgoffhilo |= e1->fdgoffhilo;
2055 e2->gotoff |= e1->gotoff;
2056 e2->call |= e1->call;
2057 e2->sym |= e1->sym;
2058}
48d502e1 2059
c96a8570
BS		 2060/* Every block of 65535 lazy PLT entries shares a single call to the
2061 resolver, inserted in the 32768th lazy PLT entry (i.e., entry #
2062 32767, counting from 0). All other lazy PLT entries branch to it
2063 in a single instruction. */
48d502e1 2064
c96a8570
BS		 2065#define LZPLT_RESOLVER_EXTRA 10
2066#define LZPLT_NORMAL_SIZE 6
2067#define LZPLT_ENTRIES 1362
48d502e1 2068
c96a8570
BS		 2069#define BFINFDPIC_LZPLT_BLOCK_SIZE ((bfd_vma) LZPLT_NORMAL_SIZE * LZPLT_ENTRIES + LZPLT_RESOLVER_EXTRA)
2070#define BFINFDPIC_LZPLT_RESOLV_LOC (LZPLT_NORMAL_SIZE * LZPLT_ENTRIES / 2)
48d502e1 2071
c96a8570 2072/* Add a dynamic relocation to the SRELOC section. */
48d502e1 2073
c96a8570
BS		 2074inline static bfd_vma
2075_bfinfdpic_add_dyn_reloc (bfd *output_bfd, asection *sreloc, bfd_vma offset,
2076 int reloc_type, long dynindx, bfd_vma addend,
2077 struct bfinfdpic_relocs_info *entry)
2078{
2079 Elf_Internal_Rela outrel;
2080 bfd_vma reloc_offset;
0f64bb02 2081
c96a8570
BS		 2082 outrel.r_offset = offset;
2083 outrel.r_info = ELF32_R_INFO (dynindx, reloc_type);
2084 outrel.r_addend = addend;
48d502e1 2085
c96a8570
BS		 2086 reloc_offset = sreloc->reloc_count * sizeof (Elf32_External_Rel);
2087 BFD_ASSERT (reloc_offset < sreloc->size);
2088 bfd_elf32_swap_reloc_out (output_bfd, &outrel,
2089 sreloc->contents + reloc_offset);
2090 sreloc->reloc_count++;
48d502e1 2091
c96a8570
BS		 2092 /* If the entry's index is zero, this relocation was probably to a
2093 linkonce section that got discarded. We reserved a dynamic
2094 relocation, but it was for another entry than the one we got at
2095 the time of emitting the relocation. Unfortunately there's no
2096 simple way for us to catch this situation, since the relocation
2097 is cleared right before calling relocate_section, at which point
2098 we no longer know what the relocation used to point to. */
2099 if (entry->symndx)
2100 {
2101 BFD_ASSERT (entry->dynrelocs > 0);
2102 entry->dynrelocs--;
2103 }
48d502e1 2104
c96a8570
BS		 2105 return reloc_offset;
2106}
0f64bb02 2107
c96a8570 2108/* Add a fixup to the ROFIXUP section. */
48d502e1 2109
c96a8570
BS		 2110static bfd_vma
2111_bfinfdpic_add_rofixup (bfd *output_bfd, asection *rofixup, bfd_vma offset,
2c3fc389 2112 struct bfinfdpic_relocs_info *entry)
c96a8570
BS		 2113{
2114 bfd_vma fixup_offset;
8aafe8b4 2115
c96a8570
BS		 2116 if (rofixup->flags & SEC_EXCLUDE)
2117 return -1;
0f64bb02 2118
c96a8570
BS		 2119 fixup_offset = rofixup->reloc_count * 4;
2120 if (rofixup->contents)
2121 {
2122 BFD_ASSERT (fixup_offset < rofixup->size);
2123 bfd_put_32 (output_bfd, offset, rofixup->contents + fixup_offset);
2124 }
2125 rofixup->reloc_count++;
0f64bb02 2126
c96a8570
BS		 2127 if (entry && entry->symndx)
2128 {
2129 /* See discussion about symndx == 0 in _bfinfdpic_add_dyn_reloc
2130 above. */
2131 BFD_ASSERT (entry->fixups > 0);
2132 entry->fixups--;
2133 }
f4707595 2134
c96a8570
BS		 2135 return fixup_offset;
2136}
0f64bb02 2137
c96a8570
BS		 2138/* Find the segment number in which OSEC, and output section, is
2139 located. */
ca889129 2140
c96a8570
BS		 2141static unsigned
2142_bfinfdpic_osec_to_segment (bfd *output_bfd, asection *osec)
2143{
2144 Elf_Internal_Phdr *p = _bfd_elf_find_segment_containing_section (output_bfd, osec);
0f64bb02 2145
c96a8570
BS		 2146 return (p != NULL) ? p - elf_tdata (output_bfd)->phdr : -1;
2147}
2148
2149inline static bfd_boolean
2150_bfinfdpic_osec_readonly_p (bfd *output_bfd, asection *osec)
2151{
2152 unsigned seg = _bfinfdpic_osec_to_segment (output_bfd, osec);
2153
2154 return ! (elf_tdata (output_bfd)->phdr[seg].p_flags & PF_W);
2155}
2156
2157/* Generate relocations for GOT entries, function descriptors, and
2158 code for PLT and lazy PLT entries. */
2159
2160inline static bfd_boolean
2161_bfinfdpic_emit_got_relocs_plt_entries (struct bfinfdpic_relocs_info *entry,
2162 bfd *output_bfd,
2163 struct bfd_link_info *info,
2164 asection *sec,
2165 Elf_Internal_Sym *sym,
2166 bfd_vma addend)
c96a8570 2167{
2c3fc389 2168 bfd_vma fd_lazy_rel_offset = (bfd_vma) -1;
c96a8570
BS		 2169 int dynindx = -1;
2170
2171 if (entry->done)
2172 return TRUE;
2173 entry->done = 1;
2174
2175 if (entry->got_entry || entry->fdgot_entry || entry->fd_entry)
2176 {
2177 /* If the symbol is dynamic, consider it for dynamic
2178 relocations, otherwise decay to section + offset. */
2179 if (entry->symndx == -1 && entry->d.h->dynindx != -1)
2180 dynindx = entry->d.h->dynindx;
2181 else
2182 {
6a9adeca
BS		 2183 if (sec
2184 && sec->output_section
c96a8570
BS		 2185 && ! bfd_is_abs_section (sec->output_section)
2186 && ! bfd_is_und_section (sec->output_section))
2187 dynindx = elf_section_data (sec->output_section)->dynindx;
2188 else
2189 dynindx = 0;
2190 }
2191 }
2192
2193 /* Generate relocation for GOT entry pointing to the symbol. */
2194 if (entry->got_entry)
2195 {
2196 int idx = dynindx;
2197 bfd_vma ad = addend;
2198
2199 /* If the symbol is dynamic but binds locally, use
2200 section+offset. */
2201 if (sec && (entry->symndx != -1
2202 || BFINFDPIC_SYM_LOCAL (info, entry->d.h)))
2203 {
2204 if (entry->symndx == -1)
2205 ad += entry->d.h->root.u.def.value;
2206 else
2207 ad += sym->st_value;
2208 ad += sec->output_offset;
2209 if (sec->output_section && elf_section_data (sec->output_section))
2210 idx = elf_section_data (sec->output_section)->dynindx;
2211 else
2212 idx = 0;
2213 }
2214
2215 /* If we're linking an executable at a fixed address, we can
2216 omit the dynamic relocation as long as the symbol is local to
2217 this module. */
3cbc1e5e 2218 if (bfd_link_pde (info)
c96a8570
BS		 2219 && (entry->symndx != -1
2220 || BFINFDPIC_SYM_LOCAL (info, entry->d.h)))
2221 {
2222 if (sec)
2223 ad += sec->output_section->vma;
2224 if (entry->symndx != -1
2225 || entry->d.h->root.type != bfd_link_hash_undefweak)
2226 _bfinfdpic_add_rofixup (output_bfd,
2227 bfinfdpic_gotfixup_section (info),
2228 bfinfdpic_got_section (info)->output_section
2229 ->vma
2230 + bfinfdpic_got_section (info)->output_offset
2231 + bfinfdpic_got_initial_offset (info)
2232 + entry->got_entry, entry);
2233 }
2234 else
2235 _bfinfdpic_add_dyn_reloc (output_bfd, bfinfdpic_gotrel_section (info),
2236 _bfd_elf_section_offset
2237 (output_bfd, info,
2238 bfinfdpic_got_section (info),
2239 bfinfdpic_got_initial_offset (info)
2240 + entry->got_entry)
2241 + bfinfdpic_got_section (info)
2242 ->output_section->vma
2243 + bfinfdpic_got_section (info)->output_offset,
cb88ce9f 2244 R_BFIN_BYTE4_DATA, idx, ad, entry);
c96a8570
BS		 2245
2246 bfd_put_32 (output_bfd, ad,
2247 bfinfdpic_got_section (info)->contents
2248 + bfinfdpic_got_initial_offset (info)
2249 + entry->got_entry);
2250 }
2251
2252 /* Generate relocation for GOT entry pointing to a canonical
2253 function descriptor. */
2254 if (entry->fdgot_entry)
2255 {
2256 int reloc, idx;
2257 bfd_vma ad = 0;
2258
2259 if (! (entry->symndx == -1
2260 && entry->d.h->root.type == bfd_link_hash_undefweak
2261 && BFINFDPIC_SYM_LOCAL (info, entry->d.h)))
2262 {
2263 /* If the symbol is dynamic and there may be dynamic symbol
2264 resolution because we are, or are linked with, a shared
2265 library, emit a FUNCDESC relocation such that the dynamic
2266 linker will allocate the function descriptor. If the
2267 symbol needs a non-local function descriptor but binds
2268 locally (e.g., its visibility is protected, emit a
2269 dynamic relocation decayed to section+offset. */
2270 if (entry->symndx == -1
2271 && ! BFINFDPIC_FUNCDESC_LOCAL (info, entry->d.h)
2272 && BFINFDPIC_SYM_LOCAL (info, entry->d.h)
3cbc1e5e 2273 && !bfd_link_pde (info))
c96a8570
BS		 2274 {
2275 reloc = R_BFIN_FUNCDESC;
2276 idx = elf_section_data (entry->d.h->root.u.def.section
2277 ->output_section)->dynindx;
2278 ad = entry->d.h->root.u.def.section->output_offset
2279 + entry->d.h->root.u.def.value;
2280 }
2281 else if (entry->symndx == -1
2282 && ! BFINFDPIC_FUNCDESC_LOCAL (info, entry->d.h))
2283 {
2284 reloc = R_BFIN_FUNCDESC;
2285 idx = dynindx;
2286 ad = addend;
2287 if (ad)
2288 return FALSE;
2289 }
2290 else
2291 {
2292 /* Otherwise, we know we have a private function descriptor,
2293 so reference it directly. */
2294 if (elf_hash_table (info)->dynamic_sections_created)
2295 BFD_ASSERT (entry->privfd);
cb88ce9f 2296 reloc = R_BFIN_BYTE4_DATA;
c96a8570
BS		 2297 idx = elf_section_data (bfinfdpic_got_section (info)
2298 ->output_section)->dynindx;
2299 ad = bfinfdpic_got_section (info)->output_offset
2300 + bfinfdpic_got_initial_offset (info) + entry->fd_entry;
2301 }
2302
2303 /* If there is room for dynamic symbol resolution, emit the
2304 dynamic relocation. However, if we're linking an
2305 executable at a fixed location, we won't have emitted a
2306 dynamic symbol entry for the got section, so idx will be
2307 zero, which means we can and should compute the address
2308 of the private descriptor ourselves. */
3cbc1e5e 2309 if (bfd_link_pde (info)
c96a8570
BS		 2310 && (entry->symndx != -1
2311 || BFINFDPIC_FUNCDESC_LOCAL (info, entry->d.h)))
2312 {
2313 ad += bfinfdpic_got_section (info)->output_section->vma;
2314 _bfinfdpic_add_rofixup (output_bfd,
2315 bfinfdpic_gotfixup_section (info),
2316 bfinfdpic_got_section (info)
2317 ->output_section->vma
2318 + bfinfdpic_got_section (info)
2319 ->output_offset
2320 + bfinfdpic_got_initial_offset (info)
2321 + entry->fdgot_entry, entry);
2322 }
2323 else
2324 _bfinfdpic_add_dyn_reloc (output_bfd,
2325 bfinfdpic_gotrel_section (info),
2326 _bfd_elf_section_offset
2327 (output_bfd, info,
2328 bfinfdpic_got_section (info),
2329 bfinfdpic_got_initial_offset (info)
2330 + entry->fdgot_entry)
2331 + bfinfdpic_got_section (info)
2332 ->output_section->vma
2333 + bfinfdpic_got_section (info)
2334 ->output_offset,
2335 reloc, idx, ad, entry);
2336 }
f4707595 2337
c96a8570
BS		 2338 bfd_put_32 (output_bfd, ad,
2339 bfinfdpic_got_section (info)->contents
2340 + bfinfdpic_got_initial_offset (info)
2341 + entry->fdgot_entry);
2342 }
2343
2344 /* Generate relocation to fill in a private function descriptor in
2345 the GOT. */
2346 if (entry->fd_entry)
2347 {
2348 int idx = dynindx;
2349 bfd_vma ad = addend;
2350 bfd_vma ofst;
2351 long lowword, highword;
2352
2353 /* If the symbol is dynamic but binds locally, use
2354 section+offset. */
2355 if (sec && (entry->symndx != -1
2356 || BFINFDPIC_SYM_LOCAL (info, entry->d.h)))
2357 {
2358 if (entry->symndx == -1)
2359 ad += entry->d.h->root.u.def.value;
2360 else
2361 ad += sym->st_value;
2362 ad += sec->output_offset;
2363 if (sec->output_section && elf_section_data (sec->output_section))
2364 idx = elf_section_data (sec->output_section)->dynindx;
2365 else
2366 idx = 0;
48d502e1 2367 }
f4707595 2368
c96a8570
BS		 2369 /* If we're linking an executable at a fixed address, we can
2370 omit the dynamic relocation as long as the symbol is local to
2371 this module. */
3cbc1e5e 2372 if (bfd_link_pde (info)
c96a8570 2373 && (entry->symndx != -1 || BFINFDPIC_SYM_LOCAL (info, entry->d.h)))
48d502e1 2374 {
c96a8570
BS		 2375 if (sec)
2376 ad += sec->output_section->vma;
2377 ofst = 0;
2378 if (entry->symndx != -1
2379 || entry->d.h->root.type != bfd_link_hash_undefweak)
2380 {
2381 _bfinfdpic_add_rofixup (output_bfd,
2382 bfinfdpic_gotfixup_section (info),
2383 bfinfdpic_got_section (info)
2384 ->output_section->vma
2385 + bfinfdpic_got_section (info)
2386 ->output_offset
2387 + bfinfdpic_got_initial_offset (info)
2388 + entry->fd_entry, entry);
2389 _bfinfdpic_add_rofixup (output_bfd,
2390 bfinfdpic_gotfixup_section (info),
2391 bfinfdpic_got_section (info)
2392 ->output_section->vma
2393 + bfinfdpic_got_section (info)
2394 ->output_offset
2395 + bfinfdpic_got_initial_offset (info)
2396 + entry->fd_entry + 4, entry);
2397 }
2398 }
2399 else
2400 {
2401 ofst
2402 = _bfinfdpic_add_dyn_reloc (output_bfd,
2403 entry->lazyplt
2404 ? bfinfdpic_pltrel_section (info)
2405 : bfinfdpic_gotrel_section (info),
2406 _bfd_elf_section_offset
2407 (output_bfd, info,
2408 bfinfdpic_got_section (info),
2409 bfinfdpic_got_initial_offset (info)
2410 + entry->fd_entry)
2411 + bfinfdpic_got_section (info)
2412 ->output_section->vma
2413 + bfinfdpic_got_section (info)
2414 ->output_offset,
2415 R_BFIN_FUNCDESC_VALUE, idx, ad, entry);
48d502e1 2416 }
f4707595 2417
c96a8570
BS		 2418 /* If we've omitted the dynamic relocation, just emit the fixed
2419 addresses of the symbol and of the local GOT base offset. */
3cbc1e5e 2420 if (bfd_link_pde (info)
0e1862bb
L		 2421 && sec
2422 && sec->output_section)
48d502e1 2423 {
c96a8570
BS		 2424 lowword = ad;
2425 highword = bfinfdpic_got_section (info)->output_section->vma
2426 + bfinfdpic_got_section (info)->output_offset
2427 + bfinfdpic_got_initial_offset (info);
2428 }
2429 else if (entry->lazyplt)
2430 {
2431 if (ad)
2432 return FALSE;
f4707595 2433
c96a8570 2434 fd_lazy_rel_offset = ofst;
f4707595 2435
c96a8570
BS		 2436 /* A function descriptor used for lazy or local resolving is
2437 initialized such that its high word contains the output
2438 section index in which the PLT entries are located, and
2439 the low word contains the address of the lazy PLT entry
2440 entry point, that must be within the memory region
2441 assigned to that section. */
2442 lowword = entry->lzplt_entry + 4
2443 + bfinfdpic_plt_section (info)->output_offset
2444 + bfinfdpic_plt_section (info)->output_section->vma;
2445 highword = _bfinfdpic_osec_to_segment
2446 (output_bfd, bfinfdpic_plt_section (info)->output_section);
2447 }
2448 else
2449 {
2450 /* A function descriptor for a local function gets the index
2451 of the section. For a non-local function, it's
2452 disregarded. */
2453 lowword = ad;
6a9adeca
BS		 2454 if (sec == NULL
2455 || (entry->symndx == -1 && entry->d.h->dynindx != -1
2456 && entry->d.h->dynindx == idx))
c96a8570
BS		 2457 highword = 0;
2458 else
2459 highword = _bfinfdpic_osec_to_segment
2460 (output_bfd, sec->output_section);
48d502e1 2461 }
f4707595 2462
c96a8570
BS		 2463 bfd_put_32 (output_bfd, lowword,
2464 bfinfdpic_got_section (info)->contents
2465 + bfinfdpic_got_initial_offset (info)
2466 + entry->fd_entry);
2467 bfd_put_32 (output_bfd, highword,
2468 bfinfdpic_got_section (info)->contents
2469 + bfinfdpic_got_initial_offset (info)
2470 + entry->fd_entry + 4);
2471 }
2472
2473 /* Generate code for the PLT entry. */
2474 if (entry->plt_entry != (bfd_vma) -1)
2475 {
2476 bfd_byte *plt_code = bfinfdpic_plt_section (info)->contents
2477 + entry->plt_entry;
2478
2479 BFD_ASSERT (entry->fd_entry);
2480
2481 /* Figure out what kind of PLT entry we need, depending on the
2482 location of the function descriptor within the GOT. */
2483 if (entry->fd_entry >= -(1 << (18 - 1))
2484 && entry->fd_entry + 4 < (1 << (18 - 1)))
48d502e1 2485 {
c96a8570
BS		 2486 /* P1 = [P3 + fd_entry]; P3 = [P3 + fd_entry + 4] */
2487 bfd_put_32 (output_bfd,
2488 0xe519 | ((entry->fd_entry << 14) & 0xFFFF0000),
2489 plt_code);
2490 bfd_put_32 (output_bfd,
2491 0xe51b | (((entry->fd_entry + 4) << 14) & 0xFFFF0000),
2492 plt_code + 4);
2493 plt_code += 8;
2494 }
2495 else
2496 {
2497 /* P1.L = fd_entry; P1.H = fd_entry;
2498 P3 = P3 + P1;
2499 P1 = [P3];
2500 P3 = [P3 + 4]; */
2501 bfd_put_32 (output_bfd,
2502 0xe109 | (entry->fd_entry << 16),
2503 plt_code);
2504 bfd_put_32 (output_bfd,
2505 0xe149 | (entry->fd_entry & 0xFFFF0000),
2506 plt_code + 4);
2507 bfd_put_16 (output_bfd, 0x5ad9, plt_code + 8);
2508 bfd_put_16 (output_bfd, 0x9159, plt_code + 10);
2509 bfd_put_16 (output_bfd, 0xac5b, plt_code + 12);
2510 plt_code += 14;
2511 }
2512 /* JUMP (P1) */
2513 bfd_put_16 (output_bfd, 0x0051, plt_code);
2514 }
f4707595 2515
c96a8570
BS		 2516 /* Generate code for the lazy PLT entry. */
2517 if (entry->lzplt_entry != (bfd_vma) -1)
2518 {
2519 bfd_byte *lzplt_code = bfinfdpic_plt_section (info)->contents
2520 + entry->lzplt_entry;
2521 bfd_vma resolverStub_addr;
0f64bb02 2522
c96a8570
BS		 2523 bfd_put_32 (output_bfd, fd_lazy_rel_offset, lzplt_code);
2524 lzplt_code += 4;
0f64bb02 2525
c96a8570
BS		 2526 resolverStub_addr = entry->lzplt_entry / BFINFDPIC_LZPLT_BLOCK_SIZE
2527 * BFINFDPIC_LZPLT_BLOCK_SIZE + BFINFDPIC_LZPLT_RESOLV_LOC;
2528 if (resolverStub_addr >= bfinfdpic_plt_initial_offset (info))
2529 resolverStub_addr = bfinfdpic_plt_initial_offset (info) - LZPLT_NORMAL_SIZE - LZPLT_RESOLVER_EXTRA;
0f64bb02 2530
c96a8570 2531 if (entry->lzplt_entry == resolverStub_addr)
0f64bb02 2532 {
c96a8570
BS		 2533 /* This is a lazy PLT entry that includes a resolver call.
2534 P2 = [P3];
2535 R3 = [P3 + 4];
2536 JUMP (P2); */
2537 bfd_put_32 (output_bfd,
2538 0xa05b915a,
2539 lzplt_code);
2540 bfd_put_16 (output_bfd, 0x0052, lzplt_code + 4);
2541 }
2542 else
2543 {
2544 /* JUMP.S resolverStub */
2545 bfd_put_16 (output_bfd,
2546 0x2000
2547 | (((resolverStub_addr - entry->lzplt_entry)
2548 / 2) & (((bfd_vma)1 << 12) - 1)),
2549 lzplt_code);
2550 }
2551 }
0f64bb02 2552
c96a8570
BS		 2553 return TRUE;
2554}
2555\f
2556/* Relocate an Blackfin ELF section.
48d502e1 2557
c96a8570
BS		 2558 The RELOCATE_SECTION function is called by the new ELF backend linker
2559 to handle the relocations for a section.
48d502e1 2560
c96a8570
BS		 2561 The relocs are always passed as Rela structures; if the section
2562 actually uses Rel structures, the r_addend field will always be
2563 zero.
48d502e1 2564
c96a8570
BS		 2565 This function is responsible for adjusting the section contents as
2566 necessary, and (if using Rela relocs and generating a relocatable
2567 output file) adjusting the reloc addend as necessary.
48d502e1 2568
c96a8570
BS		 2569 This function does not have to worry about setting the reloc
2570 address or the reloc symbol index.
48d502e1 2571
c96a8570 2572 LOCAL_SYMS is a pointer to the swapped in local symbols.
48d502e1 2573
c96a8570
BS		 2574 LOCAL_SECTIONS is an array giving the section in the input file
2575 corresponding to the st_shndx field of each local symbol.
48d502e1 2576
c96a8570
BS		 2577 The global hash table entry for the global symbols can be found
2578 via elf_sym_hashes (input_bfd).
48d502e1 2579
c96a8570
BS		 2580 When generating relocatable output, this function must handle
2581 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
2582 going to be the section symbol corresponding to the output
2583 section, which means that the addend must be adjusted
2584 accordingly. */
48d502e1
BS		 2585
2586static bfd_boolean
c96a8570
BS		 2587bfinfdpic_relocate_section (bfd * output_bfd,
2588 struct bfd_link_info *info,
2589 bfd * input_bfd,
2590 asection * input_section,
2591 bfd_byte * contents,
2592 Elf_Internal_Rela * relocs,
2593 Elf_Internal_Sym * local_syms,
2594 asection ** local_sections)
48d502e1 2595{
48d502e1
BS		 2596 Elf_Internal_Shdr *symtab_hdr;
2597 struct elf_link_hash_entry **sym_hashes;
48d502e1
BS		 2598 Elf_Internal_Rela *rel;
2599 Elf_Internal_Rela *relend;
c96a8570
BS		 2600 unsigned isec_segment, got_segment, plt_segment,
2601 check_segment[2];
0e1862bb 2602 int silence_segment_error = !bfd_link_pic (info);
48d502e1 2603
c96a8570 2604 symtab_hdr = & elf_tdata (input_bfd)->symtab_hdr;
48d502e1 2605 sym_hashes = elf_sym_hashes (input_bfd);
c96a8570 2606 relend = relocs + input_section->reloc_count;
48d502e1 2607
c96a8570
BS		 2608 isec_segment = _bfinfdpic_osec_to_segment (output_bfd,
2609 input_section->output_section);
2610 if (IS_FDPIC (output_bfd) && bfinfdpic_got_section (info))
2611 got_segment = _bfinfdpic_osec_to_segment (output_bfd,
2612 bfinfdpic_got_section (info)
2613 ->output_section);
2614 else
2615 got_segment = -1;
2616 if (IS_FDPIC (output_bfd) && elf_hash_table (info)->dynamic_sections_created)
2617 plt_segment = _bfinfdpic_osec_to_segment (output_bfd,
2618 bfinfdpic_plt_section (info)
2619 ->output_section);
2620 else
2621 plt_segment = -1;
48d502e1 2622
c96a8570 2623 for (rel = relocs; rel < relend; rel ++)
48d502e1 2624 {
48d502e1
BS		 2625 reloc_howto_type *howto;
2626 unsigned long r_symndx;
48d502e1
BS		 2627 Elf_Internal_Sym *sym;
2628 asection *sec;
c96a8570
BS		 2629 struct elf_link_hash_entry *h;
2630 bfd_vma relocation;
48d502e1 2631 bfd_reloc_status_type r;
c96a8570
BS		 2632 const char * name = NULL;
2633 int r_type;
2634 asection *osec;
2635 struct bfinfdpic_relocs_info *picrel;
2636 bfd_vma orig_addend = rel->r_addend;
48d502e1
BS		 2637
2638 r_type = ELF32_R_TYPE (rel->r_info);
48d502e1 2639
c96a8570
BS		 2640 if (r_type == R_BFIN_GNU_VTINHERIT
2641 || r_type == R_BFIN_GNU_VTENTRY)
48d502e1
BS		 2642 continue;
2643
c96a8570 2644 r_symndx = ELF32_R_SYM (rel->r_info);
48d502e1
BS		 2645 howto = bfin_reloc_type_lookup (input_bfd, r_type);
2646 if (howto == NULL)
2647 {
2648 bfd_set_error (bfd_error_bad_value);
2649 return FALSE;
2650 }
48d502e1 2651
c96a8570
BS		 2652 h = NULL;
2653 sym = NULL;
2654 sec = NULL;
2655
2656 if (r_symndx < symtab_hdr->sh_info)
2657 {
2658 sym = local_syms + r_symndx;
2659 osec = sec = local_sections [r_symndx];
2660 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
2661
2662 name = bfd_elf_string_from_elf_section
2663 (input_bfd, symtab_hdr->sh_link, sym->st_name);
2664 name = (name == NULL) ? bfd_section_name (input_bfd, sec) : name;
2665 }
2666 else
2667 {
62d887d4 2668 bfd_boolean warned, ignored;
c96a8570
BS		 2669 bfd_boolean unresolved_reloc;
2670
2671 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2672 r_symndx, symtab_hdr, sym_hashes,
2673 h, sec, relocation,
62d887d4 2674 unresolved_reloc, warned, ignored);
c96a8570
BS		 2675 osec = sec;
2676 }
2677
dbaa2011 2678 if (sec != NULL && discarded_section (sec))
e4067dbb 2679 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
545fd46b 2680 rel, 1, relend, howto, 0, contents);
c96a8570 2681
0e1862bb 2682 if (bfd_link_relocatable (info))
c96a8570
BS		 2683 continue;
2684
2685 if (h != NULL
2686 && (h->root.type == bfd_link_hash_defined
2687 || h->root.type == bfd_link_hash_defweak)
2688 && !BFINFDPIC_SYM_LOCAL (info, h))
2689 {
2690 osec = sec = NULL;
2691 relocation = 0;
2692 }
2693
2694 switch (r_type)
2695 {
cb88ce9f
BS		 2696 case R_BFIN_PCREL24:
2697 case R_BFIN_PCREL24_JUMP_L:
2698 case R_BFIN_BYTE4_DATA:
c96a8570
BS		 2699 if (! IS_FDPIC (output_bfd))
2700 goto non_fdpic;
2701
2702 case R_BFIN_GOT17M4:
2703 case R_BFIN_GOTHI:
2704 case R_BFIN_GOTLO:
2705 case R_BFIN_FUNCDESC_GOT17M4:
2706 case R_BFIN_FUNCDESC_GOTHI:
2707 case R_BFIN_FUNCDESC_GOTLO:
2708 case R_BFIN_GOTOFF17M4:
2709 case R_BFIN_GOTOFFHI:
2710 case R_BFIN_GOTOFFLO:
2711 case R_BFIN_FUNCDESC_GOTOFF17M4:
2712 case R_BFIN_FUNCDESC_GOTOFFHI:
2713 case R_BFIN_FUNCDESC_GOTOFFLO:
2714 case R_BFIN_FUNCDESC:
2715 case R_BFIN_FUNCDESC_VALUE:
2716 if (h != NULL)
2717 picrel = bfinfdpic_relocs_info_for_global (bfinfdpic_relocs_info
2718 (info), input_bfd, h,
2719 orig_addend, INSERT);
2720 else
2721 /* In order to find the entry we created before, we must
2722 use the original addend, not the one that may have been
2723 modified by _bfd_elf_rela_local_sym(). */
2724 picrel = bfinfdpic_relocs_info_for_local (bfinfdpic_relocs_info
2725 (info), input_bfd, r_symndx,
2726 orig_addend, INSERT);
2727 if (! picrel)
2728 return FALSE;
2729
2730 if (!_bfinfdpic_emit_got_relocs_plt_entries (picrel, output_bfd, info,
2731 osec, sym,
2732 rel->r_addend))
2733 {
2734 (*_bfd_error_handler)
2735 (_("%B: relocation at `%A+0x%x' references symbol `%s' with nonzero addend"),
2736 input_bfd, input_section, rel->r_offset, name);
2737 return FALSE;
2738
2739 }
48d502e1 2740
c96a8570 2741 break;
ab96bf03 2742
c96a8570
BS		 2743 default:
2744 non_fdpic:
2745 picrel = NULL;
1d5316ab
AM		 2746 if (h && ! BFINFDPIC_SYM_LOCAL (info, h)
2747 && _bfd_elf_section_offset (output_bfd, info, input_section,
2748 rel->r_offset) != (bfd_vma) -1)
c96a8570
BS		 2749 {
2750 info->callbacks->warning
2751 (info, _("relocation references symbol not defined in the module"),
2752 name, input_bfd, input_section, rel->r_offset);
2753 return FALSE;
2754 }
2755 break;
48d502e1
BS		 2756 }
2757
c96a8570 2758 switch (r_type)
ab96bf03 2759 {
cb88ce9f
BS		 2760 case R_BFIN_PCREL24:
2761 case R_BFIN_PCREL24_JUMP_L:
c96a8570
BS		 2762 check_segment[0] = isec_segment;
2763 if (! IS_FDPIC (output_bfd))
2764 check_segment[1] = isec_segment;
2765 else if (picrel->plt)
2766 {
2767 relocation = bfinfdpic_plt_section (info)->output_section->vma
2768 + bfinfdpic_plt_section (info)->output_offset
2769 + picrel->plt_entry;
2770 check_segment[1] = plt_segment;
2771 }
2772 /* We don't want to warn on calls to undefined weak symbols,
2773 as calls to them must be protected by non-NULL tests
2774 anyway, and unprotected calls would invoke undefined
2775 behavior. */
2776 else if (picrel->symndx == -1
2777 && picrel->d.h->root.type == bfd_link_hash_undefweak)
2778 check_segment[1] = check_segment[0];
2779 else
2780 check_segment[1] = sec
2781 ? _bfinfdpic_osec_to_segment (output_bfd, sec->output_section)
2782 : (unsigned)-1;
2783 break;
ab96bf03 2784
c96a8570
BS		 2785 case R_BFIN_GOT17M4:
2786 case R_BFIN_GOTHI:
2787 case R_BFIN_GOTLO:
2788 relocation = picrel->got_entry;
2789 check_segment[0] = check_segment[1] = got_segment;
2790 break;
ab96bf03 2791
c96a8570
BS		 2792 case R_BFIN_FUNCDESC_GOT17M4:
2793 case R_BFIN_FUNCDESC_GOTHI:
2794 case R_BFIN_FUNCDESC_GOTLO:
2795 relocation = picrel->fdgot_entry;
2796 check_segment[0] = check_segment[1] = got_segment;
2797 break;
48d502e1 2798
c96a8570
BS		 2799 case R_BFIN_GOTOFFHI:
2800 case R_BFIN_GOTOFF17M4:
2801 case R_BFIN_GOTOFFLO:
2802 relocation -= bfinfdpic_got_section (info)->output_section->vma
2803 + bfinfdpic_got_section (info)->output_offset
2804 + bfinfdpic_got_initial_offset (info);
2805 check_segment[0] = got_segment;
2806 check_segment[1] = sec
2807 ? _bfinfdpic_osec_to_segment (output_bfd, sec->output_section)
2808 : (unsigned)-1;
2809 break;
48d502e1 2810
c96a8570
BS		 2811 case R_BFIN_FUNCDESC_GOTOFF17M4:
2812 case R_BFIN_FUNCDESC_GOTOFFHI:
2813 case R_BFIN_FUNCDESC_GOTOFFLO:
2814 relocation = picrel->fd_entry;
2815 check_segment[0] = check_segment[1] = got_segment;
2816 break;
48d502e1 2817
c96a8570 2818 case R_BFIN_FUNCDESC:
48d502e1 2819 {
c96a8570
BS		 2820 int dynindx;
2821 bfd_vma addend = rel->r_addend;
48d502e1 2822
c96a8570
BS		 2823 if (! (h && h->root.type == bfd_link_hash_undefweak
2824 && BFINFDPIC_SYM_LOCAL (info, h)))
2825 {
2826 /* If the symbol is dynamic and there may be dynamic
2827 symbol resolution because we are or are linked with a
2828 shared library, emit a FUNCDESC relocation such that
2829 the dynamic linker will allocate the function
2830 descriptor. If the symbol needs a non-local function
2831 descriptor but binds locally (e.g., its visibility is
2832 protected, emit a dynamic relocation decayed to
2833 section+offset. */
2834 if (h && ! BFINFDPIC_FUNCDESC_LOCAL (info, h)
2835 && BFINFDPIC_SYM_LOCAL (info, h)
3cbc1e5e 2836 && !bfd_link_pde (info))
c96a8570
BS		 2837 {
2838 dynindx = elf_section_data (h->root.u.def.section
2839 ->output_section)->dynindx;
2840 addend += h->root.u.def.section->output_offset
2841 + h->root.u.def.value;
2842 }
2843 else if (h && ! BFINFDPIC_FUNCDESC_LOCAL (info, h))
2844 {
2845 if (addend)
2846 {
2847 info->callbacks->warning
2848 (info, _("R_BFIN_FUNCDESC references dynamic symbol with nonzero addend"),
2849 name, input_bfd, input_section, rel->r_offset);
2850 return FALSE;
2851 }
2852 dynindx = h->dynindx;
2853 }
2854 else
2855 {
2856 /* Otherwise, we know we have a private function
2857 descriptor, so reference it directly. */
2858 BFD_ASSERT (picrel->privfd);
cb88ce9f 2859 r_type = R_BFIN_BYTE4_DATA;
c96a8570
BS		 2860 dynindx = elf_section_data (bfinfdpic_got_section (info)
2861 ->output_section)->dynindx;
2862 addend = bfinfdpic_got_section (info)->output_offset
2863 + bfinfdpic_got_initial_offset (info)
2864 + picrel->fd_entry;
2865 }
2866
2867 /* If there is room for dynamic symbol resolution, emit
2868 the dynamic relocation. However, if we're linking an
2869 executable at a fixed location, we won't have emitted a
2870 dynamic symbol entry for the got section, so idx will
2871 be zero, which means we can and should compute the
2872 address of the private descriptor ourselves. */
3cbc1e5e 2873 if (bfd_link_pde (info)
c96a8570
BS		 2874 && (!h || BFINFDPIC_FUNCDESC_LOCAL (info, h)))
2875 {
6a9adeca
BS		 2876 bfd_vma offset;
2877
c96a8570
BS		 2878 addend += bfinfdpic_got_section (info)->output_section->vma;
2879 if ((bfd_get_section_flags (output_bfd,
2880 input_section->output_section)
2881 & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
2882 {
2883 if (_bfinfdpic_osec_readonly_p (output_bfd,
2884 input_section
2885 ->output_section))
2886 {
2887 info->callbacks->warning
2888 (info,
2889 _("cannot emit fixups in read-only section"),
2890 name, input_bfd, input_section, rel->r_offset);
2891 return FALSE;
2892 }
6a9adeca
BS		 2893
2894 offset = _bfd_elf_section_offset
2895 (output_bfd, info,
2896 input_section, rel->r_offset);
2897
2898 if (offset != (bfd_vma)-1)
2899 _bfinfdpic_add_rofixup (output_bfd,
2900 bfinfdpic_gotfixup_section
2901 (info),
2902 offset + input_section
2903 ->output_section->vma
2904 + input_section->output_offset,
2905 picrel);
c96a8570
BS		 2906 }
2907 }
2908 else if ((bfd_get_section_flags (output_bfd,
2909 input_section->output_section)
2910 & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
2911 {
2912 bfd_vma offset;
2913
2914 if (_bfinfdpic_osec_readonly_p (output_bfd,
2915 input_section
2916 ->output_section))
2917 {
2918 info->callbacks->warning
2919 (info,
2920 _("cannot emit dynamic relocations in read-only section"),
2921 name, input_bfd, input_section, rel->r_offset);
2922 return FALSE;
2923 }
2924 offset = _bfd_elf_section_offset (output_bfd, info,
2925 input_section, rel->r_offset);
6a9adeca
BS		 2926
2927 if (offset != (bfd_vma)-1)
c96a8570
BS		 2928 _bfinfdpic_add_dyn_reloc (output_bfd,
2929 bfinfdpic_gotrel_section (info),
2930 offset + input_section
2931 ->output_section->vma
2932 + input_section->output_offset,
2933 r_type,
2934 dynindx, addend, picrel);
2935 }
2936 else
2937 addend += bfinfdpic_got_section (info)->output_section->vma;
2938 }
2939
2940 /* We want the addend in-place because dynamic
2941 relocations are REL. Setting relocation to it should
2942 arrange for it to be installed. */
2943 relocation = addend - rel->r_addend;
2944 }
2945 check_segment[0] = check_segment[1] = got_segment;
2946 break;
2947
cb88ce9f 2948 case R_BFIN_BYTE4_DATA:
c96a8570 2949 if (! IS_FDPIC (output_bfd))
7a84e3da 2950 {
c96a8570
BS		 2951 check_segment[0] = check_segment[1] = -1;
2952 break;
7a84e3da 2953 }
c96a8570
BS		 2954 /* Fall through. */
2955 case R_BFIN_FUNCDESC_VALUE:
2956 {
2957 int dynindx;
2958 bfd_vma addend = rel->r_addend;
2959 bfd_vma offset;
2960 offset = _bfd_elf_section_offset (output_bfd, info,
2961 input_section, rel->r_offset);
7a84e3da 2962
c96a8570
BS		 2963 /* If the symbol is dynamic but binds locally, use
2964 section+offset. */
2965 if (h && ! BFINFDPIC_SYM_LOCAL (info, h))
48d502e1 2966 {
c96a8570
BS		 2967 if (addend && r_type == R_BFIN_FUNCDESC_VALUE)
2968 {
2969 info->callbacks->warning
2970 (info, _("R_BFIN_FUNCDESC_VALUE references dynamic symbol with nonzero addend"),
2971 name, input_bfd, input_section, rel->r_offset);
2972 return FALSE;
2973 }
2974 dynindx = h->dynindx;
48d502e1 2975 }
c96a8570 2976 else
48d502e1 2977 {
c96a8570
BS		 2978 if (h)
2979 addend += h->root.u.def.value;
2980 else
2981 addend += sym->st_value;
2982 if (osec)
2983 addend += osec->output_offset;
2984 if (osec && osec->output_section
2985 && ! bfd_is_abs_section (osec->output_section)
2986 && ! bfd_is_und_section (osec->output_section))
2987 dynindx = elf_section_data (osec->output_section)->dynindx;
2988 else
2989 dynindx = 0;
2990 }
48d502e1 2991
c96a8570
BS		 2992 /* If we're linking an executable at a fixed address, we
2993 can omit the dynamic relocation as long as the symbol
2994 is defined in the current link unit (which is implied
2995 by its output section not being NULL). */
3cbc1e5e 2996 if (bfd_link_pde (info)
c96a8570
BS		 2997 && (!h || BFINFDPIC_SYM_LOCAL (info, h)))
2998 {
2999 if (osec)
3000 addend += osec->output_section->vma;
3001 if (IS_FDPIC (input_bfd)
3002 && (bfd_get_section_flags (output_bfd,
3003 input_section->output_section)
3004 & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
48d502e1 3005 {
c96a8570
BS		 3006 if (_bfinfdpic_osec_readonly_p (output_bfd,
3007 input_section
3008 ->output_section))
48d502e1 3009 {
c96a8570
BS		 3010 info->callbacks->warning
3011 (info,
3012 _("cannot emit fixups in read-only section"),
3013 name, input_bfd, input_section, rel->r_offset);
3014 return FALSE;
3015 }
3016 if (!h || h->root.type != bfd_link_hash_undefweak)
3017 {
6a9adeca 3018 if (offset != (bfd_vma)-1)
c96a8570 3019 {
6a9adeca
BS		 3020 _bfinfdpic_add_rofixup (output_bfd,
3021 bfinfdpic_gotfixup_section
3022 (info),
3023 offset + input_section
3024 ->output_section->vma
3025 + input_section->output_offset,
3026 picrel);
3027
3028 if (r_type == R_BFIN_FUNCDESC_VALUE)
c96a8570
BS		 3029 _bfinfdpic_add_rofixup
3030 (output_bfd,
3031 bfinfdpic_gotfixup_section (info),
3032 offset + input_section->output_section->vma
3033 + input_section->output_offset + 4, picrel);
3034 }
48d502e1
BS		 3035 }
3036 }
48d502e1
BS		 3037 }
3038 else
3039 {
c96a8570
BS		 3040 if ((bfd_get_section_flags (output_bfd,
3041 input_section->output_section)
3042 & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
48d502e1 3043 {
c96a8570
BS		 3044 if (_bfinfdpic_osec_readonly_p (output_bfd,
3045 input_section
3046 ->output_section))
48d502e1 3047 {
c96a8570
BS		 3048 info->callbacks->warning
3049 (info,
3050 _("cannot emit dynamic relocations in read-only section"),
3051 name, input_bfd, input_section, rel->r_offset);
3052 return FALSE;
48d502e1 3053 }
6a9adeca
BS		 3054
3055 if (offset != (bfd_vma)-1)
c96a8570
BS		 3056 _bfinfdpic_add_dyn_reloc (output_bfd,
3057 bfinfdpic_gotrel_section (info),
3058 offset
6a9adeca 3059 + input_section->output_section->vma
c96a8570
BS		 3060 + input_section->output_offset,
3061 r_type, dynindx, addend, picrel);
48d502e1 3062 }
c96a8570
BS		 3063 else if (osec)
3064 addend += osec->output_section->vma;
3065 /* We want the addend in-place because dynamic
3066 relocations are REL. Setting relocation to it
3067 should arrange for it to be installed. */
3068 relocation = addend - rel->r_addend;
3069 }
3070
6a9adeca 3071 if (r_type == R_BFIN_FUNCDESC_VALUE)
c96a8570
BS		 3072 {
3073 /* If we've omitted the dynamic relocation, just emit
3074 the fixed addresses of the symbol and of the local
3075 GOT base offset. */
3cbc1e5e 3076 if (bfd_link_pde (info)
c96a8570
BS		 3077 && (!h || BFINFDPIC_SYM_LOCAL (info, h)))
3078 bfd_put_32 (output_bfd,
3079 bfinfdpic_got_section (info)->output_section->vma
3080 + bfinfdpic_got_section (info)->output_offset
3081 + bfinfdpic_got_initial_offset (info),
3082 contents + rel->r_offset + 4);
3083 else
3084 /* A function descriptor used for lazy or local
3085 resolving is initialized such that its high word
3086 contains the output section index in which the
3087 PLT entries are located, and the low word
3088 contains the offset of the lazy PLT entry entry
3089 point into that section. */
3090 bfd_put_32 (output_bfd,
3091 h && ! BFINFDPIC_SYM_LOCAL (info, h)
3092 ? 0
3093 : _bfinfdpic_osec_to_segment (output_bfd,
3094 sec
3095 ->output_section),
3096 contents + rel->r_offset + 4);
48d502e1 3097 }
c96a8570
BS		 3098 }
3099 check_segment[0] = check_segment[1] = got_segment;
3100 break;
3101
3102 default:
3103 check_segment[0] = isec_segment;
3104 check_segment[1] = sec
3105 ? _bfinfdpic_osec_to_segment (output_bfd, sec->output_section)
3106 : (unsigned)-1;
3107 break;
3108 }
3109
3110 if (check_segment[0] != check_segment[1] && IS_FDPIC (output_bfd))
3111 {
3112#if 1 /* If you take this out, remove the #error from fdpic-static-6.d
3113 in the ld testsuite. */
3114 /* This helps catch problems in GCC while we can't do more
3115 than static linking. The idea is to test whether the
3116 input file basename is crt0.o only once. */
3117 if (silence_segment_error == 1)
3118 silence_segment_error =
3119 (strlen (input_bfd->filename) == 6
007d6189 3120 && filename_cmp (input_bfd->filename, "crt0.o") == 0)
c96a8570 3121 || (strlen (input_bfd->filename) > 6
007d6189
KT		 3122 && filename_cmp (input_bfd->filename
3123 + strlen (input_bfd->filename) - 7,
c96a8570
BS		 3124 "/crt0.o") == 0)
3125 ? -1 : 0;
3126#endif
3127 if (!silence_segment_error
3128 /* We don't want duplicate errors for undefined
3129 symbols. */
3130 && !(picrel && picrel->symndx == -1
3131 && picrel->d.h->root.type == bfd_link_hash_undefined))
3132 info->callbacks->warning
3133 (info,
0e1862bb 3134 bfd_link_pic (info)
c96a8570
BS		 3135 ? _("relocations between different segments are not supported")
3136 : _("warning: relocation references a different segment"),
3137 name, input_bfd, input_section, rel->r_offset);
0e1862bb 3138 if (!silence_segment_error && bfd_link_pic (info))
c96a8570
BS		 3139 return FALSE;
3140 elf_elfheader (output_bfd)->e_flags |= EF_BFIN_PIC;
3141 }
3142
3143 switch (r_type)
3144 {
3145 case R_BFIN_GOTOFFHI:
3146 /* We need the addend to be applied before we shift the
3147 value right. */
3148 relocation += rel->r_addend;
3149 /* Fall through. */
3150 case R_BFIN_GOTHI:
3151 case R_BFIN_FUNCDESC_GOTHI:
3152 case R_BFIN_FUNCDESC_GOTOFFHI:
3153 relocation >>= 16;
3154 /* Fall through. */
48d502e1 3155
c96a8570
BS		 3156 case R_BFIN_GOTLO:
3157 case R_BFIN_FUNCDESC_GOTLO:
3158 case R_BFIN_GOTOFFLO:
3159 case R_BFIN_FUNCDESC_GOTOFFLO:
3160 relocation &= 0xffff;
3161 break;
48d502e1 3162
48d502e1 3163 default:
48d502e1
BS		 3164 break;
3165 }
3166
c96a8570 3167 switch (r_type)
48d502e1 3168 {
cb88ce9f
BS		 3169 case R_BFIN_PCREL24:
3170 case R_BFIN_PCREL24_JUMP_L:
c96a8570
BS		 3171 if (! IS_FDPIC (output_bfd) || ! picrel->plt)
3172 break;
3173 /* Fall through. */
3174
3175 /* When referencing a GOT entry, a function descriptor or a
3176 PLT, we don't want the addend to apply to the reference,
3177 but rather to the referenced symbol. The actual entry
3178 will have already been created taking the addend into
3179 account, so cancel it out here. */
3180 case R_BFIN_GOT17M4:
3181 case R_BFIN_GOTHI:
3182 case R_BFIN_GOTLO:
3183 case R_BFIN_FUNCDESC_GOT17M4:
3184 case R_BFIN_FUNCDESC_GOTHI:
3185 case R_BFIN_FUNCDESC_GOTLO:
3186 case R_BFIN_FUNCDESC_GOTOFF17M4:
3187 case R_BFIN_FUNCDESC_GOTOFFHI:
3188 case R_BFIN_FUNCDESC_GOTOFFLO:
3189 /* Note that we only want GOTOFFHI, not GOTOFFLO or GOTOFF17M4
3190 here, since we do want to apply the addend to the others.
3191 Note that we've applied the addend to GOTOFFHI before we
3192 shifted it right. */
3193 case R_BFIN_GOTOFFHI:
3194 relocation -= rel->r_addend;
3195 break;
3196
3197 default:
3198 break;
48d502e1
BS		 3199 }
3200
c96a8570
BS		 3201 r = bfin_final_link_relocate (rel, howto, input_bfd, input_section,
3202 contents, rel->r_offset,
3203 relocation, rel->r_addend);
3204
48d502e1
BS		 3205 if (r != bfd_reloc_ok)
3206 {
c96a8570 3207 const char * msg = (const char *) NULL;
48d502e1 3208
c96a8570 3209 switch (r)
48d502e1 3210 {
c96a8570
BS		 3211 case bfd_reloc_overflow:
3212 r = info->callbacks->reloc_overflow
3213 (info, (h ? &h->root : NULL), name, howto->name,
3214 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
3215 break;
0f64bb02 3216
c96a8570
BS		 3217 case bfd_reloc_undefined:
3218 r = info->callbacks->undefined_symbol
3219 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
3220 break;
3221
3222 case bfd_reloc_outofrange:
3223 msg = _("internal error: out of range error");
3224 break;
3225
3226 case bfd_reloc_notsupported:
3227 msg = _("internal error: unsupported relocation error");
3228 break;
3229
3230 case bfd_reloc_dangerous:
3231 msg = _("internal error: dangerous relocation");
3232 break;
3233
3234 default:
3235 msg = _("internal error: unknown error");
3236 break;
48d502e1 3237 }
c96a8570
BS		 3238
3239 if (msg)
3240 r = info->callbacks->warning
3241 (info, msg, name, input_bfd, input_section, rel->r_offset);
3242
3243 if (! r)
3244 return FALSE;
48d502e1
BS		 3245 }
3246 }
3247
3248 return TRUE;
3249}
3250
2774f1a6
BS		 3251/* Update the relocation information for the relocations of the section
3252 being removed. */
3253
3254static bfd_boolean
3255bfinfdpic_gc_sweep_hook (bfd *abfd,
3256 struct bfd_link_info *info,
3257 asection *sec,
3258 const Elf_Internal_Rela *relocs)
3259{
3260 Elf_Internal_Shdr *symtab_hdr;
3261 struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
3262 const Elf_Internal_Rela *rel;
3263 const Elf_Internal_Rela *rel_end;
3264 struct bfinfdpic_relocs_info *picrel;
3265
3266 BFD_ASSERT (IS_FDPIC (abfd));
3267
3268 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
3269 sym_hashes = elf_sym_hashes (abfd);
3270 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof(Elf32_External_Sym);
3271 if (!elf_bad_symtab (abfd))
3272 sym_hashes_end -= symtab_hdr->sh_info;
3273
3274 rel_end = relocs + sec->reloc_count;
3275 for (rel = relocs; rel < rel_end; rel++)
3276 {
3277 struct elf_link_hash_entry *h;
3278 unsigned long r_symndx;
3279
3280 r_symndx = ELF32_R_SYM (rel->r_info);
3281 if (r_symndx < symtab_hdr->sh_info)
3282 h = NULL;
3283 else
3284 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
3285
3286 if (h != NULL)
3287 picrel = bfinfdpic_relocs_info_for_global (bfinfdpic_relocs_info (info),
3288 abfd, h,
3289 rel->r_addend, NO_INSERT);
3290 else
3291 picrel = bfinfdpic_relocs_info_for_local (bfinfdpic_relocs_info
3292 (info), abfd, r_symndx,
3293 rel->r_addend, NO_INSERT);
3294
3295 if (!picrel)
3296 return TRUE;
3297
3298 switch (ELF32_R_TYPE (rel->r_info))
3299 {
cb88ce9f
BS		 3300 case R_BFIN_PCREL24:
3301 case R_BFIN_PCREL24_JUMP_L:
2774f1a6
BS		 3302 picrel->call--;
3303 break;
3304
3305 case R_BFIN_FUNCDESC_VALUE:
3306 picrel->relocsfdv--;
3307 if (bfd_get_section_flags (abfd, sec) & SEC_ALLOC)
3308 picrel->relocs32++;
3309 /* Fall through. */
3310
cb88ce9f 3311 case R_BFIN_BYTE4_DATA:
2774f1a6
BS		 3312 picrel->sym--;
3313 if (bfd_get_section_flags (abfd, sec) & SEC_ALLOC)
3314 picrel->relocs32--;
3315 break;
3316
3317 case R_BFIN_GOT17M4:
3318 picrel->got17m4--;
3319 break;
3320
3321 case R_BFIN_GOTHI:
3322 case R_BFIN_GOTLO:
3323 picrel->gothilo--;
3324 break;
3325
3326 case R_BFIN_FUNCDESC_GOT17M4:
3327 picrel->fdgot17m4--;
3328 break;
3329
3330 case R_BFIN_FUNCDESC_GOTHI:
3331 case R_BFIN_FUNCDESC_GOTLO:
3332 picrel->fdgothilo--;
3333 break;
3334
3335 case R_BFIN_GOTOFF17M4:
3336 case R_BFIN_GOTOFFHI:
3337 case R_BFIN_GOTOFFLO:
3338 picrel->gotoff--;
3339 break;
3340
3341 case R_BFIN_FUNCDESC_GOTOFF17M4:
3342 picrel->fdgoff17m4--;
3343 break;
3344
3345 case R_BFIN_FUNCDESC_GOTOFFHI:
3346 case R_BFIN_FUNCDESC_GOTOFFLO:
3347 picrel->fdgoffhilo--;
3348 break;
3349
3350 case R_BFIN_FUNCDESC:
3351 picrel->fd--;
3352 picrel->relocsfd--;
3353 break;
3354
3355 default:
3356 break;
3357 }
3358 }
3359
3360 return TRUE;
3361}
3362
48d502e1
BS		 3363/* We need dynamic symbols for every section, since segments can
3364 relocate independently. */
3365static bfd_boolean
3366_bfinfdpic_link_omit_section_dynsym (bfd *output_bfd ATTRIBUTE_UNUSED,
51408ec2
AM		 3367 struct bfd_link_info *info ATTRIBUTE_UNUSED,
3368 asection *p)
48d502e1
BS		 3369{
3370 switch (elf_section_data (p)->this_hdr.sh_type)
3371 {
3372 case SHT_PROGBITS:
3373 case SHT_NOBITS:
3374 /* If sh_type is yet undecided, assume it could be
3375 SHT_PROGBITS/SHT_NOBITS. */
3376 case SHT_NULL:
3377 return FALSE;
3378
3379 /* There shouldn't be section relative relocations
3380 against any other section. */
3381 default:
3382 return TRUE;
3383 }
3384}
3385
3386/* Create a .got section, as well as its additional info field. This
3387 is almost entirely copied from
3388 elflink.c:_bfd_elf_create_got_section(). */
3389
3390static bfd_boolean
3391_bfin_create_got_section (bfd *abfd, struct bfd_link_info *info)
3392{
3393 flagword flags, pltflags;
3394 asection *s;
3395 struct elf_link_hash_entry *h;
48d502e1
BS		 3396 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
3397 int ptralign;
48d502e1
BS		 3398
3399 /* This function may be called more than once. */
3d4d4302
AM		 3400 s = bfd_get_linker_section (abfd, ".got");
3401 if (s != NULL)
48d502e1
BS		 3402 return TRUE;
3403
3404 /* Machine specific: although pointers are 32-bits wide, we want the
3405 GOT to be aligned to a 64-bit boundary, such that function
3406 descriptors in it can be accessed with 64-bit loads and
3407 stores. */
3408 ptralign = 3;
3409
3410 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
3411 | SEC_LINKER_CREATED);
3412 pltflags = flags;
3413
3d4d4302 3414 s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
48d502e1
BS		 3415 if (s == NULL
3416 || !bfd_set_section_alignment (abfd, s, ptralign))
3417 return FALSE;
3418
3419 if (bed->want_got_plt)
3420 {
3d4d4302 3421 s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
48d502e1
BS		 3422 if (s == NULL
3423 || !bfd_set_section_alignment (abfd, s, ptralign))
3424 return FALSE;
3425 }
3426
3427 if (bed->want_got_sym)
3428 {
3429 /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
3430 (or .got.plt) section. We don't do this in the linker script
3431 because we don't want to define the symbol if we are not creating
3432 a global offset table. */
5592d7ec 3433 h = _bfd_elf_define_linkage_sym (abfd, info, s, "__GLOBAL_OFFSET_TABLE_");
48d502e1
BS		 3434 elf_hash_table (info)->hgot = h;
3435 if (h == NULL)
3436 return FALSE;
3437
3438 /* Machine-specific: we want the symbol for executables as
3439 well. */
3440 if (! bfd_elf_link_record_dynamic_symbol (info, h))
3441 return FALSE;
3442 }
3443
3444 /* The first bit of the global offset table is the header. */
3445 s->size += bed->got_header_size;
3446
3447 /* This is the machine-specific part. Create and initialize section
3448 data for the got. */
3449 if (IS_FDPIC (abfd))
3450 {
3451 bfinfdpic_got_section (info) = s;
3452 bfinfdpic_relocs_info (info) = htab_try_create (1,
3453 bfinfdpic_relocs_info_hash,
3454 bfinfdpic_relocs_info_eq,
3455 (htab_del) NULL);
3456 if (! bfinfdpic_relocs_info (info))
3457 return FALSE;
3458
3d4d4302
AM		 3459 s = bfd_make_section_anyway_with_flags (abfd, ".rel.got",
3460 (flags | SEC_READONLY));
48d502e1
BS		 3461 if (s == NULL
3462 || ! bfd_set_section_alignment (abfd, s, 2))
3463 return FALSE;
3464
3465 bfinfdpic_gotrel_section (info) = s;
3466
3467 /* Machine-specific. */
3d4d4302
AM		 3468 s = bfd_make_section_anyway_with_flags (abfd, ".rofixup",
3469 (flags | SEC_READONLY));
48d502e1
BS		 3470 if (s == NULL
3471 || ! bfd_set_section_alignment (abfd, s, 2))
3472 return FALSE;
3473
3474 bfinfdpic_gotfixup_section (info) = s;
48d502e1
BS		 3475 }
3476
48d502e1
BS		 3477 pltflags |= SEC_CODE;
3478 if (bed->plt_not_loaded)
3479 pltflags &= ~ (SEC_CODE | SEC_LOAD | SEC_HAS_CONTENTS);
3480 if (bed->plt_readonly)
3481 pltflags |= SEC_READONLY;
3482
3d4d4302 3483 s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags);
48d502e1 3484 if (s == NULL
48d502e1
BS		 3485 || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
3486 return FALSE;
3487 /* Blackfin-specific: remember it. */
3488 bfinfdpic_plt_section (info) = s;
3489
3490 if (bed->want_plt_sym)
3491 {
3492 /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
3493 .plt section. */
48d502e1
BS		 3494 struct bfd_link_hash_entry *bh = NULL;
3495
3496 if (! (_bfd_generic_link_add_one_symbol
5592d7ec 3497 (info, abfd, "__PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s, 0, NULL,
48d502e1
BS		 3498 FALSE, get_elf_backend_data (abfd)->collect, &bh)))
3499 return FALSE;
3500 h = (struct elf_link_hash_entry *) bh;
3501 h->def_regular = 1;
3502 h->type = STT_OBJECT;
3503
0e1862bb 3504 if (! bfd_link_executable (info)
48d502e1
BS		 3505 && ! bfd_elf_link_record_dynamic_symbol (info, h))
3506 return FALSE;
3507 }
3508
3509 /* Blackfin-specific: we want rel relocations for the plt. */
3d4d4302
AM		 3510 s = bfd_make_section_anyway_with_flags (abfd, ".rel.plt",
3511 flags | SEC_READONLY);
48d502e1 3512 if (s == NULL
48d502e1
BS		 3513 || ! bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
3514 return FALSE;
3515 /* Blackfin-specific: remember it. */
3516 bfinfdpic_pltrel_section (info) = s;
3517
6a9adeca
BS		 3518 return TRUE;
3519}
3520
3521/* Make sure the got and plt sections exist, and that our pointers in
3522 the link hash table point to them. */
3523
3524static bfd_boolean
3525elf32_bfinfdpic_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
3526{
3527 /* This is mostly copied from
3528 elflink.c:_bfd_elf_create_dynamic_sections(). */
3529 flagword flags;
3530 asection *s;
3531 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
3532
3533 flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
3534 | SEC_LINKER_CREATED);
3535
3536 /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
3537 .rel[a].bss sections. */
3538
48d502e1
BS		 3539 /* Blackfin-specific: we want to create the GOT in the Blackfin way. */
3540 if (! _bfin_create_got_section (abfd, info))
3541 return FALSE;
3542
3543 /* Blackfin-specific: make sure we created everything we wanted. */
3544 BFD_ASSERT (bfinfdpic_got_section (info) && bfinfdpic_gotrel_section (info)
3545 /* && bfinfdpic_gotfixup_section (info) */
3546 && bfinfdpic_plt_section (info)
3547 && bfinfdpic_pltrel_section (info));
3548
3549 if (bed->want_dynbss)
3550 {
3551 /* The .dynbss section is a place to put symbols which are defined
3552 by dynamic objects, are referenced by regular objects, and are
3553 not functions. We must allocate space for them in the process
3554 image and use a R_*_COPY reloc to tell the dynamic linker to
3555 initialize them at run time. The linker script puts the .dynbss
3556 section into the .bss section of the final image. */
3d4d4302
AM		 3557 s = bfd_make_section_anyway_with_flags (abfd, ".dynbss",
3558 SEC_ALLOC | SEC_LINKER_CREATED);
117ed4f8 3559 if (s == NULL)
48d502e1
BS		 3560 return FALSE;
3561
3562 /* The .rel[a].bss section holds copy relocs. This section is not
3d4d4302
AM		 3563 normally needed. We need to create it here, though, so that the
3564 linker will map it to an output section. We can't just create it
3565 only if we need it, because we will not know whether we need it
3566 until we have seen all the input files, and the first time the
3567 main linker code calls BFD after examining all the input files
3568 (size_dynamic_sections) the input sections have already been
3569 mapped to the output sections. If the section turns out not to
3570 be needed, we can discard it later. We will never need this
3571 section when generating a shared object, since they do not use
3572 copy relocs. */
0e1862bb 3573 if (! bfd_link_pic (info))
48d502e1 3574 {
3d4d4302
AM		 3575 s = bfd_make_section_anyway_with_flags (abfd,
3576 ".rela.bss",
3577 flags | SEC_READONLY);
48d502e1 3578 if (s == NULL
48d502e1
BS		 3579 || ! bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
3580 return FALSE;
3581 }
3582 }
3583
3584 return TRUE;
3585}
3586
48d502e1
BS		 3587/* Compute the total GOT size required by each symbol in each range.
3588 Symbols may require up to 4 words in the GOT: an entry pointing to
3589 the symbol, an entry pointing to its function descriptor, and a
3590 private function descriptors taking two words. */
3591
6a9adeca
BS		 3592static void
3593_bfinfdpic_count_nontls_entries (struct bfinfdpic_relocs_info *entry,
3594 struct _bfinfdpic_dynamic_got_info *dinfo)
48d502e1 3595{
48d502e1
BS		 3596 /* Allocate space for a GOT entry pointing to the symbol. */
3597 if (entry->got17m4)
3598 dinfo->got17m4 += 4;
3599 else if (entry->gothilo)
3600 dinfo->gothilo += 4;
3601 else
3602 entry->relocs32--;
3603 entry->relocs32++;
3604
3605 /* Allocate space for a GOT entry pointing to the function
3606 descriptor. */
3607 if (entry->fdgot17m4)
3608 dinfo->got17m4 += 4;
3609 else if (entry->fdgothilo)
3610 dinfo->gothilo += 4;
3611 else
3612 entry->relocsfd--;
3613 entry->relocsfd++;
3614
3615 /* Decide whether we need a PLT entry, a function descriptor in the
3616 GOT, and a lazy PLT entry for this symbol. */
3617 entry->plt = entry->call
3618 && entry->symndx == -1 && ! BFINFDPIC_SYM_LOCAL (dinfo->info, entry->d.h)
3619 && elf_hash_table (dinfo->info)->dynamic_sections_created;
3620 entry->privfd = entry->plt
3621 || entry->fdgoff17m4 || entry->fdgoffhilo
3622 || ((entry->fd || entry->fdgot17m4 || entry->fdgothilo)
3623 && (entry->symndx != -1
3624 || BFINFDPIC_FUNCDESC_LOCAL (dinfo->info, entry->d.h)));
3625 entry->lazyplt = entry->privfd
3626 && entry->symndx == -1 && ! BFINFDPIC_SYM_LOCAL (dinfo->info, entry->d.h)
3627 && ! (dinfo->info->flags & DF_BIND_NOW)
3628 && elf_hash_table (dinfo->info)->dynamic_sections_created;
3629
3630 /* Allocate space for a function descriptor. */
3631 if (entry->fdgoff17m4)
3632 dinfo->fd17m4 += 8;
3633 else if (entry->privfd && entry->plt)
3634 dinfo->fdplt += 8;
3635 else if (entry->privfd)
3636 dinfo->fdhilo += 8;
3637 else
3638 entry->relocsfdv--;
3639 entry->relocsfdv++;
3640
3641 if (entry->lazyplt)
3642 dinfo->lzplt += LZPLT_NORMAL_SIZE;
6a9adeca
BS		 3643}
3644
3645/* Compute the number of dynamic relocations and fixups that a symbol
3646 requires, and add (or subtract) from the grand and per-symbol
3647 totals. */
3648
3649static void
3650_bfinfdpic_count_relocs_fixups (struct bfinfdpic_relocs_info *entry,
3651 struct _bfinfdpic_dynamic_got_info *dinfo,
3652 bfd_boolean subtract)
3653{
3654 bfd_vma relocs = 0, fixups = 0;
48d502e1 3655
3cbc1e5e 3656 if (!bfd_link_pde (dinfo->info))
48d502e1
BS		 3657 relocs = entry->relocs32 + entry->relocsfd + entry->relocsfdv;
3658 else
3659 {
3660 if (entry->symndx != -1 || BFINFDPIC_SYM_LOCAL (dinfo->info, entry->d.h))
3661 {
3662 if (entry->symndx != -1
3663 || entry->d.h->root.type != bfd_link_hash_undefweak)
3664 fixups += entry->relocs32 + 2 * entry->relocsfdv;
3665 }
3666 else
3667 relocs += entry->relocs32 + entry->relocsfdv;
3668
3669 if (entry->symndx != -1
3670 || BFINFDPIC_FUNCDESC_LOCAL (dinfo->info, entry->d.h))
3671 {
3672 if (entry->symndx != -1
3673 || entry->d.h->root.type != bfd_link_hash_undefweak)
3674 fixups += entry->relocsfd;
3675 }
3676 else
3677 relocs += entry->relocsfd;
3678 }
3679
6a9adeca
BS		 3680 if (subtract)
3681 {
3682 relocs = - relocs;
3683 fixups = - fixups;
3684 }
3685
48d502e1
BS		 3686 entry->dynrelocs += relocs;
3687 entry->fixups += fixups;
3688 dinfo->relocs += relocs;
3689 dinfo->fixups += fixups;
6a9adeca
BS		 3690}
3691
3692/* Compute the total GOT and PLT size required by each symbol in each range. *
3693 Symbols may require up to 4 words in the GOT: an entry pointing to
3694 the symbol, an entry pointing to its function descriptor, and a
3695 private function descriptors taking two words. */
3696
3697static int
3698_bfinfdpic_count_got_plt_entries (void **entryp, void *dinfo_)
3699{
3700 struct bfinfdpic_relocs_info *entry = *entryp;
3701 struct _bfinfdpic_dynamic_got_info *dinfo = dinfo_;
3702
3703 _bfinfdpic_count_nontls_entries (entry, dinfo);
3704
3705 _bfinfdpic_count_relocs_fixups (entry, dinfo, FALSE);
48d502e1
BS		 3706
3707 return 1;
3708}
3709
3710/* This structure is used to assign offsets to got entries, function
3711 descriptors, plt entries and lazy plt entries. */
3712
3713struct _bfinfdpic_dynamic_got_plt_info
3714{
3715 /* Summary information collected with _bfinfdpic_count_got_plt_entries. */
3716 struct _bfinfdpic_dynamic_got_info g;
3717
3718 /* For each addressable range, we record a MAX (positive) and MIN
3719 (negative) value. CUR is used to assign got entries, and it's
3720 incremented from an initial positive value to MAX, then from MIN
3721 to FDCUR (unless FDCUR wraps around first). FDCUR is used to
3722 assign function descriptors, and it's decreased from an initial
3723 non-positive value to MIN, then from MAX down to CUR (unless CUR
3724 wraps around first). All of MIN, MAX, CUR and FDCUR always point
3725 to even words. ODD, if non-zero, indicates an odd word to be
3726 used for the next got entry, otherwise CUR is used and
3727 incremented by a pair of words, wrapping around when it reaches
3728 MAX. FDCUR is decremented (and wrapped) before the next function
3729 descriptor is chosen. FDPLT indicates the number of remaining
3730 slots that can be used for function descriptors used only by PLT
3731 entries. */
3732 struct _bfinfdpic_dynamic_got_alloc_data
3733 {
3734 bfd_signed_vma max, cur, odd, fdcur, min;
3735 bfd_vma fdplt;
3736 } got17m4, gothilo;
3737};
3738
3739/* Determine the positive and negative ranges to be used by each
3740 offset range in the GOT. FDCUR and CUR, that must be aligned to a
3741 double-word boundary, are the minimum (negative) and maximum
3742 (positive) GOT offsets already used by previous ranges, except for
3743 an ODD entry that may have been left behind. GOT and FD indicate
3744 the size of GOT entries and function descriptors that must be
3745 placed within the range from -WRAP to WRAP. If there's room left,
3746 up to FDPLT bytes should be reserved for additional function
3747 descriptors. */
3748
3749inline static bfd_signed_vma
3750_bfinfdpic_compute_got_alloc_data (struct _bfinfdpic_dynamic_got_alloc_data *gad,
3751 bfd_signed_vma fdcur,
3752 bfd_signed_vma odd,
3753 bfd_signed_vma cur,
3754 bfd_vma got,
3755 bfd_vma fd,
3756 bfd_vma fdplt,
3757 bfd_vma wrap)
3758{
3759 bfd_signed_vma wrapmin = -wrap;
3760
3761 /* Start at the given initial points. */
3762 gad->fdcur = fdcur;
3763 gad->cur = cur;
3764
3765 /* If we had an incoming odd word and we have any got entries that
3766 are going to use it, consume it, otherwise leave gad->odd at
3767 zero. We might force gad->odd to zero and return the incoming
3768 odd such that it is used by the next range, but then GOT entries
3769 might appear to be out of order and we wouldn't be able to
3770 shorten the GOT by one word if it turns out to end with an
3771 unpaired GOT entry. */
3772 if (odd && got)
3773 {
3774 gad->odd = odd;
3775 got -= 4;
3776 odd = 0;
3777 }
3778 else
3779 gad->odd = 0;
3780
3781 /* If we're left with an unpaired GOT entry, compute its location
3782 such that we can return it. Otherwise, if got doesn't require an
3783 odd number of words here, either odd was already zero in the
3784 block above, or it was set to zero because got was non-zero, or
3785 got was already zero. In the latter case, we want the value of
3786 odd to carry over to the return statement, so we don't want to
3787 reset odd unless the condition below is true. */
3788 if (got & 4)
3789 {
3790 odd = cur + got;
3791 got += 4;
3792 }
3793
3794 /* Compute the tentative boundaries of this range. */
3795 gad->max = cur + got;
3796 gad->min = fdcur - fd;
3797 gad->fdplt = 0;
3798
3799 /* If function descriptors took too much space, wrap some of them
3800 around. */
3801 if (gad->min < wrapmin)
3802 {
3803 gad->max += wrapmin - gad->min;
3804 gad->min = wrapmin;
3805 }
3806 /* If there is space left and we have function descriptors
3807 referenced in PLT entries that could take advantage of shorter
3808 offsets, place them here. */
3809 else if (fdplt && gad->min > wrapmin)
3810 {
3811 bfd_vma fds;
3812 if ((bfd_vma) (gad->min - wrapmin) < fdplt)
3813 fds = gad->min - wrapmin;
3814 else
3815 fds = fdplt;
3816
3817 fdplt -= fds;
3818 gad->min -= fds;
3819 gad->fdplt += fds;
3820 }
3821
3822 /* If GOT entries took too much space, wrap some of them around.
3823 This may well cause gad->min to become lower than wrapmin. This
3824 will cause a relocation overflow later on, so we don't have to
3825 report it here . */
3826 if ((bfd_vma) gad->max > wrap)
3827 {
3828 gad->min -= gad->max - wrap;
3829 gad->max = wrap;
3830 }
3831 /* If there is more space left, try to place some more function
3832 descriptors for PLT entries. */
3833 else if (fdplt && (bfd_vma) gad->max < wrap)
3834 {
3835 bfd_vma fds;
3836 if ((bfd_vma) (wrap - gad->max) < fdplt)
3837 fds = wrap - gad->max;
3838 else
3839 fds = fdplt;
3840
3841 fdplt -= fds;
3842 gad->max += fds;
3843 gad->fdplt += fds;
3844 }
3845
3846 /* If odd was initially computed as an offset past the wrap point,
3847 wrap it around. */
3848 if (odd > gad->max)
3849 odd = gad->min + odd - gad->max;
3850
3851 /* _bfinfdpic_get_got_entry() below will always wrap gad->cur if needed
3852 before returning, so do it here too. This guarantees that,
3853 should cur and fdcur meet at the wrap point, they'll both be
3854 equal to min. */
3855 if (gad->cur == gad->max)
3856 gad->cur = gad->min;
3857
3858 return odd;
3859}
3860
3861/* Compute the location of the next GOT entry, given the allocation
3862 data for a range. */
3863
3864inline static bfd_signed_vma
3865_bfinfdpic_get_got_entry (struct _bfinfdpic_dynamic_got_alloc_data *gad)
3866{
3867 bfd_signed_vma ret;
3868
3869 if (gad->odd)
3870 {
3871 /* If there was an odd word left behind, use it. */
3872 ret = gad->odd;
3873 gad->odd = 0;
3874 }
3875 else
3876 {
3877 /* Otherwise, use the word pointed to by cur, reserve the next
3878 as an odd word, and skip to the next pair of words, possibly
3879 wrapping around. */
3880 ret = gad->cur;
3881 gad->odd = gad->cur + 4;
3882 gad->cur += 8;
3883 if (gad->cur == gad->max)
3884 gad->cur = gad->min;
3885 }
3886
3887 return ret;
3888}
3889
3890/* Compute the location of the next function descriptor entry in the
3891 GOT, given the allocation data for a range. */
3892
3893inline static bfd_signed_vma
3894_bfinfdpic_get_fd_entry (struct _bfinfdpic_dynamic_got_alloc_data *gad)
3895{
3896 /* If we're at the bottom, wrap around, and only then allocate the
3897 next pair of words. */
3898 if (gad->fdcur == gad->min)
3899 gad->fdcur = gad->max;
3900 return gad->fdcur -= 8;
3901}
3902
3903/* Assign GOT offsets for every GOT entry and function descriptor.
3904 Doing everything in a single pass is tricky. */
3905
3906static int
3907_bfinfdpic_assign_got_entries (void **entryp, void *info_)
3908{
3909 struct bfinfdpic_relocs_info *entry = *entryp;
3910 struct _bfinfdpic_dynamic_got_plt_info *dinfo = info_;
3911
3912 if (entry->got17m4)
3913 entry->got_entry = _bfinfdpic_get_got_entry (&dinfo->got17m4);
3914 else if (entry->gothilo)
3915 entry->got_entry = _bfinfdpic_get_got_entry (&dinfo->gothilo);
3916
3917 if (entry->fdgot17m4)
3918 entry->fdgot_entry = _bfinfdpic_get_got_entry (&dinfo->got17m4);
3919 else if (entry->fdgothilo)
3920 entry->fdgot_entry = _bfinfdpic_get_got_entry (&dinfo->gothilo);
3921
3922 if (entry->fdgoff17m4)
3923 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->got17m4);
3924 else if (entry->plt && dinfo->got17m4.fdplt)
3925 {
3926 dinfo->got17m4.fdplt -= 8;
3927 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->got17m4);
3928 }
3929 else if (entry->plt)
3930 {
3931 dinfo->gothilo.fdplt -= 8;
3932 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->gothilo);
3933 }
3934 else if (entry->privfd)
3935 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->gothilo);
3936
3937 return 1;
3938}
3939
3940/* Assign GOT offsets to private function descriptors used by PLT
3941 entries (or referenced by 32-bit offsets), as well as PLT entries
3942 and lazy PLT entries. */
3943
3944static int
3945_bfinfdpic_assign_plt_entries (void **entryp, void *info_)
3946{
3947 struct bfinfdpic_relocs_info *entry = *entryp;
3948 struct _bfinfdpic_dynamic_got_plt_info *dinfo = info_;
3949
3950 /* If this symbol requires a local function descriptor, allocate
3951 one. */
3952 if (entry->privfd && entry->fd_entry == 0)
3953 {
3954 if (dinfo->got17m4.fdplt)
3955 {
3956 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->got17m4);
3957 dinfo->got17m4.fdplt -= 8;
3958 }
3959 else
3960 {
3961 BFD_ASSERT (dinfo->gothilo.fdplt);
3962 entry->fd_entry = _bfinfdpic_get_fd_entry (&dinfo->gothilo);
3963 dinfo->gothilo.fdplt -= 8;
3964 }
3965 }
3966
3967 if (entry->plt)
3968 {
3969 int size;
3970
3971 /* We use the section's raw size to mark the location of the
3972 next PLT entry. */
3973 entry->plt_entry = bfinfdpic_plt_section (dinfo->g.info)->size;
3974
3975 /* Figure out the length of this PLT entry based on the
3976 addressing mode we need to reach the function descriptor. */
3977 BFD_ASSERT (entry->fd_entry);
3978 if (entry->fd_entry >= -(1 << (18 - 1))
3979 && entry->fd_entry + 4 < (1 << (18 - 1)))
3980 size = 10;
3981 else
3982 size = 16;
3983
3984 bfinfdpic_plt_section (dinfo->g.info)->size += size;
3985 }
3986
3987 if (entry->lazyplt)
3988 {
3989 entry->lzplt_entry = dinfo->g.lzplt;
3990 dinfo->g.lzplt += LZPLT_NORMAL_SIZE;
3991 /* If this entry is the one that gets the resolver stub, account
3992 for the additional instruction. */
3993 if (entry->lzplt_entry % BFINFDPIC_LZPLT_BLOCK_SIZE
3994 == BFINFDPIC_LZPLT_RESOLV_LOC)
3995 dinfo->g.lzplt += LZPLT_RESOLVER_EXTRA;
3996 }
3997
3998 return 1;
3999}
4000
6a9adeca
BS		 4001/* Cancel out any effects of calling _bfinfdpic_assign_got_entries and
4002 _bfinfdpic_assign_plt_entries. */
4003
4004static int
4005_bfinfdpic_reset_got_plt_entries (void **entryp, void *ignore ATTRIBUTE_UNUSED)
4006{
4007 struct bfinfdpic_relocs_info *entry = *entryp;
4008
4009 entry->got_entry = 0;
4010 entry->fdgot_entry = 0;
4011 entry->fd_entry = 0;
4012 entry->plt_entry = (bfd_vma)-1;
4013 entry->lzplt_entry = (bfd_vma)-1;
4014
4015 return 1;
4016}
4017
48d502e1
BS		 4018/* Follow indirect and warning hash entries so that each got entry
4019 points to the final symbol definition. P must point to a pointer
4020 to the hash table we're traversing. Since this traversal may
4021 modify the hash table, we set this pointer to NULL to indicate
4022 we've made a potentially-destructive change to the hash table, so
4023 the traversal must be restarted. */
4024static int
4025_bfinfdpic_resolve_final_relocs_info (void **entryp, void *p)
4026{
4027 struct bfinfdpic_relocs_info *entry = *entryp;
4028 htab_t *htab = p;
4029
4030 if (entry->symndx == -1)
4031 {
4032 struct elf_link_hash_entry *h = entry->d.h;
4033 struct bfinfdpic_relocs_info *oentry;
4034
4035 while (h->root.type == bfd_link_hash_indirect
4036 || h->root.type == bfd_link_hash_warning)
4037 h = (struct elf_link_hash_entry *)h->root.u.i.link;
4038
4039 if (entry->d.h == h)
4040 return 1;
4041
4042 oentry = bfinfdpic_relocs_info_for_global (*htab, 0, h, entry->addend,
4043 NO_INSERT);
4044
4045 if (oentry)
4046 {
4047 /* Merge the two entries. */
4048 bfinfdpic_pic_merge_early_relocs_info (oentry, entry);
4049 htab_clear_slot (*htab, entryp);
4050 return 1;
4051 }
4052
4053 entry->d.h = h;
4054
4055 /* If we can't find this entry with the new bfd hash, re-insert
4056 it, and get the traversal restarted. */
4057 if (! htab_find (*htab, entry))
4058 {
4059 htab_clear_slot (*htab, entryp);
4060 entryp = htab_find_slot (*htab, entry, INSERT);
4061 if (! *entryp)
4062 *entryp = entry;
4063 /* Abort the traversal, since the whole table may have
4064 moved, and leave it up to the parent to restart the
4065 process. */
4066 *(htab_t *)p = NULL;
4067 return 0;
4068 }
4069 }
4070
4071 return 1;
4072}
4073
6a9adeca
BS		 4074/* Compute the total size of the GOT, the PLT, the dynamic relocations
4075 section and the rofixup section. Assign locations for GOT and PLT
4076 entries. */
48d502e1
BS		 4077
4078static bfd_boolean
6a9adeca
BS		 4079_bfinfdpic_size_got_plt (bfd *output_bfd,
4080 struct _bfinfdpic_dynamic_got_plt_info *gpinfop)
48d502e1 4081{
48d502e1
BS		 4082 bfd_signed_vma odd;
4083 bfd_vma limit;
6a9adeca
BS		 4084 struct bfd_link_info *info = gpinfop->g.info;
4085 bfd *dynobj = elf_hash_table (info)->dynobj;
48d502e1 4086
6a9adeca
BS		 4087 memcpy (bfinfdpic_dynamic_got_plt_info (info), &gpinfop->g,
4088 sizeof (gpinfop->g));
48d502e1
BS		 4089
4090 odd = 12;
4091 /* Compute the total size taken by entries in the 18-bit range,
4092 to tell how many PLT function descriptors we can bring into it
4093 without causing it to overflow. */
6a9adeca 4094 limit = odd + gpinfop->g.got17m4 + gpinfop->g.fd17m4;
48d502e1
BS		 4095 if (limit < (bfd_vma)1 << 18)
4096 limit = ((bfd_vma)1 << 18) - limit;
4097 else
4098 limit = 0;
6a9adeca
BS		 4099 if (gpinfop->g.fdplt < limit)
4100 limit = gpinfop->g.fdplt;
48d502e1
BS		 4101
4102 /* Determine the ranges of GOT offsets that we can use for each
4103 range of addressing modes. */
6a9adeca 4104 odd = _bfinfdpic_compute_got_alloc_data (&gpinfop->got17m4,
48d502e1
BS		 4105 0,
4106 odd,
4107 16,
6a9adeca
BS		 4108 gpinfop->g.got17m4,
4109 gpinfop->g.fd17m4,
48d502e1
BS		 4110 limit,
4111 (bfd_vma)1 << (18-1));
6a9adeca
BS		 4112 odd = _bfinfdpic_compute_got_alloc_data (&gpinfop->gothilo,
4113 gpinfop->got17m4.min,
48d502e1 4114 odd,
6a9adeca
BS		 4115 gpinfop->got17m4.max,
4116 gpinfop->g.gothilo,
4117 gpinfop->g.fdhilo,
4118 gpinfop->g.fdplt - gpinfop->got17m4.fdplt,
48d502e1
BS		 4119 (bfd_vma)1 << (32-1));
4120
4121 /* Now assign (most) GOT offsets. */
4122 htab_traverse (bfinfdpic_relocs_info (info), _bfinfdpic_assign_got_entries,
6a9adeca 4123 gpinfop);
48d502e1 4124
6a9adeca
BS		 4125 bfinfdpic_got_section (info)->size = gpinfop->gothilo.max
4126 - gpinfop->gothilo.min
48d502e1
BS		 4127 /* If an odd word is the last word of the GOT, we don't need this
4128 word to be part of the GOT. */
6a9adeca 4129 - (odd + 4 == gpinfop->gothilo.max ? 4 : 0);
48d502e1
BS		 4130 if (bfinfdpic_got_section (info)->size == 0)
4131 bfinfdpic_got_section (info)->flags |= SEC_EXCLUDE;
4132 else if (bfinfdpic_got_section (info)->size == 12
4133 && ! elf_hash_table (info)->dynamic_sections_created)
4134 {
4135 bfinfdpic_got_section (info)->flags |= SEC_EXCLUDE;
4136 bfinfdpic_got_section (info)->size = 0;
4137 }
4138 else
4139 {
4140 bfinfdpic_got_section (info)->contents =
4141 (bfd_byte *) bfd_zalloc (dynobj,
4142 bfinfdpic_got_section (info)->size);
4143 if (bfinfdpic_got_section (info)->contents == NULL)
4144 return FALSE;
4145 }
4146
4147 if (elf_hash_table (info)->dynamic_sections_created)
4148 /* Subtract the number of lzplt entries, since those will generate
4149 relocations in the pltrel section. */
4150 bfinfdpic_gotrel_section (info)->size =
6a9adeca 4151 (gpinfop->g.relocs - gpinfop->g.lzplt / LZPLT_NORMAL_SIZE)
48d502e1
BS		 4152 * get_elf_backend_data (output_bfd)->s->sizeof_rel;
4153 else
6a9adeca 4154 BFD_ASSERT (gpinfop->g.relocs == 0);
48d502e1
BS		 4155 if (bfinfdpic_gotrel_section (info)->size == 0)
4156 bfinfdpic_gotrel_section (info)->flags |= SEC_EXCLUDE;
4157 else
4158 {
4159 bfinfdpic_gotrel_section (info)->contents =
4160 (bfd_byte *) bfd_zalloc (dynobj,
4161 bfinfdpic_gotrel_section (info)->size);
4162 if (bfinfdpic_gotrel_section (info)->contents == NULL)
4163 return FALSE;
4164 }
4165
6a9adeca 4166 bfinfdpic_gotfixup_section (info)->size = (gpinfop->g.fixups + 1) * 4;
48d502e1
BS		 4167 if (bfinfdpic_gotfixup_section (info)->size == 0)
4168 bfinfdpic_gotfixup_section (info)->flags |= SEC_EXCLUDE;
4169 else
4170 {
4171 bfinfdpic_gotfixup_section (info)->contents =
4172 (bfd_byte *) bfd_zalloc (dynobj,
4173 bfinfdpic_gotfixup_section (info)->size);
4174 if (bfinfdpic_gotfixup_section (info)->contents == NULL)
4175 return FALSE;
4176 }
4177
4178 if (elf_hash_table (info)->dynamic_sections_created)
d3e32c2e
JZ		 4179 bfinfdpic_pltrel_section (info)->size =
4180 gpinfop->g.lzplt / LZPLT_NORMAL_SIZE * get_elf_backend_data (output_bfd)->s->sizeof_rel;
4181 if (bfinfdpic_pltrel_section (info)->size == 0)
4182 bfinfdpic_pltrel_section (info)->flags |= SEC_EXCLUDE;
4183 else
48d502e1 4184 {
d3e32c2e
JZ		 4185 bfinfdpic_pltrel_section (info)->contents =
4186 (bfd_byte *) bfd_zalloc (dynobj,
4187 bfinfdpic_pltrel_section (info)->size);
4188 if (bfinfdpic_pltrel_section (info)->contents == NULL)
4189 return FALSE;
48d502e1
BS		 4190 }
4191
4192 /* Add 4 bytes for every block of at most 65535 lazy PLT entries,
4193 such that there's room for the additional instruction needed to
4194 call the resolver. Since _bfinfdpic_assign_got_entries didn't
4195 account for them, our block size is 4 bytes smaller than the real
4196 block size. */
4197 if (elf_hash_table (info)->dynamic_sections_created)
4198 {
6a9adeca
BS		 4199 bfinfdpic_plt_section (info)->size = gpinfop->g.lzplt
4200 + ((gpinfop->g.lzplt + (BFINFDPIC_LZPLT_BLOCK_SIZE - 4) - LZPLT_NORMAL_SIZE)
48d502e1
BS		 4201 / (BFINFDPIC_LZPLT_BLOCK_SIZE - 4) * LZPLT_RESOLVER_EXTRA);
4202 }
4203
4204 /* Reset it, such that _bfinfdpic_assign_plt_entries() can use it to
4205 actually assign lazy PLT entries addresses. */
6a9adeca 4206 gpinfop->g.lzplt = 0;
48d502e1
BS		 4207
4208 /* Save information that we're going to need to generate GOT and PLT
4209 entries. */
6a9adeca 4210 bfinfdpic_got_initial_offset (info) = -gpinfop->gothilo.min;
48d502e1
BS		 4211
4212 if (get_elf_backend_data (output_bfd)->want_got_sym)
4213 elf_hash_table (info)->hgot->root.u.def.value
6a9adeca 4214 = bfinfdpic_got_initial_offset (info);
48d502e1
BS		 4215
4216 if (elf_hash_table (info)->dynamic_sections_created)
4217 bfinfdpic_plt_initial_offset (info) =
4218 bfinfdpic_plt_section (info)->size;
4219
4220 htab_traverse (bfinfdpic_relocs_info (info), _bfinfdpic_assign_plt_entries,
6a9adeca 4221 gpinfop);
48d502e1
BS		 4222
4223 /* Allocate the PLT section contents only after
4224 _bfinfdpic_assign_plt_entries has a chance to add the size of the
4225 non-lazy PLT entries. */
d3e32c2e
JZ		 4226 if (bfinfdpic_plt_section (info)->size == 0)
4227 bfinfdpic_plt_section (info)->flags |= SEC_EXCLUDE;
4228 else
48d502e1 4229 {
d3e32c2e
JZ		 4230 bfinfdpic_plt_section (info)->contents =
4231 (bfd_byte *) bfd_zalloc (dynobj,
4232 bfinfdpic_plt_section (info)->size);
4233 if (bfinfdpic_plt_section (info)->contents == NULL)
4234 return FALSE;
48d502e1
BS		 4235 }
4236
6a9adeca
BS		 4237 return TRUE;
4238}
4239
4240/* Set the sizes of the dynamic sections. */
4241
4242static bfd_boolean
4243elf32_bfinfdpic_size_dynamic_sections (bfd *output_bfd,
4244 struct bfd_link_info *info)
4245{
4246 struct elf_link_hash_table *htab;
4247 bfd *dynobj;
4248 asection *s;
4249 struct _bfinfdpic_dynamic_got_plt_info gpinfo;
4250
4251 htab = elf_hash_table (info);
4252 dynobj = htab->dynobj;
4253 BFD_ASSERT (dynobj != NULL);
4254
4255 if (htab->dynamic_sections_created)
4256 {
4257 /* Set the contents of the .interp section to the interpreter. */
0e1862bb 4258 if (bfd_link_executable (info))
6a9adeca 4259 {
3d4d4302 4260 s = bfd_get_linker_section (dynobj, ".interp");
6a9adeca
BS		 4261 BFD_ASSERT (s != NULL);
4262 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
4263 s->contents = (bfd_byte *) ELF_DYNAMIC_INTERPRETER;
4264 }
4265 }
4266
4267 memset (&gpinfo, 0, sizeof (gpinfo));
4268 gpinfo.g.info = info;
4269
4270 for (;;)
4271 {
4272 htab_t relocs = bfinfdpic_relocs_info (info);
4273
4274 htab_traverse (relocs, _bfinfdpic_resolve_final_relocs_info, &relocs);
4275
4276 if (relocs == bfinfdpic_relocs_info (info))
4277 break;
4278 }
4279
4280 htab_traverse (bfinfdpic_relocs_info (info), _bfinfdpic_count_got_plt_entries,
4281 &gpinfo.g);
4282
4283 /* Allocate space to save the summary information, we're going to
4284 use it if we're doing relaxations. */
4285 bfinfdpic_dynamic_got_plt_info (info) = bfd_alloc (dynobj, sizeof (gpinfo.g));
4286
4287 if (!_bfinfdpic_size_got_plt (output_bfd, &gpinfo))
4288 return FALSE;
4289
48d502e1
BS		 4290 if (elf_hash_table (info)->dynamic_sections_created)
4291 {
4292 if (bfinfdpic_got_section (info)->size)
4293 if (!_bfd_elf_add_dynamic_entry (info, DT_PLTGOT, 0))
4294 return FALSE;
4295
4296 if (bfinfdpic_pltrel_section (info)->size)
4297 if (!_bfd_elf_add_dynamic_entry (info, DT_PLTRELSZ, 0)
4298 || !_bfd_elf_add_dynamic_entry (info, DT_PLTREL, DT_REL)
4299 || !_bfd_elf_add_dynamic_entry (info, DT_JMPREL, 0))
4300 return FALSE;
4301
4302 if (bfinfdpic_gotrel_section (info)->size)
4303 if (!_bfd_elf_add_dynamic_entry (info, DT_REL, 0)
4304 || !_bfd_elf_add_dynamic_entry (info, DT_RELSZ, 0)
4305 || !_bfd_elf_add_dynamic_entry (info, DT_RELENT,
4306 sizeof (Elf32_External_Rel)))
4307 return FALSE;
4308 }
4309
3d4d4302 4310 s = bfd_get_linker_section (dynobj, ".dynbss");
153d38f6
JZ		 4311 if (s && s->size == 0)
4312 s->flags |= SEC_EXCLUDE;
4313
3d4d4302 4314 s = bfd_get_linker_section (dynobj, ".rela.bss");
153d38f6
JZ		 4315 if (s && s->size == 0)
4316 s->flags |= SEC_EXCLUDE;
4317
48d502e1
BS		 4318 return TRUE;
4319}
4320
4321static bfd_boolean
4322elf32_bfinfdpic_always_size_sections (bfd *output_bfd,
4323 struct bfd_link_info *info)
4324{
0e1862bb 4325 if (!bfd_link_relocatable (info)
04c3a755
NS		 4326 && !bfd_elf_stack_segment_size (output_bfd, info,
4327 "__stacksize", DEFAULT_STACK_SIZE))
4328 return FALSE;
48d502e1
BS		 4329
4330 return TRUE;
4331}
4332
6a9adeca
BS		 4333/* Check whether any of the relocations was optimized away, and
4334 subtract it from the relocation or fixup count. */
4335static bfd_boolean
4336_bfinfdpic_check_discarded_relocs (bfd *abfd, asection *sec,
2c3fc389
NC		 4337 struct bfd_link_info *info,
4338 bfd_boolean *changed)
6a9adeca
BS		 4339{
4340 Elf_Internal_Shdr *symtab_hdr;
4341 struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
4342 Elf_Internal_Rela *rel, *erel;
4343
4344 if ((sec->flags & SEC_RELOC) == 0
4345 || sec->reloc_count == 0)
4346 return TRUE;
4347
4348 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
4349 sym_hashes = elf_sym_hashes (abfd);
4350 sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof(Elf32_External_Sym);
4351 if (!elf_bad_symtab (abfd))
4352 sym_hashes_end -= symtab_hdr->sh_info;
4353
4354 rel = elf_section_data (sec)->relocs;
4355
4356 /* Now examine each relocation. */
4357 for (erel = rel + sec->reloc_count; rel < erel; rel++)
4358 {
4359 struct elf_link_hash_entry *h;
4360 unsigned long r_symndx;
4361 struct bfinfdpic_relocs_info *picrel;
4362 struct _bfinfdpic_dynamic_got_info *dinfo;
4363
4364 if (ELF32_R_TYPE (rel->r_info) != R_BFIN_BYTE4_DATA
4365 && ELF32_R_TYPE (rel->r_info) != R_BFIN_FUNCDESC)
4366 continue;
4367
4368 if (_bfd_elf_section_offset (sec->output_section->owner,
4369 info, sec, rel->r_offset)
4370 != (bfd_vma)-1)
4371 continue;
4372
4373 r_symndx = ELF32_R_SYM (rel->r_info);
4374 if (r_symndx < symtab_hdr->sh_info)
4375 h = NULL;
4376 else
4377 {
4378 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4379 while (h->root.type == bfd_link_hash_indirect
4380 || h->root.type == bfd_link_hash_warning)
4381 h = (struct elf_link_hash_entry *)h->root.u.i.link;
4382 }
4383
4384 if (h != NULL)
4385 picrel = bfinfdpic_relocs_info_for_global (bfinfdpic_relocs_info (info),
4386 abfd, h,
4387 rel->r_addend, NO_INSERT);
4388 else
4389 picrel = bfinfdpic_relocs_info_for_local (bfinfdpic_relocs_info (info),
4390 abfd, r_symndx,
4391 rel->r_addend, NO_INSERT);
4392
4393 if (! picrel)
4394 return FALSE;
4395
4396 *changed = TRUE;
4397 dinfo = bfinfdpic_dynamic_got_plt_info (info);
4398
4399 _bfinfdpic_count_relocs_fixups (picrel, dinfo, TRUE);
4400 if (ELF32_R_TYPE (rel->r_info) == R_BFIN_BYTE4_DATA)
4401 picrel->relocs32--;
4402 else /* we know (ELF32_R_TYPE (rel->r_info) == R_BFIN_FUNCDESC) */
4403 picrel->relocsfd--;
4404 _bfinfdpic_count_relocs_fixups (picrel, dinfo, FALSE);
4405 }
4406
4407 return TRUE;
4408}
4409
4410static bfd_boolean
4411bfinfdpic_elf_discard_info (bfd *ibfd,
4412 struct elf_reloc_cookie *cookie ATTRIBUTE_UNUSED,
4413 struct bfd_link_info *info)
4414{
4415 bfd_boolean changed = FALSE;
4416 asection *s;
4417 bfd *obfd = NULL;
4418
4419 /* Account for relaxation of .eh_frame section. */
4420 for (s = ibfd->sections; s; s = s->next)
dbaa2011 4421 if (s->sec_info_type == SEC_INFO_TYPE_EH_FRAME)
6a9adeca
BS		 4422 {
4423 if (!_bfinfdpic_check_discarded_relocs (ibfd, s, info, &changed))
4424 return FALSE;
4425 obfd = s->output_section->owner;
4426 }
4427
4428 if (changed)
4429 {
4430 struct _bfinfdpic_dynamic_got_plt_info gpinfo;
4431
4432 memset (&gpinfo, 0, sizeof (gpinfo));
4433 memcpy (&gpinfo.g, bfinfdpic_dynamic_got_plt_info (info),
4434 sizeof (gpinfo.g));
4435
4436 /* Clear GOT and PLT assignments. */
4437 htab_traverse (bfinfdpic_relocs_info (info),
4438 _bfinfdpic_reset_got_plt_entries,
4439 NULL);
4440
4441 if (!_bfinfdpic_size_got_plt (obfd, &gpinfo))
4442 return FALSE;
4443 }
4444
4445 return TRUE;
4446}
4447
48d502e1
BS		 4448static bfd_boolean
4449elf32_bfinfdpic_finish_dynamic_sections (bfd *output_bfd,
4450 struct bfd_link_info *info)
4451{
4452 bfd *dynobj;
4453 asection *sdyn;
4454
4455 dynobj = elf_hash_table (info)->dynobj;
4456
4457 if (bfinfdpic_got_section (info))
4458 {
4459 BFD_ASSERT (bfinfdpic_gotrel_section (info)->size
4460 == (bfinfdpic_gotrel_section (info)->reloc_count
4461 * sizeof (Elf32_External_Rel)));
4462
4463 if (bfinfdpic_gotfixup_section (info))
4464 {
4465 struct elf_link_hash_entry *hgot = elf_hash_table (info)->hgot;
4466 bfd_vma got_value = hgot->root.u.def.value
4467 + hgot->root.u.def.section->output_section->vma
4468 + hgot->root.u.def.section->output_offset;
4469
4470 _bfinfdpic_add_rofixup (output_bfd, bfinfdpic_gotfixup_section (info),
4471 got_value, 0);
4472
4473 if (bfinfdpic_gotfixup_section (info)->size
4474 != (bfinfdpic_gotfixup_section (info)->reloc_count * 4))
0f64bb02
CM		 4475 {
4476 (*_bfd_error_handler)
48d502e1 4477 ("LINKER BUG: .rofixup section size mismatch");
0f64bb02
CM		 4478 return FALSE;
4479 }
4480 }
4481 }
48d502e1
BS		 4482 if (elf_hash_table (info)->dynamic_sections_created)
4483 {
4484 BFD_ASSERT (bfinfdpic_pltrel_section (info)->size
4485 == (bfinfdpic_pltrel_section (info)->reloc_count
4486 * sizeof (Elf32_External_Rel)));
4487 }
4488
3d4d4302 4489 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
48d502e1
BS		 4490
4491 if (elf_hash_table (info)->dynamic_sections_created)
4492 {
4493 Elf32_External_Dyn * dyncon;
4494 Elf32_External_Dyn * dynconend;
4495
4496 BFD_ASSERT (sdyn != NULL);
4497
4498 dyncon = (Elf32_External_Dyn *) sdyn->contents;
4499 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
4500
4501 for (; dyncon < dynconend; dyncon++)
4502 {
4503 Elf_Internal_Dyn dyn;
4504
4505 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
4506
4507 switch (dyn.d_tag)
4508 {
4509 default:
4510 break;
4511
4512 case DT_PLTGOT:
4513 dyn.d_un.d_ptr = bfinfdpic_got_section (info)->output_section->vma
4514 + bfinfdpic_got_section (info)->output_offset
4515 + bfinfdpic_got_initial_offset (info);
4516 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
4517 break;
4518
4519 case DT_JMPREL:
4520 dyn.d_un.d_ptr = bfinfdpic_pltrel_section (info)
4521 ->output_section->vma
4522 + bfinfdpic_pltrel_section (info)->output_offset;
4523 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
4524 break;
4525
4526 case DT_PLTRELSZ:
4527 dyn.d_un.d_val = bfinfdpic_pltrel_section (info)->size;
4528 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
4529 break;
4530 }
4531 }
4532 }
4533
4534 return TRUE;
4535}
4536
4537/* Adjust a symbol defined by a dynamic object and referenced by a
4538 regular object. */
4539
4540static bfd_boolean
2c3fc389
NC		 4541elf32_bfinfdpic_adjust_dynamic_symbol (struct bfd_link_info *info,
4542 struct elf_link_hash_entry *h)
48d502e1
BS		 4543{
4544 bfd * dynobj;
4545
4546 dynobj = elf_hash_table (info)->dynobj;
4547
4548 /* Make sure we know what is going on here. */
4549 BFD_ASSERT (dynobj != NULL
4550 && (h->u.weakdef != NULL
4551 || (h->def_dynamic
4552 && h->ref_regular
4553 && !h->def_regular)));
4554
4555 /* If this is a weak symbol, and there is a real definition, the
4556 processor independent code will have arranged for us to see the
4557 real definition first, and we can just use the same value. */
4558 if (h->u.weakdef != NULL)
4559 {
4560 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
4561 || h->u.weakdef->root.type == bfd_link_hash_defweak);
4562 h->root.u.def.section = h->u.weakdef->root.u.def.section;
4563 h->root.u.def.value = h->u.weakdef->root.u.def.value;
4564 }
0f64bb02
CM		 4565
4566 return TRUE;
4567}
4568
48d502e1
BS		 4569/* Perform any actions needed for dynamic symbols. */
4570
4571static bfd_boolean
4572elf32_bfinfdpic_finish_dynamic_symbol
4573(bfd *output_bfd ATTRIBUTE_UNUSED,
4574 struct bfd_link_info *info ATTRIBUTE_UNUSED,
4575 struct elf_link_hash_entry *h ATTRIBUTE_UNUSED,
4576 Elf_Internal_Sym *sym ATTRIBUTE_UNUSED)
0f64bb02 4577{
48d502e1
BS		 4578 return TRUE;
4579}
0f64bb02 4580
48d502e1
BS		 4581/* Decide whether to attempt to turn absptr or lsda encodings in
4582 shared libraries into pcrel within the given input section. */
0f64bb02 4583
48d502e1
BS		 4584static bfd_boolean
4585bfinfdpic_elf_use_relative_eh_frame
4586(bfd *input_bfd ATTRIBUTE_UNUSED,
4587 struct bfd_link_info *info ATTRIBUTE_UNUSED,
4588 asection *eh_frame_section ATTRIBUTE_UNUSED)
4589{
4590 /* We can't use PC-relative encodings in FDPIC binaries, in general. */
4591 return FALSE;
4592}
0f64bb02 4593
48d502e1 4594/* Adjust the contents of an eh_frame_hdr section before they're output. */
0f64bb02 4595
48d502e1
BS		 4596static bfd_byte
4597bfinfdpic_elf_encode_eh_address (bfd *abfd,
4598 struct bfd_link_info *info,
4599 asection *osec, bfd_vma offset,
4600 asection *loc_sec, bfd_vma loc_offset,
4601 bfd_vma *encoded)
4602{
4603 struct elf_link_hash_entry *h;
0f64bb02 4604
48d502e1
BS		 4605 h = elf_hash_table (info)->hgot;
4606 BFD_ASSERT (h && h->root.type == bfd_link_hash_defined);
4607
4608 if (! h || (_bfinfdpic_osec_to_segment (abfd, osec)
4609 == _bfinfdpic_osec_to_segment (abfd, loc_sec->output_section)))
4610 return _bfd_elf_encode_eh_address (abfd, info, osec, offset,
4611 loc_sec, loc_offset, encoded);
4612
4613 BFD_ASSERT (_bfinfdpic_osec_to_segment (abfd, osec)
4614 == (_bfinfdpic_osec_to_segment
4615 (abfd, h->root.u.def.section->output_section)));
4616
4617 *encoded = osec->vma + offset
4618 - (h->root.u.def.value
4619 + h->root.u.def.section->output_section->vma
4620 + h->root.u.def.section->output_offset);
4621
4622 return DW_EH_PE_datarel | DW_EH_PE_sdata4;
0f64bb02
CM		 4623}
4624
4625
48d502e1
BS		 4626
4627/* Look through the relocs for a section during the first phase.
4628
4629 Besides handling virtual table relocs for gc, we have to deal with
4630 all sorts of PIC-related relocations. We describe below the
4631 general plan on how to handle such relocations, even though we only
4632 collect information at this point, storing them in hash tables for
4633 perusal of later passes.
4634
4635 32 relocations are propagated to the linker output when creating
4636 position-independent output. LO16 and HI16 relocations are not
4637 supposed to be encountered in this case.
4638
4639 LABEL16 should always be resolvable by the linker, since it's only
4640 used by branches.
4641
4642 LABEL24, on the other hand, is used by calls. If it turns out that
4643 the target of a call is a dynamic symbol, a PLT entry must be
4644 created for it, which triggers the creation of a private function
4645 descriptor and, unless lazy binding is disabled, a lazy PLT entry.
4646
4647 GPREL relocations require the referenced symbol to be in the same
4648 segment as _gp, but this can only be checked later.
4649
4650 All GOT, GOTOFF and FUNCDESC relocations require a .got section to
4651 exist. LABEL24 might as well, since it may require a PLT entry,
4652 that will require a got.
4653
4654 Non-FUNCDESC GOT relocations require a GOT entry to be created
4655 regardless of whether the symbol is dynamic. However, since a
4656 global symbol that turns out to not be exported may have the same
4657 address of a non-dynamic symbol, we don't assign GOT entries at
4658 this point, such that we can share them in this case. A relocation
4659 for the GOT entry always has to be created, be it to offset a
4660 private symbol by the section load address, be it to get the symbol
4661 resolved dynamically.
4662
4663 FUNCDESC GOT relocations require a GOT entry to be created, and
4664 handled as if a FUNCDESC relocation was applied to the GOT entry in
4665 an object file.
4666
4667 FUNCDESC relocations referencing a symbol that turns out to NOT be
4668 dynamic cause a private function descriptor to be created. The
4669 FUNCDESC relocation then decays to a 32 relocation that points at
4670 the private descriptor. If the symbol is dynamic, the FUNCDESC
4671 relocation is propagated to the linker output, such that the
4672 dynamic linker creates the canonical descriptor, pointing to the
4673 dynamically-resolved definition of the function.
4674
4675 Non-FUNCDESC GOTOFF relocations must always refer to non-dynamic
4676 symbols that are assigned to the same segment as the GOT, but we
4677 can only check this later, after we know the complete set of
4678 symbols defined and/or exported.
4679
4680 FUNCDESC GOTOFF relocations require a function descriptor to be
4681 created and, unless lazy binding is disabled or the symbol is not
4682 dynamic, a lazy PLT entry. Since we can't tell at this point
4683 whether a symbol is going to be dynamic, we have to decide later
4684 whether to create a lazy PLT entry or bind the descriptor directly
4685 to the private function.
4686
4687 FUNCDESC_VALUE relocations are not supposed to be present in object
4688 files, but they may very well be simply propagated to the linker
4689 output, since they have no side effect.
4690
4691
4692 A function descriptor always requires a FUNCDESC_VALUE relocation.
4693 Whether it's in .plt.rel or not depends on whether lazy binding is
4694 enabled and on whether the referenced symbol is dynamic.
4695
4696 The existence of a lazy PLT requires the resolverStub lazy PLT
4697 entry to be present.
4698
4699
4700 As for assignment of GOT, PLT and lazy PLT entries, and private
4701 descriptors, we might do them all sequentially, but we can do
4702 better than that. For example, we can place GOT entries and
4703 private function descriptors referenced using 12-bit operands
4704 closer to the PIC register value, such that these relocations don't
4705 overflow. Those that are only referenced with LO16 relocations
4706 could come next, but we may as well place PLT-required function
4707 descriptors in the 12-bit range to make them shorter. Symbols
4708 referenced with LO16/HI16 may come next, but we may place
4709 additional function descriptors in the 16-bit range if we can
4710 reliably tell that we've already placed entries that are ever
4711 referenced with only LO16. PLT entries are therefore generated as
4712 small as possible, while not introducing relocation overflows in
4713 GOT or FUNCDESC_GOTOFF relocations. Lazy PLT entries could be
4714 generated before or after PLT entries, but not intermingled with
4715 them, such that we can have more lazy PLT entries in range for a
4716 branch to the resolverStub. The resolverStub should be emitted at
4717 the most distant location from the first lazy PLT entry such that
4718 it's still in range for a branch, or closer, if there isn't a need
4719 for so many lazy PLT entries. Additional lazy PLT entries may be
4720 emitted after the resolverStub, as long as branches are still in
4721 range. If the branch goes out of range, longer lazy PLT entries
4722 are emitted.
4723
4724 We could further optimize PLT and lazy PLT entries by giving them
4725 priority in assignment to closer-to-gr17 locations depending on the
4726 number of occurrences of references to them (assuming a function
4727 that's called more often is more important for performance, so its
4728 PLT entry should be faster), or taking hints from the compiler.
4729 Given infinite time and money... :-) */
0f64bb02
CM		 4730
4731static bfd_boolean
48d502e1
BS		 4732bfinfdpic_check_relocs (bfd *abfd, struct bfd_link_info *info,
4733 asection *sec, const Elf_Internal_Rela *relocs)
0f64bb02
CM		 4734{
4735 Elf_Internal_Shdr *symtab_hdr;
5582a088 4736 struct elf_link_hash_entry **sym_hashes;
48d502e1
BS		 4737 const Elf_Internal_Rela *rel;
4738 const Elf_Internal_Rela *rel_end;
0f64bb02 4739 bfd *dynobj;
48d502e1 4740 struct bfinfdpic_relocs_info *picrel;
0f64bb02 4741
0e1862bb 4742 if (bfd_link_relocatable (info))
0f64bb02
CM		 4743 return TRUE;
4744
4745 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
4746 sym_hashes = elf_sym_hashes (abfd);
0f64bb02 4747
48d502e1
BS		 4748 dynobj = elf_hash_table (info)->dynobj;
4749 rel_end = relocs + sec->reloc_count;
4750 for (rel = relocs; rel < rel_end; rel++)
0f64bb02 4751 {
0f64bb02 4752 struct elf_link_hash_entry *h;
48d502e1
BS		 4753 unsigned long r_symndx;
4754
4755 r_symndx = ELF32_R_SYM (rel->r_info);
4756 if (r_symndx < symtab_hdr->sh_info)
4757 h = NULL;
4758 else
4759 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
0f64bb02
CM		 4760
4761 switch (ELF32_R_TYPE (rel->r_info))
4762 {
48d502e1
BS		 4763 case R_BFIN_GOT17M4:
4764 case R_BFIN_GOTHI:
4765 case R_BFIN_GOTLO:
4766 case R_BFIN_FUNCDESC_GOT17M4:
4767 case R_BFIN_FUNCDESC_GOTHI:
4768 case R_BFIN_FUNCDESC_GOTLO:
4769 case R_BFIN_GOTOFF17M4:
4770 case R_BFIN_GOTOFFHI:
4771 case R_BFIN_GOTOFFLO:
4772 case R_BFIN_FUNCDESC_GOTOFF17M4:
4773 case R_BFIN_FUNCDESC_GOTOFFHI:
4774 case R_BFIN_FUNCDESC_GOTOFFLO:
4775 case R_BFIN_FUNCDESC:
4776 case R_BFIN_FUNCDESC_VALUE:
4777 if (! IS_FDPIC (abfd))
4778 goto bad_reloc;
4779 /* Fall through. */
cb88ce9f
BS		 4780 case R_BFIN_PCREL24:
4781 case R_BFIN_PCREL24_JUMP_L:
4782 case R_BFIN_BYTE4_DATA:
48d502e1 4783 if (IS_FDPIC (abfd) && ! dynobj)
0f64bb02 4784 {
48d502e1
BS		 4785 elf_hash_table (info)->dynobj = dynobj = abfd;
4786 if (! _bfin_create_got_section (abfd, info))
4787 return FALSE;
0f64bb02 4788 }
48d502e1 4789 if (! IS_FDPIC (abfd))
0f64bb02 4790 {
48d502e1
BS		 4791 picrel = NULL;
4792 break;
4793 }
4794 if (h != NULL)
4795 {
4796 if (h->dynindx == -1)
4797 switch (ELF_ST_VISIBILITY (h->other))
4798 {
4799 case STV_INTERNAL:
4800 case STV_HIDDEN:
4801 break;
4802 default:
4803 bfd_elf_link_record_dynamic_symbol (info, h);
4804 break;
4805 }
4806 picrel
4807 = bfinfdpic_relocs_info_for_global (bfinfdpic_relocs_info (info),
4808 abfd, h,
4809 rel->r_addend, INSERT);
0f64bb02 4810 }
48d502e1
BS		 4811 else
4812 picrel = bfinfdpic_relocs_info_for_local (bfinfdpic_relocs_info
4813 (info), abfd, r_symndx,
4814 rel->r_addend, INSERT);
4815 if (! picrel)
4816 return FALSE;
0f64bb02 4817 break;
48d502e1 4818
0f64bb02 4819 default:
48d502e1 4820 picrel = NULL;
0f64bb02
CM		 4821 break;
4822 }
48d502e1
BS		 4823
4824 switch (ELF32_R_TYPE (rel->r_info))
4825 {
cb88ce9f
BS		 4826 case R_BFIN_PCREL24:
4827 case R_BFIN_PCREL24_JUMP_L:
48d502e1 4828 if (IS_FDPIC (abfd))
2774f1a6 4829 picrel->call++;
48d502e1
BS		 4830 break;
4831
4832 case R_BFIN_FUNCDESC_VALUE:
4833 picrel->relocsfdv++;
4834 if (bfd_get_section_flags (abfd, sec) & SEC_ALLOC)
4835 picrel->relocs32--;
4836 /* Fall through. */
4837
cb88ce9f 4838 case R_BFIN_BYTE4_DATA:
48d502e1
BS		 4839 if (! IS_FDPIC (abfd))
4840 break;
4841
2774f1a6 4842 picrel->sym++;
48d502e1
BS		 4843 if (bfd_get_section_flags (abfd, sec) & SEC_ALLOC)
4844 picrel->relocs32++;
4845 break;
4846
4847 case R_BFIN_GOT17M4:
2774f1a6 4848 picrel->got17m4++;
48d502e1
BS		 4849 break;
4850
4851 case R_BFIN_GOTHI:
4852 case R_BFIN_GOTLO:
2774f1a6 4853 picrel->gothilo++;
48d502e1
BS		 4854 break;
4855
4856 case R_BFIN_FUNCDESC_GOT17M4:
2774f1a6 4857 picrel->fdgot17m4++;
48d502e1
BS		 4858 break;
4859
4860 case R_BFIN_FUNCDESC_GOTHI:
4861 case R_BFIN_FUNCDESC_GOTLO:
2774f1a6 4862 picrel->fdgothilo++;
48d502e1
BS		 4863 break;
4864
4865 case R_BFIN_GOTOFF17M4:
4866 case R_BFIN_GOTOFFHI:
4867 case R_BFIN_GOTOFFLO:
2774f1a6 4868 picrel->gotoff++;
48d502e1
BS		 4869 break;
4870
4871 case R_BFIN_FUNCDESC_GOTOFF17M4:
2774f1a6 4872 picrel->fdgoff17m4++;
48d502e1
BS		 4873 break;
4874
4875 case R_BFIN_FUNCDESC_GOTOFFHI:
4876 case R_BFIN_FUNCDESC_GOTOFFLO:
2774f1a6 4877 picrel->fdgoffhilo++;
48d502e1
BS		 4878 break;
4879
4880 case R_BFIN_FUNCDESC:
2774f1a6 4881 picrel->fd++;
48d502e1
BS		 4882 picrel->relocsfd++;
4883 break;
4884
4885 /* This relocation describes the C++ object vtable hierarchy.
4886 Reconstruct it for later use during GC. */
4887 case R_BFIN_GNU_VTINHERIT:
4888 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
4889 return FALSE;
4890 break;
4891
4892 /* This relocation describes which C++ vtable entries are actually
4893 used. Record for later use during GC. */
4894 case R_BFIN_GNU_VTENTRY:
d17e0c6e
JB		 4895 BFD_ASSERT (h != NULL);
4896 if (h != NULL
4897 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
48d502e1
BS		 4898 return FALSE;
4899 break;
4900
cb88ce9f
BS		 4901 case R_BFIN_HUIMM16:
4902 case R_BFIN_LUIMM16:
4903 case R_BFIN_PCREL12_JUMP_S:
4904 case R_BFIN_PCREL10:
48d502e1
BS		 4905 break;
4906
4907 default:
4908 bad_reloc:
4909 (*_bfd_error_handler)
4910 (_("%B: unsupported relocation type %i"),
4911 abfd, ELF32_R_TYPE (rel->r_info));
4912 return FALSE;
4913 }
0f64bb02
CM		 4914 }
4915
4916 return TRUE;
4917}
4918
48d502e1
BS		 4919/* Set the right machine number for a Blackfin ELF file. */
4920
4921static bfd_boolean
4922elf32_bfin_object_p (bfd *abfd)
4923{
4924 bfd_default_set_arch_mach (abfd, bfd_arch_bfin, 0);
4925 return (((elf_elfheader (abfd)->e_flags & EF_BFIN_FDPIC) != 0)
4926 == (IS_FDPIC (abfd)));
4927}
0f64bb02 4928
0f64bb02 4929static bfd_boolean
48d502e1 4930elf32_bfin_set_private_flags (bfd * abfd, flagword flags)
0f64bb02 4931{
48d502e1
BS		 4932 elf_elfheader (abfd)->e_flags = flags;
4933 elf_flags_init (abfd) = TRUE;
4934 return TRUE;
4935}
0f64bb02 4936
0f64bb02
CM		 4937/* Display the flags field. */
4938static bfd_boolean
2c3fc389 4939elf32_bfin_print_private_bfd_data (bfd * abfd, void * ptr)
0f64bb02
CM		 4940{
4941 FILE *file = (FILE *) ptr;
48d502e1 4942 flagword flags;
0f64bb02
CM		 4943
4944 BFD_ASSERT (abfd != NULL && ptr != NULL);
4945
4946 /* Print normal ELF private data. */
4947 _bfd_elf_print_private_bfd_data (abfd, ptr);
4948
48d502e1 4949 flags = elf_elfheader (abfd)->e_flags;
0f64bb02
CM		 4950
4951 /* xgettext:c-format */
4952 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
4953
48d502e1
BS		 4954 if (flags & EF_BFIN_PIC)
4955 fprintf (file, " -fpic");
4956
4957 if (flags & EF_BFIN_FDPIC)
4958 fprintf (file, " -mfdpic");
4959
0f64bb02
CM		 4960 fputc ('\n', file);
4961
4962 return TRUE;
4963}
4964
48d502e1
BS		 4965/* Merge backend specific data from an object file to the output
4966 object file when linking. */
4967
4968static bfd_boolean
4969elf32_bfin_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
4970{
7a84e3da 4971 flagword old_flags, new_flags;
48d502e1
BS		 4972 bfd_boolean error = FALSE;
4973
4974 new_flags = elf_elfheader (ibfd)->e_flags;
4975 old_flags = elf_elfheader (obfd)->e_flags;
4976
4977 if (new_flags & EF_BFIN_FDPIC)
4978 new_flags &= ~EF_BFIN_PIC;
4979
c7e2358a
AM		 4980#ifndef DEBUG
4981 if (0)
4982#endif
48d502e1
BS		 4983 (*_bfd_error_handler) ("old_flags = 0x%.8lx, new_flags = 0x%.8lx, init = %s, filename = %s",
4984 old_flags, new_flags, elf_flags_init (obfd) ? "yes" : "no",
4985 bfd_get_filename (ibfd));
48d502e1
BS		 4986
4987 if (!elf_flags_init (obfd)) /* First call, no flags set. */
4988 {
4989 elf_flags_init (obfd) = TRUE;
7a84e3da 4990 elf_elfheader (obfd)->e_flags = new_flags;
48d502e1
BS		 4991 }
4992
7a84e3da 4993 if (((new_flags & EF_BFIN_FDPIC) == 0) != (! IS_FDPIC (obfd)))
48d502e1
BS		 4994 {
4995 error = TRUE;
4996 if (IS_FDPIC (obfd))
4997 (*_bfd_error_handler)
4998 (_("%s: cannot link non-fdpic object file into fdpic executable"),
4999 bfd_get_filename (ibfd));
5000 else
5001 (*_bfd_error_handler)
5002 (_("%s: cannot link fdpic object file into non-fdpic executable"),
5003 bfd_get_filename (ibfd));
5004 }
5005
5006 if (error)
5007 bfd_set_error (bfd_error_bad_value);
5008
5009 return !error;
5010}
5011\f
0f64bb02
CM		 5012/* bfin ELF linker hash entry. */
5013
5014struct bfin_link_hash_entry
5015{
5016 struct elf_link_hash_entry root;
5017
5018 /* Number of PC relative relocs copied for this symbol. */
5019 struct bfin_pcrel_relocs_copied *pcrel_relocs_copied;
5020};
5021
5022/* bfin ELF linker hash table. */
5023
5024struct bfin_link_hash_table
5025{
5026 struct elf_link_hash_table root;
5027
87d72d41
AM		 5028 /* Small local sym cache. */
5029 struct sym_cache sym_cache;
0f64bb02
CM		 5030};
5031
5032#define bfin_hash_entry(ent) ((struct bfin_link_hash_entry *) (ent))
5033
5034static struct bfd_hash_entry *
5035bfin_link_hash_newfunc (struct bfd_hash_entry *entry,
48d502e1 5036 struct bfd_hash_table *table, const char *string)
0f64bb02
CM		 5037{
5038 struct bfd_hash_entry *ret = entry;
5039
5040 /* Allocate the structure if it has not already been allocated by a
5041 subclass. */
5042 if (ret == NULL)
5043 ret = bfd_hash_allocate (table, sizeof (struct bfin_link_hash_entry));
5044 if (ret == NULL)
5045 return ret;
5046
5047 /* Call the allocation method of the superclass. */
5048 ret = _bfd_elf_link_hash_newfunc (ret, table, string);
5049 if (ret != NULL)
5050 bfin_hash_entry (ret)->pcrel_relocs_copied = NULL;
5051
5052 return ret;
5053}
5054
5055/* Create an bfin ELF linker hash table. */
5056
5057static struct bfd_link_hash_table *
5058bfin_link_hash_table_create (bfd * abfd)
5059{
5060 struct bfin_link_hash_table *ret;
5061 bfd_size_type amt = sizeof (struct bfin_link_hash_table);
5062
22cdc249 5063 ret = bfd_zmalloc (amt);
48d502e1 5064 if (ret == NULL)
0f64bb02
CM		 5065 return NULL;
5066
5067 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
66eb6687 5068 bfin_link_hash_newfunc,
4dfe6ac6
NC		 5069 sizeof (struct elf_link_hash_entry),
5070 BFIN_ELF_DATA))
0f64bb02
CM		 5071 {
5072 free (ret);
5073 return NULL;
5074 }
5075
87d72d41 5076 ret->sym_cache.abfd = NULL;
0f64bb02
CM		 5077
5078 return &ret->root.root;
5079}
5080
5081/* The size in bytes of an entry in the procedure linkage table. */
5082
5083/* Finish up the dynamic sections. */
5084
5085static bfd_boolean
5086bfin_finish_dynamic_sections (bfd * output_bfd ATTRIBUTE_UNUSED,
2c3fc389 5087 struct bfd_link_info *info)
0f64bb02
CM		 5088{
5089 bfd *dynobj;
5090 asection *sdyn;
5091
5092 dynobj = elf_hash_table (info)->dynobj;
5093
3d4d4302 5094 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
0f64bb02
CM		 5095
5096 if (elf_hash_table (info)->dynamic_sections_created)
5097 {
5098 Elf32_External_Dyn *dyncon, *dynconend;
5099
5100 BFD_ASSERT (sdyn != NULL);
5101
5102 dyncon = (Elf32_External_Dyn *) sdyn->contents;
5103 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
5104 for (; dyncon < dynconend; dyncon++)
5105 {
5106 Elf_Internal_Dyn dyn;
5107
5108 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
5109
5110 }
5111
5112 }
5113 return TRUE;
5114}
5115
5116/* Finish up dynamic symbol handling. We set the contents of various
5117 dynamic sections here. */
5118
5119static bfd_boolean
5120bfin_finish_dynamic_symbol (bfd * output_bfd,
2c3fc389
NC		 5121 struct bfd_link_info *info,
5122 struct elf_link_hash_entry *h,
5123 Elf_Internal_Sym * sym)
0f64bb02
CM		 5124{
5125 bfd *dynobj;
5126
5127 dynobj = elf_hash_table (info)->dynobj;
5128
5129 if (h->got.offset != (bfd_vma) - 1)
5130 {
5131 asection *sgot;
5132 asection *srela;
5133 Elf_Internal_Rela rela;
5134 bfd_byte *loc;
5135
5136 /* This symbol has an entry in the global offset table.
5137 Set it up. */
5138
3d4d4302
AM		 5139 sgot = bfd_get_linker_section (dynobj, ".got");
5140 srela = bfd_get_linker_section (dynobj, ".rela.got");
0f64bb02
CM		 5141 BFD_ASSERT (sgot != NULL && srela != NULL);
5142
5143 rela.r_offset = (sgot->output_section->vma
5144 + sgot->output_offset
5145 + (h->got.offset & ~(bfd_vma) 1));
5146
5147 /* If this is a -Bsymbolic link, and the symbol is defined
5148 locally, we just want to emit a RELATIVE reloc. Likewise if
5149 the symbol was forced to be local because of a version file.
5150 The entry in the global offset table will already have been
5151 initialized in the relocate_section function. */
0e1862bb 5152 if (bfd_link_pic (info)
0f64bb02
CM		 5153 && (info->symbolic
5154 || h->dynindx == -1 || h->forced_local) && h->def_regular)
5155 {
4a97a0e5
AM		 5156 (*_bfd_error_handler) (_("*** check this relocation %s"),
5157 __FUNCTION__);
cb88ce9f 5158 rela.r_info = ELF32_R_INFO (0, R_BFIN_PCREL24);
0f64bb02
CM		 5159 rela.r_addend = bfd_get_signed_32 (output_bfd,
5160 (sgot->contents
5161 +
5162 (h->got.
5163 offset & ~(bfd_vma) 1)));
5164 }
5165 else
5166 {
5167 bfd_put_32 (output_bfd, (bfd_vma) 0,
5168 sgot->contents + (h->got.offset & ~(bfd_vma) 1));
cb88ce9f 5169 rela.r_info = ELF32_R_INFO (h->dynindx, R_BFIN_GOT);
0f64bb02
CM		 5170 rela.r_addend = 0;
5171 }
5172
5173 loc = srela->contents;
5174 loc += srela->reloc_count++ * sizeof (Elf32_External_Rela);
5175 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
5176 }
5177
5178 if (h->needs_copy)
5179 {
5180 BFD_ASSERT (0);
5181 }
5182 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
5592d7ec 5183 if (strcmp (h->root.root.string, "__DYNAMIC") == 0
22edb2f1 5184 || h == elf_hash_table (info)->hgot)
0f64bb02
CM		 5185 sym->st_shndx = SHN_ABS;
5186
5187 return TRUE;
5188}
5189
5190/* Adjust a symbol defined by a dynamic object and referenced by a
5191 regular object. The current definition is in some section of the
5192 dynamic object, but we're not including those sections. We have to
5193 change the definition to something the rest of the link can
5194 understand. */
5195
5196static bfd_boolean
5197bfin_adjust_dynamic_symbol (struct bfd_link_info *info,
2c3fc389 5198 struct elf_link_hash_entry *h)
0f64bb02
CM		 5199{
5200 bfd *dynobj;
5201 asection *s;
5202 unsigned int power_of_two;
5203
5204 dynobj = elf_hash_table (info)->dynobj;
5205
5206 /* Make sure we know what is going on here. */
5207 BFD_ASSERT (dynobj != NULL
5208 && (h->needs_plt
5209 || h->u.weakdef != NULL
5210 || (h->def_dynamic && h->ref_regular && !h->def_regular)));
5211
5212 /* If this is a function, put it in the procedure linkage table. We
5213 will fill in the contents of the procedure linkage table later,
5214 when we know the address of the .got section. */
5215 if (h->type == STT_FUNC || h->needs_plt)
5216 {
5217 BFD_ASSERT(0);
5218 }
5219
5220 /* If this is a weak symbol, and there is a real definition, the
5221 processor independent code will have arranged for us to see the
5222 real definition first, and we can just use the same value. */
5223 if (h->u.weakdef != NULL)
5224 {
5225 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
5226 || h->u.weakdef->root.type == bfd_link_hash_defweak);
5227 h->root.u.def.section = h->u.weakdef->root.u.def.section;
5228 h->root.u.def.value = h->u.weakdef->root.u.def.value;
5229 return TRUE;
5230 }
5231
5232 /* This is a reference to a symbol defined by a dynamic object which
5233 is not a function. */
5234
5235 /* If we are creating a shared library, we must presume that the
5236 only references to the symbol are via the global offset table.
5237 For such cases we need not do anything here; the relocations will
5238 be handled correctly by relocate_section. */
0e1862bb 5239 if (bfd_link_pic (info))
0f64bb02
CM		 5240 return TRUE;
5241
5242 /* We must allocate the symbol in our .dynbss section, which will
5243 become part of the .bss section of the executable. There will be
5244 an entry for this symbol in the .dynsym section. The dynamic
5245 object will contain position independent code, so all references
5246 from the dynamic object to this symbol will go through the global
5247 offset table. The dynamic linker will use the .dynsym entry to
5248 determine the address it must put in the global offset table, so
5249 both the dynamic object and the regular object will refer to the
5250 same memory location for the variable. */
5251
3d4d4302 5252 s = bfd_get_linker_section (dynobj, ".dynbss");
0f64bb02
CM		 5253 BFD_ASSERT (s != NULL);
5254
5255 /* We must generate a R_68K_COPY reloc to tell the dynamic linker to
5256 copy the initial value out of the dynamic object and into the
5257 runtime process image. We need to remember the offset into the
5258 .rela.bss section we are going to use. */
5259 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
5260 {
5261 asection *srel;
5262
3d4d4302 5263 srel = bfd_get_linker_section (dynobj, ".rela.bss");
0f64bb02
CM		 5264 BFD_ASSERT (srel != NULL);
5265 srel->size += sizeof (Elf32_External_Rela);
5266 h->needs_copy = 1;
5267 }
5268
5269 /* We need to figure out the alignment required for this symbol. I
5270 have no idea how ELF linkers handle this. */
5271 power_of_two = bfd_log2 (h->size);
5272 if (power_of_two > 3)
5273 power_of_two = 3;
5274
5275 /* Apply the required alignment. */
5276 s->size = BFD_ALIGN (s->size, (bfd_size_type) (1 << power_of_two));
5277 if (power_of_two > bfd_get_section_alignment (dynobj, s))
5278 {
5279 if (!bfd_set_section_alignment (dynobj, s, power_of_two))
5280 return FALSE;
5281 }
5282
5283 /* Define the symbol as being at this point in the section. */
5284 h->root.u.def.section = s;
5285 h->root.u.def.value = s->size;
5286
5287 /* Increment the section size to make room for the symbol. */
5288 s->size += h->size;
5289
5290 return TRUE;
5291}
5292
5293/* The bfin linker needs to keep track of the number of relocs that it
5294 decides to copy in check_relocs for each symbol. This is so that it
5295 can discard PC relative relocs if it doesn't need them when linking
5296 with -Bsymbolic. We store the information in a field extending the
5297 regular ELF linker hash table. */
5298
5299/* This structure keeps track of the number of PC relative relocs we have
5300 copied for a given symbol. */
5301
5302struct bfin_pcrel_relocs_copied
5303{
5304 /* Next section. */
5305 struct bfin_pcrel_relocs_copied *next;
5306 /* A section in dynobj. */
5307 asection *section;
5308 /* Number of relocs copied in this section. */
5309 bfd_size_type count;
5310};
5311
5312/* This function is called via elf_link_hash_traverse if we are
5313 creating a shared object. In the -Bsymbolic case it discards the
5314 space allocated to copy PC relative relocs against symbols which
5315 are defined in regular objects. For the normal shared case, it
5316 discards space for pc-relative relocs that have become local due to
5317 symbol visibility changes. We allocated space for them in the
5318 check_relocs routine, but we won't fill them in in the
5319 relocate_section routine.
5320
5321 We also check whether any of the remaining relocations apply
5322 against a readonly section, and set the DF_TEXTREL flag in this
5323 case. */
5324
5325static bfd_boolean
2c3fc389 5326bfin_discard_copies (struct elf_link_hash_entry *h, void * inf)
0f64bb02
CM		 5327{
5328 struct bfd_link_info *info = (struct bfd_link_info *) inf;
5329 struct bfin_pcrel_relocs_copied *s;
5330
0f64bb02
CM		 5331 if (!h->def_regular || (!info->symbolic && !h->forced_local))
5332 {
5333 if ((info->flags & DF_TEXTREL) == 0)
5334 {
5335 /* Look for relocations against read-only sections. */
5336 for (s = bfin_hash_entry (h)->pcrel_relocs_copied;
5337 s != NULL; s = s->next)
5338 if ((s->section->flags & SEC_READONLY) != 0)
5339 {
5340 info->flags |= DF_TEXTREL;
5341 break;
5342 }
5343 }
5344
5345 return TRUE;
5346 }
5347
5348 for (s = bfin_hash_entry (h)->pcrel_relocs_copied;
5349 s != NULL; s = s->next)
5350 s->section->size -= s->count * sizeof (Elf32_External_Rela);
5351
5352 return TRUE;
5353}
5354
0f64bb02
CM		 5355static bfd_boolean
5356bfin_size_dynamic_sections (bfd * output_bfd ATTRIBUTE_UNUSED,
2c3fc389 5357 struct bfd_link_info *info)
0f64bb02
CM		 5358{
5359 bfd *dynobj;
5360 asection *s;
5361 bfd_boolean relocs;
5362
5363 dynobj = elf_hash_table (info)->dynobj;
5364 BFD_ASSERT (dynobj != NULL);
5365
5366 if (elf_hash_table (info)->dynamic_sections_created)
5367 {
5368 /* Set the contents of the .interp section to the interpreter. */
0e1862bb 5369 if (bfd_link_executable (info))
0f64bb02 5370 {
3d4d4302 5371 s = bfd_get_linker_section (dynobj, ".interp");
0f64bb02
CM		 5372 BFD_ASSERT (s != NULL);
5373 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
5374 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
5375 }
5376 }
5377 else
5378 {
5379 /* We may have created entries in the .rela.got section.
5380 However, if we are not creating the dynamic sections, we will
5381 not actually use these entries. Reset the size of .rela.got,
5382 which will cause it to get stripped from the output file
5383 below. */
3d4d4302 5384 s = bfd_get_linker_section (dynobj, ".rela.got");
0f64bb02
CM		 5385 if (s != NULL)
5386 s->size = 0;
5387 }
5388
5389 /* If this is a -Bsymbolic shared link, then we need to discard all
5390 PC relative relocs against symbols defined in a regular object.
5391 For the normal shared case we discard the PC relative relocs
5392 against symbols that have become local due to visibility changes.
5393 We allocated space for them in the check_relocs routine, but we
5394 will not fill them in in the relocate_section routine. */
0e1862bb 5395 if (bfd_link_pic (info))
0f64bb02 5396 elf_link_hash_traverse (elf_hash_table (info),
2c3fc389 5397 bfin_discard_copies, info);
0f64bb02
CM		 5398
5399 /* The check_relocs and adjust_dynamic_symbol entry points have
5400 determined the sizes of the various dynamic sections. Allocate
5401 memory for them. */
5402 relocs = FALSE;
5403 for (s = dynobj->sections; s != NULL; s = s->next)
5404 {
5405 const char *name;
5406 bfd_boolean strip;
5407
5408 if ((s->flags & SEC_LINKER_CREATED) == 0)
5409 continue;
5410
5411 /* It's OK to base decisions on the section name, because none
5412 of the dynobj section names depend upon the input files. */
5413 name = bfd_get_section_name (dynobj, s);
5414
5415 strip = FALSE;
5416
0112cd26 5417 if (CONST_STRNEQ (name, ".rela"))
0f64bb02
CM		 5418 {
5419 if (s->size == 0)
5420 {
5421 /* If we don't need this section, strip it from the
5422 output file. This is mostly to handle .rela.bss and
5423 .rela.plt. We must create both sections in
5424 create_dynamic_sections, because they must be created
5425 before the linker maps input sections to output
5426 sections. The linker does that before
5427 adjust_dynamic_symbol is called, and it is that
5428 function which decides whether anything needs to go
5429 into these sections. */
5430 strip = TRUE;
5431 }
5432 else
5433 {
5434 relocs = TRUE;
5435
5436 /* We use the reloc_count field as a counter if we need
5437 to copy relocs into the output file. */
5438 s->reloc_count = 0;
5439 }
5440 }
0112cd26 5441 else if (! CONST_STRNEQ (name, ".got"))
0f64bb02
CM		 5442 {
5443 /* It's not one of our sections, so don't allocate space. */
5444 continue;
5445 }
5446
5447 if (strip)
5448 {
5449 s->flags |= SEC_EXCLUDE;
5450 continue;
5451 }
5452
5453 /* Allocate memory for the section contents. */
5454 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
5455 Unused entries should be reclaimed before the section's contents
5456 are written out, but at the moment this does not happen. Thus in
5457 order to prevent writing out garbage, we initialise the section's
5458 contents to zero. */
5459 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
5460 if (s->contents == NULL && s->size != 0)
5461 return FALSE;
5462 }
5463
5464 if (elf_hash_table (info)->dynamic_sections_created)
5465 {
5466 /* Add some entries to the .dynamic section. We fill in the
5467 values later, in bfin_finish_dynamic_sections, but we
5468 must add the entries now so that we get the correct size for
5469 the .dynamic section. The DT_DEBUG entry is filled in by the
5470 dynamic linker and used by the debugger. */
5471#define add_dynamic_entry(TAG, VAL) \
5472 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
5473
0e1862bb 5474 if (!bfd_link_pic (info))
0f64bb02
CM		 5475 {
5476 if (!add_dynamic_entry (DT_DEBUG, 0))
5477 return FALSE;
5478 }
5479
5480
5481 if (relocs)
5482 {
5483 if (!add_dynamic_entry (DT_RELA, 0)
5484 || !add_dynamic_entry (DT_RELASZ, 0)
5485 || !add_dynamic_entry (DT_RELAENT,
5486 sizeof (Elf32_External_Rela)))
5487 return FALSE;
5488 }
5489
5490 if ((info->flags & DF_TEXTREL) != 0)
5491 {
5492 if (!add_dynamic_entry (DT_TEXTREL, 0))
5493 return FALSE;
5494 }
5495 }
5496#undef add_dynamic_entry
5497
5498 return TRUE;
5499}
48d502e1 5500\f
0f64bb02
CM		 5501/* Given a .data section and a .emreloc in-memory section, store
5502 relocation information into the .emreloc section which can be
5503 used at runtime to relocate the section. This is called by the
5504 linker when the --embedded-relocs switch is used. This is called
5505 after the add_symbols entry point has been called for all the
5506 objects, and before the final_link entry point is called. */
5507
5508bfd_boolean
2c3fc389
NC		 5509bfd_bfin_elf32_create_embedded_relocs (bfd *abfd,
5510 struct bfd_link_info *info,
5511 asection *datasec,
5512 asection *relsec,
5513 char **errmsg)
0f64bb02
CM		 5514{
5515 Elf_Internal_Shdr *symtab_hdr;
5516 Elf_Internal_Sym *isymbuf = NULL;
5517 Elf_Internal_Rela *internal_relocs = NULL;
5518 Elf_Internal_Rela *irel, *irelend;
5519 bfd_byte *p;
5520 bfd_size_type amt;
5521
0e1862bb 5522 BFD_ASSERT (! bfd_link_relocatable (info));
0f64bb02
CM		 5523
5524 *errmsg = NULL;
5525
5526 if (datasec->reloc_count == 0)
5527 return TRUE;
5528
5529 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
5530
5531 /* Get a copy of the native relocations. */
5532 internal_relocs = (_bfd_elf_link_read_relocs
2c3fc389 5533 (abfd, datasec, NULL, (Elf_Internal_Rela *) NULL,
0f64bb02
CM		 5534 info->keep_memory));
5535 if (internal_relocs == NULL)
5536 goto error_return;
5537
5538 amt = (bfd_size_type) datasec->reloc_count * 12;
5539 relsec->contents = (bfd_byte *) bfd_alloc (abfd, amt);
5540 if (relsec->contents == NULL)
5541 goto error_return;
5542
5543 p = relsec->contents;
5544
5545 irelend = internal_relocs + datasec->reloc_count;
5546 for (irel = internal_relocs; irel < irelend; irel++, p += 12)
5547 {
5548 asection *targetsec;
5549
5550 /* We are going to write a four byte longword into the runtime
5551 reloc section. The longword will be the address in the data
5552 section which must be relocated. It is followed by the name
5553 of the target section NUL-padded or truncated to 8
5554 characters. */
5555
5556 /* We can only relocate absolute longword relocs at run time. */
cb88ce9f 5557 if (ELF32_R_TYPE (irel->r_info) != (int) R_BFIN_BYTE4_DATA)
0f64bb02
CM		 5558 {
5559 *errmsg = _("unsupported reloc type");
5560 bfd_set_error (bfd_error_bad_value);
5561 goto error_return;
5562 }
5563
5564 /* Get the target section referred to by the reloc. */
5565 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
5566 {
5567 /* A local symbol. */
5568 Elf_Internal_Sym *isym;
5569
5570 /* Read this BFD's local symbols if we haven't done so already. */
5571 if (isymbuf == NULL)
5572 {
5573 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
5574 if (isymbuf == NULL)
5575 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
5576 symtab_hdr->sh_info, 0,
5577 NULL, NULL, NULL);
5578 if (isymbuf == NULL)
5579 goto error_return;
5580 }
5581
5582 isym = isymbuf + ELF32_R_SYM (irel->r_info);
5583 targetsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
5584 }
5585 else
5586 {
5587 unsigned long indx;
5588 struct elf_link_hash_entry *h;
5589
5590 /* An external symbol. */
5591 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
5592 h = elf_sym_hashes (abfd)[indx];
5593 BFD_ASSERT (h != NULL);
5594 if (h->root.type == bfd_link_hash_defined
5595 || h->root.type == bfd_link_hash_defweak)
5596 targetsec = h->root.u.def.section;
5597 else
5598 targetsec = NULL;
5599 }
5600
5601 bfd_put_32 (abfd, irel->r_offset + datasec->output_offset, p);
5602 memset (p + 4, 0, 8);
5603 if (targetsec != NULL)
9ba4c445 5604 strncpy ((char *) p + 4, targetsec->output_section->name, 8);
0f64bb02
CM		 5605 }
5606
5607 if (isymbuf != NULL && symtab_hdr->contents != (unsigned char *) isymbuf)
5608 free (isymbuf);
5609 if (internal_relocs != NULL
5610 && elf_section_data (datasec)->relocs != internal_relocs)
5611 free (internal_relocs);
5612 return TRUE;
5613
5614error_return:
5615 if (isymbuf != NULL && symtab_hdr->contents != (unsigned char *) isymbuf)
5616 free (isymbuf);
5617 if (internal_relocs != NULL
5618 && elf_section_data (datasec)->relocs != internal_relocs)
5619 free (internal_relocs);
5620 return FALSE;
5621}
b0a0b978
JZ		 5622
5623struct bfd_elf_special_section const elf32_bfin_special_sections[] =
5624{
5625 { ".l1.text", 8, -2, SHT_PROGBITS, SHF_ALLOC + SHF_EXECINSTR },
5626 { ".l1.data", 8, -2, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE },
5627 { NULL, 0, 0, 0, 0 }
5628};
5629
48d502e1 5630\f
6d00b590 5631#define TARGET_LITTLE_SYM bfin_elf32_vec
0f64bb02
CM		 5632#define TARGET_LITTLE_NAME "elf32-bfin"
5633#define ELF_ARCH bfd_arch_bfin
ae95ffa6 5634#define ELF_TARGET_ID BFIN_ELF_DATA
3b55e94a 5635#define ELF_MACHINE_CODE EM_BLACKFIN
0f64bb02
CM		 5636#define ELF_MAXPAGESIZE 0x1000
5637#define elf_symbol_leading_char '_'
5638
5639#define bfd_elf32_bfd_reloc_type_lookup bfin_bfd_reloc_type_lookup
157090f7
AM		 5640#define bfd_elf32_bfd_reloc_name_lookup \
5641 bfin_bfd_reloc_name_lookup
0f64bb02
CM		 5642#define elf_info_to_howto bfin_info_to_howto
5643#define elf_info_to_howto_rel 0
48d502e1 5644#define elf_backend_object_p elf32_bfin_object_p
0f64bb02
CM		 5645
5646#define bfd_elf32_bfd_is_local_label_name \
5647 bfin_is_local_label_name
5648#define bfin_hash_table(p) \
5649 ((struct bfin_link_hash_table *) (p)->hash)
5650
5651
5652
5653#define elf_backend_create_dynamic_sections \
5654 _bfd_elf_create_dynamic_sections
5655#define bfd_elf32_bfd_link_hash_table_create \
5656 bfin_link_hash_table_create
5657#define bfd_elf32_bfd_final_link bfd_elf_gc_common_final_link
5658
48d502e1 5659#define elf_backend_check_relocs bfin_check_relocs
0f64bb02
CM		 5660#define elf_backend_adjust_dynamic_symbol \
5661 bfin_adjust_dynamic_symbol
5662#define elf_backend_size_dynamic_sections \
5663 bfin_size_dynamic_sections
5664#define elf_backend_relocate_section bfin_relocate_section
5665#define elf_backend_finish_dynamic_symbol \
5666 bfin_finish_dynamic_symbol
5667#define elf_backend_finish_dynamic_sections \
5668 bfin_finish_dynamic_sections
5669#define elf_backend_gc_mark_hook bfin_gc_mark_hook
5670#define elf_backend_gc_sweep_hook bfin_gc_sweep_hook
5671#define bfd_elf32_bfd_merge_private_bfd_data \
5672 elf32_bfin_merge_private_bfd_data
5673#define bfd_elf32_bfd_set_private_flags \
5674 elf32_bfin_set_private_flags
5675#define bfd_elf32_bfd_print_private_bfd_data \
5676 elf32_bfin_print_private_bfd_data
781303ce
MF		 5677#define elf_backend_final_write_processing \
5678 elf32_bfin_final_write_processing
0f64bb02 5679#define elf_backend_reloc_type_class elf32_bfin_reloc_type_class
04c3a755 5680#define elf_backend_stack_align 8
0f64bb02 5681#define elf_backend_can_gc_sections 1
b0a0b978 5682#define elf_backend_special_sections elf32_bfin_special_sections
0f64bb02
CM		 5683#define elf_backend_can_refcount 1
5684#define elf_backend_want_got_plt 0
5685#define elf_backend_plt_readonly 1
5686#define elf_backend_want_plt_sym 0
5687#define elf_backend_got_header_size 12
5688#define elf_backend_rela_normal 1
5689
48d502e1
BS		 5690#include "elf32-target.h"
5691
5692#undef TARGET_LITTLE_SYM
6d00b590 5693#define TARGET_LITTLE_SYM bfin_elf32_fdpic_vec
48d502e1
BS		 5694#undef TARGET_LITTLE_NAME
5695#define TARGET_LITTLE_NAME "elf32-bfinfdpic"
5696#undef elf32_bed
5697#define elf32_bed elf32_bfinfdpic_bed
5698
5699#undef elf_backend_gc_sweep_hook
2774f1a6 5700#define elf_backend_gc_sweep_hook bfinfdpic_gc_sweep_hook
48d502e1
BS		 5701
5702#undef elf_backend_got_header_size
5703#define elf_backend_got_header_size 0
5704
5705#undef elf_backend_relocate_section
5706#define elf_backend_relocate_section bfinfdpic_relocate_section
5707#undef elf_backend_check_relocs
5708#define elf_backend_check_relocs bfinfdpic_check_relocs
5709
5710#undef bfd_elf32_bfd_link_hash_table_create
5711#define bfd_elf32_bfd_link_hash_table_create \
5712 bfinfdpic_elf_link_hash_table_create
5713#undef elf_backend_always_size_sections
5714#define elf_backend_always_size_sections \
5715 elf32_bfinfdpic_always_size_sections
48d502e1
BS		 5716
5717#undef elf_backend_create_dynamic_sections
5718#define elf_backend_create_dynamic_sections \
5719 elf32_bfinfdpic_create_dynamic_sections
5720#undef elf_backend_adjust_dynamic_symbol
5721#define elf_backend_adjust_dynamic_symbol \
5722 elf32_bfinfdpic_adjust_dynamic_symbol
5723#undef elf_backend_size_dynamic_sections
5724#define elf_backend_size_dynamic_sections \
5725 elf32_bfinfdpic_size_dynamic_sections
5726#undef elf_backend_finish_dynamic_symbol
5727#define elf_backend_finish_dynamic_symbol \
5728 elf32_bfinfdpic_finish_dynamic_symbol
5729#undef elf_backend_finish_dynamic_sections
5730#define elf_backend_finish_dynamic_sections \
5731 elf32_bfinfdpic_finish_dynamic_sections
5732
6a9adeca
BS		 5733#undef elf_backend_discard_info
5734#define elf_backend_discard_info \
5735 bfinfdpic_elf_discard_info
48d502e1
BS		 5736#undef elf_backend_can_make_relative_eh_frame
5737#define elf_backend_can_make_relative_eh_frame \
5738 bfinfdpic_elf_use_relative_eh_frame
5739#undef elf_backend_can_make_lsda_relative_eh_frame
5740#define elf_backend_can_make_lsda_relative_eh_frame \
5741 bfinfdpic_elf_use_relative_eh_frame
5742#undef elf_backend_encode_eh_address
5743#define elf_backend_encode_eh_address \
5744 bfinfdpic_elf_encode_eh_address
5745
5746#undef elf_backend_may_use_rel_p
5747#define elf_backend_may_use_rel_p 1
5748#undef elf_backend_may_use_rela_p
5749#define elf_backend_may_use_rela_p 1
5750/* We use REL for dynamic relocations only. */
5751#undef elf_backend_default_use_rela_p
5752#define elf_backend_default_use_rela_p 1
5753
5754#undef elf_backend_omit_section_dynsym
5755#define elf_backend_omit_section_dynsym _bfinfdpic_link_omit_section_dynsym
0f64bb02
CM		 5756
5757#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.900935 seconds and 4 git commands to generate.