xref: /netbsd-src/external/gpl3/binutils.old/dist/bfd/elfxx-aarch64.c (revision a04395531661c5e8d314125d5ae77d4cbedd5d73)
1 /* AArch64-specific support for 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 #include "sysdep.h"
22 #include "elfxx-aarch64.h"
23 #include <stdarg.h>
24 #include <string.h>
25 
26 #define MASK(n) ((1u << (n)) - 1)
27 
28 /* Sign-extend VALUE, which has the indicated number of BITS.  */
29 
30 bfd_signed_vma
31 _bfd_aarch64_sign_extend (bfd_vma value, int bits)
32 {
33   if (value & ((bfd_vma) 1 << (bits - 1)))
34     /* VALUE is negative.  */
35     value |= ((bfd_vma) - 1) << bits;
36 
37   return value;
38 }
39 
40 /* Decode the IMM field of ADRP.  */
41 
42 uint32_t
43 _bfd_aarch64_decode_adrp_imm (uint32_t insn)
44 {
45   return (((insn >> 5) & MASK (19)) << 2) | ((insn >> 29) & MASK (2));
46 }
47 
48 /* Reencode the imm field of add immediate.  */
49 static inline uint32_t
50 reencode_add_imm (uint32_t insn, uint32_t imm)
51 {
52   return (insn & ~(MASK (12) << 10)) | ((imm & MASK (12)) << 10);
53 }
54 
55 /* Reencode the IMM field of ADR.  */
56 
57 uint32_t
58 _bfd_aarch64_reencode_adr_imm (uint32_t insn, uint32_t imm)
59 {
60   return (insn & ~((MASK (2) << 29) | (MASK (19) << 5)))
61     | ((imm & MASK (2)) << 29) | ((imm & (MASK (19) << 2)) << 3);
62 }
63 
64 /* Reencode the imm field of ld/st pos immediate.  */
65 static inline uint32_t
66 reencode_ldst_pos_imm (uint32_t insn, uint32_t imm)
67 {
68   return (insn & ~(MASK (12) << 10)) | ((imm & MASK (12)) << 10);
69 }
70 
71 /* Encode the 26-bit offset of unconditional branch.  */
72 static inline uint32_t
73 reencode_branch_ofs_26 (uint32_t insn, uint32_t ofs)
74 {
75   return (insn & ~MASK (26)) | (ofs & MASK (26));
76 }
77 
78 /* Encode the 19-bit offset of conditional branch and compare & branch.  */
79 static inline uint32_t
80 reencode_cond_branch_ofs_19 (uint32_t insn, uint32_t ofs)
81 {
82   return (insn & ~(MASK (19) << 5)) | ((ofs & MASK (19)) << 5);
83 }
84 
85 /* Decode the 19-bit offset of load literal.  */
86 static inline uint32_t
87 reencode_ld_lit_ofs_19 (uint32_t insn, uint32_t ofs)
88 {
89   return (insn & ~(MASK (19) << 5)) | ((ofs & MASK (19)) << 5);
90 }
91 
92 /* Encode the 14-bit offset of test & branch.  */
93 static inline uint32_t
94 reencode_tst_branch_ofs_14 (uint32_t insn, uint32_t ofs)
95 {
96   return (insn & ~(MASK (14) << 5)) | ((ofs & MASK (14)) << 5);
97 }
98 
99 /* Reencode the imm field of move wide.  */
100 static inline uint32_t
101 reencode_movw_imm (uint32_t insn, uint32_t imm)
102 {
103   return (insn & ~(MASK (16) << 5)) | ((imm & MASK (16)) << 5);
104 }
105 
106 /* Reencode mov[zn] to movz.  */
107 static inline uint32_t
108 reencode_movzn_to_movz (uint32_t opcode)
109 {
110   return opcode | (1 << 30);
111 }
112 
113 /* Reencode mov[zn] to movn.  */
114 static inline uint32_t
115 reencode_movzn_to_movn (uint32_t opcode)
116 {
117   return opcode & ~(1 << 30);
118 }
119 
120 /* Return non-zero if the indicated VALUE has overflowed the maximum
121    range expressible by a unsigned number with the indicated number of
122    BITS.  */
123 
124 static bfd_reloc_status_type
125 aarch64_unsigned_overflow (bfd_vma value, unsigned int bits)
126 {
127   bfd_vma lim;
128   if (bits >= sizeof (bfd_vma) * 8)
129     return bfd_reloc_ok;
130   lim = (bfd_vma) 1 << bits;
131   if (value >= lim)
132     return bfd_reloc_overflow;
133   return bfd_reloc_ok;
134 }
135 
136 /* Return non-zero if the indicated VALUE has overflowed the maximum
137    range expressible by an signed number with the indicated number of
138    BITS.  */
139 
140 static bfd_reloc_status_type
141 aarch64_signed_overflow (bfd_vma value, unsigned int bits)
142 {
143   bfd_signed_vma svalue = (bfd_signed_vma) value;
144   bfd_signed_vma lim;
145 
146   if (bits >= sizeof (bfd_vma) * 8)
147     return bfd_reloc_ok;
148   lim = (bfd_signed_vma) 1 << (bits - 1);
149   if (svalue < -lim || svalue >= lim)
150     return bfd_reloc_overflow;
151   return bfd_reloc_ok;
152 }
153 
154 /* Insert the addend/value into the instruction or data object being
155    relocated.  */
156 bfd_reloc_status_type
157 _bfd_aarch64_elf_put_addend (bfd *abfd,
158 			     bfd_byte *address, bfd_reloc_code_real_type r_type,
159 			     reloc_howto_type *howto, bfd_signed_vma addend)
160 {
161   bfd_reloc_status_type status = bfd_reloc_ok;
162   bfd_signed_vma old_addend = addend;
163   bfd_vma contents;
164   int size;
165 
166   size = bfd_get_reloc_size (howto);
167   switch (size)
168     {
169     case 0:
170       return status;
171     case 2:
172       contents = bfd_get_16 (abfd, address);
173       break;
174     case 4:
175       if (howto->src_mask != 0xffffffff)
176 	/* Must be 32-bit instruction, always little-endian.  */
177 	contents = bfd_getl32 (address);
178       else
179 	/* Must be 32-bit data (endianness dependent).  */
180 	contents = bfd_get_32 (abfd, address);
181       break;
182     case 8:
183       contents = bfd_get_64 (abfd, address);
184       break;
185     default:
186       abort ();
187     }
188 
189   switch (howto->complain_on_overflow)
190     {
191     case complain_overflow_dont:
192       break;
193     case complain_overflow_signed:
194       status = aarch64_signed_overflow (addend,
195 					howto->bitsize + howto->rightshift);
196       break;
197     case complain_overflow_unsigned:
198       status = aarch64_unsigned_overflow (addend,
199 					  howto->bitsize + howto->rightshift);
200       break;
201     case complain_overflow_bitfield:
202     default:
203       abort ();
204     }
205 
206   addend >>= howto->rightshift;
207 
208   switch (r_type)
209     {
210     case BFD_RELOC_AARCH64_CALL26:
211     case BFD_RELOC_AARCH64_JUMP26:
212       contents = reencode_branch_ofs_26 (contents, addend);
213       break;
214 
215     case BFD_RELOC_AARCH64_BRANCH19:
216       contents = reencode_cond_branch_ofs_19 (contents, addend);
217       break;
218 
219     case BFD_RELOC_AARCH64_TSTBR14:
220       contents = reencode_tst_branch_ofs_14 (contents, addend);
221       break;
222 
223     case BFD_RELOC_AARCH64_GOT_LD_PREL19:
224     case BFD_RELOC_AARCH64_LD_LO19_PCREL:
225     case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
226     case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
227       if (old_addend & ((1 << howto->rightshift) - 1))
228 	return bfd_reloc_overflow;
229       contents = reencode_ld_lit_ofs_19 (contents, addend);
230       break;
231 
232     case BFD_RELOC_AARCH64_TLSDESC_CALL:
233       break;
234 
235     case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
236     case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
237     case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
238     case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
239     case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
240     case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
241     case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
242     case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
243     case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
244     case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
245     case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
246       contents = _bfd_aarch64_reencode_adr_imm (contents, addend);
247       break;
248 
249     case BFD_RELOC_AARCH64_ADD_LO12:
250     case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
251     case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
252     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
253     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
254     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
255     case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
256     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
257     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
258     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
259       /* Corresponds to: add rd, rn, #uimm12 to provide the low order
260 	 12 bits of the page offset following
261 	 BFD_RELOC_AARCH64_ADR_HI21_PCREL which computes the
262 	 (pc-relative) page base.  */
263       contents = reencode_add_imm (contents, addend);
264       break;
265 
266     case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
267     case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
268     case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
269     case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
270     case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
271     case BFD_RELOC_AARCH64_LDST128_LO12:
272     case BFD_RELOC_AARCH64_LDST16_LO12:
273     case BFD_RELOC_AARCH64_LDST32_LO12:
274     case BFD_RELOC_AARCH64_LDST64_LO12:
275     case BFD_RELOC_AARCH64_LDST8_LO12:
276     case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
277     case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
278     case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
279     case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
280     case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
281     case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
282     case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
283     case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
284     case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
285     case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
286     case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
287     case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
288     case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12:
289     case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC:
290     case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12:
291     case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC:
292     case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12:
293     case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC:
294     case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12:
295     case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC:
296       if (old_addend & ((1 << howto->rightshift) - 1))
297 	return bfd_reloc_overflow;
298       /* Used for ldr*|str* rt, [rn, #uimm12] to provide the low order
299 	 12 bits address offset.  */
300       contents = reencode_ldst_pos_imm (contents, addend);
301       break;
302 
303       /* Group relocations to create high bits of a 16, 32, 48 or 64
304 	 bit signed data or abs address inline. Will change
305 	 instruction to MOVN or MOVZ depending on sign of calculated
306 	 value.  */
307 
308     case BFD_RELOC_AARCH64_MOVW_G0_S:
309     case BFD_RELOC_AARCH64_MOVW_G1_S:
310     case BFD_RELOC_AARCH64_MOVW_G2_S:
311     case BFD_RELOC_AARCH64_MOVW_PREL_G0:
312     case BFD_RELOC_AARCH64_MOVW_PREL_G1:
313     case BFD_RELOC_AARCH64_MOVW_PREL_G2:
314     case BFD_RELOC_AARCH64_MOVW_PREL_G3:
315     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
316     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
317     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
318     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
319     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
320     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
321       /* NOTE: We can only come here with movz or movn.  */
322       if (addend < 0)
323 	{
324 	  /* Force use of MOVN.  */
325 	  addend = ~addend;
326 	  contents = reencode_movzn_to_movn (contents);
327 	}
328       else
329 	{
330 	  /* Force use of MOVZ.  */
331 	  contents = reencode_movzn_to_movz (contents);
332 	}
333       /* Fall through.  */
334 
335       /* Group relocations to create a 16, 32, 48 or 64 bit unsigned
336 	 data or abs address inline.  */
337 
338     case BFD_RELOC_AARCH64_MOVW_G0:
339     case BFD_RELOC_AARCH64_MOVW_G0_NC:
340     case BFD_RELOC_AARCH64_MOVW_G1:
341     case BFD_RELOC_AARCH64_MOVW_G1_NC:
342     case BFD_RELOC_AARCH64_MOVW_G2:
343     case BFD_RELOC_AARCH64_MOVW_G2_NC:
344     case BFD_RELOC_AARCH64_MOVW_G3:
345     case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
346     case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
347     case BFD_RELOC_AARCH64_MOVW_PREL_G0_NC:
348     case BFD_RELOC_AARCH64_MOVW_PREL_G1_NC:
349     case BFD_RELOC_AARCH64_MOVW_PREL_G2_NC:
350     case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
351     case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
352     case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
353     case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
354     case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
355     case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
356     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
357     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
358     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
359     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
360       contents = reencode_movw_imm (contents, addend);
361       break;
362 
363     default:
364       /* Repack simple data */
365       if (howto->dst_mask & (howto->dst_mask + 1))
366 	return bfd_reloc_notsupported;
367 
368       contents = ((contents & ~howto->dst_mask) | (addend & howto->dst_mask));
369       break;
370     }
371 
372   switch (size)
373     {
374     case 2:
375       bfd_put_16 (abfd, contents, address);
376       break;
377     case 4:
378       if (howto->dst_mask != 0xffffffff)
379 	/* must be 32-bit instruction, always little-endian */
380 	bfd_putl32 (contents, address);
381       else
382 	/* must be 32-bit data (endianness dependent) */
383 	bfd_put_32 (abfd, contents, address);
384       break;
385     case 8:
386       bfd_put_64 (abfd, contents, address);
387       break;
388     default:
389       abort ();
390     }
391 
392   return status;
393 }
394 
395 bfd_vma
396 _bfd_aarch64_elf_resolve_relocation (bfd_reloc_code_real_type r_type,
397 				     bfd_vma place, bfd_vma value,
398 				     bfd_vma addend, bfd_boolean weak_undef_p)
399 {
400   switch (r_type)
401     {
402     case BFD_RELOC_AARCH64_NONE:
403     case BFD_RELOC_AARCH64_TLSDESC_CALL:
404       break;
405 
406     case BFD_RELOC_AARCH64_16_PCREL:
407     case BFD_RELOC_AARCH64_32_PCREL:
408     case BFD_RELOC_AARCH64_64_PCREL:
409     case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
410     case BFD_RELOC_AARCH64_BRANCH19:
411     case BFD_RELOC_AARCH64_LD_LO19_PCREL:
412     case BFD_RELOC_AARCH64_MOVW_PREL_G0:
413     case BFD_RELOC_AARCH64_MOVW_PREL_G0_NC:
414     case BFD_RELOC_AARCH64_MOVW_PREL_G1:
415     case BFD_RELOC_AARCH64_MOVW_PREL_G1_NC:
416     case BFD_RELOC_AARCH64_MOVW_PREL_G2:
417     case BFD_RELOC_AARCH64_MOVW_PREL_G2_NC:
418     case BFD_RELOC_AARCH64_MOVW_PREL_G3:
419     case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
420     case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
421     case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
422     case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
423     case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
424     case BFD_RELOC_AARCH64_TSTBR14:
425       if (weak_undef_p)
426 	value = place;
427       value = value + addend - place;
428       break;
429 
430     case BFD_RELOC_AARCH64_CALL26:
431     case BFD_RELOC_AARCH64_JUMP26:
432       value = value + addend - place;
433       break;
434 
435     case BFD_RELOC_AARCH64_16:
436     case BFD_RELOC_AARCH64_32:
437     case BFD_RELOC_AARCH64_MOVW_G0:
438     case BFD_RELOC_AARCH64_MOVW_G0_NC:
439     case BFD_RELOC_AARCH64_MOVW_G0_S:
440     case BFD_RELOC_AARCH64_MOVW_G1:
441     case BFD_RELOC_AARCH64_MOVW_G1_NC:
442     case BFD_RELOC_AARCH64_MOVW_G1_S:
443     case BFD_RELOC_AARCH64_MOVW_G2:
444     case BFD_RELOC_AARCH64_MOVW_G2_NC:
445     case BFD_RELOC_AARCH64_MOVW_G2_S:
446     case BFD_RELOC_AARCH64_MOVW_G3:
447     case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
448     case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
449     case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
450     case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
451     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
452     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
453     case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
454     case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
455     case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
456     case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
457     case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
458     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
459     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
460     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
461     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
462     case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
463     case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12:
464     case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12:
465     case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12:
466     case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12:
467       value = value + addend;
468       break;
469 
470     case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
471     case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
472       if (weak_undef_p)
473 	value = PG (place);
474       value = PG (value + addend) - PG (place);
475       break;
476 
477     case BFD_RELOC_AARCH64_GOT_LD_PREL19:
478       value = value + addend - place;
479       break;
480 
481     case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
482     case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
483     case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
484     case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
485     case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
486       value = PG (value + addend) - PG (place);
487       break;
488 
489     /* Caller must make sure addend is the base address of .got section.  */
490     case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
491     case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
492       addend = PG (addend);
493       /* Fall through.  */
494     case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
495     case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
496     case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
497       value = value - addend;
498       break;
499 
500     case BFD_RELOC_AARCH64_ADD_LO12:
501     case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
502     case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
503     case BFD_RELOC_AARCH64_LDST128_LO12:
504     case BFD_RELOC_AARCH64_LDST16_LO12:
505     case BFD_RELOC_AARCH64_LDST32_LO12:
506     case BFD_RELOC_AARCH64_LDST64_LO12:
507     case BFD_RELOC_AARCH64_LDST8_LO12:
508     case BFD_RELOC_AARCH64_TLSDESC_ADD:
509     case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
510     case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
511     case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
512     case BFD_RELOC_AARCH64_TLSDESC_LDR:
513     case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
514     case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
515     case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
516     case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
517     case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
518     case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
519     case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
520     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
521     case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC:
522     case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC:
523     case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC:
524     case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC:
525       value = PG_OFFSET (value + addend);
526       break;
527 
528     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
529       value = value + addend;
530       break;
531 
532     case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
533     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
534     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
535       value = (value + addend) & (bfd_vma) 0xffff0000;
536       break;
537     case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
538       /* Mask off low 12bits, keep all other high bits, so that the later
539 	 generic code could check whehter there is overflow.  */
540       value = (value + addend) & ~(bfd_vma) 0xfff;
541       break;
542 
543     case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
544     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
545     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
546       value = (value + addend) & (bfd_vma) 0xffff;
547       break;
548 
549     case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
550       value = (value + addend) & ~(bfd_vma) 0xffffffff;
551       value -= place & ~(bfd_vma) 0xffffffff;
552       break;
553 
554     default:
555       break;
556     }
557 
558   return value;
559 }
560 
561 /* Support for core dump NOTE sections.  */
562 
563 bfd_boolean
564 _bfd_aarch64_elf_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
565 {
566   int offset;
567   size_t size;
568 
569   switch (note->descsz)
570     {
571       default:
572 	return FALSE;
573 
574       case 392:		/* sizeof(struct elf_prstatus) on Linux/arm64.  */
575 	/* pr_cursig */
576 	elf_tdata (abfd)->core->signal
577 	  = bfd_get_16 (abfd, note->descdata + 12);
578 
579 	/* pr_pid */
580 	elf_tdata (abfd)->core->lwpid
581 	  = bfd_get_32 (abfd, note->descdata + 32);
582 
583 	/* pr_reg */
584 	offset = 112;
585 	size = 272;
586 
587 	break;
588     }
589 
590   /* Make a ".reg/999" section.  */
591   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
592 					  size, note->descpos + offset);
593 }
594 
595 bfd_boolean
596 _bfd_aarch64_elf_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
597 {
598   switch (note->descsz)
599     {
600     default:
601       return FALSE;
602 
603     case 136:	     /* This is sizeof(struct elf_prpsinfo) on Linux/aarch64.  */
604       elf_tdata (abfd)->core->pid = bfd_get_32 (abfd, note->descdata + 24);
605       elf_tdata (abfd)->core->program
606 	= _bfd_elfcore_strndup (abfd, note->descdata + 40, 16);
607       elf_tdata (abfd)->core->command
608 	= _bfd_elfcore_strndup (abfd, note->descdata + 56, 80);
609     }
610 
611   /* Note that for some reason, a spurious space is tacked
612      onto the end of the args in some (at least one anyway)
613      implementations, so strip it off if it exists.  */
614 
615   {
616     char *command = elf_tdata (abfd)->core->command;
617     int n = strlen (command);
618 
619     if (0 < n && command[n - 1] == ' ')
620       command[n - 1] = '\0';
621   }
622 
623   return TRUE;
624 }
625 
626 char *
627 _bfd_aarch64_elf_write_core_note (bfd *abfd, char *buf, int *bufsiz, int note_type,
628 				  ...)
629 {
630   switch (note_type)
631     {
632     default:
633       return NULL;
634 
635     case NT_PRPSINFO:
636       {
637 	char data[136] ATTRIBUTE_NONSTRING;
638 	va_list ap;
639 
640 	va_start (ap, note_type);
641 	memset (data, 0, sizeof (data));
642 	strncpy (data + 40, va_arg (ap, const char *), 16);
643 #if GCC_VERSION == 8001
644 	DIAGNOSTIC_PUSH;
645 	/* GCC 8.1 warns about 80 equals destination size with
646 	   -Wstringop-truncation:
647 	   https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85643
648 	 */
649 	DIAGNOSTIC_IGNORE_STRINGOP_TRUNCATION;
650 #endif
651 	strncpy (data + 56, va_arg (ap, const char *), 80);
652 #if GCC_VERSION == 8001
653 	DIAGNOSTIC_POP;
654 #endif
655 	va_end (ap);
656 
657 	return elfcore_write_note (abfd, buf, bufsiz, "CORE",
658 				   note_type, data, sizeof (data));
659       }
660 
661     case NT_PRSTATUS:
662       {
663 	char data[392];
664 	va_list ap;
665 	long pid;
666 	int cursig;
667 	const void *greg;
668 
669 	va_start (ap, note_type);
670 	memset (data, 0, sizeof (data));
671 	pid = va_arg (ap, long);
672 	bfd_put_32 (abfd, pid, data + 32);
673 	cursig = va_arg (ap, int);
674 	bfd_put_16 (abfd, cursig, data + 12);
675 	greg = va_arg (ap, const void *);
676 	memcpy (data + 112, greg, 272);
677 	va_end (ap);
678 
679 	return elfcore_write_note (abfd, buf, bufsiz, "CORE",
680 				   note_type, data, sizeof (data));
681       }
682     }
683 }
684