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