projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Add is_generic_elf to ld/ld-lib.exp
[deliverable/binutils-gdb.git] / bfd / elf32-microblaze.c
CommitLineData
7ba29e2a
NC		 1/* Xilinx MicroBlaze-specific support for 32-bit ELF
2
6f2750fe 3 Copyright (C) 2009-2016 Free Software Foundation, Inc.
7ba29e2a
NC		 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
23int dbg = 0;
24
7ba29e2a 25#include "sysdep.h"
691bf19c 26#include "bfd.h"
7ba29e2a
NC		 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
37static int ro_small_data_pointer = 0;
38static int rw_small_data_pointer = 0;
39
40static reloc_howto_type * microblaze_elf_howto_table [(int) R_MICROBLAZE_max];
41
42static reloc_howto_type microblaze_elf_howto_raw[] =
43{
44 /* This reloc does nothing. */
45 HOWTO (R_MICROBLAZE_NONE, /* Type. */
46 0, /* Rightshift. */
6346d5ca
AM		 47 3, /* Size (0 = byte, 1 = short, 2 = long). */
48 0, /* Bitsize. */
7ba29e2a
NC		 49 FALSE, /* PC_relative. */
50 0, /* Bitpos. */
6346d5ca 51 complain_overflow_dont, /* Complain on overflow. */
7ba29e2a
NC		 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. */
6346d5ca
AM		 182 3, /* Size (0 = byte, 1 = short, 2 = long). */
183 0, /* Bitsize. */
7ba29e2a
NC		 184 TRUE, /* PC_relative. */
185 0, /* Bitpos. */
6346d5ca 186 complain_overflow_dont, /* Complain on overflow. */
7ba29e2a
NC		 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? */
69b06cc8
ME		 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
7ba29e2a
NC		 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
507static void
508microblaze_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
524static reloc_howto_type *
525microblaze_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;
69b06cc8
ME		 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;
7ba29e2a
NC		 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
625static reloc_howto_type *
626microblaze_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
641static void
642microblaze_elf_info_to_howto (bfd * abfd ATTRIBUTE_UNUSED,
643 arelent * cache_ptr,
644 Elf_Internal_Rela * dst)
645{
cd21f5da
NC		 646 unsigned int r_type;
647
7ba29e2a
NC		 648 if (!microblaze_elf_howto_table [R_MICROBLAZE_32])
649 /* Initialize howto table if needed. */
650 microblaze_elf_howto_init ();
651
cd21f5da
NC		 652 r_type = ELF32_R_TYPE (dst->r_info);
653 if (r_type >= R_MICROBLAZE_max)
654 {
4eca0228
AM		 655 _bfd_error_handler (_("%B: unrecognised MicroBlaze reloc number: %d"),
656 abfd, r_type);
cd21f5da
NC		 657 bfd_set_error (bfd_error_bad_value);
658 r_type = R_MICROBLAZE_NONE;
659 }
7ba29e2a 660
cd21f5da 661 cache_ptr->howto = microblaze_elf_howto_table [r_type];
7ba29e2a
NC		 662}
663
664/* Microblaze ELF local labels start with 'L.' or '$L', not '.L'. */
665
666static bfd_boolean
667microblaze_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
686struct 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
702struct 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
69b06cc8
ME		 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
7ba29e2a
NC		 717};
718
69b06cc8
ME		 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
7ba29e2a
NC		 724#define elf32_mb_hash_entry(ent) ((struct elf32_mb_link_hash_entry *)(ent))
725
726/* ELF linker hash table. */
727
728struct 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;
69b06cc8
ME		 743
744 /* TLS Local Dynamic GOT Entry */
745 union {
746 bfd_signed_vma refcount;
747 bfd_vma offset;
748 } tlsld_got;
7ba29e2a
NC		 749};
750
69b06cc8
ME		 751/* Nonzero if this section has TLS related relocations. */
752#define has_tls_reloc sec_flg0
753
7ba29e2a
NC		 754/* Get the ELF linker hash table from a link_info structure. */
755
756#define elf32_mb_hash_table(p) \
4dfe6ac6
NC		 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)
7ba29e2a
NC		 759
760/* Create an entry in a microblaze ELF linker hash table. */
761
762static struct bfd_hash_entry *
763link_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;
69b06cc8 785 eh->tls_mask = 0;
7ba29e2a
NC		 786 }
787
788 return entry;
789}
790
791/* Create a mb ELF linker hash table. */
792
793static struct bfd_link_hash_table *
794microblaze_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,
4dfe6ac6
NC		 804 sizeof (struct elf32_mb_link_hash_entry),
805 MICROBLAZE_ELF_DATA))
7ba29e2a
NC		 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
816static void
817microblaze_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
69b06cc8
ME		 836static bfd_vma
837dtprel_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
850static void
851microblaze_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
7ba29e2a
NC		 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
904static bfd_boolean
905microblaze_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;
f23200ad 918 int endian = (bfd_little_endian (output_bfd)) ? 0 : 2;
7ba29e2a
NC		 919 /* Assume success. */
920 bfd_boolean ret = TRUE;
921 asection *sreloc;
922 bfd_vma *local_got_offsets;
69b06cc8 923 unsigned int tls_type;
7ba29e2a
NC		 924
925 if (!microblaze_elf_howto_table[R_MICROBLAZE_max-1])
926 microblaze_elf_howto_init ();
927
928 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 929 if (htab == NULL)
930 return FALSE;
931
7ba29e2a
NC		 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);
69b06cc8
ME		 955 tls_type = 0;
956
7ba29e2a
NC		 957 if (r_type < 0 || r_type >= (int) R_MICROBLAZE_max)
958 {
4eca0228
AM		 959 _bfd_error_handler (_("%s: unknown relocation type %d"),
960 bfd_get_filename (input_bfd), (int) r_type);
7ba29e2a
NC		 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
0e1862bb 969 if (bfd_link_relocatable (info))
7ba29e2a
NC		 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;
62d887d4 1035 bfd_boolean ignored ATTRIBUTE_UNUSED;
7ba29e2a
NC		 1036
1037 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
1038 r_symndx, symtab_hdr, sym_hashes,
1039 h, sec, relocation,
62d887d4 1040 unresolved_reloc, warned, ignored);
7ba29e2a
NC		 1041 sym_name = h->root.root.string;
1042 }
1043
1044 /* Sanity check the address. */
e57278ef 1045 if (offset > bfd_get_section_limit (input_bfd, input_section))
7ba29e2a
NC		 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 {
a0f49396 1060 name = bfd_get_section_name (sec->owner, sec);
7ba29e2a
NC		 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 {
4eca0228
AM		 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));
7ba29e2a
NC		 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 {
a0f49396 1107 name = bfd_get_section_name (sec->owner, sec);
7ba29e2a
NC		 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 {
4eca0228
AM		 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));
7ba29e2a
NC		 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,
f23200ad 1158 contents + offset + endian);
7ba29e2a 1159 bfd_put_16 (input_bfd, relocation & 0xffff,
f23200ad 1160 contents + offset + endian + INST_WORD_SIZE);
7ba29e2a
NC		 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,
f23200ad 1177 contents + offset + endian);
7ba29e2a 1178 bfd_put_16 (input_bfd, immediate & 0xffff,
f23200ad 1179 contents + offset + endian + INST_WORD_SIZE);
7ba29e2a
NC		 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,
f23200ad 1188 contents + offset + endian);
7ba29e2a 1189 bfd_put_16 (input_bfd, immediate & 0xffff,
f23200ad 1190 contents + offset + endian + INST_WORD_SIZE);
7ba29e2a
NC		 1191 }
1192 break;
1193 }
1194
69b06cc8
ME		 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);
1a0670f3 1200 /* Fall through. */
69b06cc8 1201 dogot:
7ba29e2a
NC		 1202 case (int) R_MICROBLAZE_GOT_64:
1203 {
69b06cc8
ME		 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;
7ba29e2a
NC		 1210 if (htab->sgot == NULL)
1211 abort ();
69b06cc8
ME		 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
7ba29e2a 1232 {
7ba29e2a
NC		 1233 if (local_got_offsets == NULL)
1234 abort ();
69b06cc8
ME		 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
0e1862bb
L		 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)))
69b06cc8
ME		 1258 indx = h->dynindx;
1259 }
7ba29e2a 1260
69b06cc8 1261 /* Need to generate relocs ? */
0e1862bb 1262 if ((bfd_link_pic (info) || indx != 0)
69b06cc8
ME		 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 {
0e1862bb 1283 if (! bfd_link_pic (info))
7ba29e2a 1284 {
69b06cc8
ME		 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);
7ba29e2a 1293 }
7ba29e2a 1294 }
69b06cc8
ME		 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))
7ba29e2a 1325 {
69b06cc8
ME		 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 }
7ba29e2a
NC		 1340 }
1341 else
69b06cc8
ME		 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 */
0e1862bb 1348 if (bfd_link_pic (info) && h == NULL)
69b06cc8
ME		 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 }
7ba29e2a 1357 }
69b06cc8
ME		 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 */
7ba29e2a 1369 bfd_put_16 (input_bfd, (relocation >> 16) & 0xffff,
f23200ad 1370 contents + offset + endian);
7ba29e2a 1371 bfd_put_16 (input_bfd, relocation & 0xffff,
f23200ad 1372 contents + offset + endian + INST_WORD_SIZE);
69b06cc8
ME		 1373
1374 unresolved_reloc = FALSE;
7ba29e2a
NC		 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;
f23200ad
ME		 1389 bfd_put_16 (input_bfd, high, contents + offset + endian);
1390 bfd_put_16 (input_bfd, lo, contents + offset + INST_WORD_SIZE + endian);
7ba29e2a
NC		 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
69b06cc8
ME		 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;
7ba29e2a
NC		 1412 case (int) R_MICROBLAZE_64_PCREL :
1413 case (int) R_MICROBLAZE_64:
1414 case (int) R_MICROBLAZE_32:
1415 {
cf35638d 1416 /* r_symndx will be STN_UNDEF (zero) only for relocs against symbols
7ba29e2a
NC		 1417 from removed linkonce sections, or sections discarded by
1418 a linker script. */
cf35638d 1419 if (r_symndx == STN_UNDEF || (input_section->flags & SEC_ALLOC) == 0)
7ba29e2a
NC		 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,
f23200ad 1431 contents + offset + endian);
7ba29e2a 1432 bfd_put_16 (input_bfd, relocation & 0xffff,
f23200ad 1433 contents + offset + endian + INST_WORD_SIZE);
7ba29e2a
NC		 1434 }
1435 break;
1436 }
1437
0e1862bb 1438 if ((bfd_link_pic (info)
7ba29e2a
NC		 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))))
0e1862bb 1447 || (!bfd_link_pic (info)
7ba29e2a
NC		 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;
c7e2358a 1458 bfd_boolean skip;
7ba29e2a
NC		 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)
c7e2358a 1474 skip = TRUE;
7ba29e2a
NC		 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 ();
4eca0228 1500 _bfd_error_handler
7ba29e2a
NC		 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,
f23200ad 1525 contents + offset + endian);
7ba29e2a 1526 bfd_put_16 (input_bfd, relocation & 0xffff,
f23200ad 1527 contents + offset + endian + INST_WORD_SIZE);
7ba29e2a
NC		 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:
1a72702b
AM		 1564 (*info->callbacks->reloc_overflow)
1565 (info, (h ? &h->root : NULL), name, howto->name,
1566 (bfd_vma) 0, input_bfd, input_section, offset);
7ba29e2a
NC		 1567 break;
1568
1569 case bfd_reloc_undefined:
1a72702b
AM		 1570 (*info->callbacks->undefined_symbol)
1571 (info, name, input_bfd, input_section, offset, TRUE);
7ba29e2a
NC		 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:
1a72702b
AM		 1590 (*info->callbacks->warning) (info, errmsg, name, input_bfd,
1591 input_section, offset);
7ba29e2a
NC		 1592 break;
1593 }
1594 }
1595 }
1596
1597 return ret;
1598}
f23200ad
ME		 1599
1600/* Merge backend specific data from an object file to the output
1601 object file when linking.
1602
1603 Note: We only use this hook to catch endian mismatches. */
1604static bfd_boolean
1605microblaze_elf_merge_private_bfd_data (bfd * ibfd, bfd * obfd)
1606{
1607 /* Check if we have the same endianess. */
1608 if (! _bfd_generic_verify_endian_match (ibfd, obfd))
1609 return FALSE;
1610
1611 return TRUE;
1612}
1613
7ba29e2a
NC		 1614\f
1615/* Calculate fixup value for reference. */
1616
1617static int
886e427f 1618calc_fixup (bfd_vma start, bfd_vma size, asection *sec)
7ba29e2a 1619{
886e427f 1620 bfd_vma end = start + size;
7ba29e2a
NC		 1621 int i, fixup = 0;
1622
1623 if (sec == NULL || sec->relax == NULL)
1624 return 0;
1625
1626 /* Look for addr in relax table, total fixup value. */
1627 for (i = 0; i < sec->relax_count; i++)
1628 {
886e427f 1629 if (end <= sec->relax[i].addr)
7ba29e2a 1630 break;
886e427f
ME		 1631 if ((end != start) && (start > sec->relax[i].addr))
1632 continue;
7ba29e2a
NC		 1633 fixup += sec->relax[i].size;
1634 }
7ba29e2a
NC		 1635 return fixup;
1636}
1637
f23200ad
ME		 1638/* Read-modify-write into the bfd, an immediate value into appropriate fields of
1639 a 32-bit instruction. */
1640static void
1641microblaze_bfd_write_imm_value_32 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val)
1642{
1643 unsigned long instr = bfd_get_32 (abfd, bfd_addr);
1644 instr &= ~0x0000ffff;
1645 instr |= (val & 0x0000ffff);
1646 bfd_put_32 (abfd, instr, bfd_addr);
1647}
1648
1649/* Read-modify-write into the bfd, an immediate value into appropriate fields of
1650 two consecutive 32-bit instructions. */
1651static void
1652microblaze_bfd_write_imm_value_64 (bfd *abfd, bfd_byte *bfd_addr, bfd_vma val)
1653{
1654 unsigned long instr_hi;
1655 unsigned long instr_lo;
1656
1657 instr_hi = bfd_get_32 (abfd, bfd_addr);
1658 instr_hi &= ~0x0000ffff;
1659 instr_hi |= ((val >> 16) & 0x0000ffff);
1660 bfd_put_32 (abfd, instr_hi, bfd_addr);
1661
1662 instr_lo = bfd_get_32 (abfd, bfd_addr + INST_WORD_SIZE);
1663 instr_lo &= ~0x0000ffff;
1664 instr_lo |= (val & 0x0000ffff);
1665 bfd_put_32 (abfd, instr_lo, bfd_addr + INST_WORD_SIZE);
1666}
1667
7ba29e2a
NC		 1668static bfd_boolean
1669microblaze_elf_relax_section (bfd *abfd,
1670 asection *sec,
1671 struct bfd_link_info *link_info,
1672 bfd_boolean *again)
1673{
1674 Elf_Internal_Shdr *symtab_hdr;
1675 Elf_Internal_Rela *internal_relocs;
1676 Elf_Internal_Rela *free_relocs = NULL;
1677 Elf_Internal_Rela *irel, *irelend;
1678 bfd_byte *contents = NULL;
1679 bfd_byte *free_contents = NULL;
1680 int rel_count;
1681 unsigned int shndx;
91d6fa6a 1682 int i, sym_index;
7ba29e2a
NC		 1683 asection *o;
1684 struct elf_link_hash_entry *sym_hash;
1685 Elf_Internal_Sym *isymbuf, *isymend;
1686 Elf_Internal_Sym *isym;
1687 int symcount;
1688 int offset;
1689 bfd_vma src, dest;
1690
1691 /* We only do this once per section. We may be able to delete some code
1692 by running multiple passes, but it is not worth it. */
1693 *again = FALSE;
1694
1695 /* Only do this for a text section. */
0e1862bb 1696 if (bfd_link_relocatable (link_info)
7ba29e2a 1697 || (sec->flags & SEC_RELOC) == 0
f23200ad
ME		 1698 || (sec->reloc_count == 0)
1699 || (sec->flags & SEC_CODE) == 0)
7ba29e2a
NC		 1700 return TRUE;
1701
1702 BFD_ASSERT ((sec->size > 0) || (sec->rawsize > 0));
1703
1704 /* If this is the first time we have been called for this section,
1705 initialize the cooked size. */
1706 if (sec->size == 0)
1707 sec->size = sec->rawsize;
1708
1709 /* Get symbols for this section. */
1710 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1711 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
1712 symcount = symtab_hdr->sh_size / sizeof (Elf32_External_Sym);
1713 if (isymbuf == NULL)
1714 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr, symcount,
1715 0, NULL, NULL, NULL);
1716 BFD_ASSERT (isymbuf != NULL);
1717
91d6fa6a 1718 internal_relocs = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL, link_info->keep_memory);
7ba29e2a
NC		 1719 if (internal_relocs == NULL)
1720 goto error_return;
1721 if (! link_info->keep_memory)
1722 free_relocs = internal_relocs;
1723
1724 sec->relax = (struct relax_table *) bfd_malloc ((sec->reloc_count + 1)
1725 * sizeof (struct relax_table));
1726 if (sec->relax == NULL)
1727 goto error_return;
1728 sec->relax_count = 0;
1729
1730 irelend = internal_relocs + sec->reloc_count;
1731 rel_count = 0;
1732 for (irel = internal_relocs; irel < irelend; irel++, rel_count++)
1733 {
1734 bfd_vma symval;
1735 if ((ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64_PCREL)
1736 && (ELF32_R_TYPE (irel->r_info) != (int) R_MICROBLAZE_64 ))
1737 continue; /* Can't delete this reloc. */
1738
1739 /* Get the section contents. */
1740 if (contents == NULL)
1741 {
1742 if (elf_section_data (sec)->this_hdr.contents != NULL)
1743 contents = elf_section_data (sec)->this_hdr.contents;
1744 else
1745 {
1746 contents = (bfd_byte *) bfd_malloc (sec->size);
1747 if (contents == NULL)
1748 goto error_return;
1749 free_contents = contents;
1750
1751 if (!bfd_get_section_contents (abfd, sec, contents,
1752 (file_ptr) 0, sec->size))
1753 goto error_return;
1754 elf_section_data (sec)->this_hdr.contents = contents;
1755 }
1756 }
1757
1758 /* Get the value of the symbol referred to by the reloc. */
1759 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
1760 {
1761 /* A local symbol. */
7ba29e2a
NC		 1762 asection *sym_sec;
1763
1764 isym = isymbuf + ELF32_R_SYM (irel->r_info);
1765 if (isym->st_shndx == SHN_UNDEF)
1766 sym_sec = bfd_und_section_ptr;
1767 else if (isym->st_shndx == SHN_ABS)
1768 sym_sec = bfd_abs_section_ptr;
1769 else if (isym->st_shndx == SHN_COMMON)
1770 sym_sec = bfd_com_section_ptr;
1771 else
1772 sym_sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
1773
1774 symval = _bfd_elf_rela_local_sym (abfd, isym, &sym_sec, irel);
1775 }
1776 else
1777 {
1778 unsigned long indx;
1779 struct elf_link_hash_entry *h;
1780
1781 indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
1782 h = elf_sym_hashes (abfd)[indx];
1783 BFD_ASSERT (h != NULL);
1784
1785 if (h->root.type != bfd_link_hash_defined
1786 && h->root.type != bfd_link_hash_defweak)
1787 /* This appears to be a reference to an undefined
1788 symbol. Just ignore it--it will be caught by the
1789 regular reloc processing. */
1790 continue;
1791
1792 symval = (h->root.u.def.value
1793 + h->root.u.def.section->output_section->vma
1794 + h->root.u.def.section->output_offset);
1795 }
1796
1797 /* If this is a PC-relative reloc, subtract the instr offset from
1798 the symbol value. */
1799 if (ELF32_R_TYPE (irel->r_info) == (int) R_MICROBLAZE_64_PCREL)
1800 {
1801 symval = symval + irel->r_addend
1802 - (irel->r_offset
1803 + sec->output_section->vma
1804 + sec->output_offset);
1805 }
1806 else
1807 symval += irel->r_addend;
1808
1809 if ((symval & 0xffff8000) == 0
1810 || (symval & 0xffff8000) == 0xffff8000)
1811 {
1812 /* We can delete this instruction. */
1813 sec->relax[sec->relax_count].addr = irel->r_offset;
1814 sec->relax[sec->relax_count].size = INST_WORD_SIZE;
1815 sec->relax_count++;
1816
1817 /* Rewrite relocation type. */
1818 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info))
1819 {
1820 case R_MICROBLAZE_64_PCREL:
1821 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1822 (int) R_MICROBLAZE_32_PCREL_LO);
1823 break;
1824 case R_MICROBLAZE_64:
1825 irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
1826 (int) R_MICROBLAZE_32_LO);
1827 break;
1828 default:
1829 /* Cannot happen. */
1830 BFD_ASSERT (FALSE);
1831 }
1832 }
1833 } /* Loop through all relocations. */
1834
1835 /* Loop through the relocs again, and see if anything needs to change. */
1836 if (sec->relax_count > 0)
1837 {
1838 shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
1839 rel_count = 0;
1840 sec->relax[sec->relax_count].addr = sec->size;
1841
1842 for (irel = internal_relocs; irel < irelend; irel++, rel_count++)
1843 {
1844 bfd_vma nraddr;
1845
1846 /* Get the new reloc address. */
886e427f 1847 nraddr = irel->r_offset - calc_fixup (irel->r_offset, 0, sec);
7ba29e2a
NC		 1848 switch ((enum elf_microblaze_reloc_type) ELF32_R_TYPE (irel->r_info))
1849 {
1850 default:
1851 break;
1852 case R_MICROBLAZE_64_PCREL:
1853 break;
1854 case R_MICROBLAZE_64:
1855 case R_MICROBLAZE_32_LO:
1856 /* If this reloc is against a symbol defined in this
1857 section, we must check the addend to see it will put the value in
1858 range to be adjusted, and hence must be changed. */
1859 if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
1860 {
7ba29e2a
NC		 1861 isym = isymbuf + ELF32_R_SYM (irel->r_info);
1862 /* Only handle relocs against .text. */
1863 if (isym->st_shndx == shndx
1864 && ELF32_ST_TYPE (isym->st_info) == STT_SECTION)
886e427f 1865 irel->r_addend -= calc_fixup (irel->r_addend, 0, sec);
7ba29e2a
NC		 1866 }
1867 break;
1868 case R_MICROBLAZE_NONE:
1869 {
1870 /* This was a PC-relative instruction that was
1871 completely resolved. */
1872 int sfix, efix;
1873 bfd_vma target_address;
1874 target_address = irel->r_addend + irel->r_offset;
886e427f
ME		 1875 sfix = calc_fixup (irel->r_offset, 0, sec);
1876 efix = calc_fixup (target_address, 0, sec);
7ba29e2a
NC		 1877 irel->r_addend -= (efix - sfix);
1878 /* Should use HOWTO. */
f23200ad
ME		 1879 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset,
1880 irel->r_addend);
7ba29e2a
NC		 1881 }
1882 break;
1883 case R_MICROBLAZE_64_NONE:
1884 {
1885 /* This was a PC-relative 64-bit instruction that was
1886 completely resolved. */
1887 int sfix, efix;
1888 bfd_vma target_address;
1889 target_address = irel->r_addend + irel->r_offset + INST_WORD_SIZE;
886e427f
ME		 1890 sfix = calc_fixup (irel->r_offset + INST_WORD_SIZE, 0, sec);
1891 efix = calc_fixup (target_address, 0, sec);
7ba29e2a 1892 irel->r_addend -= (efix - sfix);
f23200ad
ME		 1893 microblaze_bfd_write_imm_value_32 (abfd, contents + irel->r_offset
1894 + INST_WORD_SIZE, irel->r_addend);
7ba29e2a
NC		 1895 }
1896 break;
1897 }
1898 irel->r_offset = nraddr;
1899 } /* Change all relocs in this section. */
1900
1901 /* Look through all other sections. */
1902 for (o = abfd->sections; o != NULL; o = o->next)
1903 {
91d6fa6a 1904 Elf_Internal_Rela *irelocs;
7ba29e2a
NC		 1905 Elf_Internal_Rela *irelscan, *irelscanend;
1906 bfd_byte *ocontents;
1907
1908 if (o == sec
1909 || (o->flags & SEC_RELOC) == 0
1910 || o->reloc_count == 0)
1911 continue;
1912
1913 /* We always cache the relocs. Perhaps, if info->keep_memory is
1914 FALSE, we should free them, if we are permitted to. */
1915
91d6fa6a
NC		 1916 irelocs = _bfd_elf_link_read_relocs (abfd, o, NULL, NULL, TRUE);
1917 if (irelocs == NULL)
7ba29e2a
NC		 1918 goto error_return;
1919
1920 ocontents = NULL;
91d6fa6a
NC		 1921 irelscanend = irelocs + o->reloc_count;
1922 for (irelscan = irelocs; irelscan < irelscanend; irelscan++)
7ba29e2a
NC		 1923 {
1924 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32)
1925 {
1926 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1927
1928 /* Look at the reloc only if the value has been resolved. */
1929 if (isym->st_shndx == shndx
1930 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
1931 {
1932 if (ocontents == NULL)
1933 {
1934 if (elf_section_data (o)->this_hdr.contents != NULL)
1935 ocontents = elf_section_data (o)->this_hdr.contents;
1936 else
1937 {
1938 /* We always cache the section contents.
1939 Perhaps, if info->keep_memory is FALSE, we
1940 should free them, if we are permitted to. */
1941 if (o->rawsize == 0)
1942 o->rawsize = o->size;
1943 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
1944 if (ocontents == NULL)
1945 goto error_return;
1946 if (!bfd_get_section_contents (abfd, o, ocontents,
1947 (file_ptr) 0,
1948 o->rawsize))
1949 goto error_return;
1950 elf_section_data (o)->this_hdr.contents = ocontents;
1951 }
1952
1953 }
886e427f 1954 irelscan->r_addend -= calc_fixup (irelscan->r_addend, 0, sec);
7ba29e2a
NC		 1955 }
1956 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_SYM_OP_SYM)
1957 {
1958 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1959
1960 /* Look at the reloc only if the value has been resolved. */
1961 if (ocontents == NULL)
1962 {
1963 if (elf_section_data (o)->this_hdr.contents != NULL)
1964 ocontents = elf_section_data (o)->this_hdr.contents;
1965 else
1966 {
1967 /* We always cache the section contents.
1968 Perhaps, if info->keep_memory is FALSE, we
1969 should free them, if we are permitted to. */
1970
1971 if (o->rawsize == 0)
1972 o->rawsize = o->size;
1973 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
1974 if (ocontents == NULL)
1975 goto error_return;
1976 if (!bfd_get_section_contents (abfd, o, ocontents,
1977 (file_ptr) 0,
1978 o->rawsize))
1979 goto error_return;
1980 elf_section_data (o)->this_hdr.contents = ocontents;
1981 }
1982 }
1983 irelscan->r_addend -= calc_fixup (irel->r_addend
1984 + isym->st_value,
886e427f 1985 0,
7ba29e2a
NC		 1986 sec);
1987 }
1988 }
1989 else if ((ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_PCREL_LO)
1990 || (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_32_LO))
1991 {
1992 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
1993
1994 /* Look at the reloc only if the value has been resolved. */
1995 if (isym->st_shndx == shndx
1996 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
1997 {
1998 bfd_vma immediate;
1999 bfd_vma target_address;
2000
2001 if (ocontents == NULL)
2002 {
2003 if (elf_section_data (o)->this_hdr.contents != NULL)
2004 ocontents = elf_section_data (o)->this_hdr.contents;
2005 else
2006 {
2007 /* We always cache the section contents.
2008 Perhaps, if info->keep_memory is FALSE, we
2009 should free them, if we are permitted to. */
2010 if (o->rawsize == 0)
2011 o->rawsize = o->size;
2012 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
2013 if (ocontents == NULL)
2014 goto error_return;
2015 if (!bfd_get_section_contents (abfd, o, ocontents,
2016 (file_ptr) 0,
2017 o->rawsize))
2018 goto error_return;
2019 elf_section_data (o)->this_hdr.contents = ocontents;
2020 }
2021 }
2022
f23200ad
ME		 2023 unsigned long instr = bfd_get_32 (abfd, ocontents + irelscan->r_offset);
2024 immediate = instr & 0x0000ffff;
7ba29e2a 2025 target_address = immediate;
886e427f 2026 offset = calc_fixup (target_address, 0, sec);
7ba29e2a
NC		 2027 immediate -= offset;
2028 irelscan->r_addend -= offset;
f23200ad
ME		 2029 microblaze_bfd_write_imm_value_32 (abfd, ocontents + irelscan->r_offset,
2030 irelscan->r_addend);
7ba29e2a
NC		 2031 }
2032 }
2033
2034 if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64)
2035 {
2036 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
2037
2038 /* Look at the reloc only if the value has been resolved. */
2039 if (isym->st_shndx == shndx
2040 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
2041 {
2042 bfd_vma immediate;
2043
2044 if (ocontents == NULL)
2045 {
2046 if (elf_section_data (o)->this_hdr.contents != NULL)
2047 ocontents = elf_section_data (o)->this_hdr.contents;
2048 else
2049 {
2050 /* We always cache the section contents.
2051 Perhaps, if info->keep_memory is FALSE, we
2052 should free them, if we are permitted to. */
2053
2054 if (o->rawsize == 0)
2055 o->rawsize = o->size;
2056 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
2057 if (ocontents == NULL)
2058 goto error_return;
2059 if (!bfd_get_section_contents (abfd, o, ocontents,
2060 (file_ptr) 0,
2061 o->rawsize))
2062 goto error_return;
2063 elf_section_data (o)->this_hdr.contents = ocontents;
2064 }
2065 }
f23200ad
ME		 2066 unsigned long instr_hi = bfd_get_32 (abfd, ocontents
2067 + irelscan->r_offset);
2068 unsigned long instr_lo = bfd_get_32 (abfd, ocontents
2069 + irelscan->r_offset
2070 + INST_WORD_SIZE);
2071 immediate = (instr_hi & 0x0000ffff) << 16;
2072 immediate |= (instr_lo & 0x0000ffff);
886e427f 2073 offset = calc_fixup (irelscan->r_addend, 0, sec);
7ba29e2a
NC		 2074 immediate -= offset;
2075 irelscan->r_addend -= offset;
2076 }
2077 }
2078 else if (ELF32_R_TYPE (irelscan->r_info) == (int) R_MICROBLAZE_64_PCREL)
2079 {
2080 isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
2081
2082 /* Look at the reloc only if the value has been resolved. */
2083 if (isym->st_shndx == shndx
2084 && (ELF32_ST_TYPE (isym->st_info) == STT_SECTION))
2085 {
2086 bfd_vma immediate;
2087 bfd_vma target_address;
2088
2089 if (ocontents == NULL)
2090 {
2091 if (elf_section_data (o)->this_hdr.contents != NULL)
2092 ocontents = elf_section_data (o)->this_hdr.contents;
2093 else
2094 {
2095 /* We always cache the section contents.
2096 Perhaps, if info->keep_memory is FALSE, we
2097 should free them, if we are permitted to. */
2098 if (o->rawsize == 0)
2099 o->rawsize = o->size;
2100 ocontents = (bfd_byte *) bfd_malloc (o->rawsize);
2101 if (ocontents == NULL)
2102 goto error_return;
2103 if (!bfd_get_section_contents (abfd, o, ocontents,
2104 (file_ptr) 0,
2105 o->rawsize))
2106 goto error_return;
2107 elf_section_data (o)->this_hdr.contents = ocontents;
2108 }
2109 }
f23200ad
ME		 2110 unsigned long instr_hi = bfd_get_32 (abfd, ocontents
2111 + irelscan->r_offset);
2112 unsigned long instr_lo = bfd_get_32 (abfd, ocontents
2113 + irelscan->r_offset
2114 + INST_WORD_SIZE);
2115 immediate = (instr_hi & 0x0000ffff) << 16;
2116 immediate |= (instr_lo & 0x0000ffff);
7ba29e2a 2117 target_address = immediate;
886e427f 2118 offset = calc_fixup (target_address, 0, sec);
7ba29e2a
NC		 2119 immediate -= offset;
2120 irelscan->r_addend -= offset;
f23200ad
ME		 2121 microblaze_bfd_write_imm_value_64 (abfd, ocontents
2122 + irelscan->r_offset, immediate);
7ba29e2a
NC		 2123 }
2124 }
2125 }
2126 }
2127
2128 /* Adjust the local symbols defined in this section. */
2129 isymend = isymbuf + symtab_hdr->sh_info;
2130 for (isym = isymbuf; isym < isymend; isym++)
2131 {
2132 if (isym->st_shndx == shndx)
886e427f
ME		 2133 {
2134 isym->st_value -= calc_fixup (isym->st_value, 0, sec);
2135 if (isym->st_size)
2136 isym->st_size -= calc_fixup (isym->st_value, isym->st_size, sec);
2137 }
7ba29e2a
NC		 2138 }
2139
2140 /* Now adjust the global symbols defined in this section. */
2141 isym = isymbuf + symtab_hdr->sh_info;
886e427f
ME		 2142 symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)) - symtab_hdr->sh_info;
2143 for (sym_index = 0; sym_index < symcount; sym_index++)
7ba29e2a 2144 {
91d6fa6a 2145 sym_hash = elf_sym_hashes (abfd)[sym_index];
886e427f 2146 if ((sym_hash->root.type == bfd_link_hash_defined
7ba29e2a
NC		 2147 || sym_hash->root.type == bfd_link_hash_defweak)
2148 && sym_hash->root.u.def.section == sec)
886e427f
ME		 2149 {
2150 sym_hash->root.u.def.value -= calc_fixup (sym_hash->root.u.def.value,
2151 0, sec);
2152 if (sym_hash->size)
2153 sym_hash->size -= calc_fixup (sym_hash->root.u.def.value,
2154 sym_hash->size, sec);
2155 }
2156 }
7ba29e2a
NC		 2157
2158 /* Physically move the code and change the cooked size. */
2159 dest = sec->relax[0].addr;
2160 for (i = 0; i < sec->relax_count; i++)
2161 {
2162 int len;
2163 src = sec->relax[i].addr + sec->relax[i].size;
2164 len = sec->relax[i+1].addr - sec->relax[i].addr - sec->relax[i].size;
2165
2166 memmove (contents + dest, contents + src, len);
2167 sec->size -= sec->relax[i].size;
2168 dest += len;
2169 }
2170
2171 elf_section_data (sec)->relocs = internal_relocs;
2172 free_relocs = NULL;
2173
2174 elf_section_data (sec)->this_hdr.contents = contents;
2175 free_contents = NULL;
2176
2177 symtab_hdr->contents = (bfd_byte *) isymbuf;
2178 }
2179
2180 if (free_relocs != NULL)
2181 {
2182 free (free_relocs);
2183 free_relocs = NULL;
2184 }
2185
2186 if (free_contents != NULL)
2187 {
2188 if (!link_info->keep_memory)
2189 free (free_contents);
2190 else
2191 /* Cache the section contents for elf_link_input_bfd. */
2192 elf_section_data (sec)->this_hdr.contents = contents;
2193 free_contents = NULL;
2194 }
2195
2196 if (sec->relax_count == 0)
2197 {
f23200ad 2198 *again = FALSE;
7ba29e2a
NC		 2199 free (sec->relax);
2200 sec->relax = NULL;
2201 }
f23200ad
ME		 2202 else
2203 *again = TRUE;
7ba29e2a
NC		 2204 return TRUE;
2205
2206 error_return:
2207 if (free_relocs != NULL)
2208 free (free_relocs);
2209 if (free_contents != NULL)
2210 free (free_contents);
2211 if (sec->relax != NULL)
2212 {
2213 free (sec->relax);
2214 sec->relax = NULL;
2215 sec->relax_count = 0;
2216 }
2217 return FALSE;
2218}
2219
2220/* Return the section that should be marked against GC for a given
2221 relocation. */
2222
2223static asection *
2224microblaze_elf_gc_mark_hook (asection *sec,
fb34365b 2225 struct bfd_link_info * info,
7ba29e2a
NC		 2226 Elf_Internal_Rela * rel,
2227 struct elf_link_hash_entry * h,
2228 Elf_Internal_Sym * sym)
2229{
2230 if (h != NULL)
fb34365b
AM		 2231 switch (ELF32_R_TYPE (rel->r_info))
2232 {
2233 case R_MICROBLAZE_GNU_VTINHERIT:
2234 case R_MICROBLAZE_GNU_VTENTRY:
2235 return NULL;
2236 }
2237
2238 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
7ba29e2a
NC		 2239}
2240
2241/* Update the got entry reference counts for the section being removed. */
2242
2243static bfd_boolean
2244microblaze_elf_gc_sweep_hook (bfd * abfd ATTRIBUTE_UNUSED,
2245 struct bfd_link_info * info ATTRIBUTE_UNUSED,
2246 asection * sec ATTRIBUTE_UNUSED,
2247 const Elf_Internal_Rela * relocs ATTRIBUTE_UNUSED)
2248{
2249 return TRUE;
2250}
2251
2252/* PIC support. */
2253
2254#define PLT_ENTRY_SIZE 16
2255
2256#define PLT_ENTRY_WORD_0 0xb0000000 /* "imm 0". */
2257#define PLT_ENTRY_WORD_1 0xe9940000 /* "lwi r12,r20,0" - relocated to lwi r12,r20,func@GOT. */
2258#define PLT_ENTRY_WORD_1_NOPIC 0xe9800000 /* "lwi r12,r0,0" - non-PIC object. */
2259#define PLT_ENTRY_WORD_2 0x98186000 /* "brad r12". */
2260#define PLT_ENTRY_WORD_3 0x80000000 /* "nop". */
2261
2262/* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up
2263 shortcuts to them in our hash table. */
2264
2265static bfd_boolean
2266create_got_section (bfd *dynobj, struct bfd_link_info *info)
2267{
2268 struct elf32_mb_link_hash_table *htab;
2269
2270 if (! _bfd_elf_create_got_section (dynobj, info))
2271 return FALSE;
2272 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2273 if (htab == NULL)
2274 return FALSE;
2275
3d4d4302
AM		 2276 htab->sgot = bfd_get_linker_section (dynobj, ".got");
2277 htab->sgotplt = bfd_get_linker_section (dynobj, ".got.plt");
7ba29e2a
NC		 2278 if (!htab->sgot || !htab->sgotplt)
2279 return FALSE;
2280
3d4d4302
AM		 2281 if ((htab->srelgot = bfd_get_linker_section (dynobj, ".rela.got")) == NULL)
2282 htab->srelgot = bfd_make_section_anyway (dynobj, ".rela.got");
7ba29e2a
NC		 2283 if (htab->srelgot == NULL
2284 || ! bfd_set_section_flags (dynobj, htab->srelgot, SEC_ALLOC
2285 | SEC_LOAD
2286 | SEC_HAS_CONTENTS
2287 | SEC_IN_MEMORY
2288 | SEC_LINKER_CREATED
2289 | SEC_READONLY)
2290 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 2))
2291 return FALSE;
2292 return TRUE;
2293}
2294
69b06cc8
ME		 2295static bfd_boolean
2296update_local_sym_info (bfd *abfd,
2297 Elf_Internal_Shdr *symtab_hdr,
2298 unsigned long r_symndx,
2299 unsigned int tls_type)
2300{
2301 bfd_signed_vma *local_got_refcounts = elf_local_got_refcounts (abfd);
2302 unsigned char *local_got_tls_masks;
2303
2304 if (local_got_refcounts == NULL)
2305 {
2306 bfd_size_type size = symtab_hdr->sh_info;
2307
2308 size *= (sizeof (*local_got_refcounts) + sizeof (*local_got_tls_masks));
2309 local_got_refcounts = bfd_zalloc (abfd, size);
2310 if (local_got_refcounts == NULL)
2311 return FALSE;
2312 elf_local_got_refcounts (abfd) = local_got_refcounts;
2313 }
2314
2315 local_got_tls_masks =
2316 (unsigned char *) (local_got_refcounts + symtab_hdr->sh_info);
2317 local_got_tls_masks[r_symndx] |= tls_type;
2318 local_got_refcounts[r_symndx] += 1;
2319
2320 return TRUE;
2321}
7ba29e2a
NC		 2322/* Look through the relocs for a section during the first phase. */
2323
2324static bfd_boolean
2325microblaze_elf_check_relocs (bfd * abfd,
2326 struct bfd_link_info * info,
2327 asection * sec,
2328 const Elf_Internal_Rela * relocs)
2329{
2330 Elf_Internal_Shdr * symtab_hdr;
2331 struct elf_link_hash_entry ** sym_hashes;
2332 struct elf_link_hash_entry ** sym_hashes_end;
2333 const Elf_Internal_Rela * rel;
2334 const Elf_Internal_Rela * rel_end;
2335 struct elf32_mb_link_hash_table *htab;
7ba29e2a
NC		 2336 asection *sreloc = NULL;
2337
0e1862bb 2338 if (bfd_link_relocatable (info))
7ba29e2a
NC		 2339 return TRUE;
2340
2341 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2342 if (htab == NULL)
2343 return FALSE;
2344
7ba29e2a
NC		 2345 symtab_hdr = & elf_tdata (abfd)->symtab_hdr;
2346 sym_hashes = elf_sym_hashes (abfd);
2347 sym_hashes_end = sym_hashes + symtab_hdr->sh_size / sizeof (Elf32_External_Sym);
2348 if (!elf_bad_symtab (abfd))
2349 sym_hashes_end -= symtab_hdr->sh_info;
2350
2351 rel_end = relocs + sec->reloc_count;
2352
2353 for (rel = relocs; rel < rel_end; rel++)
2354 {
2355 unsigned int r_type;
2356 struct elf_link_hash_entry * h;
2357 unsigned long r_symndx;
69b06cc8 2358 unsigned char tls_type = 0;
7ba29e2a
NC		 2359
2360 r_symndx = ELF32_R_SYM (rel->r_info);
2361 r_type = ELF32_R_TYPE (rel->r_info);
2362
2363 if (r_symndx < symtab_hdr->sh_info)
2364 h = NULL;
2365 else
81fbe831
AM		 2366 {
2367 h = sym_hashes [r_symndx - symtab_hdr->sh_info];
2368
2369 /* PR15323, ref flags aren't set for references in the same
2370 object. */
2371 h->root.non_ir_ref = 1;
2372 }
7ba29e2a
NC		 2373
2374 switch (r_type)
2375 {
2376 /* This relocation describes the C++ object vtable hierarchy.
2377 Reconstruct it for later use during GC. */
2378 case R_MICROBLAZE_GNU_VTINHERIT:
2379 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
2380 return FALSE;
2381 break;
2382
2383 /* This relocation describes which C++ vtable entries are actually
2384 used. Record for later use during GC. */
2385 case R_MICROBLAZE_GNU_VTENTRY:
2386 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
2387 return FALSE;
2388 break;
2389
2390 /* This relocation requires .plt entry. */
2391 case R_MICROBLAZE_PLT_64:
2392 if (h != NULL)
2393 {
2394 h->needs_plt = 1;
2395 h->plt.refcount += 1;
2396 }
2397 break;
2398
2399 /* This relocation requires .got entry. */
69b06cc8
ME		 2400 case R_MICROBLAZE_TLSGD:
2401 tls_type |= (TLS_TLS | TLS_GD);
2402 goto dogottls;
2403 case R_MICROBLAZE_TLSLD:
2404 tls_type |= (TLS_TLS | TLS_LD);
1a0670f3 2405 /* Fall through. */
69b06cc8
ME		 2406 dogottls:
2407 sec->has_tls_reloc = 1;
1a0670f3 2408 /* Fall through. */
7ba29e2a
NC		 2409 case R_MICROBLAZE_GOT_64:
2410 if (htab->sgot == NULL)
2411 {
2412 if (htab->elf.dynobj == NULL)
2413 htab->elf.dynobj = abfd;
2414 if (!create_got_section (htab->elf.dynobj, info))
2415 return FALSE;
2416 }
2417 if (h != NULL)
2418 {
2419 h->got.refcount += 1;
69b06cc8 2420 elf32_mb_hash_entry (h)->tls_mask |= tls_type;
7ba29e2a
NC		 2421 }
2422 else
2423 {
69b06cc8
ME		 2424 if (! update_local_sym_info(abfd, symtab_hdr, r_symndx, tls_type) )
2425 return FALSE;
7ba29e2a
NC		 2426 }
2427 break;
2428
2429 case R_MICROBLAZE_64:
2430 case R_MICROBLAZE_64_PCREL:
2431 case R_MICROBLAZE_32:
2432 {
0e1862bb 2433 if (h != NULL && !bfd_link_pic (info))
7ba29e2a
NC		 2434 {
2435 /* we may need a copy reloc. */
2436 h->non_got_ref = 1;
2437
2438 /* we may also need a .plt entry. */
2439 h->plt.refcount += 1;
2440 if (ELF32_R_TYPE (rel->r_info) != R_MICROBLAZE_64_PCREL)
2441 h->pointer_equality_needed = 1;
2442 }
2443
2444
2445 /* If we are creating a shared library, and this is a reloc
2446 against a global symbol, or a non PC relative reloc
2447 against a local symbol, then we need to copy the reloc
2448 into the shared library. However, if we are linking with
2449 -Bsymbolic, we do not need to copy a reloc against a
2450 global symbol which is defined in an object we are
2451 including in the link (i.e., DEF_REGULAR is set). At
2452 this point we have not seen all the input files, so it is
2453 possible that DEF_REGULAR is not set now but will be set
2454 later (it is never cleared). In case of a weak definition,
2455 DEF_REGULAR may be cleared later by a strong definition in
2456 a shared library. We account for that possibility below by
2457 storing information in the relocs_copied field of the hash
2458 table entry. A similar situation occurs when creating
2459 shared libraries and symbol visibility changes render the
2460 symbol local.
2461
2462 If on the other hand, we are creating an executable, we
2463 may need to keep relocations for symbols satisfied by a
2464 dynamic library if we manage to avoid copy relocs for the
2465 symbol. */
2466
0e1862bb 2467 if ((bfd_link_pic (info)
7ba29e2a
NC		 2468 && (sec->flags & SEC_ALLOC) != 0
2469 && (r_type != R_MICROBLAZE_64_PCREL
2470 || (h != NULL
2471 && (! info->symbolic
2472 || h->root.type == bfd_link_hash_defweak
2473 || !h->def_regular))))
0e1862bb 2474 || (!bfd_link_pic (info)
7ba29e2a
NC		 2475 && (sec->flags & SEC_ALLOC) != 0
2476 && h != NULL
2477 && (h->root.type == bfd_link_hash_defweak
2478 || !h->def_regular)))
2479 {
2480 struct elf32_mb_dyn_relocs *p;
2481 struct elf32_mb_dyn_relocs **head;
2482
2483 /* When creating a shared object, we must copy these
2484 relocs into the output file. We create a reloc
2485 section in dynobj and make room for the reloc. */
2486
2487 if (sreloc == NULL)
2488 {
7ba29e2a 2489 bfd *dynobj;
7ba29e2a
NC		 2490
2491 if (htab->elf.dynobj == NULL)
2492 htab->elf.dynobj = abfd;
2493 dynobj = htab->elf.dynobj;
2494
69b06cc8
ME		 2495 sreloc = _bfd_elf_make_dynamic_reloc_section (sec, dynobj,
2496 2, abfd, 1);
7ba29e2a 2497 if (sreloc == NULL)
69b06cc8 2498 return FALSE;
7ba29e2a
NC		 2499 }
2500
2501 /* If this is a global symbol, we count the number of
2502 relocations we need for this symbol. */
2503 if (h != NULL)
2504 head = &((struct elf32_mb_link_hash_entry *) h)->dyn_relocs;
2505 else
2506 {
2507 /* Track dynamic relocs needed for local syms too.
2508 We really need local syms available to do this
2509 easily. Oh well. */
2510
2511 asection *s;
2512 Elf_Internal_Sym *isym;
918d9742 2513 void *vpp;
7ba29e2a
NC		 2514
2515 isym = bfd_sym_from_r_symndx (&htab->sym_sec,
2516 abfd, r_symndx);
2517 if (isym == NULL)
2518 return FALSE;
2519
2520 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
2521 if (s == NULL)
2522 return FALSE;
2523
918d9742
TT		 2524 vpp = &elf_section_data (s)->local_dynrel;
2525 head = (struct elf32_mb_dyn_relocs **) vpp;
7ba29e2a
NC		 2526 }
2527
2528 p = *head;
2529 if (p == NULL || p->sec != sec)
2530 {
2531 bfd_size_type amt = sizeof *p;
2532 p = ((struct elf32_mb_dyn_relocs *)
2533 bfd_alloc (htab->elf.dynobj, amt));
2534 if (p == NULL)
2535 return FALSE;
2536 p->next = *head;
2537 *head = p;
2538 p->sec = sec;
2539 p->count = 0;
2540 p->pc_count = 0;
2541 }
2542
2543 p->count += 1;
2544 if (r_type == R_MICROBLAZE_64_PCREL)
2545 p->pc_count += 1;
2546 }
2547 }
2548 break;
2549 }
2550 }
2551
2552 return TRUE;
2553}
2554
2555static bfd_boolean
2556microblaze_elf_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info)
2557{
2558 struct elf32_mb_link_hash_table *htab;
2559
2560 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2561 if (htab == NULL)
2562 return FALSE;
2563
7ba29e2a
NC		 2564 if (!htab->sgot && !create_got_section (dynobj, info))
2565 return FALSE;
2566
2567 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
2568 return FALSE;
2569
3d4d4302
AM		 2570 htab->splt = bfd_get_linker_section (dynobj, ".plt");
2571 htab->srelplt = bfd_get_linker_section (dynobj, ".rela.plt");
2572 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss");
0e1862bb 2573 if (!bfd_link_pic (info))
3d4d4302 2574 htab->srelbss = bfd_get_linker_section (dynobj, ".rela.bss");
7ba29e2a
NC		 2575
2576 if (!htab->splt || !htab->srelplt || !htab->sdynbss
0e1862bb 2577 || (!bfd_link_pic (info) && !htab->srelbss))
7ba29e2a
NC		 2578 abort ();
2579
2580 return TRUE;
2581}
2582
2583/* Copy the extra info we tack onto an elf_link_hash_entry. */
2584
2585static void
2586microblaze_elf_copy_indirect_symbol (struct bfd_link_info *info,
2587 struct elf_link_hash_entry *dir,
2588 struct elf_link_hash_entry *ind)
2589{
2590 struct elf32_mb_link_hash_entry *edir, *eind;
2591
2592 edir = (struct elf32_mb_link_hash_entry *) dir;
2593 eind = (struct elf32_mb_link_hash_entry *) ind;
2594
2595 if (eind->dyn_relocs != NULL)
2596 {
2597 if (edir->dyn_relocs != NULL)
2598 {
2599 struct elf32_mb_dyn_relocs **pp;
2600 struct elf32_mb_dyn_relocs *p;
2601
2602 if (ind->root.type == bfd_link_hash_indirect)
2603 abort ();
2604
2605 /* Add reloc counts against the weak sym to the strong sym
2606 list. Merge any entries against the same section. */
2607 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
2608 {
2609 struct elf32_mb_dyn_relocs *q;
2610
2611 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2612 if (q->sec == p->sec)
2613 {
2614 q->pc_count += p->pc_count;
2615 q->count += p->count;
2616 *pp = p->next;
2617 break;
2618 }
2619 if (q == NULL)
2620 pp = &p->next;
2621 }
2622 *pp = edir->dyn_relocs;
2623 }
2624
2625 edir->dyn_relocs = eind->dyn_relocs;
2626 eind->dyn_relocs = NULL;
2627 }
2628
69b06cc8
ME		 2629 edir->tls_mask |= eind->tls_mask;
2630
7ba29e2a
NC		 2631 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2632}
2633
2634static bfd_boolean
2635microblaze_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
2636 struct elf_link_hash_entry *h)
2637{
2638 struct elf32_mb_link_hash_table *htab;
2639 struct elf32_mb_link_hash_entry * eh;
2640 struct elf32_mb_dyn_relocs *p;
2641 asection *sdynbss, *s;
2642 unsigned int power_of_two;
2643 bfd *dynobj;
2644
2645 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2646 if (htab == NULL)
2647 return FALSE;
7ba29e2a
NC		 2648
2649 /* If this is a function, put it in the procedure linkage table. We
2650 will fill in the contents of the procedure linkage table later,
2651 when we know the address of the .got section. */
2652 if (h->type == STT_FUNC
2653 || h->needs_plt)
2654 {
2655 if (h->plt.refcount <= 0
2656 || SYMBOL_CALLS_LOCAL (info, h)
2657 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2658 && h->root.type == bfd_link_hash_undefweak))
2659 {
2660 /* This case can occur if we saw a PLT reloc in an input
2661 file, but the symbol was never referred to by a dynamic
2662 object, or if all references were garbage collected. In
2663 such a case, we don't actually need to build a procedure
2664 linkage table, and we can just do a PC32 reloc instead. */
2665 h->plt.offset = (bfd_vma) -1;
2666 h->needs_plt = 0;
2667 }
2668
2669 return TRUE;
2670 }
2671 else
2672 /* It's possible that we incorrectly decided a .plt reloc was
2673 needed for an R_MICROBLAZE_64_PCREL reloc to a non-function sym in
2674 check_relocs. We can't decide accurately between function and
2675 non-function syms in check-relocs; Objects loaded later in
2676 the link may change h->type. So fix it now. */
2677 h->plt.offset = (bfd_vma) -1;
2678
2679 /* If this is a weak symbol, and there is a real definition, the
2680 processor independent code will have arranged for us to see the
2681 real definition first, and we can just use the same value. */
2682 if (h->u.weakdef != NULL)
2683 {
2684 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2685 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2686 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2687 h->root.u.def.value = h->u.weakdef->root.u.def.value;
2688 return TRUE;
2689 }
2690
2691 /* This is a reference to a symbol defined by a dynamic object which
2692 is not a function. */
2693
2694 /* If we are creating a shared library, we must presume that the
2695 only references to the symbol are via the global offset table.
2696 For such cases we need not do anything here; the relocations will
2697 be handled correctly by relocate_section. */
0e1862bb 2698 if (bfd_link_pic (info))
7ba29e2a
NC		 2699 return TRUE;
2700
2701 /* If there are no references to this symbol that do not use the
2702 GOT, we don't need to generate a copy reloc. */
2703 if (!h->non_got_ref)
2704 return TRUE;
2705
2706 /* If -z nocopyreloc was given, we won't generate them either. */
2707 if (info->nocopyreloc)
2708 {
2709 h->non_got_ref = 0;
2710 return TRUE;
2711 }
2712
2713 eh = (struct elf32_mb_link_hash_entry *) h;
2714 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2715 {
2716 s = p->sec->output_section;
2717 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2718 break;
2719 }
2720
2721 /* If we didn't find any dynamic relocs in read-only sections, then
2722 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2723 if (p == NULL)
2724 {
2725 h->non_got_ref = 0;
2726 return TRUE;
2727 }
2728
2729 /* We must allocate the symbol in our .dynbss section, which will
2730 become part of the .bss section of the executable. There will be
2731 an entry for this symbol in the .dynsym section. The dynamic
2732 object will contain position independent code, so all references
2733 from the dynamic object to this symbol will go through the global
2734 offset table. The dynamic linker will use the .dynsym entry to
2735 determine the address it must put in the global offset table, so
2736 both the dynamic object and the regular object will refer to the
2737 same memory location for the variable. */
2738
2739 /* We must generate a R_MICROBLAZE_COPY reloc to tell the dynamic linker
2740 to copy the initial value out of the dynamic object and into the
2741 runtime process image. */
2742 dynobj = elf_hash_table (info)->dynobj;
2743 BFD_ASSERT (dynobj != NULL);
2744 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
2745 {
2746 htab->srelbss->size += sizeof (Elf32_External_Rela);
2747 h->needs_copy = 1;
2748 }
2749
2750 /* We need to figure out the alignment required for this symbol. I
2751 have no idea how ELF linkers handle this. */
2752 power_of_two = bfd_log2 (h->size);
2753 if (power_of_two > 3)
2754 power_of_two = 3;
2755
2756 sdynbss = htab->sdynbss;
2757 /* Apply the required alignment. */
2758 sdynbss->size = BFD_ALIGN (sdynbss->size, (bfd_size_type) (1 << power_of_two));
2759 if (power_of_two > bfd_get_section_alignment (dynobj, sdynbss))
2760 {
2761 if (! bfd_set_section_alignment (dynobj, sdynbss, power_of_two))
2762 return FALSE;
2763 }
2764
2765 /* Define the symbol as being at this point in the section. */
2766 h->root.u.def.section = sdynbss;
2767 h->root.u.def.value = sdynbss->size;
2768
2769 /* Increment the section size to make room for the symbol. */
2770 sdynbss->size += h->size;
2771 return TRUE;
2772}
2773
2774/* Allocate space in .plt, .got and associated reloc sections for
2775 dynamic relocs. */
2776
2777static bfd_boolean
2778allocate_dynrelocs (struct elf_link_hash_entry *h, void * dat)
2779{
2780 struct bfd_link_info *info;
2781 struct elf32_mb_link_hash_table *htab;
2782 struct elf32_mb_link_hash_entry *eh;
2783 struct elf32_mb_dyn_relocs *p;
2784
2785 if (h->root.type == bfd_link_hash_indirect)
2786 return TRUE;
2787
7ba29e2a
NC		 2788 info = (struct bfd_link_info *) dat;
2789 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2790 if (htab == NULL)
2791 return FALSE;
7ba29e2a
NC		 2792
2793 if (htab->elf.dynamic_sections_created
2794 && h->plt.refcount > 0)
2795 {
2796 /* Make sure this symbol is output as a dynamic symbol.
2797 Undefined weak syms won't yet be marked as dynamic. */
2798 if (h->dynindx == -1
2799 && !h->forced_local)
2800 {
2801 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2802 return FALSE;
2803 }
2804
0e1862bb 2805 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
7ba29e2a
NC		 2806 {
2807 asection *s = htab->splt;
2808
2809 /* The first entry in .plt is reserved. */
2810 if (s->size == 0)
2811 s->size = PLT_ENTRY_SIZE;
2812
2813 h->plt.offset = s->size;
2814
2815 /* If this symbol is not defined in a regular file, and we are
2816 not generating a shared library, then set the symbol to this
2817 location in the .plt. This is required to make function
2818 pointers compare as equal between the normal executable and
2819 the shared library. */
0e1862bb 2820 if (! bfd_link_pic (info)
7ba29e2a
NC		 2821 && !h->def_regular)
2822 {
2823 h->root.u.def.section = s;
2824 h->root.u.def.value = h->plt.offset;
2825 }
2826
2827 /* Make room for this entry. */
2828 s->size += PLT_ENTRY_SIZE;
2829
2830 /* We also need to make an entry in the .got.plt section, which
2831 will be placed in the .got section by the linker script. */
2832 htab->sgotplt->size += 4;
2833
2834 /* We also need to make an entry in the .rel.plt section. */
2835 htab->srelplt->size += sizeof (Elf32_External_Rela);
2836 }
2837 else
2838 {
2839 h->plt.offset = (bfd_vma) -1;
2840 h->needs_plt = 0;
2841 }
2842 }
2843 else
2844 {
2845 h->plt.offset = (bfd_vma) -1;
2846 h->needs_plt = 0;
2847 }
2848
69b06cc8 2849 eh = (struct elf32_mb_link_hash_entry *) h;
7ba29e2a
NC		 2850 if (h->got.refcount > 0)
2851 {
69b06cc8 2852 unsigned int need;
7ba29e2a
NC		 2853 asection *s;
2854
2855 /* Make sure this symbol is output as a dynamic symbol.
2856 Undefined weak syms won't yet be marked as dynamic. */
2857 if (h->dynindx == -1
2858 && !h->forced_local)
2859 {
2860 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2861 return FALSE;
2862 }
2863
69b06cc8
ME		 2864 need = 0;
2865 if ((eh->tls_mask & TLS_TLS) != 0)
2866 {
2867 /* Handle TLS Symbol */
2868 if ((eh->tls_mask & TLS_LD) != 0)
2869 {
2870 if (!eh->elf.def_dynamic)
2871 /* We'll just use htab->tlsld_got.offset. This should
2872 always be the case. It's a little odd if we have
2873 a local dynamic reloc against a non-local symbol. */
2874 htab->tlsld_got.refcount += 1;
2875 else
2876 need += 8;
2877 }
2878 if ((eh->tls_mask & TLS_GD) != 0)
2879 need += 8;
2880 }
2881 else
2882 {
2883 /* Regular (non-TLS) symbol */
2884 need += 4;
2885 }
2886 if (need == 0)
2887 {
2888 h->got.offset = (bfd_vma) -1;
2889 }
2890 else
2891 {
2892 s = htab->sgot;
2893 h->got.offset = s->size;
2894 s->size += need;
2895 htab->srelgot->size += need * (sizeof (Elf32_External_Rela) / 4);
2896 }
7ba29e2a
NC		 2897 }
2898 else
2899 h->got.offset = (bfd_vma) -1;
2900
7ba29e2a
NC		 2901 if (eh->dyn_relocs == NULL)
2902 return TRUE;
2903
2904 /* In the shared -Bsymbolic case, discard space allocated for
2905 dynamic pc-relative relocs against symbols which turn out to be
2906 defined in regular objects. For the normal shared case, discard
2907 space for pc-relative relocs that have become local due to symbol
2908 visibility changes. */
2909
0e1862bb 2910 if (bfd_link_pic (info))
7ba29e2a
NC		 2911 {
2912 if (h->def_regular
2913 && (h->forced_local
2914 || info->symbolic))
2915 {
2916 struct elf32_mb_dyn_relocs **pp;
2917
2918 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2919 {
2920 p->count -= p->pc_count;
2921 p->pc_count = 0;
2922 if (p->count == 0)
2923 *pp = p->next;
2924 else
2925 pp = &p->next;
2926 }
2927 }
2928 }
2929 else
2930 {
2931 /* For the non-shared case, discard space for relocs against
2932 symbols which turn out to need copy relocs or are not
2933 dynamic. */
2934
2935 if (!h->non_got_ref
2936 && ((h->def_dynamic
2937 && !h->def_regular)
2938 || (htab->elf.dynamic_sections_created
2939 && (h->root.type == bfd_link_hash_undefweak
2940 || h->root.type == bfd_link_hash_undefined))))
2941 {
2942 /* Make sure this symbol is output as a dynamic symbol.
2943 Undefined weak syms won't yet be marked as dynamic. */
2944 if (h->dynindx == -1
2945 && !h->forced_local)
2946 {
2947 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2948 return FALSE;
2949 }
2950
2951 /* If that succeeded, we know we'll be keeping all the
2952 relocs. */
2953 if (h->dynindx != -1)
2954 goto keep;
2955 }
2956
2957 eh->dyn_relocs = NULL;
2958
2959 keep: ;
2960 }
2961
2962 /* Finally, allocate space. */
2963 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2964 {
2965 asection *sreloc = elf_section_data (p->sec)->sreloc;
2966 sreloc->size += p->count * sizeof (Elf32_External_Rela);
2967 }
2968
2969 return TRUE;
2970}
2971
2972/* Set the sizes of the dynamic sections. */
2973
2974static bfd_boolean
2975microblaze_elf_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
2976 struct bfd_link_info *info)
2977{
2978 struct elf32_mb_link_hash_table *htab;
2979 bfd *dynobj;
2980 asection *s;
2981 bfd *ibfd;
2982
2983 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 2984 if (htab == NULL)
2985 return FALSE;
2986
7ba29e2a
NC		 2987 dynobj = htab->elf.dynobj;
2988 BFD_ASSERT (dynobj != NULL);
2989
2990 /* Set up .got offsets for local syms, and space for local dynamic
2991 relocs. */
c72f2fb2 2992 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
7ba29e2a
NC		 2993 {
2994 bfd_signed_vma *local_got;
2995 bfd_signed_vma *end_local_got;
2996 bfd_size_type locsymcount;
2997 Elf_Internal_Shdr *symtab_hdr;
69b06cc8 2998 unsigned char *lgot_masks;
7ba29e2a
NC		 2999 asection *srel;
3000
3001 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
3002 continue;
3003
3004 for (s = ibfd->sections; s != NULL; s = s->next)
3005 {
3006 struct elf32_mb_dyn_relocs *p;
3007
3008 for (p = ((struct elf32_mb_dyn_relocs *)
3009 elf_section_data (s)->local_dynrel);
3010 p != NULL;
3011 p = p->next)
3012 {
3013 if (!bfd_is_abs_section (p->sec)
3014 && bfd_is_abs_section (p->sec->output_section))
3015 {
3016 /* Input section has been discarded, either because
3017 it is a copy of a linkonce section or due to
3018 linker script /DISCARD/, so we'll be discarding
3019 the relocs too. */
3020 }
3021 else if (p->count != 0)
3022 {
3023 srel = elf_section_data (p->sec)->sreloc;
3024 srel->size += p->count * sizeof (Elf32_External_Rela);
3025 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
3026 info->flags |= DF_TEXTREL;
3027 }
3028 }
3029 }
3030
3031 local_got = elf_local_got_refcounts (ibfd);
3032 if (!local_got)
3033 continue;
3034
3035 symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
3036 locsymcount = symtab_hdr->sh_info;
3037 end_local_got = local_got + locsymcount;
69b06cc8 3038 lgot_masks = (unsigned char *) end_local_got;
7ba29e2a
NC		 3039 s = htab->sgot;
3040 srel = htab->srelgot;
3041
69b06cc8
ME		 3042 for (; local_got < end_local_got; ++local_got, ++lgot_masks)
3043 {
3044 if (*local_got > 0)
3045 {
3046 unsigned int need = 0;
3047 if ((*lgot_masks & TLS_TLS) != 0)
3048 {
3049 if ((*lgot_masks & TLS_GD) != 0)
3050 need += 8;
3051 if ((*lgot_masks & TLS_LD) != 0)
3052 htab->tlsld_got.refcount += 1;
3053 }
3054 else
3055 need += 4;
3056
3057 if (need == 0)
3058 {
3059 *local_got = (bfd_vma) -1;
3060 }
3061 else
3062 {
3063 *local_got = s->size;
3064 s->size += need;
0e1862bb 3065 if (bfd_link_pic (info))
69b06cc8
ME		 3066 srel->size += need * (sizeof (Elf32_External_Rela) / 4);
3067 }
7ba29e2a
NC		 3068 }
3069 else
3070 *local_got = (bfd_vma) -1;
3071 }
3072 }
3073
3074 /* Allocate global sym .plt and .got entries, and space for global
3075 sym dynamic relocs. */
3076 elf_link_hash_traverse (elf_hash_table (info), allocate_dynrelocs, info);
3077
69b06cc8
ME		 3078 if (htab->tlsld_got.refcount > 0)
3079 {
3080 htab->tlsld_got.offset = htab->sgot->size;
3081 htab->sgot->size += 8;
0e1862bb 3082 if (bfd_link_pic (info))
69b06cc8
ME		 3083 htab->srelgot->size += sizeof (Elf32_External_Rela);
3084 }
3085 else
3086 htab->tlsld_got.offset = (bfd_vma) -1;
3087
7ba29e2a
NC		 3088 if (elf_hash_table (info)->dynamic_sections_created)
3089 {
3090 /* Make space for the trailing nop in .plt. */
3091 if (htab->splt->size > 0)
3092 htab->splt->size += 4;
3093 }
3094
3095 /* The check_relocs and adjust_dynamic_symbol entry points have
3096 determined the sizes of the various dynamic sections. Allocate
3097 memory for them. */
3098 for (s = dynobj->sections; s != NULL; s = s->next)
3099 {
3100 const char *name;
3101 bfd_boolean strip = FALSE;
3102
3103 if ((s->flags & SEC_LINKER_CREATED) == 0)
3104 continue;
3105
3106 /* It's OK to base decisions on the section name, because none
3107 of the dynobj section names depend upon the input files. */
3108 name = bfd_get_section_name (dynobj, s);
3109
3110 if (strncmp (name, ".rela", 5) == 0)
3111 {
3112 if (s->size == 0)
3113 {
3114 /* If we don't need this section, strip it from the
3115 output file. This is to handle .rela.bss and
3116 .rela.plt. We must create it in
3117 create_dynamic_sections, because it must be created
3118 before the linker maps input sections to output
3119 sections. The linker does that before
3120 adjust_dynamic_symbol is called, and it is that
3121 function which decides whether anything needs to go
3122 into these sections. */
3123 strip = TRUE;
3124 }
3125 else
3126 {
3127 /* We use the reloc_count field as a counter if we need
3128 to copy relocs into the output file. */
3129 s->reloc_count = 0;
3130 }
3131 }
3132 else if (s != htab->splt && s != htab->sgot && s != htab->sgotplt)
3133 {
3134 /* It's not one of our sections, so don't allocate space. */
3135 continue;
3136 }
3137
3138 if (strip)
3139 {
3140 s->flags |= SEC_EXCLUDE;
3141 continue;
3142 }
3143
3144 /* Allocate memory for the section contents. */
3145 /* FIXME: This should be a call to bfd_alloc not bfd_zalloc.
3146 Unused entries should be reclaimed before the section's contents
3147 are written out, but at the moment this does not happen. Thus in
3148 order to prevent writing out garbage, we initialise the section's
3149 contents to zero. */
3150 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
3151 if (s->contents == NULL && s->size != 0)
3152 return FALSE;
3153 }
3154
3155 if (elf_hash_table (info)->dynamic_sections_created)
3156 {
3157 /* Add some entries to the .dynamic section. We fill in the
3158 values later, in microblaze_elf_finish_dynamic_sections, but we
3159 must add the entries now so that we get the correct size for
3160 the .dynamic section. The DT_DEBUG entry is filled in by the
3161 dynamic linker and used by the debugger. */
3162#define add_dynamic_entry(TAG, VAL) \
3163 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3164
0e1862bb 3165 if (bfd_link_executable (info))
7ba29e2a
NC		 3166 {
3167 if (!add_dynamic_entry (DT_DEBUG, 0))
3168 return FALSE;
3169 }
3170
3171 if (!add_dynamic_entry (DT_RELA, 0)
3172 || !add_dynamic_entry (DT_RELASZ, 0)
3173 || !add_dynamic_entry (DT_RELAENT, sizeof (Elf32_External_Rela)))
3174 return FALSE;
3175
3176 if (htab->splt->size != 0)
3177 {
3178 if (!add_dynamic_entry (DT_PLTGOT, 0)
3179 || !add_dynamic_entry (DT_PLTRELSZ, 0)
3180 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3181 || !add_dynamic_entry (DT_JMPREL, 0)
3182 || !add_dynamic_entry (DT_BIND_NOW, 1))
3183 return FALSE;
3184 }
3185
3186 if (info->flags & DF_TEXTREL)
3187 {
3188 if (!add_dynamic_entry (DT_TEXTREL, 0))
3189 return FALSE;
3190 }
3191 }
3192#undef add_dynamic_entry
3193 return TRUE;
3194}
3195
3196/* Finish up dynamic symbol handling. We set the contents of various
3197 dynamic sections here. */
3198
3199static bfd_boolean
3200microblaze_elf_finish_dynamic_symbol (bfd *output_bfd,
3201 struct bfd_link_info *info,
3202 struct elf_link_hash_entry *h,
3203 Elf_Internal_Sym *sym)
3204{
7ba29e2a 3205 struct elf32_mb_link_hash_table *htab;
69b06cc8 3206 struct elf32_mb_link_hash_entry *eh = elf32_mb_hash_entry(h);
7ba29e2a
NC		 3207
3208 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 3209 if (htab == NULL)
3210 return FALSE;
3211
7ba29e2a
NC		 3212 if (h->plt.offset != (bfd_vma) -1)
3213 {
3214 asection *splt;
3215 asection *srela;
3216 asection *sgotplt;
3217 Elf_Internal_Rela rela;
3218 bfd_byte *loc;
3219 bfd_vma plt_index;
3220 bfd_vma got_offset;
3221 bfd_vma got_addr;
3222
3223 /* This symbol has an entry in the procedure linkage table. Set
3224 it up. */
3225 BFD_ASSERT (h->dynindx != -1);
3226
3227 splt = htab->splt;
3228 srela = htab->srelplt;
3229 sgotplt = htab->sgotplt;
3230 BFD_ASSERT (splt != NULL && srela != NULL && sgotplt != NULL);
3231
3232 plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1; /* first entry reserved. */
3233 got_offset = (plt_index + 3) * 4; /* 3 reserved ??? */
3234 got_addr = got_offset;
3235
3236 /* For non-PIC objects we need absolute address of the GOT entry. */
0e1862bb 3237 if (!bfd_link_pic (info))
7ba29e2a
NC		 3238 got_addr += htab->sgotplt->output_section->vma + sgotplt->output_offset;
3239
3240 /* Fill in the entry in the procedure linkage table. */
3241 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_0 + ((got_addr >> 16) & 0xffff),
3242 splt->contents + h->plt.offset);
0e1862bb 3243 if (bfd_link_pic (info))
7ba29e2a
NC		 3244 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1 + (got_addr & 0xffff),
3245 splt->contents + h->plt.offset + 4);
3246 else
3247 bfd_put_32 (output_bfd, PLT_ENTRY_WORD_1_NOPIC + (got_addr & 0xffff),
3248 splt->contents + h->plt.offset + 4);
3249 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_2,
3250 splt->contents + h->plt.offset + 8);
3251 bfd_put_32 (output_bfd, (bfd_vma) PLT_ENTRY_WORD_3,
3252 splt->contents + h->plt.offset + 12);
3253
3254 /* Any additions to the .got section??? */
3255 /* bfd_put_32 (output_bfd,
3256 splt->output_section->vma + splt->output_offset + h->plt.offset + 4,
3257 sgotplt->contents + got_offset); */
3258
3259 /* Fill in the entry in the .rela.plt section. */
3260 rela.r_offset = (sgotplt->output_section->vma
3261 + sgotplt->output_offset
3262 + got_offset);
3263 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_JUMP_SLOT);
3264 rela.r_addend = 0;
3265 loc = srela->contents;
3266 loc += plt_index * sizeof (Elf32_External_Rela);
3267 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
3268
3269 if (!h->def_regular)
3270 {
3271 /* Mark the symbol as undefined, rather than as defined in
3272 the .plt section. Zero the value. */
3273 sym->st_shndx = SHN_UNDEF;
3274 sym->st_value = 0;
3275 }
3276 }
3277
69b06cc8
ME		 3278 /* h->got.refcount to be checked ? */
3279 if (h->got.offset != (bfd_vma) -1 &&
3280 ! ((h->got.offset & 1) ||
3281 IS_TLS_LD(eh->tls_mask) || IS_TLS_GD(eh->tls_mask)))
7ba29e2a
NC		 3282 {
3283 asection *sgot;
3284 asection *srela;
69b06cc8 3285 bfd_vma offset;
7ba29e2a
NC		 3286
3287 /* This symbol has an entry in the global offset table. Set it
3288 up. */
3289
3290 sgot = htab->sgot;
3291 srela = htab->srelgot;
3292 BFD_ASSERT (sgot != NULL && srela != NULL);
3293
69b06cc8 3294 offset = (sgot->output_section->vma + sgot->output_offset
47993b4a 3295 + (h->got.offset &~ (bfd_vma) 1));
7ba29e2a
NC		 3296
3297 /* If this is a -Bsymbolic link, and the symbol is defined
3298 locally, we just want to emit a RELATIVE reloc. Likewise if
3299 the symbol was forced to be local because of a version file.
3300 The entry in the global offset table will already have been
3301 initialized in the relocate_section function. */
0e1862bb 3302 if (bfd_link_pic (info)
47993b4a
RF		 3303 && ((info->symbolic && h->def_regular)
3304 || h->dynindx == -1))
7ba29e2a
NC		 3305 {
3306 asection *sec = h->root.u.def.section;
69b06cc8
ME		 3307 microblaze_elf_output_dynamic_relocation (output_bfd,
3308 srela, srela->reloc_count++,
3309 /* symindex= */ 0,
3310 R_MICROBLAZE_REL, offset,
3311 h->root.u.def.value
3312 + sec->output_section->vma
3313 + sec->output_offset);
7ba29e2a
NC		 3314 }
3315 else
3316 {
69b06cc8
ME		 3317 microblaze_elf_output_dynamic_relocation (output_bfd,
3318 srela, srela->reloc_count++,
3319 h->dynindx,
3320 R_MICROBLAZE_GLOB_DAT,
3321 offset, 0);
7ba29e2a
NC		 3322 }
3323
3324 bfd_put_32 (output_bfd, (bfd_vma) 0,
3325 sgot->contents + (h->got.offset &~ (bfd_vma) 1));
7ba29e2a
NC		 3326 }
3327
3328 if (h->needs_copy)
3329 {
3330 asection *s;
3331 Elf_Internal_Rela rela;
3332 bfd_byte *loc;
3333
3334 /* This symbols needs a copy reloc. Set it up. */
3335
3336 BFD_ASSERT (h->dynindx != -1);
3337
3d4d4302 3338 s = bfd_get_linker_section (htab->elf.dynobj, ".rela.bss");
7ba29e2a
NC		 3339 BFD_ASSERT (s != NULL);
3340
3341 rela.r_offset = (h->root.u.def.value
3342 + h->root.u.def.section->output_section->vma
3343 + h->root.u.def.section->output_offset);
3344 rela.r_info = ELF32_R_INFO (h->dynindx, R_MICROBLAZE_COPY);
3345 rela.r_addend = 0;
3346 loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
3347 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
3348 }
3349
3350 /* Mark some specially defined symbols as absolute. */
9637f6ef
L		 3351 if (h == htab->elf.hdynamic
3352 || h == htab->elf.hgot
3353 || h == htab->elf.hplt)
7ba29e2a
NC		 3354 sym->st_shndx = SHN_ABS;
3355
3356 return TRUE;
3357}
3358
3359
3360/* Finish up the dynamic sections. */
3361
3362static bfd_boolean
3363microblaze_elf_finish_dynamic_sections (bfd *output_bfd,
3364 struct bfd_link_info *info)
3365{
3366 bfd *dynobj;
3367 asection *sdyn, *sgot;
3368 struct elf32_mb_link_hash_table *htab;
3369
3370 htab = elf32_mb_hash_table (info);
4dfe6ac6
NC		 3371 if (htab == NULL)
3372 return FALSE;
3373
7ba29e2a
NC		 3374 dynobj = htab->elf.dynobj;
3375
3d4d4302 3376 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
7ba29e2a
NC		 3377
3378 if (htab->elf.dynamic_sections_created)
3379 {
3380 asection *splt;
3381 Elf32_External_Dyn *dyncon, *dynconend;
3382
3d4d4302 3383 splt = bfd_get_linker_section (dynobj, ".plt");
7ba29e2a
NC		 3384 BFD_ASSERT (splt != NULL && sdyn != NULL);
3385
3386 dyncon = (Elf32_External_Dyn *) sdyn->contents;
3387 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
3388 for (; dyncon < dynconend; dyncon++)
3389 {
3390 Elf_Internal_Dyn dyn;
3391 const char *name;
3392 bfd_boolean size;
3393
3394 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
3395
3396 switch (dyn.d_tag)
3397 {
3398 case DT_PLTGOT: name = ".got.plt"; size = FALSE; break;
3399 case DT_PLTRELSZ: name = ".rela.plt"; size = TRUE; break;
3400 case DT_JMPREL: name = ".rela.plt"; size = FALSE; break;
3401 case DT_RELA: name = ".rela.dyn"; size = FALSE; break;
3402 case DT_RELASZ: name = ".rela.dyn"; size = TRUE; break;
3403 default: name = NULL; size = FALSE; break;
3404 }
3405
3406 if (name != NULL)
3407 {
3408 asection *s;
3409
4ade44b7 3410 s = bfd_get_linker_section (dynobj, name);
7ba29e2a
NC		 3411 if (s == NULL)
3412 dyn.d_un.d_val = 0;
3413 else
3414 {
3415 if (! size)
4ade44b7 3416 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
7ba29e2a
NC		 3417 else
3418 dyn.d_un.d_val = s->size;
3419 }
3420 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
3421 }
3422 }
3423
3424 /* Clear the first entry in the procedure linkage table,
3425 and put a nop in the last four bytes. */
3426 if (splt->size > 0)
3427 {
3428 memset (splt->contents, 0, PLT_ENTRY_SIZE);
3429 bfd_put_32 (output_bfd, (bfd_vma) 0x80000000 /* nop. */,
3430 splt->contents + splt->size - 4);
3431 }
3432
3433 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
3434 }
3435
3436 /* Set the first entry in the global offset table to the address of
3437 the dynamic section. */
3d4d4302 3438 sgot = bfd_get_linker_section (dynobj, ".got.plt");
7ba29e2a
NC		 3439 if (sgot && sgot->size > 0)
3440 {
3441 if (sdyn == NULL)
3442 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
3443 else
3444 bfd_put_32 (output_bfd,
3445 sdyn->output_section->vma + sdyn->output_offset,
3446 sgot->contents);
3447 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
3448 }
3449
3450 if (htab->sgot && htab->sgot->size > 0)
3451 elf_section_data (htab->sgot->output_section)->this_hdr.sh_entsize = 4;
3452
3453 return TRUE;
3454}
3455
3456/* Hook called by the linker routine which adds symbols from an object
3457 file. We use it to put .comm items in .sbss, and not .bss. */
3458
3459static bfd_boolean
3460microblaze_elf_add_symbol_hook (bfd *abfd,
3461 struct bfd_link_info *info,
3462 Elf_Internal_Sym *sym,
3463 const char **namep ATTRIBUTE_UNUSED,
3464 flagword *flagsp ATTRIBUTE_UNUSED,
3465 asection **secp,
3466 bfd_vma *valp)
3467{
3468 if (sym->st_shndx == SHN_COMMON
0e1862bb 3469 && !bfd_link_relocatable (info)
7ba29e2a
NC		 3470 && sym->st_size <= elf_gp_size (abfd))
3471 {
3472 /* Common symbols less than or equal to -G nn bytes are automatically
3473 put into .sbss. */
3d4d4302 3474 *secp = bfd_make_section_old_way (abfd, ".sbss");
7ba29e2a
NC		 3475 if (*secp == NULL
3476 || ! bfd_set_section_flags (abfd, *secp, SEC_IS_COMMON))
3477 return FALSE;
3478
3479 *valp = sym->st_size;
3480 }
3481
3482 return TRUE;
3483}
3484
6d00b590 3485#define TARGET_LITTLE_SYM microblaze_elf32_le_vec
f23200ad 3486#define TARGET_LITTLE_NAME "elf32-microblazeel"
7ba29e2a 3487
6d00b590 3488#define TARGET_BIG_SYM microblaze_elf32_vec
7ba29e2a
NC		 3489#define TARGET_BIG_NAME "elf32-microblaze"
3490
3491#define ELF_ARCH bfd_arch_microblaze
ae95ffa6 3492#define ELF_TARGET_ID MICROBLAZE_ELF_DATA
7ba29e2a
NC		 3493#define ELF_MACHINE_CODE EM_MICROBLAZE
3494#define ELF_MACHINE_ALT1 EM_MICROBLAZE_OLD
69b06cc8 3495#define ELF_MAXPAGESIZE 0x1000
7ba29e2a
NC		 3496#define elf_info_to_howto microblaze_elf_info_to_howto
3497#define elf_info_to_howto_rel NULL
3498
3499#define bfd_elf32_bfd_reloc_type_lookup microblaze_elf_reloc_type_lookup
3500#define bfd_elf32_bfd_is_local_label_name microblaze_elf_is_local_label_name
3501#define elf_backend_relocate_section microblaze_elf_relocate_section
3502#define bfd_elf32_bfd_relax_section microblaze_elf_relax_section
f23200ad 3503#define bfd_elf32_bfd_merge_private_bfd_data microblaze_elf_merge_private_bfd_data
7ba29e2a
NC		 3504#define bfd_elf32_bfd_reloc_name_lookup microblaze_elf_reloc_name_lookup
3505
3506#define elf_backend_gc_mark_hook microblaze_elf_gc_mark_hook
3507#define elf_backend_gc_sweep_hook microblaze_elf_gc_sweep_hook
3508#define elf_backend_check_relocs microblaze_elf_check_relocs
3509#define elf_backend_copy_indirect_symbol microblaze_elf_copy_indirect_symbol
3510#define bfd_elf32_bfd_link_hash_table_create microblaze_elf_link_hash_table_create
3511#define elf_backend_can_gc_sections 1
3512#define elf_backend_can_refcount 1
3513#define elf_backend_want_got_plt 1
3514#define elf_backend_plt_readonly 1
3515#define elf_backend_got_header_size 12
3516#define elf_backend_rela_normal 1
3517
3518#define elf_backend_adjust_dynamic_symbol microblaze_elf_adjust_dynamic_symbol
3519#define elf_backend_create_dynamic_sections microblaze_elf_create_dynamic_sections
3520#define elf_backend_finish_dynamic_sections microblaze_elf_finish_dynamic_sections
3521#define elf_backend_finish_dynamic_symbol microblaze_elf_finish_dynamic_symbol
3522#define elf_backend_size_dynamic_sections microblaze_elf_size_dynamic_sections
3523#define elf_backend_add_symbol_hook microblaze_elf_add_symbol_hook
3524
3525#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 0.534827 seconds and 4 git commands to generate.