projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
*** empty log message ***
[deliverable/binutils-gdb.git] / bfd / elf32-arm.c
CommitLineData
252b5132 1/* 32-bit ELF support for ARM
e44a2c9c
AM		 2 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
3 2008 Free Software Foundation, Inc.
252b5132
RH		 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
cd123cb7 9 the Free Software Foundation; either version 3 of the License, or
252b5132
RH		 10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
cd123cb7
NC		 19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
252b5132 21
7f266840 22#include "sysdep.h"
3db64b00 23#include "bfd.h"
00a97672 24#include "libiberty.h"
7f266840
DJ		 25#include "libbfd.h"
26#include "elf-bfd.h"
00a97672 27#include "elf-vxworks.h"
ee065d83 28#include "elf/arm.h"
7f266840 29
00a97672
RS		 30/* Return the relocation section associated with NAME. HTAB is the
31 bfd's elf32_arm_link_hash_entry. */
32#define RELOC_SECTION(HTAB, NAME) \
33 ((HTAB)->use_rel ? ".rel" NAME : ".rela" NAME)
34
35/* Return size of a relocation entry. HTAB is the bfd's
36 elf32_arm_link_hash_entry. */
37#define RELOC_SIZE(HTAB) \
38 ((HTAB)->use_rel \
39 ? sizeof (Elf32_External_Rel) \
40 : sizeof (Elf32_External_Rela))
41
42/* Return function to swap relocations in. HTAB is the bfd's
43 elf32_arm_link_hash_entry. */
44#define SWAP_RELOC_IN(HTAB) \
45 ((HTAB)->use_rel \
46 ? bfd_elf32_swap_reloc_in \
47 : bfd_elf32_swap_reloca_in)
48
49/* Return function to swap relocations out. HTAB is the bfd's
50 elf32_arm_link_hash_entry. */
51#define SWAP_RELOC_OUT(HTAB) \
52 ((HTAB)->use_rel \
53 ? bfd_elf32_swap_reloc_out \
54 : bfd_elf32_swap_reloca_out)
55
7f266840
DJ		 56#define elf_info_to_howto 0
57#define elf_info_to_howto_rel elf32_arm_info_to_howto
58
59#define ARM_ELF_ABI_VERSION 0
60#define ARM_ELF_OS_ABI_VERSION ELFOSABI_ARM
61
24718e3b 62static struct elf_backend_data elf32_arm_vxworks_bed;
00a97672 63
7f266840
DJ		 64/* Note: code such as elf32_arm_reloc_type_lookup expect to use e.g.
65 R_ARM_PC24 as an index into this, and find the R_ARM_PC24 HOWTO
66 in that slot. */
67
c19d1205 68static reloc_howto_type elf32_arm_howto_table_1[] =
7f266840 69{
8029a119 70 /* No relocation. */
7f266840
DJ		 71 HOWTO (R_ARM_NONE, /* type */
72 0, /* rightshift */
73 0, /* size (0 = byte, 1 = short, 2 = long) */
74 0, /* bitsize */
75 FALSE, /* pc_relative */
76 0, /* bitpos */
77 complain_overflow_dont,/* complain_on_overflow */
78 bfd_elf_generic_reloc, /* special_function */
79 "R_ARM_NONE", /* name */
80 FALSE, /* partial_inplace */
81 0, /* src_mask */
82 0, /* dst_mask */
83 FALSE), /* pcrel_offset */
84
85 HOWTO (R_ARM_PC24, /* type */
86 2, /* rightshift */
87 2, /* size (0 = byte, 1 = short, 2 = long) */
88 24, /* bitsize */
89 TRUE, /* pc_relative */
90 0, /* bitpos */
91 complain_overflow_signed,/* complain_on_overflow */
92 bfd_elf_generic_reloc, /* special_function */
93 "R_ARM_PC24", /* name */
94 FALSE, /* partial_inplace */
95 0x00ffffff, /* src_mask */
96 0x00ffffff, /* dst_mask */
97 TRUE), /* pcrel_offset */
98
99 /* 32 bit absolute */
100 HOWTO (R_ARM_ABS32, /* type */
101 0, /* rightshift */
102 2, /* size (0 = byte, 1 = short, 2 = long) */
103 32, /* bitsize */
104 FALSE, /* pc_relative */
105 0, /* bitpos */
106 complain_overflow_bitfield,/* complain_on_overflow */
107 bfd_elf_generic_reloc, /* special_function */
108 "R_ARM_ABS32", /* name */
109 FALSE, /* partial_inplace */
110 0xffffffff, /* src_mask */
111 0xffffffff, /* dst_mask */
112 FALSE), /* pcrel_offset */
113
114 /* standard 32bit pc-relative reloc */
115 HOWTO (R_ARM_REL32, /* type */
116 0, /* rightshift */
117 2, /* size (0 = byte, 1 = short, 2 = long) */
118 32, /* bitsize */
119 TRUE, /* pc_relative */
120 0, /* bitpos */
121 complain_overflow_bitfield,/* complain_on_overflow */
122 bfd_elf_generic_reloc, /* special_function */
123 "R_ARM_REL32", /* name */
124 FALSE, /* partial_inplace */
125 0xffffffff, /* src_mask */
126 0xffffffff, /* dst_mask */
127 TRUE), /* pcrel_offset */
128
c19d1205 129 /* 8 bit absolute - R_ARM_LDR_PC_G0 in AAELF */
4962c51a 130 HOWTO (R_ARM_LDR_PC_G0, /* type */
7f266840
DJ		 131 0, /* rightshift */
132 0, /* size (0 = byte, 1 = short, 2 = long) */
4962c51a
MS		 133 32, /* bitsize */
134 TRUE, /* pc_relative */
7f266840 135 0, /* bitpos */
4962c51a 136 complain_overflow_dont,/* complain_on_overflow */
7f266840 137 bfd_elf_generic_reloc, /* special_function */
4962c51a 138 "R_ARM_LDR_PC_G0", /* name */
7f266840 139 FALSE, /* partial_inplace */
4962c51a
MS		 140 0xffffffff, /* src_mask */
141 0xffffffff, /* dst_mask */
142 TRUE), /* pcrel_offset */
7f266840
DJ		 143
144 /* 16 bit absolute */
145 HOWTO (R_ARM_ABS16, /* type */
146 0, /* rightshift */
147 1, /* size (0 = byte, 1 = short, 2 = long) */
148 16, /* bitsize */
149 FALSE, /* pc_relative */
150 0, /* bitpos */
151 complain_overflow_bitfield,/* complain_on_overflow */
152 bfd_elf_generic_reloc, /* special_function */
153 "R_ARM_ABS16", /* name */
154 FALSE, /* partial_inplace */
155 0x0000ffff, /* src_mask */
156 0x0000ffff, /* dst_mask */
157 FALSE), /* pcrel_offset */
158
159 /* 12 bit absolute */
160 HOWTO (R_ARM_ABS12, /* type */
161 0, /* rightshift */
162 2, /* size (0 = byte, 1 = short, 2 = long) */
163 12, /* bitsize */
164 FALSE, /* pc_relative */
165 0, /* bitpos */
166 complain_overflow_bitfield,/* complain_on_overflow */
167 bfd_elf_generic_reloc, /* special_function */
168 "R_ARM_ABS12", /* name */
169 FALSE, /* partial_inplace */
00a97672
RS		 170 0x00000fff, /* src_mask */
171 0x00000fff, /* dst_mask */
7f266840
DJ		 172 FALSE), /* pcrel_offset */
173
174 HOWTO (R_ARM_THM_ABS5, /* type */
175 6, /* rightshift */
176 1, /* size (0 = byte, 1 = short, 2 = long) */
177 5, /* bitsize */
178 FALSE, /* pc_relative */
179 0, /* bitpos */
180 complain_overflow_bitfield,/* complain_on_overflow */
181 bfd_elf_generic_reloc, /* special_function */
182 "R_ARM_THM_ABS5", /* name */
183 FALSE, /* partial_inplace */
184 0x000007e0, /* src_mask */
185 0x000007e0, /* dst_mask */
186 FALSE), /* pcrel_offset */
187
188 /* 8 bit absolute */
189 HOWTO (R_ARM_ABS8, /* type */
190 0, /* rightshift */
191 0, /* size (0 = byte, 1 = short, 2 = long) */
192 8, /* bitsize */
193 FALSE, /* pc_relative */
194 0, /* bitpos */
195 complain_overflow_bitfield,/* complain_on_overflow */
196 bfd_elf_generic_reloc, /* special_function */
197 "R_ARM_ABS8", /* name */
198 FALSE, /* partial_inplace */
199 0x000000ff, /* src_mask */
200 0x000000ff, /* dst_mask */
201 FALSE), /* pcrel_offset */
202
203 HOWTO (R_ARM_SBREL32, /* type */
204 0, /* rightshift */
205 2, /* size (0 = byte, 1 = short, 2 = long) */
206 32, /* bitsize */
207 FALSE, /* pc_relative */
208 0, /* bitpos */
209 complain_overflow_dont,/* complain_on_overflow */
210 bfd_elf_generic_reloc, /* special_function */
211 "R_ARM_SBREL32", /* name */
212 FALSE, /* partial_inplace */
213 0xffffffff, /* src_mask */
214 0xffffffff, /* dst_mask */
215 FALSE), /* pcrel_offset */
216
c19d1205 217 HOWTO (R_ARM_THM_CALL, /* type */
7f266840
DJ		 218 1, /* rightshift */
219 2, /* size (0 = byte, 1 = short, 2 = long) */
e95de063 220 25, /* bitsize */
7f266840
DJ		 221 TRUE, /* pc_relative */
222 0, /* bitpos */
223 complain_overflow_signed,/* complain_on_overflow */
224 bfd_elf_generic_reloc, /* special_function */
c19d1205 225 "R_ARM_THM_CALL", /* name */
7f266840
DJ		 226 FALSE, /* partial_inplace */
227 0x07ff07ff, /* src_mask */
228 0x07ff07ff, /* dst_mask */
229 TRUE), /* pcrel_offset */
230
231 HOWTO (R_ARM_THM_PC8, /* type */
232 1, /* rightshift */
233 1, /* size (0 = byte, 1 = short, 2 = long) */
234 8, /* bitsize */
235 TRUE, /* pc_relative */
236 0, /* bitpos */
237 complain_overflow_signed,/* complain_on_overflow */
238 bfd_elf_generic_reloc, /* special_function */
239 "R_ARM_THM_PC8", /* name */
240 FALSE, /* partial_inplace */
241 0x000000ff, /* src_mask */
242 0x000000ff, /* dst_mask */
243 TRUE), /* pcrel_offset */
244
c19d1205 245 HOWTO (R_ARM_BREL_ADJ, /* type */
7f266840
DJ		 246 1, /* rightshift */
247 1, /* size (0 = byte, 1 = short, 2 = long) */
c19d1205
ZW		 248 32, /* bitsize */
249 FALSE, /* pc_relative */
7f266840
DJ		 250 0, /* bitpos */
251 complain_overflow_signed,/* complain_on_overflow */
252 bfd_elf_generic_reloc, /* special_function */
c19d1205 253 "R_ARM_BREL_ADJ", /* name */
7f266840 254 FALSE, /* partial_inplace */
c19d1205
ZW		 255 0xffffffff, /* src_mask */
256 0xffffffff, /* dst_mask */
257 FALSE), /* pcrel_offset */
7f266840
DJ		 258
259 HOWTO (R_ARM_SWI24, /* type */
260 0, /* rightshift */
261 0, /* size (0 = byte, 1 = short, 2 = long) */
262 0, /* bitsize */
263 FALSE, /* pc_relative */
264 0, /* bitpos */
265 complain_overflow_signed,/* complain_on_overflow */
266 bfd_elf_generic_reloc, /* special_function */
267 "R_ARM_SWI24", /* name */
268 FALSE, /* partial_inplace */
269 0x00000000, /* src_mask */
270 0x00000000, /* dst_mask */
271 FALSE), /* pcrel_offset */
272
273 HOWTO (R_ARM_THM_SWI8, /* type */
274 0, /* rightshift */
275 0, /* size (0 = byte, 1 = short, 2 = long) */
276 0, /* bitsize */
277 FALSE, /* pc_relative */
278 0, /* bitpos */
279 complain_overflow_signed,/* complain_on_overflow */
280 bfd_elf_generic_reloc, /* special_function */
281 "R_ARM_SWI8", /* name */
282 FALSE, /* partial_inplace */
283 0x00000000, /* src_mask */
284 0x00000000, /* dst_mask */
285 FALSE), /* pcrel_offset */
286
287 /* BLX instruction for the ARM. */
288 HOWTO (R_ARM_XPC25, /* type */
289 2, /* rightshift */
290 2, /* size (0 = byte, 1 = short, 2 = long) */
291 25, /* bitsize */
292 TRUE, /* pc_relative */
293 0, /* bitpos */
294 complain_overflow_signed,/* complain_on_overflow */
295 bfd_elf_generic_reloc, /* special_function */
296 "R_ARM_XPC25", /* name */
297 FALSE, /* partial_inplace */
298 0x00ffffff, /* src_mask */
299 0x00ffffff, /* dst_mask */
300 TRUE), /* pcrel_offset */
301
302 /* BLX instruction for the Thumb. */
303 HOWTO (R_ARM_THM_XPC22, /* type */
304 2, /* rightshift */
305 2, /* size (0 = byte, 1 = short, 2 = long) */
306 22, /* bitsize */
307 TRUE, /* pc_relative */
308 0, /* bitpos */
309 complain_overflow_signed,/* complain_on_overflow */
310 bfd_elf_generic_reloc, /* special_function */
311 "R_ARM_THM_XPC22", /* name */
312 FALSE, /* partial_inplace */
313 0x07ff07ff, /* src_mask */
314 0x07ff07ff, /* dst_mask */
315 TRUE), /* pcrel_offset */
316
ba93b8ac 317 /* Dynamic TLS relocations. */
7f266840 318
ba93b8ac
DJ		 319 HOWTO (R_ARM_TLS_DTPMOD32, /* type */
320 0, /* rightshift */
321 2, /* size (0 = byte, 1 = short, 2 = long) */
322 32, /* bitsize */
323 FALSE, /* pc_relative */
324 0, /* bitpos */
325 complain_overflow_bitfield,/* complain_on_overflow */
326 bfd_elf_generic_reloc, /* special_function */
327 "R_ARM_TLS_DTPMOD32", /* name */
328 TRUE, /* partial_inplace */
329 0xffffffff, /* src_mask */
330 0xffffffff, /* dst_mask */
331 FALSE), /* pcrel_offset */
7f266840 332
ba93b8ac
DJ		 333 HOWTO (R_ARM_TLS_DTPOFF32, /* type */
334 0, /* rightshift */
335 2, /* size (0 = byte, 1 = short, 2 = long) */
336 32, /* bitsize */
337 FALSE, /* pc_relative */
338 0, /* bitpos */
339 complain_overflow_bitfield,/* complain_on_overflow */
340 bfd_elf_generic_reloc, /* special_function */
341 "R_ARM_TLS_DTPOFF32", /* name */
342 TRUE, /* partial_inplace */
343 0xffffffff, /* src_mask */
344 0xffffffff, /* dst_mask */
345 FALSE), /* pcrel_offset */
7f266840 346
ba93b8ac
DJ		 347 HOWTO (R_ARM_TLS_TPOFF32, /* type */
348 0, /* rightshift */
349 2, /* size (0 = byte, 1 = short, 2 = long) */
350 32, /* bitsize */
351 FALSE, /* pc_relative */
352 0, /* bitpos */
353 complain_overflow_bitfield,/* complain_on_overflow */
354 bfd_elf_generic_reloc, /* special_function */
355 "R_ARM_TLS_TPOFF32", /* name */
356 TRUE, /* partial_inplace */
357 0xffffffff, /* src_mask */
358 0xffffffff, /* dst_mask */
359 FALSE), /* pcrel_offset */
7f266840
DJ		 360
361 /* Relocs used in ARM Linux */
362
363 HOWTO (R_ARM_COPY, /* type */
364 0, /* rightshift */
365 2, /* size (0 = byte, 1 = short, 2 = long) */
366 32, /* bitsize */
367 FALSE, /* pc_relative */
368 0, /* bitpos */
369 complain_overflow_bitfield,/* complain_on_overflow */
370 bfd_elf_generic_reloc, /* special_function */
371 "R_ARM_COPY", /* name */
372 TRUE, /* partial_inplace */
373 0xffffffff, /* src_mask */
374 0xffffffff, /* dst_mask */
375 FALSE), /* pcrel_offset */
376
377 HOWTO (R_ARM_GLOB_DAT, /* type */
378 0, /* rightshift */
379 2, /* size (0 = byte, 1 = short, 2 = long) */
380 32, /* bitsize */
381 FALSE, /* pc_relative */
382 0, /* bitpos */
383 complain_overflow_bitfield,/* complain_on_overflow */
384 bfd_elf_generic_reloc, /* special_function */
385 "R_ARM_GLOB_DAT", /* name */
386 TRUE, /* partial_inplace */
387 0xffffffff, /* src_mask */
388 0xffffffff, /* dst_mask */
389 FALSE), /* pcrel_offset */
390
391 HOWTO (R_ARM_JUMP_SLOT, /* type */
392 0, /* rightshift */
393 2, /* size (0 = byte, 1 = short, 2 = long) */
394 32, /* bitsize */
395 FALSE, /* pc_relative */
396 0, /* bitpos */
397 complain_overflow_bitfield,/* complain_on_overflow */
398 bfd_elf_generic_reloc, /* special_function */
399 "R_ARM_JUMP_SLOT", /* name */
400 TRUE, /* partial_inplace */
401 0xffffffff, /* src_mask */
402 0xffffffff, /* dst_mask */
403 FALSE), /* pcrel_offset */
404
405 HOWTO (R_ARM_RELATIVE, /* type */
406 0, /* rightshift */
407 2, /* size (0 = byte, 1 = short, 2 = long) */
408 32, /* bitsize */
409 FALSE, /* pc_relative */
410 0, /* bitpos */
411 complain_overflow_bitfield,/* complain_on_overflow */
412 bfd_elf_generic_reloc, /* special_function */
413 "R_ARM_RELATIVE", /* name */
414 TRUE, /* partial_inplace */
415 0xffffffff, /* src_mask */
416 0xffffffff, /* dst_mask */
417 FALSE), /* pcrel_offset */
418
c19d1205 419 HOWTO (R_ARM_GOTOFF32, /* type */
7f266840
DJ		 420 0, /* rightshift */
421 2, /* size (0 = byte, 1 = short, 2 = long) */
422 32, /* bitsize */
423 FALSE, /* pc_relative */
424 0, /* bitpos */
425 complain_overflow_bitfield,/* complain_on_overflow */
426 bfd_elf_generic_reloc, /* special_function */
c19d1205 427 "R_ARM_GOTOFF32", /* name */
7f266840
DJ		 428 TRUE, /* partial_inplace */
429 0xffffffff, /* src_mask */
430 0xffffffff, /* dst_mask */
431 FALSE), /* pcrel_offset */
432
433 HOWTO (R_ARM_GOTPC, /* type */
434 0, /* rightshift */
435 2, /* size (0 = byte, 1 = short, 2 = long) */
436 32, /* bitsize */
437 TRUE, /* pc_relative */
438 0, /* bitpos */
439 complain_overflow_bitfield,/* complain_on_overflow */
440 bfd_elf_generic_reloc, /* special_function */
441 "R_ARM_GOTPC", /* name */
442 TRUE, /* partial_inplace */
443 0xffffffff, /* src_mask */
444 0xffffffff, /* dst_mask */
445 TRUE), /* pcrel_offset */
446
447 HOWTO (R_ARM_GOT32, /* type */
448 0, /* rightshift */
449 2, /* size (0 = byte, 1 = short, 2 = long) */
450 32, /* bitsize */
451 FALSE, /* pc_relative */
452 0, /* bitpos */
453 complain_overflow_bitfield,/* complain_on_overflow */
454 bfd_elf_generic_reloc, /* special_function */
455 "R_ARM_GOT32", /* name */
456 TRUE, /* partial_inplace */
457 0xffffffff, /* src_mask */
458 0xffffffff, /* dst_mask */
459 FALSE), /* pcrel_offset */
460
461 HOWTO (R_ARM_PLT32, /* type */
462 2, /* rightshift */
463 2, /* size (0 = byte, 1 = short, 2 = long) */
ce490eda 464 24, /* bitsize */
7f266840
DJ		 465 TRUE, /* pc_relative */
466 0, /* bitpos */
467 complain_overflow_bitfield,/* complain_on_overflow */
468 bfd_elf_generic_reloc, /* special_function */
469 "R_ARM_PLT32", /* name */
ce490eda 470 FALSE, /* partial_inplace */
7f266840
DJ		 471 0x00ffffff, /* src_mask */
472 0x00ffffff, /* dst_mask */
473 TRUE), /* pcrel_offset */
474
475 HOWTO (R_ARM_CALL, /* type */
476 2, /* rightshift */
477 2, /* size (0 = byte, 1 = short, 2 = long) */
478 24, /* bitsize */
479 TRUE, /* pc_relative */
480 0, /* bitpos */
481 complain_overflow_signed,/* complain_on_overflow */
482 bfd_elf_generic_reloc, /* special_function */
483 "R_ARM_CALL", /* name */
484 FALSE, /* partial_inplace */
485 0x00ffffff, /* src_mask */
486 0x00ffffff, /* dst_mask */
487 TRUE), /* pcrel_offset */
488
489 HOWTO (R_ARM_JUMP24, /* type */
490 2, /* rightshift */
491 2, /* size (0 = byte, 1 = short, 2 = long) */
492 24, /* bitsize */
493 TRUE, /* pc_relative */
494 0, /* bitpos */
495 complain_overflow_signed,/* complain_on_overflow */
496 bfd_elf_generic_reloc, /* special_function */
497 "R_ARM_JUMP24", /* name */
498 FALSE, /* partial_inplace */
499 0x00ffffff, /* src_mask */
500 0x00ffffff, /* dst_mask */
501 TRUE), /* pcrel_offset */
502
c19d1205
ZW		 503 HOWTO (R_ARM_THM_JUMP24, /* type */
504 1, /* rightshift */
505 2, /* size (0 = byte, 1 = short, 2 = long) */
506 24, /* bitsize */
507 TRUE, /* pc_relative */
7f266840 508 0, /* bitpos */
c19d1205 509 complain_overflow_signed,/* complain_on_overflow */
7f266840 510 bfd_elf_generic_reloc, /* special_function */
c19d1205 511 "R_ARM_THM_JUMP24", /* name */
7f266840 512 FALSE, /* partial_inplace */
c19d1205
ZW		 513 0x07ff2fff, /* src_mask */
514 0x07ff2fff, /* dst_mask */
515 TRUE), /* pcrel_offset */
7f266840 516
c19d1205 517 HOWTO (R_ARM_BASE_ABS, /* type */
7f266840 518 0, /* rightshift */
c19d1205
ZW		 519 2, /* size (0 = byte, 1 = short, 2 = long) */
520 32, /* bitsize */
7f266840
DJ		 521 FALSE, /* pc_relative */
522 0, /* bitpos */
523 complain_overflow_dont,/* complain_on_overflow */
524 bfd_elf_generic_reloc, /* special_function */
c19d1205 525 "R_ARM_BASE_ABS", /* name */
7f266840 526 FALSE, /* partial_inplace */
c19d1205
ZW		 527 0xffffffff, /* src_mask */
528 0xffffffff, /* dst_mask */
7f266840
DJ		 529 FALSE), /* pcrel_offset */
530
531 HOWTO (R_ARM_ALU_PCREL7_0, /* type */
532 0, /* rightshift */
533 2, /* size (0 = byte, 1 = short, 2 = long) */
534 12, /* bitsize */
535 TRUE, /* pc_relative */
536 0, /* bitpos */
537 complain_overflow_dont,/* complain_on_overflow */
538 bfd_elf_generic_reloc, /* special_function */
539 "R_ARM_ALU_PCREL_7_0", /* name */
540 FALSE, /* partial_inplace */
541 0x00000fff, /* src_mask */
542 0x00000fff, /* dst_mask */
543 TRUE), /* pcrel_offset */
544
545 HOWTO (R_ARM_ALU_PCREL15_8, /* type */
546 0, /* rightshift */
547 2, /* size (0 = byte, 1 = short, 2 = long) */
548 12, /* bitsize */
549 TRUE, /* pc_relative */
550 8, /* bitpos */
551 complain_overflow_dont,/* complain_on_overflow */
552 bfd_elf_generic_reloc, /* special_function */
553 "R_ARM_ALU_PCREL_15_8",/* name */
554 FALSE, /* partial_inplace */
555 0x00000fff, /* src_mask */
556 0x00000fff, /* dst_mask */
557 TRUE), /* pcrel_offset */
558
559 HOWTO (R_ARM_ALU_PCREL23_15, /* type */
560 0, /* rightshift */
561 2, /* size (0 = byte, 1 = short, 2 = long) */
562 12, /* bitsize */
563 TRUE, /* pc_relative */
564 16, /* bitpos */
565 complain_overflow_dont,/* complain_on_overflow */
566 bfd_elf_generic_reloc, /* special_function */
567 "R_ARM_ALU_PCREL_23_15",/* name */
568 FALSE, /* partial_inplace */
569 0x00000fff, /* src_mask */
570 0x00000fff, /* dst_mask */
571 TRUE), /* pcrel_offset */
572
573 HOWTO (R_ARM_LDR_SBREL_11_0, /* type */
574 0, /* rightshift */
575 2, /* size (0 = byte, 1 = short, 2 = long) */
576 12, /* bitsize */
577 FALSE, /* pc_relative */
578 0, /* bitpos */
579 complain_overflow_dont,/* complain_on_overflow */
580 bfd_elf_generic_reloc, /* special_function */
581 "R_ARM_LDR_SBREL_11_0",/* name */
582 FALSE, /* partial_inplace */
583 0x00000fff, /* src_mask */
584 0x00000fff, /* dst_mask */
585 FALSE), /* pcrel_offset */
586
587 HOWTO (R_ARM_ALU_SBREL_19_12, /* type */
588 0, /* rightshift */
589 2, /* size (0 = byte, 1 = short, 2 = long) */
590 8, /* bitsize */
591 FALSE, /* pc_relative */
592 12, /* bitpos */
593 complain_overflow_dont,/* complain_on_overflow */
594 bfd_elf_generic_reloc, /* special_function */
595 "R_ARM_ALU_SBREL_19_12",/* name */
596 FALSE, /* partial_inplace */
597 0x000ff000, /* src_mask */
598 0x000ff000, /* dst_mask */
599 FALSE), /* pcrel_offset */
600
601 HOWTO (R_ARM_ALU_SBREL_27_20, /* type */
602 0, /* rightshift */
603 2, /* size (0 = byte, 1 = short, 2 = long) */
604 8, /* bitsize */
605 FALSE, /* pc_relative */
606 20, /* bitpos */
607 complain_overflow_dont,/* complain_on_overflow */
608 bfd_elf_generic_reloc, /* special_function */
609 "R_ARM_ALU_SBREL_27_20",/* name */
610 FALSE, /* partial_inplace */
611 0x0ff00000, /* src_mask */
612 0x0ff00000, /* dst_mask */
613 FALSE), /* pcrel_offset */
614
615 HOWTO (R_ARM_TARGET1, /* type */
616 0, /* rightshift */
617 2, /* size (0 = byte, 1 = short, 2 = long) */
618 32, /* bitsize */
619 FALSE, /* pc_relative */
620 0, /* bitpos */
621 complain_overflow_dont,/* complain_on_overflow */
622 bfd_elf_generic_reloc, /* special_function */
623 "R_ARM_TARGET1", /* name */
624 FALSE, /* partial_inplace */
625 0xffffffff, /* src_mask */
626 0xffffffff, /* dst_mask */
627 FALSE), /* pcrel_offset */
628
629 HOWTO (R_ARM_ROSEGREL32, /* type */
630 0, /* rightshift */
631 2, /* size (0 = byte, 1 = short, 2 = long) */
632 32, /* bitsize */
633 FALSE, /* pc_relative */
634 0, /* bitpos */
635 complain_overflow_dont,/* complain_on_overflow */
636 bfd_elf_generic_reloc, /* special_function */
637 "R_ARM_ROSEGREL32", /* name */
638 FALSE, /* partial_inplace */
639 0xffffffff, /* src_mask */
640 0xffffffff, /* dst_mask */
641 FALSE), /* pcrel_offset */
642
643 HOWTO (R_ARM_V4BX, /* type */
644 0, /* rightshift */
645 2, /* size (0 = byte, 1 = short, 2 = long) */
646 32, /* bitsize */
647 FALSE, /* pc_relative */
648 0, /* bitpos */
649 complain_overflow_dont,/* complain_on_overflow */
650 bfd_elf_generic_reloc, /* special_function */
651 "R_ARM_V4BX", /* name */
652 FALSE, /* partial_inplace */
653 0xffffffff, /* src_mask */
654 0xffffffff, /* dst_mask */
655 FALSE), /* pcrel_offset */
656
657 HOWTO (R_ARM_TARGET2, /* type */
658 0, /* rightshift */
659 2, /* size (0 = byte, 1 = short, 2 = long) */
660 32, /* bitsize */
661 FALSE, /* pc_relative */
662 0, /* bitpos */
663 complain_overflow_signed,/* complain_on_overflow */
664 bfd_elf_generic_reloc, /* special_function */
665 "R_ARM_TARGET2", /* name */
666 FALSE, /* partial_inplace */
667 0xffffffff, /* src_mask */
668 0xffffffff, /* dst_mask */
669 TRUE), /* pcrel_offset */
670
671 HOWTO (R_ARM_PREL31, /* type */
672 0, /* rightshift */
673 2, /* size (0 = byte, 1 = short, 2 = long) */
674 31, /* bitsize */
675 TRUE, /* pc_relative */
676 0, /* bitpos */
677 complain_overflow_signed,/* complain_on_overflow */
678 bfd_elf_generic_reloc, /* special_function */
679 "R_ARM_PREL31", /* name */
680 FALSE, /* partial_inplace */
681 0x7fffffff, /* src_mask */
682 0x7fffffff, /* dst_mask */
683 TRUE), /* pcrel_offset */
c19d1205
ZW		 684
685 HOWTO (R_ARM_MOVW_ABS_NC, /* type */
686 0, /* rightshift */
687 2, /* size (0 = byte, 1 = short, 2 = long) */
688 16, /* bitsize */
689 FALSE, /* pc_relative */
690 0, /* bitpos */
691 complain_overflow_dont,/* complain_on_overflow */
692 bfd_elf_generic_reloc, /* special_function */
693 "R_ARM_MOVW_ABS_NC", /* name */
694 FALSE, /* partial_inplace */
39623e12
PB		 695 0x000f0fff, /* src_mask */
696 0x000f0fff, /* dst_mask */
c19d1205
ZW		 697 FALSE), /* pcrel_offset */
698
699 HOWTO (R_ARM_MOVT_ABS, /* type */
700 0, /* rightshift */
701 2, /* size (0 = byte, 1 = short, 2 = long) */
702 16, /* bitsize */
703 FALSE, /* pc_relative */
704 0, /* bitpos */
705 complain_overflow_bitfield,/* complain_on_overflow */
706 bfd_elf_generic_reloc, /* special_function */
707 "R_ARM_MOVT_ABS", /* name */
708 FALSE, /* partial_inplace */
39623e12
PB		 709 0x000f0fff, /* src_mask */
710 0x000f0fff, /* dst_mask */
c19d1205
ZW		 711 FALSE), /* pcrel_offset */
712
713 HOWTO (R_ARM_MOVW_PREL_NC, /* type */
714 0, /* rightshift */
715 2, /* size (0 = byte, 1 = short, 2 = long) */
716 16, /* bitsize */
717 TRUE, /* pc_relative */
718 0, /* bitpos */
719 complain_overflow_dont,/* complain_on_overflow */
720 bfd_elf_generic_reloc, /* special_function */
721 "R_ARM_MOVW_PREL_NC", /* name */
722 FALSE, /* partial_inplace */
39623e12
PB		 723 0x000f0fff, /* src_mask */
724 0x000f0fff, /* dst_mask */
c19d1205
ZW		 725 TRUE), /* pcrel_offset */
726
727 HOWTO (R_ARM_MOVT_PREL, /* type */
728 0, /* rightshift */
729 2, /* size (0 = byte, 1 = short, 2 = long) */
730 16, /* bitsize */
731 TRUE, /* pc_relative */
732 0, /* bitpos */
733 complain_overflow_bitfield,/* complain_on_overflow */
734 bfd_elf_generic_reloc, /* special_function */
735 "R_ARM_MOVT_PREL", /* name */
736 FALSE, /* partial_inplace */
39623e12
PB		 737 0x000f0fff, /* src_mask */
738 0x000f0fff, /* dst_mask */
c19d1205
ZW		 739 TRUE), /* pcrel_offset */
740
741 HOWTO (R_ARM_THM_MOVW_ABS_NC, /* type */
742 0, /* rightshift */
743 2, /* size (0 = byte, 1 = short, 2 = long) */
744 16, /* bitsize */
745 FALSE, /* pc_relative */
746 0, /* bitpos */
747 complain_overflow_dont,/* complain_on_overflow */
748 bfd_elf_generic_reloc, /* special_function */
749 "R_ARM_THM_MOVW_ABS_NC",/* name */
750 FALSE, /* partial_inplace */
751 0x040f70ff, /* src_mask */
752 0x040f70ff, /* dst_mask */
753 FALSE), /* pcrel_offset */
754
755 HOWTO (R_ARM_THM_MOVT_ABS, /* type */
756 0, /* rightshift */
757 2, /* size (0 = byte, 1 = short, 2 = long) */
758 16, /* bitsize */
759 FALSE, /* pc_relative */
760 0, /* bitpos */
761 complain_overflow_bitfield,/* complain_on_overflow */
762 bfd_elf_generic_reloc, /* special_function */
763 "R_ARM_THM_MOVT_ABS", /* name */
764 FALSE, /* partial_inplace */
765 0x040f70ff, /* src_mask */
766 0x040f70ff, /* dst_mask */
767 FALSE), /* pcrel_offset */
768
769 HOWTO (R_ARM_THM_MOVW_PREL_NC,/* type */
770 0, /* rightshift */
771 2, /* size (0 = byte, 1 = short, 2 = long) */
772 16, /* bitsize */
773 TRUE, /* pc_relative */
774 0, /* bitpos */
775 complain_overflow_dont,/* complain_on_overflow */
776 bfd_elf_generic_reloc, /* special_function */
777 "R_ARM_THM_MOVW_PREL_NC",/* name */
778 FALSE, /* partial_inplace */
779 0x040f70ff, /* src_mask */
780 0x040f70ff, /* dst_mask */
781 TRUE), /* pcrel_offset */
782
783 HOWTO (R_ARM_THM_MOVT_PREL, /* type */
784 0, /* rightshift */
785 2, /* size (0 = byte, 1 = short, 2 = long) */
786 16, /* bitsize */
787 TRUE, /* pc_relative */
788 0, /* bitpos */
789 complain_overflow_bitfield,/* complain_on_overflow */
790 bfd_elf_generic_reloc, /* special_function */
791 "R_ARM_THM_MOVT_PREL", /* name */
792 FALSE, /* partial_inplace */
793 0x040f70ff, /* src_mask */
794 0x040f70ff, /* dst_mask */
795 TRUE), /* pcrel_offset */
796
797 HOWTO (R_ARM_THM_JUMP19, /* type */
798 1, /* rightshift */
799 2, /* size (0 = byte, 1 = short, 2 = long) */
800 19, /* bitsize */
801 TRUE, /* pc_relative */
802 0, /* bitpos */
803 complain_overflow_signed,/* complain_on_overflow */
804 bfd_elf_generic_reloc, /* special_function */
805 "R_ARM_THM_JUMP19", /* name */
806 FALSE, /* partial_inplace */
807 0x043f2fff, /* src_mask */
808 0x043f2fff, /* dst_mask */
809 TRUE), /* pcrel_offset */
810
811 HOWTO (R_ARM_THM_JUMP6, /* type */
812 1, /* rightshift */
813 1, /* size (0 = byte, 1 = short, 2 = long) */
814 6, /* bitsize */
815 TRUE, /* pc_relative */
816 0, /* bitpos */
817 complain_overflow_unsigned,/* complain_on_overflow */
818 bfd_elf_generic_reloc, /* special_function */
819 "R_ARM_THM_JUMP6", /* name */
820 FALSE, /* partial_inplace */
821 0x02f8, /* src_mask */
822 0x02f8, /* dst_mask */
823 TRUE), /* pcrel_offset */
824
825 /* These are declared as 13-bit signed relocations because we can
826 address -4095 .. 4095(base) by altering ADDW to SUBW or vice
827 versa. */
828 HOWTO (R_ARM_THM_ALU_PREL_11_0,/* type */
829 0, /* rightshift */
830 2, /* size (0 = byte, 1 = short, 2 = long) */
831 13, /* bitsize */
832 TRUE, /* pc_relative */
833 0, /* bitpos */
2cab6cc3 834 complain_overflow_dont,/* complain_on_overflow */
c19d1205
ZW		 835 bfd_elf_generic_reloc, /* special_function */
836 "R_ARM_THM_ALU_PREL_11_0",/* name */
837 FALSE, /* partial_inplace */
2cab6cc3
MS		 838 0xffffffff, /* src_mask */
839 0xffffffff, /* dst_mask */
c19d1205
ZW		 840 TRUE), /* pcrel_offset */
841
842 HOWTO (R_ARM_THM_PC12, /* type */
843 0, /* rightshift */
844 2, /* size (0 = byte, 1 = short, 2 = long) */
845 13, /* bitsize */
846 TRUE, /* pc_relative */
847 0, /* bitpos */
2cab6cc3 848 complain_overflow_dont,/* complain_on_overflow */
c19d1205
ZW		 849 bfd_elf_generic_reloc, /* special_function */
850 "R_ARM_THM_PC12", /* name */
851 FALSE, /* partial_inplace */
2cab6cc3
MS		 852 0xffffffff, /* src_mask */
853 0xffffffff, /* dst_mask */
c19d1205
ZW		 854 TRUE), /* pcrel_offset */
855
856 HOWTO (R_ARM_ABS32_NOI, /* type */
857 0, /* rightshift */
858 2, /* size (0 = byte, 1 = short, 2 = long) */
859 32, /* bitsize */
860 FALSE, /* pc_relative */
861 0, /* bitpos */
862 complain_overflow_dont,/* complain_on_overflow */
863 bfd_elf_generic_reloc, /* special_function */
864 "R_ARM_ABS32_NOI", /* name */
865 FALSE, /* partial_inplace */
866 0xffffffff, /* src_mask */
867 0xffffffff, /* dst_mask */
868 FALSE), /* pcrel_offset */
869
870 HOWTO (R_ARM_REL32_NOI, /* type */
871 0, /* rightshift */
872 2, /* size (0 = byte, 1 = short, 2 = long) */
873 32, /* bitsize */
874 TRUE, /* pc_relative */
875 0, /* bitpos */
876 complain_overflow_dont,/* complain_on_overflow */
877 bfd_elf_generic_reloc, /* special_function */
878 "R_ARM_REL32_NOI", /* name */
879 FALSE, /* partial_inplace */
880 0xffffffff, /* src_mask */
881 0xffffffff, /* dst_mask */
882 FALSE), /* pcrel_offset */
7f266840 883
4962c51a
MS		 884 /* Group relocations. */
885
886 HOWTO (R_ARM_ALU_PC_G0_NC, /* type */
887 0, /* rightshift */
888 2, /* size (0 = byte, 1 = short, 2 = long) */
889 32, /* bitsize */
890 TRUE, /* pc_relative */
891 0, /* bitpos */
892 complain_overflow_dont,/* complain_on_overflow */
893 bfd_elf_generic_reloc, /* special_function */
894 "R_ARM_ALU_PC_G0_NC", /* name */
895 FALSE, /* partial_inplace */
896 0xffffffff, /* src_mask */
897 0xffffffff, /* dst_mask */
898 TRUE), /* pcrel_offset */
899
900 HOWTO (R_ARM_ALU_PC_G0, /* type */
901 0, /* rightshift */
902 2, /* size (0 = byte, 1 = short, 2 = long) */
903 32, /* bitsize */
904 TRUE, /* pc_relative */
905 0, /* bitpos */
906 complain_overflow_dont,/* complain_on_overflow */
907 bfd_elf_generic_reloc, /* special_function */
908 "R_ARM_ALU_PC_G0", /* name */
909 FALSE, /* partial_inplace */
910 0xffffffff, /* src_mask */
911 0xffffffff, /* dst_mask */
912 TRUE), /* pcrel_offset */
913
914 HOWTO (R_ARM_ALU_PC_G1_NC, /* type */
915 0, /* rightshift */
916 2, /* size (0 = byte, 1 = short, 2 = long) */
917 32, /* bitsize */
918 TRUE, /* pc_relative */
919 0, /* bitpos */
920 complain_overflow_dont,/* complain_on_overflow */
921 bfd_elf_generic_reloc, /* special_function */
922 "R_ARM_ALU_PC_G1_NC", /* name */
923 FALSE, /* partial_inplace */
924 0xffffffff, /* src_mask */
925 0xffffffff, /* dst_mask */
926 TRUE), /* pcrel_offset */
927
928 HOWTO (R_ARM_ALU_PC_G1, /* type */
929 0, /* rightshift */
930 2, /* size (0 = byte, 1 = short, 2 = long) */
931 32, /* bitsize */
932 TRUE, /* pc_relative */
933 0, /* bitpos */
934 complain_overflow_dont,/* complain_on_overflow */
935 bfd_elf_generic_reloc, /* special_function */
936 "R_ARM_ALU_PC_G1", /* name */
937 FALSE, /* partial_inplace */
938 0xffffffff, /* src_mask */
939 0xffffffff, /* dst_mask */
940 TRUE), /* pcrel_offset */
941
942 HOWTO (R_ARM_ALU_PC_G2, /* type */
943 0, /* rightshift */
944 2, /* size (0 = byte, 1 = short, 2 = long) */
945 32, /* bitsize */
946 TRUE, /* pc_relative */
947 0, /* bitpos */
948 complain_overflow_dont,/* complain_on_overflow */
949 bfd_elf_generic_reloc, /* special_function */
950 "R_ARM_ALU_PC_G2", /* name */
951 FALSE, /* partial_inplace */
952 0xffffffff, /* src_mask */
953 0xffffffff, /* dst_mask */
954 TRUE), /* pcrel_offset */
955
956 HOWTO (R_ARM_LDR_PC_G1, /* type */
957 0, /* rightshift */
958 2, /* size (0 = byte, 1 = short, 2 = long) */
959 32, /* bitsize */
960 TRUE, /* pc_relative */
961 0, /* bitpos */
962 complain_overflow_dont,/* complain_on_overflow */
963 bfd_elf_generic_reloc, /* special_function */
964 "R_ARM_LDR_PC_G1", /* name */
965 FALSE, /* partial_inplace */
966 0xffffffff, /* src_mask */
967 0xffffffff, /* dst_mask */
968 TRUE), /* pcrel_offset */
969
970 HOWTO (R_ARM_LDR_PC_G2, /* type */
971 0, /* rightshift */
972 2, /* size (0 = byte, 1 = short, 2 = long) */
973 32, /* bitsize */
974 TRUE, /* pc_relative */
975 0, /* bitpos */
976 complain_overflow_dont,/* complain_on_overflow */
977 bfd_elf_generic_reloc, /* special_function */
978 "R_ARM_LDR_PC_G2", /* name */
979 FALSE, /* partial_inplace */
980 0xffffffff, /* src_mask */
981 0xffffffff, /* dst_mask */
982 TRUE), /* pcrel_offset */
983
984 HOWTO (R_ARM_LDRS_PC_G0, /* type */
985 0, /* rightshift */
986 2, /* size (0 = byte, 1 = short, 2 = long) */
987 32, /* bitsize */
988 TRUE, /* pc_relative */
989 0, /* bitpos */
990 complain_overflow_dont,/* complain_on_overflow */
991 bfd_elf_generic_reloc, /* special_function */
992 "R_ARM_LDRS_PC_G0", /* name */
993 FALSE, /* partial_inplace */
994 0xffffffff, /* src_mask */
995 0xffffffff, /* dst_mask */
996 TRUE), /* pcrel_offset */
997
998 HOWTO (R_ARM_LDRS_PC_G1, /* type */
999 0, /* rightshift */
1000 2, /* size (0 = byte, 1 = short, 2 = long) */
1001 32, /* bitsize */
1002 TRUE, /* pc_relative */
1003 0, /* bitpos */
1004 complain_overflow_dont,/* complain_on_overflow */
1005 bfd_elf_generic_reloc, /* special_function */
1006 "R_ARM_LDRS_PC_G1", /* name */
1007 FALSE, /* partial_inplace */
1008 0xffffffff, /* src_mask */
1009 0xffffffff, /* dst_mask */
1010 TRUE), /* pcrel_offset */
1011
1012 HOWTO (R_ARM_LDRS_PC_G2, /* type */
1013 0, /* rightshift */
1014 2, /* size (0 = byte, 1 = short, 2 = long) */
1015 32, /* bitsize */
1016 TRUE, /* pc_relative */
1017 0, /* bitpos */
1018 complain_overflow_dont,/* complain_on_overflow */
1019 bfd_elf_generic_reloc, /* special_function */
1020 "R_ARM_LDRS_PC_G2", /* name */
1021 FALSE, /* partial_inplace */
1022 0xffffffff, /* src_mask */
1023 0xffffffff, /* dst_mask */
1024 TRUE), /* pcrel_offset */
1025
1026 HOWTO (R_ARM_LDC_PC_G0, /* type */
1027 0, /* rightshift */
1028 2, /* size (0 = byte, 1 = short, 2 = long) */
1029 32, /* bitsize */
1030 TRUE, /* pc_relative */
1031 0, /* bitpos */
1032 complain_overflow_dont,/* complain_on_overflow */
1033 bfd_elf_generic_reloc, /* special_function */
1034 "R_ARM_LDC_PC_G0", /* name */
1035 FALSE, /* partial_inplace */
1036 0xffffffff, /* src_mask */
1037 0xffffffff, /* dst_mask */
1038 TRUE), /* pcrel_offset */
1039
1040 HOWTO (R_ARM_LDC_PC_G1, /* type */
1041 0, /* rightshift */
1042 2, /* size (0 = byte, 1 = short, 2 = long) */
1043 32, /* bitsize */
1044 TRUE, /* pc_relative */
1045 0, /* bitpos */
1046 complain_overflow_dont,/* complain_on_overflow */
1047 bfd_elf_generic_reloc, /* special_function */
1048 "R_ARM_LDC_PC_G1", /* name */
1049 FALSE, /* partial_inplace */
1050 0xffffffff, /* src_mask */
1051 0xffffffff, /* dst_mask */
1052 TRUE), /* pcrel_offset */
1053
1054 HOWTO (R_ARM_LDC_PC_G2, /* type */
1055 0, /* rightshift */
1056 2, /* size (0 = byte, 1 = short, 2 = long) */
1057 32, /* bitsize */
1058 TRUE, /* pc_relative */
1059 0, /* bitpos */
1060 complain_overflow_dont,/* complain_on_overflow */
1061 bfd_elf_generic_reloc, /* special_function */
1062 "R_ARM_LDC_PC_G2", /* name */
1063 FALSE, /* partial_inplace */
1064 0xffffffff, /* src_mask */
1065 0xffffffff, /* dst_mask */
1066 TRUE), /* pcrel_offset */
1067
1068 HOWTO (R_ARM_ALU_SB_G0_NC, /* type */
1069 0, /* rightshift */
1070 2, /* size (0 = byte, 1 = short, 2 = long) */
1071 32, /* bitsize */
1072 TRUE, /* pc_relative */
1073 0, /* bitpos */
1074 complain_overflow_dont,/* complain_on_overflow */
1075 bfd_elf_generic_reloc, /* special_function */
1076 "R_ARM_ALU_SB_G0_NC", /* name */
1077 FALSE, /* partial_inplace */
1078 0xffffffff, /* src_mask */
1079 0xffffffff, /* dst_mask */
1080 TRUE), /* pcrel_offset */
1081
1082 HOWTO (R_ARM_ALU_SB_G0, /* type */
1083 0, /* rightshift */
1084 2, /* size (0 = byte, 1 = short, 2 = long) */
1085 32, /* bitsize */
1086 TRUE, /* pc_relative */
1087 0, /* bitpos */
1088 complain_overflow_dont,/* complain_on_overflow */
1089 bfd_elf_generic_reloc, /* special_function */
1090 "R_ARM_ALU_SB_G0", /* name */
1091 FALSE, /* partial_inplace */
1092 0xffffffff, /* src_mask */
1093 0xffffffff, /* dst_mask */
1094 TRUE), /* pcrel_offset */
1095
1096 HOWTO (R_ARM_ALU_SB_G1_NC, /* type */
1097 0, /* rightshift */
1098 2, /* size (0 = byte, 1 = short, 2 = long) */
1099 32, /* bitsize */
1100 TRUE, /* pc_relative */
1101 0, /* bitpos */
1102 complain_overflow_dont,/* complain_on_overflow */
1103 bfd_elf_generic_reloc, /* special_function */
1104 "R_ARM_ALU_SB_G1_NC", /* name */
1105 FALSE, /* partial_inplace */
1106 0xffffffff, /* src_mask */
1107 0xffffffff, /* dst_mask */
1108 TRUE), /* pcrel_offset */
1109
1110 HOWTO (R_ARM_ALU_SB_G1, /* type */
1111 0, /* rightshift */
1112 2, /* size (0 = byte, 1 = short, 2 = long) */
1113 32, /* bitsize */
1114 TRUE, /* pc_relative */
1115 0, /* bitpos */
1116 complain_overflow_dont,/* complain_on_overflow */
1117 bfd_elf_generic_reloc, /* special_function */
1118 "R_ARM_ALU_SB_G1", /* name */
1119 FALSE, /* partial_inplace */
1120 0xffffffff, /* src_mask */
1121 0xffffffff, /* dst_mask */
1122 TRUE), /* pcrel_offset */
1123
1124 HOWTO (R_ARM_ALU_SB_G2, /* type */
1125 0, /* rightshift */
1126 2, /* size (0 = byte, 1 = short, 2 = long) */
1127 32, /* bitsize */
1128 TRUE, /* pc_relative */
1129 0, /* bitpos */
1130 complain_overflow_dont,/* complain_on_overflow */
1131 bfd_elf_generic_reloc, /* special_function */
1132 "R_ARM_ALU_SB_G2", /* name */
1133 FALSE, /* partial_inplace */
1134 0xffffffff, /* src_mask */
1135 0xffffffff, /* dst_mask */
1136 TRUE), /* pcrel_offset */
1137
1138 HOWTO (R_ARM_LDR_SB_G0, /* type */
1139 0, /* rightshift */
1140 2, /* size (0 = byte, 1 = short, 2 = long) */
1141 32, /* bitsize */
1142 TRUE, /* pc_relative */
1143 0, /* bitpos */
1144 complain_overflow_dont,/* complain_on_overflow */
1145 bfd_elf_generic_reloc, /* special_function */
1146 "R_ARM_LDR_SB_G0", /* name */
1147 FALSE, /* partial_inplace */
1148 0xffffffff, /* src_mask */
1149 0xffffffff, /* dst_mask */
1150 TRUE), /* pcrel_offset */
1151
1152 HOWTO (R_ARM_LDR_SB_G1, /* type */
1153 0, /* rightshift */
1154 2, /* size (0 = byte, 1 = short, 2 = long) */
1155 32, /* bitsize */
1156 TRUE, /* pc_relative */
1157 0, /* bitpos */
1158 complain_overflow_dont,/* complain_on_overflow */
1159 bfd_elf_generic_reloc, /* special_function */
1160 "R_ARM_LDR_SB_G1", /* name */
1161 FALSE, /* partial_inplace */
1162 0xffffffff, /* src_mask */
1163 0xffffffff, /* dst_mask */
1164 TRUE), /* pcrel_offset */
1165
1166 HOWTO (R_ARM_LDR_SB_G2, /* type */
1167 0, /* rightshift */
1168 2, /* size (0 = byte, 1 = short, 2 = long) */
1169 32, /* bitsize */
1170 TRUE, /* pc_relative */
1171 0, /* bitpos */
1172 complain_overflow_dont,/* complain_on_overflow */
1173 bfd_elf_generic_reloc, /* special_function */
1174 "R_ARM_LDR_SB_G2", /* name */
1175 FALSE, /* partial_inplace */
1176 0xffffffff, /* src_mask */
1177 0xffffffff, /* dst_mask */
1178 TRUE), /* pcrel_offset */
1179
1180 HOWTO (R_ARM_LDRS_SB_G0, /* type */
1181 0, /* rightshift */
1182 2, /* size (0 = byte, 1 = short, 2 = long) */
1183 32, /* bitsize */
1184 TRUE, /* pc_relative */
1185 0, /* bitpos */
1186 complain_overflow_dont,/* complain_on_overflow */
1187 bfd_elf_generic_reloc, /* special_function */
1188 "R_ARM_LDRS_SB_G0", /* name */
1189 FALSE, /* partial_inplace */
1190 0xffffffff, /* src_mask */
1191 0xffffffff, /* dst_mask */
1192 TRUE), /* pcrel_offset */
1193
1194 HOWTO (R_ARM_LDRS_SB_G1, /* type */
1195 0, /* rightshift */
1196 2, /* size (0 = byte, 1 = short, 2 = long) */
1197 32, /* bitsize */
1198 TRUE, /* pc_relative */
1199 0, /* bitpos */
1200 complain_overflow_dont,/* complain_on_overflow */
1201 bfd_elf_generic_reloc, /* special_function */
1202 "R_ARM_LDRS_SB_G1", /* name */
1203 FALSE, /* partial_inplace */
1204 0xffffffff, /* src_mask */
1205 0xffffffff, /* dst_mask */
1206 TRUE), /* pcrel_offset */
1207
1208 HOWTO (R_ARM_LDRS_SB_G2, /* type */
1209 0, /* rightshift */
1210 2, /* size (0 = byte, 1 = short, 2 = long) */
1211 32, /* bitsize */
1212 TRUE, /* pc_relative */
1213 0, /* bitpos */
1214 complain_overflow_dont,/* complain_on_overflow */
1215 bfd_elf_generic_reloc, /* special_function */
1216 "R_ARM_LDRS_SB_G2", /* name */
1217 FALSE, /* partial_inplace */
1218 0xffffffff, /* src_mask */
1219 0xffffffff, /* dst_mask */
1220 TRUE), /* pcrel_offset */
1221
1222 HOWTO (R_ARM_LDC_SB_G0, /* type */
1223 0, /* rightshift */
1224 2, /* size (0 = byte, 1 = short, 2 = long) */
1225 32, /* bitsize */
1226 TRUE, /* pc_relative */
1227 0, /* bitpos */
1228 complain_overflow_dont,/* complain_on_overflow */
1229 bfd_elf_generic_reloc, /* special_function */
1230 "R_ARM_LDC_SB_G0", /* name */
1231 FALSE, /* partial_inplace */
1232 0xffffffff, /* src_mask */
1233 0xffffffff, /* dst_mask */
1234 TRUE), /* pcrel_offset */
1235
1236 HOWTO (R_ARM_LDC_SB_G1, /* type */
1237 0, /* rightshift */
1238 2, /* size (0 = byte, 1 = short, 2 = long) */
1239 32, /* bitsize */
1240 TRUE, /* pc_relative */
1241 0, /* bitpos */
1242 complain_overflow_dont,/* complain_on_overflow */
1243 bfd_elf_generic_reloc, /* special_function */
1244 "R_ARM_LDC_SB_G1", /* name */
1245 FALSE, /* partial_inplace */
1246 0xffffffff, /* src_mask */
1247 0xffffffff, /* dst_mask */
1248 TRUE), /* pcrel_offset */
1249
1250 HOWTO (R_ARM_LDC_SB_G2, /* type */
1251 0, /* rightshift */
1252 2, /* size (0 = byte, 1 = short, 2 = long) */
1253 32, /* bitsize */
1254 TRUE, /* pc_relative */
1255 0, /* bitpos */
1256 complain_overflow_dont,/* complain_on_overflow */
1257 bfd_elf_generic_reloc, /* special_function */
1258 "R_ARM_LDC_SB_G2", /* name */
1259 FALSE, /* partial_inplace */
1260 0xffffffff, /* src_mask */
1261 0xffffffff, /* dst_mask */
1262 TRUE), /* pcrel_offset */
1263
1264 /* End of group relocations. */
c19d1205 1265
c19d1205
ZW		 1266 HOWTO (R_ARM_MOVW_BREL_NC, /* type */
1267 0, /* rightshift */
1268 2, /* size (0 = byte, 1 = short, 2 = long) */
1269 16, /* bitsize */
1270 FALSE, /* pc_relative */
1271 0, /* bitpos */
1272 complain_overflow_dont,/* complain_on_overflow */
1273 bfd_elf_generic_reloc, /* special_function */
1274 "R_ARM_MOVW_BREL_NC", /* name */
1275 FALSE, /* partial_inplace */
1276 0x0000ffff, /* src_mask */
1277 0x0000ffff, /* dst_mask */
1278 FALSE), /* pcrel_offset */
1279
1280 HOWTO (R_ARM_MOVT_BREL, /* type */
1281 0, /* rightshift */
1282 2, /* size (0 = byte, 1 = short, 2 = long) */
1283 16, /* bitsize */
1284 FALSE, /* pc_relative */
1285 0, /* bitpos */
1286 complain_overflow_bitfield,/* complain_on_overflow */
1287 bfd_elf_generic_reloc, /* special_function */
1288 "R_ARM_MOVT_BREL", /* name */
1289 FALSE, /* partial_inplace */
1290 0x0000ffff, /* src_mask */
1291 0x0000ffff, /* dst_mask */
1292 FALSE), /* pcrel_offset */
1293
1294 HOWTO (R_ARM_MOVW_BREL, /* type */
1295 0, /* rightshift */
1296 2, /* size (0 = byte, 1 = short, 2 = long) */
1297 16, /* bitsize */
1298 FALSE, /* pc_relative */
1299 0, /* bitpos */
1300 complain_overflow_dont,/* complain_on_overflow */
1301 bfd_elf_generic_reloc, /* special_function */
1302 "R_ARM_MOVW_BREL", /* name */
1303 FALSE, /* partial_inplace */
1304 0x0000ffff, /* src_mask */
1305 0x0000ffff, /* dst_mask */
1306 FALSE), /* pcrel_offset */
1307
1308 HOWTO (R_ARM_THM_MOVW_BREL_NC,/* type */
1309 0, /* rightshift */
1310 2, /* size (0 = byte, 1 = short, 2 = long) */
1311 16, /* bitsize */
1312 FALSE, /* pc_relative */
1313 0, /* bitpos */
1314 complain_overflow_dont,/* complain_on_overflow */
1315 bfd_elf_generic_reloc, /* special_function */
1316 "R_ARM_THM_MOVW_BREL_NC",/* name */
1317 FALSE, /* partial_inplace */
1318 0x040f70ff, /* src_mask */
1319 0x040f70ff, /* dst_mask */
1320 FALSE), /* pcrel_offset */
1321
1322 HOWTO (R_ARM_THM_MOVT_BREL, /* type */
1323 0, /* rightshift */
1324 2, /* size (0 = byte, 1 = short, 2 = long) */
1325 16, /* bitsize */
1326 FALSE, /* pc_relative */
1327 0, /* bitpos */
1328 complain_overflow_bitfield,/* complain_on_overflow */
1329 bfd_elf_generic_reloc, /* special_function */
1330 "R_ARM_THM_MOVT_BREL", /* name */
1331 FALSE, /* partial_inplace */
1332 0x040f70ff, /* src_mask */
1333 0x040f70ff, /* dst_mask */
1334 FALSE), /* pcrel_offset */
1335
1336 HOWTO (R_ARM_THM_MOVW_BREL, /* type */
1337 0, /* rightshift */
1338 2, /* size (0 = byte, 1 = short, 2 = long) */
1339 16, /* bitsize */
1340 FALSE, /* pc_relative */
1341 0, /* bitpos */
1342 complain_overflow_dont,/* complain_on_overflow */
1343 bfd_elf_generic_reloc, /* special_function */
1344 "R_ARM_THM_MOVW_BREL", /* name */
1345 FALSE, /* partial_inplace */
1346 0x040f70ff, /* src_mask */
1347 0x040f70ff, /* dst_mask */
1348 FALSE), /* pcrel_offset */
1349
8029a119 1350 EMPTY_HOWTO (90), /* Unallocated. */
c19d1205
ZW		 1351 EMPTY_HOWTO (91),
1352 EMPTY_HOWTO (92),
1353 EMPTY_HOWTO (93),
1354
1355 HOWTO (R_ARM_PLT32_ABS, /* type */
1356 0, /* rightshift */
1357 2, /* size (0 = byte, 1 = short, 2 = long) */
1358 32, /* bitsize */
1359 FALSE, /* pc_relative */
1360 0, /* bitpos */
1361 complain_overflow_dont,/* complain_on_overflow */
1362 bfd_elf_generic_reloc, /* special_function */
1363 "R_ARM_PLT32_ABS", /* name */
1364 FALSE, /* partial_inplace */
1365 0xffffffff, /* src_mask */
1366 0xffffffff, /* dst_mask */
1367 FALSE), /* pcrel_offset */
1368
1369 HOWTO (R_ARM_GOT_ABS, /* type */
1370 0, /* rightshift */
1371 2, /* size (0 = byte, 1 = short, 2 = long) */
1372 32, /* bitsize */
1373 FALSE, /* pc_relative */
1374 0, /* bitpos */
1375 complain_overflow_dont,/* complain_on_overflow */
1376 bfd_elf_generic_reloc, /* special_function */
1377 "R_ARM_GOT_ABS", /* name */
1378 FALSE, /* partial_inplace */
1379 0xffffffff, /* src_mask */
1380 0xffffffff, /* dst_mask */
1381 FALSE), /* pcrel_offset */
1382
1383 HOWTO (R_ARM_GOT_PREL, /* type */
1384 0, /* rightshift */
1385 2, /* size (0 = byte, 1 = short, 2 = long) */
1386 32, /* bitsize */
1387 TRUE, /* pc_relative */
1388 0, /* bitpos */
1389 complain_overflow_dont, /* complain_on_overflow */
1390 bfd_elf_generic_reloc, /* special_function */
1391 "R_ARM_GOT_PREL", /* name */
1392 FALSE, /* partial_inplace */
1393 0xffffffff, /* src_mask */
1394 0xffffffff, /* dst_mask */
1395 TRUE), /* pcrel_offset */
1396
1397 HOWTO (R_ARM_GOT_BREL12, /* type */
1398 0, /* rightshift */
1399 2, /* size (0 = byte, 1 = short, 2 = long) */
1400 12, /* bitsize */
1401 FALSE, /* pc_relative */
1402 0, /* bitpos */
1403 complain_overflow_bitfield,/* complain_on_overflow */
1404 bfd_elf_generic_reloc, /* special_function */
1405 "R_ARM_GOT_BREL12", /* name */
1406 FALSE, /* partial_inplace */
1407 0x00000fff, /* src_mask */
1408 0x00000fff, /* dst_mask */
1409 FALSE), /* pcrel_offset */
1410
1411 HOWTO (R_ARM_GOTOFF12, /* type */
1412 0, /* rightshift */
1413 2, /* size (0 = byte, 1 = short, 2 = long) */
1414 12, /* bitsize */
1415 FALSE, /* pc_relative */
1416 0, /* bitpos */
1417 complain_overflow_bitfield,/* complain_on_overflow */
1418 bfd_elf_generic_reloc, /* special_function */
1419 "R_ARM_GOTOFF12", /* name */
1420 FALSE, /* partial_inplace */
1421 0x00000fff, /* src_mask */
1422 0x00000fff, /* dst_mask */
1423 FALSE), /* pcrel_offset */
1424
1425 EMPTY_HOWTO (R_ARM_GOTRELAX), /* reserved for future GOT-load optimizations */
1426
1427 /* GNU extension to record C++ vtable member usage */
1428 HOWTO (R_ARM_GNU_VTENTRY, /* type */
ba93b8ac
DJ		 1429 0, /* rightshift */
1430 2, /* size (0 = byte, 1 = short, 2 = long) */
c19d1205 1431 0, /* bitsize */
ba93b8ac
DJ		 1432 FALSE, /* pc_relative */
1433 0, /* bitpos */
c19d1205
ZW		 1434 complain_overflow_dont, /* complain_on_overflow */
1435 _bfd_elf_rel_vtable_reloc_fn, /* special_function */
1436 "R_ARM_GNU_VTENTRY", /* name */
1437 FALSE, /* partial_inplace */
1438 0, /* src_mask */
1439 0, /* dst_mask */
1440 FALSE), /* pcrel_offset */
1441
1442 /* GNU extension to record C++ vtable hierarchy */
1443 HOWTO (R_ARM_GNU_VTINHERIT, /* type */
1444 0, /* rightshift */
1445 2, /* size (0 = byte, 1 = short, 2 = long) */
1446 0, /* bitsize */
1447 FALSE, /* pc_relative */
1448 0, /* bitpos */
1449 complain_overflow_dont, /* complain_on_overflow */
1450 NULL, /* special_function */
1451 "R_ARM_GNU_VTINHERIT", /* name */
1452 FALSE, /* partial_inplace */
1453 0, /* src_mask */
1454 0, /* dst_mask */
1455 FALSE), /* pcrel_offset */
1456
1457 HOWTO (R_ARM_THM_JUMP11, /* type */
1458 1, /* rightshift */
1459 1, /* size (0 = byte, 1 = short, 2 = long) */
1460 11, /* bitsize */
1461 TRUE, /* pc_relative */
1462 0, /* bitpos */
1463 complain_overflow_signed, /* complain_on_overflow */
1464 bfd_elf_generic_reloc, /* special_function */
1465 "R_ARM_THM_JUMP11", /* name */
1466 FALSE, /* partial_inplace */
1467 0x000007ff, /* src_mask */
1468 0x000007ff, /* dst_mask */
1469 TRUE), /* pcrel_offset */
1470
1471 HOWTO (R_ARM_THM_JUMP8, /* type */
1472 1, /* rightshift */
1473 1, /* size (0 = byte, 1 = short, 2 = long) */
1474 8, /* bitsize */
1475 TRUE, /* pc_relative */
1476 0, /* bitpos */
1477 complain_overflow_signed, /* complain_on_overflow */
1478 bfd_elf_generic_reloc, /* special_function */
1479 "R_ARM_THM_JUMP8", /* name */
1480 FALSE, /* partial_inplace */
1481 0x000000ff, /* src_mask */
1482 0x000000ff, /* dst_mask */
1483 TRUE), /* pcrel_offset */
ba93b8ac 1484
c19d1205
ZW		 1485 /* TLS relocations */
1486 HOWTO (R_ARM_TLS_GD32, /* type */
ba93b8ac
DJ		 1487 0, /* rightshift */
1488 2, /* size (0 = byte, 1 = short, 2 = long) */
1489 32, /* bitsize */
1490 FALSE, /* pc_relative */
1491 0, /* bitpos */
1492 complain_overflow_bitfield,/* complain_on_overflow */
c19d1205
ZW		 1493 NULL, /* special_function */
1494 "R_ARM_TLS_GD32", /* name */
ba93b8ac
DJ		 1495 TRUE, /* partial_inplace */
1496 0xffffffff, /* src_mask */
1497 0xffffffff, /* dst_mask */
c19d1205 1498 FALSE), /* pcrel_offset */
ba93b8ac 1499
ba93b8ac
DJ		 1500 HOWTO (R_ARM_TLS_LDM32, /* type */
1501 0, /* rightshift */
1502 2, /* size (0 = byte, 1 = short, 2 = long) */
1503 32, /* bitsize */
1504 FALSE, /* pc_relative */
1505 0, /* bitpos */
1506 complain_overflow_bitfield,/* complain_on_overflow */
1507 bfd_elf_generic_reloc, /* special_function */
1508 "R_ARM_TLS_LDM32", /* name */
1509 TRUE, /* partial_inplace */
1510 0xffffffff, /* src_mask */
1511 0xffffffff, /* dst_mask */
c19d1205 1512 FALSE), /* pcrel_offset */
ba93b8ac 1513
c19d1205 1514 HOWTO (R_ARM_TLS_LDO32, /* type */
ba93b8ac
DJ		 1515 0, /* rightshift */
1516 2, /* size (0 = byte, 1 = short, 2 = long) */
1517 32, /* bitsize */
1518 FALSE, /* pc_relative */
1519 0, /* bitpos */
1520 complain_overflow_bitfield,/* complain_on_overflow */
1521 bfd_elf_generic_reloc, /* special_function */
c19d1205 1522 "R_ARM_TLS_LDO32", /* name */
ba93b8ac
DJ		 1523 TRUE, /* partial_inplace */
1524 0xffffffff, /* src_mask */
1525 0xffffffff, /* dst_mask */
c19d1205 1526 FALSE), /* pcrel_offset */
ba93b8ac 1527
ba93b8ac
DJ		 1528 HOWTO (R_ARM_TLS_IE32, /* type */
1529 0, /* rightshift */
1530 2, /* size (0 = byte, 1 = short, 2 = long) */
1531 32, /* bitsize */
1532 FALSE, /* pc_relative */
1533 0, /* bitpos */
1534 complain_overflow_bitfield,/* complain_on_overflow */
1535 NULL, /* special_function */
1536 "R_ARM_TLS_IE32", /* name */
1537 TRUE, /* partial_inplace */
1538 0xffffffff, /* src_mask */
1539 0xffffffff, /* dst_mask */
c19d1205 1540 FALSE), /* pcrel_offset */
7f266840 1541
c19d1205 1542 HOWTO (R_ARM_TLS_LE32, /* type */
7f266840
DJ		 1543 0, /* rightshift */
1544 2, /* size (0 = byte, 1 = short, 2 = long) */
c19d1205 1545 32, /* bitsize */
7f266840
DJ		 1546 FALSE, /* pc_relative */
1547 0, /* bitpos */
c19d1205
ZW		 1548 complain_overflow_bitfield,/* complain_on_overflow */
1549 bfd_elf_generic_reloc, /* special_function */
1550 "R_ARM_TLS_LE32", /* name */
1551 TRUE, /* partial_inplace */
1552 0xffffffff, /* src_mask */
1553 0xffffffff, /* dst_mask */
1554 FALSE), /* pcrel_offset */
7f266840 1555
c19d1205
ZW		 1556 HOWTO (R_ARM_TLS_LDO12, /* type */
1557 0, /* rightshift */
1558 2, /* size (0 = byte, 1 = short, 2 = long) */
1559 12, /* bitsize */
1560 FALSE, /* pc_relative */
7f266840 1561 0, /* bitpos */
c19d1205 1562 complain_overflow_bitfield,/* complain_on_overflow */
7f266840 1563 bfd_elf_generic_reloc, /* special_function */
c19d1205 1564 "R_ARM_TLS_LDO12", /* name */
7f266840 1565 FALSE, /* partial_inplace */
c19d1205
ZW		 1566 0x00000fff, /* src_mask */
1567 0x00000fff, /* dst_mask */
1568 FALSE), /* pcrel_offset */
7f266840 1569
c19d1205
ZW		 1570 HOWTO (R_ARM_TLS_LE12, /* type */
1571 0, /* rightshift */
1572 2, /* size (0 = byte, 1 = short, 2 = long) */
1573 12, /* bitsize */
1574 FALSE, /* pc_relative */
7f266840 1575 0, /* bitpos */
c19d1205 1576 complain_overflow_bitfield,/* complain_on_overflow */
7f266840 1577 bfd_elf_generic_reloc, /* special_function */
c19d1205 1578 "R_ARM_TLS_LE12", /* name */
7f266840 1579 FALSE, /* partial_inplace */
c19d1205
ZW		 1580 0x00000fff, /* src_mask */
1581 0x00000fff, /* dst_mask */
1582 FALSE), /* pcrel_offset */
7f266840 1583
c19d1205 1584 HOWTO (R_ARM_TLS_IE12GP, /* type */
7f266840
DJ		 1585 0, /* rightshift */
1586 2, /* size (0 = byte, 1 = short, 2 = long) */
c19d1205
ZW		 1587 12, /* bitsize */
1588 FALSE, /* pc_relative */
7f266840 1589 0, /* bitpos */
c19d1205 1590 complain_overflow_bitfield,/* complain_on_overflow */
7f266840 1591 bfd_elf_generic_reloc, /* special_function */
c19d1205 1592 "R_ARM_TLS_IE12GP", /* name */
7f266840 1593 FALSE, /* partial_inplace */
c19d1205
ZW		 1594 0x00000fff, /* src_mask */
1595 0x00000fff, /* dst_mask */
1596 FALSE), /* pcrel_offset */
1597};
1598
1599/* 112-127 private relocations
1600 128 R_ARM_ME_TOO, obsolete
1601 129-255 unallocated in AAELF.
7f266840 1602
c19d1205
ZW		 1603 249-255 extended, currently unused, relocations: */
1604
4962c51a 1605static reloc_howto_type elf32_arm_howto_table_2[4] =
7f266840
DJ		 1606{
1607 HOWTO (R_ARM_RREL32, /* type */
1608 0, /* rightshift */
1609 0, /* size (0 = byte, 1 = short, 2 = long) */
1610 0, /* bitsize */
1611 FALSE, /* pc_relative */
1612 0, /* bitpos */
1613 complain_overflow_dont,/* complain_on_overflow */
1614 bfd_elf_generic_reloc, /* special_function */
1615 "R_ARM_RREL32", /* name */
1616 FALSE, /* partial_inplace */
1617 0, /* src_mask */
1618 0, /* dst_mask */
1619 FALSE), /* pcrel_offset */
1620
1621 HOWTO (R_ARM_RABS32, /* type */
1622 0, /* rightshift */
1623 0, /* size (0 = byte, 1 = short, 2 = long) */
1624 0, /* bitsize */
1625 FALSE, /* pc_relative */
1626 0, /* bitpos */
1627 complain_overflow_dont,/* complain_on_overflow */
1628 bfd_elf_generic_reloc, /* special_function */
1629 "R_ARM_RABS32", /* name */
1630 FALSE, /* partial_inplace */
1631 0, /* src_mask */
1632 0, /* dst_mask */
1633 FALSE), /* pcrel_offset */
1634
1635 HOWTO (R_ARM_RPC24, /* type */
1636 0, /* rightshift */
1637 0, /* size (0 = byte, 1 = short, 2 = long) */
1638 0, /* bitsize */
1639 FALSE, /* pc_relative */
1640 0, /* bitpos */
1641 complain_overflow_dont,/* complain_on_overflow */
1642 bfd_elf_generic_reloc, /* special_function */
1643 "R_ARM_RPC24", /* name */
1644 FALSE, /* partial_inplace */
1645 0, /* src_mask */
1646 0, /* dst_mask */
1647 FALSE), /* pcrel_offset */
1648
1649 HOWTO (R_ARM_RBASE, /* type */
1650 0, /* rightshift */
1651 0, /* size (0 = byte, 1 = short, 2 = long) */
1652 0, /* bitsize */
1653 FALSE, /* pc_relative */
1654 0, /* bitpos */
1655 complain_overflow_dont,/* complain_on_overflow */
1656 bfd_elf_generic_reloc, /* special_function */
1657 "R_ARM_RBASE", /* name */
1658 FALSE, /* partial_inplace */
1659 0, /* src_mask */
1660 0, /* dst_mask */
1661 FALSE) /* pcrel_offset */
1662};
1663
1664static reloc_howto_type *
1665elf32_arm_howto_from_type (unsigned int r_type)
1666{
906e58ca 1667 if (r_type < ARRAY_SIZE (elf32_arm_howto_table_1))
c19d1205 1668 return &elf32_arm_howto_table_1[r_type];
ba93b8ac 1669
c19d1205 1670 if (r_type >= R_ARM_RREL32
906e58ca 1671 && r_type < R_ARM_RREL32 + ARRAY_SIZE (elf32_arm_howto_table_2))
4962c51a 1672 return &elf32_arm_howto_table_2[r_type - R_ARM_RREL32];
7f266840 1673
c19d1205 1674 return NULL;
7f266840
DJ		 1675}
1676
1677static void
1678elf32_arm_info_to_howto (bfd * abfd ATTRIBUTE_UNUSED, arelent * bfd_reloc,
1679 Elf_Internal_Rela * elf_reloc)
1680{
1681 unsigned int r_type;
1682
1683 r_type = ELF32_R_TYPE (elf_reloc->r_info);
1684 bfd_reloc->howto = elf32_arm_howto_from_type (r_type);
1685}
1686
1687struct elf32_arm_reloc_map
1688 {
1689 bfd_reloc_code_real_type bfd_reloc_val;
1690 unsigned char elf_reloc_val;
1691 };
1692
1693/* All entries in this list must also be present in elf32_arm_howto_table. */
1694static const struct elf32_arm_reloc_map elf32_arm_reloc_map[] =
1695 {
1696 {BFD_RELOC_NONE, R_ARM_NONE},
1697 {BFD_RELOC_ARM_PCREL_BRANCH, R_ARM_PC24},
39b41c9c
PB		 1698 {BFD_RELOC_ARM_PCREL_CALL, R_ARM_CALL},
1699 {BFD_RELOC_ARM_PCREL_JUMP, R_ARM_JUMP24},
7f266840
DJ		 1700 {BFD_RELOC_ARM_PCREL_BLX, R_ARM_XPC25},
1701 {BFD_RELOC_THUMB_PCREL_BLX, R_ARM_THM_XPC22},
1702 {BFD_RELOC_32, R_ARM_ABS32},
1703 {BFD_RELOC_32_PCREL, R_ARM_REL32},
1704 {BFD_RELOC_8, R_ARM_ABS8},
1705 {BFD_RELOC_16, R_ARM_ABS16},
1706 {BFD_RELOC_ARM_OFFSET_IMM, R_ARM_ABS12},
1707 {BFD_RELOC_ARM_THUMB_OFFSET, R_ARM_THM_ABS5},
c19d1205
ZW		 1708 {BFD_RELOC_THUMB_PCREL_BRANCH25, R_ARM_THM_JUMP24},
1709 {BFD_RELOC_THUMB_PCREL_BRANCH23, R_ARM_THM_CALL},
1710 {BFD_RELOC_THUMB_PCREL_BRANCH12, R_ARM_THM_JUMP11},
1711 {BFD_RELOC_THUMB_PCREL_BRANCH20, R_ARM_THM_JUMP19},
1712 {BFD_RELOC_THUMB_PCREL_BRANCH9, R_ARM_THM_JUMP8},
1713 {BFD_RELOC_THUMB_PCREL_BRANCH7, R_ARM_THM_JUMP6},
7f266840
DJ		 1714 {BFD_RELOC_ARM_GLOB_DAT, R_ARM_GLOB_DAT},
1715 {BFD_RELOC_ARM_JUMP_SLOT, R_ARM_JUMP_SLOT},
1716 {BFD_RELOC_ARM_RELATIVE, R_ARM_RELATIVE},
c19d1205 1717 {BFD_RELOC_ARM_GOTOFF, R_ARM_GOTOFF32},
7f266840
DJ		 1718 {BFD_RELOC_ARM_GOTPC, R_ARM_GOTPC},
1719 {BFD_RELOC_ARM_GOT32, R_ARM_GOT32},
1720 {BFD_RELOC_ARM_PLT32, R_ARM_PLT32},
1721 {BFD_RELOC_ARM_TARGET1, R_ARM_TARGET1},
1722 {BFD_RELOC_ARM_ROSEGREL32, R_ARM_ROSEGREL32},
1723 {BFD_RELOC_ARM_SBREL32, R_ARM_SBREL32},
1724 {BFD_RELOC_ARM_PREL31, R_ARM_PREL31},
ba93b8ac
DJ		 1725 {BFD_RELOC_ARM_TARGET2, R_ARM_TARGET2},
1726 {BFD_RELOC_ARM_PLT32, R_ARM_PLT32},
1727 {BFD_RELOC_ARM_TLS_GD32, R_ARM_TLS_GD32},
1728 {BFD_RELOC_ARM_TLS_LDO32, R_ARM_TLS_LDO32},
1729 {BFD_RELOC_ARM_TLS_LDM32, R_ARM_TLS_LDM32},
1730 {BFD_RELOC_ARM_TLS_DTPMOD32, R_ARM_TLS_DTPMOD32},
1731 {BFD_RELOC_ARM_TLS_DTPOFF32, R_ARM_TLS_DTPOFF32},
1732 {BFD_RELOC_ARM_TLS_TPOFF32, R_ARM_TLS_TPOFF32},
1733 {BFD_RELOC_ARM_TLS_IE32, R_ARM_TLS_IE32},
1734 {BFD_RELOC_ARM_TLS_LE32, R_ARM_TLS_LE32},
c19d1205
ZW		 1735 {BFD_RELOC_VTABLE_INHERIT, R_ARM_GNU_VTINHERIT},
1736 {BFD_RELOC_VTABLE_ENTRY, R_ARM_GNU_VTENTRY},
b6895b4f
PB		 1737 {BFD_RELOC_ARM_MOVW, R_ARM_MOVW_ABS_NC},
1738 {BFD_RELOC_ARM_MOVT, R_ARM_MOVT_ABS},
1739 {BFD_RELOC_ARM_MOVW_PCREL, R_ARM_MOVW_PREL_NC},
1740 {BFD_RELOC_ARM_MOVT_PCREL, R_ARM_MOVT_PREL},
1741 {BFD_RELOC_ARM_THUMB_MOVW, R_ARM_THM_MOVW_ABS_NC},
1742 {BFD_RELOC_ARM_THUMB_MOVT, R_ARM_THM_MOVT_ABS},
1743 {BFD_RELOC_ARM_THUMB_MOVW_PCREL, R_ARM_THM_MOVW_PREL_NC},
1744 {BFD_RELOC_ARM_THUMB_MOVT_PCREL, R_ARM_THM_MOVT_PREL},
4962c51a
MS		 1745 {BFD_RELOC_ARM_ALU_PC_G0_NC, R_ARM_ALU_PC_G0_NC},
1746 {BFD_RELOC_ARM_ALU_PC_G0, R_ARM_ALU_PC_G0},
1747 {BFD_RELOC_ARM_ALU_PC_G1_NC, R_ARM_ALU_PC_G1_NC},
1748 {BFD_RELOC_ARM_ALU_PC_G1, R_ARM_ALU_PC_G1},
1749 {BFD_RELOC_ARM_ALU_PC_G2, R_ARM_ALU_PC_G2},
1750 {BFD_RELOC_ARM_LDR_PC_G0, R_ARM_LDR_PC_G0},
1751 {BFD_RELOC_ARM_LDR_PC_G1, R_ARM_LDR_PC_G1},
1752 {BFD_RELOC_ARM_LDR_PC_G2, R_ARM_LDR_PC_G2},
1753 {BFD_RELOC_ARM_LDRS_PC_G0, R_ARM_LDRS_PC_G0},
1754 {BFD_RELOC_ARM_LDRS_PC_G1, R_ARM_LDRS_PC_G1},
1755 {BFD_RELOC_ARM_LDRS_PC_G2, R_ARM_LDRS_PC_G2},
1756 {BFD_RELOC_ARM_LDC_PC_G0, R_ARM_LDC_PC_G0},
1757 {BFD_RELOC_ARM_LDC_PC_G1, R_ARM_LDC_PC_G1},
1758 {BFD_RELOC_ARM_LDC_PC_G2, R_ARM_LDC_PC_G2},
1759 {BFD_RELOC_ARM_ALU_SB_G0_NC, R_ARM_ALU_SB_G0_NC},
1760 {BFD_RELOC_ARM_ALU_SB_G0, R_ARM_ALU_SB_G0},
1761 {BFD_RELOC_ARM_ALU_SB_G1_NC, R_ARM_ALU_SB_G1_NC},
1762 {BFD_RELOC_ARM_ALU_SB_G1, R_ARM_ALU_SB_G1},
1763 {BFD_RELOC_ARM_ALU_SB_G2, R_ARM_ALU_SB_G2},
1764 {BFD_RELOC_ARM_LDR_SB_G0, R_ARM_LDR_SB_G0},
1765 {BFD_RELOC_ARM_LDR_SB_G1, R_ARM_LDR_SB_G1},
1766 {BFD_RELOC_ARM_LDR_SB_G2, R_ARM_LDR_SB_G2},
1767 {BFD_RELOC_ARM_LDRS_SB_G0, R_ARM_LDRS_SB_G0},
1768 {BFD_RELOC_ARM_LDRS_SB_G1, R_ARM_LDRS_SB_G1},
1769 {BFD_RELOC_ARM_LDRS_SB_G2, R_ARM_LDRS_SB_G2},
1770 {BFD_RELOC_ARM_LDC_SB_G0, R_ARM_LDC_SB_G0},
1771 {BFD_RELOC_ARM_LDC_SB_G1, R_ARM_LDC_SB_G1},
845b51d6
PB		 1772 {BFD_RELOC_ARM_LDC_SB_G2, R_ARM_LDC_SB_G2},
1773 {BFD_RELOC_ARM_V4BX, R_ARM_V4BX}
7f266840
DJ		 1774 };
1775
1776static reloc_howto_type *
f1c71a59
ZW		 1777elf32_arm_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1778 bfd_reloc_code_real_type code)
7f266840
DJ		 1779{
1780 unsigned int i;
8029a119 1781
906e58ca 1782 for (i = 0; i < ARRAY_SIZE (elf32_arm_reloc_map); i ++)
c19d1205
ZW		 1783 if (elf32_arm_reloc_map[i].bfd_reloc_val == code)
1784 return elf32_arm_howto_from_type (elf32_arm_reloc_map[i].elf_reloc_val);
7f266840 1785
c19d1205 1786 return NULL;
7f266840
DJ		 1787}
1788
157090f7
AM		 1789static reloc_howto_type *
1790elf32_arm_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1791 const char *r_name)
1792{
1793 unsigned int i;
1794
906e58ca 1795 for (i = 0; i < ARRAY_SIZE (elf32_arm_howto_table_1); i++)
157090f7
AM		 1796 if (elf32_arm_howto_table_1[i].name != NULL
1797 && strcasecmp (elf32_arm_howto_table_1[i].name, r_name) == 0)
1798 return &elf32_arm_howto_table_1[i];
1799
906e58ca 1800 for (i = 0; i < ARRAY_SIZE (elf32_arm_howto_table_2); i++)
157090f7
AM		 1801 if (elf32_arm_howto_table_2[i].name != NULL
1802 && strcasecmp (elf32_arm_howto_table_2[i].name, r_name) == 0)
1803 return &elf32_arm_howto_table_2[i];
1804
1805 return NULL;
1806}
1807
906e58ca
NC		 1808/* Support for core dump NOTE sections. */
1809
7f266840 1810static bfd_boolean
f1c71a59 1811elf32_arm_nabi_grok_prstatus (bfd *abfd, Elf_Internal_Note *note)
7f266840
DJ		 1812{
1813 int offset;
1814 size_t size;
1815
1816 switch (note->descsz)
1817 {
1818 default:
1819 return FALSE;
1820
8029a119 1821 case 148: /* Linux/ARM 32-bit. */
7f266840
DJ		 1822 /* pr_cursig */
1823 elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
1824
1825 /* pr_pid */
1826 elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
1827
1828 /* pr_reg */
1829 offset = 72;
1830 size = 72;
1831
1832 break;
1833 }
1834
1835 /* Make a ".reg/999" section. */
1836 return _bfd_elfcore_make_pseudosection (abfd, ".reg",
1837 size, note->descpos + offset);
1838}
1839
1840static bfd_boolean
f1c71a59 1841elf32_arm_nabi_grok_psinfo (bfd *abfd, Elf_Internal_Note *note)
7f266840
DJ		 1842{
1843 switch (note->descsz)
1844 {
1845 default:
1846 return FALSE;
1847
8029a119 1848 case 124: /* Linux/ARM elf_prpsinfo. */
7f266840
DJ		 1849 elf_tdata (abfd)->core_program
1850 = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
1851 elf_tdata (abfd)->core_command
1852 = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
1853 }
1854
1855 /* Note that for some reason, a spurious space is tacked
1856 onto the end of the args in some (at least one anyway)
1857 implementations, so strip it off if it exists. */
7f266840
DJ		 1858 {
1859 char *command = elf_tdata (abfd)->core_command;
1860 int n = strlen (command);
1861
1862 if (0 < n && command[n - 1] == ' ')
1863 command[n - 1] = '\0';
1864 }
1865
1866 return TRUE;
1867}
1868
1869#define TARGET_LITTLE_SYM bfd_elf32_littlearm_vec
1870#define TARGET_LITTLE_NAME "elf32-littlearm"
1871#define TARGET_BIG_SYM bfd_elf32_bigarm_vec
1872#define TARGET_BIG_NAME "elf32-bigarm"
1873
1874#define elf_backend_grok_prstatus elf32_arm_nabi_grok_prstatus
1875#define elf_backend_grok_psinfo elf32_arm_nabi_grok_psinfo
1876
252b5132
RH		 1877typedef unsigned long int insn32;
1878typedef unsigned short int insn16;
1879
3a4a14e9
PB		 1880/* In lieu of proper flags, assume all EABIv4 or later objects are
1881 interworkable. */
57e8b36a 1882#define INTERWORK_FLAG(abfd) \
3a4a14e9 1883 (EF_ARM_EABI_VERSION (elf_elfheader (abfd)->e_flags) >= EF_ARM_EABI_VER4 \
85a84e7a 1884 || (elf_elfheader (abfd)->e_flags & EF_ARM_INTERWORK))
9b485d32 1885
252b5132
RH		 1886/* The linker script knows the section names for placement.
1887 The entry_names are used to do simple name mangling on the stubs.
1888 Given a function name, and its type, the stub can be found. The
9b485d32 1889 name can be changed. The only requirement is the %s be present. */
252b5132
RH		 1890#define THUMB2ARM_GLUE_SECTION_NAME ".glue_7t"
1891#define THUMB2ARM_GLUE_ENTRY_NAME "__%s_from_thumb"
1892
1893#define ARM2THUMB_GLUE_SECTION_NAME ".glue_7"
1894#define ARM2THUMB_GLUE_ENTRY_NAME "__%s_from_arm"
1895
c7b8f16e
JB		 1896#define VFP11_ERRATUM_VENEER_SECTION_NAME ".vfp11_veneer"
1897#define VFP11_ERRATUM_VENEER_ENTRY_NAME "__vfp11_veneer_%x"
1898
845b51d6
PB		 1899#define ARM_BX_GLUE_SECTION_NAME ".v4_bx"
1900#define ARM_BX_GLUE_ENTRY_NAME "__bx_r%d"
1901
7413f23f
DJ		 1902#define STUB_ENTRY_NAME "__%s_veneer"
1903
252b5132
RH		 1904/* The name of the dynamic interpreter. This is put in the .interp
1905 section. */
1906#define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
1907
5e681ec4
PB		 1908#ifdef FOUR_WORD_PLT
1909
252b5132
RH		 1910/* The first entry in a procedure linkage table looks like
1911 this. It is set up so that any shared library function that is
59f2c4e7 1912 called before the relocation has been set up calls the dynamic
9b485d32 1913 linker first. */
e5a52504 1914static const bfd_vma elf32_arm_plt0_entry [] =
5e681ec4
PB		 1915 {
1916 0xe52de004, /* str lr, [sp, #-4]! */
1917 0xe59fe010, /* ldr lr, [pc, #16] */
1918 0xe08fe00e, /* add lr, pc, lr */
1919 0xe5bef008, /* ldr pc, [lr, #8]! */
1920 };
1921
1922/* Subsequent entries in a procedure linkage table look like
1923 this. */
e5a52504 1924static const bfd_vma elf32_arm_plt_entry [] =
5e681ec4
PB		 1925 {
1926 0xe28fc600, /* add ip, pc, #NN */
1927 0xe28cca00, /* add ip, ip, #NN */
1928 0xe5bcf000, /* ldr pc, [ip, #NN]! */
1929 0x00000000, /* unused */
1930 };
1931
1932#else
1933
5e681ec4
PB		 1934/* The first entry in a procedure linkage table looks like
1935 this. It is set up so that any shared library function that is
1936 called before the relocation has been set up calls the dynamic
1937 linker first. */
e5a52504 1938static const bfd_vma elf32_arm_plt0_entry [] =
917583ad 1939 {
5e681ec4
PB		 1940 0xe52de004, /* str lr, [sp, #-4]! */
1941 0xe59fe004, /* ldr lr, [pc, #4] */
1942 0xe08fe00e, /* add lr, pc, lr */
1943 0xe5bef008, /* ldr pc, [lr, #8]! */
1944 0x00000000, /* &GOT[0] - . */
917583ad 1945 };
252b5132
RH		 1946
1947/* Subsequent entries in a procedure linkage table look like
1948 this. */
e5a52504 1949static const bfd_vma elf32_arm_plt_entry [] =
5e681ec4
PB		 1950 {
1951 0xe28fc600, /* add ip, pc, #0xNN00000 */
1952 0xe28cca00, /* add ip, ip, #0xNN000 */
1953 0xe5bcf000, /* ldr pc, [ip, #0xNNN]! */
1954 };
1955
1956#endif
252b5132 1957
00a97672
RS		 1958/* The format of the first entry in the procedure linkage table
1959 for a VxWorks executable. */
1960static const bfd_vma elf32_arm_vxworks_exec_plt0_entry[] =
1961 {
1962 0xe52dc008, /* str ip,[sp,#-8]! */
1963 0xe59fc000, /* ldr ip,[pc] */
1964 0xe59cf008, /* ldr pc,[ip,#8] */
1965 0x00000000, /* .long _GLOBAL_OFFSET_TABLE_ */
1966 };
1967
1968/* The format of subsequent entries in a VxWorks executable. */
1969static const bfd_vma elf32_arm_vxworks_exec_plt_entry[] =
1970 {
1971 0xe59fc000, /* ldr ip,[pc] */
1972 0xe59cf000, /* ldr pc,[ip] */
1973 0x00000000, /* .long @got */
1974 0xe59fc000, /* ldr ip,[pc] */
1975 0xea000000, /* b _PLT */
1976 0x00000000, /* .long @pltindex*sizeof(Elf32_Rela) */
1977 };
1978
1979/* The format of entries in a VxWorks shared library. */
1980static const bfd_vma elf32_arm_vxworks_shared_plt_entry[] =
1981 {
1982 0xe59fc000, /* ldr ip,[pc] */
1983 0xe79cf009, /* ldr pc,[ip,r9] */
1984 0x00000000, /* .long @got */
1985 0xe59fc000, /* ldr ip,[pc] */
1986 0xe599f008, /* ldr pc,[r9,#8] */
1987 0x00000000, /* .long @pltindex*sizeof(Elf32_Rela) */
1988 };
1989
b7693d02
DJ		 1990/* An initial stub used if the PLT entry is referenced from Thumb code. */
1991#define PLT_THUMB_STUB_SIZE 4
1992static const bfd_vma elf32_arm_plt_thumb_stub [] =
1993 {
1994 0x4778, /* bx pc */
1995 0x46c0 /* nop */
1996 };
1997
e5a52504
MM		 1998/* The entries in a PLT when using a DLL-based target with multiple
1999 address spaces. */
906e58ca 2000static const bfd_vma elf32_arm_symbian_plt_entry [] =
e5a52504 2001 {
83a358aa 2002 0xe51ff004, /* ldr pc, [pc, #-4] */
e5a52504
MM		 2003 0x00000000, /* dcd R_ARM_GLOB_DAT(X) */
2004 };
2005
906e58ca
NC		 2006#define ARM_MAX_FWD_BRANCH_OFFSET ((((1 << 23) - 1) << 2) + 8)
2007#define ARM_MAX_BWD_BRANCH_OFFSET ((-((1 << 23) << 2)) + 8)
2008#define THM_MAX_FWD_BRANCH_OFFSET ((1 << 22) -2 + 4)
2009#define THM_MAX_BWD_BRANCH_OFFSET (-(1 << 22) + 4)
2010#define THM2_MAX_FWD_BRANCH_OFFSET (((1 << 24) - 2) + 4)
2011#define THM2_MAX_BWD_BRANCH_OFFSET (-(1 << 24) + 4)
2012
461a49ca
DJ		 2013enum stub_insn_type
2014 {
2015 THUMB16_TYPE = 1,
2016 THUMB32_TYPE,
2017 ARM_TYPE,
2018 DATA_TYPE
2019 };
2020
461a49ca
DJ		 2021#define THUMB16_INSN(X) {(X), THUMB16_TYPE, R_ARM_NONE, 0}
2022#define THUMB32_INSN(X) {(X), THUMB32_TYPE, R_ARM_NONE, 0}
2023#define ARM_INSN(X) {(X), ARM_TYPE, R_ARM_NONE, 0}
2024#define ARM_REL_INSN(X, Z) {(X), ARM_TYPE, R_ARM_JUMP24, (Z)}
2025#define DATA_WORD(X,Y,Z) {(X), DATA_TYPE, (Y), (Z)}
2026
2027typedef struct
2028{
2029 bfd_vma data;
2030 enum stub_insn_type type;
ebe24dd4 2031 unsigned int r_type;
461a49ca
DJ		 2032 int reloc_addend;
2033} insn_sequence;
2034
fea2b4d6
CL		 2035/* Arm/Thumb -> Arm/Thumb long branch stub. On V5T and above, use blx
2036 to reach the stub if necessary. */
461a49ca 2037static const insn_sequence elf32_arm_stub_long_branch_any_any[] =
906e58ca 2038 {
461a49ca
DJ		 2039 ARM_INSN(0xe51ff004), /* ldr pc, [pc, #-4] */
2040 DATA_WORD(0, R_ARM_ABS32, 0), /* dcd R_ARM_ABS32(X) */
906e58ca
NC		 2041 };
2042
fea2b4d6
CL		 2043/* V4T Arm -> Thumb long branch stub. Used on V4T where blx is not
2044 available. */
461a49ca 2045static const insn_sequence elf32_arm_stub_long_branch_v4t_arm_thumb[] =
906e58ca 2046 {
461a49ca
DJ		 2047 ARM_INSN(0xe59fc000), /* ldr ip, [pc, #0] */
2048 ARM_INSN(0xe12fff1c), /* bx ip */
2049 DATA_WORD(0, R_ARM_ABS32, 0), /* dcd R_ARM_ABS32(X) */
906e58ca
NC		 2050 };
2051
fea2b4d6
CL		 2052/* Thumb -> Thumb long branch stub. Used on architectures which
2053 support only this mode, or on V4T where it is expensive to switch
2054 to ARM. */
461a49ca 2055static const insn_sequence elf32_arm_stub_long_branch_thumb_only[] =
906e58ca 2056 {
461a49ca
DJ		 2057 THUMB16_INSN(0xb401), /* push {r0} */
2058 THUMB16_INSN(0x4802), /* ldr r0, [pc, #8] */
2059 THUMB16_INSN(0x4684), /* mov ip, r0 */
2060 THUMB16_INSN(0xbc01), /* pop {r0} */
2061 THUMB16_INSN(0x4760), /* bx ip */
2062 THUMB16_INSN(0xbf00), /* nop */
2063 DATA_WORD(0, R_ARM_ABS32, 0), /* dcd R_ARM_ABS32(X) */
906e58ca
NC		 2064 };
2065
fea2b4d6
CL		 2066/* V4T Thumb -> ARM long branch stub. Used on V4T where blx is not
2067 available. */
461a49ca 2068static const insn_sequence elf32_arm_stub_long_branch_v4t_thumb_arm[] =
906e58ca 2069 {
461a49ca
DJ		 2070 THUMB16_INSN(0x4778), /* bx pc */
2071 THUMB16_INSN(0x46c0), /* nop */
2072 ARM_INSN(0xe51ff004), /* ldr pc, [pc, #-4] */
2073 DATA_WORD(0, R_ARM_ABS32, 0), /* dcd R_ARM_ABS32(X) */
906e58ca
NC		 2074 };
2075
fea2b4d6
CL		 2076/* V4T Thumb -> ARM short branch stub. Shorter variant of the above
2077 one, when the destination is close enough. */
461a49ca 2078static const insn_sequence elf32_arm_stub_short_branch_v4t_thumb_arm[] =
c820be07 2079 {
461a49ca
DJ		 2080 THUMB16_INSN(0x4778), /* bx pc */
2081 THUMB16_INSN(0x46c0), /* nop */
2082 ARM_REL_INSN(0xea000000, -8), /* b (X-8) */
c820be07
NC		 2083 };
2084
cf3eccff 2085/* ARM/Thumb -> ARM long branch stub, PIC. On V5T and above, use
fea2b4d6 2086 blx to reach the stub if necessary. */
cf3eccff 2087static const insn_sequence elf32_arm_stub_long_branch_any_arm_pic[] =
906e58ca 2088 {
461a49ca
DJ		 2089 ARM_INSN(0xe59fc000), /* ldr r12, [pc] */
2090 ARM_INSN(0xe08ff00c), /* add pc, pc, ip */
2091 DATA_WORD(0, R_ARM_REL32, -4), /* dcd R_ARM_REL32(X-4) */
906e58ca
NC		 2092 };
2093
cf3eccff
DJ		 2094/* ARM/Thumb -> Thumb long branch stub, PIC. On V5T and above, use
2095 blx to reach the stub if necessary. We can not add into pc;
2096 it is not guaranteed to mode switch (different in ARMv6 and
2097 ARMv7). */
2098static const insn_sequence elf32_arm_stub_long_branch_any_thumb_pic[] =
2099 {
2100 ARM_INSN(0xe59fc004), /* ldr r12, [pc, #4] */
2101 ARM_INSN(0xe08fc00c), /* add ip, pc, ip */
2102 ARM_INSN(0xe12fff1c), /* bx ip */
2103 DATA_WORD(0, R_ARM_REL32, 0), /* dcd R_ARM_REL32(X) */
2104 };
2105
ebe24dd4
CL		 2106/* V4T ARM -> ARM long branch stub, PIC. */
2107static const insn_sequence elf32_arm_stub_long_branch_v4t_arm_thumb_pic[] =
2108 {
2109 ARM_INSN(0xe59fc004), /* ldr ip, [pc, #4] */
2110 ARM_INSN(0xe08fc00c), /* add ip, pc, ip */
2111 ARM_INSN(0xe12fff1c), /* bx ip */
2112 DATA_WORD(0, R_ARM_REL32, 0), /* dcd R_ARM_REL32(X) */
2113 };
2114
2115/* V4T Thumb -> ARM long branch stub, PIC. */
2116static const insn_sequence elf32_arm_stub_long_branch_v4t_thumb_arm_pic[] =
2117 {
2118 THUMB16_INSN(0x4778), /* bx pc */
2119 THUMB16_INSN(0x46c0), /* nop */
2120 ARM_INSN(0xe59fc000), /* ldr ip, [pc, #0] */
2121 ARM_INSN(0xe08cf00f), /* add pc, ip, pc */
2122 DATA_WORD(0, R_ARM_REL32, -4), /* dcd R_ARM_REL32(X) */
2123 };
2124
2125/* Thumb -> Thumb long branch stub, PIC. Used on architectures which
2126 support only this mode, or on V4T where it is expensive to switch
2127 to ARM. */
2128static const insn_sequence elf32_arm_stub_long_branch_thumb_only_pic[] =
2129 {
2130 THUMB16_INSN(0xb401), /* push {r0} */
2131 THUMB16_INSN(0x4802), /* ldr r0, [pc, #8] */
2132 THUMB16_INSN(0x46fc), /* mov ip, pc */
2133 THUMB16_INSN(0x4484), /* add ip, r0 */
2134 THUMB16_INSN(0xbc01), /* pop {r0} */
2135 THUMB16_INSN(0x4760), /* bx ip */
2136 DATA_WORD(0, R_ARM_REL32, 4), /* dcd R_ARM_REL32(X) */
2137 };
2138
906e58ca
NC		 2139/* Section name for stubs is the associated section name plus this
2140 string. */
2141#define STUB_SUFFIX ".stub"
2142
2143enum elf32_arm_stub_type
2144{
2145 arm_stub_none,
fea2b4d6
CL		 2146 arm_stub_long_branch_any_any,
2147 arm_stub_long_branch_v4t_arm_thumb,
2148 arm_stub_long_branch_thumb_only,
2149 arm_stub_long_branch_v4t_thumb_arm,
2150 arm_stub_short_branch_v4t_thumb_arm,
cf3eccff
DJ		 2151 arm_stub_long_branch_any_arm_pic,
2152 arm_stub_long_branch_any_thumb_pic,
ebe24dd4
CL		 2153 arm_stub_long_branch_v4t_arm_thumb_pic,
2154 arm_stub_long_branch_v4t_thumb_arm_pic,
2155 arm_stub_long_branch_thumb_only_pic,
906e58ca
NC		 2156};
2157
2158struct elf32_arm_stub_hash_entry
2159{
2160 /* Base hash table entry structure. */
2161 struct bfd_hash_entry root;
2162
2163 /* The stub section. */
2164 asection *stub_sec;
2165
2166 /* Offset within stub_sec of the beginning of this stub. */
2167 bfd_vma stub_offset;
2168
2169 /* Given the symbol's value and its section we can determine its final
2170 value when building the stubs (so the stub knows where to jump). */
2171 bfd_vma target_value;
2172 asection *target_section;
2173
461a49ca 2174 /* The stub type. */
906e58ca 2175 enum elf32_arm_stub_type stub_type;
461a49ca
DJ		 2176 /* Its encoding size in bytes. */
2177 int stub_size;
2178 /* Its template. */
2179 const insn_sequence *stub_template;
2180 /* The size of the template (number of entries). */
2181 int stub_template_size;
906e58ca
NC		 2182
2183 /* The symbol table entry, if any, that this was derived from. */
2184 struct elf32_arm_link_hash_entry *h;
2185
2186 /* Destination symbol type (STT_ARM_TFUNC, ...) */
2187 unsigned char st_type;
2188
2189 /* Where this stub is being called from, or, in the case of combined
2190 stub sections, the first input section in the group. */
2191 asection *id_sec;
7413f23f
DJ		 2192
2193 /* The name for the local symbol at the start of this stub. The
2194 stub name in the hash table has to be unique; this does not, so
2195 it can be friendlier. */
2196 char *output_name;
906e58ca
NC		 2197};
2198
e489d0ae
PB		 2199/* Used to build a map of a section. This is required for mixed-endian
2200 code/data. */
2201
2202typedef struct elf32_elf_section_map
2203{
2204 bfd_vma vma;
2205 char type;
2206}
2207elf32_arm_section_map;
2208
c7b8f16e
JB		 2209/* Information about a VFP11 erratum veneer, or a branch to such a veneer. */
2210
2211typedef enum
2212{
2213 VFP11_ERRATUM_BRANCH_TO_ARM_VENEER,
2214 VFP11_ERRATUM_BRANCH_TO_THUMB_VENEER,
2215 VFP11_ERRATUM_ARM_VENEER,
2216 VFP11_ERRATUM_THUMB_VENEER
2217}
2218elf32_vfp11_erratum_type;
2219
2220typedef struct elf32_vfp11_erratum_list
2221{
2222 struct elf32_vfp11_erratum_list *next;
2223 bfd_vma vma;
2224 union
2225 {
2226 struct
2227 {
2228 struct elf32_vfp11_erratum_list *veneer;
2229 unsigned int vfp_insn;
2230 } b;
2231 struct
2232 {
2233 struct elf32_vfp11_erratum_list *branch;
2234 unsigned int id;
2235 } v;
2236 } u;
2237 elf32_vfp11_erratum_type type;
2238}
2239elf32_vfp11_erratum_list;
2240
8e3de13a 2241typedef struct _arm_elf_section_data
e489d0ae
PB		 2242{
2243 struct bfd_elf_section_data elf;
8e3de13a 2244 unsigned int mapcount;
c7b8f16e 2245 unsigned int mapsize;
e489d0ae 2246 elf32_arm_section_map *map;
c7b8f16e
JB		 2247 unsigned int erratumcount;
2248 elf32_vfp11_erratum_list *erratumlist;
8e3de13a
NC		 2249}
2250_arm_elf_section_data;
e489d0ae
PB		 2251
2252#define elf32_arm_section_data(sec) \
8e3de13a 2253 ((_arm_elf_section_data *) elf_section_data (sec))
e489d0ae 2254
ba93b8ac
DJ		 2255/* The size of the thread control block. */
2256#define TCB_SIZE 8
2257
0ffa91dd 2258struct elf_arm_obj_tdata
ba93b8ac
DJ		 2259{
2260 struct elf_obj_tdata root;
2261
2262 /* tls_type for each local got entry. */
2263 char *local_got_tls_type;
ee065d83 2264
bf21ed78
MS		 2265 /* Zero to warn when linking objects with incompatible enum sizes. */
2266 int no_enum_size_warning;
a9dc9481
JM		 2267
2268 /* Zero to warn when linking objects with incompatible wchar_t sizes. */
2269 int no_wchar_size_warning;
ba93b8ac
DJ		 2270};
2271
0ffa91dd
NC		 2272#define elf_arm_tdata(bfd) \
2273 ((struct elf_arm_obj_tdata *) (bfd)->tdata.any)
ba93b8ac 2274
0ffa91dd
NC		 2275#define elf32_arm_local_got_tls_type(bfd) \
2276 (elf_arm_tdata (bfd)->local_got_tls_type)
2277
2278#define is_arm_elf(bfd) \
2279 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
2280 && elf_tdata (bfd) != NULL \
2281 && elf_object_id (bfd) == ARM_ELF_TDATA)
ba93b8ac
DJ		 2282
2283static bfd_boolean
2284elf32_arm_mkobject (bfd *abfd)
2285{
0ffa91dd
NC		 2286 return bfd_elf_allocate_object (abfd, sizeof (struct elf_arm_obj_tdata),
2287 ARM_ELF_TDATA);
ba93b8ac
DJ		 2288}
2289
252b5132
RH		 2290/* The ARM linker needs to keep track of the number of relocs that it
2291 decides to copy in check_relocs for each symbol. This is so that
2292 it can discard PC relative relocs if it doesn't need them when
2293 linking with -Bsymbolic. We store the information in a field
2294 extending the regular ELF linker hash table. */
2295
ba93b8ac
DJ		 2296/* This structure keeps track of the number of relocs we have copied
2297 for a given symbol. */
5e681ec4 2298struct elf32_arm_relocs_copied
917583ad
NC		 2299 {
2300 /* Next section. */
5e681ec4 2301 struct elf32_arm_relocs_copied * next;
917583ad
NC		 2302 /* A section in dynobj. */
2303 asection * section;
2304 /* Number of relocs copied in this section. */
2305 bfd_size_type count;
ba93b8ac
DJ		 2306 /* Number of PC-relative relocs copied in this section. */
2307 bfd_size_type pc_count;
917583ad 2308 };
252b5132 2309
ba93b8ac
DJ		 2310#define elf32_arm_hash_entry(ent) ((struct elf32_arm_link_hash_entry *)(ent))
2311
ba96a88f 2312/* Arm ELF linker hash entry. */
252b5132 2313struct elf32_arm_link_hash_entry
917583ad
NC		 2314 {
2315 struct elf_link_hash_entry root;
252b5132 2316
917583ad 2317 /* Number of PC relative relocs copied for this symbol. */
5e681ec4 2318 struct elf32_arm_relocs_copied * relocs_copied;
b7693d02
DJ		 2319
2320 /* We reference count Thumb references to a PLT entry separately,
2321 so that we can emit the Thumb trampoline only if needed. */
2322 bfd_signed_vma plt_thumb_refcount;
2323
bd97cb95
DJ		 2324 /* Some references from Thumb code may be eliminated by BL->BLX
2325 conversion, so record them separately. */
2326 bfd_signed_vma plt_maybe_thumb_refcount;
2327
b7693d02
DJ		 2328 /* Since PLT entries have variable size if the Thumb prologue is
2329 used, we need to record the index into .got.plt instead of
2330 recomputing it from the PLT offset. */
2331 bfd_signed_vma plt_got_offset;
ba93b8ac
DJ		 2332
2333#define GOT_UNKNOWN 0
2334#define GOT_NORMAL 1
2335#define GOT_TLS_GD 2
2336#define GOT_TLS_IE 4
2337 unsigned char tls_type;
a4fd1a8e
PB		 2338
2339 /* The symbol marking the real symbol location for exported thumb
2340 symbols with Arm stubs. */
2341 struct elf_link_hash_entry *export_glue;
906e58ca 2342
da5938a2 2343 /* A pointer to the most recently used stub hash entry against this
8029a119 2344 symbol. */
da5938a2 2345 struct elf32_arm_stub_hash_entry *stub_cache;
917583ad 2346 };
252b5132 2347
252b5132 2348/* Traverse an arm ELF linker hash table. */
252b5132
RH		 2349#define elf32_arm_link_hash_traverse(table, func, info) \
2350 (elf_link_hash_traverse \
2351 (&(table)->root, \
b7693d02 2352 (bfd_boolean (*) (struct elf_link_hash_entry *, void *)) (func), \
252b5132
RH		 2353 (info)))
2354
2355/* Get the ARM elf linker hash table from a link_info structure. */
2356#define elf32_arm_hash_table(info) \
2357 ((struct elf32_arm_link_hash_table *) ((info)->hash))
2358
906e58ca
NC		 2359#define arm_stub_hash_lookup(table, string, create, copy) \
2360 ((struct elf32_arm_stub_hash_entry *) \
2361 bfd_hash_lookup ((table), (string), (create), (copy)))
2362
9b485d32 2363/* ARM ELF linker hash table. */
252b5132 2364struct elf32_arm_link_hash_table
906e58ca
NC		 2365{
2366 /* The main hash table. */
2367 struct elf_link_hash_table root;
252b5132 2368
906e58ca
NC		 2369 /* The size in bytes of the section containing the Thumb-to-ARM glue. */
2370 bfd_size_type thumb_glue_size;
252b5132 2371
906e58ca
NC		 2372 /* The size in bytes of the section containing the ARM-to-Thumb glue. */
2373 bfd_size_type arm_glue_size;
252b5132 2374
906e58ca
NC		 2375 /* The size in bytes of section containing the ARMv4 BX veneers. */
2376 bfd_size_type bx_glue_size;
845b51d6 2377
906e58ca
NC		 2378 /* Offsets of ARMv4 BX veneers. Bit1 set if present, and Bit0 set when
2379 veneer has been populated. */
2380 bfd_vma bx_glue_offset[15];
845b51d6 2381
906e58ca
NC		 2382 /* The size in bytes of the section containing glue for VFP11 erratum
2383 veneers. */
2384 bfd_size_type vfp11_erratum_glue_size;
c7b8f16e 2385
906e58ca
NC		 2386 /* An arbitrary input BFD chosen to hold the glue sections. */
2387 bfd * bfd_of_glue_owner;
ba96a88f 2388
906e58ca
NC		 2389 /* Nonzero to output a BE8 image. */
2390 int byteswap_code;
e489d0ae 2391
906e58ca
NC		 2392 /* Zero if R_ARM_TARGET1 means R_ARM_ABS32.
2393 Nonzero if R_ARM_TARGET1 means R_ARM_REL32. */
2394 int target1_is_rel;
9c504268 2395
906e58ca
NC		 2396 /* The relocation to use for R_ARM_TARGET2 relocations. */
2397 int target2_reloc;
eb043451 2398
906e58ca
NC		 2399 /* 0 = Ignore R_ARM_V4BX.
2400 1 = Convert BX to MOV PC.
2401 2 = Generate v4 interworing stubs. */
2402 int fix_v4bx;
319850b4 2403
906e58ca
NC		 2404 /* Nonzero if the ARM/Thumb BLX instructions are available for use. */
2405 int use_blx;
33bfe774 2406
906e58ca
NC		 2407 /* What sort of code sequences we should look for which may trigger the
2408 VFP11 denorm erratum. */
2409 bfd_arm_vfp11_fix vfp11_fix;
c7b8f16e 2410
906e58ca
NC		 2411 /* Global counter for the number of fixes we have emitted. */
2412 int num_vfp11_fixes;
c7b8f16e 2413
906e58ca
NC		 2414 /* Nonzero to force PIC branch veneers. */
2415 int pic_veneer;
27e55c4d 2416
906e58ca
NC		 2417 /* The number of bytes in the initial entry in the PLT. */
2418 bfd_size_type plt_header_size;
e5a52504 2419
906e58ca
NC		 2420 /* The number of bytes in the subsequent PLT etries. */
2421 bfd_size_type plt_entry_size;
e5a52504 2422
906e58ca
NC		 2423 /* True if the target system is VxWorks. */
2424 int vxworks_p;
00a97672 2425
906e58ca
NC		 2426 /* True if the target system is Symbian OS. */
2427 int symbian_p;
e5a52504 2428
906e58ca
NC		 2429 /* True if the target uses REL relocations. */
2430 int use_rel;
4e7fd91e 2431
906e58ca
NC		 2432 /* Short-cuts to get to dynamic linker sections. */
2433 asection *sgot;
2434 asection *sgotplt;
2435 asection *srelgot;
2436 asection *splt;
2437 asection *srelplt;
2438 asection *sdynbss;
2439 asection *srelbss;
5e681ec4 2440
906e58ca
NC		 2441 /* The (unloaded but important) VxWorks .rela.plt.unloaded section. */
2442 asection *srelplt2;
00a97672 2443
906e58ca
NC		 2444 /* Data for R_ARM_TLS_LDM32 relocations. */
2445 union
2446 {
2447 bfd_signed_vma refcount;
2448 bfd_vma offset;
2449 } tls_ldm_got;
b7693d02 2450
906e58ca
NC		 2451 /* Small local sym to section mapping cache. */
2452 struct sym_sec_cache sym_sec;
2453
2454 /* For convenience in allocate_dynrelocs. */
2455 bfd * obfd;
2456
2457 /* The stub hash table. */
2458 struct bfd_hash_table stub_hash_table;
2459
2460 /* Linker stub bfd. */
2461 bfd *stub_bfd;
2462
2463 /* Linker call-backs. */
2464 asection * (*add_stub_section) (const char *, asection *);
2465 void (*layout_sections_again) (void);
2466
2467 /* Array to keep track of which stub sections have been created, and
2468 information on stub grouping. */
2469 struct map_stub
2470 {
2471 /* This is the section to which stubs in the group will be
2472 attached. */
2473 asection *link_sec;
2474 /* The stub section. */
2475 asection *stub_sec;
2476 } *stub_group;
2477
2478 /* Assorted information used by elf32_arm_size_stubs. */
2479 unsigned int bfd_count;
2480 int top_index;
2481 asection **input_list;
2482};
252b5132 2483
780a67af
NC		 2484/* Create an entry in an ARM ELF linker hash table. */
2485
2486static struct bfd_hash_entry *
57e8b36a
NC		 2487elf32_arm_link_hash_newfunc (struct bfd_hash_entry * entry,
2488 struct bfd_hash_table * table,
2489 const char * string)
780a67af
NC		 2490{
2491 struct elf32_arm_link_hash_entry * ret =
2492 (struct elf32_arm_link_hash_entry *) entry;
2493
2494 /* Allocate the structure if it has not already been allocated by a
2495 subclass. */
906e58ca 2496 if (ret == NULL)
57e8b36a
NC		 2497 ret = bfd_hash_allocate (table, sizeof (struct elf32_arm_link_hash_entry));
2498 if (ret == NULL)
780a67af
NC		 2499 return (struct bfd_hash_entry *) ret;
2500
2501 /* Call the allocation method of the superclass. */
2502 ret = ((struct elf32_arm_link_hash_entry *)
2503 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
2504 table, string));
57e8b36a 2505 if (ret != NULL)
b7693d02
DJ		 2506 {
2507 ret->relocs_copied = NULL;
ba93b8ac 2508 ret->tls_type = GOT_UNKNOWN;
b7693d02 2509 ret->plt_thumb_refcount = 0;
bd97cb95 2510 ret->plt_maybe_thumb_refcount = 0;
b7693d02 2511 ret->plt_got_offset = -1;
a4fd1a8e 2512 ret->export_glue = NULL;
906e58ca
NC		 2513
2514 ret->stub_cache = NULL;
b7693d02 2515 }
780a67af
NC		 2516
2517 return (struct bfd_hash_entry *) ret;
2518}
2519
906e58ca
NC		 2520/* Initialize an entry in the stub hash table. */
2521
2522static struct bfd_hash_entry *
2523stub_hash_newfunc (struct bfd_hash_entry *entry,
2524 struct bfd_hash_table *table,
2525 const char *string)
2526{
2527 /* Allocate the structure if it has not already been allocated by a
2528 subclass. */
2529 if (entry == NULL)
2530 {
2531 entry = bfd_hash_allocate (table,
2532 sizeof (struct elf32_arm_stub_hash_entry));
2533 if (entry == NULL)
2534 return entry;
2535 }
2536
2537 /* Call the allocation method of the superclass. */
2538 entry = bfd_hash_newfunc (entry, table, string);
2539 if (entry != NULL)
2540 {
2541 struct elf32_arm_stub_hash_entry *eh;
2542
2543 /* Initialize the local fields. */
2544 eh = (struct elf32_arm_stub_hash_entry *) entry;
2545 eh->stub_sec = NULL;
2546 eh->stub_offset = 0;
2547 eh->target_value = 0;
2548 eh->target_section = NULL;
2549 eh->stub_type = arm_stub_none;
461a49ca
DJ		 2550 eh->stub_size = 0;
2551 eh->stub_template = NULL;
2552 eh->stub_template_size = 0;
906e58ca
NC		 2553 eh->h = NULL;
2554 eh->id_sec = NULL;
2555 }
2556
2557 return entry;
2558}
2559
00a97672 2560/* Create .got, .gotplt, and .rel(a).got sections in DYNOBJ, and set up
5e681ec4
PB		 2561 shortcuts to them in our hash table. */
2562
2563static bfd_boolean
57e8b36a 2564create_got_section (bfd *dynobj, struct bfd_link_info *info)
5e681ec4
PB		 2565{
2566 struct elf32_arm_link_hash_table *htab;
2567
e5a52504
MM		 2568 htab = elf32_arm_hash_table (info);
2569 /* BPABI objects never have a GOT, or associated sections. */
2570 if (htab->symbian_p)
2571 return TRUE;
2572
5e681ec4
PB		 2573 if (! _bfd_elf_create_got_section (dynobj, info))
2574 return FALSE;
2575
5e681ec4
PB		 2576 htab->sgot = bfd_get_section_by_name (dynobj, ".got");
2577 htab->sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
2578 if (!htab->sgot || !htab->sgotplt)
2579 abort ();
2580
00a97672
RS		 2581 htab->srelgot = bfd_make_section_with_flags (dynobj,
2582 RELOC_SECTION (htab, ".got"),
3496cb2a
L		 2583 (SEC_ALLOC | SEC_LOAD
2584 | SEC_HAS_CONTENTS
2585 | SEC_IN_MEMORY
2586 | SEC_LINKER_CREATED
2587 | SEC_READONLY));
5e681ec4 2588 if (htab->srelgot == NULL
5e681ec4
PB		 2589 || ! bfd_set_section_alignment (dynobj, htab->srelgot, 2))
2590 return FALSE;
2591 return TRUE;
2592}
2593
00a97672
RS		 2594/* Create .plt, .rel(a).plt, .got, .got.plt, .rel(a).got, .dynbss, and
2595 .rel(a).bss sections in DYNOBJ, and set up shortcuts to them in our
5e681ec4
PB		 2596 hash table. */
2597
2598static bfd_boolean
57e8b36a 2599elf32_arm_create_dynamic_sections (bfd *dynobj, struct bfd_link_info *info)
5e681ec4
PB		 2600{
2601 struct elf32_arm_link_hash_table *htab;
2602
2603 htab = elf32_arm_hash_table (info);
2604 if (!htab->sgot && !create_got_section (dynobj, info))
2605 return FALSE;
2606
2607 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
2608 return FALSE;
2609
2610 htab->splt = bfd_get_section_by_name (dynobj, ".plt");
00a97672
RS		 2611 htab->srelplt = bfd_get_section_by_name (dynobj,
2612 RELOC_SECTION (htab, ".plt"));
5e681ec4
PB		 2613 htab->sdynbss = bfd_get_section_by_name (dynobj, ".dynbss");
2614 if (!info->shared)
00a97672
RS		 2615 htab->srelbss = bfd_get_section_by_name (dynobj,
2616 RELOC_SECTION (htab, ".bss"));
2617
2618 if (htab->vxworks_p)
2619 {
2620 if (!elf_vxworks_create_dynamic_sections (dynobj, info, &htab->srelplt2))
2621 return FALSE;
2622
2623 if (info->shared)
2624 {
2625 htab->plt_header_size = 0;
2626 htab->plt_entry_size
2627 = 4 * ARRAY_SIZE (elf32_arm_vxworks_shared_plt_entry);
2628 }
2629 else
2630 {
2631 htab->plt_header_size
2632 = 4 * ARRAY_SIZE (elf32_arm_vxworks_exec_plt0_entry);
2633 htab->plt_entry_size
2634 = 4 * ARRAY_SIZE (elf32_arm_vxworks_exec_plt_entry);
2635 }
2636 }
5e681ec4 2637
906e58ca 2638 if (!htab->splt
e5a52504
MM		 2639 || !htab->srelplt
2640 || !htab->sdynbss
5e681ec4
PB		 2641 || (!info->shared && !htab->srelbss))
2642 abort ();
2643
2644 return TRUE;
2645}
2646
906e58ca
NC		 2647/* Copy the extra info we tack onto an elf_link_hash_entry. */
2648
2649static void
2650elf32_arm_copy_indirect_symbol (struct bfd_link_info *info,
2651 struct elf_link_hash_entry *dir,
2652 struct elf_link_hash_entry *ind)
2653{
2654 struct elf32_arm_link_hash_entry *edir, *eind;
2655
2656 edir = (struct elf32_arm_link_hash_entry *) dir;
2657 eind = (struct elf32_arm_link_hash_entry *) ind;
2658
2659 if (eind->relocs_copied != NULL)
2660 {
2661 if (edir->relocs_copied != NULL)
2662 {
2663 struct elf32_arm_relocs_copied **pp;
2664 struct elf32_arm_relocs_copied *p;
2665
2666 /* Add reloc counts against the indirect sym to the direct sym
2667 list. Merge any entries against the same section. */
2668 for (pp = &eind->relocs_copied; (p = *pp) != NULL; )
2669 {
2670 struct elf32_arm_relocs_copied *q;
2671
2672 for (q = edir->relocs_copied; q != NULL; q = q->next)
2673 if (q->section == p->section)
2674 {
2675 q->pc_count += p->pc_count;
2676 q->count += p->count;
2677 *pp = p->next;
2678 break;
2679 }
2680 if (q == NULL)
2681 pp = &p->next;
2682 }
2683 *pp = edir->relocs_copied;
2684 }
2685
2686 edir->relocs_copied = eind->relocs_copied;
2687 eind->relocs_copied = NULL;
2688 }
2689
2690 if (ind->root.type == bfd_link_hash_indirect)
2691 {
2692 /* Copy over PLT info. */
2693 edir->plt_thumb_refcount += eind->plt_thumb_refcount;
2694 eind->plt_thumb_refcount = 0;
2695 edir->plt_maybe_thumb_refcount += eind->plt_maybe_thumb_refcount;
2696 eind->plt_maybe_thumb_refcount = 0;
2697
2698 if (dir->got.refcount <= 0)
2699 {
2700 edir->tls_type = eind->tls_type;
2701 eind->tls_type = GOT_UNKNOWN;
2702 }
2703 }
2704
2705 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2706}
2707
2708/* Create an ARM elf linker hash table. */
2709
2710static struct bfd_link_hash_table *
2711elf32_arm_link_hash_table_create (bfd *abfd)
2712{
2713 struct elf32_arm_link_hash_table *ret;
2714 bfd_size_type amt = sizeof (struct elf32_arm_link_hash_table);
2715
2716 ret = bfd_malloc (amt);
2717 if (ret == NULL)
2718 return NULL;
2719
2720 if (!_bfd_elf_link_hash_table_init (& ret->root, abfd,
2721 elf32_arm_link_hash_newfunc,
2722 sizeof (struct elf32_arm_link_hash_entry)))
2723 {
2724 free (ret);
2725 return NULL;
2726 }
2727
2728 ret->sgot = NULL;
2729 ret->sgotplt = NULL;
2730 ret->srelgot = NULL;
2731 ret->splt = NULL;
2732 ret->srelplt = NULL;
2733 ret->sdynbss = NULL;
2734 ret->srelbss = NULL;
2735 ret->srelplt2 = NULL;
2736 ret->thumb_glue_size = 0;
2737 ret->arm_glue_size = 0;
2738 ret->bx_glue_size = 0;
2739 memset (ret->bx_glue_offset, 0, sizeof (ret->bx_glue_offset));
2740 ret->vfp11_fix = BFD_ARM_VFP11_FIX_NONE;
2741 ret->vfp11_erratum_glue_size = 0;
2742 ret->num_vfp11_fixes = 0;
2743 ret->bfd_of_glue_owner = NULL;
2744 ret->byteswap_code = 0;
2745 ret->target1_is_rel = 0;
2746 ret->target2_reloc = R_ARM_NONE;
2747#ifdef FOUR_WORD_PLT
2748 ret->plt_header_size = 16;
2749 ret->plt_entry_size = 16;
2750#else
2751 ret->plt_header_size = 20;
2752 ret->plt_entry_size = 12;
2753#endif
2754 ret->fix_v4bx = 0;
2755 ret->use_blx = 0;
2756 ret->vxworks_p = 0;
2757 ret->symbian_p = 0;
2758 ret->use_rel = 1;
2759 ret->sym_sec.abfd = NULL;
2760 ret->obfd = abfd;
2761 ret->tls_ldm_got.refcount = 0;
6cee0a6f
L		 2762 ret->stub_bfd = NULL;
2763 ret->add_stub_section = NULL;
2764 ret->layout_sections_again = NULL;
2765 ret->stub_group = NULL;
2766 ret->bfd_count = 0;
2767 ret->top_index = 0;
2768 ret->input_list = NULL;
906e58ca
NC		 2769
2770 if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
2771 sizeof (struct elf32_arm_stub_hash_entry)))
2772 {
2773 free (ret);
2774 return NULL;
2775 }
2776
2777 return &ret->root.root;
2778}
2779
2780/* Free the derived linker hash table. */
2781
2782static void
2783elf32_arm_hash_table_free (struct bfd_link_hash_table *hash)
2784{
2785 struct elf32_arm_link_hash_table *ret
2786 = (struct elf32_arm_link_hash_table *) hash;
2787
2788 bfd_hash_table_free (&ret->stub_hash_table);
2789 _bfd_generic_link_hash_table_free (hash);
2790}
2791
2792/* Determine if we're dealing with a Thumb only architecture. */
2793
2794static bfd_boolean
2795using_thumb_only (struct elf32_arm_link_hash_table *globals)
2796{
2797 int arch = bfd_elf_get_obj_attr_int (globals->obfd, OBJ_ATTR_PROC,
2798 Tag_CPU_arch);
2799 int profile;
2800
2801 if (arch != TAG_CPU_ARCH_V7)
2802 return FALSE;
2803
2804 profile = bfd_elf_get_obj_attr_int (globals->obfd, OBJ_ATTR_PROC,
2805 Tag_CPU_arch_profile);
2806
2807 return profile == 'M';
2808}
2809
2810/* Determine if we're dealing with a Thumb-2 object. */
2811
2812static bfd_boolean
2813using_thumb2 (struct elf32_arm_link_hash_table *globals)
2814{
2815 int arch = bfd_elf_get_obj_attr_int (globals->obfd, OBJ_ATTR_PROC,
2816 Tag_CPU_arch);
2817 return arch == TAG_CPU_ARCH_V6T2 || arch >= TAG_CPU_ARCH_V7;
2818}
2819
f4ac8484
DJ		 2820static bfd_boolean
2821arm_stub_is_thumb (enum elf32_arm_stub_type stub_type)
2822{
2823 switch (stub_type)
2824 {
fea2b4d6
CL		 2825 case arm_stub_long_branch_thumb_only:
2826 case arm_stub_long_branch_v4t_thumb_arm:
2827 case arm_stub_short_branch_v4t_thumb_arm:
ebe24dd4
CL		 2828 case arm_stub_long_branch_v4t_thumb_arm_pic:
2829 case arm_stub_long_branch_thumb_only_pic:
f4ac8484
DJ		 2830 return TRUE;
2831 case arm_stub_none:
2832 BFD_FAIL ();
2833 return FALSE;
2834 break;
2835 default:
2836 return FALSE;
2837 }
2838}
2839
906e58ca
NC		 2840/* Determine the type of stub needed, if any, for a call. */
2841
2842static enum elf32_arm_stub_type
2843arm_type_of_stub (struct bfd_link_info *info,
2844 asection *input_sec,
2845 const Elf_Internal_Rela *rel,
2846 unsigned char st_type,
2847 struct elf32_arm_link_hash_entry *hash,
c820be07
NC		 2848 bfd_vma destination,
2849 asection *sym_sec,
2850 bfd *input_bfd,
2851 const char *name)
906e58ca
NC		 2852{
2853 bfd_vma location;
2854 bfd_signed_vma branch_offset;
2855 unsigned int r_type;
2856 struct elf32_arm_link_hash_table * globals;
2857 int thumb2;
2858 int thumb_only;
2859 enum elf32_arm_stub_type stub_type = arm_stub_none;
5fa9e92f 2860 int use_plt = 0;
906e58ca 2861
da5938a2 2862 /* We don't know the actual type of destination in case it is of
8029a119 2863 type STT_SECTION: give up. */
da5938a2
NC		 2864 if (st_type == STT_SECTION)
2865 return stub_type;
2866
906e58ca
NC		 2867 globals = elf32_arm_hash_table (info);
2868
2869 thumb_only = using_thumb_only (globals);
2870
2871 thumb2 = using_thumb2 (globals);
2872
2873 /* Determine where the call point is. */
2874 location = (input_sec->output_offset
2875 + input_sec->output_section->vma
2876 + rel->r_offset);
2877
2878 branch_offset = (bfd_signed_vma)(destination - location);
2879
2880 r_type = ELF32_R_TYPE (rel->r_info);
2881
5fa9e92f 2882 /* Keep a simpler condition, for the sake of clarity. */
329dcd78 2883 if (globals->splt != NULL && hash != NULL && hash->root.plt.offset != (bfd_vma) -1)
5fa9e92f
CL		 2884 {
2885 use_plt = 1;
2886 /* Note when dealing with PLT entries: the main PLT stub is in
2887 ARM mode, so if the branch is in Thumb mode, another
2888 Thumb->ARM stub will be inserted later just before the ARM
2889 PLT stub. We don't take this extra distance into account
2890 here, because if a long branch stub is needed, we'll add a
2891 Thumb->Arm one and branch directly to the ARM PLT entry
2892 because it avoids spreading offset corrections in several
2893 places. */
2894 }
906e58ca
NC		 2895
2896 if (r_type == R_ARM_THM_CALL)
2897 {
5fa9e92f
CL		 2898 /* Handle cases where:
2899 - this call goes too far (different Thumb/Thumb2 max
2900 distance)
2901 - it's a Thumb->Arm call and blx is not available. A stub is
2902 needed in this case, but only if this call is not through a
2903 PLT entry. Indeed, PLT stubs handle mode switching already.
2904 */
906e58ca
NC		 2905 if ((!thumb2
2906 && (branch_offset > THM_MAX_FWD_BRANCH_OFFSET
2907 || (branch_offset < THM_MAX_BWD_BRANCH_OFFSET)))
2908 || (thumb2
2909 && (branch_offset > THM2_MAX_FWD_BRANCH_OFFSET
2910 || (branch_offset < THM2_MAX_BWD_BRANCH_OFFSET)))
5fa9e92f
CL		 2911 || ((st_type != STT_ARM_TFUNC)
2912 && ((r_type == R_ARM_THM_CALL) && !globals->use_blx)
2913 && !use_plt))
906e58ca
NC		 2914 {
2915 if (st_type == STT_ARM_TFUNC)
2916 {
2917 /* Thumb to thumb. */
2918 if (!thumb_only)
2919 {
2920 stub_type = (info->shared | globals->pic_veneer)
c2b4a39d 2921 /* PIC stubs. */
906e58ca 2922 ? ((globals->use_blx)
c2b4a39d 2923 /* V5T and above. */
cf3eccff 2924 ? arm_stub_long_branch_any_thumb_pic
ebe24dd4
CL		 2925 /* On V4T, use Thumb code only. */
2926 : arm_stub_long_branch_thumb_only_pic)
c2b4a39d
CL		 2927
2928 /* non-PIC stubs. */
2929 : ((globals->use_blx)
2930 /* V5T and above. */
2931 ? arm_stub_long_branch_any_any
2932 /* V4T. */
2933 : arm_stub_long_branch_thumb_only);
906e58ca
NC		 2934 }
2935 else
2936 {
2937 stub_type = (info->shared | globals->pic_veneer)
ebe24dd4
CL		 2938 /* PIC stub. */
2939 ? arm_stub_long_branch_thumb_only_pic
c2b4a39d
CL		 2940 /* non-PIC stub. */
2941 : arm_stub_long_branch_thumb_only;
906e58ca
NC		 2942 }
2943 }
2944 else
2945 {
2946 /* Thumb to arm. */
c820be07
NC		 2947 if (sym_sec != NULL
2948 && sym_sec->owner != NULL
2949 && !INTERWORK_FLAG (sym_sec->owner))
2950 {
2951 (*_bfd_error_handler)
2952 (_("%B(%s): warning: interworking not enabled.\n"
2953 " first occurrence: %B: Thumb call to ARM"),
2954 sym_sec->owner, input_bfd, name);
2955 }
2956
906e58ca 2957 stub_type = (info->shared | globals->pic_veneer)
c2b4a39d 2958 /* PIC stubs. */
906e58ca 2959 ? ((globals->use_blx)
c2b4a39d 2960 /* V5T and above. */
cf3eccff 2961 ? arm_stub_long_branch_any_arm_pic
ebe24dd4
CL		 2962 /* V4T PIC stub. */
2963 : arm_stub_long_branch_v4t_thumb_arm_pic)
c2b4a39d
CL		 2964
2965 /* non-PIC stubs. */
2966 : ((globals->use_blx)
2967 /* V5T and above. */
2968 ? arm_stub_long_branch_any_any
2969 /* V4T. */
2970 : arm_stub_long_branch_v4t_thumb_arm);
c820be07
NC		 2971
2972 /* Handle v4t short branches. */
fea2b4d6 2973 if ((stub_type == arm_stub_long_branch_v4t_thumb_arm)
c820be07
NC		 2974 && (branch_offset <= THM_MAX_FWD_BRANCH_OFFSET)
2975 && (branch_offset >= THM_MAX_BWD_BRANCH_OFFSET))
fea2b4d6 2976 stub_type = arm_stub_short_branch_v4t_thumb_arm;
906e58ca
NC		 2977 }
2978 }
2979 }
2980 else if (r_type == R_ARM_CALL)
2981 {
2982 if (st_type == STT_ARM_TFUNC)
2983 {
2984 /* Arm to thumb. */
c820be07
NC		 2985
2986 if (sym_sec != NULL
2987 && sym_sec->owner != NULL
2988 && !INTERWORK_FLAG (sym_sec->owner))
2989 {
2990 (*_bfd_error_handler)
2991 (_("%B(%s): warning: interworking not enabled.\n"
c2b4a39d 2992 " first occurrence: %B: ARM call to Thumb"),
c820be07
NC		 2993 sym_sec->owner, input_bfd, name);
2994 }
2995
2996 /* We have an extra 2-bytes reach because of
2997 the mode change (bit 24 (H) of BLX encoding). */
906e58ca
NC		 2998 if (branch_offset > (ARM_MAX_FWD_BRANCH_OFFSET + 2)
2999 || (branch_offset < ARM_MAX_BWD_BRANCH_OFFSET)
3000 || !globals->use_blx)
3001 {
3002 stub_type = (info->shared | globals->pic_veneer)
c2b4a39d 3003 /* PIC stubs. */
ebe24dd4
CL		 3004 ? ((globals->use_blx)
3005 /* V5T and above. */
3006 ? arm_stub_long_branch_any_thumb_pic
3007 /* V4T stub. */
3008 : arm_stub_long_branch_v4t_arm_thumb_pic)
3009
c2b4a39d
CL		 3010 /* non-PIC stubs. */
3011 : ((globals->use_blx)
3012 /* V5T and above. */
3013 ? arm_stub_long_branch_any_any
3014 /* V4T. */
3015 : arm_stub_long_branch_v4t_arm_thumb);
906e58ca
NC		 3016 }
3017 }
3018 else
3019 {
3020 /* Arm to arm. */
3021 if (branch_offset > ARM_MAX_FWD_BRANCH_OFFSET
3022 || (branch_offset < ARM_MAX_BWD_BRANCH_OFFSET))
3023 {
3024 stub_type = (info->shared | globals->pic_veneer)
c2b4a39d 3025 /* PIC stubs. */
cf3eccff 3026 ? arm_stub_long_branch_any_arm_pic
c2b4a39d 3027 /* non-PIC stubs. */
fea2b4d6 3028 : arm_stub_long_branch_any_any;
906e58ca
NC		 3029 }
3030 }
3031 }
3032
3033 return stub_type;
3034}
3035
3036/* Build a name for an entry in the stub hash table. */
3037
3038static char *
3039elf32_arm_stub_name (const asection *input_section,
3040 const asection *sym_sec,
3041 const struct elf32_arm_link_hash_entry *hash,
3042 const Elf_Internal_Rela *rel)
3043{
3044 char *stub_name;
3045 bfd_size_type len;
3046
3047 if (hash)
3048 {
3049 len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 8 + 1;
3050 stub_name = bfd_malloc (len);
3051 if (stub_name != NULL)
3052 sprintf (stub_name, "%08x_%s+%x",
3053 input_section->id & 0xffffffff,
3054 hash->root.root.root.string,
3055 (int) rel->r_addend & 0xffffffff);
3056 }
3057 else
3058 {
3059 len = 8 + 1 + 8 + 1 + 8 + 1 + 8 + 1;
3060 stub_name = bfd_malloc (len);
3061 if (stub_name != NULL)
3062 sprintf (stub_name, "%08x_%x:%x+%x",
3063 input_section->id & 0xffffffff,
3064 sym_sec->id & 0xffffffff,
3065 (int) ELF32_R_SYM (rel->r_info) & 0xffffffff,
3066 (int) rel->r_addend & 0xffffffff);
3067 }
3068
3069 return stub_name;
3070}
3071
3072/* Look up an entry in the stub hash. Stub entries are cached because
3073 creating the stub name takes a bit of time. */
3074
3075static struct elf32_arm_stub_hash_entry *
3076elf32_arm_get_stub_entry (const asection *input_section,
3077 const asection *sym_sec,
3078 struct elf_link_hash_entry *hash,
3079 const Elf_Internal_Rela *rel,
3080 struct elf32_arm_link_hash_table *htab)
3081{
3082 struct elf32_arm_stub_hash_entry *stub_entry;
3083 struct elf32_arm_link_hash_entry *h = (struct elf32_arm_link_hash_entry *) hash;
3084 const asection *id_sec;
3085
3086 if ((input_section->flags & SEC_CODE) == 0)
3087 return NULL;
3088
3089 /* If this input section is part of a group of sections sharing one
3090 stub section, then use the id of the first section in the group.
3091 Stub names need to include a section id, as there may well be
3092 more than one stub used to reach say, printf, and we need to
3093 distinguish between them. */
3094 id_sec = htab->stub_group[input_section->id].link_sec;
3095
3096 if (h != NULL && h->stub_cache != NULL
3097 && h->stub_cache->h == h
3098 && h->stub_cache->id_sec == id_sec)
3099 {
3100 stub_entry = h->stub_cache;
3101 }
3102 else
3103 {
3104 char *stub_name;
3105
3106 stub_name = elf32_arm_stub_name (id_sec, sym_sec, h, rel);
3107 if (stub_name == NULL)
3108 return NULL;
3109
3110 stub_entry = arm_stub_hash_lookup (&htab->stub_hash_table,
3111 stub_name, FALSE, FALSE);
3112 if (h != NULL)
3113 h->stub_cache = stub_entry;
3114
3115 free (stub_name);
3116 }
3117
3118 return stub_entry;
3119}
3120
906e58ca
NC		 3121/* Add a new stub entry to the stub hash. Not all fields of the new
3122 stub entry are initialised. */
3123
3124static struct elf32_arm_stub_hash_entry *
3125elf32_arm_add_stub (const char *stub_name,
3126 asection *section,
da5938a2 3127 struct elf32_arm_link_hash_table *htab)
906e58ca
NC		 3128{
3129 asection *link_sec;
3130 asection *stub_sec;
3131 struct elf32_arm_stub_hash_entry *stub_entry;
3132
3133 link_sec = htab->stub_group[section->id].link_sec;
3134 stub_sec = htab->stub_group[section->id].stub_sec;
3135 if (stub_sec == NULL)
3136 {
3137 stub_sec = htab->stub_group[link_sec->id].stub_sec;
3138 if (stub_sec == NULL)
3139 {
3140 size_t namelen;
3141 bfd_size_type len;
3142 char *s_name;
3143
3144 namelen = strlen (link_sec->name);
3145 len = namelen + sizeof (STUB_SUFFIX);
3146 s_name = bfd_alloc (htab->stub_bfd, len);
3147 if (s_name == NULL)
3148 return NULL;
3149
3150 memcpy (s_name, link_sec->name, namelen);
3151 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
3152 stub_sec = (*htab->add_stub_section) (s_name, link_sec);
3153 if (stub_sec == NULL)
3154 return NULL;
3155 htab->stub_group[link_sec->id].stub_sec = stub_sec;
3156 }
3157 htab->stub_group[section->id].stub_sec = stub_sec;
3158 }
3159
3160 /* Enter this entry into the linker stub hash table. */
3161 stub_entry = arm_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3162 TRUE, FALSE);
3163 if (stub_entry == NULL)
3164 {
3165 (*_bfd_error_handler) (_("%s: cannot create stub entry %s"),
3166 section->owner,
3167 stub_name);
3168 return NULL;
3169 }
3170
3171 stub_entry->stub_sec = stub_sec;
3172 stub_entry->stub_offset = 0;
3173 stub_entry->id_sec = link_sec;
3174
906e58ca
NC		 3175 return stub_entry;
3176}
3177
3178/* Store an Arm insn into an output section not processed by
3179 elf32_arm_write_section. */
3180
3181static void
8029a119
NC		 3182put_arm_insn (struct elf32_arm_link_hash_table * htab,
3183 bfd * output_bfd, bfd_vma val, void * ptr)
906e58ca
NC		 3184{
3185 if (htab->byteswap_code != bfd_little_endian (output_bfd))
3186 bfd_putl32 (val, ptr);
3187 else
3188 bfd_putb32 (val, ptr);
3189}
3190
3191/* Store a 16-bit Thumb insn into an output section not processed by
3192 elf32_arm_write_section. */
3193
3194static void
8029a119
NC		 3195put_thumb_insn (struct elf32_arm_link_hash_table * htab,
3196 bfd * output_bfd, bfd_vma val, void * ptr)
906e58ca
NC		 3197{
3198 if (htab->byteswap_code != bfd_little_endian (output_bfd))
3199 bfd_putl16 (val, ptr);
3200 else
3201 bfd_putb16 (val, ptr);
3202}
3203
3204static bfd_boolean
3205arm_build_one_stub (struct bfd_hash_entry *gen_entry,
3206 void * in_arg)
3207{
3208 struct elf32_arm_stub_hash_entry *stub_entry;
3209 struct bfd_link_info *info;
3210 struct elf32_arm_link_hash_table *htab;
3211 asection *stub_sec;
3212 bfd *stub_bfd;
3213 bfd_vma stub_addr;
3214 bfd_byte *loc;
3215 bfd_vma sym_value;
3216 int template_size;
3217 int size;
461a49ca 3218 const insn_sequence *template;
906e58ca
NC		 3219 int i;
3220 struct elf32_arm_link_hash_table * globals;
461a49ca 3221 int stub_reloc_idx = -1;
4e31c731 3222 int stub_reloc_offset = 0;
906e58ca
NC		 3223
3224 /* Massage our args to the form they really have. */
3225 stub_entry = (struct elf32_arm_stub_hash_entry *) gen_entry;
3226 info = (struct bfd_link_info *) in_arg;
3227
3228 globals = elf32_arm_hash_table (info);
3229
3230 htab = elf32_arm_hash_table (info);
3231 stub_sec = stub_entry->stub_sec;
3232
3233 /* Make a note of the offset within the stubs for this entry. */
3234 stub_entry->stub_offset = stub_sec->size;
3235 loc = stub_sec->contents + stub_entry->stub_offset;
3236
3237 stub_bfd = stub_sec->owner;
3238
3239 /* This is the address of the start of the stub. */
3240 stub_addr = stub_sec->output_section->vma + stub_sec->output_offset
3241 + stub_entry->stub_offset;
3242
3243 /* This is the address of the stub destination. */
3244 sym_value = (stub_entry->target_value
3245 + stub_entry->target_section->output_offset
3246 + stub_entry->target_section->output_section->vma);
3247
461a49ca
DJ		 3248 template = stub_entry->stub_template;
3249 template_size = stub_entry->stub_template_size;
906e58ca
NC		 3250
3251 size = 0;
461a49ca 3252 for (i = 0; i < template_size; i++)
906e58ca 3253 {
4e31c731 3254 switch (template[i].type)
461a49ca
DJ		 3255 {
3256 case THUMB16_TYPE:
3257 put_thumb_insn (globals, stub_bfd, template[i].data, loc + size);
3258 size += 2;
3259 break;
906e58ca 3260
461a49ca
DJ		 3261 case ARM_TYPE:
3262 put_arm_insn (globals, stub_bfd, template[i].data, loc + size);
3263 /* Handle cases where the target is encoded within the
3264 instruction. */
ebe24dd4 3265 if (template[i].r_type == R_ARM_JUMP24)
461a49ca
DJ		 3266 {
3267 stub_reloc_idx = i;
3268 stub_reloc_offset = size;
3269 }
3270 size += 4;
3271 break;
3272
3273 case DATA_TYPE:
3274 bfd_put_32 (stub_bfd, template[i].data, loc + size);
3275 stub_reloc_idx = i;
3276 stub_reloc_offset = size;
3277 size += 4;
3278 break;
3279
3280 default:
3281 BFD_FAIL ();
3282 return FALSE;
3283 }
906e58ca 3284 }
461a49ca 3285
906e58ca
NC		 3286 stub_sec->size += size;
3287
461a49ca
DJ		 3288 /* Stub size has already been computed in arm_size_one_stub. Check
3289 consistency. */
3290 BFD_ASSERT (size == stub_entry->stub_size);
3291
906e58ca
NC		 3292 /* Destination is Thumb. Force bit 0 to 1 to reflect this. */
3293 if (stub_entry->st_type == STT_ARM_TFUNC)
3294 sym_value |= 1;
3295
461a49ca
DJ		 3296 /* Assume there is one and only one entry to relocate in each stub. */
3297 BFD_ASSERT (stub_reloc_idx != -1);
c820be07 3298
ebe24dd4 3299 _bfd_final_link_relocate (elf32_arm_howto_from_type (template[stub_reloc_idx].r_type),
461a49ca
DJ		 3300 stub_bfd, stub_sec, stub_sec->contents,
3301 stub_entry->stub_offset + stub_reloc_offset,
3302 sym_value, template[stub_reloc_idx].reloc_addend);
906e58ca
NC		 3303
3304 return TRUE;
3305}
3306
3307/* As above, but don't actually build the stub. Just bump offset so
3308 we know stub section sizes. */
3309
3310static bfd_boolean
3311arm_size_one_stub (struct bfd_hash_entry *gen_entry,
3312 void * in_arg)
3313{
3314 struct elf32_arm_stub_hash_entry *stub_entry;
3315 struct elf32_arm_link_hash_table *htab;
461a49ca 3316 const insn_sequence *template;
906e58ca
NC		 3317 int template_size;
3318 int size;
3319 int i;
3320
3321 /* Massage our args to the form they really have. */
3322 stub_entry = (struct elf32_arm_stub_hash_entry *) gen_entry;
3323 htab = (struct elf32_arm_link_hash_table *) in_arg;
3324
3325 switch (stub_entry->stub_type)
3326 {
fea2b4d6
CL		 3327 case arm_stub_long_branch_any_any:
3328 template = elf32_arm_stub_long_branch_any_any;
ebe24dd4 3329 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_any_any);
906e58ca 3330 break;
fea2b4d6
CL		 3331 case arm_stub_long_branch_v4t_arm_thumb:
3332 template = elf32_arm_stub_long_branch_v4t_arm_thumb;
ebe24dd4 3333 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_v4t_arm_thumb);
906e58ca 3334 break;
fea2b4d6
CL		 3335 case arm_stub_long_branch_thumb_only:
3336 template = elf32_arm_stub_long_branch_thumb_only;
ebe24dd4 3337 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_thumb_only);
906e58ca 3338 break;
fea2b4d6
CL		 3339 case arm_stub_long_branch_v4t_thumb_arm:
3340 template = elf32_arm_stub_long_branch_v4t_thumb_arm;
ebe24dd4 3341 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_v4t_thumb_arm);
906e58ca 3342 break;
fea2b4d6
CL		 3343 case arm_stub_short_branch_v4t_thumb_arm:
3344 template = elf32_arm_stub_short_branch_v4t_thumb_arm;
ebe24dd4 3345 template_size = ARRAY_SIZE (elf32_arm_stub_short_branch_v4t_thumb_arm);
c820be07 3346 break;
cf3eccff
DJ		 3347 case arm_stub_long_branch_any_arm_pic:
3348 template = elf32_arm_stub_long_branch_any_arm_pic;
ebe24dd4 3349 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_any_arm_pic);
cf3eccff
DJ		 3350 break;
3351 case arm_stub_long_branch_any_thumb_pic:
3352 template = elf32_arm_stub_long_branch_any_thumb_pic;
ebe24dd4
CL		 3353 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_any_thumb_pic);
3354 break;
3355 case arm_stub_long_branch_v4t_arm_thumb_pic:
3356 template = elf32_arm_stub_long_branch_v4t_arm_thumb_pic;
3357 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_v4t_arm_thumb_pic);
3358 break;
3359 case arm_stub_long_branch_v4t_thumb_arm_pic:
3360 template = elf32_arm_stub_long_branch_v4t_thumb_arm_pic;
3361 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_v4t_thumb_arm_pic);
3362 break;
3363 case arm_stub_long_branch_thumb_only_pic:
3364 template = elf32_arm_stub_long_branch_thumb_only_pic;
3365 template_size = ARRAY_SIZE (elf32_arm_stub_long_branch_thumb_only_pic);
906e58ca
NC		 3366 break;
3367 default:
3368 BFD_FAIL ();
3369 return FALSE;
906e58ca
NC		 3370 }
3371
3372 size = 0;
461a49ca
DJ		 3373 for (i = 0; i < template_size; i++)
3374 {
4e31c731 3375 switch (template[i].type)
461a49ca
DJ		 3376 {
3377 case THUMB16_TYPE:
3378 size += 2;
3379 break;
3380
3381 case ARM_TYPE:
3382 size += 4;
3383 break;
3384
3385 case DATA_TYPE:
3386 size += 4;
3387 break;
3388
3389 default:
3390 BFD_FAIL ();
3391 return FALSE;
3392 }
3393 }
3394
3395 stub_entry->stub_size = size;
3396 stub_entry->stub_template = template;
3397 stub_entry->stub_template_size = template_size;
3398
906e58ca
NC		 3399 size = (size + 7) & ~7;
3400 stub_entry->stub_sec->size += size;
461a49ca 3401
906e58ca
NC		 3402 return TRUE;
3403}
3404
3405/* External entry points for sizing and building linker stubs. */
3406
3407/* Set up various things so that we can make a list of input sections
3408 for each output section included in the link. Returns -1 on error,
3409 0 when no stubs will be needed, and 1 on success. */
3410
3411int
3412elf32_arm_setup_section_lists (bfd *output_bfd,
3413 struct bfd_link_info *info)
3414{
3415 bfd *input_bfd;
3416 unsigned int bfd_count;
3417 int top_id, top_index;
3418 asection *section;
3419 asection **input_list, **list;
3420 bfd_size_type amt;
3421 struct elf32_arm_link_hash_table *htab = elf32_arm_hash_table (info);
3422
3423 if (! is_elf_hash_table (htab))
3424 return 0;
3425
3426 /* Count the number of input BFDs and find the top input section id. */
3427 for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
3428 input_bfd != NULL;
3429 input_bfd = input_bfd->link_next)
3430 {
3431 bfd_count += 1;
3432 for (section = input_bfd->sections;
3433 section != NULL;
3434 section = section->next)
3435 {
3436 if (top_id < section->id)
3437 top_id = section->id;
3438 }
3439 }
3440 htab->bfd_count = bfd_count;
3441
3442 amt = sizeof (struct map_stub) * (top_id + 1);
3443 htab->stub_group = bfd_zmalloc (amt);
3444 if (htab->stub_group == NULL)
3445 return -1;
3446
3447 /* We can't use output_bfd->section_count here to find the top output
3448 section index as some sections may have been removed, and
3449 _bfd_strip_section_from_output doesn't renumber the indices. */
3450 for (section = output_bfd->sections, top_index = 0;
3451 section != NULL;
3452 section = section->next)
3453 {
3454 if (top_index < section->index)
3455 top_index = section->index;
3456 }
3457
3458 htab->top_index = top_index;
3459 amt = sizeof (asection *) * (top_index + 1);
3460 input_list = bfd_malloc (amt);
3461 htab->input_list = input_list;
3462 if (input_list == NULL)
3463 return -1;
3464
3465 /* For sections we aren't interested in, mark their entries with a
3466 value we can check later. */
3467 list = input_list + top_index;
3468 do
3469 *list = bfd_abs_section_ptr;
3470 while (list-- != input_list);
3471
3472 for (section = output_bfd->sections;
3473 section != NULL;
3474 section = section->next)
3475 {
3476 if ((section->flags & SEC_CODE) != 0)
3477 input_list[section->index] = NULL;
3478 }
3479
3480 return 1;
3481}
3482
3483/* The linker repeatedly calls this function for each input section,
3484 in the order that input sections are linked into output sections.
3485 Build lists of input sections to determine groupings between which
3486 we may insert linker stubs. */
3487
3488void
3489elf32_arm_next_input_section (struct bfd_link_info *info,
3490 asection *isec)
3491{
3492 struct elf32_arm_link_hash_table *htab = elf32_arm_hash_table (info);
3493
3494 if (isec->output_section->index <= htab->top_index)
3495 {
3496 asection **list = htab->input_list + isec->output_section->index;
3497
3498 if (*list != bfd_abs_section_ptr)
3499 {
3500 /* Steal the link_sec pointer for our list. */
3501#define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
3502 /* This happens to make the list in reverse order,
07d72278 3503 which we reverse later. */
906e58ca
NC		 3504 PREV_SEC (isec) = *list;
3505 *list = isec;
3506 }
3507 }
3508}
3509
3510/* See whether we can group stub sections together. Grouping stub
3511 sections may result in fewer stubs. More importantly, we need to
07d72278 3512 put all .init* and .fini* stubs at the end of the .init or
906e58ca
NC		 3513 .fini output sections respectively, because glibc splits the
3514 _init and _fini functions into multiple parts. Putting a stub in
3515 the middle of a function is not a good idea. */
3516
3517static void
3518group_sections (struct elf32_arm_link_hash_table *htab,
3519 bfd_size_type stub_group_size,
07d72278 3520 bfd_boolean stubs_always_after_branch)
906e58ca 3521{
07d72278 3522 asection **list = htab->input_list;
906e58ca
NC		 3523
3524 do
3525 {
3526 asection *tail = *list;
07d72278
DJ		 3527 asection *head;
3528 asection *tp;
906e58ca
NC		 3529
3530 if (tail == bfd_abs_section_ptr)
3531 continue;
3532
07d72278
DJ		 3533 /* Reverse the list: we must avoid placing stubs at the
3534 beginning of the section because the beginning of the text
3535 section may be required for an interrupt vector in bare metal
3536 code. */
3537#define NEXT_SEC PREV_SEC
3538 head = tail;
3539 tp = NULL;
3540 for (;;)
3541 {
3542 asection *h = PREV_SEC (head);
3543 NEXT_SEC (head) = tp;
3544 if (h == NULL)
3545 break;
3546 tp = head;
3547 head = h;
3548 }
3549
3550 while (head != NULL)
906e58ca
NC		 3551 {
3552 asection *curr;
07d72278 3553 asection *next;
906e58ca
NC		 3554 bfd_size_type total;
3555
07d72278
DJ		 3556 curr = head;
3557 total = head->size;
3558 while ((next = NEXT_SEC (curr)) != NULL
3559 && ((total += next->output_offset - curr->output_offset)
906e58ca 3560 < stub_group_size))
07d72278 3561 curr = next;
906e58ca 3562
07d72278 3563 /* OK, the size from the start to the start of CURR is less
906e58ca 3564 than stub_group_size and thus can be handled by one stub
07d72278 3565 section. (Or the head section is itself larger than
906e58ca
NC		 3566 stub_group_size, in which case we may be toast.)
3567 We should really be keeping track of the total size of
3568 stubs added here, as stubs contribute to the final output
7fb9f789 3569 section size. */
906e58ca
NC		 3570 do
3571 {
07d72278 3572 next = NEXT_SEC (head);
906e58ca 3573 /* Set up this stub group. */
07d72278 3574 htab->stub_group[head->id].link_sec = curr;
906e58ca 3575 }
07d72278 3576 while (head != curr && (head = next) != NULL);
906e58ca
NC		 3577
3578 /* But wait, there's more! Input sections up to stub_group_size
07d72278
DJ		 3579 bytes after the stub section can be handled by it too. */
3580 if (!stubs_always_after_branch)
906e58ca
NC		 3581 {
3582 total = 0;
07d72278
DJ		 3583 while (next != NULL
3584 && ((total += next->output_offset - head->output_offset)
906e58ca
NC		 3585 < stub_group_size))
3586 {
07d72278
DJ		 3587 head = next;
3588 next = NEXT_SEC (head);
3589 htab->stub_group[head->id].link_sec = curr;
906e58ca
NC		 3590 }
3591 }
07d72278 3592 head = next;
906e58ca
NC		 3593 }
3594 }
07d72278 3595 while (list++ != htab->input_list + htab->top_index);
906e58ca
NC		 3596
3597 free (htab->input_list);
3598#undef PREV_SEC
07d72278 3599#undef NEXT_SEC
906e58ca
NC		 3600}
3601
3602/* Determine and set the size of the stub section for a final link.
3603
3604 The basic idea here is to examine all the relocations looking for
3605 PC-relative calls to a target that is unreachable with a "bl"
3606 instruction. */
3607
3608bfd_boolean
3609elf32_arm_size_stubs (bfd *output_bfd,
3610 bfd *stub_bfd,
3611 struct bfd_link_info *info,
3612 bfd_signed_vma group_size,
3613 asection * (*add_stub_section) (const char *, asection *),
3614 void (*layout_sections_again) (void))
3615{
3616 bfd_size_type stub_group_size;
07d72278 3617 bfd_boolean stubs_always_after_branch;
906e58ca
NC		 3618 bfd_boolean stub_changed = 0;
3619 struct elf32_arm_link_hash_table *htab = elf32_arm_hash_table (info);
3620
3621 /* Propagate mach to stub bfd, because it may not have been
3622 finalized when we created stub_bfd. */
3623 bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
3624 bfd_get_mach (output_bfd));
3625
3626 /* Stash our params away. */
3627 htab->stub_bfd = stub_bfd;
3628 htab->add_stub_section = add_stub_section;
3629 htab->layout_sections_again = layout_sections_again;
07d72278 3630 stubs_always_after_branch = group_size < 0;
906e58ca
NC		 3631 if (group_size < 0)
3632 stub_group_size = -group_size;
3633 else
3634 stub_group_size = group_size;
3635
3636 if (stub_group_size == 1)
3637 {
3638 /* Default values. */
3639 /* Thumb branch range is +-4MB has to be used as the default
3640 maximum size (a given section can contain both ARM and Thumb
3641 code, so the worst case has to be taken into account).
3642
3643 This value is 24K less than that, which allows for 2025
3644 12-byte stubs. If we exceed that, then we will fail to link.
3645 The user will have to relink with an explicit group size
3646 option. */
3647 stub_group_size = 4170000;
3648 }
3649
07d72278 3650 group_sections (htab, stub_group_size, stubs_always_after_branch);
906e58ca
NC		 3651
3652 while (1)
3653 {
3654 bfd *input_bfd;
3655 unsigned int bfd_indx;
3656 asection *stub_sec;
3657
3658 for (input_bfd = info->input_bfds, bfd_indx = 0;
3659 input_bfd != NULL;
3660 input_bfd = input_bfd->link_next, bfd_indx++)
3661 {
3662 Elf_Internal_Shdr *symtab_hdr;
3663 asection *section;
3664 Elf_Internal_Sym *local_syms = NULL;
3665
3666 /* We'll need the symbol table in a second. */
3667 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
3668 if (symtab_hdr->sh_info == 0)
3669 continue;
3670
3671 /* Walk over each section attached to the input bfd. */
3672 for (section = input_bfd->sections;
3673 section != NULL;
3674 section = section->next)
3675 {
3676 Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
3677
3678 /* If there aren't any relocs, then there's nothing more
3679 to do. */
3680 if ((section->flags & SEC_RELOC) == 0
3681 || section->reloc_count == 0
3682 || (section->flags & SEC_CODE) == 0)
3683 continue;
3684
3685 /* If this section is a link-once section that will be
3686 discarded, then don't create any stubs. */
3687 if (section->output_section == NULL
3688 || section->output_section->owner != output_bfd)
3689 continue;
3690
3691 /* Get the relocs. */
3692 internal_relocs
3693 = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
3694 NULL, info->keep_memory);
3695 if (internal_relocs == NULL)
3696 goto error_ret_free_local;
3697
3698 /* Now examine each relocation. */
3699 irela = internal_relocs;
3700 irelaend = irela + section->reloc_count;
3701 for (; irela < irelaend; irela++)
3702 {
3703 unsigned int r_type, r_indx;
3704 enum elf32_arm_stub_type stub_type;
3705 struct elf32_arm_stub_hash_entry *stub_entry;
3706 asection *sym_sec;
3707 bfd_vma sym_value;
3708 bfd_vma destination;
3709 struct elf32_arm_link_hash_entry *hash;
7413f23f 3710 const char *sym_name;
906e58ca
NC		 3711 char *stub_name;
3712 const asection *id_sec;
3713 unsigned char st_type;
3714
3715 r_type = ELF32_R_TYPE (irela->r_info);
3716 r_indx = ELF32_R_SYM (irela->r_info);
3717
3718 if (r_type >= (unsigned int) R_ARM_max)
3719 {
3720 bfd_set_error (bfd_error_bad_value);
3721 error_ret_free_internal:
3722 if (elf_section_data (section)->relocs == NULL)
3723 free (internal_relocs);
3724 goto error_ret_free_local;
3725 }
3726
3727 /* Only look for stubs on call instructions. */
3728 if ((r_type != (unsigned int) R_ARM_CALL)
3729 && (r_type != (unsigned int) R_ARM_THM_CALL))
3730 continue;
3731
3732 /* Now determine the call target, its name, value,
3733 section. */
3734 sym_sec = NULL;
3735 sym_value = 0;
3736 destination = 0;
3737 hash = NULL;
7413f23f 3738 sym_name = NULL;
906e58ca
NC		 3739 if (r_indx < symtab_hdr->sh_info)
3740 {
3741 /* It's a local symbol. */
3742 Elf_Internal_Sym *sym;
3743 Elf_Internal_Shdr *hdr;
3744
3745 if (local_syms == NULL)
3746 {
3747 local_syms
3748 = (Elf_Internal_Sym *) symtab_hdr->contents;
3749 if (local_syms == NULL)
3750 local_syms
3751 = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
3752 symtab_hdr->sh_info, 0,
3753 NULL, NULL, NULL);
3754 if (local_syms == NULL)
3755 goto error_ret_free_internal;
3756 }
3757
3758 sym = local_syms + r_indx;
3759 hdr = elf_elfsections (input_bfd)[sym->st_shndx];
3760 sym_sec = hdr->bfd_section;
3761 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
3762 sym_value = sym->st_value;
3763 destination = (sym_value + irela->r_addend
3764 + sym_sec->output_offset
3765 + sym_sec->output_section->vma);
3766 st_type = ELF_ST_TYPE (sym->st_info);
7413f23f
DJ		 3767 sym_name
3768 = bfd_elf_string_from_elf_section (input_bfd,
3769 symtab_hdr->sh_link,
3770 sym->st_name);
906e58ca
NC		 3771 }
3772 else
3773 {
3774 /* It's an external symbol. */
3775 int e_indx;
3776
3777 e_indx = r_indx - symtab_hdr->sh_info;
3778 hash = ((struct elf32_arm_link_hash_entry *)
3779 elf_sym_hashes (input_bfd)[e_indx]);
3780
3781 while (hash->root.root.type == bfd_link_hash_indirect
3782 || hash->root.root.type == bfd_link_hash_warning)
3783 hash = ((struct elf32_arm_link_hash_entry *)
3784 hash->root.root.u.i.link);
3785
3786 if (hash->root.root.type == bfd_link_hash_defined
3787 || hash->root.root.type == bfd_link_hash_defweak)
3788 {
3789 sym_sec = hash->root.root.u.def.section;
3790 sym_value = hash->root.root.u.def.value;
3791 if (sym_sec->output_section != NULL)
3792 destination = (sym_value + irela->r_addend
3793 + sym_sec->output_offset
3794 + sym_sec->output_section->vma);
3795 }
3796 else if (hash->root.root.type == bfd_link_hash_undefweak
3797 || hash->root.root.type == bfd_link_hash_undefined)
3798 /* For a shared library, these will need a PLT stub,
3799 which is treated separately.
3800 For absolute code, they cannot be handled. */
3801 continue;
3802 else
3803 {
3804 bfd_set_error (bfd_error_bad_value);
3805 goto error_ret_free_internal;
3806 }
3807 st_type = ELF_ST_TYPE (hash->root.type);
7413f23f 3808 sym_name = hash->root.root.root.string;
906e58ca
NC		 3809 }
3810
3811 /* Determine what (if any) linker stub is needed. */
3812 stub_type = arm_type_of_stub (info, section, irela, st_type,
c820be07
NC		 3813 hash, destination, sym_sec,
3814 input_bfd, sym_name);
906e58ca
NC		 3815 if (stub_type == arm_stub_none)
3816 continue;
5e681ec4 3817
906e58ca
NC		 3818 /* Support for grouping stub sections. */
3819 id_sec = htab->stub_group[section->id].link_sec;
5e681ec4 3820
906e58ca
NC		 3821 /* Get the name of this stub. */
3822 stub_name = elf32_arm_stub_name (id_sec, sym_sec, hash, irela);
3823 if (!stub_name)
3824 goto error_ret_free_internal;
5e681ec4 3825
906e58ca
NC		 3826 stub_entry = arm_stub_hash_lookup (&htab->stub_hash_table,
3827 stub_name,
3828 FALSE, FALSE);
3829 if (stub_entry != NULL)
3830 {
3831 /* The proper stub has already been created. */
3832 free (stub_name);
3833 continue;
3834 }
5e681ec4 3835
da5938a2 3836 stub_entry = elf32_arm_add_stub (stub_name, section, htab);
906e58ca
NC		 3837 if (stub_entry == NULL)
3838 {
3839 free (stub_name);
3840 goto error_ret_free_internal;
3841 }
5e681ec4 3842
906e58ca
NC		 3843 stub_entry->target_value = sym_value;
3844 stub_entry->target_section = sym_sec;
3845 stub_entry->stub_type = stub_type;
3846 stub_entry->h = hash;
3847 stub_entry->st_type = st_type;
7413f23f
DJ		 3848
3849 if (sym_name == NULL)
3850 sym_name = "unnamed";
3851 stub_entry->output_name
3852 = bfd_alloc (htab->stub_bfd,
3853 sizeof (THUMB2ARM_GLUE_ENTRY_NAME)
3854 + strlen (sym_name));
3855 if (stub_entry->output_name == NULL)
3856 {
3857 free (stub_name);
3858 goto error_ret_free_internal;
3859 }
3860
3861 /* For historical reasons, use the existing names for
3862 ARM-to-Thumb and Thumb-to-ARM stubs. */
3863 if (r_type == (unsigned int) R_ARM_THM_CALL
3864 && st_type != STT_ARM_TFUNC)
3865 sprintf (stub_entry->output_name, THUMB2ARM_GLUE_ENTRY_NAME,
3866 sym_name);
3867 else if (r_type == (unsigned int) R_ARM_CALL
3868 && st_type == STT_ARM_TFUNC)
3869 sprintf (stub_entry->output_name, ARM2THUMB_GLUE_ENTRY_NAME,
3870 sym_name);
3871 else
3872 sprintf (stub_entry->output_name, STUB_ENTRY_NAME,
3873 sym_name);
3874
906e58ca
NC		 3875 stub_changed = TRUE;
3876 }
3877
3878 /* We're done with the internal relocs, free them. */
3879 if (elf_section_data (section)->relocs == NULL)
3880 free (internal_relocs);
5e681ec4 3881 }
5e681ec4
PB		 3882 }
3883
906e58ca
NC		 3884 if (!stub_changed)
3885 break;
5e681ec4 3886
906e58ca
NC		 3887 /* OK, we've added some stubs. Find out the new size of the
3888 stub sections. */
3889 for (stub_sec = htab->stub_bfd->sections;
3890 stub_sec != NULL;
3891 stub_sec = stub_sec->next)
3892 stub_sec->size = 0;
b34b2d70 3893
906e58ca
NC		 3894 bfd_hash_traverse (&htab->stub_hash_table, arm_size_one_stub, htab);
3895
3896 /* Ask the linker to do its stuff. */
3897 (*htab->layout_sections_again) ();
3898 stub_changed = FALSE;
ba93b8ac
DJ		 3899 }
3900
906e58ca
NC		 3901 return TRUE;
3902
3903 error_ret_free_local:
3904 return FALSE;
5e681ec4
PB		 3905}
3906
906e58ca
NC		 3907/* Build all the stubs associated with the current output file. The
3908 stubs are kept in a hash table attached to the main linker hash
3909 table. We also set up the .plt entries for statically linked PIC
3910 functions here. This function is called via arm_elf_finish in the
3911 linker. */
252b5132 3912
906e58ca
NC		 3913bfd_boolean
3914elf32_arm_build_stubs (struct bfd_link_info *info)
252b5132 3915{
906e58ca
NC		 3916 asection *stub_sec;
3917 struct bfd_hash_table *table;
3918 struct elf32_arm_link_hash_table *htab;
252b5132 3919
906e58ca 3920 htab = elf32_arm_hash_table (info);
252b5132 3921
906e58ca
NC		 3922 for (stub_sec = htab->stub_bfd->sections;
3923 stub_sec != NULL;
3924 stub_sec = stub_sec->next)
252b5132 3925 {
906e58ca
NC		 3926 bfd_size_type size;
3927
8029a119 3928 /* Ignore non-stub sections. */
906e58ca
NC		 3929 if (!strstr (stub_sec->name, STUB_SUFFIX))
3930 continue;
3931
3932 /* Allocate memory to hold the linker stubs. */
3933 size = stub_sec->size;
3934 stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
3935 if (stub_sec->contents == NULL && size != 0)
3936 return FALSE;
3937 stub_sec->size = 0;
252b5132
RH		 3938 }
3939
906e58ca
NC		 3940 /* Build the stubs as directed by the stub hash table. */
3941 table = &htab->stub_hash_table;
3942 bfd_hash_traverse (table, arm_build_one_stub, info);
252b5132 3943
906e58ca 3944 return TRUE;
252b5132
RH		 3945}
3946
9b485d32
NC		 3947/* Locate the Thumb encoded calling stub for NAME. */
3948
252b5132 3949static struct elf_link_hash_entry *
57e8b36a
NC		 3950find_thumb_glue (struct bfd_link_info *link_info,
3951 const char *name,
f2a9dd69 3952 char **error_message)
252b5132
RH		 3953{
3954 char *tmp_name;
3955 struct elf_link_hash_entry *hash;
3956 struct elf32_arm_link_hash_table *hash_table;
3957
3958 /* We need a pointer to the armelf specific hash table. */
3959 hash_table = elf32_arm_hash_table (link_info);
3960
57e8b36a
NC		 3961 tmp_name = bfd_malloc ((bfd_size_type) strlen (name)
3962 + strlen (THUMB2ARM_GLUE_ENTRY_NAME) + 1);
252b5132
RH		 3963
3964 BFD_ASSERT (tmp_name);
3965
3966 sprintf (tmp_name, THUMB2ARM_GLUE_ENTRY_NAME, name);
3967
3968 hash = elf_link_hash_lookup
b34976b6 3969 (&(hash_table)->root, tmp_name, FALSE, FALSE, TRUE);
252b5132 3970
b1657152
AM		 3971 if (hash == NULL
3972 && asprintf (error_message, _("unable to find THUMB glue '%s' for '%s'"),
3973 tmp_name, name) == -1)
3974 *error_message = (char *) bfd_errmsg (bfd_error_system_call);
252b5132
RH		 3975
3976 free (tmp_name);
3977
3978 return hash;
3979}
3980
9b485d32
NC		 3981/* Locate the ARM encoded calling stub for NAME. */
3982
252b5132 3983static struct elf_link_hash_entry *
57e8b36a
NC		 3984find_arm_glue (struct bfd_link_info *link_info,
3985 const char *name,
f2a9dd69 3986 char **error_message)
252b5132
RH		 3987{
3988 char *tmp_name;
3989 struct elf_link_hash_entry *myh;
3990 struct elf32_arm_link_hash_table *hash_table;
3991
3992 /* We need a pointer to the elfarm specific hash table. */
3993 hash_table = elf32_arm_hash_table (link_info);
3994
57e8b36a
NC		 3995 tmp_name = bfd_malloc ((bfd_size_type) strlen (name)
3996 + strlen (ARM2THUMB_GLUE_ENTRY_NAME) + 1);
252b5132
RH		 3997
3998 BFD_ASSERT (tmp_name);
3999
4000 sprintf (tmp_name, ARM2THUMB_GLUE_ENTRY_NAME, name);
4001
4002 myh = elf_link_hash_lookup
b34976b6 4003 (&(hash_table)->root, tmp_name, FALSE, FALSE, TRUE);
252b5132 4004
b1657152
AM		 4005 if (myh == NULL
4006 && asprintf (error_message, _("unable to find ARM glue '%s' for '%s'"),
4007 tmp_name, name) == -1)
4008 *error_message = (char *) bfd_errmsg (bfd_error_system_call);
252b5132
RH		 4009
4010 free (tmp_name);
4011
4012 return myh;
4013}
4014
8f6277f5 4015/* ARM->Thumb glue (static images):
252b5132
RH		 4016
4017 .arm
4018 __func_from_arm:
4019 ldr r12, __func_addr
4020 bx r12
4021 __func_addr:
906e58ca 4022 .word func @ behave as if you saw a ARM_32 reloc.
252b5132 4023
26079076
PB		 4024 (v5t static images)
4025 .arm
4026 __func_from_arm:
4027 ldr pc, __func_addr
4028 __func_addr:
906e58ca 4029 .word func @ behave as if you saw a ARM_32 reloc.
26079076 4030
8f6277f5
PB		 4031 (relocatable images)
4032 .arm
4033 __func_from_arm:
4034 ldr r12, __func_offset
4035 add r12, r12, pc
4036 bx r12
4037 __func_offset:
8029a119 4038 .word func - . */
8f6277f5
PB		 4039
4040#define ARM2THUMB_STATIC_GLUE_SIZE 12
252b5132
RH		 4041static const insn32 a2t1_ldr_insn = 0xe59fc000;
4042static const insn32 a2t2_bx_r12_insn = 0xe12fff1c;
4043static const insn32 a2t3_func_addr_insn = 0x00000001;
4044
26079076
PB		 4045#define ARM2THUMB_V5_STATIC_GLUE_SIZE 8
4046static const insn32 a2t1v5_ldr_insn = 0xe51ff004;
4047static const insn32 a2t2v5_func_addr_insn = 0x00000001;
4048
8f6277f5
PB		 4049#define ARM2THUMB_PIC_GLUE_SIZE 16
4050static const insn32 a2t1p_ldr_insn = 0xe59fc004;
4051static const insn32 a2t2p_add_pc_insn = 0xe08cc00f;
4052static const insn32 a2t3p_bx_r12_insn = 0xe12fff1c;
4053
9b485d32 4054/* Thumb->ARM: Thumb->(non-interworking aware) ARM
252b5132 4055
8029a119
NC		 4056 .thumb .thumb
4057 .align 2 .align 2
4058 __func_from_thumb: __func_from_thumb:
4059 bx pc push {r6, lr}
4060 nop ldr r6, __func_addr
4061 .arm mov lr, pc
4062 b func bx r6
fcef9eb7
NC		 4063 .arm
4064 ;; back_to_thumb
4065 ldmia r13! {r6, lr}
4066 bx lr
8029a119
NC		 4067 __func_addr:
4068 .word func */
252b5132
RH		 4069
4070#define THUMB2ARM_GLUE_SIZE 8
4071static const insn16 t2a1_bx_pc_insn = 0x4778;
4072static const insn16 t2a2_noop_insn = 0x46c0;
4073static const insn32 t2a3_b_insn = 0xea000000;
4074
c7b8f16e
JB		 4075#define VFP11_ERRATUM_VENEER_SIZE 8
4076
845b51d6
PB		 4077#define ARM_BX_VENEER_SIZE 12
4078static const insn32 armbx1_tst_insn = 0xe3100001;
4079static const insn32 armbx2_moveq_insn = 0x01a0f000;
4080static const insn32 armbx3_bx_insn = 0xe12fff10;
4081
7e392df6 4082#ifndef ELFARM_NABI_C_INCLUDED
8029a119
NC		 4083static void
4084arm_allocate_glue_section_space (bfd * abfd, bfd_size_type size, const char * name)
252b5132
RH		 4085{
4086 asection * s;
8029a119 4087 bfd_byte * contents;
252b5132 4088
8029a119
NC		 4089 if (size == 0)
4090 return;
252b5132 4091
8029a119 4092 BFD_ASSERT (abfd != NULL);
252b5132 4093
8029a119
NC		 4094 s = bfd_get_section_by_name (abfd, name);
4095 BFD_ASSERT (s != NULL);
252b5132 4096
8029a119 4097 contents = bfd_alloc (abfd, size);
252b5132 4098
8029a119
NC		 4099 BFD_ASSERT (s->size == size);
4100 s->contents = contents;
4101}
906e58ca 4102
8029a119
NC		 4103bfd_boolean
4104bfd_elf32_arm_allocate_interworking_sections (struct bfd_link_info * info)
4105{
4106 struct elf32_arm_link_hash_table * globals;
906e58ca 4107
8029a119
NC		 4108 globals = elf32_arm_hash_table (info);
4109 BFD_ASSERT (globals != NULL);
906e58ca 4110
8029a119
NC		 4111 arm_allocate_glue_section_space (globals->bfd_of_glue_owner,
4112 globals->arm_glue_size,
4113 ARM2THUMB_GLUE_SECTION_NAME);
906e58ca 4114
8029a119
NC		 4115 arm_allocate_glue_section_space (globals->bfd_of_glue_owner,
4116 globals->thumb_glue_size,
4117 THUMB2ARM_GLUE_SECTION_NAME);
252b5132 4118
8029a119
NC		 4119 arm_allocate_glue_section_space (globals->bfd_of_glue_owner,
4120 globals->vfp11_erratum_glue_size,
4121 VFP11_ERRATUM_VENEER_SECTION_NAME);
845b51d6 4122
8029a119
NC		 4123 arm_allocate_glue_section_space (globals->bfd_of_glue_owner,
4124 globals->bx_glue_size,
845b51d6
PB		 4125 ARM_BX_GLUE_SECTION_NAME);
4126
b34976b6 4127 return TRUE;
252b5132
RH		 4128}
4129
a4fd1a8e 4130/* Allocate space and symbols for calling a Thumb function from Arm mode.
906e58ca
NC		 4131 returns the symbol identifying the stub. */
4132
a4fd1a8e 4133static struct elf_link_hash_entry *
57e8b36a
NC		 4134record_arm_to_thumb_glue (struct bfd_link_info * link_info,
4135 struct elf_link_hash_entry * h)
252b5132
RH		 4136{
4137 const char * name = h->root.root.string;
63b0f745 4138 asection * s;
252b5132
RH		 4139 char * tmp_name;
4140 struct elf_link_hash_entry * myh;
14a793b2 4141 struct bfd_link_hash_entry * bh;
252b5132 4142 struct elf32_arm_link_hash_table * globals;
dc810e39 4143 bfd_vma val;
2f475487 4144 bfd_size_type size;
252b5132
RH		 4145
4146 globals = elf32_arm_hash_table (link_info);
4147
4148 BFD_ASSERT (globals != NULL);
4149 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
4150
4151 s = bfd_get_section_by_name
4152 (globals->bfd_of_glue_owner, ARM2THUMB_GLUE_SECTION_NAME);
4153
252b5132
RH		 4154 BFD_ASSERT (s != NULL);
4155
57e8b36a 4156 tmp_name = bfd_malloc ((bfd_size_type) strlen (name) + strlen (ARM2THUMB_GLUE_ENTRY_NAME) + 1);
252b5132
RH		 4157
4158 BFD_ASSERT (tmp_name);
4159
4160 sprintf (tmp_name, ARM2THUMB_GLUE_ENTRY_NAME, name);
4161
4162 myh = elf_link_hash_lookup
b34976b6 4163 (&(globals)->root, tmp_name, FALSE, FALSE, TRUE);
252b5132
RH		 4164
4165 if (myh != NULL)
4166 {
9b485d32 4167 /* We've already seen this guy. */
252b5132 4168 free (tmp_name);
a4fd1a8e 4169 return myh;
252b5132
RH		 4170 }
4171
57e8b36a
NC		 4172 /* The only trick here is using hash_table->arm_glue_size as the value.
4173 Even though the section isn't allocated yet, this is where we will be
3dccd7b7
DJ		 4174 putting it. The +1 on the value marks that the stub has not been
4175 output yet - not that it is a Thumb function. */
14a793b2 4176 bh = NULL;
dc810e39
AM		 4177 val = globals->arm_glue_size + 1;
4178 _bfd_generic_link_add_one_symbol (link_info, globals->bfd_of_glue_owner,
4179 tmp_name, BSF_GLOBAL, s, val,
b34976b6 4180 NULL, TRUE, FALSE, &bh);
252b5132 4181
b7693d02
DJ		 4182 myh = (struct elf_link_hash_entry *) bh;
4183 myh->type = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
4184 myh->forced_local = 1;
4185
252b5132
RH		 4186 free (tmp_name);
4187
27e55c4d
PB		 4188 if (link_info->shared || globals->root.is_relocatable_executable
4189 || globals->pic_veneer)
2f475487 4190 size = ARM2THUMB_PIC_GLUE_SIZE;
26079076
PB		 4191 else if (globals->use_blx)
4192 size = ARM2THUMB_V5_STATIC_GLUE_SIZE;
8f6277f5 4193 else
2f475487
AM		 4194 size = ARM2THUMB_STATIC_GLUE_SIZE;
4195
4196 s->size += size;
4197 globals->arm_glue_size += size;
252b5132 4198
a4fd1a8e 4199 return myh;
252b5132
RH		 4200}
4201
4202static void
57e8b36a
NC		 4203record_thumb_to_arm_glue (struct bfd_link_info *link_info,
4204 struct elf_link_hash_entry *h)
252b5132
RH		 4205{
4206 const char *name = h->root.root.string;
63b0f745 4207 asection *s;
252b5132
RH		 4208 char *tmp_name;
4209 struct elf_link_hash_entry *myh;
14a793b2 4210 struct bfd_link_hash_entry *bh;
252b5132 4211 struct elf32_arm_link_hash_table *hash_table;
dc810e39 4212 bfd_vma val;
252b5132
RH		 4213
4214 hash_table = elf32_arm_hash_table (link_info);
4215
4216 BFD_ASSERT (hash_table != NULL);
4217 BFD_ASSERT (hash_table->bfd_of_glue_owner != NULL);
4218
4219 s = bfd_get_section_by_name
4220 (hash_table->bfd_of_glue_owner, THUMB2ARM_GLUE_SECTION_NAME);
4221
4222 BFD_ASSERT (s != NULL);
4223
57e8b36a
NC		 4224 tmp_name = bfd_malloc ((bfd_size_type) strlen (name)
4225 + strlen (THUMB2ARM_GLUE_ENTRY_NAME) + 1);
252b5132
RH		 4226
4227 BFD_ASSERT (tmp_name);
4228
4229 sprintf (tmp_name, THUMB2ARM_GLUE_ENTRY_NAME, name);
4230
4231 myh = elf_link_hash_lookup
b34976b6 4232 (&(hash_table)->root, tmp_name, FALSE, FALSE, TRUE);
252b5132
RH		 4233
4234 if (myh != NULL)
4235 {
9b485d32 4236 /* We've already seen this guy. */
252b5132 4237 free (tmp_name);
9b485d32 4238 return;
252b5132
RH		 4239 }
4240
3dccd7b7
DJ		 4241 /* The only trick here is using hash_table->thumb_glue_size as the value.
4242 Even though the section isn't allocated yet, this is where we will be
4243 putting it. The +1 on the value marks that the stub has not been
4244 output yet - not that it is a Thumb function. */
14a793b2 4245 bh = NULL;
dc810e39
AM		 4246 val = hash_table->thumb_glue_size + 1;
4247 _bfd_generic_link_add_one_symbol (link_info, hash_table->bfd_of_glue_owner,
4248 tmp_name, BSF_GLOBAL, s, val,
b34976b6 4249 NULL, TRUE, FALSE, &bh);
252b5132 4250
9b485d32 4251 /* If we mark it 'Thumb', the disassembler will do a better job. */
14a793b2 4252 myh = (struct elf_link_hash_entry *) bh;
b7693d02
DJ		 4253 myh->type = ELF_ST_INFO (STB_LOCAL, STT_ARM_TFUNC);
4254 myh->forced_local = 1;
252b5132
RH		 4255
4256 free (tmp_name);
4257
252b5132
RH		 4258#define CHANGE_TO_ARM "__%s_change_to_arm"
4259#define BACK_FROM_ARM "__%s_back_from_arm"
4260
9b485d32 4261 /* Allocate another symbol to mark where we switch to Arm mode. */
57e8b36a
NC		 4262 tmp_name = bfd_malloc ((bfd_size_type) strlen (name)
4263 + strlen (CHANGE_TO_ARM) + 1);
252b5132
RH		 4264
4265 BFD_ASSERT (tmp_name);
4266
4267 sprintf (tmp_name, CHANGE_TO_ARM, name);
4268
14a793b2 4269 bh = NULL;
dc810e39
AM		 4270 val = hash_table->thumb_glue_size + 4,
4271 _bfd_generic_link_add_one_symbol (link_info, hash_table->bfd_of_glue_owner,
4272 tmp_name, BSF_LOCAL, s, val,
b34976b6 4273 NULL, TRUE, FALSE, &bh);
252b5132
RH		 4274
4275 free (tmp_name);
4276
2f475487 4277 s->size += THUMB2ARM_GLUE_SIZE;
252b5132 4278 hash_table->thumb_glue_size += THUMB2ARM_GLUE_SIZE;
252b5132
RH		 4279}
4280
c7b8f16e 4281
845b51d6
PB		 4282/* Allocate space for ARMv4 BX veneers. */
4283
4284static void
4285record_arm_bx_glue (struct bfd_link_info * link_info, int reg)
4286{
4287 asection * s;
4288 struct elf32_arm_link_hash_table *globals;
4289 char *tmp_name;
4290 struct elf_link_hash_entry *myh;
4291 struct bfd_link_hash_entry *bh;
4292 bfd_vma val;
4293
4294 /* BX PC does not need a veneer. */
4295 if (reg == 15)
4296 return;
4297
4298 globals = elf32_arm_hash_table (link_info);
4299
4300 BFD_ASSERT (globals != NULL);
4301 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
4302
4303 /* Check if this veneer has already been allocated. */
4304 if (globals->bx_glue_offset[reg])
4305 return;
4306
4307 s = bfd_get_section_by_name
4308 (globals->bfd_of_glue_owner, ARM_BX_GLUE_SECTION_NAME);
4309
4310 BFD_ASSERT (s != NULL);
4311
4312 /* Add symbol for veneer. */
4313 tmp_name = bfd_malloc ((bfd_size_type) strlen (ARM_BX_GLUE_ENTRY_NAME) + 1);
906e58ca 4314
845b51d6 4315 BFD_ASSERT (tmp_name);
906e58ca 4316
845b51d6 4317 sprintf (tmp_name, ARM_BX_GLUE_ENTRY_NAME, reg);
906e58ca 4318
845b51d6
PB		 4319 myh = elf_link_hash_lookup
4320 (&(globals)->root, tmp_name, FALSE, FALSE, FALSE);
906e58ca 4321
845b51d6 4322 BFD_ASSERT (myh == NULL);
906e58ca 4323
845b51d6
PB		 4324 bh = NULL;
4325 val = globals->bx_glue_size;
4326 _bfd_generic_link_add_one_symbol (link_info, globals->bfd_of_glue_owner,
4327 tmp_name, BSF_FUNCTION | BSF_LOCAL, s, val,
4328 NULL, TRUE, FALSE, &bh);
4329
4330 myh = (struct elf_link_hash_entry *) bh;
4331 myh->type = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
4332 myh->forced_local = 1;
4333
4334 s->size += ARM_BX_VENEER_SIZE;
4335 globals->bx_glue_offset[reg] = globals->bx_glue_size | 2;
4336 globals->bx_glue_size += ARM_BX_VENEER_SIZE;
4337}
4338
4339
c7b8f16e
JB		 4340/* Add an entry to the code/data map for section SEC. */
4341
4342static void
4343elf32_arm_section_map_add (asection *sec, char type, bfd_vma vma)
4344{
4345 struct _arm_elf_section_data *sec_data = elf32_arm_section_data (sec);
4346 unsigned int newidx;
906e58ca 4347
c7b8f16e
JB		 4348 if (sec_data->map == NULL)
4349 {
4350 sec_data->map = bfd_malloc (sizeof (elf32_arm_section_map));
4351 sec_data->mapcount = 0;
4352 sec_data->mapsize = 1;
4353 }
906e58ca 4354
c7b8f16e 4355 newidx = sec_data->mapcount++;
906e58ca 4356
c7b8f16e
JB		 4357 if (sec_data->mapcount > sec_data->mapsize)
4358 {
4359 sec_data->mapsize *= 2;
515ef31d
NC		 4360 sec_data->map = bfd_realloc_or_free (sec_data->map, sec_data->mapsize
4361 * sizeof (elf32_arm_section_map));
4362 }
4363
4364 if (sec_data->map)
4365 {
4366 sec_data->map[newidx].vma = vma;
4367 sec_data->map[newidx].type = type;
c7b8f16e 4368 }
c7b8f16e
JB		 4369}
4370
4371
4372/* Record information about a VFP11 denorm-erratum veneer. Only ARM-mode
4373 veneers are handled for now. */
4374
4375static bfd_vma
4376record_vfp11_erratum_veneer (struct bfd_link_info *link_info,
4377 elf32_vfp11_erratum_list *branch,
4378 bfd *branch_bfd,
4379 asection *branch_sec,
4380 unsigned int offset)
4381{
4382 asection *s;
4383 struct elf32_arm_link_hash_table *hash_table;
4384 char *tmp_name;
4385 struct elf_link_hash_entry *myh;
4386 struct bfd_link_hash_entry *bh;
4387 bfd_vma val;
4388 struct _arm_elf_section_data *sec_data;
4389 int errcount;
4390 elf32_vfp11_erratum_list *newerr;
906e58ca 4391
c7b8f16e 4392 hash_table = elf32_arm_hash_table (link_info);
906e58ca 4393
c7b8f16e
JB		 4394 BFD_ASSERT (hash_table != NULL);
4395 BFD_ASSERT (hash_table->bfd_of_glue_owner != NULL);
906e58ca 4396
c7b8f16e
JB		 4397 s = bfd_get_section_by_name
4398 (hash_table->bfd_of_glue_owner, VFP11_ERRATUM_VENEER_SECTION_NAME);
906e58ca 4399
c7b8f16e 4400 sec_data = elf32_arm_section_data (s);
906e58ca 4401
c7b8f16e 4402 BFD_ASSERT (s != NULL);
906e58ca 4403
c7b8f16e
JB		 4404 tmp_name = bfd_malloc ((bfd_size_type) strlen
4405 (VFP11_ERRATUM_VENEER_ENTRY_NAME) + 10);
906e58ca 4406
c7b8f16e 4407 BFD_ASSERT (tmp_name);
906e58ca 4408
c7b8f16e
JB		 4409 sprintf (tmp_name, VFP11_ERRATUM_VENEER_ENTRY_NAME,
4410 hash_table->num_vfp11_fixes);
906e58ca 4411
c7b8f16e
JB		 4412 myh = elf_link_hash_lookup
4413 (&(hash_table)->root, tmp_name, FALSE, FALSE, FALSE);
906e58ca 4414
c7b8f16e 4415 BFD_ASSERT (myh == NULL);
906e58ca 4416
c7b8f16e
JB		 4417 bh = NULL;
4418 val = hash_table->vfp11_erratum_glue_size;
4419 _bfd_generic_link_add_one_symbol (link_info, hash_table->bfd_of_glue_owner,
4420 tmp_name, BSF_FUNCTION | BSF_LOCAL, s, val,
4421 NULL, TRUE, FALSE, &bh);
4422
4423 myh = (struct elf_link_hash_entry *) bh;
4424 myh->type = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
4425 myh->forced_local = 1;
4426
4427 /* Link veneer back to calling location. */
4428 errcount = ++(sec_data->erratumcount);
4429 newerr = bfd_zmalloc (sizeof (elf32_vfp11_erratum_list));
906e58ca 4430
c7b8f16e
JB		 4431 newerr->type = VFP11_ERRATUM_ARM_VENEER;
4432 newerr->vma = -1;
4433 newerr->u.v.branch = branch;
4434 newerr->u.v.id = hash_table->num_vfp11_fixes;
4435 branch->u.b.veneer = newerr;
4436
4437 newerr->next = sec_data->erratumlist;
4438 sec_data->erratumlist = newerr;
4439
4440 /* A symbol for the return from the veneer. */
4441 sprintf (tmp_name, VFP11_ERRATUM_VENEER_ENTRY_NAME "_r",
4442 hash_table->num_vfp11_fixes);
4443
4444 myh = elf_link_hash_lookup
4445 (&(hash_table)->root, tmp_name, FALSE, FALSE, FALSE);
906e58ca 4446
c7b8f16e
JB		 4447 if (myh != NULL)
4448 abort ();
4449
4450 bh = NULL;
4451 val = offset + 4;
4452 _bfd_generic_link_add_one_symbol (link_info, branch_bfd, tmp_name, BSF_LOCAL,
4453 branch_sec, val, NULL, TRUE, FALSE, &bh);
906e58ca 4454
c7b8f16e
JB		 4455 myh = (struct elf_link_hash_entry *) bh;
4456 myh->type = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
4457 myh->forced_local = 1;
4458
4459 free (tmp_name);
906e58ca 4460
c7b8f16e
JB		 4461 /* Generate a mapping symbol for the veneer section, and explicitly add an
4462 entry for that symbol to the code/data map for the section. */
4463 if (hash_table->vfp11_erratum_glue_size == 0)
4464 {
4465 bh = NULL;
4466 /* FIXME: Creates an ARM symbol. Thumb mode will need attention if it
4467 ever requires this erratum fix. */
4468 _bfd_generic_link_add_one_symbol (link_info,
4469 hash_table->bfd_of_glue_owner, "$a",
4470 BSF_LOCAL, s, 0, NULL,
4471 TRUE, FALSE, &bh);
4472
4473 myh = (struct elf_link_hash_entry *) bh;
4474 myh->type = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
4475 myh->forced_local = 1;
906e58ca 4476
c7b8f16e
JB		 4477 /* The elf32_arm_init_maps function only cares about symbols from input
4478 BFDs. We must make a note of this generated mapping symbol
4479 ourselves so that code byteswapping works properly in
4480 elf32_arm_write_section. */
4481 elf32_arm_section_map_add (s, 'a', 0);
4482 }
906e58ca 4483
c7b8f16e
JB		 4484 s->size += VFP11_ERRATUM_VENEER_SIZE;
4485 hash_table->vfp11_erratum_glue_size += VFP11_ERRATUM_VENEER_SIZE;
4486 hash_table->num_vfp11_fixes++;
906e58ca 4487
c7b8f16e
JB		 4488 /* The offset of the veneer. */
4489 return val;
4490}
4491
8029a119
NC		 4492/* Note: we do not include the flag SEC_LINKER_CREATED, as that
4493 would prevent elf_link_input_bfd() from processing the contents
4494 of the section. */
4495#define ARM_GLUE_SECTION_FLAGS \
4496 (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY | SEC_CODE | SEC_READONLY)
4497
4498/* Create a fake section for use by the ARM backend of the linker. */
4499
4500static bfd_boolean
4501arm_make_glue_section (bfd * abfd, const char * name)
4502{
4503 asection * sec;
4504
4505 sec = bfd_get_section_by_name (abfd, name);
4506 if (sec != NULL)
4507 /* Already made. */
4508 return TRUE;
4509
4510 sec = bfd_make_section_with_flags (abfd, name, ARM_GLUE_SECTION_FLAGS);
4511
4512 if (sec == NULL
4513 || !bfd_set_section_alignment (abfd, sec, 2))
4514 return FALSE;
4515
4516 /* Set the gc mark to prevent the section from being removed by garbage
4517 collection, despite the fact that no relocs refer to this section. */
4518 sec->gc_mark = 1;
4519
4520 return TRUE;
4521}
4522
8afb0e02
NC		 4523/* Add the glue sections to ABFD. This function is called from the
4524 linker scripts in ld/emultempl/{armelf}.em. */
9b485d32 4525
b34976b6 4526bfd_boolean
57e8b36a
NC		 4527bfd_elf32_arm_add_glue_sections_to_bfd (bfd *abfd,
4528 struct bfd_link_info *info)
252b5132 4529{
8afb0e02
NC		 4530 /* If we are only performing a partial
4531 link do not bother adding the glue. */
1049f94e 4532 if (info->relocatable)
b34976b6 4533 return TRUE;
252b5132 4534
8029a119 4535 /* Linker stubs don't need glue. */
906e58ca
NC		 4536 if (!strcmp (abfd->filename, "linker stubs"))
4537 return TRUE;
4538
8029a119
NC		 4539 return arm_make_glue_section (abfd, ARM2THUMB_GLUE_SECTION_NAME)
4540 && arm_make_glue_section (abfd, THUMB2ARM_GLUE_SECTION_NAME)
4541 && arm_make_glue_section (abfd, VFP11_ERRATUM_VENEER_SECTION_NAME)
4542 && arm_make_glue_section (abfd, ARM_BX_GLUE_SECTION_NAME);
8afb0e02
NC		 4543}
4544
4545/* Select a BFD to be used to hold the sections used by the glue code.
4546 This function is called from the linker scripts in ld/emultempl/
8029a119 4547 {armelf/pe}.em. */
8afb0e02 4548
b34976b6 4549bfd_boolean
57e8b36a 4550bfd_elf32_arm_get_bfd_for_interworking (bfd *abfd, struct bfd_link_info *info)
8afb0e02
NC		 4551{
4552 struct elf32_arm_link_hash_table *globals;
4553
4554 /* If we are only performing a partial link
4555 do not bother getting a bfd to hold the glue. */
1049f94e 4556 if (info->relocatable)
b34976b6 4557 return TRUE;
8afb0e02 4558
b7693d02
DJ		 4559 /* Make sure we don't attach the glue sections to a dynamic object. */
4560 BFD_ASSERT (!(abfd->flags & DYNAMIC));
4561
8afb0e02
NC		 4562 globals = elf32_arm_hash_table (info);
4563
4564 BFD_ASSERT (globals != NULL);
4565
4566 if (globals->bfd_of_glue_owner != NULL)
b34976b6 4567 return TRUE;
8afb0e02 4568
252b5132
RH		 4569 /* Save the bfd for later use. */
4570 globals->bfd_of_glue_owner = abfd;
cedb70c5 4571
b34976b6 4572 return TRUE;
252b5132
RH		 4573}
4574
906e58ca
NC		 4575static void
4576check_use_blx (struct elf32_arm_link_hash_table *globals)
39b41c9c 4577{
104d59d1
JM		 4578 if (bfd_elf_get_obj_attr_int (globals->obfd, OBJ_ATTR_PROC,
4579 Tag_CPU_arch) > 2)
39b41c9c
PB		 4580 globals->use_blx = 1;
4581}
4582
b34976b6 4583bfd_boolean
57e8b36a 4584bfd_elf32_arm_process_before_allocation (bfd *abfd,
d504ffc8 4585 struct bfd_link_info *link_info)
252b5132
RH		 4586{
4587 Elf_Internal_Shdr *symtab_hdr;
6cdc0ccc 4588 Elf_Internal_Rela *internal_relocs = NULL;
252b5132
RH		 4589 Elf_Internal_Rela *irel, *irelend;
4590 bfd_byte *contents = NULL;
252b5132
RH		 4591
4592 asection *sec;
4593 struct elf32_arm_link_hash_table *globals;
4594
4595 /* If we are only performing a partial link do not bother
4596 to construct any glue. */
1049f94e 4597 if (link_info->relocatable)
b34976b6 4598 return TRUE;
252b5132 4599
39ce1a6a
NC		 4600 /* Here we have a bfd that is to be included on the link. We have a
4601 hook to do reloc rummaging, before section sizes are nailed down. */
252b5132
RH		 4602 globals = elf32_arm_hash_table (link_info);
4603
4604 BFD_ASSERT (globals != NULL);
39ce1a6a
NC		 4605
4606 check_use_blx (globals);
252b5132 4607
d504ffc8 4608 if (globals->byteswap_code && !bfd_big_endian (abfd))
e489d0ae 4609 {
d003868e
AM		 4610 _bfd_error_handler (_("%B: BE8 images only valid in big-endian mode."),
4611 abfd);
e489d0ae
PB		 4612 return FALSE;
4613 }
f21f3fe0 4614
39ce1a6a
NC		 4615 /* PR 5398: If we have not decided to include any loadable sections in
4616 the output then we will not have a glue owner bfd. This is OK, it
4617 just means that there is nothing else for us to do here. */
4618 if (globals->bfd_of_glue_owner == NULL)
4619 return TRUE;
4620
252b5132
RH		 4621 /* Rummage around all the relocs and map the glue vectors. */
4622 sec = abfd->sections;
4623
4624 if (sec == NULL)
b34976b6 4625 return TRUE;
252b5132
RH		 4626
4627 for (; sec != NULL; sec = sec->next)
4628 {
4629 if (sec->reloc_count == 0)
4630 continue;
4631
2f475487
AM		 4632 if ((sec->flags & SEC_EXCLUDE) != 0)
4633 continue;
4634
0ffa91dd 4635 symtab_hdr = & elf_symtab_hdr (abfd);
252b5132 4636
9b485d32 4637 /* Load the relocs. */
6cdc0ccc 4638 internal_relocs
906e58ca 4639 = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL, FALSE);
252b5132 4640
6cdc0ccc
AM		 4641 if (internal_relocs == NULL)
4642 goto error_return;
252b5132 4643
6cdc0ccc
AM		 4644 irelend = internal_relocs + sec->reloc_count;
4645 for (irel = internal_relocs; irel < irelend; irel++)
252b5132
RH		 4646 {
4647 long r_type;
4648 unsigned long r_index;
252b5132
RH		 4649
4650 struct elf_link_hash_entry *h;
4651
4652 r_type = ELF32_R_TYPE (irel->r_info);
4653 r_index = ELF32_R_SYM (irel->r_info);
4654
9b485d32 4655 /* These are the only relocation types we care about. */
ba96a88f 4656 if ( r_type != R_ARM_PC24
b7693d02 4657 && r_type != R_ARM_PLT32
5b5bb741 4658 && r_type != R_ARM_JUMP24
845b51d6
PB		 4659 && r_type != R_ARM_THM_JUMP24
4660 && (r_type != R_ARM_V4BX || globals->fix_v4bx < 2))
252b5132
RH		 4661 continue;
4662
4663 /* Get the section contents if we haven't done so already. */
4664 if (contents == NULL)
4665 {
4666 /* Get cached copy if it exists. */
4667 if (elf_section_data (sec)->this_hdr.contents != NULL)
4668 contents = elf_section_data (sec)->this_hdr.contents;
4669 else
4670 {
4671 /* Go get them off disk. */
57e8b36a 4672 if (! bfd_malloc_and_get_section (abfd, sec, &contents))
252b5132
RH		 4673 goto error_return;
4674 }
4675 }
4676
845b51d6
PB		 4677 if (r_type == R_ARM_V4BX)
4678 {
4679 int reg;
4680
4681 reg = bfd_get_32 (abfd, contents + irel->r_offset) & 0xf;
4682 record_arm_bx_glue (link_info, reg);
4683 continue;
4684 }
4685
a7c10850 4686 /* If the relocation is not against a symbol it cannot concern us. */
252b5132
RH		 4687 h = NULL;
4688
9b485d32 4689 /* We don't care about local symbols. */
252b5132
RH		 4690 if (r_index < symtab_hdr->sh_info)
4691 continue;
4692
9b485d32 4693 /* This is an external symbol. */
252b5132
RH		 4694 r_index -= symtab_hdr->sh_info;
4695 h = (struct elf_link_hash_entry *)
4696 elf_sym_hashes (abfd)[r_index];
4697
4698 /* If the relocation is against a static symbol it must be within
4699 the current section and so cannot be a cross ARM/Thumb relocation. */
4700 if (h == NULL)
4701 continue;
4702
d504ffc8
DJ		 4703 /* If the call will go through a PLT entry then we do not need
4704 glue. */
4705 if (globals->splt != NULL && h->plt.offset != (bfd_vma) -1)
b7693d02
DJ		 4706 continue;
4707
252b5132
RH		 4708 switch (r_type)
4709 {
4710 case R_ARM_PC24:
c6596c5e 4711 case R_ARM_PLT32:
5b5bb741 4712 case R_ARM_JUMP24:
252b5132 4713 /* This one is a call from arm code. We need to look up
2f0ca46a 4714 the target of the call. If it is a thumb target, we
252b5132 4715 insert glue. */
ebe24dd4 4716 if (ELF_ST_TYPE (h->type) == STT_ARM_TFUNC)
252b5132
RH		 4717 record_arm_to_thumb_glue (link_info, h);
4718 break;
4719
bd97cb95 4720 case R_ARM_THM_JUMP24:
f21f3fe0 4721 /* This one is a call from thumb code. We look
2f0ca46a 4722 up the target of the call. If it is not a thumb
bcbdc74c 4723 target, we insert glue. */
bd97cb95
DJ		 4724 if (ELF_ST_TYPE (h->type) != STT_ARM_TFUNC
4725 && !(globals->use_blx && r_type == R_ARM_THM_CALL)
5ab79981 4726 && h->root.type != bfd_link_hash_undefweak)
252b5132
RH		 4727 record_thumb_to_arm_glue (link_info, h);
4728 break;
4729
4730 default:
c6596c5e 4731 abort ();
252b5132
RH		 4732 }
4733 }
6cdc0ccc
AM		 4734
4735 if (contents != NULL
4736 && elf_section_data (sec)->this_hdr.contents != contents)
4737 free (contents);
4738 contents = NULL;
4739
4740 if (internal_relocs != NULL
4741 && elf_section_data (sec)->relocs != internal_relocs)
4742 free (internal_relocs);
4743 internal_relocs = NULL;
252b5132
RH		 4744 }
4745
b34976b6 4746 return TRUE;
9a5aca8c 4747
252b5132 4748error_return:
6cdc0ccc
AM		 4749 if (contents != NULL
4750 && elf_section_data (sec)->this_hdr.contents != contents)
4751 free (contents);
4752 if (internal_relocs != NULL
4753 && elf_section_data (sec)->relocs != internal_relocs)
4754 free (internal_relocs);
9a5aca8c 4755
b34976b6 4756 return FALSE;
252b5132 4757}
7e392df6 4758#endif
252b5132 4759
eb043451 4760
c7b8f16e
JB		 4761/* Initialise maps of ARM/Thumb/data for input BFDs. */
4762
4763void
4764bfd_elf32_arm_init_maps (bfd *abfd)
4765{
4766 Elf_Internal_Sym *isymbuf;
4767 Elf_Internal_Shdr *hdr;
4768 unsigned int i, localsyms;
4769
af1f4419
NC		 4770 /* PR 7093: Make sure that we are dealing with an arm elf binary. */
4771 if (! is_arm_elf (abfd))
4772 return;
4773
c7b8f16e
JB		 4774 if ((abfd->flags & DYNAMIC) != 0)
4775 return;
4776
0ffa91dd 4777 hdr = & elf_symtab_hdr (abfd);
c7b8f16e
JB		 4778 localsyms = hdr->sh_info;
4779
4780 /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
4781 should contain the number of local symbols, which should come before any
4782 global symbols. Mapping symbols are always local. */
4783 isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL,
4784 NULL);
4785
4786 /* No internal symbols read? Skip this BFD. */
4787 if (isymbuf == NULL)
4788 return;
4789
4790 for (i = 0; i < localsyms; i++)
4791 {
4792 Elf_Internal_Sym *isym = &isymbuf[i];
4793 asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
4794 const char *name;
906e58ca 4795
c7b8f16e
JB		 4796 if (sec != NULL
4797 && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
4798 {
4799 name = bfd_elf_string_from_elf_section (abfd,
4800 hdr->sh_link, isym->st_name);
906e58ca 4801
c7b8f16e
JB		 4802 if (bfd_is_arm_special_symbol_name (name,
4803 BFD_ARM_SPECIAL_SYM_TYPE_MAP))
4804 elf32_arm_section_map_add (sec, name[1], isym->st_value);
4805 }
4806 }
4807}
4808
4809
4810void
4811bfd_elf32_arm_set_vfp11_fix (bfd *obfd, struct bfd_link_info *link_info)
4812{
4813 struct elf32_arm_link_hash_table *globals = elf32_arm_hash_table (link_info);
104d59d1 4814 obj_attribute *out_attr = elf_known_obj_attributes_proc (obfd);
906e58ca 4815
c7b8f16e
JB		 4816 /* We assume that ARMv7+ does not need the VFP11 denorm erratum fix. */
4817 if (out_attr[Tag_CPU_arch].i >= TAG_CPU_ARCH_V7)
4818 {
4819 switch (globals->vfp11_fix)
4820 {
4821 case BFD_ARM_VFP11_FIX_DEFAULT:
4822 case BFD_ARM_VFP11_FIX_NONE:
4823 globals->vfp11_fix = BFD_ARM_VFP11_FIX_NONE;
4824 break;
906e58ca 4825
c7b8f16e
JB		 4826 default:
4827 /* Give a warning, but do as the user requests anyway. */
4828 (*_bfd_error_handler) (_("%B: warning: selected VFP11 erratum "
4829 "workaround is not necessary for target architecture"), obfd);
4830 }
4831 }
4832 else if (globals->vfp11_fix == BFD_ARM_VFP11_FIX_DEFAULT)
4833 /* For earlier architectures, we might need the workaround, but do not
4834 enable it by default. If users is running with broken hardware, they
4835 must enable the erratum fix explicitly. */
4836 globals->vfp11_fix = BFD_ARM_VFP11_FIX_NONE;
4837}
4838
4839
906e58ca
NC		 4840enum bfd_arm_vfp11_pipe
4841{
c7b8f16e
JB		 4842 VFP11_FMAC,
4843 VFP11_LS,
4844 VFP11_DS,
4845 VFP11_BAD
4846};
4847
4848/* Return a VFP register number. This is encoded as RX:X for single-precision
4849 registers, or X:RX for double-precision registers, where RX is the group of
4850 four bits in the instruction encoding and X is the single extension bit.
4851 RX and X fields are specified using their lowest (starting) bit. The return
4852 value is:
4853
4854 0...31: single-precision registers s0...s31
4855 32...63: double-precision registers d0...d31.
906e58ca 4856
c7b8f16e
JB		 4857 Although X should be zero for VFP11 (encoding d0...d15 only), we might
4858 encounter VFP3 instructions, so we allow the full range for DP registers. */
906e58ca 4859
c7b8f16e
JB		 4860static unsigned int
4861bfd_arm_vfp11_regno (unsigned int insn, bfd_boolean is_double, unsigned int rx,
4862 unsigned int x)
4863{
4864 if (is_double)
4865 return (((insn >> rx) & 0xf) | (((insn >> x) & 1) << 4)) + 32;
4866 else
4867 return (((insn >> rx) & 0xf) << 1) | ((insn >> x) & 1);
4868}
4869
4870/* Set bits in *WMASK according to a register number REG as encoded by
4871 bfd_arm_vfp11_regno(). Ignore d16-d31. */
4872
4873static void
4874bfd_arm_vfp11_write_mask (unsigned int *wmask, unsigned int reg)
4875{
4876 if (reg < 32)
4877 *wmask |= 1 << reg;
4878 else if (reg < 48)
4879 *wmask |= 3 << ((reg - 32) * 2);
4880}
4881
4882/* Return TRUE if WMASK overwrites anything in REGS. */
4883
4884static bfd_boolean
4885bfd_arm_vfp11_antidependency (unsigned int wmask, int *regs, int numregs)
4886{
4887 int i;
906e58ca 4888
c7b8f16e
JB		 4889 for (i = 0; i < numregs; i++)
4890 {
4891 unsigned int reg = regs[i];
4892
4893 if (reg < 32 && (wmask & (1 << reg)) != 0)
4894 return TRUE;
906e58ca 4895
c7b8f16e
JB		 4896 reg -= 32;
4897
4898 if (reg >= 16)
4899 continue;
906e58ca 4900
c7b8f16e
JB		 4901 if ((wmask & (3 << (reg * 2))) != 0)
4902 return TRUE;
4903 }
906e58ca 4904
c7b8f16e
JB		 4905 return FALSE;
4906}
4907
4908/* In this function, we're interested in two things: finding input registers
4909 for VFP data-processing instructions, and finding the set of registers which
4910 arbitrary VFP instructions may write to. We use a 32-bit unsigned int to
4911 hold the written set, so FLDM etc. are easy to deal with (we're only
4912 interested in 32 SP registers or 16 dp registers, due to the VFP version
4913 implemented by the chip in question). DP registers are marked by setting
4914 both SP registers in the write mask). */
4915
4916static enum bfd_arm_vfp11_pipe
4917bfd_arm_vfp11_insn_decode (unsigned int insn, unsigned int *destmask, int *regs,
4918 int *numregs)
4919{
4920 enum bfd_arm_vfp11_pipe pipe = VFP11_BAD;
4921 bfd_boolean is_double = ((insn & 0xf00) == 0xb00) ? 1 : 0;
4922
4923 if ((insn & 0x0f000e10) == 0x0e000a00) /* A data-processing insn. */
4924 {
4925 unsigned int pqrs;
4926 unsigned int fd = bfd_arm_vfp11_regno (insn, is_double, 12, 22);
4927 unsigned int fm = bfd_arm_vfp11_regno (insn, is_double, 0, 5);
4928
4929 pqrs = ((insn & 0x00800000) >> 20)
4930 | ((insn & 0x00300000) >> 19)
4931 | ((insn & 0x00000040) >> 6);
4932
4933 switch (pqrs)
4934 {
4935 case 0: /* fmac[sd]. */
4936 case 1: /* fnmac[sd]. */
4937 case 2: /* fmsc[sd]. */
4938 case 3: /* fnmsc[sd]. */
4939 pipe = VFP11_FMAC;
4940 bfd_arm_vfp11_write_mask (destmask, fd);
4941 regs[0] = fd;
4942 regs[1] = bfd_arm_vfp11_regno (insn, is_double, 16, 7); /* Fn. */
4943 regs[2] = fm;
4944 *numregs = 3;
4945 break;
4946
4947 case 4: /* fmul[sd]. */
4948 case 5: /* fnmul[sd]. */
4949 case 6: /* fadd[sd]. */
4950 case 7: /* fsub[sd]. */
4951 pipe = VFP11_FMAC;
4952 goto vfp_binop;
4953
4954 case 8: /* fdiv[sd]. */
4955 pipe = VFP11_DS;
4956 vfp_binop:
4957 bfd_arm_vfp11_write_mask (destmask, fd);
4958 regs[0] = bfd_arm_vfp11_regno (insn, is_double, 16, 7); /* Fn. */
4959 regs[1] = fm;
4960 *numregs = 2;
4961 break;
4962
4963 case 15: /* extended opcode. */
4964 {
4965 unsigned int extn = ((insn >> 15) & 0x1e)
4966 | ((insn >> 7) & 1);
4967
4968 switch (extn)
4969 {
4970 case 0: /* fcpy[sd]. */
4971 case 1: /* fabs[sd]. */
4972 case 2: /* fneg[sd]. */
4973 case 8: /* fcmp[sd]. */
4974 case 9: /* fcmpe[sd]. */
4975 case 10: /* fcmpz[sd]. */
4976 case 11: /* fcmpez[sd]. */
4977 case 16: /* fuito[sd]. */
4978 case 17: /* fsito[sd]. */
4979 case 24: /* ftoui[sd]. */
4980 case 25: /* ftouiz[sd]. */
4981 case 26: /* ftosi[sd]. */
4982 case 27: /* ftosiz[sd]. */
4983 /* These instructions will not bounce due to underflow. */
4984 *numregs = 0;
4985 pipe = VFP11_FMAC;
4986 break;
4987
4988 case 3: /* fsqrt[sd]. */
4989 /* fsqrt cannot underflow, but it can (perhaps) overwrite
4990 registers to cause the erratum in previous instructions. */
4991 bfd_arm_vfp11_write_mask (destmask, fd);
4992 pipe = VFP11_DS;
4993 break;
4994
4995 case 15: /* fcvt{ds,sd}. */
4996 {
4997 int rnum = 0;
4998
4999 bfd_arm_vfp11_write_mask (destmask, fd);
5000
5001 /* Only FCVTSD can underflow. */
5002 if ((insn & 0x100) != 0)
5003 regs[rnum++] = fm;
5004
5005 *numregs = rnum;
5006
5007 pipe = VFP11_FMAC;
5008 }
5009 break;
5010
5011 default:
5012 return VFP11_BAD;
5013 }
5014 }
5015 break;
5016
5017 default:
5018 return VFP11_BAD;
5019 }
5020 }
5021 /* Two-register transfer. */
5022 else if ((insn & 0x0fe00ed0) == 0x0c400a10)
5023 {
5024 unsigned int fm = bfd_arm_vfp11_regno (insn, is_double, 0, 5);
906e58ca 5025
c7b8f16e
JB		 5026 if ((insn & 0x100000) == 0)
5027 {
5028 if (is_double)
5029 bfd_arm_vfp11_write_mask (destmask, fm);
5030 else
5031 {
5032 bfd_arm_vfp11_write_mask (destmask, fm);
5033 bfd_arm_vfp11_write_mask (destmask, fm + 1);
5034 }
5035 }
5036
5037 pipe = VFP11_LS;
5038 }
5039 else if ((insn & 0x0e100e00) == 0x0c100a00) /* A load insn. */
5040 {
5041 int fd = bfd_arm_vfp11_regno (insn, is_double, 12, 22);
5042 unsigned int puw = ((insn >> 21) & 0x1) | (((insn >> 23) & 3) << 1);
906e58ca 5043
c7b8f16e
JB		 5044 switch (puw)
5045 {
5046 case 0: /* Two-reg transfer. We should catch these above. */
5047 abort ();
906e58ca 5048
c7b8f16e
JB		 5049 case 2: /* fldm[sdx]. */
5050 case 3:
5051 case 5:
5052 {
5053 unsigned int i, offset = insn & 0xff;
5054
5055 if (is_double)
5056 offset >>= 1;
5057
5058 for (i = fd; i < fd + offset; i++)
5059 bfd_arm_vfp11_write_mask (destmask, i);
5060 }
5061 break;
906e58ca 5062
c7b8f16e
JB		 5063 case 4: /* fld[sd]. */
5064 case 6:
5065 bfd_arm_vfp11_write_mask (destmask, fd);
5066 break;
906e58ca 5067
c7b8f16e
JB		 5068 default:
5069 return VFP11_BAD;
5070 }
5071
5072 pipe = VFP11_LS;
5073 }
5074 /* Single-register transfer. Note L==0. */
5075 else if ((insn & 0x0f100e10) == 0x0e000a10)
5076 {
5077 unsigned int opcode = (insn >> 21) & 7;
5078 unsigned int fn = bfd_arm_vfp11_regno (insn, is_double, 16, 7);
5079
5080 switch (opcode)
5081 {
5082 case 0: /* fmsr/fmdlr. */
5083 case 1: /* fmdhr. */
5084 /* Mark fmdhr and fmdlr as writing to the whole of the DP
5085 destination register. I don't know if this is exactly right,
5086 but it is the conservative choice. */
5087 bfd_arm_vfp11_write_mask (destmask, fn);
5088 break;
5089
5090 case 7: /* fmxr. */
5091 break;
5092 }
5093
5094 pipe = VFP11_LS;
5095 }
5096
5097 return pipe;
5098}
5099
5100
5101static int elf32_arm_compare_mapping (const void * a, const void * b);
5102
5103
5104/* Look for potentially-troublesome code sequences which might trigger the
5105 VFP11 denormal/antidependency erratum. See, e.g., the ARM1136 errata sheet
5106 (available from ARM) for details of the erratum. A short version is
5107 described in ld.texinfo. */
5108
5109bfd_boolean
5110bfd_elf32_arm_vfp11_erratum_scan (bfd *abfd, struct bfd_link_info *link_info)
5111{
5112 asection *sec;
5113 bfd_byte *contents = NULL;
5114 int state = 0;
5115 int regs[3], numregs = 0;
5116 struct elf32_arm_link_hash_table *globals = elf32_arm_hash_table (link_info);
5117 int use_vector = (globals->vfp11_fix == BFD_ARM_VFP11_FIX_VECTOR);
906e58ca 5118
c7b8f16e
JB		 5119 /* We use a simple FSM to match troublesome VFP11 instruction sequences.
5120 The states transition as follows:
906e58ca 5121
c7b8f16e
JB		 5122 0 -> 1 (vector) or 0 -> 2 (scalar)
5123 A VFP FMAC-pipeline instruction has been seen. Fill
5124 regs[0]..regs[numregs-1] with its input operands. Remember this
5125 instruction in 'first_fmac'.
5126
5127 1 -> 2
5128 Any instruction, except for a VFP instruction which overwrites
5129 regs[*].
906e58ca 5130
c7b8f16e
JB		 5131 1 -> 3 [ -> 0 ] or
5132 2 -> 3 [ -> 0 ]
5133 A VFP instruction has been seen which overwrites any of regs[*].
5134 We must make a veneer! Reset state to 0 before examining next
5135 instruction.
906e58ca 5136
c7b8f16e
JB		 5137 2 -> 0
5138 If we fail to match anything in state 2, reset to state 0 and reset
5139 the instruction pointer to the instruction after 'first_fmac'.
5140
5141 If the VFP11 vector mode is in use, there must be at least two unrelated
5142 instructions between anti-dependent VFP11 instructions to properly avoid
906e58ca 5143 triggering the erratum, hence the use of the extra state 1. */
c7b8f16e
JB		 5144
5145 /* If we are only performing a partial link do not bother
5146 to construct any glue. */
5147 if (link_info->relocatable)
5148 return TRUE;
5149
0ffa91dd
NC		 5150 /* Skip if this bfd does not correspond to an ELF image. */
5151 if (! is_arm_elf (abfd))
5152 return TRUE;
906e58ca 5153
c7b8f16e
JB		 5154 /* We should have chosen a fix type by the time we get here. */
5155 BFD_ASSERT (globals->vfp11_fix != BFD_ARM_VFP11_FIX_DEFAULT);
5156
5157 if (globals->vfp11_fix == BFD_ARM_VFP11_FIX_NONE)
5158 return TRUE;
2e6030b9 5159
33a7ffc2
JM		 5160 /* Skip this BFD if it corresponds to an executable or dynamic object. */
5161 if ((abfd->flags & (EXEC_P | DYNAMIC)) != 0)
5162 return TRUE;
5163
c7b8f16e
JB		 5164 for (sec = abfd->sections; sec != NULL; sec = sec->next)
5165 {
5166 unsigned int i, span, first_fmac = 0, veneer_of_insn = 0;
5167 struct _arm_elf_section_data *sec_data;
5168
5169 /* If we don't have executable progbits, we're not interested in this
5170 section. Also skip if section is to be excluded. */
5171 if (elf_section_type (sec) != SHT_PROGBITS
5172 || (elf_section_flags (sec) & SHF_EXECINSTR) == 0
5173 || (sec->flags & SEC_EXCLUDE) != 0
33a7ffc2
JM		 5174 || sec->sec_info_type == ELF_INFO_TYPE_JUST_SYMS
5175 || sec->output_section == bfd_abs_section_ptr
c7b8f16e
JB		 5176 || strcmp (sec->name, VFP11_ERRATUM_VENEER_SECTION_NAME) == 0)
5177 continue;
5178
5179 sec_data = elf32_arm_section_data (sec);
906e58ca 5180
c7b8f16e
JB		 5181 if (sec_data->mapcount == 0)
5182 continue;
906e58ca 5183
c7b8f16e
JB		 5184 if (elf_section_data (sec)->this_hdr.contents != NULL)
5185 contents = elf_section_data (sec)->this_hdr.contents;
5186 else if (! bfd_malloc_and_get_section (abfd, sec, &contents))
5187 goto error_return;
5188
5189 qsort (sec_data->map, sec_data->mapcount, sizeof (elf32_arm_section_map),
5190 elf32_arm_compare_mapping);
5191
5192 for (span = 0; span < sec_data->mapcount; span++)
5193 {
5194 unsigned int span_start = sec_data->map[span].vma;
5195 unsigned int span_end = (span == sec_data->mapcount - 1)
5196 ? sec->size : sec_data->map[span + 1].vma;
5197 char span_type = sec_data->map[span].type;
906e58ca 5198
c7b8f16e
JB		 5199 /* FIXME: Only ARM mode is supported at present. We may need to
5200 support Thumb-2 mode also at some point. */
5201 if (span_type != 'a')
5202 continue;
5203
5204 for (i = span_start; i < span_end;)
5205 {
5206 unsigned int next_i = i + 4;
5207 unsigned int insn = bfd_big_endian (abfd)
5208 ? (contents[i] << 24)
5209 | (contents[i + 1] << 16)
5210 | (contents[i + 2] << 8)
5211 | contents[i + 3]
5212 : (contents[i + 3] << 24)
5213 | (contents[i + 2] << 16)
5214 | (contents[i + 1] << 8)
5215 | contents[i];
5216 unsigned int writemask = 0;
5217 enum bfd_arm_vfp11_pipe pipe;
5218
5219 switch (state)
5220 {
5221 case 0:
5222 pipe = bfd_arm_vfp11_insn_decode (insn, &writemask, regs,
5223 &numregs);
5224 /* I'm assuming the VFP11 erratum can trigger with denorm
5225 operands on either the FMAC or the DS pipeline. This might
5226 lead to slightly overenthusiastic veneer insertion. */
5227 if (pipe == VFP11_FMAC || pipe == VFP11_DS)
5228 {
5229 state = use_vector ? 1 : 2;
5230 first_fmac = i;
5231 veneer_of_insn = insn;
5232 }
5233 break;
5234
5235 case 1:
5236 {
5237 int other_regs[3], other_numregs;
5238 pipe = bfd_arm_vfp11_insn_decode (insn, &writemask,
5239 other_regs,
5240 &other_numregs);
5241 if (pipe != VFP11_BAD
5242 && bfd_arm_vfp11_antidependency (writemask, regs,
5243 numregs))
5244 state = 3;
5245 else
5246 state = 2;
5247 }
5248 break;
5249
5250 case 2:
5251 {
5252 int other_regs[3], other_numregs;
5253 pipe = bfd_arm_vfp11_insn_decode (insn, &writemask,
5254 other_regs,
5255 &other_numregs);
5256 if (pipe != VFP11_BAD
5257 && bfd_arm_vfp11_antidependency (writemask, regs,
5258 numregs))
5259 state = 3;
5260 else
5261 {
5262 state = 0;
5263 next_i = first_fmac + 4;
5264 }
5265 }
5266 break;
5267
5268 case 3:
5269 abort (); /* Should be unreachable. */
5270 }
5271
5272 if (state == 3)
5273 {
5274 elf32_vfp11_erratum_list *newerr
5275 = bfd_zmalloc (sizeof (elf32_vfp11_erratum_list));
5276 int errcount;
5277
5278 errcount = ++(elf32_arm_section_data (sec)->erratumcount);
5279
5280 newerr->u.b.vfp_insn = veneer_of_insn;
5281
5282 switch (span_type)
5283 {
5284 case 'a':
5285 newerr->type = VFP11_ERRATUM_BRANCH_TO_ARM_VENEER;
5286 break;
906e58ca 5287
c7b8f16e
JB		 5288 default:
5289 abort ();
5290 }
5291
5292 record_vfp11_erratum_veneer (link_info, newerr, abfd, sec,
5293 first_fmac);
5294
5295 newerr->vma = -1;
5296
5297 newerr->next = sec_data->erratumlist;
5298 sec_data->erratumlist = newerr;
5299
5300 state = 0;
5301 }
5302
5303 i = next_i;
5304 }
5305 }
906e58ca 5306
c7b8f16e
JB		 5307 if (contents != NULL
5308 && elf_section_data (sec)->this_hdr.contents != contents)
5309 free (contents);
5310 contents = NULL;
5311 }
5312
5313 return TRUE;
5314
5315error_return:
5316 if (contents != NULL
5317 && elf_section_data (sec)->this_hdr.contents != contents)
5318 free (contents);
906e58ca 5319
c7b8f16e
JB		 5320 return FALSE;
5321}
5322
5323/* Find virtual-memory addresses for VFP11 erratum veneers and return locations
5324 after sections have been laid out, using specially-named symbols. */
5325
5326void
5327bfd_elf32_arm_vfp11_fix_veneer_locations (bfd *abfd,
5328 struct bfd_link_info *link_info)
5329{
5330 asection *sec;
5331 struct elf32_arm_link_hash_table *globals;
5332 char *tmp_name;
906e58ca 5333
c7b8f16e
JB		 5334 if (link_info->relocatable)
5335 return;
2e6030b9
MS		 5336
5337 /* Skip if this bfd does not correspond to an ELF image. */
0ffa91dd 5338 if (! is_arm_elf (abfd))
2e6030b9
MS		 5339 return;
5340
c7b8f16e 5341 globals = elf32_arm_hash_table (link_info);
906e58ca 5342
c7b8f16e
JB		 5343 tmp_name = bfd_malloc ((bfd_size_type) strlen
5344 (VFP11_ERRATUM_VENEER_ENTRY_NAME) + 10);
5345
5346 for (sec = abfd->sections; sec != NULL; sec = sec->next)
5347 {
5348 struct _arm_elf_section_data *sec_data = elf32_arm_section_data (sec);
5349 elf32_vfp11_erratum_list *errnode = sec_data->erratumlist;
906e58ca 5350
c7b8f16e
JB		 5351 for (; errnode != NULL; errnode = errnode->next)
5352 {
5353 struct elf_link_hash_entry *myh;
5354 bfd_vma vma;
5355
5356 switch (errnode->type)
5357 {
5358 case VFP11_ERRATUM_BRANCH_TO_ARM_VENEER:
5359 case VFP11_ERRATUM_BRANCH_TO_THUMB_VENEER:
5360 /* Find veneer symbol. */
5361 sprintf (tmp_name, VFP11_ERRATUM_VENEER_ENTRY_NAME,
5362 errnode->u.b.veneer->u.v.id);
5363
5364 myh = elf_link_hash_lookup
5365 (&(globals)->root, tmp_name, FALSE, FALSE, TRUE);
5366
5367 if (myh == NULL)
5368 (*_bfd_error_handler) (_("%B: unable to find VFP11 veneer "
5369 "`%s'"), abfd, tmp_name);
5370
5371 vma = myh->root.u.def.section->output_section->vma
5372 + myh->root.u.def.section->output_offset
5373 + myh->root.u.def.value;
5374
5375 errnode->u.b.veneer->vma = vma;
5376 break;
5377
5378 case VFP11_ERRATUM_ARM_VENEER:
5379 case VFP11_ERRATUM_THUMB_VENEER:
5380 /* Find return location. */
5381 sprintf (tmp_name, VFP11_ERRATUM_VENEER_ENTRY_NAME "_r",
5382 errnode->u.v.id);
5383
5384 myh = elf_link_hash_lookup
5385 (&(globals)->root, tmp_name, FALSE, FALSE, TRUE);
5386
5387 if (myh == NULL)
5388 (*_bfd_error_handler) (_("%B: unable to find VFP11 veneer "
5389 "`%s'"), abfd, tmp_name);
5390
5391 vma = myh->root.u.def.section->output_section->vma
5392 + myh->root.u.def.section->output_offset
5393 + myh->root.u.def.value;
5394
5395 errnode->u.v.branch->vma = vma;
5396 break;
906e58ca 5397
c7b8f16e
JB		 5398 default:
5399 abort ();
5400 }
5401 }
5402 }
906e58ca 5403
c7b8f16e
JB		 5404 free (tmp_name);
5405}
5406
5407
eb043451
PB		 5408/* Set target relocation values needed during linking. */
5409
5410void
bf21ed78
MS		 5411bfd_elf32_arm_set_target_relocs (struct bfd *output_bfd,
5412 struct bfd_link_info *link_info,
eb043451 5413 int target1_is_rel,
319850b4 5414 char * target2_type,
33bfe774 5415 int fix_v4bx,
c7b8f16e 5416 int use_blx,
bf21ed78 5417 bfd_arm_vfp11_fix vfp11_fix,
a9dc9481
JM		 5418 int no_enum_warn, int no_wchar_warn,
5419 int pic_veneer)
eb043451
PB		 5420{
5421 struct elf32_arm_link_hash_table *globals;
5422
5423 globals = elf32_arm_hash_table (link_info);
5424
5425 globals->target1_is_rel = target1_is_rel;
5426 if (strcmp (target2_type, "rel") == 0)
5427 globals->target2_reloc = R_ARM_REL32;
eeac373a
PB		 5428 else if (strcmp (target2_type, "abs") == 0)
5429 globals->target2_reloc = R_ARM_ABS32;
eb043451
PB		 5430 else if (strcmp (target2_type, "got-rel") == 0)
5431 globals->target2_reloc = R_ARM_GOT_PREL;
5432 else
5433 {
5434 _bfd_error_handler (_("Invalid TARGET2 relocation type '%s'."),
5435 target2_type);
5436 }
319850b4 5437 globals->fix_v4bx = fix_v4bx;
33bfe774 5438 globals->use_blx |= use_blx;
c7b8f16e 5439 globals->vfp11_fix = vfp11_fix;
27e55c4d 5440 globals->pic_veneer = pic_veneer;
bf21ed78 5441
0ffa91dd
NC		 5442 BFD_ASSERT (is_arm_elf (output_bfd));
5443 elf_arm_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
a9dc9481 5444 elf_arm_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
eb043451 5445}
eb043451 5446
12a0a0fd 5447/* Replace the target offset of a Thumb bl or b.w instruction. */
252b5132 5448
12a0a0fd
PB		 5449static void
5450insert_thumb_branch (bfd *abfd, long int offset, bfd_byte *insn)
5451{
5452 bfd_vma upper;
5453 bfd_vma lower;
5454 int reloc_sign;
5455
5456 BFD_ASSERT ((offset & 1) == 0);
5457
5458 upper = bfd_get_16 (abfd, insn);
5459 lower = bfd_get_16 (abfd, insn + 2);
5460 reloc_sign = (offset < 0) ? 1 : 0;
5461 upper = (upper & ~(bfd_vma) 0x7ff)
5462 | ((offset >> 12) & 0x3ff)
5463 | (reloc_sign << 10);
906e58ca 5464 lower = (lower & ~(bfd_vma) 0x2fff)
12a0a0fd
PB		 5465 | (((!((offset >> 23) & 1)) ^ reloc_sign) << 13)
5466 | (((!((offset >> 22) & 1)) ^ reloc_sign) << 11)
5467 | ((offset >> 1) & 0x7ff);
5468 bfd_put_16 (abfd, upper, insn);
5469 bfd_put_16 (abfd, lower, insn + 2);
252b5132
RH		 5470}
5471
9b485d32
NC		 5472/* Thumb code calling an ARM function. */
5473
252b5132 5474static int
57e8b36a
NC		 5475elf32_thumb_to_arm_stub (struct bfd_link_info * info,
5476 const char * name,
5477 bfd * input_bfd,
5478 bfd * output_bfd,
5479 asection * input_section,
5480 bfd_byte * hit_data,
5481 asection * sym_sec,
5482 bfd_vma offset,
5483 bfd_signed_vma addend,
f2a9dd69
DJ		 5484 bfd_vma val,
5485 char **error_message)
252b5132 5486{
bcbdc74c 5487 asection * s = 0;
dc810e39 5488 bfd_vma my_offset;
252b5132 5489 long int ret_offset;
bcbdc74c
NC		 5490 struct elf_link_hash_entry * myh;
5491 struct elf32_arm_link_hash_table * globals;
252b5132 5492
f2a9dd69 5493 myh = find_thumb_glue (info, name, error_message);
252b5132 5494 if (myh == NULL)
b34976b6 5495 return FALSE;
252b5132
RH		 5496
5497 globals = elf32_arm_hash_table (info);
5498
5499 BFD_ASSERT (globals != NULL);
5500 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
5501
5502 my_offset = myh->root.u.def.value;
5503
5504 s = bfd_get_section_by_name (globals->bfd_of_glue_owner,
5505 THUMB2ARM_GLUE_SECTION_NAME);
5506
5507 BFD_ASSERT (s != NULL);
5508 BFD_ASSERT (s->contents != NULL);
5509 BFD_ASSERT (s->output_section != NULL);
5510
5511 if ((my_offset & 0x01) == 0x01)
5512 {
5513 if (sym_sec != NULL
5514 && sym_sec->owner != NULL
5515 && !INTERWORK_FLAG (sym_sec->owner))
5516 {
8f615d07 5517 (*_bfd_error_handler)
d003868e
AM		 5518 (_("%B(%s): warning: interworking not enabled.\n"
5519 " first occurrence: %B: thumb call to arm"),
5520 sym_sec->owner, input_bfd, name);
252b5132 5521
b34976b6 5522 return FALSE;
252b5132
RH		 5523 }
5524
5525 --my_offset;
5526 myh->root.u.def.value = my_offset;
5527
52ab56c2
PB		 5528 put_thumb_insn (globals, output_bfd, (bfd_vma) t2a1_bx_pc_insn,
5529 s->contents + my_offset);
252b5132 5530
52ab56c2
PB		 5531 put_thumb_insn (globals, output_bfd, (bfd_vma) t2a2_noop_insn,
5532 s->contents + my_offset + 2);
252b5132
RH		 5533
5534 ret_offset =
9b485d32
NC		 5535 /* Address of destination of the stub. */
5536 ((bfd_signed_vma) val)
252b5132 5537 - ((bfd_signed_vma)
57e8b36a
NC		 5538 /* Offset from the start of the current section
5539 to the start of the stubs. */
9b485d32
NC		 5540 (s->output_offset
5541 /* Offset of the start of this stub from the start of the stubs. */
5542 + my_offset
5543 /* Address of the start of the current section. */
5544 + s->output_section->vma)
5545 /* The branch instruction is 4 bytes into the stub. */
5546 + 4
5547 /* ARM branches work from the pc of the instruction + 8. */
5548 + 8);
252b5132 5549
52ab56c2
PB		 5550 put_arm_insn (globals, output_bfd,
5551 (bfd_vma) t2a3_b_insn | ((ret_offset >> 2) & 0x00FFFFFF),
5552 s->contents + my_offset + 4);
252b5132
RH		 5553 }
5554
5555 BFD_ASSERT (my_offset <= globals->thumb_glue_size);
5556
427bfd90
NC		 5557 /* Now go back and fix up the original BL insn to point to here. */
5558 ret_offset =
5559 /* Address of where the stub is located. */
5560 (s->output_section->vma + s->output_offset + my_offset)
5561 /* Address of where the BL is located. */
57e8b36a
NC		 5562 - (input_section->output_section->vma + input_section->output_offset
5563 + offset)
427bfd90
NC		 5564 /* Addend in the relocation. */
5565 - addend
5566 /* Biassing for PC-relative addressing. */
5567 - 8;
252b5132 5568
12a0a0fd 5569 insert_thumb_branch (input_bfd, ret_offset, hit_data - input_section->vma);
252b5132 5570
b34976b6 5571 return TRUE;
252b5132
RH		 5572}
5573
a4fd1a8e 5574/* Populate an Arm to Thumb stub. Returns the stub symbol. */
9b485d32 5575
a4fd1a8e
PB		 5576static struct elf_link_hash_entry *
5577elf32_arm_create_thumb_stub (struct bfd_link_info * info,
5578 const char * name,
5579 bfd * input_bfd,
5580 bfd * output_bfd,
5581 asection * sym_sec,
5582 bfd_vma val,
8029a119
NC		 5583 asection * s,
5584 char ** error_message)
252b5132 5585{
dc810e39 5586 bfd_vma my_offset;
252b5132 5587 long int ret_offset;
bcbdc74c
NC		 5588 struct elf_link_hash_entry * myh;
5589 struct elf32_arm_link_hash_table * globals;
252b5132 5590
f2a9dd69 5591 myh = find_arm_glue (info, name, error_message);
252b5132 5592 if (myh == NULL)
a4fd1a8e 5593 return NULL;
252b5132
RH		 5594
5595 globals = elf32_arm_hash_table (info);
5596
5597 BFD_ASSERT (globals != NULL);
5598 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
5599
5600 my_offset = myh->root.u.def.value;
252b5132
RH		 5601
5602 if ((my_offset & 0x01) == 0x01)
5603 {
5604 if (sym_sec != NULL
5605 && sym_sec->owner != NULL
5606 && !INTERWORK_FLAG (sym_sec->owner))
5607 {
8f615d07 5608 (*_bfd_error_handler)
d003868e
AM		 5609 (_("%B(%s): warning: interworking not enabled.\n"
5610 " first occurrence: %B: arm call to thumb"),
5611 sym_sec->owner, input_bfd, name);
252b5132 5612 }
9b485d32 5613
252b5132
RH		 5614 --my_offset;
5615 myh->root.u.def.value = my_offset;
5616
27e55c4d
PB		 5617 if (info->shared || globals->root.is_relocatable_executable
5618 || globals->pic_veneer)
8f6277f5
PB		 5619 {
5620 /* For relocatable objects we can't use absolute addresses,
5621 so construct the address from a relative offset. */
5622 /* TODO: If the offset is small it's probably worth
5623 constructing the address with adds. */
52ab56c2
PB		 5624 put_arm_insn (globals, output_bfd, (bfd_vma) a2t1p_ldr_insn,
5625 s->contents + my_offset);
5626 put_arm_insn (globals, output_bfd, (bfd_vma) a2t2p_add_pc_insn,
5627 s->contents + my_offset + 4);
5628 put_arm_insn (globals, output_bfd, (bfd_vma) a2t3p_bx_r12_insn,
5629 s->contents + my_offset + 8);
8f6277f5
PB		 5630 /* Adjust the offset by 4 for the position of the add,
5631 and 8 for the pipeline offset. */
5632 ret_offset = (val - (s->output_offset
5633 + s->output_section->vma
5634 + my_offset + 12))
5635 | 1;
5636 bfd_put_32 (output_bfd, ret_offset,
5637 s->contents + my_offset + 12);
5638 }
26079076
PB		 5639 else if (globals->use_blx)
5640 {
5641 put_arm_insn (globals, output_bfd, (bfd_vma) a2t1v5_ldr_insn,
5642 s->contents + my_offset);
5643
5644 /* It's a thumb address. Add the low order bit. */
5645 bfd_put_32 (output_bfd, val | a2t2v5_func_addr_insn,
5646 s->contents + my_offset + 4);
5647 }
8f6277f5
PB		 5648 else
5649 {
52ab56c2
PB		 5650 put_arm_insn (globals, output_bfd, (bfd_vma) a2t1_ldr_insn,
5651 s->contents + my_offset);
252b5132 5652
52ab56c2
PB		 5653 put_arm_insn (globals, output_bfd, (bfd_vma) a2t2_bx_r12_insn,
5654 s->contents + my_offset + 4);
252b5132 5655
8f6277f5
PB		 5656 /* It's a thumb address. Add the low order bit. */
5657 bfd_put_32 (output_bfd, val | a2t3_func_addr_insn,
5658 s->contents + my_offset + 8);
8029a119
NC		 5659
5660 my_offset += 12;
8f6277f5 5661 }
252b5132
RH		 5662 }
5663
5664 BFD_ASSERT (my_offset <= globals->arm_glue_size);
5665
a4fd1a8e
PB		 5666 return myh;
5667}
5668
5669/* Arm code calling a Thumb function. */
5670
5671static int
5672elf32_arm_to_thumb_stub (struct bfd_link_info * info,
5673 const char * name,
5674 bfd * input_bfd,
5675 bfd * output_bfd,
5676 asection * input_section,
5677 bfd_byte * hit_data,
5678 asection * sym_sec,
5679 bfd_vma offset,
5680 bfd_signed_vma addend,
f2a9dd69
DJ		 5681 bfd_vma val,
5682 char **error_message)
a4fd1a8e
PB		 5683{
5684 unsigned long int tmp;
5685 bfd_vma my_offset;
5686 asection * s;
5687 long int ret_offset;
5688 struct elf_link_hash_entry * myh;
5689 struct elf32_arm_link_hash_table * globals;
5690
5691 globals = elf32_arm_hash_table (info);
5692
5693 BFD_ASSERT (globals != NULL);
5694 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
5695
5696 s = bfd_get_section_by_name (globals->bfd_of_glue_owner,
5697 ARM2THUMB_GLUE_SECTION_NAME);
5698 BFD_ASSERT (s != NULL);
5699 BFD_ASSERT (s->contents != NULL);
5700 BFD_ASSERT (s->output_section != NULL);
5701
5702 myh = elf32_arm_create_thumb_stub (info, name, input_bfd, output_bfd,
f2a9dd69 5703 sym_sec, val, s, error_message);
a4fd1a8e
PB		 5704 if (!myh)
5705 return FALSE;
5706
5707 my_offset = myh->root.u.def.value;
252b5132
RH		 5708 tmp = bfd_get_32 (input_bfd, hit_data);
5709 tmp = tmp & 0xFF000000;
5710
9b485d32 5711 /* Somehow these are both 4 too far, so subtract 8. */
dc810e39
AM		 5712 ret_offset = (s->output_offset
5713 + my_offset
5714 + s->output_section->vma
5715 - (input_section->output_offset
5716 + input_section->output_section->vma
5717 + offset + addend)
5718 - 8);
9a5aca8c 5719
252b5132
RH		 5720 tmp = tmp | ((ret_offset >> 2) & 0x00FFFFFF);
5721
dc810e39 5722 bfd_put_32 (output_bfd, (bfd_vma) tmp, hit_data - input_section->vma);
252b5132 5723
b34976b6 5724 return TRUE;
252b5132
RH		 5725}
5726
a4fd1a8e
PB		 5727/* Populate Arm stub for an exported Thumb function. */
5728
5729static bfd_boolean
5730elf32_arm_to_thumb_export_stub (struct elf_link_hash_entry *h, void * inf)
5731{
5732 struct bfd_link_info * info = (struct bfd_link_info *) inf;
5733 asection * s;
5734 struct elf_link_hash_entry * myh;
5735 struct elf32_arm_link_hash_entry *eh;
5736 struct elf32_arm_link_hash_table * globals;
5737 asection *sec;
5738 bfd_vma val;
f2a9dd69 5739 char *error_message;
a4fd1a8e 5740
906e58ca 5741 eh = elf32_arm_hash_entry (h);
a4fd1a8e
PB		 5742 /* Allocate stubs for exported Thumb functions on v4t. */
5743 if (eh->export_glue == NULL)
5744 return TRUE;
5745
5746 globals = elf32_arm_hash_table (info);
5747
5748 BFD_ASSERT (globals != NULL);
5749 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
5750
5751 s = bfd_get_section_by_name (globals->bfd_of_glue_owner,
5752 ARM2THUMB_GLUE_SECTION_NAME);
5753 BFD_ASSERT (s != NULL);
5754 BFD_ASSERT (s->contents != NULL);
5755 BFD_ASSERT (s->output_section != NULL);
5756
5757 sec = eh->export_glue->root.u.def.section;
0eaedd0e
PB		 5758
5759 BFD_ASSERT (sec->output_section != NULL);
5760
a4fd1a8e
PB		 5761 val = eh->export_glue->root.u.def.value + sec->output_offset
5762 + sec->output_section->vma;
8029a119 5763
a4fd1a8e
PB		 5764 myh = elf32_arm_create_thumb_stub (info, h->root.root.string,
5765 h->root.u.def.section->owner,
f2a9dd69
DJ		 5766 globals->obfd, sec, val, s,
5767 &error_message);
a4fd1a8e
PB		 5768 BFD_ASSERT (myh);
5769 return TRUE;
5770}
5771
845b51d6
PB		 5772/* Populate ARMv4 BX veneers. Returns the absolute adress of the veneer. */
5773
5774static bfd_vma
5775elf32_arm_bx_glue (struct bfd_link_info * info, int reg)
5776{
5777 bfd_byte *p;
5778 bfd_vma glue_addr;
5779 asection *s;
5780 struct elf32_arm_link_hash_table *globals;
5781
5782 globals = elf32_arm_hash_table (info);
5783
5784 BFD_ASSERT (globals != NULL);
5785 BFD_ASSERT (globals->bfd_of_glue_owner != NULL);
5786
5787 s = bfd_get_section_by_name (globals->bfd_of_glue_owner,
5788 ARM_BX_GLUE_SECTION_NAME);
5789 BFD_ASSERT (s != NULL);
5790 BFD_ASSERT (s->contents != NULL);
5791 BFD_ASSERT (s->output_section != NULL);
5792
5793 BFD_ASSERT (globals->bx_glue_offset[reg] & 2);
5794
5795 glue_addr = globals->bx_glue_offset[reg] & ~(bfd_vma)3;
5796
5797 if ((globals->bx_glue_offset[reg] & 1) == 0)
5798 {
5799 p = s->contents + glue_addr;
5800 bfd_put_32 (globals->obfd, armbx1_tst_insn + (reg << 16), p);
5801 bfd_put_32 (globals->obfd, armbx2_moveq_insn + reg, p + 4);
5802 bfd_put_32 (globals->obfd, armbx3_bx_insn + reg, p + 8);
5803 globals->bx_glue_offset[reg] |= 1;
5804 }
5805
5806 return glue_addr + s->output_section->vma + s->output_offset;
5807}
5808
a4fd1a8e
PB		 5809/* Generate Arm stubs for exported Thumb symbols. */
5810static void
906e58ca 5811elf32_arm_begin_write_processing (bfd *abfd ATTRIBUTE_UNUSED,
a4fd1a8e
PB		 5812 struct bfd_link_info *link_info)
5813{
5814 struct elf32_arm_link_hash_table * globals;
5815
8029a119
NC		 5816 if (link_info == NULL)
5817 /* Ignore this if we are not called by the ELF backend linker. */
a4fd1a8e
PB		 5818 return;
5819
5820 globals = elf32_arm_hash_table (link_info);
84c08195
PB		 5821 /* If blx is available then exported Thumb symbols are OK and there is
5822 nothing to do. */
a4fd1a8e
PB		 5823 if (globals->use_blx)
5824 return;
5825
5826 elf_link_hash_traverse (&globals->root, elf32_arm_to_thumb_export_stub,
5827 link_info);
5828}
5829
eb043451
PB		 5830/* Some relocations map to different relocations depending on the
5831 target. Return the real relocation. */
8029a119 5832
eb043451
PB		 5833static int
5834arm_real_reloc_type (struct elf32_arm_link_hash_table * globals,
5835 int r_type)
5836{
5837 switch (r_type)
5838 {
5839 case R_ARM_TARGET1:
5840 if (globals->target1_is_rel)
5841 return R_ARM_REL32;
5842 else
5843 return R_ARM_ABS32;
5844
5845 case R_ARM_TARGET2:
5846 return globals->target2_reloc;
5847
5848 default:
5849 return r_type;
5850 }
5851}
eb043451 5852
ba93b8ac
DJ		 5853/* Return the base VMA address which should be subtracted from real addresses
5854 when resolving @dtpoff relocation.
5855 This is PT_TLS segment p_vaddr. */
5856
5857static bfd_vma
5858dtpoff_base (struct bfd_link_info *info)
5859{
5860 /* If tls_sec is NULL, we should have signalled an error already. */
5861 if (elf_hash_table (info)->tls_sec == NULL)
5862 return 0;
5863 return elf_hash_table (info)->tls_sec->vma;
5864}
5865
5866/* Return the relocation value for @tpoff relocation
5867 if STT_TLS virtual address is ADDRESS. */
5868
5869static bfd_vma
5870tpoff (struct bfd_link_info *info, bfd_vma address)
5871{
5872 struct elf_link_hash_table *htab = elf_hash_table (info);
5873 bfd_vma base;
5874
5875 /* If tls_sec is NULL, we should have signalled an error already. */
5876 if (htab->tls_sec == NULL)
5877 return 0;
5878 base = align_power ((bfd_vma) TCB_SIZE, htab->tls_sec->alignment_power);
5879 return address - htab->tls_sec->vma + base;
5880}
5881
00a97672
RS		 5882/* Perform an R_ARM_ABS12 relocation on the field pointed to by DATA.
5883 VALUE is the relocation value. */
5884
5885static bfd_reloc_status_type
5886elf32_arm_abs12_reloc (bfd *abfd, void *data, bfd_vma value)
5887{
5888 if (value > 0xfff)
5889 return bfd_reloc_overflow;
5890
5891 value |= bfd_get_32 (abfd, data) & 0xfffff000;
5892 bfd_put_32 (abfd, value, data);
5893 return bfd_reloc_ok;
5894}
5895
4962c51a
MS		 5896/* For a given value of n, calculate the value of G_n as required to
5897 deal with group relocations. We return it in the form of an
5898 encoded constant-and-rotation, together with the final residual. If n is
5899 specified as less than zero, then final_residual is filled with the
5900 input value and no further action is performed. */
5901
5902static bfd_vma
5903calculate_group_reloc_mask (bfd_vma value, int n, bfd_vma *final_residual)
5904{
5905 int current_n;
5906 bfd_vma g_n;
5907 bfd_vma encoded_g_n = 0;
5908 bfd_vma residual = value; /* Also known as Y_n. */
5909
5910 for (current_n = 0; current_n <= n; current_n++)
5911 {
5912 int shift;
5913
5914 /* Calculate which part of the value to mask. */
5915 if (residual == 0)
5916 shift = 0;
5917 else
5918 {
5919 int msb;
5920
5921 /* Determine the most significant bit in the residual and
5922 align the resulting value to a 2-bit boundary. */
5923 for (msb = 30; msb >= 0; msb -= 2)
5924 if (residual & (3 << msb))
5925 break;
5926
5927 /* The desired shift is now (msb - 6), or zero, whichever
5928 is the greater. */
5929 shift = msb - 6;
5930 if (shift < 0)
5931 shift = 0;
5932 }
5933
5934 /* Calculate g_n in 32-bit as well as encoded constant+rotation form. */
5935 g_n = residual & (0xff << shift);
5936 encoded_g_n = (g_n >> shift)
5937 | ((g_n <= 0xff ? 0 : (32 - shift) / 2) << 8);
5938
5939 /* Calculate the residual for the next time around. */
5940 residual &= ~g_n;
5941 }
5942
5943 *final_residual = residual;
5944
5945 return encoded_g_n;
5946}
5947
5948/* Given an ARM instruction, determine whether it is an ADD or a SUB.
5949 Returns 1 if it is an ADD, -1 if it is a SUB, and 0 otherwise. */
906e58ca 5950
4962c51a 5951static int
906e58ca 5952identify_add_or_sub (bfd_vma insn)
4962c51a
MS		 5953{
5954 int opcode = insn & 0x1e00000;
5955
5956 if (opcode == 1 << 23) /* ADD */
5957 return 1;
5958
5959 if (opcode == 1 << 22) /* SUB */
5960 return -1;
5961
5962 return 0;
5963}
5964
252b5132 5965/* Perform a relocation as part of a final link. */
9b485d32 5966
252b5132 5967static bfd_reloc_status_type
57e8b36a
NC		 5968elf32_arm_final_link_relocate (reloc_howto_type * howto,
5969 bfd * input_bfd,
5970 bfd * output_bfd,
5971 asection * input_section,
5972 bfd_byte * contents,
5973 Elf_Internal_Rela * rel,
5974 bfd_vma value,
5975 struct bfd_link_info * info,
5976 asection * sym_sec,
5977 const char * sym_name,
5978 int sym_flags,
0945cdfd 5979 struct elf_link_hash_entry * h,
f2a9dd69 5980 bfd_boolean * unresolved_reloc_p,
8029a119 5981 char ** error_message)
252b5132
RH		 5982{
5983 unsigned long r_type = howto->type;
5984 unsigned long r_symndx;
5985 bfd_byte * hit_data = contents + rel->r_offset;
5986 bfd * dynobj = NULL;
5987 Elf_Internal_Shdr * symtab_hdr;
5988 struct elf_link_hash_entry ** sym_hashes;
5989 bfd_vma * local_got_offsets;
5990 asection * sgot = NULL;
5991 asection * splt = NULL;
5992 asection * sreloc = NULL;
252b5132 5993 bfd_vma addend;
ba96a88f
NC		 5994 bfd_signed_vma signed_addend;
5995 struct elf32_arm_link_hash_table * globals;
f21f3fe0 5996
9c504268
PB		 5997 globals = elf32_arm_hash_table (info);
5998
0ffa91dd
NC		 5999 BFD_ASSERT (is_arm_elf (input_bfd));
6000
6001 /* Some relocation types map to different relocations depending on the
9c504268 6002 target. We pick the right one here. */
eb043451
PB		 6003 r_type = arm_real_reloc_type (globals, r_type);
6004 if (r_type != howto->type)
6005 howto = elf32_arm_howto_from_type (r_type);
9c504268 6006
cac15327
NC		 6007 /* If the start address has been set, then set the EF_ARM_HASENTRY
6008 flag. Setting this more than once is redundant, but the cost is
6009 not too high, and it keeps the code simple.
99e4ae17 6010
cac15327
NC		 6011 The test is done here, rather than somewhere else, because the
6012 start address is only set just before the final link commences.
6013
6014 Note - if the user deliberately sets a start address of 0, the
6015 flag will not be set. */
6016 if (bfd_get_start_address (output_bfd) != 0)
6017 elf_elfheader (output_bfd)->e_flags |= EF_ARM_HASENTRY;
99e4ae17 6018
252b5132
RH		 6019 dynobj = elf_hash_table (info)->dynobj;
6020 if (dynobj)
6021 {
6022 sgot = bfd_get_section_by_name (dynobj, ".got");
6023 splt = bfd_get_section_by_name (dynobj, ".plt");
6024 }
0ffa91dd 6025 symtab_hdr = & elf_symtab_hdr (input_bfd);
252b5132
RH		 6026 sym_hashes = elf_sym_hashes (input_bfd);
6027 local_got_offsets = elf_local_got_offsets (input_bfd);
6028 r_symndx = ELF32_R_SYM (rel->r_info);
6029
4e7fd91e 6030 if (globals->use_rel)
ba96a88f 6031 {
4e7fd91e
PB		 6032 addend = bfd_get_32 (input_bfd, hit_data) & howto->src_mask;
6033
6034 if (addend & ((howto->src_mask + 1) >> 1))
6035 {
6036 signed_addend = -1;
6037 signed_addend &= ~ howto->src_mask;
6038 signed_addend |= addend;
6039 }
6040 else
6041 signed_addend = addend;
ba96a88f
NC		 6042 }
6043 else
4e7fd91e 6044 addend = signed_addend = rel->r_addend;
f21f3fe0 6045
252b5132
RH		 6046 switch (r_type)
6047 {
6048 case R_ARM_NONE:
28a094c2
DJ		 6049 /* We don't need to find a value for this symbol. It's just a
6050 marker. */
6051 *unresolved_reloc_p = FALSE;
252b5132
RH		 6052 return bfd_reloc_ok;
6053
00a97672
RS		 6054 case R_ARM_ABS12:
6055 if (!globals->vxworks_p)
6056 return elf32_arm_abs12_reloc (input_bfd, hit_data, value + addend);
6057
252b5132
RH		 6058 case R_ARM_PC24:
6059 case R_ARM_ABS32:
bb224fc3 6060 case R_ARM_ABS32_NOI:
252b5132 6061 case R_ARM_REL32:
bb224fc3 6062 case R_ARM_REL32_NOI:
5b5bb741
PB		 6063 case R_ARM_CALL:
6064 case R_ARM_JUMP24:
dfc5f959 6065 case R_ARM_XPC25:
eb043451 6066 case R_ARM_PREL31:
7359ea65 6067 case R_ARM_PLT32:
7359ea65
DJ		 6068 /* Handle relocations which should use the PLT entry. ABS32/REL32
6069 will use the symbol's value, which may point to a PLT entry, but we
6070 don't need to handle that here. If we created a PLT entry, all
5fa9e92f
CL		 6071 branches in this object should go to it, except if the PLT is too
6072 far away, in which case a long branch stub should be inserted. */
bb224fc3 6073 if ((r_type != R_ARM_ABS32 && r_type != R_ARM_REL32
5fa9e92f
CL		 6074 && r_type != R_ARM_ABS32_NOI && r_type != R_ARM_REL32_NOI
6075 && r_type != R_ARM_CALL)
7359ea65 6076 && h != NULL
c84cd8ee 6077 && splt != NULL
7359ea65
DJ		 6078 && h->plt.offset != (bfd_vma) -1)
6079 {
c84cd8ee
DJ		 6080 /* If we've created a .plt section, and assigned a PLT entry to
6081 this function, it should not be known to bind locally. If
6082 it were, we would have cleared the PLT entry. */
7359ea65
DJ		 6083 BFD_ASSERT (!SYMBOL_CALLS_LOCAL (info, h));
6084
6085 value = (splt->output_section->vma
6086 + splt->output_offset
6087 + h->plt.offset);
0945cdfd 6088 *unresolved_reloc_p = FALSE;
7359ea65
DJ		 6089 return _bfd_final_link_relocate (howto, input_bfd, input_section,
6090 contents, rel->r_offset, value,
00a97672 6091 rel->r_addend);
7359ea65
DJ		 6092 }
6093
67687978
PB		 6094 /* When generating a shared object or relocatable executable, these
6095 relocations are copied into the output file to be resolved at
6096 run time. */
6097 if ((info->shared || globals->root.is_relocatable_executable)
7359ea65 6098 && (input_section->flags & SEC_ALLOC)
3348747a
NS		 6099 && !(elf32_arm_hash_table (info)->vxworks_p
6100 && strcmp (input_section->output_section->name,
6101 ".tls_vars") == 0)
bb224fc3 6102 && ((r_type != R_ARM_REL32 && r_type != R_ARM_REL32_NOI)
ee06dc07 6103 || !SYMBOL_CALLS_LOCAL (info, h))
7359ea65
DJ		 6104 && (h == NULL
6105 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6106 || h->root.type != bfd_link_hash_undefweak)
6107 && r_type != R_ARM_PC24
5b5bb741
PB		 6108 && r_type != R_ARM_CALL
6109 && r_type != R_ARM_JUMP24
ee06dc07 6110 && r_type != R_ARM_PREL31
7359ea65 6111 && r_type != R_ARM_PLT32)
252b5132 6112 {
947216bf
AM		 6113 Elf_Internal_Rela outrel;
6114 bfd_byte *loc;
b34976b6 6115 bfd_boolean skip, relocate;
f21f3fe0 6116
0945cdfd
DJ		 6117 *unresolved_reloc_p = FALSE;
6118
252b5132
RH		 6119 if (sreloc == NULL)
6120 {
83bac4b0
NC		 6121 sreloc = _bfd_elf_get_dynamic_reloc_section (input_bfd, input_section,
6122 ! globals->use_rel);
f21f3fe0 6123
83bac4b0 6124 if (sreloc == NULL)
252b5132 6125 return bfd_reloc_notsupported;
252b5132 6126 }
f21f3fe0 6127
b34976b6
AM		 6128 skip = FALSE;
6129 relocate = FALSE;
f21f3fe0 6130
00a97672 6131 outrel.r_addend = addend;
c629eae0
JJ		 6132 outrel.r_offset =
6133 _bfd_elf_section_offset (output_bfd, info, input_section,
6134 rel->r_offset);
6135 if (outrel.r_offset == (bfd_vma) -1)
b34976b6 6136 skip = TRUE;
0bb2d96a 6137 else if (outrel.r_offset == (bfd_vma) -2)
b34976b6 6138 skip = TRUE, relocate = TRUE;
252b5132
RH		 6139 outrel.r_offset += (input_section->output_section->vma
6140 + input_section->output_offset);
f21f3fe0 6141
252b5132 6142 if (skip)
0bb2d96a 6143 memset (&outrel, 0, sizeof outrel);
5e681ec4
PB		 6144 else if (h != NULL
6145 && h->dynindx != -1
7359ea65 6146 && (!info->shared
5e681ec4 6147 || !info->symbolic
f5385ebf 6148 || !h->def_regular))
5e681ec4 6149 outrel.r_info = ELF32_R_INFO (h->dynindx, r_type);
252b5132
RH		 6150 else
6151 {
a16385dc
MM		 6152 int symbol;
6153
5e681ec4 6154 /* This symbol is local, or marked to become local. */
b7693d02
DJ		 6155 if (sym_flags == STT_ARM_TFUNC)
6156 value |= 1;
a16385dc 6157 if (globals->symbian_p)
6366ff1e 6158 {
74541ad4
AM		 6159 asection *osec;
6160
6366ff1e
MM		 6161 /* On Symbian OS, the data segment and text segement
6162 can be relocated independently. Therefore, we
6163 must indicate the segment to which this
6164 relocation is relative. The BPABI allows us to
6165 use any symbol in the right segment; we just use
6166 the section symbol as it is convenient. (We
6167 cannot use the symbol given by "h" directly as it
74541ad4
AM		 6168 will not appear in the dynamic symbol table.)
6169
6170 Note that the dynamic linker ignores the section
6171 symbol value, so we don't subtract osec->vma
6172 from the emitted reloc addend. */
10dbd1f3 6173 if (sym_sec)
74541ad4 6174 osec = sym_sec->output_section;
10dbd1f3 6175 else
74541ad4
AM		 6176 osec = input_section->output_section;
6177 symbol = elf_section_data (osec)->dynindx;
6178 if (symbol == 0)
6179 {
6180 struct elf_link_hash_table *htab = elf_hash_table (info);
6181
6182 if ((osec->flags & SEC_READONLY) == 0
6183 && htab->data_index_section != NULL)
6184 osec = htab->data_index_section;
6185 else
6186 osec = htab->text_index_section;
6187 symbol = elf_section_data (osec)->dynindx;
6188 }
6366ff1e
MM		 6189 BFD_ASSERT (symbol != 0);
6190 }
a16385dc
MM		 6191 else
6192 /* On SVR4-ish systems, the dynamic loader cannot
6193 relocate the text and data segments independently,
6194 so the symbol does not matter. */
6195 symbol = 0;
6196 outrel.r_info = ELF32_R_INFO (symbol, R_ARM_RELATIVE);
00a97672
RS		 6197 if (globals->use_rel)
6198 relocate = TRUE;
6199 else
6200 outrel.r_addend += value;
252b5132 6201 }
f21f3fe0 6202
947216bf 6203 loc = sreloc->contents;
00a97672
RS		 6204 loc += sreloc->reloc_count++ * RELOC_SIZE (globals);
6205 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
9a5aca8c 6206
f21f3fe0 6207 /* If this reloc is against an external symbol, we do not want to
252b5132 6208 fiddle with the addend. Otherwise, we need to include the symbol
9b485d32 6209 value so that it becomes an addend for the dynamic reloc. */
252b5132
RH		 6210 if (! relocate)
6211 return bfd_reloc_ok;
9a5aca8c 6212
f21f3fe0 6213 return _bfd_final_link_relocate (howto, input_bfd, input_section,
252b5132
RH		 6214 contents, rel->r_offset, value,
6215 (bfd_vma) 0);
6216 }
6217 else switch (r_type)
6218 {
00a97672
RS		 6219 case R_ARM_ABS12:
6220 return elf32_arm_abs12_reloc (input_bfd, hit_data, value + addend);
6221
dfc5f959 6222 case R_ARM_XPC25: /* Arm BLX instruction. */
5b5bb741
PB		 6223 case R_ARM_CALL:
6224 case R_ARM_JUMP24:
8029a119 6225 case R_ARM_PC24: /* Arm B/BL instruction. */
7359ea65 6226 case R_ARM_PLT32:
906e58ca
NC		 6227 {
6228 bfd_vma from;
6229 bfd_signed_vma branch_offset;
6230 struct elf32_arm_stub_hash_entry *stub_entry = NULL;
6231
dfc5f959 6232 if (r_type == R_ARM_XPC25)
252b5132 6233 {
dfc5f959
NC		 6234 /* Check for Arm calling Arm function. */
6235 /* FIXME: Should we translate the instruction into a BL
6236 instruction instead ? */
6237 if (sym_flags != STT_ARM_TFUNC)
d003868e
AM		 6238 (*_bfd_error_handler)
6239 (_("\%B: Warning: Arm BLX instruction targets Arm function '%s'."),
6240 input_bfd,
6241 h ? h->root.root.string : "(local)");
dfc5f959 6242 }
906e58ca 6243 else if (r_type != R_ARM_CALL)
dfc5f959
NC		 6244 {
6245 /* Check for Arm calling Thumb function. */
6246 if (sym_flags == STT_ARM_TFUNC)
6247 {
f2a9dd69
DJ		 6248 if (elf32_arm_to_thumb_stub (info, sym_name, input_bfd,
6249 output_bfd, input_section,
6250 hit_data, sym_sec, rel->r_offset,
6251 signed_addend, value,
6252 error_message))
6253 return bfd_reloc_ok;
6254 else
6255 return bfd_reloc_dangerous;
dfc5f959 6256 }
252b5132 6257 }
ba96a88f 6258
906e58ca 6259 /* Check if a stub has to be inserted because the
8029a119 6260 destination is too far or we are changing mode. */
906e58ca
NC		 6261 if (r_type == R_ARM_CALL)
6262 {
5fa9e92f
CL		 6263 /* If the call goes through a PLT entry, make sure to
6264 check distance to the right destination address. */
6265 if (h != NULL && splt != NULL && h->plt.offset != (bfd_vma) -1)
6266 {
6267 value = (splt->output_section->vma
6268 + splt->output_offset
6269 + h->plt.offset);
6270 *unresolved_reloc_p = FALSE;
6271 }
6272
6273 from = (input_section->output_section->vma
6274 + input_section->output_offset
6275 + rel->r_offset);
6276 branch_offset = (bfd_signed_vma)(value - from);
6277
906e58ca
NC		 6278 if (branch_offset > ARM_MAX_FWD_BRANCH_OFFSET
6279 || branch_offset < ARM_MAX_BWD_BRANCH_OFFSET
6280 || sym_flags == STT_ARM_TFUNC)
6281 {
6282 /* The target is out of reach, so redirect the
6283 branch to the local stub for this function. */
6284
6285 stub_entry = elf32_arm_get_stub_entry (input_section,
6286 sym_sec, h,
6287 rel, globals);
6288 if (stub_entry != NULL)
6289 value = (stub_entry->stub_offset
6290 + stub_entry->stub_sec->output_offset
6291 + stub_entry->stub_sec->output_section->vma);
6292 }
6293 }
6294
dea514f5
PB		 6295 /* The ARM ELF ABI says that this reloc is computed as: S - P + A
6296 where:
6297 S is the address of the symbol in the relocation.
6298 P is address of the instruction being relocated.
6299 A is the addend (extracted from the instruction) in bytes.
6300
6301 S is held in 'value'.
6302 P is the base address of the section containing the
6303 instruction plus the offset of the reloc into that
6304 section, ie:
6305 (input_section->output_section->vma +
6306 input_section->output_offset +
6307 rel->r_offset).
6308 A is the addend, converted into bytes, ie:
6309 (signed_addend * 4)
6310
6311 Note: None of these operations have knowledge of the pipeline
6312 size of the processor, thus it is up to the assembler to
6313 encode this information into the addend. */
6314 value -= (input_section->output_section->vma
6315 + input_section->output_offset);
6316 value -= rel->r_offset;
4e7fd91e
PB		 6317 if (globals->use_rel)
6318 value += (signed_addend << howto->size);
6319 else
6320 /* RELA addends do not have to be adjusted by howto->size. */
6321 value += signed_addend;
23080146 6322
dcb5e6e6
NC		 6323 signed_addend = value;
6324 signed_addend >>= howto->rightshift;
9a5aca8c 6325
5ab79981
PB		 6326 /* A branch to an undefined weak symbol is turned into a jump to
6327 the next instruction. */
6328 if (h && h->root.type == bfd_link_hash_undefweak)
6329 {
6330 value = (bfd_get_32 (input_bfd, hit_data) & 0xf0000000)
6331 | 0x0affffff;
6332 }
6333 else
59f2c4e7 6334 {
9b485d32 6335 /* Perform a signed range check. */
dcb5e6e6 6336 if ( signed_addend > ((bfd_signed_vma) (howto->dst_mask >> 1))
59f2c4e7
NC		 6337 || signed_addend < - ((bfd_signed_vma) ((howto->dst_mask + 1) >> 1)))
6338 return bfd_reloc_overflow;
9a5aca8c 6339
5ab79981 6340 addend = (value & 2);
39b41c9c 6341
5ab79981
PB		 6342 value = (signed_addend & howto->dst_mask)
6343 | (bfd_get_32 (input_bfd, hit_data) & (~ howto->dst_mask));
39b41c9c 6344
5ab79981 6345 /* Set the H bit in the BLX instruction. */
39b41c9c 6346 if (sym_flags == STT_ARM_TFUNC)
39b41c9c 6347 {
5ab79981
PB		 6348 if (addend)
6349 value |= (1 << 24);
6350 else
6351 value &= ~(bfd_vma)(1 << 24);
6352 }
6353 if (r_type == R_ARM_CALL)
6354 {
6355 /* Select the correct instruction (BL or BLX). */
906e58ca 6356 /* Only if we are not handling a BL to a stub. In this
8029a119 6357 case, mode switching is performed by the stub. */
906e58ca 6358 if (sym_flags == STT_ARM_TFUNC && !stub_entry)
5ab79981
PB		 6359 value |= (1 << 28);
6360 else
6361 {
6362 value &= ~(bfd_vma)(1 << 28);
6363 value |= (1 << 24);
6364 }
39b41c9c
PB		 6365 }
6366 }
906e58ca 6367 }
252b5132 6368 break;
f21f3fe0 6369
252b5132
RH		 6370 case R_ARM_ABS32:
6371 value += addend;
6372 if (sym_flags == STT_ARM_TFUNC)
6373 value |= 1;
6374 break;
f21f3fe0 6375
bb224fc3
MS		 6376 case R_ARM_ABS32_NOI:
6377 value += addend;
6378 break;
6379
252b5132 6380 case R_ARM_REL32:
a8bc6c78
PB		 6381 value += addend;
6382 if (sym_flags == STT_ARM_TFUNC)
6383 value |= 1;
252b5132 6384 value -= (input_section->output_section->vma
62efb346 6385 + input_section->output_offset + rel->r_offset);
252b5132 6386 break;
eb043451 6387
bb224fc3
MS		 6388 case R_ARM_REL32_NOI:
6389 value += addend;
6390 value -= (input_section->output_section->vma
6391 + input_section->output_offset + rel->r_offset);
6392 break;
6393
eb043451
PB		 6394 case R_ARM_PREL31:
6395 value -= (input_section->output_section->vma
6396 + input_section->output_offset + rel->r_offset);
6397 value += signed_addend;
6398 if (! h || h->root.type != bfd_link_hash_undefweak)
6399 {
8029a119 6400 /* Check for overflow. */
eb043451
PB		 6401 if ((value ^ (value >> 1)) & (1 << 30))
6402 return bfd_reloc_overflow;
6403 }
6404 value &= 0x7fffffff;
6405 value |= (bfd_get_32 (input_bfd, hit_data) & 0x80000000);
6406 if (sym_flags == STT_ARM_TFUNC)
6407 value |= 1;
6408 break;
252b5132 6409 }
f21f3fe0 6410
252b5132
RH		 6411 bfd_put_32 (input_bfd, value, hit_data);
6412 return bfd_reloc_ok;
6413
6414 case R_ARM_ABS8:
6415 value += addend;
6416 if ((long) value > 0x7f || (long) value < -0x80)
6417 return bfd_reloc_overflow;
6418
6419 bfd_put_8 (input_bfd, value, hit_data);
6420 return bfd_reloc_ok;
6421
6422 case R_ARM_ABS16:
6423 value += addend;
6424
6425 if ((long) value > 0x7fff || (long) value < -0x8000)
6426 return bfd_reloc_overflow;
6427
6428 bfd_put_16 (input_bfd, value, hit_data);
6429 return bfd_reloc_ok;
6430
252b5132 6431 case R_ARM_THM_ABS5:
9b485d32 6432 /* Support ldr and str instructions for the thumb. */
4e7fd91e
PB		 6433 if (globals->use_rel)
6434 {
6435 /* Need to refetch addend. */
6436 addend = bfd_get_16 (input_bfd, hit_data) & howto->src_mask;
6437 /* ??? Need to determine shift amount from operand size. */
6438 addend >>= howto->rightshift;
6439 }
252b5132
RH		 6440 value += addend;
6441
6442 /* ??? Isn't value unsigned? */
6443 if ((long) value > 0x1f || (long) value < -0x10)
6444 return bfd_reloc_overflow;
6445
6446 /* ??? Value needs to be properly shifted into place first. */
6447 value |= bfd_get_16 (input_bfd, hit_data) & 0xf83f;
6448 bfd_put_16 (input_bfd, value, hit_data);
6449 return bfd_reloc_ok;
6450
2cab6cc3
MS		 6451 case R_ARM_THM_ALU_PREL_11_0:
6452 /* Corresponds to: addw.w reg, pc, #offset (and similarly for subw). */
6453 {
6454 bfd_vma insn;
6455 bfd_signed_vma relocation;
6456
6457 insn = (bfd_get_16 (input_bfd, hit_data) << 16)
6458 | bfd_get_16 (input_bfd, hit_data + 2);
6459
6460 if (globals->use_rel)
6461 {
6462 signed_addend = (insn & 0xff) | ((insn & 0x7000) >> 4)
6463 | ((insn & (1 << 26)) >> 15);
6464 if (insn & 0xf00000)
6465 signed_addend = -signed_addend;
6466 }
6467
6468 relocation = value + signed_addend;
6469 relocation -= (input_section->output_section->vma
6470 + input_section->output_offset
6471 + rel->r_offset);
6472
6473 value = abs (relocation);
6474
6475 if (value >= 0x1000)
6476 return bfd_reloc_overflow;
6477
6478 insn = (insn & 0xfb0f8f00) | (value & 0xff)
6479 | ((value & 0x700) << 4)
6480 | ((value & 0x800) << 15);
6481 if (relocation < 0)
6482 insn |= 0xa00000;
6483
6484 bfd_put_16 (input_bfd, insn >> 16, hit_data);
6485 bfd_put_16 (input_bfd, insn & 0xffff, hit_data + 2);
6486
6487 return bfd_reloc_ok;
6488 }
6489
6490 case R_ARM_THM_PC12:
6491 /* Corresponds to: ldr.w reg, [pc, #offset]. */
6492 {
6493 bfd_vma insn;
6494 bfd_signed_vma relocation;
6495
6496 insn = (bfd_get_16 (input_bfd, hit_data) << 16)
6497 | bfd_get_16 (input_bfd, hit_data + 2);
6498
6499 if (globals->use_rel)
6500 {
6501 signed_addend = insn & 0xfff;
6502 if (!(insn & (1 << 23)))
6503 signed_addend = -signed_addend;
6504 }
6505
6506 relocation = value + signed_addend;
6507 relocation -= (input_section->output_section->vma
6508 + input_section->output_offset
6509 + rel->r_offset);
6510
6511 value = abs (relocation);
6512
6513 if (value >= 0x1000)
6514 return bfd_reloc_overflow;
6515
6516 insn = (insn & 0xff7ff000) | value;
6517 if (relocation >= 0)
6518 insn |= (1 << 23);
6519
6520 bfd_put_16 (input_bfd, insn >> 16, hit_data);
6521 bfd_put_16 (input_bfd, insn & 0xffff, hit_data + 2);
6522
6523 return bfd_reloc_ok;
6524 }
6525
dfc5f959 6526 case R_ARM_THM_XPC22:
c19d1205 6527 case R_ARM_THM_CALL:
bd97cb95 6528 case R_ARM_THM_JUMP24:
dfc5f959 6529 /* Thumb BL (branch long instruction). */
252b5132 6530 {
b34976b6 6531 bfd_vma relocation;
e95de063 6532 bfd_vma reloc_sign;
b34976b6
AM		 6533 bfd_boolean overflow = FALSE;
6534 bfd_vma upper_insn = bfd_get_16 (input_bfd, hit_data);
6535 bfd_vma lower_insn = bfd_get_16 (input_bfd, hit_data + 2);
e95de063
MS		 6536 bfd_signed_vma reloc_signed_max;
6537 bfd_signed_vma reloc_signed_min;
b34976b6 6538 bfd_vma check;
252b5132 6539 bfd_signed_vma signed_check;
e95de063
MS		 6540 int bitsize;
6541 int thumb2 = using_thumb2 (globals);
252b5132 6542
5ab79981 6543 /* A branch to an undefined weak symbol is turned into a jump to
19540007
JM		 6544 the next instruction unless a PLT entry will be created. */
6545 if (h && h->root.type == bfd_link_hash_undefweak
6546 && !(splt != NULL && h->plt.offset != (bfd_vma) -1))
5ab79981
PB		 6547 {
6548 bfd_put_16 (input_bfd, 0xe000, hit_data);
6549 bfd_put_16 (input_bfd, 0xbf00, hit_data + 2);
6550 return bfd_reloc_ok;
6551 }
6552
e95de063
MS		 6553 /* Fetch the addend. We use the Thumb-2 encoding (backwards compatible
6554 with Thumb-1) involving the J1 and J2 bits. */
4e7fd91e
PB		 6555 if (globals->use_rel)
6556 {
e95de063
MS		 6557 bfd_vma s = (upper_insn & (1 << 10)) >> 10;
6558 bfd_vma upper = upper_insn & 0x3ff;
6559 bfd_vma lower = lower_insn & 0x7ff;
6560 bfd_vma j1 = (lower_insn & (1 << 13)) >> 13;
6561 bfd_vma j2 = (lower_insn & (1 << 11)) >> 11;
6562 bfd_vma i1 = j1 ^ s ? 0 : 1;
6563 bfd_vma i2 = j2 ^ s ? 0 : 1;
6564
6565 addend = (i1 << 23) | (i2 << 22) | (upper << 12) | (lower << 1);
6566 /* Sign extend. */
6567 addend = (addend | ((s ? 0 : 1) << 24)) - (1 << 24);
6568
4e7fd91e
PB		 6569 signed_addend = addend;
6570 }
cb1afa5c 6571
dfc5f959
NC		 6572 if (r_type == R_ARM_THM_XPC22)
6573 {
6574 /* Check for Thumb to Thumb call. */
6575 /* FIXME: Should we translate the instruction into a BL
6576 instruction instead ? */
6577 if (sym_flags == STT_ARM_TFUNC)
d003868e
AM		 6578 (*_bfd_error_handler)
6579 (_("%B: Warning: Thumb BLX instruction targets thumb function '%s'."),
6580 input_bfd,
6581 h ? h->root.root.string : "(local)");
dfc5f959
NC		 6582 }
6583 else
252b5132 6584 {
dfc5f959
NC		 6585 /* If it is not a call to Thumb, assume call to Arm.
6586 If it is a call relative to a section name, then it is not a
b7693d02
DJ		 6587 function call at all, but rather a long jump. Calls through
6588 the PLT do not require stubs. */
6589 if (sym_flags != STT_ARM_TFUNC && sym_flags != STT_SECTION
6590 && (h == NULL || splt == NULL
6591 || h->plt.offset == (bfd_vma) -1))
dfc5f959 6592 {
bd97cb95 6593 if (globals->use_blx && r_type == R_ARM_THM_CALL)
39b41c9c
PB		 6594 {
6595 /* Convert BL to BLX. */
6596 lower_insn = (lower_insn & ~0x1000) | 0x0800;
6597 }
8029a119
NC		 6598 else if (r_type != R_ARM_THM_CALL)
6599 {
6600 if (elf32_thumb_to_arm_stub
6601 (info, sym_name, input_bfd, output_bfd, input_section,
6602 hit_data, sym_sec, rel->r_offset, signed_addend, value,
6603 error_message))
6604 return bfd_reloc_ok;
6605 else
6606 return bfd_reloc_dangerous;
6607 }
da5938a2 6608 }
bd97cb95
DJ		 6609 else if (sym_flags == STT_ARM_TFUNC && globals->use_blx
6610 && r_type == R_ARM_THM_CALL)
39b41c9c
PB		 6611 {
6612 /* Make sure this is a BL. */
6613 lower_insn |= 0x1800;
6614 }
252b5132 6615 }
f21f3fe0 6616
b7693d02
DJ		 6617 /* Handle calls via the PLT. */
6618 if (h != NULL && splt != NULL && h->plt.offset != (bfd_vma) -1)
6619 {
6620 value = (splt->output_section->vma
6621 + splt->output_offset
6622 + h->plt.offset);
bd97cb95 6623 if (globals->use_blx && r_type == R_ARM_THM_CALL)
33bfe774
JB		 6624 {
6625 /* If the Thumb BLX instruction is available, convert the
6626 BL to a BLX instruction to call the ARM-mode PLT entry. */
39b41c9c 6627 lower_insn = (lower_insn & ~0x1000) | 0x0800;
33bfe774
JB		 6628 }
6629 else
6630 /* Target the Thumb stub before the ARM PLT entry. */
6631 value -= PLT_THUMB_STUB_SIZE;
0945cdfd 6632 *unresolved_reloc_p = FALSE;
b7693d02
DJ		 6633 }
6634
906e58ca
NC		 6635 if (r_type == R_ARM_THM_CALL)
6636 {
6637 /* Check if a stub has to be inserted because the destination
8029a119 6638 is too far. */
906e58ca
NC		 6639 bfd_vma from;
6640 bfd_signed_vma branch_offset;
6641 struct elf32_arm_stub_hash_entry *stub_entry = NULL;
6642
6643 from = (input_section->output_section->vma
6644 + input_section->output_offset
6645 + rel->r_offset);
6646 branch_offset = (bfd_signed_vma)(value - from);
6647
6648 if ((!thumb2
6649 && (branch_offset > THM_MAX_FWD_BRANCH_OFFSET
6650 || (branch_offset < THM_MAX_BWD_BRANCH_OFFSET)))
6651 ||
6652 (thumb2
6653 && (branch_offset > THM2_MAX_FWD_BRANCH_OFFSET
f4ac8484
DJ		 6654 || (branch_offset < THM2_MAX_BWD_BRANCH_OFFSET)))
6655 || ((sym_flags != STT_ARM_TFUNC) && !globals->use_blx))
906e58ca
NC		 6656 {
6657 /* The target is out of reach or we are changing modes, so
6658 redirect the branch to the local stub for this
6659 function. */
6660 stub_entry = elf32_arm_get_stub_entry (input_section,
6661 sym_sec, h,
6662 rel, globals);
6663 if (stub_entry != NULL)
6664 value = (stub_entry->stub_offset
6665 + stub_entry->stub_sec->output_offset
6666 + stub_entry->stub_sec->output_section->vma);
6667
f4ac8484
DJ		 6668 /* If this call becomes a call to Arm, force BLX. */
6669 if (globals->use_blx)
6670 {
6671 if ((stub_entry
6672 && !arm_stub_is_thumb (stub_entry->stub_type))
6673 || (sym_flags != STT_ARM_TFUNC))
6674 lower_insn = (lower_insn & ~0x1000) | 0x0800;
6675 }
906e58ca
NC		 6676 }
6677 }
6678
ba96a88f 6679 relocation = value + signed_addend;
f21f3fe0 6680
252b5132 6681 relocation -= (input_section->output_section->vma
ba96a88f
NC		 6682 + input_section->output_offset
6683 + rel->r_offset);
9a5aca8c 6684
252b5132
RH		 6685 check = relocation >> howto->rightshift;
6686
6687 /* If this is a signed value, the rightshift just dropped
6688 leading 1 bits (assuming twos complement). */
6689 if ((bfd_signed_vma) relocation >= 0)
6690 signed_check = check;
6691 else
6692 signed_check = check | ~((bfd_vma) -1 >> howto->rightshift);
6693
e95de063
MS		 6694 /* Calculate the permissable maximum and minimum values for
6695 this relocation according to whether we're relocating for
6696 Thumb-2 or not. */
6697 bitsize = howto->bitsize;
6698 if (!thumb2)
6699 bitsize -= 2;
6700 reloc_signed_max = ((1 << (bitsize - 1)) - 1) >> howto->rightshift;
6701 reloc_signed_min = ~reloc_signed_max;
6702
252b5132 6703 /* Assumes two's complement. */
ba96a88f 6704 if (signed_check > reloc_signed_max || signed_check < reloc_signed_min)
b34976b6 6705 overflow = TRUE;
252b5132 6706
bd97cb95 6707 if ((lower_insn & 0x5000) == 0x4000)
c62e1cc3
NC		 6708 /* For a BLX instruction, make sure that the relocation is rounded up
6709 to a word boundary. This follows the semantics of the instruction
6710 which specifies that bit 1 of the target address will come from bit
6711 1 of the base address. */
6712 relocation = (relocation + 2) & ~ 3;
cb1afa5c 6713
e95de063
MS		 6714 /* Put RELOCATION back into the insn. Assumes two's complement.
6715 We use the Thumb-2 encoding, which is safe even if dealing with
6716 a Thumb-1 instruction by virtue of our overflow check above. */
6717 reloc_sign = (signed_check < 0) ? 1 : 0;
6718 upper_insn = (upper_insn & ~(bfd_vma) 0x7ff)
6719 | ((relocation >> 12) & 0x3ff)
6720 | (reloc_sign << 10);
906e58ca 6721 lower_insn = (lower_insn & ~(bfd_vma) 0x2fff)
e95de063
MS		 6722 | (((!((relocation >> 23) & 1)) ^ reloc_sign) << 13)
6723 | (((!((relocation >> 22) & 1)) ^ reloc_sign) << 11)
6724 | ((relocation >> 1) & 0x7ff);
c62e1cc3 6725
252b5132
RH		 6726 /* Put the relocated value back in the object file: */
6727 bfd_put_16 (input_bfd, upper_insn, hit_data);
6728 bfd_put_16 (input_bfd, lower_insn, hit_data + 2);
6729
6730 return (overflow ? bfd_reloc_overflow : bfd_reloc_ok);
6731 }
6732 break;
6733
c19d1205
ZW		 6734 case R_ARM_THM_JUMP19:
6735 /* Thumb32 conditional branch instruction. */
6736 {
6737 bfd_vma relocation;
6738 bfd_boolean overflow = FALSE;
6739 bfd_vma upper_insn = bfd_get_16 (input_bfd, hit_data);
6740 bfd_vma lower_insn = bfd_get_16 (input_bfd, hit_data + 2);
a00a1f35
MS		 6741 bfd_signed_vma reloc_signed_max = 0xffffe;
6742 bfd_signed_vma reloc_signed_min = -0x100000;
c19d1205
ZW		 6743 bfd_signed_vma signed_check;
6744
6745 /* Need to refetch the addend, reconstruct the top three bits,
6746 and squish the two 11 bit pieces together. */
6747 if (globals->use_rel)
6748 {
6749 bfd_vma S = (upper_insn & 0x0400) >> 10;
a00a1f35 6750 bfd_vma upper = (upper_insn & 0x003f);
c19d1205
ZW		 6751 bfd_vma J1 = (lower_insn & 0x2000) >> 13;
6752 bfd_vma J2 = (lower_insn & 0x0800) >> 11;
6753 bfd_vma lower = (lower_insn & 0x07ff);
6754
a00a1f35
MS		 6755 upper |= J1 << 6;
6756 upper |= J2 << 7;
6757 upper |= (!S) << 8;
c19d1205
ZW		 6758 upper -= 0x0100; /* Sign extend. */
6759
6760 addend = (upper << 12) | (lower << 1);
6761 signed_addend = addend;
6762 }
6763
bd97cb95
DJ		 6764 /* Handle calls via the PLT. */
6765 if (h != NULL && splt != NULL && h->plt.offset != (bfd_vma) -1)
6766 {
6767 value = (splt->output_section->vma
6768 + splt->output_offset
6769 + h->plt.offset);
6770 /* Target the Thumb stub before the ARM PLT entry. */
6771 value -= PLT_THUMB_STUB_SIZE;
6772 *unresolved_reloc_p = FALSE;
6773 }
6774
c19d1205
ZW		 6775 /* ??? Should handle interworking? GCC might someday try to
6776 use this for tail calls. */
6777
6778 relocation = value + signed_addend;
6779 relocation -= (input_section->output_section->vma
6780 + input_section->output_offset
6781 + rel->r_offset);
a00a1f35 6782 signed_check = (bfd_signed_vma) relocation;
c19d1205 6783
c19d1205
ZW		 6784 if (signed_check > reloc_signed_max || signed_check < reloc_signed_min)
6785 overflow = TRUE;
6786
6787 /* Put RELOCATION back into the insn. */
6788 {
6789 bfd_vma S = (relocation & 0x00100000) >> 20;
6790 bfd_vma J2 = (relocation & 0x00080000) >> 19;
6791 bfd_vma J1 = (relocation & 0x00040000) >> 18;
6792 bfd_vma hi = (relocation & 0x0003f000) >> 12;
6793 bfd_vma lo = (relocation & 0x00000ffe) >> 1;
6794
a00a1f35 6795 upper_insn = (upper_insn & 0xfbc0) | (S << 10) | hi;
c19d1205
ZW		 6796 lower_insn = (lower_insn & 0xd000) | (J1 << 13) | (J2 << 11) | lo;
6797 }
6798
6799 /* Put the relocated value back in the object file: */
6800 bfd_put_16 (input_bfd, upper_insn, hit_data);
6801 bfd_put_16 (input_bfd, lower_insn, hit_data + 2);
6802
6803 return (overflow ? bfd_reloc_overflow : bfd_reloc_ok);
6804 }
6805
6806 case R_ARM_THM_JUMP11:
6807 case R_ARM_THM_JUMP8:
6808 case R_ARM_THM_JUMP6:
51c5503b
NC		 6809 /* Thumb B (branch) instruction). */
6810 {
6cf9e9fe 6811 bfd_signed_vma relocation;
51c5503b
NC		 6812 bfd_signed_vma reloc_signed_max = (1 << (howto->bitsize - 1)) - 1;
6813 bfd_signed_vma reloc_signed_min = ~ reloc_signed_max;
51c5503b
NC		 6814 bfd_signed_vma signed_check;
6815
c19d1205
ZW		 6816 /* CZB cannot jump backward. */
6817 if (r_type == R_ARM_THM_JUMP6)
6818 reloc_signed_min = 0;
6819
4e7fd91e 6820 if (globals->use_rel)
6cf9e9fe 6821 {
4e7fd91e
PB		 6822 /* Need to refetch addend. */
6823 addend = bfd_get_16 (input_bfd, hit_data) & howto->src_mask;
6824 if (addend & ((howto->src_mask + 1) >> 1))
6825 {
6826 signed_addend = -1;
6827 signed_addend &= ~ howto->src_mask;
6828 signed_addend |= addend;
6829 }
6830 else
6831 signed_addend = addend;
6832 /* The value in the insn has been right shifted. We need to
6833 undo this, so that we can perform the address calculation
6834 in terms of bytes. */
6835 signed_addend <<= howto->rightshift;
6cf9e9fe 6836 }
6cf9e9fe 6837 relocation = value + signed_addend;
51c5503b
NC		 6838
6839 relocation -= (input_section->output_section->vma
6840 + input_section->output_offset
6841 + rel->r_offset);
6842
6cf9e9fe
NC		 6843 relocation >>= howto->rightshift;
6844 signed_check = relocation;
c19d1205
ZW		 6845
6846 if (r_type == R_ARM_THM_JUMP6)
6847 relocation = ((relocation & 0x0020) << 4) | ((relocation & 0x001f) << 3);
6848 else
6849 relocation &= howto->dst_mask;
51c5503b 6850 relocation |= (bfd_get_16 (input_bfd, hit_data) & (~ howto->dst_mask));
cedb70c5 6851
51c5503b
NC		 6852 bfd_put_16 (input_bfd, relocation, hit_data);
6853
6854 /* Assumes two's complement. */
6855 if (signed_check > reloc_signed_max || signed_check < reloc_signed_min)
6856 return bfd_reloc_overflow;
6857
6858 return bfd_reloc_ok;
6859 }
cedb70c5 6860
8375c36b
PB		 6861 case R_ARM_ALU_PCREL7_0:
6862 case R_ARM_ALU_PCREL15_8:
6863 case R_ARM_ALU_PCREL23_15:
6864 {
6865 bfd_vma insn;
6866 bfd_vma relocation;
6867
6868 insn = bfd_get_32 (input_bfd, hit_data);
4e7fd91e
PB		 6869 if (globals->use_rel)
6870 {
6871 /* Extract the addend. */
6872 addend = (insn & 0xff) << ((insn & 0xf00) >> 7);
6873 signed_addend = addend;
6874 }
8375c36b
PB		 6875 relocation = value + signed_addend;
6876
6877 relocation -= (input_section->output_section->vma
6878 + input_section->output_offset
6879 + rel->r_offset);
6880 insn = (insn & ~0xfff)
6881 | ((howto->bitpos << 7) & 0xf00)
6882 | ((relocation >> howto->bitpos) & 0xff);
6883 bfd_put_32 (input_bfd, value, hit_data);
6884 }
6885 return bfd_reloc_ok;
6886
252b5132
RH		 6887 case R_ARM_GNU_VTINHERIT:
6888 case R_ARM_GNU_VTENTRY:
6889 return bfd_reloc_ok;
6890
c19d1205 6891 case R_ARM_GOTOFF32:
252b5132
RH		 6892 /* Relocation is relative to the start of the
6893 global offset table. */
6894
6895 BFD_ASSERT (sgot != NULL);
6896 if (sgot == NULL)
6897 return bfd_reloc_notsupported;
9a5aca8c 6898
cedb70c5 6899 /* If we are addressing a Thumb function, we need to adjust the
ee29b9fb
RE		 6900 address by one, so that attempts to call the function pointer will
6901 correctly interpret it as Thumb code. */
6902 if (sym_flags == STT_ARM_TFUNC)
6903 value += 1;
6904
252b5132
RH		 6905 /* Note that sgot->output_offset is not involved in this
6906 calculation. We always want the start of .got. If we
6907 define _GLOBAL_OFFSET_TABLE in a different way, as is
6908 permitted by the ABI, we might have to change this
9b485d32 6909 calculation. */
252b5132 6910 value -= sgot->output_section->vma;
f21f3fe0 6911 return _bfd_final_link_relocate (howto, input_bfd, input_section,
99e4ae17 6912 contents, rel->r_offset, value,
00a97672 6913 rel->r_addend);
252b5132
RH		 6914
6915 case R_ARM_GOTPC:
a7c10850 6916 /* Use global offset table as symbol value. */
252b5132 6917 BFD_ASSERT (sgot != NULL);
f21f3fe0 6918
252b5132
RH		 6919 if (sgot == NULL)
6920 return bfd_reloc_notsupported;
6921
0945cdfd 6922 *unresolved_reloc_p = FALSE;
252b5132 6923 value = sgot->output_section->vma;
f21f3fe0 6924 return _bfd_final_link_relocate (howto, input_bfd, input_section,
99e4ae17 6925 contents, rel->r_offset, value,
00a97672 6926 rel->r_addend);
f21f3fe0 6927
252b5132 6928 case R_ARM_GOT32:
eb043451 6929 case R_ARM_GOT_PREL:
252b5132 6930 /* Relocation is to the entry for this symbol in the
9b485d32 6931 global offset table. */
252b5132
RH		 6932 if (sgot == NULL)
6933 return bfd_reloc_notsupported;
f21f3fe0 6934
252b5132
RH		 6935 if (h != NULL)
6936 {
6937 bfd_vma off;
5e681ec4 6938 bfd_boolean dyn;
f21f3fe0 6939
252b5132
RH		 6940 off = h->got.offset;
6941 BFD_ASSERT (off != (bfd_vma) -1);
5e681ec4 6942 dyn = globals->root.dynamic_sections_created;
f21f3fe0 6943
5e681ec4 6944 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
50d6c878 6945 || (info->shared
5e681ec4
PB		 6946 && SYMBOL_REFERENCES_LOCAL (info, h))
6947 || (ELF_ST_VISIBILITY (h->other)
6948 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH		 6949 {
6950 /* This is actually a static link, or it is a -Bsymbolic link
6951 and the symbol is defined locally. We must initialize this
6952 entry in the global offset table. Since the offset must
6953 always be a multiple of 4, we use the least significant bit
6954 to record whether we have initialized it already.
f21f3fe0 6955
00a97672 6956 When doing a dynamic link, we create a .rel(a).got relocation
f21f3fe0 6957 entry to initialize the value. This is done in the
9b485d32 6958 finish_dynamic_symbol routine. */
252b5132
RH		 6959 if ((off & 1) != 0)
6960 off &= ~1;
6961 else
6962 {
ee29b9fb
RE		 6963 /* If we are addressing a Thumb function, we need to
6964 adjust the address by one, so that attempts to
6965 call the function pointer will correctly
6966 interpret it as Thumb code. */
6967 if (sym_flags == STT_ARM_TFUNC)
6968 value |= 1;
6969
252b5132
RH		 6970 bfd_put_32 (output_bfd, value, sgot->contents + off);
6971 h->got.offset |= 1;
6972 }
6973 }
0945cdfd
DJ		 6974 else
6975 *unresolved_reloc_p = FALSE;
f21f3fe0 6976
252b5132
RH		 6977 value = sgot->output_offset + off;
6978 }
6979 else
6980 {
6981 bfd_vma off;
f21f3fe0 6982
252b5132
RH		 6983 BFD_ASSERT (local_got_offsets != NULL &&
6984 local_got_offsets[r_symndx] != (bfd_vma) -1);
f21f3fe0 6985
252b5132 6986 off = local_got_offsets[r_symndx];
f21f3fe0 6987
252b5132
RH		 6988 /* The offset must always be a multiple of 4. We use the
6989 least significant bit to record whether we have already
9b485d32 6990 generated the necessary reloc. */
252b5132
RH		 6991 if ((off & 1) != 0)
6992 off &= ~1;
6993 else
6994 {
b7693d02
DJ		 6995 /* If we are addressing a Thumb function, we need to
6996 adjust the address by one, so that attempts to
6997 call the function pointer will correctly
6998 interpret it as Thumb code. */
6999 if (sym_flags == STT_ARM_TFUNC)
7000 value |= 1;
7001
00a97672
RS		 7002 if (globals->use_rel)
7003 bfd_put_32 (output_bfd, value, sgot->contents + off);
f21f3fe0 7004
252b5132
RH		 7005 if (info->shared)
7006 {
7007 asection * srelgot;
947216bf
AM		 7008 Elf_Internal_Rela outrel;
7009 bfd_byte *loc;
f21f3fe0 7010
00a97672
RS		 7011 srelgot = (bfd_get_section_by_name
7012 (dynobj, RELOC_SECTION (globals, ".got")));
252b5132 7013 BFD_ASSERT (srelgot != NULL);
f21f3fe0 7014
00a97672 7015 outrel.r_addend = addend + value;
252b5132 7016 outrel.r_offset = (sgot->output_section->vma
f21f3fe0 7017 + sgot->output_offset
252b5132
RH		 7018 + off);
7019 outrel.r_info = ELF32_R_INFO (0, R_ARM_RELATIVE);
947216bf 7020 loc = srelgot->contents;
00a97672
RS		 7021 loc += srelgot->reloc_count++ * RELOC_SIZE (globals);
7022 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
252b5132 7023 }
f21f3fe0 7024
252b5132
RH		 7025 local_got_offsets[r_symndx] |= 1;
7026 }
f21f3fe0 7027
252b5132
RH		 7028 value = sgot->output_offset + off;
7029 }
eb043451
PB		 7030 if (r_type != R_ARM_GOT32)
7031 value += sgot->output_section->vma;
9a5aca8c 7032
f21f3fe0 7033 return _bfd_final_link_relocate (howto, input_bfd, input_section,
99e4ae17 7034 contents, rel->r_offset, value,
00a97672 7035 rel->r_addend);
f21f3fe0 7036
ba93b8ac
DJ		 7037 case R_ARM_TLS_LDO32:
7038 value = value - dtpoff_base (info);
7039
7040 return _bfd_final_link_relocate (howto, input_bfd, input_section,
00a97672
RS		 7041 contents, rel->r_offset, value,
7042 rel->r_addend);
ba93b8ac
DJ		 7043
7044 case R_ARM_TLS_LDM32:
7045 {
7046 bfd_vma off;
7047
7048 if (globals->sgot == NULL)
7049 abort ();
7050
7051 off = globals->tls_ldm_got.offset;
7052
7053 if ((off & 1) != 0)
7054 off &= ~1;
7055 else
7056 {
7057 /* If we don't know the module number, create a relocation
7058 for it. */
7059 if (info->shared)
7060 {
7061 Elf_Internal_Rela outrel;
7062 bfd_byte *loc;
7063
7064 if (globals->srelgot == NULL)
7065 abort ();
7066
00a97672 7067 outrel.r_addend = 0;
ba93b8ac
DJ		 7068 outrel.r_offset = (globals->sgot->output_section->vma
7069 + globals->sgot->output_offset + off);
7070 outrel.r_info = ELF32_R_INFO (0, R_ARM_TLS_DTPMOD32);
7071
00a97672
RS		 7072 if (globals->use_rel)
7073 bfd_put_32 (output_bfd, outrel.r_addend,
7074 globals->sgot->contents + off);
ba93b8ac
DJ		 7075
7076 loc = globals->srelgot->contents;
00a97672
RS		 7077 loc += globals->srelgot->reloc_count++ * RELOC_SIZE (globals);
7078 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
ba93b8ac
DJ		 7079 }
7080 else
7081 bfd_put_32 (output_bfd, 1, globals->sgot->contents + off);
7082
7083 globals->tls_ldm_got.offset |= 1;
7084 }
7085
906e58ca 7086 value = globals->sgot->output_section->vma + globals->sgot->output_offset + off
ba93b8ac
DJ		 7087 - (input_section->output_section->vma + input_section->output_offset + rel->r_offset);
7088
7089 return _bfd_final_link_relocate (howto, input_bfd, input_section,
7090 contents, rel->r_offset, value,
00a97672 7091 rel->r_addend);
ba93b8ac
DJ		 7092 }
7093
7094 case R_ARM_TLS_GD32:
7095 case R_ARM_TLS_IE32:
7096 {
7097 bfd_vma off;
7098 int indx;
7099 char tls_type;
7100
7101 if (globals->sgot == NULL)
7102 abort ();
7103
7104 indx = 0;
7105 if (h != NULL)
7106 {
7107 bfd_boolean dyn;
7108 dyn = globals->root.dynamic_sections_created;
7109 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
7110 && (!info->shared
7111 || !SYMBOL_REFERENCES_LOCAL (info, h)))
7112 {
7113 *unresolved_reloc_p = FALSE;
7114 indx = h->dynindx;
7115 }
7116 off = h->got.offset;
7117 tls_type = ((struct elf32_arm_link_hash_entry *) h)->tls_type;
7118 }
7119 else
7120 {
7121 if (local_got_offsets == NULL)
7122 abort ();
7123 off = local_got_offsets[r_symndx];
7124 tls_type = elf32_arm_local_got_tls_type (input_bfd)[r_symndx];
7125 }
7126
7127 if (tls_type == GOT_UNKNOWN)
7128 abort ();
7129
7130 if ((off & 1) != 0)
7131 off &= ~1;
7132 else
7133 {
7134 bfd_boolean need_relocs = FALSE;
7135 Elf_Internal_Rela outrel;
7136 bfd_byte *loc = NULL;
7137 int cur_off = off;
7138
7139 /* The GOT entries have not been initialized yet. Do it
7140 now, and emit any relocations. If both an IE GOT and a
7141 GD GOT are necessary, we emit the GD first. */
7142
7143 if ((info->shared || indx != 0)
7144 && (h == NULL
7145 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
7146 || h->root.type != bfd_link_hash_undefweak))
7147 {
7148 need_relocs = TRUE;
7149 if (globals->srelgot == NULL)
7150 abort ();
7151 loc = globals->srelgot->contents;
00a97672 7152 loc += globals->srelgot->reloc_count * RELOC_SIZE (globals);
ba93b8ac
DJ		 7153 }
7154
7155 if (tls_type & GOT_TLS_GD)
7156 {
7157 if (need_relocs)
7158 {
00a97672 7159 outrel.r_addend = 0;
ba93b8ac 7160 outrel.r_offset = (globals->sgot->output_section->vma
00a97672
RS		 7161 + globals->sgot->output_offset
7162 + cur_off);
ba93b8ac 7163 outrel.r_info = ELF32_R_INFO (indx, R_ARM_TLS_DTPMOD32);
ba93b8ac 7164
00a97672
RS		 7165 if (globals->use_rel)
7166 bfd_put_32 (output_bfd, outrel.r_addend,
7167 globals->sgot->contents + cur_off);
7168
7169 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
ba93b8ac 7170 globals->srelgot->reloc_count++;
00a97672 7171 loc += RELOC_SIZE (globals);
ba93b8ac
DJ		 7172
7173 if (indx == 0)
7174 bfd_put_32 (output_bfd, value - dtpoff_base (info),
7175 globals->sgot->contents + cur_off + 4);
7176 else
7177 {
00a97672 7178 outrel.r_addend = 0;
ba93b8ac
DJ		 7179 outrel.r_info = ELF32_R_INFO (indx,
7180 R_ARM_TLS_DTPOFF32);
7181 outrel.r_offset += 4;
00a97672
RS		 7182
7183 if (globals->use_rel)
7184 bfd_put_32 (output_bfd, outrel.r_addend,
7185 globals->sgot->contents + cur_off + 4);
7186
7187
7188 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
ba93b8ac 7189 globals->srelgot->reloc_count++;
00a97672 7190 loc += RELOC_SIZE (globals);
ba93b8ac
DJ		 7191 }
7192 }
7193 else
7194 {
7195 /* If we are not emitting relocations for a
7196 general dynamic reference, then we must be in a
7197 static link or an executable link with the
7198 symbol binding locally. Mark it as belonging
7199 to module 1, the executable. */
7200 bfd_put_32 (output_bfd, 1,
7201 globals->sgot->contents + cur_off);
7202 bfd_put_32 (output_bfd, value - dtpoff_base (info),
7203 globals->sgot->contents + cur_off + 4);
7204 }
7205
7206 cur_off += 8;
7207 }
7208
7209 if (tls_type & GOT_TLS_IE)
7210 {
7211 if (need_relocs)
7212 {
00a97672
RS		 7213 if (indx == 0)
7214 outrel.r_addend = value - dtpoff_base (info);
7215 else
7216 outrel.r_addend = 0;
ba93b8ac
DJ		 7217 outrel.r_offset = (globals->sgot->output_section->vma
7218 + globals->sgot->output_offset
7219 + cur_off);
7220 outrel.r_info = ELF32_R_INFO (indx, R_ARM_TLS_TPOFF32);
7221
00a97672
RS		 7222 if (globals->use_rel)
7223 bfd_put_32 (output_bfd, outrel.r_addend,
ba93b8ac
DJ		 7224 globals->sgot->contents + cur_off);
7225
00a97672 7226 SWAP_RELOC_OUT (globals) (output_bfd, &outrel, loc);
ba93b8ac 7227 globals->srelgot->reloc_count++;
00a97672 7228 loc += RELOC_SIZE (globals);
ba93b8ac
DJ		 7229 }
7230 else
7231 bfd_put_32 (output_bfd, tpoff (info, value),
7232 globals->sgot->contents + cur_off);
7233 cur_off += 4;
7234 }
7235
7236 if (h != NULL)
7237 h->got.offset |= 1;
7238 else
7239 local_got_offsets[r_symndx] |= 1;
7240 }
7241
7242 if ((tls_type & GOT_TLS_GD) && r_type != R_ARM_TLS_GD32)
7243 off += 8;
906e58ca 7244 value = globals->sgot->output_section->vma + globals->sgot->output_offset + off
ba93b8ac
DJ		 7245 - (input_section->output_section->vma + input_section->output_offset + rel->r_offset);
7246
7247 return _bfd_final_link_relocate (howto, input_bfd, input_section,
7248 contents, rel->r_offset, value,
00a97672 7249 rel->r_addend);
ba93b8ac
DJ		 7250 }
7251
7252 case R_ARM_TLS_LE32:
7253 if (info->shared)
7254 {
7255 (*_bfd_error_handler)
7256 (_("%B(%A+0x%lx): R_ARM_TLS_LE32 relocation not permitted in shared object"),
7257 input_bfd, input_section,
7258 (long) rel->r_offset, howto->name);
906e58ca 7259 return FALSE;
ba93b8ac
DJ		 7260 }
7261 else
7262 value = tpoff (info, value);
906e58ca 7263
ba93b8ac 7264 return _bfd_final_link_relocate (howto, input_bfd, input_section,
00a97672
RS		 7265 contents, rel->r_offset, value,
7266 rel->r_addend);
ba93b8ac 7267
319850b4
JB		 7268 case R_ARM_V4BX:
7269 if (globals->fix_v4bx)
845b51d6
PB		 7270 {
7271 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
319850b4 7272
845b51d6
PB		 7273 /* Ensure that we have a BX instruction. */
7274 BFD_ASSERT ((insn & 0x0ffffff0) == 0x012fff10);
319850b4 7275
845b51d6
PB		 7276 if (globals->fix_v4bx == 2 && (insn & 0xf) != 0xf)
7277 {
7278 /* Branch to veneer. */
7279 bfd_vma glue_addr;
7280 glue_addr = elf32_arm_bx_glue (info, insn & 0xf);
7281 glue_addr -= input_section->output_section->vma
7282 + input_section->output_offset
7283 + rel->r_offset + 8;
7284 insn = (insn & 0xf0000000) | 0x0a000000
7285 | ((glue_addr >> 2) & 0x00ffffff);
7286 }
7287 else
7288 {
7289 /* Preserve Rm (lowest four bits) and the condition code
7290 (highest four bits). Other bits encode MOV PC,Rm. */
7291 insn = (insn & 0xf000000f) | 0x01a0f000;
7292 }
319850b4 7293
845b51d6
PB		 7294 bfd_put_32 (input_bfd, insn, hit_data);
7295 }
319850b4
JB		 7296 return bfd_reloc_ok;
7297
b6895b4f
PB		 7298 case R_ARM_MOVW_ABS_NC:
7299 case R_ARM_MOVT_ABS:
7300 case R_ARM_MOVW_PREL_NC:
7301 case R_ARM_MOVT_PREL:
92f5d02b
MS		 7302 /* Until we properly support segment-base-relative addressing then
7303 we assume the segment base to be zero, as for the group relocations.
7304 Thus R_ARM_MOVW_BREL_NC has the same semantics as R_ARM_MOVW_ABS_NC
7305 and R_ARM_MOVT_BREL has the same semantics as R_ARM_MOVT_ABS. */
7306 case R_ARM_MOVW_BREL_NC:
7307 case R_ARM_MOVW_BREL:
7308 case R_ARM_MOVT_BREL:
b6895b4f
PB		 7309 {
7310 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
7311
7312 if (globals->use_rel)
7313 {
7314 addend = ((insn >> 4) & 0xf000) | (insn & 0xfff);
39623e12 7315 signed_addend = (addend ^ 0x8000) - 0x8000;
b6895b4f 7316 }
92f5d02b 7317
b6895b4f 7318 value += signed_addend;
b6895b4f
PB		 7319
7320 if (r_type == R_ARM_MOVW_PREL_NC || r_type == R_ARM_MOVT_PREL)
7321 value -= (input_section->output_section->vma
7322 + input_section->output_offset + rel->r_offset);
7323
92f5d02b
MS		 7324 if (r_type == R_ARM_MOVW_BREL && value >= 0x10000)
7325 return bfd_reloc_overflow;
7326
7327 if (sym_flags == STT_ARM_TFUNC)
7328 value |= 1;
7329
7330 if (r_type == R_ARM_MOVT_ABS || r_type == R_ARM_MOVT_PREL
7331 || r_type == R_ARM_MOVT_BREL)
b6895b4f
PB		 7332 value >>= 16;
7333
7334 insn &= 0xfff0f000;
7335 insn |= value & 0xfff;
7336 insn |= (value & 0xf000) << 4;
7337 bfd_put_32 (input_bfd, insn, hit_data);
7338 }
7339 return bfd_reloc_ok;
7340
7341 case R_ARM_THM_MOVW_ABS_NC:
7342 case R_ARM_THM_MOVT_ABS:
7343 case R_ARM_THM_MOVW_PREL_NC:
7344 case R_ARM_THM_MOVT_PREL:
92f5d02b
MS		 7345 /* Until we properly support segment-base-relative addressing then
7346 we assume the segment base to be zero, as for the above relocations.
7347 Thus R_ARM_THM_MOVW_BREL_NC has the same semantics as
7348 R_ARM_THM_MOVW_ABS_NC and R_ARM_THM_MOVT_BREL has the same semantics
7349 as R_ARM_THM_MOVT_ABS. */
7350 case R_ARM_THM_MOVW_BREL_NC:
7351 case R_ARM_THM_MOVW_BREL:
7352 case R_ARM_THM_MOVT_BREL:
b6895b4f
PB		 7353 {
7354 bfd_vma insn;
906e58ca 7355
b6895b4f
PB		 7356 insn = bfd_get_16 (input_bfd, hit_data) << 16;
7357 insn |= bfd_get_16 (input_bfd, hit_data + 2);
7358
7359 if (globals->use_rel)
7360 {
7361 addend = ((insn >> 4) & 0xf000)
7362 | ((insn >> 15) & 0x0800)
7363 | ((insn >> 4) & 0x0700)
7364 | (insn & 0x00ff);
39623e12 7365 signed_addend = (addend ^ 0x8000) - 0x8000;
b6895b4f 7366 }
92f5d02b 7367
b6895b4f 7368 value += signed_addend;
b6895b4f
PB		 7369
7370 if (r_type == R_ARM_THM_MOVW_PREL_NC || r_type == R_ARM_THM_MOVT_PREL)
7371 value -= (input_section->output_section->vma
7372 + input_section->output_offset + rel->r_offset);
7373
92f5d02b
MS		 7374 if (r_type == R_ARM_THM_MOVW_BREL && value >= 0x10000)
7375 return bfd_reloc_overflow;
7376
7377 if (sym_flags == STT_ARM_TFUNC)
7378 value |= 1;
7379
7380 if (r_type == R_ARM_THM_MOVT_ABS || r_type == R_ARM_THM_MOVT_PREL
7381 || r_type == R_ARM_THM_MOVT_BREL)
b6895b4f
PB		 7382 value >>= 16;
7383
7384 insn &= 0xfbf08f00;
7385 insn |= (value & 0xf000) << 4;
7386 insn |= (value & 0x0800) << 15;
7387 insn |= (value & 0x0700) << 4;
7388 insn |= (value & 0x00ff);
7389
7390 bfd_put_16 (input_bfd, insn >> 16, hit_data);
7391 bfd_put_16 (input_bfd, insn & 0xffff, hit_data + 2);
7392 }
7393 return bfd_reloc_ok;
7394
4962c51a
MS		 7395 case R_ARM_ALU_PC_G0_NC:
7396 case R_ARM_ALU_PC_G1_NC:
7397 case R_ARM_ALU_PC_G0:
7398 case R_ARM_ALU_PC_G1:
7399 case R_ARM_ALU_PC_G2:
7400 case R_ARM_ALU_SB_G0_NC:
7401 case R_ARM_ALU_SB_G1_NC:
7402 case R_ARM_ALU_SB_G0:
7403 case R_ARM_ALU_SB_G1:
7404 case R_ARM_ALU_SB_G2:
7405 {
7406 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
7407 bfd_vma pc = input_section->output_section->vma
7408 + input_section->output_offset + rel->r_offset;
7409 /* sb should be the origin of the *segment* containing the symbol.
7410 It is not clear how to obtain this OS-dependent value, so we
7411 make an arbitrary choice of zero. */
7412 bfd_vma sb = 0;
7413 bfd_vma residual;
7414 bfd_vma g_n;
7415 bfd_signed_vma signed_value;
7416 int group = 0;
7417
7418 /* Determine which group of bits to select. */
7419 switch (r_type)
7420 {
7421 case R_ARM_ALU_PC_G0_NC:
7422 case R_ARM_ALU_PC_G0:
7423 case R_ARM_ALU_SB_G0_NC:
7424 case R_ARM_ALU_SB_G0:
7425 group = 0;
7426 break;
7427
7428 case R_ARM_ALU_PC_G1_NC:
7429 case R_ARM_ALU_PC_G1:
7430 case R_ARM_ALU_SB_G1_NC:
7431 case R_ARM_ALU_SB_G1:
7432 group = 1;
7433 break;
7434
7435 case R_ARM_ALU_PC_G2:
7436 case R_ARM_ALU_SB_G2:
7437 group = 2;
7438 break;
7439
7440 default:
906e58ca 7441 abort ();
4962c51a
MS		 7442 }
7443
7444 /* If REL, extract the addend from the insn. If RELA, it will
7445 have already been fetched for us. */
7446 if (globals->use_rel)
7447 {
7448 int negative;
7449 bfd_vma constant = insn & 0xff;
7450 bfd_vma rotation = (insn & 0xf00) >> 8;
7451
7452 if (rotation == 0)
7453 signed_addend = constant;
7454 else
7455 {
7456 /* Compensate for the fact that in the instruction, the
7457 rotation is stored in multiples of 2 bits. */
7458 rotation *= 2;
7459
7460 /* Rotate "constant" right by "rotation" bits. */
7461 signed_addend = (constant >> rotation) |
7462 (constant << (8 * sizeof (bfd_vma) - rotation));
7463 }
7464
7465 /* Determine if the instruction is an ADD or a SUB.
7466 (For REL, this determines the sign of the addend.) */
7467 negative = identify_add_or_sub (insn);
7468 if (negative == 0)
7469 {
7470 (*_bfd_error_handler)
7471 (_("%B(%A+0x%lx): Only ADD or SUB instructions are allowed for ALU group relocations"),
7472 input_bfd, input_section,
7473 (long) rel->r_offset, howto->name);
906e58ca 7474 return bfd_reloc_overflow;
4962c51a
MS		 7475 }
7476
7477 signed_addend *= negative;
7478 }
7479
7480 /* Compute the value (X) to go in the place. */
7481 if (r_type == R_ARM_ALU_PC_G0_NC
7482 || r_type == R_ARM_ALU_PC_G1_NC
7483 || r_type == R_ARM_ALU_PC_G0
7484 || r_type == R_ARM_ALU_PC_G1
7485 || r_type == R_ARM_ALU_PC_G2)
7486 /* PC relative. */
7487 signed_value = value - pc + signed_addend;
7488 else
7489 /* Section base relative. */
7490 signed_value = value - sb + signed_addend;
7491
7492 /* If the target symbol is a Thumb function, then set the
7493 Thumb bit in the address. */
7494 if (sym_flags == STT_ARM_TFUNC)
7495 signed_value |= 1;
7496
7497 /* Calculate the value of the relevant G_n, in encoded
7498 constant-with-rotation format. */
7499 g_n = calculate_group_reloc_mask (abs (signed_value), group,
7500 &residual);
7501
7502 /* Check for overflow if required. */
7503 if ((r_type == R_ARM_ALU_PC_G0
7504 || r_type == R_ARM_ALU_PC_G1
7505 || r_type == R_ARM_ALU_PC_G2
7506 || r_type == R_ARM_ALU_SB_G0
7507 || r_type == R_ARM_ALU_SB_G1
7508 || r_type == R_ARM_ALU_SB_G2) && residual != 0)
7509 {
7510 (*_bfd_error_handler)
7511 (_("%B(%A+0x%lx): Overflow whilst splitting 0x%lx for group relocation %s"),
7512 input_bfd, input_section,
7513 (long) rel->r_offset, abs (signed_value), howto->name);
7514 return bfd_reloc_overflow;
7515 }
7516
7517 /* Mask out the value and the ADD/SUB part of the opcode; take care
7518 not to destroy the S bit. */
7519 insn &= 0xff1ff000;
7520
7521 /* Set the opcode according to whether the value to go in the
7522 place is negative. */
7523 if (signed_value < 0)
7524 insn |= 1 << 22;
7525 else
7526 insn |= 1 << 23;
7527
7528 /* Encode the offset. */
7529 insn |= g_n;
7530
7531 bfd_put_32 (input_bfd, insn, hit_data);
7532 }
7533 return bfd_reloc_ok;
7534
7535 case R_ARM_LDR_PC_G0:
7536 case R_ARM_LDR_PC_G1:
7537 case R_ARM_LDR_PC_G2:
7538 case R_ARM_LDR_SB_G0:
7539 case R_ARM_LDR_SB_G1:
7540 case R_ARM_LDR_SB_G2:
7541 {
7542 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
7543 bfd_vma pc = input_section->output_section->vma
7544 + input_section->output_offset + rel->r_offset;
7545 bfd_vma sb = 0; /* See note above. */
7546 bfd_vma residual;
7547 bfd_signed_vma signed_value;
7548 int group = 0;
7549
7550 /* Determine which groups of bits to calculate. */
7551 switch (r_type)
7552 {
7553 case R_ARM_LDR_PC_G0:
7554 case R_ARM_LDR_SB_G0:
7555 group = 0;
7556 break;
7557
7558 case R_ARM_LDR_PC_G1:
7559 case R_ARM_LDR_SB_G1:
7560 group = 1;
7561 break;
7562
7563 case R_ARM_LDR_PC_G2:
7564 case R_ARM_LDR_SB_G2:
7565 group = 2;
7566 break;
7567
7568 default:
906e58ca 7569 abort ();
4962c51a
MS		 7570 }
7571
7572 /* If REL, extract the addend from the insn. If RELA, it will
7573 have already been fetched for us. */
7574 if (globals->use_rel)
7575 {
7576 int negative = (insn & (1 << 23)) ? 1 : -1;
7577 signed_addend = negative * (insn & 0xfff);
7578 }
7579
7580 /* Compute the value (X) to go in the place. */
7581 if (r_type == R_ARM_LDR_PC_G0
7582 || r_type == R_ARM_LDR_PC_G1
7583 || r_type == R_ARM_LDR_PC_G2)
7584 /* PC relative. */
7585 signed_value = value - pc + signed_addend;
7586 else
7587 /* Section base relative. */
7588 signed_value = value - sb + signed_addend;
7589
7590 /* Calculate the value of the relevant G_{n-1} to obtain
7591 the residual at that stage. */
7592 calculate_group_reloc_mask (abs (signed_value), group - 1, &residual);
7593
7594 /* Check for overflow. */
7595 if (residual >= 0x1000)
7596 {
7597 (*_bfd_error_handler)
7598 (_("%B(%A+0x%lx): Overflow whilst splitting 0x%lx for group relocation %s"),
7599 input_bfd, input_section,
7600 (long) rel->r_offset, abs (signed_value), howto->name);
7601 return bfd_reloc_overflow;
7602 }
7603
7604 /* Mask out the value and U bit. */
7605 insn &= 0xff7ff000;
7606
7607 /* Set the U bit if the value to go in the place is non-negative. */
7608 if (signed_value >= 0)
7609 insn |= 1 << 23;
7610
7611 /* Encode the offset. */
7612 insn |= residual;
7613
7614 bfd_put_32 (input_bfd, insn, hit_data);
7615 }
7616 return bfd_reloc_ok;
7617
7618 case R_ARM_LDRS_PC_G0:
7619 case R_ARM_LDRS_PC_G1:
7620 case R_ARM_LDRS_PC_G2:
7621 case R_ARM_LDRS_SB_G0:
7622 case R_ARM_LDRS_SB_G1:
7623 case R_ARM_LDRS_SB_G2:
7624 {
7625 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
7626 bfd_vma pc = input_section->output_section->vma
7627 + input_section->output_offset + rel->r_offset;
7628 bfd_vma sb = 0; /* See note above. */
7629 bfd_vma residual;
7630 bfd_signed_vma signed_value;
7631 int group = 0;
7632
7633 /* Determine which groups of bits to calculate. */
7634 switch (r_type)
7635 {
7636 case R_ARM_LDRS_PC_G0:
7637 case R_ARM_LDRS_SB_G0:
7638 group = 0;
7639 break;
7640
7641 case R_ARM_LDRS_PC_G1:
7642 case R_ARM_LDRS_SB_G1:
7643 group = 1;
7644 break;
7645
7646 case R_ARM_LDRS_PC_G2:
7647 case R_ARM_LDRS_SB_G2:
7648 group = 2;
7649 break;
7650
7651 default:
906e58ca 7652 abort ();
4962c51a
MS		 7653 }
7654
7655 /* If REL, extract the addend from the insn. If RELA, it will
7656 have already been fetched for us. */
7657 if (globals->use_rel)
7658 {
7659 int negative = (insn & (1 << 23)) ? 1 : -1;
7660 signed_addend = negative * (((insn & 0xf00) >> 4) + (insn & 0xf));
7661 }
7662
7663 /* Compute the value (X) to go in the place. */
7664 if (r_type == R_ARM_LDRS_PC_G0
7665 || r_type == R_ARM_LDRS_PC_G1
7666 || r_type == R_ARM_LDRS_PC_G2)
7667 /* PC relative. */
7668 signed_value = value - pc + signed_addend;
7669 else
7670 /* Section base relative. */
7671 signed_value = value - sb + signed_addend;
7672
7673 /* Calculate the value of the relevant G_{n-1} to obtain
7674 the residual at that stage. */
7675 calculate_group_reloc_mask (abs (signed_value), group - 1, &residual);
7676
7677 /* Check for overflow. */
7678 if (residual >= 0x100)
7679 {
7680 (*_bfd_error_handler)
7681 (_("%B(%A+0x%lx): Overflow whilst splitting 0x%lx for group relocation %s"),
7682 input_bfd, input_section,
7683 (long) rel->r_offset, abs (signed_value), howto->name);
7684 return bfd_reloc_overflow;
7685 }
7686
7687 /* Mask out the value and U bit. */
7688 insn &= 0xff7ff0f0;
7689
7690 /* Set the U bit if the value to go in the place is non-negative. */
7691 if (signed_value >= 0)
7692 insn |= 1 << 23;
7693
7694 /* Encode the offset. */
7695 insn |= ((residual & 0xf0) << 4) | (residual & 0xf);
7696
7697 bfd_put_32 (input_bfd, insn, hit_data);
7698 }
7699 return bfd_reloc_ok;
7700
7701 case R_ARM_LDC_PC_G0:
7702 case R_ARM_LDC_PC_G1:
7703 case R_ARM_LDC_PC_G2:
7704 case R_ARM_LDC_SB_G0:
7705 case R_ARM_LDC_SB_G1:
7706 case R_ARM_LDC_SB_G2:
7707 {
7708 bfd_vma insn = bfd_get_32 (input_bfd, hit_data);
7709 bfd_vma pc = input_section->output_section->vma
7710 + input_section->output_offset + rel->r_offset;
7711 bfd_vma sb = 0; /* See note above. */
7712 bfd_vma residual;
7713 bfd_signed_vma signed_value;
7714 int group = 0;
7715
7716 /* Determine which groups of bits to calculate. */
7717 switch (r_type)
7718 {
7719 case R_ARM_LDC_PC_G0:
7720 case R_ARM_LDC_SB_G0:
7721 group = 0;
7722 break;
7723
7724 case R_ARM_LDC_PC_G1:
7725 case R_ARM_LDC_SB_G1:
7726 group = 1;
7727 break;
7728
7729 case R_ARM_LDC_PC_G2:
7730 case R_ARM_LDC_SB_G2:
7731 group = 2;
7732 break;
7733
7734 default:
906e58ca 7735 abort ();
4962c51a
MS		 7736 }
7737
7738 /* If REL, extract the addend from the insn. If RELA, it will
7739 have already been fetched for us. */
7740 if (globals->use_rel)
7741 {
7742 int negative = (insn & (1 << 23)) ? 1 : -1;
7743 signed_addend = negative * ((insn & 0xff) << 2);
7744 }
7745
7746 /* Compute the value (X) to go in the place. */
7747 if (r_type == R_ARM_LDC_PC_G0
7748 || r_type == R_ARM_LDC_PC_G1
7749 || r_type == R_ARM_LDC_PC_G2)
7750 /* PC relative. */
7751 signed_value = value - pc + signed_addend;
7752 else
7753 /* Section base relative. */
7754 signed_value = value - sb + signed_addend;
7755
7756 /* Calculate the value of the relevant G_{n-1} to obtain
7757 the residual at that stage. */
7758 calculate_group_reloc_mask (abs (signed_value), group - 1, &residual);
7759
7760 /* Check for overflow. (The absolute value to go in the place must be
7761 divisible by four and, after having been divided by four, must
7762 fit in eight bits.) */
7763 if ((residual & 0x3) != 0 || residual >= 0x400)
7764 {
7765 (*_bfd_error_handler)
7766 (_("%B(%A+0x%lx): Overflow whilst splitting 0x%lx for group relocation %s"),
7767 input_bfd, input_section,
7768 (long) rel->r_offset, abs (signed_value), howto->name);
7769 return bfd_reloc_overflow;
7770 }
7771
7772 /* Mask out the value and U bit. */
7773 insn &= 0xff7fff00;
7774
7775 /* Set the U bit if the value to go in the place is non-negative. */
7776 if (signed_value >= 0)
7777 insn |= 1 << 23;
7778
7779 /* Encode the offset. */
7780 insn |= residual >> 2;
7781
7782 bfd_put_32 (input_bfd, insn, hit_data);
7783 }
7784 return bfd_reloc_ok;
7785
252b5132
RH		 7786 default:
7787 return bfd_reloc_notsupported;
7788 }
7789}
7790
98c1d4aa
NC		 7791/* Add INCREMENT to the reloc (of type HOWTO) at ADDRESS. */
7792static void
57e8b36a
NC		 7793arm_add_to_rel (bfd * abfd,
7794 bfd_byte * address,
7795 reloc_howto_type * howto,
7796 bfd_signed_vma increment)
98c1d4aa 7797{
98c1d4aa
NC		 7798 bfd_signed_vma addend;
7799
bd97cb95
DJ		 7800 if (howto->type == R_ARM_THM_CALL
7801 || howto->type == R_ARM_THM_JUMP24)
98c1d4aa 7802 {
9a5aca8c
AM		 7803 int upper_insn, lower_insn;
7804 int upper, lower;
98c1d4aa 7805
9a5aca8c
AM		 7806 upper_insn = bfd_get_16 (abfd, address);
7807 lower_insn = bfd_get_16 (abfd, address + 2);
7808 upper = upper_insn & 0x7ff;
7809 lower = lower_insn & 0x7ff;
7810
7811 addend = (upper << 12) | (lower << 1);
ddda4409 7812 addend += increment;
9a5aca8c 7813 addend >>= 1;
98c1d4aa 7814
9a5aca8c
AM		 7815 upper_insn = (upper_insn & 0xf800) | ((addend >> 11) & 0x7ff);
7816 lower_insn = (lower_insn & 0xf800) | (addend & 0x7ff);
7817
dc810e39
AM		 7818 bfd_put_16 (abfd, (bfd_vma) upper_insn, address);
7819 bfd_put_16 (abfd, (bfd_vma) lower_insn, address + 2);
9a5aca8c
AM		 7820 }
7821 else
7822 {
7823 bfd_vma contents;
7824
7825 contents = bfd_get_32 (abfd, address);
7826
7827 /* Get the (signed) value from the instruction. */
7828 addend = contents & howto->src_mask;
7829 if (addend & ((howto->src_mask + 1) >> 1))
7830 {
7831 bfd_signed_vma mask;
7832
7833 mask = -1;
7834 mask &= ~ howto->src_mask;
7835 addend |= mask;
7836 }
7837
7838 /* Add in the increment, (which is a byte value). */
7839 switch (howto->type)
7840 {
7841 default:
7842 addend += increment;
7843 break;
7844
7845 case R_ARM_PC24:
c6596c5e 7846 case R_ARM_PLT32:
5b5bb741
PB		 7847 case R_ARM_CALL:
7848 case R_ARM_JUMP24:
9a5aca8c 7849 addend <<= howto->size;
dc810e39 7850 addend += increment;
9a5aca8c
AM		 7851
7852 /* Should we check for overflow here ? */
7853
7854 /* Drop any undesired bits. */
7855 addend >>= howto->rightshift;
7856 break;
7857 }
7858
7859 contents = (contents & ~ howto->dst_mask) | (addend & howto->dst_mask);
7860
7861 bfd_put_32 (abfd, contents, address);
ddda4409 7862 }
98c1d4aa 7863}
252b5132 7864
ba93b8ac
DJ		 7865#define IS_ARM_TLS_RELOC(R_TYPE) \
7866 ((R_TYPE) == R_ARM_TLS_GD32 \
7867 || (R_TYPE) == R_ARM_TLS_LDO32 \
7868 || (R_TYPE) == R_ARM_TLS_LDM32 \
7869 || (R_TYPE) == R_ARM_TLS_DTPOFF32 \
7870 || (R_TYPE) == R_ARM_TLS_DTPMOD32 \
7871 || (R_TYPE) == R_ARM_TLS_TPOFF32 \
7872 || (R_TYPE) == R_ARM_TLS_LE32 \
7873 || (R_TYPE) == R_ARM_TLS_IE32)
7874
252b5132 7875/* Relocate an ARM ELF section. */
906e58ca 7876
b34976b6 7877static bfd_boolean
57e8b36a
NC		 7878elf32_arm_relocate_section (bfd * output_bfd,
7879 struct bfd_link_info * info,
7880 bfd * input_bfd,
7881 asection * input_section,
7882 bfd_byte * contents,
7883 Elf_Internal_Rela * relocs,
7884 Elf_Internal_Sym * local_syms,
7885 asection ** local_sections)
252b5132 7886{
b34976b6
AM		 7887 Elf_Internal_Shdr *symtab_hdr;
7888 struct elf_link_hash_entry **sym_hashes;
7889 Elf_Internal_Rela *rel;
7890 Elf_Internal_Rela *relend;
7891 const char *name;
b32d3aa2 7892 struct elf32_arm_link_hash_table * globals;
252b5132 7893
4e7fd91e 7894 globals = elf32_arm_hash_table (info);
b491616a 7895
0ffa91dd 7896 symtab_hdr = & elf_symtab_hdr (input_bfd);
252b5132
RH		 7897 sym_hashes = elf_sym_hashes (input_bfd);
7898
7899 rel = relocs;
7900 relend = relocs + input_section->reloc_count;
7901 for (; rel < relend; rel++)
7902 {
ba96a88f
NC		 7903 int r_type;
7904 reloc_howto_type * howto;
7905 unsigned long r_symndx;
7906 Elf_Internal_Sym * sym;
7907 asection * sec;
252b5132 7908 struct elf_link_hash_entry * h;
ba96a88f
NC		 7909 bfd_vma relocation;
7910 bfd_reloc_status_type r;
7911 arelent bfd_reloc;
ba93b8ac 7912 char sym_type;
0945cdfd 7913 bfd_boolean unresolved_reloc = FALSE;
f2a9dd69 7914 char *error_message = NULL;
f21f3fe0 7915
252b5132 7916 r_symndx = ELF32_R_SYM (rel->r_info);
ba96a88f 7917 r_type = ELF32_R_TYPE (rel->r_info);
b32d3aa2 7918 r_type = arm_real_reloc_type (globals, r_type);
252b5132 7919
ba96a88f
NC		 7920 if ( r_type == R_ARM_GNU_VTENTRY
7921 || r_type == R_ARM_GNU_VTINHERIT)
252b5132
RH		 7922 continue;
7923
b32d3aa2 7924 bfd_reloc.howto = elf32_arm_howto_from_type (r_type);
ba96a88f 7925 howto = bfd_reloc.howto;
252b5132 7926
252b5132
RH		 7927 h = NULL;
7928 sym = NULL;
7929 sec = NULL;
9b485d32 7930
252b5132
RH		 7931 if (r_symndx < symtab_hdr->sh_info)
7932 {
7933 sym = local_syms + r_symndx;
ba93b8ac 7934 sym_type = ELF32_ST_TYPE (sym->st_info);
252b5132 7935 sec = local_sections[r_symndx];
4e7fd91e 7936 if (globals->use_rel)
f8df10f4 7937 {
4e7fd91e
PB		 7938 relocation = (sec->output_section->vma
7939 + sec->output_offset
7940 + sym->st_value);
ab96bf03
AM		 7941 if (!info->relocatable
7942 && (sec->flags & SEC_MERGE)
7943 && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
f8df10f4 7944 {
4e7fd91e
PB		 7945 asection *msec;
7946 bfd_vma addend, value;
7947
39623e12 7948 switch (r_type)
4e7fd91e 7949 {
39623e12
PB		 7950 case R_ARM_MOVW_ABS_NC:
7951 case R_ARM_MOVT_ABS:
7952 value = bfd_get_32 (input_bfd, contents + rel->r_offset);
7953 addend = ((value & 0xf0000) >> 4) | (value & 0xfff);
7954 addend = (addend ^ 0x8000) - 0x8000;
7955 break;
f8df10f4 7956
39623e12
PB		 7957 case R_ARM_THM_MOVW_ABS_NC:
7958 case R_ARM_THM_MOVT_ABS:
7959 value = bfd_get_16 (input_bfd, contents + rel->r_offset)
7960 << 16;
7961 value |= bfd_get_16 (input_bfd,
7962 contents + rel->r_offset + 2);
7963 addend = ((value & 0xf7000) >> 4) | (value & 0xff)
7964 | ((value & 0x04000000) >> 15);
7965 addend = (addend ^ 0x8000) - 0x8000;
7966 break;
f8df10f4 7967
39623e12
PB		 7968 default:
7969 if (howto->rightshift
7970 || (howto->src_mask & (howto->src_mask + 1)))
7971 {
7972 (*_bfd_error_handler)
7973 (_("%B(%A+0x%lx): %s relocation against SEC_MERGE section"),
7974 input_bfd, input_section,
7975 (long) rel->r_offset, howto->name);
7976 return FALSE;
7977 }
7978
7979 value = bfd_get_32 (input_bfd, contents + rel->r_offset);
7980
7981 /* Get the (signed) value from the instruction. */
7982 addend = value & howto->src_mask;
7983 if (addend & ((howto->src_mask + 1) >> 1))
7984 {
7985 bfd_signed_vma mask;
7986
7987 mask = -1;
7988 mask &= ~ howto->src_mask;
7989 addend |= mask;
7990 }
7991 break;
4e7fd91e 7992 }
39623e12 7993
4e7fd91e
PB		 7994 msec = sec;
7995 addend =
7996 _bfd_elf_rel_local_sym (output_bfd, sym, &msec, addend)
7997 - relocation;
7998 addend += msec->output_section->vma + msec->output_offset;
39623e12
PB		 7999
8000 /* Cases here must match those in the preceeding
8001 switch statement. */
8002 switch (r_type)
8003 {
8004 case R_ARM_MOVW_ABS_NC:
8005 case R_ARM_MOVT_ABS:
8006 value = (value & 0xfff0f000) | ((addend & 0xf000) << 4)
8007 | (addend & 0xfff);
8008 bfd_put_32 (input_bfd, value, contents + rel->r_offset);
8009 break;
8010
8011 case R_ARM_THM_MOVW_ABS_NC:
8012 case R_ARM_THM_MOVT_ABS:
8013 value = (value & 0xfbf08f00) | ((addend & 0xf700) << 4)
8014 | (addend & 0xff) | ((addend & 0x0800) << 15);
8015 bfd_put_16 (input_bfd, value >> 16,
8016 contents + rel->r_offset);
8017 bfd_put_16 (input_bfd, value,
8018 contents + rel->r_offset + 2);
8019 break;
8020
8021 default:
8022 value = (value & ~ howto->dst_mask)
8023 | (addend & howto->dst_mask);
8024 bfd_put_32 (input_bfd, value, contents + rel->r_offset);
8025 break;
8026 }
f8df10f4 8027 }
f8df10f4 8028 }
4e7fd91e
PB		 8029 else
8030 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
252b5132
RH		 8031 }
8032 else
8033 {
560e09e9 8034 bfd_boolean warned;
560e09e9 8035
b2a8e766
AM		 8036 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
8037 r_symndx, symtab_hdr, sym_hashes,
8038 h, sec, relocation,
8039 unresolved_reloc, warned);
ba93b8ac
DJ		 8040
8041 sym_type = h->type;
252b5132
RH		 8042 }
8043
ab96bf03
AM		 8044 if (sec != NULL && elf_discarded_section (sec))
8045 {
8046 /* For relocs against symbols from removed linkonce sections,
8047 or sections discarded by a linker script, we just want the
8048 section contents zeroed. Avoid any special processing. */
8049 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
8050 rel->r_info = 0;
8051 rel->r_addend = 0;
8052 continue;
8053 }
8054
8055 if (info->relocatable)
8056 {
8057 /* This is a relocatable link. We don't have to change
8058 anything, unless the reloc is against a section symbol,
8059 in which case we have to adjust according to where the
8060 section symbol winds up in the output section. */
8061 if (sym != NULL && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
8062 {
8063 if (globals->use_rel)
8064 arm_add_to_rel (input_bfd, contents + rel->r_offset,
8065 howto, (bfd_signed_vma) sec->output_offset);
8066 else
8067 rel->r_addend += sec->output_offset;
8068 }
8069 continue;
8070 }
8071
252b5132
RH		 8072 if (h != NULL)
8073 name = h->root.root.string;
8074 else
8075 {
8076 name = (bfd_elf_string_from_elf_section
8077 (input_bfd, symtab_hdr->sh_link, sym->st_name));
8078 if (name == NULL || *name == '\0')
8079 name = bfd_section_name (input_bfd, sec);
8080 }
f21f3fe0 8081
ba93b8ac
DJ		 8082 if (r_symndx != 0
8083 && r_type != R_ARM_NONE
8084 && (h == NULL
8085 || h->root.type == bfd_link_hash_defined
8086 || h->root.type == bfd_link_hash_defweak)
8087 && IS_ARM_TLS_RELOC (r_type) != (sym_type == STT_TLS))
8088 {
8089 (*_bfd_error_handler)
8090 ((sym_type == STT_TLS
8091 ? _("%B(%A+0x%lx): %s used with TLS symbol %s")
8092 : _("%B(%A+0x%lx): %s used with non-TLS symbol %s")),
8093 input_bfd,
8094 input_section,
8095 (long) rel->r_offset,
8096 howto->name,
8097 name);
8098 }
8099
252b5132
RH		 8100 r = elf32_arm_final_link_relocate (howto, input_bfd, output_bfd,
8101 input_section, contents, rel,
8102 relocation, info, sec, name,
8103 (h ? ELF_ST_TYPE (h->type) :
0945cdfd 8104 ELF_ST_TYPE (sym->st_info)), h,
f2a9dd69 8105 &unresolved_reloc, &error_message);
0945cdfd
DJ		 8106
8107 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
8108 because such sections are not SEC_ALLOC and thus ld.so will
8109 not process them. */
8110 if (unresolved_reloc
8111 && !((input_section->flags & SEC_DEBUGGING) != 0
8112 && h->def_dynamic))
8113 {
8114 (*_bfd_error_handler)
843fe662
L		 8115 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
8116 input_bfd,
8117 input_section,
8118 (long) rel->r_offset,
8119 howto->name,
8120 h->root.root.string);
0945cdfd
DJ		 8121 return FALSE;
8122 }
252b5132
RH		 8123
8124 if (r != bfd_reloc_ok)
8125 {
252b5132
RH		 8126 switch (r)
8127 {
8128 case bfd_reloc_overflow:
cf919dfd
PB		 8129 /* If the overflowing reloc was to an undefined symbol,
8130 we have already printed one error message and there
8131 is no point complaining again. */
8132 if ((! h ||
8133 h->root.type != bfd_link_hash_undefined)
8134 && (!((*info->callbacks->reloc_overflow)
dfeffb9f
L		 8135 (info, (h ? &h->root : NULL), name, howto->name,
8136 (bfd_vma) 0, input_bfd, input_section,
8137 rel->r_offset))))
b34976b6 8138 return FALSE;
252b5132
RH		 8139 break;
8140
8141 case bfd_reloc_undefined:
8142 if (!((*info->callbacks->undefined_symbol)
8143 (info, name, input_bfd, input_section,
b34976b6
AM		 8144 rel->r_offset, TRUE)))
8145 return FALSE;
252b5132
RH		 8146 break;
8147
8148 case bfd_reloc_outofrange:
f2a9dd69 8149 error_message = _("out of range");
252b5132
RH		 8150 goto common_error;
8151
8152 case bfd_reloc_notsupported:
f2a9dd69 8153 error_message = _("unsupported relocation");
252b5132
RH		 8154 goto common_error;
8155
8156 case bfd_reloc_dangerous:
f2a9dd69 8157 /* error_message should already be set. */
252b5132
RH		 8158 goto common_error;
8159
8160 default:
f2a9dd69 8161 error_message = _("unknown error");
8029a119 8162 /* Fall through. */
252b5132
RH		 8163
8164 common_error:
f2a9dd69
DJ		 8165 BFD_ASSERT (error_message != NULL);
8166 if (!((*info->callbacks->reloc_dangerous)
8167 (info, error_message, input_bfd, input_section,
252b5132 8168 rel->r_offset)))
b34976b6 8169 return FALSE;
252b5132
RH		 8170 break;
8171 }
8172 }
8173 }
8174
b34976b6 8175 return TRUE;
252b5132
RH		 8176}
8177
c178919b
NC		 8178/* Set the right machine number. */
8179
8180static bfd_boolean
57e8b36a 8181elf32_arm_object_p (bfd *abfd)
c178919b 8182{
5a6c6817 8183 unsigned int mach;
57e8b36a 8184
5a6c6817 8185 mach = bfd_arm_get_mach_from_notes (abfd, ARM_NOTE_SECTION);
c178919b 8186
5a6c6817
NC		 8187 if (mach != bfd_mach_arm_unknown)
8188 bfd_default_set_arch_mach (abfd, bfd_arch_arm, mach);
8189
8190 else if (elf_elfheader (abfd)->e_flags & EF_ARM_MAVERICK_FLOAT)
8191 bfd_default_set_arch_mach (abfd, bfd_arch_arm, bfd_mach_arm_ep9312);
e16bb312 8192
e16bb312 8193 else
5a6c6817 8194 bfd_default_set_arch_mach (abfd, bfd_arch_arm, mach);
c178919b
NC		 8195
8196 return TRUE;
8197}
8198
fc830a83 8199/* Function to keep ARM specific flags in the ELF header. */
3c9458e9 8200
b34976b6 8201static bfd_boolean
57e8b36a 8202elf32_arm_set_private_flags (bfd *abfd, flagword flags)
252b5132
RH		 8203{
8204 if (elf_flags_init (abfd)
8205 && elf_elfheader (abfd)->e_flags != flags)
8206 {
fc830a83
NC		 8207 if (EF_ARM_EABI_VERSION (flags) == EF_ARM_EABI_UNKNOWN)
8208 {
fd2ec330 8209 if (flags & EF_ARM_INTERWORK)
d003868e
AM		 8210 (*_bfd_error_handler)
8211 (_("Warning: Not setting interworking flag of %B since it has already been specified as non-interworking"),
8212 abfd);
fc830a83 8213 else
d003868e
AM		 8214 _bfd_error_handler
8215 (_("Warning: Clearing the interworking flag of %B due to outside request"),
8216 abfd);
fc830a83 8217 }
252b5132
RH		 8218 }
8219 else
8220 {
8221 elf_elfheader (abfd)->e_flags = flags;
b34976b6 8222 elf_flags_init (abfd) = TRUE;
252b5132
RH		 8223 }
8224
b34976b6 8225 return TRUE;
252b5132
RH		 8226}
8227
fc830a83 8228/* Copy backend specific data from one object module to another. */
9b485d32 8229
b34976b6 8230static bfd_boolean
57e8b36a 8231elf32_arm_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
252b5132
RH		 8232{
8233 flagword in_flags;
8234 flagword out_flags;
8235
0ffa91dd 8236 if (! is_arm_elf (ibfd) || ! is_arm_elf (obfd))
b34976b6 8237 return TRUE;
252b5132 8238
fc830a83 8239 in_flags = elf_elfheader (ibfd)->e_flags;
252b5132
RH		 8240 out_flags = elf_elfheader (obfd)->e_flags;
8241
fc830a83
NC		 8242 if (elf_flags_init (obfd)
8243 && EF_ARM_EABI_VERSION (out_flags) == EF_ARM_EABI_UNKNOWN
8244 && in_flags != out_flags)
252b5132 8245 {
252b5132 8246 /* Cannot mix APCS26 and APCS32 code. */
fd2ec330 8247 if ((in_flags & EF_ARM_APCS_26) != (out_flags & EF_ARM_APCS_26))
b34976b6 8248 return FALSE;
252b5132
RH		 8249
8250 /* Cannot mix float APCS and non-float APCS code. */
fd2ec330 8251 if ((in_flags & EF_ARM_APCS_FLOAT) != (out_flags & EF_ARM_APCS_FLOAT))
b34976b6 8252 return FALSE;
252b5132
RH		 8253
8254 /* If the src and dest have different interworking flags
8255 then turn off the interworking bit. */
fd2ec330 8256 if ((in_flags & EF_ARM_INTERWORK) != (out_flags & EF_ARM_INTERWORK))
252b5132 8257 {
fd2ec330 8258 if (out_flags & EF_ARM_INTERWORK)
d003868e
AM		 8259 _bfd_error_handler
8260 (_("Warning: Clearing the interworking flag of %B because non-interworking code in %B has been linked with it"),
8261 obfd, ibfd);
252b5132 8262
fd2ec330 8263 in_flags &= ~EF_ARM_INTERWORK;
252b5132 8264 }
1006ba19
PB		 8265
8266 /* Likewise for PIC, though don't warn for this case. */
fd2ec330
PB		 8267 if ((in_flags & EF_ARM_PIC) != (out_flags & EF_ARM_PIC))
8268 in_flags &= ~EF_ARM_PIC;
252b5132
RH		 8269 }
8270
8271 elf_elfheader (obfd)->e_flags = in_flags;
b34976b6 8272 elf_flags_init (obfd) = TRUE;
252b5132 8273
94a3258f
PB		 8274 /* Also copy the EI_OSABI field. */
8275 elf_elfheader (obfd)->e_ident[EI_OSABI] =
8276 elf_elfheader (ibfd)->e_ident[EI_OSABI];
8277
104d59d1
JM		 8278 /* Copy object attributes. */
8279 _bfd_elf_copy_obj_attributes (ibfd, obfd);
ee065d83
PB		 8280
8281 return TRUE;
8282}
8283
8284/* Values for Tag_ABI_PCS_R9_use. */
8285enum
8286{
8287 AEABI_R9_V6,
8288 AEABI_R9_SB,
8289 AEABI_R9_TLS,
8290 AEABI_R9_unused
8291};
8292
8293/* Values for Tag_ABI_PCS_RW_data. */
8294enum
8295{
8296 AEABI_PCS_RW_data_absolute,
8297 AEABI_PCS_RW_data_PCrel,
8298 AEABI_PCS_RW_data_SBrel,
8299 AEABI_PCS_RW_data_unused
8300};
8301
8302/* Values for Tag_ABI_enum_size. */
8303enum
8304{
8305 AEABI_enum_unused,
8306 AEABI_enum_short,
8307 AEABI_enum_wide,
8308 AEABI_enum_forced_wide
8309};
8310
104d59d1
JM		 8311/* Determine whether an object attribute tag takes an integer, a
8312 string or both. */
906e58ca 8313
104d59d1
JM		 8314static int
8315elf32_arm_obj_attrs_arg_type (int tag)
8316{
8317 if (tag == Tag_compatibility)
3483fe2e 8318 return ATTR_TYPE_FLAG_INT_VAL | ATTR_TYPE_FLAG_STR_VAL;
2d0bb761 8319 else if (tag == Tag_nodefaults)
3483fe2e
AS		 8320 return ATTR_TYPE_FLAG_INT_VAL | ATTR_TYPE_FLAG_NO_DEFAULT;
8321 else if (tag == Tag_CPU_raw_name || tag == Tag_CPU_name)
8322 return ATTR_TYPE_FLAG_STR_VAL;
104d59d1 8323 else if (tag < 32)
3483fe2e 8324 return ATTR_TYPE_FLAG_INT_VAL;
104d59d1 8325 else
3483fe2e 8326 return (tag & 1) != 0 ? ATTR_TYPE_FLAG_STR_VAL : ATTR_TYPE_FLAG_INT_VAL;
104d59d1
JM		 8327}
8328
5aa6ff7c
AS		 8329/* The ABI defines that Tag_conformance should be emitted first, and that
8330 Tag_nodefaults should be second (if either is defined). This sets those
8331 two positions, and bumps up the position of all the remaining tags to
8332 compensate. */
8333static int
8334elf32_arm_obj_attrs_order (int num)
8335{
8336 if (num == 4)
8337 return Tag_conformance;
8338 if (num == 5)
8339 return Tag_nodefaults;
8340 if ((num - 2) < Tag_nodefaults)
8341 return num - 2;
8342 if ((num - 1) < Tag_conformance)
8343 return num - 1;
8344 return num;
8345}
8346
91e22acd
AS		 8347/* Read the architecture from the Tag_also_compatible_with attribute, if any.
8348 Returns -1 if no architecture could be read. */
8349
8350static int
8351get_secondary_compatible_arch (bfd *abfd)
8352{
8353 obj_attribute *attr =
8354 &elf_known_obj_attributes_proc (abfd)[Tag_also_compatible_with];
8355
8356 /* Note: the tag and its argument below are uleb128 values, though
8357 currently-defined values fit in one byte for each. */
8358 if (attr->s
8359 && attr->s[0] == Tag_CPU_arch
8360 && (attr->s[1] & 128) != 128
8361 && attr->s[2] == 0)
8362 return attr->s[1];
8363
8364 /* This tag is "safely ignorable", so don't complain if it looks funny. */
8365 return -1;
8366}
8367
8368/* Set, or unset, the architecture of the Tag_also_compatible_with attribute.
8369 The tag is removed if ARCH is -1. */
8370
8e79c3df 8371static void
91e22acd 8372set_secondary_compatible_arch (bfd *abfd, int arch)
8e79c3df 8373{
91e22acd
AS		 8374 obj_attribute *attr =
8375 &elf_known_obj_attributes_proc (abfd)[Tag_also_compatible_with];
8e79c3df 8376
91e22acd
AS		 8377 if (arch == -1)
8378 {
8379 attr->s = NULL;
8380 return;
8e79c3df 8381 }
91e22acd
AS		 8382
8383 /* Note: the tag and its argument below are uleb128 values, though
8384 currently-defined values fit in one byte for each. */
8385 if (!attr->s)
8386 attr->s = bfd_alloc (abfd, 3);
8387 attr->s[0] = Tag_CPU_arch;
8388 attr->s[1] = arch;
8389 attr->s[2] = '\0';
8e79c3df
CM		 8390}
8391
91e22acd
AS		 8392/* Combine two values for Tag_CPU_arch, taking secondary compatibility tags
8393 into account. */
8394
8395static int
8396tag_cpu_arch_combine (bfd *ibfd, int oldtag, int *secondary_compat_out,
8397 int newtag, int secondary_compat)
8e79c3df 8398{
91e22acd
AS		 8399#define T(X) TAG_CPU_ARCH_##X
8400 int tagl, tagh, result;
8401 const int v6t2[] =
8402 {
8403 T(V6T2), /* PRE_V4. */
8404 T(V6T2), /* V4. */
8405 T(V6T2), /* V4T. */
8406 T(V6T2), /* V5T. */
8407 T(V6T2), /* V5TE. */
8408 T(V6T2), /* V5TEJ. */
8409 T(V6T2), /* V6. */
8410 T(V7), /* V6KZ. */
8411 T(V6T2) /* V6T2. */
8412 };
8413 const int v6k[] =
8414 {
8415 T(V6K), /* PRE_V4. */
8416 T(V6K), /* V4. */
8417 T(V6K), /* V4T. */
8418 T(V6K), /* V5T. */
8419 T(V6K), /* V5TE. */
8420 T(V6K), /* V5TEJ. */
8421 T(V6K), /* V6. */
8422 T(V6KZ), /* V6KZ. */
8423 T(V7), /* V6T2. */
8424 T(V6K) /* V6K. */
8425 };
8426 const int v7[] =
8427 {
8428 T(V7), /* PRE_V4. */
8429 T(V7), /* V4. */
8430 T(V7), /* V4T. */
8431 T(V7), /* V5T. */
8432 T(V7), /* V5TE. */
8433 T(V7), /* V5TEJ. */
8434 T(V7), /* V6. */
8435 T(V7), /* V6KZ. */
8436 T(V7), /* V6T2. */
8437 T(V7), /* V6K. */
8438 T(V7) /* V7. */
8439 };
8440 const int v6_m[] =
8441 {
8442 -1, /* PRE_V4. */
8443 -1, /* V4. */
8444 T(V6K), /* V4T. */
8445 T(V6K), /* V5T. */
8446 T(V6K), /* V5TE. */
8447 T(V6K), /* V5TEJ. */
8448 T(V6K), /* V6. */
8449 T(V6KZ), /* V6KZ. */
8450 T(V7), /* V6T2. */
8451 T(V6K), /* V6K. */
8452 T(V7), /* V7. */
8453 T(V6_M) /* V6_M. */
8454 };
8455 const int v6s_m[] =
8456 {
8457 -1, /* PRE_V4. */
8458 -1, /* V4. */
8459 T(V6K), /* V4T. */
8460 T(V6K), /* V5T. */
8461 T(V6K), /* V5TE. */
8462 T(V6K), /* V5TEJ. */
8463 T(V6K), /* V6. */
8464 T(V6KZ), /* V6KZ. */
8465 T(V7), /* V6T2. */
8466 T(V6K), /* V6K. */
8467 T(V7), /* V7. */
8468 T(V6S_M), /* V6_M. */
8469 T(V6S_M) /* V6S_M. */
8470 };
8471 const int v4t_plus_v6_m[] =
8472 {
8473 -1, /* PRE_V4. */
8474 -1, /* V4. */
8475 T(V4T), /* V4T. */
8476 T(V5T), /* V5T. */
8477 T(V5TE), /* V5TE. */
8478 T(V5TEJ), /* V5TEJ. */
8479 T(V6), /* V6. */
8480 T(V6KZ), /* V6KZ. */
8481 T(V6T2), /* V6T2. */
8482 T(V6K), /* V6K. */
8483 T(V7), /* V7. */
8484 T(V6_M), /* V6_M. */
8485 T(V6S_M), /* V6S_M. */
8486 T(V4T_PLUS_V6_M) /* V4T plus V6_M. */
8487 };
8488 const int *comb[] =
8489 {
8490 v6t2,
8491 v6k,
8492 v7,
8493 v6_m,
8494 v6s_m,
8495 /* Pseudo-architecture. */
8496 v4t_plus_v6_m
8497 };
8498
8499 /* Check we've not got a higher architecture than we know about. */
8500
8501 if (oldtag >= MAX_TAG_CPU_ARCH || newtag >= MAX_TAG_CPU_ARCH)
8502 {
8503 _bfd_error_handler (_("ERROR: %B: Unknown CPU architecture"), ibfd);
8504 return -1;
8505 }
8506
8507 /* Override old tag if we have a Tag_also_compatible_with on the output. */
8508
8509 if ((oldtag == T(V6_M) && *secondary_compat_out == T(V4T))
8510 || (oldtag == T(V4T) && *secondary_compat_out == T(V6_M)))
8511 oldtag = T(V4T_PLUS_V6_M);
8512
8513 /* And override the new tag if we have a Tag_also_compatible_with on the
8514 input. */
8515
8516 if ((newtag == T(V6_M) && secondary_compat == T(V4T))
8517 || (newtag == T(V4T) && secondary_compat == T(V6_M)))
8518 newtag = T(V4T_PLUS_V6_M);
8519
8520 tagl = (oldtag < newtag) ? oldtag : newtag;
8521 result = tagh = (oldtag > newtag) ? oldtag : newtag;
8522
8523 /* Architectures before V6KZ add features monotonically. */
8524 if (tagh <= TAG_CPU_ARCH_V6KZ)
8525 return result;
8526
8527 result = comb[tagh - T(V6T2)][tagl];
8528
8529 /* Use Tag_CPU_arch == V4T and Tag_also_compatible_with (Tag_CPU_arch V6_M)
8530 as the canonical version. */
8531 if (result == T(V4T_PLUS_V6_M))
8532 {
8533 result = T(V4T);
8534 *secondary_compat_out = T(V6_M);
8535 }
8536 else
8537 *secondary_compat_out = -1;
8538
8539 if (result == -1)
8540 {
8541 _bfd_error_handler (_("ERROR: %B: Conflicting CPU architectures %d/%d"),
8542 ibfd, oldtag, newtag);
8543 return -1;
8544 }
8545
8546 return result;
8547#undef T
8e79c3df
CM		 8548}
8549
ee065d83
PB		 8550/* Merge EABI object attributes from IBFD into OBFD. Raise an error if there
8551 are conflicting attributes. */
906e58ca 8552
ee065d83
PB		 8553static bfd_boolean
8554elf32_arm_merge_eabi_attributes (bfd *ibfd, bfd *obfd)
8555{
104d59d1
JM		 8556 obj_attribute *in_attr;
8557 obj_attribute *out_attr;
8558 obj_attribute_list *in_list;
8e79c3df 8559 obj_attribute_list *out_list;
91e22acd 8560 obj_attribute_list **out_listp;
ee065d83
PB		 8561 /* Some tags have 0 = don't care, 1 = strong requirement,
8562 2 = weak requirement. */
91e22acd 8563 static const int order_021[3] = {0, 2, 1};
b1cc4aeb
PB		 8564 /* For use with Tag_VFP_arch. */
8565 static const int order_01243[5] = {0, 1, 2, 4, 3};
ee065d83 8566 int i;
91e22acd 8567 bfd_boolean result = TRUE;
ee065d83 8568
104d59d1 8569 if (!elf_known_obj_attributes_proc (obfd)[0].i)
ee065d83
PB		 8570 {
8571 /* This is the first object. Copy the attributes. */
104d59d1 8572 _bfd_elf_copy_obj_attributes (ibfd, obfd);
004ae526
PB		 8573
8574 /* Use the Tag_null value to indicate the attributes have been
8575 initialized. */
104d59d1 8576 elf_known_obj_attributes_proc (obfd)[0].i = 1;
004ae526 8577
ee065d83
PB		 8578 return TRUE;
8579 }
8580
104d59d1
JM		 8581 in_attr = elf_known_obj_attributes_proc (ibfd);
8582 out_attr = elf_known_obj_attributes_proc (obfd);
ee065d83
PB		 8583 /* This needs to happen before Tag_ABI_FP_number_model is merged. */
8584 if (in_attr[Tag_ABI_VFP_args].i != out_attr[Tag_ABI_VFP_args].i)
8585 {
8e79c3df 8586 /* Ignore mismatches if the object doesn't use floating point. */
ee065d83
PB		 8587 if (out_attr[Tag_ABI_FP_number_model].i == 0)
8588 out_attr[Tag_ABI_VFP_args].i = in_attr[Tag_ABI_VFP_args].i;
8589 else if (in_attr[Tag_ABI_FP_number_model].i != 0)
8590 {
8591 _bfd_error_handler
8592 (_("ERROR: %B uses VFP register arguments, %B does not"),
8593 ibfd, obfd);
91e22acd 8594 result = FALSE;
ee065d83
PB		 8595 }
8596 }
8597
104d59d1 8598 for (i = 4; i < NUM_KNOWN_OBJ_ATTRIBUTES; i++)
ee065d83
PB		 8599 {
8600 /* Merge this attribute with existing attributes. */
8601 switch (i)
8602 {
8603 case Tag_CPU_raw_name:
8604 case Tag_CPU_name:
91e22acd 8605 /* These are merged after Tag_CPU_arch. */
ee065d83
PB		 8606 break;
8607
8608 case Tag_ABI_optimization_goals:
8609 case Tag_ABI_FP_optimization_goals:
8610 /* Use the first value seen. */
8611 break;
8612
8613 case Tag_CPU_arch:
91e22acd
AS		 8614 {
8615 int secondary_compat = -1, secondary_compat_out = -1;
8616 unsigned int saved_out_attr = out_attr[i].i;
8617 static const char *name_table[] = {
8618 /* These aren't real CPU names, but we can't guess
8619 that from the architecture version alone. */
8620 "Pre v4",
8621 "ARM v4",
8622 "ARM v4T",
8623 "ARM v5T",
8624 "ARM v5TE",
8625 "ARM v5TEJ",
8626 "ARM v6",
8627 "ARM v6KZ",
8628 "ARM v6T2",
8629 "ARM v6K",
8630 "ARM v7",
8631 "ARM v6-M",
8632 "ARM v6S-M"
8633 };
8634
8635 /* Merge Tag_CPU_arch and Tag_also_compatible_with. */
8636 secondary_compat = get_secondary_compatible_arch (ibfd);
8637 secondary_compat_out = get_secondary_compatible_arch (obfd);
8638 out_attr[i].i = tag_cpu_arch_combine (ibfd, out_attr[i].i,
8639 &secondary_compat_out,
8640 in_attr[i].i,
8641 secondary_compat);
8642 set_secondary_compatible_arch (obfd, secondary_compat_out);
8643
8644 /* Merge Tag_CPU_name and Tag_CPU_raw_name. */
8645 if (out_attr[i].i == saved_out_attr)
8646 ; /* Leave the names alone. */
8647 else if (out_attr[i].i == in_attr[i].i)
8648 {
8649 /* The output architecture has been changed to match the
8650 input architecture. Use the input names. */
8651 out_attr[Tag_CPU_name].s = in_attr[Tag_CPU_name].s
8652 ? _bfd_elf_attr_strdup (obfd, in_attr[Tag_CPU_name].s)
8653 : NULL;
8654 out_attr[Tag_CPU_raw_name].s = in_attr[Tag_CPU_raw_name].s
8655 ? _bfd_elf_attr_strdup (obfd, in_attr[Tag_CPU_raw_name].s)
8656 : NULL;
8657 }
8658 else
8659 {
8660 out_attr[Tag_CPU_name].s = NULL;
8661 out_attr[Tag_CPU_raw_name].s = NULL;
8662 }
8663
8664 /* If we still don't have a value for Tag_CPU_name,
8665 make one up now. Tag_CPU_raw_name remains blank. */
8666 if (out_attr[Tag_CPU_name].s == NULL
8667 && out_attr[i].i < ARRAY_SIZE (name_table))
8668 out_attr[Tag_CPU_name].s =
8669 _bfd_elf_attr_strdup (obfd, name_table[out_attr[i].i]);
8670 }
8671 break;
8672
ee065d83
PB		 8673 case Tag_ARM_ISA_use:
8674 case Tag_THUMB_ISA_use:
ee065d83 8675 case Tag_WMMX_arch:
91e22acd
AS		 8676 case Tag_Advanced_SIMD_arch:
8677 /* ??? Do Advanced_SIMD (NEON) and WMMX conflict? */
ee065d83 8678 case Tag_ABI_FP_rounding:
ee065d83
PB		 8679 case Tag_ABI_FP_exceptions:
8680 case Tag_ABI_FP_user_exceptions:
8681 case Tag_ABI_FP_number_model:
91e22acd
AS		 8682 case Tag_VFP_HP_extension:
8683 case Tag_CPU_unaligned_access:
8684 case Tag_T2EE_use:
8685 case Tag_Virtualization_use:
8686 case Tag_MPextension_use:
ee065d83
PB		 8687 /* Use the largest value specified. */
8688 if (in_attr[i].i > out_attr[i].i)
8689 out_attr[i].i = in_attr[i].i;
8690 break;
8691
91e22acd
AS		 8692 case Tag_ABI_align8_preserved:
8693 case Tag_ABI_PCS_RO_data:
8694 /* Use the smallest value specified. */
8695 if (in_attr[i].i < out_attr[i].i)
8696 out_attr[i].i = in_attr[i].i;
8697 break;
8698
8699 case Tag_ABI_align8_needed:
8700 if ((in_attr[i].i > 0 || out_attr[i].i > 0)
8701 && (in_attr[Tag_ABI_align8_preserved].i == 0
8702 || out_attr[Tag_ABI_align8_preserved].i == 0))
ee065d83 8703 {
91e22acd
AS		 8704 /* This error message should be enabled once all non-conformant
8705 binaries in the toolchain have had the attributes set
8706 properly.
ee065d83 8707 _bfd_error_handler
91e22acd
AS		 8708 (_("ERROR: %B: 8-byte data alignment conflicts with %B"),
8709 obfd, ibfd);
8710 result = FALSE; */
ee065d83 8711 }
91e22acd
AS		 8712 /* Fall through. */
8713 case Tag_ABI_FP_denormal:
8714 case Tag_ABI_PCS_GOT_use:
8715 /* Use the "greatest" from the sequence 0, 2, 1, or the largest
8716 value if greater than 2 (for future-proofing). */
8717 if ((in_attr[i].i > 2 && in_attr[i].i > out_attr[i].i)
8718 || (in_attr[i].i <= 2 && out_attr[i].i <= 2
8719 && order_021[in_attr[i].i] > order_021[out_attr[i].i]))
ee065d83
PB		 8720 out_attr[i].i = in_attr[i].i;
8721 break;
91e22acd
AS		 8722
8723
8724 case Tag_CPU_arch_profile:
8725 if (out_attr[i].i != in_attr[i].i)
8726 {
8727 /* 0 will merge with anything.
8728 'A' and 'S' merge to 'A'.
8729 'R' and 'S' merge to 'R'.
8730 'M' and 'A|R|S' is an error. */
8731 if (out_attr[i].i == 0
8732 || (out_attr[i].i == 'S'
8733 && (in_attr[i].i == 'A' || in_attr[i].i == 'R')))
8734 out_attr[i].i = in_attr[i].i;
8735 else if (in_attr[i].i == 0
8736 || (in_attr[i].i == 'S'
8737 && (out_attr[i].i == 'A' || out_attr[i].i == 'R')))
8738 ; /* Do nothing. */
8739 else
8740 {
8741 _bfd_error_handler
8742 (_("ERROR: %B: Conflicting architecture profiles %c/%c"),
8743 ibfd,
8744 in_attr[i].i ? in_attr[i].i : '0',
8745 out_attr[i].i ? out_attr[i].i : '0');
8746 result = FALSE;
8747 }
8748 }
8749 break;
b1cc4aeb 8750 case Tag_VFP_arch:
91e22acd
AS		 8751 /* Use the "greatest" from the sequence 0, 1, 2, 4, 3, or the
8752 largest value if greater than 4 (for future-proofing). */
8753 if ((in_attr[i].i > 4 && in_attr[i].i > out_attr[i].i)
8754 || (in_attr[i].i <= 4 && out_attr[i].i <= 4
8755 && order_01243[in_attr[i].i] > order_01243[out_attr[i].i]))
b1cc4aeb
PB		 8756 out_attr[i].i = in_attr[i].i;
8757 break;
ee065d83
PB		 8758 case Tag_PCS_config:
8759 if (out_attr[i].i == 0)
8760 out_attr[i].i = in_attr[i].i;
8761 else if (in_attr[i].i != 0 && out_attr[i].i != 0)
8762 {
8763 /* It's sometimes ok to mix different configs, so this is only
8764 a warning. */
8765 _bfd_error_handler
8766 (_("Warning: %B: Conflicting platform configuration"), ibfd);
8767 }
8768 break;
8769 case Tag_ABI_PCS_R9_use:
004ae526
PB		 8770 if (in_attr[i].i != out_attr[i].i
8771 && out_attr[i].i != AEABI_R9_unused
ee065d83
PB		 8772 && in_attr[i].i != AEABI_R9_unused)
8773 {
8774 _bfd_error_handler
8775 (_("ERROR: %B: Conflicting use of R9"), ibfd);
91e22acd 8776 result = FALSE;
ee065d83
PB		 8777 }
8778 if (out_attr[i].i == AEABI_R9_unused)
8779 out_attr[i].i = in_attr[i].i;
8780 break;
8781 case Tag_ABI_PCS_RW_data:
8782 if (in_attr[i].i == AEABI_PCS_RW_data_SBrel
8783 && out_attr[Tag_ABI_PCS_R9_use].i != AEABI_R9_SB
8784 && out_attr[Tag_ABI_PCS_R9_use].i != AEABI_R9_unused)
8785 {
8786 _bfd_error_handler
8787 (_("ERROR: %B: SB relative addressing conflicts with use of R9"),
8788 ibfd);
91e22acd 8789 result = FALSE;
ee065d83
PB		 8790 }
8791 /* Use the smallest value specified. */
8792 if (in_attr[i].i < out_attr[i].i)
8793 out_attr[i].i = in_attr[i].i;
8794 break;
ee065d83 8795 case Tag_ABI_PCS_wchar_t:
a9dc9481
JM		 8796 if (out_attr[i].i && in_attr[i].i && out_attr[i].i != in_attr[i].i
8797 && !elf_arm_tdata (obfd)->no_wchar_size_warning)
ee065d83
PB		 8798 {
8799 _bfd_error_handler
a9dc9481
JM		 8800 (_("warning: %B uses %u-byte wchar_t yet the output is to use %u-byte wchar_t; use of wchar_t values across objects may fail"),
8801 ibfd, in_attr[i].i, out_attr[i].i);
ee065d83 8802 }
a9dc9481 8803 else if (in_attr[i].i && !out_attr[i].i)
ee065d83
PB		 8804 out_attr[i].i = in_attr[i].i;
8805 break;
ee065d83
PB		 8806 case Tag_ABI_enum_size:
8807 if (in_attr[i].i != AEABI_enum_unused)
8808 {
8809 if (out_attr[i].i == AEABI_enum_unused
8810 || out_attr[i].i == AEABI_enum_forced_wide)
8811 {
8812 /* The existing object is compatible with anything.
8813 Use whatever requirements the new object has. */
8814 out_attr[i].i = in_attr[i].i;
8815 }
8816 else if (in_attr[i].i != AEABI_enum_forced_wide
bf21ed78 8817 && out_attr[i].i != in_attr[i].i
0ffa91dd 8818 && !elf_arm_tdata (obfd)->no_enum_size_warning)
ee065d83 8819 {
91e22acd 8820 static const char *aeabi_enum_names[] =
bf21ed78 8821 { "", "variable-size", "32-bit", "" };
91e22acd
AS		 8822 const char *in_name =
8823 in_attr[i].i < ARRAY_SIZE(aeabi_enum_names)
8824 ? aeabi_enum_names[in_attr[i].i]
8825 : "<unknown>";
8826 const char *out_name =
8827 out_attr[i].i < ARRAY_SIZE(aeabi_enum_names)
8828 ? aeabi_enum_names[out_attr[i].i]
8829 : "<unknown>";
ee065d83 8830 _bfd_error_handler
bf21ed78 8831 (_("warning: %B uses %s enums yet the output is to use %s enums; use of enum values across objects may fail"),
91e22acd 8832 ibfd, in_name, out_name);
ee065d83
PB		 8833 }
8834 }
8835 break;
8836 case Tag_ABI_VFP_args:
8837 /* Aready done. */
8838 break;
8839 case Tag_ABI_WMMX_args:
8840 if (in_attr[i].i != out_attr[i].i)
8841 {
8842 _bfd_error_handler
8843 (_("ERROR: %B uses iWMMXt register arguments, %B does not"),
8844 ibfd, obfd);
91e22acd 8845 result = FALSE;
ee065d83
PB		 8846 }
8847 break;
7b86a9fa
AS		 8848 case Tag_compatibility:
8849 /* Merged in target-independent code. */
8850 break;
91e22acd
AS		 8851 case Tag_ABI_HardFP_use:
8852 /* 1 (SP) and 2 (DP) conflict, so combine to 3 (SP & DP). */
8853 if ((in_attr[i].i == 1 && out_attr[i].i == 2)
8854 || (in_attr[i].i == 2 && out_attr[i].i == 1))
8855 out_attr[i].i = 3;
8856 else if (in_attr[i].i > out_attr[i].i)
8857 out_attr[i].i = in_attr[i].i;
8858 break;
8859 case Tag_ABI_FP_16bit_format:
8860 if (in_attr[i].i != 0 && out_attr[i].i != 0)
8861 {
8862 if (in_attr[i].i != out_attr[i].i)
8863 {
8864 _bfd_error_handler
8865 (_("ERROR: fp16 format mismatch between %B and %B"),
8866 ibfd, obfd);
8867 result = FALSE;
8868 }
8869 }
8870 if (in_attr[i].i != 0)
8871 out_attr[i].i = in_attr[i].i;
8872 break;
7b86a9fa 8873
91e22acd 8874 case Tag_nodefaults:
2d0bb761
AS		 8875 /* This tag is set if it exists, but the value is unused (and is
8876 typically zero). We don't actually need to do anything here -
8877 the merge happens automatically when the type flags are merged
8878 below. */
91e22acd
AS		 8879 break;
8880 case Tag_also_compatible_with:
8881 /* Already done in Tag_CPU_arch. */
8882 break;
8883 case Tag_conformance:
8884 /* Keep the attribute if it matches. Throw it away otherwise.
8885 No attribute means no claim to conform. */
8886 if (!in_attr[i].s || !out_attr[i].s
8887 || strcmp (in_attr[i].s, out_attr[i].s) != 0)
8888 out_attr[i].s = NULL;
8889 break;
3cfad14c 8890
91e22acd 8891 default:
3cfad14c 8892 {
91e22acd
AS		 8893 bfd *err_bfd = NULL;
8894
8895 /* The "known_obj_attributes" table does contain some undefined
8896 attributes. Ensure that there are unused. */
8897 if (out_attr[i].i != 0 || out_attr[i].s != NULL)
8898 err_bfd = obfd;
8899 else if (in_attr[i].i != 0 || in_attr[i].s != NULL)
8900 err_bfd = ibfd;
8901
8902 if (err_bfd != NULL)
8903 {
8904 /* Attribute numbers >=64 (mod 128) can be safely ignored. */
8905 if ((i & 127) < 64)
8906 {
8907 _bfd_error_handler
8908 (_("%B: Unknown mandatory EABI object attribute %d"),
8909 err_bfd, i);
8910 bfd_set_error (bfd_error_bad_value);
8911 result = FALSE;
8912 }
8913 else
8914 {
8915 _bfd_error_handler
8916 (_("Warning: %B: Unknown EABI object attribute %d"),
8917 err_bfd, i);
8918 }
8919 }
8920
8921 /* Only pass on attributes that match in both inputs. */
8922 if (in_attr[i].i != out_attr[i].i
8923 || in_attr[i].s != out_attr[i].s
8924 || (in_attr[i].s != NULL && out_attr[i].s != NULL
8925 && strcmp (in_attr[i].s, out_attr[i].s) != 0))
8926 {
8927 out_attr[i].i = 0;
8928 out_attr[i].s = NULL;
8929 }
3cfad14c 8930 }
91e22acd
AS		 8931 }
8932
8933 /* If out_attr was copied from in_attr then it won't have a type yet. */
8934 if (in_attr[i].type && !out_attr[i].type)
8935 out_attr[i].type = in_attr[i].type;
ee065d83
PB		 8936 }
8937
104d59d1
JM		 8938 /* Merge Tag_compatibility attributes and any common GNU ones. */
8939 _bfd_elf_merge_object_attributes (ibfd, obfd);
ee065d83 8940
104d59d1
JM		 8941 /* Check for any attributes not known on ARM. */
8942 in_list = elf_other_obj_attributes_proc (ibfd);
91e22acd
AS		 8943 out_listp = &elf_other_obj_attributes_proc (obfd);
8944 out_list = *out_listp;
8e79c3df 8945
91e22acd 8946 for (; in_list || out_list; )
ee065d83 8947 {
91e22acd
AS		 8948 bfd *err_bfd = NULL;
8949 int err_tag = 0;
8e79c3df
CM		 8950
8951 /* The tags for each list are in numerical order. */
8952 /* If the tags are equal, then merge. */
91e22acd 8953 if (out_list && (!in_list || in_list->tag > out_list->tag))
8e79c3df 8954 {
91e22acd
AS		 8955 /* This attribute only exists in obfd. We can't merge, and we don't
8956 know what the tag means, so delete it. */
8957 err_bfd = obfd;
8958 err_tag = out_list->tag;
8959 *out_listp = out_list->next;
8960 out_list = *out_listp;
8e79c3df 8961 }
91e22acd 8962 else if (in_list && (!out_list || in_list->tag < out_list->tag))
8e79c3df 8963 {
91e22acd
AS		 8964 /* This attribute only exists in ibfd. We can't merge, and we don't
8965 know what the tag means, so ignore it. */
8966 err_bfd = ibfd;
8967 err_tag = in_list->tag;
8e79c3df 8968 in_list = in_list->next;
eb111b1f 8969 }
91e22acd
AS		 8970 else /* The tags are equal. */
8971 {
8972 /* As present, all attributes in the list are unknown, and
8973 therefore can't be merged meaningfully. */
8974 err_bfd = obfd;
8975 err_tag = out_list->tag;
8976
8977 /* Only pass on attributes that match in both inputs. */
8978 if (in_list->attr.i != out_list->attr.i
8979 || in_list->attr.s != out_list->attr.s
8980 || (in_list->attr.s && out_list->attr.s
8981 && strcmp (in_list->attr.s, out_list->attr.s) != 0))
8982 {
8983 /* No match. Delete the attribute. */
8984 *out_listp = out_list->next;
8985 out_list = *out_listp;
8986 }
8987 else
8988 {
8989 /* Matched. Keep the attribute and move to the next. */
8990 out_list = out_list->next;
8991 in_list = in_list->next;
8992 }
8993 }
8994
8995 if (err_bfd)
8996 {
8997 /* Attribute numbers >=64 (mod 128) can be safely ignored. */
8998 if ((err_tag & 127) < 64)
8999 {
9000 _bfd_error_handler
9001 (_("%B: Unknown mandatory EABI object attribute %d"),
9002 err_bfd, err_tag);
9003 bfd_set_error (bfd_error_bad_value);
9004 result = FALSE;
9005 }
9006 else
9007 {
9008 _bfd_error_handler
9009 (_("Warning: %B: Unknown EABI object attribute %d"),
9010 err_bfd, err_tag);
9011 }
9012 }
ee065d83 9013 }
91e22acd 9014 return result;
252b5132
RH		 9015}
9016
3a4a14e9
PB		 9017
9018/* Return TRUE if the two EABI versions are incompatible. */
9019
9020static bfd_boolean
9021elf32_arm_versions_compatible (unsigned iver, unsigned over)
9022{
9023 /* v4 and v5 are the same spec before and after it was released,
9024 so allow mixing them. */
9025 if ((iver == EF_ARM_EABI_VER4 && over == EF_ARM_EABI_VER5)
9026 || (iver == EF_ARM_EABI_VER5 && over == EF_ARM_EABI_VER4))
9027 return TRUE;
9028
9029 return (iver == over);
9030}
9031
252b5132
RH		 9032/* Merge backend specific data from an object file to the output
9033 object file when linking. */
9b485d32 9034
b34976b6 9035static bfd_boolean
57e8b36a 9036elf32_arm_merge_private_bfd_data (bfd * ibfd, bfd * obfd)
252b5132
RH		 9037{
9038 flagword out_flags;
9039 flagword in_flags;
b34976b6 9040 bfd_boolean flags_compatible = TRUE;
cf919dfd 9041 asection *sec;
252b5132 9042
9b485d32 9043 /* Check if we have the same endianess. */
82e51918 9044 if (! _bfd_generic_verify_endian_match (ibfd, obfd))
b34976b6 9045 return FALSE;
1fe494a5 9046
0ffa91dd 9047 if (! is_arm_elf (ibfd) || ! is_arm_elf (obfd))
b34976b6 9048 return TRUE;
252b5132 9049
ee065d83
PB		 9050 if (!elf32_arm_merge_eabi_attributes (ibfd, obfd))
9051 return FALSE;
9052
252b5132
RH		 9053 /* The input BFD must have had its flags initialised. */
9054 /* The following seems bogus to me -- The flags are initialized in
9055 the assembler but I don't think an elf_flags_init field is
9b485d32 9056 written into the object. */
252b5132
RH		 9057 /* BFD_ASSERT (elf_flags_init (ibfd)); */
9058
9059 in_flags = elf_elfheader (ibfd)->e_flags;
9060 out_flags = elf_elfheader (obfd)->e_flags;
9061
23684067
PB		 9062 /* In theory there is no reason why we couldn't handle this. However
9063 in practice it isn't even close to working and there is no real
9064 reason to want it. */
9065 if (EF_ARM_EABI_VERSION (in_flags) >= EF_ARM_EABI_VER4
c13bb2ea 9066 && !(ibfd->flags & DYNAMIC)
23684067
PB		 9067 && (in_flags & EF_ARM_BE8))
9068 {
8029a119 9069 _bfd_error_handler (_("ERROR: %B is already in final BE8 format"),
23684067
PB		 9070 ibfd);
9071 return FALSE;
9072 }
9073
252b5132
RH		 9074 if (!elf_flags_init (obfd))
9075 {
fe077fa6
NC		 9076 /* If the input is the default architecture and had the default
9077 flags then do not bother setting the flags for the output
9078 architecture, instead allow future merges to do this. If no
9079 future merges ever set these flags then they will retain their
9080 uninitialised values, which surprise surprise, correspond
252b5132 9081 to the default values. */
fe077fa6
NC		 9082 if (bfd_get_arch_info (ibfd)->the_default
9083 && elf_elfheader (ibfd)->e_flags == 0)
b34976b6 9084 return TRUE;
252b5132 9085
b34976b6 9086 elf_flags_init (obfd) = TRUE;
252b5132
RH		 9087 elf_elfheader (obfd)->e_flags = in_flags;
9088
9089 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
9090 && bfd_get_arch_info (obfd)->the_default)
9091 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd), bfd_get_mach (ibfd));
9092
b34976b6 9093 return TRUE;
252b5132
RH		 9094 }
9095
5a6c6817
NC		 9096 /* Determine what should happen if the input ARM architecture
9097 does not match the output ARM architecture. */
9098 if (! bfd_arm_merge_machines (ibfd, obfd))
9099 return FALSE;
e16bb312 9100
1006ba19 9101 /* Identical flags must be compatible. */
252b5132 9102 if (in_flags == out_flags)
b34976b6 9103 return TRUE;
252b5132 9104
35a0f415
DJ		 9105 /* Check to see if the input BFD actually contains any sections. If
9106 not, its flags may not have been initialised either, but it
8e3de13a 9107 cannot actually cause any incompatiblity. Do not short-circuit
35a0f415 9108 dynamic objects; their section list may be emptied by
d1f161ea 9109 elf_link_add_object_symbols.
35a0f415 9110
d1f161ea
NC		 9111 Also check to see if there are no code sections in the input.
9112 In this case there is no need to check for code specific flags.
9113 XXX - do we need to worry about floating-point format compatability
9114 in data sections ? */
35a0f415 9115 if (!(ibfd->flags & DYNAMIC))
cf919dfd 9116 {
35a0f415 9117 bfd_boolean null_input_bfd = TRUE;
d1f161ea 9118 bfd_boolean only_data_sections = TRUE;
35a0f415
DJ		 9119
9120 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
cf919dfd 9121 {
35a0f415
DJ		 9122 /* Ignore synthetic glue sections. */
9123 if (strcmp (sec->name, ".glue_7")
9124 && strcmp (sec->name, ".glue_7t"))
9125 {
d1f161ea
NC		 9126 if ((bfd_get_section_flags (ibfd, sec)
9127 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
9128 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
9129 only_data_sections = FALSE;
9130
35a0f415
DJ		 9131 null_input_bfd = FALSE;
9132 break;
9133 }
cf919dfd 9134 }
d1f161ea
NC		 9135
9136 if (null_input_bfd || only_data_sections)
35a0f415 9137 return TRUE;
cf919dfd 9138 }
cf919dfd 9139
252b5132 9140 /* Complain about various flag mismatches. */
3a4a14e9
PB		 9141 if (!elf32_arm_versions_compatible (EF_ARM_EABI_VERSION (in_flags),
9142 EF_ARM_EABI_VERSION (out_flags)))
fc830a83 9143 {
d003868e 9144 _bfd_error_handler
3656d5e3 9145 (_("ERROR: Source object %B has EABI version %d, but target %B has EABI version %d"),
d003868e
AM		 9146 ibfd, obfd,
9147 (in_flags & EF_ARM_EABIMASK) >> 24,
9148 (out_flags & EF_ARM_EABIMASK) >> 24);
b34976b6 9149 return FALSE;
fc830a83 9150 }
252b5132 9151
1006ba19 9152 /* Not sure what needs to be checked for EABI versions >= 1. */
00a97672
RS		 9153 /* VxWorks libraries do not use these flags. */
9154 if (get_elf_backend_data (obfd) != &elf32_arm_vxworks_bed
9155 && get_elf_backend_data (ibfd) != &elf32_arm_vxworks_bed
9156 && EF_ARM_EABI_VERSION (in_flags) == EF_ARM_EABI_UNKNOWN)
1006ba19 9157 {
fd2ec330 9158 if ((in_flags & EF_ARM_APCS_26) != (out_flags & EF_ARM_APCS_26))
1006ba19 9159 {
d003868e
AM		 9160 _bfd_error_handler
9161 (_("ERROR: %B is compiled for APCS-%d, whereas target %B uses APCS-%d"),
9162 ibfd, obfd,
9163 in_flags & EF_ARM_APCS_26 ? 26 : 32,
9164 out_flags & EF_ARM_APCS_26 ? 26 : 32);
b34976b6 9165 flags_compatible = FALSE;
1006ba19 9166 }
252b5132 9167
fd2ec330 9168 if ((in_flags & EF_ARM_APCS_FLOAT) != (out_flags & EF_ARM_APCS_FLOAT))
1006ba19 9169 {
5eefb65f 9170 if (in_flags & EF_ARM_APCS_FLOAT)
d003868e
AM		 9171 _bfd_error_handler
9172 (_("ERROR: %B passes floats in float registers, whereas %B passes them in integer registers"),
9173 ibfd, obfd);
5eefb65f 9174 else
d003868e
AM		 9175 _bfd_error_handler
9176 (_("ERROR: %B passes floats in integer registers, whereas %B passes them in float registers"),
9177 ibfd, obfd);
63b0f745 9178
b34976b6 9179 flags_compatible = FALSE;
1006ba19 9180 }
252b5132 9181
96a846ea 9182 if ((in_flags & EF_ARM_VFP_FLOAT) != (out_flags & EF_ARM_VFP_FLOAT))
1006ba19 9183 {
96a846ea 9184 if (in_flags & EF_ARM_VFP_FLOAT)
d003868e
AM		 9185 _bfd_error_handler
9186 (_("ERROR: %B uses VFP instructions, whereas %B does not"),
9187 ibfd, obfd);
5eefb65f 9188 else
d003868e
AM		 9189 _bfd_error_handler
9190 (_("ERROR: %B uses FPA instructions, whereas %B does not"),
9191 ibfd, obfd);
fde78edd
NC		 9192
9193 flags_compatible = FALSE;
9194 }
9195
9196 if ((in_flags & EF_ARM_MAVERICK_FLOAT) != (out_flags & EF_ARM_MAVERICK_FLOAT))
9197 {
9198 if (in_flags & EF_ARM_MAVERICK_FLOAT)
d003868e
AM		 9199 _bfd_error_handler
9200 (_("ERROR: %B uses Maverick instructions, whereas %B does not"),
9201 ibfd, obfd);
fde78edd 9202 else
d003868e
AM		 9203 _bfd_error_handler
9204 (_("ERROR: %B does not use Maverick instructions, whereas %B does"),
9205 ibfd, obfd);
63b0f745 9206
b34976b6 9207 flags_compatible = FALSE;
1006ba19 9208 }
96a846ea
RE		 9209
9210#ifdef EF_ARM_SOFT_FLOAT
9211 if ((in_flags & EF_ARM_SOFT_FLOAT) != (out_flags & EF_ARM_SOFT_FLOAT))
9212 {
9213 /* We can allow interworking between code that is VFP format
9214 layout, and uses either soft float or integer regs for
9215 passing floating point arguments and results. We already
9216 know that the APCS_FLOAT flags match; similarly for VFP
9217 flags. */
9218 if ((in_flags & EF_ARM_APCS_FLOAT) != 0
9219 || (in_flags & EF_ARM_VFP_FLOAT) == 0)
9220 {
9221 if (in_flags & EF_ARM_SOFT_FLOAT)
d003868e
AM		 9222 _bfd_error_handler
9223 (_("ERROR: %B uses software FP, whereas %B uses hardware FP"),
9224 ibfd, obfd);
96a846ea 9225 else
d003868e
AM		 9226 _bfd_error_handler
9227 (_("ERROR: %B uses hardware FP, whereas %B uses software FP"),
9228 ibfd, obfd);
96a846ea 9229
b34976b6 9230 flags_compatible = FALSE;
96a846ea
RE		 9231 }
9232 }
ee43f35e 9233#endif
252b5132 9234
1006ba19 9235 /* Interworking mismatch is only a warning. */
fd2ec330 9236 if ((in_flags & EF_ARM_INTERWORK) != (out_flags & EF_ARM_INTERWORK))
8f615d07 9237 {
e3c8793a
NC		 9238 if (in_flags & EF_ARM_INTERWORK)
9239 {
d003868e
AM		 9240 _bfd_error_handler
9241 (_("Warning: %B supports interworking, whereas %B does not"),
9242 ibfd, obfd);
e3c8793a
NC		 9243 }
9244 else
9245 {
d003868e
AM		 9246 _bfd_error_handler
9247 (_("Warning: %B does not support interworking, whereas %B does"),
9248 ibfd, obfd);
e3c8793a 9249 }
8f615d07 9250 }
252b5132 9251 }
63b0f745 9252
1006ba19 9253 return flags_compatible;
252b5132
RH		 9254}
9255
9b485d32
NC		 9256/* Display the flags field. */
9257
b34976b6 9258static bfd_boolean
57e8b36a 9259elf32_arm_print_private_bfd_data (bfd *abfd, void * ptr)
252b5132 9260{
fc830a83
NC		 9261 FILE * file = (FILE *) ptr;
9262 unsigned long flags;
252b5132
RH		 9263
9264 BFD_ASSERT (abfd != NULL && ptr != NULL);
9265
9266 /* Print normal ELF private data. */
9267 _bfd_elf_print_private_bfd_data (abfd, ptr);
9268
fc830a83 9269 flags = elf_elfheader (abfd)->e_flags;
9b485d32
NC		 9270 /* Ignore init flag - it may not be set, despite the flags field
9271 containing valid data. */
252b5132
RH		 9272
9273 /* xgettext:c-format */
9b485d32 9274 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
252b5132 9275
fc830a83
NC		 9276 switch (EF_ARM_EABI_VERSION (flags))
9277 {
9278 case EF_ARM_EABI_UNKNOWN:
4cc11e76 9279 /* The following flag bits are GNU extensions and not part of the
fc830a83
NC		 9280 official ARM ELF extended ABI. Hence they are only decoded if
9281 the EABI version is not set. */
fd2ec330 9282 if (flags & EF_ARM_INTERWORK)
9b485d32 9283 fprintf (file, _(" [interworking enabled]"));
9a5aca8c 9284
fd2ec330 9285 if (flags & EF_ARM_APCS_26)
6c571f00 9286 fprintf (file, " [APCS-26]");
fc830a83 9287 else
6c571f00 9288 fprintf (file, " [APCS-32]");
9a5aca8c 9289
96a846ea
RE		 9290 if (flags & EF_ARM_VFP_FLOAT)
9291 fprintf (file, _(" [VFP float format]"));
fde78edd
NC		 9292 else if (flags & EF_ARM_MAVERICK_FLOAT)
9293 fprintf (file, _(" [Maverick float format]"));
96a846ea
RE		 9294 else
9295 fprintf (file, _(" [FPA float format]"));
9296
fd2ec330 9297 if (flags & EF_ARM_APCS_FLOAT)
9b485d32 9298 fprintf (file, _(" [floats passed in float registers]"));
9a5aca8c 9299
fd2ec330 9300 if (flags & EF_ARM_PIC)
9b485d32 9301 fprintf (file, _(" [position independent]"));
fc830a83 9302
fd2ec330 9303 if (flags & EF_ARM_NEW_ABI)
9b485d32 9304 fprintf (file, _(" [new ABI]"));
9a5aca8c 9305
fd2ec330 9306 if (flags & EF_ARM_OLD_ABI)
9b485d32 9307 fprintf (file, _(" [old ABI]"));
9a5aca8c 9308
fd2ec330 9309 if (flags & EF_ARM_SOFT_FLOAT)
9b485d32 9310 fprintf (file, _(" [software FP]"));
9a5aca8c 9311
96a846ea
RE		 9312 flags &= ~(EF_ARM_INTERWORK | EF_ARM_APCS_26 | EF_ARM_APCS_FLOAT
9313 | EF_ARM_PIC | EF_ARM_NEW_ABI | EF_ARM_OLD_ABI
fde78edd
NC		 9314 | EF_ARM_SOFT_FLOAT | EF_ARM_VFP_FLOAT
9315 | EF_ARM_MAVERICK_FLOAT);
fc830a83 9316 break;
9a5aca8c 9317
fc830a83 9318 case EF_ARM_EABI_VER1:
9b485d32 9319 fprintf (file, _(" [Version1 EABI]"));
9a5aca8c 9320
fc830a83 9321 if (flags & EF_ARM_SYMSARESORTED)
9b485d32 9322 fprintf (file, _(" [sorted symbol table]"));
fc830a83 9323 else
9b485d32 9324 fprintf (file, _(" [unsorted symbol table]"));
9a5aca8c 9325
fc830a83
NC		 9326 flags &= ~ EF_ARM_SYMSARESORTED;
9327 break;
9a5aca8c 9328
fd2ec330
PB		 9329 case EF_ARM_EABI_VER2:
9330 fprintf (file, _(" [Version2 EABI]"));
9331
9332 if (flags & EF_ARM_SYMSARESORTED)
9333 fprintf (file, _(" [sorted symbol table]"));
9334 else
9335 fprintf (file, _(" [unsorted symbol table]"));
9336
9337 if (flags & EF_ARM_DYNSYMSUSESEGIDX)
9338 fprintf (file, _(" [dynamic symbols use segment index]"));
9339
9340 if (flags & EF_ARM_MAPSYMSFIRST)
9341 fprintf (file, _(" [mapping symbols precede others]"));
9342
99e4ae17 9343 flags &= ~(EF_ARM_SYMSARESORTED | EF_ARM_DYNSYMSUSESEGIDX
fd2ec330
PB		 9344 | EF_ARM_MAPSYMSFIRST);
9345 break;
9346
d507cf36
PB		 9347 case EF_ARM_EABI_VER3:
9348 fprintf (file, _(" [Version3 EABI]"));
8cb51566
PB		 9349 break;
9350
9351 case EF_ARM_EABI_VER4:
9352 fprintf (file, _(" [Version4 EABI]"));
3a4a14e9 9353 goto eabi;
d507cf36 9354
3a4a14e9
PB		 9355 case EF_ARM_EABI_VER5:
9356 fprintf (file, _(" [Version5 EABI]"));
9357 eabi:
d507cf36
PB		 9358 if (flags & EF_ARM_BE8)
9359 fprintf (file, _(" [BE8]"));
9360
9361 if (flags & EF_ARM_LE8)
9362 fprintf (file, _(" [LE8]"));
9363
9364 flags &= ~(EF_ARM_LE8 | EF_ARM_BE8);
9365 break;
9366
fc830a83 9367 default:
9b485d32 9368 fprintf (file, _(" <EABI version unrecognised>"));
fc830a83
NC		 9369 break;
9370 }
252b5132 9371
fc830a83 9372 flags &= ~ EF_ARM_EABIMASK;
252b5132 9373
fc830a83 9374 if (flags & EF_ARM_RELEXEC)
9b485d32 9375 fprintf (file, _(" [relocatable executable]"));
252b5132 9376
fc830a83 9377 if (flags & EF_ARM_HASENTRY)
9b485d32 9378 fprintf (file, _(" [has entry point]"));
252b5132 9379
fc830a83
NC		 9380 flags &= ~ (EF_ARM_RELEXEC | EF_ARM_HASENTRY);
9381
9382 if (flags)
9b485d32 9383 fprintf (file, _("<Unrecognised flag bits set>"));
9a5aca8c 9384
252b5132
RH		 9385 fputc ('\n', file);
9386
b34976b6 9387 return TRUE;
252b5132
RH		 9388}
9389
9390static int
57e8b36a 9391elf32_arm_get_symbol_type (Elf_Internal_Sym * elf_sym, int type)
252b5132 9392{
2f0ca46a
NC		 9393 switch (ELF_ST_TYPE (elf_sym->st_info))
9394 {
9395 case STT_ARM_TFUNC:
9396 return ELF_ST_TYPE (elf_sym->st_info);
ce855c42 9397
2f0ca46a
NC		 9398 case STT_ARM_16BIT:
9399 /* If the symbol is not an object, return the STT_ARM_16BIT flag.
9400 This allows us to distinguish between data used by Thumb instructions
9401 and non-data (which is probably code) inside Thumb regions of an
9402 executable. */
1a0eb693 9403 if (type != STT_OBJECT && type != STT_TLS)
2f0ca46a
NC		 9404 return ELF_ST_TYPE (elf_sym->st_info);
9405 break;
9a5aca8c 9406
ce855c42
NC		 9407 default:
9408 break;
2f0ca46a
NC		 9409 }
9410
9411 return type;
252b5132 9412}
f21f3fe0 9413
252b5132 9414static asection *
07adf181
AM		 9415elf32_arm_gc_mark_hook (asection *sec,
9416 struct bfd_link_info *info,
9417 Elf_Internal_Rela *rel,
9418 struct elf_link_hash_entry *h,
9419 Elf_Internal_Sym *sym)
252b5132
RH		 9420{
9421 if (h != NULL)
07adf181 9422 switch (ELF32_R_TYPE (rel->r_info))
252b5132
RH		 9423 {
9424 case R_ARM_GNU_VTINHERIT:
9425 case R_ARM_GNU_VTENTRY:
07adf181
AM		 9426 return NULL;
9427 }
9ad5cbcf 9428
07adf181 9429 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
252b5132
RH		 9430}
9431
780a67af
NC		 9432/* Update the got entry reference counts for the section being removed. */
9433
b34976b6 9434static bfd_boolean
ba93b8ac
DJ		 9435elf32_arm_gc_sweep_hook (bfd * abfd,
9436 struct bfd_link_info * info,
9437 asection * sec,
9438 const Elf_Internal_Rela * relocs)
252b5132 9439{
5e681ec4
PB		 9440 Elf_Internal_Shdr *symtab_hdr;
9441 struct elf_link_hash_entry **sym_hashes;
9442 bfd_signed_vma *local_got_refcounts;
9443 const Elf_Internal_Rela *rel, *relend;
eb043451
PB		 9444 struct elf32_arm_link_hash_table * globals;
9445
7dda2462
TG		 9446 if (info->relocatable)
9447 return TRUE;
9448
eb043451 9449 globals = elf32_arm_hash_table (info);
5e681ec4
PB		 9450
9451 elf_section_data (sec)->local_dynrel = NULL;
9452
0ffa91dd 9453 symtab_hdr = & elf_symtab_hdr (abfd);
5e681ec4
PB		 9454 sym_hashes = elf_sym_hashes (abfd);
9455 local_got_refcounts = elf_local_got_refcounts (abfd);
9456
906e58ca 9457 check_use_blx (globals);
bd97cb95 9458
5e681ec4
PB		 9459 relend = relocs + sec->reloc_count;
9460 for (rel = relocs; rel < relend; rel++)
eb043451 9461 {
3eb128b2
AM		 9462 unsigned long r_symndx;
9463 struct elf_link_hash_entry *h = NULL;
eb043451 9464 int r_type;
5e681ec4 9465
3eb128b2
AM		 9466 r_symndx = ELF32_R_SYM (rel->r_info);
9467 if (r_symndx >= symtab_hdr->sh_info)
9468 {
9469 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
9470 while (h->root.type == bfd_link_hash_indirect
9471 || h->root.type == bfd_link_hash_warning)
9472 h = (struct elf_link_hash_entry *) h->root.u.i.link;
9473 }
9474
eb043451 9475 r_type = ELF32_R_TYPE (rel->r_info);
eb043451 9476 r_type = arm_real_reloc_type (globals, r_type);
eb043451
PB		 9477 switch (r_type)
9478 {
9479 case R_ARM_GOT32:
eb043451 9480 case R_ARM_GOT_PREL:
ba93b8ac
DJ		 9481 case R_ARM_TLS_GD32:
9482 case R_ARM_TLS_IE32:
3eb128b2 9483 if (h != NULL)
eb043451 9484 {
eb043451
PB		 9485 if (h->got.refcount > 0)
9486 h->got.refcount -= 1;
9487 }
9488 else if (local_got_refcounts != NULL)
9489 {
9490 if (local_got_refcounts[r_symndx] > 0)
9491 local_got_refcounts[r_symndx] -= 1;
9492 }
9493 break;
9494
ba93b8ac
DJ		 9495 case R_ARM_TLS_LDM32:
9496 elf32_arm_hash_table (info)->tls_ldm_got.refcount -= 1;
9497 break;
9498
eb043451 9499 case R_ARM_ABS32:
bb224fc3 9500 case R_ARM_ABS32_NOI:
eb043451 9501 case R_ARM_REL32:
bb224fc3 9502 case R_ARM_REL32_NOI:
eb043451
PB		 9503 case R_ARM_PC24:
9504 case R_ARM_PLT32:
5b5bb741
PB		 9505 case R_ARM_CALL:
9506 case R_ARM_JUMP24:
eb043451 9507 case R_ARM_PREL31:
c19d1205 9508 case R_ARM_THM_CALL:
bd97cb95
DJ		 9509 case R_ARM_THM_JUMP24:
9510 case R_ARM_THM_JUMP19:
b6895b4f
PB		 9511 case R_ARM_MOVW_ABS_NC:
9512 case R_ARM_MOVT_ABS:
9513 case R_ARM_MOVW_PREL_NC:
9514 case R_ARM_MOVT_PREL:
9515 case R_ARM_THM_MOVW_ABS_NC:
9516 case R_ARM_THM_MOVT_ABS:
9517 case R_ARM_THM_MOVW_PREL_NC:
9518 case R_ARM_THM_MOVT_PREL:
b7693d02
DJ		 9519 /* Should the interworking branches be here also? */
9520
3eb128b2 9521 if (h != NULL)
eb043451
PB		 9522 {
9523 struct elf32_arm_link_hash_entry *eh;
9524 struct elf32_arm_relocs_copied **pp;
9525 struct elf32_arm_relocs_copied *p;
5e681ec4 9526
b7693d02 9527 eh = (struct elf32_arm_link_hash_entry *) h;
5e681ec4 9528
eb043451 9529 if (h->plt.refcount > 0)
b7693d02
DJ		 9530 {
9531 h->plt.refcount -= 1;
bd97cb95
DJ		 9532 if (r_type == R_ARM_THM_CALL)
9533 eh->plt_maybe_thumb_refcount--;
9534
9535 if (r_type == R_ARM_THM_JUMP24
9536 || r_type == R_ARM_THM_JUMP19)
b7693d02
DJ		 9537 eh->plt_thumb_refcount--;
9538 }
5e681ec4 9539
eb043451 9540 if (r_type == R_ARM_ABS32
bb224fc3
MS		 9541 || r_type == R_ARM_REL32
9542 || r_type == R_ARM_ABS32_NOI
9543 || r_type == R_ARM_REL32_NOI)
eb043451 9544 {
eb043451
PB		 9545 for (pp = &eh->relocs_copied; (p = *pp) != NULL;
9546 pp = &p->next)
9547 if (p->section == sec)
9548 {
9549 p->count -= 1;
bb224fc3
MS		 9550 if (ELF32_R_TYPE (rel->r_info) == R_ARM_REL32
9551 || ELF32_R_TYPE (rel->r_info) == R_ARM_REL32_NOI)
ba93b8ac 9552 p->pc_count -= 1;
eb043451
PB		 9553 if (p->count == 0)
9554 *pp = p->next;
9555 break;
9556 }
9557 }
9558 }
9559 break;
5e681ec4 9560
eb043451
PB		 9561 default:
9562 break;
9563 }
9564 }
5e681ec4 9565
b34976b6 9566 return TRUE;
252b5132
RH		 9567}
9568
780a67af
NC		 9569/* Look through the relocs for a section during the first phase. */
9570
b34976b6 9571static bfd_boolean
57e8b36a
NC		 9572elf32_arm_check_relocs (bfd *abfd, struct bfd_link_info *info,
9573 asection *sec, const Elf_Internal_Rela *relocs)
252b5132 9574{
b34976b6
AM		 9575 Elf_Internal_Shdr *symtab_hdr;
9576 struct elf_link_hash_entry **sym_hashes;
b34976b6
AM		 9577 const Elf_Internal_Rela *rel;
9578 const Elf_Internal_Rela *rel_end;
9579 bfd *dynobj;
5e681ec4 9580 asection *sreloc;
b34976b6 9581 bfd_vma *local_got_offsets;
5e681ec4 9582 struct elf32_arm_link_hash_table *htab;
39623e12 9583 bfd_boolean needs_plt;
9a5aca8c 9584
1049f94e 9585 if (info->relocatable)
b34976b6 9586 return TRUE;
9a5aca8c 9587
0ffa91dd
NC		 9588 BFD_ASSERT (is_arm_elf (abfd));
9589
5e681ec4
PB		 9590 htab = elf32_arm_hash_table (info);
9591 sreloc = NULL;
9a5aca8c 9592
67687978
PB		 9593 /* Create dynamic sections for relocatable executables so that we can
9594 copy relocations. */
9595 if (htab->root.is_relocatable_executable
9596 && ! htab->root.dynamic_sections_created)
9597 {
9598 if (! _bfd_elf_link_create_dynamic_sections (abfd, info))
9599 return FALSE;
9600 }
9601
252b5132
RH		 9602 dynobj = elf_hash_table (info)->dynobj;
9603 local_got_offsets = elf_local_got_offsets (abfd);
f21f3fe0 9604
0ffa91dd 9605 symtab_hdr = & elf_symtab_hdr (abfd);
252b5132 9606 sym_hashes = elf_sym_hashes (abfd);
9b485d32 9607
252b5132
RH		 9608 rel_end = relocs + sec->reloc_count;
9609 for (rel = relocs; rel < rel_end; rel++)
9610 {
9611 struct elf_link_hash_entry *h;
b7693d02 9612 struct elf32_arm_link_hash_entry *eh;
252b5132 9613 unsigned long r_symndx;
eb043451 9614 int r_type;
9a5aca8c 9615
252b5132 9616 r_symndx = ELF32_R_SYM (rel->r_info);
eb043451 9617 r_type = ELF32_R_TYPE (rel->r_info);
eb043451 9618 r_type = arm_real_reloc_type (htab, r_type);
ba93b8ac
DJ		 9619
9620 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
9621 {
9622 (*_bfd_error_handler) (_("%B: bad symbol index: %d"), abfd,
9623 r_symndx);
9624 return FALSE;
9625 }
9626
252b5132
RH		 9627 if (r_symndx < symtab_hdr->sh_info)
9628 h = NULL;
9629 else
973a3492
L		 9630 {
9631 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
9632 while (h->root.type == bfd_link_hash_indirect
9633 || h->root.type == bfd_link_hash_warning)
9634 h = (struct elf_link_hash_entry *) h->root.u.i.link;
9635 }
9a5aca8c 9636
b7693d02
DJ		 9637 eh = (struct elf32_arm_link_hash_entry *) h;
9638
eb043451 9639 switch (r_type)
252b5132 9640 {
5e681ec4 9641 case R_ARM_GOT32:
eb043451 9642 case R_ARM_GOT_PREL:
ba93b8ac
DJ		 9643 case R_ARM_TLS_GD32:
9644 case R_ARM_TLS_IE32:
5e681ec4 9645 /* This symbol requires a global offset table entry. */
ba93b8ac
DJ		 9646 {
9647 int tls_type, old_tls_type;
5e681ec4 9648
ba93b8ac
DJ		 9649 switch (r_type)
9650 {
9651 case R_ARM_TLS_GD32: tls_type = GOT_TLS_GD; break;
9652 case R_ARM_TLS_IE32: tls_type = GOT_TLS_IE; break;
9653 default: tls_type = GOT_NORMAL; break;
9654 }
252b5132 9655
ba93b8ac
DJ		 9656 if (h != NULL)
9657 {
9658 h->got.refcount++;
9659 old_tls_type = elf32_arm_hash_entry (h)->tls_type;
9660 }
9661 else
9662 {
9663 bfd_signed_vma *local_got_refcounts;
9664
9665 /* This is a global offset table entry for a local symbol. */
9666 local_got_refcounts = elf_local_got_refcounts (abfd);
9667 if (local_got_refcounts == NULL)
9668 {
9669 bfd_size_type size;
906e58ca 9670
ba93b8ac 9671 size = symtab_hdr->sh_info;
906e58ca 9672 size *= (sizeof (bfd_signed_vma) + sizeof (char));
ba93b8ac
DJ		 9673 local_got_refcounts = bfd_zalloc (abfd, size);
9674 if (local_got_refcounts == NULL)
9675 return FALSE;
9676 elf_local_got_refcounts (abfd) = local_got_refcounts;
9677 elf32_arm_local_got_tls_type (abfd)
9678 = (char *) (local_got_refcounts + symtab_hdr->sh_info);
9679 }
9680 local_got_refcounts[r_symndx] += 1;
9681 old_tls_type = elf32_arm_local_got_tls_type (abfd) [r_symndx];
9682 }
9683
9684 /* We will already have issued an error message if there is a
9685 TLS / non-TLS mismatch, based on the symbol type. We don't
9686 support any linker relaxations. So just combine any TLS
9687 types needed. */
9688 if (old_tls_type != GOT_UNKNOWN && old_tls_type != GOT_NORMAL
9689 && tls_type != GOT_NORMAL)
9690 tls_type |= old_tls_type;
9691
9692 if (old_tls_type != tls_type)
9693 {
9694 if (h != NULL)
9695 elf32_arm_hash_entry (h)->tls_type = tls_type;
9696 else
9697 elf32_arm_local_got_tls_type (abfd) [r_symndx] = tls_type;
9698 }
9699 }
8029a119 9700 /* Fall through. */
ba93b8ac
DJ		 9701
9702 case R_ARM_TLS_LDM32:
9703 if (r_type == R_ARM_TLS_LDM32)
9704 htab->tls_ldm_got.refcount++;
8029a119 9705 /* Fall through. */
252b5132 9706
c19d1205 9707 case R_ARM_GOTOFF32:
5e681ec4
PB		 9708 case R_ARM_GOTPC:
9709 if (htab->sgot == NULL)
9710 {
9711 if (htab->root.dynobj == NULL)
9712 htab->root.dynobj = abfd;
9713 if (!create_got_section (htab->root.dynobj, info))
9714 return FALSE;
9715 }
252b5132
RH		 9716 break;
9717
00a97672
RS		 9718 case R_ARM_ABS12:
9719 /* VxWorks uses dynamic R_ARM_ABS12 relocations for
9720 ldr __GOTT_INDEX__ offsets. */
9721 if (!htab->vxworks_p)
9722 break;
8029a119 9723 /* Fall through. */
00a97672 9724
252b5132 9725 case R_ARM_PC24:
7359ea65 9726 case R_ARM_PLT32:
5b5bb741
PB		 9727 case R_ARM_CALL:
9728 case R_ARM_JUMP24:
eb043451 9729 case R_ARM_PREL31:
c19d1205 9730 case R_ARM_THM_CALL:
bd97cb95
DJ		 9731 case R_ARM_THM_JUMP24:
9732 case R_ARM_THM_JUMP19:
39623e12
PB		 9733 needs_plt = 1;
9734 goto normal_reloc;
9735
9736 case R_ARM_ABS32:
9737 case R_ARM_ABS32_NOI:
9738 case R_ARM_REL32:
9739 case R_ARM_REL32_NOI:
b6895b4f
PB		 9740 case R_ARM_MOVW_ABS_NC:
9741 case R_ARM_MOVT_ABS:
9742 case R_ARM_MOVW_PREL_NC:
9743 case R_ARM_MOVT_PREL:
9744 case R_ARM_THM_MOVW_ABS_NC:
9745 case R_ARM_THM_MOVT_ABS:
9746 case R_ARM_THM_MOVW_PREL_NC:
9747 case R_ARM_THM_MOVT_PREL:
39623e12
PB		 9748 needs_plt = 0;
9749 normal_reloc:
9750
b7693d02 9751 /* Should the interworking branches be listed here? */
7359ea65 9752 if (h != NULL)
5e681ec4
PB		 9753 {
9754 /* If this reloc is in a read-only section, we might
9755 need a copy reloc. We can't check reliably at this
9756 stage whether the section is read-only, as input
9757 sections have not yet been mapped to output sections.
9758 Tentatively set the flag for now, and correct in
9759 adjust_dynamic_symbol. */
7359ea65 9760 if (!info->shared)
f5385ebf 9761 h->non_got_ref = 1;
7359ea65 9762
5e681ec4 9763 /* We may need a .plt entry if the function this reloc
c84cd8ee
DJ		 9764 refers to is in a different object. We can't tell for
9765 sure yet, because something later might force the
9766 symbol local. */
39623e12 9767 if (needs_plt)
f5385ebf 9768 h->needs_plt = 1;
4f199be3
DJ		 9769
9770 /* If we create a PLT entry, this relocation will reference
9771 it, even if it's an ABS32 relocation. */
9772 h->plt.refcount += 1;
b7693d02 9773
bd97cb95
DJ		 9774 /* It's too early to use htab->use_blx here, so we have to
9775 record possible blx references separately from
9776 relocs that definitely need a thumb stub. */
9777
c19d1205 9778 if (r_type == R_ARM_THM_CALL)
bd97cb95
DJ		 9779 eh->plt_maybe_thumb_refcount += 1;
9780
9781 if (r_type == R_ARM_THM_JUMP24
9782 || r_type == R_ARM_THM_JUMP19)
b7693d02 9783 eh->plt_thumb_refcount += 1;
5e681ec4
PB		 9784 }
9785
67687978
PB		 9786 /* If we are creating a shared library or relocatable executable,
9787 and this is a reloc against a global symbol, or a non PC
9788 relative reloc against a local symbol, then we need to copy
9789 the reloc into the shared library. However, if we are linking
9790 with -Bsymbolic, we do not need to copy a reloc against a
252b5132
RH		 9791 global symbol which is defined in an object we are
9792 including in the link (i.e., DEF_REGULAR is set). At
9793 this point we have not seen all the input files, so it is
9794 possible that DEF_REGULAR is not set now but will be set
9795 later (it is never cleared). We account for that
9796 possibility below by storing information in the
5e681ec4 9797 relocs_copied field of the hash table entry. */
67687978 9798 if ((info->shared || htab->root.is_relocatable_executable)
5e681ec4 9799 && (sec->flags & SEC_ALLOC) != 0
bb224fc3 9800 && ((r_type == R_ARM_ABS32 || r_type == R_ARM_ABS32_NOI)
71a976dd
DJ		 9801 || (h != NULL && ! h->needs_plt
9802 && (! info->symbolic || ! h->def_regular))))
252b5132 9803 {
5e681ec4
PB		 9804 struct elf32_arm_relocs_copied *p, **head;
9805
252b5132
RH		 9806 /* When creating a shared object, we must copy these
9807 reloc types into the output file. We create a reloc
9808 section in dynobj and make room for this reloc. */
83bac4b0 9809 if (sreloc == NULL)
252b5132 9810 {
83bac4b0
NC		 9811 sreloc = _bfd_elf_make_dynamic_reloc_section
9812 (sec, dynobj, 2, abfd, ! htab->use_rel);
252b5132 9813
83bac4b0 9814 if (sreloc == NULL)
b34976b6 9815 return FALSE;
252b5132 9816
83bac4b0
NC		 9817 /* BPABI objects never have dynamic relocations mapped. */
9818 if (! htab->symbian_p)
252b5132 9819 {
83bac4b0 9820 flagword flags;
5e681ec4 9821
83bac4b0 9822 flags = bfd_get_section_flags (dynobj, sreloc);
528aeb62 9823 flags |= (SEC_LOAD | SEC_ALLOC);
83bac4b0
NC		 9824 bfd_set_section_flags (dynobj, sreloc, flags);
9825 }
252b5132
RH		 9826 }
9827
5e681ec4
PB		 9828 /* If this is a global symbol, we count the number of
9829 relocations we need for this symbol. */
9830 if (h != NULL)
252b5132 9831 {
5e681ec4
PB		 9832 head = &((struct elf32_arm_link_hash_entry *) h)->relocs_copied;
9833 }
9834 else
9835 {
9836 /* Track dynamic relocs needed for local syms too.
9837 We really need local syms available to do this
9838 easily. Oh well. */
57e8b36a 9839
5e681ec4 9840 asection *s;
6edfbbad
DJ		 9841 void *vpp;
9842
5e681ec4
PB		 9843 s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
9844 sec, r_symndx);
9845 if (s == NULL)
9846 return FALSE;
57e8b36a 9847
6edfbbad
DJ		 9848 vpp = &elf_section_data (s)->local_dynrel;
9849 head = (struct elf32_arm_relocs_copied **) vpp;
5e681ec4 9850 }
57e8b36a 9851
5e681ec4
PB		 9852 p = *head;
9853 if (p == NULL || p->section != sec)
9854 {
9855 bfd_size_type amt = sizeof *p;
57e8b36a 9856
5e681ec4 9857 p = bfd_alloc (htab->root.dynobj, amt);
252b5132 9858 if (p == NULL)
5e681ec4
PB		 9859 return FALSE;
9860 p->next = *head;
9861 *head = p;
9862 p->section = sec;
9863 p->count = 0;
ba93b8ac 9864 p->pc_count = 0;
252b5132 9865 }
57e8b36a 9866
bb224fc3 9867 if (r_type == R_ARM_REL32 || r_type == R_ARM_REL32_NOI)
ba93b8ac 9868 p->pc_count += 1;
71a976dd 9869 p->count += 1;
252b5132
RH		 9870 }
9871 break;
9872
9873 /* This relocation describes the C++ object vtable hierarchy.
9874 Reconstruct it for later use during GC. */
9875 case R_ARM_GNU_VTINHERIT:
c152c796 9876 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
b34976b6 9877 return FALSE;
252b5132 9878 break;
9a5aca8c 9879
252b5132
RH		 9880 /* This relocation describes which C++ vtable entries are actually
9881 used. Record for later use during GC. */
9882 case R_ARM_GNU_VTENTRY:
d17e0c6e
JB		 9883 BFD_ASSERT (h != NULL);
9884 if (h != NULL
9885 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_offset))
b34976b6 9886 return FALSE;
252b5132
RH		 9887 break;
9888 }
9889 }
f21f3fe0 9890
b34976b6 9891 return TRUE;
252b5132
RH		 9892}
9893
6a5bb875
PB		 9894/* Unwinding tables are not referenced directly. This pass marks them as
9895 required if the corresponding code section is marked. */
9896
9897static bfd_boolean
906e58ca
NC		 9898elf32_arm_gc_mark_extra_sections (struct bfd_link_info *info,
9899 elf_gc_mark_hook_fn gc_mark_hook)
6a5bb875
PB		 9900{
9901 bfd *sub;
9902 Elf_Internal_Shdr **elf_shdrp;
9903 bfd_boolean again;
9904
9905 /* Marking EH data may cause additional code sections to be marked,
9906 requiring multiple passes. */
9907 again = TRUE;
9908 while (again)
9909 {
9910 again = FALSE;
9911 for (sub = info->input_bfds; sub != NULL; sub = sub->link_next)
9912 {
9913 asection *o;
9914
0ffa91dd 9915 if (! is_arm_elf (sub))
6a5bb875
PB		 9916 continue;
9917
9918 elf_shdrp = elf_elfsections (sub);
9919 for (o = sub->sections; o != NULL; o = o->next)
9920 {
9921 Elf_Internal_Shdr *hdr;
0ffa91dd 9922
6a5bb875 9923 hdr = &elf_section_data (o)->this_hdr;
4fbb74a6
AM		 9924 if (hdr->sh_type == SHT_ARM_EXIDX
9925 && hdr->sh_link
9926 && hdr->sh_link < elf_numsections (sub)
6a5bb875
PB		 9927 && !o->gc_mark
9928 && elf_shdrp[hdr->sh_link]->bfd_section->gc_mark)
9929 {
9930 again = TRUE;
9931 if (!_bfd_elf_gc_mark (info, o, gc_mark_hook))
9932 return FALSE;
9933 }
9934 }
9935 }
9936 }
9937
9938 return TRUE;
9939}
9940
3c9458e9
NC		 9941/* Treat mapping symbols as special target symbols. */
9942
9943static bfd_boolean
9944elf32_arm_is_target_special_symbol (bfd * abfd ATTRIBUTE_UNUSED, asymbol * sym)
9945{
b0796911
PB		 9946 return bfd_is_arm_special_symbol_name (sym->name,
9947 BFD_ARM_SPECIAL_SYM_TYPE_ANY);
3c9458e9
NC		 9948}
9949
0367ecfb
NC		 9950/* This is a copy of elf_find_function() from elf.c except that
9951 ARM mapping symbols are ignored when looking for function names
9952 and STT_ARM_TFUNC is considered to a function type. */
252b5132 9953
0367ecfb
NC		 9954static bfd_boolean
9955arm_elf_find_function (bfd * abfd ATTRIBUTE_UNUSED,
9956 asection * section,
9957 asymbol ** symbols,
9958 bfd_vma offset,
9959 const char ** filename_ptr,
9960 const char ** functionname_ptr)
9961{
9962 const char * filename = NULL;
9963 asymbol * func = NULL;
9964 bfd_vma low_func = 0;
9965 asymbol ** p;
252b5132
RH		 9966
9967 for (p = symbols; *p != NULL; p++)
9968 {
9969 elf_symbol_type *q;
9970
9971 q = (elf_symbol_type *) *p;
9972
252b5132
RH		 9973 switch (ELF_ST_TYPE (q->internal_elf_sym.st_info))
9974 {
9975 default:
9976 break;
9977 case STT_FILE:
9978 filename = bfd_asymbol_name (&q->symbol);
9979 break;
252b5132
RH		 9980 case STT_FUNC:
9981 case STT_ARM_TFUNC:
9d2da7ca 9982 case STT_NOTYPE:
b0796911 9983 /* Skip mapping symbols. */
0367ecfb 9984 if ((q->symbol.flags & BSF_LOCAL)
b0796911
PB		 9985 && bfd_is_arm_special_symbol_name (q->symbol.name,
9986 BFD_ARM_SPECIAL_SYM_TYPE_ANY))
0367ecfb
NC		 9987 continue;
9988 /* Fall through. */
6b40fcba 9989 if (bfd_get_section (&q->symbol) == section
252b5132
RH		 9990 && q->symbol.value >= low_func
9991 && q->symbol.value <= offset)
9992 {
9993 func = (asymbol *) q;
9994 low_func = q->symbol.value;
9995 }
9996 break;
9997 }
9998 }
9999
10000 if (func == NULL)
b34976b6 10001 return FALSE;
252b5132 10002
0367ecfb
NC		 10003 if (filename_ptr)
10004 *filename_ptr = filename;
10005 if (functionname_ptr)
10006 *functionname_ptr = bfd_asymbol_name (func);
10007
10008 return TRUE;
906e58ca 10009}
0367ecfb
NC		 10010
10011
10012/* Find the nearest line to a particular section and offset, for error
10013 reporting. This code is a duplicate of the code in elf.c, except
10014 that it uses arm_elf_find_function. */
10015
10016static bfd_boolean
10017elf32_arm_find_nearest_line (bfd * abfd,
10018 asection * section,
10019 asymbol ** symbols,
10020 bfd_vma offset,
10021 const char ** filename_ptr,
10022 const char ** functionname_ptr,
10023 unsigned int * line_ptr)
10024{
10025 bfd_boolean found = FALSE;
10026
10027 /* We skip _bfd_dwarf1_find_nearest_line since no known ARM toolchain uses it. */
10028
10029 if (_bfd_dwarf2_find_nearest_line (abfd, section, symbols, offset,
10030 filename_ptr, functionname_ptr,
10031 line_ptr, 0,
10032 & elf_tdata (abfd)->dwarf2_find_line_info))
10033 {
10034 if (!*functionname_ptr)
10035 arm_elf_find_function (abfd, section, symbols, offset,
10036 *filename_ptr ? NULL : filename_ptr,
10037 functionname_ptr);
f21f3fe0 10038
0367ecfb
NC		 10039 return TRUE;
10040 }
10041
10042 if (! _bfd_stab_section_find_nearest_line (abfd, symbols, section, offset,
10043 & found, filename_ptr,
10044 functionname_ptr, line_ptr,
10045 & elf_tdata (abfd)->line_info))
10046 return FALSE;
10047
10048 if (found && (*functionname_ptr || *line_ptr))
10049 return TRUE;
10050
10051 if (symbols == NULL)
10052 return FALSE;
10053
10054 if (! arm_elf_find_function (abfd, section, symbols, offset,
10055 filename_ptr, functionname_ptr))
10056 return FALSE;
10057
10058 *line_ptr = 0;
b34976b6 10059 return TRUE;
252b5132
RH		 10060}
10061
4ab527b0
FF		 10062static bfd_boolean
10063elf32_arm_find_inliner_info (bfd * abfd,
10064 const char ** filename_ptr,
10065 const char ** functionname_ptr,
10066 unsigned int * line_ptr)
10067{
10068 bfd_boolean found;
10069 found = _bfd_dwarf2_find_inliner_info (abfd, filename_ptr,
10070 functionname_ptr, line_ptr,
10071 & elf_tdata (abfd)->dwarf2_find_line_info);
10072 return found;
10073}
10074
252b5132
RH		 10075/* Adjust a symbol defined by a dynamic object and referenced by a
10076 regular object. The current definition is in some section of the
10077 dynamic object, but we're not including those sections. We have to
10078 change the definition to something the rest of the link can
10079 understand. */
10080
b34976b6 10081static bfd_boolean
57e8b36a
NC		 10082elf32_arm_adjust_dynamic_symbol (struct bfd_link_info * info,
10083 struct elf_link_hash_entry * h)
252b5132
RH		 10084{
10085 bfd * dynobj;
10086 asection * s;
b7693d02 10087 struct elf32_arm_link_hash_entry * eh;
67687978 10088 struct elf32_arm_link_hash_table *globals;
252b5132 10089
67687978 10090 globals = elf32_arm_hash_table (info);
252b5132
RH		 10091 dynobj = elf_hash_table (info)->dynobj;
10092
10093 /* Make sure we know what is going on here. */
10094 BFD_ASSERT (dynobj != NULL
f5385ebf 10095 && (h->needs_plt
f6e332e6 10096 || h->u.weakdef != NULL
f5385ebf
AM		 10097 || (h->def_dynamic
10098 && h->ref_regular
10099 && !h->def_regular)));
252b5132 10100
b7693d02
DJ		 10101 eh = (struct elf32_arm_link_hash_entry *) h;
10102
252b5132
RH		 10103 /* If this is a function, put it in the procedure linkage table. We
10104 will fill in the contents of the procedure linkage table later,
10105 when we know the address of the .got section. */
0f88be7a 10106 if (h->type == STT_FUNC || h->type == STT_ARM_TFUNC
f5385ebf 10107 || h->needs_plt)
252b5132 10108 {
5e681ec4
PB		 10109 if (h->plt.refcount <= 0
10110 || SYMBOL_CALLS_LOCAL (info, h)
10111 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
10112 && h->root.type == bfd_link_hash_undefweak))
252b5132
RH		 10113 {
10114 /* This case can occur if we saw a PLT32 reloc in an input
5e681ec4
PB		 10115 file, but the symbol was never referred to by a dynamic
10116 object, or if all references were garbage collected. In
10117 such a case, we don't actually need to build a procedure
10118 linkage table, and we can just do a PC24 reloc instead. */
10119 h->plt.offset = (bfd_vma) -1;
b7693d02 10120 eh->plt_thumb_refcount = 0;
bd97cb95 10121 eh->plt_maybe_thumb_refcount = 0;
f5385ebf 10122 h->needs_plt = 0;
252b5132
RH		 10123 }
10124
b34976b6 10125 return TRUE;
252b5132 10126 }
5e681ec4 10127 else
b7693d02
DJ		 10128 {
10129 /* It's possible that we incorrectly decided a .plt reloc was
10130 needed for an R_ARM_PC24 or similar reloc to a non-function sym
10131 in check_relocs. We can't decide accurately between function
10132 and non-function syms in check-relocs; Objects loaded later in
10133 the link may change h->type. So fix it now. */
10134 h->plt.offset = (bfd_vma) -1;
10135 eh->plt_thumb_refcount = 0;
bd97cb95 10136 eh->plt_maybe_thumb_refcount = 0;
b7693d02 10137 }
252b5132
RH		 10138
10139 /* If this is a weak symbol, and there is a real definition, the
10140 processor independent code will have arranged for us to see the
10141 real definition first, and we can just use the same value. */
f6e332e6 10142 if (h->u.weakdef != NULL)
252b5132 10143 {
f6e332e6
AM		 10144 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
10145 || h->u.weakdef->root.type == bfd_link_hash_defweak);
10146 h->root.u.def.section = h->u.weakdef->root.u.def.section;
10147 h->root.u.def.value = h->u.weakdef->root.u.def.value;
b34976b6 10148 return TRUE;
252b5132
RH		 10149 }
10150
ba93b8ac
DJ		 10151 /* If there are no non-GOT references, we do not need a copy
10152 relocation. */
10153 if (!h->non_got_ref)
10154 return TRUE;
10155
252b5132
RH		 10156 /* This is a reference to a symbol defined by a dynamic object which
10157 is not a function. */
10158
10159 /* If we are creating a shared library, we must presume that the
10160 only references to the symbol are via the global offset table.
10161 For such cases we need not do anything here; the relocations will
67687978
PB		 10162 be handled correctly by relocate_section. Relocatable executables
10163 can reference data in shared objects directly, so we don't need to
10164 do anything here. */
10165 if (info->shared || globals->root.is_relocatable_executable)
b34976b6 10166 return TRUE;
252b5132 10167
909272ee
AM		 10168 if (h->size == 0)
10169 {
10170 (*_bfd_error_handler) (_("dynamic variable `%s' is zero size"),
10171 h->root.root.string);
10172 return TRUE;
10173 }
10174
252b5132
RH		 10175 /* We must allocate the symbol in our .dynbss section, which will
10176 become part of the .bss section of the executable. There will be
10177 an entry for this symbol in the .dynsym section. The dynamic
10178 object will contain position independent code, so all references
10179 from the dynamic object to this symbol will go through the global
10180 offset table. The dynamic linker will use the .dynsym entry to
10181 determine the address it must put in the global offset table, so
10182 both the dynamic object and the regular object will refer to the
10183 same memory location for the variable. */
252b5132
RH		 10184 s = bfd_get_section_by_name (dynobj, ".dynbss");
10185 BFD_ASSERT (s != NULL);
10186
10187 /* We must generate a R_ARM_COPY reloc to tell the dynamic linker to
10188 copy the initial value out of the dynamic object and into the
10189 runtime process image. We need to remember the offset into the
00a97672 10190 .rel(a).bss section we are going to use. */
252b5132
RH		 10191 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
10192 {
10193 asection *srel;
10194
00a97672 10195 srel = bfd_get_section_by_name (dynobj, RELOC_SECTION (globals, ".bss"));
252b5132 10196 BFD_ASSERT (srel != NULL);
00a97672 10197 srel->size += RELOC_SIZE (globals);
f5385ebf 10198 h->needs_copy = 1;
252b5132
RH		 10199 }
10200
027297b7 10201 return _bfd_elf_adjust_dynamic_copy (h, s);
252b5132
RH		 10202}
10203
5e681ec4
PB		 10204/* Allocate space in .plt, .got and associated reloc sections for
10205 dynamic relocs. */
10206
10207static bfd_boolean
57e8b36a 10208allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
5e681ec4
PB		 10209{
10210 struct bfd_link_info *info;
10211 struct elf32_arm_link_hash_table *htab;
10212 struct elf32_arm_link_hash_entry *eh;
10213 struct elf32_arm_relocs_copied *p;
bd97cb95 10214 bfd_signed_vma thumb_refs;
5e681ec4 10215
b7693d02
DJ		 10216 eh = (struct elf32_arm_link_hash_entry *) h;
10217
5e681ec4
PB		 10218 if (h->root.type == bfd_link_hash_indirect)
10219 return TRUE;
10220
10221 if (h->root.type == bfd_link_hash_warning)
10222 /* When warning symbols are created, they **replace** the "real"
10223 entry in the hash table, thus we never get to see the real
10224 symbol in a hash traversal. So look at it now. */
10225 h = (struct elf_link_hash_entry *) h->root.u.i.link;
10226
10227 info = (struct bfd_link_info *) inf;
10228 htab = elf32_arm_hash_table (info);
10229
10230 if (htab->root.dynamic_sections_created
10231 && h->plt.refcount > 0)
10232 {
10233 /* Make sure this symbol is output as a dynamic symbol.
10234 Undefined weak syms won't yet be marked as dynamic. */
10235 if (h->dynindx == -1
f5385ebf 10236 && !h->forced_local)
5e681ec4 10237 {
c152c796 10238 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5e681ec4
PB		 10239 return FALSE;
10240 }
10241
10242 if (info->shared
7359ea65 10243 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
5e681ec4
PB		 10244 {
10245 asection *s = htab->splt;
10246
10247 /* If this is the first .plt entry, make room for the special
10248 first entry. */
eea6121a 10249 if (s->size == 0)
e5a52504 10250 s->size += htab->plt_header_size;
5e681ec4 10251
eea6121a 10252 h->plt.offset = s->size;
5e681ec4 10253
b7693d02
DJ		 10254 /* If we will insert a Thumb trampoline before this PLT, leave room
10255 for it. */
bd97cb95
DJ		 10256 thumb_refs = eh->plt_thumb_refcount;
10257 if (!htab->use_blx)
10258 thumb_refs += eh->plt_maybe_thumb_refcount;
10259
10260 if (thumb_refs > 0)
b7693d02
DJ		 10261 {
10262 h->plt.offset += PLT_THUMB_STUB_SIZE;
10263 s->size += PLT_THUMB_STUB_SIZE;
10264 }
10265
5e681ec4
PB		 10266 /* If this symbol is not defined in a regular file, and we are
10267 not generating a shared library, then set the symbol to this
10268 location in the .plt. This is required to make function
10269 pointers compare as equal between the normal executable and
10270 the shared library. */
10271 if (! info->shared
f5385ebf 10272 && !h->def_regular)
5e681ec4
PB		 10273 {
10274 h->root.u.def.section = s;
10275 h->root.u.def.value = h->plt.offset;
b7693d02
DJ		 10276
10277 /* Make sure the function is not marked as Thumb, in case
10278 it is the target of an ABS32 relocation, which will
10279 point to the PLT entry. */
10280 if (ELF_ST_TYPE (h->type) == STT_ARM_TFUNC)
10281 h->type = ELF_ST_INFO (ELF_ST_BIND (h->type), STT_FUNC);
5e681ec4
PB		 10282 }
10283
10284 /* Make room for this entry. */
e5a52504 10285 s->size += htab->plt_entry_size;
5e681ec4 10286
e5a52504 10287 if (!htab->symbian_p)
b7693d02
DJ		 10288 {
10289 /* We also need to make an entry in the .got.plt section, which
10290 will be placed in the .got section by the linker script. */
10291 eh->plt_got_offset = htab->sgotplt->size;
10292 htab->sgotplt->size += 4;
10293 }
5e681ec4 10294
00a97672
RS		 10295 /* We also need to make an entry in the .rel(a).plt section. */
10296 htab->srelplt->size += RELOC_SIZE (htab);
10297
10298 /* VxWorks executables have a second set of relocations for
10299 each PLT entry. They go in a separate relocation section,
10300 which is processed by the kernel loader. */
10301 if (htab->vxworks_p && !info->shared)
10302 {
10303 /* There is a relocation for the initial PLT entry:
10304 an R_ARM_32 relocation for _GLOBAL_OFFSET_TABLE_. */
10305 if (h->plt.offset == htab->plt_header_size)
10306 htab->srelplt2->size += RELOC_SIZE (htab);
10307
10308 /* There are two extra relocations for each subsequent
10309 PLT entry: an R_ARM_32 relocation for the GOT entry,
10310 and an R_ARM_32 relocation for the PLT entry. */
10311 htab->srelplt2->size += RELOC_SIZE (htab) * 2;
10312 }
5e681ec4
PB		 10313 }
10314 else
10315 {
10316 h->plt.offset = (bfd_vma) -1;
f5385ebf 10317 h->needs_plt = 0;
5e681ec4
PB		 10318 }
10319 }
10320 else
10321 {
10322 h->plt.offset = (bfd_vma) -1;
f5385ebf 10323 h->needs_plt = 0;
5e681ec4
PB		 10324 }
10325
10326 if (h->got.refcount > 0)
10327 {
10328 asection *s;
10329 bfd_boolean dyn;
ba93b8ac
DJ		 10330 int tls_type = elf32_arm_hash_entry (h)->tls_type;
10331 int indx;
5e681ec4
PB		 10332
10333 /* Make sure this symbol is output as a dynamic symbol.
10334 Undefined weak syms won't yet be marked as dynamic. */
10335 if (h->dynindx == -1
f5385ebf 10336 && !h->forced_local)
5e681ec4 10337 {
c152c796 10338 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5e681ec4
PB		 10339 return FALSE;
10340 }
10341
e5a52504
MM		 10342 if (!htab->symbian_p)
10343 {
10344 s = htab->sgot;
10345 h->got.offset = s->size;
ba93b8ac
DJ		 10346
10347 if (tls_type == GOT_UNKNOWN)
10348 abort ();
10349
10350 if (tls_type == GOT_NORMAL)
10351 /* Non-TLS symbols need one GOT slot. */
10352 s->size += 4;
10353 else
10354 {
10355 if (tls_type & GOT_TLS_GD)
10356 /* R_ARM_TLS_GD32 needs 2 consecutive GOT slots. */
10357 s->size += 8;
10358 if (tls_type & GOT_TLS_IE)
10359 /* R_ARM_TLS_IE32 needs one GOT slot. */
10360 s->size += 4;
10361 }
10362
e5a52504 10363 dyn = htab->root.dynamic_sections_created;
ba93b8ac
DJ		 10364
10365 indx = 0;
10366 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
10367 && (!info->shared
10368 || !SYMBOL_REFERENCES_LOCAL (info, h)))
10369 indx = h->dynindx;
10370
10371 if (tls_type != GOT_NORMAL
10372 && (info->shared || indx != 0)
10373 && (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
10374 || h->root.type != bfd_link_hash_undefweak))
10375 {
10376 if (tls_type & GOT_TLS_IE)
00a97672 10377 htab->srelgot->size += RELOC_SIZE (htab);
ba93b8ac
DJ		 10378
10379 if (tls_type & GOT_TLS_GD)
00a97672 10380 htab->srelgot->size += RELOC_SIZE (htab);
ba93b8ac
DJ		 10381
10382 if ((tls_type & GOT_TLS_GD) && indx != 0)
00a97672 10383 htab->srelgot->size += RELOC_SIZE (htab);
ba93b8ac
DJ		 10384 }
10385 else if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
10386 || h->root.type != bfd_link_hash_undefweak)
10387 && (info->shared
10388 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
00a97672 10389 htab->srelgot->size += RELOC_SIZE (htab);
e5a52504 10390 }
5e681ec4
PB		 10391 }
10392 else
10393 h->got.offset = (bfd_vma) -1;
10394
a4fd1a8e
PB		 10395 /* Allocate stubs for exported Thumb functions on v4t. */
10396 if (!htab->use_blx && h->dynindx != -1
0eaedd0e 10397 && h->def_regular
a4fd1a8e
PB		 10398 && ELF_ST_TYPE (h->type) == STT_ARM_TFUNC
10399 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
10400 {
10401 struct elf_link_hash_entry * th;
10402 struct bfd_link_hash_entry * bh;
10403 struct elf_link_hash_entry * myh;
10404 char name[1024];
10405 asection *s;
10406 bh = NULL;
10407 /* Create a new symbol to regist the real location of the function. */
10408 s = h->root.u.def.section;
906e58ca 10409 sprintf (name, "__real_%s", h->root.root.string);
a4fd1a8e
PB		 10410 _bfd_generic_link_add_one_symbol (info, s->owner,
10411 name, BSF_GLOBAL, s,
10412 h->root.u.def.value,
10413 NULL, TRUE, FALSE, &bh);
10414
10415 myh = (struct elf_link_hash_entry *) bh;
10416 myh->type = ELF_ST_INFO (STB_LOCAL, STT_ARM_TFUNC);
10417 myh->forced_local = 1;
10418 eh->export_glue = myh;
10419 th = record_arm_to_thumb_glue (info, h);
10420 /* Point the symbol at the stub. */
10421 h->type = ELF_ST_INFO (ELF_ST_BIND (h->type), STT_FUNC);
10422 h->root.u.def.section = th->root.u.def.section;
10423 h->root.u.def.value = th->root.u.def.value & ~1;
10424 }
10425
5e681ec4
PB		 10426 if (eh->relocs_copied == NULL)
10427 return TRUE;
10428
10429 /* In the shared -Bsymbolic case, discard space allocated for
10430 dynamic pc-relative relocs against symbols which turn out to be
10431 defined in regular objects. For the normal shared case, discard
10432 space for pc-relative relocs that have become local due to symbol
10433 visibility changes. */
10434
67687978 10435 if (info->shared || htab->root.is_relocatable_executable)
5e681ec4 10436 {
7bdca076 10437 /* The only relocs that use pc_count are R_ARM_REL32 and
bb224fc3
MS		 10438 R_ARM_REL32_NOI, which will appear on something like
10439 ".long foo - .". We want calls to protected symbols to resolve
10440 directly to the function rather than going via the plt. If people
10441 want function pointer comparisons to work as expected then they
10442 should avoid writing assembly like ".long foo - .". */
ba93b8ac
DJ		 10443 if (SYMBOL_CALLS_LOCAL (info, h))
10444 {
10445 struct elf32_arm_relocs_copied **pp;
10446
10447 for (pp = &eh->relocs_copied; (p = *pp) != NULL; )
10448 {
10449 p->count -= p->pc_count;
10450 p->pc_count = 0;
10451 if (p->count == 0)
10452 *pp = p->next;
10453 else
10454 pp = &p->next;
10455 }
10456 }
10457
3348747a
NS		 10458 if (elf32_arm_hash_table (info)->vxworks_p)
10459 {
10460 struct elf32_arm_relocs_copied **pp;
10461
10462 for (pp = &eh->relocs_copied; (p = *pp) != NULL; )
10463 {
10464 if (strcmp (p->section->output_section->name, ".tls_vars") == 0)
10465 *pp = p->next;
10466 else
10467 pp = &p->next;
10468 }
10469 }
10470
ba93b8ac 10471 /* Also discard relocs on undefined weak syms with non-default
7359ea65 10472 visibility. */
22d606e9 10473 if (eh->relocs_copied != NULL
5e681ec4 10474 && h->root.type == bfd_link_hash_undefweak)
22d606e9
AM		 10475 {
10476 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
10477 eh->relocs_copied = NULL;
10478
10479 /* Make sure undefined weak symbols are output as a dynamic
10480 symbol in PIEs. */
10481 else if (h->dynindx == -1
10482 && !h->forced_local)
10483 {
10484 if (! bfd_elf_link_record_dynamic_symbol (info, h))
10485 return FALSE;
10486 }
10487 }
10488
67687978
PB		 10489 else if (htab->root.is_relocatable_executable && h->dynindx == -1
10490 && h->root.type == bfd_link_hash_new)
10491 {
10492 /* Output absolute symbols so that we can create relocations
10493 against them. For normal symbols we output a relocation
10494 against the section that contains them. */
10495 if (! bfd_elf_link_record_dynamic_symbol (info, h))
10496 return FALSE;
10497 }
10498
5e681ec4
PB		 10499 }
10500 else
10501 {
10502 /* For the non-shared case, discard space for relocs against
10503 symbols which turn out to need copy relocs or are not
10504 dynamic. */
10505
f5385ebf
AM		 10506 if (!h->non_got_ref
10507 && ((h->def_dynamic
10508 && !h->def_regular)
5e681ec4
PB		 10509 || (htab->root.dynamic_sections_created
10510 && (h->root.type == bfd_link_hash_undefweak
10511 || h->root.type == bfd_link_hash_undefined))))
10512 {
10513 /* Make sure this symbol is output as a dynamic symbol.
10514 Undefined weak syms won't yet be marked as dynamic. */
10515 if (h->dynindx == -1
f5385ebf 10516 && !h->forced_local)
5e681ec4 10517 {
c152c796 10518 if (! bfd_elf_link_record_dynamic_symbol (info, h))
5e681ec4
PB		 10519 return FALSE;
10520 }
10521
10522 /* If that succeeded, we know we'll be keeping all the
10523 relocs. */
10524 if (h->dynindx != -1)
10525 goto keep;
10526 }
10527
10528 eh->relocs_copied = NULL;
10529
10530 keep: ;
10531 }
10532
10533 /* Finally, allocate space. */
10534 for (p = eh->relocs_copied; p != NULL; p = p->next)
10535 {
10536 asection *sreloc = elf_section_data (p->section)->sreloc;
00a97672 10537 sreloc->size += p->count * RELOC_SIZE (htab);
5e681ec4
PB		 10538 }
10539
10540 return TRUE;
10541}
10542
08d1f311
DJ		 10543/* Find any dynamic relocs that apply to read-only sections. */
10544
10545static bfd_boolean
8029a119 10546elf32_arm_readonly_dynrelocs (struct elf_link_hash_entry * h, void * inf)
08d1f311 10547{
8029a119
NC		 10548 struct elf32_arm_link_hash_entry * eh;
10549 struct elf32_arm_relocs_copied * p;
08d1f311
DJ		 10550
10551 if (h->root.type == bfd_link_hash_warning)
10552 h = (struct elf_link_hash_entry *) h->root.u.i.link;
10553
10554 eh = (struct elf32_arm_link_hash_entry *) h;
10555 for (p = eh->relocs_copied; p != NULL; p = p->next)
10556 {
10557 asection *s = p->section;
10558
10559 if (s != NULL && (s->flags & SEC_READONLY) != 0)
10560 {
10561 struct bfd_link_info *info = (struct bfd_link_info *) inf;
10562
10563 info->flags |= DF_TEXTREL;
10564
10565 /* Not an error, just cut short the traversal. */
10566 return FALSE;
10567 }
10568 }
10569 return TRUE;
10570}
10571
d504ffc8
DJ		 10572void
10573bfd_elf32_arm_set_byteswap_code (struct bfd_link_info *info,
10574 int byteswap_code)
10575{
10576 struct elf32_arm_link_hash_table *globals;
10577
10578 globals = elf32_arm_hash_table (info);
10579 globals->byteswap_code = byteswap_code;
10580}
10581
252b5132
RH		 10582/* Set the sizes of the dynamic sections. */
10583
b34976b6 10584static bfd_boolean
57e8b36a
NC		 10585elf32_arm_size_dynamic_sections (bfd * output_bfd ATTRIBUTE_UNUSED,
10586 struct bfd_link_info * info)
252b5132
RH		 10587{
10588 bfd * dynobj;
10589 asection * s;
b34976b6
AM		 10590 bfd_boolean plt;
10591 bfd_boolean relocs;
5e681ec4
PB		 10592 bfd *ibfd;
10593 struct elf32_arm_link_hash_table *htab;
252b5132 10594
5e681ec4 10595 htab = elf32_arm_hash_table (info);
252b5132
RH		 10596 dynobj = elf_hash_table (info)->dynobj;
10597 BFD_ASSERT (dynobj != NULL);
39b41c9c 10598 check_use_blx (htab);
252b5132
RH		 10599
10600 if (elf_hash_table (info)->dynamic_sections_created)
10601 {
10602 /* Set the contents of the .interp section to the interpreter. */
893c4fe2 10603 if (info->executable)
252b5132
RH		 10604 {
10605 s = bfd_get_section_by_name (dynobj, ".interp");
10606 BFD_ASSERT (s != NULL);
eea6121a 10607 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
252b5132
RH		 10608 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
10609 }
10610 }
5e681ec4
PB		 10611
10612 /* Set up .got offsets for local syms, and space for local dynamic
10613 relocs. */
10614 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
252b5132 10615 {
5e681ec4
PB		 10616 bfd_signed_vma *local_got;
10617 bfd_signed_vma *end_local_got;
10618 char *local_tls_type;
10619 bfd_size_type locsymcount;
10620 Elf_Internal_Shdr *symtab_hdr;
10621 asection *srel;
3348747a 10622 bfd_boolean is_vxworks = elf32_arm_hash_table (info)->vxworks_p;
5e681ec4 10623
0ffa91dd 10624 if (! is_arm_elf (ibfd))
5e681ec4
PB		 10625 continue;
10626
10627 for (s = ibfd->sections; s != NULL; s = s->next)
10628 {
10629 struct elf32_arm_relocs_copied *p;
10630
6edfbbad 10631 for (p = elf_section_data (s)->local_dynrel; p != NULL; p = p->next)
5e681ec4
PB		 10632 {
10633 if (!bfd_is_abs_section (p->section)
10634 && bfd_is_abs_section (p->section->output_section))
10635 {
10636 /* Input section has been discarded, either because
10637 it is a copy of a linkonce section or due to
10638 linker script /DISCARD/, so we'll be discarding
10639 the relocs too. */
10640 }
3348747a
NS		 10641 else if (is_vxworks
10642 && strcmp (p->section->output_section->name,
10643 ".tls_vars") == 0)
10644 {
10645 /* Relocations in vxworks .tls_vars sections are
10646 handled specially by the loader. */
10647 }
5e681ec4
PB		 10648 else if (p->count != 0)
10649 {
10650 srel = elf_section_data (p->section)->sreloc;
00a97672 10651 srel->size += p->count * RELOC_SIZE (htab);
5e681ec4
PB		 10652 if ((p->section->output_section->flags & SEC_READONLY) != 0)
10653 info->flags |= DF_TEXTREL;
10654 }
10655 }
10656 }
10657
10658 local_got = elf_local_got_refcounts (ibfd);
10659 if (!local_got)
10660 continue;
10661
0ffa91dd 10662 symtab_hdr = & elf_symtab_hdr (ibfd);
5e681ec4
PB		 10663 locsymcount = symtab_hdr->sh_info;
10664 end_local_got = local_got + locsymcount;
ba93b8ac 10665 local_tls_type = elf32_arm_local_got_tls_type (ibfd);
5e681ec4
PB		 10666 s = htab->sgot;
10667 srel = htab->srelgot;
10668 for (; local_got < end_local_got; ++local_got, ++local_tls_type)
10669 {
10670 if (*local_got > 0)
10671 {
eea6121a 10672 *local_got = s->size;
ba93b8ac
DJ		 10673 if (*local_tls_type & GOT_TLS_GD)
10674 /* TLS_GD relocs need an 8-byte structure in the GOT. */
10675 s->size += 8;
10676 if (*local_tls_type & GOT_TLS_IE)
10677 s->size += 4;
10678 if (*local_tls_type == GOT_NORMAL)
10679 s->size += 4;
10680
10681 if (info->shared || *local_tls_type == GOT_TLS_GD)
00a97672 10682 srel->size += RELOC_SIZE (htab);
5e681ec4
PB		 10683 }
10684 else
10685 *local_got = (bfd_vma) -1;
10686 }
252b5132
RH		 10687 }
10688
ba93b8ac
DJ		 10689 if (htab->tls_ldm_got.refcount > 0)
10690 {
10691 /* Allocate two GOT entries and one dynamic relocation (if necessary)
10692 for R_ARM_TLS_LDM32 relocations. */
10693 htab->tls_ldm_got.offset = htab->sgot->size;
10694 htab->sgot->size += 8;
10695 if (info->shared)
00a97672 10696 htab->srelgot->size += RELOC_SIZE (htab);
ba93b8ac
DJ		 10697 }
10698 else
10699 htab->tls_ldm_got.offset = -1;
10700
5e681ec4
PB		 10701 /* Allocate global sym .plt and .got entries, and space for global
10702 sym dynamic relocs. */
57e8b36a 10703 elf_link_hash_traverse (& htab->root, allocate_dynrelocs, info);
252b5132 10704
d504ffc8
DJ		 10705 /* Here we rummage through the found bfds to collect glue information. */
10706 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
c7b8f16e 10707 {
0ffa91dd 10708 if (! is_arm_elf (ibfd))
e44a2c9c
AM		 10709 continue;
10710
c7b8f16e
JB		 10711 /* Initialise mapping tables for code/data. */
10712 bfd_elf32_arm_init_maps (ibfd);
906e58ca 10713
c7b8f16e
JB		 10714 if (!bfd_elf32_arm_process_before_allocation (ibfd, info)
10715 || !bfd_elf32_arm_vfp11_erratum_scan (ibfd, info))
10716 /* xgettext:c-format */
10717 _bfd_error_handler (_("Errors encountered processing file %s"),
10718 ibfd->filename);
10719 }
d504ffc8 10720
252b5132
RH		 10721 /* The check_relocs and adjust_dynamic_symbol entry points have
10722 determined the sizes of the various dynamic sections. Allocate
10723 memory for them. */
b34976b6
AM		 10724 plt = FALSE;
10725 relocs = FALSE;
252b5132
RH		 10726 for (s = dynobj->sections; s != NULL; s = s->next)
10727 {
10728 const char * name;
252b5132
RH		 10729
10730 if ((s->flags & SEC_LINKER_CREATED) == 0)
10731 continue;
10732
10733 /* It's OK to base decisions on the section name, because none
10734 of the dynobj section names depend upon the input files. */
10735 name = bfd_get_section_name (dynobj, s);
10736
24a1ba0f 10737 if (strcmp (name, ".plt") == 0)
252b5132 10738 {
c456f082
AM		 10739 /* Remember whether there is a PLT. */
10740 plt = s->size != 0;
252b5132 10741 }
0112cd26 10742 else if (CONST_STRNEQ (name, ".rel"))
252b5132 10743 {
c456f082 10744 if (s->size != 0)
252b5132 10745 {
252b5132 10746 /* Remember whether there are any reloc sections other
00a97672
RS		 10747 than .rel(a).plt and .rela.plt.unloaded. */
10748 if (s != htab->srelplt && s != htab->srelplt2)
b34976b6 10749 relocs = TRUE;
252b5132
RH		 10750
10751 /* We use the reloc_count field as a counter if we need
10752 to copy relocs into the output file. */
10753 s->reloc_count = 0;
10754 }
10755 }
0112cd26 10756 else if (! CONST_STRNEQ (name, ".got")
c456f082 10757 && strcmp (name, ".dynbss") != 0)
252b5132
RH		 10758 {
10759 /* It's not one of our sections, so don't allocate space. */
10760 continue;
10761 }
10762
c456f082 10763 if (s->size == 0)
252b5132 10764 {
c456f082 10765 /* If we don't need this section, strip it from the
00a97672
RS		 10766 output file. This is mostly to handle .rel(a).bss and
10767 .rel(a).plt. We must create both sections in
c456f082
AM		 10768 create_dynamic_sections, because they must be created
10769 before the linker maps input sections to output
10770 sections. The linker does that before
10771 adjust_dynamic_symbol is called, and it is that
10772 function which decides whether anything needs to go
10773 into these sections. */
8423293d 10774 s->flags |= SEC_EXCLUDE;
252b5132
RH		 10775 continue;
10776 }
10777
c456f082
AM		 10778 if ((s->flags & SEC_HAS_CONTENTS) == 0)
10779 continue;
10780
252b5132 10781 /* Allocate memory for the section contents. */
906e58ca 10782 s->contents = bfd_zalloc (dynobj, s->size);
c456f082 10783 if (s->contents == NULL)
b34976b6 10784 return FALSE;
252b5132
RH		 10785 }
10786
10787 if (elf_hash_table (info)->dynamic_sections_created)
10788 {
10789 /* Add some entries to the .dynamic section. We fill in the
10790 values later, in elf32_arm_finish_dynamic_sections, but we
10791 must add the entries now so that we get the correct size for
10792 the .dynamic section. The DT_DEBUG entry is filled in by the
10793 dynamic linker and used by the debugger. */
dc810e39 10794#define add_dynamic_entry(TAG, VAL) \
5a580b3a 10795 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
dc810e39 10796
8532796c 10797 if (info->executable)
252b5132 10798 {
dc810e39 10799 if (!add_dynamic_entry (DT_DEBUG, 0))
b34976b6 10800 return FALSE;
252b5132
RH		 10801 }
10802
10803 if (plt)
10804 {
dc810e39
AM		 10805 if ( !add_dynamic_entry (DT_PLTGOT, 0)
10806 || !add_dynamic_entry (DT_PLTRELSZ, 0)
00a97672
RS		 10807 || !add_dynamic_entry (DT_PLTREL,
10808 htab->use_rel ? DT_REL : DT_RELA)
dc810e39 10809 || !add_dynamic_entry (DT_JMPREL, 0))
b34976b6 10810 return FALSE;
252b5132
RH		 10811 }
10812
10813 if (relocs)
10814 {
00a97672
RS		 10815 if (htab->use_rel)
10816 {
10817 if (!add_dynamic_entry (DT_REL, 0)
10818 || !add_dynamic_entry (DT_RELSZ, 0)
10819 || !add_dynamic_entry (DT_RELENT, RELOC_SIZE (htab)))
10820 return FALSE;
10821 }
10822 else
10823 {
10824 if (!add_dynamic_entry (DT_RELA, 0)
10825 || !add_dynamic_entry (DT_RELASZ, 0)
10826 || !add_dynamic_entry (DT_RELAENT, RELOC_SIZE (htab)))
10827 return FALSE;
10828 }
252b5132
RH		 10829 }
10830
08d1f311
DJ		 10831 /* If any dynamic relocs apply to a read-only section,
10832 then we need a DT_TEXTREL entry. */
10833 if ((info->flags & DF_TEXTREL) == 0)
8029a119
NC		 10834 elf_link_hash_traverse (& htab->root, elf32_arm_readonly_dynrelocs,
10835 info);
08d1f311 10836
99e4ae17 10837 if ((info->flags & DF_TEXTREL) != 0)
252b5132 10838 {
dc810e39 10839 if (!add_dynamic_entry (DT_TEXTREL, 0))
b34976b6 10840 return FALSE;
252b5132 10841 }
7a2b07ff
NS		 10842 if (htab->vxworks_p
10843 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
10844 return FALSE;
252b5132 10845 }
8532796c 10846#undef add_dynamic_entry
252b5132 10847
b34976b6 10848 return TRUE;
252b5132
RH		 10849}
10850
252b5132
RH		 10851/* Finish up dynamic symbol handling. We set the contents of various
10852 dynamic sections here. */
10853
b34976b6 10854static bfd_boolean
906e58ca
NC		 10855elf32_arm_finish_dynamic_symbol (bfd * output_bfd,
10856 struct bfd_link_info * info,
10857 struct elf_link_hash_entry * h,
10858 Elf_Internal_Sym * sym)
252b5132
RH		 10859{
10860 bfd * dynobj;
e5a52504 10861 struct elf32_arm_link_hash_table *htab;
b7693d02 10862 struct elf32_arm_link_hash_entry *eh;
252b5132
RH		 10863
10864 dynobj = elf_hash_table (info)->dynobj;
e5a52504 10865 htab = elf32_arm_hash_table (info);
b7693d02 10866 eh = (struct elf32_arm_link_hash_entry *) h;
252b5132
RH		 10867
10868 if (h->plt.offset != (bfd_vma) -1)
10869 {
10870 asection * splt;
252b5132 10871 asection * srel;
e5a52504 10872 bfd_byte *loc;
24a1ba0f 10873 bfd_vma plt_index;
947216bf 10874 Elf_Internal_Rela rel;
252b5132
RH		 10875
10876 /* This symbol has an entry in the procedure linkage table. Set
10877 it up. */
10878
10879 BFD_ASSERT (h->dynindx != -1);
10880
10881 splt = bfd_get_section_by_name (dynobj, ".plt");
00a97672 10882 srel = bfd_get_section_by_name (dynobj, RELOC_SECTION (htab, ".plt"));
e5a52504 10883 BFD_ASSERT (splt != NULL && srel != NULL);
252b5132 10884
e5a52504
MM		 10885 /* Fill in the entry in the procedure linkage table. */
10886 if (htab->symbian_p)
10887 {
906e58ca 10888 put_arm_insn (htab, output_bfd,
52ab56c2
PB		 10889 elf32_arm_symbian_plt_entry[0],
10890 splt->contents + h->plt.offset);
906e58ca 10891 bfd_put_32 (output_bfd,
52ab56c2
PB		 10892 elf32_arm_symbian_plt_entry[1],
10893 splt->contents + h->plt.offset + 4);
906e58ca 10894
e5a52504 10895 /* Fill in the entry in the .rel.plt section. */
2a1b9a48
MM		 10896 rel.r_offset = (splt->output_section->vma
10897 + splt->output_offset
52ab56c2 10898 + h->plt.offset + 4);
e5a52504 10899 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARM_GLOB_DAT);
b7693d02
DJ		 10900
10901 /* Get the index in the procedure linkage table which
10902 corresponds to this symbol. This is the index of this symbol
10903 in all the symbols for which we are making plt entries. The
10904 first entry in the procedure linkage table is reserved. */
906e58ca 10905 plt_index = ((h->plt.offset - htab->plt_header_size)
b7693d02 10906 / htab->plt_entry_size);
e5a52504
MM		 10907 }
10908 else
10909 {
00a97672 10910 bfd_vma got_offset, got_address, plt_address;
e5a52504
MM		 10911 bfd_vma got_displacement;
10912 asection * sgot;
52ab56c2 10913 bfd_byte * ptr;
906e58ca 10914
e5a52504
MM		 10915 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
10916 BFD_ASSERT (sgot != NULL);
10917
b7693d02
DJ		 10918 /* Get the offset into the .got.plt table of the entry that
10919 corresponds to this function. */
10920 got_offset = eh->plt_got_offset;
10921
10922 /* Get the index in the procedure linkage table which
10923 corresponds to this symbol. This is the index of this symbol
10924 in all the symbols for which we are making plt entries. The
10925 first three entries in .got.plt are reserved; after that
10926 symbols appear in the same order as in .plt. */
10927 plt_index = (got_offset - 12) / 4;
e5a52504 10928
00a97672
RS		 10929 /* Calculate the address of the GOT entry. */
10930 got_address = (sgot->output_section->vma
10931 + sgot->output_offset
10932 + got_offset);
5e681ec4 10933
00a97672
RS		 10934 /* ...and the address of the PLT entry. */
10935 plt_address = (splt->output_section->vma
10936 + splt->output_offset
10937 + h->plt.offset);
5e681ec4 10938
52ab56c2 10939 ptr = htab->splt->contents + h->plt.offset;
00a97672
RS		 10940 if (htab->vxworks_p && info->shared)
10941 {
10942 unsigned int i;
10943 bfd_vma val;
10944
52ab56c2 10945 for (i = 0; i != htab->plt_entry_size / 4; i++, ptr += 4)
00a97672
RS		 10946 {
10947 val = elf32_arm_vxworks_shared_plt_entry[i];
10948 if (i == 2)
10949 val |= got_address - sgot->output_section->vma;
10950 if (i == 5)
10951 val |= plt_index * RELOC_SIZE (htab);
52ab56c2
PB		 10952 if (i == 2 || i == 5)
10953 bfd_put_32 (output_bfd, val, ptr);
10954 else
10955 put_arm_insn (htab, output_bfd, val, ptr);
00a97672
RS		 10956 }
10957 }
10958 else if (htab->vxworks_p)
b7693d02 10959 {
00a97672
RS		 10960 unsigned int i;
10961 bfd_vma val;
10962
d3753b85 10963 for (i = 0; i != htab->plt_entry_size / 4; i++, ptr += 4)
00a97672
RS		 10964 {
10965 val = elf32_arm_vxworks_exec_plt_entry[i];
10966 if (i == 2)
10967 val |= got_address;
10968 if (i == 4)
10969 val |= 0xffffff & -((h->plt.offset + i * 4 + 8) >> 2);
10970 if (i == 5)
10971 val |= plt_index * RELOC_SIZE (htab);
52ab56c2
PB		 10972 if (i == 2 || i == 5)
10973 bfd_put_32 (output_bfd, val, ptr);
10974 else
10975 put_arm_insn (htab, output_bfd, val, ptr);
00a97672
RS		 10976 }
10977
10978 loc = (htab->srelplt2->contents
10979 + (plt_index * 2 + 1) * RELOC_SIZE (htab));
10980
10981 /* Create the .rela.plt.unloaded R_ARM_ABS32 relocation
10982 referencing the GOT for this PLT entry. */
10983 rel.r_offset = plt_address + 8;
10984 rel.r_info = ELF32_R_INFO (htab->root.hgot->indx, R_ARM_ABS32);
10985 rel.r_addend = got_offset;
10986 SWAP_RELOC_OUT (htab) (output_bfd, &rel, loc);
10987 loc += RELOC_SIZE (htab);
10988
10989 /* Create the R_ARM_ABS32 relocation referencing the
10990 beginning of the PLT for this GOT entry. */
10991 rel.r_offset = got_address;
10992 rel.r_info = ELF32_R_INFO (htab->root.hplt->indx, R_ARM_ABS32);
10993 rel.r_addend = 0;
10994 SWAP_RELOC_OUT (htab) (output_bfd, &rel, loc);
b7693d02 10995 }
00a97672
RS		 10996 else
10997 {
bd97cb95 10998 bfd_signed_vma thumb_refs;
00a97672
RS		 10999 /* Calculate the displacement between the PLT slot and the
11000 entry in the GOT. The eight-byte offset accounts for the
11001 value produced by adding to pc in the first instruction
11002 of the PLT stub. */
11003 got_displacement = got_address - (plt_address + 8);
b7693d02 11004
00a97672
RS		 11005 BFD_ASSERT ((got_displacement & 0xf0000000) == 0);
11006
bd97cb95
DJ		 11007 thumb_refs = eh->plt_thumb_refcount;
11008 if (!htab->use_blx)
11009 thumb_refs += eh->plt_maybe_thumb_refcount;
11010
11011 if (thumb_refs > 0)
00a97672 11012 {
52ab56c2
PB		 11013 put_thumb_insn (htab, output_bfd,
11014 elf32_arm_plt_thumb_stub[0], ptr - 4);
11015 put_thumb_insn (htab, output_bfd,
11016 elf32_arm_plt_thumb_stub[1], ptr - 2);
00a97672
RS		 11017 }
11018
52ab56c2
PB		 11019 put_arm_insn (htab, output_bfd,
11020 elf32_arm_plt_entry[0]
11021 | ((got_displacement & 0x0ff00000) >> 20),
11022 ptr + 0);
11023 put_arm_insn (htab, output_bfd,
11024 elf32_arm_plt_entry[1]
11025 | ((got_displacement & 0x000ff000) >> 12),
11026 ptr+ 4);
11027 put_arm_insn (htab, output_bfd,
11028 elf32_arm_plt_entry[2]
11029 | (got_displacement & 0x00000fff),
11030 ptr + 8);
5e681ec4 11031#ifdef FOUR_WORD_PLT
52ab56c2 11032 bfd_put_32 (output_bfd, elf32_arm_plt_entry[3], ptr + 12);
5e681ec4 11033#endif
00a97672 11034 }
252b5132 11035
e5a52504
MM		 11036 /* Fill in the entry in the global offset table. */
11037 bfd_put_32 (output_bfd,
11038 (splt->output_section->vma
11039 + splt->output_offset),
11040 sgot->contents + got_offset);
906e58ca 11041
00a97672
RS		 11042 /* Fill in the entry in the .rel(a).plt section. */
11043 rel.r_addend = 0;
11044 rel.r_offset = got_address;
e5a52504
MM		 11045 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARM_JUMP_SLOT);
11046 }
57e8b36a 11047
00a97672
RS		 11048 loc = srel->contents + plt_index * RELOC_SIZE (htab);
11049 SWAP_RELOC_OUT (htab) (output_bfd, &rel, loc);
252b5132 11050
f5385ebf 11051 if (!h->def_regular)
252b5132
RH		 11052 {
11053 /* Mark the symbol as undefined, rather than as defined in
11054 the .plt section. Leave the value alone. */
11055 sym->st_shndx = SHN_UNDEF;
d982ba73
PB		 11056 /* If the symbol is weak, we do need to clear the value.
11057 Otherwise, the PLT entry would provide a definition for
11058 the symbol even if the symbol wasn't defined anywhere,
11059 and so the symbol would never be NULL. */
f5385ebf 11060 if (!h->ref_regular_nonweak)
d982ba73 11061 sym->st_value = 0;
252b5132
RH		 11062 }
11063 }
11064
ba93b8ac
DJ		 11065 if (h->got.offset != (bfd_vma) -1
11066 && (elf32_arm_hash_entry (h)->tls_type & GOT_TLS_GD) == 0
11067 && (elf32_arm_hash_entry (h)->tls_type & GOT_TLS_IE) == 0)
252b5132
RH		 11068 {
11069 asection * sgot;
11070 asection * srel;
947216bf
AM		 11071 Elf_Internal_Rela rel;
11072 bfd_byte *loc;
00a97672 11073 bfd_vma offset;
252b5132
RH		 11074
11075 /* This symbol has an entry in the global offset table. Set it
11076 up. */
252b5132 11077 sgot = bfd_get_section_by_name (dynobj, ".got");
00a97672 11078 srel = bfd_get_section_by_name (dynobj, RELOC_SECTION (htab, ".got"));
252b5132
RH		 11079 BFD_ASSERT (sgot != NULL && srel != NULL);
11080
00a97672
RS		 11081 offset = (h->got.offset & ~(bfd_vma) 1);
11082 rel.r_addend = 0;
252b5132
RH		 11083 rel.r_offset = (sgot->output_section->vma
11084 + sgot->output_offset
00a97672 11085 + offset);
252b5132 11086
5e681ec4
PB		 11087 /* If this is a static link, or it is a -Bsymbolic link and the
11088 symbol is defined locally or was forced to be local because
11089 of a version file, we just want to emit a RELATIVE reloc.
11090 The entry in the global offset table will already have been
11091 initialized in the relocate_section function. */
252b5132 11092 if (info->shared
5e681ec4
PB		 11093 && SYMBOL_REFERENCES_LOCAL (info, h))
11094 {
906e58ca 11095 BFD_ASSERT ((h->got.offset & 1) != 0);
5e681ec4 11096 rel.r_info = ELF32_R_INFO (0, R_ARM_RELATIVE);
00a97672
RS		 11097 if (!htab->use_rel)
11098 {
11099 rel.r_addend = bfd_get_32 (output_bfd, sgot->contents + offset);
11100 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + offset);
11101 }
5e681ec4 11102 }
252b5132
RH		 11103 else
11104 {
906e58ca 11105 BFD_ASSERT ((h->got.offset & 1) == 0);
00a97672 11106 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + offset);
252b5132
RH		 11107 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARM_GLOB_DAT);
11108 }
11109
00a97672
RS		 11110 loc = srel->contents + srel->reloc_count++ * RELOC_SIZE (htab);
11111 SWAP_RELOC_OUT (htab) (output_bfd, &rel, loc);
252b5132
RH		 11112 }
11113
f5385ebf 11114 if (h->needs_copy)
252b5132
RH		 11115 {
11116 asection * s;
947216bf
AM		 11117 Elf_Internal_Rela rel;
11118 bfd_byte *loc;
252b5132
RH		 11119
11120 /* This symbol needs a copy reloc. Set it up. */
252b5132
RH		 11121 BFD_ASSERT (h->dynindx != -1
11122 && (h->root.type == bfd_link_hash_defined
11123 || h->root.type == bfd_link_hash_defweak));
11124
11125 s = bfd_get_section_by_name (h->root.u.def.section->owner,
00a97672 11126 RELOC_SECTION (htab, ".bss"));
252b5132
RH		 11127 BFD_ASSERT (s != NULL);
11128
00a97672 11129 rel.r_addend = 0;
252b5132
RH		 11130 rel.r_offset = (h->root.u.def.value
11131 + h->root.u.def.section->output_section->vma
11132 + h->root.u.def.section->output_offset);
11133 rel.r_info = ELF32_R_INFO (h->dynindx, R_ARM_COPY);
00a97672
RS		 11134 loc = s->contents + s->reloc_count++ * RELOC_SIZE (htab);
11135 SWAP_RELOC_OUT (htab) (output_bfd, &rel, loc);
252b5132
RH		 11136 }
11137
00a97672
RS		 11138 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. On VxWorks,
11139 the _GLOBAL_OFFSET_TABLE_ symbol is not absolute: it is relative
11140 to the ".got" section. */
252b5132 11141 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
00a97672 11142 || (!htab->vxworks_p && h == htab->root.hgot))
252b5132
RH		 11143 sym->st_shndx = SHN_ABS;
11144
b34976b6 11145 return TRUE;
252b5132
RH		 11146}
11147
11148/* Finish up the dynamic sections. */
11149
b34976b6 11150static bfd_boolean
57e8b36a 11151elf32_arm_finish_dynamic_sections (bfd * output_bfd, struct bfd_link_info * info)
252b5132
RH		 11152{
11153 bfd * dynobj;
11154 asection * sgot;
11155 asection * sdyn;
11156
11157 dynobj = elf_hash_table (info)->dynobj;
11158
11159 sgot = bfd_get_section_by_name (dynobj, ".got.plt");
229fcec5 11160 BFD_ASSERT (elf32_arm_hash_table (info)->symbian_p || sgot != NULL);
252b5132
RH		 11161 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
11162
11163 if (elf_hash_table (info)->dynamic_sections_created)
11164 {
11165 asection *splt;
11166 Elf32_External_Dyn *dyncon, *dynconend;
229fcec5 11167 struct elf32_arm_link_hash_table *htab;
252b5132 11168
229fcec5 11169 htab = elf32_arm_hash_table (info);
252b5132 11170 splt = bfd_get_section_by_name (dynobj, ".plt");
24a1ba0f 11171 BFD_ASSERT (splt != NULL && sdyn != NULL);
252b5132
RH		 11172
11173 dyncon = (Elf32_External_Dyn *) sdyn->contents;
eea6121a 11174 dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
9b485d32 11175
252b5132
RH		 11176 for (; dyncon < dynconend; dyncon++)
11177 {
11178 Elf_Internal_Dyn dyn;
11179 const char * name;
11180 asection * s;
11181
11182 bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
11183
11184 switch (dyn.d_tag)
11185 {
229fcec5
MM		 11186 unsigned int type;
11187
252b5132 11188 default:
7a2b07ff
NS		 11189 if (htab->vxworks_p
11190 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
11191 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
252b5132
RH		 11192 break;
11193
229fcec5
MM		 11194 case DT_HASH:
11195 name = ".hash";
11196 goto get_vma_if_bpabi;
11197 case DT_STRTAB:
11198 name = ".dynstr";
11199 goto get_vma_if_bpabi;
11200 case DT_SYMTAB:
11201 name = ".dynsym";
11202 goto get_vma_if_bpabi;
c0042f5d
MM		 11203 case DT_VERSYM:
11204 name = ".gnu.version";
11205 goto get_vma_if_bpabi;
11206 case DT_VERDEF:
11207 name = ".gnu.version_d";
11208 goto get_vma_if_bpabi;
11209 case DT_VERNEED:
11210 name = ".gnu.version_r";
11211 goto get_vma_if_bpabi;
11212
252b5132
RH		 11213 case DT_PLTGOT:
11214 name = ".got";
11215 goto get_vma;
11216 case DT_JMPREL:
00a97672 11217 name = RELOC_SECTION (htab, ".plt");
252b5132
RH		 11218 get_vma:
11219 s = bfd_get_section_by_name (output_bfd, name);
11220 BFD_ASSERT (s != NULL);
229fcec5
MM		 11221 if (!htab->symbian_p)
11222 dyn.d_un.d_ptr = s->vma;
11223 else
11224 /* In the BPABI, tags in the PT_DYNAMIC section point
11225 at the file offset, not the memory address, for the
11226 convenience of the post linker. */
11227 dyn.d_un.d_ptr = s->filepos;
252b5132
RH		 11228 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
11229 break;
11230
229fcec5
MM		 11231 get_vma_if_bpabi:
11232 if (htab->symbian_p)
11233 goto get_vma;
11234 break;
11235
252b5132 11236 case DT_PLTRELSZ:
00a97672
RS		 11237 s = bfd_get_section_by_name (output_bfd,
11238 RELOC_SECTION (htab, ".plt"));
252b5132 11239 BFD_ASSERT (s != NULL);
eea6121a 11240 dyn.d_un.d_val = s->size;
252b5132
RH		 11241 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
11242 break;
906e58ca 11243
252b5132 11244 case DT_RELSZ:
00a97672 11245 case DT_RELASZ:
229fcec5
MM		 11246 if (!htab->symbian_p)
11247 {
11248 /* My reading of the SVR4 ABI indicates that the
11249 procedure linkage table relocs (DT_JMPREL) should be
11250 included in the overall relocs (DT_REL). This is
11251 what Solaris does. However, UnixWare can not handle
11252 that case. Therefore, we override the DT_RELSZ entry
11253 here to make it not include the JMPREL relocs. Since
00a97672 11254 the linker script arranges for .rel(a).plt to follow all
229fcec5
MM		 11255 other relocation sections, we don't have to worry
11256 about changing the DT_REL entry. */
00a97672
RS		 11257 s = bfd_get_section_by_name (output_bfd,
11258 RELOC_SECTION (htab, ".plt"));
229fcec5
MM		 11259 if (s != NULL)
11260 dyn.d_un.d_val -= s->size;
11261 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
11262 break;
11263 }
8029a119 11264 /* Fall through. */
229fcec5
MM		 11265
11266 case DT_REL:
11267 case DT_RELA:
229fcec5
MM		 11268 /* In the BPABI, the DT_REL tag must point at the file
11269 offset, not the VMA, of the first relocation
11270 section. So, we use code similar to that in
11271 elflink.c, but do not check for SHF_ALLOC on the
11272 relcoation section, since relocations sections are
11273 never allocated under the BPABI. The comments above
11274 about Unixware notwithstanding, we include all of the
11275 relocations here. */
11276 if (htab->symbian_p)
11277 {
11278 unsigned int i;
11279 type = ((dyn.d_tag == DT_REL || dyn.d_tag == DT_RELSZ)
11280 ? SHT_REL : SHT_RELA);
11281 dyn.d_un.d_val = 0;
11282 for (i = 1; i < elf_numsections (output_bfd); i++)
11283 {
906e58ca 11284 Elf_Internal_Shdr *hdr
229fcec5
MM		 11285 = elf_elfsections (output_bfd)[i];
11286 if (hdr->sh_type == type)
11287 {
906e58ca 11288 if (dyn.d_tag == DT_RELSZ
229fcec5
MM		 11289 || dyn.d_tag == DT_RELASZ)
11290 dyn.d_un.d_val += hdr->sh_size;
de52dba4
AM		 11291 else if ((ufile_ptr) hdr->sh_offset
11292 <= dyn.d_un.d_val - 1)
229fcec5
MM		 11293 dyn.d_un.d_val = hdr->sh_offset;
11294 }
11295 }
11296 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
11297 }
252b5132 11298 break;
88f7bcd5
NC		 11299
11300 /* Set the bottom bit of DT_INIT/FINI if the
11301 corresponding function is Thumb. */
11302 case DT_INIT:
11303 name = info->init_function;
11304 goto get_sym;
11305 case DT_FINI:
11306 name = info->fini_function;
11307 get_sym:
11308 /* If it wasn't set by elf_bfd_final_link
4cc11e76 11309 then there is nothing to adjust. */
88f7bcd5
NC		 11310 if (dyn.d_un.d_val != 0)
11311 {
11312 struct elf_link_hash_entry * eh;
11313
11314 eh = elf_link_hash_lookup (elf_hash_table (info), name,
b34976b6 11315 FALSE, FALSE, TRUE);
906e58ca 11316 if (eh != NULL
88f7bcd5
NC		 11317 && ELF_ST_TYPE (eh->type) == STT_ARM_TFUNC)
11318 {
11319 dyn.d_un.d_val |= 1;
b34976b6 11320 bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
88f7bcd5
NC		 11321 }
11322 }
11323 break;
252b5132
RH		 11324 }
11325 }
11326
24a1ba0f 11327 /* Fill in the first entry in the procedure linkage table. */
e5a52504 11328 if (splt->size > 0 && elf32_arm_hash_table (info)->plt_header_size)
f7a74f8c 11329 {
00a97672
RS		 11330 const bfd_vma *plt0_entry;
11331 bfd_vma got_address, plt_address, got_displacement;
11332
11333 /* Calculate the addresses of the GOT and PLT. */
11334 got_address = sgot->output_section->vma + sgot->output_offset;
11335 plt_address = splt->output_section->vma + splt->output_offset;
11336
11337 if (htab->vxworks_p)
11338 {
11339 /* The VxWorks GOT is relocated by the dynamic linker.
11340 Therefore, we must emit relocations rather than simply
11341 computing the values now. */
11342 Elf_Internal_Rela rel;
11343
11344 plt0_entry = elf32_arm_vxworks_exec_plt0_entry;
52ab56c2
PB		 11345 put_arm_insn (htab, output_bfd, plt0_entry[0],
11346 splt->contents + 0);
11347 put_arm_insn (htab, output_bfd, plt0_entry[1],
11348 splt->contents + 4);
11349 put_arm_insn (htab, output_bfd, plt0_entry[2],
11350 splt->contents + 8);
00a97672
RS		 11351 bfd_put_32 (output_bfd, got_address, splt->contents + 12);
11352
8029a119 11353 /* Generate a relocation for _GLOBAL_OFFSET_TABLE_. */
00a97672
RS		 11354 rel.r_offset = plt_address + 12;
11355 rel.r_info = ELF32_R_INFO (htab->root.hgot->indx, R_ARM_ABS32);
11356 rel.r_addend = 0;
11357 SWAP_RELOC_OUT (htab) (output_bfd, &rel,
11358 htab->srelplt2->contents);
11359 }
11360 else
11361 {
11362 got_displacement = got_address - (plt_address + 16);
11363
11364 plt0_entry = elf32_arm_plt0_entry;
52ab56c2
PB		 11365 put_arm_insn (htab, output_bfd, plt0_entry[0],
11366 splt->contents + 0);
11367 put_arm_insn (htab, output_bfd, plt0_entry[1],
11368 splt->contents + 4);
11369 put_arm_insn (htab, output_bfd, plt0_entry[2],
11370 splt->contents + 8);
11371 put_arm_insn (htab, output_bfd, plt0_entry[3],
11372 splt->contents + 12);
5e681ec4 11373
5e681ec4 11374#ifdef FOUR_WORD_PLT
00a97672
RS		 11375 /* The displacement value goes in the otherwise-unused
11376 last word of the second entry. */
11377 bfd_put_32 (output_bfd, got_displacement, splt->contents + 28);
5e681ec4 11378#else
00a97672 11379 bfd_put_32 (output_bfd, got_displacement, splt->contents + 16);
5e681ec4 11380#endif
00a97672 11381 }
f7a74f8c 11382 }
252b5132
RH		 11383
11384 /* UnixWare sets the entsize of .plt to 4, although that doesn't
11385 really seem like the right value. */
74541ad4
AM		 11386 if (splt->output_section->owner == output_bfd)
11387 elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
00a97672
RS		 11388
11389 if (htab->vxworks_p && !info->shared && htab->splt->size > 0)
11390 {
11391 /* Correct the .rel(a).plt.unloaded relocations. They will have
11392 incorrect symbol indexes. */
11393 int num_plts;
eed62c48 11394 unsigned char *p;
00a97672
RS		 11395
11396 num_plts = ((htab->splt->size - htab->plt_header_size)
11397 / htab->plt_entry_size);
11398 p = htab->srelplt2->contents + RELOC_SIZE (htab);
11399
11400 for (; num_plts; num_plts--)
11401 {
11402 Elf_Internal_Rela rel;
11403
11404 SWAP_RELOC_IN (htab) (output_bfd, p, &rel);
11405 rel.r_info = ELF32_R_INFO (htab->root.hgot->indx, R_ARM_ABS32);
11406 SWAP_RELOC_OUT (htab) (output_bfd, &rel, p);
11407 p += RELOC_SIZE (htab);
11408
11409 SWAP_RELOC_IN (htab) (output_bfd, p, &rel);
11410 rel.r_info = ELF32_R_INFO (htab->root.hplt->indx, R_ARM_ABS32);
11411 SWAP_RELOC_OUT (htab) (output_bfd, &rel, p);
11412 p += RELOC_SIZE (htab);
11413 }
11414 }
252b5132
RH		 11415 }
11416
11417 /* Fill in the first three entries in the global offset table. */
229fcec5 11418 if (sgot)
252b5132 11419 {
229fcec5
MM		 11420 if (sgot->size > 0)
11421 {
11422 if (sdyn == NULL)
11423 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
11424 else
11425 bfd_put_32 (output_bfd,
11426 sdyn->output_section->vma + sdyn->output_offset,
11427 sgot->contents);
11428 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
11429 bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
11430 }
252b5132 11431
229fcec5
MM		 11432 elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
11433 }
252b5132 11434
b34976b6 11435 return TRUE;
252b5132
RH		 11436}
11437
ba96a88f 11438static void
57e8b36a 11439elf32_arm_post_process_headers (bfd * abfd, struct bfd_link_info * link_info ATTRIBUTE_UNUSED)
ba96a88f 11440{
9b485d32 11441 Elf_Internal_Ehdr * i_ehdrp; /* ELF file header, internal form. */
e489d0ae 11442 struct elf32_arm_link_hash_table *globals;
ba96a88f
NC		 11443
11444 i_ehdrp = elf_elfheader (abfd);
11445
94a3258f
PB		 11446 if (EF_ARM_EABI_VERSION (i_ehdrp->e_flags) == EF_ARM_EABI_UNKNOWN)
11447 i_ehdrp->e_ident[EI_OSABI] = ELFOSABI_ARM;
11448 else
11449 i_ehdrp->e_ident[EI_OSABI] = 0;
ba96a88f 11450 i_ehdrp->e_ident[EI_ABIVERSION] = ARM_ELF_ABI_VERSION;
e489d0ae 11451
93204d3a
PB		 11452 if (link_info)
11453 {
11454 globals = elf32_arm_hash_table (link_info);
11455 if (globals->byteswap_code)
11456 i_ehdrp->e_flags |= EF_ARM_BE8;
11457 }
ba96a88f
NC		 11458}
11459
99e4ae17 11460static enum elf_reloc_type_class
57e8b36a 11461elf32_arm_reloc_type_class (const Elf_Internal_Rela *rela)
99e4ae17 11462{
f51e552e 11463 switch ((int) ELF32_R_TYPE (rela->r_info))
99e4ae17
AJ		 11464 {
11465 case R_ARM_RELATIVE:
11466 return reloc_class_relative;
11467 case R_ARM_JUMP_SLOT:
11468 return reloc_class_plt;
11469 case R_ARM_COPY:
11470 return reloc_class_copy;
11471 default:
11472 return reloc_class_normal;
11473 }
11474}
11475
e16bb312
NC		 11476/* Set the right machine number for an Arm ELF file. */
11477
11478static bfd_boolean
57e8b36a 11479elf32_arm_section_flags (flagword *flags, const Elf_Internal_Shdr *hdr)
e16bb312
NC		 11480{
11481 if (hdr->sh_type == SHT_NOTE)
11482 *flags |= SEC_LINK_ONCE | SEC_LINK_DUPLICATES_SAME_CONTENTS;
11483
11484 return TRUE;
11485}
11486
e489d0ae 11487static void
57e8b36a 11488elf32_arm_final_write_processing (bfd *abfd, bfd_boolean linker ATTRIBUTE_UNUSED)
e16bb312 11489{
5a6c6817 11490 bfd_arm_update_notes (abfd, ARM_NOTE_SECTION);
e16bb312
NC		 11491}
11492
40a18ebd
NC		 11493/* Return TRUE if this is an unwinding table entry. */
11494
11495static bfd_boolean
11496is_arm_elf_unwind_section_name (bfd * abfd ATTRIBUTE_UNUSED, const char * name)
11497{
0112cd26
NC		 11498 return (CONST_STRNEQ (name, ELF_STRING_ARM_unwind)
11499 || CONST_STRNEQ (name, ELF_STRING_ARM_unwind_once));
40a18ebd
NC		 11500}
11501
11502
11503/* Set the type and flags for an ARM section. We do this by
11504 the section name, which is a hack, but ought to work. */
11505
11506static bfd_boolean
11507elf32_arm_fake_sections (bfd * abfd, Elf_Internal_Shdr * hdr, asection * sec)
11508{
11509 const char * name;
11510
11511 name = bfd_get_section_name (abfd, sec);
11512
11513 if (is_arm_elf_unwind_section_name (abfd, name))
11514 {
11515 hdr->sh_type = SHT_ARM_EXIDX;
11516 hdr->sh_flags |= SHF_LINK_ORDER;
11517 }
11518 return TRUE;
11519}
11520
6dc132d9
L		 11521/* Handle an ARM specific section when reading an object file. This is
11522 called when bfd_section_from_shdr finds a section with an unknown
11523 type. */
40a18ebd
NC		 11524
11525static bfd_boolean
11526elf32_arm_section_from_shdr (bfd *abfd,
11527 Elf_Internal_Shdr * hdr,
6dc132d9
L		 11528 const char *name,
11529 int shindex)
40a18ebd
NC		 11530{
11531 /* There ought to be a place to keep ELF backend specific flags, but
11532 at the moment there isn't one. We just keep track of the
11533 sections by their name, instead. Fortunately, the ABI gives
11534 names for all the ARM specific sections, so we will probably get
11535 away with this. */
11536 switch (hdr->sh_type)
11537 {
11538 case SHT_ARM_EXIDX:
0951f019
RE		 11539 case SHT_ARM_PREEMPTMAP:
11540 case SHT_ARM_ATTRIBUTES:
40a18ebd
NC		 11541 break;
11542
11543 default:
11544 return FALSE;
11545 }
11546
6dc132d9 11547 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
40a18ebd
NC		 11548 return FALSE;
11549
11550 return TRUE;
11551}
e489d0ae 11552
8e3de13a
NC		 11553/* A structure used to record a list of sections, independently
11554 of the next and prev fields in the asection structure. */
11555typedef struct section_list
11556{
11557 asection * sec;
11558 struct section_list * next;
11559 struct section_list * prev;
11560}
11561section_list;
11562
11563/* Unfortunately we need to keep a list of sections for which
11564 an _arm_elf_section_data structure has been allocated. This
11565 is because it is possible for functions like elf32_arm_write_section
11566 to be called on a section which has had an elf_data_structure
11567 allocated for it (and so the used_by_bfd field is valid) but
11568 for which the ARM extended version of this structure - the
11569 _arm_elf_section_data structure - has not been allocated. */
11570static section_list * sections_with_arm_elf_section_data = NULL;
11571
11572static void
957c6e41 11573record_section_with_arm_elf_section_data (asection * sec)
8e3de13a
NC		 11574{
11575 struct section_list * entry;
11576
957c6e41 11577 entry = bfd_malloc (sizeof (* entry));
8e3de13a
NC		 11578 if (entry == NULL)
11579 return;
11580 entry->sec = sec;
11581 entry->next = sections_with_arm_elf_section_data;
11582 entry->prev = NULL;
11583 if (entry->next != NULL)
11584 entry->next->prev = entry;
11585 sections_with_arm_elf_section_data = entry;
11586}
11587
44444f50
NC		 11588static struct section_list *
11589find_arm_elf_section_entry (asection * sec)
8e3de13a
NC		 11590{
11591 struct section_list * entry;
bd4aae00 11592 static struct section_list * last_entry = NULL;
8e3de13a 11593
bd4aae00
NC		 11594 /* This is a short cut for the typical case where the sections are added
11595 to the sections_with_arm_elf_section_data list in forward order and
11596 then looked up here in backwards order. This makes a real difference
11597 to the ld-srec/sec64k.exp linker test. */
44444f50 11598 entry = sections_with_arm_elf_section_data;
bd4aae00
NC		 11599 if (last_entry != NULL)
11600 {
11601 if (last_entry->sec == sec)
44444f50
NC		 11602 entry = last_entry;
11603 else if (last_entry->next != NULL
11604 && last_entry->next->sec == sec)
11605 entry = last_entry->next;
bd4aae00 11606 }
44444f50
NC		 11607
11608 for (; entry; entry = entry->next)
8e3de13a 11609 if (entry->sec == sec)
44444f50 11610 break;
bd4aae00 11611
44444f50
NC		 11612 if (entry)
11613 /* Record the entry prior to this one - it is the entry we are most
11614 likely to want to locate next time. Also this way if we have been
11615 called from unrecord_section_with_arm_elf_section_data() we will not
11616 be caching a pointer that is about to be freed. */
11617 last_entry = entry->prev;
11618
11619 return entry;
11620}
11621
11622static _arm_elf_section_data *
11623get_arm_elf_section_data (asection * sec)
11624{
11625 struct section_list * entry;
11626
11627 entry = find_arm_elf_section_entry (sec);
11628
11629 if (entry)
11630 return elf32_arm_section_data (entry->sec);
11631 else
11632 return NULL;
8e3de13a
NC		 11633}
11634
11635static void
11636unrecord_section_with_arm_elf_section_data (asection * sec)
11637{
11638 struct section_list * entry;
11639
44444f50
NC		 11640 entry = find_arm_elf_section_entry (sec);
11641
11642 if (entry)
11643 {
11644 if (entry->prev != NULL)
11645 entry->prev->next = entry->next;
11646 if (entry->next != NULL)
11647 entry->next->prev = entry->prev;
11648 if (entry == sections_with_arm_elf_section_data)
11649 sections_with_arm_elf_section_data = entry->next;
11650 free (entry);
11651 }
8e3de13a
NC		 11652}
11653
e489d0ae 11654
4e617b1e
PB		 11655typedef struct
11656{
11657 void *finfo;
11658 struct bfd_link_info *info;
91a5743d
PB		 11659 asection *sec;
11660 int sec_shndx;
4e617b1e
PB		 11661 bfd_boolean (*func) (void *, const char *, Elf_Internal_Sym *,
11662 asection *, struct elf_link_hash_entry *);
11663} output_arch_syminfo;
11664
11665enum map_symbol_type
11666{
11667 ARM_MAP_ARM,
11668 ARM_MAP_THUMB,
11669 ARM_MAP_DATA
11670};
11671
11672
7413f23f 11673/* Output a single mapping symbol. */
4e617b1e
PB		 11674
11675static bfd_boolean
7413f23f
DJ		 11676elf32_arm_output_map_sym (output_arch_syminfo *osi,
11677 enum map_symbol_type type,
11678 bfd_vma offset)
4e617b1e
PB		 11679{
11680 static const char *names[3] = {"$a", "$t", "$d"};
11681 struct elf32_arm_link_hash_table *htab;
11682 Elf_Internal_Sym sym;
11683
11684 htab = elf32_arm_hash_table (osi->info);
91a5743d
PB		 11685 sym.st_value = osi->sec->output_section->vma
11686 + osi->sec->output_offset
11687 + offset;
4e617b1e
PB		 11688 sym.st_size = 0;
11689 sym.st_other = 0;
11690 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
91a5743d
PB		 11691 sym.st_shndx = osi->sec_shndx;
11692 if (!osi->func (osi->finfo, names[type], &sym, osi->sec, NULL))
4e617b1e
PB		 11693 return FALSE;
11694 return TRUE;
11695}
11696
11697
11698/* Output mapping symbols for PLT entries associated with H. */
11699
11700static bfd_boolean
11701elf32_arm_output_plt_map (struct elf_link_hash_entry *h, void *inf)
11702{
11703 output_arch_syminfo *osi = (output_arch_syminfo *) inf;
11704 struct elf32_arm_link_hash_table *htab;
11705 struct elf32_arm_link_hash_entry *eh;
11706 bfd_vma addr;
11707
11708 htab = elf32_arm_hash_table (osi->info);
11709
11710 if (h->root.type == bfd_link_hash_indirect)
11711 return TRUE;
11712
11713 if (h->root.type == bfd_link_hash_warning)
11714 /* When warning symbols are created, they **replace** the "real"
11715 entry in the hash table, thus we never get to see the real
11716 symbol in a hash traversal. So look at it now. */
11717 h = (struct elf_link_hash_entry *) h->root.u.i.link;
11718
11719 if (h->plt.offset == (bfd_vma) -1)
11720 return TRUE;
11721
11722 eh = (struct elf32_arm_link_hash_entry *) h;
11723 addr = h->plt.offset;
11724 if (htab->symbian_p)
11725 {
7413f23f 11726 if (!elf32_arm_output_map_sym (osi, ARM_MAP_ARM, addr))
4e617b1e 11727 return FALSE;
7413f23f 11728 if (!elf32_arm_output_map_sym (osi, ARM_MAP_DATA, addr + 4))
4e617b1e
PB		 11729 return FALSE;
11730 }
11731 else if (htab->vxworks_p)
11732 {
7413f23f 11733 if (!elf32_arm_output_map_sym (osi, ARM_MAP_ARM, addr))
4e617b1e 11734 return FALSE;
7413f23f 11735 if (!elf32_arm_output_map_sym (osi, ARM_MAP_DATA, addr + 8))
4e617b1e 11736 return FALSE;
7413f23f 11737 if (!elf32_arm_output_map_sym (osi, ARM_MAP_ARM, addr + 12))
4e617b1e 11738 return FALSE;
7413f23f 11739 if (!elf32_arm_output_map_sym (osi, ARM_MAP_DATA, addr + 20))
4e617b1e
PB		 11740 return FALSE;
11741 }
11742 else
11743 {
bd97cb95
DJ		 11744 bfd_signed_vma thumb_refs;
11745
11746 thumb_refs = eh->plt_thumb_refcount;
11747 if (!htab->use_blx)
11748 thumb_refs += eh->plt_maybe_thumb_refcount;
4e617b1e 11749
bd97cb95 11750 if (thumb_refs > 0)
4e617b1e 11751 {
7413f23f 11752 if (!elf32_arm_output_map_sym (osi, ARM_MAP_THUMB, addr - 4))
4e617b1e
PB		 11753 return FALSE;
11754 }
11755#ifdef FOUR_WORD_PLT
7413f23f 11756 if (!elf32_arm_output_map_sym (osi, ARM_MAP_ARM, addr))
4e617b1e 11757 return FALSE;
7413f23f 11758 if (!elf32_arm_output_map_sym (osi, ARM_MAP_DATA, addr + 12))
4e617b1e
PB		 11759 return FALSE;
11760#else
906e58ca 11761 /* A three-word PLT with no Thumb thunk contains only Arm code,
4e617b1e
PB		 11762 so only need to output a mapping symbol for the first PLT entry and
11763 entries with thumb thunks. */
bd97cb95 11764 if (thumb_refs > 0 || addr == 20)
4e617b1e 11765 {
7413f23f 11766 if (!elf32_arm_output_map_sym (osi, ARM_MAP_ARM, addr))
4e617b1e
PB		 11767 return FALSE;
11768 }
11769#endif
11770 }
11771
11772 return TRUE;
11773}
11774
7413f23f
DJ		 11775/* Output a single local symbol for a generated stub. */
11776
11777static bfd_boolean
11778elf32_arm_output_stub_sym (output_arch_syminfo *osi, const char *name,
11779 bfd_vma offset, bfd_vma size)
11780{
11781 struct elf32_arm_link_hash_table *htab;
11782 Elf_Internal_Sym sym;
11783
11784 htab = elf32_arm_hash_table (osi->info);
11785 sym.st_value = osi->sec->output_section->vma
11786 + osi->sec->output_offset
11787 + offset;
11788 sym.st_size = size;
11789 sym.st_other = 0;
11790 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
11791 sym.st_shndx = osi->sec_shndx;
11792 if (!osi->func (osi->finfo, name, &sym, osi->sec, NULL))
11793 return FALSE;
11794 return TRUE;
11795}
4e617b1e 11796
da5938a2 11797static bfd_boolean
8029a119
NC		 11798arm_map_one_stub (struct bfd_hash_entry * gen_entry,
11799 void * in_arg)
da5938a2
NC		 11800{
11801 struct elf32_arm_stub_hash_entry *stub_entry;
11802 struct bfd_link_info *info;
11803 struct elf32_arm_link_hash_table *htab;
11804 asection *stub_sec;
11805 bfd_vma addr;
7413f23f 11806 char *stub_name;
9a008db3 11807 output_arch_syminfo *osi;
461a49ca
DJ		 11808 const insn_sequence *template;
11809 enum stub_insn_type prev_type;
11810 int size;
11811 int i;
11812 enum map_symbol_type sym_type;
da5938a2
NC		 11813
11814 /* Massage our args to the form they really have. */
11815 stub_entry = (struct elf32_arm_stub_hash_entry *) gen_entry;
9a008db3 11816 osi = (output_arch_syminfo *) in_arg;
da5938a2 11817
da5938a2
NC		 11818 info = osi->info;
11819
11820 htab = elf32_arm_hash_table (info);
11821 stub_sec = stub_entry->stub_sec;
11822
11823 /* Ensure this stub is attached to the current section being
7413f23f 11824 processed. */
da5938a2
NC		 11825 if (stub_sec != osi->sec)
11826 return TRUE;
11827
7413f23f
DJ		 11828 addr = (bfd_vma) stub_entry->stub_offset;
11829 stub_name = stub_entry->output_name;
da5938a2 11830
461a49ca 11831 template = stub_entry->stub_template;
4e31c731 11832 switch (template[0].type)
7413f23f 11833 {
461a49ca
DJ		 11834 case ARM_TYPE:
11835 if (!elf32_arm_output_stub_sym (osi, stub_name, addr, stub_entry->stub_size))
da5938a2
NC		 11836 return FALSE;
11837 break;
461a49ca
DJ		 11838 case THUMB16_TYPE:
11839 if (!elf32_arm_output_stub_sym (osi, stub_name, addr | 1,
11840 stub_entry->stub_size))
da5938a2
NC		 11841 return FALSE;
11842 break;
11843 default:
11844 BFD_FAIL ();
4e31c731 11845 return FALSE;
7413f23f 11846 }
da5938a2 11847
461a49ca
DJ		 11848 prev_type = DATA_TYPE;
11849 size = 0;
11850 for (i = 0; i < stub_entry->stub_template_size; i++)
11851 {
4e31c731 11852 switch (template[i].type)
461a49ca
DJ		 11853 {
11854 case ARM_TYPE:
11855 sym_type = ARM_MAP_ARM;
11856 break;
11857
11858 case THUMB16_TYPE:
11859 sym_type = ARM_MAP_THUMB;
11860 break;
11861
11862 case DATA_TYPE:
11863 sym_type = ARM_MAP_DATA;
11864 break;
11865
11866 default:
11867 BFD_FAIL ();
4e31c731 11868 return FALSE;
461a49ca
DJ		 11869 }
11870
11871 if (template[i].type != prev_type)
11872 {
11873 prev_type = template[i].type;
11874 if (!elf32_arm_output_map_sym (osi, sym_type, addr + size))
11875 return FALSE;
11876 }
11877
4e31c731 11878 switch (template[i].type)
461a49ca
DJ		 11879 {
11880 case ARM_TYPE:
11881 size += 4;
11882 break;
11883
11884 case THUMB16_TYPE:
11885 size += 2;
11886 break;
11887
11888 case DATA_TYPE:
11889 size += 4;
11890 break;
11891
11892 default:
11893 BFD_FAIL ();
4e31c731 11894 return FALSE;
461a49ca
DJ		 11895 }
11896 }
11897
da5938a2
NC		 11898 return TRUE;
11899}
11900
91a5743d 11901/* Output mapping symbols for linker generated sections. */
4e617b1e
PB		 11902
11903static bfd_boolean
11904elf32_arm_output_arch_local_syms (bfd *output_bfd,
906e58ca
NC		 11905 struct bfd_link_info *info,
11906 void *finfo,
11907 bfd_boolean (*func) (void *, const char *,
11908 Elf_Internal_Sym *,
11909 asection *,
11910 struct elf_link_hash_entry *))
4e617b1e
PB		 11911{
11912 output_arch_syminfo osi;
11913 struct elf32_arm_link_hash_table *htab;
91a5743d
PB		 11914 bfd_vma offset;
11915 bfd_size_type size;
4e617b1e
PB		 11916
11917 htab = elf32_arm_hash_table (info);
906e58ca 11918 check_use_blx (htab);
91a5743d 11919
4e617b1e
PB		 11920 osi.finfo = finfo;
11921 osi.info = info;
11922 osi.func = func;
906e58ca 11923
91a5743d
PB		 11924 /* ARM->Thumb glue. */
11925 if (htab->arm_glue_size > 0)
11926 {
11927 osi.sec = bfd_get_section_by_name (htab->bfd_of_glue_owner,
11928 ARM2THUMB_GLUE_SECTION_NAME);
11929
11930 osi.sec_shndx = _bfd_elf_section_from_bfd_section
11931 (output_bfd, osi.sec->output_section);
11932 if (info->shared || htab->root.is_relocatable_executable
11933 || htab->pic_veneer)
11934 size = ARM2THUMB_PIC_GLUE_SIZE;
11935 else if (htab->use_blx)
11936 size = ARM2THUMB_V5_STATIC_GLUE_SIZE;
11937 else
11938 size = ARM2THUMB_STATIC_GLUE_SIZE;
4e617b1e 11939
91a5743d
PB		 11940 for (offset = 0; offset < htab->arm_glue_size; offset += size)
11941 {
7413f23f
DJ		 11942 elf32_arm_output_map_sym (&osi, ARM_MAP_ARM, offset);
11943 elf32_arm_output_map_sym (&osi, ARM_MAP_DATA, offset + size - 4);
91a5743d
PB		 11944 }
11945 }
11946
11947 /* Thumb->ARM glue. */
11948 if (htab->thumb_glue_size > 0)
11949 {
11950 osi.sec = bfd_get_section_by_name (htab->bfd_of_glue_owner,
11951 THUMB2ARM_GLUE_SECTION_NAME);
11952
11953 osi.sec_shndx = _bfd_elf_section_from_bfd_section
11954 (output_bfd, osi.sec->output_section);
11955 size = THUMB2ARM_GLUE_SIZE;
11956
11957 for (offset = 0; offset < htab->thumb_glue_size; offset += size)
11958 {
7413f23f
DJ		 11959 elf32_arm_output_map_sym (&osi, ARM_MAP_THUMB, offset);
11960 elf32_arm_output_map_sym (&osi, ARM_MAP_ARM, offset + 4);
91a5743d
PB		 11961 }
11962 }
11963
845b51d6
PB		 11964 /* ARMv4 BX veneers. */
11965 if (htab->bx_glue_size > 0)
11966 {
11967 osi.sec = bfd_get_section_by_name (htab->bfd_of_glue_owner,
11968 ARM_BX_GLUE_SECTION_NAME);
11969
11970 osi.sec_shndx = _bfd_elf_section_from_bfd_section
11971 (output_bfd, osi.sec->output_section);
11972
7413f23f 11973 elf32_arm_output_map_sym (&osi, ARM_MAP_ARM, 0);
845b51d6
PB		 11974 }
11975
8029a119
NC		 11976 /* Long calls stubs. */
11977 if (htab->stub_bfd && htab->stub_bfd->sections)
11978 {
da5938a2 11979 asection* stub_sec;
8029a119 11980
da5938a2
NC		 11981 for (stub_sec = htab->stub_bfd->sections;
11982 stub_sec != NULL;
8029a119
NC		 11983 stub_sec = stub_sec->next)
11984 {
11985 /* Ignore non-stub sections. */
11986 if (!strstr (stub_sec->name, STUB_SUFFIX))
11987 continue;
da5938a2 11988
8029a119 11989 osi.sec = stub_sec;
da5938a2 11990
8029a119
NC		 11991 osi.sec_shndx = _bfd_elf_section_from_bfd_section
11992 (output_bfd, osi.sec->output_section);
da5938a2 11993
8029a119
NC		 11994 bfd_hash_traverse (&htab->stub_hash_table, arm_map_one_stub, &osi);
11995 }
11996 }
da5938a2 11997
91a5743d
PB		 11998 /* Finally, output mapping symbols for the PLT. */
11999 if (!htab->splt || htab->splt->size == 0)
12000 return TRUE;
12001
12002 osi.sec_shndx = _bfd_elf_section_from_bfd_section (output_bfd,
8029a119 12003 htab->splt->output_section);
91a5743d 12004 osi.sec = htab->splt;
4e617b1e
PB		 12005 /* Output mapping symbols for the plt header. SymbianOS does not have a
12006 plt header. */
12007 if (htab->vxworks_p)
12008 {
12009 /* VxWorks shared libraries have no PLT header. */
12010 if (!info->shared)
12011 {
7413f23f 12012 if (!elf32_arm_output_map_sym (&osi, ARM_MAP_ARM, 0))
4e617b1e 12013 return FALSE;
7413f23f 12014 if (!elf32_arm_output_map_sym (&osi, ARM_MAP_DATA, 12))
4e617b1e
PB		 12015 return FALSE;
12016 }
12017 }
12018 else if (!htab->symbian_p)
12019 {
7413f23f 12020 if (!elf32_arm_output_map_sym (&osi, ARM_MAP_ARM, 0))
4e617b1e
PB		 12021 return FALSE;
12022#ifndef FOUR_WORD_PLT
7413f23f 12023 if (!elf32_arm_output_map_sym (&osi, ARM_MAP_DATA, 16))
4e617b1e
PB		 12024 return FALSE;
12025#endif
12026 }
12027
12028 elf_link_hash_traverse (&htab->root, elf32_arm_output_plt_map, (void *) &osi);
12029 return TRUE;
12030}
12031
e489d0ae
PB		 12032/* Allocate target specific section data. */
12033
12034static bfd_boolean
12035elf32_arm_new_section_hook (bfd *abfd, asection *sec)
12036{
f592407e
AM		 12037 if (!sec->used_by_bfd)
12038 {
12039 _arm_elf_section_data *sdata;
12040 bfd_size_type amt = sizeof (*sdata);
e489d0ae 12041
f592407e
AM		 12042 sdata = bfd_zalloc (abfd, amt);
12043 if (sdata == NULL)
12044 return FALSE;
12045 sec->used_by_bfd = sdata;
12046 }
e489d0ae 12047
957c6e41 12048 record_section_with_arm_elf_section_data (sec);
8e3de13a 12049
e489d0ae
PB		 12050 return _bfd_elf_new_section_hook (abfd, sec);
12051}
12052
12053
12054/* Used to order a list of mapping symbols by address. */
12055
12056static int
12057elf32_arm_compare_mapping (const void * a, const void * b)
12058{
7f6a71ff
JM		 12059 const elf32_arm_section_map *amap = (const elf32_arm_section_map *) a;
12060 const elf32_arm_section_map *bmap = (const elf32_arm_section_map *) b;
12061
12062 if (amap->vma > bmap->vma)
12063 return 1;
12064 else if (amap->vma < bmap->vma)
12065 return -1;
12066 else if (amap->type > bmap->type)
12067 /* Ensure results do not depend on the host qsort for objects with
12068 multiple mapping symbols at the same address by sorting on type
12069 after vma. */
12070 return 1;
12071 else if (amap->type < bmap->type)
12072 return -1;
12073 else
12074 return 0;
e489d0ae
PB		 12075}
12076
12077
12078/* Do code byteswapping. Return FALSE afterwards so that the section is
12079 written out as normal. */
12080
12081static bfd_boolean
c7b8f16e 12082elf32_arm_write_section (bfd *output_bfd,
8029a119
NC		 12083 struct bfd_link_info *link_info,
12084 asection *sec,
e489d0ae
PB		 12085 bfd_byte *contents)
12086{
c7b8f16e 12087 int mapcount, errcount;
8e3de13a 12088 _arm_elf_section_data *arm_data;
c7b8f16e 12089 struct elf32_arm_link_hash_table *globals = elf32_arm_hash_table (link_info);
e489d0ae 12090 elf32_arm_section_map *map;
c7b8f16e 12091 elf32_vfp11_erratum_list *errnode;
e489d0ae
PB		 12092 bfd_vma ptr;
12093 bfd_vma end;
c7b8f16e 12094 bfd_vma offset = sec->output_section->vma + sec->output_offset;
e489d0ae
PB		 12095 bfd_byte tmp;
12096 int i;
57e8b36a 12097
8e3de13a
NC		 12098 /* If this section has not been allocated an _arm_elf_section_data
12099 structure then we cannot record anything. */
12100 arm_data = get_arm_elf_section_data (sec);
12101 if (arm_data == NULL)
12102 return FALSE;
12103
12104 mapcount = arm_data->mapcount;
12105 map = arm_data->map;
c7b8f16e
JB		 12106 errcount = arm_data->erratumcount;
12107
12108 if (errcount != 0)
12109 {
12110 unsigned int endianflip = bfd_big_endian (output_bfd) ? 3 : 0;
12111
12112 for (errnode = arm_data->erratumlist; errnode != 0;
12113 errnode = errnode->next)
12114 {
12115 bfd_vma index = errnode->vma - offset;
12116
12117 switch (errnode->type)
12118 {
12119 case VFP11_ERRATUM_BRANCH_TO_ARM_VENEER:
12120 {
12121 bfd_vma branch_to_veneer;
12122 /* Original condition code of instruction, plus bit mask for
12123 ARM B instruction. */
12124 unsigned int insn = (errnode->u.b.vfp_insn & 0xf0000000)
12125 | 0x0a000000;
12126
12127 /* The instruction is before the label. */
12128 index -= 4;
12129
12130 /* Above offset included in -4 below. */
12131 branch_to_veneer = errnode->u.b.veneer->vma
12132 - errnode->vma - 4;
12133
12134 if ((signed) branch_to_veneer < -(1 << 25)
12135 || (signed) branch_to_veneer >= (1 << 25))
12136 (*_bfd_error_handler) (_("%B: error: VFP11 veneer out of "
12137 "range"), output_bfd);
12138
12139 insn |= (branch_to_veneer >> 2) & 0xffffff;
12140 contents[endianflip ^ index] = insn & 0xff;
12141 contents[endianflip ^ (index + 1)] = (insn >> 8) & 0xff;
12142 contents[endianflip ^ (index + 2)] = (insn >> 16) & 0xff;
12143 contents[endianflip ^ (index + 3)] = (insn >> 24) & 0xff;
12144 }
12145 break;
12146
12147 case VFP11_ERRATUM_ARM_VENEER:
12148 {
12149 bfd_vma branch_from_veneer;
12150 unsigned int insn;
12151
12152 /* Take size of veneer into account. */
12153 branch_from_veneer = errnode->u.v.branch->vma
12154 - errnode->vma - 12;
12155
12156 if ((signed) branch_from_veneer < -(1 << 25)
12157 || (signed) branch_from_veneer >= (1 << 25))
12158 (*_bfd_error_handler) (_("%B: error: VFP11 veneer out of "
12159 "range"), output_bfd);
12160
12161 /* Original instruction. */
12162 insn = errnode->u.v.branch->u.b.vfp_insn;
12163 contents[endianflip ^ index] = insn & 0xff;
12164 contents[endianflip ^ (index + 1)] = (insn >> 8) & 0xff;
12165 contents[endianflip ^ (index + 2)] = (insn >> 16) & 0xff;
12166 contents[endianflip ^ (index + 3)] = (insn >> 24) & 0xff;
12167
12168 /* Branch back to insn after original insn. */
12169 insn = 0xea000000 | ((branch_from_veneer >> 2) & 0xffffff);
12170 contents[endianflip ^ (index + 4)] = insn & 0xff;
12171 contents[endianflip ^ (index + 5)] = (insn >> 8) & 0xff;
12172 contents[endianflip ^ (index + 6)] = (insn >> 16) & 0xff;
12173 contents[endianflip ^ (index + 7)] = (insn >> 24) & 0xff;
12174 }
12175 break;
12176
12177 default:
12178 abort ();
12179 }
12180 }
12181 }
e489d0ae
PB		 12182
12183 if (mapcount == 0)
12184 return FALSE;
12185
c7b8f16e 12186 if (globals->byteswap_code)
e489d0ae 12187 {
c7b8f16e 12188 qsort (map, mapcount, sizeof (* map), elf32_arm_compare_mapping);
57e8b36a 12189
c7b8f16e
JB		 12190 ptr = map[0].vma;
12191 for (i = 0; i < mapcount; i++)
12192 {
12193 if (i == mapcount - 1)
12194 end = sec->size;
12195 else
12196 end = map[i + 1].vma;
e489d0ae 12197
c7b8f16e 12198 switch (map[i].type)
e489d0ae 12199 {
c7b8f16e
JB		 12200 case 'a':
12201 /* Byte swap code words. */
12202 while (ptr + 3 < end)
12203 {
12204 tmp = contents[ptr];
12205 contents[ptr] = contents[ptr + 3];
12206 contents[ptr + 3] = tmp;
12207 tmp = contents[ptr + 1];
12208 contents[ptr + 1] = contents[ptr + 2];
12209 contents[ptr + 2] = tmp;
12210 ptr += 4;
12211 }
12212 break;
e489d0ae 12213
c7b8f16e
JB		 12214 case 't':
12215 /* Byte swap code halfwords. */
12216 while (ptr + 1 < end)
12217 {
12218 tmp = contents[ptr];
12219 contents[ptr] = contents[ptr + 1];
12220 contents[ptr + 1] = tmp;
12221 ptr += 2;
12222 }
12223 break;
12224
12225 case 'd':
12226 /* Leave data alone. */
12227 break;
12228 }
12229 ptr = end;
12230 }
e489d0ae 12231 }
8e3de13a 12232
93204d3a 12233 free (map);
8e3de13a 12234 arm_data->mapcount = 0;
c7b8f16e 12235 arm_data->mapsize = 0;
8e3de13a
NC		 12236 arm_data->map = NULL;
12237 unrecord_section_with_arm_elf_section_data (sec);
12238
e489d0ae
PB		 12239 return FALSE;
12240}
12241
957c6e41
NC		 12242static void
12243unrecord_section_via_map_over_sections (bfd * abfd ATTRIBUTE_UNUSED,
12244 asection * sec,
12245 void * ignore ATTRIBUTE_UNUSED)
12246{
12247 unrecord_section_with_arm_elf_section_data (sec);
12248}
12249
12250static bfd_boolean
12251elf32_arm_close_and_cleanup (bfd * abfd)
12252{
b25e3d87
L		 12253 if (abfd->sections)
12254 bfd_map_over_sections (abfd,
12255 unrecord_section_via_map_over_sections,
12256 NULL);
957c6e41
NC		 12257
12258 return _bfd_elf_close_and_cleanup (abfd);
12259}
12260
b25e3d87
L		 12261static bfd_boolean
12262elf32_arm_bfd_free_cached_info (bfd * abfd)
12263{
12264 if (abfd->sections)
12265 bfd_map_over_sections (abfd,
12266 unrecord_section_via_map_over_sections,
12267 NULL);
12268
12269 return _bfd_free_cached_info (abfd);
12270}
12271
b7693d02
DJ		 12272/* Display STT_ARM_TFUNC symbols as functions. */
12273
12274static void
12275elf32_arm_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
12276 asymbol *asym)
12277{
12278 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
12279
12280 if (ELF_ST_TYPE (elfsym->internal_elf_sym.st_info) == STT_ARM_TFUNC)
12281 elfsym->symbol.flags |= BSF_FUNCTION;
12282}
12283
0beaef2b
PB		 12284
12285/* Mangle thumb function symbols as we read them in. */
12286
8384fb8f 12287static bfd_boolean
0beaef2b
PB		 12288elf32_arm_swap_symbol_in (bfd * abfd,
12289 const void *psrc,
12290 const void *pshn,
12291 Elf_Internal_Sym *dst)
12292{
8384fb8f
AM		 12293 if (!bfd_elf32_swap_symbol_in (abfd, psrc, pshn, dst))
12294 return FALSE;
0beaef2b
PB		 12295
12296 /* New EABI objects mark thumb function symbols by setting the low bit of
12297 the address. Turn these into STT_ARM_TFUNC. */
0f88be7a 12298 if ((ELF_ST_TYPE (dst->st_info) == STT_FUNC)
0beaef2b
PB		 12299 && (dst->st_value & 1))
12300 {
12301 dst->st_info = ELF_ST_INFO (ELF_ST_BIND (dst->st_info), STT_ARM_TFUNC);
12302 dst->st_value &= ~(bfd_vma) 1;
12303 }
8384fb8f 12304 return TRUE;
0beaef2b
PB		 12305}
12306
12307
12308/* Mangle thumb function symbols as we write them out. */
12309
12310static void
12311elf32_arm_swap_symbol_out (bfd *abfd,
12312 const Elf_Internal_Sym *src,
12313 void *cdst,
12314 void *shndx)
12315{
12316 Elf_Internal_Sym newsym;
12317
12318 /* We convert STT_ARM_TFUNC symbols into STT_FUNC with the low bit
12319 of the address set, as per the new EABI. We do this unconditionally
12320 because objcopy does not set the elf header flags until after
12321 it writes out the symbol table. */
12322 if (ELF_ST_TYPE (src->st_info) == STT_ARM_TFUNC)
12323 {
12324 newsym = *src;
12325 newsym.st_info = ELF_ST_INFO (ELF_ST_BIND (src->st_info), STT_FUNC);
0fa3dcad
PB		 12326 if (newsym.st_shndx != SHN_UNDEF)
12327 {
12328 /* Do this only for defined symbols. At link type, the static
12329 linker will simulate the work of dynamic linker of resolving
12330 symbols and will carry over the thumbness of found symbols to
12331 the output symbol table. It's not clear how it happens, but
b0fead2b 12332 the thumbness of undefined symbols can well be different at
0fa3dcad
PB		 12333 runtime, and writing '1' for them will be confusing for users
12334 and possibly for dynamic linker itself.
12335 */
12336 newsym.st_value |= 1;
12337 }
906e58ca 12338
0beaef2b
PB		 12339 src = &newsym;
12340 }
12341 bfd_elf32_swap_symbol_out (abfd, src, cdst, shndx);
12342}
12343
b294bdf8
MM		 12344/* Add the PT_ARM_EXIDX program header. */
12345
12346static bfd_boolean
906e58ca 12347elf32_arm_modify_segment_map (bfd *abfd,
b294bdf8
MM		 12348 struct bfd_link_info *info ATTRIBUTE_UNUSED)
12349{
12350 struct elf_segment_map *m;
12351 asection *sec;
12352
12353 sec = bfd_get_section_by_name (abfd, ".ARM.exidx");
12354 if (sec != NULL && (sec->flags & SEC_LOAD) != 0)
12355 {
12356 /* If there is already a PT_ARM_EXIDX header, then we do not
12357 want to add another one. This situation arises when running
12358 "strip"; the input binary already has the header. */
12359 m = elf_tdata (abfd)->segment_map;
12360 while (m && m->p_type != PT_ARM_EXIDX)
12361 m = m->next;
12362 if (!m)
12363 {
12364 m = bfd_zalloc (abfd, sizeof (struct elf_segment_map));
12365 if (m == NULL)
12366 return FALSE;
12367 m->p_type = PT_ARM_EXIDX;
12368 m->count = 1;
12369 m->sections[0] = sec;
12370
12371 m->next = elf_tdata (abfd)->segment_map;
12372 elf_tdata (abfd)->segment_map = m;
12373 }
12374 }
12375
12376 return TRUE;
12377}
12378
12379/* We may add a PT_ARM_EXIDX program header. */
12380
12381static int
a6b96beb
AM		 12382elf32_arm_additional_program_headers (bfd *abfd,
12383 struct bfd_link_info *info ATTRIBUTE_UNUSED)
b294bdf8
MM		 12384{
12385 asection *sec;
12386
12387 sec = bfd_get_section_by_name (abfd, ".ARM.exidx");
12388 if (sec != NULL && (sec->flags & SEC_LOAD) != 0)
12389 return 1;
12390 else
12391 return 0;
12392}
12393
fcb93ecf 12394/* We have two function types: STT_FUNC and STT_ARM_TFUNC. */
906e58ca 12395
fcb93ecf
PB		 12396static bfd_boolean
12397elf32_arm_is_function_type (unsigned int type)
12398{
0f88be7a 12399 return (type == STT_FUNC) || (type == STT_ARM_TFUNC);
fcb93ecf
PB		 12400}
12401
0beaef2b 12402/* We use this to override swap_symbol_in and swap_symbol_out. */
906e58ca
NC		 12403const struct elf_size_info elf32_arm_size_info =
12404{
0beaef2b
PB		 12405 sizeof (Elf32_External_Ehdr),
12406 sizeof (Elf32_External_Phdr),
12407 sizeof (Elf32_External_Shdr),
12408 sizeof (Elf32_External_Rel),
12409 sizeof (Elf32_External_Rela),
12410 sizeof (Elf32_External_Sym),
12411 sizeof (Elf32_External_Dyn),
12412 sizeof (Elf_External_Note),
12413 4,
12414 1,
12415 32, 2,
12416 ELFCLASS32, EV_CURRENT,
12417 bfd_elf32_write_out_phdrs,
12418 bfd_elf32_write_shdrs_and_ehdr,
1489a3a0 12419 bfd_elf32_checksum_contents,
0beaef2b
PB		 12420 bfd_elf32_write_relocs,
12421 elf32_arm_swap_symbol_in,
12422 elf32_arm_swap_symbol_out,
12423 bfd_elf32_slurp_reloc_table,
12424 bfd_elf32_slurp_symbol_table,
12425 bfd_elf32_swap_dyn_in,
12426 bfd_elf32_swap_dyn_out,
12427 bfd_elf32_swap_reloc_in,
12428 bfd_elf32_swap_reloc_out,
12429 bfd_elf32_swap_reloca_in,
12430 bfd_elf32_swap_reloca_out
12431};
12432
252b5132
RH		 12433#define ELF_ARCH bfd_arch_arm
12434#define ELF_MACHINE_CODE EM_ARM
d0facd1b
NC		 12435#ifdef __QNXTARGET__
12436#define ELF_MAXPAGESIZE 0x1000
12437#else
f21f3fe0 12438#define ELF_MAXPAGESIZE 0x8000
d0facd1b 12439#endif
b1342370 12440#define ELF_MINPAGESIZE 0x1000
24718e3b 12441#define ELF_COMMONPAGESIZE 0x1000
252b5132 12442
ba93b8ac
DJ		 12443#define bfd_elf32_mkobject elf32_arm_mkobject
12444
99e4ae17
AJ		 12445#define bfd_elf32_bfd_copy_private_bfd_data elf32_arm_copy_private_bfd_data
12446#define bfd_elf32_bfd_merge_private_bfd_data elf32_arm_merge_private_bfd_data
252b5132
RH		 12447#define bfd_elf32_bfd_set_private_flags elf32_arm_set_private_flags
12448#define bfd_elf32_bfd_print_private_bfd_data elf32_arm_print_private_bfd_data
12449#define bfd_elf32_bfd_link_hash_table_create elf32_arm_link_hash_table_create
906e58ca 12450#define bfd_elf32_bfd_link_hash_table_free elf32_arm_hash_table_free
dc810e39 12451#define bfd_elf32_bfd_reloc_type_lookup elf32_arm_reloc_type_lookup
157090f7 12452#define bfd_elf32_bfd_reloc_name_lookup elf32_arm_reloc_name_lookup
252b5132 12453#define bfd_elf32_find_nearest_line elf32_arm_find_nearest_line
4ab527b0 12454#define bfd_elf32_find_inliner_info elf32_arm_find_inliner_info
e489d0ae 12455#define bfd_elf32_new_section_hook elf32_arm_new_section_hook
3c9458e9 12456#define bfd_elf32_bfd_is_target_special_symbol elf32_arm_is_target_special_symbol
957c6e41 12457#define bfd_elf32_close_and_cleanup elf32_arm_close_and_cleanup
b25e3d87 12458#define bfd_elf32_bfd_free_cached_info elf32_arm_bfd_free_cached_info
252b5132
RH		 12459
12460#define elf_backend_get_symbol_type elf32_arm_get_symbol_type
12461#define elf_backend_gc_mark_hook elf32_arm_gc_mark_hook
6a5bb875 12462#define elf_backend_gc_mark_extra_sections elf32_arm_gc_mark_extra_sections
252b5132
RH		 12463#define elf_backend_gc_sweep_hook elf32_arm_gc_sweep_hook
12464#define elf_backend_check_relocs elf32_arm_check_relocs
dc810e39 12465#define elf_backend_relocate_section elf32_arm_relocate_section
e489d0ae 12466#define elf_backend_write_section elf32_arm_write_section
252b5132 12467#define elf_backend_adjust_dynamic_symbol elf32_arm_adjust_dynamic_symbol
5e681ec4 12468#define elf_backend_create_dynamic_sections elf32_arm_create_dynamic_sections
252b5132
RH		 12469#define elf_backend_finish_dynamic_symbol elf32_arm_finish_dynamic_symbol
12470#define elf_backend_finish_dynamic_sections elf32_arm_finish_dynamic_sections
12471#define elf_backend_size_dynamic_sections elf32_arm_size_dynamic_sections
74541ad4 12472#define elf_backend_init_index_section _bfd_elf_init_2_index_sections
ba96a88f 12473#define elf_backend_post_process_headers elf32_arm_post_process_headers
99e4ae17 12474#define elf_backend_reloc_type_class elf32_arm_reloc_type_class
c178919b 12475#define elf_backend_object_p elf32_arm_object_p
e16bb312 12476#define elf_backend_section_flags elf32_arm_section_flags
40a18ebd
NC		 12477#define elf_backend_fake_sections elf32_arm_fake_sections
12478#define elf_backend_section_from_shdr elf32_arm_section_from_shdr
e16bb312 12479#define elf_backend_final_write_processing elf32_arm_final_write_processing
5e681ec4 12480#define elf_backend_copy_indirect_symbol elf32_arm_copy_indirect_symbol
b7693d02 12481#define elf_backend_symbol_processing elf32_arm_symbol_processing
0beaef2b 12482#define elf_backend_size_info elf32_arm_size_info
b294bdf8 12483#define elf_backend_modify_segment_map elf32_arm_modify_segment_map
906e58ca
NC		 12484#define elf_backend_additional_program_headers elf32_arm_additional_program_headers
12485#define elf_backend_output_arch_local_syms elf32_arm_output_arch_local_syms
12486#define elf_backend_begin_write_processing elf32_arm_begin_write_processing
12487#define elf_backend_is_function_type elf32_arm_is_function_type
12488
12489#define elf_backend_can_refcount 1
12490#define elf_backend_can_gc_sections 1
12491#define elf_backend_plt_readonly 1
12492#define elf_backend_want_got_plt 1
12493#define elf_backend_want_plt_sym 0
12494#define elf_backend_may_use_rel_p 1
12495#define elf_backend_may_use_rela_p 0
4e7fd91e 12496#define elf_backend_default_use_rela_p 0
252b5132 12497
04f7c78d 12498#define elf_backend_got_header_size 12
04f7c78d 12499
906e58ca
NC		 12500#undef elf_backend_obj_attrs_vendor
12501#define elf_backend_obj_attrs_vendor "aeabi"
12502#undef elf_backend_obj_attrs_section
12503#define elf_backend_obj_attrs_section ".ARM.attributes"
12504#undef elf_backend_obj_attrs_arg_type
12505#define elf_backend_obj_attrs_arg_type elf32_arm_obj_attrs_arg_type
12506#undef elf_backend_obj_attrs_section_type
104d59d1 12507#define elf_backend_obj_attrs_section_type SHT_ARM_ATTRIBUTES
5aa6ff7c 12508#define elf_backend_obj_attrs_order elf32_arm_obj_attrs_order
104d59d1 12509
252b5132 12510#include "elf32-target.h"
7f266840 12511
906e58ca 12512/* VxWorks Targets. */
4e7fd91e 12513
906e58ca 12514#undef TARGET_LITTLE_SYM
4e7fd91e 12515#define TARGET_LITTLE_SYM bfd_elf32_littlearm_vxworks_vec
906e58ca 12516#undef TARGET_LITTLE_NAME
4e7fd91e 12517#define TARGET_LITTLE_NAME "elf32-littlearm-vxworks"
906e58ca 12518#undef TARGET_BIG_SYM
4e7fd91e 12519#define TARGET_BIG_SYM bfd_elf32_bigarm_vxworks_vec
906e58ca 12520#undef TARGET_BIG_NAME
4e7fd91e
PB		 12521#define TARGET_BIG_NAME "elf32-bigarm-vxworks"
12522
12523/* Like elf32_arm_link_hash_table_create -- but overrides
12524 appropriately for VxWorks. */
906e58ca 12525
4e7fd91e
PB		 12526static struct bfd_link_hash_table *
12527elf32_arm_vxworks_link_hash_table_create (bfd *abfd)
12528{
12529 struct bfd_link_hash_table *ret;
12530
12531 ret = elf32_arm_link_hash_table_create (abfd);
12532 if (ret)
12533 {
12534 struct elf32_arm_link_hash_table *htab
00a97672 12535 = (struct elf32_arm_link_hash_table *) ret;
4e7fd91e 12536 htab->use_rel = 0;
00a97672 12537 htab->vxworks_p = 1;
4e7fd91e
PB		 12538 }
12539 return ret;
906e58ca 12540}
4e7fd91e 12541
00a97672
RS		 12542static void
12543elf32_arm_vxworks_final_write_processing (bfd *abfd, bfd_boolean linker)
12544{
12545 elf32_arm_final_write_processing (abfd, linker);
12546 elf_vxworks_final_write_processing (abfd, linker);
12547}
12548
906e58ca 12549#undef elf32_bed
4e7fd91e
PB		 12550#define elf32_bed elf32_arm_vxworks_bed
12551
906e58ca
NC		 12552#undef bfd_elf32_bfd_link_hash_table_create
12553#define bfd_elf32_bfd_link_hash_table_create elf32_arm_vxworks_link_hash_table_create
12554#undef elf_backend_add_symbol_hook
12555#define elf_backend_add_symbol_hook elf_vxworks_add_symbol_hook
12556#undef elf_backend_final_write_processing
12557#define elf_backend_final_write_processing elf32_arm_vxworks_final_write_processing
12558#undef elf_backend_emit_relocs
12559#define elf_backend_emit_relocs elf_vxworks_emit_relocs
4e7fd91e 12560
906e58ca 12561#undef elf_backend_may_use_rel_p
00a97672 12562#define elf_backend_may_use_rel_p 0
906e58ca 12563#undef elf_backend_may_use_rela_p
00a97672 12564#define elf_backend_may_use_rela_p 1
906e58ca 12565#undef elf_backend_default_use_rela_p
00a97672 12566#define elf_backend_default_use_rela_p 1
906e58ca 12567#undef elf_backend_want_plt_sym
00a97672 12568#define elf_backend_want_plt_sym 1
906e58ca 12569#undef ELF_MAXPAGESIZE
00a97672 12570#define ELF_MAXPAGESIZE 0x1000
4e7fd91e
PB		 12571
12572#include "elf32-target.h"
12573
12574
906e58ca 12575/* Symbian OS Targets. */
7f266840 12576
906e58ca 12577#undef TARGET_LITTLE_SYM
7f266840 12578#define TARGET_LITTLE_SYM bfd_elf32_littlearm_symbian_vec
906e58ca 12579#undef TARGET_LITTLE_NAME
7f266840 12580#define TARGET_LITTLE_NAME "elf32-littlearm-symbian"
906e58ca 12581#undef TARGET_BIG_SYM
7f266840 12582#define TARGET_BIG_SYM bfd_elf32_bigarm_symbian_vec
906e58ca 12583#undef TARGET_BIG_NAME
7f266840
DJ		 12584#define TARGET_BIG_NAME "elf32-bigarm-symbian"
12585
12586/* Like elf32_arm_link_hash_table_create -- but overrides
12587 appropriately for Symbian OS. */
906e58ca 12588
7f266840
DJ		 12589static struct bfd_link_hash_table *
12590elf32_arm_symbian_link_hash_table_create (bfd *abfd)
12591{
12592 struct bfd_link_hash_table *ret;
12593
12594 ret = elf32_arm_link_hash_table_create (abfd);
12595 if (ret)
12596 {
12597 struct elf32_arm_link_hash_table *htab
12598 = (struct elf32_arm_link_hash_table *)ret;
12599 /* There is no PLT header for Symbian OS. */
12600 htab->plt_header_size = 0;
95720a86
DJ		 12601 /* The PLT entries are each one instruction and one word. */
12602 htab->plt_entry_size = 4 * ARRAY_SIZE (elf32_arm_symbian_plt_entry);
7f266840 12603 htab->symbian_p = 1;
33bfe774
JB		 12604 /* Symbian uses armv5t or above, so use_blx is always true. */
12605 htab->use_blx = 1;
67687978 12606 htab->root.is_relocatable_executable = 1;
7f266840
DJ		 12607 }
12608 return ret;
906e58ca 12609}
7f266840 12610
b35d266b 12611static const struct bfd_elf_special_section
551b43fd 12612elf32_arm_symbian_special_sections[] =
7f266840 12613{
5cd3778d
MM		 12614 /* In a BPABI executable, the dynamic linking sections do not go in
12615 the loadable read-only segment. The post-linker may wish to
12616 refer to these sections, but they are not part of the final
12617 program image. */
0112cd26
NC		 12618 { STRING_COMMA_LEN (".dynamic"), 0, SHT_DYNAMIC, 0 },
12619 { STRING_COMMA_LEN (".dynstr"), 0, SHT_STRTAB, 0 },
12620 { STRING_COMMA_LEN (".dynsym"), 0, SHT_DYNSYM, 0 },
12621 { STRING_COMMA_LEN (".got"), 0, SHT_PROGBITS, 0 },
12622 { STRING_COMMA_LEN (".hash"), 0, SHT_HASH, 0 },
5cd3778d
MM		 12623 /* These sections do not need to be writable as the SymbianOS
12624 postlinker will arrange things so that no dynamic relocation is
12625 required. */
0112cd26
NC		 12626 { STRING_COMMA_LEN (".init_array"), 0, SHT_INIT_ARRAY, SHF_ALLOC },
12627 { STRING_COMMA_LEN (".fini_array"), 0, SHT_FINI_ARRAY, SHF_ALLOC },
12628 { STRING_COMMA_LEN (".preinit_array"), 0, SHT_PREINIT_ARRAY, SHF_ALLOC },
12629 { NULL, 0, 0, 0, 0 }
7f266840
DJ		 12630};
12631
c3c76620 12632static void
906e58ca 12633elf32_arm_symbian_begin_write_processing (bfd *abfd,
a4fd1a8e 12634 struct bfd_link_info *link_info)
c3c76620
MM		 12635{
12636 /* BPABI objects are never loaded directly by an OS kernel; they are
12637 processed by a postlinker first, into an OS-specific format. If
12638 the D_PAGED bit is set on the file, BFD will align segments on
12639 page boundaries, so that an OS can directly map the file. With
12640 BPABI objects, that just results in wasted space. In addition,
12641 because we clear the D_PAGED bit, map_sections_to_segments will
12642 recognize that the program headers should not be mapped into any
12643 loadable segment. */
12644 abfd->flags &= ~D_PAGED;
906e58ca 12645 elf32_arm_begin_write_processing (abfd, link_info);
c3c76620 12646}
7f266840
DJ		 12647
12648static bfd_boolean
906e58ca 12649elf32_arm_symbian_modify_segment_map (bfd *abfd,
b294bdf8 12650 struct bfd_link_info *info)
7f266840
DJ		 12651{
12652 struct elf_segment_map *m;
12653 asection *dynsec;
12654
7f266840
DJ		 12655 /* BPABI shared libraries and executables should have a PT_DYNAMIC
12656 segment. However, because the .dynamic section is not marked
12657 with SEC_LOAD, the generic ELF code will not create such a
12658 segment. */
12659 dynsec = bfd_get_section_by_name (abfd, ".dynamic");
12660 if (dynsec)
12661 {
8ded5a0f
AM		 12662 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
12663 if (m->p_type == PT_DYNAMIC)
12664 break;
12665
12666 if (m == NULL)
12667 {
12668 m = _bfd_elf_make_dynamic_segment (abfd, dynsec);
12669 m->next = elf_tdata (abfd)->segment_map;
12670 elf_tdata (abfd)->segment_map = m;
12671 }
7f266840
DJ		 12672 }
12673
b294bdf8
MM		 12674 /* Also call the generic arm routine. */
12675 return elf32_arm_modify_segment_map (abfd, info);
7f266840
DJ		 12676}
12677
95720a86
DJ		 12678/* Return address for Ith PLT stub in section PLT, for relocation REL
12679 or (bfd_vma) -1 if it should not be included. */
12680
12681static bfd_vma
12682elf32_arm_symbian_plt_sym_val (bfd_vma i, const asection *plt,
12683 const arelent *rel ATTRIBUTE_UNUSED)
12684{
12685 return plt->vma + 4 * ARRAY_SIZE (elf32_arm_symbian_plt_entry) * i;
12686}
12687
12688
8029a119 12689#undef elf32_bed
7f266840
DJ		 12690#define elf32_bed elf32_arm_symbian_bed
12691
12692/* The dynamic sections are not allocated on SymbianOS; the postlinker
12693 will process them and then discard them. */
906e58ca 12694#undef ELF_DYNAMIC_SEC_FLAGS
7f266840
DJ		 12695#define ELF_DYNAMIC_SEC_FLAGS \
12696 (SEC_HAS_CONTENTS | SEC_IN_MEMORY | SEC_LINKER_CREATED)
12697
00a97672 12698#undef elf_backend_add_symbol_hook
00a97672 12699#undef elf_backend_emit_relocs
c3c76620 12700
906e58ca
NC		 12701#undef bfd_elf32_bfd_link_hash_table_create
12702#define bfd_elf32_bfd_link_hash_table_create elf32_arm_symbian_link_hash_table_create
12703#undef elf_backend_special_sections
12704#define elf_backend_special_sections elf32_arm_symbian_special_sections
12705#undef elf_backend_begin_write_processing
12706#define elf_backend_begin_write_processing elf32_arm_symbian_begin_write_processing
12707#undef elf_backend_final_write_processing
12708#define elf_backend_final_write_processing elf32_arm_final_write_processing
12709
12710#undef elf_backend_modify_segment_map
7f266840
DJ		 12711#define elf_backend_modify_segment_map elf32_arm_symbian_modify_segment_map
12712
12713/* There is no .got section for BPABI objects, and hence no header. */
906e58ca 12714#undef elf_backend_got_header_size
7f266840
DJ		 12715#define elf_backend_got_header_size 0
12716
12717/* Similarly, there is no .got.plt section. */
906e58ca 12718#undef elf_backend_want_got_plt
7f266840
DJ		 12719#define elf_backend_want_got_plt 0
12720
906e58ca 12721#undef elf_backend_plt_sym_val
95720a86
DJ		 12722#define elf_backend_plt_sym_val elf32_arm_symbian_plt_sym_val
12723
906e58ca 12724#undef elf_backend_may_use_rel_p
00a97672 12725#define elf_backend_may_use_rel_p 1
906e58ca 12726#undef elf_backend_may_use_rela_p
00a97672 12727#define elf_backend_may_use_rela_p 0
906e58ca 12728#undef elf_backend_default_use_rela_p
00a97672 12729#define elf_backend_default_use_rela_p 0
906e58ca 12730#undef elf_backend_want_plt_sym
00a97672 12731#define elf_backend_want_plt_sym 0
906e58ca 12732#undef ELF_MAXPAGESIZE
00a97672 12733#define ELF_MAXPAGESIZE 0x8000
4e7fd91e 12734
7f266840 12735#include "elf32-target.h"
GDB Binutils - Deliverables
This page took 1.682877 seconds and 4 git commands to generate.