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