Coverage Report

Created: 2025-06-24 06:45

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