* chew.c (courierize): Don't modify @command params.
[deliverable/binutils-gdb.git] / bfd / archures.c
CommitLineData
252b5132 1/* BFD library support routines for architectures.
7898deda
NC
2 Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
3 2000, 2001
d4845d57 4 Free Software Foundation, Inc.
252b5132
RH
5 Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
6
7This file is part of BFD, the Binary File Descriptor library.
8
9This program is free software; you can redistribute it and/or modify
10it under the terms of the GNU General Public License as published by
11the Free Software Foundation; either version 2 of the License, or
12(at your option) any later version.
13
14This program is distributed in the hope that it will be useful,
15but WITHOUT ANY WARRANTY; without even the implied warranty of
16MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17GNU General Public License for more details.
18
19You should have received a copy of the GNU General Public License
20along with this program; if not, write to the Free Software
21Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
22
23#include "bfd.h"
24#include "sysdep.h"
25#include "libbfd.h"
3882b010 26#include "safe-ctype.h"
252b5132
RH
27
28/*
29
30SECTION
31 Architectures
32
33 BFD keeps one atom in a BFD describing the
34 architecture of the data attached to the BFD: a pointer to a
0ef5a5bd 35 <<bfd_arch_info_type>>.
252b5132
RH
36
37 Pointers to structures can be requested independently of a BFD
38 so that an architecture's information can be interrogated
39 without access to an open BFD.
40
41 The architecture information is provided by each architecture package.
42 The set of default architectures is selected by the macro
43 <<SELECT_ARCHITECTURES>>. This is normally set up in the
44 @file{config/@var{target}.mt} file of your choice. If the name is not
0ef5a5bd 45 defined, then all the architectures supported are included.
252b5132
RH
46
47 When BFD starts up, all the architectures are called with an
48 initialize method. It is up to the architecture back end to
49 insert as many items into the list of architectures as it wants to;
50 generally this would be one for each machine and one for the
0ef5a5bd 51 default case (an item with a machine field of 0).
252b5132
RH
52
53 BFD's idea of an architecture is implemented in @file{archures.c}.
54*/
55
56/*
57
58SUBSECTION
59 bfd_architecture
60
61DESCRIPTION
62 This enum gives the object file's CPU architecture, in a
63 global sense---i.e., what processor family does it belong to?
64 Another field indicates which processor within
65 the family is in use. The machine gives a number which
66 distinguishes different versions of the architecture,
67 containing, for example, 2 and 3 for Intel i960 KA and i960 KB,
0ef5a5bd 68 and 68020 and 68030 for Motorola 68020 and 68030.
252b5132 69
0ef5a5bd 70.enum bfd_architecture
252b5132
RH
71.{
72. bfd_arch_unknown, {* File arch not known *}
73. bfd_arch_obscure, {* Arch known, not one of these *}
74. bfd_arch_m68k, {* Motorola 68xxx *}
75.#define bfd_mach_m68000 1
76.#define bfd_mach_m68008 2
77.#define bfd_mach_m68010 3
78.#define bfd_mach_m68020 4
79.#define bfd_mach_m68030 5
80.#define bfd_mach_m68040 6
81.#define bfd_mach_m68060 7
82.#define bfd_mach_cpu32 8
3cac17ae
NC
83.#define bfd_mach_mcf5200 9
84.#define bfd_mach_mcf5206e 10
85.#define bfd_mach_mcf5307 11
86.#define bfd_mach_mcf5407 12
0ef5a5bd 87. bfd_arch_vax, {* DEC Vax *}
252b5132
RH
88. bfd_arch_i960, {* Intel 960 *}
89. {* The order of the following is important.
0ef5a5bd 90. lower number indicates a machine type that
252b5132
RH
91. only accepts a subset of the instructions
92. available to machines with higher numbers.
93. The exception is the "ca", which is
0ef5a5bd 94. incompatible with all other machines except
252b5132
RH
95. "core". *}
96.
97.#define bfd_mach_i960_core 1
98.#define bfd_mach_i960_ka_sa 2
99.#define bfd_mach_i960_kb_sb 3
100.#define bfd_mach_i960_mc 4
101.#define bfd_mach_i960_xa 5
102.#define bfd_mach_i960_ca 6
103.#define bfd_mach_i960_jx 7
104.#define bfd_mach_i960_hx 8
105.
106. bfd_arch_a29k, {* AMD 29000 *}
107. bfd_arch_sparc, {* SPARC *}
108.#define bfd_mach_sparc 1
109.{* The difference between v8plus and v9 is that v9 is a true 64 bit env. *}
110.#define bfd_mach_sparc_sparclet 2
111.#define bfd_mach_sparc_sparclite 3
112.#define bfd_mach_sparc_v8plus 4
113.#define bfd_mach_sparc_v8plusa 5 {* with ultrasparc add'ns *}
114.#define bfd_mach_sparc_sparclite_le 6
115.#define bfd_mach_sparc_v9 7
116.#define bfd_mach_sparc_v9a 8 {* with ultrasparc add'ns *}
19f7b010
JJ
117.#define bfd_mach_sparc_v8plusb 9 {* with cheetah add'ns *}
118.#define bfd_mach_sparc_v9b 10 {* with cheetah add'ns *}
252b5132
RH
119.{* Nonzero if MACH has the v9 instruction set. *}
120.#define bfd_mach_sparc_v9_p(mach) \
19f7b010
JJ
121. ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \
122. && (mach) != bfd_mach_sparc_sparclite_le)
252b5132
RH
123. bfd_arch_mips, {* MIPS Rxxxx *}
124.#define bfd_mach_mips3000 3000
125.#define bfd_mach_mips3900 3900
126.#define bfd_mach_mips4000 4000
127.#define bfd_mach_mips4010 4010
128.#define bfd_mach_mips4100 4100
129.#define bfd_mach_mips4111 4111
130.#define bfd_mach_mips4300 4300
131.#define bfd_mach_mips4400 4400
132.#define bfd_mach_mips4600 4600
133.#define bfd_mach_mips4650 4650
134.#define bfd_mach_mips5000 5000
135.#define bfd_mach_mips6000 6000
136.#define bfd_mach_mips8000 8000
137.#define bfd_mach_mips10000 10000
d1cf510e 138.#define bfd_mach_mips12000 12000
252b5132 139.#define bfd_mach_mips16 16
84ea6cf2 140.#define bfd_mach_mips5 5
c6c98b38 141.#define bfd_mach_mips_sb1 12310201 {* octal 'SB', 01 *}
a1cd6a8f
EC
142.#define bfd_mach_mipsisa32 32
143.#define bfd_mach_mipsisa64 64
252b5132
RH
144. bfd_arch_i386, {* Intel 386 *}
145.#define bfd_mach_i386_i386 0
146.#define bfd_mach_i386_i8086 1
147.#define bfd_mach_i386_i386_intel_syntax 2
8d88c4ca
NC
148.#define bfd_mach_x86_64 3
149.#define bfd_mach_x86_64_intel_syntax 4
252b5132
RH
150. bfd_arch_we32k, {* AT&T WE32xxx *}
151. bfd_arch_tahoe, {* CCI/Harris Tahoe *}
152. bfd_arch_i860, {* Intel 860 *}
5b93d8bb 153. bfd_arch_i370, {* IBM 360/370 Mainframes *}
252b5132
RH
154. bfd_arch_romp, {* IBM ROMP PC/RT *}
155. bfd_arch_alliant, {* Alliant *}
156. bfd_arch_convex, {* Convex *}
157. bfd_arch_m88k, {* Motorola 88xxx *}
158. bfd_arch_pyramid, {* Pyramid Technology *}
159. bfd_arch_h8300, {* Hitachi H8/300 *}
160.#define bfd_mach_h8300 1
161.#define bfd_mach_h8300h 2
162.#define bfd_mach_h8300s 3
e135f41b 163. bfd_arch_pdp11, {* DEC PDP-11 *}
252b5132 164. bfd_arch_powerpc, {* PowerPC *}
87f33987
ND
165.#define bfd_mach_ppc 0
166.#define bfd_mach_ppc_403 403
167.#define bfd_mach_ppc_403gc 4030
168.#define bfd_mach_ppc_505 505
169.#define bfd_mach_ppc_601 601
170.#define bfd_mach_ppc_602 602
171.#define bfd_mach_ppc_603 603
172.#define bfd_mach_ppc_ec603e 6031
173.#define bfd_mach_ppc_604 604
174.#define bfd_mach_ppc_620 620
175.#define bfd_mach_ppc_630 630
176.#define bfd_mach_ppc_750 750
177.#define bfd_mach_ppc_860 860
178.#define bfd_mach_ppc_a35 35
179.#define bfd_mach_ppc_rs64ii 642
180.#define bfd_mach_ppc_rs64iii 643
181.#define bfd_mach_ppc_7400 7400
252b5132 182. bfd_arch_rs6000, {* IBM RS/6000 *}
87f33987
ND
183.#define bfd_mach_rs6k 0
184.#define bfd_mach_rs6k_rs1 6001
185.#define bfd_mach_rs6k_rsc 6003
186.#define bfd_mach_rs6k_rs2 6002
252b5132
RH
187. bfd_arch_hppa, {* HP PA RISC *}
188. bfd_arch_d10v, {* Mitsubishi D10V *}
7af8cca9
MM
189.#define bfd_mach_d10v 0
190.#define bfd_mach_d10v_ts2 2
191.#define bfd_mach_d10v_ts3 3
252b5132 192. bfd_arch_d30v, {* Mitsubishi D30V *}
60bcf0fa
NC
193. bfd_arch_m68hc11, {* Motorola 68HC11 *}
194. bfd_arch_m68hc12, {* Motorola 68HC12 *}
252b5132
RH
195. bfd_arch_z8k, {* Zilog Z8000 *}
196.#define bfd_mach_z8001 1
197.#define bfd_mach_z8002 2
198. bfd_arch_h8500, {* Hitachi H8/500 *}
199. bfd_arch_sh, {* Hitachi SH *}
200.#define bfd_mach_sh 0
d4845d57
JR
201.#define bfd_mach_sh2 0x20
202.#define bfd_mach_sh_dsp 0x2d
252b5132 203.#define bfd_mach_sh3 0x30
d4845d57 204.#define bfd_mach_sh3_dsp 0x3d
252b5132 205.#define bfd_mach_sh3e 0x3e
d4845d57 206.#define bfd_mach_sh4 0x40
252b5132
RH
207. bfd_arch_alpha, {* Dec Alpha *}
208.#define bfd_mach_alpha_ev4 0x10
209.#define bfd_mach_alpha_ev5 0x20
210.#define bfd_mach_alpha_ev6 0x30
211. bfd_arch_arm, {* Advanced Risc Machines ARM *}
212.#define bfd_mach_arm_2 1
478d07d6 213.#define bfd_mach_arm_2a 2
252b5132
RH
214.#define bfd_mach_arm_3 3
215.#define bfd_mach_arm_3M 4
478d07d6 216.#define bfd_mach_arm_4 5
252b5132 217.#define bfd_mach_arm_4T 6
478d07d6
NC
218.#define bfd_mach_arm_5 7
219.#define bfd_mach_arm_5T 8
077b8428
NC
220.#define bfd_mach_arm_5TE 9
221.#define bfd_mach_arm_XScale 10
252b5132
RH
222. bfd_arch_ns32k, {* National Semiconductors ns32000 *}
223. bfd_arch_w65, {* WDC 65816 *}
224. bfd_arch_tic30, {* Texas Instruments TMS320C30 *}
81635ce4 225. bfd_arch_tic54x, {* Texas Instruments TMS320C54X *}
252b5132
RH
226. bfd_arch_tic80, {* TI TMS320c80 (MVP) *}
227. bfd_arch_v850, {* NEC V850 *}
228.#define bfd_mach_v850 0
229.#define bfd_mach_v850e 'E'
230.#define bfd_mach_v850ea 'A'
0d2bcfaf
NC
231. bfd_arch_arc, {* ARC Cores *}
232.#define bfd_mach_arc_5 0
233.#define bfd_mach_arc_6 1
234.#define bfd_mach_arc_7 2
235.#define bfd_mach_arc_8 3
252b5132
RH
236. bfd_arch_m32r, {* Mitsubishi M32R/D *}
237.#define bfd_mach_m32r 0 {* backwards compatibility *}
a23ef39f 238.#define bfd_mach_m32rx 'x'
252b5132
RH
239. bfd_arch_mn10200, {* Matsushita MN10200 *}
240. bfd_arch_mn10300, {* Matsushita MN10300 *}
241.#define bfd_mach_mn10300 300
31f8dc8f 242.#define bfd_mach_am33 330
252b5132
RH
243. bfd_arch_fr30,
244.#define bfd_mach_fr30 0x46523330
245. bfd_arch_mcore,
800eeca4 246. bfd_arch_ia64, {* HP/Intel ia64 *}
bbe66d08
JW
247.#define bfd_mach_ia64_elf64 0
248.#define bfd_mach_ia64_elf32 1
0bcb993b 249. bfd_arch_pj,
adde6300
AM
250. bfd_arch_avr, {* Atmel AVR microcontrollers *}
251.#define bfd_mach_avr1 1
252.#define bfd_mach_avr2 2
253.#define bfd_mach_avr3 3
254.#define bfd_mach_avr4 4
65aa24b6 255.#define bfd_mach_avr5 5
06c15ad7 256. bfd_arch_cris, {* Axis CRIS *}
a85d7ed0
NC
257. bfd_arch_s390, {* IBM s390 *}
258.#define bfd_mach_s390_esa 0
259.#define bfd_mach_s390_esame 1
b3baf5d0 260. bfd_arch_openrisc, {* OpenRISC *}
3c3bdf30 261. bfd_arch_mmix, {* Donald Knuth's educational processor *}
93fbbb04
GK
262. bfd_arch_xstormy16,
263.#define bfd_mach_xstormy16 0
252b5132
RH
264. bfd_arch_last
265. };
252b5132
RH
266*/
267
268/*
252b5132
RH
269SUBSECTION
270 bfd_arch_info
271
272DESCRIPTION
273 This structure contains information on architectures for use
274 within BFD.
275
276.
0ef5a5bd 277.typedef struct bfd_arch_info
252b5132
RH
278.{
279. int bits_per_word;
280. int bits_per_address;
281. int bits_per_byte;
282. enum bfd_architecture arch;
283. unsigned long mach;
284. const char *arch_name;
285. const char *printable_name;
286. unsigned int section_align_power;
52b219b5 287. {* True if this is the default machine for the architecture. *}
0ef5a5bd 288. boolean the_default;
252b5132
RH
289. const struct bfd_arch_info * (*compatible)
290. PARAMS ((const struct bfd_arch_info *a,
291. const struct bfd_arch_info *b));
292.
293. boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
294.
295. const struct bfd_arch_info *next;
296.} bfd_arch_info_type;
297*/
298
299extern const bfd_arch_info_type bfd_a29k_arch;
300extern const bfd_arch_info_type bfd_alpha_arch;
301extern const bfd_arch_info_type bfd_arc_arch;
302extern const bfd_arch_info_type bfd_arm_arch;
06c15ad7 303extern const bfd_arch_info_type bfd_cris_arch;
252b5132
RH
304extern const bfd_arch_info_type bfd_d10v_arch;
305extern const bfd_arch_info_type bfd_d30v_arch;
306extern const bfd_arch_info_type bfd_h8300_arch;
307extern const bfd_arch_info_type bfd_h8500_arch;
308extern const bfd_arch_info_type bfd_hppa_arch;
5b93d8bb 309extern const bfd_arch_info_type bfd_i370_arch;
252b5132
RH
310extern const bfd_arch_info_type bfd_i386_arch;
311extern const bfd_arch_info_type bfd_i860_arch;
312extern const bfd_arch_info_type bfd_i960_arch;
313extern const bfd_arch_info_type bfd_m32r_arch;
60bcf0fa
NC
314extern const bfd_arch_info_type bfd_m68hc11_arch;
315extern const bfd_arch_info_type bfd_m68hc12_arch;
252b5132
RH
316extern const bfd_arch_info_type bfd_m68k_arch;
317extern const bfd_arch_info_type bfd_m88k_arch;
318extern const bfd_arch_info_type bfd_mips_arch;
319extern const bfd_arch_info_type bfd_mn10200_arch;
320extern const bfd_arch_info_type bfd_mn10300_arch;
e135f41b 321extern const bfd_arch_info_type bfd_pdp11_arch;
252b5132
RH
322extern const bfd_arch_info_type bfd_powerpc_arch;
323extern const bfd_arch_info_type bfd_rs6000_arch;
0bcb993b 324extern const bfd_arch_info_type bfd_pj_arch;
252b5132
RH
325extern const bfd_arch_info_type bfd_sh_arch;
326extern const bfd_arch_info_type bfd_sparc_arch;
327extern const bfd_arch_info_type bfd_tic30_arch;
81635ce4 328extern const bfd_arch_info_type bfd_tic54x_arch;
252b5132
RH
329extern const bfd_arch_info_type bfd_tic80_arch;
330extern const bfd_arch_info_type bfd_vax_arch;
331extern const bfd_arch_info_type bfd_we32k_arch;
332extern const bfd_arch_info_type bfd_z8k_arch;
333extern const bfd_arch_info_type bfd_ns32k_arch;
334extern const bfd_arch_info_type bfd_w65_arch;
335extern const bfd_arch_info_type bfd_v850_arch;
336extern const bfd_arch_info_type bfd_fr30_arch;
337extern const bfd_arch_info_type bfd_mcore_arch;
adde6300 338extern const bfd_arch_info_type bfd_avr_arch;
800eeca4 339extern const bfd_arch_info_type bfd_ia64_arch;
a85d7ed0 340extern const bfd_arch_info_type bfd_s390_arch;
b3baf5d0 341extern const bfd_arch_info_type bfd_openrisc_arch;
3c3bdf30 342extern const bfd_arch_info_type bfd_mmix_arch;
93fbbb04 343extern const bfd_arch_info_type bfd_xstormy16_arch;
252b5132 344
047066e1 345static const bfd_arch_info_type * const bfd_archures_list[] = {
252b5132
RH
346#ifdef SELECT_ARCHITECTURES
347 SELECT_ARCHITECTURES,
348#else
349 &bfd_a29k_arch,
350 &bfd_alpha_arch,
351 &bfd_arc_arch,
352 &bfd_arm_arch,
06c15ad7 353 &bfd_cris_arch,
252b5132
RH
354 &bfd_d10v_arch,
355 &bfd_d30v_arch,
356 &bfd_h8300_arch,
357 &bfd_h8500_arch,
358 &bfd_hppa_arch,
5b93d8bb 359 &bfd_i370_arch,
252b5132
RH
360 &bfd_i386_arch,
361 &bfd_i860_arch,
362 &bfd_i960_arch,
363 &bfd_m32r_arch,
60bcf0fa
NC
364 &bfd_m68hc11_arch,
365 &bfd_m68hc12_arch,
252b5132
RH
366 &bfd_m68k_arch,
367 &bfd_m88k_arch,
368 &bfd_mips_arch,
369 &bfd_mn10200_arch,
370 &bfd_mn10300_arch,
e135f41b 371 &bfd_pdp11_arch,
252b5132
RH
372 &bfd_powerpc_arch,
373 &bfd_rs6000_arch,
374 &bfd_sh_arch,
375 &bfd_sparc_arch,
376 &bfd_tic30_arch,
81635ce4 377 &bfd_tic54x_arch,
252b5132
RH
378 &bfd_tic80_arch,
379 &bfd_vax_arch,
380 &bfd_we32k_arch,
381 &bfd_z8k_arch,
382 &bfd_ns32k_arch,
383 &bfd_w65_arch,
384 &bfd_v850_arch,
385 &bfd_fr30_arch,
adde6300
AM
386 &bfd_mcore_arch,
387 &bfd_avr_arch,
800eeca4 388 &bfd_ia64_arch,
a85d7ed0 389 &bfd_s390_arch,
b3baf5d0 390 &bfd_openrisc_arch,
3c3bdf30 391 &bfd_mmix_arch,
93fbbb04 392 &bfd_xstormy16_arch,
252b5132
RH
393#endif
394 0
395};
396
397/*
398FUNCTION
399 bfd_printable_name
400
401SYNOPSIS
402 const char *bfd_printable_name(bfd *abfd);
403
404DESCRIPTION
405 Return a printable string representing the architecture and machine
406 from the pointer to the architecture info structure.
407
408*/
409
410const char *
411bfd_printable_name (abfd)
412 bfd *abfd;
413{
414 return abfd->arch_info->printable_name;
415}
416
252b5132
RH
417/*
418FUNCTION
419 bfd_scan_arch
420
421SYNOPSIS
422 const bfd_arch_info_type *bfd_scan_arch(const char *string);
423
424DESCRIPTION
425 Figure out if BFD supports any cpu which could be described with
426 the name @var{string}. Return a pointer to an <<arch_info>>
427 structure if a machine is found, otherwise NULL.
252b5132
RH
428*/
429
430const bfd_arch_info_type *
431bfd_scan_arch (string)
432 const char *string;
433{
434 const bfd_arch_info_type * const *app, *ap;
435
047066e1 436 /* Look through all the installed architectures. */
252b5132
RH
437 for (app = bfd_archures_list; *app != NULL; app++)
438 {
439 for (ap = *app; ap != NULL; ap = ap->next)
440 {
441 if (ap->scan (ap, string))
442 return ap;
443 }
444 }
445
446 return NULL;
447}
448
252b5132
RH
449/*
450FUNCTION
451 bfd_arch_list
452
453SYNOPSIS
454 const char **bfd_arch_list(void);
455
456DESCRIPTION
457 Return a freshly malloced NULL-terminated vector of the names
458 of all the valid BFD architectures. Do not modify the names.
252b5132
RH
459*/
460
461const char **
462bfd_arch_list ()
463{
464 int vec_length = 0;
465 const char **name_ptr;
466 const char **name_list;
467 const bfd_arch_info_type * const *app;
dc810e39 468 bfd_size_type amt;
252b5132 469
047066e1 470 /* Determine the number of architectures. */
252b5132
RH
471 vec_length = 0;
472 for (app = bfd_archures_list; *app != NULL; app++)
473 {
474 const bfd_arch_info_type *ap;
475 for (ap = *app; ap != NULL; ap = ap->next)
476 {
477 vec_length++;
478 }
479 }
480
dc810e39
AM
481 amt = (vec_length + 1) * sizeof (char **);
482 name_list = (const char **) bfd_malloc (amt);
252b5132
RH
483 if (name_list == NULL)
484 return NULL;
485
047066e1 486 /* Point the list at each of the names. */
252b5132
RH
487 name_ptr = name_list;
488 for (app = bfd_archures_list; *app != NULL; app++)
489 {
490 const bfd_arch_info_type *ap;
491 for (ap = *app; ap != NULL; ap = ap->next)
492 {
493 *name_ptr = ap->printable_name;
494 name_ptr++;
495 }
496 }
497 *name_ptr = NULL;
498
499 return name_list;
500}
501
252b5132
RH
502/*
503FUNCTION
504 bfd_arch_get_compatible
505
506SYNOPSIS
507 const bfd_arch_info_type *bfd_arch_get_compatible(
508 const bfd *abfd,
509 const bfd *bbfd);
510
511DESCRIPTION
512 Determine whether two BFDs'
513 architectures and machine types are compatible. Calculates
514 the lowest common denominator between the two architectures
515 and machine types implied by the BFDs and returns a pointer to
516 an <<arch_info>> structure describing the compatible machine.
517*/
518
519const bfd_arch_info_type *
520bfd_arch_get_compatible (abfd, bbfd)
521 const bfd *abfd;
522 const bfd *bbfd;
523{
524 /* If either architecture is unknown, then all we can do is assume
525 the user knows what he's doing. */
526 if (abfd->arch_info->arch == bfd_arch_unknown)
047066e1 527 return bbfd->arch_info;
252b5132 528 if (bbfd->arch_info->arch == bfd_arch_unknown)
047066e1 529 return abfd->arch_info;
252b5132
RH
530
531 /* Otherwise architecture-specific code has to decide. */
532 return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
533}
534
252b5132
RH
535/*
536INTERNAL_DEFINITION
537 bfd_default_arch_struct
538
539DESCRIPTION
540 The <<bfd_default_arch_struct>> is an item of
541 <<bfd_arch_info_type>> which has been initialized to a fairly
542 generic state. A BFD starts life by pointing to this
543 structure, until the correct back end has determined the real
544 architecture of the file.
545
546.extern const bfd_arch_info_type bfd_default_arch_struct;
252b5132
RH
547*/
548
047066e1
KH
549const bfd_arch_info_type bfd_default_arch_struct = {
550 32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, true,
551 bfd_default_compatible,
552 bfd_default_scan,
553 0,
252b5132
RH
554};
555
556/*
557FUNCTION
558 bfd_set_arch_info
559
560SYNOPSIS
561 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
562
563DESCRIPTION
564 Set the architecture info of @var{abfd} to @var{arg}.
565*/
566
567void
568bfd_set_arch_info (abfd, arg)
569 bfd *abfd;
570 const bfd_arch_info_type *arg;
571{
572 abfd->arch_info = arg;
573}
574
575/*
576INTERNAL_FUNCTION
577 bfd_default_set_arch_mach
578
579SYNOPSIS
580 boolean bfd_default_set_arch_mach(bfd *abfd,
581 enum bfd_architecture arch,
582 unsigned long mach);
583
584DESCRIPTION
585 Set the architecture and machine type in BFD @var{abfd}
586 to @var{arch} and @var{mach}. Find the correct
587 pointer to a structure and insert it into the <<arch_info>>
0ef5a5bd 588 pointer.
252b5132
RH
589*/
590
591boolean
592bfd_default_set_arch_mach (abfd, arch, mach)
593 bfd *abfd;
594 enum bfd_architecture arch;
595 unsigned long mach;
596{
597 const bfd_arch_info_type * const *app, *ap;
598
599 for (app = bfd_archures_list; *app != NULL; app++)
600 {
601 for (ap = *app; ap != NULL; ap = ap->next)
602 {
603 if (ap->arch == arch
604 && (ap->mach == mach
605 || (mach == 0 && ap->the_default)))
606 {
607 abfd->arch_info = ap;
608 return true;
609 }
610 }
611 }
612
613 abfd->arch_info = &bfd_default_arch_struct;
614 bfd_set_error (bfd_error_bad_value);
615 return false;
616}
617
252b5132
RH
618/*
619FUNCTION
620 bfd_get_arch
621
622SYNOPSIS
623 enum bfd_architecture bfd_get_arch(bfd *abfd);
624
625DESCRIPTION
626 Return the enumerated type which describes the BFD @var{abfd}'s
627 architecture.
252b5132
RH
628*/
629
630enum bfd_architecture
631bfd_get_arch (abfd)
632 bfd *abfd;
633{
047066e1 634 return abfd->arch_info->arch;
252b5132
RH
635}
636
637/*
638FUNCTION
639 bfd_get_mach
640
641SYNOPSIS
642 unsigned long bfd_get_mach(bfd *abfd);
643
644DESCRIPTION
645 Return the long type which describes the BFD @var{abfd}'s
646 machine.
647*/
648
0ef5a5bd 649unsigned long
252b5132
RH
650bfd_get_mach (abfd)
651 bfd *abfd;
652{
047066e1 653 return abfd->arch_info->mach;
252b5132
RH
654}
655
656/*
657FUNCTION
658 bfd_arch_bits_per_byte
659
660SYNOPSIS
661 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
662
663DESCRIPTION
664 Return the number of bits in one of the BFD @var{abfd}'s
665 architecture's bytes.
252b5132
RH
666*/
667
668unsigned int
669bfd_arch_bits_per_byte (abfd)
670 bfd *abfd;
671{
672 return abfd->arch_info->bits_per_byte;
673}
674
675/*
676FUNCTION
677 bfd_arch_bits_per_address
678
679SYNOPSIS
680 unsigned int bfd_arch_bits_per_address(bfd *abfd);
681
682DESCRIPTION
683 Return the number of bits in one of the BFD @var{abfd}'s
684 architecture's addresses.
685*/
686
687unsigned int
688bfd_arch_bits_per_address (abfd)
689 bfd *abfd;
690{
691 return abfd->arch_info->bits_per_address;
692}
693
252b5132 694/*
0ef5a5bd 695INTERNAL_FUNCTION
252b5132
RH
696 bfd_default_compatible
697
698SYNOPSIS
699 const bfd_arch_info_type *bfd_default_compatible
700 (const bfd_arch_info_type *a,
701 const bfd_arch_info_type *b);
702
703DESCRIPTION
704 The default function for testing for compatibility.
705*/
706
707const bfd_arch_info_type *
047066e1 708bfd_default_compatible (a, b)
252b5132
RH
709 const bfd_arch_info_type *a;
710 const bfd_arch_info_type *b;
711{
712 if (a->arch != b->arch)
713 return NULL;
714
715 if (a->mach > b->mach)
716 return a;
717
718 if (b->mach > a->mach)
719 return b;
720
721 return a;
722}
723
252b5132
RH
724/*
725INTERNAL_FUNCTION
726 bfd_default_scan
727
728SYNOPSIS
729 boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
730
731DESCRIPTION
732 The default function for working out whether this is an
733 architecture hit and a machine hit.
734*/
735
0ef5a5bd 736boolean
252b5132 737bfd_default_scan (info, string)
d1cf510e 738 const bfd_arch_info_type *info;
252b5132
RH
739 const char *string;
740{
741 const char *ptr_src;
742 const char *ptr_tst;
743 unsigned long number;
744 enum bfd_architecture arch;
745 const char *printable_name_colon;
746
747 /* Exact match of the architecture name (ARCH_NAME) and also the
047066e1 748 default architecture? */
252b5132
RH
749 if (strcasecmp (string, info->arch_name) == 0
750 && info->the_default)
751 return true;
752
047066e1 753 /* Exact match of the machine name (PRINTABLE_NAME)? */
252b5132
RH
754 if (strcasecmp (string, info->printable_name) == 0)
755 return true;
0ef5a5bd 756
252b5132 757 /* Given that printable_name contains no colon, attempt to match:
047066e1 758 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
252b5132
RH
759 printable_name_colon = strchr (info->printable_name, ':');
760 if (printable_name_colon == NULL)
761 {
dc810e39 762 size_t strlen_arch_name = strlen (info->arch_name);
252b5132
RH
763 if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
764 {
765 if (string[strlen_arch_name] == ':')
766 {
767 if (strcasecmp (string + strlen_arch_name + 1,
768 info->printable_name) == 0)
769 return true;
770 }
771 else
772 {
773 if (strcasecmp (string + strlen_arch_name,
774 info->printable_name) == 0)
775 return true;
776 }
777 }
778 }
779
780 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
047066e1 781 Attempt to match: <arch> <mach>? */
252b5132
RH
782 if (printable_name_colon != NULL)
783 {
dc810e39 784 size_t colon_index = printable_name_colon - info->printable_name;
252b5132
RH
785 if (strncasecmp (string, info->printable_name, colon_index) == 0
786 && strcasecmp (string + colon_index,
787 info->printable_name + colon_index + 1) == 0)
788 return true;
789 }
790
791 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
792 attempt to match just <mach>, it could be ambigious. This test
0ef5a5bd 793 is left until later. */
252b5132 794
047066e1
KH
795 /* NOTE: The below is retained for compatibility only. Please do
796 not add to this code. */
252b5132
RH
797
798 /* See how much of the supplied string matches with the
799 architecture, eg the string m68k:68020 would match the 68k entry
047066e1 800 up to the :, then we get left with the machine number. */
252b5132 801
0ef5a5bd 802 for (ptr_src = string, ptr_tst = info->arch_name;
252b5132 803 *ptr_src && *ptr_tst;
0ef5a5bd 804 ptr_src++, ptr_tst++)
252b5132 805 {
047066e1
KH
806 if (*ptr_src != *ptr_tst)
807 break;
252b5132
RH
808 }
809
810 /* Chewed up as much of the architecture as will match, skip any
047066e1 811 colons. */
252b5132
RH
812 if (*ptr_src == ':')
813 ptr_src++;
0ef5a5bd 814
252b5132
RH
815 if (*ptr_src == 0)
816 {
047066e1
KH
817 /* Nothing more, then only keep this one if it is the default
818 machine for this architecture. */
252b5132
RH
819 return info->the_default;
820 }
821
822 number = 0;
3882b010 823 while (ISDIGIT (*ptr_src))
252b5132 824 {
047066e1 825 number = number * 10 + *ptr_src - '0';
252b5132
RH
826 ptr_src++;
827 }
828
829 /* NOTE: The below is retained for compatibility only.
0ef5a5bd 830 PLEASE DO NOT ADD TO THIS CODE. */
252b5132 831
0ef5a5bd 832 switch (number)
252b5132
RH
833 {
834 /* FIXME: These are needed to parse IEEE objects. */
83ea41ad
NC
835 /* The following seven case's are here only for compatibility with
836 older binutils (at least IEEE objects from binutils 2.9.1 require
837 them). */
838 case bfd_mach_m68000:
839 case bfd_mach_m68010:
840 case bfd_mach_m68020:
841 case bfd_mach_m68030:
842 case bfd_mach_m68040:
843 case bfd_mach_m68060:
844 case bfd_mach_cpu32:
845 arch = bfd_arch_m68k;
846 break;
0ef5a5bd 847 case 68000:
252b5132
RH
848 arch = bfd_arch_m68k;
849 number = bfd_mach_m68000;
850 break;
851 case 68010:
852 arch = bfd_arch_m68k;
853 number = bfd_mach_m68010;
854 break;
855 case 68020:
856 arch = bfd_arch_m68k;
857 number = bfd_mach_m68020;
858 break;
859 case 68030:
860 arch = bfd_arch_m68k;
861 number = bfd_mach_m68030;
862 break;
863 case 68040:
864 arch = bfd_arch_m68k;
865 number = bfd_mach_m68040;
866 break;
867 case 68060:
868 arch = bfd_arch_m68k;
869 number = bfd_mach_m68060;
870 break;
871 case 68332:
872 arch = bfd_arch_m68k;
873 number = bfd_mach_cpu32;
874 break;
3cac17ae
NC
875 case 5200:
876 arch = bfd_arch_m68k;
877 number = bfd_mach_mcf5200;
878 break;
879 case 5206:
880 arch = bfd_arch_m68k;
881 number = bfd_mach_mcf5206e;
882 break;
883 case 5307:
884 arch = bfd_arch_m68k;
885 number = bfd_mach_mcf5307;
886 break;
887 case 5407:
888 arch = bfd_arch_m68k;
889 number = bfd_mach_mcf5407;
890 break;
252b5132
RH
891
892 case 32000:
893 arch = bfd_arch_we32k;
894 break;
895
896 case 3000:
897 arch = bfd_arch_mips;
898 number = bfd_mach_mips3000;
899 break;
900
901 case 4000:
902 arch = bfd_arch_mips;
903 number = bfd_mach_mips4000;
904 break;
905
906 case 6000:
907 arch = bfd_arch_rs6000;
908 break;
909
d4845d57
JR
910 case 7410:
911 arch = bfd_arch_sh;
912 number = bfd_mach_sh_dsp;
913 break;
914
915 case 7708:
916 arch = bfd_arch_sh;
917 number = bfd_mach_sh3;
918 break;
919
920 case 7729:
921 arch = bfd_arch_sh;
922 number = bfd_mach_sh3_dsp;
923 break;
924
925 case 7750:
926 arch = bfd_arch_sh;
927 number = bfd_mach_sh4;
928 break;
929
0ef5a5bd 930 default:
252b5132
RH
931 return false;
932 }
933
0ef5a5bd 934 if (arch != info->arch)
252b5132
RH
935 return false;
936
937 if (number != info->mach)
938 return false;
939
940 return true;
941}
942
252b5132
RH
943/*
944FUNCTION
945 bfd_get_arch_info
946
947SYNOPSIS
948 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
949
950DESCRIPTION
951 Return the architecture info struct in @var{abfd}.
952*/
953
954const bfd_arch_info_type *
955bfd_get_arch_info (abfd)
956 bfd *abfd;
957{
958 return abfd->arch_info;
959}
960
252b5132
RH
961/*
962FUNCTION
963 bfd_lookup_arch
964
965SYNOPSIS
966 const bfd_arch_info_type *bfd_lookup_arch
967 (enum bfd_architecture
968 arch,
969 unsigned long machine);
970
971DESCRIPTION
972 Look for the architecure info structure which matches the
973 arguments @var{arch} and @var{machine}. A machine of 0 matches the
974 machine/architecture structure which marks itself as the
975 default.
976*/
977
0ef5a5bd 978const bfd_arch_info_type *
252b5132
RH
979bfd_lookup_arch (arch, machine)
980 enum bfd_architecture arch;
981 unsigned long machine;
982{
983 const bfd_arch_info_type * const *app, *ap;
984
985 for (app = bfd_archures_list; *app != NULL; app++)
986 {
987 for (ap = *app; ap != NULL; ap = ap->next)
988 {
989 if (ap->arch == arch
990 && (ap->mach == machine
991 || (machine == 0 && ap->the_default)))
992 return ap;
993 }
994 }
995
996 return NULL;
997}
998
252b5132
RH
999/*
1000FUNCTION
1001 bfd_printable_arch_mach
1002
1003SYNOPSIS
1004 const char *bfd_printable_arch_mach
1005 (enum bfd_architecture arch, unsigned long machine);
1006
1007DESCRIPTION
1008 Return a printable string representing the architecture and
0ef5a5bd 1009 machine type.
252b5132
RH
1010
1011 This routine is depreciated.
1012*/
1013
1014const char *
1015bfd_printable_arch_mach (arch, machine)
1016 enum bfd_architecture arch;
1017 unsigned long machine;
1018{
047066e1 1019 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
252b5132 1020
047066e1
KH
1021 if (ap)
1022 return ap->printable_name;
1023 return "UNKNOWN!";
252b5132 1024}
9a968f43
NC
1025
1026/*
1027FUNCTION
1028 bfd_octets_per_byte
1029
1030SYNOPSIS
f6af82bd 1031 unsigned int bfd_octets_per_byte(bfd *abfd);
9a968f43
NC
1032
1033DESCRIPTION
1034 Return the number of octets (8-bit quantities) per target byte
1035 (minimum addressable unit). In most cases, this will be one, but some
1036 DSP targets have 16, 32, or even 48 bits per byte.
9a968f43
NC
1037*/
1038
f6af82bd 1039unsigned int
9a968f43 1040bfd_octets_per_byte (abfd)
047066e1 1041 bfd *abfd;
9a968f43 1042{
047066e1
KH
1043 return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1044 bfd_get_mach (abfd));
9a968f43
NC
1045}
1046
1047/*
1048FUNCTION
1049 bfd_arch_mach_octets_per_byte
1050
1051SYNOPSIS
f6af82bd
AM
1052 unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch,
1053 unsigned long machine);
9a968f43
NC
1054
1055DESCRIPTION
1056 See bfd_octets_per_byte.
0ef5a5bd 1057
9a968f43
NC
1058 This routine is provided for those cases where a bfd * is not
1059 available
1060*/
1061
f6af82bd 1062unsigned int
9a968f43 1063bfd_arch_mach_octets_per_byte (arch, mach)
047066e1
KH
1064 enum bfd_architecture arch;
1065 unsigned long mach;
9a968f43 1066{
047066e1 1067 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
0ef5a5bd 1068
047066e1
KH
1069 if (ap)
1070 return ap->bits_per_byte / 8;
1071 return 1;
9a968f43 1072}
This page took 0.149462 seconds and 4 git commands to generate.