projects / deliverable / binutils-gdb.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
aarch64: Check UNDEFWEAK_NO_DYNAMIC_RELOC
[deliverable/binutils-gdb.git] / bfd / elfnn-aarch64.c
1 /* AArch64-specific support for NN-bit ELF.
2 Copyright (C) 2009-2017 Free Software Foundation, Inc.
3 Contributed by ARM Ltd.
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; see the file COPYING3. If not,
19 see <http://www.gnu.org/licenses/>. */
20
21 /* Notes on implementation:
22
23 Thread Local Store (TLS)
24
25 Overview:
26
27 The implementation currently supports both traditional TLS and TLS
28 descriptors, but only general dynamic (GD).
29
30 For traditional TLS the assembler will present us with code
31 fragments of the form:
32
33 adrp x0, :tlsgd:foo
34 R_AARCH64_TLSGD_ADR_PAGE21(foo)
35 add x0, :tlsgd_lo12:foo
36 R_AARCH64_TLSGD_ADD_LO12_NC(foo)
37 bl __tls_get_addr
38 nop
39
40 For TLS descriptors the assembler will present us with code
41 fragments of the form:
42
43 adrp x0, :tlsdesc:foo R_AARCH64_TLSDESC_ADR_PAGE21(foo)
44 ldr x1, [x0, #:tlsdesc_lo12:foo] R_AARCH64_TLSDESC_LD64_LO12(foo)
45 add x0, x0, #:tlsdesc_lo12:foo R_AARCH64_TLSDESC_ADD_LO12(foo)
46 .tlsdesccall foo
47 blr x1 R_AARCH64_TLSDESC_CALL(foo)
48
49 The relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} against foo
50 indicate that foo is thread local and should be accessed via the
51 traditional TLS mechanims.
52
53 The relocations R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC}
54 against foo indicate that 'foo' is thread local and should be accessed
55 via a TLS descriptor mechanism.
56
57 The precise instruction sequence is only relevant from the
58 perspective of linker relaxation which is currently not implemented.
59
60 The static linker must detect that 'foo' is a TLS object and
61 allocate a double GOT entry. The GOT entry must be created for both
62 global and local TLS symbols. Note that this is different to none
63 TLS local objects which do not need a GOT entry.
64
65 In the traditional TLS mechanism, the double GOT entry is used to
66 provide the tls_index structure, containing module and offset
67 entries. The static linker places the relocation R_AARCH64_TLS_DTPMOD
68 on the module entry. The loader will subsequently fixup this
69 relocation with the module identity.
70
71 For global traditional TLS symbols the static linker places an
72 R_AARCH64_TLS_DTPREL relocation on the offset entry. The loader
73 will subsequently fixup the offset. For local TLS symbols the static
74 linker fixes up offset.
75
76 In the TLS descriptor mechanism the double GOT entry is used to
77 provide the descriptor. The static linker places the relocation
78 R_AARCH64_TLSDESC on the first GOT slot. The loader will
79 subsequently fix this up.
80
81 Implementation:
82
83 The handling of TLS symbols is implemented across a number of
84 different backend functions. The following is a top level view of
85 what processing is performed where.
86
87 The TLS implementation maintains state information for each TLS
88 symbol. The state information for local and global symbols is kept
89 in different places. Global symbols use generic BFD structures while
90 local symbols use backend specific structures that are allocated and
91 maintained entirely by the backend.
92
93 The flow:
94
95 elfNN_aarch64_check_relocs()
96
97 This function is invoked for each relocation.
98
99 The TLS relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} and
100 R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC} are
101 spotted. One time creation of local symbol data structures are
102 created when the first local symbol is seen.
103
104 The reference count for a symbol is incremented. The GOT type for
105 each symbol is marked as general dynamic.
106
107 elfNN_aarch64_allocate_dynrelocs ()
108
109 For each global with positive reference count we allocate a double
110 GOT slot. For a traditional TLS symbol we allocate space for two
111 relocation entries on the GOT, for a TLS descriptor symbol we
112 allocate space for one relocation on the slot. Record the GOT offset
113 for this symbol.
114
115 elfNN_aarch64_size_dynamic_sections ()
116
117 Iterate all input BFDS, look for in the local symbol data structure
118 constructed earlier for local TLS symbols and allocate them double
119 GOT slots along with space for a single GOT relocation. Update the
120 local symbol structure to record the GOT offset allocated.
121
122 elfNN_aarch64_relocate_section ()
123
124 Calls elfNN_aarch64_final_link_relocate ()
125
126 Emit the relevant TLS relocations against the GOT for each TLS
127 symbol. For local TLS symbols emit the GOT offset directly. The GOT
128 relocations are emitted once the first time a TLS symbol is
129 encountered. The implementation uses the LSB of the GOT offset to
130 flag that the relevant GOT relocations for a symbol have been
131 emitted. All of the TLS code that uses the GOT offset needs to take
132 care to mask out this flag bit before using the offset.
133
134 elfNN_aarch64_final_link_relocate ()
135
136 Fixup the R_AARCH64_TLSGD_{ADR_PREL21, ADD_LO12_NC} relocations. */
137
138 #include "sysdep.h"
139 #include "bfd.h"
140 #include "libiberty.h"
141 #include "libbfd.h"
142 #include "bfd_stdint.h"
143 #include "elf-bfd.h"
144 #include "bfdlink.h"
145 #include "objalloc.h"
146 #include "elf/aarch64.h"
147 #include "elfxx-aarch64.h"
148
149 #define ARCH_SIZE NN
150
151 #if ARCH_SIZE == 64
152 #define AARCH64_R(NAME) R_AARCH64_ ## NAME
153 #define AARCH64_R_STR(NAME) "R_AARCH64_" #NAME
154 #define HOWTO64(...) HOWTO (__VA_ARGS__)
155 #define HOWTO32(...) EMPTY_HOWTO (0)
156 #define LOG_FILE_ALIGN 3
157 #define BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC BFD_RELOC_AARCH64_TLSDESC_LD64_LO12
158 #endif
159
160 #if ARCH_SIZE == 32
161 #define AARCH64_R(NAME) R_AARCH64_P32_ ## NAME
162 #define AARCH64_R_STR(NAME) "R_AARCH64_P32_" #NAME
163 #define HOWTO64(...) EMPTY_HOWTO (0)
164 #define HOWTO32(...) HOWTO (__VA_ARGS__)
165 #define LOG_FILE_ALIGN 2
166 #define BFD_RELOC_AARCH64_TLSDESC_LD32_LO12 BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC
167 #define R_AARCH64_P32_TLSDESC_ADD_LO12 R_AARCH64_P32_TLSDESC_ADD_LO12_NC
168 #endif
169
170 #define IS_AARCH64_TLS_RELOC(R_TYPE) \
171 ((R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
172 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
173 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
174 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
175 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
176 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
177 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC \
178 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC \
179 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
180 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC \
181 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1 \
182 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12 \
183 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12 \
184 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC \
185 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
186 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
187 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21 \
188 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12 \
189 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC \
190 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12 \
191 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC \
192 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12 \
193 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC \
194 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12 \
195 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC \
196 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0 \
197 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC \
198 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1 \
199 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC \
200 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2 \
201 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12 \
202 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12 \
203 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC \
204 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0 \
205 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC \
206 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 \
207 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC \
208 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2 \
209 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPMOD \
210 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPREL \
211 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_TPREL \
212 || IS_AARCH64_TLSDESC_RELOC ((R_TYPE)))
213
214 #define IS_AARCH64_TLS_RELAX_RELOC(R_TYPE) \
215 ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
216 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
217 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
218 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
219 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
220 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
221 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC \
222 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
223 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
224 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1 \
225 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
226 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
227 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
228 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
229 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
230 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
231 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
232 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
233 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC \
234 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
235 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
236 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21)
237
238 #define IS_AARCH64_TLSDESC_RELOC(R_TYPE) \
239 ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC \
240 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
241 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
242 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
243 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
244 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
245 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC \
246 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD64_LO12 \
247 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
248 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
249 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
250 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1)
251
252 #define ELIMINATE_COPY_RELOCS 1
253
254 /* Return size of a relocation entry. HTAB is the bfd's
255 elf_aarch64_link_hash_entry. */
256 #define RELOC_SIZE(HTAB) (sizeof (ElfNN_External_Rela))
257
258 /* GOT Entry size - 8 bytes in ELF64 and 4 bytes in ELF32. */
259 #define GOT_ENTRY_SIZE (ARCH_SIZE / 8)
260 #define PLT_ENTRY_SIZE (32)
261 #define PLT_SMALL_ENTRY_SIZE (16)
262 #define PLT_TLSDESC_ENTRY_SIZE (32)
263
264 /* Encoding of the nop instruction. */
265 #define INSN_NOP 0xd503201f
266
267 #define aarch64_compute_jump_table_size(htab) \
268 (((htab)->root.srelplt == NULL) ? 0 \
269 : (htab)->root.srelplt->reloc_count * GOT_ENTRY_SIZE)
270
271 /* The first entry in a procedure linkage table looks like this
272 if the distance between the PLTGOT and the PLT is < 4GB use
273 these PLT entries. Note that the dynamic linker gets &PLTGOT[2]
274 in x16 and needs to work out PLTGOT[1] by using an address of
275 [x16,#-GOT_ENTRY_SIZE]. */
276 static const bfd_byte elfNN_aarch64_small_plt0_entry[PLT_ENTRY_SIZE] =
277 {
278 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
279 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
280 #if ARCH_SIZE == 64
281 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
282 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
283 #else
284 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
285 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
286 #endif
287 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
288 0x1f, 0x20, 0x03, 0xd5, /* nop */
289 0x1f, 0x20, 0x03, 0xd5, /* nop */
290 0x1f, 0x20, 0x03, 0xd5, /* nop */
291 };
292
293 /* Per function entry in a procedure linkage table looks like this
294 if the distance between the PLTGOT and the PLT is < 4GB use
295 these PLT entries. */
296 static const bfd_byte elfNN_aarch64_small_plt_entry[PLT_SMALL_ENTRY_SIZE] =
297 {
298 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
299 #if ARCH_SIZE == 64
300 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
301 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
302 #else
303 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
304 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
305 #endif
306 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
307 };
308
309 static const bfd_byte
310 elfNN_aarch64_tlsdesc_small_plt_entry[PLT_TLSDESC_ENTRY_SIZE] =
311 {
312 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
313 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
314 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
315 #if ARCH_SIZE == 64
316 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
317 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
318 #else
319 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
320 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
321 #endif
322 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
323 0x1f, 0x20, 0x03, 0xd5, /* nop */
324 0x1f, 0x20, 0x03, 0xd5, /* nop */
325 };
326
327 #define elf_info_to_howto elfNN_aarch64_info_to_howto
328 #define elf_info_to_howto_rel elfNN_aarch64_info_to_howto
329
330 #define AARCH64_ELF_ABI_VERSION 0
331
332 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
333 #define ALL_ONES (~ (bfd_vma) 0)
334
335 /* Indexed by the bfd interal reloc enumerators.
336 Therefore, the table needs to be synced with BFD_RELOC_AARCH64_*
337 in reloc.c. */
338
339 static reloc_howto_type elfNN_aarch64_howto_table[] =
340 {
341 EMPTY_HOWTO (0),
342
343 /* Basic data relocations. */
344
345 /* Deprecated, but retained for backwards compatibility. */
346 HOWTO64 (R_AARCH64_NULL, /* type */
347 0, /* rightshift */
348 3, /* size (0 = byte, 1 = short, 2 = long) */
349 0, /* bitsize */
350 FALSE, /* pc_relative */
351 0, /* bitpos */
352 complain_overflow_dont, /* complain_on_overflow */
353 bfd_elf_generic_reloc, /* special_function */
354 "R_AARCH64_NULL", /* name */
355 FALSE, /* partial_inplace */
356 0, /* src_mask */
357 0, /* dst_mask */
358 FALSE), /* pcrel_offset */
359 HOWTO (R_AARCH64_NONE, /* type */
360 0, /* rightshift */
361 3, /* size (0 = byte, 1 = short, 2 = long) */
362 0, /* bitsize */
363 FALSE, /* pc_relative */
364 0, /* bitpos */
365 complain_overflow_dont, /* complain_on_overflow */
366 bfd_elf_generic_reloc, /* special_function */
367 "R_AARCH64_NONE", /* name */
368 FALSE, /* partial_inplace */
369 0, /* src_mask */
370 0, /* dst_mask */
371 FALSE), /* pcrel_offset */
372
373 /* .xword: (S+A) */
374 HOWTO64 (AARCH64_R (ABS64), /* type */
375 0, /* rightshift */
376 4, /* size (4 = long long) */
377 64, /* bitsize */
378 FALSE, /* pc_relative */
379 0, /* bitpos */
380 complain_overflow_unsigned, /* complain_on_overflow */
381 bfd_elf_generic_reloc, /* special_function */
382 AARCH64_R_STR (ABS64), /* name */
383 FALSE, /* partial_inplace */
384 ALL_ONES, /* src_mask */
385 ALL_ONES, /* dst_mask */
386 FALSE), /* pcrel_offset */
387
388 /* .word: (S+A) */
389 HOWTO (AARCH64_R (ABS32), /* type */
390 0, /* rightshift */
391 2, /* size (0 = byte, 1 = short, 2 = long) */
392 32, /* bitsize */
393 FALSE, /* pc_relative */
394 0, /* bitpos */
395 complain_overflow_unsigned, /* complain_on_overflow */
396 bfd_elf_generic_reloc, /* special_function */
397 AARCH64_R_STR (ABS32), /* name */
398 FALSE, /* partial_inplace */
399 0xffffffff, /* src_mask */
400 0xffffffff, /* dst_mask */
401 FALSE), /* pcrel_offset */
402
403 /* .half: (S+A) */
404 HOWTO (AARCH64_R (ABS16), /* type */
405 0, /* rightshift */
406 1, /* size (0 = byte, 1 = short, 2 = long) */
407 16, /* bitsize */
408 FALSE, /* pc_relative */
409 0, /* bitpos */
410 complain_overflow_unsigned, /* complain_on_overflow */
411 bfd_elf_generic_reloc, /* special_function */
412 AARCH64_R_STR (ABS16), /* name */
413 FALSE, /* partial_inplace */
414 0xffff, /* src_mask */
415 0xffff, /* dst_mask */
416 FALSE), /* pcrel_offset */
417
418 /* .xword: (S+A-P) */
419 HOWTO64 (AARCH64_R (PREL64), /* type */
420 0, /* rightshift */
421 4, /* size (4 = long long) */
422 64, /* bitsize */
423 TRUE, /* pc_relative */
424 0, /* bitpos */
425 complain_overflow_signed, /* complain_on_overflow */
426 bfd_elf_generic_reloc, /* special_function */
427 AARCH64_R_STR (PREL64), /* name */
428 FALSE, /* partial_inplace */
429 ALL_ONES, /* src_mask */
430 ALL_ONES, /* dst_mask */
431 TRUE), /* pcrel_offset */
432
433 /* .word: (S+A-P) */
434 HOWTO (AARCH64_R (PREL32), /* type */
435 0, /* rightshift */
436 2, /* size (0 = byte, 1 = short, 2 = long) */
437 32, /* bitsize */
438 TRUE, /* pc_relative */
439 0, /* bitpos */
440 complain_overflow_signed, /* complain_on_overflow */
441 bfd_elf_generic_reloc, /* special_function */
442 AARCH64_R_STR (PREL32), /* name */
443 FALSE, /* partial_inplace */
444 0xffffffff, /* src_mask */
445 0xffffffff, /* dst_mask */
446 TRUE), /* pcrel_offset */
447
448 /* .half: (S+A-P) */
449 HOWTO (AARCH64_R (PREL16), /* type */
450 0, /* rightshift */
451 1, /* size (0 = byte, 1 = short, 2 = long) */
452 16, /* bitsize */
453 TRUE, /* pc_relative */
454 0, /* bitpos */
455 complain_overflow_signed, /* complain_on_overflow */
456 bfd_elf_generic_reloc, /* special_function */
457 AARCH64_R_STR (PREL16), /* name */
458 FALSE, /* partial_inplace */
459 0xffff, /* src_mask */
460 0xffff, /* dst_mask */
461 TRUE), /* pcrel_offset */
462
463 /* Group relocations to create a 16, 32, 48 or 64 bit
464 unsigned data or abs address inline. */
465
466 /* MOVZ: ((S+A) >> 0) & 0xffff */
467 HOWTO (AARCH64_R (MOVW_UABS_G0), /* type */
468 0, /* rightshift */
469 2, /* size (0 = byte, 1 = short, 2 = long) */
470 16, /* bitsize */
471 FALSE, /* pc_relative */
472 0, /* bitpos */
473 complain_overflow_unsigned, /* complain_on_overflow */
474 bfd_elf_generic_reloc, /* special_function */
475 AARCH64_R_STR (MOVW_UABS_G0), /* name */
476 FALSE, /* partial_inplace */
477 0xffff, /* src_mask */
478 0xffff, /* dst_mask */
479 FALSE), /* pcrel_offset */
480
481 /* MOVK: ((S+A) >> 0) & 0xffff [no overflow check] */
482 HOWTO (AARCH64_R (MOVW_UABS_G0_NC), /* type */
483 0, /* rightshift */
484 2, /* size (0 = byte, 1 = short, 2 = long) */
485 16, /* bitsize */
486 FALSE, /* pc_relative */
487 0, /* bitpos */
488 complain_overflow_dont, /* complain_on_overflow */
489 bfd_elf_generic_reloc, /* special_function */
490 AARCH64_R_STR (MOVW_UABS_G0_NC), /* name */
491 FALSE, /* partial_inplace */
492 0xffff, /* src_mask */
493 0xffff, /* dst_mask */
494 FALSE), /* pcrel_offset */
495
496 /* MOVZ: ((S+A) >> 16) & 0xffff */
497 HOWTO (AARCH64_R (MOVW_UABS_G1), /* type */
498 16, /* rightshift */
499 2, /* size (0 = byte, 1 = short, 2 = long) */
500 16, /* bitsize */
501 FALSE, /* pc_relative */
502 0, /* bitpos */
503 complain_overflow_unsigned, /* complain_on_overflow */
504 bfd_elf_generic_reloc, /* special_function */
505 AARCH64_R_STR (MOVW_UABS_G1), /* name */
506 FALSE, /* partial_inplace */
507 0xffff, /* src_mask */
508 0xffff, /* dst_mask */
509 FALSE), /* pcrel_offset */
510
511 /* MOVK: ((S+A) >> 16) & 0xffff [no overflow check] */
512 HOWTO64 (AARCH64_R (MOVW_UABS_G1_NC), /* type */
513 16, /* rightshift */
514 2, /* size (0 = byte, 1 = short, 2 = long) */
515 16, /* bitsize */
516 FALSE, /* pc_relative */
517 0, /* bitpos */
518 complain_overflow_dont, /* complain_on_overflow */
519 bfd_elf_generic_reloc, /* special_function */
520 AARCH64_R_STR (MOVW_UABS_G1_NC), /* name */
521 FALSE, /* partial_inplace */
522 0xffff, /* src_mask */
523 0xffff, /* dst_mask */
524 FALSE), /* pcrel_offset */
525
526 /* MOVZ: ((S+A) >> 32) & 0xffff */
527 HOWTO64 (AARCH64_R (MOVW_UABS_G2), /* type */
528 32, /* rightshift */
529 2, /* size (0 = byte, 1 = short, 2 = long) */
530 16, /* bitsize */
531 FALSE, /* pc_relative */
532 0, /* bitpos */
533 complain_overflow_unsigned, /* complain_on_overflow */
534 bfd_elf_generic_reloc, /* special_function */
535 AARCH64_R_STR (MOVW_UABS_G2), /* name */
536 FALSE, /* partial_inplace */
537 0xffff, /* src_mask */
538 0xffff, /* dst_mask */
539 FALSE), /* pcrel_offset */
540
541 /* MOVK: ((S+A) >> 32) & 0xffff [no overflow check] */
542 HOWTO64 (AARCH64_R (MOVW_UABS_G2_NC), /* type */
543 32, /* rightshift */
544 2, /* size (0 = byte, 1 = short, 2 = long) */
545 16, /* bitsize */
546 FALSE, /* pc_relative */
547 0, /* bitpos */
548 complain_overflow_dont, /* complain_on_overflow */
549 bfd_elf_generic_reloc, /* special_function */
550 AARCH64_R_STR (MOVW_UABS_G2_NC), /* name */
551 FALSE, /* partial_inplace */
552 0xffff, /* src_mask */
553 0xffff, /* dst_mask */
554 FALSE), /* pcrel_offset */
555
556 /* MOVZ: ((S+A) >> 48) & 0xffff */
557 HOWTO64 (AARCH64_R (MOVW_UABS_G3), /* type */
558 48, /* rightshift */
559 2, /* size (0 = byte, 1 = short, 2 = long) */
560 16, /* bitsize */
561 FALSE, /* pc_relative */
562 0, /* bitpos */
563 complain_overflow_unsigned, /* complain_on_overflow */
564 bfd_elf_generic_reloc, /* special_function */
565 AARCH64_R_STR (MOVW_UABS_G3), /* name */
566 FALSE, /* partial_inplace */
567 0xffff, /* src_mask */
568 0xffff, /* dst_mask */
569 FALSE), /* pcrel_offset */
570
571 /* Group relocations to create high part of a 16, 32, 48 or 64 bit
572 signed data or abs address inline. Will change instruction
573 to MOVN or MOVZ depending on sign of calculated value. */
574
575 /* MOV[ZN]: ((S+A) >> 0) & 0xffff */
576 HOWTO (AARCH64_R (MOVW_SABS_G0), /* type */
577 0, /* rightshift */
578 2, /* size (0 = byte, 1 = short, 2 = long) */
579 17, /* bitsize */
580 FALSE, /* pc_relative */
581 0, /* bitpos */
582 complain_overflow_signed, /* complain_on_overflow */
583 bfd_elf_generic_reloc, /* special_function */
584 AARCH64_R_STR (MOVW_SABS_G0), /* name */
585 FALSE, /* partial_inplace */
586 0xffff, /* src_mask */
587 0xffff, /* dst_mask */
588 FALSE), /* pcrel_offset */
589
590 /* MOV[ZN]: ((S+A) >> 16) & 0xffff */
591 HOWTO64 (AARCH64_R (MOVW_SABS_G1), /* type */
592 16, /* rightshift */
593 2, /* size (0 = byte, 1 = short, 2 = long) */
594 17, /* bitsize */
595 FALSE, /* pc_relative */
596 0, /* bitpos */
597 complain_overflow_signed, /* complain_on_overflow */
598 bfd_elf_generic_reloc, /* special_function */
599 AARCH64_R_STR (MOVW_SABS_G1), /* name */
600 FALSE, /* partial_inplace */
601 0xffff, /* src_mask */
602 0xffff, /* dst_mask */
603 FALSE), /* pcrel_offset */
604
605 /* MOV[ZN]: ((S+A) >> 32) & 0xffff */
606 HOWTO64 (AARCH64_R (MOVW_SABS_G2), /* type */
607 32, /* rightshift */
608 2, /* size (0 = byte, 1 = short, 2 = long) */
609 17, /* bitsize */
610 FALSE, /* pc_relative */
611 0, /* bitpos */
612 complain_overflow_signed, /* complain_on_overflow */
613 bfd_elf_generic_reloc, /* special_function */
614 AARCH64_R_STR (MOVW_SABS_G2), /* name */
615 FALSE, /* partial_inplace */
616 0xffff, /* src_mask */
617 0xffff, /* dst_mask */
618 FALSE), /* pcrel_offset */
619
620 /* Relocations to generate 19, 21 and 33 bit PC-relative load/store
621 addresses: PG(x) is (x & ~0xfff). */
622
623 /* LD-lit: ((S+A-P) >> 2) & 0x7ffff */
624 HOWTO (AARCH64_R (LD_PREL_LO19), /* type */
625 2, /* rightshift */
626 2, /* size (0 = byte, 1 = short, 2 = long) */
627 19, /* bitsize */
628 TRUE, /* pc_relative */
629 0, /* bitpos */
630 complain_overflow_signed, /* complain_on_overflow */
631 bfd_elf_generic_reloc, /* special_function */
632 AARCH64_R_STR (LD_PREL_LO19), /* name */
633 FALSE, /* partial_inplace */
634 0x7ffff, /* src_mask */
635 0x7ffff, /* dst_mask */
636 TRUE), /* pcrel_offset */
637
638 /* ADR: (S+A-P) & 0x1fffff */
639 HOWTO (AARCH64_R (ADR_PREL_LO21), /* type */
640 0, /* rightshift */
641 2, /* size (0 = byte, 1 = short, 2 = long) */
642 21, /* bitsize */
643 TRUE, /* pc_relative */
644 0, /* bitpos */
645 complain_overflow_signed, /* complain_on_overflow */
646 bfd_elf_generic_reloc, /* special_function */
647 AARCH64_R_STR (ADR_PREL_LO21), /* name */
648 FALSE, /* partial_inplace */
649 0x1fffff, /* src_mask */
650 0x1fffff, /* dst_mask */
651 TRUE), /* pcrel_offset */
652
653 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
654 HOWTO (AARCH64_R (ADR_PREL_PG_HI21), /* type */
655 12, /* rightshift */
656 2, /* size (0 = byte, 1 = short, 2 = long) */
657 21, /* bitsize */
658 TRUE, /* pc_relative */
659 0, /* bitpos */
660 complain_overflow_signed, /* complain_on_overflow */
661 bfd_elf_generic_reloc, /* special_function */
662 AARCH64_R_STR (ADR_PREL_PG_HI21), /* name */
663 FALSE, /* partial_inplace */
664 0x1fffff, /* src_mask */
665 0x1fffff, /* dst_mask */
666 TRUE), /* pcrel_offset */
667
668 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff [no overflow check] */
669 HOWTO64 (AARCH64_R (ADR_PREL_PG_HI21_NC), /* type */
670 12, /* rightshift */
671 2, /* size (0 = byte, 1 = short, 2 = long) */
672 21, /* bitsize */
673 TRUE, /* pc_relative */
674 0, /* bitpos */
675 complain_overflow_dont, /* complain_on_overflow */
676 bfd_elf_generic_reloc, /* special_function */
677 AARCH64_R_STR (ADR_PREL_PG_HI21_NC), /* name */
678 FALSE, /* partial_inplace */
679 0x1fffff, /* src_mask */
680 0x1fffff, /* dst_mask */
681 TRUE), /* pcrel_offset */
682
683 /* ADD: (S+A) & 0xfff [no overflow check] */
684 HOWTO (AARCH64_R (ADD_ABS_LO12_NC), /* type */
685 0, /* rightshift */
686 2, /* size (0 = byte, 1 = short, 2 = long) */
687 12, /* bitsize */
688 FALSE, /* pc_relative */
689 10, /* bitpos */
690 complain_overflow_dont, /* complain_on_overflow */
691 bfd_elf_generic_reloc, /* special_function */
692 AARCH64_R_STR (ADD_ABS_LO12_NC), /* name */
693 FALSE, /* partial_inplace */
694 0x3ffc00, /* src_mask */
695 0x3ffc00, /* dst_mask */
696 FALSE), /* pcrel_offset */
697
698 /* LD/ST8: (S+A) & 0xfff */
699 HOWTO (AARCH64_R (LDST8_ABS_LO12_NC), /* type */
700 0, /* rightshift */
701 2, /* size (0 = byte, 1 = short, 2 = long) */
702 12, /* bitsize */
703 FALSE, /* pc_relative */
704 0, /* bitpos */
705 complain_overflow_dont, /* complain_on_overflow */
706 bfd_elf_generic_reloc, /* special_function */
707 AARCH64_R_STR (LDST8_ABS_LO12_NC), /* name */
708 FALSE, /* partial_inplace */
709 0xfff, /* src_mask */
710 0xfff, /* dst_mask */
711 FALSE), /* pcrel_offset */
712
713 /* Relocations for control-flow instructions. */
714
715 /* TBZ/NZ: ((S+A-P) >> 2) & 0x3fff */
716 HOWTO (AARCH64_R (TSTBR14), /* type */
717 2, /* rightshift */
718 2, /* size (0 = byte, 1 = short, 2 = long) */
719 14, /* bitsize */
720 TRUE, /* pc_relative */
721 0, /* bitpos */
722 complain_overflow_signed, /* complain_on_overflow */
723 bfd_elf_generic_reloc, /* special_function */
724 AARCH64_R_STR (TSTBR14), /* name */
725 FALSE, /* partial_inplace */
726 0x3fff, /* src_mask */
727 0x3fff, /* dst_mask */
728 TRUE), /* pcrel_offset */
729
730 /* B.cond: ((S+A-P) >> 2) & 0x7ffff */
731 HOWTO (AARCH64_R (CONDBR19), /* type */
732 2, /* rightshift */
733 2, /* size (0 = byte, 1 = short, 2 = long) */
734 19, /* bitsize */
735 TRUE, /* pc_relative */
736 0, /* bitpos */
737 complain_overflow_signed, /* complain_on_overflow */
738 bfd_elf_generic_reloc, /* special_function */
739 AARCH64_R_STR (CONDBR19), /* name */
740 FALSE, /* partial_inplace */
741 0x7ffff, /* src_mask */
742 0x7ffff, /* dst_mask */
743 TRUE), /* pcrel_offset */
744
745 /* B: ((S+A-P) >> 2) & 0x3ffffff */
746 HOWTO (AARCH64_R (JUMP26), /* type */
747 2, /* rightshift */
748 2, /* size (0 = byte, 1 = short, 2 = long) */
749 26, /* bitsize */
750 TRUE, /* pc_relative */
751 0, /* bitpos */
752 complain_overflow_signed, /* complain_on_overflow */
753 bfd_elf_generic_reloc, /* special_function */
754 AARCH64_R_STR (JUMP26), /* name */
755 FALSE, /* partial_inplace */
756 0x3ffffff, /* src_mask */
757 0x3ffffff, /* dst_mask */
758 TRUE), /* pcrel_offset */
759
760 /* BL: ((S+A-P) >> 2) & 0x3ffffff */
761 HOWTO (AARCH64_R (CALL26), /* type */
762 2, /* rightshift */
763 2, /* size (0 = byte, 1 = short, 2 = long) */
764 26, /* bitsize */
765 TRUE, /* pc_relative */
766 0, /* bitpos */
767 complain_overflow_signed, /* complain_on_overflow */
768 bfd_elf_generic_reloc, /* special_function */
769 AARCH64_R_STR (CALL26), /* name */
770 FALSE, /* partial_inplace */
771 0x3ffffff, /* src_mask */
772 0x3ffffff, /* dst_mask */
773 TRUE), /* pcrel_offset */
774
775 /* LD/ST16: (S+A) & 0xffe */
776 HOWTO (AARCH64_R (LDST16_ABS_LO12_NC), /* type */
777 1, /* rightshift */
778 2, /* size (0 = byte, 1 = short, 2 = long) */
779 12, /* bitsize */
780 FALSE, /* pc_relative */
781 0, /* bitpos */
782 complain_overflow_dont, /* complain_on_overflow */
783 bfd_elf_generic_reloc, /* special_function */
784 AARCH64_R_STR (LDST16_ABS_LO12_NC), /* name */
785 FALSE, /* partial_inplace */
786 0xffe, /* src_mask */
787 0xffe, /* dst_mask */
788 FALSE), /* pcrel_offset */
789
790 /* LD/ST32: (S+A) & 0xffc */
791 HOWTO (AARCH64_R (LDST32_ABS_LO12_NC), /* type */
792 2, /* rightshift */
793 2, /* size (0 = byte, 1 = short, 2 = long) */
794 12, /* bitsize */
795 FALSE, /* pc_relative */
796 0, /* bitpos */
797 complain_overflow_dont, /* complain_on_overflow */
798 bfd_elf_generic_reloc, /* special_function */
799 AARCH64_R_STR (LDST32_ABS_LO12_NC), /* name */
800 FALSE, /* partial_inplace */
801 0xffc, /* src_mask */
802 0xffc, /* dst_mask */
803 FALSE), /* pcrel_offset */
804
805 /* LD/ST64: (S+A) & 0xff8 */
806 HOWTO (AARCH64_R (LDST64_ABS_LO12_NC), /* type */
807 3, /* rightshift */
808 2, /* size (0 = byte, 1 = short, 2 = long) */
809 12, /* bitsize */
810 FALSE, /* pc_relative */
811 0, /* bitpos */
812 complain_overflow_dont, /* complain_on_overflow */
813 bfd_elf_generic_reloc, /* special_function */
814 AARCH64_R_STR (LDST64_ABS_LO12_NC), /* name */
815 FALSE, /* partial_inplace */
816 0xff8, /* src_mask */
817 0xff8, /* dst_mask */
818 FALSE), /* pcrel_offset */
819
820 /* LD/ST128: (S+A) & 0xff0 */
821 HOWTO (AARCH64_R (LDST128_ABS_LO12_NC), /* type */
822 4, /* rightshift */
823 2, /* size (0 = byte, 1 = short, 2 = long) */
824 12, /* bitsize */
825 FALSE, /* pc_relative */
826 0, /* bitpos */
827 complain_overflow_dont, /* complain_on_overflow */
828 bfd_elf_generic_reloc, /* special_function */
829 AARCH64_R_STR (LDST128_ABS_LO12_NC), /* name */
830 FALSE, /* partial_inplace */
831 0xff0, /* src_mask */
832 0xff0, /* dst_mask */
833 FALSE), /* pcrel_offset */
834
835 /* Set a load-literal immediate field to bits
836 0x1FFFFC of G(S)-P */
837 HOWTO (AARCH64_R (GOT_LD_PREL19), /* type */
838 2, /* rightshift */
839 2, /* size (0 = byte,1 = short,2 = long) */
840 19, /* bitsize */
841 TRUE, /* pc_relative */
842 0, /* bitpos */
843 complain_overflow_signed, /* complain_on_overflow */
844 bfd_elf_generic_reloc, /* special_function */
845 AARCH64_R_STR (GOT_LD_PREL19), /* name */
846 FALSE, /* partial_inplace */
847 0xffffe0, /* src_mask */
848 0xffffe0, /* dst_mask */
849 TRUE), /* pcrel_offset */
850
851 /* Get to the page for the GOT entry for the symbol
852 (G(S) - P) using an ADRP instruction. */
853 HOWTO (AARCH64_R (ADR_GOT_PAGE), /* type */
854 12, /* rightshift */
855 2, /* size (0 = byte, 1 = short, 2 = long) */
856 21, /* bitsize */
857 TRUE, /* pc_relative */
858 0, /* bitpos */
859 complain_overflow_dont, /* complain_on_overflow */
860 bfd_elf_generic_reloc, /* special_function */
861 AARCH64_R_STR (ADR_GOT_PAGE), /* name */
862 FALSE, /* partial_inplace */
863 0x1fffff, /* src_mask */
864 0x1fffff, /* dst_mask */
865 TRUE), /* pcrel_offset */
866
867 /* LD64: GOT offset G(S) & 0xff8 */
868 HOWTO64 (AARCH64_R (LD64_GOT_LO12_NC), /* type */
869 3, /* rightshift */
870 2, /* size (0 = byte, 1 = short, 2 = long) */
871 12, /* bitsize */
872 FALSE, /* pc_relative */
873 0, /* bitpos */
874 complain_overflow_dont, /* complain_on_overflow */
875 bfd_elf_generic_reloc, /* special_function */
876 AARCH64_R_STR (LD64_GOT_LO12_NC), /* name */
877 FALSE, /* partial_inplace */
878 0xff8, /* src_mask */
879 0xff8, /* dst_mask */
880 FALSE), /* pcrel_offset */
881
882 /* LD32: GOT offset G(S) & 0xffc */
883 HOWTO32 (AARCH64_R (LD32_GOT_LO12_NC), /* type */
884 2, /* rightshift */
885 2, /* size (0 = byte, 1 = short, 2 = long) */
886 12, /* bitsize */
887 FALSE, /* pc_relative */
888 0, /* bitpos */
889 complain_overflow_dont, /* complain_on_overflow */
890 bfd_elf_generic_reloc, /* special_function */
891 AARCH64_R_STR (LD32_GOT_LO12_NC), /* name */
892 FALSE, /* partial_inplace */
893 0xffc, /* src_mask */
894 0xffc, /* dst_mask */
895 FALSE), /* pcrel_offset */
896
897 /* Lower 16 bits of GOT offset for the symbol. */
898 HOWTO64 (AARCH64_R (MOVW_GOTOFF_G0_NC), /* type */
899 0, /* rightshift */
900 2, /* size (0 = byte, 1 = short, 2 = long) */
901 16, /* bitsize */
902 FALSE, /* pc_relative */
903 0, /* bitpos */
904 complain_overflow_dont, /* complain_on_overflow */
905 bfd_elf_generic_reloc, /* special_function */
906 AARCH64_R_STR (MOVW_GOTOFF_G0_NC), /* name */
907 FALSE, /* partial_inplace */
908 0xffff, /* src_mask */
909 0xffff, /* dst_mask */
910 FALSE), /* pcrel_offset */
911
912 /* Higher 16 bits of GOT offset for the symbol. */
913 HOWTO64 (AARCH64_R (MOVW_GOTOFF_G1), /* type */
914 16, /* rightshift */
915 2, /* size (0 = byte, 1 = short, 2 = long) */
916 16, /* bitsize */
917 FALSE, /* pc_relative */
918 0, /* bitpos */
919 complain_overflow_unsigned, /* complain_on_overflow */
920 bfd_elf_generic_reloc, /* special_function */
921 AARCH64_R_STR (MOVW_GOTOFF_G1), /* name */
922 FALSE, /* partial_inplace */
923 0xffff, /* src_mask */
924 0xffff, /* dst_mask */
925 FALSE), /* pcrel_offset */
926
927 /* LD64: GOT offset for the symbol. */
928 HOWTO64 (AARCH64_R (LD64_GOTOFF_LO15), /* type */
929 3, /* rightshift */
930 2, /* size (0 = byte, 1 = short, 2 = long) */
931 12, /* bitsize */
932 FALSE, /* pc_relative */
933 0, /* bitpos */
934 complain_overflow_unsigned, /* complain_on_overflow */
935 bfd_elf_generic_reloc, /* special_function */
936 AARCH64_R_STR (LD64_GOTOFF_LO15), /* name */
937 FALSE, /* partial_inplace */
938 0x7ff8, /* src_mask */
939 0x7ff8, /* dst_mask */
940 FALSE), /* pcrel_offset */
941
942 /* LD32: GOT offset to the page address of GOT table.
943 (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x5ffc. */
944 HOWTO32 (AARCH64_R (LD32_GOTPAGE_LO14), /* type */
945 2, /* rightshift */
946 2, /* size (0 = byte, 1 = short, 2 = long) */
947 12, /* bitsize */
948 FALSE, /* pc_relative */
949 0, /* bitpos */
950 complain_overflow_unsigned, /* complain_on_overflow */
951 bfd_elf_generic_reloc, /* special_function */
952 AARCH64_R_STR (LD32_GOTPAGE_LO14), /* name */
953 FALSE, /* partial_inplace */
954 0x5ffc, /* src_mask */
955 0x5ffc, /* dst_mask */
956 FALSE), /* pcrel_offset */
957
958 /* LD64: GOT offset to the page address of GOT table.
959 (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x7ff8. */
960 HOWTO64 (AARCH64_R (LD64_GOTPAGE_LO15), /* type */
961 3, /* rightshift */
962 2, /* size (0 = byte, 1 = short, 2 = long) */
963 12, /* bitsize */
964 FALSE, /* pc_relative */
965 0, /* bitpos */
966 complain_overflow_unsigned, /* complain_on_overflow */
967 bfd_elf_generic_reloc, /* special_function */
968 AARCH64_R_STR (LD64_GOTPAGE_LO15), /* name */
969 FALSE, /* partial_inplace */
970 0x7ff8, /* src_mask */
971 0x7ff8, /* dst_mask */
972 FALSE), /* pcrel_offset */
973
974 /* Get to the page for the GOT entry for the symbol
975 (G(S) - P) using an ADRP instruction. */
976 HOWTO (AARCH64_R (TLSGD_ADR_PAGE21), /* type */
977 12, /* rightshift */
978 2, /* size (0 = byte, 1 = short, 2 = long) */
979 21, /* bitsize */
980 TRUE, /* pc_relative */
981 0, /* bitpos */
982 complain_overflow_dont, /* complain_on_overflow */
983 bfd_elf_generic_reloc, /* special_function */
984 AARCH64_R_STR (TLSGD_ADR_PAGE21), /* name */
985 FALSE, /* partial_inplace */
986 0x1fffff, /* src_mask */
987 0x1fffff, /* dst_mask */
988 TRUE), /* pcrel_offset */
989
990 HOWTO (AARCH64_R (TLSGD_ADR_PREL21), /* type */
991 0, /* rightshift */
992 2, /* size (0 = byte, 1 = short, 2 = long) */
993 21, /* bitsize */
994 TRUE, /* pc_relative */
995 0, /* bitpos */
996 complain_overflow_dont, /* complain_on_overflow */
997 bfd_elf_generic_reloc, /* special_function */
998 AARCH64_R_STR (TLSGD_ADR_PREL21), /* name */
999 FALSE, /* partial_inplace */
1000 0x1fffff, /* src_mask */
1001 0x1fffff, /* dst_mask */
1002 TRUE), /* pcrel_offset */
1003
1004 /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
1005 HOWTO (AARCH64_R (TLSGD_ADD_LO12_NC), /* type */
1006 0, /* rightshift */
1007 2, /* size (0 = byte, 1 = short, 2 = long) */
1008 12, /* bitsize */
1009 FALSE, /* pc_relative */
1010 0, /* bitpos */
1011 complain_overflow_dont, /* complain_on_overflow */
1012 bfd_elf_generic_reloc, /* special_function */
1013 AARCH64_R_STR (TLSGD_ADD_LO12_NC), /* name */
1014 FALSE, /* partial_inplace */
1015 0xfff, /* src_mask */
1016 0xfff, /* dst_mask */
1017 FALSE), /* pcrel_offset */
1018
1019 /* Lower 16 bits of GOT offset to tls_index. */
1020 HOWTO64 (AARCH64_R (TLSGD_MOVW_G0_NC), /* type */
1021 0, /* rightshift */
1022 2, /* size (0 = byte, 1 = short, 2 = long) */
1023 16, /* bitsize */
1024 FALSE, /* pc_relative */
1025 0, /* bitpos */
1026 complain_overflow_dont, /* complain_on_overflow */
1027 bfd_elf_generic_reloc, /* special_function */
1028 AARCH64_R_STR (TLSGD_MOVW_G0_NC), /* name */
1029 FALSE, /* partial_inplace */
1030 0xffff, /* src_mask */
1031 0xffff, /* dst_mask */
1032 FALSE), /* pcrel_offset */
1033
1034 /* Higher 16 bits of GOT offset to tls_index. */
1035 HOWTO64 (AARCH64_R (TLSGD_MOVW_G1), /* type */
1036 16, /* rightshift */
1037 2, /* size (0 = byte, 1 = short, 2 = long) */
1038 16, /* bitsize */
1039 FALSE, /* pc_relative */
1040 0, /* bitpos */
1041 complain_overflow_unsigned, /* complain_on_overflow */
1042 bfd_elf_generic_reloc, /* special_function */
1043 AARCH64_R_STR (TLSGD_MOVW_G1), /* name */
1044 FALSE, /* partial_inplace */
1045 0xffff, /* src_mask */
1046 0xffff, /* dst_mask */
1047 FALSE), /* pcrel_offset */
1048
1049 HOWTO (AARCH64_R (TLSIE_ADR_GOTTPREL_PAGE21), /* type */
1050 12, /* rightshift */
1051 2, /* size (0 = byte, 1 = short, 2 = long) */
1052 21, /* bitsize */
1053 FALSE, /* pc_relative */
1054 0, /* bitpos */
1055 complain_overflow_dont, /* complain_on_overflow */
1056 bfd_elf_generic_reloc, /* special_function */
1057 AARCH64_R_STR (TLSIE_ADR_GOTTPREL_PAGE21), /* name */
1058 FALSE, /* partial_inplace */
1059 0x1fffff, /* src_mask */
1060 0x1fffff, /* dst_mask */
1061 FALSE), /* pcrel_offset */
1062
1063 HOWTO64 (AARCH64_R (TLSIE_LD64_GOTTPREL_LO12_NC), /* type */
1064 3, /* rightshift */
1065 2, /* size (0 = byte, 1 = short, 2 = long) */
1066 12, /* bitsize */
1067 FALSE, /* pc_relative */
1068 0, /* bitpos */
1069 complain_overflow_dont, /* complain_on_overflow */
1070 bfd_elf_generic_reloc, /* special_function */
1071 AARCH64_R_STR (TLSIE_LD64_GOTTPREL_LO12_NC), /* name */
1072 FALSE, /* partial_inplace */
1073 0xff8, /* src_mask */
1074 0xff8, /* dst_mask */
1075 FALSE), /* pcrel_offset */
1076
1077 HOWTO32 (AARCH64_R (TLSIE_LD32_GOTTPREL_LO12_NC), /* type */
1078 2, /* rightshift */
1079 2, /* size (0 = byte, 1 = short, 2 = long) */
1080 12, /* bitsize */
1081 FALSE, /* pc_relative */
1082 0, /* bitpos */
1083 complain_overflow_dont, /* complain_on_overflow */
1084 bfd_elf_generic_reloc, /* special_function */
1085 AARCH64_R_STR (TLSIE_LD32_GOTTPREL_LO12_NC), /* name */
1086 FALSE, /* partial_inplace */
1087 0xffc, /* src_mask */
1088 0xffc, /* dst_mask */
1089 FALSE), /* pcrel_offset */
1090
1091 HOWTO (AARCH64_R (TLSIE_LD_GOTTPREL_PREL19), /* type */
1092 2, /* rightshift */
1093 2, /* size (0 = byte, 1 = short, 2 = long) */
1094 19, /* bitsize */
1095 FALSE, /* pc_relative */
1096 0, /* bitpos */
1097 complain_overflow_dont, /* complain_on_overflow */
1098 bfd_elf_generic_reloc, /* special_function */
1099 AARCH64_R_STR (TLSIE_LD_GOTTPREL_PREL19), /* name */
1100 FALSE, /* partial_inplace */
1101 0x1ffffc, /* src_mask */
1102 0x1ffffc, /* dst_mask */
1103 FALSE), /* pcrel_offset */
1104
1105 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G0_NC), /* type */
1106 0, /* rightshift */
1107 2, /* size (0 = byte, 1 = short, 2 = long) */
1108 16, /* bitsize */
1109 FALSE, /* pc_relative */
1110 0, /* bitpos */
1111 complain_overflow_dont, /* complain_on_overflow */
1112 bfd_elf_generic_reloc, /* special_function */
1113 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G0_NC), /* name */
1114 FALSE, /* partial_inplace */
1115 0xffff, /* src_mask */
1116 0xffff, /* dst_mask */
1117 FALSE), /* pcrel_offset */
1118
1119 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G1), /* type */
1120 16, /* rightshift */
1121 2, /* size (0 = byte, 1 = short, 2 = long) */
1122 16, /* bitsize */
1123 FALSE, /* pc_relative */
1124 0, /* bitpos */
1125 complain_overflow_unsigned, /* complain_on_overflow */
1126 bfd_elf_generic_reloc, /* special_function */
1127 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G1), /* name */
1128 FALSE, /* partial_inplace */
1129 0xffff, /* src_mask */
1130 0xffff, /* dst_mask */
1131 FALSE), /* pcrel_offset */
1132
1133 /* ADD: bit[23:12] of byte offset to module TLS base address. */
1134 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_HI12), /* type */
1135 12, /* rightshift */
1136 2, /* size (0 = byte, 1 = short, 2 = long) */
1137 12, /* bitsize */
1138 FALSE, /* pc_relative */
1139 0, /* bitpos */
1140 complain_overflow_unsigned, /* complain_on_overflow */
1141 bfd_elf_generic_reloc, /* special_function */
1142 AARCH64_R_STR (TLSLD_ADD_DTPREL_HI12), /* name */
1143 FALSE, /* partial_inplace */
1144 0xfff, /* src_mask */
1145 0xfff, /* dst_mask */
1146 FALSE), /* pcrel_offset */
1147
1148 /* Unsigned 12 bit byte offset to module TLS base address. */
1149 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12), /* type */
1150 0, /* rightshift */
1151 2, /* size (0 = byte, 1 = short, 2 = long) */
1152 12, /* bitsize */
1153 FALSE, /* pc_relative */
1154 0, /* bitpos */
1155 complain_overflow_unsigned, /* complain_on_overflow */
1156 bfd_elf_generic_reloc, /* special_function */
1157 AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12), /* name */
1158 FALSE, /* partial_inplace */
1159 0xfff, /* src_mask */
1160 0xfff, /* dst_mask */
1161 FALSE), /* pcrel_offset */
1162
1163 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12. */
1164 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12_NC), /* type */
1165 0, /* rightshift */
1166 2, /* size (0 = byte, 1 = short, 2 = long) */
1167 12, /* bitsize */
1168 FALSE, /* pc_relative */
1169 0, /* bitpos */
1170 complain_overflow_dont, /* complain_on_overflow */
1171 bfd_elf_generic_reloc, /* special_function */
1172 AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12_NC), /* name */
1173 FALSE, /* partial_inplace */
1174 0xfff, /* src_mask */
1175 0xfff, /* dst_mask */
1176 FALSE), /* pcrel_offset */
1177
1178 /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
1179 HOWTO (AARCH64_R (TLSLD_ADD_LO12_NC), /* type */
1180 0, /* rightshift */
1181 2, /* size (0 = byte, 1 = short, 2 = long) */
1182 12, /* bitsize */
1183 FALSE, /* pc_relative */
1184 0, /* bitpos */
1185 complain_overflow_dont, /* complain_on_overflow */
1186 bfd_elf_generic_reloc, /* special_function */
1187 AARCH64_R_STR (TLSLD_ADD_LO12_NC), /* name */
1188 FALSE, /* partial_inplace */
1189 0xfff, /* src_mask */
1190 0xfff, /* dst_mask */
1191 FALSE), /* pcrel_offset */
1192
1193 /* Get to the page for the GOT entry for the symbol
1194 (G(S) - P) using an ADRP instruction. */
1195 HOWTO (AARCH64_R (TLSLD_ADR_PAGE21), /* type */
1196 12, /* rightshift */
1197 2, /* size (0 = byte, 1 = short, 2 = long) */
1198 21, /* bitsize */
1199 TRUE, /* pc_relative */
1200 0, /* bitpos */
1201 complain_overflow_signed, /* complain_on_overflow */
1202 bfd_elf_generic_reloc, /* special_function */
1203 AARCH64_R_STR (TLSLD_ADR_PAGE21), /* name */
1204 FALSE, /* partial_inplace */
1205 0x1fffff, /* src_mask */
1206 0x1fffff, /* dst_mask */
1207 TRUE), /* pcrel_offset */
1208
1209 HOWTO (AARCH64_R (TLSLD_ADR_PREL21), /* type */
1210 0, /* rightshift */
1211 2, /* size (0 = byte, 1 = short, 2 = long) */
1212 21, /* bitsize */
1213 TRUE, /* pc_relative */
1214 0, /* bitpos */
1215 complain_overflow_signed, /* complain_on_overflow */
1216 bfd_elf_generic_reloc, /* special_function */
1217 AARCH64_R_STR (TLSLD_ADR_PREL21), /* name */
1218 FALSE, /* partial_inplace */
1219 0x1fffff, /* src_mask */
1220 0x1fffff, /* dst_mask */
1221 TRUE), /* pcrel_offset */
1222
1223 /* LD/ST16: bit[11:1] of byte offset to module TLS base address. */
1224 HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12), /* type */
1225 1, /* rightshift */
1226 2, /* size (0 = byte, 1 = short, 2 = long) */
1227 11, /* bitsize */
1228 FALSE, /* pc_relative */
1229 10, /* bitpos */
1230 complain_overflow_unsigned, /* complain_on_overflow */
1231 bfd_elf_generic_reloc, /* special_function */
1232 AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12), /* name */
1233 FALSE, /* partial_inplace */
1234 0x1ffc00, /* src_mask */
1235 0x1ffc00, /* dst_mask */
1236 FALSE), /* pcrel_offset */
1237
1238 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12, but no overflow check. */
1239 HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12_NC), /* type */
1240 1, /* rightshift */
1241 2, /* size (0 = byte, 1 = short, 2 = long) */
1242 11, /* bitsize */
1243 FALSE, /* pc_relative */
1244 10, /* bitpos */
1245 complain_overflow_dont, /* complain_on_overflow */
1246 bfd_elf_generic_reloc, /* special_function */
1247 AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12_NC), /* name */
1248 FALSE, /* partial_inplace */
1249 0x1ffc00, /* src_mask */
1250 0x1ffc00, /* dst_mask */
1251 FALSE), /* pcrel_offset */
1252
1253 /* LD/ST32: bit[11:2] of byte offset to module TLS base address. */
1254 HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12), /* type */
1255 2, /* rightshift */
1256 2, /* size (0 = byte, 1 = short, 2 = long) */
1257 10, /* bitsize */
1258 FALSE, /* pc_relative */
1259 10, /* bitpos */
1260 complain_overflow_unsigned, /* complain_on_overflow */
1261 bfd_elf_generic_reloc, /* special_function */
1262 AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12), /* name */
1263 FALSE, /* partial_inplace */
1264 0x3ffc00, /* src_mask */
1265 0x3ffc00, /* dst_mask */
1266 FALSE), /* pcrel_offset */
1267
1268 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12, but no overflow check. */
1269 HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12_NC), /* type */
1270 2, /* rightshift */
1271 2, /* size (0 = byte, 1 = short, 2 = long) */
1272 10, /* bitsize */
1273 FALSE, /* pc_relative */
1274 10, /* bitpos */
1275 complain_overflow_dont, /* complain_on_overflow */
1276 bfd_elf_generic_reloc, /* special_function */
1277 AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12_NC), /* name */
1278 FALSE, /* partial_inplace */
1279 0xffc00, /* src_mask */
1280 0xffc00, /* dst_mask */
1281 FALSE), /* pcrel_offset */
1282
1283 /* LD/ST64: bit[11:3] of byte offset to module TLS base address. */
1284 HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12), /* type */
1285 3, /* rightshift */
1286 2, /* size (0 = byte, 1 = short, 2 = long) */
1287 9, /* bitsize */
1288 FALSE, /* pc_relative */
1289 10, /* bitpos */
1290 complain_overflow_unsigned, /* complain_on_overflow */
1291 bfd_elf_generic_reloc, /* special_function */
1292 AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12), /* name */
1293 FALSE, /* partial_inplace */
1294 0x3ffc00, /* src_mask */
1295 0x3ffc00, /* dst_mask */
1296 FALSE), /* pcrel_offset */
1297
1298 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12, but no overflow check. */
1299 HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12_NC), /* type */
1300 3, /* rightshift */
1301 2, /* size (0 = byte, 1 = short, 2 = long) */
1302 9, /* bitsize */
1303 FALSE, /* pc_relative */
1304 10, /* bitpos */
1305 complain_overflow_dont, /* complain_on_overflow */
1306 bfd_elf_generic_reloc, /* special_function */
1307 AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12_NC), /* name */
1308 FALSE, /* partial_inplace */
1309 0x7fc00, /* src_mask */
1310 0x7fc00, /* dst_mask */
1311 FALSE), /* pcrel_offset */
1312
1313 /* LD/ST8: bit[11:0] of byte offset to module TLS base address. */
1314 HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12), /* type */
1315 0, /* rightshift */
1316 2, /* size (0 = byte, 1 = short, 2 = long) */
1317 12, /* bitsize */
1318 FALSE, /* pc_relative */
1319 10, /* bitpos */
1320 complain_overflow_unsigned, /* complain_on_overflow */
1321 bfd_elf_generic_reloc, /* special_function */
1322 AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12), /* name */
1323 FALSE, /* partial_inplace */
1324 0x3ffc00, /* src_mask */
1325 0x3ffc00, /* dst_mask */
1326 FALSE), /* pcrel_offset */
1327
1328 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12, but no overflow check. */
1329 HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12_NC), /* type */
1330 0, /* rightshift */
1331 2, /* size (0 = byte, 1 = short, 2 = long) */
1332 12, /* bitsize */
1333 FALSE, /* pc_relative */
1334 10, /* bitpos */
1335 complain_overflow_dont, /* complain_on_overflow */
1336 bfd_elf_generic_reloc, /* special_function */
1337 AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12_NC), /* name */
1338 FALSE, /* partial_inplace */
1339 0x3ffc00, /* src_mask */
1340 0x3ffc00, /* dst_mask */
1341 FALSE), /* pcrel_offset */
1342
1343 /* MOVZ: bit[15:0] of byte offset to module TLS base address. */
1344 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0), /* type */
1345 0, /* rightshift */
1346 2, /* size (0 = byte, 1 = short, 2 = long) */
1347 16, /* bitsize */
1348 FALSE, /* pc_relative */
1349 0, /* bitpos */
1350 complain_overflow_unsigned, /* complain_on_overflow */
1351 bfd_elf_generic_reloc, /* special_function */
1352 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0), /* name */
1353 FALSE, /* partial_inplace */
1354 0xffff, /* src_mask */
1355 0xffff, /* dst_mask */
1356 FALSE), /* pcrel_offset */
1357
1358 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0. */
1359 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0_NC), /* type */
1360 0, /* rightshift */
1361 2, /* size (0 = byte, 1 = short, 2 = long) */
1362 16, /* bitsize */
1363 FALSE, /* pc_relative */
1364 0, /* bitpos */
1365 complain_overflow_dont, /* complain_on_overflow */
1366 bfd_elf_generic_reloc, /* special_function */
1367 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0_NC), /* name */
1368 FALSE, /* partial_inplace */
1369 0xffff, /* src_mask */
1370 0xffff, /* dst_mask */
1371 FALSE), /* pcrel_offset */
1372
1373 /* MOVZ: bit[31:16] of byte offset to module TLS base address. */
1374 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G1), /* type */
1375 16, /* rightshift */
1376 2, /* size (0 = byte, 1 = short, 2 = long) */
1377 16, /* bitsize */
1378 FALSE, /* pc_relative */
1379 0, /* bitpos */
1380 complain_overflow_unsigned, /* complain_on_overflow */
1381 bfd_elf_generic_reloc, /* special_function */
1382 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1), /* name */
1383 FALSE, /* partial_inplace */
1384 0xffff, /* src_mask */
1385 0xffff, /* dst_mask */
1386 FALSE), /* pcrel_offset */
1387
1388 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1. */
1389 HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G1_NC), /* type */
1390 16, /* rightshift */
1391 2, /* size (0 = byte, 1 = short, 2 = long) */
1392 16, /* bitsize */
1393 FALSE, /* pc_relative */
1394 0, /* bitpos */
1395 complain_overflow_dont, /* complain_on_overflow */
1396 bfd_elf_generic_reloc, /* special_function */
1397 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1_NC), /* name */
1398 FALSE, /* partial_inplace */
1399 0xffff, /* src_mask */
1400 0xffff, /* dst_mask */
1401 FALSE), /* pcrel_offset */
1402
1403 /* MOVZ: bit[47:32] of byte offset to module TLS base address. */
1404 HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G2), /* type */
1405 32, /* rightshift */
1406 2, /* size (0 = byte, 1 = short, 2 = long) */
1407 16, /* bitsize */
1408 FALSE, /* pc_relative */
1409 0, /* bitpos */
1410 complain_overflow_unsigned, /* complain_on_overflow */
1411 bfd_elf_generic_reloc, /* special_function */
1412 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G2), /* name */
1413 FALSE, /* partial_inplace */
1414 0xffff, /* src_mask */
1415 0xffff, /* dst_mask */
1416 FALSE), /* pcrel_offset */
1417
1418 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G2), /* type */
1419 32, /* rightshift */
1420 2, /* size (0 = byte, 1 = short, 2 = long) */
1421 16, /* bitsize */
1422 FALSE, /* pc_relative */
1423 0, /* bitpos */
1424 complain_overflow_unsigned, /* complain_on_overflow */
1425 bfd_elf_generic_reloc, /* special_function */
1426 AARCH64_R_STR (TLSLE_MOVW_TPREL_G2), /* name */
1427 FALSE, /* partial_inplace */
1428 0xffff, /* src_mask */
1429 0xffff, /* dst_mask */
1430 FALSE), /* pcrel_offset */
1431
1432 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G1), /* type */
1433 16, /* rightshift */
1434 2, /* size (0 = byte, 1 = short, 2 = long) */
1435 16, /* bitsize */
1436 FALSE, /* pc_relative */
1437 0, /* bitpos */
1438 complain_overflow_dont, /* complain_on_overflow */
1439 bfd_elf_generic_reloc, /* special_function */
1440 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1), /* name */
1441 FALSE, /* partial_inplace */
1442 0xffff, /* src_mask */
1443 0xffff, /* dst_mask */
1444 FALSE), /* pcrel_offset */
1445
1446 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G1_NC), /* type */
1447 16, /* rightshift */
1448 2, /* size (0 = byte, 1 = short, 2 = long) */
1449 16, /* bitsize */
1450 FALSE, /* pc_relative */
1451 0, /* bitpos */
1452 complain_overflow_dont, /* complain_on_overflow */
1453 bfd_elf_generic_reloc, /* special_function */
1454 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1_NC), /* name */
1455 FALSE, /* partial_inplace */
1456 0xffff, /* src_mask */
1457 0xffff, /* dst_mask */
1458 FALSE), /* pcrel_offset */
1459
1460 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0), /* type */
1461 0, /* rightshift */
1462 2, /* size (0 = byte, 1 = short, 2 = long) */
1463 16, /* bitsize */
1464 FALSE, /* pc_relative */
1465 0, /* bitpos */
1466 complain_overflow_dont, /* complain_on_overflow */
1467 bfd_elf_generic_reloc, /* special_function */
1468 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0), /* name */
1469 FALSE, /* partial_inplace */
1470 0xffff, /* src_mask */
1471 0xffff, /* dst_mask */
1472 FALSE), /* pcrel_offset */
1473
1474 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0_NC), /* type */
1475 0, /* rightshift */
1476 2, /* size (0 = byte, 1 = short, 2 = long) */
1477 16, /* bitsize */
1478 FALSE, /* pc_relative */
1479 0, /* bitpos */
1480 complain_overflow_dont, /* complain_on_overflow */
1481 bfd_elf_generic_reloc, /* special_function */
1482 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0_NC), /* name */
1483 FALSE, /* partial_inplace */
1484 0xffff, /* src_mask */
1485 0xffff, /* dst_mask */
1486 FALSE), /* pcrel_offset */
1487
1488 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_HI12), /* type */
1489 12, /* rightshift */
1490 2, /* size (0 = byte, 1 = short, 2 = long) */
1491 12, /* bitsize */
1492 FALSE, /* pc_relative */
1493 0, /* bitpos */
1494 complain_overflow_unsigned, /* complain_on_overflow */
1495 bfd_elf_generic_reloc, /* special_function */
1496 AARCH64_R_STR (TLSLE_ADD_TPREL_HI12), /* name */
1497 FALSE, /* partial_inplace */
1498 0xfff, /* src_mask */
1499 0xfff, /* dst_mask */
1500 FALSE), /* pcrel_offset */
1501
1502 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12), /* type */
1503 0, /* rightshift */
1504 2, /* size (0 = byte, 1 = short, 2 = long) */
1505 12, /* bitsize */
1506 FALSE, /* pc_relative */
1507 0, /* bitpos */
1508 complain_overflow_unsigned, /* complain_on_overflow */
1509 bfd_elf_generic_reloc, /* special_function */
1510 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12), /* name */
1511 FALSE, /* partial_inplace */
1512 0xfff, /* src_mask */
1513 0xfff, /* dst_mask */
1514 FALSE), /* pcrel_offset */
1515
1516 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12_NC), /* type */
1517 0, /* rightshift */
1518 2, /* size (0 = byte, 1 = short, 2 = long) */
1519 12, /* bitsize */
1520 FALSE, /* pc_relative */
1521 0, /* bitpos */
1522 complain_overflow_dont, /* complain_on_overflow */
1523 bfd_elf_generic_reloc, /* special_function */
1524 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12_NC), /* name */
1525 FALSE, /* partial_inplace */
1526 0xfff, /* src_mask */
1527 0xfff, /* dst_mask */
1528 FALSE), /* pcrel_offset */
1529
1530 HOWTO (AARCH64_R (TLSDESC_LD_PREL19), /* type */
1531 2, /* rightshift */
1532 2, /* size (0 = byte, 1 = short, 2 = long) */
1533 19, /* bitsize */
1534 TRUE, /* pc_relative */
1535 0, /* bitpos */
1536 complain_overflow_dont, /* complain_on_overflow */
1537 bfd_elf_generic_reloc, /* special_function */
1538 AARCH64_R_STR (TLSDESC_LD_PREL19), /* name */
1539 FALSE, /* partial_inplace */
1540 0x0ffffe0, /* src_mask */
1541 0x0ffffe0, /* dst_mask */
1542 TRUE), /* pcrel_offset */
1543
1544 HOWTO (AARCH64_R (TLSDESC_ADR_PREL21), /* type */
1545 0, /* rightshift */
1546 2, /* size (0 = byte, 1 = short, 2 = long) */
1547 21, /* bitsize */
1548 TRUE, /* pc_relative */
1549 0, /* bitpos */
1550 complain_overflow_dont, /* complain_on_overflow */
1551 bfd_elf_generic_reloc, /* special_function */
1552 AARCH64_R_STR (TLSDESC_ADR_PREL21), /* name */
1553 FALSE, /* partial_inplace */
1554 0x1fffff, /* src_mask */
1555 0x1fffff, /* dst_mask */
1556 TRUE), /* pcrel_offset */
1557
1558 /* Get to the page for the GOT entry for the symbol
1559 (G(S) - P) using an ADRP instruction. */
1560 HOWTO (AARCH64_R (TLSDESC_ADR_PAGE21), /* type */
1561 12, /* rightshift */
1562 2, /* size (0 = byte, 1 = short, 2 = long) */
1563 21, /* bitsize */
1564 TRUE, /* pc_relative */
1565 0, /* bitpos */
1566 complain_overflow_dont, /* complain_on_overflow */
1567 bfd_elf_generic_reloc, /* special_function */
1568 AARCH64_R_STR (TLSDESC_ADR_PAGE21), /* name */
1569 FALSE, /* partial_inplace */
1570 0x1fffff, /* src_mask */
1571 0x1fffff, /* dst_mask */
1572 TRUE), /* pcrel_offset */
1573
1574 /* LD64: GOT offset G(S) & 0xff8. */
1575 HOWTO64 (AARCH64_R (TLSDESC_LD64_LO12), /* type */
1576 3, /* rightshift */
1577 2, /* size (0 = byte, 1 = short, 2 = long) */
1578 12, /* bitsize */
1579 FALSE, /* pc_relative */
1580 0, /* bitpos */
1581 complain_overflow_dont, /* complain_on_overflow */
1582 bfd_elf_generic_reloc, /* special_function */
1583 AARCH64_R_STR (TLSDESC_LD64_LO12), /* name */
1584 FALSE, /* partial_inplace */
1585 0xff8, /* src_mask */
1586 0xff8, /* dst_mask */
1587 FALSE), /* pcrel_offset */
1588
1589 /* LD32: GOT offset G(S) & 0xffc. */
1590 HOWTO32 (AARCH64_R (TLSDESC_LD32_LO12_NC), /* type */
1591 2, /* rightshift */
1592 2, /* size (0 = byte, 1 = short, 2 = long) */
1593 12, /* bitsize */
1594 FALSE, /* pc_relative */
1595 0, /* bitpos */
1596 complain_overflow_dont, /* complain_on_overflow */
1597 bfd_elf_generic_reloc, /* special_function */
1598 AARCH64_R_STR (TLSDESC_LD32_LO12_NC), /* name */
1599 FALSE, /* partial_inplace */
1600 0xffc, /* src_mask */
1601 0xffc, /* dst_mask */
1602 FALSE), /* pcrel_offset */
1603
1604 /* ADD: GOT offset G(S) & 0xfff. */
1605 HOWTO (AARCH64_R (TLSDESC_ADD_LO12), /* type */
1606 0, /* rightshift */
1607 2, /* size (0 = byte, 1 = short, 2 = long) */
1608 12, /* bitsize */
1609 FALSE, /* pc_relative */
1610 0, /* bitpos */
1611 complain_overflow_dont,/* complain_on_overflow */
1612 bfd_elf_generic_reloc, /* special_function */
1613 AARCH64_R_STR (TLSDESC_ADD_LO12), /* name */
1614 FALSE, /* partial_inplace */
1615 0xfff, /* src_mask */
1616 0xfff, /* dst_mask */
1617 FALSE), /* pcrel_offset */
1618
1619 HOWTO64 (AARCH64_R (TLSDESC_OFF_G1), /* type */
1620 16, /* rightshift */
1621 2, /* size (0 = byte, 1 = short, 2 = long) */
1622 12, /* bitsize */
1623 FALSE, /* pc_relative */
1624 0, /* bitpos */
1625 complain_overflow_unsigned, /* complain_on_overflow */
1626 bfd_elf_generic_reloc, /* special_function */
1627 AARCH64_R_STR (TLSDESC_OFF_G1), /* name */
1628 FALSE, /* partial_inplace */
1629 0xffff, /* src_mask */
1630 0xffff, /* dst_mask */
1631 FALSE), /* pcrel_offset */
1632
1633 HOWTO64 (AARCH64_R (TLSDESC_OFF_G0_NC), /* type */
1634 0, /* rightshift */
1635 2, /* size (0 = byte, 1 = short, 2 = long) */
1636 12, /* bitsize */
1637 FALSE, /* pc_relative */
1638 0, /* bitpos */
1639 complain_overflow_dont, /* complain_on_overflow */
1640 bfd_elf_generic_reloc, /* special_function */
1641 AARCH64_R_STR (TLSDESC_OFF_G0_NC), /* name */
1642 FALSE, /* partial_inplace */
1643 0xffff, /* src_mask */
1644 0xffff, /* dst_mask */
1645 FALSE), /* pcrel_offset */
1646
1647 HOWTO64 (AARCH64_R (TLSDESC_LDR), /* type */
1648 0, /* rightshift */
1649 2, /* size (0 = byte, 1 = short, 2 = long) */
1650 12, /* bitsize */
1651 FALSE, /* pc_relative */
1652 0, /* bitpos */
1653 complain_overflow_dont, /* complain_on_overflow */
1654 bfd_elf_generic_reloc, /* special_function */
1655 AARCH64_R_STR (TLSDESC_LDR), /* name */
1656 FALSE, /* partial_inplace */
1657 0x0, /* src_mask */
1658 0x0, /* dst_mask */
1659 FALSE), /* pcrel_offset */
1660
1661 HOWTO64 (AARCH64_R (TLSDESC_ADD), /* type */
1662 0, /* rightshift */
1663 2, /* size (0 = byte, 1 = short, 2 = long) */
1664 12, /* bitsize */
1665 FALSE, /* pc_relative */
1666 0, /* bitpos */
1667 complain_overflow_dont, /* complain_on_overflow */
1668 bfd_elf_generic_reloc, /* special_function */
1669 AARCH64_R_STR (TLSDESC_ADD), /* name */
1670 FALSE, /* partial_inplace */
1671 0x0, /* src_mask */
1672 0x0, /* dst_mask */
1673 FALSE), /* pcrel_offset */
1674
1675 HOWTO (AARCH64_R (TLSDESC_CALL), /* type */
1676 0, /* rightshift */
1677 2, /* size (0 = byte, 1 = short, 2 = long) */
1678 0, /* bitsize */
1679 FALSE, /* pc_relative */
1680 0, /* bitpos */
1681 complain_overflow_dont, /* complain_on_overflow */
1682 bfd_elf_generic_reloc, /* special_function */
1683 AARCH64_R_STR (TLSDESC_CALL), /* name */
1684 FALSE, /* partial_inplace */
1685 0x0, /* src_mask */
1686 0x0, /* dst_mask */
1687 FALSE), /* pcrel_offset */
1688
1689 HOWTO (AARCH64_R (COPY), /* type */
1690 0, /* rightshift */
1691 2, /* size (0 = byte, 1 = short, 2 = long) */
1692 64, /* bitsize */
1693 FALSE, /* pc_relative */
1694 0, /* bitpos */
1695 complain_overflow_bitfield, /* complain_on_overflow */
1696 bfd_elf_generic_reloc, /* special_function */
1697 AARCH64_R_STR (COPY), /* name */
1698 TRUE, /* partial_inplace */
1699 0xffffffff, /* src_mask */
1700 0xffffffff, /* dst_mask */
1701 FALSE), /* pcrel_offset */
1702
1703 HOWTO (AARCH64_R (GLOB_DAT), /* type */
1704 0, /* rightshift */
1705 2, /* size (0 = byte, 1 = short, 2 = long) */
1706 64, /* bitsize */
1707 FALSE, /* pc_relative */
1708 0, /* bitpos */
1709 complain_overflow_bitfield, /* complain_on_overflow */
1710 bfd_elf_generic_reloc, /* special_function */
1711 AARCH64_R_STR (GLOB_DAT), /* name */
1712 TRUE, /* partial_inplace */
1713 0xffffffff, /* src_mask */
1714 0xffffffff, /* dst_mask */
1715 FALSE), /* pcrel_offset */
1716
1717 HOWTO (AARCH64_R (JUMP_SLOT), /* type */
1718 0, /* rightshift */
1719 2, /* size (0 = byte, 1 = short, 2 = long) */
1720 64, /* bitsize */
1721 FALSE, /* pc_relative */
1722 0, /* bitpos */
1723 complain_overflow_bitfield, /* complain_on_overflow */
1724 bfd_elf_generic_reloc, /* special_function */
1725 AARCH64_R_STR (JUMP_SLOT), /* name */
1726 TRUE, /* partial_inplace */
1727 0xffffffff, /* src_mask */
1728 0xffffffff, /* dst_mask */
1729 FALSE), /* pcrel_offset */
1730
1731 HOWTO (AARCH64_R (RELATIVE), /* type */
1732 0, /* rightshift */
1733 2, /* size (0 = byte, 1 = short, 2 = long) */
1734 64, /* bitsize */
1735 FALSE, /* pc_relative */
1736 0, /* bitpos */
1737 complain_overflow_bitfield, /* complain_on_overflow */
1738 bfd_elf_generic_reloc, /* special_function */
1739 AARCH64_R_STR (RELATIVE), /* name */
1740 TRUE, /* partial_inplace */
1741 ALL_ONES, /* src_mask */
1742 ALL_ONES, /* dst_mask */
1743 FALSE), /* pcrel_offset */
1744
1745 HOWTO (AARCH64_R (TLS_DTPMOD), /* type */
1746 0, /* rightshift */
1747 2, /* size (0 = byte, 1 = short, 2 = long) */
1748 64, /* bitsize */
1749 FALSE, /* pc_relative */
1750 0, /* bitpos */
1751 complain_overflow_dont, /* complain_on_overflow */
1752 bfd_elf_generic_reloc, /* special_function */
1753 #if ARCH_SIZE == 64
1754 AARCH64_R_STR (TLS_DTPMOD64), /* name */
1755 #else
1756 AARCH64_R_STR (TLS_DTPMOD), /* name */
1757 #endif
1758 FALSE, /* partial_inplace */
1759 0, /* src_mask */
1760 ALL_ONES, /* dst_mask */
1761 FALSE), /* pc_reloffset */
1762
1763 HOWTO (AARCH64_R (TLS_DTPREL), /* type */
1764 0, /* rightshift */
1765 2, /* size (0 = byte, 1 = short, 2 = long) */
1766 64, /* bitsize */
1767 FALSE, /* pc_relative */
1768 0, /* bitpos */
1769 complain_overflow_dont, /* complain_on_overflow */
1770 bfd_elf_generic_reloc, /* special_function */
1771 #if ARCH_SIZE == 64
1772 AARCH64_R_STR (TLS_DTPREL64), /* name */
1773 #else
1774 AARCH64_R_STR (TLS_DTPREL), /* name */
1775 #endif
1776 FALSE, /* partial_inplace */
1777 0, /* src_mask */
1778 ALL_ONES, /* dst_mask */
1779 FALSE), /* pcrel_offset */
1780
1781 HOWTO (AARCH64_R (TLS_TPREL), /* type */
1782 0, /* rightshift */
1783 2, /* size (0 = byte, 1 = short, 2 = long) */
1784 64, /* bitsize */
1785 FALSE, /* pc_relative */
1786 0, /* bitpos */
1787 complain_overflow_dont, /* complain_on_overflow */
1788 bfd_elf_generic_reloc, /* special_function */
1789 #if ARCH_SIZE == 64
1790 AARCH64_R_STR (TLS_TPREL64), /* name */
1791 #else
1792 AARCH64_R_STR (TLS_TPREL), /* name */
1793 #endif
1794 FALSE, /* partial_inplace */
1795 0, /* src_mask */
1796 ALL_ONES, /* dst_mask */
1797 FALSE), /* pcrel_offset */
1798
1799 HOWTO (AARCH64_R (TLSDESC), /* type */
1800 0, /* rightshift */
1801 2, /* size (0 = byte, 1 = short, 2 = long) */
1802 64, /* bitsize */
1803 FALSE, /* pc_relative */
1804 0, /* bitpos */
1805 complain_overflow_dont, /* complain_on_overflow */
1806 bfd_elf_generic_reloc, /* special_function */
1807 AARCH64_R_STR (TLSDESC), /* name */
1808 FALSE, /* partial_inplace */
1809 0, /* src_mask */
1810 ALL_ONES, /* dst_mask */
1811 FALSE), /* pcrel_offset */
1812
1813 HOWTO (AARCH64_R (IRELATIVE), /* type */
1814 0, /* rightshift */
1815 2, /* size (0 = byte, 1 = short, 2 = long) */
1816 64, /* bitsize */
1817 FALSE, /* pc_relative */
1818 0, /* bitpos */
1819 complain_overflow_bitfield, /* complain_on_overflow */
1820 bfd_elf_generic_reloc, /* special_function */
1821 AARCH64_R_STR (IRELATIVE), /* name */
1822 FALSE, /* partial_inplace */
1823 0, /* src_mask */
1824 ALL_ONES, /* dst_mask */
1825 FALSE), /* pcrel_offset */
1826
1827 EMPTY_HOWTO (0),
1828 };
1829
1830 static reloc_howto_type elfNN_aarch64_howto_none =
1831 HOWTO (R_AARCH64_NONE, /* type */
1832 0, /* rightshift */
1833 3, /* size (0 = byte, 1 = short, 2 = long) */
1834 0, /* bitsize */
1835 FALSE, /* pc_relative */
1836 0, /* bitpos */
1837 complain_overflow_dont,/* complain_on_overflow */
1838 bfd_elf_generic_reloc, /* special_function */
1839 "R_AARCH64_NONE", /* name */
1840 FALSE, /* partial_inplace */
1841 0, /* src_mask */
1842 0, /* dst_mask */
1843 FALSE); /* pcrel_offset */
1844
1845 /* Given HOWTO, return the bfd internal relocation enumerator. */
1846
1847 static bfd_reloc_code_real_type
1848 elfNN_aarch64_bfd_reloc_from_howto (reloc_howto_type *howto)
1849 {
1850 const int size
1851 = (int) ARRAY_SIZE (elfNN_aarch64_howto_table);
1852 const ptrdiff_t offset
1853 = howto - elfNN_aarch64_howto_table;
1854
1855 if (offset > 0 && offset < size - 1)
1856 return BFD_RELOC_AARCH64_RELOC_START + offset;
1857
1858 if (howto == &elfNN_aarch64_howto_none)
1859 return BFD_RELOC_AARCH64_NONE;
1860
1861 return BFD_RELOC_AARCH64_RELOC_START;
1862 }
1863
1864 /* Given R_TYPE, return the bfd internal relocation enumerator. */
1865
1866 static bfd_reloc_code_real_type
1867 elfNN_aarch64_bfd_reloc_from_type (unsigned int r_type)
1868 {
1869 static bfd_boolean initialized_p = FALSE;
1870 /* Indexed by R_TYPE, values are offsets in the howto_table. */
1871 static unsigned int offsets[R_AARCH64_end];
1872
1873 if (!initialized_p)
1874 {
1875 unsigned int i;
1876
1877 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
1878 if (elfNN_aarch64_howto_table[i].type != 0)
1879 offsets[elfNN_aarch64_howto_table[i].type] = i;
1880
1881 initialized_p = TRUE;
1882 }
1883
1884 if (r_type == R_AARCH64_NONE || r_type == R_AARCH64_NULL)
1885 return BFD_RELOC_AARCH64_NONE;
1886
1887 /* PR 17512: file: b371e70a. */
1888 if (r_type >= R_AARCH64_end)
1889 {
1890 _bfd_error_handler (_("Invalid AArch64 reloc number: %d"), r_type);
1891 bfd_set_error (bfd_error_bad_value);
1892 return BFD_RELOC_AARCH64_NONE;
1893 }
1894
1895 return BFD_RELOC_AARCH64_RELOC_START + offsets[r_type];
1896 }
1897
1898 struct elf_aarch64_reloc_map
1899 {
1900 bfd_reloc_code_real_type from;
1901 bfd_reloc_code_real_type to;
1902 };
1903
1904 /* Map bfd generic reloc to AArch64-specific reloc. */
1905 static const struct elf_aarch64_reloc_map elf_aarch64_reloc_map[] =
1906 {
1907 {BFD_RELOC_NONE, BFD_RELOC_AARCH64_NONE},
1908
1909 /* Basic data relocations. */
1910 {BFD_RELOC_CTOR, BFD_RELOC_AARCH64_NN},
1911 {BFD_RELOC_64, BFD_RELOC_AARCH64_64},
1912 {BFD_RELOC_32, BFD_RELOC_AARCH64_32},
1913 {BFD_RELOC_16, BFD_RELOC_AARCH64_16},
1914 {BFD_RELOC_64_PCREL, BFD_RELOC_AARCH64_64_PCREL},
1915 {BFD_RELOC_32_PCREL, BFD_RELOC_AARCH64_32_PCREL},
1916 {BFD_RELOC_16_PCREL, BFD_RELOC_AARCH64_16_PCREL},
1917 };
1918
1919 /* Given the bfd internal relocation enumerator in CODE, return the
1920 corresponding howto entry. */
1921
1922 static reloc_howto_type *
1923 elfNN_aarch64_howto_from_bfd_reloc (bfd_reloc_code_real_type code)
1924 {
1925 unsigned int i;
1926
1927 /* Convert bfd generic reloc to AArch64-specific reloc. */
1928 if (code < BFD_RELOC_AARCH64_RELOC_START
1929 || code > BFD_RELOC_AARCH64_RELOC_END)
1930 for (i = 0; i < ARRAY_SIZE (elf_aarch64_reloc_map); i++)
1931 if (elf_aarch64_reloc_map[i].from == code)
1932 {
1933 code = elf_aarch64_reloc_map[i].to;
1934 break;
1935 }
1936
1937 if (code > BFD_RELOC_AARCH64_RELOC_START
1938 && code < BFD_RELOC_AARCH64_RELOC_END)
1939 if (elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START].type)
1940 return &elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START];
1941
1942 if (code == BFD_RELOC_AARCH64_NONE)
1943 return &elfNN_aarch64_howto_none;
1944
1945 return NULL;
1946 }
1947
1948 static reloc_howto_type *
1949 elfNN_aarch64_howto_from_type (unsigned int r_type)
1950 {
1951 bfd_reloc_code_real_type val;
1952 reloc_howto_type *howto;
1953
1954 #if ARCH_SIZE == 32
1955 if (r_type > 256)
1956 {
1957 bfd_set_error (bfd_error_bad_value);
1958 return NULL;
1959 }
1960 #endif
1961
1962 if (r_type == R_AARCH64_NONE)
1963 return &elfNN_aarch64_howto_none;
1964
1965 val = elfNN_aarch64_bfd_reloc_from_type (r_type);
1966 howto = elfNN_aarch64_howto_from_bfd_reloc (val);
1967
1968 if (howto != NULL)
1969 return howto;
1970
1971 bfd_set_error (bfd_error_bad_value);
1972 return NULL;
1973 }
1974
1975 static void
1976 elfNN_aarch64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *bfd_reloc,
1977 Elf_Internal_Rela *elf_reloc)
1978 {
1979 unsigned int r_type;
1980
1981 r_type = ELFNN_R_TYPE (elf_reloc->r_info);
1982 bfd_reloc->howto = elfNN_aarch64_howto_from_type (r_type);
1983 }
1984
1985 static reloc_howto_type *
1986 elfNN_aarch64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1987 bfd_reloc_code_real_type code)
1988 {
1989 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (code);
1990
1991 if (howto != NULL)
1992 return howto;
1993
1994 bfd_set_error (bfd_error_bad_value);
1995 return NULL;
1996 }
1997
1998 static reloc_howto_type *
1999 elfNN_aarch64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
2000 const char *r_name)
2001 {
2002 unsigned int i;
2003
2004 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
2005 if (elfNN_aarch64_howto_table[i].name != NULL
2006 && strcasecmp (elfNN_aarch64_howto_table[i].name, r_name) == 0)
2007 return &elfNN_aarch64_howto_table[i];
2008
2009 return NULL;
2010 }
2011
2012 #define TARGET_LITTLE_SYM aarch64_elfNN_le_vec
2013 #define TARGET_LITTLE_NAME "elfNN-littleaarch64"
2014 #define TARGET_BIG_SYM aarch64_elfNN_be_vec
2015 #define TARGET_BIG_NAME "elfNN-bigaarch64"
2016
2017 /* The linker script knows the section names for placement.
2018 The entry_names are used to do simple name mangling on the stubs.
2019 Given a function name, and its type, the stub can be found. The
2020 name can be changed. The only requirement is the %s be present. */
2021 #define STUB_ENTRY_NAME "__%s_veneer"
2022
2023 /* The name of the dynamic interpreter. This is put in the .interp
2024 section. */
2025 #define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
2026
2027 #define AARCH64_MAX_FWD_BRANCH_OFFSET \
2028 (((1 << 25) - 1) << 2)
2029 #define AARCH64_MAX_BWD_BRANCH_OFFSET \
2030 (-((1 << 25) << 2))
2031
2032 #define AARCH64_MAX_ADRP_IMM ((1 << 20) - 1)
2033 #define AARCH64_MIN_ADRP_IMM (-(1 << 20))
2034
2035 static int
2036 aarch64_valid_for_adrp_p (bfd_vma value, bfd_vma place)
2037 {
2038 bfd_signed_vma offset = (bfd_signed_vma) (PG (value) - PG (place)) >> 12;
2039 return offset <= AARCH64_MAX_ADRP_IMM && offset >= AARCH64_MIN_ADRP_IMM;
2040 }
2041
2042 static int
2043 aarch64_valid_branch_p (bfd_vma value, bfd_vma place)
2044 {
2045 bfd_signed_vma offset = (bfd_signed_vma) (value - place);
2046 return (offset <= AARCH64_MAX_FWD_BRANCH_OFFSET
2047 && offset >= AARCH64_MAX_BWD_BRANCH_OFFSET);
2048 }
2049
2050 static const uint32_t aarch64_adrp_branch_stub [] =
2051 {
2052 0x90000010, /* adrp ip0, X */
2053 /* R_AARCH64_ADR_HI21_PCREL(X) */
2054 0x91000210, /* add ip0, ip0, :lo12:X */
2055 /* R_AARCH64_ADD_ABS_LO12_NC(X) */
2056 0xd61f0200, /* br ip0 */
2057 };
2058
2059 static const uint32_t aarch64_long_branch_stub[] =
2060 {
2061 #if ARCH_SIZE == 64
2062 0x58000090, /* ldr ip0, 1f */
2063 #else
2064 0x18000090, /* ldr wip0, 1f */
2065 #endif
2066 0x10000011, /* adr ip1, #0 */
2067 0x8b110210, /* add ip0, ip0, ip1 */
2068 0xd61f0200, /* br ip0 */
2069 0x00000000, /* 1: .xword or .word
2070 R_AARCH64_PRELNN(X) + 12
2071 */
2072 0x00000000,
2073 };
2074
2075 static const uint32_t aarch64_erratum_835769_stub[] =
2076 {
2077 0x00000000, /* Placeholder for multiply accumulate. */
2078 0x14000000, /* b <label> */
2079 };
2080
2081 static const uint32_t aarch64_erratum_843419_stub[] =
2082 {
2083 0x00000000, /* Placeholder for LDR instruction. */
2084 0x14000000, /* b <label> */
2085 };
2086
2087 /* Section name for stubs is the associated section name plus this
2088 string. */
2089 #define STUB_SUFFIX ".stub"
2090
2091 enum elf_aarch64_stub_type
2092 {
2093 aarch64_stub_none,
2094 aarch64_stub_adrp_branch,
2095 aarch64_stub_long_branch,
2096 aarch64_stub_erratum_835769_veneer,
2097 aarch64_stub_erratum_843419_veneer,
2098 };
2099
2100 struct elf_aarch64_stub_hash_entry
2101 {
2102 /* Base hash table entry structure. */
2103 struct bfd_hash_entry root;
2104
2105 /* The stub section. */
2106 asection *stub_sec;
2107
2108 /* Offset within stub_sec of the beginning of this stub. */
2109 bfd_vma stub_offset;
2110
2111 /* Given the symbol's value and its section we can determine its final
2112 value when building the stubs (so the stub knows where to jump). */
2113 bfd_vma target_value;
2114 asection *target_section;
2115
2116 enum elf_aarch64_stub_type stub_type;
2117
2118 /* The symbol table entry, if any, that this was derived from. */
2119 struct elf_aarch64_link_hash_entry *h;
2120
2121 /* Destination symbol type */
2122 unsigned char st_type;
2123
2124 /* Where this stub is being called from, or, in the case of combined
2125 stub sections, the first input section in the group. */
2126 asection *id_sec;
2127
2128 /* The name for the local symbol at the start of this stub. The
2129 stub name in the hash table has to be unique; this does not, so
2130 it can be friendlier. */
2131 char *output_name;
2132
2133 /* The instruction which caused this stub to be generated (only valid for
2134 erratum 835769 workaround stubs at present). */
2135 uint32_t veneered_insn;
2136
2137 /* In an erratum 843419 workaround stub, the ADRP instruction offset. */
2138 bfd_vma adrp_offset;
2139 };
2140
2141 /* Used to build a map of a section. This is required for mixed-endian
2142 code/data. */
2143
2144 typedef struct elf_elf_section_map
2145 {
2146 bfd_vma vma;
2147 char type;
2148 }
2149 elf_aarch64_section_map;
2150
2151
2152 typedef struct _aarch64_elf_section_data
2153 {
2154 struct bfd_elf_section_data elf;
2155 unsigned int mapcount;
2156 unsigned int mapsize;
2157 elf_aarch64_section_map *map;
2158 }
2159 _aarch64_elf_section_data;
2160
2161 #define elf_aarch64_section_data(sec) \
2162 ((_aarch64_elf_section_data *) elf_section_data (sec))
2163
2164 /* The size of the thread control block which is defined to be two pointers. */
2165 #define TCB_SIZE (ARCH_SIZE/8)*2
2166
2167 struct elf_aarch64_local_symbol
2168 {
2169 unsigned int got_type;
2170 bfd_signed_vma got_refcount;
2171 bfd_vma got_offset;
2172
2173 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The
2174 offset is from the end of the jump table and reserved entries
2175 within the PLTGOT.
2176
2177 The magic value (bfd_vma) -1 indicates that an offset has not be
2178 allocated. */
2179 bfd_vma tlsdesc_got_jump_table_offset;
2180 };
2181
2182 struct elf_aarch64_obj_tdata
2183 {
2184 struct elf_obj_tdata root;
2185
2186 /* local symbol descriptors */
2187 struct elf_aarch64_local_symbol *locals;
2188
2189 /* Zero to warn when linking objects with incompatible enum sizes. */
2190 int no_enum_size_warning;
2191
2192 /* Zero to warn when linking objects with incompatible wchar_t sizes. */
2193 int no_wchar_size_warning;
2194 };
2195
2196 #define elf_aarch64_tdata(bfd) \
2197 ((struct elf_aarch64_obj_tdata *) (bfd)->tdata.any)
2198
2199 #define elf_aarch64_locals(bfd) (elf_aarch64_tdata (bfd)->locals)
2200
2201 #define is_aarch64_elf(bfd) \
2202 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
2203 && elf_tdata (bfd) != NULL \
2204 && elf_object_id (bfd) == AARCH64_ELF_DATA)
2205
2206 static bfd_boolean
2207 elfNN_aarch64_mkobject (bfd *abfd)
2208 {
2209 return bfd_elf_allocate_object (abfd, sizeof (struct elf_aarch64_obj_tdata),
2210 AARCH64_ELF_DATA);
2211 }
2212
2213 #define elf_aarch64_hash_entry(ent) \
2214 ((struct elf_aarch64_link_hash_entry *)(ent))
2215
2216 #define GOT_UNKNOWN 0
2217 #define GOT_NORMAL 1
2218 #define GOT_TLS_GD 2
2219 #define GOT_TLS_IE 4
2220 #define GOT_TLSDESC_GD 8
2221
2222 #define GOT_TLS_GD_ANY_P(type) ((type & GOT_TLS_GD) || (type & GOT_TLSDESC_GD))
2223
2224 /* AArch64 ELF linker hash entry. */
2225 struct elf_aarch64_link_hash_entry
2226 {
2227 struct elf_link_hash_entry root;
2228
2229 /* Track dynamic relocs copied for this symbol. */
2230 struct elf_dyn_relocs *dyn_relocs;
2231
2232 /* Since PLT entries have variable size, we need to record the
2233 index into .got.plt instead of recomputing it from the PLT
2234 offset. */
2235 bfd_signed_vma plt_got_offset;
2236
2237 /* Bit mask representing the type of GOT entry(s) if any required by
2238 this symbol. */
2239 unsigned int got_type;
2240
2241 /* A pointer to the most recently used stub hash entry against this
2242 symbol. */
2243 struct elf_aarch64_stub_hash_entry *stub_cache;
2244
2245 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The offset
2246 is from the end of the jump table and reserved entries within the PLTGOT.
2247
2248 The magic value (bfd_vma) -1 indicates that an offset has not
2249 be allocated. */
2250 bfd_vma tlsdesc_got_jump_table_offset;
2251 };
2252
2253 static unsigned int
2254 elfNN_aarch64_symbol_got_type (struct elf_link_hash_entry *h,
2255 bfd *abfd,
2256 unsigned long r_symndx)
2257 {
2258 if (h)
2259 return elf_aarch64_hash_entry (h)->got_type;
2260
2261 if (! elf_aarch64_locals (abfd))
2262 return GOT_UNKNOWN;
2263
2264 return elf_aarch64_locals (abfd)[r_symndx].got_type;
2265 }
2266
2267 /* Get the AArch64 elf linker hash table from a link_info structure. */
2268 #define elf_aarch64_hash_table(info) \
2269 ((struct elf_aarch64_link_hash_table *) ((info)->hash))
2270
2271 #define aarch64_stub_hash_lookup(table, string, create, copy) \
2272 ((struct elf_aarch64_stub_hash_entry *) \
2273 bfd_hash_lookup ((table), (string), (create), (copy)))
2274
2275 /* AArch64 ELF linker hash table. */
2276 struct elf_aarch64_link_hash_table
2277 {
2278 /* The main hash table. */
2279 struct elf_link_hash_table root;
2280
2281 /* Nonzero to force PIC branch veneers. */
2282 int pic_veneer;
2283
2284 /* Fix erratum 835769. */
2285 int fix_erratum_835769;
2286
2287 /* Fix erratum 843419. */
2288 int fix_erratum_843419;
2289
2290 /* Enable ADRP->ADR rewrite for erratum 843419 workaround. */
2291 int fix_erratum_843419_adr;
2292
2293 /* Don't apply link-time values for dynamic relocations. */
2294 int no_apply_dynamic_relocs;
2295
2296 /* The number of bytes in the initial entry in the PLT. */
2297 bfd_size_type plt_header_size;
2298
2299 /* The number of bytes in the subsequent PLT etries. */
2300 bfd_size_type plt_entry_size;
2301
2302 /* Small local sym cache. */
2303 struct sym_cache sym_cache;
2304
2305 /* For convenience in allocate_dynrelocs. */
2306 bfd *obfd;
2307
2308 /* The amount of space used by the reserved portion of the sgotplt
2309 section, plus whatever space is used by the jump slots. */
2310 bfd_vma sgotplt_jump_table_size;
2311
2312 /* The stub hash table. */
2313 struct bfd_hash_table stub_hash_table;
2314
2315 /* Linker stub bfd. */
2316 bfd *stub_bfd;
2317
2318 /* Linker call-backs. */
2319 asection *(*add_stub_section) (const char *, asection *);
2320 void (*layout_sections_again) (void);
2321
2322 /* Array to keep track of which stub sections have been created, and
2323 information on stub grouping. */
2324 struct map_stub
2325 {
2326 /* This is the section to which stubs in the group will be
2327 attached. */
2328 asection *link_sec;
2329 /* The stub section. */
2330 asection *stub_sec;
2331 } *stub_group;
2332
2333 /* Assorted information used by elfNN_aarch64_size_stubs. */
2334 unsigned int bfd_count;
2335 unsigned int top_index;
2336 asection **input_list;
2337
2338 /* The offset into splt of the PLT entry for the TLS descriptor
2339 resolver. Special values are 0, if not necessary (or not found
2340 to be necessary yet), and -1 if needed but not determined
2341 yet. */
2342 bfd_vma tlsdesc_plt;
2343
2344 /* The GOT offset for the lazy trampoline. Communicated to the
2345 loader via DT_TLSDESC_GOT. The magic value (bfd_vma) -1
2346 indicates an offset is not allocated. */
2347 bfd_vma dt_tlsdesc_got;
2348
2349 /* Used by local STT_GNU_IFUNC symbols. */
2350 htab_t loc_hash_table;
2351 void * loc_hash_memory;
2352 };
2353
2354 /* Create an entry in an AArch64 ELF linker hash table. */
2355
2356 static struct bfd_hash_entry *
2357 elfNN_aarch64_link_hash_newfunc (struct bfd_hash_entry *entry,
2358 struct bfd_hash_table *table,
2359 const char *string)
2360 {
2361 struct elf_aarch64_link_hash_entry *ret =
2362 (struct elf_aarch64_link_hash_entry *) entry;
2363
2364 /* Allocate the structure if it has not already been allocated by a
2365 subclass. */
2366 if (ret == NULL)
2367 ret = bfd_hash_allocate (table,
2368 sizeof (struct elf_aarch64_link_hash_entry));
2369 if (ret == NULL)
2370 return (struct bfd_hash_entry *) ret;
2371
2372 /* Call the allocation method of the superclass. */
2373 ret = ((struct elf_aarch64_link_hash_entry *)
2374 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
2375 table, string));
2376 if (ret != NULL)
2377 {
2378 ret->dyn_relocs = NULL;
2379 ret->got_type = GOT_UNKNOWN;
2380 ret->plt_got_offset = (bfd_vma) - 1;
2381 ret->stub_cache = NULL;
2382 ret->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
2383 }
2384
2385 return (struct bfd_hash_entry *) ret;
2386 }
2387
2388 /* Initialize an entry in the stub hash table. */
2389
2390 static struct bfd_hash_entry *
2391 stub_hash_newfunc (struct bfd_hash_entry *entry,
2392 struct bfd_hash_table *table, const char *string)
2393 {
2394 /* Allocate the structure if it has not already been allocated by a
2395 subclass. */
2396 if (entry == NULL)
2397 {
2398 entry = bfd_hash_allocate (table,
2399 sizeof (struct
2400 elf_aarch64_stub_hash_entry));
2401 if (entry == NULL)
2402 return entry;
2403 }
2404
2405 /* Call the allocation method of the superclass. */
2406 entry = bfd_hash_newfunc (entry, table, string);
2407 if (entry != NULL)
2408 {
2409 struct elf_aarch64_stub_hash_entry *eh;
2410
2411 /* Initialize the local fields. */
2412 eh = (struct elf_aarch64_stub_hash_entry *) entry;
2413 eh->adrp_offset = 0;
2414 eh->stub_sec = NULL;
2415 eh->stub_offset = 0;
2416 eh->target_value = 0;
2417 eh->target_section = NULL;
2418 eh->stub_type = aarch64_stub_none;
2419 eh->h = NULL;
2420 eh->id_sec = NULL;
2421 }
2422
2423 return entry;
2424 }
2425
2426 /* Compute a hash of a local hash entry. We use elf_link_hash_entry
2427 for local symbol so that we can handle local STT_GNU_IFUNC symbols
2428 as global symbol. We reuse indx and dynstr_index for local symbol
2429 hash since they aren't used by global symbols in this backend. */
2430
2431 static hashval_t
2432 elfNN_aarch64_local_htab_hash (const void *ptr)
2433 {
2434 struct elf_link_hash_entry *h
2435 = (struct elf_link_hash_entry *) ptr;
2436 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
2437 }
2438
2439 /* Compare local hash entries. */
2440
2441 static int
2442 elfNN_aarch64_local_htab_eq (const void *ptr1, const void *ptr2)
2443 {
2444 struct elf_link_hash_entry *h1
2445 = (struct elf_link_hash_entry *) ptr1;
2446 struct elf_link_hash_entry *h2
2447 = (struct elf_link_hash_entry *) ptr2;
2448
2449 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
2450 }
2451
2452 /* Find and/or create a hash entry for local symbol. */
2453
2454 static struct elf_link_hash_entry *
2455 elfNN_aarch64_get_local_sym_hash (struct elf_aarch64_link_hash_table *htab,
2456 bfd *abfd, const Elf_Internal_Rela *rel,
2457 bfd_boolean create)
2458 {
2459 struct elf_aarch64_link_hash_entry e, *ret;
2460 asection *sec = abfd->sections;
2461 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
2462 ELFNN_R_SYM (rel->r_info));
2463 void **slot;
2464
2465 e.root.indx = sec->id;
2466 e.root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2467 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
2468 create ? INSERT : NO_INSERT);
2469
2470 if (!slot)
2471 return NULL;
2472
2473 if (*slot)
2474 {
2475 ret = (struct elf_aarch64_link_hash_entry *) *slot;
2476 return &ret->root;
2477 }
2478
2479 ret = (struct elf_aarch64_link_hash_entry *)
2480 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
2481 sizeof (struct elf_aarch64_link_hash_entry));
2482 if (ret)
2483 {
2484 memset (ret, 0, sizeof (*ret));
2485 ret->root.indx = sec->id;
2486 ret->root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2487 ret->root.dynindx = -1;
2488 *slot = ret;
2489 }
2490 return &ret->root;
2491 }
2492
2493 /* Copy the extra info we tack onto an elf_link_hash_entry. */
2494
2495 static void
2496 elfNN_aarch64_copy_indirect_symbol (struct bfd_link_info *info,
2497 struct elf_link_hash_entry *dir,
2498 struct elf_link_hash_entry *ind)
2499 {
2500 struct elf_aarch64_link_hash_entry *edir, *eind;
2501
2502 edir = (struct elf_aarch64_link_hash_entry *) dir;
2503 eind = (struct elf_aarch64_link_hash_entry *) ind;
2504
2505 if (eind->dyn_relocs != NULL)
2506 {
2507 if (edir->dyn_relocs != NULL)
2508 {
2509 struct elf_dyn_relocs **pp;
2510 struct elf_dyn_relocs *p;
2511
2512 /* Add reloc counts against the indirect sym to the direct sym
2513 list. Merge any entries against the same section. */
2514 for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2515 {
2516 struct elf_dyn_relocs *q;
2517
2518 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2519 if (q->sec == p->sec)
2520 {
2521 q->pc_count += p->pc_count;
2522 q->count += p->count;
2523 *pp = p->next;
2524 break;
2525 }
2526 if (q == NULL)
2527 pp = &p->next;
2528 }
2529 *pp = edir->dyn_relocs;
2530 }
2531
2532 edir->dyn_relocs = eind->dyn_relocs;
2533 eind->dyn_relocs = NULL;
2534 }
2535
2536 if (ind->root.type == bfd_link_hash_indirect)
2537 {
2538 /* Copy over PLT info. */
2539 if (dir->got.refcount <= 0)
2540 {
2541 edir->got_type = eind->got_type;
2542 eind->got_type = GOT_UNKNOWN;
2543 }
2544 }
2545
2546 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2547 }
2548
2549 /* Destroy an AArch64 elf linker hash table. */
2550
2551 static void
2552 elfNN_aarch64_link_hash_table_free (bfd *obfd)
2553 {
2554 struct elf_aarch64_link_hash_table *ret
2555 = (struct elf_aarch64_link_hash_table *) obfd->link.hash;
2556
2557 if (ret->loc_hash_table)
2558 htab_delete (ret->loc_hash_table);
2559 if (ret->loc_hash_memory)
2560 objalloc_free ((struct objalloc *) ret->loc_hash_memory);
2561
2562 bfd_hash_table_free (&ret->stub_hash_table);
2563 _bfd_elf_link_hash_table_free (obfd);
2564 }
2565
2566 /* Create an AArch64 elf linker hash table. */
2567
2568 static struct bfd_link_hash_table *
2569 elfNN_aarch64_link_hash_table_create (bfd *abfd)
2570 {
2571 struct elf_aarch64_link_hash_table *ret;
2572 bfd_size_type amt = sizeof (struct elf_aarch64_link_hash_table);
2573
2574 ret = bfd_zmalloc (amt);
2575 if (ret == NULL)
2576 return NULL;
2577
2578 if (!_bfd_elf_link_hash_table_init
2579 (&ret->root, abfd, elfNN_aarch64_link_hash_newfunc,
2580 sizeof (struct elf_aarch64_link_hash_entry), AARCH64_ELF_DATA))
2581 {
2582 free (ret);
2583 return NULL;
2584 }
2585
2586 ret->plt_header_size = PLT_ENTRY_SIZE;
2587 ret->plt_entry_size = PLT_SMALL_ENTRY_SIZE;
2588 ret->obfd = abfd;
2589 ret->dt_tlsdesc_got = (bfd_vma) - 1;
2590
2591 if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
2592 sizeof (struct elf_aarch64_stub_hash_entry)))
2593 {
2594 _bfd_elf_link_hash_table_free (abfd);
2595 return NULL;
2596 }
2597
2598 ret->loc_hash_table = htab_try_create (1024,
2599 elfNN_aarch64_local_htab_hash,
2600 elfNN_aarch64_local_htab_eq,
2601 NULL);
2602 ret->loc_hash_memory = objalloc_create ();
2603 if (!ret->loc_hash_table || !ret->loc_hash_memory)
2604 {
2605 elfNN_aarch64_link_hash_table_free (abfd);
2606 return NULL;
2607 }
2608 ret->root.root.hash_table_free = elfNN_aarch64_link_hash_table_free;
2609
2610 return &ret->root.root;
2611 }
2612
2613 /* Perform relocation R_TYPE. Returns TRUE upon success, FALSE otherwise. */
2614
2615 static bfd_boolean
2616 aarch64_relocate (unsigned int r_type, bfd *input_bfd, asection *input_section,
2617 bfd_vma offset, bfd_vma value)
2618 {
2619 reloc_howto_type *howto;
2620 bfd_vma place;
2621
2622 howto = elfNN_aarch64_howto_from_type (r_type);
2623 place = (input_section->output_section->vma + input_section->output_offset
2624 + offset);
2625
2626 r_type = elfNN_aarch64_bfd_reloc_from_type (r_type);
2627 value = _bfd_aarch64_elf_resolve_relocation (r_type, place, value, 0, FALSE);
2628 return _bfd_aarch64_elf_put_addend (input_bfd,
2629 input_section->contents + offset, r_type,
2630 howto, value) == bfd_reloc_ok;
2631 }
2632
2633 static enum elf_aarch64_stub_type
2634 aarch64_select_branch_stub (bfd_vma value, bfd_vma place)
2635 {
2636 if (aarch64_valid_for_adrp_p (value, place))
2637 return aarch64_stub_adrp_branch;
2638 return aarch64_stub_long_branch;
2639 }
2640
2641 /* Determine the type of stub needed, if any, for a call. */
2642
2643 static enum elf_aarch64_stub_type
2644 aarch64_type_of_stub (asection *input_sec,
2645 const Elf_Internal_Rela *rel,
2646 asection *sym_sec,
2647 unsigned char st_type,
2648 bfd_vma destination)
2649 {
2650 bfd_vma location;
2651 bfd_signed_vma branch_offset;
2652 unsigned int r_type;
2653 enum elf_aarch64_stub_type stub_type = aarch64_stub_none;
2654
2655 if (st_type != STT_FUNC
2656 && (sym_sec == input_sec))
2657 return stub_type;
2658
2659 /* Determine where the call point is. */
2660 location = (input_sec->output_offset
2661 + input_sec->output_section->vma + rel->r_offset);
2662
2663 branch_offset = (bfd_signed_vma) (destination - location);
2664
2665 r_type = ELFNN_R_TYPE (rel->r_info);
2666
2667 /* We don't want to redirect any old unconditional jump in this way,
2668 only one which is being used for a sibcall, where it is
2669 acceptable for the IP0 and IP1 registers to be clobbered. */
2670 if ((r_type == AARCH64_R (CALL26) || r_type == AARCH64_R (JUMP26))
2671 && (branch_offset > AARCH64_MAX_FWD_BRANCH_OFFSET
2672 || branch_offset < AARCH64_MAX_BWD_BRANCH_OFFSET))
2673 {
2674 stub_type = aarch64_stub_long_branch;
2675 }
2676
2677 return stub_type;
2678 }
2679
2680 /* Build a name for an entry in the stub hash table. */
2681
2682 static char *
2683 elfNN_aarch64_stub_name (const asection *input_section,
2684 const asection *sym_sec,
2685 const struct elf_aarch64_link_hash_entry *hash,
2686 const Elf_Internal_Rela *rel)
2687 {
2688 char *stub_name;
2689 bfd_size_type len;
2690
2691 if (hash)
2692 {
2693 len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 16 + 1;
2694 stub_name = bfd_malloc (len);
2695 if (stub_name != NULL)
2696 snprintf (stub_name, len, "%08x_%s+%" BFD_VMA_FMT "x",
2697 (unsigned int) input_section->id,
2698 hash->root.root.root.string,
2699 rel->r_addend);
2700 }
2701 else
2702 {
2703 len = 8 + 1 + 8 + 1 + 8 + 1 + 16 + 1;
2704 stub_name = bfd_malloc (len);
2705 if (stub_name != NULL)
2706 snprintf (stub_name, len, "%08x_%x:%x+%" BFD_VMA_FMT "x",
2707 (unsigned int) input_section->id,
2708 (unsigned int) sym_sec->id,
2709 (unsigned int) ELFNN_R_SYM (rel->r_info),
2710 rel->r_addend);
2711 }
2712
2713 return stub_name;
2714 }
2715
2716 /* Return TRUE if symbol H should be hashed in the `.gnu.hash' section. For
2717 executable PLT slots where the executable never takes the address of those
2718 functions, the function symbols are not added to the hash table. */
2719
2720 static bfd_boolean
2721 elf_aarch64_hash_symbol (struct elf_link_hash_entry *h)
2722 {
2723 if (h->plt.offset != (bfd_vma) -1
2724 && !h->def_regular
2725 && !h->pointer_equality_needed)
2726 return FALSE;
2727
2728 return _bfd_elf_hash_symbol (h);
2729 }
2730
2731
2732 /* Look up an entry in the stub hash. Stub entries are cached because
2733 creating the stub name takes a bit of time. */
2734
2735 static struct elf_aarch64_stub_hash_entry *
2736 elfNN_aarch64_get_stub_entry (const asection *input_section,
2737 const asection *sym_sec,
2738 struct elf_link_hash_entry *hash,
2739 const Elf_Internal_Rela *rel,
2740 struct elf_aarch64_link_hash_table *htab)
2741 {
2742 struct elf_aarch64_stub_hash_entry *stub_entry;
2743 struct elf_aarch64_link_hash_entry *h =
2744 (struct elf_aarch64_link_hash_entry *) hash;
2745 const asection *id_sec;
2746
2747 if ((input_section->flags & SEC_CODE) == 0)
2748 return NULL;
2749
2750 /* If this input section is part of a group of sections sharing one
2751 stub section, then use the id of the first section in the group.
2752 Stub names need to include a section id, as there may well be
2753 more than one stub used to reach say, printf, and we need to
2754 distinguish between them. */
2755 id_sec = htab->stub_group[input_section->id].link_sec;
2756
2757 if (h != NULL && h->stub_cache != NULL
2758 && h->stub_cache->h == h && h->stub_cache->id_sec == id_sec)
2759 {
2760 stub_entry = h->stub_cache;
2761 }
2762 else
2763 {
2764 char *stub_name;
2765
2766 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, h, rel);
2767 if (stub_name == NULL)
2768 return NULL;
2769
2770 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
2771 stub_name, FALSE, FALSE);
2772 if (h != NULL)
2773 h->stub_cache = stub_entry;
2774
2775 free (stub_name);
2776 }
2777
2778 return stub_entry;
2779 }
2780
2781
2782 /* Create a stub section. */
2783
2784 static asection *
2785 _bfd_aarch64_create_stub_section (asection *section,
2786 struct elf_aarch64_link_hash_table *htab)
2787 {
2788 size_t namelen;
2789 bfd_size_type len;
2790 char *s_name;
2791
2792 namelen = strlen (section->name);
2793 len = namelen + sizeof (STUB_SUFFIX);
2794 s_name = bfd_alloc (htab->stub_bfd, len);
2795 if (s_name == NULL)
2796 return NULL;
2797
2798 memcpy (s_name, section->name, namelen);
2799 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
2800 return (*htab->add_stub_section) (s_name, section);
2801 }
2802
2803
2804 /* Find or create a stub section for a link section.
2805
2806 Fix or create the stub section used to collect stubs attached to
2807 the specified link section. */
2808
2809 static asection *
2810 _bfd_aarch64_get_stub_for_link_section (asection *link_section,
2811 struct elf_aarch64_link_hash_table *htab)
2812 {
2813 if (htab->stub_group[link_section->id].stub_sec == NULL)
2814 htab->stub_group[link_section->id].stub_sec
2815 = _bfd_aarch64_create_stub_section (link_section, htab);
2816 return htab->stub_group[link_section->id].stub_sec;
2817 }
2818
2819
2820 /* Find or create a stub section in the stub group for an input
2821 section. */
2822
2823 static asection *
2824 _bfd_aarch64_create_or_find_stub_sec (asection *section,
2825 struct elf_aarch64_link_hash_table *htab)
2826 {
2827 asection *link_sec = htab->stub_group[section->id].link_sec;
2828 return _bfd_aarch64_get_stub_for_link_section (link_sec, htab);
2829 }
2830
2831
2832 /* Add a new stub entry in the stub group associated with an input
2833 section to the stub hash. Not all fields of the new stub entry are
2834 initialised. */
2835
2836 static struct elf_aarch64_stub_hash_entry *
2837 _bfd_aarch64_add_stub_entry_in_group (const char *stub_name,
2838 asection *section,
2839 struct elf_aarch64_link_hash_table *htab)
2840 {
2841 asection *link_sec;
2842 asection *stub_sec;
2843 struct elf_aarch64_stub_hash_entry *stub_entry;
2844
2845 link_sec = htab->stub_group[section->id].link_sec;
2846 stub_sec = _bfd_aarch64_create_or_find_stub_sec (section, htab);
2847
2848 /* Enter this entry into the linker stub hash table. */
2849 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
2850 TRUE, FALSE);
2851 if (stub_entry == NULL)
2852 {
2853 /* xgettext:c-format */
2854 _bfd_error_handler (_("%B: cannot create stub entry %s"),
2855 section->owner, stub_name);
2856 return NULL;
2857 }
2858
2859 stub_entry->stub_sec = stub_sec;
2860 stub_entry->stub_offset = 0;
2861 stub_entry->id_sec = link_sec;
2862
2863 return stub_entry;
2864 }
2865
2866 /* Add a new stub entry in the final stub section to the stub hash.
2867 Not all fields of the new stub entry are initialised. */
2868
2869 static struct elf_aarch64_stub_hash_entry *
2870 _bfd_aarch64_add_stub_entry_after (const char *stub_name,
2871 asection *link_section,
2872 struct elf_aarch64_link_hash_table *htab)
2873 {
2874 asection *stub_sec;
2875 struct elf_aarch64_stub_hash_entry *stub_entry;
2876
2877 stub_sec = _bfd_aarch64_get_stub_for_link_section (link_section, htab);
2878 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
2879 TRUE, FALSE);
2880 if (stub_entry == NULL)
2881 {
2882 _bfd_error_handler (_("cannot create stub entry %s"), stub_name);
2883 return NULL;
2884 }
2885
2886 stub_entry->stub_sec = stub_sec;
2887 stub_entry->stub_offset = 0;
2888 stub_entry->id_sec = link_section;
2889
2890 return stub_entry;
2891 }
2892
2893
2894 static bfd_boolean
2895 aarch64_build_one_stub (struct bfd_hash_entry *gen_entry,
2896 void *in_arg ATTRIBUTE_UNUSED)
2897 {
2898 struct elf_aarch64_stub_hash_entry *stub_entry;
2899 asection *stub_sec;
2900 bfd *stub_bfd;
2901 bfd_byte *loc;
2902 bfd_vma sym_value;
2903 bfd_vma veneered_insn_loc;
2904 bfd_vma veneer_entry_loc;
2905 bfd_signed_vma branch_offset = 0;
2906 unsigned int template_size;
2907 const uint32_t *template;
2908 unsigned int i;
2909
2910 /* Massage our args to the form they really have. */
2911 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
2912
2913 stub_sec = stub_entry->stub_sec;
2914
2915 /* Make a note of the offset within the stubs for this entry. */
2916 stub_entry->stub_offset = stub_sec->size;
2917 loc = stub_sec->contents + stub_entry->stub_offset;
2918
2919 stub_bfd = stub_sec->owner;
2920
2921 /* This is the address of the stub destination. */
2922 sym_value = (stub_entry->target_value
2923 + stub_entry->target_section->output_offset
2924 + stub_entry->target_section->output_section->vma);
2925
2926 if (stub_entry->stub_type == aarch64_stub_long_branch)
2927 {
2928 bfd_vma place = (stub_entry->stub_offset + stub_sec->output_section->vma
2929 + stub_sec->output_offset);
2930
2931 /* See if we can relax the stub. */
2932 if (aarch64_valid_for_adrp_p (sym_value, place))
2933 stub_entry->stub_type = aarch64_select_branch_stub (sym_value, place);
2934 }
2935
2936 switch (stub_entry->stub_type)
2937 {
2938 case aarch64_stub_adrp_branch:
2939 template = aarch64_adrp_branch_stub;
2940 template_size = sizeof (aarch64_adrp_branch_stub);
2941 break;
2942 case aarch64_stub_long_branch:
2943 template = aarch64_long_branch_stub;
2944 template_size = sizeof (aarch64_long_branch_stub);
2945 break;
2946 case aarch64_stub_erratum_835769_veneer:
2947 template = aarch64_erratum_835769_stub;
2948 template_size = sizeof (aarch64_erratum_835769_stub);
2949 break;
2950 case aarch64_stub_erratum_843419_veneer:
2951 template = aarch64_erratum_843419_stub;
2952 template_size = sizeof (aarch64_erratum_843419_stub);
2953 break;
2954 default:
2955 abort ();
2956 }
2957
2958 for (i = 0; i < (template_size / sizeof template[0]); i++)
2959 {
2960 bfd_putl32 (template[i], loc);
2961 loc += 4;
2962 }
2963
2964 template_size = (template_size + 7) & ~7;
2965 stub_sec->size += template_size;
2966
2967 switch (stub_entry->stub_type)
2968 {
2969 case aarch64_stub_adrp_branch:
2970 if (!aarch64_relocate (AARCH64_R (ADR_PREL_PG_HI21), stub_bfd, stub_sec,
2971 stub_entry->stub_offset, sym_value))
2972 /* The stub would not have been relaxed if the offset was out
2973 of range. */
2974 BFD_FAIL ();
2975
2976 if (!aarch64_relocate (AARCH64_R (ADD_ABS_LO12_NC), stub_bfd, stub_sec,
2977 stub_entry->stub_offset + 4, sym_value))
2978 BFD_FAIL ();
2979 break;
2980
2981 case aarch64_stub_long_branch:
2982 /* We want the value relative to the address 12 bytes back from the
2983 value itself. */
2984 if (!aarch64_relocate (AARCH64_R (PRELNN), stub_bfd, stub_sec,
2985 stub_entry->stub_offset + 16, sym_value + 12))
2986 BFD_FAIL ();
2987 break;
2988
2989 case aarch64_stub_erratum_835769_veneer:
2990 veneered_insn_loc = stub_entry->target_section->output_section->vma
2991 + stub_entry->target_section->output_offset
2992 + stub_entry->target_value;
2993 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
2994 + stub_entry->stub_sec->output_offset
2995 + stub_entry->stub_offset;
2996 branch_offset = veneered_insn_loc - veneer_entry_loc;
2997 branch_offset >>= 2;
2998 branch_offset &= 0x3ffffff;
2999 bfd_putl32 (stub_entry->veneered_insn,
3000 stub_sec->contents + stub_entry->stub_offset);
3001 bfd_putl32 (template[1] | branch_offset,
3002 stub_sec->contents + stub_entry->stub_offset + 4);
3003 break;
3004
3005 case aarch64_stub_erratum_843419_veneer:
3006 if (!aarch64_relocate (AARCH64_R (JUMP26), stub_bfd, stub_sec,
3007 stub_entry->stub_offset + 4, sym_value + 4))
3008 BFD_FAIL ();
3009 break;
3010
3011 default:
3012 abort ();
3013 }
3014
3015 return TRUE;
3016 }
3017
3018 /* As above, but don't actually build the stub. Just bump offset so
3019 we know stub section sizes. */
3020
3021 static bfd_boolean
3022 aarch64_size_one_stub (struct bfd_hash_entry *gen_entry,
3023 void *in_arg ATTRIBUTE_UNUSED)
3024 {
3025 struct elf_aarch64_stub_hash_entry *stub_entry;
3026 int size;
3027
3028 /* Massage our args to the form they really have. */
3029 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
3030
3031 switch (stub_entry->stub_type)
3032 {
3033 case aarch64_stub_adrp_branch:
3034 size = sizeof (aarch64_adrp_branch_stub);
3035 break;
3036 case aarch64_stub_long_branch:
3037 size = sizeof (aarch64_long_branch_stub);
3038 break;
3039 case aarch64_stub_erratum_835769_veneer:
3040 size = sizeof (aarch64_erratum_835769_stub);
3041 break;
3042 case aarch64_stub_erratum_843419_veneer:
3043 size = sizeof (aarch64_erratum_843419_stub);
3044 break;
3045 default:
3046 abort ();
3047 }
3048
3049 size = (size + 7) & ~7;
3050 stub_entry->stub_sec->size += size;
3051 return TRUE;
3052 }
3053
3054 /* External entry points for sizing and building linker stubs. */
3055
3056 /* Set up various things so that we can make a list of input sections
3057 for each output section included in the link. Returns -1 on error,
3058 0 when no stubs will be needed, and 1 on success. */
3059
3060 int
3061 elfNN_aarch64_setup_section_lists (bfd *output_bfd,
3062 struct bfd_link_info *info)
3063 {
3064 bfd *input_bfd;
3065 unsigned int bfd_count;
3066 unsigned int top_id, top_index;
3067 asection *section;
3068 asection **input_list, **list;
3069 bfd_size_type amt;
3070 struct elf_aarch64_link_hash_table *htab =
3071 elf_aarch64_hash_table (info);
3072
3073 if (!is_elf_hash_table (htab))
3074 return 0;
3075
3076 /* Count the number of input BFDs and find the top input section id. */
3077 for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
3078 input_bfd != NULL; input_bfd = input_bfd->link.next)
3079 {
3080 bfd_count += 1;
3081 for (section = input_bfd->sections;
3082 section != NULL; section = section->next)
3083 {
3084 if (top_id < section->id)
3085 top_id = section->id;
3086 }
3087 }
3088 htab->bfd_count = bfd_count;
3089
3090 amt = sizeof (struct map_stub) * (top_id + 1);
3091 htab->stub_group = bfd_zmalloc (amt);
3092 if (htab->stub_group == NULL)
3093 return -1;
3094
3095 /* We can't use output_bfd->section_count here to find the top output
3096 section index as some sections may have been removed, and
3097 _bfd_strip_section_from_output doesn't renumber the indices. */
3098 for (section = output_bfd->sections, top_index = 0;
3099 section != NULL; section = section->next)
3100 {
3101 if (top_index < section->index)
3102 top_index = section->index;
3103 }
3104
3105 htab->top_index = top_index;
3106 amt = sizeof (asection *) * (top_index + 1);
3107 input_list = bfd_malloc (amt);
3108 htab->input_list = input_list;
3109 if (input_list == NULL)
3110 return -1;
3111
3112 /* For sections we aren't interested in, mark their entries with a
3113 value we can check later. */
3114 list = input_list + top_index;
3115 do
3116 *list = bfd_abs_section_ptr;
3117 while (list-- != input_list);
3118
3119 for (section = output_bfd->sections;
3120 section != NULL; section = section->next)
3121 {
3122 if ((section->flags & SEC_CODE) != 0)
3123 input_list[section->index] = NULL;
3124 }
3125
3126 return 1;
3127 }
3128
3129 /* Used by elfNN_aarch64_next_input_section and group_sections. */
3130 #define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
3131
3132 /* The linker repeatedly calls this function for each input section,
3133 in the order that input sections are linked into output sections.
3134 Build lists of input sections to determine groupings between which
3135 we may insert linker stubs. */
3136
3137 void
3138 elfNN_aarch64_next_input_section (struct bfd_link_info *info, asection *isec)
3139 {
3140 struct elf_aarch64_link_hash_table *htab =
3141 elf_aarch64_hash_table (info);
3142
3143 if (isec->output_section->index <= htab->top_index)
3144 {
3145 asection **list = htab->input_list + isec->output_section->index;
3146
3147 if (*list != bfd_abs_section_ptr)
3148 {
3149 /* Steal the link_sec pointer for our list. */
3150 /* This happens to make the list in reverse order,
3151 which is what we want. */
3152 PREV_SEC (isec) = *list;
3153 *list = isec;
3154 }
3155 }
3156 }
3157
3158 /* See whether we can group stub sections together. Grouping stub
3159 sections may result in fewer stubs. More importantly, we need to
3160 put all .init* and .fini* stubs at the beginning of the .init or
3161 .fini output sections respectively, because glibc splits the
3162 _init and _fini functions into multiple parts. Putting a stub in
3163 the middle of a function is not a good idea. */
3164
3165 static void
3166 group_sections (struct elf_aarch64_link_hash_table *htab,
3167 bfd_size_type stub_group_size,
3168 bfd_boolean stubs_always_before_branch)
3169 {
3170 asection **list = htab->input_list + htab->top_index;
3171
3172 do
3173 {
3174 asection *tail = *list;
3175
3176 if (tail == bfd_abs_section_ptr)
3177 continue;
3178
3179 while (tail != NULL)
3180 {
3181 asection *curr;
3182 asection *prev;
3183 bfd_size_type total;
3184
3185 curr = tail;
3186 total = tail->size;
3187 while ((prev = PREV_SEC (curr)) != NULL
3188 && ((total += curr->output_offset - prev->output_offset)
3189 < stub_group_size))
3190 curr = prev;
3191
3192 /* OK, the size from the start of CURR to the end is less
3193 than stub_group_size and thus can be handled by one stub
3194 section. (Or the tail section is itself larger than
3195 stub_group_size, in which case we may be toast.)
3196 We should really be keeping track of the total size of
3197 stubs added here, as stubs contribute to the final output
3198 section size. */
3199 do
3200 {
3201 prev = PREV_SEC (tail);
3202 /* Set up this stub group. */
3203 htab->stub_group[tail->id].link_sec = curr;
3204 }
3205 while (tail != curr && (tail = prev) != NULL);
3206
3207 /* But wait, there's more! Input sections up to stub_group_size
3208 bytes before the stub section can be handled by it too. */
3209 if (!stubs_always_before_branch)
3210 {
3211 total = 0;
3212 while (prev != NULL
3213 && ((total += tail->output_offset - prev->output_offset)
3214 < stub_group_size))
3215 {
3216 tail = prev;
3217 prev = PREV_SEC (tail);
3218 htab->stub_group[tail->id].link_sec = curr;
3219 }
3220 }
3221 tail = prev;
3222 }
3223 }
3224 while (list-- != htab->input_list);
3225
3226 free (htab->input_list);
3227 }
3228
3229 #undef PREV_SEC
3230
3231 #define AARCH64_BITS(x, pos, n) (((x) >> (pos)) & ((1 << (n)) - 1))
3232
3233 #define AARCH64_RT(insn) AARCH64_BITS (insn, 0, 5)
3234 #define AARCH64_RT2(insn) AARCH64_BITS (insn, 10, 5)
3235 #define AARCH64_RA(insn) AARCH64_BITS (insn, 10, 5)
3236 #define AARCH64_RD(insn) AARCH64_BITS (insn, 0, 5)
3237 #define AARCH64_RN(insn) AARCH64_BITS (insn, 5, 5)
3238 #define AARCH64_RM(insn) AARCH64_BITS (insn, 16, 5)
3239
3240 #define AARCH64_MAC(insn) (((insn) & 0xff000000) == 0x9b000000)
3241 #define AARCH64_BIT(insn, n) AARCH64_BITS (insn, n, 1)
3242 #define AARCH64_OP31(insn) AARCH64_BITS (insn, 21, 3)
3243 #define AARCH64_ZR 0x1f
3244
3245 /* All ld/st ops. See C4-182 of the ARM ARM. The encoding space for
3246 LD_PCREL, LDST_RO, LDST_UI and LDST_UIMM cover prefetch ops. */
3247
3248 #define AARCH64_LD(insn) (AARCH64_BIT (insn, 22) == 1)
3249 #define AARCH64_LDST(insn) (((insn) & 0x0a000000) == 0x08000000)
3250 #define AARCH64_LDST_EX(insn) (((insn) & 0x3f000000) == 0x08000000)
3251 #define AARCH64_LDST_PCREL(insn) (((insn) & 0x3b000000) == 0x18000000)
3252 #define AARCH64_LDST_NAP(insn) (((insn) & 0x3b800000) == 0x28000000)
3253 #define AARCH64_LDSTP_PI(insn) (((insn) & 0x3b800000) == 0x28800000)
3254 #define AARCH64_LDSTP_O(insn) (((insn) & 0x3b800000) == 0x29000000)
3255 #define AARCH64_LDSTP_PRE(insn) (((insn) & 0x3b800000) == 0x29800000)
3256 #define AARCH64_LDST_UI(insn) (((insn) & 0x3b200c00) == 0x38000000)
3257 #define AARCH64_LDST_PIIMM(insn) (((insn) & 0x3b200c00) == 0x38000400)
3258 #define AARCH64_LDST_U(insn) (((insn) & 0x3b200c00) == 0x38000800)
3259 #define AARCH64_LDST_PREIMM(insn) (((insn) & 0x3b200c00) == 0x38000c00)
3260 #define AARCH64_LDST_RO(insn) (((insn) & 0x3b200c00) == 0x38200800)
3261 #define AARCH64_LDST_UIMM(insn) (((insn) & 0x3b000000) == 0x39000000)
3262 #define AARCH64_LDST_SIMD_M(insn) (((insn) & 0xbfbf0000) == 0x0c000000)
3263 #define AARCH64_LDST_SIMD_M_PI(insn) (((insn) & 0xbfa00000) == 0x0c800000)
3264 #define AARCH64_LDST_SIMD_S(insn) (((insn) & 0xbf9f0000) == 0x0d000000)
3265 #define AARCH64_LDST_SIMD_S_PI(insn) (((insn) & 0xbf800000) == 0x0d800000)
3266
3267 /* Classify an INSN if it is indeed a load/store.
3268
3269 Return TRUE if INSN is a LD/ST instruction otherwise return FALSE.
3270
3271 For scalar LD/ST instructions PAIR is FALSE, RT is returned and RT2
3272 is set equal to RT.
3273
3274 For LD/ST pair instructions PAIR is TRUE, RT and RT2 are returned. */
3275
3276 static bfd_boolean
3277 aarch64_mem_op_p (uint32_t insn, unsigned int *rt, unsigned int *rt2,
3278 bfd_boolean *pair, bfd_boolean *load)
3279 {
3280 uint32_t opcode;
3281 unsigned int r;
3282 uint32_t opc = 0;
3283 uint32_t v = 0;
3284 uint32_t opc_v = 0;
3285
3286 /* Bail out quickly if INSN doesn't fall into the load-store
3287 encoding space. */
3288 if (!AARCH64_LDST (insn))
3289 return FALSE;
3290
3291 *pair = FALSE;
3292 *load = FALSE;
3293 if (AARCH64_LDST_EX (insn))
3294 {
3295 *rt = AARCH64_RT (insn);
3296 *rt2 = *rt;
3297 if (AARCH64_BIT (insn, 21) == 1)
3298 {
3299 *pair = TRUE;
3300 *rt2 = AARCH64_RT2 (insn);
3301 }
3302 *load = AARCH64_LD (insn);
3303 return TRUE;
3304 }
3305 else if (AARCH64_LDST_NAP (insn)
3306 || AARCH64_LDSTP_PI (insn)
3307 || AARCH64_LDSTP_O (insn)
3308 || AARCH64_LDSTP_PRE (insn))
3309 {
3310 *pair = TRUE;
3311 *rt = AARCH64_RT (insn);
3312 *rt2 = AARCH64_RT2 (insn);
3313 *load = AARCH64_LD (insn);
3314 return TRUE;
3315 }
3316 else if (AARCH64_LDST_PCREL (insn)
3317 || AARCH64_LDST_UI (insn)
3318 || AARCH64_LDST_PIIMM (insn)
3319 || AARCH64_LDST_U (insn)
3320 || AARCH64_LDST_PREIMM (insn)
3321 || AARCH64_LDST_RO (insn)
3322 || AARCH64_LDST_UIMM (insn))
3323 {
3324 *rt = AARCH64_RT (insn);
3325 *rt2 = *rt;
3326 if (AARCH64_LDST_PCREL (insn))
3327 *load = TRUE;
3328 opc = AARCH64_BITS (insn, 22, 2);
3329 v = AARCH64_BIT (insn, 26);
3330 opc_v = opc | (v << 2);
3331 *load = (opc_v == 1 || opc_v == 2 || opc_v == 3
3332 || opc_v == 5 || opc_v == 7);
3333 return TRUE;
3334 }
3335 else if (AARCH64_LDST_SIMD_M (insn)
3336 || AARCH64_LDST_SIMD_M_PI (insn))
3337 {
3338 *rt = AARCH64_RT (insn);
3339 *load = AARCH64_BIT (insn, 22);
3340 opcode = (insn >> 12) & 0xf;
3341 switch (opcode)
3342 {
3343 case 0:
3344 case 2:
3345 *rt2 = *rt + 3;
3346 break;
3347
3348 case 4:
3349 case 6:
3350 *rt2 = *rt + 2;
3351 break;
3352
3353 case 7:
3354 *rt2 = *rt;
3355 break;
3356
3357 case 8:
3358 case 10:
3359 *rt2 = *rt + 1;
3360 break;
3361
3362 default:
3363 return FALSE;
3364 }
3365 return TRUE;
3366 }
3367 else if (AARCH64_LDST_SIMD_S (insn)
3368 || AARCH64_LDST_SIMD_S_PI (insn))
3369 {
3370 *rt = AARCH64_RT (insn);
3371 r = (insn >> 21) & 1;
3372 *load = AARCH64_BIT (insn, 22);
3373 opcode = (insn >> 13) & 0x7;
3374 switch (opcode)
3375 {
3376 case 0:
3377 case 2:
3378 case 4:
3379 *rt2 = *rt + r;
3380 break;
3381
3382 case 1:
3383 case 3:
3384 case 5:
3385 *rt2 = *rt + (r == 0 ? 2 : 3);
3386 break;
3387
3388 case 6:
3389 *rt2 = *rt + r;
3390 break;
3391
3392 case 7:
3393 *rt2 = *rt + (r == 0 ? 2 : 3);
3394 break;
3395
3396 default:
3397 return FALSE;
3398 }
3399 return TRUE;
3400 }
3401
3402 return FALSE;
3403 }
3404
3405 /* Return TRUE if INSN is multiply-accumulate. */
3406
3407 static bfd_boolean
3408 aarch64_mlxl_p (uint32_t insn)
3409 {
3410 uint32_t op31 = AARCH64_OP31 (insn);
3411
3412 if (AARCH64_MAC (insn)
3413 && (op31 == 0 || op31 == 1 || op31 == 5)
3414 /* Exclude MUL instructions which are encoded as a multiple accumulate
3415 with RA = XZR. */
3416 && AARCH64_RA (insn) != AARCH64_ZR)
3417 return TRUE;
3418
3419 return FALSE;
3420 }
3421
3422 /* Some early revisions of the Cortex-A53 have an erratum (835769) whereby
3423 it is possible for a 64-bit multiply-accumulate instruction to generate an
3424 incorrect result. The details are quite complex and hard to
3425 determine statically, since branches in the code may exist in some
3426 circumstances, but all cases end with a memory (load, store, or
3427 prefetch) instruction followed immediately by the multiply-accumulate
3428 operation. We employ a linker patching technique, by moving the potentially
3429 affected multiply-accumulate instruction into a patch region and replacing
3430 the original instruction with a branch to the patch. This function checks
3431 if INSN_1 is the memory operation followed by a multiply-accumulate
3432 operation (INSN_2). Return TRUE if an erratum sequence is found, FALSE
3433 if INSN_1 and INSN_2 are safe. */
3434
3435 static bfd_boolean
3436 aarch64_erratum_sequence (uint32_t insn_1, uint32_t insn_2)
3437 {
3438 uint32_t rt;
3439 uint32_t rt2;
3440 uint32_t rn;
3441 uint32_t rm;
3442 uint32_t ra;
3443 bfd_boolean pair;
3444 bfd_boolean load;
3445
3446 if (aarch64_mlxl_p (insn_2)
3447 && aarch64_mem_op_p (insn_1, &rt, &rt2, &pair, &load))
3448 {
3449 /* Any SIMD memory op is independent of the subsequent MLA
3450 by definition of the erratum. */
3451 if (AARCH64_BIT (insn_1, 26))
3452 return TRUE;
3453
3454 /* If not SIMD, check for integer memory ops and MLA relationship. */
3455 rn = AARCH64_RN (insn_2);
3456 ra = AARCH64_RA (insn_2);
3457 rm = AARCH64_RM (insn_2);
3458
3459 /* If this is a load and there's a true(RAW) dependency, we are safe
3460 and this is not an erratum sequence. */
3461 if (load &&
3462 (rt == rn || rt == rm || rt == ra
3463 || (pair && (rt2 == rn || rt2 == rm || rt2 == ra))))
3464 return FALSE;
3465
3466 /* We conservatively put out stubs for all other cases (including
3467 writebacks). */
3468 return TRUE;
3469 }
3470
3471 return FALSE;
3472 }
3473
3474 /* Used to order a list of mapping symbols by address. */
3475
3476 static int
3477 elf_aarch64_compare_mapping (const void *a, const void *b)
3478 {
3479 const elf_aarch64_section_map *amap = (const elf_aarch64_section_map *) a;
3480 const elf_aarch64_section_map *bmap = (const elf_aarch64_section_map *) b;
3481
3482 if (amap->vma > bmap->vma)
3483 return 1;
3484 else if (amap->vma < bmap->vma)
3485 return -1;
3486 else if (amap->type > bmap->type)
3487 /* Ensure results do not depend on the host qsort for objects with
3488 multiple mapping symbols at the same address by sorting on type
3489 after vma. */
3490 return 1;
3491 else if (amap->type < bmap->type)
3492 return -1;
3493 else
3494 return 0;
3495 }
3496
3497
3498 static char *
3499 _bfd_aarch64_erratum_835769_stub_name (unsigned num_fixes)
3500 {
3501 char *stub_name = (char *) bfd_malloc
3502 (strlen ("__erratum_835769_veneer_") + 16);
3503 sprintf (stub_name,"__erratum_835769_veneer_%d", num_fixes);
3504 return stub_name;
3505 }
3506
3507 /* Scan for Cortex-A53 erratum 835769 sequence.
3508
3509 Return TRUE else FALSE on abnormal termination. */
3510
3511 static bfd_boolean
3512 _bfd_aarch64_erratum_835769_scan (bfd *input_bfd,
3513 struct bfd_link_info *info,
3514 unsigned int *num_fixes_p)
3515 {
3516 asection *section;
3517 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
3518 unsigned int num_fixes = *num_fixes_p;
3519
3520 if (htab == NULL)
3521 return TRUE;
3522
3523 for (section = input_bfd->sections;
3524 section != NULL;
3525 section = section->next)
3526 {
3527 bfd_byte *contents = NULL;
3528 struct _aarch64_elf_section_data *sec_data;
3529 unsigned int span;
3530
3531 if (elf_section_type (section) != SHT_PROGBITS
3532 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
3533 || (section->flags & SEC_EXCLUDE) != 0
3534 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
3535 || (section->output_section == bfd_abs_section_ptr))
3536 continue;
3537
3538 if (elf_section_data (section)->this_hdr.contents != NULL)
3539 contents = elf_section_data (section)->this_hdr.contents;
3540 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
3541 return FALSE;
3542
3543 sec_data = elf_aarch64_section_data (section);
3544
3545 qsort (sec_data->map, sec_data->mapcount,
3546 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
3547
3548 for (span = 0; span < sec_data->mapcount; span++)
3549 {
3550 unsigned int span_start = sec_data->map[span].vma;
3551 unsigned int span_end = ((span == sec_data->mapcount - 1)
3552 ? sec_data->map[0].vma + section->size
3553 : sec_data->map[span + 1].vma);
3554 unsigned int i;
3555 char span_type = sec_data->map[span].type;
3556
3557 if (span_type == 'd')
3558 continue;
3559
3560 for (i = span_start; i + 4 < span_end; i += 4)
3561 {
3562 uint32_t insn_1 = bfd_getl32 (contents + i);
3563 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
3564
3565 if (aarch64_erratum_sequence (insn_1, insn_2))
3566 {
3567 struct elf_aarch64_stub_hash_entry *stub_entry;
3568 char *stub_name = _bfd_aarch64_erratum_835769_stub_name (num_fixes);
3569 if (! stub_name)
3570 return FALSE;
3571
3572 stub_entry = _bfd_aarch64_add_stub_entry_in_group (stub_name,
3573 section,
3574 htab);
3575 if (! stub_entry)
3576 return FALSE;
3577
3578 stub_entry->stub_type = aarch64_stub_erratum_835769_veneer;
3579 stub_entry->target_section = section;
3580 stub_entry->target_value = i + 4;
3581 stub_entry->veneered_insn = insn_2;
3582 stub_entry->output_name = stub_name;
3583 num_fixes++;
3584 }
3585 }
3586 }
3587 if (elf_section_data (section)->this_hdr.contents == NULL)
3588 free (contents);
3589 }
3590
3591 *num_fixes_p = num_fixes;
3592
3593 return TRUE;
3594 }
3595
3596
3597 /* Test if instruction INSN is ADRP. */
3598
3599 static bfd_boolean
3600 _bfd_aarch64_adrp_p (uint32_t insn)
3601 {
3602 return ((insn & 0x9f000000) == 0x90000000);
3603 }
3604
3605
3606 /* Helper predicate to look for cortex-a53 erratum 843419 sequence 1. */
3607
3608 static bfd_boolean
3609 _bfd_aarch64_erratum_843419_sequence_p (uint32_t insn_1, uint32_t insn_2,
3610 uint32_t insn_3)
3611 {
3612 uint32_t rt;
3613 uint32_t rt2;
3614 bfd_boolean pair;
3615 bfd_boolean load;
3616
3617 return (aarch64_mem_op_p (insn_2, &rt, &rt2, &pair, &load)
3618 && (!pair
3619 || (pair && !load))
3620 && AARCH64_LDST_UIMM (insn_3)
3621 && AARCH64_RN (insn_3) == AARCH64_RD (insn_1));
3622 }
3623
3624
3625 /* Test for the presence of Cortex-A53 erratum 843419 instruction sequence.
3626
3627 Return TRUE if section CONTENTS at offset I contains one of the
3628 erratum 843419 sequences, otherwise return FALSE. If a sequence is
3629 seen set P_VENEER_I to the offset of the final LOAD/STORE
3630 instruction in the sequence.
3631 */
3632
3633 static bfd_boolean
3634 _bfd_aarch64_erratum_843419_p (bfd_byte *contents, bfd_vma vma,
3635 bfd_vma i, bfd_vma span_end,
3636 bfd_vma *p_veneer_i)
3637 {
3638 uint32_t insn_1 = bfd_getl32 (contents + i);
3639
3640 if (!_bfd_aarch64_adrp_p (insn_1))
3641 return FALSE;
3642
3643 if (span_end < i + 12)
3644 return FALSE;
3645
3646 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
3647 uint32_t insn_3 = bfd_getl32 (contents + i + 8);
3648
3649 if ((vma & 0xfff) != 0xff8 && (vma & 0xfff) != 0xffc)
3650 return FALSE;
3651
3652 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_3))
3653 {
3654 *p_veneer_i = i + 8;
3655 return TRUE;
3656 }
3657
3658 if (span_end < i + 16)
3659 return FALSE;
3660
3661 uint32_t insn_4 = bfd_getl32 (contents + i + 12);
3662
3663 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_4))
3664 {
3665 *p_veneer_i = i + 12;
3666 return TRUE;
3667 }
3668
3669 return FALSE;
3670 }
3671
3672
3673 /* Resize all stub sections. */
3674
3675 static void
3676 _bfd_aarch64_resize_stubs (struct elf_aarch64_link_hash_table *htab)
3677 {
3678 asection *section;
3679
3680 /* OK, we've added some stubs. Find out the new size of the
3681 stub sections. */
3682 for (section = htab->stub_bfd->sections;
3683 section != NULL; section = section->next)
3684 {
3685 /* Ignore non-stub sections. */
3686 if (!strstr (section->name, STUB_SUFFIX))
3687 continue;
3688 section->size = 0;
3689 }
3690
3691 bfd_hash_traverse (&htab->stub_hash_table, aarch64_size_one_stub, htab);
3692
3693 for (section = htab->stub_bfd->sections;
3694 section != NULL; section = section->next)
3695 {
3696 if (!strstr (section->name, STUB_SUFFIX))
3697 continue;
3698
3699 if (section->size)
3700 section->size += 4;
3701
3702 /* Ensure all stub sections have a size which is a multiple of
3703 4096. This is important in order to ensure that the insertion
3704 of stub sections does not in itself move existing code around
3705 in such a way that new errata sequences are created. */
3706 if (htab->fix_erratum_843419)
3707 if (section->size)
3708 section->size = BFD_ALIGN (section->size, 0x1000);
3709 }
3710 }
3711
3712
3713 /* Construct an erratum 843419 workaround stub name.
3714 */
3715
3716 static char *
3717 _bfd_aarch64_erratum_843419_stub_name (asection *input_section,
3718 bfd_vma offset)
3719 {
3720 const bfd_size_type len = 8 + 4 + 1 + 8 + 1 + 16 + 1;
3721 char *stub_name = bfd_malloc (len);
3722
3723 if (stub_name != NULL)
3724 snprintf (stub_name, len, "e843419@%04x_%08x_%" BFD_VMA_FMT "x",
3725 input_section->owner->id,
3726 input_section->id,
3727 offset);
3728 return stub_name;
3729 }
3730
3731 /* Build a stub_entry structure describing an 843419 fixup.
3732
3733 The stub_entry constructed is populated with the bit pattern INSN
3734 of the instruction located at OFFSET within input SECTION.
3735
3736 Returns TRUE on success. */
3737
3738 static bfd_boolean
3739 _bfd_aarch64_erratum_843419_fixup (uint32_t insn,
3740 bfd_vma adrp_offset,
3741 bfd_vma ldst_offset,
3742 asection *section,
3743 struct bfd_link_info *info)
3744 {
3745 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
3746 char *stub_name;
3747 struct elf_aarch64_stub_hash_entry *stub_entry;
3748
3749 stub_name = _bfd_aarch64_erratum_843419_stub_name (section, ldst_offset);
3750 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3751 FALSE, FALSE);
3752 if (stub_entry)
3753 {
3754 free (stub_name);
3755 return TRUE;
3756 }
3757
3758 /* We always place an 843419 workaround veneer in the stub section
3759 attached to the input section in which an erratum sequence has
3760 been found. This ensures that later in the link process (in
3761 elfNN_aarch64_write_section) when we copy the veneered
3762 instruction from the input section into the stub section the
3763 copied instruction will have had any relocations applied to it.
3764 If we placed workaround veneers in any other stub section then we
3765 could not assume that all relocations have been processed on the
3766 corresponding input section at the point we output the stub
3767 section.
3768 */
3769
3770 stub_entry = _bfd_aarch64_add_stub_entry_after (stub_name, section, htab);
3771 if (stub_entry == NULL)
3772 {
3773 free (stub_name);
3774 return FALSE;
3775 }
3776
3777 stub_entry->adrp_offset = adrp_offset;
3778 stub_entry->target_value = ldst_offset;
3779 stub_entry->target_section = section;
3780 stub_entry->stub_type = aarch64_stub_erratum_843419_veneer;
3781 stub_entry->veneered_insn = insn;
3782 stub_entry->output_name = stub_name;
3783
3784 return TRUE;
3785 }
3786
3787
3788 /* Scan an input section looking for the signature of erratum 843419.
3789
3790 Scans input SECTION in INPUT_BFD looking for erratum 843419
3791 signatures, for each signature found a stub_entry is created
3792 describing the location of the erratum for subsequent fixup.
3793
3794 Return TRUE on successful scan, FALSE on failure to scan.
3795 */
3796
3797 static bfd_boolean
3798 _bfd_aarch64_erratum_843419_scan (bfd *input_bfd, asection *section,
3799 struct bfd_link_info *info)
3800 {
3801 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
3802
3803 if (htab == NULL)
3804 return TRUE;
3805
3806 if (elf_section_type (section) != SHT_PROGBITS
3807 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
3808 || (section->flags & SEC_EXCLUDE) != 0
3809 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
3810 || (section->output_section == bfd_abs_section_ptr))
3811 return TRUE;
3812
3813 do
3814 {
3815 bfd_byte *contents = NULL;
3816 struct _aarch64_elf_section_data *sec_data;
3817 unsigned int span;
3818
3819 if (elf_section_data (section)->this_hdr.contents != NULL)
3820 contents = elf_section_data (section)->this_hdr.contents;
3821 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
3822 return FALSE;
3823
3824 sec_data = elf_aarch64_section_data (section);
3825
3826 qsort (sec_data->map, sec_data->mapcount,
3827 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
3828
3829 for (span = 0; span < sec_data->mapcount; span++)
3830 {
3831 unsigned int span_start = sec_data->map[span].vma;
3832 unsigned int span_end = ((span == sec_data->mapcount - 1)
3833 ? sec_data->map[0].vma + section->size
3834 : sec_data->map[span + 1].vma);
3835 unsigned int i;
3836 char span_type = sec_data->map[span].type;
3837
3838 if (span_type == 'd')
3839 continue;
3840
3841 for (i = span_start; i + 8 < span_end; i += 4)
3842 {
3843 bfd_vma vma = (section->output_section->vma
3844 + section->output_offset
3845 + i);
3846 bfd_vma veneer_i;
3847
3848 if (_bfd_aarch64_erratum_843419_p
3849 (contents, vma, i, span_end, &veneer_i))
3850 {
3851 uint32_t insn = bfd_getl32 (contents + veneer_i);
3852
3853 if (!_bfd_aarch64_erratum_843419_fixup (insn, i, veneer_i,
3854 section, info))
3855 return FALSE;
3856 }
3857 }
3858 }
3859
3860 if (elf_section_data (section)->this_hdr.contents == NULL)
3861 free (contents);
3862 }
3863 while (0);
3864
3865 return TRUE;
3866 }
3867
3868
3869 /* Determine and set the size of the stub section for a final link.
3870
3871 The basic idea here is to examine all the relocations looking for
3872 PC-relative calls to a target that is unreachable with a "bl"
3873 instruction. */
3874
3875 bfd_boolean
3876 elfNN_aarch64_size_stubs (bfd *output_bfd,
3877 bfd *stub_bfd,
3878 struct bfd_link_info *info,
3879 bfd_signed_vma group_size,
3880 asection * (*add_stub_section) (const char *,
3881 asection *),
3882 void (*layout_sections_again) (void))
3883 {
3884 bfd_size_type stub_group_size;
3885 bfd_boolean stubs_always_before_branch;
3886 bfd_boolean stub_changed = FALSE;
3887 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
3888 unsigned int num_erratum_835769_fixes = 0;
3889
3890 /* Propagate mach to stub bfd, because it may not have been
3891 finalized when we created stub_bfd. */
3892 bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
3893 bfd_get_mach (output_bfd));
3894
3895 /* Stash our params away. */
3896 htab->stub_bfd = stub_bfd;
3897 htab->add_stub_section = add_stub_section;
3898 htab->layout_sections_again = layout_sections_again;
3899 stubs_always_before_branch = group_size < 0;
3900 if (group_size < 0)
3901 stub_group_size = -group_size;
3902 else
3903 stub_group_size = group_size;
3904
3905 if (stub_group_size == 1)
3906 {
3907 /* Default values. */
3908 /* AArch64 branch range is +-128MB. The value used is 1MB less. */
3909 stub_group_size = 127 * 1024 * 1024;
3910 }
3911
3912 group_sections (htab, stub_group_size, stubs_always_before_branch);
3913
3914 (*htab->layout_sections_again) ();
3915
3916 if (htab->fix_erratum_835769)
3917 {
3918 bfd *input_bfd;
3919
3920 for (input_bfd = info->input_bfds;
3921 input_bfd != NULL; input_bfd = input_bfd->link.next)
3922 if (!_bfd_aarch64_erratum_835769_scan (input_bfd, info,
3923 &num_erratum_835769_fixes))
3924 return FALSE;
3925
3926 _bfd_aarch64_resize_stubs (htab);
3927 (*htab->layout_sections_again) ();
3928 }
3929
3930 if (htab->fix_erratum_843419)
3931 {
3932 bfd *input_bfd;
3933
3934 for (input_bfd = info->input_bfds;
3935 input_bfd != NULL;
3936 input_bfd = input_bfd->link.next)
3937 {
3938 asection *section;
3939
3940 for (section = input_bfd->sections;
3941 section != NULL;
3942 section = section->next)
3943 if (!_bfd_aarch64_erratum_843419_scan (input_bfd, section, info))
3944 return FALSE;
3945 }
3946
3947 _bfd_aarch64_resize_stubs (htab);
3948 (*htab->layout_sections_again) ();
3949 }
3950
3951 while (1)
3952 {
3953 bfd *input_bfd;
3954
3955 for (input_bfd = info->input_bfds;
3956 input_bfd != NULL; input_bfd = input_bfd->link.next)
3957 {
3958 Elf_Internal_Shdr *symtab_hdr;
3959 asection *section;
3960 Elf_Internal_Sym *local_syms = NULL;
3961
3962 /* We'll need the symbol table in a second. */
3963 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
3964 if (symtab_hdr->sh_info == 0)
3965 continue;
3966
3967 /* Walk over each section attached to the input bfd. */
3968 for (section = input_bfd->sections;
3969 section != NULL; section = section->next)
3970 {
3971 Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
3972
3973 /* If there aren't any relocs, then there's nothing more
3974 to do. */
3975 if ((section->flags & SEC_RELOC) == 0
3976 || section->reloc_count == 0
3977 || (section->flags & SEC_CODE) == 0)
3978 continue;
3979
3980 /* If this section is a link-once section that will be
3981 discarded, then don't create any stubs. */
3982 if (section->output_section == NULL
3983 || section->output_section->owner != output_bfd)
3984 continue;
3985
3986 /* Get the relocs. */
3987 internal_relocs
3988 = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
3989 NULL, info->keep_memory);
3990 if (internal_relocs == NULL)
3991 goto error_ret_free_local;
3992
3993 /* Now examine each relocation. */
3994 irela = internal_relocs;
3995 irelaend = irela + section->reloc_count;
3996 for (; irela < irelaend; irela++)
3997 {
3998 unsigned int r_type, r_indx;
3999 enum elf_aarch64_stub_type stub_type;
4000 struct elf_aarch64_stub_hash_entry *stub_entry;
4001 asection *sym_sec;
4002 bfd_vma sym_value;
4003 bfd_vma destination;
4004 struct elf_aarch64_link_hash_entry *hash;
4005 const char *sym_name;
4006 char *stub_name;
4007 const asection *id_sec;
4008 unsigned char st_type;
4009 bfd_size_type len;
4010
4011 r_type = ELFNN_R_TYPE (irela->r_info);
4012 r_indx = ELFNN_R_SYM (irela->r_info);
4013
4014 if (r_type >= (unsigned int) R_AARCH64_end)
4015 {
4016 bfd_set_error (bfd_error_bad_value);
4017 error_ret_free_internal:
4018 if (elf_section_data (section)->relocs == NULL)
4019 free (internal_relocs);
4020 goto error_ret_free_local;
4021 }
4022
4023 /* Only look for stubs on unconditional branch and
4024 branch and link instructions. */
4025 if (r_type != (unsigned int) AARCH64_R (CALL26)
4026 && r_type != (unsigned int) AARCH64_R (JUMP26))
4027 continue;
4028
4029 /* Now determine the call target, its name, value,
4030 section. */
4031 sym_sec = NULL;
4032 sym_value = 0;
4033 destination = 0;
4034 hash = NULL;
4035 sym_name = NULL;
4036 if (r_indx < symtab_hdr->sh_info)
4037 {
4038 /* It's a local symbol. */
4039 Elf_Internal_Sym *sym;
4040 Elf_Internal_Shdr *hdr;
4041
4042 if (local_syms == NULL)
4043 {
4044 local_syms
4045 = (Elf_Internal_Sym *) symtab_hdr->contents;
4046 if (local_syms == NULL)
4047 local_syms
4048 = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
4049 symtab_hdr->sh_info, 0,
4050 NULL, NULL, NULL);
4051 if (local_syms == NULL)
4052 goto error_ret_free_internal;
4053 }
4054
4055 sym = local_syms + r_indx;
4056 hdr = elf_elfsections (input_bfd)[sym->st_shndx];
4057 sym_sec = hdr->bfd_section;
4058 if (!sym_sec)
4059 /* This is an undefined symbol. It can never
4060 be resolved. */
4061 continue;
4062
4063 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
4064 sym_value = sym->st_value;
4065 destination = (sym_value + irela->r_addend
4066 + sym_sec->output_offset
4067 + sym_sec->output_section->vma);
4068 st_type = ELF_ST_TYPE (sym->st_info);
4069 sym_name
4070 = bfd_elf_string_from_elf_section (input_bfd,
4071 symtab_hdr->sh_link,
4072 sym->st_name);
4073 }
4074 else
4075 {
4076 int e_indx;
4077
4078 e_indx = r_indx - symtab_hdr->sh_info;
4079 hash = ((struct elf_aarch64_link_hash_entry *)
4080 elf_sym_hashes (input_bfd)[e_indx]);
4081
4082 while (hash->root.root.type == bfd_link_hash_indirect
4083 || hash->root.root.type == bfd_link_hash_warning)
4084 hash = ((struct elf_aarch64_link_hash_entry *)
4085 hash->root.root.u.i.link);
4086
4087 if (hash->root.root.type == bfd_link_hash_defined
4088 || hash->root.root.type == bfd_link_hash_defweak)
4089 {
4090 struct elf_aarch64_link_hash_table *globals =
4091 elf_aarch64_hash_table (info);
4092 sym_sec = hash->root.root.u.def.section;
4093 sym_value = hash->root.root.u.def.value;
4094 /* For a destination in a shared library,
4095 use the PLT stub as target address to
4096 decide whether a branch stub is
4097 needed. */
4098 if (globals->root.splt != NULL && hash != NULL
4099 && hash->root.plt.offset != (bfd_vma) - 1)
4100 {
4101 sym_sec = globals->root.splt;
4102 sym_value = hash->root.plt.offset;
4103 if (sym_sec->output_section != NULL)
4104 destination = (sym_value
4105 + sym_sec->output_offset
4106 +
4107 sym_sec->output_section->vma);
4108 }
4109 else if (sym_sec->output_section != NULL)
4110 destination = (sym_value + irela->r_addend
4111 + sym_sec->output_offset
4112 + sym_sec->output_section->vma);
4113 }
4114 else if (hash->root.root.type == bfd_link_hash_undefined
4115 || (hash->root.root.type
4116 == bfd_link_hash_undefweak))
4117 {
4118 /* For a shared library, use the PLT stub as
4119 target address to decide whether a long
4120 branch stub is needed.
4121 For absolute code, they cannot be handled. */
4122 struct elf_aarch64_link_hash_table *globals =
4123 elf_aarch64_hash_table (info);
4124
4125 if (globals->root.splt != NULL && hash != NULL
4126 && hash->root.plt.offset != (bfd_vma) - 1)
4127 {
4128 sym_sec = globals->root.splt;
4129 sym_value = hash->root.plt.offset;
4130 if (sym_sec->output_section != NULL)
4131 destination = (sym_value
4132 + sym_sec->output_offset
4133 +
4134 sym_sec->output_section->vma);
4135 }
4136 else
4137 continue;
4138 }
4139 else
4140 {
4141 bfd_set_error (bfd_error_bad_value);
4142 goto error_ret_free_internal;
4143 }
4144 st_type = ELF_ST_TYPE (hash->root.type);
4145 sym_name = hash->root.root.root.string;
4146 }
4147
4148 /* Determine what (if any) linker stub is needed. */
4149 stub_type = aarch64_type_of_stub (section, irela, sym_sec,
4150 st_type, destination);
4151 if (stub_type == aarch64_stub_none)
4152 continue;
4153
4154 /* Support for grouping stub sections. */
4155 id_sec = htab->stub_group[section->id].link_sec;
4156
4157 /* Get the name of this stub. */
4158 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, hash,
4159 irela);
4160 if (!stub_name)
4161 goto error_ret_free_internal;
4162
4163 stub_entry =
4164 aarch64_stub_hash_lookup (&htab->stub_hash_table,
4165 stub_name, FALSE, FALSE);
4166 if (stub_entry != NULL)
4167 {
4168 /* The proper stub has already been created. */
4169 free (stub_name);
4170 continue;
4171 }
4172
4173 stub_entry = _bfd_aarch64_add_stub_entry_in_group
4174 (stub_name, section, htab);
4175 if (stub_entry == NULL)
4176 {
4177 free (stub_name);
4178 goto error_ret_free_internal;
4179 }
4180
4181 stub_entry->target_value = sym_value + irela->r_addend;
4182 stub_entry->target_section = sym_sec;
4183 stub_entry->stub_type = stub_type;
4184 stub_entry->h = hash;
4185 stub_entry->st_type = st_type;
4186
4187 if (sym_name == NULL)
4188 sym_name = "unnamed";
4189 len = sizeof (STUB_ENTRY_NAME) + strlen (sym_name);
4190 stub_entry->output_name = bfd_alloc (htab->stub_bfd, len);
4191 if (stub_entry->output_name == NULL)
4192 {
4193 free (stub_name);
4194 goto error_ret_free_internal;
4195 }
4196
4197 snprintf (stub_entry->output_name, len, STUB_ENTRY_NAME,
4198 sym_name);
4199
4200 stub_changed = TRUE;
4201 }
4202
4203 /* We're done with the internal relocs, free them. */
4204 if (elf_section_data (section)->relocs == NULL)
4205 free (internal_relocs);
4206 }
4207 }
4208
4209 if (!stub_changed)
4210 break;
4211
4212 _bfd_aarch64_resize_stubs (htab);
4213
4214 /* Ask the linker to do its stuff. */
4215 (*htab->layout_sections_again) ();
4216 stub_changed = FALSE;
4217 }
4218
4219 return TRUE;
4220
4221 error_ret_free_local:
4222 return FALSE;
4223 }
4224
4225 /* Build all the stubs associated with the current output file. The
4226 stubs are kept in a hash table attached to the main linker hash
4227 table. We also set up the .plt entries for statically linked PIC
4228 functions here. This function is called via aarch64_elf_finish in the
4229 linker. */
4230
4231 bfd_boolean
4232 elfNN_aarch64_build_stubs (struct bfd_link_info *info)
4233 {
4234 asection *stub_sec;
4235 struct bfd_hash_table *table;
4236 struct elf_aarch64_link_hash_table *htab;
4237
4238 htab = elf_aarch64_hash_table (info);
4239
4240 for (stub_sec = htab->stub_bfd->sections;
4241 stub_sec != NULL; stub_sec = stub_sec->next)
4242 {
4243 bfd_size_type size;
4244
4245 /* Ignore non-stub sections. */
4246 if (!strstr (stub_sec->name, STUB_SUFFIX))
4247 continue;
4248
4249 /* Allocate memory to hold the linker stubs. */
4250 size = stub_sec->size;
4251 stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
4252 if (stub_sec->contents == NULL && size != 0)
4253 return FALSE;
4254 stub_sec->size = 0;
4255
4256 bfd_putl32 (0x14000000 | (size >> 2), stub_sec->contents);
4257 stub_sec->size += 4;
4258 }
4259
4260 /* Build the stubs as directed by the stub hash table. */
4261 table = &htab->stub_hash_table;
4262 bfd_hash_traverse (table, aarch64_build_one_stub, info);
4263
4264 return TRUE;
4265 }
4266
4267
4268 /* Add an entry to the code/data map for section SEC. */
4269
4270 static void
4271 elfNN_aarch64_section_map_add (asection *sec, char type, bfd_vma vma)
4272 {
4273 struct _aarch64_elf_section_data *sec_data =
4274 elf_aarch64_section_data (sec);
4275 unsigned int newidx;
4276
4277 if (sec_data->map == NULL)
4278 {
4279 sec_data->map = bfd_malloc (sizeof (elf_aarch64_section_map));
4280 sec_data->mapcount = 0;
4281 sec_data->mapsize = 1;
4282 }
4283
4284 newidx = sec_data->mapcount++;
4285
4286 if (sec_data->mapcount > sec_data->mapsize)
4287 {
4288 sec_data->mapsize *= 2;
4289 sec_data->map = bfd_realloc_or_free
4290 (sec_data->map, sec_data->mapsize * sizeof (elf_aarch64_section_map));
4291 }
4292
4293 if (sec_data->map)
4294 {
4295 sec_data->map[newidx].vma = vma;
4296 sec_data->map[newidx].type = type;
4297 }
4298 }
4299
4300
4301 /* Initialise maps of insn/data for input BFDs. */
4302 void
4303 bfd_elfNN_aarch64_init_maps (bfd *abfd)
4304 {
4305 Elf_Internal_Sym *isymbuf;
4306 Elf_Internal_Shdr *hdr;
4307 unsigned int i, localsyms;
4308
4309 /* Make sure that we are dealing with an AArch64 elf binary. */
4310 if (!is_aarch64_elf (abfd))
4311 return;
4312
4313 if ((abfd->flags & DYNAMIC) != 0)
4314 return;
4315
4316 hdr = &elf_symtab_hdr (abfd);
4317 localsyms = hdr->sh_info;
4318
4319 /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
4320 should contain the number of local symbols, which should come before any
4321 global symbols. Mapping symbols are always local. */
4322 isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL, NULL);
4323
4324 /* No internal symbols read? Skip this BFD. */
4325 if (isymbuf == NULL)
4326 return;
4327
4328 for (i = 0; i < localsyms; i++)
4329 {
4330 Elf_Internal_Sym *isym = &isymbuf[i];
4331 asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
4332 const char *name;
4333
4334 if (sec != NULL && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
4335 {
4336 name = bfd_elf_string_from_elf_section (abfd,
4337 hdr->sh_link,
4338 isym->st_name);
4339
4340 if (bfd_is_aarch64_special_symbol_name
4341 (name, BFD_AARCH64_SPECIAL_SYM_TYPE_MAP))
4342 elfNN_aarch64_section_map_add (sec, name[1], isym->st_value);
4343 }
4344 }
4345 }
4346
4347 /* Set option values needed during linking. */
4348 void
4349 bfd_elfNN_aarch64_set_options (struct bfd *output_bfd,
4350 struct bfd_link_info *link_info,
4351 int no_enum_warn,
4352 int no_wchar_warn, int pic_veneer,
4353 int fix_erratum_835769,
4354 int fix_erratum_843419,
4355 int no_apply_dynamic_relocs)
4356 {
4357 struct elf_aarch64_link_hash_table *globals;
4358
4359 globals = elf_aarch64_hash_table (link_info);
4360 globals->pic_veneer = pic_veneer;
4361 globals->fix_erratum_835769 = fix_erratum_835769;
4362 globals->fix_erratum_843419 = fix_erratum_843419;
4363 globals->fix_erratum_843419_adr = TRUE;
4364 globals->no_apply_dynamic_relocs = no_apply_dynamic_relocs;
4365
4366 BFD_ASSERT (is_aarch64_elf (output_bfd));
4367 elf_aarch64_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
4368 elf_aarch64_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
4369 }
4370
4371 static bfd_vma
4372 aarch64_calculate_got_entry_vma (struct elf_link_hash_entry *h,
4373 struct elf_aarch64_link_hash_table
4374 *globals, struct bfd_link_info *info,
4375 bfd_vma value, bfd *output_bfd,
4376 bfd_boolean *unresolved_reloc_p)
4377 {
4378 bfd_vma off = (bfd_vma) - 1;
4379 asection *basegot = globals->root.sgot;
4380 bfd_boolean dyn = globals->root.dynamic_sections_created;
4381
4382 if (h != NULL)
4383 {
4384 BFD_ASSERT (basegot != NULL);
4385 off = h->got.offset;
4386 BFD_ASSERT (off != (bfd_vma) - 1);
4387 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
4388 || (bfd_link_pic (info)
4389 && SYMBOL_REFERENCES_LOCAL (info, h))
4390 || (ELF_ST_VISIBILITY (h->other)
4391 && h->root.type == bfd_link_hash_undefweak))
4392 {
4393 /* This is actually a static link, or it is a -Bsymbolic link
4394 and the symbol is defined locally. We must initialize this
4395 entry in the global offset table. Since the offset must
4396 always be a multiple of 8 (4 in the case of ILP32), we use
4397 the least significant bit to record whether we have
4398 initialized it already.
4399 When doing a dynamic link, we create a .rel(a).got relocation
4400 entry to initialize the value. This is done in the
4401 finish_dynamic_symbol routine. */
4402 if ((off & 1) != 0)
4403 off &= ~1;
4404 else
4405 {
4406 bfd_put_NN (output_bfd, value, basegot->contents + off);
4407 h->got.offset |= 1;
4408 }
4409 }
4410 else
4411 *unresolved_reloc_p = FALSE;
4412
4413 off = off + basegot->output_section->vma + basegot->output_offset;
4414 }
4415
4416 return off;
4417 }
4418
4419 /* Change R_TYPE to a more efficient access model where possible,
4420 return the new reloc type. */
4421
4422 static bfd_reloc_code_real_type
4423 aarch64_tls_transition_without_check (bfd_reloc_code_real_type r_type,
4424 struct elf_link_hash_entry *h)
4425 {
4426 bfd_boolean is_local = h == NULL;
4427
4428 switch (r_type)
4429 {
4430 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
4431 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
4432 return (is_local
4433 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4434 : BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21);
4435
4436 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
4437 return (is_local
4438 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4439 : r_type);
4440
4441 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
4442 return (is_local
4443 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4444 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4445
4446 case BFD_RELOC_AARCH64_TLSDESC_LDR:
4447 return (is_local
4448 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4449 : BFD_RELOC_AARCH64_NONE);
4450
4451 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
4452 return (is_local
4453 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4454 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC);
4455
4456 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
4457 return (is_local
4458 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4459 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1);
4460
4461 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
4462 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
4463 return (is_local
4464 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4465 : BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC);
4466
4467 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4468 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 : r_type;
4469
4470 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
4471 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC : r_type;
4472
4473 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
4474 return r_type;
4475
4476 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
4477 return (is_local
4478 ? BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12
4479 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4480
4481 case BFD_RELOC_AARCH64_TLSDESC_ADD:
4482 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
4483 case BFD_RELOC_AARCH64_TLSDESC_CALL:
4484 /* Instructions with these relocations will become NOPs. */
4485 return BFD_RELOC_AARCH64_NONE;
4486
4487 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
4488 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
4489 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
4490 return is_local ? BFD_RELOC_AARCH64_NONE : r_type;
4491
4492 #if ARCH_SIZE == 64
4493 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
4494 return is_local
4495 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4496 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC;
4497
4498 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
4499 return is_local
4500 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4501 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1;
4502 #endif
4503
4504 default:
4505 break;
4506 }
4507
4508 return r_type;
4509 }
4510
4511 static unsigned int
4512 aarch64_reloc_got_type (bfd_reloc_code_real_type r_type)
4513 {
4514 switch (r_type)
4515 {
4516 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
4517 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
4518 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
4519 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
4520 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
4521 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
4522 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
4523 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
4524 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
4525 return GOT_NORMAL;
4526
4527 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
4528 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
4529 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
4530 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
4531 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
4532 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
4533 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
4534 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
4535 return GOT_TLS_GD;
4536
4537 case BFD_RELOC_AARCH64_TLSDESC_ADD:
4538 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
4539 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
4540 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
4541 case BFD_RELOC_AARCH64_TLSDESC_CALL:
4542 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
4543 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
4544 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
4545 case BFD_RELOC_AARCH64_TLSDESC_LDR:
4546 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
4547 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
4548 return GOT_TLSDESC_GD;
4549
4550 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4551 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
4552 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
4553 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
4554 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
4555 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
4556 return GOT_TLS_IE;
4557
4558 default:
4559 break;
4560 }
4561 return GOT_UNKNOWN;
4562 }
4563
4564 static bfd_boolean
4565 aarch64_can_relax_tls (bfd *input_bfd,
4566 struct bfd_link_info *info,
4567 bfd_reloc_code_real_type r_type,
4568 struct elf_link_hash_entry *h,
4569 unsigned long r_symndx)
4570 {
4571 unsigned int symbol_got_type;
4572 unsigned int reloc_got_type;
4573
4574 if (! IS_AARCH64_TLS_RELAX_RELOC (r_type))
4575 return FALSE;
4576
4577 symbol_got_type = elfNN_aarch64_symbol_got_type (h, input_bfd, r_symndx);
4578 reloc_got_type = aarch64_reloc_got_type (r_type);
4579
4580 if (symbol_got_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (reloc_got_type))
4581 return TRUE;
4582
4583 if (bfd_link_pic (info))
4584 return FALSE;
4585
4586 if (h && h->root.type == bfd_link_hash_undefweak)
4587 return FALSE;
4588
4589 return TRUE;
4590 }
4591
4592 /* Given the relocation code R_TYPE, return the relaxed bfd reloc
4593 enumerator. */
4594
4595 static bfd_reloc_code_real_type
4596 aarch64_tls_transition (bfd *input_bfd,
4597 struct bfd_link_info *info,
4598 unsigned int r_type,
4599 struct elf_link_hash_entry *h,
4600 unsigned long r_symndx)
4601 {
4602 bfd_reloc_code_real_type bfd_r_type
4603 = elfNN_aarch64_bfd_reloc_from_type (r_type);
4604
4605 if (! aarch64_can_relax_tls (input_bfd, info, bfd_r_type, h, r_symndx))
4606 return bfd_r_type;
4607
4608 return aarch64_tls_transition_without_check (bfd_r_type, h);
4609 }
4610
4611 /* Return the base VMA address which should be subtracted from real addresses
4612 when resolving R_AARCH64_TLS_DTPREL relocation. */
4613
4614 static bfd_vma
4615 dtpoff_base (struct bfd_link_info *info)
4616 {
4617 /* If tls_sec is NULL, we should have signalled an error already. */
4618 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
4619 return elf_hash_table (info)->tls_sec->vma;
4620 }
4621
4622 /* Return the base VMA address which should be subtracted from real addresses
4623 when resolving R_AARCH64_TLS_GOTTPREL64 relocations. */
4624
4625 static bfd_vma
4626 tpoff_base (struct bfd_link_info *info)
4627 {
4628 struct elf_link_hash_table *htab = elf_hash_table (info);
4629
4630 /* If tls_sec is NULL, we should have signalled an error already. */
4631 BFD_ASSERT (htab->tls_sec != NULL);
4632
4633 bfd_vma base = align_power ((bfd_vma) TCB_SIZE,
4634 htab->tls_sec->alignment_power);
4635 return htab->tls_sec->vma - base;
4636 }
4637
4638 static bfd_vma *
4639 symbol_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
4640 unsigned long r_symndx)
4641 {
4642 /* Calculate the address of the GOT entry for symbol
4643 referred to in h. */
4644 if (h != NULL)
4645 return &h->got.offset;
4646 else
4647 {
4648 /* local symbol */
4649 struct elf_aarch64_local_symbol *l;
4650
4651 l = elf_aarch64_locals (input_bfd);
4652 return &l[r_symndx].got_offset;
4653 }
4654 }
4655
4656 static void
4657 symbol_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
4658 unsigned long r_symndx)
4659 {
4660 bfd_vma *p;
4661 p = symbol_got_offset_ref (input_bfd, h, r_symndx);
4662 *p |= 1;
4663 }
4664
4665 static int
4666 symbol_got_offset_mark_p (bfd *input_bfd, struct elf_link_hash_entry *h,
4667 unsigned long r_symndx)
4668 {
4669 bfd_vma value;
4670 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
4671 return value & 1;
4672 }
4673
4674 static bfd_vma
4675 symbol_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
4676 unsigned long r_symndx)
4677 {
4678 bfd_vma value;
4679 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
4680 value &= ~1;
4681 return value;
4682 }
4683
4684 static bfd_vma *
4685 symbol_tlsdesc_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
4686 unsigned long r_symndx)
4687 {
4688 /* Calculate the address of the GOT entry for symbol
4689 referred to in h. */
4690 if (h != NULL)
4691 {
4692 struct elf_aarch64_link_hash_entry *eh;
4693 eh = (struct elf_aarch64_link_hash_entry *) h;
4694 return &eh->tlsdesc_got_jump_table_offset;
4695 }
4696 else
4697 {
4698 /* local symbol */
4699 struct elf_aarch64_local_symbol *l;
4700
4701 l = elf_aarch64_locals (input_bfd);
4702 return &l[r_symndx].tlsdesc_got_jump_table_offset;
4703 }
4704 }
4705
4706 static void
4707 symbol_tlsdesc_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
4708 unsigned long r_symndx)
4709 {
4710 bfd_vma *p;
4711 p = symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
4712 *p |= 1;
4713 }
4714
4715 static int
4716 symbol_tlsdesc_got_offset_mark_p (bfd *input_bfd,
4717 struct elf_link_hash_entry *h,
4718 unsigned long r_symndx)
4719 {
4720 bfd_vma value;
4721 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
4722 return value & 1;
4723 }
4724
4725 static bfd_vma
4726 symbol_tlsdesc_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
4727 unsigned long r_symndx)
4728 {
4729 bfd_vma value;
4730 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
4731 value &= ~1;
4732 return value;
4733 }
4734
4735 /* Data for make_branch_to_erratum_835769_stub(). */
4736
4737 struct erratum_835769_branch_to_stub_data
4738 {
4739 struct bfd_link_info *info;
4740 asection *output_section;
4741 bfd_byte *contents;
4742 };
4743
4744 /* Helper to insert branches to erratum 835769 stubs in the right
4745 places for a particular section. */
4746
4747 static bfd_boolean
4748 make_branch_to_erratum_835769_stub (struct bfd_hash_entry *gen_entry,
4749 void *in_arg)
4750 {
4751 struct elf_aarch64_stub_hash_entry *stub_entry;
4752 struct erratum_835769_branch_to_stub_data *data;
4753 bfd_byte *contents;
4754 unsigned long branch_insn = 0;
4755 bfd_vma veneered_insn_loc, veneer_entry_loc;
4756 bfd_signed_vma branch_offset;
4757 unsigned int target;
4758 bfd *abfd;
4759
4760 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
4761 data = (struct erratum_835769_branch_to_stub_data *) in_arg;
4762
4763 if (stub_entry->target_section != data->output_section
4764 || stub_entry->stub_type != aarch64_stub_erratum_835769_veneer)
4765 return TRUE;
4766
4767 contents = data->contents;
4768 veneered_insn_loc = stub_entry->target_section->output_section->vma
4769 + stub_entry->target_section->output_offset
4770 + stub_entry->target_value;
4771 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
4772 + stub_entry->stub_sec->output_offset
4773 + stub_entry->stub_offset;
4774 branch_offset = veneer_entry_loc - veneered_insn_loc;
4775
4776 abfd = stub_entry->target_section->owner;
4777 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4778 _bfd_error_handler
4779 (_("%B: error: Erratum 835769 stub out "
4780 "of range (input file too large)"), abfd);
4781
4782 target = stub_entry->target_value;
4783 branch_insn = 0x14000000;
4784 branch_offset >>= 2;
4785 branch_offset &= 0x3ffffff;
4786 branch_insn |= branch_offset;
4787 bfd_putl32 (branch_insn, &contents[target]);
4788
4789 return TRUE;
4790 }
4791
4792
4793 static bfd_boolean
4794 _bfd_aarch64_erratum_843419_branch_to_stub (struct bfd_hash_entry *gen_entry,
4795 void *in_arg)
4796 {
4797 struct elf_aarch64_stub_hash_entry *stub_entry
4798 = (struct elf_aarch64_stub_hash_entry *) gen_entry;
4799 struct erratum_835769_branch_to_stub_data *data
4800 = (struct erratum_835769_branch_to_stub_data *) in_arg;
4801 struct bfd_link_info *info;
4802 struct elf_aarch64_link_hash_table *htab;
4803 bfd_byte *contents;
4804 asection *section;
4805 bfd *abfd;
4806 bfd_vma place;
4807 uint32_t insn;
4808
4809 info = data->info;
4810 contents = data->contents;
4811 section = data->output_section;
4812
4813 htab = elf_aarch64_hash_table (info);
4814
4815 if (stub_entry->target_section != section
4816 || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer)
4817 return TRUE;
4818
4819 insn = bfd_getl32 (contents + stub_entry->target_value);
4820 bfd_putl32 (insn,
4821 stub_entry->stub_sec->contents + stub_entry->stub_offset);
4822
4823 place = (section->output_section->vma + section->output_offset
4824 + stub_entry->adrp_offset);
4825 insn = bfd_getl32 (contents + stub_entry->adrp_offset);
4826
4827 if ((insn & AARCH64_ADRP_OP_MASK) != AARCH64_ADRP_OP)
4828 abort ();
4829
4830 bfd_signed_vma imm =
4831 (_bfd_aarch64_sign_extend
4832 ((bfd_vma) _bfd_aarch64_decode_adrp_imm (insn) << 12, 33)
4833 - (place & 0xfff));
4834
4835 if (htab->fix_erratum_843419_adr
4836 && (imm >= AARCH64_MIN_ADRP_IMM && imm <= AARCH64_MAX_ADRP_IMM))
4837 {
4838 insn = (_bfd_aarch64_reencode_adr_imm (AARCH64_ADR_OP, imm)
4839 | AARCH64_RT (insn));
4840 bfd_putl32 (insn, contents + stub_entry->adrp_offset);
4841 }
4842 else
4843 {
4844 bfd_vma veneered_insn_loc;
4845 bfd_vma veneer_entry_loc;
4846 bfd_signed_vma branch_offset;
4847 uint32_t branch_insn;
4848
4849 veneered_insn_loc = stub_entry->target_section->output_section->vma
4850 + stub_entry->target_section->output_offset
4851 + stub_entry->target_value;
4852 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
4853 + stub_entry->stub_sec->output_offset
4854 + stub_entry->stub_offset;
4855 branch_offset = veneer_entry_loc - veneered_insn_loc;
4856
4857 abfd = stub_entry->target_section->owner;
4858 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4859 _bfd_error_handler
4860 (_("%B: error: Erratum 843419 stub out "
4861 "of range (input file too large)"), abfd);
4862
4863 branch_insn = 0x14000000;
4864 branch_offset >>= 2;
4865 branch_offset &= 0x3ffffff;
4866 branch_insn |= branch_offset;
4867 bfd_putl32 (branch_insn, contents + stub_entry->target_value);
4868 }
4869 return TRUE;
4870 }
4871
4872
4873 static bfd_boolean
4874 elfNN_aarch64_write_section (bfd *output_bfd ATTRIBUTE_UNUSED,
4875 struct bfd_link_info *link_info,
4876 asection *sec,
4877 bfd_byte *contents)
4878
4879 {
4880 struct elf_aarch64_link_hash_table *globals =
4881 elf_aarch64_hash_table (link_info);
4882
4883 if (globals == NULL)
4884 return FALSE;
4885
4886 /* Fix code to point to erratum 835769 stubs. */
4887 if (globals->fix_erratum_835769)
4888 {
4889 struct erratum_835769_branch_to_stub_data data;
4890
4891 data.info = link_info;
4892 data.output_section = sec;
4893 data.contents = contents;
4894 bfd_hash_traverse (&globals->stub_hash_table,
4895 make_branch_to_erratum_835769_stub, &data);
4896 }
4897
4898 if (globals->fix_erratum_843419)
4899 {
4900 struct erratum_835769_branch_to_stub_data data;
4901
4902 data.info = link_info;
4903 data.output_section = sec;
4904 data.contents = contents;
4905 bfd_hash_traverse (&globals->stub_hash_table,
4906 _bfd_aarch64_erratum_843419_branch_to_stub, &data);
4907 }
4908
4909 return FALSE;
4910 }
4911
4912 /* Return TRUE if RELOC is a relocation against the base of GOT table. */
4913
4914 static bfd_boolean
4915 aarch64_relocation_aginst_gp_p (bfd_reloc_code_real_type reloc)
4916 {
4917 return (reloc == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14
4918 || reloc == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
4919 || reloc == BFD_RELOC_AARCH64_LD64_GOTOFF_LO15
4920 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC
4921 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G1);
4922 }
4923
4924 /* Perform a relocation as part of a final link. The input relocation type
4925 should be TLS relaxed. */
4926
4927 static bfd_reloc_status_type
4928 elfNN_aarch64_final_link_relocate (reloc_howto_type *howto,
4929 bfd *input_bfd,
4930 bfd *output_bfd,
4931 asection *input_section,
4932 bfd_byte *contents,
4933 Elf_Internal_Rela *rel,
4934 bfd_vma value,
4935 struct bfd_link_info *info,
4936 asection *sym_sec,
4937 struct elf_link_hash_entry *h,
4938 bfd_boolean *unresolved_reloc_p,
4939 bfd_boolean save_addend,
4940 bfd_vma *saved_addend,
4941 Elf_Internal_Sym *sym)
4942 {
4943 Elf_Internal_Shdr *symtab_hdr;
4944 unsigned int r_type = howto->type;
4945 bfd_reloc_code_real_type bfd_r_type
4946 = elfNN_aarch64_bfd_reloc_from_howto (howto);
4947 unsigned long r_symndx;
4948 bfd_byte *hit_data = contents + rel->r_offset;
4949 bfd_vma place, off, got_entry_addr = 0;
4950 bfd_signed_vma signed_addend;
4951 struct elf_aarch64_link_hash_table *globals;
4952 bfd_boolean weak_undef_p;
4953 bfd_boolean relative_reloc;
4954 asection *base_got;
4955 bfd_vma orig_value = value;
4956 bfd_boolean resolved_to_zero;
4957
4958 globals = elf_aarch64_hash_table (info);
4959
4960 symtab_hdr = &elf_symtab_hdr (input_bfd);
4961
4962 BFD_ASSERT (is_aarch64_elf (input_bfd));
4963
4964 r_symndx = ELFNN_R_SYM (rel->r_info);
4965
4966 place = input_section->output_section->vma
4967 + input_section->output_offset + rel->r_offset;
4968
4969 /* Get addend, accumulating the addend for consecutive relocs
4970 which refer to the same offset. */
4971 signed_addend = saved_addend ? *saved_addend : 0;
4972 signed_addend += rel->r_addend;
4973
4974 weak_undef_p = (h ? h->root.type == bfd_link_hash_undefweak
4975 : bfd_is_und_section (sym_sec));
4976
4977 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
4978 it here if it is defined in a non-shared object. */
4979 if (h != NULL
4980 && h->type == STT_GNU_IFUNC
4981 && h->def_regular)
4982 {
4983 asection *plt;
4984 const char *name;
4985 bfd_vma addend = 0;
4986
4987 if ((input_section->flags & SEC_ALLOC) == 0)
4988 {
4989 /* Dynamic relocs are not propagated for SEC_DEBUGGING
4990 sections because such sections are not SEC_ALLOC and
4991 thus ld.so will not process them. */
4992 if ((input_section->flags & SEC_DEBUGGING) != 0)
4993 return bfd_reloc_ok;
4994
4995 if (h->root.root.string)
4996 name = h->root.root.string;
4997 else
4998 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, NULL);
4999 _bfd_error_handler
5000 /* xgettext:c-format */
5001 (_("%B(%A+%#Lx): unresolvable %s relocation against symbol `%s'"),
5002 input_bfd, input_section, rel->r_offset, howto->name, name);
5003 bfd_set_error (bfd_error_bad_value);
5004 return bfd_reloc_notsupported;
5005 }
5006 else if (h->plt.offset == (bfd_vma) -1)
5007 goto bad_ifunc_reloc;
5008
5009 /* STT_GNU_IFUNC symbol must go through PLT. */
5010 plt = globals->root.splt ? globals->root.splt : globals->root.iplt;
5011 value = (plt->output_section->vma + plt->output_offset + h->plt.offset);
5012
5013 switch (bfd_r_type)
5014 {
5015 default:
5016 bad_ifunc_reloc:
5017 if (h->root.root.string)
5018 name = h->root.root.string;
5019 else
5020 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
5021 NULL);
5022 _bfd_error_handler
5023 /* xgettext:c-format */
5024 (_("%B: relocation %s against STT_GNU_IFUNC "
5025 "symbol `%s' isn't handled by %s"), input_bfd,
5026 howto->name, name, __FUNCTION__);
5027 bfd_set_error (bfd_error_bad_value);
5028 return bfd_reloc_notsupported;
5029
5030 case BFD_RELOC_AARCH64_NN:
5031 if (rel->r_addend != 0)
5032 {
5033 if (h->root.root.string)
5034 name = h->root.root.string;
5035 else
5036 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
5037 sym, NULL);
5038 _bfd_error_handler
5039 /* xgettext:c-format */
5040 (_("%B: relocation %s against STT_GNU_IFUNC "
5041 "symbol `%s' has non-zero addend: %Ld"),
5042 input_bfd, howto->name, name, rel->r_addend);
5043 bfd_set_error (bfd_error_bad_value);
5044 return bfd_reloc_notsupported;
5045 }
5046
5047 /* Generate dynamic relocation only when there is a
5048 non-GOT reference in a shared object. */
5049 if (bfd_link_pic (info) && h->non_got_ref)
5050 {
5051 Elf_Internal_Rela outrel;
5052 asection *sreloc;
5053
5054 /* Need a dynamic relocation to get the real function
5055 address. */
5056 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
5057 info,
5058 input_section,
5059 rel->r_offset);
5060 if (outrel.r_offset == (bfd_vma) -1
5061 || outrel.r_offset == (bfd_vma) -2)
5062 abort ();
5063
5064 outrel.r_offset += (input_section->output_section->vma
5065 + input_section->output_offset);
5066
5067 if (h->dynindx == -1
5068 || h->forced_local
5069 || bfd_link_executable (info))
5070 {
5071 /* This symbol is resolved locally. */
5072 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
5073 outrel.r_addend = (h->root.u.def.value
5074 + h->root.u.def.section->output_section->vma
5075 + h->root.u.def.section->output_offset);
5076 }
5077 else
5078 {
5079 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
5080 outrel.r_addend = 0;
5081 }
5082
5083 sreloc = globals->root.irelifunc;
5084 elf_append_rela (output_bfd, sreloc, &outrel);
5085
5086 /* If this reloc is against an external symbol, we
5087 do not want to fiddle with the addend. Otherwise,
5088 we need to include the symbol value so that it
5089 becomes an addend for the dynamic reloc. For an
5090 internal symbol, we have updated addend. */
5091 return bfd_reloc_ok;
5092 }
5093 /* FALLTHROUGH */
5094 case BFD_RELOC_AARCH64_CALL26:
5095 case BFD_RELOC_AARCH64_JUMP26:
5096 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5097 signed_addend,
5098 weak_undef_p);
5099 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
5100 howto, value);
5101 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5102 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
5103 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
5104 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
5105 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
5106 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
5107 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
5108 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
5109 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
5110 base_got = globals->root.sgot;
5111 off = h->got.offset;
5112
5113 if (base_got == NULL)
5114 abort ();
5115
5116 if (off == (bfd_vma) -1)
5117 {
5118 bfd_vma plt_index;
5119
5120 /* We can't use h->got.offset here to save state, or
5121 even just remember the offset, as finish_dynamic_symbol
5122 would use that as offset into .got. */
5123
5124 if (globals->root.splt != NULL)
5125 {
5126 plt_index = ((h->plt.offset - globals->plt_header_size) /
5127 globals->plt_entry_size);
5128 off = (plt_index + 3) * GOT_ENTRY_SIZE;
5129 base_got = globals->root.sgotplt;
5130 }
5131 else
5132 {
5133 plt_index = h->plt.offset / globals->plt_entry_size;
5134 off = plt_index * GOT_ENTRY_SIZE;
5135 base_got = globals->root.igotplt;
5136 }
5137
5138 if (h->dynindx == -1
5139 || h->forced_local
5140 || info->symbolic)
5141 {
5142 /* This references the local definition. We must
5143 initialize this entry in the global offset table.
5144 Since the offset must always be a multiple of 8,
5145 we use the least significant bit to record
5146 whether we have initialized it already.
5147
5148 When doing a dynamic link, we create a .rela.got
5149 relocation entry to initialize the value. This
5150 is done in the finish_dynamic_symbol routine. */
5151 if ((off & 1) != 0)
5152 off &= ~1;
5153 else
5154 {
5155 bfd_put_NN (output_bfd, value,
5156 base_got->contents + off);
5157 /* Note that this is harmless as -1 | 1 still is -1. */
5158 h->got.offset |= 1;
5159 }
5160 }
5161 value = (base_got->output_section->vma
5162 + base_got->output_offset + off);
5163 }
5164 else
5165 value = aarch64_calculate_got_entry_vma (h, globals, info,
5166 value, output_bfd,
5167 unresolved_reloc_p);
5168
5169 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
5170 addend = (globals->root.sgot->output_section->vma
5171 + globals->root.sgot->output_offset);
5172
5173 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5174 addend, weak_undef_p);
5175 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type, howto, value);
5176 case BFD_RELOC_AARCH64_ADD_LO12:
5177 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5178 break;
5179 }
5180 }
5181
5182 resolved_to_zero = (h != NULL
5183 && UNDEFWEAK_NO_DYNAMIC_RELOC (info, h));
5184
5185 switch (bfd_r_type)
5186 {
5187 case BFD_RELOC_AARCH64_NONE:
5188 case BFD_RELOC_AARCH64_TLSDESC_ADD:
5189 case BFD_RELOC_AARCH64_TLSDESC_CALL:
5190 case BFD_RELOC_AARCH64_TLSDESC_LDR:
5191 *unresolved_reloc_p = FALSE;
5192 return bfd_reloc_ok;
5193
5194 case BFD_RELOC_AARCH64_NN:
5195
5196 /* When generating a shared object or relocatable executable, these
5197 relocations are copied into the output file to be resolved at
5198 run time. */
5199 if (((bfd_link_pic (info)
5200 || globals->root.is_relocatable_executable)
5201 && (input_section->flags & SEC_ALLOC)
5202 && (h == NULL
5203 || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5204 && !resolved_to_zero)
5205 || h->root.type != bfd_link_hash_undefweak))
5206 /* Or we are creating an executable, we may need to keep relocations
5207 for symbols satisfied by a dynamic library if we manage to avoid
5208 copy relocs for the symbol. */
5209 || (ELIMINATE_COPY_RELOCS
5210 && !bfd_link_pic (info)
5211 && h != NULL
5212 && (input_section->flags & SEC_ALLOC)
5213 && h->dynindx != -1
5214 && !h->non_got_ref
5215 && ((h->def_dynamic
5216 && !h->def_regular)
5217 || h->root.type == bfd_link_hash_undefweak
5218 || h->root.type == bfd_link_hash_undefined)))
5219 {
5220 Elf_Internal_Rela outrel;
5221 bfd_byte *loc;
5222 bfd_boolean skip, relocate;
5223 asection *sreloc;
5224
5225 *unresolved_reloc_p = FALSE;
5226
5227 skip = FALSE;
5228 relocate = FALSE;
5229
5230 outrel.r_addend = signed_addend;
5231 outrel.r_offset =
5232 _bfd_elf_section_offset (output_bfd, info, input_section,
5233 rel->r_offset);
5234 if (outrel.r_offset == (bfd_vma) - 1)
5235 skip = TRUE;
5236 else if (outrel.r_offset == (bfd_vma) - 2)
5237 {
5238 skip = TRUE;
5239 relocate = TRUE;
5240 }
5241
5242 outrel.r_offset += (input_section->output_section->vma
5243 + input_section->output_offset);
5244
5245 if (skip)
5246 memset (&outrel, 0, sizeof outrel);
5247 else if (h != NULL
5248 && h->dynindx != -1
5249 && (!bfd_link_pic (info)
5250 || !(bfd_link_pie (info)
5251 || SYMBOLIC_BIND (info, h))
5252 || !h->def_regular))
5253 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
5254 else
5255 {
5256 int symbol;
5257
5258 /* On SVR4-ish systems, the dynamic loader cannot
5259 relocate the text and data segments independently,
5260 so the symbol does not matter. */
5261 symbol = 0;
5262 relocate = globals->no_apply_dynamic_relocs ? FALSE : TRUE;
5263 outrel.r_info = ELFNN_R_INFO (symbol, AARCH64_R (RELATIVE));
5264 outrel.r_addend += value;
5265 }
5266
5267 sreloc = elf_section_data (input_section)->sreloc;
5268 if (sreloc == NULL || sreloc->contents == NULL)
5269 return bfd_reloc_notsupported;
5270
5271 loc = sreloc->contents + sreloc->reloc_count++ * RELOC_SIZE (globals);
5272 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
5273
5274 if (sreloc->reloc_count * RELOC_SIZE (globals) > sreloc->size)
5275 {
5276 /* Sanity to check that we have previously allocated
5277 sufficient space in the relocation section for the
5278 number of relocations we actually want to emit. */
5279 abort ();
5280 }
5281
5282 /* If this reloc is against an external symbol, we do not want to
5283 fiddle with the addend. Otherwise, we need to include the symbol
5284 value so that it becomes an addend for the dynamic reloc. */
5285 if (!relocate)
5286 return bfd_reloc_ok;
5287
5288 return _bfd_final_link_relocate (howto, input_bfd, input_section,
5289 contents, rel->r_offset, value,
5290 signed_addend);
5291 }
5292 else
5293 value += signed_addend;
5294 break;
5295
5296 case BFD_RELOC_AARCH64_CALL26:
5297 case BFD_RELOC_AARCH64_JUMP26:
5298 {
5299 asection *splt = globals->root.splt;
5300 bfd_boolean via_plt_p =
5301 splt != NULL && h != NULL && h->plt.offset != (bfd_vma) - 1;
5302
5303 /* A call to an undefined weak symbol is converted to a jump to
5304 the next instruction unless a PLT entry will be created.
5305 The jump to the next instruction is optimized as a NOP.
5306 Do the same for local undefined symbols. */
5307 if (weak_undef_p && ! via_plt_p)
5308 {
5309 bfd_putl32 (INSN_NOP, hit_data);
5310 return bfd_reloc_ok;
5311 }
5312
5313 /* If the call goes through a PLT entry, make sure to
5314 check distance to the right destination address. */
5315 if (via_plt_p)
5316 value = (splt->output_section->vma
5317 + splt->output_offset + h->plt.offset);
5318
5319 /* Check if a stub has to be inserted because the destination
5320 is too far away. */
5321 struct elf_aarch64_stub_hash_entry *stub_entry = NULL;
5322
5323 /* If the branch destination is directed to plt stub, "value" will be
5324 the final destination, otherwise we should plus signed_addend, it may
5325 contain non-zero value, for example call to local function symbol
5326 which are turned into "sec_sym + sec_off", and sec_off is kept in
5327 signed_addend. */
5328 if (! aarch64_valid_branch_p (via_plt_p ? value : value + signed_addend,
5329 place))
5330 /* The target is out of reach, so redirect the branch to
5331 the local stub for this function. */
5332 stub_entry = elfNN_aarch64_get_stub_entry (input_section, sym_sec, h,
5333 rel, globals);
5334 if (stub_entry != NULL)
5335 {
5336 value = (stub_entry->stub_offset
5337 + stub_entry->stub_sec->output_offset
5338 + stub_entry->stub_sec->output_section->vma);
5339
5340 /* We have redirected the destination to stub entry address,
5341 so ignore any addend record in the original rela entry. */
5342 signed_addend = 0;
5343 }
5344 }
5345 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5346 signed_addend, weak_undef_p);
5347 *unresolved_reloc_p = FALSE;
5348 break;
5349
5350 case BFD_RELOC_AARCH64_16_PCREL:
5351 case BFD_RELOC_AARCH64_32_PCREL:
5352 case BFD_RELOC_AARCH64_64_PCREL:
5353 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
5354 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5355 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
5356 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
5357 if (bfd_link_pic (info)
5358 && (input_section->flags & SEC_ALLOC) != 0
5359 && (input_section->flags & SEC_READONLY) != 0
5360 && !SYMBOL_REFERENCES_LOCAL (info, h))
5361 {
5362 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
5363
5364 _bfd_error_handler
5365 /* xgettext:c-format */
5366 (_("%B: relocation %s against symbol `%s' which may bind "
5367 "externally can not be used when making a shared object; "
5368 "recompile with -fPIC"),
5369 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
5370 h->root.root.string);
5371 bfd_set_error (bfd_error_bad_value);
5372 return bfd_reloc_notsupported;
5373 }
5374 /* Fall through. */
5375
5376 case BFD_RELOC_AARCH64_16:
5377 #if ARCH_SIZE == 64
5378 case BFD_RELOC_AARCH64_32:
5379 #endif
5380 case BFD_RELOC_AARCH64_ADD_LO12:
5381 case BFD_RELOC_AARCH64_BRANCH19:
5382 case BFD_RELOC_AARCH64_LDST128_LO12:
5383 case BFD_RELOC_AARCH64_LDST16_LO12:
5384 case BFD_RELOC_AARCH64_LDST32_LO12:
5385 case BFD_RELOC_AARCH64_LDST64_LO12:
5386 case BFD_RELOC_AARCH64_LDST8_LO12:
5387 case BFD_RELOC_AARCH64_MOVW_G0:
5388 case BFD_RELOC_AARCH64_MOVW_G0_NC:
5389 case BFD_RELOC_AARCH64_MOVW_G0_S:
5390 case BFD_RELOC_AARCH64_MOVW_G1:
5391 case BFD_RELOC_AARCH64_MOVW_G1_NC:
5392 case BFD_RELOC_AARCH64_MOVW_G1_S:
5393 case BFD_RELOC_AARCH64_MOVW_G2:
5394 case BFD_RELOC_AARCH64_MOVW_G2_NC:
5395 case BFD_RELOC_AARCH64_MOVW_G2_S:
5396 case BFD_RELOC_AARCH64_MOVW_G3:
5397 case BFD_RELOC_AARCH64_TSTBR14:
5398 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5399 signed_addend, weak_undef_p);
5400 break;
5401
5402 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5403 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
5404 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
5405 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
5406 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
5407 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
5408 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
5409 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
5410 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
5411 if (globals->root.sgot == NULL)
5412 BFD_ASSERT (h != NULL);
5413
5414 relative_reloc = FALSE;
5415 if (h != NULL)
5416 {
5417 bfd_vma addend = 0;
5418
5419 /* If a symbol is not dynamic and is not undefined weak, bind it
5420 locally and generate a RELATIVE relocation under PIC mode.
5421
5422 NOTE: one symbol may be referenced by several relocations, we
5423 should only generate one RELATIVE relocation for that symbol.
5424 Therefore, check GOT offset mark first. */
5425 if (h->dynindx == -1
5426 && !h->forced_local
5427 && h->root.type != bfd_link_hash_undefweak
5428 && bfd_link_pic (info)
5429 && !symbol_got_offset_mark_p (input_bfd, h, r_symndx))
5430 relative_reloc = TRUE;
5431
5432 value = aarch64_calculate_got_entry_vma (h, globals, info, value,
5433 output_bfd,
5434 unresolved_reloc_p);
5435 /* Record the GOT entry address which will be used when generating
5436 RELATIVE relocation. */
5437 if (relative_reloc)
5438 got_entry_addr = value;
5439
5440 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
5441 addend = (globals->root.sgot->output_section->vma
5442 + globals->root.sgot->output_offset);
5443 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5444 addend, weak_undef_p);
5445 }
5446 else
5447 {
5448 bfd_vma addend = 0;
5449 struct elf_aarch64_local_symbol *locals
5450 = elf_aarch64_locals (input_bfd);
5451
5452 if (locals == NULL)
5453 {
5454 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
5455 _bfd_error_handler
5456 /* xgettext:c-format */
5457 (_("%B: Local symbol descriptor table be NULL when applying "
5458 "relocation %s against local symbol"),
5459 input_bfd, elfNN_aarch64_howto_table[howto_index].name);
5460 abort ();
5461 }
5462
5463 off = symbol_got_offset (input_bfd, h, r_symndx);
5464 base_got = globals->root.sgot;
5465 got_entry_addr = (base_got->output_section->vma
5466 + base_got->output_offset + off);
5467
5468 if (!symbol_got_offset_mark_p (input_bfd, h, r_symndx))
5469 {
5470 bfd_put_64 (output_bfd, value, base_got->contents + off);
5471
5472 /* For local symbol, we have done absolute relocation in static
5473 linking stage. While for shared library, we need to update the
5474 content of GOT entry according to the shared object's runtime
5475 base address. So, we need to generate a R_AARCH64_RELATIVE reloc
5476 for dynamic linker. */
5477 if (bfd_link_pic (info))
5478 relative_reloc = TRUE;
5479
5480 symbol_got_offset_mark (input_bfd, h, r_symndx);
5481 }
5482
5483 /* Update the relocation value to GOT entry addr as we have transformed
5484 the direct data access into indirect data access through GOT. */
5485 value = got_entry_addr;
5486
5487 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
5488 addend = base_got->output_section->vma + base_got->output_offset;
5489
5490 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5491 addend, weak_undef_p);
5492 }
5493
5494 if (relative_reloc)
5495 {
5496 asection *s;
5497 Elf_Internal_Rela outrel;
5498
5499 s = globals->root.srelgot;
5500 if (s == NULL)
5501 abort ();
5502
5503 outrel.r_offset = got_entry_addr;
5504 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
5505 outrel.r_addend = orig_value;
5506 elf_append_rela (output_bfd, s, &outrel);
5507 }
5508 break;
5509
5510 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
5511 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
5512 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
5513 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
5514 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
5515 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
5516 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
5517 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
5518 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
5519 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
5520 if (globals->root.sgot == NULL)
5521 return bfd_reloc_notsupported;
5522
5523 value = (symbol_got_offset (input_bfd, h, r_symndx)
5524 + globals->root.sgot->output_section->vma
5525 + globals->root.sgot->output_offset);
5526
5527 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5528 0, weak_undef_p);
5529 *unresolved_reloc_p = FALSE;
5530 break;
5531
5532 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
5533 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
5534 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
5535 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
5536 if (globals->root.sgot == NULL)
5537 return bfd_reloc_notsupported;
5538
5539 value = symbol_got_offset (input_bfd, h, r_symndx);
5540 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5541 0, weak_undef_p);
5542 *unresolved_reloc_p = FALSE;
5543 break;
5544
5545 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
5546 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
5547 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
5548 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
5549 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
5550 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
5551 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
5552 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
5553 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
5554 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
5555 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
5556 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
5557 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
5558 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
5559 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
5560 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
5561 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5562 signed_addend - dtpoff_base (info),
5563 weak_undef_p);
5564 break;
5565
5566 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
5567 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
5568 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
5569 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
5570 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
5571 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
5572 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
5573 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
5574 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5575 signed_addend - tpoff_base (info),
5576 weak_undef_p);
5577 *unresolved_reloc_p = FALSE;
5578 break;
5579
5580 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
5581 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
5582 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
5583 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
5584 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
5585 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
5586 if (globals->root.sgot == NULL)
5587 return bfd_reloc_notsupported;
5588 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
5589 + globals->root.sgotplt->output_section->vma
5590 + globals->root.sgotplt->output_offset
5591 + globals->sgotplt_jump_table_size);
5592
5593 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5594 0, weak_undef_p);
5595 *unresolved_reloc_p = FALSE;
5596 break;
5597
5598 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
5599 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
5600 if (globals->root.sgot == NULL)
5601 return bfd_reloc_notsupported;
5602
5603 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
5604 + globals->root.sgotplt->output_section->vma
5605 + globals->root.sgotplt->output_offset
5606 + globals->sgotplt_jump_table_size);
5607
5608 value -= (globals->root.sgot->output_section->vma
5609 + globals->root.sgot->output_offset);
5610
5611 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
5612 0, weak_undef_p);
5613 *unresolved_reloc_p = FALSE;
5614 break;
5615
5616 default:
5617 return bfd_reloc_notsupported;
5618 }
5619
5620 if (saved_addend)
5621 *saved_addend = value;
5622
5623 /* Only apply the final relocation in a sequence. */
5624 if (save_addend)
5625 return bfd_reloc_continue;
5626
5627 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
5628 howto, value);
5629 }
5630
5631 /* LP64 and ILP32 operates on x- and w-registers respectively.
5632 Next definitions take into account the difference between
5633 corresponding machine codes. R means x-register if the target
5634 arch is LP64, and w-register if the target is ILP32. */
5635
5636 #if ARCH_SIZE == 64
5637 # define add_R0_R0 (0x91000000)
5638 # define add_R0_R0_R1 (0x8b000020)
5639 # define add_R0_R1 (0x91400020)
5640 # define ldr_R0 (0x58000000)
5641 # define ldr_R0_mask(i) (i & 0xffffffe0)
5642 # define ldr_R0_x0 (0xf9400000)
5643 # define ldr_hw_R0 (0xf2a00000)
5644 # define movk_R0 (0xf2800000)
5645 # define movz_R0 (0xd2a00000)
5646 # define movz_hw_R0 (0xd2c00000)
5647 #else /*ARCH_SIZE == 32 */
5648 # define add_R0_R0 (0x11000000)
5649 # define add_R0_R0_R1 (0x0b000020)
5650 # define add_R0_R1 (0x11400020)
5651 # define ldr_R0 (0x18000000)
5652 # define ldr_R0_mask(i) (i & 0xbfffffe0)
5653 # define ldr_R0_x0 (0xb9400000)
5654 # define ldr_hw_R0 (0x72a00000)
5655 # define movk_R0 (0x72800000)
5656 # define movz_R0 (0x52a00000)
5657 # define movz_hw_R0 (0x52c00000)
5658 #endif
5659
5660 /* Handle TLS relaxations. Relaxing is possible for symbols that use
5661 R_AARCH64_TLSDESC_ADR_{PAGE, LD64_LO12_NC, ADD_LO12_NC} during a static
5662 link.
5663
5664 Return bfd_reloc_ok if we're done, bfd_reloc_continue if the caller
5665 is to then call final_link_relocate. Return other values in the
5666 case of error. */
5667
5668 static bfd_reloc_status_type
5669 elfNN_aarch64_tls_relax (struct elf_aarch64_link_hash_table *globals,
5670 bfd *input_bfd, bfd_byte *contents,
5671 Elf_Internal_Rela *rel, struct elf_link_hash_entry *h)
5672 {
5673 bfd_boolean is_local = h == NULL;
5674 unsigned int r_type = ELFNN_R_TYPE (rel->r_info);
5675 unsigned long insn;
5676
5677 BFD_ASSERT (globals && input_bfd && contents && rel);
5678
5679 switch (elfNN_aarch64_bfd_reloc_from_type (r_type))
5680 {
5681 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
5682 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
5683 if (is_local)
5684 {
5685 /* GD->LE relaxation:
5686 adrp x0, :tlsgd:var => movz R0, :tprel_g1:var
5687 or
5688 adrp x0, :tlsdesc:var => movz R0, :tprel_g1:var
5689
5690 Where R is x for LP64, and w for ILP32. */
5691 bfd_putl32 (movz_R0, contents + rel->r_offset);
5692 return bfd_reloc_continue;
5693 }
5694 else
5695 {
5696 /* GD->IE relaxation:
5697 adrp x0, :tlsgd:var => adrp x0, :gottprel:var
5698 or
5699 adrp x0, :tlsdesc:var => adrp x0, :gottprel:var
5700 */
5701 return bfd_reloc_continue;
5702 }
5703
5704 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
5705 BFD_ASSERT (0);
5706 break;
5707
5708 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
5709 if (is_local)
5710 {
5711 /* Tiny TLSDESC->LE relaxation:
5712 ldr x1, :tlsdesc:var => movz R0, #:tprel_g1:var
5713 adr x0, :tlsdesc:var => movk R0, #:tprel_g0_nc:var
5714 .tlsdesccall var
5715 blr x1 => nop
5716
5717 Where R is x for LP64, and w for ILP32. */
5718 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
5719 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
5720
5721 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
5722 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
5723 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5724
5725 bfd_putl32 (movz_R0, contents + rel->r_offset);
5726 bfd_putl32 (movk_R0, contents + rel->r_offset + 4);
5727 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
5728 return bfd_reloc_continue;
5729 }
5730 else
5731 {
5732 /* Tiny TLSDESC->IE relaxation:
5733 ldr x1, :tlsdesc:var => ldr x0, :gottprel:var
5734 adr x0, :tlsdesc:var => nop
5735 .tlsdesccall var
5736 blr x1 => nop
5737 */
5738 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
5739 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
5740
5741 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5742 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5743
5744 bfd_putl32 (ldr_R0, contents + rel->r_offset);
5745 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
5746 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
5747 return bfd_reloc_continue;
5748 }
5749
5750 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
5751 if (is_local)
5752 {
5753 /* Tiny GD->LE relaxation:
5754 adr x0, :tlsgd:var => mrs x1, tpidr_el0
5755 bl __tls_get_addr => add R0, R1, #:tprel_hi12:x, lsl #12
5756 nop => add R0, R0, #:tprel_lo12_nc:x
5757
5758 Where R is x for LP64, and x for Ilp32. */
5759
5760 /* First kill the tls_get_addr reloc on the bl instruction. */
5761 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
5762
5763 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 0);
5764 bfd_putl32 (add_R0_R1, contents + rel->r_offset + 4);
5765 bfd_putl32 (add_R0_R0, contents + rel->r_offset + 8);
5766
5767 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
5768 AARCH64_R (TLSLE_ADD_TPREL_LO12_NC));
5769 rel[1].r_offset = rel->r_offset + 8;
5770
5771 /* Move the current relocation to the second instruction in
5772 the sequence. */
5773 rel->r_offset += 4;
5774 rel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
5775 AARCH64_R (TLSLE_ADD_TPREL_HI12));
5776 return bfd_reloc_continue;
5777 }
5778 else
5779 {
5780 /* Tiny GD->IE relaxation:
5781 adr x0, :tlsgd:var => ldr R0, :gottprel:var
5782 bl __tls_get_addr => mrs x1, tpidr_el0
5783 nop => add R0, R0, R1
5784
5785 Where R is x for LP64, and w for Ilp32. */
5786
5787 /* First kill the tls_get_addr reloc on the bl instruction. */
5788 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
5789 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5790
5791 bfd_putl32 (ldr_R0, contents + rel->r_offset);
5792 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
5793 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
5794 return bfd_reloc_continue;
5795 }
5796
5797 #if ARCH_SIZE == 64
5798 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
5799 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSGD_MOVW_G0_NC));
5800 BFD_ASSERT (rel->r_offset + 12 == rel[2].r_offset);
5801 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (CALL26));
5802
5803 if (is_local)
5804 {
5805 /* Large GD->LE relaxation:
5806 movz x0, #:tlsgd_g1:var => movz x0, #:tprel_g2:var, lsl #32
5807 movk x0, #:tlsgd_g0_nc:var => movk x0, #:tprel_g1_nc:var, lsl #16
5808 add x0, gp, x0 => movk x0, #:tprel_g0_nc:var
5809 bl __tls_get_addr => mrs x1, tpidr_el0
5810 nop => add x0, x0, x1
5811 */
5812 rel[2].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
5813 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
5814 rel[2].r_offset = rel->r_offset + 8;
5815
5816 bfd_putl32 (movz_hw_R0, contents + rel->r_offset + 0);
5817 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset + 4);
5818 bfd_putl32 (movk_R0, contents + rel->r_offset + 8);
5819 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
5820 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
5821 }
5822 else
5823 {
5824 /* Large GD->IE relaxation:
5825 movz x0, #:tlsgd_g1:var => movz x0, #:gottprel_g1:var, lsl #16
5826 movk x0, #:tlsgd_g0_nc:var => movk x0, #:gottprel_g0_nc:var
5827 add x0, gp, x0 => ldr x0, [gp, x0]
5828 bl __tls_get_addr => mrs x1, tpidr_el0
5829 nop => add x0, x0, x1
5830 */
5831 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5832 bfd_putl32 (0xd2a80000, contents + rel->r_offset + 0);
5833 bfd_putl32 (ldr_R0, contents + rel->r_offset + 8);
5834 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
5835 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
5836 }
5837 return bfd_reloc_continue;
5838
5839 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
5840 return bfd_reloc_continue;
5841 #endif
5842
5843 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
5844 return bfd_reloc_continue;
5845
5846 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
5847 if (is_local)
5848 {
5849 /* GD->LE relaxation:
5850 ldr xd, [x0, #:tlsdesc_lo12:var] => movk x0, :tprel_g0_nc:var
5851
5852 Where R is x for lp64 mode, and w for ILP32 mode. */
5853 bfd_putl32 (movk_R0, contents + rel->r_offset);
5854 return bfd_reloc_continue;
5855 }
5856 else
5857 {
5858 /* GD->IE relaxation:
5859 ldr xd, [x0, #:tlsdesc_lo12:var] => ldr R0, [x0, #:gottprel_lo12:var]
5860
5861 Where R is x for lp64 mode, and w for ILP32 mode. */
5862 insn = bfd_getl32 (contents + rel->r_offset);
5863 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
5864 return bfd_reloc_continue;
5865 }
5866
5867 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
5868 if (is_local)
5869 {
5870 /* GD->LE relaxation
5871 add x0, #:tlsgd_lo12:var => movk R0, :tprel_g0_nc:var
5872 bl __tls_get_addr => mrs x1, tpidr_el0
5873 nop => add R0, R1, R0
5874
5875 Where R is x for lp64 mode, and w for ILP32 mode. */
5876
5877 /* First kill the tls_get_addr reloc on the bl instruction. */
5878 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
5879 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5880
5881 bfd_putl32 (movk_R0, contents + rel->r_offset);
5882 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
5883 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
5884 return bfd_reloc_continue;
5885 }
5886 else
5887 {
5888 /* GD->IE relaxation
5889 ADD x0, #:tlsgd_lo12:var => ldr R0, [x0, #:gottprel_lo12:var]
5890 BL __tls_get_addr => mrs x1, tpidr_el0
5891 R_AARCH64_CALL26
5892 NOP => add R0, R1, R0
5893
5894 Where R is x for lp64 mode, and w for ilp32 mode. */
5895
5896 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
5897
5898 /* Remove the relocation on the BL instruction. */
5899 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
5900
5901 /* We choose to fixup the BL and NOP instructions using the
5902 offset from the second relocation to allow flexibility in
5903 scheduling instructions between the ADD and BL. */
5904 bfd_putl32 (ldr_R0_x0, contents + rel->r_offset);
5905 bfd_putl32 (0xd53bd041, contents + rel[1].r_offset);
5906 bfd_putl32 (add_R0_R0_R1, contents + rel[1].r_offset + 4);
5907 return bfd_reloc_continue;
5908 }
5909
5910 case BFD_RELOC_AARCH64_TLSDESC_ADD:
5911 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
5912 case BFD_RELOC_AARCH64_TLSDESC_CALL:
5913 /* GD->IE/LE relaxation:
5914 add x0, x0, #:tlsdesc_lo12:var => nop
5915 blr xd => nop
5916 */
5917 bfd_putl32 (INSN_NOP, contents + rel->r_offset);
5918 return bfd_reloc_ok;
5919
5920 case BFD_RELOC_AARCH64_TLSDESC_LDR:
5921 if (is_local)
5922 {
5923 /* GD->LE relaxation:
5924 ldr xd, [gp, xn] => movk R0, #:tprel_g0_nc:var
5925
5926 Where R is x for lp64 mode, and w for ILP32 mode. */
5927 bfd_putl32 (movk_R0, contents + rel->r_offset);
5928 return bfd_reloc_continue;
5929 }
5930 else
5931 {
5932 /* GD->IE relaxation:
5933 ldr xd, [gp, xn] => ldr R0, [gp, xn]
5934
5935 Where R is x for lp64 mode, and w for ILP32 mode. */
5936 insn = bfd_getl32 (contents + rel->r_offset);
5937 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
5938 return bfd_reloc_ok;
5939 }
5940
5941 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
5942 /* GD->LE relaxation:
5943 movk xd, #:tlsdesc_off_g0_nc:var => movk R0, #:tprel_g1_nc:var, lsl #16
5944 GD->IE relaxation:
5945 movk xd, #:tlsdesc_off_g0_nc:var => movk Rd, #:gottprel_g0_nc:var
5946
5947 Where R is x for lp64 mode, and w for ILP32 mode. */
5948 if (is_local)
5949 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset);
5950 return bfd_reloc_continue;
5951
5952 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
5953 if (is_local)
5954 {
5955 /* GD->LE relaxation:
5956 movz xd, #:tlsdesc_off_g1:var => movz R0, #:tprel_g2:var, lsl #32
5957
5958 Where R is x for lp64 mode, and w for ILP32 mode. */
5959 bfd_putl32 (movz_hw_R0, contents + rel->r_offset);
5960 return bfd_reloc_continue;
5961 }
5962 else
5963 {
5964 /* GD->IE relaxation:
5965 movz xd, #:tlsdesc_off_g1:var => movz Rd, #:gottprel_g1:var, lsl #16
5966
5967 Where R is x for lp64 mode, and w for ILP32 mode. */
5968 insn = bfd_getl32 (contents + rel->r_offset);
5969 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
5970 return bfd_reloc_continue;
5971 }
5972
5973 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
5974 /* IE->LE relaxation:
5975 adrp xd, :gottprel:var => movz Rd, :tprel_g1:var
5976
5977 Where R is x for lp64 mode, and w for ILP32 mode. */
5978 if (is_local)
5979 {
5980 insn = bfd_getl32 (contents + rel->r_offset);
5981 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
5982 }
5983 return bfd_reloc_continue;
5984
5985 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
5986 /* IE->LE relaxation:
5987 ldr xd, [xm, #:gottprel_lo12:var] => movk Rd, :tprel_g0_nc:var
5988
5989 Where R is x for lp64 mode, and w for ILP32 mode. */
5990 if (is_local)
5991 {
5992 insn = bfd_getl32 (contents + rel->r_offset);
5993 bfd_putl32 (movk_R0 | (insn & 0x1f), contents + rel->r_offset);
5994 }
5995 return bfd_reloc_continue;
5996
5997 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
5998 /* LD->LE relaxation (tiny):
5999 adr x0, :tlsldm:x => mrs x0, tpidr_el0
6000 bl __tls_get_addr => add R0, R0, TCB_SIZE
6001
6002 Where R is x for lp64 mode, and w for ilp32 mode. */
6003 if (is_local)
6004 {
6005 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6006 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6007 /* No need of CALL26 relocation for tls_get_addr. */
6008 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6009 bfd_putl32 (0xd53bd040, contents + rel->r_offset + 0);
6010 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6011 contents + rel->r_offset + 4);
6012 return bfd_reloc_ok;
6013 }
6014 return bfd_reloc_continue;
6015
6016 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
6017 /* LD->LE relaxation (small):
6018 adrp x0, :tlsldm:x => mrs x0, tpidr_el0
6019 */
6020 if (is_local)
6021 {
6022 bfd_putl32 (0xd53bd040, contents + rel->r_offset);
6023 return bfd_reloc_ok;
6024 }
6025 return bfd_reloc_continue;
6026
6027 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
6028 /* LD->LE relaxation (small):
6029 add x0, #:tlsldm_lo12:x => add R0, R0, TCB_SIZE
6030 bl __tls_get_addr => nop
6031
6032 Where R is x for lp64 mode, and w for ilp32 mode. */
6033 if (is_local)
6034 {
6035 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6036 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6037 /* No need of CALL26 relocation for tls_get_addr. */
6038 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6039 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6040 contents + rel->r_offset + 0);
6041 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
6042 return bfd_reloc_ok;
6043 }
6044 return bfd_reloc_continue;
6045
6046 default:
6047 return bfd_reloc_continue;
6048 }
6049
6050 return bfd_reloc_ok;
6051 }
6052
6053 /* Relocate an AArch64 ELF section. */
6054
6055 static bfd_boolean
6056 elfNN_aarch64_relocate_section (bfd *output_bfd,
6057 struct bfd_link_info *info,
6058 bfd *input_bfd,
6059 asection *input_section,
6060 bfd_byte *contents,
6061 Elf_Internal_Rela *relocs,
6062 Elf_Internal_Sym *local_syms,
6063 asection **local_sections)
6064 {
6065 Elf_Internal_Shdr *symtab_hdr;
6066 struct elf_link_hash_entry **sym_hashes;
6067 Elf_Internal_Rela *rel;
6068 Elf_Internal_Rela *relend;
6069 const char *name;
6070 struct elf_aarch64_link_hash_table *globals;
6071 bfd_boolean save_addend = FALSE;
6072 bfd_vma addend = 0;
6073
6074 globals = elf_aarch64_hash_table (info);
6075
6076 symtab_hdr = &elf_symtab_hdr (input_bfd);
6077 sym_hashes = elf_sym_hashes (input_bfd);
6078
6079 rel = relocs;
6080 relend = relocs + input_section->reloc_count;
6081 for (; rel < relend; rel++)
6082 {
6083 unsigned int r_type;
6084 bfd_reloc_code_real_type bfd_r_type;
6085 bfd_reloc_code_real_type relaxed_bfd_r_type;
6086 reloc_howto_type *howto;
6087 unsigned long r_symndx;
6088 Elf_Internal_Sym *sym;
6089 asection *sec;
6090 struct elf_link_hash_entry *h;
6091 bfd_vma relocation;
6092 bfd_reloc_status_type r;
6093 arelent bfd_reloc;
6094 char sym_type;
6095 bfd_boolean unresolved_reloc = FALSE;
6096 char *error_message = NULL;
6097
6098 r_symndx = ELFNN_R_SYM (rel->r_info);
6099 r_type = ELFNN_R_TYPE (rel->r_info);
6100
6101 howto = bfd_reloc.howto = elfNN_aarch64_howto_from_type (r_type);
6102
6103 if (howto == NULL)
6104 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
6105
6106 bfd_r_type = elfNN_aarch64_bfd_reloc_from_howto (howto);
6107
6108 h = NULL;
6109 sym = NULL;
6110 sec = NULL;
6111
6112 if (r_symndx < symtab_hdr->sh_info)
6113 {
6114 sym = local_syms + r_symndx;
6115 sym_type = ELFNN_ST_TYPE (sym->st_info);
6116 sec = local_sections[r_symndx];
6117
6118 /* An object file might have a reference to a local
6119 undefined symbol. This is a daft object file, but we
6120 should at least do something about it. */
6121 if (r_type != R_AARCH64_NONE && r_type != R_AARCH64_NULL
6122 && bfd_is_und_section (sec)
6123 && ELF_ST_BIND (sym->st_info) != STB_WEAK)
6124 (*info->callbacks->undefined_symbol)
6125 (info, bfd_elf_string_from_elf_section
6126 (input_bfd, symtab_hdr->sh_link, sym->st_name),
6127 input_bfd, input_section, rel->r_offset, TRUE);
6128
6129 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
6130
6131 /* Relocate against local STT_GNU_IFUNC symbol. */
6132 if (!bfd_link_relocatable (info)
6133 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
6134 {
6135 h = elfNN_aarch64_get_local_sym_hash (globals, input_bfd,
6136 rel, FALSE);
6137 if (h == NULL)
6138 abort ();
6139
6140 /* Set STT_GNU_IFUNC symbol value. */
6141 h->root.u.def.value = sym->st_value;
6142 h->root.u.def.section = sec;
6143 }
6144 }
6145 else
6146 {
6147 bfd_boolean warned, ignored;
6148
6149 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
6150 r_symndx, symtab_hdr, sym_hashes,
6151 h, sec, relocation,
6152 unresolved_reloc, warned, ignored);
6153
6154 sym_type = h->type;
6155 }
6156
6157 if (sec != NULL && discarded_section (sec))
6158 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
6159 rel, 1, relend, howto, 0, contents);
6160
6161 if (bfd_link_relocatable (info))
6162 continue;
6163
6164 if (h != NULL)
6165 name = h->root.root.string;
6166 else
6167 {
6168 name = (bfd_elf_string_from_elf_section
6169 (input_bfd, symtab_hdr->sh_link, sym->st_name));
6170 if (name == NULL || *name == '\0')
6171 name = bfd_section_name (input_bfd, sec);
6172 }
6173
6174 if (r_symndx != 0
6175 && r_type != R_AARCH64_NONE
6176 && r_type != R_AARCH64_NULL
6177 && (h == NULL
6178 || h->root.type == bfd_link_hash_defined
6179 || h->root.type == bfd_link_hash_defweak)
6180 && IS_AARCH64_TLS_RELOC (bfd_r_type) != (sym_type == STT_TLS))
6181 {
6182 _bfd_error_handler
6183 ((sym_type == STT_TLS
6184 /* xgettext:c-format */
6185 ? _("%B(%A+%#Lx): %s used with TLS symbol %s")
6186 /* xgettext:c-format */
6187 : _("%B(%A+%#Lx): %s used with non-TLS symbol %s")),
6188 input_bfd,
6189 input_section, rel->r_offset, howto->name, name);
6190 }
6191
6192 /* We relax only if we can see that there can be a valid transition
6193 from a reloc type to another.
6194 We call elfNN_aarch64_final_link_relocate unless we're completely
6195 done, i.e., the relaxation produced the final output we want. */
6196
6197 relaxed_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type,
6198 h, r_symndx);
6199 if (relaxed_bfd_r_type != bfd_r_type)
6200 {
6201 bfd_r_type = relaxed_bfd_r_type;
6202 howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
6203 BFD_ASSERT (howto != NULL);
6204 r_type = howto->type;
6205 r = elfNN_aarch64_tls_relax (globals, input_bfd, contents, rel, h);
6206 unresolved_reloc = 0;
6207 }
6208 else
6209 r = bfd_reloc_continue;
6210
6211 /* There may be multiple consecutive relocations for the
6212 same offset. In that case we are supposed to treat the
6213 output of each relocation as the addend for the next. */
6214 if (rel + 1 < relend
6215 && rel->r_offset == rel[1].r_offset
6216 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NONE
6217 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NULL)
6218 save_addend = TRUE;
6219 else
6220 save_addend = FALSE;
6221
6222 if (r == bfd_reloc_continue)
6223 r = elfNN_aarch64_final_link_relocate (howto, input_bfd, output_bfd,
6224 input_section, contents, rel,
6225 relocation, info, sec,
6226 h, &unresolved_reloc,
6227 save_addend, &addend, sym);
6228
6229 switch (elfNN_aarch64_bfd_reloc_from_type (r_type))
6230 {
6231 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
6232 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
6233 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
6234 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
6235 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
6236 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
6237 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
6238 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
6239 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6240 {
6241 bfd_boolean need_relocs = FALSE;
6242 bfd_byte *loc;
6243 int indx;
6244 bfd_vma off;
6245
6246 off = symbol_got_offset (input_bfd, h, r_symndx);
6247 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6248
6249 need_relocs =
6250 (bfd_link_pic (info) || indx != 0) &&
6251 (h == NULL
6252 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6253 || h->root.type != bfd_link_hash_undefweak);
6254
6255 BFD_ASSERT (globals->root.srelgot != NULL);
6256
6257 if (need_relocs)
6258 {
6259 Elf_Internal_Rela rela;
6260 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPMOD));
6261 rela.r_addend = 0;
6262 rela.r_offset = globals->root.sgot->output_section->vma +
6263 globals->root.sgot->output_offset + off;
6264
6265
6266 loc = globals->root.srelgot->contents;
6267 loc += globals->root.srelgot->reloc_count++
6268 * RELOC_SIZE (htab);
6269 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6270
6271 bfd_reloc_code_real_type real_type =
6272 elfNN_aarch64_bfd_reloc_from_type (r_type);
6273
6274 if (real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21
6275 || real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21
6276 || real_type == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC)
6277 {
6278 /* For local dynamic, don't generate DTPREL in any case.
6279 Initialize the DTPREL slot into zero, so we get module
6280 base address when invoke runtime TLS resolver. */
6281 bfd_put_NN (output_bfd, 0,
6282 globals->root.sgot->contents + off
6283 + GOT_ENTRY_SIZE);
6284 }
6285 else if (indx == 0)
6286 {
6287 bfd_put_NN (output_bfd,
6288 relocation - dtpoff_base (info),
6289 globals->root.sgot->contents + off
6290 + GOT_ENTRY_SIZE);
6291 }
6292 else
6293 {
6294 /* This TLS symbol is global. We emit a
6295 relocation to fixup the tls offset at load
6296 time. */
6297 rela.r_info =
6298 ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPREL));
6299 rela.r_addend = 0;
6300 rela.r_offset =
6301 (globals->root.sgot->output_section->vma
6302 + globals->root.sgot->output_offset + off
6303 + GOT_ENTRY_SIZE);
6304
6305 loc = globals->root.srelgot->contents;
6306 loc += globals->root.srelgot->reloc_count++
6307 * RELOC_SIZE (globals);
6308 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6309 bfd_put_NN (output_bfd, (bfd_vma) 0,
6310 globals->root.sgot->contents + off
6311 + GOT_ENTRY_SIZE);
6312 }
6313 }
6314 else
6315 {
6316 bfd_put_NN (output_bfd, (bfd_vma) 1,
6317 globals->root.sgot->contents + off);
6318 bfd_put_NN (output_bfd,
6319 relocation - dtpoff_base (info),
6320 globals->root.sgot->contents + off
6321 + GOT_ENTRY_SIZE);
6322 }
6323
6324 symbol_got_offset_mark (input_bfd, h, r_symndx);
6325 }
6326 break;
6327
6328 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
6329 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
6330 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
6331 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6332 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
6333 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6334 {
6335 bfd_boolean need_relocs = FALSE;
6336 bfd_byte *loc;
6337 int indx;
6338 bfd_vma off;
6339
6340 off = symbol_got_offset (input_bfd, h, r_symndx);
6341
6342 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6343
6344 need_relocs =
6345 (bfd_link_pic (info) || indx != 0) &&
6346 (h == NULL
6347 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6348 || h->root.type != bfd_link_hash_undefweak);
6349
6350 BFD_ASSERT (globals->root.srelgot != NULL);
6351
6352 if (need_relocs)
6353 {
6354 Elf_Internal_Rela rela;
6355
6356 if (indx == 0)
6357 rela.r_addend = relocation - dtpoff_base (info);
6358 else
6359 rela.r_addend = 0;
6360
6361 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_TPREL));
6362 rela.r_offset = globals->root.sgot->output_section->vma +
6363 globals->root.sgot->output_offset + off;
6364
6365 loc = globals->root.srelgot->contents;
6366 loc += globals->root.srelgot->reloc_count++
6367 * RELOC_SIZE (htab);
6368
6369 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6370
6371 bfd_put_NN (output_bfd, rela.r_addend,
6372 globals->root.sgot->contents + off);
6373 }
6374 else
6375 bfd_put_NN (output_bfd, relocation - tpoff_base (info),
6376 globals->root.sgot->contents + off);
6377
6378 symbol_got_offset_mark (input_bfd, h, r_symndx);
6379 }
6380 break;
6381
6382 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
6383 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
6384 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
6385 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
6386 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
6387 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6388 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6389 if (! symbol_tlsdesc_got_offset_mark_p (input_bfd, h, r_symndx))
6390 {
6391 bfd_boolean need_relocs = FALSE;
6392 int indx = h && h->dynindx != -1 ? h->dynindx : 0;
6393 bfd_vma off = symbol_tlsdesc_got_offset (input_bfd, h, r_symndx);
6394
6395 need_relocs = (h == NULL
6396 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6397 || h->root.type != bfd_link_hash_undefweak);
6398
6399 BFD_ASSERT (globals->root.srelgot != NULL);
6400 BFD_ASSERT (globals->root.sgot != NULL);
6401
6402 if (need_relocs)
6403 {
6404 bfd_byte *loc;
6405 Elf_Internal_Rela rela;
6406 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLSDESC));
6407
6408 rela.r_addend = 0;
6409 rela.r_offset = (globals->root.sgotplt->output_section->vma
6410 + globals->root.sgotplt->output_offset
6411 + off + globals->sgotplt_jump_table_size);
6412
6413 if (indx == 0)
6414 rela.r_addend = relocation - dtpoff_base (info);
6415
6416 /* Allocate the next available slot in the PLT reloc
6417 section to hold our R_AARCH64_TLSDESC, the next
6418 available slot is determined from reloc_count,
6419 which we step. But note, reloc_count was
6420 artifically moved down while allocating slots for
6421 real PLT relocs such that all of the PLT relocs
6422 will fit above the initial reloc_count and the
6423 extra stuff will fit below. */
6424 loc = globals->root.srelplt->contents;
6425 loc += globals->root.srelplt->reloc_count++
6426 * RELOC_SIZE (globals);
6427
6428 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6429
6430 bfd_put_NN (output_bfd, (bfd_vma) 0,
6431 globals->root.sgotplt->contents + off +
6432 globals->sgotplt_jump_table_size);
6433 bfd_put_NN (output_bfd, (bfd_vma) 0,
6434 globals->root.sgotplt->contents + off +
6435 globals->sgotplt_jump_table_size +
6436 GOT_ENTRY_SIZE);
6437 }
6438
6439 symbol_tlsdesc_got_offset_mark (input_bfd, h, r_symndx);
6440 }
6441 break;
6442 default:
6443 break;
6444 }
6445
6446 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
6447 because such sections are not SEC_ALLOC and thus ld.so will
6448 not process them. */
6449 if (unresolved_reloc
6450 && !((input_section->flags & SEC_DEBUGGING) != 0
6451 && h->def_dynamic)
6452 && _bfd_elf_section_offset (output_bfd, info, input_section,
6453 +rel->r_offset) != (bfd_vma) - 1)
6454 {
6455 _bfd_error_handler
6456 /* xgettext:c-format */
6457 (_("%B(%A+%#Lx): unresolvable %s relocation against symbol `%s'"),
6458 input_bfd, input_section, rel->r_offset, howto->name,
6459 h->root.root.string);
6460 return FALSE;
6461 }
6462
6463 if (r != bfd_reloc_ok && r != bfd_reloc_continue)
6464 {
6465 bfd_reloc_code_real_type real_r_type
6466 = elfNN_aarch64_bfd_reloc_from_type (r_type);
6467
6468 switch (r)
6469 {
6470 case bfd_reloc_overflow:
6471 (*info->callbacks->reloc_overflow)
6472 (info, (h ? &h->root : NULL), name, howto->name, (bfd_vma) 0,
6473 input_bfd, input_section, rel->r_offset);
6474 if (real_r_type == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
6475 || real_r_type == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14)
6476 {
6477 (*info->callbacks->warning)
6478 (info,
6479 _("Too many GOT entries for -fpic, "
6480 "please recompile with -fPIC"),
6481 name, input_bfd, input_section, rel->r_offset);
6482 return FALSE;
6483 }
6484 /* Overflow can occur when a variable is referenced with a type
6485 that has a larger alignment than the type with which it was
6486 declared. eg:
6487 file1.c: extern int foo; int a (void) { return foo; }
6488 file2.c: char bar, foo, baz;
6489 If the variable is placed into a data section at an offset
6490 that is incompatible with the larger alignment requirement
6491 overflow will occur. (Strictly speaking this is not overflow
6492 but rather an alignment problem, but the bfd_reloc_ error
6493 enum does not have a value to cover that situation).
6494
6495 Try to catch this situation here and provide a more helpful
6496 error message to the user. */
6497 if (addend & ((1 << howto->rightshift) - 1)
6498 /* FIXME: Are we testing all of the appropriate reloc
6499 types here ? */
6500 && (real_r_type == BFD_RELOC_AARCH64_LD_LO19_PCREL
6501 || real_r_type == BFD_RELOC_AARCH64_LDST16_LO12
6502 || real_r_type == BFD_RELOC_AARCH64_LDST32_LO12
6503 || real_r_type == BFD_RELOC_AARCH64_LDST64_LO12
6504 || real_r_type == BFD_RELOC_AARCH64_LDST128_LO12))
6505 {
6506 info->callbacks->warning
6507 (info, _("One possible cause of this error is that the \
6508 symbol is being referenced in the indicated code as if it had a larger \
6509 alignment than was declared where it was defined."),
6510 name, input_bfd, input_section, rel->r_offset);
6511 }
6512 break;
6513
6514 case bfd_reloc_undefined:
6515 (*info->callbacks->undefined_symbol)
6516 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
6517 break;
6518
6519 case bfd_reloc_outofrange:
6520 error_message = _("out of range");
6521 goto common_error;
6522
6523 case bfd_reloc_notsupported:
6524 error_message = _("unsupported relocation");
6525 goto common_error;
6526
6527 case bfd_reloc_dangerous:
6528 /* error_message should already be set. */
6529 goto common_error;
6530
6531 default:
6532 error_message = _("unknown error");
6533 /* Fall through. */
6534
6535 common_error:
6536 BFD_ASSERT (error_message != NULL);
6537 (*info->callbacks->reloc_dangerous)
6538 (info, error_message, input_bfd, input_section, rel->r_offset);
6539 break;
6540 }
6541 }
6542
6543 if (!save_addend)
6544 addend = 0;
6545 }
6546
6547 return TRUE;
6548 }
6549
6550 /* Set the right machine number. */
6551
6552 static bfd_boolean
6553 elfNN_aarch64_object_p (bfd *abfd)
6554 {
6555 #if ARCH_SIZE == 32
6556 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64_ilp32);
6557 #else
6558 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64);
6559 #endif
6560 return TRUE;
6561 }
6562
6563 /* Function to keep AArch64 specific flags in the ELF header. */
6564
6565 static bfd_boolean
6566 elfNN_aarch64_set_private_flags (bfd *abfd, flagword flags)
6567 {
6568 if (elf_flags_init (abfd) && elf_elfheader (abfd)->e_flags != flags)
6569 {
6570 }
6571 else
6572 {
6573 elf_elfheader (abfd)->e_flags = flags;
6574 elf_flags_init (abfd) = TRUE;
6575 }
6576
6577 return TRUE;
6578 }
6579
6580 /* Merge backend specific data from an object file to the output
6581 object file when linking. */
6582
6583 static bfd_boolean
6584 elfNN_aarch64_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
6585 {
6586 bfd *obfd = info->output_bfd;
6587 flagword out_flags;
6588 flagword in_flags;
6589 bfd_boolean flags_compatible = TRUE;
6590 asection *sec;
6591
6592 /* Check if we have the same endianess. */
6593 if (!_bfd_generic_verify_endian_match (ibfd, info))
6594 return FALSE;
6595
6596 if (!is_aarch64_elf (ibfd) || !is_aarch64_elf (obfd))
6597 return TRUE;
6598
6599 /* The input BFD must have had its flags initialised. */
6600 /* The following seems bogus to me -- The flags are initialized in
6601 the assembler but I don't think an elf_flags_init field is
6602 written into the object. */
6603 /* BFD_ASSERT (elf_flags_init (ibfd)); */
6604
6605 in_flags = elf_elfheader (ibfd)->e_flags;
6606 out_flags = elf_elfheader (obfd)->e_flags;
6607
6608 if (!elf_flags_init (obfd))
6609 {
6610 /* If the input is the default architecture and had the default
6611 flags then do not bother setting the flags for the output
6612 architecture, instead allow future merges to do this. If no
6613 future merges ever set these flags then they will retain their
6614 uninitialised values, which surprise surprise, correspond
6615 to the default values. */
6616 if (bfd_get_arch_info (ibfd)->the_default
6617 && elf_elfheader (ibfd)->e_flags == 0)
6618 return TRUE;
6619
6620 elf_flags_init (obfd) = TRUE;
6621 elf_elfheader (obfd)->e_flags = in_flags;
6622
6623 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
6624 && bfd_get_arch_info (obfd)->the_default)
6625 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
6626 bfd_get_mach (ibfd));
6627
6628 return TRUE;
6629 }
6630
6631 /* Identical flags must be compatible. */
6632 if (in_flags == out_flags)
6633 return TRUE;
6634
6635 /* Check to see if the input BFD actually contains any sections. If
6636 not, its flags may not have been initialised either, but it
6637 cannot actually cause any incompatiblity. Do not short-circuit
6638 dynamic objects; their section list may be emptied by
6639 elf_link_add_object_symbols.
6640
6641 Also check to see if there are no code sections in the input.
6642 In this case there is no need to check for code specific flags.
6643 XXX - do we need to worry about floating-point format compatability
6644 in data sections ? */
6645 if (!(ibfd->flags & DYNAMIC))
6646 {
6647 bfd_boolean null_input_bfd = TRUE;
6648 bfd_boolean only_data_sections = TRUE;
6649
6650 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
6651 {
6652 if ((bfd_get_section_flags (ibfd, sec)
6653 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
6654 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
6655 only_data_sections = FALSE;
6656
6657 null_input_bfd = FALSE;
6658 break;
6659 }
6660
6661 if (null_input_bfd || only_data_sections)
6662 return TRUE;
6663 }
6664
6665 return flags_compatible;
6666 }
6667
6668 /* Display the flags field. */
6669
6670 static bfd_boolean
6671 elfNN_aarch64_print_private_bfd_data (bfd *abfd, void *ptr)
6672 {
6673 FILE *file = (FILE *) ptr;
6674 unsigned long flags;
6675
6676 BFD_ASSERT (abfd != NULL && ptr != NULL);
6677
6678 /* Print normal ELF private data. */
6679 _bfd_elf_print_private_bfd_data (abfd, ptr);
6680
6681 flags = elf_elfheader (abfd)->e_flags;
6682 /* Ignore init flag - it may not be set, despite the flags field
6683 containing valid data. */
6684
6685 /* xgettext:c-format */
6686 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
6687
6688 if (flags)
6689 fprintf (file, _("<Unrecognised flag bits set>"));
6690
6691 fputc ('\n', file);
6692
6693 return TRUE;
6694 }
6695
6696 /* Update the got entry reference counts for the section being removed. */
6697
6698 static bfd_boolean
6699 elfNN_aarch64_gc_sweep_hook (bfd *abfd,
6700 struct bfd_link_info *info,
6701 asection *sec,
6702 const Elf_Internal_Rela * relocs)
6703 {
6704 struct elf_aarch64_link_hash_table *htab;
6705 Elf_Internal_Shdr *symtab_hdr;
6706 struct elf_link_hash_entry **sym_hashes;
6707 struct elf_aarch64_local_symbol *locals;
6708 const Elf_Internal_Rela *rel, *relend;
6709
6710 if (bfd_link_relocatable (info))
6711 return TRUE;
6712
6713 htab = elf_aarch64_hash_table (info);
6714
6715 if (htab == NULL)
6716 return FALSE;
6717
6718 elf_section_data (sec)->local_dynrel = NULL;
6719
6720 symtab_hdr = &elf_symtab_hdr (abfd);
6721 sym_hashes = elf_sym_hashes (abfd);
6722
6723 locals = elf_aarch64_locals (abfd);
6724
6725 relend = relocs + sec->reloc_count;
6726 for (rel = relocs; rel < relend; rel++)
6727 {
6728 unsigned long r_symndx;
6729 unsigned int r_type;
6730 struct elf_link_hash_entry *h = NULL;
6731
6732 r_symndx = ELFNN_R_SYM (rel->r_info);
6733
6734 if (r_symndx >= symtab_hdr->sh_info)
6735 {
6736
6737 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
6738 while (h->root.type == bfd_link_hash_indirect
6739 || h->root.type == bfd_link_hash_warning)
6740 h = (struct elf_link_hash_entry *) h->root.u.i.link;
6741 }
6742 else
6743 {
6744 Elf_Internal_Sym *isym;
6745
6746 /* A local symbol. */
6747 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
6748 abfd, r_symndx);
6749
6750 /* Check relocation against local STT_GNU_IFUNC symbol. */
6751 if (isym != NULL
6752 && ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
6753 {
6754 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel, FALSE);
6755 if (h == NULL)
6756 abort ();
6757 }
6758 }
6759
6760 if (h)
6761 {
6762 struct elf_aarch64_link_hash_entry *eh;
6763 struct elf_dyn_relocs **pp;
6764 struct elf_dyn_relocs *p;
6765
6766 eh = (struct elf_aarch64_link_hash_entry *) h;
6767
6768 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
6769 if (p->sec == sec)
6770 {
6771 /* Everything must go for SEC. */
6772 *pp = p->next;
6773 break;
6774 }
6775 }
6776
6777 r_type = ELFNN_R_TYPE (rel->r_info);
6778 switch (aarch64_tls_transition (abfd,info, r_type, h ,r_symndx))
6779 {
6780 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
6781 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
6782 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
6783 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
6784 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
6785 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
6786 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
6787 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
6788 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
6789 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
6790 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
6791 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
6792 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
6793 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
6794 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
6795 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6796 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6797 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
6798 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
6799 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
6800 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
6801 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
6802 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
6803 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
6804 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
6805 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
6806 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6807 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
6808 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
6809 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
6810 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
6811 if (h != NULL)
6812 {
6813 if (h->got.refcount > 0)
6814 h->got.refcount -= 1;
6815
6816 if (h->type == STT_GNU_IFUNC)
6817 {
6818 if (h->plt.refcount > 0)
6819 h->plt.refcount -= 1;
6820 }
6821 }
6822 else if (locals != NULL)
6823 {
6824 if (locals[r_symndx].got_refcount > 0)
6825 locals[r_symndx].got_refcount -= 1;
6826 }
6827 break;
6828
6829 case BFD_RELOC_AARCH64_CALL26:
6830 case BFD_RELOC_AARCH64_JUMP26:
6831 /* If this is a local symbol then we resolve it
6832 directly without creating a PLT entry. */
6833 if (h == NULL)
6834 continue;
6835
6836 if (h->plt.refcount > 0)
6837 h->plt.refcount -= 1;
6838 break;
6839
6840 case BFD_RELOC_AARCH64_ADD_LO12:
6841 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
6842 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
6843 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
6844 case BFD_RELOC_AARCH64_LDST128_LO12:
6845 case BFD_RELOC_AARCH64_LDST16_LO12:
6846 case BFD_RELOC_AARCH64_LDST32_LO12:
6847 case BFD_RELOC_AARCH64_LDST64_LO12:
6848 case BFD_RELOC_AARCH64_LDST8_LO12:
6849 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
6850 case BFD_RELOC_AARCH64_MOVW_G0_NC:
6851 case BFD_RELOC_AARCH64_MOVW_G1_NC:
6852 case BFD_RELOC_AARCH64_MOVW_G2_NC:
6853 case BFD_RELOC_AARCH64_MOVW_G3:
6854 case BFD_RELOC_AARCH64_NN:
6855 if (h != NULL && !bfd_link_pic (info))
6856 {
6857 if (h->plt.refcount > 0)
6858 h->plt.refcount -= 1;
6859 }
6860 break;
6861
6862 default:
6863 break;
6864 }
6865 }
6866
6867 return TRUE;
6868 }
6869
6870 /* Return true if we need copy relocation against EH. */
6871
6872 static bfd_boolean
6873 need_copy_relocation_p (struct elf_aarch64_link_hash_entry *eh)
6874 {
6875 struct elf_dyn_relocs *p;
6876 asection *s;
6877
6878 for (p = eh->dyn_relocs; p != NULL; p = p->next)
6879 {
6880 /* If there is any pc-relative reference, we need to keep copy relocation
6881 to avoid propagating the relocation into runtime that current glibc
6882 does not support. */
6883 if (p->pc_count)
6884 return TRUE;
6885
6886 s = p->sec->output_section;
6887 /* Need copy relocation if it's against read-only section. */
6888 if (s != NULL && (s->flags & SEC_READONLY) != 0)
6889 return TRUE;
6890 }
6891
6892 return FALSE;
6893 }
6894
6895 /* Adjust a symbol defined by a dynamic object and referenced by a
6896 regular object. The current definition is in some section of the
6897 dynamic object, but we're not including those sections. We have to
6898 change the definition to something the rest of the link can
6899 understand. */
6900
6901 static bfd_boolean
6902 elfNN_aarch64_adjust_dynamic_symbol (struct bfd_link_info *info,
6903 struct elf_link_hash_entry *h)
6904 {
6905 struct elf_aarch64_link_hash_table *htab;
6906 asection *s, *srel;
6907
6908 /* If this is a function, put it in the procedure linkage table. We
6909 will fill in the contents of the procedure linkage table later,
6910 when we know the address of the .got section. */
6911 if (h->type == STT_FUNC || h->type == STT_GNU_IFUNC || h->needs_plt)
6912 {
6913 if (h->plt.refcount <= 0
6914 || (h->type != STT_GNU_IFUNC
6915 && (SYMBOL_CALLS_LOCAL (info, h)
6916 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
6917 && h->root.type == bfd_link_hash_undefweak))))
6918 {
6919 /* This case can occur if we saw a CALL26 reloc in
6920 an input file, but the symbol wasn't referred to
6921 by a dynamic object or all references were
6922 garbage collected. In which case we can end up
6923 resolving. */
6924 h->plt.offset = (bfd_vma) - 1;
6925 h->needs_plt = 0;
6926 }
6927
6928 return TRUE;
6929 }
6930 else
6931 /* Otherwise, reset to -1. */
6932 h->plt.offset = (bfd_vma) - 1;
6933
6934
6935 /* If this is a weak symbol, and there is a real definition, the
6936 processor independent code will have arranged for us to see the
6937 real definition first, and we can just use the same value. */
6938 if (h->u.weakdef != NULL)
6939 {
6940 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
6941 || h->u.weakdef->root.type == bfd_link_hash_defweak);
6942 h->root.u.def.section = h->u.weakdef->root.u.def.section;
6943 h->root.u.def.value = h->u.weakdef->root.u.def.value;
6944 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
6945 h->non_got_ref = h->u.weakdef->non_got_ref;
6946 return TRUE;
6947 }
6948
6949 /* If we are creating a shared library, we must presume that the
6950 only references to the symbol are via the global offset table.
6951 For such cases we need not do anything here; the relocations will
6952 be handled correctly by relocate_section. */
6953 if (bfd_link_pic (info))
6954 return TRUE;
6955
6956 /* If there are no references to this symbol that do not use the
6957 GOT, we don't need to generate a copy reloc. */
6958 if (!h->non_got_ref)
6959 return TRUE;
6960
6961 /* If -z nocopyreloc was given, we won't generate them either. */
6962 if (info->nocopyreloc)
6963 {
6964 h->non_got_ref = 0;
6965 return TRUE;
6966 }
6967
6968 if (ELIMINATE_COPY_RELOCS)
6969 {
6970 struct elf_aarch64_link_hash_entry *eh;
6971 /* If we didn't find any dynamic relocs in read-only sections, then
6972 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
6973 eh = (struct elf_aarch64_link_hash_entry *) h;
6974 if (!need_copy_relocation_p (eh))
6975 {
6976 h->non_got_ref = 0;
6977 return TRUE;
6978 }
6979 }
6980
6981 /* We must allocate the symbol in our .dynbss section, which will
6982 become part of the .bss section of the executable. There will be
6983 an entry for this symbol in the .dynsym section. The dynamic
6984 object will contain position independent code, so all references
6985 from the dynamic object to this symbol will go through the global
6986 offset table. The dynamic linker will use the .dynsym entry to
6987 determine the address it must put in the global offset table, so
6988 both the dynamic object and the regular object will refer to the
6989 same memory location for the variable. */
6990
6991 htab = elf_aarch64_hash_table (info);
6992
6993 /* We must generate a R_AARCH64_COPY reloc to tell the dynamic linker
6994 to copy the initial value out of the dynamic object and into the
6995 runtime process image. */
6996 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
6997 {
6998 s = htab->root.sdynrelro;
6999 srel = htab->root.sreldynrelro;
7000 }
7001 else
7002 {
7003 s = htab->root.sdynbss;
7004 srel = htab->root.srelbss;
7005 }
7006 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
7007 {
7008 srel->size += RELOC_SIZE (htab);
7009 h->needs_copy = 1;
7010 }
7011
7012 return _bfd_elf_adjust_dynamic_copy (info, h, s);
7013
7014 }
7015
7016 static bfd_boolean
7017 elfNN_aarch64_allocate_local_symbols (bfd *abfd, unsigned number)
7018 {
7019 struct elf_aarch64_local_symbol *locals;
7020 locals = elf_aarch64_locals (abfd);
7021 if (locals == NULL)
7022 {
7023 locals = (struct elf_aarch64_local_symbol *)
7024 bfd_zalloc (abfd, number * sizeof (struct elf_aarch64_local_symbol));
7025 if (locals == NULL)
7026 return FALSE;
7027 elf_aarch64_locals (abfd) = locals;
7028 }
7029 return TRUE;
7030 }
7031
7032 /* Create the .got section to hold the global offset table. */
7033
7034 static bfd_boolean
7035 aarch64_elf_create_got_section (bfd *abfd, struct bfd_link_info *info)
7036 {
7037 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
7038 flagword flags;
7039 asection *s;
7040 struct elf_link_hash_entry *h;
7041 struct elf_link_hash_table *htab = elf_hash_table (info);
7042
7043 /* This function may be called more than once. */
7044 if (htab->sgot != NULL)
7045 return TRUE;
7046
7047 flags = bed->dynamic_sec_flags;
7048
7049 s = bfd_make_section_anyway_with_flags (abfd,
7050 (bed->rela_plts_and_copies_p
7051 ? ".rela.got" : ".rel.got"),
7052 (bed->dynamic_sec_flags
7053 | SEC_READONLY));
7054 if (s == NULL
7055 || ! bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
7056 return FALSE;
7057 htab->srelgot = s;
7058
7059 s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
7060 if (s == NULL
7061 || !bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
7062 return FALSE;
7063 htab->sgot = s;
7064 htab->sgot->size += GOT_ENTRY_SIZE;
7065
7066 if (bed->want_got_sym)
7067 {
7068 /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
7069 (or .got.plt) section. We don't do this in the linker script
7070 because we don't want to define the symbol if we are not creating
7071 a global offset table. */
7072 h = _bfd_elf_define_linkage_sym (abfd, info, s,
7073 "_GLOBAL_OFFSET_TABLE_");
7074 elf_hash_table (info)->hgot = h;
7075 if (h == NULL)
7076 return FALSE;
7077 }
7078
7079 if (bed->want_got_plt)
7080 {
7081 s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
7082 if (s == NULL
7083 || !bfd_set_section_alignment (abfd, s,
7084 bed->s->log_file_align))
7085 return FALSE;
7086 htab->sgotplt = s;
7087 }
7088
7089 /* The first bit of the global offset table is the header. */
7090 s->size += bed->got_header_size;
7091
7092 return TRUE;
7093 }
7094
7095 /* Look through the relocs for a section during the first phase. */
7096
7097 static bfd_boolean
7098 elfNN_aarch64_check_relocs (bfd *abfd, struct bfd_link_info *info,
7099 asection *sec, const Elf_Internal_Rela *relocs)
7100 {
7101 Elf_Internal_Shdr *symtab_hdr;
7102 struct elf_link_hash_entry **sym_hashes;
7103 const Elf_Internal_Rela *rel;
7104 const Elf_Internal_Rela *rel_end;
7105 asection *sreloc;
7106
7107 struct elf_aarch64_link_hash_table *htab;
7108
7109 if (bfd_link_relocatable (info))
7110 return TRUE;
7111
7112 BFD_ASSERT (is_aarch64_elf (abfd));
7113
7114 htab = elf_aarch64_hash_table (info);
7115 sreloc = NULL;
7116
7117 symtab_hdr = &elf_symtab_hdr (abfd);
7118 sym_hashes = elf_sym_hashes (abfd);
7119
7120 rel_end = relocs + sec->reloc_count;
7121 for (rel = relocs; rel < rel_end; rel++)
7122 {
7123 struct elf_link_hash_entry *h;
7124 unsigned int r_symndx;
7125 unsigned int r_type;
7126 bfd_reloc_code_real_type bfd_r_type;
7127 Elf_Internal_Sym *isym;
7128
7129 r_symndx = ELFNN_R_SYM (rel->r_info);
7130 r_type = ELFNN_R_TYPE (rel->r_info);
7131
7132 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
7133 {
7134 /* xgettext:c-format */
7135 _bfd_error_handler (_("%B: bad symbol index: %d"), abfd, r_symndx);
7136 return FALSE;
7137 }
7138
7139 if (r_symndx < symtab_hdr->sh_info)
7140 {
7141 /* A local symbol. */
7142 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
7143 abfd, r_symndx);
7144 if (isym == NULL)
7145 return FALSE;
7146
7147 /* Check relocation against local STT_GNU_IFUNC symbol. */
7148 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
7149 {
7150 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel,
7151 TRUE);
7152 if (h == NULL)
7153 return FALSE;
7154
7155 /* Fake a STT_GNU_IFUNC symbol. */
7156 h->type = STT_GNU_IFUNC;
7157 h->def_regular = 1;
7158 h->ref_regular = 1;
7159 h->forced_local = 1;
7160 h->root.type = bfd_link_hash_defined;
7161 }
7162 else
7163 h = NULL;
7164 }
7165 else
7166 {
7167 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
7168 while (h->root.type == bfd_link_hash_indirect
7169 || h->root.type == bfd_link_hash_warning)
7170 h = (struct elf_link_hash_entry *) h->root.u.i.link;
7171
7172 /* PR15323, ref flags aren't set for references in the same
7173 object. */
7174 h->root.non_ir_ref_regular = 1;
7175 }
7176
7177 /* Could be done earlier, if h were already available. */
7178 bfd_r_type = aarch64_tls_transition (abfd, info, r_type, h, r_symndx);
7179
7180 if (h != NULL)
7181 {
7182 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
7183 This shows up in particular in an R_AARCH64_PREL64 in large model
7184 when calculating the pc-relative address to .got section which is
7185 used to initialize the gp register. */
7186 if (h->root.root.string
7187 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
7188 {
7189 if (htab->root.dynobj == NULL)
7190 htab->root.dynobj = abfd;
7191
7192 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7193 return FALSE;
7194
7195 BFD_ASSERT (h == htab->root.hgot);
7196 }
7197
7198 /* Create the ifunc sections for static executables. If we
7199 never see an indirect function symbol nor we are building
7200 a static executable, those sections will be empty and
7201 won't appear in output. */
7202 switch (bfd_r_type)
7203 {
7204 default:
7205 break;
7206
7207 case BFD_RELOC_AARCH64_ADD_LO12:
7208 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7209 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
7210 case BFD_RELOC_AARCH64_CALL26:
7211 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7212 case BFD_RELOC_AARCH64_JUMP26:
7213 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
7214 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
7215 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
7216 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
7217 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
7218 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
7219 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
7220 case BFD_RELOC_AARCH64_NN:
7221 if (htab->root.dynobj == NULL)
7222 htab->root.dynobj = abfd;
7223 if (!_bfd_elf_create_ifunc_sections (htab->root.dynobj, info))
7224 return FALSE;
7225 break;
7226 }
7227
7228 /* It is referenced by a non-shared object. */
7229 h->ref_regular = 1;
7230 h->root.non_ir_ref_regular = 1;
7231 }
7232
7233 switch (bfd_r_type)
7234 {
7235 case BFD_RELOC_AARCH64_MOVW_G0_NC:
7236 case BFD_RELOC_AARCH64_MOVW_G1_NC:
7237 case BFD_RELOC_AARCH64_MOVW_G2_NC:
7238 case BFD_RELOC_AARCH64_MOVW_G3:
7239 if (bfd_link_pic (info))
7240 {
7241 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7242 _bfd_error_handler
7243 /* xgettext:c-format */
7244 (_("%B: relocation %s against `%s' can not be used when making "
7245 "a shared object; recompile with -fPIC"),
7246 abfd, elfNN_aarch64_howto_table[howto_index].name,
7247 (h) ? h->root.root.string : "a local symbol");
7248 bfd_set_error (bfd_error_bad_value);
7249 return FALSE;
7250 }
7251 /* Fall through. */
7252
7253 case BFD_RELOC_AARCH64_16_PCREL:
7254 case BFD_RELOC_AARCH64_32_PCREL:
7255 case BFD_RELOC_AARCH64_64_PCREL:
7256 case BFD_RELOC_AARCH64_ADD_LO12:
7257 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
7258 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
7259 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
7260 case BFD_RELOC_AARCH64_LDST128_LO12:
7261 case BFD_RELOC_AARCH64_LDST16_LO12:
7262 case BFD_RELOC_AARCH64_LDST32_LO12:
7263 case BFD_RELOC_AARCH64_LDST64_LO12:
7264 case BFD_RELOC_AARCH64_LDST8_LO12:
7265 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
7266 if (h == NULL || bfd_link_pic (info))
7267 break;
7268 /* Fall through. */
7269
7270 case BFD_RELOC_AARCH64_NN:
7271
7272 /* We don't need to handle relocs into sections not going into
7273 the "real" output. */
7274 if ((sec->flags & SEC_ALLOC) == 0)
7275 break;
7276
7277 if (h != NULL)
7278 {
7279 if (!bfd_link_pic (info))
7280 h->non_got_ref = 1;
7281
7282 h->plt.refcount += 1;
7283 h->pointer_equality_needed = 1;
7284 }
7285
7286 /* No need to do anything if we're not creating a shared
7287 object. */
7288 if (!(bfd_link_pic (info)
7289 /* If on the other hand, we are creating an executable, we
7290 may need to keep relocations for symbols satisfied by a
7291 dynamic library if we manage to avoid copy relocs for the
7292 symbol.
7293
7294 NOTE: Currently, there is no support of copy relocs
7295 elimination on pc-relative relocation types, because there is
7296 no dynamic relocation support for them in glibc. We still
7297 record the dynamic symbol reference for them. This is
7298 because one symbol may be referenced by both absolute
7299 relocation (for example, BFD_RELOC_AARCH64_NN) and
7300 pc-relative relocation. We need full symbol reference
7301 information to make correct decision later in
7302 elfNN_aarch64_adjust_dynamic_symbol. */
7303 || (ELIMINATE_COPY_RELOCS
7304 && !bfd_link_pic (info)
7305 && h != NULL
7306 && (h->root.type == bfd_link_hash_defweak
7307 || !h->def_regular))))
7308 break;
7309
7310 {
7311 struct elf_dyn_relocs *p;
7312 struct elf_dyn_relocs **head;
7313 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7314
7315 /* We must copy these reloc types into the output file.
7316 Create a reloc section in dynobj and make room for
7317 this reloc. */
7318 if (sreloc == NULL)
7319 {
7320 if (htab->root.dynobj == NULL)
7321 htab->root.dynobj = abfd;
7322
7323 sreloc = _bfd_elf_make_dynamic_reloc_section
7324 (sec, htab->root.dynobj, LOG_FILE_ALIGN, abfd, /*rela? */ TRUE);
7325
7326 if (sreloc == NULL)
7327 return FALSE;
7328 }
7329
7330 /* If this is a global symbol, we count the number of
7331 relocations we need for this symbol. */
7332 if (h != NULL)
7333 {
7334 struct elf_aarch64_link_hash_entry *eh;
7335 eh = (struct elf_aarch64_link_hash_entry *) h;
7336 head = &eh->dyn_relocs;
7337 }
7338 else
7339 {
7340 /* Track dynamic relocs needed for local syms too.
7341 We really need local syms available to do this
7342 easily. Oh well. */
7343
7344 asection *s;
7345 void **vpp;
7346
7347 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
7348 abfd, r_symndx);
7349 if (isym == NULL)
7350 return FALSE;
7351
7352 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
7353 if (s == NULL)
7354 s = sec;
7355
7356 /* Beware of type punned pointers vs strict aliasing
7357 rules. */
7358 vpp = &(elf_section_data (s)->local_dynrel);
7359 head = (struct elf_dyn_relocs **) vpp;
7360 }
7361
7362 p = *head;
7363 if (p == NULL || p->sec != sec)
7364 {
7365 bfd_size_type amt = sizeof *p;
7366 p = ((struct elf_dyn_relocs *)
7367 bfd_zalloc (htab->root.dynobj, amt));
7368 if (p == NULL)
7369 return FALSE;
7370 p->next = *head;
7371 *head = p;
7372 p->sec = sec;
7373 }
7374
7375 p->count += 1;
7376
7377 if (elfNN_aarch64_howto_table[howto_index].pc_relative)
7378 p->pc_count += 1;
7379 }
7380 break;
7381
7382 /* RR: We probably want to keep a consistency check that
7383 there are no dangling GOT_PAGE relocs. */
7384 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7385 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7386 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
7387 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
7388 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
7389 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
7390 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
7391 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
7392 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
7393 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
7394 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
7395 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
7396 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
7397 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
7398 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
7399 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
7400 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
7401 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
7402 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
7403 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7404 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
7405 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
7406 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
7407 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
7408 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
7409 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
7410 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
7411 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
7412 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
7413 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
7414 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
7415 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
7416 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
7417 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
7418 {
7419 unsigned got_type;
7420 unsigned old_got_type;
7421
7422 got_type = aarch64_reloc_got_type (bfd_r_type);
7423
7424 if (h)
7425 {
7426 h->got.refcount += 1;
7427 old_got_type = elf_aarch64_hash_entry (h)->got_type;
7428 }
7429 else
7430 {
7431 struct elf_aarch64_local_symbol *locals;
7432
7433 if (!elfNN_aarch64_allocate_local_symbols
7434 (abfd, symtab_hdr->sh_info))
7435 return FALSE;
7436
7437 locals = elf_aarch64_locals (abfd);
7438 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7439 locals[r_symndx].got_refcount += 1;
7440 old_got_type = locals[r_symndx].got_type;
7441 }
7442
7443 /* If a variable is accessed with both general dynamic TLS
7444 methods, two slots may be created. */
7445 if (GOT_TLS_GD_ANY_P (old_got_type) && GOT_TLS_GD_ANY_P (got_type))
7446 got_type |= old_got_type;
7447
7448 /* We will already have issued an error message if there
7449 is a TLS/non-TLS mismatch, based on the symbol type.
7450 So just combine any TLS types needed. */
7451 if (old_got_type != GOT_UNKNOWN && old_got_type != GOT_NORMAL
7452 && got_type != GOT_NORMAL)
7453 got_type |= old_got_type;
7454
7455 /* If the symbol is accessed by both IE and GD methods, we
7456 are able to relax. Turn off the GD flag, without
7457 messing up with any other kind of TLS types that may be
7458 involved. */
7459 if ((got_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (got_type))
7460 got_type &= ~ (GOT_TLSDESC_GD | GOT_TLS_GD);
7461
7462 if (old_got_type != got_type)
7463 {
7464 if (h != NULL)
7465 elf_aarch64_hash_entry (h)->got_type = got_type;
7466 else
7467 {
7468 struct elf_aarch64_local_symbol *locals;
7469 locals = elf_aarch64_locals (abfd);
7470 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7471 locals[r_symndx].got_type = got_type;
7472 }
7473 }
7474
7475 if (htab->root.dynobj == NULL)
7476 htab->root.dynobj = abfd;
7477 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7478 return FALSE;
7479 break;
7480 }
7481
7482 case BFD_RELOC_AARCH64_CALL26:
7483 case BFD_RELOC_AARCH64_JUMP26:
7484 /* If this is a local symbol then we resolve it
7485 directly without creating a PLT entry. */
7486 if (h == NULL)
7487 continue;
7488
7489 h->needs_plt = 1;
7490 if (h->plt.refcount <= 0)
7491 h->plt.refcount = 1;
7492 else
7493 h->plt.refcount += 1;
7494 break;
7495
7496 default:
7497 break;
7498 }
7499 }
7500
7501 return TRUE;
7502 }
7503
7504 /* Treat mapping symbols as special target symbols. */
7505
7506 static bfd_boolean
7507 elfNN_aarch64_is_target_special_symbol (bfd *abfd ATTRIBUTE_UNUSED,
7508 asymbol *sym)
7509 {
7510 return bfd_is_aarch64_special_symbol_name (sym->name,
7511 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY);
7512 }
7513
7514 /* This is a copy of elf_find_function () from elf.c except that
7515 AArch64 mapping symbols are ignored when looking for function names. */
7516
7517 static bfd_boolean
7518 aarch64_elf_find_function (bfd *abfd ATTRIBUTE_UNUSED,
7519 asymbol **symbols,
7520 asection *section,
7521 bfd_vma offset,
7522 const char **filename_ptr,
7523 const char **functionname_ptr)
7524 {
7525 const char *filename = NULL;
7526 asymbol *func = NULL;
7527 bfd_vma low_func = 0;
7528 asymbol **p;
7529
7530 for (p = symbols; *p != NULL; p++)
7531 {
7532 elf_symbol_type *q;
7533
7534 q = (elf_symbol_type *) * p;
7535
7536 switch (ELF_ST_TYPE (q->internal_elf_sym.st_info))
7537 {
7538 default:
7539 break;
7540 case STT_FILE:
7541 filename = bfd_asymbol_name (&q->symbol);
7542 break;
7543 case STT_FUNC:
7544 case STT_NOTYPE:
7545 /* Skip mapping symbols. */
7546 if ((q->symbol.flags & BSF_LOCAL)
7547 && (bfd_is_aarch64_special_symbol_name
7548 (q->symbol.name, BFD_AARCH64_SPECIAL_SYM_TYPE_ANY)))
7549 continue;
7550 /* Fall through. */
7551 if (bfd_get_section (&q->symbol) == section
7552 && q->symbol.value >= low_func && q->symbol.value <= offset)
7553 {
7554 func = (asymbol *) q;
7555 low_func = q->symbol.value;
7556 }
7557 break;
7558 }
7559 }
7560
7561 if (func == NULL)
7562 return FALSE;
7563
7564 if (filename_ptr)
7565 *filename_ptr = filename;
7566 if (functionname_ptr)
7567 *functionname_ptr = bfd_asymbol_name (func);
7568
7569 return TRUE;
7570 }
7571
7572
7573 /* Find the nearest line to a particular section and offset, for error
7574 reporting. This code is a duplicate of the code in elf.c, except
7575 that it uses aarch64_elf_find_function. */
7576
7577 static bfd_boolean
7578 elfNN_aarch64_find_nearest_line (bfd *abfd,
7579 asymbol **symbols,
7580 asection *section,
7581 bfd_vma offset,
7582 const char **filename_ptr,
7583 const char **functionname_ptr,
7584 unsigned int *line_ptr,
7585 unsigned int *discriminator_ptr)
7586 {
7587 bfd_boolean found = FALSE;
7588
7589 if (_bfd_dwarf2_find_nearest_line (abfd, symbols, NULL, section, offset,
7590 filename_ptr, functionname_ptr,
7591 line_ptr, discriminator_ptr,
7592 dwarf_debug_sections, 0,
7593 &elf_tdata (abfd)->dwarf2_find_line_info))
7594 {
7595 if (!*functionname_ptr)
7596 aarch64_elf_find_function (abfd, symbols, section, offset,
7597 *filename_ptr ? NULL : filename_ptr,
7598 functionname_ptr);
7599
7600 return TRUE;
7601 }
7602
7603 /* Skip _bfd_dwarf1_find_nearest_line since no known AArch64
7604 toolchain uses DWARF1. */
7605
7606 if (!_bfd_stab_section_find_nearest_line (abfd, symbols, section, offset,
7607 &found, filename_ptr,
7608 functionname_ptr, line_ptr,
7609 &elf_tdata (abfd)->line_info))
7610 return FALSE;
7611
7612 if (found && (*functionname_ptr || *line_ptr))
7613 return TRUE;
7614
7615 if (symbols == NULL)
7616 return FALSE;
7617
7618 if (!aarch64_elf_find_function (abfd, symbols, section, offset,
7619 filename_ptr, functionname_ptr))
7620 return FALSE;
7621
7622 *line_ptr = 0;
7623 return TRUE;
7624 }
7625
7626 static bfd_boolean
7627 elfNN_aarch64_find_inliner_info (bfd *abfd,
7628 const char **filename_ptr,
7629 const char **functionname_ptr,
7630 unsigned int *line_ptr)
7631 {
7632 bfd_boolean found;
7633 found = _bfd_dwarf2_find_inliner_info
7634 (abfd, filename_ptr,
7635 functionname_ptr, line_ptr, &elf_tdata (abfd)->dwarf2_find_line_info);
7636 return found;
7637 }
7638
7639
7640 static void
7641 elfNN_aarch64_post_process_headers (bfd *abfd,
7642 struct bfd_link_info *link_info)
7643 {
7644 Elf_Internal_Ehdr *i_ehdrp; /* ELF file header, internal form. */
7645
7646 i_ehdrp = elf_elfheader (abfd);
7647 i_ehdrp->e_ident[EI_ABIVERSION] = AARCH64_ELF_ABI_VERSION;
7648
7649 _bfd_elf_post_process_headers (abfd, link_info);
7650 }
7651
7652 static enum elf_reloc_type_class
7653 elfNN_aarch64_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
7654 const asection *rel_sec ATTRIBUTE_UNUSED,
7655 const Elf_Internal_Rela *rela)
7656 {
7657 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
7658
7659 if (htab->root.dynsym != NULL
7660 && htab->root.dynsym->contents != NULL)
7661 {
7662 /* Check relocation against STT_GNU_IFUNC symbol if there are
7663 dynamic symbols. */
7664 bfd *abfd = info->output_bfd;
7665 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
7666 unsigned long r_symndx = ELFNN_R_SYM (rela->r_info);
7667 if (r_symndx != STN_UNDEF)
7668 {
7669 Elf_Internal_Sym sym;
7670 if (!bed->s->swap_symbol_in (abfd,
7671 (htab->root.dynsym->contents
7672 + r_symndx * bed->s->sizeof_sym),
7673 0, &sym))
7674 {
7675 /* xgettext:c-format */
7676 _bfd_error_handler (_("%B symbol number %lu references"
7677 " nonexistent SHT_SYMTAB_SHNDX section"),
7678 abfd, r_symndx);
7679 /* Ideally an error class should be returned here. */
7680 }
7681 else if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
7682 return reloc_class_ifunc;
7683 }
7684 }
7685
7686 switch ((int) ELFNN_R_TYPE (rela->r_info))
7687 {
7688 case AARCH64_R (IRELATIVE):
7689 return reloc_class_ifunc;
7690 case AARCH64_R (RELATIVE):
7691 return reloc_class_relative;
7692 case AARCH64_R (JUMP_SLOT):
7693 return reloc_class_plt;
7694 case AARCH64_R (COPY):
7695 return reloc_class_copy;
7696 default:
7697 return reloc_class_normal;
7698 }
7699 }
7700
7701 /* Handle an AArch64 specific section when reading an object file. This is
7702 called when bfd_section_from_shdr finds a section with an unknown
7703 type. */
7704
7705 static bfd_boolean
7706 elfNN_aarch64_section_from_shdr (bfd *abfd,
7707 Elf_Internal_Shdr *hdr,
7708 const char *name, int shindex)
7709 {
7710 /* There ought to be a place to keep ELF backend specific flags, but
7711 at the moment there isn't one. We just keep track of the
7712 sections by their name, instead. Fortunately, the ABI gives
7713 names for all the AArch64 specific sections, so we will probably get
7714 away with this. */
7715 switch (hdr->sh_type)
7716 {
7717 case SHT_AARCH64_ATTRIBUTES:
7718 break;
7719
7720 default:
7721 return FALSE;
7722 }
7723
7724 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
7725 return FALSE;
7726
7727 return TRUE;
7728 }
7729
7730 /* A structure used to record a list of sections, independently
7731 of the next and prev fields in the asection structure. */
7732 typedef struct section_list
7733 {
7734 asection *sec;
7735 struct section_list *next;
7736 struct section_list *prev;
7737 }
7738 section_list;
7739
7740 /* Unfortunately we need to keep a list of sections for which
7741 an _aarch64_elf_section_data structure has been allocated. This
7742 is because it is possible for functions like elfNN_aarch64_write_section
7743 to be called on a section which has had an elf_data_structure
7744 allocated for it (and so the used_by_bfd field is valid) but
7745 for which the AArch64 extended version of this structure - the
7746 _aarch64_elf_section_data structure - has not been allocated. */
7747 static section_list *sections_with_aarch64_elf_section_data = NULL;
7748
7749 static void
7750 record_section_with_aarch64_elf_section_data (asection *sec)
7751 {
7752 struct section_list *entry;
7753
7754 entry = bfd_malloc (sizeof (*entry));
7755 if (entry == NULL)
7756 return;
7757 entry->sec = sec;
7758 entry->next = sections_with_aarch64_elf_section_data;
7759 entry->prev = NULL;
7760 if (entry->next != NULL)
7761 entry->next->prev = entry;
7762 sections_with_aarch64_elf_section_data = entry;
7763 }
7764
7765 static struct section_list *
7766 find_aarch64_elf_section_entry (asection *sec)
7767 {
7768 struct section_list *entry;
7769 static struct section_list *last_entry = NULL;
7770
7771 /* This is a short cut for the typical case where the sections are added
7772 to the sections_with_aarch64_elf_section_data list in forward order and
7773 then looked up here in backwards order. This makes a real difference
7774 to the ld-srec/sec64k.exp linker test. */
7775 entry = sections_with_aarch64_elf_section_data;
7776 if (last_entry != NULL)
7777 {
7778 if (last_entry->sec == sec)
7779 entry = last_entry;
7780 else if (last_entry->next != NULL && last_entry->next->sec == sec)
7781 entry = last_entry->next;
7782 }
7783
7784 for (; entry; entry = entry->next)
7785 if (entry->sec == sec)
7786 break;
7787
7788 if (entry)
7789 /* Record the entry prior to this one - it is the entry we are
7790 most likely to want to locate next time. Also this way if we
7791 have been called from
7792 unrecord_section_with_aarch64_elf_section_data () we will not
7793 be caching a pointer that is about to be freed. */
7794 last_entry = entry->prev;
7795
7796 return entry;
7797 }
7798
7799 static void
7800 unrecord_section_with_aarch64_elf_section_data (asection *sec)
7801 {
7802 struct section_list *entry;
7803
7804 entry = find_aarch64_elf_section_entry (sec);
7805
7806 if (entry)
7807 {
7808 if (entry->prev != NULL)
7809 entry->prev->next = entry->next;
7810 if (entry->next != NULL)
7811 entry->next->prev = entry->prev;
7812 if (entry == sections_with_aarch64_elf_section_data)
7813 sections_with_aarch64_elf_section_data = entry->next;
7814 free (entry);
7815 }
7816 }
7817
7818
7819 typedef struct
7820 {
7821 void *finfo;
7822 struct bfd_link_info *info;
7823 asection *sec;
7824 int sec_shndx;
7825 int (*func) (void *, const char *, Elf_Internal_Sym *,
7826 asection *, struct elf_link_hash_entry *);
7827 } output_arch_syminfo;
7828
7829 enum map_symbol_type
7830 {
7831 AARCH64_MAP_INSN,
7832 AARCH64_MAP_DATA
7833 };
7834
7835
7836 /* Output a single mapping symbol. */
7837
7838 static bfd_boolean
7839 elfNN_aarch64_output_map_sym (output_arch_syminfo *osi,
7840 enum map_symbol_type type, bfd_vma offset)
7841 {
7842 static const char *names[2] = { "$x", "$d" };
7843 Elf_Internal_Sym sym;
7844
7845 sym.st_value = (osi->sec->output_section->vma
7846 + osi->sec->output_offset + offset);
7847 sym.st_size = 0;
7848 sym.st_other = 0;
7849 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
7850 sym.st_shndx = osi->sec_shndx;
7851 return osi->func (osi->finfo, names[type], &sym, osi->sec, NULL) == 1;
7852 }
7853
7854 /* Output a single local symbol for a generated stub. */
7855
7856 static bfd_boolean
7857 elfNN_aarch64_output_stub_sym (output_arch_syminfo *osi, const char *name,
7858 bfd_vma offset, bfd_vma size)
7859 {
7860 Elf_Internal_Sym sym;
7861
7862 sym.st_value = (osi->sec->output_section->vma
7863 + osi->sec->output_offset + offset);
7864 sym.st_size = size;
7865 sym.st_other = 0;
7866 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
7867 sym.st_shndx = osi->sec_shndx;
7868 return osi->func (osi->finfo, name, &sym, osi->sec, NULL) == 1;
7869 }
7870
7871 static bfd_boolean
7872 aarch64_map_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
7873 {
7874 struct elf_aarch64_stub_hash_entry *stub_entry;
7875 asection *stub_sec;
7876 bfd_vma addr;
7877 char *stub_name;
7878 output_arch_syminfo *osi;
7879
7880 /* Massage our args to the form they really have. */
7881 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
7882 osi = (output_arch_syminfo *) in_arg;
7883
7884 stub_sec = stub_entry->stub_sec;
7885
7886 /* Ensure this stub is attached to the current section being
7887 processed. */
7888 if (stub_sec != osi->sec)
7889 return TRUE;
7890
7891 addr = (bfd_vma) stub_entry->stub_offset;
7892
7893 stub_name = stub_entry->output_name;
7894
7895 switch (stub_entry->stub_type)
7896 {
7897 case aarch64_stub_adrp_branch:
7898 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
7899 sizeof (aarch64_adrp_branch_stub)))
7900 return FALSE;
7901 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
7902 return FALSE;
7903 break;
7904 case aarch64_stub_long_branch:
7905 if (!elfNN_aarch64_output_stub_sym
7906 (osi, stub_name, addr, sizeof (aarch64_long_branch_stub)))
7907 return FALSE;
7908 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
7909 return FALSE;
7910 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_DATA, addr + 16))
7911 return FALSE;
7912 break;
7913 case aarch64_stub_erratum_835769_veneer:
7914 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
7915 sizeof (aarch64_erratum_835769_stub)))
7916 return FALSE;
7917 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
7918 return FALSE;
7919 break;
7920 case aarch64_stub_erratum_843419_veneer:
7921 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
7922 sizeof (aarch64_erratum_843419_stub)))
7923 return FALSE;
7924 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
7925 return FALSE;
7926 break;
7927
7928 default:
7929 abort ();
7930 }
7931
7932 return TRUE;
7933 }
7934
7935 /* Output mapping symbols for linker generated sections. */
7936
7937 static bfd_boolean
7938 elfNN_aarch64_output_arch_local_syms (bfd *output_bfd,
7939 struct bfd_link_info *info,
7940 void *finfo,
7941 int (*func) (void *, const char *,
7942 Elf_Internal_Sym *,
7943 asection *,
7944 struct elf_link_hash_entry
7945 *))
7946 {
7947 output_arch_syminfo osi;
7948 struct elf_aarch64_link_hash_table *htab;
7949
7950 htab = elf_aarch64_hash_table (info);
7951
7952 osi.finfo = finfo;
7953 osi.info = info;
7954 osi.func = func;
7955
7956 /* Long calls stubs. */
7957 if (htab->stub_bfd && htab->stub_bfd->sections)
7958 {
7959 asection *stub_sec;
7960
7961 for (stub_sec = htab->stub_bfd->sections;
7962 stub_sec != NULL; stub_sec = stub_sec->next)
7963 {
7964 /* Ignore non-stub sections. */
7965 if (!strstr (stub_sec->name, STUB_SUFFIX))
7966 continue;
7967
7968 osi.sec = stub_sec;
7969
7970 osi.sec_shndx = _bfd_elf_section_from_bfd_section
7971 (output_bfd, osi.sec->output_section);
7972
7973 /* The first instruction in a stub is always a branch. */
7974 if (!elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0))
7975 return FALSE;
7976
7977 bfd_hash_traverse (&htab->stub_hash_table, aarch64_map_one_stub,
7978 &osi);
7979 }
7980 }
7981
7982 /* Finally, output mapping symbols for the PLT. */
7983 if (!htab->root.splt || htab->root.splt->size == 0)
7984 return TRUE;
7985
7986 osi.sec_shndx = _bfd_elf_section_from_bfd_section
7987 (output_bfd, htab->root.splt->output_section);
7988 osi.sec = htab->root.splt;
7989
7990 elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0);
7991
7992 return TRUE;
7993
7994 }
7995
7996 /* Allocate target specific section data. */
7997
7998 static bfd_boolean
7999 elfNN_aarch64_new_section_hook (bfd *abfd, asection *sec)
8000 {
8001 if (!sec->used_by_bfd)
8002 {
8003 _aarch64_elf_section_data *sdata;
8004 bfd_size_type amt = sizeof (*sdata);
8005
8006 sdata = bfd_zalloc (abfd, amt);
8007 if (sdata == NULL)
8008 return FALSE;
8009 sec->used_by_bfd = sdata;
8010 }
8011
8012 record_section_with_aarch64_elf_section_data (sec);
8013
8014 return _bfd_elf_new_section_hook (abfd, sec);
8015 }
8016
8017
8018 static void
8019 unrecord_section_via_map_over_sections (bfd *abfd ATTRIBUTE_UNUSED,
8020 asection *sec,
8021 void *ignore ATTRIBUTE_UNUSED)
8022 {
8023 unrecord_section_with_aarch64_elf_section_data (sec);
8024 }
8025
8026 static bfd_boolean
8027 elfNN_aarch64_close_and_cleanup (bfd *abfd)
8028 {
8029 if (abfd->sections)
8030 bfd_map_over_sections (abfd,
8031 unrecord_section_via_map_over_sections, NULL);
8032
8033 return _bfd_elf_close_and_cleanup (abfd);
8034 }
8035
8036 static bfd_boolean
8037 elfNN_aarch64_bfd_free_cached_info (bfd *abfd)
8038 {
8039 if (abfd->sections)
8040 bfd_map_over_sections (abfd,
8041 unrecord_section_via_map_over_sections, NULL);
8042
8043 return _bfd_free_cached_info (abfd);
8044 }
8045
8046 /* Create dynamic sections. This is different from the ARM backend in that
8047 the got, plt, gotplt and their relocation sections are all created in the
8048 standard part of the bfd elf backend. */
8049
8050 static bfd_boolean
8051 elfNN_aarch64_create_dynamic_sections (bfd *dynobj,
8052 struct bfd_link_info *info)
8053 {
8054 /* We need to create .got section. */
8055 if (!aarch64_elf_create_got_section (dynobj, info))
8056 return FALSE;
8057
8058 return _bfd_elf_create_dynamic_sections (dynobj, info);
8059 }
8060
8061
8062 /* Allocate space in .plt, .got and associated reloc sections for
8063 dynamic relocs. */
8064
8065 static bfd_boolean
8066 elfNN_aarch64_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
8067 {
8068 struct bfd_link_info *info;
8069 struct elf_aarch64_link_hash_table *htab;
8070 struct elf_aarch64_link_hash_entry *eh;
8071 struct elf_dyn_relocs *p;
8072
8073 /* An example of a bfd_link_hash_indirect symbol is versioned
8074 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8075 -> __gxx_personality_v0(bfd_link_hash_defined)
8076
8077 There is no need to process bfd_link_hash_indirect symbols here
8078 because we will also be presented with the concrete instance of
8079 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
8080 called to copy all relevant data from the generic to the concrete
8081 symbol instance. */
8082 if (h->root.type == bfd_link_hash_indirect)
8083 return TRUE;
8084
8085 if (h->root.type == bfd_link_hash_warning)
8086 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8087
8088 info = (struct bfd_link_info *) inf;
8089 htab = elf_aarch64_hash_table (info);
8090
8091 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8092 here if it is defined and referenced in a non-shared object. */
8093 if (h->type == STT_GNU_IFUNC
8094 && h->def_regular)
8095 return TRUE;
8096 else if (htab->root.dynamic_sections_created && h->plt.refcount > 0)
8097 {
8098 /* Make sure this symbol is output as a dynamic symbol.
8099 Undefined weak syms won't yet be marked as dynamic. */
8100 if (h->dynindx == -1 && !h->forced_local
8101 && h->root.type == bfd_link_hash_undefweak)
8102 {
8103 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8104 return FALSE;
8105 }
8106
8107 if (bfd_link_pic (info) || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
8108 {
8109 asection *s = htab->root.splt;
8110
8111 /* If this is the first .plt entry, make room for the special
8112 first entry. */
8113 if (s->size == 0)
8114 s->size += htab->plt_header_size;
8115
8116 h->plt.offset = s->size;
8117
8118 /* If this symbol is not defined in a regular file, and we are
8119 not generating a shared library, then set the symbol to this
8120 location in the .plt. This is required to make function
8121 pointers compare as equal between the normal executable and
8122 the shared library. */
8123 if (!bfd_link_pic (info) && !h->def_regular)
8124 {
8125 h->root.u.def.section = s;
8126 h->root.u.def.value = h->plt.offset;
8127 }
8128
8129 /* Make room for this entry. For now we only create the
8130 small model PLT entries. We later need to find a way
8131 of relaxing into these from the large model PLT entries. */
8132 s->size += PLT_SMALL_ENTRY_SIZE;
8133
8134 /* We also need to make an entry in the .got.plt section, which
8135 will be placed in the .got section by the linker script. */
8136 htab->root.sgotplt->size += GOT_ENTRY_SIZE;
8137
8138 /* We also need to make an entry in the .rela.plt section. */
8139 htab->root.srelplt->size += RELOC_SIZE (htab);
8140
8141 /* We need to ensure that all GOT entries that serve the PLT
8142 are consecutive with the special GOT slots [0] [1] and
8143 [2]. Any addtional relocations, such as
8144 R_AARCH64_TLSDESC, must be placed after the PLT related
8145 entries. We abuse the reloc_count such that during
8146 sizing we adjust reloc_count to indicate the number of
8147 PLT related reserved entries. In subsequent phases when
8148 filling in the contents of the reloc entries, PLT related
8149 entries are placed by computing their PLT index (0
8150 .. reloc_count). While other none PLT relocs are placed
8151 at the slot indicated by reloc_count and reloc_count is
8152 updated. */
8153
8154 htab->root.srelplt->reloc_count++;
8155 }
8156 else
8157 {
8158 h->plt.offset = (bfd_vma) - 1;
8159 h->needs_plt = 0;
8160 }
8161 }
8162 else
8163 {
8164 h->plt.offset = (bfd_vma) - 1;
8165 h->needs_plt = 0;
8166 }
8167
8168 eh = (struct elf_aarch64_link_hash_entry *) h;
8169 eh->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8170
8171 if (h->got.refcount > 0)
8172 {
8173 bfd_boolean dyn;
8174 unsigned got_type = elf_aarch64_hash_entry (h)->got_type;
8175
8176 h->got.offset = (bfd_vma) - 1;
8177
8178 dyn = htab->root.dynamic_sections_created;
8179
8180 /* Make sure this symbol is output as a dynamic symbol.
8181 Undefined weak syms won't yet be marked as dynamic. */
8182 if (dyn && h->dynindx == -1 && !h->forced_local
8183 && h->root.type == bfd_link_hash_undefweak)
8184 {
8185 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8186 return FALSE;
8187 }
8188
8189 if (got_type == GOT_UNKNOWN)
8190 {
8191 }
8192 else if (got_type == GOT_NORMAL)
8193 {
8194 h->got.offset = htab->root.sgot->size;
8195 htab->root.sgot->size += GOT_ENTRY_SIZE;
8196 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8197 || h->root.type != bfd_link_hash_undefweak)
8198 && (bfd_link_pic (info)
8199 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
8200 {
8201 htab->root.srelgot->size += RELOC_SIZE (htab);
8202 }
8203 }
8204 else
8205 {
8206 int indx;
8207 if (got_type & GOT_TLSDESC_GD)
8208 {
8209 eh->tlsdesc_got_jump_table_offset =
8210 (htab->root.sgotplt->size
8211 - aarch64_compute_jump_table_size (htab));
8212 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8213 h->got.offset = (bfd_vma) - 2;
8214 }
8215
8216 if (got_type & GOT_TLS_GD)
8217 {
8218 h->got.offset = htab->root.sgot->size;
8219 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8220 }
8221
8222 if (got_type & GOT_TLS_IE)
8223 {
8224 h->got.offset = htab->root.sgot->size;
8225 htab->root.sgot->size += GOT_ENTRY_SIZE;
8226 }
8227
8228 indx = h && h->dynindx != -1 ? h->dynindx : 0;
8229 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8230 || h->root.type != bfd_link_hash_undefweak)
8231 && (bfd_link_pic (info)
8232 || indx != 0
8233 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
8234 {
8235 if (got_type & GOT_TLSDESC_GD)
8236 {
8237 htab->root.srelplt->size += RELOC_SIZE (htab);
8238 /* Note reloc_count not incremented here! We have
8239 already adjusted reloc_count for this relocation
8240 type. */
8241
8242 /* TLSDESC PLT is now needed, but not yet determined. */
8243 htab->tlsdesc_plt = (bfd_vma) - 1;
8244 }
8245
8246 if (got_type & GOT_TLS_GD)
8247 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8248
8249 if (got_type & GOT_TLS_IE)
8250 htab->root.srelgot->size += RELOC_SIZE (htab);
8251 }
8252 }
8253 }
8254 else
8255 {
8256 h->got.offset = (bfd_vma) - 1;
8257 }
8258
8259 if (eh->dyn_relocs == NULL)
8260 return TRUE;
8261
8262 /* In the shared -Bsymbolic case, discard space allocated for
8263 dynamic pc-relative relocs against symbols which turn out to be
8264 defined in regular objects. For the normal shared case, discard
8265 space for pc-relative relocs that have become local due to symbol
8266 visibility changes. */
8267
8268 if (bfd_link_pic (info))
8269 {
8270 /* Relocs that use pc_count are those that appear on a call
8271 insn, or certain REL relocs that can generated via assembly.
8272 We want calls to protected symbols to resolve directly to the
8273 function rather than going via the plt. If people want
8274 function pointer comparisons to work as expected then they
8275 should avoid writing weird assembly. */
8276 if (SYMBOL_CALLS_LOCAL (info, h))
8277 {
8278 struct elf_dyn_relocs **pp;
8279
8280 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
8281 {
8282 p->count -= p->pc_count;
8283 p->pc_count = 0;
8284 if (p->count == 0)
8285 *pp = p->next;
8286 else
8287 pp = &p->next;
8288 }
8289 }
8290
8291 /* Also discard relocs on undefined weak syms with non-default
8292 visibility. */
8293 if (eh->dyn_relocs != NULL && h->root.type == bfd_link_hash_undefweak)
8294 {
8295 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
8296 || UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
8297 eh->dyn_relocs = NULL;
8298
8299 /* Make sure undefined weak symbols are output as a dynamic
8300 symbol in PIEs. */
8301 else if (h->dynindx == -1
8302 && !h->forced_local
8303 && h->root.type == bfd_link_hash_undefweak
8304 && !bfd_elf_link_record_dynamic_symbol (info, h))
8305 return FALSE;
8306 }
8307
8308 }
8309 else if (ELIMINATE_COPY_RELOCS)
8310 {
8311 /* For the non-shared case, discard space for relocs against
8312 symbols which turn out to need copy relocs or are not
8313 dynamic. */
8314
8315 if (!h->non_got_ref
8316 && ((h->def_dynamic
8317 && !h->def_regular)
8318 || (htab->root.dynamic_sections_created
8319 && (h->root.type == bfd_link_hash_undefweak
8320 || h->root.type == bfd_link_hash_undefined))))
8321 {
8322 /* Make sure this symbol is output as a dynamic symbol.
8323 Undefined weak syms won't yet be marked as dynamic. */
8324 if (h->dynindx == -1
8325 && !h->forced_local
8326 && h->root.type == bfd_link_hash_undefweak
8327 && !bfd_elf_link_record_dynamic_symbol (info, h))
8328 return FALSE;
8329
8330 /* If that succeeded, we know we'll be keeping all the
8331 relocs. */
8332 if (h->dynindx != -1)
8333 goto keep;
8334 }
8335
8336 eh->dyn_relocs = NULL;
8337
8338 keep:;
8339 }
8340
8341 /* Finally, allocate space. */
8342 for (p = eh->dyn_relocs; p != NULL; p = p->next)
8343 {
8344 asection *sreloc;
8345
8346 sreloc = elf_section_data (p->sec)->sreloc;
8347
8348 BFD_ASSERT (sreloc != NULL);
8349
8350 sreloc->size += p->count * RELOC_SIZE (htab);
8351 }
8352
8353 return TRUE;
8354 }
8355
8356 /* Allocate space in .plt, .got and associated reloc sections for
8357 ifunc dynamic relocs. */
8358
8359 static bfd_boolean
8360 elfNN_aarch64_allocate_ifunc_dynrelocs (struct elf_link_hash_entry *h,
8361 void *inf)
8362 {
8363 struct bfd_link_info *info;
8364 struct elf_aarch64_link_hash_table *htab;
8365 struct elf_aarch64_link_hash_entry *eh;
8366
8367 /* An example of a bfd_link_hash_indirect symbol is versioned
8368 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8369 -> __gxx_personality_v0(bfd_link_hash_defined)
8370
8371 There is no need to process bfd_link_hash_indirect symbols here
8372 because we will also be presented with the concrete instance of
8373 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
8374 called to copy all relevant data from the generic to the concrete
8375 symbol instance. */
8376 if (h->root.type == bfd_link_hash_indirect)
8377 return TRUE;
8378
8379 if (h->root.type == bfd_link_hash_warning)
8380 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8381
8382 info = (struct bfd_link_info *) inf;
8383 htab = elf_aarch64_hash_table (info);
8384
8385 eh = (struct elf_aarch64_link_hash_entry *) h;
8386
8387 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8388 here if it is defined and referenced in a non-shared object. */
8389 if (h->type == STT_GNU_IFUNC
8390 && h->def_regular)
8391 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
8392 &eh->dyn_relocs,
8393 NULL,
8394 htab->plt_entry_size,
8395 htab->plt_header_size,
8396 GOT_ENTRY_SIZE,
8397 FALSE);
8398 return TRUE;
8399 }
8400
8401 /* Allocate space in .plt, .got and associated reloc sections for
8402 local dynamic relocs. */
8403
8404 static bfd_boolean
8405 elfNN_aarch64_allocate_local_dynrelocs (void **slot, void *inf)
8406 {
8407 struct elf_link_hash_entry *h
8408 = (struct elf_link_hash_entry *) *slot;
8409
8410 if (h->type != STT_GNU_IFUNC
8411 || !h->def_regular
8412 || !h->ref_regular
8413 || !h->forced_local
8414 || h->root.type != bfd_link_hash_defined)
8415 abort ();
8416
8417 return elfNN_aarch64_allocate_dynrelocs (h, inf);
8418 }
8419
8420 /* Allocate space in .plt, .got and associated reloc sections for
8421 local ifunc dynamic relocs. */
8422
8423 static bfd_boolean
8424 elfNN_aarch64_allocate_local_ifunc_dynrelocs (void **slot, void *inf)
8425 {
8426 struct elf_link_hash_entry *h
8427 = (struct elf_link_hash_entry *) *slot;
8428
8429 if (h->type != STT_GNU_IFUNC
8430 || !h->def_regular
8431 || !h->ref_regular
8432 || !h->forced_local
8433 || h->root.type != bfd_link_hash_defined)
8434 abort ();
8435
8436 return elfNN_aarch64_allocate_ifunc_dynrelocs (h, inf);
8437 }
8438
8439 /* Find any dynamic relocs that apply to read-only sections. */
8440
8441 static bfd_boolean
8442 aarch64_readonly_dynrelocs (struct elf_link_hash_entry * h, void * inf)
8443 {
8444 struct elf_aarch64_link_hash_entry * eh;
8445 struct elf_dyn_relocs * p;
8446
8447 eh = (struct elf_aarch64_link_hash_entry *) h;
8448 for (p = eh->dyn_relocs; p != NULL; p = p->next)
8449 {
8450 asection *s = p->sec;
8451
8452 if (s != NULL && (s->flags & SEC_READONLY) != 0)
8453 {
8454 struct bfd_link_info *info = (struct bfd_link_info *) inf;
8455
8456 info->flags |= DF_TEXTREL;
8457
8458 /* Not an error, just cut short the traversal. */
8459 return FALSE;
8460 }
8461 }
8462 return TRUE;
8463 }
8464
8465 /* This is the most important function of all . Innocuosly named
8466 though ! */
8467
8468 static bfd_boolean
8469 elfNN_aarch64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
8470 struct bfd_link_info *info)
8471 {
8472 struct elf_aarch64_link_hash_table *htab;
8473 bfd *dynobj;
8474 asection *s;
8475 bfd_boolean relocs;
8476 bfd *ibfd;
8477
8478 htab = elf_aarch64_hash_table ((info));
8479 dynobj = htab->root.dynobj;
8480
8481 BFD_ASSERT (dynobj != NULL);
8482
8483 if (htab->root.dynamic_sections_created)
8484 {
8485 if (bfd_link_executable (info) && !info->nointerp)
8486 {
8487 s = bfd_get_linker_section (dynobj, ".interp");
8488 if (s == NULL)
8489 abort ();
8490 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
8491 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
8492 }
8493 }
8494
8495 /* Set up .got offsets for local syms, and space for local dynamic
8496 relocs. */
8497 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
8498 {
8499 struct elf_aarch64_local_symbol *locals = NULL;
8500 Elf_Internal_Shdr *symtab_hdr;
8501 asection *srel;
8502 unsigned int i;
8503
8504 if (!is_aarch64_elf (ibfd))
8505 continue;
8506
8507 for (s = ibfd->sections; s != NULL; s = s->next)
8508 {
8509 struct elf_dyn_relocs *p;
8510
8511 for (p = (struct elf_dyn_relocs *)
8512 (elf_section_data (s)->local_dynrel); p != NULL; p = p->next)
8513 {
8514 if (!bfd_is_abs_section (p->sec)
8515 && bfd_is_abs_section (p->sec->output_section))
8516 {
8517 /* Input section has been discarded, either because
8518 it is a copy of a linkonce section or due to
8519 linker script /DISCARD/, so we'll be discarding
8520 the relocs too. */
8521 }
8522 else if (p->count != 0)
8523 {
8524 srel = elf_section_data (p->sec)->sreloc;
8525 srel->size += p->count * RELOC_SIZE (htab);
8526 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
8527 info->flags |= DF_TEXTREL;
8528 }
8529 }
8530 }
8531
8532 locals = elf_aarch64_locals (ibfd);
8533 if (!locals)
8534 continue;
8535
8536 symtab_hdr = &elf_symtab_hdr (ibfd);
8537 srel = htab->root.srelgot;
8538 for (i = 0; i < symtab_hdr->sh_info; i++)
8539 {
8540 locals[i].got_offset = (bfd_vma) - 1;
8541 locals[i].tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8542 if (locals[i].got_refcount > 0)
8543 {
8544 unsigned got_type = locals[i].got_type;
8545 if (got_type & GOT_TLSDESC_GD)
8546 {
8547 locals[i].tlsdesc_got_jump_table_offset =
8548 (htab->root.sgotplt->size
8549 - aarch64_compute_jump_table_size (htab));
8550 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8551 locals[i].got_offset = (bfd_vma) - 2;
8552 }
8553
8554 if (got_type & GOT_TLS_GD)
8555 {
8556 locals[i].got_offset = htab->root.sgot->size;
8557 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8558 }
8559
8560 if (got_type & GOT_TLS_IE
8561 || got_type & GOT_NORMAL)
8562 {
8563 locals[i].got_offset = htab->root.sgot->size;
8564 htab->root.sgot->size += GOT_ENTRY_SIZE;
8565 }
8566
8567 if (got_type == GOT_UNKNOWN)
8568 {
8569 }
8570
8571 if (bfd_link_pic (info))
8572 {
8573 if (got_type & GOT_TLSDESC_GD)
8574 {
8575 htab->root.srelplt->size += RELOC_SIZE (htab);
8576 /* Note RELOC_COUNT not incremented here! */
8577 htab->tlsdesc_plt = (bfd_vma) - 1;
8578 }
8579
8580 if (got_type & GOT_TLS_GD)
8581 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8582
8583 if (got_type & GOT_TLS_IE
8584 || got_type & GOT_NORMAL)
8585 htab->root.srelgot->size += RELOC_SIZE (htab);
8586 }
8587 }
8588 else
8589 {
8590 locals[i].got_refcount = (bfd_vma) - 1;
8591 }
8592 }
8593 }
8594
8595
8596 /* Allocate global sym .plt and .got entries, and space for global
8597 sym dynamic relocs. */
8598 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_dynrelocs,
8599 info);
8600
8601 /* Allocate global ifunc sym .plt and .got entries, and space for global
8602 ifunc sym dynamic relocs. */
8603 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_ifunc_dynrelocs,
8604 info);
8605
8606 /* Allocate .plt and .got entries, and space for local symbols. */
8607 htab_traverse (htab->loc_hash_table,
8608 elfNN_aarch64_allocate_local_dynrelocs,
8609 info);
8610
8611 /* Allocate .plt and .got entries, and space for local ifunc symbols. */
8612 htab_traverse (htab->loc_hash_table,
8613 elfNN_aarch64_allocate_local_ifunc_dynrelocs,
8614 info);
8615
8616 /* For every jump slot reserved in the sgotplt, reloc_count is
8617 incremented. However, when we reserve space for TLS descriptors,
8618 it's not incremented, so in order to compute the space reserved
8619 for them, it suffices to multiply the reloc count by the jump
8620 slot size. */
8621
8622 if (htab->root.srelplt)
8623 htab->sgotplt_jump_table_size = aarch64_compute_jump_table_size (htab);
8624
8625 if (htab->tlsdesc_plt)
8626 {
8627 if (htab->root.splt->size == 0)
8628 htab->root.splt->size += PLT_ENTRY_SIZE;
8629
8630 htab->tlsdesc_plt = htab->root.splt->size;
8631 htab->root.splt->size += PLT_TLSDESC_ENTRY_SIZE;
8632
8633 /* If we're not using lazy TLS relocations, don't generate the
8634 GOT entry required. */
8635 if (!(info->flags & DF_BIND_NOW))
8636 {
8637 htab->dt_tlsdesc_got = htab->root.sgot->size;
8638 htab->root.sgot->size += GOT_ENTRY_SIZE;
8639 }
8640 }
8641
8642 /* Init mapping symbols information to use later to distingush between
8643 code and data while scanning for errata. */
8644 if (htab->fix_erratum_835769 || htab->fix_erratum_843419)
8645 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
8646 {
8647 if (!is_aarch64_elf (ibfd))
8648 continue;
8649 bfd_elfNN_aarch64_init_maps (ibfd);
8650 }
8651
8652 /* We now have determined the sizes of the various dynamic sections.
8653 Allocate memory for them. */
8654 relocs = FALSE;
8655 for (s = dynobj->sections; s != NULL; s = s->next)
8656 {
8657 if ((s->flags & SEC_LINKER_CREATED) == 0)
8658 continue;
8659
8660 if (s == htab->root.splt
8661 || s == htab->root.sgot
8662 || s == htab->root.sgotplt
8663 || s == htab->root.iplt
8664 || s == htab->root.igotplt
8665 || s == htab->root.sdynbss
8666 || s == htab->root.sdynrelro)
8667 {
8668 /* Strip this section if we don't need it; see the
8669 comment below. */
8670 }
8671 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
8672 {
8673 if (s->size != 0 && s != htab->root.srelplt)
8674 relocs = TRUE;
8675
8676 /* We use the reloc_count field as a counter if we need
8677 to copy relocs into the output file. */
8678 if (s != htab->root.srelplt)
8679 s->reloc_count = 0;
8680 }
8681 else
8682 {
8683 /* It's not one of our sections, so don't allocate space. */
8684 continue;
8685 }
8686
8687 if (s->size == 0)
8688 {
8689 /* If we don't need this section, strip it from the
8690 output file. This is mostly to handle .rela.bss and
8691 .rela.plt. We must create both sections in
8692 create_dynamic_sections, because they must be created
8693 before the linker maps input sections to output
8694 sections. The linker does that before
8695 adjust_dynamic_symbol is called, and it is that
8696 function which decides whether anything needs to go
8697 into these sections. */
8698 s->flags |= SEC_EXCLUDE;
8699 continue;
8700 }
8701
8702 if ((s->flags & SEC_HAS_CONTENTS) == 0)
8703 continue;
8704
8705 /* Allocate memory for the section contents. We use bfd_zalloc
8706 here in case unused entries are not reclaimed before the
8707 section's contents are written out. This should not happen,
8708 but this way if it does, we get a R_AARCH64_NONE reloc instead
8709 of garbage. */
8710 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
8711 if (s->contents == NULL)
8712 return FALSE;
8713 }
8714
8715 if (htab->root.dynamic_sections_created)
8716 {
8717 /* Add some entries to the .dynamic section. We fill in the
8718 values later, in elfNN_aarch64_finish_dynamic_sections, but we
8719 must add the entries now so that we get the correct size for
8720 the .dynamic section. The DT_DEBUG entry is filled in by the
8721 dynamic linker and used by the debugger. */
8722 #define add_dynamic_entry(TAG, VAL) \
8723 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
8724
8725 if (bfd_link_executable (info))
8726 {
8727 if (!add_dynamic_entry (DT_DEBUG, 0))
8728 return FALSE;
8729 }
8730
8731 if (htab->root.splt->size != 0)
8732 {
8733 if (!add_dynamic_entry (DT_PLTGOT, 0)
8734 || !add_dynamic_entry (DT_PLTRELSZ, 0)
8735 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
8736 || !add_dynamic_entry (DT_JMPREL, 0))
8737 return FALSE;
8738
8739 if (htab->tlsdesc_plt
8740 && (!add_dynamic_entry (DT_TLSDESC_PLT, 0)
8741 || !add_dynamic_entry (DT_TLSDESC_GOT, 0)))
8742 return FALSE;
8743 }
8744
8745 if (relocs)
8746 {
8747 if (!add_dynamic_entry (DT_RELA, 0)
8748 || !add_dynamic_entry (DT_RELASZ, 0)
8749 || !add_dynamic_entry (DT_RELAENT, RELOC_SIZE (htab)))
8750 return FALSE;
8751
8752 /* If any dynamic relocs apply to a read-only section,
8753 then we need a DT_TEXTREL entry. */
8754 if ((info->flags & DF_TEXTREL) == 0)
8755 elf_link_hash_traverse (& htab->root, aarch64_readonly_dynrelocs,
8756 info);
8757
8758 if ((info->flags & DF_TEXTREL) != 0)
8759 {
8760 if (!add_dynamic_entry (DT_TEXTREL, 0))
8761 return FALSE;
8762 }
8763 }
8764 }
8765 #undef add_dynamic_entry
8766
8767 return TRUE;
8768 }
8769
8770 static inline void
8771 elf_aarch64_update_plt_entry (bfd *output_bfd,
8772 bfd_reloc_code_real_type r_type,
8773 bfd_byte *plt_entry, bfd_vma value)
8774 {
8775 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (r_type);
8776
8777 /* FIXME: We should check the return value from this function call. */
8778 (void) _bfd_aarch64_elf_put_addend (output_bfd, plt_entry, r_type, howto, value);
8779 }
8780
8781 static void
8782 elfNN_aarch64_create_small_pltn_entry (struct elf_link_hash_entry *h,
8783 struct elf_aarch64_link_hash_table
8784 *htab, bfd *output_bfd,
8785 struct bfd_link_info *info)
8786 {
8787 bfd_byte *plt_entry;
8788 bfd_vma plt_index;
8789 bfd_vma got_offset;
8790 bfd_vma gotplt_entry_address;
8791 bfd_vma plt_entry_address;
8792 Elf_Internal_Rela rela;
8793 bfd_byte *loc;
8794 asection *plt, *gotplt, *relplt;
8795
8796 /* When building a static executable, use .iplt, .igot.plt and
8797 .rela.iplt sections for STT_GNU_IFUNC symbols. */
8798 if (htab->root.splt != NULL)
8799 {
8800 plt = htab->root.splt;
8801 gotplt = htab->root.sgotplt;
8802 relplt = htab->root.srelplt;
8803 }
8804 else
8805 {
8806 plt = htab->root.iplt;
8807 gotplt = htab->root.igotplt;
8808 relplt = htab->root.irelplt;
8809 }
8810
8811 /* Get the index in the procedure linkage table which
8812 corresponds to this symbol. This is the index of this symbol
8813 in all the symbols for which we are making plt entries. The
8814 first entry in the procedure linkage table is reserved.
8815
8816 Get the offset into the .got table of the entry that
8817 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
8818 bytes. The first three are reserved for the dynamic linker.
8819
8820 For static executables, we don't reserve anything. */
8821
8822 if (plt == htab->root.splt)
8823 {
8824 plt_index = (h->plt.offset - htab->plt_header_size) / htab->plt_entry_size;
8825 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
8826 }
8827 else
8828 {
8829 plt_index = h->plt.offset / htab->plt_entry_size;
8830 got_offset = plt_index * GOT_ENTRY_SIZE;
8831 }
8832
8833 plt_entry = plt->contents + h->plt.offset;
8834 plt_entry_address = plt->output_section->vma
8835 + plt->output_offset + h->plt.offset;
8836 gotplt_entry_address = gotplt->output_section->vma +
8837 gotplt->output_offset + got_offset;
8838
8839 /* Copy in the boiler-plate for the PLTn entry. */
8840 memcpy (plt_entry, elfNN_aarch64_small_plt_entry, PLT_SMALL_ENTRY_SIZE);
8841
8842 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
8843 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
8844 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
8845 plt_entry,
8846 PG (gotplt_entry_address) -
8847 PG (plt_entry_address));
8848
8849 /* Fill in the lo12 bits for the load from the pltgot. */
8850 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
8851 plt_entry + 4,
8852 PG_OFFSET (gotplt_entry_address));
8853
8854 /* Fill in the lo12 bits for the add from the pltgot entry. */
8855 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
8856 plt_entry + 8,
8857 PG_OFFSET (gotplt_entry_address));
8858
8859 /* All the GOTPLT Entries are essentially initialized to PLT0. */
8860 bfd_put_NN (output_bfd,
8861 plt->output_section->vma + plt->output_offset,
8862 gotplt->contents + got_offset);
8863
8864 rela.r_offset = gotplt_entry_address;
8865
8866 if (h->dynindx == -1
8867 || ((bfd_link_executable (info)
8868 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
8869 && h->def_regular
8870 && h->type == STT_GNU_IFUNC))
8871 {
8872 /* If an STT_GNU_IFUNC symbol is locally defined, generate
8873 R_AARCH64_IRELATIVE instead of R_AARCH64_JUMP_SLOT. */
8874 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
8875 rela.r_addend = (h->root.u.def.value
8876 + h->root.u.def.section->output_section->vma
8877 + h->root.u.def.section->output_offset);
8878 }
8879 else
8880 {
8881 /* Fill in the entry in the .rela.plt section. */
8882 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (JUMP_SLOT));
8883 rela.r_addend = 0;
8884 }
8885
8886 /* Compute the relocation entry to used based on PLT index and do
8887 not adjust reloc_count. The reloc_count has already been adjusted
8888 to account for this entry. */
8889 loc = relplt->contents + plt_index * RELOC_SIZE (htab);
8890 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
8891 }
8892
8893 /* Size sections even though they're not dynamic. We use it to setup
8894 _TLS_MODULE_BASE_, if needed. */
8895
8896 static bfd_boolean
8897 elfNN_aarch64_always_size_sections (bfd *output_bfd,
8898 struct bfd_link_info *info)
8899 {
8900 asection *tls_sec;
8901
8902 if (bfd_link_relocatable (info))
8903 return TRUE;
8904
8905 tls_sec = elf_hash_table (info)->tls_sec;
8906
8907 if (tls_sec)
8908 {
8909 struct elf_link_hash_entry *tlsbase;
8910
8911 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
8912 "_TLS_MODULE_BASE_", TRUE, TRUE, FALSE);
8913
8914 if (tlsbase)
8915 {
8916 struct bfd_link_hash_entry *h = NULL;
8917 const struct elf_backend_data *bed =
8918 get_elf_backend_data (output_bfd);
8919
8920 if (!(_bfd_generic_link_add_one_symbol
8921 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
8922 tls_sec, 0, NULL, FALSE, bed->collect, &h)))
8923 return FALSE;
8924
8925 tlsbase->type = STT_TLS;
8926 tlsbase = (struct elf_link_hash_entry *) h;
8927 tlsbase->def_regular = 1;
8928 tlsbase->other = STV_HIDDEN;
8929 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
8930 }
8931 }
8932
8933 return TRUE;
8934 }
8935
8936 /* Finish up dynamic symbol handling. We set the contents of various
8937 dynamic sections here. */
8938
8939 static bfd_boolean
8940 elfNN_aarch64_finish_dynamic_symbol (bfd *output_bfd,
8941 struct bfd_link_info *info,
8942 struct elf_link_hash_entry *h,
8943 Elf_Internal_Sym *sym)
8944 {
8945 struct elf_aarch64_link_hash_table *htab;
8946 htab = elf_aarch64_hash_table (info);
8947
8948 if (h->plt.offset != (bfd_vma) - 1)
8949 {
8950 asection *plt, *gotplt, *relplt;
8951
8952 /* This symbol has an entry in the procedure linkage table. Set
8953 it up. */
8954
8955 /* When building a static executable, use .iplt, .igot.plt and
8956 .rela.iplt sections for STT_GNU_IFUNC symbols. */
8957 if (htab->root.splt != NULL)
8958 {
8959 plt = htab->root.splt;
8960 gotplt = htab->root.sgotplt;
8961 relplt = htab->root.srelplt;
8962 }
8963 else
8964 {
8965 plt = htab->root.iplt;
8966 gotplt = htab->root.igotplt;
8967 relplt = htab->root.irelplt;
8968 }
8969
8970 /* This symbol has an entry in the procedure linkage table. Set
8971 it up. */
8972 if ((h->dynindx == -1
8973 && !((h->forced_local || bfd_link_executable (info))
8974 && h->def_regular
8975 && h->type == STT_GNU_IFUNC))
8976 || plt == NULL
8977 || gotplt == NULL
8978 || relplt == NULL)
8979 return FALSE;
8980
8981 elfNN_aarch64_create_small_pltn_entry (h, htab, output_bfd, info);
8982 if (!h->def_regular)
8983 {
8984 /* Mark the symbol as undefined, rather than as defined in
8985 the .plt section. */
8986 sym->st_shndx = SHN_UNDEF;
8987 /* If the symbol is weak we need to clear the value.
8988 Otherwise, the PLT entry would provide a definition for
8989 the symbol even if the symbol wasn't defined anywhere,
8990 and so the symbol would never be NULL. Leave the value if
8991 there were any relocations where pointer equality matters
8992 (this is a clue for the dynamic linker, to make function
8993 pointer comparisons work between an application and shared
8994 library). */
8995 if (!h->ref_regular_nonweak || !h->pointer_equality_needed)
8996 sym->st_value = 0;
8997 }
8998 }
8999
9000 if (h->got.offset != (bfd_vma) - 1
9001 && elf_aarch64_hash_entry (h)->got_type == GOT_NORMAL)
9002 {
9003 Elf_Internal_Rela rela;
9004 bfd_byte *loc;
9005
9006 /* This symbol has an entry in the global offset table. Set it
9007 up. */
9008 if (htab->root.sgot == NULL || htab->root.srelgot == NULL)
9009 abort ();
9010
9011 rela.r_offset = (htab->root.sgot->output_section->vma
9012 + htab->root.sgot->output_offset
9013 + (h->got.offset & ~(bfd_vma) 1));
9014
9015 if (h->def_regular
9016 && h->type == STT_GNU_IFUNC)
9017 {
9018 if (bfd_link_pic (info))
9019 {
9020 /* Generate R_AARCH64_GLOB_DAT. */
9021 goto do_glob_dat;
9022 }
9023 else
9024 {
9025 asection *plt;
9026
9027 if (!h->pointer_equality_needed)
9028 abort ();
9029
9030 /* For non-shared object, we can't use .got.plt, which
9031 contains the real function address if we need pointer
9032 equality. We load the GOT entry with the PLT entry. */
9033 plt = htab->root.splt ? htab->root.splt : htab->root.iplt;
9034 bfd_put_NN (output_bfd, (plt->output_section->vma
9035 + plt->output_offset
9036 + h->plt.offset),
9037 htab->root.sgot->contents
9038 + (h->got.offset & ~(bfd_vma) 1));
9039 return TRUE;
9040 }
9041 }
9042 else if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
9043 {
9044 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
9045 return FALSE;
9046
9047 BFD_ASSERT ((h->got.offset & 1) != 0);
9048 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
9049 rela.r_addend = (h->root.u.def.value
9050 + h->root.u.def.section->output_section->vma
9051 + h->root.u.def.section->output_offset);
9052 }
9053 else
9054 {
9055 do_glob_dat:
9056 BFD_ASSERT ((h->got.offset & 1) == 0);
9057 bfd_put_NN (output_bfd, (bfd_vma) 0,
9058 htab->root.sgot->contents + h->got.offset);
9059 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (GLOB_DAT));
9060 rela.r_addend = 0;
9061 }
9062
9063 loc = htab->root.srelgot->contents;
9064 loc += htab->root.srelgot->reloc_count++ * RELOC_SIZE (htab);
9065 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
9066 }
9067
9068 if (h->needs_copy)
9069 {
9070 Elf_Internal_Rela rela;
9071 asection *s;
9072 bfd_byte *loc;
9073
9074 /* This symbol needs a copy reloc. Set it up. */
9075 if (h->dynindx == -1
9076 || (h->root.type != bfd_link_hash_defined
9077 && h->root.type != bfd_link_hash_defweak)
9078 || htab->root.srelbss == NULL)
9079 abort ();
9080
9081 rela.r_offset = (h->root.u.def.value
9082 + h->root.u.def.section->output_section->vma
9083 + h->root.u.def.section->output_offset);
9084 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (COPY));
9085 rela.r_addend = 0;
9086 if (h->root.u.def.section == htab->root.sdynrelro)
9087 s = htab->root.sreldynrelro;
9088 else
9089 s = htab->root.srelbss;
9090 loc = s->contents + s->reloc_count++ * RELOC_SIZE (htab);
9091 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
9092 }
9093
9094 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
9095 be NULL for local symbols. */
9096 if (sym != NULL
9097 && (h == elf_hash_table (info)->hdynamic
9098 || h == elf_hash_table (info)->hgot))
9099 sym->st_shndx = SHN_ABS;
9100
9101 return TRUE;
9102 }
9103
9104 /* Finish up local dynamic symbol handling. We set the contents of
9105 various dynamic sections here. */
9106
9107 static bfd_boolean
9108 elfNN_aarch64_finish_local_dynamic_symbol (void **slot, void *inf)
9109 {
9110 struct elf_link_hash_entry *h
9111 = (struct elf_link_hash_entry *) *slot;
9112 struct bfd_link_info *info
9113 = (struct bfd_link_info *) inf;
9114
9115 return elfNN_aarch64_finish_dynamic_symbol (info->output_bfd,
9116 info, h, NULL);
9117 }
9118
9119 static void
9120 elfNN_aarch64_init_small_plt0_entry (bfd *output_bfd ATTRIBUTE_UNUSED,
9121 struct elf_aarch64_link_hash_table
9122 *htab)
9123 {
9124 /* Fill in PLT0. Fixme:RR Note this doesn't distinguish between
9125 small and large plts and at the minute just generates
9126 the small PLT. */
9127
9128 /* PLT0 of the small PLT looks like this in ELF64 -
9129 stp x16, x30, [sp, #-16]! // Save the reloc and lr on stack.
9130 adrp x16, PLT_GOT + 16 // Get the page base of the GOTPLT
9131 ldr x17, [x16, #:lo12:PLT_GOT+16] // Load the address of the
9132 // symbol resolver
9133 add x16, x16, #:lo12:PLT_GOT+16 // Load the lo12 bits of the
9134 // GOTPLT entry for this.
9135 br x17
9136 PLT0 will be slightly different in ELF32 due to different got entry
9137 size. */
9138 bfd_vma plt_got_2nd_ent; /* Address of GOT[2]. */
9139 bfd_vma plt_base;
9140
9141
9142 memcpy (htab->root.splt->contents, elfNN_aarch64_small_plt0_entry,
9143 PLT_ENTRY_SIZE);
9144 elf_section_data (htab->root.splt->output_section)->this_hdr.sh_entsize =
9145 PLT_ENTRY_SIZE;
9146
9147 plt_got_2nd_ent = (htab->root.sgotplt->output_section->vma
9148 + htab->root.sgotplt->output_offset
9149 + GOT_ENTRY_SIZE * 2);
9150
9151 plt_base = htab->root.splt->output_section->vma +
9152 htab->root.splt->output_offset;
9153
9154 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
9155 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
9156 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9157 htab->root.splt->contents + 4,
9158 PG (plt_got_2nd_ent) - PG (plt_base + 4));
9159
9160 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
9161 htab->root.splt->contents + 8,
9162 PG_OFFSET (plt_got_2nd_ent));
9163
9164 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
9165 htab->root.splt->contents + 12,
9166 PG_OFFSET (plt_got_2nd_ent));
9167 }
9168
9169 static bfd_boolean
9170 elfNN_aarch64_finish_dynamic_sections (bfd *output_bfd,
9171 struct bfd_link_info *info)
9172 {
9173 struct elf_aarch64_link_hash_table *htab;
9174 bfd *dynobj;
9175 asection *sdyn;
9176
9177 htab = elf_aarch64_hash_table (info);
9178 dynobj = htab->root.dynobj;
9179 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
9180
9181 if (htab->root.dynamic_sections_created)
9182 {
9183 ElfNN_External_Dyn *dyncon, *dynconend;
9184
9185 if (sdyn == NULL || htab->root.sgot == NULL)
9186 abort ();
9187
9188 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
9189 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
9190 for (; dyncon < dynconend; dyncon++)
9191 {
9192 Elf_Internal_Dyn dyn;
9193 asection *s;
9194
9195 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
9196
9197 switch (dyn.d_tag)
9198 {
9199 default:
9200 continue;
9201
9202 case DT_PLTGOT:
9203 s = htab->root.sgotplt;
9204 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9205 break;
9206
9207 case DT_JMPREL:
9208 s = htab->root.srelplt;
9209 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9210 break;
9211
9212 case DT_PLTRELSZ:
9213 s = htab->root.srelplt;
9214 dyn.d_un.d_val = s->size;
9215 break;
9216
9217 case DT_TLSDESC_PLT:
9218 s = htab->root.splt;
9219 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9220 + htab->tlsdesc_plt;
9221 break;
9222
9223 case DT_TLSDESC_GOT:
9224 s = htab->root.sgot;
9225 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9226 + htab->dt_tlsdesc_got;
9227 break;
9228 }
9229
9230 bfd_elfNN_swap_dyn_out (output_bfd, &dyn, dyncon);
9231 }
9232
9233 }
9234
9235 /* Fill in the special first entry in the procedure linkage table. */
9236 if (htab->root.splt && htab->root.splt->size > 0)
9237 {
9238 elfNN_aarch64_init_small_plt0_entry (output_bfd, htab);
9239
9240 elf_section_data (htab->root.splt->output_section)->
9241 this_hdr.sh_entsize = htab->plt_entry_size;
9242
9243
9244 if (htab->tlsdesc_plt)
9245 {
9246 bfd_put_NN (output_bfd, (bfd_vma) 0,
9247 htab->root.sgot->contents + htab->dt_tlsdesc_got);
9248
9249 memcpy (htab->root.splt->contents + htab->tlsdesc_plt,
9250 elfNN_aarch64_tlsdesc_small_plt_entry,
9251 sizeof (elfNN_aarch64_tlsdesc_small_plt_entry));
9252
9253 {
9254 bfd_vma adrp1_addr =
9255 htab->root.splt->output_section->vma
9256 + htab->root.splt->output_offset + htab->tlsdesc_plt + 4;
9257
9258 bfd_vma adrp2_addr = adrp1_addr + 4;
9259
9260 bfd_vma got_addr =
9261 htab->root.sgot->output_section->vma
9262 + htab->root.sgot->output_offset;
9263
9264 bfd_vma pltgot_addr =
9265 htab->root.sgotplt->output_section->vma
9266 + htab->root.sgotplt->output_offset;
9267
9268 bfd_vma dt_tlsdesc_got = got_addr + htab->dt_tlsdesc_got;
9269
9270 bfd_byte *plt_entry =
9271 htab->root.splt->contents + htab->tlsdesc_plt;
9272
9273 /* adrp x2, DT_TLSDESC_GOT */
9274 elf_aarch64_update_plt_entry (output_bfd,
9275 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9276 plt_entry + 4,
9277 (PG (dt_tlsdesc_got)
9278 - PG (adrp1_addr)));
9279
9280 /* adrp x3, 0 */
9281 elf_aarch64_update_plt_entry (output_bfd,
9282 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9283 plt_entry + 8,
9284 (PG (pltgot_addr)
9285 - PG (adrp2_addr)));
9286
9287 /* ldr x2, [x2, #0] */
9288 elf_aarch64_update_plt_entry (output_bfd,
9289 BFD_RELOC_AARCH64_LDSTNN_LO12,
9290 plt_entry + 12,
9291 PG_OFFSET (dt_tlsdesc_got));
9292
9293 /* add x3, x3, 0 */
9294 elf_aarch64_update_plt_entry (output_bfd,
9295 BFD_RELOC_AARCH64_ADD_LO12,
9296 plt_entry + 16,
9297 PG_OFFSET (pltgot_addr));
9298 }
9299 }
9300 }
9301
9302 if (htab->root.sgotplt)
9303 {
9304 if (bfd_is_abs_section (htab->root.sgotplt->output_section))
9305 {
9306 _bfd_error_handler
9307 (_("discarded output section: `%A'"), htab->root.sgotplt);
9308 return FALSE;
9309 }
9310
9311 /* Fill in the first three entries in the global offset table. */
9312 if (htab->root.sgotplt->size > 0)
9313 {
9314 bfd_put_NN (output_bfd, (bfd_vma) 0, htab->root.sgotplt->contents);
9315
9316 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
9317 bfd_put_NN (output_bfd,
9318 (bfd_vma) 0,
9319 htab->root.sgotplt->contents + GOT_ENTRY_SIZE);
9320 bfd_put_NN (output_bfd,
9321 (bfd_vma) 0,
9322 htab->root.sgotplt->contents + GOT_ENTRY_SIZE * 2);
9323 }
9324
9325 if (htab->root.sgot)
9326 {
9327 if (htab->root.sgot->size > 0)
9328 {
9329 bfd_vma addr =
9330 sdyn ? sdyn->output_section->vma + sdyn->output_offset : 0;
9331 bfd_put_NN (output_bfd, addr, htab->root.sgot->contents);
9332 }
9333 }
9334
9335 elf_section_data (htab->root.sgotplt->output_section)->
9336 this_hdr.sh_entsize = GOT_ENTRY_SIZE;
9337 }
9338
9339 if (htab->root.sgot && htab->root.sgot->size > 0)
9340 elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize
9341 = GOT_ENTRY_SIZE;
9342
9343 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
9344 htab_traverse (htab->loc_hash_table,
9345 elfNN_aarch64_finish_local_dynamic_symbol,
9346 info);
9347
9348 return TRUE;
9349 }
9350
9351 /* Return address for Ith PLT stub in section PLT, for relocation REL
9352 or (bfd_vma) -1 if it should not be included. */
9353
9354 static bfd_vma
9355 elfNN_aarch64_plt_sym_val (bfd_vma i, const asection *plt,
9356 const arelent *rel ATTRIBUTE_UNUSED)
9357 {
9358 return plt->vma + PLT_ENTRY_SIZE + i * PLT_SMALL_ENTRY_SIZE;
9359 }
9360
9361 /* Returns TRUE if NAME is an AArch64 mapping symbol.
9362 The ARM ELF standard defines $x (for A64 code) and $d (for data).
9363 It also allows a period initiated suffix to be added to the symbol, ie:
9364 "$[adtx]\.[:sym_char]+". */
9365
9366 static bfd_boolean
9367 is_aarch64_mapping_symbol (const char * name)
9368 {
9369 return name != NULL /* Paranoia. */
9370 && name[0] == '$' /* Note: if objcopy --prefix-symbols has been used then
9371 the mapping symbols could have acquired a prefix.
9372 We do not support this here, since such symbols no
9373 longer conform to the ARM ELF ABI. */
9374 && (name[1] == 'd' || name[1] == 'x')
9375 && (name[2] == 0 || name[2] == '.');
9376 /* FIXME: Strictly speaking the symbol is only a valid mapping symbol if
9377 any characters that follow the period are legal characters for the body
9378 of a symbol's name. For now we just assume that this is the case. */
9379 }
9380
9381 /* Make sure that mapping symbols in object files are not removed via the
9382 "strip --strip-unneeded" tool. These symbols might needed in order to
9383 correctly generate linked files. Once an object file has been linked,
9384 it should be safe to remove them. */
9385
9386 static void
9387 elfNN_aarch64_backend_symbol_processing (bfd *abfd, asymbol *sym)
9388 {
9389 if (((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
9390 && sym->section != bfd_abs_section_ptr
9391 && is_aarch64_mapping_symbol (sym->name))
9392 sym->flags |= BSF_KEEP;
9393 }
9394
9395
9396 /* We use this so we can override certain functions
9397 (though currently we don't). */
9398
9399 const struct elf_size_info elfNN_aarch64_size_info =
9400 {
9401 sizeof (ElfNN_External_Ehdr),
9402 sizeof (ElfNN_External_Phdr),
9403 sizeof (ElfNN_External_Shdr),
9404 sizeof (ElfNN_External_Rel),
9405 sizeof (ElfNN_External_Rela),
9406 sizeof (ElfNN_External_Sym),
9407 sizeof (ElfNN_External_Dyn),
9408 sizeof (Elf_External_Note),
9409 4, /* Hash table entry size. */
9410 1, /* Internal relocs per external relocs. */
9411 ARCH_SIZE, /* Arch size. */
9412 LOG_FILE_ALIGN, /* Log_file_align. */
9413 ELFCLASSNN, EV_CURRENT,
9414 bfd_elfNN_write_out_phdrs,
9415 bfd_elfNN_write_shdrs_and_ehdr,
9416 bfd_elfNN_checksum_contents,
9417 bfd_elfNN_write_relocs,
9418 bfd_elfNN_swap_symbol_in,
9419 bfd_elfNN_swap_symbol_out,
9420 bfd_elfNN_slurp_reloc_table,
9421 bfd_elfNN_slurp_symbol_table,
9422 bfd_elfNN_swap_dyn_in,
9423 bfd_elfNN_swap_dyn_out,
9424 bfd_elfNN_swap_reloc_in,
9425 bfd_elfNN_swap_reloc_out,
9426 bfd_elfNN_swap_reloca_in,
9427 bfd_elfNN_swap_reloca_out
9428 };
9429
9430 #define ELF_ARCH bfd_arch_aarch64
9431 #define ELF_MACHINE_CODE EM_AARCH64
9432 #define ELF_MAXPAGESIZE 0x10000
9433 #define ELF_MINPAGESIZE 0x1000
9434 #define ELF_COMMONPAGESIZE 0x1000
9435
9436 #define bfd_elfNN_close_and_cleanup \
9437 elfNN_aarch64_close_and_cleanup
9438
9439 #define bfd_elfNN_bfd_free_cached_info \
9440 elfNN_aarch64_bfd_free_cached_info
9441
9442 #define bfd_elfNN_bfd_is_target_special_symbol \
9443 elfNN_aarch64_is_target_special_symbol
9444
9445 #define bfd_elfNN_bfd_link_hash_table_create \
9446 elfNN_aarch64_link_hash_table_create
9447
9448 #define bfd_elfNN_bfd_merge_private_bfd_data \
9449 elfNN_aarch64_merge_private_bfd_data
9450
9451 #define bfd_elfNN_bfd_print_private_bfd_data \
9452 elfNN_aarch64_print_private_bfd_data
9453
9454 #define bfd_elfNN_bfd_reloc_type_lookup \
9455 elfNN_aarch64_reloc_type_lookup
9456
9457 #define bfd_elfNN_bfd_reloc_name_lookup \
9458 elfNN_aarch64_reloc_name_lookup
9459
9460 #define bfd_elfNN_bfd_set_private_flags \
9461 elfNN_aarch64_set_private_flags
9462
9463 #define bfd_elfNN_find_inliner_info \
9464 elfNN_aarch64_find_inliner_info
9465
9466 #define bfd_elfNN_find_nearest_line \
9467 elfNN_aarch64_find_nearest_line
9468
9469 #define bfd_elfNN_mkobject \
9470 elfNN_aarch64_mkobject
9471
9472 #define bfd_elfNN_new_section_hook \
9473 elfNN_aarch64_new_section_hook
9474
9475 #define elf_backend_adjust_dynamic_symbol \
9476 elfNN_aarch64_adjust_dynamic_symbol
9477
9478 #define elf_backend_always_size_sections \
9479 elfNN_aarch64_always_size_sections
9480
9481 #define elf_backend_check_relocs \
9482 elfNN_aarch64_check_relocs
9483
9484 #define elf_backend_copy_indirect_symbol \
9485 elfNN_aarch64_copy_indirect_symbol
9486
9487 /* Create .dynbss, and .rela.bss sections in DYNOBJ, and set up shortcuts
9488 to them in our hash. */
9489 #define elf_backend_create_dynamic_sections \
9490 elfNN_aarch64_create_dynamic_sections
9491
9492 #define elf_backend_init_index_section \
9493 _bfd_elf_init_2_index_sections
9494
9495 #define elf_backend_finish_dynamic_sections \
9496 elfNN_aarch64_finish_dynamic_sections
9497
9498 #define elf_backend_finish_dynamic_symbol \
9499 elfNN_aarch64_finish_dynamic_symbol
9500
9501 #define elf_backend_gc_sweep_hook \
9502 elfNN_aarch64_gc_sweep_hook
9503
9504 #define elf_backend_object_p \
9505 elfNN_aarch64_object_p
9506
9507 #define elf_backend_output_arch_local_syms \
9508 elfNN_aarch64_output_arch_local_syms
9509
9510 #define elf_backend_plt_sym_val \
9511 elfNN_aarch64_plt_sym_val
9512
9513 #define elf_backend_post_process_headers \
9514 elfNN_aarch64_post_process_headers
9515
9516 #define elf_backend_relocate_section \
9517 elfNN_aarch64_relocate_section
9518
9519 #define elf_backend_reloc_type_class \
9520 elfNN_aarch64_reloc_type_class
9521
9522 #define elf_backend_section_from_shdr \
9523 elfNN_aarch64_section_from_shdr
9524
9525 #define elf_backend_size_dynamic_sections \
9526 elfNN_aarch64_size_dynamic_sections
9527
9528 #define elf_backend_size_info \
9529 elfNN_aarch64_size_info
9530
9531 #define elf_backend_write_section \
9532 elfNN_aarch64_write_section
9533
9534 #define elf_backend_symbol_processing \
9535 elfNN_aarch64_backend_symbol_processing
9536
9537 #define elf_backend_can_refcount 1
9538 #define elf_backend_can_gc_sections 1
9539 #define elf_backend_plt_readonly 1
9540 #define elf_backend_want_got_plt 1
9541 #define elf_backend_want_plt_sym 0
9542 #define elf_backend_want_dynrelro 1
9543 #define elf_backend_may_use_rel_p 0
9544 #define elf_backend_may_use_rela_p 1
9545 #define elf_backend_default_use_rela_p 1
9546 #define elf_backend_rela_normal 1
9547 #define elf_backend_dtrel_excludes_plt 1
9548 #define elf_backend_got_header_size (GOT_ENTRY_SIZE * 3)
9549 #define elf_backend_default_execstack 0
9550 #define elf_backend_extern_protected_data 1
9551 #define elf_backend_hash_symbol elf_aarch64_hash_symbol
9552
9553 #undef elf_backend_obj_attrs_section
9554 #define elf_backend_obj_attrs_section ".ARM.attributes"
9555
9556 #include "elfNN-target.h"
9557
9558 /* CloudABI support. */
9559
9560 #undef TARGET_LITTLE_SYM
9561 #define TARGET_LITTLE_SYM aarch64_elfNN_le_cloudabi_vec
9562 #undef TARGET_LITTLE_NAME
9563 #define TARGET_LITTLE_NAME "elfNN-littleaarch64-cloudabi"
9564 #undef TARGET_BIG_SYM
9565 #define TARGET_BIG_SYM aarch64_elfNN_be_cloudabi_vec
9566 #undef TARGET_BIG_NAME
9567 #define TARGET_BIG_NAME "elfNN-bigaarch64-cloudabi"
9568
9569 #undef ELF_OSABI
9570 #define ELF_OSABI ELFOSABI_CLOUDABI
9571
9572 #undef elfNN_bed
9573 #define elfNN_bed elfNN_aarch64_cloudabi_bed
9574
9575 #include "elfNN-target.h"
GDB Binutils - Deliverables
This page took 0.233097 seconds and 5 git commands to generate.