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