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