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