projects / binutils-gdb.git / blob
? search:


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