Remove i370 support
[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_we32k,     {* AT&T WE32xxx.  *}
221 .  bfd_arch_romp,      {* IBM ROMP PC/RT.  *}
222 .  bfd_arch_convex,    {* Convex.  *}
223 .  bfd_arch_m88k,      {* Motorola 88xxx.  *}
224 .  bfd_arch_m98k,      {* Motorola 98xxx.  *}
225 .  bfd_arch_pyramid,   {* Pyramid Technology.  *}
226 .  bfd_arch_h8300,     {* Renesas H8/300 (formerly Hitachi H8/300).  *}
227 .#define bfd_mach_h8300         1
228 .#define bfd_mach_h8300h        2
229 .#define bfd_mach_h8300s        3
230 .#define bfd_mach_h8300hn       4
231 .#define bfd_mach_h8300sn       5
232 .#define bfd_mach_h8300sx       6
233 .#define bfd_mach_h8300sxn      7
234 .  bfd_arch_pdp11,     {* DEC PDP-11.  *}
235 .  bfd_arch_plugin,
236 .  bfd_arch_powerpc,   {* PowerPC.  *}
237 .#define bfd_mach_ppc           32
238 .#define bfd_mach_ppc64         64
239 .#define bfd_mach_ppc_403       403
240 .#define bfd_mach_ppc_403gc     4030
241 .#define bfd_mach_ppc_405       405
242 .#define bfd_mach_ppc_505       505
243 .#define bfd_mach_ppc_601       601
244 .#define bfd_mach_ppc_602       602
245 .#define bfd_mach_ppc_603       603
246 .#define bfd_mach_ppc_ec603e    6031
247 .#define bfd_mach_ppc_604       604
248 .#define bfd_mach_ppc_620       620
249 .#define bfd_mach_ppc_630       630
250 .#define bfd_mach_ppc_750       750
251 .#define bfd_mach_ppc_860       860
252 .#define bfd_mach_ppc_a35       35
253 .#define bfd_mach_ppc_rs64ii    642
254 .#define bfd_mach_ppc_rs64iii   643
255 .#define bfd_mach_ppc_7400      7400
256 .#define bfd_mach_ppc_e500      500
257 .#define bfd_mach_ppc_e500mc    5001
258 .#define bfd_mach_ppc_e500mc64  5005
259 .#define bfd_mach_ppc_e5500     5006
260 .#define bfd_mach_ppc_e6500     5007
261 .#define bfd_mach_ppc_titan     83
262 .#define bfd_mach_ppc_vle       84
263 .  bfd_arch_rs6000,    {* IBM RS/6000.  *}
264 .#define bfd_mach_rs6k          6000
265 .#define bfd_mach_rs6k_rs1      6001
266 .#define bfd_mach_rs6k_rsc      6003
267 .#define bfd_mach_rs6k_rs2      6002
268 .  bfd_arch_hppa,      {* HP PA RISC.  *}
269 .#define bfd_mach_hppa10        10
270 .#define bfd_mach_hppa11        11
271 .#define bfd_mach_hppa20        20
272 .#define bfd_mach_hppa20w       25
273 .  bfd_arch_d10v,      {* Mitsubishi D10V.  *}
274 .#define bfd_mach_d10v          1
275 .#define bfd_mach_d10v_ts2      2
276 .#define bfd_mach_d10v_ts3      3
277 .  bfd_arch_d30v,      {* Mitsubishi D30V.  *}
278 .  bfd_arch_dlx,       {* DLX.  *}
279 .  bfd_arch_m68hc11,   {* Motorola 68HC11.  *}
280 .  bfd_arch_m68hc12,   {* Motorola 68HC12.  *}
281 .#define bfd_mach_m6812_default 0
282 .#define bfd_mach_m6812         1
283 .#define bfd_mach_m6812s        2
284 .  bfd_arch_m9s12x,    {* Freescale S12X.  *}
285 .  bfd_arch_m9s12xg,   {* Freescale XGATE.  *}
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 .#define bfd_mach_sh5                           0x50
311 .  bfd_arch_alpha,     {* Dec Alpha.  *}
312 .#define bfd_mach_alpha_ev4     0x10
313 .#define bfd_mach_alpha_ev5     0x20
314 .#define bfd_mach_alpha_ev6     0x30
315 .  bfd_arch_arm,       {* Advanced Risc Machines ARM.  *}
316 .#define bfd_mach_arm_unknown   0
317 .#define bfd_mach_arm_2         1
318 .#define bfd_mach_arm_2a        2
319 .#define bfd_mach_arm_3         3
320 .#define bfd_mach_arm_3M        4
321 .#define bfd_mach_arm_4         5
322 .#define bfd_mach_arm_4T        6
323 .#define bfd_mach_arm_5         7
324 .#define bfd_mach_arm_5T        8
325 .#define bfd_mach_arm_5TE       9
326 .#define bfd_mach_arm_XScale    10
327 .#define bfd_mach_arm_ep9312    11
328 .#define bfd_mach_arm_iWMMXt    12
329 .#define bfd_mach_arm_iWMMXt2   13
330 .  bfd_arch_nds32,     {* Andes NDS32.  *}
331 .#define bfd_mach_n1            1
332 .#define bfd_mach_n1h           2
333 .#define bfd_mach_n1h_v2        3
334 .#define bfd_mach_n1h_v3        4
335 .#define bfd_mach_n1h_v3m       5
336 .  bfd_arch_ns32k,     {* National Semiconductors ns32000.  *}
337 .  bfd_arch_w65,       {* WDC 65816.  *}
338 .  bfd_arch_tic30,     {* Texas Instruments TMS320C30.  *}
339 .  bfd_arch_tic4x,     {* Texas Instruments TMS320C3X/4X.  *}
340 .#define bfd_mach_tic3x         30
341 .#define bfd_mach_tic4x         40
342 .  bfd_arch_tic54x,    {* Texas Instruments TMS320C54X.  *}
343 .  bfd_arch_tic6x,     {* Texas Instruments TMS320C6X.  *}
344 .  bfd_arch_tic80,     {* TI TMS320c80 (MVP).  *}
345 .  bfd_arch_v850,      {* NEC V850.  *}
346 .  bfd_arch_v850_rh850,{* NEC V850 (using RH850 ABI).  *}
347 .#define bfd_mach_v850          1
348 .#define bfd_mach_v850e         'E'
349 .#define bfd_mach_v850e1        '1'
350 .#define bfd_mach_v850e2        0x4532
351 .#define bfd_mach_v850e2v3      0x45325633
352 .#define bfd_mach_v850e3v5      0x45335635 {* ('E'|'3'|'V'|'5').  *}
353 .  bfd_arch_arc,       {* ARC Cores.  *}
354 .#define bfd_mach_arc_a4        0
355 .#define bfd_mach_arc_a5        1
356 .#define bfd_mach_arc_arc600    2
357 .#define bfd_mach_arc_arc601    4
358 .#define bfd_mach_arc_arc700    3
359 .#define bfd_mach_arc_arcv2     5
360 . bfd_arch_m32c,       {* Renesas M16C/M32C.  *}
361 .#define bfd_mach_m16c          0x75
362 .#define bfd_mach_m32c          0x78
363 .  bfd_arch_m32r,      {* Renesas M32R (formerly Mitsubishi M32R/D).  *}
364 .#define bfd_mach_m32r          1 {* For backwards compatibility.  *}
365 .#define bfd_mach_m32rx         'x'
366 .#define bfd_mach_m32r2         '2'
367 .  bfd_arch_mn10200,   {* Matsushita MN10200.  *}
368 .  bfd_arch_mn10300,   {* Matsushita MN10300.  *}
369 .#define bfd_mach_mn10300       300
370 .#define bfd_mach_am33          330
371 .#define bfd_mach_am33_2        332
372 .  bfd_arch_fr30,
373 .#define bfd_mach_fr30          0x46523330
374 .  bfd_arch_frv,
375 .#define bfd_mach_frv           1
376 .#define bfd_mach_frvsimple     2
377 .#define bfd_mach_fr300         300
378 .#define bfd_mach_fr400         400
379 .#define bfd_mach_fr450         450
380 .#define bfd_mach_frvtomcat     499     {* fr500 prototype.  *}
381 .#define bfd_mach_fr500         500
382 .#define bfd_mach_fr550         550
383 .  bfd_arch_moxie,     {* The moxie processor.  *}
384 .#define bfd_mach_moxie         1
385 .  bfd_arch_ft32,      {* The ft32 processor.  *}
386 .#define bfd_mach_ft32          1
387 .#define bfd_mach_ft32b         2
388 .  bfd_arch_mcore,
389 .  bfd_arch_mep,
390 .#define bfd_mach_mep           1
391 .#define bfd_mach_mep_h1        0x6831
392 .#define bfd_mach_mep_c5        0x6335
393 .  bfd_arch_metag,
394 .#define bfd_mach_metag         1
395 .  bfd_arch_ia64,      {* HP/Intel ia64.  *}
396 .#define bfd_mach_ia64_elf64    64
397 .#define bfd_mach_ia64_elf32    32
398 .  bfd_arch_ip2k,      {* Ubicom IP2K microcontrollers. *}
399 .#define bfd_mach_ip2022        1
400 .#define bfd_mach_ip2022ext     2
401 . bfd_arch_iq2000,     {* Vitesse IQ2000.  *}
402 .#define bfd_mach_iq2000        1
403 .#define bfd_mach_iq10          2
404 .  bfd_arch_epiphany,  {* Adapteva EPIPHANY.  *}
405 .#define bfd_mach_epiphany16    1
406 .#define bfd_mach_epiphany32    2
407 .  bfd_arch_mt,
408 .#define bfd_mach_ms1           1
409 .#define bfd_mach_mrisc2        2
410 .#define bfd_mach_ms2           3
411 .  bfd_arch_pj,
412 .  bfd_arch_avr,       {* Atmel AVR microcontrollers.  *}
413 .#define bfd_mach_avr1          1
414 .#define bfd_mach_avr2          2
415 .#define bfd_mach_avr25         25
416 .#define bfd_mach_avr3          3
417 .#define bfd_mach_avr31         31
418 .#define bfd_mach_avr35         35
419 .#define bfd_mach_avr4          4
420 .#define bfd_mach_avr5          5
421 .#define bfd_mach_avr51         51
422 .#define bfd_mach_avr6          6
423 .#define bfd_mach_avrtiny       100
424 .#define bfd_mach_avrxmega1     101
425 .#define bfd_mach_avrxmega2     102
426 .#define bfd_mach_avrxmega3     103
427 .#define bfd_mach_avrxmega4     104
428 .#define bfd_mach_avrxmega5     105
429 .#define bfd_mach_avrxmega6     106
430 .#define bfd_mach_avrxmega7     107
431 .  bfd_arch_bfin,      {* ADI Blackfin.  *}
432 .#define bfd_mach_bfin          1
433 .  bfd_arch_cr16,      {* National Semiconductor CompactRISC (ie CR16).  *}
434 .#define bfd_mach_cr16          1
435 .  bfd_arch_cr16c,     {* National Semiconductor CompactRISC.  *}
436 .#define bfd_mach_cr16c         1
437 .  bfd_arch_crx,       {*  National Semiconductor CRX.  *}
438 .#define bfd_mach_crx           1
439 .  bfd_arch_cris,      {* Axis CRIS.  *}
440 .#define bfd_mach_cris_v0_v10   255
441 .#define bfd_mach_cris_v32      32
442 .#define bfd_mach_cris_v10_v32  1032
443 .  bfd_arch_riscv,
444 .#define bfd_mach_riscv32       132
445 .#define bfd_mach_riscv64       164
446 .  bfd_arch_rl78,
447 .#define bfd_mach_rl78          0x75
448 .  bfd_arch_rx,        {* Renesas RX.  *}
449 .#define bfd_mach_rx            0x75
450 .  bfd_arch_s390,      {* IBM s390.  *}
451 .#define bfd_mach_s390_31       31
452 .#define bfd_mach_s390_64       64
453 .  bfd_arch_score,     {* Sunplus score.  *}
454 .#define bfd_mach_score3        3
455 .#define bfd_mach_score7        7
456 .  bfd_arch_mmix,      {* Donald Knuth's educational processor.  *}
457 .  bfd_arch_xstormy16,
458 .#define bfd_mach_xstormy16     1
459 .  bfd_arch_msp430,    {* Texas Instruments MSP430 architecture.  *}
460 .#define bfd_mach_msp11         11
461 .#define bfd_mach_msp110        110
462 .#define bfd_mach_msp12         12
463 .#define bfd_mach_msp13         13
464 .#define bfd_mach_msp14         14
465 .#define bfd_mach_msp15         15
466 .#define bfd_mach_msp16         16
467 .#define bfd_mach_msp20         20
468 .#define bfd_mach_msp21         21
469 .#define bfd_mach_msp22         22
470 .#define bfd_mach_msp23         23
471 .#define bfd_mach_msp24         24
472 .#define bfd_mach_msp26         26
473 .#define bfd_mach_msp31         31
474 .#define bfd_mach_msp32         32
475 .#define bfd_mach_msp33         33
476 .#define bfd_mach_msp41         41
477 .#define bfd_mach_msp42         42
478 .#define bfd_mach_msp43         43
479 .#define bfd_mach_msp44         44
480 .#define bfd_mach_msp430x       45
481 .#define bfd_mach_msp46         46
482 .#define bfd_mach_msp47         47
483 .#define bfd_mach_msp54         54
484 .  bfd_arch_xc16x,     {* Infineon's XC16X Series.  *}
485 .#define bfd_mach_xc16x         1
486 .#define bfd_mach_xc16xl        2
487 .#define bfd_mach_xc16xs        3
488 .  bfd_arch_xgate,     {* Freescale XGATE.  *}
489 .#define bfd_mach_xgate         1
490 .  bfd_arch_xtensa,    {* Tensilica's Xtensa cores.  *}
491 .#define bfd_mach_xtensa        1
492 .  bfd_arch_z80,
493 .#define bfd_mach_z80strict     1 {* No undocumented opcodes.  *}
494 .#define bfd_mach_z80           3 {* With ixl, ixh, iyl, and iyh.  *}
495 .#define bfd_mach_z80full       7 {* All undocumented instructions.  *}
496 .#define bfd_mach_r800          11 {* R800: successor with multiplication.  *}
497 .  bfd_arch_lm32,      {* Lattice Mico32.  *}
498 .#define bfd_mach_lm32          1
499 .  bfd_arch_microblaze,{* Xilinx MicroBlaze.  *}
500 .  bfd_arch_tilepro,   {* Tilera TILEPro.  *}
501 .  bfd_arch_tilegx,    {* Tilera TILE-Gx.  *}
502 .#define bfd_mach_tilepro       1
503 .#define bfd_mach_tilegx        1
504 .#define bfd_mach_tilegx32      2
505 .  bfd_arch_aarch64,   {* AArch64.  *}
506 .#define bfd_mach_aarch64 0
507 .#define bfd_mach_aarch64_ilp32 32
508 .  bfd_arch_nios2,     {* Nios II.  *}
509 .#define bfd_mach_nios2         0
510 .#define bfd_mach_nios2r1       1
511 .#define bfd_mach_nios2r2       2
512 .  bfd_arch_visium,    {* Visium.  *}
513 .#define bfd_mach_visium        1
514 .  bfd_arch_wasm32,    {* WebAssembly.  *}
515 .#define bfd_mach_wasm32        1
516 .  bfd_arch_pru,       {* PRU.  *}
517 .#define bfd_mach_pru           0
518 .  bfd_arch_last
519 .  };
520 */
521
522 /*
523 SUBSECTION
524         bfd_arch_info
525
526 DESCRIPTION
527         This structure contains information on architectures for use
528         within BFD.
529
530 .
531 .typedef struct bfd_arch_info
532 .{
533 .  int bits_per_word;
534 .  int bits_per_address;
535 .  int bits_per_byte;
536 .  enum bfd_architecture arch;
537 .  unsigned long mach;
538 .  const char *arch_name;
539 .  const char *printable_name;
540 .  unsigned int section_align_power;
541 .  {* TRUE if this is the default machine for the architecture.
542 .     The default arch should be the first entry for an arch so that
543 .     all the entries for that arch can be accessed via <<next>>.  *}
544 .  bfd_boolean the_default;
545 .  const struct bfd_arch_info * (*compatible) (const struct bfd_arch_info *,
546 .                                              const struct bfd_arch_info *);
547 .
548 .  bfd_boolean (*scan) (const struct bfd_arch_info *, const char *);
549 .
550 .  {* Allocate via bfd_malloc and return a fill buffer of size COUNT.  If
551 .     IS_BIGENDIAN is TRUE, the order of bytes is big endian.  If CODE is
552 .     TRUE, the buffer contains code.  *}
553 .  void *(*fill) (bfd_size_type count, bfd_boolean is_bigendian,
554 .                 bfd_boolean code);
555 .
556 .  const struct bfd_arch_info *next;
557 .}
558 .bfd_arch_info_type;
559 .
560 */
561
562 extern const bfd_arch_info_type bfd_aarch64_arch;
563 extern const bfd_arch_info_type bfd_alpha_arch;
564 extern const bfd_arch_info_type bfd_arc_arch;
565 extern const bfd_arch_info_type bfd_arm_arch;
566 extern const bfd_arch_info_type bfd_avr_arch;
567 extern const bfd_arch_info_type bfd_bfin_arch;
568 extern const bfd_arch_info_type bfd_cr16_arch;
569 extern const bfd_arch_info_type bfd_cr16c_arch;
570 extern const bfd_arch_info_type bfd_cris_arch;
571 extern const bfd_arch_info_type bfd_crx_arch;
572 extern const bfd_arch_info_type bfd_d10v_arch;
573 extern const bfd_arch_info_type bfd_d30v_arch;
574 extern const bfd_arch_info_type bfd_dlx_arch;
575 extern const bfd_arch_info_type bfd_epiphany_arch;
576 extern const bfd_arch_info_type bfd_fr30_arch;
577 extern const bfd_arch_info_type bfd_frv_arch;
578 extern const bfd_arch_info_type bfd_h8300_arch;
579 extern const bfd_arch_info_type bfd_hppa_arch;
580 extern const bfd_arch_info_type bfd_i386_arch;
581 extern const bfd_arch_info_type bfd_iamcu_arch;
582 extern const bfd_arch_info_type bfd_ia64_arch;
583 extern const bfd_arch_info_type bfd_ip2k_arch;
584 extern const bfd_arch_info_type bfd_iq2000_arch;
585 extern const bfd_arch_info_type bfd_k1om_arch;
586 extern const bfd_arch_info_type bfd_l1om_arch;
587 extern const bfd_arch_info_type bfd_lm32_arch;
588 extern const bfd_arch_info_type bfd_m32c_arch;
589 extern const bfd_arch_info_type bfd_m32r_arch;
590 extern const bfd_arch_info_type bfd_m68hc11_arch;
591 extern const bfd_arch_info_type bfd_m68hc12_arch;
592 extern const bfd_arch_info_type bfd_m9s12x_arch;
593 extern const bfd_arch_info_type bfd_m9s12xg_arch;
594 extern const bfd_arch_info_type bfd_m68k_arch;
595 extern const bfd_arch_info_type bfd_m88k_arch;
596 extern const bfd_arch_info_type bfd_mcore_arch;
597 extern const bfd_arch_info_type bfd_mep_arch;
598 extern const bfd_arch_info_type bfd_metag_arch;
599 extern const bfd_arch_info_type bfd_mips_arch;
600 extern const bfd_arch_info_type bfd_microblaze_arch;
601 extern const bfd_arch_info_type bfd_mmix_arch;
602 extern const bfd_arch_info_type bfd_mn10200_arch;
603 extern const bfd_arch_info_type bfd_mn10300_arch;
604 extern const bfd_arch_info_type bfd_moxie_arch;
605 extern const bfd_arch_info_type bfd_ft32_arch;
606 extern const bfd_arch_info_type bfd_msp430_arch;
607 extern const bfd_arch_info_type bfd_mt_arch;
608 extern const bfd_arch_info_type bfd_nds32_arch;
609 extern const bfd_arch_info_type bfd_nios2_arch;
610 extern const bfd_arch_info_type bfd_ns32k_arch;
611 extern const bfd_arch_info_type bfd_or1k_arch;
612 extern const bfd_arch_info_type bfd_pdp11_arch;
613 extern const bfd_arch_info_type bfd_pj_arch;
614 extern const bfd_arch_info_type bfd_plugin_arch;
615 extern const bfd_arch_info_type bfd_powerpc_archs[];
616 #define bfd_powerpc_arch bfd_powerpc_archs[0]
617 extern const bfd_arch_info_type bfd_pru_arch;
618 extern const bfd_arch_info_type bfd_riscv_arch;
619 extern const bfd_arch_info_type bfd_rs6000_arch;
620 extern const bfd_arch_info_type bfd_rl78_arch;
621 extern const bfd_arch_info_type bfd_rx_arch;
622 extern const bfd_arch_info_type bfd_s390_arch;
623 extern const bfd_arch_info_type bfd_score_arch;
624 extern const bfd_arch_info_type bfd_sh_arch;
625 extern const bfd_arch_info_type bfd_sparc_arch;
626 extern const bfd_arch_info_type bfd_spu_arch;
627 extern const bfd_arch_info_type bfd_tic30_arch;
628 extern const bfd_arch_info_type bfd_tic4x_arch;
629 extern const bfd_arch_info_type bfd_tic54x_arch;
630 extern const bfd_arch_info_type bfd_tic6x_arch;
631 extern const bfd_arch_info_type bfd_tic80_arch;
632 extern const bfd_arch_info_type bfd_tilegx_arch;
633 extern const bfd_arch_info_type bfd_tilepro_arch;
634 extern const bfd_arch_info_type bfd_v850_arch;
635 extern const bfd_arch_info_type bfd_v850_rh850_arch;
636 extern const bfd_arch_info_type bfd_vax_arch;
637 extern const bfd_arch_info_type bfd_visium_arch;
638 extern const bfd_arch_info_type bfd_wasm32_arch;
639 extern const bfd_arch_info_type bfd_w65_arch;
640 extern const bfd_arch_info_type bfd_we32k_arch;
641 extern const bfd_arch_info_type bfd_xstormy16_arch;
642 extern const bfd_arch_info_type bfd_xtensa_arch;
643 extern const bfd_arch_info_type bfd_xc16x_arch;
644 extern const bfd_arch_info_type bfd_xgate_arch;
645 extern const bfd_arch_info_type bfd_z80_arch;
646 extern const bfd_arch_info_type bfd_z8k_arch;
647
648 static const bfd_arch_info_type * const bfd_archures_list[] =
649   {
650 #ifdef SELECT_ARCHITECTURES
651     SELECT_ARCHITECTURES,
652 #else
653     &bfd_aarch64_arch,
654     &bfd_alpha_arch,
655     &bfd_arc_arch,
656     &bfd_arm_arch,
657     &bfd_avr_arch,
658     &bfd_bfin_arch,
659     &bfd_cr16_arch,
660     &bfd_cr16c_arch,
661     &bfd_cris_arch,
662     &bfd_crx_arch,
663     &bfd_d10v_arch,
664     &bfd_d30v_arch,
665     &bfd_dlx_arch,
666     &bfd_epiphany_arch,
667     &bfd_fr30_arch,
668     &bfd_frv_arch,
669     &bfd_h8300_arch,
670     &bfd_hppa_arch,
671     &bfd_i386_arch,
672     &bfd_iamcu_arch,
673     &bfd_ia64_arch,
674     &bfd_ip2k_arch,
675     &bfd_iq2000_arch,
676     &bfd_k1om_arch,
677     &bfd_l1om_arch,
678     &bfd_lm32_arch,
679     &bfd_m32c_arch,
680     &bfd_m32r_arch,
681     &bfd_m68hc11_arch,
682     &bfd_m68hc12_arch,
683     &bfd_m9s12x_arch,
684     &bfd_m9s12xg_arch,
685     &bfd_m68k_arch,
686     &bfd_m88k_arch,
687     &bfd_mcore_arch,
688     &bfd_mep_arch,
689     &bfd_metag_arch,
690     &bfd_microblaze_arch,
691     &bfd_mips_arch,
692     &bfd_mmix_arch,
693     &bfd_mn10200_arch,
694     &bfd_mn10300_arch,
695     &bfd_moxie_arch,
696     &bfd_ft32_arch,
697     &bfd_msp430_arch,
698     &bfd_mt_arch,
699     &bfd_nds32_arch,
700     &bfd_nios2_arch,
701     &bfd_ns32k_arch,
702     &bfd_or1k_arch,
703     &bfd_pdp11_arch,
704     &bfd_powerpc_arch,
705     &bfd_pru_arch,
706     &bfd_riscv_arch,
707     &bfd_rl78_arch,
708     &bfd_rs6000_arch,
709     &bfd_rx_arch,
710     &bfd_s390_arch,
711     &bfd_score_arch,
712     &bfd_sh_arch,
713     &bfd_sparc_arch,
714     &bfd_spu_arch,
715     &bfd_tic30_arch,
716     &bfd_tic4x_arch,
717     &bfd_tic54x_arch,
718     &bfd_tic6x_arch,
719     &bfd_tic80_arch,
720     &bfd_tilegx_arch,
721     &bfd_tilepro_arch,
722     &bfd_v850_arch,
723     &bfd_v850_rh850_arch,
724     &bfd_vax_arch,
725     &bfd_visium_arch,
726     &bfd_w65_arch,
727     &bfd_wasm32_arch,
728     &bfd_we32k_arch,
729     &bfd_xstormy16_arch,
730     &bfd_xtensa_arch,
731     &bfd_xc16x_arch,
732     &bfd_xgate_arch,
733     &bfd_z80_arch,
734     &bfd_z8k_arch,
735 #endif
736   0
737 };
738
739 /*
740 FUNCTION
741         bfd_printable_name
742
743 SYNOPSIS
744         const char *bfd_printable_name (bfd *abfd);
745
746 DESCRIPTION
747         Return a printable string representing the architecture and machine
748         from the pointer to the architecture info structure.
749
750 */
751
752 const char *
753 bfd_printable_name (bfd *abfd)
754 {
755   return abfd->arch_info->printable_name;
756 }
757
758 /*
759 FUNCTION
760         bfd_scan_arch
761
762 SYNOPSIS
763         const bfd_arch_info_type *bfd_scan_arch (const char *string);
764
765 DESCRIPTION
766         Figure out if BFD supports any cpu which could be described with
767         the name @var{string}.  Return a pointer to an <<arch_info>>
768         structure if a machine is found, otherwise NULL.
769 */
770
771 const bfd_arch_info_type *
772 bfd_scan_arch (const char *string)
773 {
774   const bfd_arch_info_type * const *app, *ap;
775
776   /* Look through all the installed architectures.  */
777   for (app = bfd_archures_list; *app != NULL; app++)
778     {
779       for (ap = *app; ap != NULL; ap = ap->next)
780         {
781           if (ap->scan (ap, string))
782             return ap;
783         }
784     }
785
786   return NULL;
787 }
788
789 /*
790 FUNCTION
791         bfd_arch_list
792
793 SYNOPSIS
794         const char **bfd_arch_list (void);
795
796 DESCRIPTION
797         Return a freshly malloced NULL-terminated vector of the names
798         of all the valid BFD architectures.  Do not modify the names.
799 */
800
801 const char **
802 bfd_arch_list (void)
803 {
804   int vec_length = 0;
805   const char **name_ptr;
806   const char **name_list;
807   const bfd_arch_info_type * const *app;
808   bfd_size_type amt;
809
810   /* Determine the number of architectures.  */
811   vec_length = 0;
812   for (app = bfd_archures_list; *app != NULL; app++)
813     {
814       const bfd_arch_info_type *ap;
815       for (ap = *app; ap != NULL; ap = ap->next)
816         {
817           vec_length++;
818         }
819     }
820
821   amt = (vec_length + 1) * sizeof (char **);
822   name_list = (const char **) bfd_malloc (amt);
823   if (name_list == NULL)
824     return NULL;
825
826   /* Point the list at each of the names.  */
827   name_ptr = name_list;
828   for (app = bfd_archures_list; *app != NULL; app++)
829     {
830       const bfd_arch_info_type *ap;
831       for (ap = *app; ap != NULL; ap = ap->next)
832         {
833           *name_ptr = ap->printable_name;
834           name_ptr++;
835         }
836     }
837   *name_ptr = NULL;
838
839   return name_list;
840 }
841
842 /*
843 FUNCTION
844         bfd_arch_get_compatible
845
846 SYNOPSIS
847         const bfd_arch_info_type *bfd_arch_get_compatible
848           (const bfd *abfd, const bfd *bbfd, bfd_boolean accept_unknowns);
849
850 DESCRIPTION
851         Determine whether two BFDs' architectures and machine types
852         are compatible.  Calculates the lowest common denominator
853         between the two architectures and machine types implied by
854         the BFDs and returns a pointer to an <<arch_info>> structure
855         describing the compatible machine.
856 */
857
858 const bfd_arch_info_type *
859 bfd_arch_get_compatible (const bfd *abfd,
860                          const bfd *bbfd,
861                          bfd_boolean accept_unknowns)
862 {
863   const bfd *ubfd, *kbfd;
864
865   /* Look for an unknown architecture.  */
866   if (abfd->arch_info->arch == bfd_arch_unknown)
867     ubfd = abfd, kbfd = bbfd;
868   else if (bbfd->arch_info->arch == bfd_arch_unknown)
869     ubfd = bbfd, kbfd = abfd;
870   else
871     /* Otherwise architecture-specific code has to decide.  */
872     return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
873
874   /* We can allow an unknown architecture if accept_unknowns
875      is true, or if the target is the "binary" format, which
876      has an unknown architecture.  Since the binary format can
877      only be set by explicit request from the user, it is safe
878      to assume that they know what they are doing.  */
879   if (accept_unknowns
880       || strcmp (bfd_get_target (ubfd), "binary") == 0)
881     return kbfd->arch_info;
882   return NULL;
883 }
884
885 /*
886 INTERNAL_DEFINITION
887         bfd_default_arch_struct
888
889 DESCRIPTION
890         The <<bfd_default_arch_struct>> is an item of
891         <<bfd_arch_info_type>> which has been initialized to a fairly
892         generic state.  A BFD starts life by pointing to this
893         structure, until the correct back end has determined the real
894         architecture of the file.
895
896 .extern const bfd_arch_info_type bfd_default_arch_struct;
897 */
898
899 const bfd_arch_info_type bfd_default_arch_struct = {
900   32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, TRUE,
901   bfd_default_compatible,
902   bfd_default_scan,
903   bfd_arch_default_fill,
904   0,
905 };
906
907 /*
908 FUNCTION
909         bfd_set_arch_info
910
911 SYNOPSIS
912         void bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg);
913
914 DESCRIPTION
915         Set the architecture info of @var{abfd} to @var{arg}.
916 */
917
918 void
919 bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg)
920 {
921   abfd->arch_info = arg;
922 }
923
924 /*
925 FUNCTION
926         bfd_default_set_arch_mach
927
928 SYNOPSIS
929         bfd_boolean bfd_default_set_arch_mach
930           (bfd *abfd, enum bfd_architecture arch, unsigned long mach);
931
932 DESCRIPTION
933         Set the architecture and machine type in BFD @var{abfd}
934         to @var{arch} and @var{mach}.  Find the correct
935         pointer to a structure and insert it into the <<arch_info>>
936         pointer.
937 */
938
939 bfd_boolean
940 bfd_default_set_arch_mach (bfd *abfd,
941                            enum bfd_architecture arch,
942                            unsigned long mach)
943 {
944   abfd->arch_info = bfd_lookup_arch (arch, mach);
945   if (abfd->arch_info != NULL)
946     return TRUE;
947
948   abfd->arch_info = &bfd_default_arch_struct;
949   bfd_set_error (bfd_error_bad_value);
950   return FALSE;
951 }
952
953 /*
954 FUNCTION
955         bfd_get_arch
956
957 SYNOPSIS
958         enum bfd_architecture bfd_get_arch (bfd *abfd);
959
960 DESCRIPTION
961         Return the enumerated type which describes the BFD @var{abfd}'s
962         architecture.
963 */
964
965 enum bfd_architecture
966 bfd_get_arch (bfd *abfd)
967 {
968   return abfd->arch_info->arch;
969 }
970
971 /*
972 FUNCTION
973         bfd_get_mach
974
975 SYNOPSIS
976         unsigned long bfd_get_mach (bfd *abfd);
977
978 DESCRIPTION
979         Return the long type which describes the BFD @var{abfd}'s
980         machine.
981 */
982
983 unsigned long
984 bfd_get_mach (bfd *abfd)
985 {
986   return abfd->arch_info->mach;
987 }
988
989 /*
990 FUNCTION
991         bfd_arch_bits_per_byte
992
993 SYNOPSIS
994         unsigned int bfd_arch_bits_per_byte (bfd *abfd);
995
996 DESCRIPTION
997         Return the number of bits in one of the BFD @var{abfd}'s
998         architecture's bytes.
999 */
1000
1001 unsigned int
1002 bfd_arch_bits_per_byte (bfd *abfd)
1003 {
1004   return abfd->arch_info->bits_per_byte;
1005 }
1006
1007 /*
1008 FUNCTION
1009         bfd_arch_bits_per_address
1010
1011 SYNOPSIS
1012         unsigned int bfd_arch_bits_per_address (bfd *abfd);
1013
1014 DESCRIPTION
1015         Return the number of bits in one of the BFD @var{abfd}'s
1016         architecture's addresses.
1017 */
1018
1019 unsigned int
1020 bfd_arch_bits_per_address (bfd *abfd)
1021 {
1022   return abfd->arch_info->bits_per_address;
1023 }
1024
1025 /*
1026 INTERNAL_FUNCTION
1027         bfd_default_compatible
1028
1029 SYNOPSIS
1030         const bfd_arch_info_type *bfd_default_compatible
1031           (const bfd_arch_info_type *a, const bfd_arch_info_type *b);
1032
1033 DESCRIPTION
1034         The default function for testing for compatibility.
1035 */
1036
1037 const bfd_arch_info_type *
1038 bfd_default_compatible (const bfd_arch_info_type *a,
1039                         const bfd_arch_info_type *b)
1040 {
1041   if (a->arch != b->arch)
1042     return NULL;
1043
1044   if (a->bits_per_word != b->bits_per_word)
1045     return NULL;
1046
1047   if (a->mach > b->mach)
1048     return a;
1049
1050   if (b->mach > a->mach)
1051     return b;
1052
1053   return a;
1054 }
1055
1056 /*
1057 INTERNAL_FUNCTION
1058         bfd_default_scan
1059
1060 SYNOPSIS
1061         bfd_boolean bfd_default_scan
1062           (const struct bfd_arch_info *info, const char *string);
1063
1064 DESCRIPTION
1065         The default function for working out whether this is an
1066         architecture hit and a machine hit.
1067 */
1068
1069 bfd_boolean
1070 bfd_default_scan (const bfd_arch_info_type *info, const char *string)
1071 {
1072   const char *ptr_src;
1073   const char *ptr_tst;
1074   unsigned long number;
1075   enum bfd_architecture arch;
1076   const char *printable_name_colon;
1077
1078   /* Exact match of the architecture name (ARCH_NAME) and also the
1079      default architecture?  */
1080   if (strcasecmp (string, info->arch_name) == 0
1081       && info->the_default)
1082     return TRUE;
1083
1084   /* Exact match of the machine name (PRINTABLE_NAME)?  */
1085   if (strcasecmp (string, info->printable_name) == 0)
1086     return TRUE;
1087
1088   /* Given that printable_name contains no colon, attempt to match:
1089      ARCH_NAME [ ":" ] PRINTABLE_NAME?  */
1090   printable_name_colon = strchr (info->printable_name, ':');
1091   if (printable_name_colon == NULL)
1092     {
1093       size_t strlen_arch_name = strlen (info->arch_name);
1094       if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
1095         {
1096           if (string[strlen_arch_name] == ':')
1097             {
1098               if (strcasecmp (string + strlen_arch_name + 1,
1099                               info->printable_name) == 0)
1100                 return TRUE;
1101             }
1102           else
1103             {
1104               if (strcasecmp (string + strlen_arch_name,
1105                               info->printable_name) == 0)
1106                 return TRUE;
1107             }
1108         }
1109     }
1110
1111   /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
1112      Attempt to match: <arch> <mach>?  */
1113   if (printable_name_colon != NULL)
1114     {
1115       size_t colon_index = printable_name_colon - info->printable_name;
1116       if (strncasecmp (string, info->printable_name, colon_index) == 0
1117           && strcasecmp (string + colon_index,
1118                          info->printable_name + colon_index + 1) == 0)
1119         return TRUE;
1120     }
1121
1122   /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
1123      attempt to match just <mach>, it could be ambiguous.  This test
1124      is left until later.  */
1125
1126   /* NOTE: The below is retained for compatibility only.  Please do
1127      not add to this code.  */
1128
1129   /* See how much of the supplied string matches with the
1130      architecture, eg the string m68k:68020 would match the 68k entry
1131      up to the :, then we get left with the machine number.  */
1132
1133   for (ptr_src = string, ptr_tst = info->arch_name;
1134        *ptr_src && *ptr_tst;
1135        ptr_src++, ptr_tst++)
1136     {
1137       if (*ptr_src != *ptr_tst)
1138         break;
1139     }
1140
1141   /* Chewed up as much of the architecture as will match, skip any
1142      colons.  */
1143   if (*ptr_src == ':')
1144     ptr_src++;
1145
1146   if (*ptr_src == 0)
1147     {
1148       /* Nothing more, then only keep this one if it is the default
1149          machine for this architecture.  */
1150       return info->the_default;
1151     }
1152
1153   number = 0;
1154   while (ISDIGIT (*ptr_src))
1155     {
1156       number = number * 10 + *ptr_src - '0';
1157       ptr_src++;
1158     }
1159
1160   /* NOTE: The below is retained for compatibility only.
1161      PLEASE DO NOT ADD TO THIS CODE.  */
1162
1163   switch (number)
1164     {
1165     case 68000:
1166       arch = bfd_arch_m68k;
1167       number = bfd_mach_m68000;
1168       break;
1169     case 68010:
1170       arch = bfd_arch_m68k;
1171       number = bfd_mach_m68010;
1172       break;
1173     case 68020:
1174       arch = bfd_arch_m68k;
1175       number = bfd_mach_m68020;
1176       break;
1177     case 68030:
1178       arch = bfd_arch_m68k;
1179       number = bfd_mach_m68030;
1180       break;
1181     case 68040:
1182       arch = bfd_arch_m68k;
1183       number = bfd_mach_m68040;
1184       break;
1185     case 68060:
1186       arch = bfd_arch_m68k;
1187       number = bfd_mach_m68060;
1188       break;
1189     case 68332:
1190       arch = bfd_arch_m68k;
1191       number = bfd_mach_cpu32;
1192       break;
1193     case 5200:
1194       arch = bfd_arch_m68k;
1195       number = bfd_mach_mcf_isa_a_nodiv;
1196       break;
1197     case 5206:
1198       arch = bfd_arch_m68k;
1199       number = bfd_mach_mcf_isa_a_mac;
1200       break;
1201     case 5307:
1202       arch = bfd_arch_m68k;
1203       number = bfd_mach_mcf_isa_a_mac;
1204       break;
1205     case 5407:
1206       arch = bfd_arch_m68k;
1207       number = bfd_mach_mcf_isa_b_nousp_mac;
1208       break;
1209     case 5282:
1210       arch = bfd_arch_m68k;
1211       number = bfd_mach_mcf_isa_aplus_emac;
1212       break;
1213
1214     case 32000:
1215       arch = bfd_arch_we32k;
1216       break;
1217
1218     case 3000:
1219       arch = bfd_arch_mips;
1220       number = bfd_mach_mips3000;
1221       break;
1222
1223     case 4000:
1224       arch = bfd_arch_mips;
1225       number = bfd_mach_mips4000;
1226       break;
1227
1228     case 6000:
1229       arch = bfd_arch_rs6000;
1230       break;
1231
1232     case 7410:
1233       arch = bfd_arch_sh;
1234       number = bfd_mach_sh_dsp;
1235       break;
1236
1237     case 7708:
1238       arch = bfd_arch_sh;
1239       number = bfd_mach_sh3;
1240       break;
1241
1242     case 7729:
1243       arch = bfd_arch_sh;
1244       number = bfd_mach_sh3_dsp;
1245       break;
1246
1247     case 7750:
1248       arch = bfd_arch_sh;
1249       number = bfd_mach_sh4;
1250       break;
1251
1252     default:
1253       return FALSE;
1254     }
1255
1256   if (arch != info->arch)
1257     return FALSE;
1258
1259   if (number != info->mach)
1260     return FALSE;
1261
1262   return TRUE;
1263 }
1264
1265 /*
1266 FUNCTION
1267         bfd_get_arch_info
1268
1269 SYNOPSIS
1270         const bfd_arch_info_type *bfd_get_arch_info (bfd *abfd);
1271
1272 DESCRIPTION
1273         Return the architecture info struct in @var{abfd}.
1274 */
1275
1276 const bfd_arch_info_type *
1277 bfd_get_arch_info (bfd *abfd)
1278 {
1279   return abfd->arch_info;
1280 }
1281
1282 /*
1283 FUNCTION
1284         bfd_lookup_arch
1285
1286 SYNOPSIS
1287         const bfd_arch_info_type *bfd_lookup_arch
1288           (enum bfd_architecture arch, unsigned long machine);
1289
1290 DESCRIPTION
1291         Look for the architecture info structure which matches the
1292         arguments @var{arch} and @var{machine}. A machine of 0 matches the
1293         machine/architecture structure which marks itself as the
1294         default.
1295 */
1296
1297 const bfd_arch_info_type *
1298 bfd_lookup_arch (enum bfd_architecture arch, unsigned long machine)
1299 {
1300   const bfd_arch_info_type * const *app, *ap;
1301
1302   for (app = bfd_archures_list; *app != NULL; app++)
1303     {
1304       for (ap = *app; ap != NULL; ap = ap->next)
1305         {
1306           if (ap->arch == arch
1307               && (ap->mach == machine
1308                   || (machine == 0 && ap->the_default)))
1309             return ap;
1310         }
1311     }
1312
1313   return NULL;
1314 }
1315
1316 /*
1317 FUNCTION
1318         bfd_printable_arch_mach
1319
1320 SYNOPSIS
1321         const char *bfd_printable_arch_mach
1322           (enum bfd_architecture arch, unsigned long machine);
1323
1324 DESCRIPTION
1325         Return a printable string representing the architecture and
1326         machine type.
1327
1328         This routine is depreciated.
1329 */
1330
1331 const char *
1332 bfd_printable_arch_mach (enum bfd_architecture arch, unsigned long machine)
1333 {
1334   const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
1335
1336   if (ap)
1337     return ap->printable_name;
1338   return "UNKNOWN!";
1339 }
1340
1341 /*
1342 FUNCTION
1343         bfd_octets_per_byte
1344
1345 SYNOPSIS
1346         unsigned int bfd_octets_per_byte (bfd *abfd);
1347
1348 DESCRIPTION
1349         Return the number of octets (8-bit quantities) per target byte
1350         (minimum addressable unit).  In most cases, this will be one, but some
1351         DSP targets have 16, 32, or even 48 bits per byte.
1352 */
1353
1354 unsigned int
1355 bfd_octets_per_byte (bfd *abfd)
1356 {
1357   return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1358                                         bfd_get_mach (abfd));
1359 }
1360
1361 /*
1362 FUNCTION
1363         bfd_arch_mach_octets_per_byte
1364
1365 SYNOPSIS
1366         unsigned int bfd_arch_mach_octets_per_byte
1367           (enum bfd_architecture arch, unsigned long machine);
1368
1369 DESCRIPTION
1370         See bfd_octets_per_byte.
1371
1372         This routine is provided for those cases where a bfd * is not
1373         available
1374 */
1375
1376 unsigned int
1377 bfd_arch_mach_octets_per_byte (enum bfd_architecture arch,
1378                                unsigned long mach)
1379 {
1380   const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
1381
1382   if (ap)
1383     return ap->bits_per_byte / 8;
1384   return 1;
1385 }
1386
1387 /*
1388 INTERNAL_FUNCTION
1389         bfd_arch_default_fill
1390
1391 SYNOPSIS
1392         void *bfd_arch_default_fill (bfd_size_type count,
1393                                      bfd_boolean is_bigendian,
1394                                      bfd_boolean code);
1395
1396 DESCRIPTION
1397         Allocate via bfd_malloc and return a fill buffer of size COUNT.
1398         If IS_BIGENDIAN is TRUE, the order of bytes is big endian.  If
1399         CODE is TRUE, the buffer contains code.
1400 */
1401
1402 void *
1403 bfd_arch_default_fill (bfd_size_type count,
1404                        bfd_boolean is_bigendian ATTRIBUTE_UNUSED,
1405                        bfd_boolean code ATTRIBUTE_UNUSED)
1406 {
1407   void *fill = bfd_malloc (count);
1408   if (fill != NULL)
1409     memset (fill, 0, count);
1410   return fill;
1411 }
1412
1413 bfd_boolean
1414 _bfd_nowrite_set_arch_mach (bfd *abfd,
1415                             enum bfd_architecture arch ATTRIBUTE_UNUSED,
1416                             unsigned long mach ATTRIBUTE_UNUSED)
1417 {
1418   return _bfd_bool_bfd_false_error (abfd);
1419 }