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