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