Update copyright notices
[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"
26#include <ctype.h>
27
28/*
29
30SECTION
31 Architectures
32
33 BFD keeps one atom in a BFD describing the
34 architecture of the data attached to the BFD: a pointer to a
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
138.#define bfd_mach_mips16 16
e7af610e
NC
139.#define bfd_mach_mips32 32
140.#define bfd_mach_mips32_4k 3204113 {* 32, 04, octal 'K' *}
84ea6cf2
NC
141.#define bfd_mach_mips5 5
142.#define bfd_mach_mips64 64
c6c98b38 143.#define bfd_mach_mips_sb1 12310201 {* octal 'SB', 01 *}
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
252b5132
RH
260. bfd_arch_last
261. };
252b5132
RH
262*/
263
264/*
252b5132
RH
265SUBSECTION
266 bfd_arch_info
267
268DESCRIPTION
269 This structure contains information on architectures for use
270 within BFD.
271
272.
0ef5a5bd 273.typedef struct bfd_arch_info
252b5132
RH
274.{
275. int bits_per_word;
276. int bits_per_address;
277. int bits_per_byte;
278. enum bfd_architecture arch;
279. unsigned long mach;
280. const char *arch_name;
281. const char *printable_name;
282. unsigned int section_align_power;
52b219b5 283. {* True if this is the default machine for the architecture. *}
0ef5a5bd 284. boolean the_default;
252b5132
RH
285. const struct bfd_arch_info * (*compatible)
286. PARAMS ((const struct bfd_arch_info *a,
287. const struct bfd_arch_info *b));
288.
289. boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
290.
291. const struct bfd_arch_info *next;
292.} bfd_arch_info_type;
293*/
294
295extern const bfd_arch_info_type bfd_a29k_arch;
296extern const bfd_arch_info_type bfd_alpha_arch;
297extern const bfd_arch_info_type bfd_arc_arch;
298extern const bfd_arch_info_type bfd_arm_arch;
06c15ad7 299extern const bfd_arch_info_type bfd_cris_arch;
252b5132
RH
300extern const bfd_arch_info_type bfd_d10v_arch;
301extern const bfd_arch_info_type bfd_d30v_arch;
302extern const bfd_arch_info_type bfd_h8300_arch;
303extern const bfd_arch_info_type bfd_h8500_arch;
304extern const bfd_arch_info_type bfd_hppa_arch;
5b93d8bb 305extern const bfd_arch_info_type bfd_i370_arch;
252b5132
RH
306extern const bfd_arch_info_type bfd_i386_arch;
307extern const bfd_arch_info_type bfd_i860_arch;
308extern const bfd_arch_info_type bfd_i960_arch;
309extern const bfd_arch_info_type bfd_m32r_arch;
60bcf0fa
NC
310extern const bfd_arch_info_type bfd_m68hc11_arch;
311extern const bfd_arch_info_type bfd_m68hc12_arch;
252b5132
RH
312extern const bfd_arch_info_type bfd_m68k_arch;
313extern const bfd_arch_info_type bfd_m88k_arch;
314extern const bfd_arch_info_type bfd_mips_arch;
315extern const bfd_arch_info_type bfd_mn10200_arch;
316extern const bfd_arch_info_type bfd_mn10300_arch;
e135f41b 317extern const bfd_arch_info_type bfd_pdp11_arch;
252b5132
RH
318extern const bfd_arch_info_type bfd_powerpc_arch;
319extern const bfd_arch_info_type bfd_rs6000_arch;
0bcb993b 320extern const bfd_arch_info_type bfd_pj_arch;
252b5132
RH
321extern const bfd_arch_info_type bfd_sh_arch;
322extern const bfd_arch_info_type bfd_sparc_arch;
323extern const bfd_arch_info_type bfd_tic30_arch;
81635ce4 324extern const bfd_arch_info_type bfd_tic54x_arch;
252b5132
RH
325extern const bfd_arch_info_type bfd_tic80_arch;
326extern const bfd_arch_info_type bfd_vax_arch;
327extern const bfd_arch_info_type bfd_we32k_arch;
328extern const bfd_arch_info_type bfd_z8k_arch;
329extern const bfd_arch_info_type bfd_ns32k_arch;
330extern const bfd_arch_info_type bfd_w65_arch;
331extern const bfd_arch_info_type bfd_v850_arch;
332extern const bfd_arch_info_type bfd_fr30_arch;
333extern const bfd_arch_info_type bfd_mcore_arch;
adde6300 334extern const bfd_arch_info_type bfd_avr_arch;
800eeca4 335extern const bfd_arch_info_type bfd_ia64_arch;
a85d7ed0 336extern const bfd_arch_info_type bfd_s390_arch;
252b5132 337
047066e1 338static const bfd_arch_info_type * const bfd_archures_list[] = {
252b5132
RH
339#ifdef SELECT_ARCHITECTURES
340 SELECT_ARCHITECTURES,
341#else
342 &bfd_a29k_arch,
343 &bfd_alpha_arch,
344 &bfd_arc_arch,
345 &bfd_arm_arch,
06c15ad7 346 &bfd_cris_arch,
252b5132
RH
347 &bfd_d10v_arch,
348 &bfd_d30v_arch,
349 &bfd_h8300_arch,
350 &bfd_h8500_arch,
351 &bfd_hppa_arch,
5b93d8bb 352 &bfd_i370_arch,
252b5132
RH
353 &bfd_i386_arch,
354 &bfd_i860_arch,
355 &bfd_i960_arch,
356 &bfd_m32r_arch,
60bcf0fa
NC
357 &bfd_m68hc11_arch,
358 &bfd_m68hc12_arch,
252b5132
RH
359 &bfd_m68k_arch,
360 &bfd_m88k_arch,
361 &bfd_mips_arch,
362 &bfd_mn10200_arch,
363 &bfd_mn10300_arch,
e135f41b 364 &bfd_pdp11_arch,
252b5132
RH
365 &bfd_powerpc_arch,
366 &bfd_rs6000_arch,
367 &bfd_sh_arch,
368 &bfd_sparc_arch,
369 &bfd_tic30_arch,
81635ce4 370 &bfd_tic54x_arch,
252b5132
RH
371 &bfd_tic80_arch,
372 &bfd_vax_arch,
373 &bfd_we32k_arch,
374 &bfd_z8k_arch,
375 &bfd_ns32k_arch,
376 &bfd_w65_arch,
377 &bfd_v850_arch,
378 &bfd_fr30_arch,
adde6300
AM
379 &bfd_mcore_arch,
380 &bfd_avr_arch,
800eeca4 381 &bfd_ia64_arch,
a85d7ed0 382 &bfd_s390_arch,
252b5132
RH
383#endif
384 0
385};
386
387/*
388FUNCTION
389 bfd_printable_name
390
391SYNOPSIS
392 const char *bfd_printable_name(bfd *abfd);
393
394DESCRIPTION
395 Return a printable string representing the architecture and machine
396 from the pointer to the architecture info structure.
397
398*/
399
400const char *
401bfd_printable_name (abfd)
402 bfd *abfd;
403{
404 return abfd->arch_info->printable_name;
405}
406
252b5132
RH
407/*
408FUNCTION
409 bfd_scan_arch
410
411SYNOPSIS
412 const bfd_arch_info_type *bfd_scan_arch(const char *string);
413
414DESCRIPTION
415 Figure out if BFD supports any cpu which could be described with
416 the name @var{string}. Return a pointer to an <<arch_info>>
417 structure if a machine is found, otherwise NULL.
252b5132
RH
418*/
419
420const bfd_arch_info_type *
421bfd_scan_arch (string)
422 const char *string;
423{
424 const bfd_arch_info_type * const *app, *ap;
425
047066e1 426 /* Look through all the installed architectures. */
252b5132
RH
427 for (app = bfd_archures_list; *app != NULL; app++)
428 {
429 for (ap = *app; ap != NULL; ap = ap->next)
430 {
431 if (ap->scan (ap, string))
432 return ap;
433 }
434 }
435
436 return NULL;
437}
438
252b5132
RH
439/*
440FUNCTION
441 bfd_arch_list
442
443SYNOPSIS
444 const char **bfd_arch_list(void);
445
446DESCRIPTION
447 Return a freshly malloced NULL-terminated vector of the names
448 of all the valid BFD architectures. Do not modify the names.
252b5132
RH
449*/
450
451const char **
452bfd_arch_list ()
453{
454 int vec_length = 0;
455 const char **name_ptr;
456 const char **name_list;
457 const bfd_arch_info_type * const *app;
458
047066e1 459 /* Determine the number of architectures. */
252b5132
RH
460 vec_length = 0;
461 for (app = bfd_archures_list; *app != NULL; app++)
462 {
463 const bfd_arch_info_type *ap;
464 for (ap = *app; ap != NULL; ap = ap->next)
465 {
466 vec_length++;
467 }
468 }
469
52b219b5 470 name_list = (const char **)
252b5132
RH
471 bfd_malloc ((vec_length + 1) * sizeof (char **));
472 if (name_list == NULL)
473 return NULL;
474
047066e1 475 /* Point the list at each of the names. */
252b5132
RH
476 name_ptr = name_list;
477 for (app = bfd_archures_list; *app != NULL; app++)
478 {
479 const bfd_arch_info_type *ap;
480 for (ap = *app; ap != NULL; ap = ap->next)
481 {
482 *name_ptr = ap->printable_name;
483 name_ptr++;
484 }
485 }
486 *name_ptr = NULL;
487
488 return name_list;
489}
490
252b5132
RH
491/*
492FUNCTION
493 bfd_arch_get_compatible
494
495SYNOPSIS
496 const bfd_arch_info_type *bfd_arch_get_compatible(
497 const bfd *abfd,
498 const bfd *bbfd);
499
500DESCRIPTION
501 Determine whether two BFDs'
502 architectures and machine types are compatible. Calculates
503 the lowest common denominator between the two architectures
504 and machine types implied by the BFDs and returns a pointer to
505 an <<arch_info>> structure describing the compatible machine.
506*/
507
508const bfd_arch_info_type *
509bfd_arch_get_compatible (abfd, bbfd)
510 const bfd *abfd;
511 const bfd *bbfd;
512{
513 /* If either architecture is unknown, then all we can do is assume
514 the user knows what he's doing. */
515 if (abfd->arch_info->arch == bfd_arch_unknown)
047066e1 516 return bbfd->arch_info;
252b5132 517 if (bbfd->arch_info->arch == bfd_arch_unknown)
047066e1 518 return abfd->arch_info;
252b5132
RH
519
520 /* Otherwise architecture-specific code has to decide. */
521 return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
522}
523
252b5132
RH
524/*
525INTERNAL_DEFINITION
526 bfd_default_arch_struct
527
528DESCRIPTION
529 The <<bfd_default_arch_struct>> is an item of
530 <<bfd_arch_info_type>> which has been initialized to a fairly
531 generic state. A BFD starts life by pointing to this
532 structure, until the correct back end has determined the real
533 architecture of the file.
534
535.extern const bfd_arch_info_type bfd_default_arch_struct;
252b5132
RH
536*/
537
047066e1
KH
538const bfd_arch_info_type bfd_default_arch_struct = {
539 32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, true,
540 bfd_default_compatible,
541 bfd_default_scan,
542 0,
252b5132
RH
543};
544
545/*
546FUNCTION
547 bfd_set_arch_info
548
549SYNOPSIS
550 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
551
552DESCRIPTION
553 Set the architecture info of @var{abfd} to @var{arg}.
554*/
555
556void
557bfd_set_arch_info (abfd, arg)
558 bfd *abfd;
559 const bfd_arch_info_type *arg;
560{
561 abfd->arch_info = arg;
562}
563
564/*
565INTERNAL_FUNCTION
566 bfd_default_set_arch_mach
567
568SYNOPSIS
569 boolean bfd_default_set_arch_mach(bfd *abfd,
570 enum bfd_architecture arch,
571 unsigned long mach);
572
573DESCRIPTION
574 Set the architecture and machine type in BFD @var{abfd}
575 to @var{arch} and @var{mach}. Find the correct
576 pointer to a structure and insert it into the <<arch_info>>
0ef5a5bd 577 pointer.
252b5132
RH
578*/
579
580boolean
581bfd_default_set_arch_mach (abfd, arch, mach)
582 bfd *abfd;
583 enum bfd_architecture arch;
584 unsigned long mach;
585{
586 const bfd_arch_info_type * const *app, *ap;
587
588 for (app = bfd_archures_list; *app != NULL; app++)
589 {
590 for (ap = *app; ap != NULL; ap = ap->next)
591 {
592 if (ap->arch == arch
593 && (ap->mach == mach
594 || (mach == 0 && ap->the_default)))
595 {
596 abfd->arch_info = ap;
597 return true;
598 }
599 }
600 }
601
602 abfd->arch_info = &bfd_default_arch_struct;
603 bfd_set_error (bfd_error_bad_value);
604 return false;
605}
606
252b5132
RH
607/*
608FUNCTION
609 bfd_get_arch
610
611SYNOPSIS
612 enum bfd_architecture bfd_get_arch(bfd *abfd);
613
614DESCRIPTION
615 Return the enumerated type which describes the BFD @var{abfd}'s
616 architecture.
252b5132
RH
617*/
618
619enum bfd_architecture
620bfd_get_arch (abfd)
621 bfd *abfd;
622{
047066e1 623 return abfd->arch_info->arch;
252b5132
RH
624}
625
626/*
627FUNCTION
628 bfd_get_mach
629
630SYNOPSIS
631 unsigned long bfd_get_mach(bfd *abfd);
632
633DESCRIPTION
634 Return the long type which describes the BFD @var{abfd}'s
635 machine.
636*/
637
0ef5a5bd 638unsigned long
252b5132
RH
639bfd_get_mach (abfd)
640 bfd *abfd;
641{
047066e1 642 return abfd->arch_info->mach;
252b5132
RH
643}
644
645/*
646FUNCTION
647 bfd_arch_bits_per_byte
648
649SYNOPSIS
650 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
651
652DESCRIPTION
653 Return the number of bits in one of the BFD @var{abfd}'s
654 architecture's bytes.
252b5132
RH
655*/
656
657unsigned int
658bfd_arch_bits_per_byte (abfd)
659 bfd *abfd;
660{
661 return abfd->arch_info->bits_per_byte;
662}
663
664/*
665FUNCTION
666 bfd_arch_bits_per_address
667
668SYNOPSIS
669 unsigned int bfd_arch_bits_per_address(bfd *abfd);
670
671DESCRIPTION
672 Return the number of bits in one of the BFD @var{abfd}'s
673 architecture's addresses.
674*/
675
676unsigned int
677bfd_arch_bits_per_address (abfd)
678 bfd *abfd;
679{
680 return abfd->arch_info->bits_per_address;
681}
682
252b5132 683/*
0ef5a5bd 684INTERNAL_FUNCTION
252b5132
RH
685 bfd_default_compatible
686
687SYNOPSIS
688 const bfd_arch_info_type *bfd_default_compatible
689 (const bfd_arch_info_type *a,
690 const bfd_arch_info_type *b);
691
692DESCRIPTION
693 The default function for testing for compatibility.
694*/
695
696const bfd_arch_info_type *
047066e1 697bfd_default_compatible (a, b)
252b5132
RH
698 const bfd_arch_info_type *a;
699 const bfd_arch_info_type *b;
700{
701 if (a->arch != b->arch)
702 return NULL;
703
704 if (a->mach > b->mach)
705 return a;
706
707 if (b->mach > a->mach)
708 return b;
709
710 return a;
711}
712
252b5132
RH
713/*
714INTERNAL_FUNCTION
715 bfd_default_scan
716
717SYNOPSIS
718 boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
719
720DESCRIPTION
721 The default function for working out whether this is an
722 architecture hit and a machine hit.
723*/
724
0ef5a5bd 725boolean
252b5132
RH
726bfd_default_scan (info, string)
727 const struct bfd_arch_info *info;
728 const char *string;
729{
730 const char *ptr_src;
731 const char *ptr_tst;
732 unsigned long number;
733 enum bfd_architecture arch;
734 const char *printable_name_colon;
735
736 /* Exact match of the architecture name (ARCH_NAME) and also the
047066e1 737 default architecture? */
252b5132
RH
738 if (strcasecmp (string, info->arch_name) == 0
739 && info->the_default)
740 return true;
741
047066e1 742 /* Exact match of the machine name (PRINTABLE_NAME)? */
252b5132
RH
743 if (strcasecmp (string, info->printable_name) == 0)
744 return true;
0ef5a5bd 745
252b5132 746 /* Given that printable_name contains no colon, attempt to match:
047066e1 747 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
252b5132
RH
748 printable_name_colon = strchr (info->printable_name, ':');
749 if (printable_name_colon == NULL)
750 {
751 int strlen_arch_name = strlen (info->arch_name);
752 if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
753 {
754 if (string[strlen_arch_name] == ':')
755 {
756 if (strcasecmp (string + strlen_arch_name + 1,
757 info->printable_name) == 0)
758 return true;
759 }
760 else
761 {
762 if (strcasecmp (string + strlen_arch_name,
763 info->printable_name) == 0)
764 return true;
765 }
766 }
767 }
768
769 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
047066e1 770 Attempt to match: <arch> <mach>? */
252b5132
RH
771 if (printable_name_colon != NULL)
772 {
773 int colon_index = printable_name_colon - info->printable_name;
774 if (strncasecmp (string, info->printable_name, colon_index) == 0
775 && strcasecmp (string + colon_index,
776 info->printable_name + colon_index + 1) == 0)
777 return true;
778 }
779
780 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
781 attempt to match just <mach>, it could be ambigious. This test
0ef5a5bd 782 is left until later. */
252b5132 783
047066e1
KH
784 /* NOTE: The below is retained for compatibility only. Please do
785 not add to this code. */
252b5132
RH
786
787 /* See how much of the supplied string matches with the
788 architecture, eg the string m68k:68020 would match the 68k entry
047066e1 789 up to the :, then we get left with the machine number. */
252b5132 790
0ef5a5bd 791 for (ptr_src = string, ptr_tst = info->arch_name;
252b5132 792 *ptr_src && *ptr_tst;
0ef5a5bd 793 ptr_src++, ptr_tst++)
252b5132 794 {
047066e1
KH
795 if (*ptr_src != *ptr_tst)
796 break;
252b5132
RH
797 }
798
799 /* Chewed up as much of the architecture as will match, skip any
047066e1 800 colons. */
252b5132
RH
801 if (*ptr_src == ':')
802 ptr_src++;
0ef5a5bd 803
252b5132
RH
804 if (*ptr_src == 0)
805 {
047066e1
KH
806 /* Nothing more, then only keep this one if it is the default
807 machine for this architecture. */
252b5132
RH
808 return info->the_default;
809 }
810
811 number = 0;
812 while (isdigit ((unsigned char) *ptr_src))
813 {
047066e1 814 number = number * 10 + *ptr_src - '0';
252b5132
RH
815 ptr_src++;
816 }
817
818 /* NOTE: The below is retained for compatibility only.
0ef5a5bd 819 PLEASE DO NOT ADD TO THIS CODE. */
252b5132 820
0ef5a5bd 821 switch (number)
252b5132
RH
822 {
823 /* FIXME: These are needed to parse IEEE objects. */
83ea41ad
NC
824 /* The following seven case's are here only for compatibility with
825 older binutils (at least IEEE objects from binutils 2.9.1 require
826 them). */
827 case bfd_mach_m68000:
828 case bfd_mach_m68010:
829 case bfd_mach_m68020:
830 case bfd_mach_m68030:
831 case bfd_mach_m68040:
832 case bfd_mach_m68060:
833 case bfd_mach_cpu32:
834 arch = bfd_arch_m68k;
835 break;
0ef5a5bd 836 case 68000:
252b5132
RH
837 arch = bfd_arch_m68k;
838 number = bfd_mach_m68000;
839 break;
840 case 68010:
841 arch = bfd_arch_m68k;
842 number = bfd_mach_m68010;
843 break;
844 case 68020:
845 arch = bfd_arch_m68k;
846 number = bfd_mach_m68020;
847 break;
848 case 68030:
849 arch = bfd_arch_m68k;
850 number = bfd_mach_m68030;
851 break;
852 case 68040:
853 arch = bfd_arch_m68k;
854 number = bfd_mach_m68040;
855 break;
856 case 68060:
857 arch = bfd_arch_m68k;
858 number = bfd_mach_m68060;
859 break;
860 case 68332:
861 arch = bfd_arch_m68k;
862 number = bfd_mach_cpu32;
863 break;
3cac17ae
NC
864 case 5200:
865 arch = bfd_arch_m68k;
866 number = bfd_mach_mcf5200;
867 break;
868 case 5206:
869 arch = bfd_arch_m68k;
870 number = bfd_mach_mcf5206e;
871 break;
872 case 5307:
873 arch = bfd_arch_m68k;
874 number = bfd_mach_mcf5307;
875 break;
876 case 5407:
877 arch = bfd_arch_m68k;
878 number = bfd_mach_mcf5407;
879 break;
252b5132
RH
880
881 case 32000:
882 arch = bfd_arch_we32k;
883 break;
884
885 case 3000:
886 arch = bfd_arch_mips;
887 number = bfd_mach_mips3000;
888 break;
889
890 case 4000:
891 arch = bfd_arch_mips;
892 number = bfd_mach_mips4000;
893 break;
894
895 case 6000:
896 arch = bfd_arch_rs6000;
897 break;
898
d4845d57
JR
899 case 7410:
900 arch = bfd_arch_sh;
901 number = bfd_mach_sh_dsp;
902 break;
903
904 case 7708:
905 arch = bfd_arch_sh;
906 number = bfd_mach_sh3;
907 break;
908
909 case 7729:
910 arch = bfd_arch_sh;
911 number = bfd_mach_sh3_dsp;
912 break;
913
914 case 7750:
915 arch = bfd_arch_sh;
916 number = bfd_mach_sh4;
917 break;
918
0ef5a5bd 919 default:
252b5132
RH
920 return false;
921 }
922
0ef5a5bd 923 if (arch != info->arch)
252b5132
RH
924 return false;
925
926 if (number != info->mach)
927 return false;
928
929 return true;
930}
931
252b5132
RH
932/*
933FUNCTION
934 bfd_get_arch_info
935
936SYNOPSIS
937 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
938
939DESCRIPTION
940 Return the architecture info struct in @var{abfd}.
941*/
942
943const bfd_arch_info_type *
944bfd_get_arch_info (abfd)
945 bfd *abfd;
946{
947 return abfd->arch_info;
948}
949
252b5132
RH
950/*
951FUNCTION
952 bfd_lookup_arch
953
954SYNOPSIS
955 const bfd_arch_info_type *bfd_lookup_arch
956 (enum bfd_architecture
957 arch,
958 unsigned long machine);
959
960DESCRIPTION
961 Look for the architecure info structure which matches the
962 arguments @var{arch} and @var{machine}. A machine of 0 matches the
963 machine/architecture structure which marks itself as the
964 default.
965*/
966
0ef5a5bd 967const bfd_arch_info_type *
252b5132
RH
968bfd_lookup_arch (arch, machine)
969 enum bfd_architecture arch;
970 unsigned long machine;
971{
972 const bfd_arch_info_type * const *app, *ap;
973
974 for (app = bfd_archures_list; *app != NULL; app++)
975 {
976 for (ap = *app; ap != NULL; ap = ap->next)
977 {
978 if (ap->arch == arch
979 && (ap->mach == machine
980 || (machine == 0 && ap->the_default)))
981 return ap;
982 }
983 }
984
985 return NULL;
986}
987
252b5132
RH
988/*
989FUNCTION
990 bfd_printable_arch_mach
991
992SYNOPSIS
993 const char *bfd_printable_arch_mach
994 (enum bfd_architecture arch, unsigned long machine);
995
996DESCRIPTION
997 Return a printable string representing the architecture and
0ef5a5bd 998 machine type.
252b5132
RH
999
1000 This routine is depreciated.
1001*/
1002
1003const char *
1004bfd_printable_arch_mach (arch, machine)
1005 enum bfd_architecture arch;
1006 unsigned long machine;
1007{
047066e1 1008 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
252b5132 1009
047066e1
KH
1010 if (ap)
1011 return ap->printable_name;
1012 return "UNKNOWN!";
252b5132 1013}
9a968f43
NC
1014
1015/*
1016FUNCTION
1017 bfd_octets_per_byte
1018
1019SYNOPSIS
f6af82bd 1020 unsigned int bfd_octets_per_byte(bfd *abfd);
9a968f43
NC
1021
1022DESCRIPTION
1023 Return the number of octets (8-bit quantities) per target byte
1024 (minimum addressable unit). In most cases, this will be one, but some
1025 DSP targets have 16, 32, or even 48 bits per byte.
9a968f43
NC
1026*/
1027
f6af82bd 1028unsigned int
9a968f43 1029bfd_octets_per_byte (abfd)
047066e1 1030 bfd *abfd;
9a968f43 1031{
047066e1
KH
1032 return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1033 bfd_get_mach (abfd));
9a968f43
NC
1034}
1035
1036/*
1037FUNCTION
1038 bfd_arch_mach_octets_per_byte
1039
1040SYNOPSIS
f6af82bd
AM
1041 unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch,
1042 unsigned long machine);
9a968f43
NC
1043
1044DESCRIPTION
1045 See bfd_octets_per_byte.
0ef5a5bd 1046
9a968f43
NC
1047 This routine is provided for those cases where a bfd * is not
1048 available
1049*/
1050
f6af82bd 1051unsigned int
9a968f43 1052bfd_arch_mach_octets_per_byte (arch, mach)
047066e1
KH
1053 enum bfd_architecture arch;
1054 unsigned long mach;
9a968f43 1055{
047066e1 1056 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
0ef5a5bd 1057
047066e1
KH
1058 if (ap)
1059 return ap->bits_per_byte / 8;
1060 return 1;
9a968f43 1061}
This page took 0.125165 seconds and 4 git commands to generate.