1 /* BFD support for the ARM processor
2 Copyright (C) 1994-2019 Free Software Foundation, Inc.
3 Contributed by Richard Earnshaw (rwe@pegasus.esprit.ec.org)
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
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.
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
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
25 #include "libiberty.h"
27 /* This routine is provided two arch_infos and works out which ARM
28 machine which would be compatible with both and returns a pointer
29 to its info structure. */
31 static const bfd_arch_info_type
*
32 compatible (const bfd_arch_info_type
*a
, const bfd_arch_info_type
*b
)
34 /* If a & b are for different architecture we can do nothing. */
35 if (a
->arch
!= b
->arch
)
38 /* If a & b are for the same machine then all is well. */
39 if (a
->mach
== b
->mach
)
42 /* Otherwise if either a or b is the 'default' machine
43 then it can be polymorphed into the other. */
50 /* So far all newer ARM architecture cores are
51 supersets of previous cores. */
52 if (a
->mach
< b
->mach
)
54 else if (a
->mach
> b
->mach
)
68 { bfd_mach_arm_2
, "arm2" },
69 { bfd_mach_arm_2a
, "arm250" },
70 { bfd_mach_arm_2a
, "arm3" },
71 { bfd_mach_arm_3
, "arm6" },
72 { bfd_mach_arm_3
, "arm60" },
73 { bfd_mach_arm_3
, "arm600" },
74 { bfd_mach_arm_3
, "arm610" },
75 { bfd_mach_arm_3
, "arm620" },
76 { bfd_mach_arm_3
, "arm7" },
77 { bfd_mach_arm_3
, "arm70" },
78 { bfd_mach_arm_3
, "arm700" },
79 { bfd_mach_arm_3
, "arm700i" },
80 { bfd_mach_arm_3
, "arm710" },
81 { bfd_mach_arm_3
, "arm7100" },
82 { bfd_mach_arm_3
, "arm710c" },
83 { bfd_mach_arm_4T
, "arm710t" },
84 { bfd_mach_arm_3
, "arm720" },
85 { bfd_mach_arm_4T
, "arm720t" },
86 { bfd_mach_arm_4T
, "arm740t" },
87 { bfd_mach_arm_3
, "arm7500" },
88 { bfd_mach_arm_3
, "arm7500fe" },
89 { bfd_mach_arm_3
, "arm7d" },
90 { bfd_mach_arm_3
, "arm7di" },
91 { bfd_mach_arm_3M
, "arm7dm" },
92 { bfd_mach_arm_3M
, "arm7dmi" },
93 { bfd_mach_arm_4T
, "arm7t" },
94 { bfd_mach_arm_4T
, "arm7tdmi" },
95 { bfd_mach_arm_4T
, "arm7tdmi-s" },
96 { bfd_mach_arm_3M
, "arm7m" },
97 { bfd_mach_arm_4
, "arm8" },
98 { bfd_mach_arm_4
, "arm810" },
99 { bfd_mach_arm_4
, "arm9" },
100 { bfd_mach_arm_4T
, "arm920" },
101 { bfd_mach_arm_4T
, "arm920t" },
102 { bfd_mach_arm_4T
, "arm922t" },
103 { bfd_mach_arm_5TEJ
, "arm926ej" },
104 { bfd_mach_arm_5TEJ
, "arm926ejs" },
105 { bfd_mach_arm_5TEJ
, "arm926ej-s" },
106 { bfd_mach_arm_4T
, "arm940t" },
107 { bfd_mach_arm_5TE
, "arm946e" },
108 { bfd_mach_arm_5TE
, "arm946e-r0" },
109 { bfd_mach_arm_5TE
, "arm946e-s" },
110 { bfd_mach_arm_5TE
, "arm966e" },
111 { bfd_mach_arm_5TE
, "arm966e-r0" },
112 { bfd_mach_arm_5TE
, "arm966e-s" },
113 { bfd_mach_arm_5TE
, "arm968e-s" },
114 { bfd_mach_arm_5TE
, "arm9e" },
115 { bfd_mach_arm_5TE
, "arm9e-r0" },
116 { bfd_mach_arm_4T
, "arm9tdmi" },
117 { bfd_mach_arm_5TE
, "arm1020" },
118 { bfd_mach_arm_5T
, "arm1020t" },
119 { bfd_mach_arm_5TE
, "arm1020e" },
120 { bfd_mach_arm_5TE
, "arm1022e" },
121 { bfd_mach_arm_5TEJ
, "arm1026ejs" },
122 { bfd_mach_arm_5TEJ
, "arm1026ej-s" },
123 { bfd_mach_arm_5TE
, "arm10e" },
124 { bfd_mach_arm_5T
, "arm10t" },
125 { bfd_mach_arm_5T
, "arm10tdmi" },
126 { bfd_mach_arm_6
, "arm1136j-s" },
127 { bfd_mach_arm_6
, "arm1136js" },
128 { bfd_mach_arm_6
, "arm1136jf-s" },
129 { bfd_mach_arm_6
, "arm1136jfs" },
130 { bfd_mach_arm_6KZ
, "arm1176jz-s" },
131 { bfd_mach_arm_6KZ
, "arm1176jzf-s" },
132 { bfd_mach_arm_6T2
, "arm1156t2-s" },
133 { bfd_mach_arm_6T2
, "arm1156t2f-s" },
134 { bfd_mach_arm_7
, "cortex-a5" },
135 { bfd_mach_arm_7
, "cortex-a7" },
136 { bfd_mach_arm_7
, "cortex-a8" },
137 { bfd_mach_arm_7
, "cortex-a9" },
138 { bfd_mach_arm_7
, "cortex-a12" },
139 { bfd_mach_arm_7
, "cortex-a15" },
140 { bfd_mach_arm_7
, "cortex-a17" },
141 { bfd_mach_arm_8
, "cortex-a32" },
142 { bfd_mach_arm_8
, "cortex-a35" },
143 { bfd_mach_arm_8
, "cortex-a53" },
144 { bfd_mach_arm_8
, "cortex-a55" },
145 { bfd_mach_arm_8
, "cortex-a57" },
146 { bfd_mach_arm_8
, "cortex-a72" },
147 { bfd_mach_arm_8
, "cortex-a73" },
148 { bfd_mach_arm_8
, "cortex-a75" },
149 { bfd_mach_arm_8
, "cortex-a76" },
150 { bfd_mach_arm_8
, "cortex-a76ae" },
151 { bfd_mach_arm_8
, "cortex-a77" },
152 { bfd_mach_arm_6SM
, "cortex-m0" },
153 { bfd_mach_arm_6SM
, "cortex-m0plus" },
154 { bfd_mach_arm_6SM
, "cortex-m1" },
155 { bfd_mach_arm_8M_BASE
, "cortex-m23" },
156 { bfd_mach_arm_7
, "cortex-m3" },
157 { bfd_mach_arm_8M_MAIN
, "cortex-m33" },
158 { bfd_mach_arm_8M_MAIN
, "cortex-m35p" },
159 { bfd_mach_arm_7EM
, "cortex-m4" },
160 { bfd_mach_arm_7EM
, "cortex-m7" },
161 { bfd_mach_arm_7
, "cortex-r4" },
162 { bfd_mach_arm_7
, "cortex-r4f" },
163 { bfd_mach_arm_7
, "cortex-r5" },
164 { bfd_mach_arm_8R
, "cortex-r52" },
165 { bfd_mach_arm_7
, "cortex-r7" },
166 { bfd_mach_arm_7
, "cortex-r8" },
167 { bfd_mach_arm_4T
, "ep9312" },
168 { bfd_mach_arm_8
, "exynos-m1" },
169 { bfd_mach_arm_4
, "fa526" },
170 { bfd_mach_arm_5TE
, "fa606te" },
171 { bfd_mach_arm_5TE
, "fa616te" },
172 { bfd_mach_arm_4
, "fa626" },
173 { bfd_mach_arm_5TE
, "fa626te" },
174 { bfd_mach_arm_5TE
, "fa726te" },
175 { bfd_mach_arm_5TE
, "fmp626" },
176 { bfd_mach_arm_XScale
, "i80200" },
177 { bfd_mach_arm_7
, "marvell-pj4" },
178 { bfd_mach_arm_7
, "marvell-whitney" },
179 { bfd_mach_arm_6K
, "mpcore" },
180 { bfd_mach_arm_6K
, "mpcorenovfp" },
181 { bfd_mach_arm_4
, "sa1" },
182 { bfd_mach_arm_4
, "strongarm" },
183 { bfd_mach_arm_4
, "strongarm1" },
184 { bfd_mach_arm_4
, "strongarm110" },
185 { bfd_mach_arm_4
, "strongarm1100" },
186 { bfd_mach_arm_4
, "strongarm1110" },
187 { bfd_mach_arm_XScale
, "xscale" },
188 { bfd_mach_arm_8
, "xgene1" },
189 { bfd_mach_arm_8
, "xgene2" },
190 { bfd_mach_arm_ep9312
, "ep9312" },
191 { bfd_mach_arm_iWMMXt
, "iwmmxt" },
192 { bfd_mach_arm_iWMMXt2
, "iwmmxt2" },
193 { bfd_mach_arm_unknown
, "arm_any" }
197 scan (const struct bfd_arch_info
*info
, const char *string
)
201 /* First test for an exact match. */
202 if (strcasecmp (string
, info
->printable_name
) == 0)
205 /* Next check for a processor name instead of an Architecture name. */
206 for (i
= sizeof (processors
) / sizeof (processors
[0]); i
--;)
208 if (strcasecmp (string
, processors
[i
].name
) == 0)
212 if (i
!= -1 && info
->mach
== processors
[i
].mach
)
215 /* Finally check for the default architecture. */
216 if (strcasecmp (string
, "arm") == 0)
217 return info
->the_default
;
222 #define N(number, print, default, next) \
223 { 32, 32, 8, bfd_arch_arm, number, "arm", print, 4, default, compatible, \
224 scan, bfd_arch_default_fill, next }
226 static const bfd_arch_info_type arch_info_struct
[] =
228 N (bfd_mach_arm_2
, "armv2", FALSE
, & arch_info_struct
[1]),
229 N (bfd_mach_arm_2a
, "armv2a", FALSE
, & arch_info_struct
[2]),
230 N (bfd_mach_arm_3
, "armv3", FALSE
, & arch_info_struct
[3]),
231 N (bfd_mach_arm_3M
, "armv3m", FALSE
, & arch_info_struct
[4]),
232 N (bfd_mach_arm_4
, "armv4", FALSE
, & arch_info_struct
[5]),
233 N (bfd_mach_arm_4T
, "armv4t", FALSE
, & arch_info_struct
[6]),
234 N (bfd_mach_arm_5
, "armv5", FALSE
, & arch_info_struct
[7]),
235 N (bfd_mach_arm_5T
, "armv5t", FALSE
, & arch_info_struct
[8]),
236 N (bfd_mach_arm_5TE
, "armv5te", FALSE
, & arch_info_struct
[9]),
237 N (bfd_mach_arm_XScale
, "xscale", FALSE
, & arch_info_struct
[10]),
238 N (bfd_mach_arm_ep9312
, "ep9312", FALSE
, & arch_info_struct
[11]),
239 N (bfd_mach_arm_iWMMXt
, "iwmmxt", FALSE
, & arch_info_struct
[12]),
240 N (bfd_mach_arm_iWMMXt2
, "iwmmxt2", FALSE
, & arch_info_struct
[13]),
241 N (bfd_mach_arm_5TEJ
, "armv5tej", FALSE
, & arch_info_struct
[14]),
242 N (bfd_mach_arm_6
, "armv6", FALSE
, & arch_info_struct
[15]),
243 N (bfd_mach_arm_6KZ
, "armv6kz", FALSE
, & arch_info_struct
[16]),
244 N (bfd_mach_arm_6T2
, "armv6t2", FALSE
, & arch_info_struct
[17]),
245 N (bfd_mach_arm_6K
, "armv6k", FALSE
, & arch_info_struct
[18]),
246 N (bfd_mach_arm_7
, "armv7", FALSE
, & arch_info_struct
[19]),
247 N (bfd_mach_arm_6M
, "armv6-m", FALSE
, & arch_info_struct
[20]),
248 N (bfd_mach_arm_6SM
, "armv6s-m", FALSE
, & arch_info_struct
[21]),
249 N (bfd_mach_arm_7EM
, "armv7e-m", FALSE
, & arch_info_struct
[22]),
250 N (bfd_mach_arm_8
, "armv8-a", FALSE
, & arch_info_struct
[23]),
251 N (bfd_mach_arm_8R
, "armv8-r", FALSE
, & arch_info_struct
[24]),
252 N (bfd_mach_arm_8M_BASE
, "armv8-m.base", FALSE
, & arch_info_struct
[25]),
253 N (bfd_mach_arm_8M_MAIN
, "armv8-m.main", FALSE
, & arch_info_struct
[26]),
254 N (bfd_mach_arm_8_1M_MAIN
, "armv8.1-m.main", FALSE
, & arch_info_struct
[27]),
255 N (bfd_mach_arm_unknown
, "arm_any", FALSE
, NULL
)
258 const bfd_arch_info_type bfd_arm_arch
=
259 N (0, "arm", TRUE
, & arch_info_struct
[0]);
261 /* Support functions used by both the COFF and ELF versions of the ARM port. */
263 /* Handle the merging of the 'machine' settings of input file IBFD
264 and an output file OBFD. These values actually represent the
265 different possible ARM architecture variants.
266 Returns TRUE if they were merged successfully or FALSE otherwise. */
269 bfd_arm_merge_machines (bfd
*ibfd
, bfd
*obfd
)
271 unsigned int in
= bfd_get_mach (ibfd
);
272 unsigned int out
= bfd_get_mach (obfd
);
274 /* If the output architecture is unknown, we now have a value to set. */
275 if (out
== bfd_mach_arm_unknown
)
276 bfd_set_arch_mach (obfd
, bfd_arch_arm
, in
);
278 /* If the input architecture is unknown,
279 then so must be the output architecture. */
280 else if (in
== bfd_mach_arm_unknown
)
281 /* FIXME: We ought to have some way to
282 override this on the command line. */
283 bfd_set_arch_mach (obfd
, bfd_arch_arm
, bfd_mach_arm_unknown
);
285 /* If they are the same then nothing needs to be done. */
289 /* Otherwise the general principle that a earlier architecture can be
290 linked with a later architecture to produce a binary that will execute
291 on the later architecture.
293 We fail however if we attempt to link a Cirrus EP9312 binary with an
294 Intel XScale binary, since these architecture have co-processors which
295 will not both be present on the same physical hardware. */
296 else if (in
== bfd_mach_arm_ep9312
297 && (out
== bfd_mach_arm_XScale
298 || out
== bfd_mach_arm_iWMMXt
299 || out
== bfd_mach_arm_iWMMXt2
))
301 /* xgettext: c-format */
302 _bfd_error_handler (_("\
303 error: %pB is compiled for the EP9312, whereas %pB is compiled for XScale"),
305 bfd_set_error (bfd_error_wrong_format
);
308 else if (out
== bfd_mach_arm_ep9312
309 && (in
== bfd_mach_arm_XScale
310 || in
== bfd_mach_arm_iWMMXt
311 || in
== bfd_mach_arm_iWMMXt2
))
313 /* xgettext: c-format */
314 _bfd_error_handler (_("\
315 error: %pB is compiled for the EP9312, whereas %pB is compiled for XScale"),
317 bfd_set_error (bfd_error_wrong_format
);
321 bfd_set_arch_mach (obfd
, bfd_arch_arm
, in
);
330 unsigned char namesz
[4]; /* Size of entry's owner string. */
331 unsigned char descsz
[4]; /* Size of the note descriptor. */
332 unsigned char type
[4]; /* Interpretation of the descriptor. */
333 char name
[1]; /* Start of the name+desc data. */
337 arm_check_note (bfd
*abfd
,
339 bfd_size_type buffer_size
,
340 const char *expected_name
,
341 char **description_return
)
343 unsigned long namesz
;
344 unsigned long descsz
;
348 if (buffer_size
< offsetof (arm_Note
, name
))
351 /* We have to extract the values this way to allow for a
352 host whose endian-ness is different from the target. */
353 namesz
= bfd_get_32 (abfd
, buffer
);
354 descsz
= bfd_get_32 (abfd
, buffer
+ offsetof (arm_Note
, descsz
));
355 type
= bfd_get_32 (abfd
, buffer
+ offsetof (arm_Note
, type
));
356 descr
= (char *) buffer
+ offsetof (arm_Note
, name
);
358 /* Check for buffer overflow. */
359 if (namesz
+ descsz
+ offsetof (arm_Note
, name
) > buffer_size
)
362 if (expected_name
== NULL
)
369 if (namesz
!= ((strlen (expected_name
) + 1 + 3) & ~3))
372 if (strcmp (descr
, expected_name
) != 0)
375 descr
+= (namesz
+ 3) & ~3;
378 /* FIXME: We should probably check the type as well. */
381 if (description_return
!= NULL
)
382 * description_return
= descr
;
387 #define NOTE_ARCH_STRING "arch: "
390 bfd_arm_update_notes (bfd
*abfd
, const char *note_section
)
392 asection
* arm_arch_section
;
393 bfd_size_type buffer_size
;
398 /* Look for a note section. If one is present check the architecture
399 string encoded in it, and set it to the current architecture if it is
401 arm_arch_section
= bfd_get_section_by_name (abfd
, note_section
);
403 if (arm_arch_section
== NULL
)
406 buffer_size
= arm_arch_section
->size
;
407 if (buffer_size
== 0)
410 if (!bfd_malloc_and_get_section (abfd
, arm_arch_section
, &buffer
))
413 /* Parse the note. */
414 if (! arm_check_note (abfd
, buffer
, buffer_size
, NOTE_ARCH_STRING
, & arch_string
))
417 /* Check the architecture in the note against the architecture of the bfd.
418 Newer architectures versions should not be added here as build attribute
419 are a better mechanism to convey ISA used. */
420 switch (bfd_get_mach (abfd
))
423 case bfd_mach_arm_unknown
: expected
= "unknown"; break;
424 case bfd_mach_arm_2
: expected
= "armv2"; break;
425 case bfd_mach_arm_2a
: expected
= "armv2a"; break;
426 case bfd_mach_arm_3
: expected
= "armv3"; break;
427 case bfd_mach_arm_3M
: expected
= "armv3M"; break;
428 case bfd_mach_arm_4
: expected
= "armv4"; break;
429 case bfd_mach_arm_4T
: expected
= "armv4t"; break;
430 case bfd_mach_arm_5
: expected
= "armv5"; break;
431 case bfd_mach_arm_5T
: expected
= "armv5t"; break;
432 case bfd_mach_arm_5TE
: expected
= "armv5te"; break;
433 case bfd_mach_arm_XScale
: expected
= "XScale"; break;
434 case bfd_mach_arm_ep9312
: expected
= "ep9312"; break;
435 case bfd_mach_arm_iWMMXt
: expected
= "iWMMXt"; break;
436 case bfd_mach_arm_iWMMXt2
: expected
= "iWMMXt2"; break;
439 if (strcmp (arch_string
, expected
) != 0)
441 strcpy ((char *) buffer
+ (offsetof (arm_Note
, name
)
442 + ((strlen (NOTE_ARCH_STRING
) + 3) & ~3)),
445 if (! bfd_set_section_contents (abfd
, arm_arch_section
, buffer
,
446 (file_ptr
) 0, buffer_size
))
449 /* xgettext: c-format */
450 (_("warning: unable to update contents of %s section in %pB"),
472 /* Newer architectures versions should not be added here as build attribute are
473 a better mechanism to convey ISA used. */
476 { "armv2", bfd_mach_arm_2
},
477 { "armv2a", bfd_mach_arm_2a
},
478 { "armv3", bfd_mach_arm_3
},
479 { "armv3M", bfd_mach_arm_3M
},
480 { "armv4", bfd_mach_arm_4
},
481 { "armv4t", bfd_mach_arm_4T
},
482 { "armv5", bfd_mach_arm_5
},
483 { "armv5t", bfd_mach_arm_5T
},
484 { "armv5te", bfd_mach_arm_5TE
},
485 { "XScale", bfd_mach_arm_XScale
},
486 { "ep9312", bfd_mach_arm_ep9312
},
487 { "iWMMXt", bfd_mach_arm_iWMMXt
},
488 { "iWMMXt2", bfd_mach_arm_iWMMXt2
},
489 { "arm_any", bfd_mach_arm_unknown
}
492 /* Extract the machine number stored in a note section. */
494 bfd_arm_get_mach_from_notes (bfd
*abfd
, const char *note_section
)
496 asection
* arm_arch_section
;
497 bfd_size_type buffer_size
;
502 /* Look for a note section. If one is present check the architecture
503 string encoded in it, and set it to the current architecture if it is
505 arm_arch_section
= bfd_get_section_by_name (abfd
, note_section
);
507 if (arm_arch_section
== NULL
)
508 return bfd_mach_arm_unknown
;
510 buffer_size
= arm_arch_section
->size
;
511 if (buffer_size
== 0)
512 return bfd_mach_arm_unknown
;
514 if (!bfd_malloc_and_get_section (abfd
, arm_arch_section
, &buffer
))
517 /* Parse the note. */
518 if (! arm_check_note (abfd
, buffer
, buffer_size
, NOTE_ARCH_STRING
, & arch_string
))
521 /* Interpret the architecture string. */
522 for (i
= ARRAY_SIZE (architectures
); i
--;)
523 if (strcmp (arch_string
, architectures
[i
].string
) == 0)
526 return architectures
[i
].mach
;
532 return bfd_mach_arm_unknown
;
536 bfd_is_arm_special_symbol_name (const char * name
, int type
)
538 /* The ARM compiler outputs several obsolete forms. Recognize them
539 in addition to the standard $a, $t and $d. We are somewhat loose
540 in what we accept here, since the full set is not documented. */
541 if (!name
|| name
[0] != '$')
543 if (name
[1] == 'a' || name
[1] == 't' || name
[1] == 'd')
544 type
&= BFD_ARM_SPECIAL_SYM_TYPE_MAP
;
545 else if (name
[1] == 'm' || name
[1] == 'f' || name
[1] == 'p')
546 type
&= BFD_ARM_SPECIAL_SYM_TYPE_TAG
;
547 else if (name
[1] >= 'a' && name
[1] <= 'z')
548 type
&= BFD_ARM_SPECIAL_SYM_TYPE_OTHER
;
552 return (type
!= 0 && (name
[2] == 0 || name
[2] == '.'));