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