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