projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
unrecognized/unsupported reloc message
[deliverable/binutils-gdb.git] / bfd / elf32-microblaze.c
1 /* Xilinx MicroBlaze-specific support for 32-bit ELF
2
3 Copyright (C) 2009-2018 Free Software Foundation, Inc.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the
19 Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
20 Boston, MA 02110-1301, USA. */
21
22
23 int dbg = 0;
24
25 #include "sysdep.h"
26 #include "bfd.h"
27 #include "bfdlink.h"
28 #include "libbfd.h"
29 #include "elf-bfd.h"
30 #include "elf/microblaze.h"
31 #include <assert.h>
32
33 #define USE_RELA /* Only USE_REL is actually significant, but this is
34 here are a reminder... */
35 #define INST_WORD_SIZE 4
36
37 static int ro_small_data_pointer = 0;
38 static int rw_small_data_pointer = 0;
39
40 static reloc_howto_type * microblaze_elf_howto_table [(int) R_MICROBLAZE_max];
41
42 static reloc_howto_type microblaze_elf_howto_raw[] =
43 {
44 /* This reloc does nothing. */
45 HOWTO (R_MICROBLAZE_NONE, /* Type. */
46 0, /* Rightshift. */
47 3, /* Size (0 = byte, 1 = short, 2 = long). */
48 0, /* Bitsize. */
49 FALSE, /* PC_relative. */
50 0, /* Bitpos. */
51 complain_overflow_dont, /* Complain on overflow. */
52 NULL, /* Special Function. */
53 "R_MICROBLAZE_NONE", /* Name. */
54 FALSE, /* Partial Inplace. */
55 0, /* Source Mask. */
56 0, /* Dest Mask. */
57 FALSE), /* PC relative offset? */
58
59 /* A standard 32 bit relocation. */
60 HOWTO (R_MICROBLAZE_32, /* Type. */
61 0, /* Rightshift. */
62 2, /* Size (0 = byte, 1 = short, 2 = long). */
63 32, /* Bitsize. */
64 FALSE, /* PC_relative. */
65 0, /* Bitpos. */
66 complain_overflow_bitfield, /* Complain on overflow. */
67 bfd_elf_generic_reloc,/* Special Function. */
68 "R_MICROBLAZE_32", /* Name. */
69 FALSE, /* Partial Inplace. */
70 0, /* Source Mask. */
71 0xffffffff, /* Dest Mask. */
72 FALSE), /* PC relative offset? */
73
74 /* A standard PCREL 32 bit relocation. */
75 HOWTO (R_MICROBLAZE_32_PCREL,/* Type. */
76 0, /* Rightshift. */
77 2, /* Size (0 = byte, 1 = short, 2 = long). */
78 32, /* Bitsize. */
79 TRUE, /* PC_relative. */
80 0, /* Bitpos. */
81 complain_overflow_bitfield, /* Complain on overflow. */
82 bfd_elf_generic_reloc,/* Special Function. */
83 "R_MICROBLAZE_32_PCREL", /* Name. */
84 TRUE, /* Partial Inplace. */
85 0, /* Source Mask. */
86 0xffffffff, /* Dest Mask. */
87 TRUE), /* PC relative offset? */
88
89 /* A 64 bit PCREL relocation. Table-entry not really used. */
90 HOWTO (R_MICROBLAZE_64_PCREL,/* Type. */
91 0, /* Rightshift. */
92 2, /* Size (0 = byte, 1 = short, 2 = long). */
93 16, /* Bitsize. */
94 TRUE, /* PC_relative. */
95 0, /* Bitpos. */
96 complain_overflow_dont, /* Complain on overflow. */
97 bfd_elf_generic_reloc,/* Special Function. */
98 "R_MICROBLAZE_64_PCREL", /* Name. */
99 FALSE, /* Partial Inplace. */
100 0, /* Source Mask. */
101 0x0000ffff, /* Dest Mask. */
102 TRUE), /* PC relative offset? */
103
104 /* The low half of a PCREL 32 bit relocation. */
105 HOWTO (R_MICROBLAZE_32_PCREL_LO, /* Type. */
106 0, /* Rightshift. */
107 2, /* Size (0 = byte, 1 = short, 2 = long). */
108 16, /* Bitsize. */
109 TRUE, /* PC_relative. */
110 0, /* Bitpos. */
111 complain_overflow_signed, /* Complain on overflow. */
112 bfd_elf_generic_reloc, /* Special Function. */
113 "R_MICROBLAZE_32_PCREL_LO", /* Name. */
114 FALSE, /* Partial Inplace. */
115 0, /* Source Mask. */
116 0x0000ffff, /* Dest Mask. */
117 TRUE), /* PC relative offset? */
118
119 /* A 64 bit relocation. Table entry not really used. */
120 HOWTO (R_MICROBLAZE_64, /* Type. */
121 0, /* Rightshift. */
122 2, /* Size (0 = byte, 1 = short, 2 = long). */
123 16, /* Bitsize. */
124 FALSE, /* PC_relative. */
125 0, /* Bitpos. */
126 complain_overflow_dont, /* Complain on overflow. */
127 bfd_elf_generic_reloc,/* Special Function. */
128 "R_MICROBLAZE_64", /* Name. */
129 FALSE, /* Partial Inplace. */
130 0, /* Source Mask. */
131 0x0000ffff, /* Dest Mask. */
132 FALSE), /* PC relative offset? */
133
134 /* The low half of a 32 bit relocation. */
135 HOWTO (R_MICROBLAZE_32_LO, /* Type. */
136 0, /* Rightshift. */
137 2, /* Size (0 = byte, 1 = short, 2 = long). */
138 16, /* Bitsize. */
139 FALSE, /* PC_relative. */
140 0, /* Bitpos. */
141 complain_overflow_signed, /* Complain on overflow. */
142 bfd_elf_generic_reloc,/* Special Function. */
143 "R_MICROBLAZE_32_LO", /* Name. */
144 FALSE, /* Partial Inplace. */
145 0, /* Source Mask. */
146 0x0000ffff, /* Dest Mask. */
147 FALSE), /* PC relative offset? */
148
149 /* Read-only small data section relocation. */
150 HOWTO (R_MICROBLAZE_SRO32, /* Type. */
151 0, /* Rightshift. */
152 2, /* Size (0 = byte, 1 = short, 2 = long). */
153 16, /* Bitsize. */
154 FALSE, /* PC_relative. */
155 0, /* Bitpos. */
156 complain_overflow_bitfield, /* Complain on overflow. */
157 bfd_elf_generic_reloc,/* Special Function. */
158 "R_MICROBLAZE_SRO32", /* Name. */
159 FALSE, /* Partial Inplace. */
160 0, /* Source Mask. */
161 0x0000ffff, /* Dest Mask. */
162 FALSE), /* PC relative offset? */
163
164 /* Read-write small data area relocation. */
165 HOWTO (R_MICROBLAZE_SRW32, /* Type. */
166 0, /* Rightshift. */
167 2, /* Size (0 = byte, 1 = short, 2 = long). */
168 16, /* Bitsize. */
169 FALSE, /* PC_relative. */
170 0, /* Bitpos. */
171 complain_overflow_bitfield, /* Complain on overflow. */
172 bfd_elf_generic_reloc,/* Special Function. */
173 "R_MICROBLAZE_SRW32", /* Name. */
174 FALSE, /* Partial Inplace. */
175 0, /* Source Mask. */
176 0x0000ffff, /* Dest Mask. */
177 FALSE), /* PC relative offset? */
178
179 /* This reloc does nothing. Used for relaxation. */
180 HOWTO (R_MICROBLAZE_64_NONE, /* Type. */
181 0, /* Rightshift. */
182 3, /* Size (0 = byte, 1 = short, 2 = long). */
183 0, /* Bitsize. */
184 TRUE, /* PC_relative. */
185 0, /* Bitpos. */
186 complain_overflow_dont, /* Complain on overflow. */
187 NULL, /* Special Function. */
188 "R_MICROBLAZE_64_NONE",/* Name. */
189 FALSE, /* Partial Inplace. */
190 0, /* Source Mask. */
191 0, /* Dest Mask. */
192 FALSE), /* PC relative offset? */
193
194 /* Symbol Op Symbol relocation. */
195 HOWTO (R_MICROBLAZE_32_SYM_OP_SYM, /* Type. */
196 0, /* Rightshift. */
197 2, /* Size (0 = byte, 1 = short, 2 = long). */
198 32, /* Bitsize. */
199 FALSE, /* PC_relative. */
200 0, /* Bitpos. */
201 complain_overflow_bitfield, /* Complain on overflow. */
202 bfd_elf_generic_reloc,/* Special Function. */
203 "R_MICROBLAZE_32_SYM_OP_SYM", /* Name. */
204 FALSE, /* Partial Inplace. */
205 0, /* Source Mask. */
206 0xffffffff, /* Dest Mask. */
207 FALSE), /* PC relative offset? */
208
209 /* GNU extension to record C++ vtable hierarchy. */
210 HOWTO (R_MICROBLAZE_GNU_VTINHERIT, /* Type. */
211 0, /* Rightshift. */
212 2, /* Size (0 = byte, 1 = short, 2 = long). */
213 0, /* Bitsize. */
214 FALSE, /* PC_relative. */
215 0, /* Bitpos. */
216 complain_overflow_dont,/* Complain on overflow. */
217 NULL, /* Special Function. */
218 "R_MICROBLAZE_GNU_VTINHERIT", /* Name. */
219 FALSE, /* Partial Inplace. */
220 0, /* Source Mask. */
221 0, /* Dest Mask. */
222 FALSE), /* PC relative offset? */
223
224 /* GNU extension to record C++ vtable member usage. */
225 HOWTO (R_MICROBLAZE_GNU_VTENTRY, /* Type. */
226 0, /* Rightshift. */
227 2, /* Size (0 = byte, 1 = short, 2 = long). */
228 0, /* Bitsize. */
229 FALSE, /* PC_relative. */
230 0, /* Bitpos. */
231 complain_overflow_dont,/* Complain on overflow. */
232 _bfd_elf_rel_vtable_reloc_fn, /* Special Function. */
233 "R_MICROBLAZE_GNU_VTENTRY", /* Name. */
234 FALSE, /* Partial Inplace. */
235 0, /* Source Mask. */
236 0, /* Dest Mask. */
237 FALSE), /* PC relative offset? */
238
239 /* A 64 bit GOTPC relocation. Table-entry not really used. */
240 HOWTO (R_MICROBLAZE_GOTPC_64, /* Type. */
241 0, /* Rightshift. */
242 2, /* Size (0 = byte, 1 = short, 2 = long). */
243 16, /* Bitsize. */
244 TRUE, /* PC_relative. */
245 0, /* Bitpos. */
246 complain_overflow_dont, /* Complain on overflow. */
247 bfd_elf_generic_reloc, /* Special Function. */
248 "R_MICROBLAZE_GOTPC_64", /* Name. */
249 FALSE, /* Partial Inplace. */
250 0, /* Source Mask. */
251 0x0000ffff, /* Dest Mask. */
252 TRUE), /* PC relative offset? */
253
254 /* A 64 bit GOT relocation. Table-entry not really used. */
255 HOWTO (R_MICROBLAZE_GOT_64, /* Type. */
256 0, /* Rightshift. */
257 2, /* Size (0 = byte, 1 = short, 2 = long). */
258 16, /* Bitsize. */
259 FALSE, /* PC_relative. */
260 0, /* Bitpos. */
261 complain_overflow_dont, /* Complain on overflow. */
262 bfd_elf_generic_reloc,/* Special Function. */
263 "R_MICROBLAZE_GOT_64",/* Name. */
264 FALSE, /* Partial Inplace. */
265 0, /* Source Mask. */
266 0x0000ffff, /* Dest Mask. */
267 FALSE), /* PC relative offset? */
268
269 /* A 64 bit PLT relocation. Table-entry not really used. */
270 HOWTO (R_MICROBLAZE_PLT_64, /* Type. */
271 0, /* Rightshift. */
272 2, /* Size (0 = byte, 1 = short, 2 = long). */
273 16, /* Bitsize. */
274 TRUE, /* PC_relative. */
275 0, /* Bitpos. */
276 complain_overflow_dont, /* Complain on overflow. */
277 bfd_elf_generic_reloc,/* Special Function. */
278 "R_MICROBLAZE_PLT_64",/* Name. */
279 FALSE, /* Partial Inplace. */
280 0, /* Source Mask. */
281 0x0000ffff, /* Dest Mask. */
282 TRUE), /* PC relative offset? */
283
284 /* Table-entry not really used. */
285 HOWTO (R_MICROBLAZE_REL, /* Type. */
286 0, /* Rightshift. */
287 2, /* Size (0 = byte, 1 = short, 2 = long). */
288 16, /* Bitsize. */
289 TRUE, /* PC_relative. */
290 0, /* Bitpos. */
291 complain_overflow_dont, /* Complain on overflow. */
292 bfd_elf_generic_reloc,/* Special Function. */
293 "R_MICROBLAZE_REL", /* Name. */
294 FALSE, /* Partial Inplace. */
295 0, /* Source Mask. */
296 0x0000ffff, /* Dest Mask. */
297 TRUE), /* PC relative offset? */
298
299 /* Table-entry not really used. */
300 HOWTO (R_MICROBLAZE_JUMP_SLOT,/* Type. */
301 0, /* Rightshift. */
302 2, /* Size (0 = byte, 1 = short, 2 = long). */
303 16, /* Bitsize. */
304 TRUE, /* PC_relative. */
305 0, /* Bitpos. */
306 complain_overflow_dont, /* Complain on overflow. */
307 bfd_elf_generic_reloc,/* Special Function. */
308 "R_MICROBLAZE_JUMP_SLOT", /* Name. */
309 FALSE, /* Partial Inplace. */
310 0, /* Source Mask. */
311 0x0000ffff, /* Dest Mask. */
312 TRUE), /* PC relative offset? */
313
314 /* Table-entry not really used. */
315 HOWTO (R_MICROBLAZE_GLOB_DAT,/* Type. */
316 0, /* Rightshift. */
317 2, /* Size (0 = byte, 1 = short, 2 = long). */
318 16, /* Bitsize. */
319 TRUE, /* PC_relative. */
320 0, /* Bitpos. */
321 complain_overflow_dont, /* Complain on overflow. */
322 bfd_elf_generic_reloc,/* Special Function. */
323 "R_MICROBLAZE_GLOB_DAT", /* Name. */
324 FALSE, /* Partial Inplace. */
325 0, /* Source Mask. */
326 0x0000ffff, /* Dest Mask. */
327 TRUE), /* PC relative offset? */
328
329 /* A 64 bit GOT relative relocation. Table-entry not really used. */
330 HOWTO (R_MICROBLAZE_GOTOFF_64, /* Type. */
331 0, /* Rightshift. */
332 2, /* Size (0 = byte, 1 = short, 2 = long). */
333 16, /* Bitsize. */
334 FALSE, /* PC_relative. */
335 0, /* Bitpos. */
336 complain_overflow_dont, /* Complain on overflow. */
337 bfd_elf_generic_reloc,/* Special Function. */
338 "R_MICROBLAZE_GOTOFF_64", /* Name. */
339 FALSE, /* Partial Inplace. */
340 0, /* Source Mask. */
341 0x0000ffff, /* Dest Mask. */
342 FALSE), /* PC relative offset? */
343
344 /* A 32 bit GOT relative relocation. Table-entry not really used. */
345 HOWTO (R_MICROBLAZE_GOTOFF_32, /* Type. */
346 0, /* Rightshift. */
347 2, /* Size (0 = byte, 1 = short, 2 = long). */
348 16, /* Bitsize. */
349 FALSE, /* PC_relative. */
350 0, /* Bitpos. */
351 complain_overflow_dont, /* Complain on overflow. */
352 bfd_elf_generic_reloc, /* Special Function. */
353 "R_MICROBLAZE_GOTOFF_32", /* Name. */
354 FALSE, /* Partial Inplace. */
355 0, /* Source Mask. */
356 0x0000ffff, /* Dest Mask. */
357 FALSE), /* PC relative offset? */
358
359 /* COPY relocation. Table-entry not really used. */
360 HOWTO (R_MICROBLAZE_COPY, /* Type. */
361 0, /* Rightshift. */
362 2, /* Size (0 = byte, 1 = short, 2 = long). */
363 16, /* Bitsize. */
364 FALSE, /* PC_relative. */
365 0, /* Bitpos. */
366 complain_overflow_dont, /* Complain on overflow. */
367 bfd_elf_generic_reloc,/* Special Function. */
368 "R_MICROBLAZE_COPY", /* Name. */
369 FALSE, /* Partial Inplace. */
370 0, /* Source Mask. */
371 0x0000ffff, /* Dest Mask. */
372 FALSE), /* PC relative offset? */
373
374 /* Marker relocs for TLS. */
375 HOWTO (R_MICROBLAZE_TLS,
376 0, /* rightshift */
377 2, /* size (0 = byte, 1 = short, 2 = long) */
378 32, /* bitsize */
379 FALSE, /* pc_relative */
380 0, /* bitpos */
381 complain_overflow_dont, /* complain_on_overflow */
382 bfd_elf_generic_reloc, /* special_function */
383 "R_MICROBLAZE_TLS", /* name */
384 FALSE, /* partial_inplace */
385 0, /* src_mask */
386 0x0000ffff, /* dst_mask */
387 FALSE), /* pcrel_offset */
388
389 HOWTO (R_MICROBLAZE_TLSGD,
390 0, /* rightshift */
391 2, /* size (0 = byte, 1 = short, 2 = long) */
392 32, /* bitsize */
393 FALSE, /* pc_relative */
394 0, /* bitpos */
395 complain_overflow_dont, /* complain_on_overflow */
396 bfd_elf_generic_reloc, /* special_function */
397 "R_MICROBLAZE_TLSGD", /* name */
398 FALSE, /* partial_inplace */
399 0, /* src_mask */
400 0x0000ffff, /* dst_mask */
401 FALSE), /* pcrel_offset */
402
403 HOWTO (R_MICROBLAZE_TLSLD,
404 0, /* rightshift */
405 2, /* size (0 = byte, 1 = short, 2 = long) */
406 32, /* bitsize */
407 FALSE, /* pc_relative */
408 0, /* bitpos */
409 complain_overflow_dont, /* complain_on_overflow */
410 bfd_elf_generic_reloc, /* special_function */
411 "R_MICROBLAZE_TLSLD", /* name */
412 FALSE, /* partial_inplace */
413 0, /* src_mask */
414 0x0000ffff, /* dst_mask */
415 FALSE), /* pcrel_offset */
416
417 /* Computes the load module index of the load module that contains the
418 definition of its TLS sym. */
419 HOWTO (R_MICROBLAZE_TLSDTPMOD32,
420 0, /* rightshift */
421 2, /* size (0 = byte, 1 = short, 2 = long) */
422 32, /* bitsize */
423 FALSE, /* pc_relative */
424 0, /* bitpos */
425 complain_overflow_dont, /* complain_on_overflow */
426 bfd_elf_generic_reloc, /* special_function */
427 "R_MICROBLAZE_TLSDTPMOD32", /* name */
428 FALSE, /* partial_inplace */
429 0, /* src_mask */
430 0x0000ffff, /* dst_mask */
431 FALSE), /* pcrel_offset */
432
433 /* Computes a dtv-relative displacement, the difference between the value
434 of sym+add and the base address of the thread-local storage block that
435 contains the definition of sym, minus 0x8000. Used for initializing GOT */
436 HOWTO (R_MICROBLAZE_TLSDTPREL32,
437 0, /* rightshift */
438 2, /* size (0 = byte, 1 = short, 2 = long) */
439 32, /* bitsize */
440 FALSE, /* pc_relative */
441 0, /* bitpos */
442 complain_overflow_dont, /* complain_on_overflow */
443 bfd_elf_generic_reloc, /* special_function */
444 "R_MICROBLAZE_TLSDTPREL32", /* name */
445 FALSE, /* partial_inplace */
446 0, /* src_mask */
447 0x0000ffff, /* dst_mask */
448 FALSE), /* pcrel_offset */
449
450 /* Computes a dtv-relative displacement, the difference between the value
451 of sym+add and the base address of the thread-local storage block that
452 contains the definition of sym, minus 0x8000. */
453 HOWTO (R_MICROBLAZE_TLSDTPREL64,
454 0, /* rightshift */
455 2, /* size (0 = byte, 1 = short, 2 = long) */
456 32, /* bitsize */
457 FALSE, /* pc_relative */
458 0, /* bitpos */
459 complain_overflow_dont, /* complain_on_overflow */
460 bfd_elf_generic_reloc, /* special_function */
461 "R_MICROBLAZE_TLSDTPREL64", /* name */
462 FALSE, /* partial_inplace */
463 0, /* src_mask */
464 0x0000ffff, /* dst_mask */
465 FALSE), /* pcrel_offset */
466
467 /* Computes a tp-relative displacement, the difference between the value of
468 sym+add and the value of the thread pointer (r13). */
469 HOWTO (R_MICROBLAZE_TLSGOTTPREL32,
470 0, /* rightshift */
471 2, /* size (0 = byte, 1 = short, 2 = long) */
472 32, /* bitsize */
473 FALSE, /* pc_relative */
474 0, /* bitpos */
475 complain_overflow_dont, /* complain_on_overflow */
476 bfd_elf_generic_reloc, /* special_function */
477 "R_MICROBLAZE_TLSGOTTPREL32", /* name */
478 FALSE, /* partial_inplace */
479 0, /* src_mask */
480 0x0000ffff, /* dst_mask */
481 FALSE), /* pcrel_offset */
482
483 /* Computes a tp-relative displacement, the difference between the value of
484 sym+add and the value of the thread pointer (r13). */
485 HOWTO (R_MICROBLAZE_TLSTPREL32,
486 0, /* rightshift */
487 2, /* size (0 = byte, 1 = short, 2 = long) */
488 32, /* bitsize */
489 FALSE, /* pc_relative */
490 0, /* bitpos */
491 complain_overflow_dont, /* complain_on_overflow */
492 bfd_elf_generic_reloc, /* special_function */
493 "R_MICROBLAZE_TLSTPREL32", /* name */
494 FALSE, /* partial_inplace */
495 0, /* src_mask */
496 0x0000ffff, /* dst_mask */
497 FALSE), /* pcrel_offset */
498
499 };
500
501 #ifndef NUM_ELEM
502 #define NUM_ELEM(a) (sizeof (a) / sizeof (a)[0])
503 #endif
504 \f
505 /* Initialize the microblaze_elf_howto_table, so that linear accesses can be done. */
506
507 static void
508 microblaze_elf_howto_init (void)
509 {
510 unsigned int i;
511
512 for (i = NUM_ELEM (microblaze_elf_howto_raw); i--;)
513 {
514 unsigned int type;
515
516 type = microblaze_elf_howto_raw[i].type;
517
518 BFD_ASSERT (type < NUM_ELEM (microblaze_elf_howto_table));
519
520 microblaze_elf_howto_table [type] = & microblaze_elf_howto_raw [i];
521 }
522 }
523 \f
524 static reloc_howto_type *
525 microblaze_elf_reloc_type_lookup (bfd * abfd ATTRIBUTE_UNUSED,
526 bfd_reloc_code_real_type code)
527 {
528 enum elf_microblaze_reloc_type microblaze_reloc = R_MICROBLAZE_NONE;
529
530 switch (code)
531 {
532 case BFD_RELOC_NONE:
533 microblaze_reloc = R_MICROBLAZE_NONE;
534 break;
535 case BFD_RELOC_MICROBLAZE_64_NONE:
536 microblaze_reloc = R_MICROBLAZE_64_NONE;
537 break;
538 case BFD_RELOC_32:
539 microblaze_reloc = R_MICROBLAZE_32;
540 break;
541 /* RVA is treated the same as 32 */
542 case BFD_RELOC_RVA:
543 microblaze_reloc = R_MICROBLAZE_32;
544 break;
545 case BFD_RELOC_32_PCREL:
546 microblaze_reloc = R_MICROBLAZE_32_PCREL;
547 break;
548 case BFD_RELOC_64_PCREL:
549 microblaze_reloc = R_MICROBLAZE_64_PCREL;
550 break;
551 case BFD_RELOC_MICROBLAZE_32_LO_PCREL:
552 microblaze_reloc = R_MICROBLAZE_32_PCREL_LO;
553 break;
554 case BFD_RELOC_64:
555 microblaze_reloc = R_MICROBLAZE_64;
556 break;
557 case BFD_RELOC_MICROBLAZE_32_LO:
558 microblaze_reloc = R_MICROBLAZE_32_LO;
559 break;
560 case BFD_RELOC_MICROBLAZE_32_ROSDA:
561 microblaze_reloc = R_MICROBLAZE_SRO32;
562 break;
563 case BFD_RELOC_MICROBLAZE_32_RWSDA:
564 microblaze_reloc = R_MICROBLAZE_SRW32;
565 break;
566 case BFD_RELOC_MICROBLAZE_32_SYM_OP_SYM:
567 microblaze_reloc = R_MICROBLAZE_32_SYM_OP_SYM;
568 break;
569 case BFD_RELOC_VTABLE_INHERIT:
570 microblaze_reloc = R_MICROBLAZE_GNU_VTINHERIT;
571 break;
572 case BFD_RELOC_VTABLE_ENTRY:
573 microblaze_reloc = R_MICROBLAZE_GNU_VTENTRY;
574 break;
575 case BFD_RELOC_MICROBLAZE_64_GOTPC:
576 microblaze_reloc = R_MICROBLAZE_GOTPC_64;
577 break;
578 case BFD_RELOC_MICROBLAZE_64_GOT:
579 microblaze_reloc = R_MICROBLAZE_GOT_64;
580 break;
581 case BFD_RELOC_MICROBLAZE_64_PLT:
582 microblaze_reloc = R_MICROBLAZE_PLT_64;
583 break;
584 case BFD_RELOC_MICROBLAZE_64_GOTOFF:
585 microblaze_reloc = R_MICROBLAZE_GOTOFF_64;
586 break;
587 case BFD_RELOC_MICROBLAZE_32_GOTOFF:
588 microblaze_reloc = R_MICROBLAZE_GOTOFF_32;
589 break;
590 case BFD_RELOC_MICROBLAZE_64_TLSGD:
591 microblaze_reloc = R_MICROBLAZE_TLSGD;
592 break;
593 case BFD_RELOC_MICROBLAZE_64_TLSLD:
594 microblaze_reloc = R_MICROBLAZE_TLSLD;
595 break;
596 case BFD_RELOC_MICROBLAZE_32_TLSDTPREL:
597 microblaze_reloc = R_MICROBLAZE_TLSDTPREL32;
598 break;
599 case BFD_RELOC_MICROBLAZE_64_TLSDTPREL:
600 microblaze_reloc = R_MICROBLAZE_TLSDTPREL64;
601 break;
602 case BFD_RELOC_MICROBLAZE_32_TLSDTPMOD:
603 microblaze_reloc = R_MICROBLAZE_TLSDTPMOD32;
604 break;
605 case BFD_RELOC_MICROBLAZE_64_TLSGOTTPREL:
606 microblaze_reloc = R_MICROBLAZE_TLSGOTTPREL32;
607 break;
608 case BFD_RELOC_MICROBLAZE_64_TLSTPREL:
609 microblaze_reloc = R_MICROBLAZE_TLSTPREL32;
610 break;
611 case BFD_RELOC_MICROBLAZE_COPY:
612 microblaze_reloc = R_MICROBLAZE_COPY;
613 break;
614 default:
615 return (reloc_howto_type *) NULL;
616 }
617
618 if (!microblaze_elf_howto_table [R_MICROBLAZE_32])
619 /* Initialize howto table if needed. */
620 microblaze_elf_howto_init ();
621
622 return microblaze_elf_howto_table [(int) microblaze_reloc];
623 };
624
625 static reloc_howto_type *
626 microblaze_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
627 const char *r_name)
628 {
629 unsigned int i;
630
631 for (i = 0; i < NUM_ELEM (microblaze_elf_howto_raw); i++)
632 if (microblaze_elf_howto_raw[i].name != NULL
633 && strcasecmp (microblaze_elf_howto_raw[i].name, r_name) == 0)
634 return &microblaze_elf_howto_raw[i];
635
636 return NULL;
637 }
638
639 /* Set the howto pointer for a RCE ELF reloc. */
640
641 static void
642 microblaze_elf_info_to_howto (bfd * abfd,
643 arelent * cache_ptr,
644 Elf_Internal_Rela * dst)
645 {
646 unsigned int r_type;
647
648 if (!microblaze_elf_howto_table [R_MICROBLAZE_32])
649 /* Initialize howto table if needed. */
650 microblaze_elf_howto_init ();
651
652 r_type = ELF32_R_TYPE (dst->r_info);
653 if (r_type >= R_MICROBLAZE_max)
654 {
655 /* xgettext:c-format */
656 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
657 abfd, r_type);
658 bfd_set_error (bfd_error_bad_value);
659 r_type = R_MICROBLAZE_NONE;
660 }
661
662 cache_ptr->howto = microblaze_elf_howto_table [r_type];
663 }
664
665 /* Microblaze ELF local labels start with 'L.' or '$L', not '.L'. */
666
667 static bfd_boolean
668 microblaze_elf_is_local_label_name (bfd *abfd, const char *name)
669 {
670 if (name[0] == 'L' && name[1] == '.')
671 return TRUE;
672
673 if (name[0] == '$' && name[1] == 'L')
674 return TRUE;
675
676 /* With gcc, the labels go back to starting with '.', so we accept
677 the generic ELF local label syntax as well. */
678 return _bfd_elf_is_local_label_name (abfd, name);
679 }
680
681 /* ELF linker hash entry. */
682
683 struct elf32_mb_link_hash_entry
684 {
685 struct elf_link_hash_entry elf;
686
687 /* Track dynamic relocs copied for this symbol. */
688 struct elf_dyn_relocs *dyn_relocs;
689
690 /* TLS Reference Types for the symbol; Updated by check_relocs */
691 #define TLS_GD 1 /* GD reloc. */
692 #define TLS_LD 2 /* LD reloc. */
693 #define TLS_TPREL 4 /* TPREL reloc, => IE. */
694 #define TLS_DTPREL 8 /* DTPREL reloc, => LD. */
695 #define TLS_TLS 16 /* Any TLS reloc. */
696 unsigned char tls_mask;
697
698 };
699
700 #define IS_TLS_GD(x) (x == (TLS_TLS | TLS_GD))
701 #define IS_TLS_LD(x) (x == (TLS_TLS | TLS_LD))
702 #define IS_TLS_DTPREL(x) (x == (TLS_TLS | TLS_DTPREL))
703 #define IS_TLS_NONE(x) (x == 0)
704
705 #define elf32_mb_hash_entry(ent) ((struct elf32_mb_link_hash_entry *)(ent))
706
707 /* ELF linker hash table. */
708
709 struct elf32_mb_link_hash_table
710 {
711 struct elf_link_hash_table elf;
712
713 /* Small local sym to section mapping cache. */
714 struct sym_cache sym_sec;
715
716 /* TLS Local Dynamic GOT Entry */
717 union {
718 bfd_signed_vma refcount;
719 bfd_vma offset;
720 } tlsld_got;
721 };
722
723 /* Nonzero if this section has TLS related relocations. */
724 #define has_tls_reloc sec_flg0
725
726 /* Get the ELF linker hash table from a link_info structure. */
727
728 #define elf32_mb_hash_table(p) \
729 (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
730 == MICROBLAZE_ELF_DATA ? ((struct elf32_mb_link_hash_table *) ((p)->hash)) : NULL)
731
732 /* Create an entry in a microblaze ELF linker hash table. */
733
734 static struct bfd_hash_entry *
735 link_hash_newfunc (struct bfd_hash_entry *entry,
736 struct bfd_hash_table *table,
737 const char *string)
738 {
739 /* Allocate the structure if it has not already been allocated by a
740 subclass. */
741 if (entry == NULL)
742 {
743 entry = bfd_hash_allocate (table,
744 sizeof (struct elf32_mb_link_hash_entry));
745 if (entry == NULL)
746 return entry;
747 }
748
749 /* Call the allocation method of the superclass. */
750 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
751 if (entry != NULL)
752 {
753 struct elf32_mb_link_hash_entry *eh;
754
755 eh = (struct elf32_mb_link_hash_entry *) entry;
756 eh->dyn_relocs = NULL;
757 eh->tls_mask = 0;
758 }
759
760 return entry;
761 }
762
763 /* Create a mb ELF linker hash table. */
764
765 static struct bfd_link_hash_table *
766 microblaze_elf_link_hash_table_create (bfd *abfd)
767 {
768 struct elf32_mb_link_hash_table *ret;
769 bfd_size_type amt = sizeof (struct elf32_mb_link_hash_table);
770
771 ret = (struct elf32_mb_link_hash_table *) bfd_zmalloc (amt);
772 if (ret == NULL)
773 return NULL;
774
775 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc,
776 sizeof (struct elf32_mb_link_hash_entry),
777 MICROBLAZE_ELF_DATA))
778 {
779 free (ret);
780 return NULL;
781 }
782
783 return &ret->elf.root;
784 }
785 \f
786 /* Set the values of the small data pointers. */
787
788 static void
789 microblaze_elf_final_sdp (struct bfd_link_info *info)
790 {
791 struct bfd_link_hash_entry *h;
792
793 h = bfd_link_hash_lookup (info->hash, RO_SDA_ANCHOR_NAME, FALSE, FALSE, TRUE);
794 if (h != (struct bfd_link_hash_entry *) NULL
795 && h->type == bfd_link_hash_defined)
796 ro_small_data_pointer = (h->u.def.value
797 + h->u.def.section->output_section->vma
798 + h->u.def.section->output_offset);
799
800 h = bfd_link_hash_lookup (info->hash, RW_SDA_ANCHOR_NAME, FALSE, FALSE, TRUE);
801 if (h != (struct bfd_link_hash_entry *) NULL
802 && h->type == bfd_link_hash_defined)
803 rw_small_data_pointer = (h->u.def.value
804 + h->u.def.section->output_section->vma
805 + h->u.def.section->output_offset);
806 }
807
808 static bfd_vma
809 dtprel_base (struct bfd_link_info *info)
810 {
811 /* If tls_sec is NULL, we should have signalled an error already. */
812 if (elf_hash_table (info)->tls_sec == NULL)
813 return 0;
814 return elf_hash_table (info)->tls_sec->vma;
815 }
816
817 /* The size of the thread control block. */
818 #define TCB_SIZE 8
819
820 /* Output a simple dynamic relocation into SRELOC. */
821
822 static void
823 microblaze_elf_output_dynamic_relocation (bfd *output_bfd,
824 asection *sreloc,
825 unsigned long reloc_index,
826 unsigned long indx,
827 int r_type,
828 bfd_vma offset,
829 bfd_vma addend)
830 {
831
832 Elf_Internal_Rela rel;
833
834 rel.r_info = ELF32_R_INFO (indx, r_type);
835 rel.r_offset = offset;
836 rel.r_addend = addend;
837
838 bfd_elf32_swap_reloca_out (output_bfd, &rel,
839 (sreloc->contents + reloc_index * sizeof (Elf32_External_Rela)));
840 }
841
842 /* This code is taken from elf32-m32r.c
843 There is some attempt to make this function usable for many architectures,
844 both USE_REL and USE_RELA ['twould be nice if such a critter existed],
845 if only to serve as a learning tool.
846
847 The RELOCATE_SECTION function is called by the new ELF backend linker
848 to handle the relocations for a section.
849
850 The relocs are always passed as Rela structures; if the section
851 actually uses Rel structures, the r_addend field will always be
852 zero.
853
854 This function is responsible for adjust the section contents as
855 necessary, and (if using Rela relocs and generating a
856 relocatable output file) adjusting the reloc addend as
857 necessary.
858
859 This function does not have to worry about setting the reloc
860 address or the reloc symbol index.
861
862 LOCAL_SYMS is a pointer to the swapped in local symbols.
863
864 LOCAL_SECTIONS is an array giving the section in the input file
865 corresponding to the st_shndx field of each local symbol.
866
867 The global hash table entry for the global symbols can be found
868 via elf_sym_hashes (input_bfd).
869
870 When generating relocatable output, this function must handle
871 STB_LOCAL/STT_SECTION symbols specially. The output symbol is
872 going to be the section symbol corresponding to the output
873 section, which means that the addend must be adjusted
874 accordingly. */
875
876 static bfd_boolean
877 microblaze_elf_relocate_section (bfd *output_bfd,
878 struct bfd_link_info *info,
879 bfd *input_bfd,
880 asection *input_section,
881 bfd_byte *contents,
882 Elf_Internal_Rela *relocs,
883 Elf_Internal_Sym *local_syms,
884 asection **local_sections)
885 {
886 struct elf32_mb_link_hash_table *htab;
887 Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
888 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
889 Elf_Internal_Rela *rel, *relend;
890 int endian = (bfd_little_endian (output_bfd)) ? 0 : 2;
891 /* Assume success. */
892 bfd_boolean ret = TRUE;
893 asection *sreloc;
894 bfd_vma *local_got_offsets;
895 unsigned int tls_type;
896
897 if (!microblaze_elf_howto_table[R_MICROBLAZE_max-1])
898 microblaze_elf_howto_init ();
899
900 htab = elf32_mb_hash_table (info);
901 if (htab == NULL)
902 return FALSE;
903
904 local_got_offsets = elf_local_got_offsets (input_bfd);
905
906 sreloc = elf_section_data (input_section)->sreloc;
907
908 rel = relocs;
909 relend = relocs + input_section->reloc_count;
910 for (; rel < relend; rel++)
911 {
912 int r_type;
913 reloc_howto_type *howto;
914 unsigned long r_symndx;
915 bfd_vma addend = rel->r_addend;
916 bfd_vma offset = rel->r_offset;
917 struct elf_link_hash_entry *h;
918 Elf_Internal_Sym *sym;
919 asection *sec;
920 const char *sym_name;
921 bfd_reloc_status_type r = bfd_reloc_ok;
922 const char *errmsg = NULL;
923 bfd_boolean unresolved_reloc = FALSE;
924
925 h = NULL;
926 r_type = ELF32_R_TYPE (rel->r_info);
927 tls_type = 0;
928
929 if (r_type < 0 || r_type >= (int) R_MICROBLAZE_max)
930 {
931 /* xgettext:c-format */
932 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
933 input_bfd, (int) r_type);
934 bfd_set_error (bfd_error_bad_value);
935 ret = FALSE;
936 continue;
937 }
938
939 howto = microblaze_elf_howto_table[r_type];
940 r_symndx = ELF32_R_SYM (rel->r_info);
941
942 if (bfd_link_relocatable (info))
943 {
944 /* This is a relocatable link. We don't have to change
945 anything, unless the reloc is against a section symbol,
946 in which case we have to adjust according to where the
947 section symbol winds up in the output section. */
948 sec = NULL;
949 if (r_symndx >= symtab_hdr->sh_info)
950 /* External symbol. */
951 continue;
952
953 /* Local symbol. */
954 sym = local_syms + r_symndx;
955 sym_name = "<local symbol>";
956 /* STT_SECTION: symbol is associated with a section. */
957 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
958 /* Symbol isn't associated with a section. Nothing to do. */
959 continue;
960
961 sec = local_sections[r_symndx];
962 addend += sec->output_offset + sym->st_value;
963 #ifndef USE_REL
964 /* This can't be done for USE_REL because it doesn't mean anything
965 and elf_link_input_bfd asserts this stays zero. */
966 /* rel->r_addend = addend; */
967 #endif
968
969 #ifndef USE_REL
970 /* Addends are stored with relocs. We're done. */
971 continue;
972 #else /* USE_REL */
973 /* If partial_inplace, we need to store any additional addend
974 back in the section. */
975 if (!howto->partial_inplace)
976 continue;
977 /* ??? Here is a nice place to call a special_function like handler. */
978 r = _bfd_relocate_contents (howto, input_bfd, addend,
979 contents + offset);
980 #endif /* USE_REL */
981 }
982 else
983 {
984 bfd_vma relocation;
985 bfd_boolean resolved_to_zero;
986
987 /* This is a final link. */
988 sym = NULL;
989 sec = NULL;
990 unresolved_reloc = FALSE;
991
992 if (r_symndx < symtab_hdr->sh_info)
993 {
994 /* Local symbol. */
995 sym = local_syms + r_symndx;
996 sec = local_sections[r_symndx];
997 if (sec == 0)
998 continue;
999 sym_name = "<local symbol>";
1000 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1001 /* r_addend may have changed if the reference section was
1002 a merge section. */
1003 addend = rel->r_addend;
1004 }
1005 else
1006 {
1007 /* External symbol. */
1008 bfd_boolean warned ATTRIBUTE_UNUSED;
1009 bfd_boolean ignored ATTRIBUTE_UNUSED;
1010
1011 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1012 r_symndx, symtab_hdr, sym_hashes,
1013 h, sec, relocation,
1014 unresolved_reloc, warned, ignored);
1015 sym_name = h->root.root.string;
1016 }
1017
1018 /* Sanity check the address. */
1019 if (offset > bfd_get_section_limit (input_bfd, input_section))
1020 {
1021 r = bfd_reloc_outofrange;
1022 goto check_reloc;
1023 }
1024
1025 resolved_to_zero = (h != NULL
1026 && UNDEFWEAK_NO_DYNAMIC_RELOC (info, h));
1027
1028 switch ((int) r_type)
1029 {
1030 case (int) R_MICROBLAZE_SRO32 :
1031 {
1032 const char *name;
1033
1034 /* Only relocate if the symbol is defined. */
1035 if (sec)
1036 {
1037 name = bfd_get_section_name (sec->owner, sec);
1038
1039 if (strcmp (name, ".sdata2") == 0
1040 || strcmp (name, ".sbss2") == 0)
1041 {
1042 if (ro_small_data_pointer == 0)
1043 microblaze_elf_final_sdp (info);
1044 if (ro_small_data_pointer == 0)
1045 {
1046 ret = FALSE;
1047 r = bfd_reloc_undefined;
1048 goto check_reloc;
1049 }
1050
1051 /* At this point `relocation' contains the object's
1052 address. */
1053 relocation -= ro_small_data_pointer;
1054 /* Now it contains the offset from _SDA2_BASE_. */
1055 r = _bfd_final_link_relocate (howto, input_bfd,
1056 input_section,
1057 contents, offset,
1058 relocation, addend);
1059 }
1060 else
1061 {
1062 _bfd_error_handler
1063 /* xgettext:c-format */
1064 (_("%pB: The target (%s) of an %s relocation"
1065 " is in the wrong section (%pA)"),
1066 input_bfd,
1067 sym_name,
1068 microblaze_elf_howto_table[(int) r_type]->name,
1069 sec);
1070 /*bfd_set_error (bfd_error_bad_value); ??? why? */
1071 ret = FALSE;
1072 continue;
1073 }
1074 }
1075 }
1076 break;
1077
1078 case (int) R_MICROBLAZE_SRW32 :
1079 {
1080 const char *name;
1081
1082 /* Only relocate if the symbol is defined. */
1083 if (sec)
1084 {
1085 name = bfd_get_section_name (sec->owner, sec);
1086
1087 if (strcmp (name, ".sdata") == 0
1088 || strcmp (name, ".sbss") == 0)
1089 {
1090 if (rw_small_data_pointer == 0)
1091 microblaze_elf_final_sdp (info);
1092 if (rw_small_data_pointer == 0)
1093 {
1094 ret = FALSE;
1095 r = bfd_reloc_undefined;
1096 goto check_reloc;
1097 }
1098
1099 /* At this point `relocation' contains the object's
1100 address. */
1101 relocation -= rw_small_data_pointer;
1102 /* Now it contains the offset from _SDA_BASE_. */
1103 r = _bfd_final_link_relocate (howto, input_bfd,
1104 input_section,
1105 contents, offset,
1106 relocation, addend);
1107 }
1108 else
1109 {
1110 _bfd_error_handler
1111 /* xgettext:c-format */
1112 (_("%pB: The target (%s) of an %s relocation"
1113 " is in the wrong section (%pA)"),
1114 input_bfd,
1115 sym_name,
1116 microblaze_elf_howto_table[(int) r_type]->name,
1117 sec);
1118 /*bfd_set_error (bfd_error_bad_value); ??? why? */
1119 ret = FALSE;
1120 continue;
1121 }
1122 }
1123 }
1124 break;
1125
1126 case (int) R_MICROBLAZE_32_SYM_OP_SYM:
1127 break; /* Do nothing. */
1128
1129 case (int) R_MICROBLAZE_GOTPC_64:
1130 relocation = (htab->elf.sgotplt->output_section->vma
1131 + htab->elf.sgotplt->output_offset);
1132 relocation -= (input_section->output_section->vma
1133 + input_section->output_offset
1134 + offset + INST_WORD_SIZE);
1135 relocation += addend;
1136 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
1137 contents + offset + endian);
1138 bfd_put_16 (input_bfd, relocation & 0xffff,
1139 contents + offset + endian + INST_WORD_SIZE);
1140 break;
1141
1142 case (int) R_MICROBLAZE_PLT_64:
1143 {
1144 bfd_vma immediate;
1145 if (htab->elf.splt != NULL && h != NULL
1146 && h->plt.offset != (bfd_vma) -1)
1147 {
1148 relocation = (htab->elf.splt->output_section->vma
1149 + htab->elf.splt->output_offset
1150 + h->plt.offset);
1151 unresolved_reloc = FALSE;
1152 immediate = relocation - (input_section->output_section->vma
1153 + input_section->output_offset
1154 + offset + INST_WORD_SIZE);
1155 bfd_put_16 (input_bfd, (immediate >> 16) & 0xffff,
1156 contents + offset + endian);
1157 bfd_put_16 (input_bfd, immediate & 0xffff,
1158 contents + offset + endian + INST_WORD_SIZE);
1159 }
1160 else
1161 {
1162 relocation -= (input_section->output_section->vma
1163 + input_section->output_offset
1164 + offset + INST_WORD_SIZE);
1165 immediate = relocation;
1166 bfd_put_16 (input_bfd, (immediate >> 16) & 0xffff,
1167 contents + offset + endian);
1168 bfd_put_16 (input_bfd, immediate & 0xffff,
1169 contents + offset + endian + INST_WORD_SIZE);
1170 }
1171 break;
1172 }
1173
1174 case (int) R_MICROBLAZE_TLSGD:
1175 tls_type = (TLS_TLS | TLS_GD);
1176 goto dogot;
1177 case (int) R_MICROBLAZE_TLSLD:
1178 tls_type = (TLS_TLS | TLS_LD);
1179 /* Fall through. */
1180 dogot:
1181 case (int) R_MICROBLAZE_GOT_64:
1182 {
1183 bfd_vma *offp;
1184 bfd_vma off, off2;
1185 unsigned long indx;
1186 bfd_vma static_value;
1187
1188 bfd_boolean need_relocs = FALSE;
1189 if (htab->elf.sgot == NULL)
1190 abort ();
1191
1192 indx = 0;
1193 offp = NULL;
1194
1195 /* 1. Identify GOT Offset;
1196 2. Compute Static Values
1197 3. Process Module Id, Process Offset
1198 4. Fixup Relocation with GOT offset value. */
1199
1200 /* 1. Determine GOT Offset to use : TLS_LD, global, local */
1201 if (IS_TLS_LD (tls_type))
1202 offp = &htab->tlsld_got.offset;
1203 else if (h != NULL)
1204 {
1205 if (htab->elf.sgotplt != NULL
1206 && h->got.offset != (bfd_vma) -1)
1207 offp = &h->got.offset;
1208 else
1209 abort ();
1210 }
1211 else
1212 {
1213 if (local_got_offsets == NULL)
1214 abort ();
1215 offp = &local_got_offsets[r_symndx];
1216 }
1217
1218 if (!offp)
1219 abort ();
1220
1221 off = (*offp) & ~1;
1222 off2 = off;
1223
1224 if (IS_TLS_LD(tls_type) || IS_TLS_GD(tls_type))
1225 off2 = off + 4;
1226
1227 /* Symbol index to use for relocs */
1228 if (h != NULL)
1229 {
1230 bfd_boolean dyn =
1231 elf_hash_table (info)->dynamic_sections_created;
1232
1233 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
1234 bfd_link_pic (info),
1235 h)
1236 && (!bfd_link_pic (info)
1237 || !SYMBOL_REFERENCES_LOCAL (info, h)))
1238 indx = h->dynindx;
1239 }
1240
1241 /* Need to generate relocs ? */
1242 if ((bfd_link_pic (info) || indx != 0)
1243 && (h == NULL
1244 || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1245 && !resolved_to_zero)
1246 || h->root.type != bfd_link_hash_undefweak))
1247 need_relocs = TRUE;
1248
1249 /* 2. Compute/Emit Static value of r-expression */
1250 static_value = relocation + addend;
1251
1252 /* 3. Process module-id and offset */
1253 if (! ((*offp) & 1) )
1254 {
1255 bfd_vma got_offset;
1256
1257 got_offset = (htab->elf.sgot->output_section->vma
1258 + htab->elf.sgot->output_offset
1259 + off);
1260
1261 /* Process module-id */
1262 if (IS_TLS_LD(tls_type))
1263 {
1264 if (! bfd_link_pic (info))
1265 bfd_put_32 (output_bfd, 1,
1266 htab->elf.sgot->contents + off);
1267 else
1268 microblaze_elf_output_dynamic_relocation
1269 (output_bfd,
1270 htab->elf.srelgot,
1271 htab->elf.srelgot->reloc_count++,
1272 /* symindex= */ 0, R_MICROBLAZE_TLSDTPMOD32,
1273 got_offset, 0);
1274 }
1275 else if (IS_TLS_GD(tls_type))
1276 {
1277 if (! need_relocs)
1278 bfd_put_32 (output_bfd, 1,
1279 htab->elf.sgot->contents + off);
1280 else
1281 microblaze_elf_output_dynamic_relocation
1282 (output_bfd,
1283 htab->elf.srelgot,
1284 htab->elf.srelgot->reloc_count++,
1285 /* symindex= */ indx, R_MICROBLAZE_TLSDTPMOD32,
1286 got_offset, indx ? 0 : static_value);
1287 }
1288
1289 /* Process Offset */
1290 if (htab->elf.srelgot == NULL)
1291 abort ();
1292
1293 got_offset = (htab->elf.sgot->output_section->vma
1294 + htab->elf.sgot->output_offset
1295 + off2);
1296 if (IS_TLS_LD(tls_type))
1297 {
1298 /* For LD, offset should be 0 */
1299 *offp |= 1;
1300 bfd_put_32 (output_bfd, 0,
1301 htab->elf.sgot->contents + off2);
1302 }
1303 else if (IS_TLS_GD(tls_type))
1304 {
1305 *offp |= 1;
1306 static_value -= dtprel_base(info);
1307 if (need_relocs)
1308 microblaze_elf_output_dynamic_relocation
1309 (output_bfd,
1310 htab->elf.srelgot,
1311 htab->elf.srelgot->reloc_count++,
1312 /* symindex= */ indx, R_MICROBLAZE_TLSDTPREL32,
1313 got_offset, indx ? 0 : static_value);
1314 else
1315 bfd_put_32 (output_bfd, static_value,
1316 htab->elf.sgot->contents + off2);
1317 }
1318 else
1319 {
1320 bfd_put_32 (output_bfd, static_value,
1321 htab->elf.sgot->contents + off2);
1322
1323 /* Relocs for dyn symbols generated by
1324 finish_dynamic_symbols */
1325 if (bfd_link_pic (info) && h == NULL)
1326 {
1327 *offp |= 1;
1328 microblaze_elf_output_dynamic_relocation
1329 (output_bfd,
1330 htab->elf.srelgot,
1331 htab->elf.srelgot->reloc_count++,
1332 /* symindex= */ indx, R_MICROBLAZE_REL,
1333 got_offset, static_value);
1334 }
1335 }
1336 }
1337
1338 /* 4. Fixup Relocation with GOT offset value
1339 Compute relative address of GOT entry for applying
1340 the current relocation */
1341 relocation = htab->elf.sgot->output_section->vma
1342 + htab->elf.sgot->output_offset
1343 + off
1344 - htab->elf.sgotplt->output_section->vma
1345 - htab->elf.sgotplt->output_offset;
1346
1347 /* Apply Current Relocation */
1348 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
1349 contents + offset + endian);
1350 bfd_put_16 (input_bfd, relocation & 0xffff,
1351 contents + offset + endian + INST_WORD_SIZE);
1352
1353 unresolved_reloc = FALSE;
1354 break;
1355 }
1356
1357 case (int) R_MICROBLAZE_GOTOFF_64:
1358 {
1359 bfd_vma immediate;
1360 unsigned short lo, high;
1361 relocation += addend;
1362 relocation -= (htab->elf.sgotplt->output_section->vma
1363 + htab->elf.sgotplt->output_offset);
1364 /* Write this value into correct location. */
1365 immediate = relocation;
1366 lo = immediate & 0x0000ffff;
1367 high = (immediate >> 16) & 0x0000ffff;
1368 bfd_put_16 (input_bfd, high, contents + offset + endian);
1369 bfd_put_16 (input_bfd, lo,
1370 contents + offset + INST_WORD_SIZE + endian);
1371 break;
1372 }
1373
1374 case (int) R_MICROBLAZE_GOTOFF_32:
1375 {
1376 relocation += addend;
1377 relocation -= (htab->elf.sgotplt->output_section->vma
1378 + htab->elf.sgotplt->output_offset);
1379 /* Write this value into correct location. */
1380 bfd_put_32 (input_bfd, relocation, contents + offset);
1381 break;
1382 }
1383
1384 case (int) R_MICROBLAZE_TLSDTPREL64:
1385 relocation += addend;
1386 relocation -= dtprel_base(info);
1387 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
1388 contents + offset + 2);
1389 bfd_put_16 (input_bfd, relocation & 0xffff,
1390 contents + offset + 2 + INST_WORD_SIZE);
1391 break;
1392 case (int) R_MICROBLAZE_64_PCREL :
1393 case (int) R_MICROBLAZE_64:
1394 case (int) R_MICROBLAZE_32:
1395 {
1396 /* r_symndx will be STN_UNDEF (zero) only for relocs against symbols
1397 from removed linkonce sections, or sections discarded by
1398 a linker script. */
1399 if (r_symndx == STN_UNDEF || (input_section->flags & SEC_ALLOC) == 0)
1400 {
1401 relocation += addend;
1402 if (r_type == R_MICROBLAZE_32)
1403 bfd_put_32 (input_bfd, relocation, contents + offset);
1404 else
1405 {
1406 if (r_type == R_MICROBLAZE_64_PCREL)
1407 relocation -= (input_section->output_section->vma
1408 + input_section->output_offset
1409 + offset + INST_WORD_SIZE);
1410 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
1411 contents + offset + endian);
1412 bfd_put_16 (input_bfd, relocation & 0xffff,
1413 contents + offset + endian + INST_WORD_SIZE);
1414 }
1415 break;
1416 }
1417
1418 if ((bfd_link_pic (info)
1419 && (h == NULL
1420 || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
1421 && !resolved_to_zero)
1422 || h->root.type != bfd_link_hash_undefweak)
1423 && (!howto->pc_relative
1424 || (h != NULL
1425 && h->dynindx != -1
1426 && (!info->symbolic
1427 || !h->def_regular))))
1428 || (!bfd_link_pic (info)
1429 && h != NULL
1430 && h->dynindx != -1
1431 && !h->non_got_ref
1432 && ((h->def_dynamic
1433 && !h->def_regular)
1434 || h->root.type == bfd_link_hash_undefweak
1435 || h->root.type == bfd_link_hash_undefined)))
1436 {
1437 Elf_Internal_Rela outrel;
1438 bfd_byte *loc;
1439 bfd_boolean skip;
1440
1441 /* When generating a shared object, these relocations
1442 are copied into the output file to be resolved at run
1443 time. */
1444
1445 BFD_ASSERT (sreloc != NULL);
1446
1447 skip = FALSE;
1448
1449 outrel.r_offset =
1450 _bfd_elf_section_offset (output_bfd, info, input_section,
1451 rel->r_offset);
1452 if (outrel.r_offset == (bfd_vma) -1)
1453 skip = TRUE;
1454 else if (outrel.r_offset == (bfd_vma) -2)
1455 skip = TRUE;
1456 outrel.r_offset += (input_section->output_section->vma
1457 + input_section->output_offset);
1458
1459 if (skip)
1460 memset (&outrel, 0, sizeof outrel);
1461 /* h->dynindx may be -1 if the symbol was marked to
1462 become local. */
1463 else if (h != NULL
1464 && ((! info->symbolic && h->dynindx != -1)
1465 || !h->def_regular))
1466 {
1467 BFD_ASSERT (h->dynindx != -1);
1468 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
1469 outrel.r_addend = addend;
1470 }
1471 else
1472 {
1473 if (r_type == R_MICROBLAZE_32)
1474 {
1475 outrel.r_info = ELF32_R_INFO (0, R_MICROBLAZE_REL);
1476 outrel.r_addend = relocation + addend;
1477 }
1478 else
1479 {
1480 BFD_FAIL ();
1481 _bfd_error_handler
1482 (_("%pB: probably compiled without -fPIC?"),
1483 input_bfd);
1484 bfd_set_error (bfd_error_bad_value);
1485 return FALSE;
1486 }
1487 }
1488
1489 loc = sreloc->contents;
1490 loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
1491 bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
1492 break;
1493 }
1494 else
1495 {
1496 relocation += addend;
1497 if (r_type == R_MICROBLAZE_32)
1498 bfd_put_32 (input_bfd, relocation, contents + offset);
1499 else
1500 {
1501 if (r_type == R_MICROBLAZE_64_PCREL)
1502 relocation -= (input_section->output_section->vma
1503 + input_section->output_offset
1504 + offset + INST_WORD_SIZE);
1505 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
1506 contents + offset + endian);
1507 bfd_put_16 (input_bfd, relocation & 0xffff,
1508 contents + offset + endian + INST_WORD_SIZE);
1509 }
1510 break;
1511 }
1512 }
1513
1514 default :
1515 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
1516 contents, offset,
1517 relocation, addend);
1518 break;
1519 }
1520 }
1521
1522 check_reloc:
1523
1524 if (r != bfd_reloc_ok)
1525 {
1526 /* FIXME: This should be generic enough to go in a utility. */
1527 const char *name;
1528
1529 if (h != NULL)
1530 name = h->root.root.string;
1531 else
1532 {
1533 name = (bfd_elf_string_from_elf_section
1534 (input_bfd, symtab_hdr->sh_link, sym->st_name));
1535 if (name == NULL || *name == '\0')
1536 name = bfd_section_name (input_bfd, sec);
1537 }
1538
1539 if (errmsg != NULL)
1540 goto common_error;
1541
1542 switch (r)
1543 {
1544 case bfd_reloc_overflow:
1545 (*info->callbacks->reloc_overflow)
1546 (info, (h ? &h->root : NULL), name, howto->name,
1547 (bfd_vma) 0, input_bfd, input_section, offset);
1548 break;
1549
1550 case bfd_reloc_undefined:
1551 (*info->callbacks->undefined_symbol)
1552 (info, name, input_bfd, input_section, offset, TRUE);
1553 break;
1554
1555 case bfd_reloc_outofrange:
1556 errmsg = _("internal error: out of range error");
1557 goto common_error;
1558
1559 case bfd_reloc_notsupported:
1560 errmsg = _("internal error: unsupported relocation error");
1561 goto common_error;
1562
1563 case bfd_reloc_dangerous:
1564 errmsg = _("internal error: dangerous error");
1565 goto common_error;
1566
1567 default:
1568 errmsg = _("internal error: unknown error");
1569 /* Fall through. */
1570 common_error:
1571 (*info->callbacks->warning) (info, errmsg, name, input_bfd,
1572 input_section, offset);
1573 break;
1574 }
1575 }
1576 }
1577
1578 return ret;
1579 }
1580 \f
1581 /* Calculate fixup value for reference. */
1582
1583 static int
1584 calc_fixup (bfd_vma start, bfd_vma size, asection *sec)
1585 {
1586 bfd_vma end = start + size;
1587 int i, fixup = 0;
1588
1589 if (sec == NULL || sec->relax == NULL)
1590 return 0;
1591
1592 /* Look for addr in relax table, total fixup value. */
1593 for (i = 0; i < sec->relax_count; i++)
1594 {
1595 if (end <= sec->relax[i].addr)
1596 break;
1597 if ((end != start) && (start > sec->relax[i].addr))
1598 continue;
1599 fixup += sec->relax[i].size;
1600 }
1601 return fixup;
1602 }
1603
1604 /* Read-modify-write into the bfd, an immediate value into appropriate fields of
1605 a 32-bit instruction. */
1606 static void
1607 microblaze_bfd_write_imm_value_32 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val)
1608 {
1609 unsigned long instr = bfd_get_32 (abfd, bfd_addr);
1610 instr &= ~0x0000ffff;
1611 instr |= (val & 0x0000ffff);
1612 bfd_put_32 (abfd, instr, bfd_addr);
1613 }
1614
1615 /* Read-modify-write into the bfd, an immediate value into appropriate fields of
1616 two consecutive 32-bit instructions. */
1617 static void
1618 microblaze_bfd_write_imm_value_64 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val)
1619 {
1620 unsigned long instr_hi;
1621 unsigned long instr_lo;
1622
1623 instr_hi = bfd_get_32 (abfd, bfd_addr);
1624 instr_hi &= ~0x0000ffff;
1625 instr_hi |= ((val >> 16) & 0x0000ffff);
1626 bfd_put_32 (abfd, instr_hi, bfd_addr);
1627
1628 instr_lo = bfd_get_32 (abfd, bfd_addr + INST_WORD_SIZE);
1629 instr_lo &= ~0x0000ffff;
1630 instr_lo |= (val & 0x0000ffff);
1631 bfd_put_32 (abfd, instr_lo, bfd_addr + INST_WORD_SIZE);
1632 }
1633
1634 static bfd_boolean
1635 microblaze_elf_relax_section (bfd *abfd,
1636 asection *sec,
1637 struct bfd_link_info *link_info,
1638 bfd_boolean *again)
1639 {
1640 Elf_Internal_Shdr *symtab_hdr;
1641 Elf_Internal_Rela *internal_relocs;
1642 Elf_Internal_Rela *free_relocs = NULL;
1643 Elf_Internal_Rela *irel, *irelend;
1644 bfd_byte *contents = NULL;
1645 bfd_byte *free_contents = NULL;
1646 int rel_count;
1647 unsigned int shndx;
1648 int i, sym_index;
1649 asection *o;
1650 struct elf_link_hash_entry *sym_hash;
1651 Elf_Internal_Sym *isymbuf, *isymend;
1652 Elf_Internal_Sym *isym;
1653 int symcount;
1654 int offset;
1655 bfd_vma src, dest;
1656
1657 /* We only do this once per section. We may be able to delete some code
1658 by running multiple passes, but it is not worth it. */
1659 *again = FALSE;
1660
1661 /* Only do this for a text section. */
1662 if (bfd_link_relocatable (link_info)
1663 || (sec->flags & SEC_RELOC) == 0
1664 || (sec->reloc_count == 0)
1665 || (sec->flags & SEC_CODE) == 0)
1666 return TRUE;
1667
1668 BFD_ASSERT ((sec->size > 0) || (sec->rawsize > 0));
1669
1670 /* If this is the first time we have been called for this section,
1671 initialize the cooked size. */
1672 if (sec->size == 0)
1673 sec->size = sec->rawsize;
1674
1675 /* Get symbols for this section. */
1676 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1677 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
1678 symcount = symtab_hdr->sh_size / sizeof (Elf32_External_Sym);
1679 if (isymbuf == NULL)
1680 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr, symcount,
1681 0, NULL, NULL, NULL);
1682 BFD_ASSERT (isymbuf != NULL);
1683
1684 internal_relocs = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL, link_info->keep_memory);
1685 if (internal_relocs == NULL)
1686 goto error_return;
1687 if (! link_info->keep_memory)
1688 free_relocs = internal_relocs;
1689
1690 sec->relax = (struct relax_table *) bfd_malloc ((sec->reloc_count + 1)
1691 * sizeof (struct relax_table));
1692 if (sec->relax == NULL)
1693 goto error_return;
1694 sec->relax_count = 0;
1695
1696 irelend = internal_relocs + sec->reloc_count;
1697 rel_count = 0;
1698 for (irel = internal_relocs; irel < irelend; irel++, rel_count++)
1699 {
1700 bfd_vma symval;
1701 if ((ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64_PCREL)
1702 && (ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64 ))
1703 continue; /* Can't delete this reloc. */
1704
1705 /* Get the section contents. */
1706 if (contents == NULL)
1707 {
1708 if (elf_section_data (sec)->this_hdr.contents != NULL)
1709 contents = elf_section_data (sec)->this_hdr.contents;
1710 else
1711 {
1712 contents = (bfd_byte *) bfd_malloc (sec->size);
1713 if (contents == NULL)
1714 goto error_return;
1715 free_contents = contents;
1716
1717 if (!bfd_get_section_contents (abfd, sec, contents,
1718 (file_ptr) 0, sec->size))
1719 goto error_return;
1720 elf_section_data (sec)->this_hdr.contents = contents;
1721 }
1722 }
1723
1724 /* Get the value of the symbol referred to by the reloc. */
1725 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
1726 {
1727 /* A local symbol. */
1728 asection *sym_sec;
1729
1730 isym = isymbuf + ELF32_R_SYM (irel->r_info);
1731 if (isym->st_shndx == SHN_UNDEF)
1732 sym_sec = bfd_und_section_ptr;
1733 else if (isym->st_shndx == SHN_ABS)
1734 sym_sec = bfd_abs_section_ptr;
1735 else if (isym->st_shndx == SHN_COMMON)
1736 sym_sec = bfd_com_section_ptr;
1737 else
1738 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
1739
1740 symval = _bfd_elf_rela_local_sym (abfd, isym, &sym_sec, irel);
1741 }
1742 else
1743 {
1744 unsigned long indx;
1745 struct elf_link_hash_entry *h;
1746
1747 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
1748 h = elf_sym_hashes (abfd)[indx];
1749 BFD_ASSERT (h != NULL);
1750
1751 if (h->root.type != bfd_link_hash_defined
1752 && h->root.type != bfd_link_hash_defweak)
1753 /* This appears to be a reference to an undefined
1754 symbol. Just ignore it--it will be caught by the
1755 regular reloc processing. */
1756 continue;
1757
1758 symval = (h->root.u.def.value
1759 + h->root.u.def.section->output_section->vma
1760 + h->root.u.def.section->output_offset);
1761 }
1762
1763 /* If this is a PC-relative reloc, subtract the instr offset from
1764 the symbol value. */
1765 if (ELF32_R_TYPE (irel->r_info) == (int) R_MICROBLAZE_64_PCREL)
1766 {
1767 symval = symval + irel->r_addend
1768 - (irel->r_offset
1769 + sec->output_section->vma
1770 + sec->output_offset);
1771 }
1772 else
1773 symval += irel->r_addend;
1774
1775 if ((symval & 0xffff8000) == 0
1776 || (symval & 0xffff8000) == 0xffff8000)
1777 {
1778 /* We can delete this instruction. */
1779 sec->relax[sec->relax_count].addr = irel->r_offset;
1780 sec->relax[sec->relax_count].size = INST_WORD_SIZE;
1781 sec->relax_count++;
1782
1783 /* Rewrite relocation type. */
1784 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info))
1785 {
1786 case R_MICROBLAZE_64_PCREL:
1787 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1788 (int) R_MICROBLAZE_32_PCREL_LO);
1789 break;
1790 case R_MICROBLAZE_64:
1791 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1792 (int) R_MICROBLAZE_32_LO);
1793 break;
1794 default:
1795 /* Cannot happen. */
1796 BFD_ASSERT (FALSE);
1797 }
1798 }
1799 } /* Loop through all relocations. */
1800
1801 /* Loop through the relocs again, and see if anything needs to change. */
1802 if (sec->relax_count > 0)
1803 {
1804 shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
1805 rel_count = 0;
1806 sec->relax[sec->relax_count].addr = sec->size;
1807
1808 for (irel = internal_relocs; irel < irelend; irel++, rel_count++)
1809 {
1810 bfd_vma nraddr;
1811
1812 /* Get the new reloc address. */
1813 nraddr = irel->r_offset - calc_fixup (irel->r_offset, 0, sec);
1814 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info))
1815 {
1816 default:
1817 break;
1818 case R_MICROBLAZE_64_PCREL:
1819 break;
1820 case R_MICROBLAZE_64:
1821 case R_MICROBLAZE_32_LO:
1822 /* If this reloc is against a symbol defined in this
1823 section, we must check the addend to see it will put the value in
1824 range to be adjusted, and hence must be changed. */
1825 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
1826 {
1827 isym = isymbuf + ELF32_R_SYM (irel->r_info);
1828 /* Only handle relocs against .text. */
1829 if (isym->st_shndx == shndx
1830 && ELF32_ST_TYPE (isym->st_info) == STT_SECTION)
1831 irel->r_addend -= calc_fixup (irel->r_addend, 0, sec);
1832 }
1833 break;
1834 case R_MICROBLAZE_NONE:
1835 {
1836 /* This was a PC-relative instruction that was
1837 completely resolved. */
1838 int sfix, efix;
1839 bfd_vma target_address;
1840 target_address = irel->r_addend + irel->r_offset;
1841 sfix = calc_fixup (irel->r_offset, 0, sec);
1842 efix = calc_fixup (target_address, 0, sec);
1843 irel->r_addend -= (efix - sfix);
1844 /* Should use HOWTO. */
1845 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset,
1846 irel->r_addend);
1847 }
1848 break;
1849 case R_MICROBLAZE_64_NONE:
1850 {
1851 /* This was a PC-relative 64-bit instruction that was
1852 completely resolved. */
1853 int sfix, efix;
1854 bfd_vma target_address;
1855 target_address = irel->r_addend + irel->r_offset + INST_WORD_SIZE;
1856 sfix = calc_fixup (irel->r_offset + INST_WORD_SIZE, 0, sec);
1857 efix = calc_fixup (target_address, 0, sec);
1858 irel->r_addend -= (efix - sfix);
1859 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset
1860 + INST_WORD_SIZE, irel->r_addend);
1861 }
1862 break;
1863 }
1864 irel->r_offset = nraddr;
1865 } /* Change all relocs in this section. */
1866
1867 /* Look through all other sections. */
1868 for (o = abfd->sections; o != NULL; o = o->next)
1869 {
1870 Elf_Internal_Rela *irelocs;
1871 Elf_Internal_Rela *irelscan, *irelscanend;
1872 bfd_byte *ocontents;
1873
1874 if (o == sec
1875 || (o->flags & SEC_RELOC) == 0
1876 || o->reloc_count == 0)
1877 continue;
1878
1879 /* We always cache the relocs. Perhaps, if info->keep_memory is
1880 FALSE, we should free them, if we are permitted to. */
1881
1882 irelocs = _bfd_elf_link_read_relocs (abfd, o, NULL, NULL, TRUE);
1883 if (irelocs == NULL)
1884 goto error_return;
1885
1886 ocontents = NULL;
1887 irelscanend = irelocs + o->reloc_count;
1888 for (irelscan = irelocs; irelscan < irelscanend; irelscan++)
1889 {
1890 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32)
1891 {
1892 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1893
1894 /* Look at the reloc only if the value has been resolved. */
1895 if (isym->st_shndx == shndx
1896 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
1897 {
1898 if (ocontents == NULL)
1899 {
1900 if (elf_section_data (o)->this_hdr.contents != NULL)
1901 ocontents = elf_section_data (o)->this_hdr.contents;
1902 else
1903 {
1904 /* We always cache the section contents.
1905 Perhaps, if info->keep_memory is FALSE, we
1906 should free them, if we are permitted to. */
1907 if (o->rawsize == 0)
1908 o->rawsize = o->size;
1909 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
1910 if (ocontents == NULL)
1911 goto error_return;
1912 if (!bfd_get_section_contents (abfd, o, ocontents,
1913 (file_ptr) 0,
1914 o->rawsize))
1915 goto error_return;
1916 elf_section_data (o)->this_hdr.contents = ocontents;
1917 }
1918
1919 }
1920 irelscan->r_addend -= calc_fixup (irelscan->r_addend, 0, sec);
1921 }
1922 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_SYM_OP_SYM)
1923 {
1924 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1925
1926 /* Look at the reloc only if the value has been resolved. */
1927 if (ocontents == NULL)
1928 {
1929 if (elf_section_data (o)->this_hdr.contents != NULL)
1930 ocontents = elf_section_data (o)->this_hdr.contents;
1931 else
1932 {
1933 /* We always cache the section contents.
1934 Perhaps, if info->keep_memory is FALSE, we
1935 should free them, if we are permitted to. */
1936
1937 if (o->rawsize == 0)
1938 o->rawsize = o->size;
1939 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
1940 if (ocontents == NULL)
1941 goto error_return;
1942 if (!bfd_get_section_contents (abfd, o, ocontents,
1943 (file_ptr) 0,
1944 o->rawsize))
1945 goto error_return;
1946 elf_section_data (o)->this_hdr.contents = ocontents;
1947 }
1948 }
1949 irelscan->r_addend -= calc_fixup (irel->r_addend
1950 + isym->st_value,
1951 0,
1952 sec);
1953 }
1954 }
1955 else if ((ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_PCREL_LO)
1956 || (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_LO))
1957 {
1958 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1959
1960 /* Look at the reloc only if the value has been resolved. */
1961 if (isym->st_shndx == shndx
1962 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
1963 {
1964 bfd_vma immediate;
1965 bfd_vma target_address;
1966
1967 if (ocontents == NULL)
1968 {
1969 if (elf_section_data (o)->this_hdr.contents != NULL)
1970 ocontents = elf_section_data (o)->this_hdr.contents;
1971 else
1972 {
1973 /* We always cache the section contents.
1974 Perhaps, if info->keep_memory is FALSE, we
1975 should free them, if we are permitted to. */
1976 if (o->rawsize == 0)
1977 o->rawsize = o->size;
1978 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
1979 if (ocontents == NULL)
1980 goto error_return;
1981 if (!bfd_get_section_contents (abfd, o, ocontents,
1982 (file_ptr) 0,
1983 o->rawsize))
1984 goto error_return;
1985 elf_section_data (o)->this_hdr.contents = ocontents;
1986 }
1987 }
1988
1989 unsigned long instr = bfd_get_32 (abfd, ocontents + irelscan->r_offset);
1990 immediate = instr & 0x0000ffff;
1991 target_address = immediate;
1992 offset = calc_fixup (target_address, 0, sec);
1993 immediate -= offset;
1994 irelscan->r_addend -= offset;
1995 microblaze_bfd_write_imm_value_32 (abfd, ocontents + irelscan->r_offset,
1996 irelscan->r_addend);
1997 }
1998 }
1999
2000 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64)
2001 {
2002 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
2003
2004 /* Look at the reloc only if the value has been resolved. */
2005 if (isym->st_shndx == shndx
2006 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
2007 {
2008 bfd_vma immediate;
2009
2010 if (ocontents == NULL)
2011 {
2012 if (elf_section_data (o)->this_hdr.contents != NULL)
2013 ocontents = elf_section_data (o)->this_hdr.contents;
2014 else
2015 {
2016 /* We always cache the section contents.
2017 Perhaps, if info->keep_memory is FALSE, we
2018 should free them, if we are permitted to. */
2019
2020 if (o->rawsize == 0)
2021 o->rawsize = o->size;
2022 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
2023 if (ocontents == NULL)
2024 goto error_return;
2025 if (!bfd_get_section_contents (abfd, o, ocontents,
2026 (file_ptr) 0,
2027 o->rawsize))
2028 goto error_return;
2029 elf_section_data (o)->this_hdr.contents = ocontents;
2030 }
2031 }
2032 unsigned long instr_hi = bfd_get_32 (abfd, ocontents
2033 + irelscan->r_offset);
2034 unsigned long instr_lo = bfd_get_32 (abfd, ocontents
2035 + irelscan->r_offset
2036 + INST_WORD_SIZE);
2037 immediate = (instr_hi & 0x0000ffff) << 16;
2038 immediate |= (instr_lo & 0x0000ffff);
2039 offset = calc_fixup (irelscan->r_addend, 0, sec);
2040 immediate -= offset;
2041 irelscan->r_addend -= offset;
2042 }
2043 }
2044 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64_PCREL)
2045 {
2046 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
2047
2048 /* Look at the reloc only if the value has been resolved. */
2049 if (isym->st_shndx == shndx
2050 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
2051 {
2052 bfd_vma immediate;
2053 bfd_vma target_address;
2054
2055 if (ocontents == NULL)
2056 {
2057 if (elf_section_data (o)->this_hdr.contents != NULL)
2058 ocontents = elf_section_data (o)->this_hdr.contents;
2059 else
2060 {
2061 /* We always cache the section contents.
2062 Perhaps, if info->keep_memory is FALSE, we
2063 should free them, if we are permitted to. */
2064 if (o->rawsize == 0)
2065 o->rawsize = o->size;
2066 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
2067 if (ocontents == NULL)
2068 goto error_return;
2069 if (!bfd_get_section_contents (abfd, o, ocontents,
2070 (file_ptr) 0,
2071 o->rawsize))
2072 goto error_return;
2073 elf_section_data (o)->this_hdr.contents = ocontents;
2074 }
2075 }
2076 unsigned long instr_hi = bfd_get_32 (abfd, ocontents
2077 + irelscan->r_offset);
2078 unsigned long instr_lo = bfd_get_32 (abfd, ocontents
2079 + irelscan->r_offset
2080 + INST_WORD_SIZE);
2081 immediate = (instr_hi & 0x0000ffff) << 16;
2082 immediate |= (instr_lo & 0x0000ffff);
2083 target_address = immediate;
2084 offset = calc_fixup (target_address, 0, sec);
2085 immediate -= offset;
2086 irelscan->r_addend -= offset;
2087 microblaze_bfd_write_imm_value_64 (abfd, ocontents
2088 + irelscan->r_offset, immediate);
2089 }
2090 }
2091 }
2092 }
2093
2094 /* Adjust the local symbols defined in this section. */
2095 isymend = isymbuf + symtab_hdr->sh_info;
2096 for (isym = isymbuf; isym < isymend; isym++)
2097 {
2098 if (isym->st_shndx == shndx)
2099 {
2100 isym->st_value -= calc_fixup (isym->st_value, 0, sec);
2101 if (isym->st_size)
2102 isym->st_size -= calc_fixup (isym->st_value, isym->st_size, sec);
2103 }
2104 }
2105
2106 /* Now adjust the global symbols defined in this section. */
2107 isym = isymbuf + symtab_hdr->sh_info;
2108 symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)) - symtab_hdr->sh_info;
2109 for (sym_index = 0; sym_index < symcount; sym_index++)
2110 {
2111 sym_hash = elf_sym_hashes (abfd)[sym_index];
2112 if ((sym_hash->root.type == bfd_link_hash_defined
2113 || sym_hash->root.type == bfd_link_hash_defweak)
2114 && sym_hash->root.u.def.section == sec)
2115 {
2116 sym_hash->root.u.def.value -= calc_fixup (sym_hash->root.u.def.value,
2117 0, sec);
2118 if (sym_hash->size)
2119 sym_hash->size -= calc_fixup (sym_hash->root.u.def.value,
2120 sym_hash->size, sec);
2121 }
2122 }
2123
2124 /* Physically move the code and change the cooked size. */
2125 dest = sec->relax[0].addr;
2126 for (i = 0; i < sec->relax_count; i++)
2127 {
2128 int len;
2129 src = sec->relax[i].addr + sec->relax[i].size;
2130 len = sec->relax[i+1].addr - sec->relax[i].addr - sec->relax[i].size;
2131
2132 memmove (contents + dest, contents + src, len);
2133 sec->size -= sec->relax[i].size;
2134 dest += len;
2135 }
2136
2137 elf_section_data (sec)->relocs = internal_relocs;
2138 free_relocs = NULL;
2139
2140 elf_section_data (sec)->this_hdr.contents = contents;
2141 free_contents = NULL;
2142
2143 symtab_hdr->contents = (bfd_byte *) isymbuf;
2144 }
2145
2146 if (free_relocs != NULL)
2147 {
2148 free (free_relocs);
2149 free_relocs = NULL;
2150 }
2151
2152 if (free_contents != NULL)
2153 {
2154 if (!link_info->keep_memory)
2155 free (free_contents);
2156 else
2157 /* Cache the section contents for elf_link_input_bfd. */
2158 elf_section_data (sec)->this_hdr.contents = contents;
2159 free_contents = NULL;
2160 }
2161
2162 if (sec->relax_count == 0)
2163 {
2164 *again = FALSE;
2165 free (sec->relax);
2166 sec->relax = NULL;
2167 }
2168 else
2169 *again = TRUE;
2170 return TRUE;
2171
2172 error_return:
2173 if (free_relocs != NULL)
2174 free (free_relocs);
2175 if (free_contents != NULL)
2176 free (free_contents);
2177 if (sec->relax != NULL)
2178 {
2179 free (sec->relax);
2180 sec->relax = NULL;
2181 sec->relax_count = 0;
2182 }
2183 return FALSE;
2184 }
2185
2186 /* Return the section that should be marked against GC for a given
2187 relocation. */
2188
2189 static asection *
2190 microblaze_elf_gc_mark_hook (asection *sec,
2191 struct bfd_link_info * info,
2192 Elf_Internal_Rela * rel,
2193 struct elf_link_hash_entry * h,
2194 Elf_Internal_Sym * sym)
2195 {
2196 if (h != NULL)
2197 switch (ELF32_R_TYPE (rel->r_info))
2198 {
2199 case R_MICROBLAZE_GNU_VTINHERIT:
2200 case R_MICROBLAZE_GNU_VTENTRY:
2201 return NULL;
2202 }
2203
2204 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
2205 }
2206
2207 /* PIC support. */
2208
2209 #define PLT_ENTRY_SIZE 16
2210
2211 #define PLT_ENTRY_WORD_0 0xb0000000 /* "imm 0". */
2212 #define PLT_ENTRY_WORD_1 0xe9940000 /* "lwi r12,r20,0" - relocated to lwi r12,r20,func@GOT. */
2213 #define PLT_ENTRY_WORD_1_NOPIC 0xe9800000 /* "lwi r12,r0,0" - non-PIC object. */
2214 #define PLT_ENTRY_WORD_2 0x98186000 /* "brad r12". */
2215 #define PLT_ENTRY_WORD_3 0x80000000 /* "nop". */
2216
2217 static bfd_boolean
2218 update_local_sym_info (bfd *abfd,
2219 Elf_Internal_Shdr *symtab_hdr,
2220 unsigned long r_symndx,
2221 unsigned int tls_type)
2222 {
2223 bfd_signed_vma *local_got_refcounts = elf_local_got_refcounts (abfd);
2224 unsigned char *local_got_tls_masks;
2225
2226 if (local_got_refcounts == NULL)
2227 {
2228 bfd_size_type size = symtab_hdr->sh_info;
2229
2230 size *= (sizeof (*local_got_refcounts) + sizeof (*local_got_tls_masks));
2231 local_got_refcounts = bfd_zalloc (abfd, size);
2232 if (local_got_refcounts == NULL)
2233 return FALSE;
2234 elf_local_got_refcounts (abfd) = local_got_refcounts;
2235 }
2236
2237 local_got_tls_masks =
2238 (unsigned char *) (local_got_refcounts + symtab_hdr->sh_info);
2239 local_got_tls_masks[r_symndx] |= tls_type;
2240 local_got_refcounts[r_symndx] += 1;
2241
2242 return TRUE;
2243 }
2244 /* Look through the relocs for a section during the first phase. */
2245
2246 static bfd_boolean
2247 microblaze_elf_check_relocs (bfd * abfd,
2248 struct bfd_link_info * info,
2249 asection * sec,
2250 const Elf_Internal_Rela * relocs)
2251 {
2252 Elf_Internal_Shdr * symtab_hdr;
2253 struct elf_link_hash_entry ** sym_hashes;
2254 struct elf_link_hash_entry ** sym_hashes_end;
2255 const Elf_Internal_Rela * rel;
2256 const Elf_Internal_Rela * rel_end;
2257 struct elf32_mb_link_hash_table *htab;
2258 asection *sreloc = NULL;
2259
2260 if (bfd_link_relocatable (info))
2261 return TRUE;
2262
2263 htab = elf32_mb_hash_table (info);
2264 if (htab == NULL)
2265 return FALSE;
2266
2267 symtab_hdr = & elf_tdata (abfd)->symtab_hdr;
2268 sym_hashes = elf_sym_hashes (abfd);
2269 sym_hashes_end = sym_hashes + symtab_hdr->sh_size / sizeof (Elf32_External_Sym);
2270 if (!elf_bad_symtab (abfd))
2271 sym_hashes_end -= symtab_hdr->sh_info;
2272
2273 rel_end = relocs + sec->reloc_count;
2274
2275 for (rel = relocs; rel < rel_end; rel++)
2276 {
2277 unsigned int r_type;
2278 struct elf_link_hash_entry * h;
2279 unsigned long r_symndx;
2280 unsigned char tls_type = 0;
2281
2282 r_symndx = ELF32_R_SYM (rel->r_info);
2283 r_type = ELF32_R_TYPE (rel->r_info);
2284
2285 if (r_symndx < symtab_hdr->sh_info)
2286 h = NULL;
2287 else
2288 {
2289 h = sym_hashes [r_symndx - symtab_hdr->sh_info];
2290 while (h->root.type == bfd_link_hash_indirect
2291 || h->root.type == bfd_link_hash_warning)
2292 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2293 }
2294
2295 switch (r_type)
2296 {
2297 /* This relocation describes the C++ object vtable hierarchy.
2298 Reconstruct it for later use during GC. */
2299 case R_MICROBLAZE_GNU_VTINHERIT:
2300 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2301 return FALSE;
2302 break;
2303
2304 /* This relocation describes which C++ vtable entries are actually
2305 used. Record for later use during GC. */
2306 case R_MICROBLAZE_GNU_VTENTRY:
2307 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2308 return FALSE;
2309 break;
2310
2311 /* This relocation requires .plt entry. */
2312 case R_MICROBLAZE_PLT_64:
2313 if (h != NULL)
2314 {
2315 h->needs_plt = 1;
2316 h->plt.refcount += 1;
2317 }
2318 break;
2319
2320 /* This relocation requires .got entry. */
2321 case R_MICROBLAZE_TLSGD:
2322 tls_type |= (TLS_TLS | TLS_GD);
2323 goto dogottls;
2324 case R_MICROBLAZE_TLSLD:
2325 tls_type |= (TLS_TLS | TLS_LD);
2326 /* Fall through. */
2327 dogottls:
2328 sec->has_tls_reloc = 1;
2329 /* Fall through. */
2330 case R_MICROBLAZE_GOT_64:
2331 if (htab->elf.sgot == NULL)
2332 {
2333 if (htab->elf.dynobj == NULL)
2334 htab->elf.dynobj = abfd;
2335 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
2336 return FALSE;
2337 }
2338 if (h != NULL)
2339 {
2340 h->got.refcount += 1;
2341 elf32_mb_hash_entry (h)->tls_mask |= tls_type;
2342 }
2343 else
2344 {
2345 if (! update_local_sym_info(abfd, symtab_hdr, r_symndx, tls_type) )
2346 return FALSE;
2347 }
2348 break;
2349
2350 case R_MICROBLAZE_GOTOFF_64:
2351 case R_MICROBLAZE_GOTOFF_32:
2352 if (htab->elf.sgot == NULL)
2353 {
2354 if (htab->elf.dynobj == NULL)
2355 htab->elf.dynobj = abfd;
2356 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
2357 return FALSE;
2358 }
2359 break;
2360
2361 case R_MICROBLAZE_64:
2362 case R_MICROBLAZE_64_PCREL:
2363 case R_MICROBLAZE_32:
2364 {
2365 if (h != NULL && !bfd_link_pic (info))
2366 {
2367 /* we may need a copy reloc. */
2368 h->non_got_ref = 1;
2369
2370 /* we may also need a .plt entry. */
2371 h->plt.refcount += 1;
2372 if (ELF32_R_TYPE (rel->r_info) != R_MICROBLAZE_64_PCREL)
2373 h->pointer_equality_needed = 1;
2374 }
2375
2376
2377 /* If we are creating a shared library, and this is a reloc
2378 against a global symbol, or a non PC relative reloc
2379 against a local symbol, then we need to copy the reloc
2380 into the shared library. However, if we are linking with
2381 -Bsymbolic, we do not need to copy a reloc against a
2382 global symbol which is defined in an object we are
2383 including in the link (i.e., DEF_REGULAR is set). At
2384 this point we have not seen all the input files, so it is
2385 possible that DEF_REGULAR is not set now but will be set
2386 later (it is never cleared). In case of a weak definition,
2387 DEF_REGULAR may be cleared later by a strong definition in
2388 a shared library. We account for that possibility below by
2389 storing information in the relocs_copied field of the hash
2390 table entry. A similar situation occurs when creating
2391 shared libraries and symbol visibility changes render the
2392 symbol local.
2393
2394 If on the other hand, we are creating an executable, we
2395 may need to keep relocations for symbols satisfied by a
2396 dynamic library if we manage to avoid copy relocs for the
2397 symbol. */
2398
2399 if ((bfd_link_pic (info)
2400 && (sec->flags & SEC_ALLOC) != 0
2401 && (r_type != R_MICROBLAZE_64_PCREL
2402 || (h != NULL
2403 && (! info->symbolic
2404 || h->root.type == bfd_link_hash_defweak
2405 || !h->def_regular))))
2406 || (!bfd_link_pic (info)
2407 && (sec->flags & SEC_ALLOC) != 0
2408 && h != NULL
2409 && (h->root.type == bfd_link_hash_defweak
2410 || !h->def_regular)))
2411 {
2412 struct elf_dyn_relocs *p;
2413 struct elf_dyn_relocs **head;
2414
2415 /* When creating a shared object, we must copy these
2416 relocs into the output file. We create a reloc
2417 section in dynobj and make room for the reloc. */
2418
2419 if (sreloc == NULL)
2420 {
2421 bfd *dynobj;
2422
2423 if (htab->elf.dynobj == NULL)
2424 htab->elf.dynobj = abfd;
2425 dynobj = htab->elf.dynobj;
2426
2427 sreloc = _bfd_elf_make_dynamic_reloc_section (sec, dynobj,
2428 2, abfd, 1);
2429 if (sreloc == NULL)
2430 return FALSE;
2431 }
2432
2433 /* If this is a global symbol, we count the number of
2434 relocations we need for this symbol. */
2435 if (h != NULL)
2436 head = &((struct elf32_mb_link_hash_entry *) h)->dyn_relocs;
2437 else
2438 {
2439 /* Track dynamic relocs needed for local syms too.
2440 We really need local syms available to do this
2441 easily. Oh well. */
2442
2443 asection *s;
2444 Elf_Internal_Sym *isym;
2445 void *vpp;
2446
2447 isym = bfd_sym_from_r_symndx (&htab->sym_sec,
2448 abfd, r_symndx);
2449 if (isym == NULL)
2450 return FALSE;
2451
2452 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
2453 if (s == NULL)
2454 return FALSE;
2455
2456 vpp = &elf_section_data (s)->local_dynrel;
2457 head = (struct elf_dyn_relocs **) vpp;
2458 }
2459
2460 p = *head;
2461 if (p == NULL || p->sec != sec)
2462 {
2463 bfd_size_type amt = sizeof *p;
2464 p = ((struct elf_dyn_relocs *)
2465 bfd_alloc (htab->elf.dynobj, amt));
2466 if (p == NULL)
2467 return FALSE;
2468 p->next = *head;
2469 *head = p;
2470 p->sec = sec;
2471 p->count = 0;
2472 p->pc_count = 0;
2473 }
2474
2475 p->count += 1;
2476 if (r_type == R_MICROBLAZE_64_PCREL)
2477 p->pc_count += 1;
2478 }
2479 }
2480 break;
2481 }
2482 }
2483
2484 return TRUE;
2485 }
2486
2487 /* Copy the extra info we tack onto an elf_link_hash_entry. */
2488
2489 static void
2490 microblaze_elf_copy_indirect_symbol (struct bfd_link_info *info,
2491 struct elf_link_hash_entry *dir,
2492 struct elf_link_hash_entry *ind)
2493 {
2494 struct elf32_mb_link_hash_entry *edir, *eind;
2495
2496 edir = (struct elf32_mb_link_hash_entry *) dir;
2497 eind = (struct elf32_mb_link_hash_entry *) ind;
2498
2499 if (eind->dyn_relocs != NULL)
2500 {
2501 if (edir->dyn_relocs != NULL)
2502 {
2503 struct elf_dyn_relocs **pp;
2504 struct elf_dyn_relocs *p;
2505
2506 if (ind->root.type == bfd_link_hash_indirect)
2507 abort ();
2508
2509 /* Add reloc counts against the weak sym to the strong sym
2510 list. Merge any entries against the same section. */
2511 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
2512 {
2513 struct elf_dyn_relocs *q;
2514
2515 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2516 if (q->sec == p->sec)
2517 {
2518 q->pc_count += p->pc_count;
2519 q->count += p->count;
2520 *pp = p->next;
2521 break;
2522 }
2523 if (q == NULL)
2524 pp = &p->next;
2525 }
2526 *pp = edir->dyn_relocs;
2527 }
2528
2529 edir->dyn_relocs = eind->dyn_relocs;
2530 eind->dyn_relocs = NULL;
2531 }
2532
2533 edir->tls_mask |= eind->tls_mask;
2534
2535 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2536 }
2537
2538 /* Find dynamic relocs for H that apply to read-only sections. */
2539
2540 static asection *
2541 readonly_dynrelocs (struct elf_link_hash_entry *h)
2542 {
2543 struct elf_dyn_relocs *p;
2544
2545 for (p = elf32_mb_hash_entry (h)->dyn_relocs; p != NULL; p = p->next)
2546 {
2547 asection *s = p->sec->output_section;
2548
2549 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2550 return p->sec;
2551 }
2552 return NULL;
2553 }
2554
2555 static bfd_boolean
2556 microblaze_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
2557 struct elf_link_hash_entry *h)
2558 {
2559 struct elf32_mb_link_hash_table *htab;
2560 asection *s, *srel;
2561 unsigned int power_of_two;
2562
2563 htab = elf32_mb_hash_table (info);
2564 if (htab == NULL)
2565 return FALSE;
2566
2567 /* If this is a function, put it in the procedure linkage table. We
2568 will fill in the contents of the procedure linkage table later,
2569 when we know the address of the .got section. */
2570 if (h->type == STT_FUNC
2571 || h->needs_plt)
2572 {
2573 if (h->plt.refcount <= 0
2574 || SYMBOL_CALLS_LOCAL (info, h)
2575 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2576 && h->root.type == bfd_link_hash_undefweak))
2577 {
2578 /* This case can occur if we saw a PLT reloc in an input
2579 file, but the symbol was never referred to by a dynamic
2580 object, or if all references were garbage collected. In
2581 such a case, we don't actually need to build a procedure
2582 linkage table, and we can just do a PC32 reloc instead. */
2583 h->plt.offset = (bfd_vma) -1;
2584 h->needs_plt = 0;
2585 }
2586
2587 return TRUE;
2588 }
2589 else
2590 /* It's possible that we incorrectly decided a .plt reloc was
2591 needed for an R_MICROBLAZE_64_PCREL reloc to a non-function sym in
2592 check_relocs. We can't decide accurately between function and
2593 non-function syms in check-relocs; Objects loaded later in
2594 the link may change h->type. So fix it now. */
2595 h->plt.offset = (bfd_vma) -1;
2596
2597 /* If this is a weak symbol, and there is a real definition, the
2598 processor independent code will have arranged for us to see the
2599 real definition first, and we can just use the same value. */
2600 if (h->is_weakalias)
2601 {
2602 struct elf_link_hash_entry *def = weakdef (h);
2603 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
2604 h->root.u.def.section = def->root.u.def.section;
2605 h->root.u.def.value = def->root.u.def.value;
2606 return TRUE;
2607 }
2608
2609 /* This is a reference to a symbol defined by a dynamic object which
2610 is not a function. */
2611
2612 /* If we are creating a shared library, we must presume that the
2613 only references to the symbol are via the global offset table.
2614 For such cases we need not do anything here; the relocations will
2615 be handled correctly by relocate_section. */
2616 if (bfd_link_pic (info))
2617 return TRUE;
2618
2619 /* If there are no references to this symbol that do not use the
2620 GOT, we don't need to generate a copy reloc. */
2621 if (!h->non_got_ref)
2622 return TRUE;
2623
2624 /* If -z nocopyreloc was given, we won't generate them either. */
2625 if (info->nocopyreloc)
2626 {
2627 h->non_got_ref = 0;
2628 return TRUE;
2629 }
2630
2631 /* If we don't find any dynamic relocs in read-only sections, then
2632 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2633 if (!readonly_dynrelocs (h))
2634 {
2635 h->non_got_ref = 0;
2636 return TRUE;
2637 }
2638
2639 /* We must allocate the symbol in our .dynbss section, which will
2640 become part of the .bss section of the executable. There will be
2641 an entry for this symbol in the .dynsym section. The dynamic
2642 object will contain position independent code, so all references
2643 from the dynamic object to this symbol will go through the global
2644 offset table. The dynamic linker will use the .dynsym entry to
2645 determine the address it must put in the global offset table, so
2646 both the dynamic object and the regular object will refer to the
2647 same memory location for the variable. */
2648
2649 /* We must generate a R_MICROBLAZE_COPY reloc to tell the dynamic linker
2650 to copy the initial value out of the dynamic object and into the
2651 runtime process image. */
2652 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
2653 {
2654 s = htab->elf.sdynrelro;
2655 srel = htab->elf.sreldynrelro;
2656 }
2657 else
2658 {
2659 s = htab->elf.sdynbss;
2660 srel = htab->elf.srelbss;
2661 }
2662 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2663 {
2664 srel->size += sizeof (Elf32_External_Rela);
2665 h->needs_copy = 1;
2666 }
2667
2668 /* We need to figure out the alignment required for this symbol. I
2669 have no idea how ELF linkers handle this. */
2670 power_of_two = bfd_log2 (h->size);
2671 if (power_of_two > 3)
2672 power_of_two = 3;
2673
2674 /* Apply the required alignment. */
2675 s->size = BFD_ALIGN (s->size, (bfd_size_type) (1 << power_of_two));
2676 if (power_of_two > s->alignment_power)
2677 {
2678 if (!bfd_set_section_alignment (s->owner, s, power_of_two))
2679 return FALSE;
2680 }
2681
2682 /* Define the symbol as being at this point in the section. */
2683 h->root.u.def.section = s;
2684 h->root.u.def.value = s->size;
2685
2686 /* Increment the section size to make room for the symbol. */
2687 s->size += h->size;
2688 return TRUE;
2689 }
2690
2691 /* Allocate space in .plt, .got and associated reloc sections for
2692 dynamic relocs. */
2693
2694 static bfd_boolean
2695 allocate_dynrelocs (struct elf_link_hash_entry *h, void * dat)
2696 {
2697 struct bfd_link_info *info;
2698 struct elf32_mb_link_hash_table *htab;
2699 struct elf32_mb_link_hash_entry *eh;
2700 struct elf_dyn_relocs *p;
2701
2702 if (h->root.type == bfd_link_hash_indirect)
2703 return TRUE;
2704
2705 info = (struct bfd_link_info *) dat;
2706 htab = elf32_mb_hash_table (info);
2707 if (htab == NULL)
2708 return FALSE;
2709
2710 if (htab->elf.dynamic_sections_created
2711 && h->plt.refcount > 0)
2712 {
2713 /* Make sure this symbol is output as a dynamic symbol.
2714 Undefined weak syms won't yet be marked as dynamic. */
2715 if (h->dynindx == -1
2716 && !h->forced_local)
2717 {
2718 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2719 return FALSE;
2720 }
2721
2722 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
2723 {
2724 asection *s = htab->elf.splt;
2725
2726 /* The first entry in .plt is reserved. */
2727 if (s->size == 0)
2728 s->size = PLT_ENTRY_SIZE;
2729
2730 h->plt.offset = s->size;
2731
2732 /* If this symbol is not defined in a regular file, and we are
2733 not generating a shared library, then set the symbol to this
2734 location in the .plt. This is required to make function
2735 pointers compare as equal between the normal executable and
2736 the shared library. */
2737 if (! bfd_link_pic (info)
2738 && !h->def_regular)
2739 {
2740 h->root.u.def.section = s;
2741 h->root.u.def.value = h->plt.offset;
2742 }
2743
2744 /* Make room for this entry. */
2745 s->size += PLT_ENTRY_SIZE;
2746
2747 /* We also need to make an entry in the .got.plt section, which
2748 will be placed in the .got section by the linker script. */
2749 htab->elf.sgotplt->size += 4;
2750
2751 /* We also need to make an entry in the .rel.plt section. */
2752 htab->elf.srelplt->size += sizeof (Elf32_External_Rela);
2753 }
2754 else
2755 {
2756 h->plt.offset = (bfd_vma) -1;
2757 h->needs_plt = 0;
2758 }
2759 }
2760 else
2761 {
2762 h->plt.offset = (bfd_vma) -1;
2763 h->needs_plt = 0;
2764 }
2765
2766 eh = (struct elf32_mb_link_hash_entry *) h;
2767 if (h->got.refcount > 0)
2768 {
2769 unsigned int need;
2770 asection *s;
2771
2772 /* Make sure this symbol is output as a dynamic symbol.
2773 Undefined weak syms won't yet be marked as dynamic. */
2774 if (h->dynindx == -1
2775 && !h->forced_local)
2776 {
2777 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2778 return FALSE;
2779 }
2780
2781 need = 0;
2782 if ((eh->tls_mask & TLS_TLS) != 0)
2783 {
2784 /* Handle TLS Symbol */
2785 if ((eh->tls_mask & TLS_LD) != 0)
2786 {
2787 if (!eh->elf.def_dynamic)
2788 /* We'll just use htab->tlsld_got.offset. This should
2789 always be the case. It's a little odd if we have
2790 a local dynamic reloc against a non-local symbol. */
2791 htab->tlsld_got.refcount += 1;
2792 else
2793 need += 8;
2794 }
2795 if ((eh->tls_mask & TLS_GD) != 0)
2796 need += 8;
2797 }
2798 else
2799 {
2800 /* Regular (non-TLS) symbol */
2801 need += 4;
2802 }
2803 if (need == 0)
2804 {
2805 h->got.offset = (bfd_vma) -1;
2806 }
2807 else
2808 {
2809 s = htab->elf.sgot;
2810 h->got.offset = s->size;
2811 s->size += need;
2812 htab->elf.srelgot->size += need * (sizeof (Elf32_External_Rela) / 4);
2813 }
2814 }
2815 else
2816 h->got.offset = (bfd_vma) -1;
2817
2818 if (eh->dyn_relocs == NULL)
2819 return TRUE;
2820
2821 /* In the shared -Bsymbolic case, discard space allocated for
2822 dynamic pc-relative relocs against symbols which turn out to be
2823 defined in regular objects. For the normal shared case, discard
2824 space for pc-relative relocs that have become local due to symbol
2825 visibility changes. */
2826
2827 if (bfd_link_pic (info))
2828 {
2829 if (h->def_regular
2830 && (h->forced_local
2831 || info->symbolic))
2832 {
2833 struct elf_dyn_relocs **pp;
2834
2835 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2836 {
2837 p->count -= p->pc_count;
2838 p->pc_count = 0;
2839 if (p->count == 0)
2840 *pp = p->next;
2841 else
2842 pp = &p->next;
2843 }
2844 }
2845 else if (UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
2846 eh->dyn_relocs = NULL;
2847 }
2848 else
2849 {
2850 /* For the non-shared case, discard space for relocs against
2851 symbols which turn out to need copy relocs or are not
2852 dynamic. */
2853
2854 if (!h->non_got_ref
2855 && ((h->def_dynamic
2856 && !h->def_regular)
2857 || (htab->elf.dynamic_sections_created
2858 && (h->root.type == bfd_link_hash_undefweak
2859 || h->root.type == bfd_link_hash_undefined))))
2860 {
2861 /* Make sure this symbol is output as a dynamic symbol.
2862 Undefined weak syms won't yet be marked as dynamic. */
2863 if (h->dynindx == -1
2864 && !h->forced_local)
2865 {
2866 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2867 return FALSE;
2868 }
2869
2870 /* If that succeeded, we know we'll be keeping all the
2871 relocs. */
2872 if (h->dynindx != -1)
2873 goto keep;
2874 }
2875
2876 eh->dyn_relocs = NULL;
2877
2878 keep: ;
2879 }
2880
2881 /* Finally, allocate space. */
2882 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2883 {
2884 asection *sreloc = elf_section_data (p->sec)->sreloc;
2885 sreloc->size += p->count * sizeof (Elf32_External_Rela);
2886 }
2887
2888 return TRUE;
2889 }
2890
2891 /* Set the sizes of the dynamic sections. */
2892
2893 static bfd_boolean
2894 microblaze_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
2895 struct bfd_link_info *info)
2896 {
2897 struct elf32_mb_link_hash_table *htab;
2898 bfd *dynobj;
2899 asection *s;
2900 bfd *ibfd;
2901
2902 htab = elf32_mb_hash_table (info);
2903 if (htab == NULL)
2904 return FALSE;
2905
2906 dynobj = htab->elf.dynobj;
2907 BFD_ASSERT (dynobj != NULL);
2908
2909 /* Set up .got offsets for local syms, and space for local dynamic
2910 relocs. */
2911 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2912 {
2913 bfd_signed_vma *local_got;
2914 bfd_signed_vma *end_local_got;
2915 bfd_size_type locsymcount;
2916 Elf_Internal_Shdr *symtab_hdr;
2917 unsigned char *lgot_masks;
2918 asection *srel;
2919
2920 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
2921 continue;
2922
2923 for (s = ibfd->sections; s != NULL; s = s->next)
2924 {
2925 struct elf_dyn_relocs *p;
2926
2927 for (p = ((struct elf_dyn_relocs *)
2928 elf_section_data (s)->local_dynrel);
2929 p != NULL;
2930 p = p->next)
2931 {
2932 if (!bfd_is_abs_section (p->sec)
2933 && bfd_is_abs_section (p->sec->output_section))
2934 {
2935 /* Input section has been discarded, either because
2936 it is a copy of a linkonce section or due to
2937 linker script /DISCARD/, so we'll be discarding
2938 the relocs too. */
2939 }
2940 else if (p->count != 0)
2941 {
2942 srel = elf_section_data (p->sec)->sreloc;
2943 srel->size += p->count * sizeof (Elf32_External_Rela);
2944 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2945 info->flags |= DF_TEXTREL;
2946 }
2947 }
2948 }
2949
2950 local_got = elf_local_got_refcounts (ibfd);
2951 if (!local_got)
2952 continue;
2953
2954 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2955 locsymcount = symtab_hdr->sh_info;
2956 end_local_got = local_got + locsymcount;
2957 lgot_masks = (unsigned char *) end_local_got;
2958 s = htab->elf.sgot;
2959 srel = htab->elf.srelgot;
2960
2961 for (; local_got < end_local_got; ++local_got, ++lgot_masks)
2962 {
2963 if (*local_got > 0)
2964 {
2965 unsigned int need = 0;
2966 if ((*lgot_masks & TLS_TLS) != 0)
2967 {
2968 if ((*lgot_masks & TLS_GD) != 0)
2969 need += 8;
2970 if ((*lgot_masks & TLS_LD) != 0)
2971 htab->tlsld_got.refcount += 1;
2972 }
2973 else
2974 need += 4;
2975
2976 if (need == 0)
2977 {
2978 *local_got = (bfd_vma) -1;
2979 }
2980 else
2981 {
2982 *local_got = s->size;
2983 s->size += need;
2984 if (bfd_link_pic (info))
2985 srel->size += need * (sizeof (Elf32_External_Rela) / 4);
2986 }
2987 }
2988 else
2989 *local_got = (bfd_vma) -1;
2990 }
2991 }
2992
2993 /* Allocate global sym .plt and .got entries, and space for global
2994 sym dynamic relocs. */
2995 elf_link_hash_traverse (elf_hash_table (info), allocate_dynrelocs, info);
2996
2997 if (htab->tlsld_got.refcount > 0)
2998 {
2999 htab->tlsld_got.offset = htab->elf.sgot->size;
3000 htab->elf.sgot->size += 8;
3001 if (bfd_link_pic (info))
3002 htab->elf.srelgot->size += sizeof (Elf32_External_Rela);
3003 }
3004 else
3005 htab->tlsld_got.offset = (bfd_vma) -1;
3006
3007 if (elf_hash_table (info)->dynamic_sections_created)
3008 {
3009 /* Make space for the trailing nop in .plt. */
3010 if (htab->elf.splt->size > 0)
3011 htab->elf.splt->size += 4;
3012 }
3013
3014 /* The check_relocs and adjust_dynamic_symbol entry points have
3015 determined the sizes of the various dynamic sections. Allocate
3016 memory for them. */
3017 for (s = dynobj->sections; s != NULL; s = s->next)
3018 {
3019 const char *name;
3020 bfd_boolean strip = FALSE;
3021
3022 if ((s->flags & SEC_LINKER_CREATED) == 0)
3023 continue;
3024
3025 /* It's OK to base decisions on the section name, because none
3026 of the dynobj section names depend upon the input files. */
3027 name = bfd_get_section_name (dynobj, s);
3028
3029 if (strncmp (name, ".rela", 5) == 0)
3030 {
3031 if (s->size == 0)
3032 {
3033 /* If we don't need this section, strip it from the
3034 output file. This is to handle .rela.bss and
3035 .rela.plt. We must create it in
3036 create_dynamic_sections, because it must be created
3037 before the linker maps input sections to output
3038 sections. The linker does that before
3039 adjust_dynamic_symbol is called, and it is that
3040 function which decides whether anything needs to go
3041 into these sections. */
3042 strip = TRUE;
3043 }
3044 else
3045 {
3046 /* We use the reloc_count field as a counter if we need
3047 to copy relocs into the output file. */
3048 s->reloc_count = 0;
3049 }
3050 }
3051 else if (s != htab->elf.splt
3052 && s != htab->elf.sgot
3053 && s != htab->elf.sgotplt
3054 && s != htab->elf.sdynbss
3055 && s != htab->elf.sdynrelro)
3056 {
3057 /* It's not one of our sections, so don't allocate space. */
3058 continue;
3059 }
3060
3061 if (strip)
3062 {
3063 s->flags |= SEC_EXCLUDE;
3064 continue;
3065 }
3066
3067 /* Allocate memory for the section contents. */
3068 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
3069 Unused entries should be reclaimed before the section's contents
3070 are written out, but at the moment this does not happen. Thus in
3071 order to prevent writing out garbage, we initialise the section's
3072 contents to zero. */
3073 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
3074 if (s->contents == NULL && s->size != 0)
3075 return FALSE;
3076 }
3077
3078 if (elf_hash_table (info)->dynamic_sections_created)
3079 {
3080 /* Add some entries to the .dynamic section. We fill in the
3081 values later, in microblaze_elf_finish_dynamic_sections, but we
3082 must add the entries now so that we get the correct size for
3083 the .dynamic section. The DT_DEBUG entry is filled in by the
3084 dynamic linker and used by the debugger. */
3085 #define add_dynamic_entry(TAG, VAL) \
3086 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3087
3088 if (bfd_link_executable (info))
3089 {
3090 if (!add_dynamic_entry (DT_DEBUG, 0))
3091 return FALSE;
3092 }
3093
3094 if (!add_dynamic_entry (DT_RELA, 0)
3095 || !add_dynamic_entry (DT_RELASZ, 0)
3096 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
3097 return FALSE;
3098
3099 if (htab->elf.splt->size != 0)
3100 {
3101 if (!add_dynamic_entry (DT_PLTGOT, 0)
3102 || !add_dynamic_entry (DT_PLTRELSZ, 0)
3103 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3104 || !add_dynamic_entry (DT_JMPREL, 0)
3105 || !add_dynamic_entry (DT_BIND_NOW, 1))
3106 return FALSE;
3107 }
3108
3109 if (info->flags & DF_TEXTREL)
3110 {
3111 if (!add_dynamic_entry (DT_TEXTREL, 0))
3112 return FALSE;
3113 }
3114 }
3115 #undef add_dynamic_entry
3116 return TRUE;
3117 }
3118
3119 /* Finish up dynamic symbol handling. We set the contents of various
3120 dynamic sections here. */
3121
3122 static bfd_boolean
3123 microblaze_elf_finish_dynamic_symbol (bfd *output_bfd,
3124 struct bfd_link_info *info,
3125 struct elf_link_hash_entry *h,
3126 Elf_Internal_Sym *sym)
3127 {
3128 struct elf32_mb_link_hash_table *htab;
3129 struct elf32_mb_link_hash_entry *eh = elf32_mb_hash_entry(h);
3130
3131 htab = elf32_mb_hash_table (info);
3132 if (htab == NULL)
3133 return FALSE;
3134
3135 if (h->plt.offset != (bfd_vma) -1)
3136 {
3137 asection *splt;
3138 asection *srela;
3139 asection *sgotplt;
3140 Elf_Internal_Rela rela;
3141 bfd_byte *loc;
3142 bfd_vma plt_index;
3143 bfd_vma got_offset;
3144 bfd_vma got_addr;
3145
3146 /* This symbol has an entry in the procedure linkage table. Set
3147 it up. */
3148 BFD_ASSERT (h->dynindx != -1);
3149
3150 splt = htab->elf.splt;
3151 srela = htab->elf.srelplt;
3152 sgotplt = htab->elf.sgotplt;
3153 BFD_ASSERT (splt != NULL && srela != NULL && sgotplt != NULL);
3154
3155 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1; /* first entry reserved. */
3156 got_offset = (plt_index + 3) * 4; /* 3 reserved ??? */
3157 got_addr = got_offset;
3158
3159 /* For non-PIC objects we need absolute address of the GOT entry. */
3160 if (!bfd_link_pic (info))
3161 got_addr += sgotplt->output_section->vma + sgotplt->output_offset;
3162
3163 /* Fill in the entry in the procedure linkage table. */
3164 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_0 + ((got_addr >> 16) & 0xffff),
3165 splt->contents + h->plt.offset);
3166 if (bfd_link_pic (info))
3167 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1 + (got_addr & 0xffff),
3168 splt->contents + h->plt.offset + 4);
3169 else
3170 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1_NOPIC + (got_addr & 0xffff),
3171 splt->contents + h->plt.offset + 4);
3172 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_2,
3173 splt->contents + h->plt.offset + 8);
3174 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_3,
3175 splt->contents + h->plt.offset + 12);
3176
3177 /* Any additions to the .got section??? */
3178 /* bfd_put_32 (output_bfd,
3179 splt->output_section->vma + splt->output_offset + h->plt.offset + 4,
3180 sgotplt->contents + got_offset); */
3181
3182 /* Fill in the entry in the .rela.plt section. */
3183 rela.r_offset = (sgotplt->output_section->vma
3184 + sgotplt->output_offset
3185 + got_offset);
3186 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_JUMP_SLOT);
3187 rela.r_addend = 0;
3188 loc = srela->contents;
3189 loc += plt_index * sizeof (Elf32_External_Rela);
3190 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
3191
3192 if (!h->def_regular)
3193 {
3194 /* Mark the symbol as undefined, rather than as defined in
3195 the .plt section. Zero the value. */
3196 sym->st_shndx = SHN_UNDEF;
3197 sym->st_value = 0;
3198 }
3199 }
3200
3201 /* h->got.refcount to be checked ? */
3202 if (h->got.offset != (bfd_vma) -1 &&
3203 ! ((h->got.offset & 1) ||
3204 IS_TLS_LD(eh->tls_mask) || IS_TLS_GD(eh->tls_mask)))
3205 {
3206 asection *sgot;
3207 asection *srela;
3208 bfd_vma offset;
3209
3210 /* This symbol has an entry in the global offset table. Set it
3211 up. */
3212
3213 sgot = htab->elf.sgot;
3214 srela = htab->elf.srelgot;
3215 BFD_ASSERT (sgot != NULL && srela != NULL);
3216
3217 offset = (sgot->output_section->vma + sgot->output_offset
3218 + (h->got.offset &~ (bfd_vma) 1));
3219
3220 /* If this is a -Bsymbolic link, and the symbol is defined
3221 locally, we just want to emit a RELATIVE reloc. Likewise if
3222 the symbol was forced to be local because of a version file.
3223 The entry in the global offset table will already have been
3224 initialized in the relocate_section function. */
3225 if (bfd_link_pic (info)
3226 && ((info->symbolic && h->def_regular)
3227 || h->dynindx == -1))
3228 {
3229 asection *sec = h->root.u.def.section;
3230 bfd_vma value;
3231
3232 value = h->root.u.def.value;
3233 if (sec->output_section != NULL)
3234 /* PR 21180: If the output section is NULL, then the symbol is no
3235 longer needed, and in theory the GOT entry is redundant. But
3236 it is too late to change our minds now... */
3237 value += sec->output_section->vma + sec->output_offset;
3238
3239 microblaze_elf_output_dynamic_relocation (output_bfd,
3240 srela, srela->reloc_count++,
3241 /* symindex= */ 0,
3242 R_MICROBLAZE_REL, offset,
3243 value);
3244 }
3245 else
3246 {
3247 microblaze_elf_output_dynamic_relocation (output_bfd,
3248 srela, srela->reloc_count++,
3249 h->dynindx,
3250 R_MICROBLAZE_GLOB_DAT,
3251 offset, 0);
3252 }
3253
3254 bfd_put_32 (output_bfd, (bfd_vma) 0,
3255 sgot->contents + (h->got.offset &~ (bfd_vma) 1));
3256 }
3257
3258 if (h->needs_copy)
3259 {
3260 asection *s;
3261 Elf_Internal_Rela rela;
3262 bfd_byte *loc;
3263
3264 /* This symbols needs a copy reloc. Set it up. */
3265
3266 BFD_ASSERT (h->dynindx != -1);
3267
3268 rela.r_offset = (h->root.u.def.value
3269 + h->root.u.def.section->output_section->vma
3270 + h->root.u.def.section->output_offset);
3271 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_COPY);
3272 rela.r_addend = 0;
3273 if (h->root.u.def.section == htab->elf.sdynrelro)
3274 s = htab->elf.sreldynrelro;
3275 else
3276 s = htab->elf.srelbss;
3277 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
3278 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
3279 }
3280
3281 /* Mark some specially defined symbols as absolute. */
3282 if (h == htab->elf.hdynamic
3283 || h == htab->elf.hgot
3284 || h == htab->elf.hplt)
3285 sym->st_shndx = SHN_ABS;
3286
3287 return TRUE;
3288 }
3289
3290
3291 /* Finish up the dynamic sections. */
3292
3293 static bfd_boolean
3294 microblaze_elf_finish_dynamic_sections (bfd *output_bfd,
3295 struct bfd_link_info *info)
3296 {
3297 bfd *dynobj;
3298 asection *sdyn, *sgot;
3299 struct elf32_mb_link_hash_table *htab;
3300
3301 htab = elf32_mb_hash_table (info);
3302 if (htab == NULL)
3303 return FALSE;
3304
3305 dynobj = htab->elf.dynobj;
3306
3307 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
3308
3309 if (htab->elf.dynamic_sections_created)
3310 {
3311 asection *splt;
3312 Elf32_External_Dyn *dyncon, *dynconend;
3313
3314 dyncon = (Elf32_External_Dyn *) sdyn->contents;
3315 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
3316 for (; dyncon < dynconend; dyncon++)
3317 {
3318 Elf_Internal_Dyn dyn;
3319 asection *s;
3320 bfd_boolean size;
3321
3322 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
3323
3324 switch (dyn.d_tag)
3325 {
3326 case DT_PLTGOT:
3327 s = htab->elf.sgotplt;
3328 size = FALSE;
3329 break;
3330
3331 case DT_PLTRELSZ:
3332 s = htab->elf.srelplt;
3333 size = TRUE;
3334 break;
3335
3336 case DT_JMPREL:
3337 s = htab->elf.srelplt;
3338 size = FALSE;
3339 break;
3340
3341 default:
3342 continue;
3343 }
3344
3345 if (s == NULL)
3346 dyn.d_un.d_val = 0;
3347 else
3348 {
3349 if (!size)
3350 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
3351 else
3352 dyn.d_un.d_val = s->size;
3353 }
3354 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
3355 }
3356
3357 splt = htab->elf.splt;
3358 BFD_ASSERT (splt != NULL && sdyn != NULL);
3359
3360 /* Clear the first entry in the procedure linkage table,
3361 and put a nop in the last four bytes. */
3362 if (splt->size > 0)
3363 {
3364 memset (splt->contents, 0, PLT_ENTRY_SIZE);
3365 bfd_put_32 (output_bfd, (bfd_vma) 0x80000000 /* nop. */,
3366 splt->contents + splt->size - 4);
3367 }
3368
3369 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
3370 }
3371
3372 /* Set the first entry in the global offset table to the address of
3373 the dynamic section. */
3374 sgot = htab->elf.sgotplt;
3375 if (sgot && sgot->size > 0)
3376 {
3377 if (sdyn == NULL)
3378 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
3379 else
3380 bfd_put_32 (output_bfd,
3381 sdyn->output_section->vma + sdyn->output_offset,
3382 sgot->contents);
3383 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
3384 }
3385
3386 if (htab->elf.sgot && htab->elf.sgot->size > 0)
3387 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize = 4;
3388
3389 return TRUE;
3390 }
3391
3392 /* Hook called by the linker routine which adds symbols from an object
3393 file. We use it to put .comm items in .sbss, and not .bss. */
3394
3395 static bfd_boolean
3396 microblaze_elf_add_symbol_hook (bfd *abfd,
3397 struct bfd_link_info *info,
3398 Elf_Internal_Sym *sym,
3399 const char **namep ATTRIBUTE_UNUSED,
3400 flagword *flagsp ATTRIBUTE_UNUSED,
3401 asection **secp,
3402 bfd_vma *valp)
3403 {
3404 if (sym->st_shndx == SHN_COMMON
3405 && !bfd_link_relocatable (info)
3406 && sym->st_size <= elf_gp_size (abfd))
3407 {
3408 /* Common symbols less than or equal to -G nn bytes are automatically
3409 put into .sbss. */
3410 *secp = bfd_make_section_old_way (abfd, ".sbss");
3411 if (*secp == NULL
3412 || ! bfd_set_section_flags (abfd, *secp, SEC_IS_COMMON))
3413 return FALSE;
3414
3415 *valp = sym->st_size;
3416 }
3417
3418 return TRUE;
3419 }
3420
3421 #define TARGET_LITTLE_SYM microblaze_elf32_le_vec
3422 #define TARGET_LITTLE_NAME "elf32-microblazeel"
3423
3424 #define TARGET_BIG_SYM microblaze_elf32_vec
3425 #define TARGET_BIG_NAME "elf32-microblaze"
3426
3427 #define ELF_ARCH bfd_arch_microblaze
3428 #define ELF_TARGET_ID MICROBLAZE_ELF_DATA
3429 #define ELF_MACHINE_CODE EM_MICROBLAZE
3430 #define ELF_MACHINE_ALT1 EM_MICROBLAZE_OLD
3431 #define ELF_MAXPAGESIZE 0x1000
3432 #define elf_info_to_howto microblaze_elf_info_to_howto
3433 #define elf_info_to_howto_rel NULL
3434
3435 #define bfd_elf32_bfd_reloc_type_lookup microblaze_elf_reloc_type_lookup
3436 #define bfd_elf32_bfd_is_local_label_name microblaze_elf_is_local_label_name
3437 #define elf_backend_relocate_section microblaze_elf_relocate_section
3438 #define bfd_elf32_bfd_relax_section microblaze_elf_relax_section
3439 #define bfd_elf32_bfd_merge_private_bfd_data _bfd_generic_verify_endian_match
3440 #define bfd_elf32_bfd_reloc_name_lookup microblaze_elf_reloc_name_lookup
3441
3442 #define elf_backend_gc_mark_hook microblaze_elf_gc_mark_hook
3443 #define elf_backend_check_relocs microblaze_elf_check_relocs
3444 #define elf_backend_copy_indirect_symbol microblaze_elf_copy_indirect_symbol
3445 #define bfd_elf32_bfd_link_hash_table_create microblaze_elf_link_hash_table_create
3446 #define elf_backend_can_gc_sections 1
3447 #define elf_backend_can_refcount 1
3448 #define elf_backend_want_got_plt 1
3449 #define elf_backend_plt_readonly 1
3450 #define elf_backend_got_header_size 12
3451 #define elf_backend_want_dynrelro 1
3452 #define elf_backend_rela_normal 1
3453 #define elf_backend_dtrel_excludes_plt 1
3454
3455 #define elf_backend_adjust_dynamic_symbol microblaze_elf_adjust_dynamic_symbol
3456 #define elf_backend_create_dynamic_sections _bfd_elf_create_dynamic_sections
3457 #define elf_backend_finish_dynamic_sections microblaze_elf_finish_dynamic_sections
3458 #define elf_backend_finish_dynamic_symbol microblaze_elf_finish_dynamic_symbol
3459 #define elf_backend_size_dynamic_sections microblaze_elf_size_dynamic_sections
3460 #define elf_backend_add_symbol_hook microblaze_elf_add_symbol_hook
3461
3462 #include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.102437 seconds and 4 git commands to generate.