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