1/* BFD library support routines for architectures.
2   Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
3   2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
4   Free Software Foundation, Inc.
5   Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
6
7   This file is part of BFD, the Binary File Descriptor library.
8
9   This program is free software; you can redistribute it and/or modify
10   it under the terms of the GNU General Public License as published by
11   the Free Software Foundation; either version 2 of the License, or
12   (at your option) any later version.
13
14   This program is distributed in the hope that it will be useful,
15   but WITHOUT ANY WARRANTY; without even the implied warranty of
16   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17   GNU General Public License for more details.
18
19   You should have received a copy of the GNU General Public License
20   along with this program; if not, write to the Free Software
21   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
22
23#include "sysdep.h"
24#include "bfd.h"
25#include "libbfd.h"
26#include "safe-ctype.h"
27
28/*
29
30SECTION
31	Architectures
32
33	BFD keeps one atom in a BFD describing the
34	architecture of the data attached to the BFD: a pointer to a
35	<<bfd_arch_info_type>>.
36
37	Pointers to structures can be requested independently of a BFD
38	so that an architecture's information can be interrogated
39	without access to an open BFD.
40
41	The architecture information is provided by each architecture package.
42	The set of default architectures is selected by the macro
43	<<SELECT_ARCHITECTURES>>.  This is normally set up in the
44	@file{config/@var{target}.mt} file of your choice.  If the name is not
45	defined, then all the architectures supported are included.
46
47	When BFD starts up, all the architectures are called with an
48	initialize method.  It is up to the architecture back end to
49	insert as many items into the list of architectures as it wants to;
50	generally this would be one for each machine and one for the
51	default case (an item with a machine field of 0).
52
53	BFD's idea of an architecture is implemented in	@file{archures.c}.
54*/
55
56/*
57
58SUBSECTION
59	bfd_architecture
60
61DESCRIPTION
62	This enum gives the object file's CPU architecture, in a
63	global sense---i.e., what processor family does it belong to?
64	Another field indicates which processor within
65	the family is in use.  The machine gives a number which
66	distinguishes different versions of the architecture,
67	containing, for example, 2 and 3 for Intel i960 KA and i960 KB,
68	and 68020 and 68030 for Motorola 68020 and 68030.
69
70.enum bfd_architecture
71.{
72.  bfd_arch_unknown,   {* File arch not known.  *}
73.  bfd_arch_obscure,   {* Arch known, not one of these.  *}
74.  bfd_arch_m68k,      {* Motorola 68xxx *}
75.#define bfd_mach_m68000 1
76.#define bfd_mach_m68008 2
77.#define bfd_mach_m68010 3
78.#define bfd_mach_m68020 4
79.#define bfd_mach_m68030 5
80.#define bfd_mach_m68040 6
81.#define bfd_mach_m68060 7
82.#define bfd_mach_cpu32  8
83.#define bfd_mach_fido   9
84.#define bfd_mach_mcf_isa_a_nodiv 10
85.#define bfd_mach_mcf_isa_a 11
86.#define bfd_mach_mcf_isa_a_mac 12
87.#define bfd_mach_mcf_isa_a_emac 13
88.#define bfd_mach_mcf_isa_aplus 14
89.#define bfd_mach_mcf_isa_aplus_mac 15
90.#define bfd_mach_mcf_isa_aplus_emac 16
91.#define bfd_mach_mcf_isa_b_nousp 17
92.#define bfd_mach_mcf_isa_b_nousp_mac 18
93.#define bfd_mach_mcf_isa_b_nousp_emac 19
94.#define bfd_mach_mcf_isa_b 20
95.#define bfd_mach_mcf_isa_b_mac 21
96.#define bfd_mach_mcf_isa_b_emac 22
97.#define bfd_mach_mcf_isa_b_float 23
98.#define bfd_mach_mcf_isa_b_float_mac 24
99.#define bfd_mach_mcf_isa_b_float_emac 25
100.#define bfd_mach_mcf_isa_c 26
101.#define bfd_mach_mcf_isa_c_mac 27
102.#define bfd_mach_mcf_isa_c_emac 28
103.  bfd_arch_vax,       {* DEC Vax *}
104.  bfd_arch_i960,      {* Intel 960 *}
105.    {* The order of the following is important.
106.       lower number indicates a machine type that
107.       only accepts a subset of the instructions
108.       available to machines with higher numbers.
109.       The exception is the "ca", which is
110.       incompatible with all other machines except
111.       "core".  *}
112.
113.#define bfd_mach_i960_core      1
114.#define bfd_mach_i960_ka_sa     2
115.#define bfd_mach_i960_kb_sb     3
116.#define bfd_mach_i960_mc        4
117.#define bfd_mach_i960_xa        5
118.#define bfd_mach_i960_ca        6
119.#define bfd_mach_i960_jx	 7
120.#define bfd_mach_i960_hx        8
121.
122.  bfd_arch_or32,      {* OpenRISC 32 *}
123.
124.  bfd_arch_sparc,     {* SPARC *}
125.#define bfd_mach_sparc			1
126.{* The difference between v8plus and v9 is that v9 is a true 64 bit env.  *}
127.#define bfd_mach_sparc_sparclet	2
128.#define bfd_mach_sparc_sparclite	3
129.#define bfd_mach_sparc_v8plus		4
130.#define bfd_mach_sparc_v8plusa		5 {* with ultrasparc add'ns.  *}
131.#define bfd_mach_sparc_sparclite_le	6
132.#define bfd_mach_sparc_v9		7
133.#define bfd_mach_sparc_v9a		8 {* with ultrasparc add'ns.  *}
134.#define bfd_mach_sparc_v8plusb		9 {* with cheetah add'ns.  *}
135.#define bfd_mach_sparc_v9b		10 {* with cheetah add'ns.  *}
136.{* Nonzero if MACH has the v9 instruction set.  *}
137.#define bfd_mach_sparc_v9_p(mach) \
138.  ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \
139.   && (mach) != bfd_mach_sparc_sparclite_le)
140.{* Nonzero if MACH is a 64 bit sparc architecture.  *}
141.#define bfd_mach_sparc_64bit_p(mach) \
142.  ((mach) >= bfd_mach_sparc_v9 && (mach) != bfd_mach_sparc_v8plusb)
143.  bfd_arch_spu,       {* PowerPC SPU *}
144.#define bfd_mach_spu		256
145.  bfd_arch_mips,      {* MIPS Rxxxx *}
146.#define bfd_mach_mips3000		3000
147.#define bfd_mach_mips3900		3900
148.#define bfd_mach_mips4000		4000
149.#define bfd_mach_mips4010		4010
150.#define bfd_mach_mips4100		4100
151.#define bfd_mach_mips4111		4111
152.#define bfd_mach_mips4120		4120
153.#define bfd_mach_mips4300		4300
154.#define bfd_mach_mips4400		4400
155.#define bfd_mach_mips4600		4600
156.#define bfd_mach_mips4650		4650
157.#define bfd_mach_mips5000		5000
158.#define bfd_mach_mips5400		5400
159.#define bfd_mach_mips5500		5500
160.#define bfd_mach_mips6000		6000
161.#define bfd_mach_mips7000		7000
162.#define bfd_mach_mips8000		8000
163.#define bfd_mach_mips9000		9000
164.#define bfd_mach_mips10000		10000
165.#define bfd_mach_mips12000		12000
166.#define bfd_mach_mips16		16
167.#define bfd_mach_mips5                 5
168.#define bfd_mach_mips_octeon           6502
169.#define bfd_mach_mips_sb1              12310201 {* octal 'SB', 01 *}
170.#define bfd_mach_mipsisa32             32
171.#define bfd_mach_mipsisa32r2           33
172.#define bfd_mach_mipsisa64             64
173.#define bfd_mach_mipsisa64r2           65
174.  bfd_arch_i386,      {* Intel 386 *}
175.#define bfd_mach_i386_i386 1
176.#define bfd_mach_i386_i8086 2
177.#define bfd_mach_i386_i386_intel_syntax 3
178.#define bfd_mach_x86_64 64
179.#define bfd_mach_x86_64_intel_syntax 65
180.  bfd_arch_we32k,     {* AT&T WE32xxx *}
181.  bfd_arch_tahoe,     {* CCI/Harris Tahoe *}
182.  bfd_arch_i860,      {* Intel 860 *}
183.  bfd_arch_i370,      {* IBM 360/370 Mainframes *}
184.  bfd_arch_romp,      {* IBM ROMP PC/RT *}
185.  bfd_arch_convex,    {* Convex *}
186.  bfd_arch_m88k,      {* Motorola 88xxx *}
187.  bfd_arch_m98k,      {* Motorola 98xxx *}
188.  bfd_arch_pyramid,   {* Pyramid Technology *}
189.  bfd_arch_h8300,     {* Renesas H8/300 (formerly Hitachi H8/300) *}
190.#define bfd_mach_h8300    1
191.#define bfd_mach_h8300h   2
192.#define bfd_mach_h8300s   3
193.#define bfd_mach_h8300hn  4
194.#define bfd_mach_h8300sn  5
195.#define bfd_mach_h8300sx  6
196.#define bfd_mach_h8300sxn 7
197.  bfd_arch_pdp11,     {* DEC PDP-11 *}
198.  bfd_arch_powerpc,   {* PowerPC *}
199.#define bfd_mach_ppc		32
200.#define bfd_mach_ppc64		64
201.#define bfd_mach_ppc_403	403
202.#define bfd_mach_ppc_403gc	4030
203.#define bfd_mach_ppc_505	505
204.#define bfd_mach_ppc_601	601
205.#define bfd_mach_ppc_602	602
206.#define bfd_mach_ppc_603	603
207.#define bfd_mach_ppc_ec603e	6031
208.#define bfd_mach_ppc_604	604
209.#define bfd_mach_ppc_620	620
210.#define bfd_mach_ppc_630	630
211.#define bfd_mach_ppc_750	750
212.#define bfd_mach_ppc_860	860
213.#define bfd_mach_ppc_a35	35
214.#define bfd_mach_ppc_rs64ii	642
215.#define bfd_mach_ppc_rs64iii	643
216.#define bfd_mach_ppc_7400	7400
217.#define bfd_mach_ppc_e500      500
218.  bfd_arch_rs6000,    {* IBM RS/6000 *}
219.#define bfd_mach_rs6k		6000
220.#define bfd_mach_rs6k_rs1	6001
221.#define bfd_mach_rs6k_rsc	6003
222.#define bfd_mach_rs6k_rs2	6002
223.  bfd_arch_hppa,      {* HP PA RISC *}
224.#define bfd_mach_hppa10	10
225.#define bfd_mach_hppa11	11
226.#define bfd_mach_hppa20	20
227.#define bfd_mach_hppa20w	25
228.  bfd_arch_d10v,      {* Mitsubishi D10V *}
229.#define bfd_mach_d10v		1
230.#define bfd_mach_d10v_ts2	2
231.#define bfd_mach_d10v_ts3	3
232.  bfd_arch_d30v,      {* Mitsubishi D30V *}
233.  bfd_arch_dlx,       {* DLX *}
234.  bfd_arch_m68hc11,   {* Motorola 68HC11 *}
235.  bfd_arch_m68hc12,   {* Motorola 68HC12 *}
236.#define bfd_mach_m6812_default 0
237.#define bfd_mach_m6812         1
238.#define bfd_mach_m6812s        2
239.  bfd_arch_z8k,       {* Zilog Z8000 *}
240.#define bfd_mach_z8001		1
241.#define bfd_mach_z8002		2
242.  bfd_arch_h8500,     {* Renesas H8/500 (formerly Hitachi H8/500) *}
243.  bfd_arch_sh,        {* Renesas / SuperH SH (formerly Hitachi SH) *}
244.#define bfd_mach_sh            1
245.#define bfd_mach_sh2        0x20
246.#define bfd_mach_sh_dsp     0x2d
247.#define bfd_mach_sh2a       0x2a
248.#define bfd_mach_sh2a_nofpu 0x2b
249.#define bfd_mach_sh2a_nofpu_or_sh4_nommu_nofpu 0x2a1
250.#define bfd_mach_sh2a_nofpu_or_sh3_nommu 0x2a2
251.#define bfd_mach_sh2a_or_sh4  0x2a3
252.#define bfd_mach_sh2a_or_sh3e 0x2a4
253.#define bfd_mach_sh2e       0x2e
254.#define bfd_mach_sh3        0x30
255.#define bfd_mach_sh3_nommu  0x31
256.#define bfd_mach_sh3_dsp    0x3d
257.#define bfd_mach_sh3e       0x3e
258.#define bfd_mach_sh4        0x40
259.#define bfd_mach_sh4_nofpu  0x41
260.#define bfd_mach_sh4_nommu_nofpu  0x42
261.#define bfd_mach_sh4a       0x4a
262.#define bfd_mach_sh4a_nofpu 0x4b
263.#define bfd_mach_sh4al_dsp  0x4d
264.#define bfd_mach_sh5        0x50
265.  bfd_arch_alpha,     {* Dec Alpha *}
266.#define bfd_mach_alpha_ev4  0x10
267.#define bfd_mach_alpha_ev5  0x20
268.#define bfd_mach_alpha_ev6  0x30
269.  bfd_arch_arm,       {* Advanced Risc Machines ARM.  *}
270.#define bfd_mach_arm_unknown	0
271.#define bfd_mach_arm_2		1
272.#define bfd_mach_arm_2a	2
273.#define bfd_mach_arm_3		3
274.#define bfd_mach_arm_3M 	4
275.#define bfd_mach_arm_4 	5
276.#define bfd_mach_arm_4T 	6
277.#define bfd_mach_arm_5 	7
278.#define bfd_mach_arm_5T	8
279.#define bfd_mach_arm_5TE	9
280.#define bfd_mach_arm_XScale	10
281.#define bfd_mach_arm_ep9312	11
282.#define bfd_mach_arm_iWMMXt	12
283.#define bfd_mach_arm_iWMMXt2	13
284.  bfd_arch_ns32k,     {* National Semiconductors ns32000 *}
285.  bfd_arch_w65,       {* WDC 65816 *}
286.  bfd_arch_tic30,     {* Texas Instruments TMS320C30 *}
287.  bfd_arch_tic4x,     {* Texas Instruments TMS320C3X/4X *}
288.#define bfd_mach_tic3x         30
289.#define bfd_mach_tic4x         40
290.  bfd_arch_tic54x,    {* Texas Instruments TMS320C54X *}
291.  bfd_arch_tic80,     {* TI TMS320c80 (MVP) *}
292.  bfd_arch_v850,      {* NEC V850 *}
293.#define bfd_mach_v850          1
294.#define bfd_mach_v850e 	'E'
295.#define bfd_mach_v850e1	'1'
296.  bfd_arch_arc,       {* ARC Cores *}
297.#define bfd_mach_arc_5         5
298.#define bfd_mach_arc_6         6
299.#define bfd_mach_arc_7         7
300.#define bfd_mach_arc_8         8
301. bfd_arch_m32c,     {* Renesas M16C/M32C.  *}
302.#define bfd_mach_m16c        0x75
303.#define bfd_mach_m32c        0x78
304.  bfd_arch_m32r,      {* Renesas M32R (formerly Mitsubishi M32R/D) *}
305.#define bfd_mach_m32r		1 {* For backwards compatibility.  *}
306.#define bfd_mach_m32rx		'x'
307.#define bfd_mach_m32r2		'2'
308.  bfd_arch_mn10200,   {* Matsushita MN10200 *}
309.  bfd_arch_mn10300,   {* Matsushita MN10300 *}
310.#define bfd_mach_mn10300		300
311.#define bfd_mach_am33		330
312.#define bfd_mach_am33_2	332
313.  bfd_arch_fr30,
314.#define bfd_mach_fr30		0x46523330
315.  bfd_arch_frv,
316.#define bfd_mach_frv		1
317.#define bfd_mach_frvsimple	2
318.#define bfd_mach_fr300		300
319.#define bfd_mach_fr400		400
320.#define bfd_mach_fr450		450
321.#define bfd_mach_frvtomcat	499	{* fr500 prototype *}
322.#define bfd_mach_fr500		500
323.#define bfd_mach_fr550		550
324.  bfd_arch_mcore,
325.  bfd_arch_mep,
326.#define bfd_mach_mep		1
327.#define bfd_mach_mep_h1	0x6831
328.  bfd_arch_ia64,      {* HP/Intel ia64 *}
329.#define bfd_mach_ia64_elf64	64
330.#define bfd_mach_ia64_elf32	32
331.  bfd_arch_ip2k,      {* Ubicom IP2K microcontrollers. *}
332.#define bfd_mach_ip2022	1
333.#define bfd_mach_ip2022ext	2
334. bfd_arch_iq2000,     {* Vitesse IQ2000.  *}
335.#define bfd_mach_iq2000        1
336.#define bfd_mach_iq10          2
337.  bfd_arch_mt,
338.#define bfd_mach_ms1           1
339.#define bfd_mach_mrisc2        2
340.#define bfd_mach_ms2           3
341.  bfd_arch_pj,
342.  bfd_arch_avr,       {* Atmel AVR microcontrollers.  *}
343.#define bfd_mach_avr1		1
344.#define bfd_mach_avr2		2
345.#define bfd_mach_avr3		3
346.#define bfd_mach_avr4		4
347.#define bfd_mach_avr5		5
348.#define bfd_mach_avr6		6
349.  bfd_arch_bfin,        {* ADI Blackfin *}
350.#define bfd_mach_bfin          1
351.  bfd_arch_cr16,       {* National Semiconductor CompactRISC (ie CR16). *}
352.#define bfd_mach_cr16		1
353.  bfd_arch_cr16c,       {* National Semiconductor CompactRISC. *}
354.#define bfd_mach_cr16c		1
355.  bfd_arch_crx,       {*  National Semiconductor CRX.  *}
356.#define bfd_mach_crx		1
357.  bfd_arch_cris,      {* Axis CRIS *}
358.#define bfd_mach_cris_v0_v10	255
359.#define bfd_mach_cris_v32	32
360.#define bfd_mach_cris_v10_v32	1032
361.  bfd_arch_s390,      {* IBM s390 *}
362.#define bfd_mach_s390_31       31
363.#define bfd_mach_s390_64       64
364.  bfd_arch_score,     {* Sunplus score *}
365.  bfd_arch_openrisc,  {* OpenRISC *}
366.  bfd_arch_mmix,      {* Donald Knuth's educational processor.  *}
367.  bfd_arch_xstormy16,
368.#define bfd_mach_xstormy16	1
369.  bfd_arch_msp430,    {* Texas Instruments MSP430 architecture.  *}
370.#define bfd_mach_msp11          11
371.#define bfd_mach_msp110         110
372.#define bfd_mach_msp12          12
373.#define bfd_mach_msp13          13
374.#define bfd_mach_msp14          14
375.#define bfd_mach_msp15          15
376.#define bfd_mach_msp16          16
377.#define bfd_mach_msp21          21
378.#define bfd_mach_msp31          31
379.#define bfd_mach_msp32          32
380.#define bfd_mach_msp33          33
381.#define bfd_mach_msp41          41
382.#define bfd_mach_msp42          42
383.#define bfd_mach_msp43          43
384.#define bfd_mach_msp44          44
385.  bfd_arch_xc16x,     {* Infineon's XC16X Series.               *}
386.#define bfd_mach_xc16x         1
387.#define bfd_mach_xc16xl        2
388.#define bfd_mach_xc16xs         3
389.  bfd_arch_xtensa,    {* Tensilica's Xtensa cores.  *}
390.#define bfd_mach_xtensa	1
391.   bfd_arch_maxq,     {* Dallas MAXQ 10/20 *}
392.#define bfd_mach_maxq10    10
393.#define bfd_mach_maxq20    20
394.  bfd_arch_z80,
395.#define bfd_mach_z80strict      1 {* No undocumented opcodes.  *}
396.#define bfd_mach_z80            3 {* With ixl, ixh, iyl, and iyh.  *}
397.#define bfd_mach_z80full        7 {* All undocumented instructions.  *}
398.#define bfd_mach_r800           11 {* R800: successor with multiplication.  *}
399.  bfd_arch_last
400.  };
401*/
402
403/*
404SUBSECTION
405	bfd_arch_info
406
407DESCRIPTION
408	This structure contains information on architectures for use
409	within BFD.
410
411.
412.typedef struct bfd_arch_info
413.{
414.  int bits_per_word;
415.  int bits_per_address;
416.  int bits_per_byte;
417.  enum bfd_architecture arch;
418.  unsigned long mach;
419.  const char *arch_name;
420.  const char *printable_name;
421.  unsigned int section_align_power;
422.  {* TRUE if this is the default machine for the architecture.
423.     The default arch should be the first entry for an arch so that
424.     all the entries for that arch can be accessed via <<next>>.  *}
425.  bfd_boolean the_default;
426.  const struct bfd_arch_info * (*compatible)
427.    (const struct bfd_arch_info *a, const struct bfd_arch_info *b);
428.
429.  bfd_boolean (*scan) (const struct bfd_arch_info *, const char *);
430.
431.  const struct bfd_arch_info *next;
432.}
433.bfd_arch_info_type;
434.
435*/
436
437extern const bfd_arch_info_type bfd_alpha_arch;
438extern const bfd_arch_info_type bfd_arc_arch;
439extern const bfd_arch_info_type bfd_arm_arch;
440extern const bfd_arch_info_type bfd_avr_arch;
441extern const bfd_arch_info_type bfd_bfin_arch;
442extern const bfd_arch_info_type bfd_cr16_arch;
443extern const bfd_arch_info_type bfd_cr16c_arch;
444extern const bfd_arch_info_type bfd_cris_arch;
445extern const bfd_arch_info_type bfd_crx_arch;
446extern const bfd_arch_info_type bfd_d10v_arch;
447extern const bfd_arch_info_type bfd_d30v_arch;
448extern const bfd_arch_info_type bfd_dlx_arch;
449extern const bfd_arch_info_type bfd_fr30_arch;
450extern const bfd_arch_info_type bfd_frv_arch;
451extern const bfd_arch_info_type bfd_h8300_arch;
452extern const bfd_arch_info_type bfd_h8500_arch;
453extern const bfd_arch_info_type bfd_hppa_arch;
454extern const bfd_arch_info_type bfd_i370_arch;
455extern const bfd_arch_info_type bfd_i386_arch;
456extern const bfd_arch_info_type bfd_i860_arch;
457extern const bfd_arch_info_type bfd_i960_arch;
458extern const bfd_arch_info_type bfd_ia64_arch;
459extern const bfd_arch_info_type bfd_ip2k_arch;
460extern const bfd_arch_info_type bfd_iq2000_arch;
461extern const bfd_arch_info_type bfd_m32c_arch;
462extern const bfd_arch_info_type bfd_m32r_arch;
463extern const bfd_arch_info_type bfd_m68hc11_arch;
464extern const bfd_arch_info_type bfd_m68hc12_arch;
465extern const bfd_arch_info_type bfd_m68k_arch;
466extern const bfd_arch_info_type bfd_m88k_arch;
467extern const bfd_arch_info_type bfd_maxq_arch;
468extern const bfd_arch_info_type bfd_mcore_arch;
469extern const bfd_arch_info_type bfd_mep_arch;
470extern const bfd_arch_info_type bfd_mips_arch;
471extern const bfd_arch_info_type bfd_mmix_arch;
472extern const bfd_arch_info_type bfd_mn10200_arch;
473extern const bfd_arch_info_type bfd_mn10300_arch;
474extern const bfd_arch_info_type bfd_msp430_arch;
475extern const bfd_arch_info_type bfd_mt_arch;
476extern const bfd_arch_info_type bfd_ns32k_arch;
477extern const bfd_arch_info_type bfd_openrisc_arch;
478extern const bfd_arch_info_type bfd_or32_arch;
479extern const bfd_arch_info_type bfd_pdp11_arch;
480extern const bfd_arch_info_type bfd_pj_arch;
481extern const bfd_arch_info_type bfd_powerpc_archs[];
482#define bfd_powerpc_arch bfd_powerpc_archs[0]
483extern const bfd_arch_info_type bfd_rs6000_arch;
484extern const bfd_arch_info_type bfd_s390_arch;
485extern const bfd_arch_info_type bfd_score_arch;
486extern const bfd_arch_info_type bfd_sh_arch;
487extern const bfd_arch_info_type bfd_sparc_arch;
488extern const bfd_arch_info_type bfd_spu_arch;
489extern const bfd_arch_info_type bfd_tic30_arch;
490extern const bfd_arch_info_type bfd_tic4x_arch;
491extern const bfd_arch_info_type bfd_tic54x_arch;
492extern const bfd_arch_info_type bfd_tic80_arch;
493extern const bfd_arch_info_type bfd_v850_arch;
494extern const bfd_arch_info_type bfd_vax_arch;
495extern const bfd_arch_info_type bfd_we32k_arch;
496extern const bfd_arch_info_type bfd_w65_arch;
497extern const bfd_arch_info_type bfd_xstormy16_arch;
498extern const bfd_arch_info_type bfd_xtensa_arch;
499extern const bfd_arch_info_type bfd_xc16x_arch;
500extern const bfd_arch_info_type bfd_z80_arch;
501extern const bfd_arch_info_type bfd_z8k_arch;
502
503static const bfd_arch_info_type * const bfd_archures_list[] =
504  {
505#ifdef SELECT_ARCHITECTURES
506    SELECT_ARCHITECTURES,
507#else
508    &bfd_alpha_arch,
509    &bfd_arc_arch,
510    &bfd_arm_arch,
511    &bfd_avr_arch,
512    &bfd_bfin_arch,
513    &bfd_cr16_arch,
514    &bfd_cr16c_arch,
515    &bfd_cris_arch,
516    &bfd_crx_arch,
517    &bfd_d10v_arch,
518    &bfd_d30v_arch,
519    &bfd_dlx_arch,
520    &bfd_fr30_arch,
521    &bfd_frv_arch,
522    &bfd_h8300_arch,
523    &bfd_h8500_arch,
524    &bfd_hppa_arch,
525    &bfd_i370_arch,
526    &bfd_i386_arch,
527    &bfd_i860_arch,
528    &bfd_i960_arch,
529    &bfd_ia64_arch,
530    &bfd_ip2k_arch,
531    &bfd_iq2000_arch,
532    &bfd_m32c_arch,
533    &bfd_m32r_arch,
534    &bfd_m68hc11_arch,
535    &bfd_m68hc12_arch,
536    &bfd_m68k_arch,
537    &bfd_m88k_arch,
538    &bfd_maxq_arch,
539    &bfd_mcore_arch,
540    &bfd_mep_arch,
541    &bfd_mips_arch,
542    &bfd_mmix_arch,
543    &bfd_mn10200_arch,
544    &bfd_mn10300_arch,
545    &bfd_mt_arch,
546    &bfd_msp430_arch,
547    &bfd_ns32k_arch,
548    &bfd_openrisc_arch,
549    &bfd_or32_arch,
550    &bfd_pdp11_arch,
551    &bfd_powerpc_arch,
552    &bfd_rs6000_arch,
553    &bfd_s390_arch,
554    &bfd_score_arch,
555    &bfd_sh_arch,
556    &bfd_sparc_arch,
557    &bfd_spu_arch,
558    &bfd_tic30_arch,
559    &bfd_tic4x_arch,
560    &bfd_tic54x_arch,
561    &bfd_tic80_arch,
562    &bfd_v850_arch,
563    &bfd_vax_arch,
564    &bfd_w65_arch,
565    &bfd_we32k_arch,
566    &bfd_xstormy16_arch,
567    &bfd_xtensa_arch,
568    &bfd_xc16x_arch,
569    &bfd_z80_arch,
570    &bfd_z8k_arch,
571#endif
572  0
573};
574
575/*
576FUNCTION
577	bfd_printable_name
578
579SYNOPSIS
580	const char *bfd_printable_name (bfd *abfd);
581
582DESCRIPTION
583	Return a printable string representing the architecture and machine
584	from the pointer to the architecture info structure.
585
586*/
587
588const char *
589bfd_printable_name (bfd *abfd)
590{
591  return abfd->arch_info->printable_name;
592}
593
594/*
595FUNCTION
596	bfd_scan_arch
597
598SYNOPSIS
599	const bfd_arch_info_type *bfd_scan_arch (const char *string);
600
601DESCRIPTION
602	Figure out if BFD supports any cpu which could be described with
603	the name @var{string}.  Return a pointer to an <<arch_info>>
604	structure if a machine is found, otherwise NULL.
605*/
606
607const bfd_arch_info_type *
608bfd_scan_arch (const char *string)
609{
610  const bfd_arch_info_type * const *app, *ap;
611
612  /* Look through all the installed architectures.  */
613  for (app = bfd_archures_list; *app != NULL; app++)
614    {
615      for (ap = *app; ap != NULL; ap = ap->next)
616	{
617	  if (ap->scan (ap, string))
618	    return ap;
619	}
620    }
621
622  return NULL;
623}
624
625/*
626FUNCTION
627	bfd_arch_list
628
629SYNOPSIS
630	const char **bfd_arch_list (void);
631
632DESCRIPTION
633	Return a freshly malloced NULL-terminated vector of the names
634	of all the valid BFD architectures.  Do not modify the names.
635*/
636
637const char **
638bfd_arch_list (void)
639{
640  int vec_length = 0;
641  const char **name_ptr;
642  const char **name_list;
643  const bfd_arch_info_type * const *app;
644  bfd_size_type amt;
645
646  /* Determine the number of architectures.  */
647  vec_length = 0;
648  for (app = bfd_archures_list; *app != NULL; app++)
649    {
650      const bfd_arch_info_type *ap;
651      for (ap = *app; ap != NULL; ap = ap->next)
652	{
653	  vec_length++;
654	}
655    }
656
657  amt = (vec_length + 1) * sizeof (char **);
658  name_list = bfd_malloc (amt);
659  if (name_list == NULL)
660    return NULL;
661
662  /* Point the list at each of the names.  */
663  name_ptr = name_list;
664  for (app = bfd_archures_list; *app != NULL; app++)
665    {
666      const bfd_arch_info_type *ap;
667      for (ap = *app; ap != NULL; ap = ap->next)
668	{
669	  *name_ptr = ap->printable_name;
670	  name_ptr++;
671	}
672    }
673  *name_ptr = NULL;
674
675  return name_list;
676}
677
678/*
679FUNCTION
680	bfd_arch_get_compatible
681
682SYNOPSIS
683	const bfd_arch_info_type *bfd_arch_get_compatible
684	  (const bfd *abfd, const bfd *bbfd, bfd_boolean accept_unknowns);
685
686DESCRIPTION
687	Determine whether two BFDs' architectures and machine types
688	are compatible.  Calculates the lowest common denominator
689	between the two architectures and machine types implied by
690	the BFDs and returns a pointer to an <<arch_info>> structure
691	describing the compatible machine.
692*/
693
694const bfd_arch_info_type *
695bfd_arch_get_compatible (const bfd *abfd,
696			 const bfd *bbfd,
697			 bfd_boolean accept_unknowns)
698{
699  const bfd * ubfd = NULL;
700
701  /* Look for an unknown architecture.  */
702  if (((ubfd = abfd) && ubfd->arch_info->arch == bfd_arch_unknown)
703      || ((ubfd = bbfd) && ubfd->arch_info->arch == bfd_arch_unknown))
704    {
705      /* We can allow an unknown architecture if accept_unknowns
706	 is true, or if the target is the "binary" format, which
707	 has an unknown architecture.  Since the binary format can
708	 only be set by explicit request from the user, it is safe
709	 to assume that they know what they are doing.  */
710      if (accept_unknowns
711	  || strcmp (bfd_get_target (ubfd), "binary") == 0)
712	return ubfd->arch_info;
713      return NULL;
714    }
715
716  /* Otherwise architecture-specific code has to decide.  */
717  return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
718}
719
720/*
721INTERNAL_DEFINITION
722	bfd_default_arch_struct
723
724DESCRIPTION
725	The <<bfd_default_arch_struct>> is an item of
726	<<bfd_arch_info_type>> which has been initialized to a fairly
727	generic state.  A BFD starts life by pointing to this
728	structure, until the correct back end has determined the real
729	architecture of the file.
730
731.extern const bfd_arch_info_type bfd_default_arch_struct;
732*/
733
734const bfd_arch_info_type bfd_default_arch_struct = {
735  32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, TRUE,
736  bfd_default_compatible,
737  bfd_default_scan,
738  0,
739};
740
741/*
742FUNCTION
743	bfd_set_arch_info
744
745SYNOPSIS
746	void bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg);
747
748DESCRIPTION
749	Set the architecture info of @var{abfd} to @var{arg}.
750*/
751
752void
753bfd_set_arch_info (bfd *abfd, const bfd_arch_info_type *arg)
754{
755  abfd->arch_info = arg;
756}
757
758/*
759INTERNAL_FUNCTION
760	bfd_default_set_arch_mach
761
762SYNOPSIS
763	bfd_boolean bfd_default_set_arch_mach
764	  (bfd *abfd, enum bfd_architecture arch, unsigned long mach);
765
766DESCRIPTION
767	Set the architecture and machine type in BFD @var{abfd}
768	to @var{arch} and @var{mach}.  Find the correct
769	pointer to a structure and insert it into the <<arch_info>>
770	pointer.
771*/
772
773bfd_boolean
774bfd_default_set_arch_mach (bfd *abfd,
775			   enum bfd_architecture arch,
776			   unsigned long mach)
777{
778  abfd->arch_info = bfd_lookup_arch (arch, mach);
779  if (abfd->arch_info != NULL)
780    return TRUE;
781
782  abfd->arch_info = &bfd_default_arch_struct;
783  bfd_set_error (bfd_error_bad_value);
784  return FALSE;
785}
786
787/*
788FUNCTION
789	bfd_get_arch
790
791SYNOPSIS
792	enum bfd_architecture bfd_get_arch (bfd *abfd);
793
794DESCRIPTION
795	Return the enumerated type which describes the BFD @var{abfd}'s
796	architecture.
797*/
798
799enum bfd_architecture
800bfd_get_arch (bfd *abfd)
801{
802  return abfd->arch_info->arch;
803}
804
805/*
806FUNCTION
807	bfd_get_mach
808
809SYNOPSIS
810	unsigned long bfd_get_mach (bfd *abfd);
811
812DESCRIPTION
813	Return the long type which describes the BFD @var{abfd}'s
814	machine.
815*/
816
817unsigned long
818bfd_get_mach (bfd *abfd)
819{
820  return abfd->arch_info->mach;
821}
822
823/*
824FUNCTION
825	bfd_arch_bits_per_byte
826
827SYNOPSIS
828	unsigned int bfd_arch_bits_per_byte (bfd *abfd);
829
830DESCRIPTION
831	Return the number of bits in one of the BFD @var{abfd}'s
832	architecture's bytes.
833*/
834
835unsigned int
836bfd_arch_bits_per_byte (bfd *abfd)
837{
838  return abfd->arch_info->bits_per_byte;
839}
840
841/*
842FUNCTION
843	bfd_arch_bits_per_address
844
845SYNOPSIS
846	unsigned int bfd_arch_bits_per_address (bfd *abfd);
847
848DESCRIPTION
849	Return the number of bits in one of the BFD @var{abfd}'s
850	architecture's addresses.
851*/
852
853unsigned int
854bfd_arch_bits_per_address (bfd *abfd)
855{
856  return abfd->arch_info->bits_per_address;
857}
858
859/*
860INTERNAL_FUNCTION
861	bfd_default_compatible
862
863SYNOPSIS
864	const bfd_arch_info_type *bfd_default_compatible
865	  (const bfd_arch_info_type *a, const bfd_arch_info_type *b);
866
867DESCRIPTION
868	The default function for testing for compatibility.
869*/
870
871const bfd_arch_info_type *
872bfd_default_compatible (const bfd_arch_info_type *a,
873			const bfd_arch_info_type *b)
874{
875  if (a->arch != b->arch)
876    return NULL;
877
878  if (a->bits_per_word != b->bits_per_word)
879    return NULL;
880
881  if (a->mach > b->mach)
882    return a;
883
884  if (b->mach > a->mach)
885    return b;
886
887  return a;
888}
889
890/*
891INTERNAL_FUNCTION
892	bfd_default_scan
893
894SYNOPSIS
895	bfd_boolean bfd_default_scan
896	  (const struct bfd_arch_info *info, const char *string);
897
898DESCRIPTION
899	The default function for working out whether this is an
900	architecture hit and a machine hit.
901*/
902
903bfd_boolean
904bfd_default_scan (const bfd_arch_info_type *info, const char *string)
905{
906  const char *ptr_src;
907  const char *ptr_tst;
908  unsigned long number;
909  enum bfd_architecture arch;
910  const char *printable_name_colon;
911
912  /* Exact match of the architecture name (ARCH_NAME) and also the
913     default architecture?  */
914  if (strcasecmp (string, info->arch_name) == 0
915      && info->the_default)
916    return TRUE;
917
918  /* Exact match of the machine name (PRINTABLE_NAME)?  */
919  if (strcasecmp (string, info->printable_name) == 0)
920    return TRUE;
921
922  /* Given that printable_name contains no colon, attempt to match:
923     ARCH_NAME [ ":" ] PRINTABLE_NAME?  */
924  printable_name_colon = strchr (info->printable_name, ':');
925  if (printable_name_colon == NULL)
926    {
927      size_t strlen_arch_name = strlen (info->arch_name);
928      if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
929	{
930	  if (string[strlen_arch_name] == ':')
931	    {
932	      if (strcasecmp (string + strlen_arch_name + 1,
933			      info->printable_name) == 0)
934		return TRUE;
935	    }
936	  else
937	    {
938	      if (strcasecmp (string + strlen_arch_name,
939			      info->printable_name) == 0)
940		return TRUE;
941	    }
942	}
943    }
944
945  /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
946     Attempt to match: <arch> <mach>?  */
947  if (printable_name_colon != NULL)
948    {
949      size_t colon_index = printable_name_colon - info->printable_name;
950      if (strncasecmp (string, info->printable_name, colon_index) == 0
951	  && strcasecmp (string + colon_index,
952			 info->printable_name + colon_index + 1) == 0)
953	return TRUE;
954    }
955
956  /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
957     attempt to match just <mach>, it could be ambiguous.  This test
958     is left until later.  */
959
960  /* NOTE: The below is retained for compatibility only.  Please do
961     not add to this code.  */
962
963  /* See how much of the supplied string matches with the
964     architecture, eg the string m68k:68020 would match the 68k entry
965     up to the :, then we get left with the machine number.  */
966
967  for (ptr_src = string, ptr_tst = info->arch_name;
968       *ptr_src && *ptr_tst;
969       ptr_src++, ptr_tst++)
970    {
971      if (*ptr_src != *ptr_tst)
972	break;
973    }
974
975  /* Chewed up as much of the architecture as will match, skip any
976     colons.  */
977  if (*ptr_src == ':')
978    ptr_src++;
979
980  if (*ptr_src == 0)
981    {
982      /* Nothing more, then only keep this one if it is the default
983	 machine for this architecture.  */
984      return info->the_default;
985    }
986
987  number = 0;
988  while (ISDIGIT (*ptr_src))
989    {
990      number = number * 10 + *ptr_src - '0';
991      ptr_src++;
992    }
993
994  /* NOTE: The below is retained for compatibility only.
995     PLEASE DO NOT ADD TO THIS CODE.  */
996
997  switch (number)
998    {
999      /* FIXME: These are needed to parse IEEE objects.  */
1000      /* The following seven case's are here only for compatibility with
1001	 older binutils (at least IEEE objects from binutils 2.9.1 require
1002	 them).  */
1003    case bfd_mach_m68000:
1004    case bfd_mach_m68010:
1005    case bfd_mach_m68020:
1006    case bfd_mach_m68030:
1007    case bfd_mach_m68040:
1008    case bfd_mach_m68060:
1009    case bfd_mach_cpu32:
1010      arch = bfd_arch_m68k;
1011      break;
1012    case 68000:
1013      arch = bfd_arch_m68k;
1014      number = bfd_mach_m68000;
1015      break;
1016    case 68010:
1017      arch = bfd_arch_m68k;
1018      number = bfd_mach_m68010;
1019      break;
1020    case 68020:
1021      arch = bfd_arch_m68k;
1022      number = bfd_mach_m68020;
1023      break;
1024    case 68030:
1025      arch = bfd_arch_m68k;
1026      number = bfd_mach_m68030;
1027      break;
1028    case 68040:
1029      arch = bfd_arch_m68k;
1030      number = bfd_mach_m68040;
1031      break;
1032    case 68060:
1033      arch = bfd_arch_m68k;
1034      number = bfd_mach_m68060;
1035      break;
1036    case 68332:
1037      arch = bfd_arch_m68k;
1038      number = bfd_mach_cpu32;
1039      break;
1040    case 5200:
1041      arch = bfd_arch_m68k;
1042      number = bfd_mach_mcf_isa_a_nodiv;
1043      break;
1044    case 5206:
1045      arch = bfd_arch_m68k;
1046      number = bfd_mach_mcf_isa_a_mac;
1047      break;
1048    case 5307:
1049      arch = bfd_arch_m68k;
1050      number = bfd_mach_mcf_isa_a_mac;
1051      break;
1052    case 5407:
1053      arch = bfd_arch_m68k;
1054      number = bfd_mach_mcf_isa_b_nousp_mac;
1055      break;
1056    case 5282:
1057      arch = bfd_arch_m68k;
1058      number = bfd_mach_mcf_isa_aplus_emac;
1059      break;
1060
1061    case 32000:
1062      arch = bfd_arch_we32k;
1063      break;
1064
1065    case 3000:
1066      arch = bfd_arch_mips;
1067      number = bfd_mach_mips3000;
1068      break;
1069
1070    case 4000:
1071      arch = bfd_arch_mips;
1072      number = bfd_mach_mips4000;
1073      break;
1074
1075    case 6000:
1076      arch = bfd_arch_rs6000;
1077      break;
1078
1079    case 7410:
1080      arch = bfd_arch_sh;
1081      number = bfd_mach_sh_dsp;
1082      break;
1083
1084    case 7708:
1085      arch = bfd_arch_sh;
1086      number = bfd_mach_sh3;
1087      break;
1088
1089    case 7729:
1090      arch = bfd_arch_sh;
1091      number = bfd_mach_sh3_dsp;
1092      break;
1093
1094    case 7750:
1095      arch = bfd_arch_sh;
1096      number = bfd_mach_sh4;
1097      break;
1098
1099    default:
1100      return FALSE;
1101    }
1102
1103  if (arch != info->arch)
1104    return FALSE;
1105
1106  if (number != info->mach)
1107    return FALSE;
1108
1109  return TRUE;
1110}
1111
1112/*
1113FUNCTION
1114	bfd_get_arch_info
1115
1116SYNOPSIS
1117	const bfd_arch_info_type *bfd_get_arch_info (bfd *abfd);
1118
1119DESCRIPTION
1120	Return the architecture info struct in @var{abfd}.
1121*/
1122
1123const bfd_arch_info_type *
1124bfd_get_arch_info (bfd *abfd)
1125{
1126  return abfd->arch_info;
1127}
1128
1129/*
1130FUNCTION
1131	bfd_lookup_arch
1132
1133SYNOPSIS
1134	const bfd_arch_info_type *bfd_lookup_arch
1135	  (enum bfd_architecture arch, unsigned long machine);
1136
1137DESCRIPTION
1138	Look for the architecture info structure which matches the
1139	arguments @var{arch} and @var{machine}. A machine of 0 matches the
1140	machine/architecture structure which marks itself as the
1141	default.
1142*/
1143
1144const bfd_arch_info_type *
1145bfd_lookup_arch (enum bfd_architecture arch, unsigned long machine)
1146{
1147  const bfd_arch_info_type * const *app, *ap;
1148
1149  for (app = bfd_archures_list; *app != NULL; app++)
1150    {
1151      for (ap = *app; ap != NULL; ap = ap->next)
1152	{
1153	  if (ap->arch == arch
1154	      && (ap->mach == machine
1155		  || (machine == 0 && ap->the_default)))
1156	    return ap;
1157	}
1158    }
1159
1160  return NULL;
1161}
1162
1163/*
1164FUNCTION
1165	bfd_printable_arch_mach
1166
1167SYNOPSIS
1168	const char *bfd_printable_arch_mach
1169	  (enum bfd_architecture arch, unsigned long machine);
1170
1171DESCRIPTION
1172	Return a printable string representing the architecture and
1173	machine type.
1174
1175	This routine is depreciated.
1176*/
1177
1178const char *
1179bfd_printable_arch_mach (enum bfd_architecture arch, unsigned long machine)
1180{
1181  const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
1182
1183  if (ap)
1184    return ap->printable_name;
1185  return "UNKNOWN!";
1186}
1187
1188/*
1189FUNCTION
1190	bfd_octets_per_byte
1191
1192SYNOPSIS
1193	unsigned int bfd_octets_per_byte (bfd *abfd);
1194
1195DESCRIPTION
1196	Return the number of octets (8-bit quantities) per target byte
1197        (minimum addressable unit).  In most cases, this will be one, but some
1198        DSP targets have 16, 32, or even 48 bits per byte.
1199*/
1200
1201unsigned int
1202bfd_octets_per_byte (bfd *abfd)
1203{
1204  return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1205					bfd_get_mach (abfd));
1206}
1207
1208/*
1209FUNCTION
1210	bfd_arch_mach_octets_per_byte
1211
1212SYNOPSIS
1213	unsigned int bfd_arch_mach_octets_per_byte
1214	  (enum bfd_architecture arch, unsigned long machine);
1215
1216DESCRIPTION
1217	See bfd_octets_per_byte.
1218
1219        This routine is provided for those cases where a bfd * is not
1220        available
1221*/
1222
1223unsigned int
1224bfd_arch_mach_octets_per_byte (enum bfd_architecture arch,
1225			       unsigned long mach)
1226{
1227  const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
1228
1229  if (ap)
1230    return ap->bits_per_byte / 8;
1231  return 1;
1232}
1233