Automatic date update in version.in
[external/binutils.git] / bfd / archures.c
1 /* BFD library support routines for architectures.
2    Copyright (C) 1990-2018 Free Software Foundation, Inc.
3    Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
4
5    This file is part of BFD, the Binary File Descriptor library.
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20    MA 02110-1301, USA.  */
21
22 #include "sysdep.h"
23 #include "bfd.h"
24 #include "libbfd.h"
25 #include "safe-ctype.h"
26
27 /*
28
29 SECTION
30         Architectures
31
32         BFD keeps one atom in a BFD describing the
33         architecture of the data attached to the BFD: a pointer to a
34         <<bfd_arch_info_type>>.
35
36         Pointers to structures can be requested independently of a BFD
37         so that an architecture's information can be interrogated
38         without access to an open BFD.
39
40         The architecture information is provided by each architecture package.
41         The set of default architectures is selected by the macro
42         <<SELECT_ARCHITECTURES>>.  This is normally set up in the
43         @file{config/@var{target}.mt} file of your choice.  If the name is not
44         defined, then all the architectures supported are included.
45
46         When BFD starts up, all the architectures are called with an
47         initialize method.  It is up to the architecture back end to
48         insert as many items into the list of architectures as it wants to;
49         generally this would be one for each machine and one for the
50         default case (an item with a machine field of 0).
51
52         BFD's idea of an architecture is implemented in @file{archures.c}.
53 */
54
55 /*
56
57 SUBSECTION
58         bfd_architecture
59
60 DESCRIPTION
61         This enum gives the object file's CPU architecture, in a
62         global sense---i.e., what processor family does it belong to?
63         Another field indicates which processor within
64         the family is in use.  The machine gives a number which
65         distinguishes different versions of the architecture,
66         containing, for example, 68020 for Motorola 68020.
67
68 .enum bfd_architecture
69 .{
70 .  bfd_arch_unknown,   {* File arch not known.  *}
71 .  bfd_arch_obscure,   {* Arch known, not one of these.  *}
72 .  bfd_arch_m68k,      {* Motorola 68xxx.  *}
73 .#define bfd_mach_m68000                1
74 .#define bfd_mach_m68008                2
75 .#define bfd_mach_m68010                3
76 .#define bfd_mach_m68020                4
77 .#define bfd_mach_m68030                5
78 .#define bfd_mach_m68040                6
79 .#define bfd_mach_m68060                7
80 .#define bfd_mach_cpu32                 8
81 .#define bfd_mach_fido                  9
82 .#define bfd_mach_mcf_isa_a_nodiv       10
83 .#define bfd_mach_mcf_isa_a             11
84 .#define bfd_mach_mcf_isa_a_mac         12
85 .#define bfd_mach_mcf_isa_a_emac        13
86 .#define bfd_mach_mcf_isa_aplus         14
87 .#define bfd_mach_mcf_isa_aplus_mac     15
88 .#define bfd_mach_mcf_isa_aplus_emac    16
89 .#define bfd_mach_mcf_isa_b_nousp       17
90 .#define bfd_mach_mcf_isa_b_nousp_mac   18
91 .#define bfd_mach_mcf_isa_b_nousp_emac  19
92 .#define bfd_mach_mcf_isa_b             20
93 .#define bfd_mach_mcf_isa_b_mac         21
94 .#define bfd_mach_mcf_isa_b_emac        22
95 .#define bfd_mach_mcf_isa_b_float       23
96 .#define bfd_mach_mcf_isa_b_float_mac   24
97 .#define bfd_mach_mcf_isa_b_float_emac  25
98 .#define bfd_mach_mcf_isa_c             26
99 .#define bfd_mach_mcf_isa_c_mac         27
100 .#define bfd_mach_mcf_isa_c_emac        28
101 .#define bfd_mach_mcf_isa_c_nodiv       29
102 .#define bfd_mach_mcf_isa_c_nodiv_mac   30
103 .#define bfd_mach_mcf_isa_c_nodiv_emac  31
104 .  bfd_arch_vax,       {* DEC Vax.  *}
105 .
106 .  bfd_arch_or1k,      {* OpenRISC 1000.  *}
107 .#define bfd_mach_or1k          1
108 .#define bfd_mach_or1knd        2
109 .
110 .  bfd_arch_sparc,     {* SPARC.  *}
111 .#define bfd_mach_sparc                 1
112 .{* The difference between v8plus and v9 is that v9 is a true 64 bit env.  *}
113 .#define bfd_mach_sparc_sparclet        2
114 .#define bfd_mach_sparc_sparclite       3
115 .#define bfd_mach_sparc_v8plus          4
116 .#define bfd_mach_sparc_v8plusa         5 {* with ultrasparc add'ns.  *}
117 .#define bfd_mach_sparc_sparclite_le    6
118 .#define bfd_mach_sparc_v9              7
119 .#define bfd_mach_sparc_v9a             8 {* with ultrasparc add'ns.  *}
120 .#define bfd_mach_sparc_v8plusb         9 {* with cheetah add'ns.  *}
121 .#define bfd_mach_sparc_v9b             10 {* with cheetah add'ns.  *}
122 .#define bfd_mach_sparc_v8plusc         11 {* with UA2005 and T1 add'ns.  *}
123 .#define bfd_mach_sparc_v9c             12 {* with UA2005 and T1 add'ns.  *}
124 .#define bfd_mach_sparc_v8plusd         13 {* with UA2007 and T3 add'ns.  *}
125 .#define bfd_mach_sparc_v9d             14 {* with UA2007 and T3 add'ns.  *}
126 .#define bfd_mach_sparc_v8pluse         15 {* with OSA2001 and T4 add'ns (no IMA).  *}
127 .#define bfd_mach_sparc_v9e             16 {* with OSA2001 and T4 add'ns (no IMA).  *}
128 .#define bfd_mach_sparc_v8plusv         17 {* with OSA2011 and T4 and IMA and FJMAU add'ns.  *}
129 .#define bfd_mach_sparc_v9v             18 {* with OSA2011 and T4 and IMA and FJMAU add'ns.  *}
130 .#define bfd_mach_sparc_v8plusm         19 {* with OSA2015 and M7 add'ns.  *}
131 .#define bfd_mach_sparc_v9m             20 {* with OSA2015 and M7 add'ns.  *}
132 .#define bfd_mach_sparc_v8plusm8        21 {* with OSA2017 and M8 add'ns.  *}
133 .#define bfd_mach_sparc_v9m8            22 {* with OSA2017 and M8 add'ns.  *}
134 .{* Nonzero if MACH has the v9 instruction set.  *}
135 .#define bfd_mach_sparc_v9_p(mach) \
136 .  ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9m8 \
137 .   && (mach) != bfd_mach_sparc_sparclite_le)
138 .{* Nonzero if MACH is a 64 bit sparc architecture.  *}
139 .#define bfd_mach_sparc_64bit_p(mach) \
140 .  ((mach) >= bfd_mach_sparc_v9 \
141 .   && (mach) != bfd_mach_sparc_v8plusb \
142 .   && (mach) != bfd_mach_sparc_v8plusc \
143 .   && (mach) != bfd_mach_sparc_v8plusd \
144 .   && (mach) != bfd_mach_sparc_v8pluse \
145 .   && (mach) != bfd_mach_sparc_v8plusv \
146 .   && (mach) != bfd_mach_sparc_v8plusm \
147 .   && (mach) != bfd_mach_sparc_v8plusm8)
148 .  bfd_arch_spu,       {* PowerPC SPU.  *}
149 .#define bfd_mach_spu           256
150 .  bfd_arch_mips,      {* MIPS Rxxxx.  *}
151 .#define bfd_mach_mips3000              3000
152 .#define bfd_mach_mips3900              3900
153 .#define bfd_mach_mips4000              4000
154 .#define bfd_mach_mips4010              4010
155 .#define bfd_mach_mips4100              4100
156 .#define bfd_mach_mips4111              4111
157 .#define bfd_mach_mips4120              4120
158 .#define bfd_mach_mips4300              4300
159 .#define bfd_mach_mips4400              4400
160 .#define bfd_mach_mips4600              4600
161 .#define bfd_mach_mips4650              4650
162 .#define bfd_mach_mips5000              5000
163 .#define bfd_mach_mips5400              5400
164 .#define bfd_mach_mips5500              5500
165 .#define bfd_mach_mips5900              5900
166 .#define bfd_mach_mips6000              6000
167 .#define bfd_mach_mips7000              7000
168 .#define bfd_mach_mips8000              8000
169 .#define bfd_mach_mips9000              9000
170 .#define bfd_mach_mips10000             10000
171 .#define bfd_mach_mips12000             12000
172 .#define bfd_mach_mips14000             14000
173 .#define bfd_mach_mips16000             16000
174 .#define bfd_mach_mips16                16
175 .#define bfd_mach_mips5                 5
176 .#define bfd_mach_mips_loongson_2e      3001
177 .#define bfd_mach_mips_loongson_2f      3002
178 .#define bfd_mach_mips_loongson_3a      3003
179 .#define bfd_mach_mips_sb1              12310201 {* octal 'SB', 01.  *}
180 .#define bfd_mach_mips_octeon           6501
181 .#define bfd_mach_mips_octeonp          6601
182 .#define bfd_mach_mips_octeon2          6502
183 .#define bfd_mach_mips_octeon3          6503
184 .#define bfd_mach_mips_xlr              887682   {* decimal 'XLR'.  *}
185 .#define bfd_mach_mips_interaptiv_mr2   736550   {* decimal 'IA2'.  *}
186 .#define bfd_mach_mipsisa32             32
187 .#define bfd_mach_mipsisa32r2           33
188 .#define bfd_mach_mipsisa32r3           34
189 .#define bfd_mach_mipsisa32r5           36
190 .#define bfd_mach_mipsisa32r6           37
191 .#define bfd_mach_mipsisa64             64
192 .#define bfd_mach_mipsisa64r2           65
193 .#define bfd_mach_mipsisa64r3           66
194 .#define bfd_mach_mipsisa64r5           68
195 .#define bfd_mach_mipsisa64r6           69
196 .#define bfd_mach_mips_micromips        96
197 .  bfd_arch_i386,      {* Intel 386.  *}
198 .#define bfd_mach_i386_intel_syntax     (1 << 0)
199 .#define bfd_mach_i386_i8086            (1 << 1)
200 .#define bfd_mach_i386_i386             (1 << 2)
201 .#define bfd_mach_x86_64                (1 << 3)
202 .#define bfd_mach_x64_32                (1 << 4)
203 .#define bfd_mach_i386_i386_intel_syntax (bfd_mach_i386_i386 | bfd_mach_i386_intel_syntax)
204 .#define bfd_mach_x86_64_intel_syntax   (bfd_mach_x86_64 | bfd_mach_i386_intel_syntax)
205 .#define bfd_mach_x64_32_intel_syntax   (bfd_mach_x64_32 | bfd_mach_i386_intel_syntax)
206 .  bfd_arch_l1om,      {* Intel L1OM.  *}
207 .#define bfd_mach_l1om                  (1 << 5)
208 .#define bfd_mach_l1om_intel_syntax     (bfd_mach_l1om | bfd_mach_i386_intel_syntax)
209 .  bfd_arch_k1om,      {* Intel K1OM.  *}
210 .#define bfd_mach_k1om                  (1 << 6)
211 .#define bfd_mach_k1om_intel_syntax     (bfd_mach_k1om | bfd_mach_i386_intel_syntax)
212 .#define bfd_mach_i386_nacl             (1 << 7)
213 .#define bfd_mach_i386_i386_nacl        (bfd_mach_i386_i386 | bfd_mach_i386_nacl)
214 .#define bfd_mach_x86_64_nacl           (bfd_mach_x86_64 | bfd_mach_i386_nacl)
215 .#define bfd_mach_x64_32_nacl           (bfd_mach_x64_32 | bfd_mach_i386_nacl)
216 .  bfd_arch_iamcu,     {* Intel MCU.  *}
217 .#define bfd_mach_iamcu                 (1 << 8)
218 .#define bfd_mach_i386_iamcu            (bfd_mach_i386_i386 | bfd_mach_iamcu)
219 .#define bfd_mach_i386_iamcu_intel_syntax (bfd_mach_i386_iamcu | bfd_mach_i386_intel_syntax)
220 .  bfd_arch_romp,      {* IBM ROMP PC/RT.  *}
221 .  bfd_arch_convex,    {* Convex.  *}
222 .  bfd_arch_m98k,      {* Motorola 98xxx.  *}
223 .  bfd_arch_pyramid,   {* Pyramid Technology.  *}
224 .  bfd_arch_h8300,     {* Renesas H8/300 (formerly Hitachi H8/300).  *}
225 .#define bfd_mach_h8300         1
226 .#define bfd_mach_h8300h        2
227 .#define bfd_mach_h8300s        3
228 .#define bfd_mach_h8300hn       4
229 .#define bfd_mach_h8300sn       5
230 .#define bfd_mach_h8300sx       6
231 .#define bfd_mach_h8300sxn      7
232 .  bfd_arch_pdp11,     {* DEC PDP-11.  *}
233 .  bfd_arch_plugin,
234 .  bfd_arch_powerpc,   {* PowerPC.  *}
235 .#define bfd_mach_ppc           32
236 .#define bfd_mach_ppc64         64
237 .#define bfd_mach_ppc_403       403
238 .#define bfd_mach_ppc_403gc     4030
239 .#define bfd_mach_ppc_405       405
240 .#define bfd_mach_ppc_505       505
241 .#define bfd_mach_ppc_601       601
242 .#define bfd_mach_ppc_602       602
243 .#define bfd_mach_ppc_603       603
244 .#define bfd_mach_ppc_ec603e    6031
245 .#define bfd_mach_ppc_604       604
246 .#define bfd_mach_ppc_620       620
247 .#define bfd_mach_ppc_630       630
248 .#define bfd_mach_ppc_750       750
249 .#define bfd_mach_ppc_860       860
250 .#define bfd_mach_ppc_a35       35
251 .#define bfd_mach_ppc_rs64ii    642
252 .#define bfd_mach_ppc_rs64iii   643
253 .#define bfd_mach_ppc_7400      7400
254 .#define bfd_mach_ppc_e500      500
255 .#define bfd_mach_ppc_e500mc    5001
256 .#define bfd_mach_ppc_e500mc64  5005
257 .#define bfd_mach_ppc_e5500     5006
258 .#define bfd_mach_ppc_e6500     5007
259 .#define bfd_mach_ppc_titan     83
260 .#define bfd_mach_ppc_vle       84
261 .  bfd_arch_rs6000,    {* IBM RS/6000.  *}
262 .#define bfd_mach_rs6k          6000
263 .#define bfd_mach_rs6k_rs1      6001
264 .#define bfd_mach_rs6k_rsc      6003
265 .#define bfd_mach_rs6k_rs2      6002
266 .  bfd_arch_hppa,      {* HP PA RISC.  *}
267 .#define bfd_mach_hppa10        10
268 .#define bfd_mach_hppa11        11
269 .#define bfd_mach_hppa20        20
270 .#define bfd_mach_hppa20w       25
271 .  bfd_arch_d10v,      {* Mitsubishi D10V.  *}
272 .#define bfd_mach_d10v          1
273 .#define bfd_mach_d10v_ts2      2
274 .#define bfd_mach_d10v_ts3      3
275 .  bfd_arch_d30v,      {* Mitsubishi D30V.  *}
276 .  bfd_arch_dlx,       {* DLX.  *}
277 .  bfd_arch_m68hc11,   {* Motorola 68HC11.  *}
278 .  bfd_arch_m68hc12,   {* Motorola 68HC12.  *}
279 .#define bfd_mach_m6812_default 0
280 .#define bfd_mach_m6812         1
281 .#define bfd_mach_m6812s        2
282 .  bfd_arch_m9s12x,    {* Freescale S12X.  *}
283 .  bfd_arch_m9s12xg,   {* Freescale XGATE.  *}
284 .  bfd_arch_s12z,    {* Freescale S12Z.  *}
285 .#define bfd_mach_s12z_default 0
286 .  bfd_arch_z8k,       {* Zilog Z8000.  *}
287 .#define bfd_mach_z8001         1
288 .#define bfd_mach_z8002         2
289 .  bfd_arch_sh,        {* Renesas / SuperH SH (formerly Hitachi SH).  *}
290 .#define bfd_mach_sh                            1
291 .#define bfd_mach_sh2                           0x20
292 .#define bfd_mach_sh_dsp                        0x2d
293 .#define bfd_mach_sh2a                          0x2a
294 .#define bfd_mach_sh2a_nofpu                    0x2b
295 .#define bfd_mach_sh2a_nofpu_or_sh4_nommu_nofpu 0x2a1
296 .#define bfd_mach_sh2a_nofpu_or_sh3_nommu       0x2a2
297 .#define bfd_mach_sh2a_or_sh4                   0x2a3
298 .#define bfd_mach_sh2a_or_sh3e                  0x2a4
299 .#define bfd_mach_sh2e                          0x2e
300 .#define bfd_mach_sh3                           0x30
301 .#define bfd_mach_sh3_nommu                     0x31
302 .#define bfd_mach_sh3_dsp                       0x3d
303 .#define bfd_mach_sh3e                          0x3e
304 .#define bfd_mach_sh4                           0x40
305 .#define bfd_mach_sh4_nofpu                     0x41
306 .#define bfd_mach_sh4_nommu_nofpu               0x42
307 .#define bfd_mach_sh4a                          0x4a
308 .#define bfd_mach_sh4a_nofpu                    0x4b
309 .#define bfd_mach_sh4al_dsp                     0x4d
310 .  bfd_arch_alpha,     {* Dec Alpha.  *}
311 .#define bfd_mach_alpha_ev4     0x10
312 .#define bfd_mach_alpha_ev5     0x20
313 .#define bfd_mach_alpha_ev6     0x30
314 .  bfd_arch_arm,       {* Advanced Risc Machines ARM.  *}
315 .#define bfd_mach_arm_unknown   0
316 .#define bfd_mach_arm_2         1
317 .#define bfd_mach_arm_2a        2
318 .#define bfd_mach_arm_3         3
319 .#define bfd_mach_arm_3M        4
320 .#define bfd_mach_arm_4         5
321 .#define bfd_mach_arm_4T        6
322 .#define bfd_mach_arm_5         7
323 .#define bfd_mach_arm_5T        8
324 .#define bfd_mach_arm_5TE       9
325 .#define bfd_mach_arm_XScale    10
326 .#define bfd_mach_arm_ep9312    11
327 .#define bfd_mach_arm_iWMMXt    12
328 .#define bfd_mach_arm_iWMMXt2   13
329 .#define bfd_mach_arm_5TEJ      14
330 .#define bfd_mach_arm_6         15
331 .#define bfd_mach_arm_6KZ       16
332 .#define bfd_mach_arm_6T2       17
333 .#define bfd_mach_arm_6K        18
334 .#define bfd_mach_arm_7         19
335 .#define bfd_mach_arm_6M        20
336 .#define bfd_mach_arm_6SM       21
337 .#define bfd_mach_arm_7EM       22
338 .#define bfd_mach_arm_8         23
339 .#define bfd_mach_arm_8R        24
340 .#define bfd_mach_arm_8M_BASE   25
341 .#define bfd_mach_arm_8M_MAIN   26
342 .  bfd_arch_nds32,     {* Andes NDS32.  *}
343 .#define bfd_mach_n1            1
344 .#define bfd_mach_n1h           2
345 .#define bfd_mach_n1h_v2        3
346 .#define bfd_mach_n1h_v3        4
347 .#define bfd_mach_n1h_v3m       5
348 .  bfd_arch_ns32k,     {* National Semiconductors ns32000.  *}
349 .  bfd_arch_tic30,     {* Texas Instruments TMS320C30.  *}
350 .  bfd_arch_tic4x,     {* Texas Instruments TMS320C3X/4X.  *}
351 .#define bfd_mach_tic3x         30
352 .#define bfd_mach_tic4x         40
353 .  bfd_arch_tic54x,    {* Texas Instruments TMS320C54X.  *}
354 .  bfd_arch_tic6x,     {* Texas Instruments TMS320C6X.  *}
355 .  bfd_arch_tic80,     {* TI TMS320c80 (MVP).  *}
356 .  bfd_arch_v850,      {* NEC V850.  *}
357 .  bfd_arch_v850_rh850,{* NEC V850 (using RH850 ABI).  *}
358 .#define bfd_mach_v850          1
359 .#define bfd_mach_v850e         'E'
360 .#define bfd_mach_v850e1        '1'
361 .#define bfd_mach_v850e2        0x4532
362 .#define bfd_mach_v850e2v3      0x45325633
363 .#define bfd_mach_v850e3v5      0x45335635 {* ('E'|'3'|'V'|'5').  *}
364 .  bfd_arch_arc,       {* ARC Cores.  *}
365 .#define bfd_mach_arc_a4        0
366 .#define bfd_mach_arc_a5        1
367 .#define bfd_mach_arc_arc600    2
368 .#define bfd_mach_arc_arc601    4
369 .#define bfd_mach_arc_arc700    3
370 .#define bfd_mach_arc_arcv2     5
371 . bfd_arch_m32c,       {* Renesas M16C/M32C.  *}
372 .#define bfd_mach_m16c          0x75
373 .#define bfd_mach_m32c          0x78
374 .  bfd_arch_m32r,      {* Renesas M32R (formerly Mitsubishi M32R/D).  *}
375 .#define bfd_mach_m32r          1 {* For backwards compatibility.  *}
376 .#define bfd_mach_m32rx         'x'
377 .#define bfd_mach_m32r2         '2'
378 .  bfd_arch_mn10200,   {* Matsushita MN10200.  *}
379 .  bfd_arch_mn10300,   {* Matsushita MN10300.  *}
380 .#define bfd_mach_mn10300       300
381 .#define bfd_mach_am33          330
382 .#define bfd_mach_am33_2        332
383 .  bfd_arch_fr30,
384 .#define bfd_mach_fr30          0x46523330
385 .  bfd_arch_frv,
386 .#define bfd_mach_frv           1
387 .#define bfd_mach_frvsimple     2
388 .#define bfd_mach_fr300         300
389 .#define bfd_mach_fr400         400
390 .#define bfd_mach_fr450         450
391 .#define bfd_mach_frvtomcat     499     {* fr500 prototype.  *}
392 .#define bfd_mach_fr500         500
393 .#define bfd_mach_fr550         550
394 .  bfd_arch_moxie,     {* The moxie processor.  *}
395 .#define bfd_mach_moxie         1
396 .  bfd_arch_ft32,      {* The ft32 processor.  *}
397 .#define bfd_mach_ft32          1
398 .#define bfd_mach_ft32b         2
399 .  bfd_arch_mcore,
400 .  bfd_arch_mep,
401 .#define bfd_mach_mep           1
402 .#define bfd_mach_mep_h1        0x6831
403 .#define bfd_mach_mep_c5        0x6335
404 .  bfd_arch_metag,
405 .#define bfd_mach_metag         1
406 .  bfd_arch_ia64,      {* HP/Intel ia64.  *}
407 .#define bfd_mach_ia64_elf64    64
408 .#define bfd_mach_ia64_elf32    32
409 .  bfd_arch_ip2k,      {* Ubicom IP2K microcontrollers. *}
410 .#define bfd_mach_ip2022        1
411 .#define bfd_mach_ip2022ext     2
412 . bfd_arch_iq2000,     {* Vitesse IQ2000.  *}
413 .#define bfd_mach_iq2000        1
414 .#define bfd_mach_iq10          2
415 .  bfd_arch_epiphany,  {* Adapteva EPIPHANY.  *}
416 .#define bfd_mach_epiphany16    1
417 .#define bfd_mach_epiphany32    2
418 .  bfd_arch_mt,
419 .#define bfd_mach_ms1           1
420 .#define bfd_mach_mrisc2        2
421 .#define bfd_mach_ms2           3
422 .  bfd_arch_pj,
423 .  bfd_arch_avr,       {* Atmel AVR microcontrollers.  *}
424 .#define bfd_mach_avr1          1
425 .#define bfd_mach_avr2          2
426 .#define bfd_mach_avr25         25
427 .#define bfd_mach_avr3          3
428 .#define bfd_mach_avr31         31
429 .#define bfd_mach_avr35         35
430 .#define bfd_mach_avr4          4
431 .#define bfd_mach_avr5          5
432 .#define bfd_mach_avr51         51
433 .#define bfd_mach_avr6          6
434 .#define bfd_mach_avrtiny       100
435 .#define bfd_mach_avrxmega1     101
436 .#define bfd_mach_avrxmega2     102
437 .#define bfd_mach_avrxmega3     103
438 .#define bfd_mach_avrxmega4     104
439 .#define bfd_mach_avrxmega5     105
440 .#define bfd_mach_avrxmega6     106
441 .#define bfd_mach_avrxmega7     107
442 .  bfd_arch_bfin,      {* ADI Blackfin.  *}
443 .#define bfd_mach_bfin          1
444 .  bfd_arch_cr16,      {* National Semiconductor CompactRISC (ie CR16).  *}
445 .#define bfd_mach_cr16          1
446 .  bfd_arch_cr16c,     {* National Semiconductor CompactRISC.  *}
447 .#define bfd_mach_cr16c         1
448 .  bfd_arch_crx,       {*  National Semiconductor CRX.  *}
449 .#define bfd_mach_crx           1
450 .  bfd_arch_cris,      {* Axis CRIS.  *}
451 .#define bfd_mach_cris_v0_v10   255
452 .#define bfd_mach_cris_v32      32
453 .#define bfd_mach_cris_v10_v32  1032
454 .  bfd_arch_riscv,
455 .#define bfd_mach_riscv32       132
456 .#define bfd_mach_riscv64       164
457 .  bfd_arch_rl78,
458 .#define bfd_mach_rl78          0x75
459 .  bfd_arch_rx,        {* Renesas RX.  *}
460 .#define bfd_mach_rx            0x75
461 .  bfd_arch_s390,      {* IBM s390.  *}
462 .#define bfd_mach_s390_31       31
463 .#define bfd_mach_s390_64       64
464 .  bfd_arch_score,     {* Sunplus score.  *}
465 .#define bfd_mach_score3        3
466 .#define bfd_mach_score7        7
467 .  bfd_arch_mmix,      {* Donald Knuth's educational processor.  *}
468 .  bfd_arch_xstormy16,
469 .#define bfd_mach_xstormy16     1
470 .  bfd_arch_msp430,    {* Texas Instruments MSP430 architecture.  *}
471 .#define bfd_mach_msp11         11
472 .#define bfd_mach_msp110        110
473 .#define bfd_mach_msp12         12
474 .#define bfd_mach_msp13         13
475 .#define bfd_mach_msp14         14
476 .#define bfd_mach_msp15         15
477 .#define bfd_mach_msp16         16
478 .#define bfd_mach_msp20         20
479 .#define bfd_mach_msp21         21
480 .#define bfd_mach_msp22         22
481 .#define bfd_mach_msp23         23
482 .#define bfd_mach_msp24         24
483 .#define bfd_mach_msp26         26
484 .#define bfd_mach_msp31         31
485 .#define bfd_mach_msp32         32
486 .#define bfd_mach_msp33         33
487 .#define bfd_mach_msp41         41
488 .#define bfd_mach_msp42         42
489 .#define bfd_mach_msp43         43
490 .#define bfd_mach_msp44         44
491 .#define bfd_mach_msp430x       45
492 .#define bfd_mach_msp46         46
493 .#define bfd_mach_msp47         47
494 .#define bfd_mach_msp54         54
495 .  bfd_arch_xc16x,     {* Infineon's XC16X Series.  *}
496 .#define bfd_mach_xc16x         1
497 .#define bfd_mach_xc16xl        2
498 .#define bfd_mach_xc16xs        3
499 .  bfd_arch_xgate,     {* Freescale XGATE.  *}
500 .#define bfd_mach_xgate         1
501 .  bfd_arch_xtensa,    {* Tensilica's Xtensa cores.  *}
502 .#define bfd_mach_xtensa        1
503 .  bfd_arch_z80,
504 .#define bfd_mach_z80strict     1 {* No undocumented opcodes.  *}
505 .#define bfd_mach_z80           3 {* With ixl, ixh, iyl, and iyh.  *}
506 .#define bfd_mach_z80full       7 {* All undocumented instructions.  *}
507 .#define bfd_mach_r800          11 {* R800: successor with multiplication.  *}
508 .  bfd_arch_lm32,      {* Lattice Mico32.  *}
509 .#define bfd_mach_lm32          1
510 .  bfd_arch_microblaze,{* Xilinx MicroBlaze.  *}
511 .  bfd_arch_tilepro,   {* Tilera TILEPro.  *}
512 .  bfd_arch_tilegx,    {* Tilera TILE-Gx.  *}
513 .#define bfd_mach_tilepro       1
514 .#define bfd_mach_tilegx        1
515 .#define bfd_mach_tilegx32      2
516 .  bfd_arch_aarch64,   {* AArch64.  *}
517 .#define bfd_mach_aarch64 0
518 .#define bfd_mach_aarch64_ilp32 32
519 .  bfd_arch_nios2,     {* Nios II.  *}
520 .#define bfd_mach_nios2         0
521 .#define bfd_mach_nios2r1       1
522 .#define bfd_mach_nios2r2       2
523 .  bfd_arch_visium,    {* Visium.  *}
524 .#define bfd_mach_visium        1
525 .  bfd_arch_wasm32,    {* WebAssembly.  *}
526 .#define bfd_mach_wasm32        1
527 .  bfd_arch_pru,       {* PRU.  *}
528 .#define bfd_mach_pru           0
529 .  bfd_arch_nfp,       {* Netronome Flow Processor *}
530 .#define bfd_mach_nfp3200       0x3200
531 .#define bfd_mach_nfp6000       0x6000
532 .  bfd_arch_last
533 .  };
534 */
535
536 /*
537 SUBSECTION
538         bfd_arch_info
539
540 DESCRIPTION
541         This structure contains information on architectures for use
542         within BFD.
543
544 .
545 .typedef struct bfd_arch_info
546 .{
547 .  int bits_per_word;
548 .  int bits_per_address;
549 .  int bits_per_byte;
550 .  enum bfd_architecture arch;
551 .  unsigned long mach;
552 .  const char *arch_name;
553 .  const char *printable_name;
554 .  unsigned int section_align_power;
555 .  {* TRUE if this is the default machine for the architecture.
556 .     The default arch should be the first entry for an arch so that
557 .     all the entries for that arch can be accessed via <<next>>.  *}
558 .  bfd_boolean the_default;
559 .  const struct bfd_arch_info * (*compatible) (const struct bfd_arch_info *,
560 .                                              const struct bfd_arch_info *);
561 .
562 .  bfd_boolean (*scan) (const struct bfd_arch_info *, const char *);
563 .
564 .  {* Allocate via bfd_malloc and return a fill buffer of size COUNT.  If
565 .     IS_BIGENDIAN is TRUE, the order of bytes is big endian.  If CODE is
566 .     TRUE, the buffer contains code.  *}
567 .  void *(*fill) (bfd_size_type count, bfd_boolean is_bigendian,
568 .                 bfd_boolean code);
569 .
570 .  const struct bfd_arch_info *next;
571 .}
572 .bfd_arch_info_type;
573 .
574 */
575
576 extern const bfd_arch_info_type bfd_aarch64_arch;
577 extern const bfd_arch_info_type bfd_alpha_arch;
578 extern const bfd_arch_info_type bfd_arc_arch;
579 extern const bfd_arch_info_type bfd_arm_arch;
580 extern const bfd_arch_info_type bfd_avr_arch;
581 extern const bfd_arch_info_type bfd_bfin_arch;
582 extern const bfd_arch_info_type bfd_cr16_arch;
583 extern const bfd_arch_info_type bfd_cr16c_arch;
584 extern const bfd_arch_info_type bfd_cris_arch;
585 extern const bfd_arch_info_type bfd_crx_arch;
586 extern const bfd_arch_info_type bfd_d10v_arch;
587 extern const bfd_arch_info_type bfd_d30v_arch;
588 extern const bfd_arch_info_type bfd_dlx_arch;
589 extern const bfd_arch_info_type bfd_epiphany_arch;
590 extern const bfd_arch_info_type bfd_fr30_arch;
591 extern const bfd_arch_info_type bfd_frv_arch;
592 extern const bfd_arch_info_type bfd_h8300_arch;
593 extern const bfd_arch_info_type bfd_hppa_arch;
594 extern const bfd_arch_info_type bfd_i386_arch;
595 extern const bfd_arch_info_type bfd_iamcu_arch;
596 extern const bfd_arch_info_type bfd_ia64_arch;
597 extern const bfd_arch_info_type bfd_ip2k_arch;
598 extern const bfd_arch_info_type bfd_iq2000_arch;
599 extern const bfd_arch_info_type bfd_k1om_arch;
600 extern const bfd_arch_info_type bfd_l1om_arch;
601 extern const bfd_arch_info_type bfd_lm32_arch;
602 extern const bfd_arch_info_type bfd_m32c_arch;
603 extern const bfd_arch_info_type bfd_m32r_arch;
604 extern const bfd_arch_info_type bfd_m68hc11_arch;
605 extern const bfd_arch_info_type bfd_m68hc12_arch;
606 extern const bfd_arch_info_type bfd_m9s12x_arch;
607 extern const bfd_arch_info_type bfd_m9s12xg_arch;
608 extern const bfd_arch_info_type bfd_s12z_arch;
609 extern const bfd_arch_info_type bfd_m68k_arch;
610 extern const bfd_arch_info_type bfd_mcore_arch;
611 extern const bfd_arch_info_type bfd_mep_arch;
612 extern const bfd_arch_info_type bfd_metag_arch;
613 extern const bfd_arch_info_type bfd_mips_arch;
614 extern const bfd_arch_info_type bfd_microblaze_arch;
615 extern const bfd_arch_info_type bfd_mmix_arch;
616 extern const bfd_arch_info_type bfd_mn10200_arch;
617 extern const bfd_arch_info_type bfd_mn10300_arch;
618 extern const bfd_arch_info_type bfd_moxie_arch;
619 extern const bfd_arch_info_type bfd_ft32_arch;
620 extern const bfd_arch_info_type bfd_msp430_arch;
621 extern const bfd_arch_info_type bfd_mt_arch;
622 extern const bfd_arch_info_type bfd_nds32_arch;
623 extern const bfd_arch_info_type bfd_nfp_arch;
624 extern const bfd_arch_info_type bfd_nios2_arch;
625 extern const bfd_arch_info_type bfd_ns32k_arch;
626 extern const bfd_arch_info_type bfd_or1k_arch;
627 extern const bfd_arch_info_type bfd_pdp11_arch;
628 extern const bfd_arch_info_type bfd_pj_arch;
629 extern const bfd_arch_info_type bfd_plugin_arch;
630 extern const bfd_arch_info_type bfd_powerpc_archs[];
631 #define bfd_powerpc_arch bfd_powerpc_archs[0]
632 extern const bfd_arch_info_type bfd_pru_arch;
633 extern const bfd_arch_info_type bfd_riscv_arch;
634 extern const bfd_arch_info_type bfd_rs6000_arch;
635 extern const bfd_arch_info_type bfd_rl78_arch;
636 extern const bfd_arch_info_type bfd_rx_arch;
637 extern const bfd_arch_info_type bfd_s390_arch;
638 extern const bfd_arch_info_type bfd_score_arch;
639 extern const bfd_arch_info_type bfd_sh_arch;
640 extern const bfd_arch_info_type bfd_sparc_arch;
641 extern const bfd_arch_info_type bfd_spu_arch;
642 extern const bfd_arch_info_type bfd_tic30_arch;
643 extern const bfd_arch_info_type bfd_tic4x_arch;
644 extern const bfd_arch_info_type bfd_tic54x_arch;
645 extern const bfd_arch_info_type bfd_tic6x_arch;
646 extern const bfd_arch_info_type bfd_tic80_arch;
647 extern const bfd_arch_info_type bfd_tilegx_arch;
648 extern const bfd_arch_info_type bfd_tilepro_arch;
649 extern const bfd_arch_info_type bfd_v850_arch;
650 extern const bfd_arch_info_type bfd_v850_rh850_arch;
651 extern const bfd_arch_info_type bfd_vax_arch;
652 extern const bfd_arch_info_type bfd_visium_arch;
653 extern const bfd_arch_info_type bfd_wasm32_arch;
654 extern const bfd_arch_info_type bfd_xstormy16_arch;
655 extern const bfd_arch_info_type bfd_xtensa_arch;
656 extern const bfd_arch_info_type bfd_xc16x_arch;
657 extern const bfd_arch_info_type bfd_xgate_arch;
658 extern const bfd_arch_info_type bfd_z80_arch;
659 extern const bfd_arch_info_type bfd_z8k_arch;
660
661 static const bfd_arch_info_type * const bfd_archures_list[] =
662   {
663 #ifdef SELECT_ARCHITECTURES
664     SELECT_ARCHITECTURES,
665 #else
666     &bfd_aarch64_arch,
667     &bfd_alpha_arch,
668     &bfd_arc_arch,
669     &bfd_arm_arch,
670     &bfd_avr_arch,
671     &bfd_bfin_arch,
672     &bfd_cr16_arch,
673     &bfd_cr16c_arch,
674     &bfd_cris_arch,
675     &bfd_crx_arch,
676     &bfd_d10v_arch,
677     &bfd_d30v_arch,
678     &bfd_dlx_arch,
679     &bfd_epiphany_arch,
680     &bfd_fr30_arch,
681     &bfd_frv_arch,
682     &bfd_h8300_arch,
683     &bfd_hppa_arch,
684     &bfd_i386_arch,
685     &bfd_iamcu_arch,
686     &bfd_ia64_arch,
687     &bfd_ip2k_arch,
688     &bfd_iq2000_arch,
689     &bfd_k1om_arch,
690     &bfd_l1om_arch,
691     &bfd_lm32_arch,
692     &bfd_m32c_arch,
693     &bfd_m32r_arch,
694     &bfd_m68hc11_arch,
695     &bfd_m68hc12_arch,
696     &bfd_m9s12x_arch,
697     &bfd_m9s12xg_arch,
698     &bfd_s12z_arch,
699     &bfd_m68k_arch,
700     &bfd_mcore_arch,
701     &bfd_mep_arch,
702     &bfd_metag_arch,
703     &bfd_microblaze_arch,
704     &bfd_mips_arch,
705     &bfd_mmix_arch,
706     &bfd_mn10200_arch,
707     &bfd_mn10300_arch,
708     &bfd_moxie_arch,
709     &bfd_ft32_arch,
710     &bfd_msp430_arch,
711     &bfd_mt_arch,
712     &bfd_nds32_arch,
713     &bfd_nfp_arch,
714     &bfd_nios2_arch,
715     &bfd_ns32k_arch,
716     &bfd_or1k_arch,
717     &bfd_pdp11_arch,
718     &bfd_powerpc_arch,
719     &bfd_pru_arch,
720     &bfd_riscv_arch,
721     &bfd_rl78_arch,
722     &bfd_rs6000_arch,
723     &bfd_rx_arch,
724     &bfd_s390_arch,
725     &bfd_score_arch,
726     &bfd_sh_arch,
727     &bfd_sparc_arch,
728     &bfd_spu_arch,
729     &bfd_tic30_arch,
730     &bfd_tic4x_arch,
731     &bfd_tic54x_arch,
732     &bfd_tic6x_arch,
733     &bfd_tic80_arch,
734     &bfd_tilegx_arch,
735     &bfd_tilepro_arch,
736     &bfd_v850_arch,
737     &bfd_v850_rh850_arch,
738     &bfd_vax_arch,
739     &bfd_visium_arch,
740     &bfd_wasm32_arch,
741     &bfd_xstormy16_arch,
742     &bfd_xtensa_arch,
743     &bfd_xc16x_arch,
744     &bfd_xgate_arch,
745     &bfd_z80_arch,
746     &bfd_z8k_arch,
747 #endif
748   0
749 };
750
751 /*
752 FUNCTION
753         bfd_printable_name
754
755 SYNOPSIS
756         const char *bfd_printable_name (bfd *abfd);
757
758 DESCRIPTION
759         Return a printable string representing the architecture and machine
760         from the pointer to the architecture info structure.
761
762 */
763
764 const char *
765 bfd_printable_name (bfd *abfd)
766 {
767   return abfd->arch_info->printable_name;
768 }
769
770 /*
771 FUNCTION
772         bfd_scan_arch
773
774 SYNOPSIS
775         const bfd_arch_info_type *bfd_scan_arch (const char *string);
776
777 DESCRIPTION
778         Figure out if BFD supports any cpu which could be described with
779         the name @var{string}.  Return a pointer to an <<arch_info>>
780         structure if a machine is found, otherwise NULL.
781 */
782
783 const bfd_arch_info_type *
784 bfd_scan_arch (const char *string)
785 {
786   const bfd_arch_info_type * const *app, *ap;
787
788   /* Look through all the installed architectures.  */
789   for (app = bfd_archures_list; *app != NULL; app++)
790     {
791       for (ap = *app; ap != NULL; ap = ap->next)
792         {
793           if (ap->scan (ap, string))
794             return ap;
795         }
796     }
797
798   return NULL;
799 }
800
801 /*
802 FUNCTION
803         bfd_arch_list
804
805 SYNOPSIS
806         const char **bfd_arch_list (void);
807
808 DESCRIPTION
809         Return a freshly malloced NULL-terminated vector of the names
810         of all the valid BFD architectures.  Do not modify the names.
811 */
812
813 const char **
814 bfd_arch_list (void)
815 {
816   int vec_length = 0;
817   const char **name_ptr;
818   const char **name_list;
819   const bfd_arch_info_type * const *app;
820   bfd_size_type amt;
821
822   /* Determine the number of architectures.  */
823   vec_length = 0;
824   for (app = bfd_archures_list; *app != NULL; app++)
825     {
826       const bfd_arch_info_type *ap;
827       for (ap = *app; ap != NULL; ap = ap->next)
828         {
829           vec_length++;
830         }
831     }
832
833   amt = (vec_length + 1) * sizeof (char **);
834   name_list = (const char **) bfd_malloc (amt);
835   if (name_list == NULL)
836     return NULL;
837
838   /* Point the list at each of the names.  */
839   name_ptr = name_list;
840   for (app = bfd_archures_list; *app != NULL; app++)
841     {
842       const bfd_arch_info_type *ap;
843       for (ap = *app; ap != NULL; ap = ap->next)
844         {
845           *name_ptr = ap->printable_name;
846           name_ptr++;
847         }
848     }
849   *name_ptr = NULL;
850
851   return name_list;
852 }
853
854 /*
855 FUNCTION
856         bfd_arch_get_compatible
857
858 SYNOPSIS
859         const bfd_arch_info_type *bfd_arch_get_compatible
860           (const bfd *abfd, const bfd *bbfd, bfd_boolean accept_unknowns);
861
862 DESCRIPTION
863         Determine whether two BFDs' architectures and machine types
864         are compatible.  Calculates the lowest common denominator
865         between the two architectures and machine types implied by
866         the BFDs and returns a pointer to an <<arch_info>> structure
867         describing the compatible machine.
868 */
869
870 const bfd_arch_info_type *
871 bfd_arch_get_compatible (const bfd *abfd,
872                          const bfd *bbfd,
873                          bfd_boolean accept_unknowns)
874 {
875   const bfd *ubfd, *kbfd;
876
877   /* Look for an unknown architecture.  */
878   if (abfd->arch_info->arch == bfd_arch_unknown)
879     ubfd = abfd, kbfd = bbfd;
880   else if (bbfd->arch_info->arch == bfd_arch_unknown)
881     ubfd = bbfd, kbfd = abfd;
882   else
883     /* Otherwise architecture-specific code has to decide.  */
884     return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
885
886   /* We can allow an unknown architecture if accept_unknowns
887      is true, or if the target is the "binary" format, which
888      has an unknown architecture.  Since the binary format can
889      only be set by explicit request from the user, it is safe
890      to assume that they know what they are doing.  */
891   if (accept_unknowns
892       || strcmp (bfd_get_target (ubfd), "binary") == 0)
893     return kbfd->arch_info;
894   return NULL;
895 }
896
897 /*
898 INTERNAL_DEFINITION
899         bfd_default_arch_struct
900
901 DESCRIPTION
902         The <<bfd_default_arch_struct>> is an item of
903         <<bfd_arch_info_type>> which has been initialized to a fairly
904         generic state.  A BFD starts life by pointing to this
905         structure, until the correct back end has determined the real
906         architecture of the file.
907
908 .extern const bfd_arch_info_type bfd_default_arch_struct;
909 */
910
911 const bfd_arch_info_type bfd_default_arch_struct = {
912   32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, TRUE,
913   bfd_default_compatible,
914   bfd_default_scan,
915   bfd_arch_default_fill,
916   0,
917 };
918
919 /*
920 FUNCTION
921         bfd_set_arch_info
922
923 SYNOPSIS
924         void bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg);
925
926 DESCRIPTION
927         Set the architecture info of @var{abfd} to @var{arg}.
928 */
929
930 void
931 bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg)
932 {
933   abfd->arch_info = arg;
934 }
935
936 /*
937 FUNCTION
938         bfd_default_set_arch_mach
939
940 SYNOPSIS
941         bfd_boolean bfd_default_set_arch_mach
942           (bfd *abfd, enum bfd_architecture arch, unsigned long mach);
943
944 DESCRIPTION
945         Set the architecture and machine type in BFD @var{abfd}
946         to @var{arch} and @var{mach}.  Find the correct
947         pointer to a structure and insert it into the <<arch_info>>
948         pointer.
949 */
950
951 bfd_boolean
952 bfd_default_set_arch_mach (bfd *abfd,
953                            enum bfd_architecture arch,
954                            unsigned long mach)
955 {
956   abfd->arch_info = bfd_lookup_arch (arch, mach);
957   if (abfd->arch_info != NULL)
958     return TRUE;
959
960   abfd->arch_info = &bfd_default_arch_struct;
961   bfd_set_error (bfd_error_bad_value);
962   return FALSE;
963 }
964
965 /*
966 FUNCTION
967         bfd_get_arch
968
969 SYNOPSIS
970         enum bfd_architecture bfd_get_arch (bfd *abfd);
971
972 DESCRIPTION
973         Return the enumerated type which describes the BFD @var{abfd}'s
974         architecture.
975 */
976
977 enum bfd_architecture
978 bfd_get_arch (bfd *abfd)
979 {
980   return abfd->arch_info->arch;
981 }
982
983 /*
984 FUNCTION
985         bfd_get_mach
986
987 SYNOPSIS
988         unsigned long bfd_get_mach (bfd *abfd);
989
990 DESCRIPTION
991         Return the long type which describes the BFD @var{abfd}'s
992         machine.
993 */
994
995 unsigned long
996 bfd_get_mach (bfd *abfd)
997 {
998   return abfd->arch_info->mach;
999 }
1000
1001 /*
1002 FUNCTION
1003         bfd_arch_bits_per_byte
1004
1005 SYNOPSIS
1006         unsigned int bfd_arch_bits_per_byte (bfd *abfd);
1007
1008 DESCRIPTION
1009         Return the number of bits in one of the BFD @var{abfd}'s
1010         architecture's bytes.
1011 */
1012
1013 unsigned int
1014 bfd_arch_bits_per_byte (bfd *abfd)
1015 {
1016   return abfd->arch_info->bits_per_byte;
1017 }
1018
1019 /*
1020 FUNCTION
1021         bfd_arch_bits_per_address
1022
1023 SYNOPSIS
1024         unsigned int bfd_arch_bits_per_address (bfd *abfd);
1025
1026 DESCRIPTION
1027         Return the number of bits in one of the BFD @var{abfd}'s
1028         architecture's addresses.
1029 */
1030
1031 unsigned int
1032 bfd_arch_bits_per_address (bfd *abfd)
1033 {
1034   return abfd->arch_info->bits_per_address;
1035 }
1036
1037 /*
1038 INTERNAL_FUNCTION
1039         bfd_default_compatible
1040
1041 SYNOPSIS
1042         const bfd_arch_info_type *bfd_default_compatible
1043           (const bfd_arch_info_type *a, const bfd_arch_info_type *b);
1044
1045 DESCRIPTION
1046         The default function for testing for compatibility.
1047 */
1048
1049 const bfd_arch_info_type *
1050 bfd_default_compatible (const bfd_arch_info_type *a,
1051                         const bfd_arch_info_type *b)
1052 {
1053   if (a->arch != b->arch)
1054     return NULL;
1055
1056   if (a->bits_per_word != b->bits_per_word)
1057     return NULL;
1058
1059   if (a->mach > b->mach)
1060     return a;
1061
1062   if (b->mach > a->mach)
1063     return b;
1064
1065   return a;
1066 }
1067
1068 /*
1069 INTERNAL_FUNCTION
1070         bfd_default_scan
1071
1072 SYNOPSIS
1073         bfd_boolean bfd_default_scan
1074           (const struct bfd_arch_info *info, const char *string);
1075
1076 DESCRIPTION
1077         The default function for working out whether this is an
1078         architecture hit and a machine hit.
1079 */
1080
1081 bfd_boolean
1082 bfd_default_scan (const bfd_arch_info_type *info, const char *string)
1083 {
1084   const char *ptr_src;
1085   const char *ptr_tst;
1086   unsigned long number;
1087   enum bfd_architecture arch;
1088   const char *printable_name_colon;
1089
1090   /* Exact match of the architecture name (ARCH_NAME) and also the
1091      default architecture?  */
1092   if (strcasecmp (string, info->arch_name) == 0
1093       && info->the_default)
1094     return TRUE;
1095
1096   /* Exact match of the machine name (PRINTABLE_NAME)?  */
1097   if (strcasecmp (string, info->printable_name) == 0)
1098     return TRUE;
1099
1100   /* Given that printable_name contains no colon, attempt to match:
1101      ARCH_NAME [ ":" ] PRINTABLE_NAME?  */
1102   printable_name_colon = strchr (info->printable_name, ':');
1103   if (printable_name_colon == NULL)
1104     {
1105       size_t strlen_arch_name = strlen (info->arch_name);
1106       if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
1107         {
1108           if (string[strlen_arch_name] == ':')
1109             {
1110               if (strcasecmp (string + strlen_arch_name + 1,
1111                               info->printable_name) == 0)
1112                 return TRUE;
1113             }
1114           else
1115             {
1116               if (strcasecmp (string + strlen_arch_name,
1117                               info->printable_name) == 0)
1118                 return TRUE;
1119             }
1120         }
1121     }
1122
1123   /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
1124      Attempt to match: <arch> <mach>?  */
1125   if (printable_name_colon != NULL)
1126     {
1127       size_t colon_index = printable_name_colon - info->printable_name;
1128       if (strncasecmp (string, info->printable_name, colon_index) == 0
1129           && strcasecmp (string + colon_index,
1130                          info->printable_name + colon_index + 1) == 0)
1131         return TRUE;
1132     }
1133
1134   /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
1135      attempt to match just <mach>, it could be ambiguous.  This test
1136      is left until later.  */
1137
1138   /* NOTE: The below is retained for compatibility only.  Please do
1139      not add to this code.  */
1140
1141   /* See how much of the supplied string matches with the
1142      architecture, eg the string m68k:68020 would match the 68k entry
1143      up to the :, then we get left with the machine number.  */
1144
1145   for (ptr_src = string, ptr_tst = info->arch_name;
1146        *ptr_src && *ptr_tst;
1147        ptr_src++, ptr_tst++)
1148     {
1149       if (*ptr_src != *ptr_tst)
1150         break;
1151     }
1152
1153   /* Chewed up as much of the architecture as will match, skip any
1154      colons.  */
1155   if (*ptr_src == ':')
1156     ptr_src++;
1157
1158   if (*ptr_src == 0)
1159     {
1160       /* Nothing more, then only keep this one if it is the default
1161          machine for this architecture.  */
1162       return info->the_default;
1163     }
1164
1165   number = 0;
1166   while (ISDIGIT (*ptr_src))
1167     {
1168       number = number * 10 + *ptr_src - '0';
1169       ptr_src++;
1170     }
1171
1172   /* NOTE: The below is retained for compatibility only.
1173      PLEASE DO NOT ADD TO THIS CODE.  */
1174
1175   switch (number)
1176     {
1177     case 68000:
1178       arch = bfd_arch_m68k;
1179       number = bfd_mach_m68000;
1180       break;
1181     case 68010:
1182       arch = bfd_arch_m68k;
1183       number = bfd_mach_m68010;
1184       break;
1185     case 68020:
1186       arch = bfd_arch_m68k;
1187       number = bfd_mach_m68020;
1188       break;
1189     case 68030:
1190       arch = bfd_arch_m68k;
1191       number = bfd_mach_m68030;
1192       break;
1193     case 68040:
1194       arch = bfd_arch_m68k;
1195       number = bfd_mach_m68040;
1196       break;
1197     case 68060:
1198       arch = bfd_arch_m68k;
1199       number = bfd_mach_m68060;
1200       break;
1201     case 68332:
1202       arch = bfd_arch_m68k;
1203       number = bfd_mach_cpu32;
1204       break;
1205     case 5200:
1206       arch = bfd_arch_m68k;
1207       number = bfd_mach_mcf_isa_a_nodiv;
1208       break;
1209     case 5206:
1210       arch = bfd_arch_m68k;
1211       number = bfd_mach_mcf_isa_a_mac;
1212       break;
1213     case 5307:
1214       arch = bfd_arch_m68k;
1215       number = bfd_mach_mcf_isa_a_mac;
1216       break;
1217     case 5407:
1218       arch = bfd_arch_m68k;
1219       number = bfd_mach_mcf_isa_b_nousp_mac;
1220       break;
1221     case 5282:
1222       arch = bfd_arch_m68k;
1223       number = bfd_mach_mcf_isa_aplus_emac;
1224       break;
1225
1226     case 3000:
1227       arch = bfd_arch_mips;
1228       number = bfd_mach_mips3000;
1229       break;
1230
1231     case 4000:
1232       arch = bfd_arch_mips;
1233       number = bfd_mach_mips4000;
1234       break;
1235
1236     case 6000:
1237       arch = bfd_arch_rs6000;
1238       break;
1239
1240     case 7410:
1241       arch = bfd_arch_sh;
1242       number = bfd_mach_sh_dsp;
1243       break;
1244
1245     case 7708:
1246       arch = bfd_arch_sh;
1247       number = bfd_mach_sh3;
1248       break;
1249
1250     case 7729:
1251       arch = bfd_arch_sh;
1252       number = bfd_mach_sh3_dsp;
1253       break;
1254
1255     case 7750:
1256       arch = bfd_arch_sh;
1257       number = bfd_mach_sh4;
1258       break;
1259
1260     default:
1261       return FALSE;
1262     }
1263
1264   if (arch != info->arch)
1265     return FALSE;
1266
1267   if (number != info->mach)
1268     return FALSE;
1269
1270   return TRUE;
1271 }
1272
1273 /*
1274 FUNCTION
1275         bfd_get_arch_info
1276
1277 SYNOPSIS
1278         const bfd_arch_info_type *bfd_get_arch_info (bfd *abfd);
1279
1280 DESCRIPTION
1281         Return the architecture info struct in @var{abfd}.
1282 */
1283
1284 const bfd_arch_info_type *
1285 bfd_get_arch_info (bfd *abfd)
1286 {
1287   return abfd->arch_info;
1288 }
1289
1290 /*
1291 FUNCTION
1292         bfd_lookup_arch
1293
1294 SYNOPSIS
1295         const bfd_arch_info_type *bfd_lookup_arch
1296           (enum bfd_architecture arch, unsigned long machine);
1297
1298 DESCRIPTION
1299         Look for the architecture info structure which matches the
1300         arguments @var{arch} and @var{machine}. A machine of 0 matches the
1301         machine/architecture structure which marks itself as the
1302         default.
1303 */
1304
1305 const bfd_arch_info_type *
1306 bfd_lookup_arch (enum bfd_architecture arch, unsigned long machine)
1307 {
1308   const bfd_arch_info_type * const *app, *ap;
1309
1310   for (app = bfd_archures_list; *app != NULL; app++)
1311     {
1312       for (ap = *app; ap != NULL; ap = ap->next)
1313         {
1314           if (ap->arch == arch
1315               && (ap->mach == machine
1316                   || (machine == 0 && ap->the_default)))
1317             return ap;
1318         }
1319     }
1320
1321   return NULL;
1322 }
1323
1324 /*
1325 FUNCTION
1326         bfd_printable_arch_mach
1327
1328 SYNOPSIS
1329         const char *bfd_printable_arch_mach
1330           (enum bfd_architecture arch, unsigned long machine);
1331
1332 DESCRIPTION
1333         Return a printable string representing the architecture and
1334         machine type.
1335
1336         This routine is depreciated.
1337 */
1338
1339 const char *
1340 bfd_printable_arch_mach (enum bfd_architecture arch, unsigned long machine)
1341 {
1342   const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
1343
1344   if (ap)
1345     return ap->printable_name;
1346   return "UNKNOWN!";
1347 }
1348
1349 /*
1350 FUNCTION
1351         bfd_octets_per_byte
1352
1353 SYNOPSIS
1354         unsigned int bfd_octets_per_byte (bfd *abfd);
1355
1356 DESCRIPTION
1357         Return the number of octets (8-bit quantities) per target byte
1358         (minimum addressable unit).  In most cases, this will be one, but some
1359         DSP targets have 16, 32, or even 48 bits per byte.
1360 */
1361
1362 unsigned int
1363 bfd_octets_per_byte (bfd *abfd)
1364 {
1365   return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1366                                         bfd_get_mach (abfd));
1367 }
1368
1369 /*
1370 FUNCTION
1371         bfd_arch_mach_octets_per_byte
1372
1373 SYNOPSIS
1374         unsigned int bfd_arch_mach_octets_per_byte
1375           (enum bfd_architecture arch, unsigned long machine);
1376
1377 DESCRIPTION
1378         See bfd_octets_per_byte.
1379
1380         This routine is provided for those cases where a bfd * is not
1381         available
1382 */
1383
1384 unsigned int
1385 bfd_arch_mach_octets_per_byte (enum bfd_architecture arch,
1386                                unsigned long mach)
1387 {
1388   const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
1389
1390   if (ap)
1391     return ap->bits_per_byte / 8;
1392   return 1;
1393 }
1394
1395 /*
1396 INTERNAL_FUNCTION
1397         bfd_arch_default_fill
1398
1399 SYNOPSIS
1400         void *bfd_arch_default_fill (bfd_size_type count,
1401                                      bfd_boolean is_bigendian,
1402                                      bfd_boolean code);
1403
1404 DESCRIPTION
1405         Allocate via bfd_malloc and return a fill buffer of size COUNT.
1406         If IS_BIGENDIAN is TRUE, the order of bytes is big endian.  If
1407         CODE is TRUE, the buffer contains code.
1408 */
1409
1410 void *
1411 bfd_arch_default_fill (bfd_size_type count,
1412                        bfd_boolean is_bigendian ATTRIBUTE_UNUSED,
1413                        bfd_boolean code ATTRIBUTE_UNUSED)
1414 {
1415   void *fill = bfd_malloc (count);
1416   if (fill != NULL)
1417     memset (fill, 0, count);
1418   return fill;
1419 }
1420
1421 bfd_boolean
1422 _bfd_nowrite_set_arch_mach (bfd *abfd,
1423                             enum bfd_architecture arch ATTRIBUTE_UNUSED,
1424                             unsigned long mach ATTRIBUTE_UNUSED)
1425 {
1426   return _bfd_bool_bfd_false_error (abfd);
1427 }