source: trunk/src/binutils/bfd/archures.c@ 402

Last change on this file since 402 was 10, checked in by bird, 23 years ago

Initial revision
  • Property cvs2svn:cvs-rev set to 1.1
  • Property svn:eol-style set to native
  • Property svn:executable set to *
File size: 26.3 KB
Line 
1/* BFD library support routines for architectures.
2 Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
3 2000, 2001
4 Free Software Foundation, Inc.
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
35 <<bfd_arch_info_type>>.
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
45 defined, then all the architectures supported are included.
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
51 default case (an item with a machine field of 0).
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,
68 and 68020 and 68030 for Motorola 68020 and 68030.
69
70.enum bfd_architecture
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
83.#define bfd_mach_mcf5200 9
84.#define bfd_mach_mcf5206e 10
85.#define bfd_mach_mcf5307 11
86.#define bfd_mach_mcf5407 12
87. bfd_arch_vax, {* DEC Vax *}
88. bfd_arch_i960, {* Intel 960 *}
89. {* The order of the following is important.
90. lower number indicates a machine type that
91. only accepts a subset of the instructions
92. available to machines with higher numbers.
93. The exception is the "ca", which is
94. incompatible with all other machines except
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 *}
117.#define bfd_mach_sparc_v8plusb 9 {* with cheetah add'ns *}
118.#define bfd_mach_sparc_v9b 10 {* with cheetah add'ns *}
119.{* Nonzero if MACH has the v9 instruction set. *}
120.#define bfd_mach_sparc_v9_p(mach) \
121. ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \
122. && (mach) != bfd_mach_sparc_sparclite_le)
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_mips12000 12000
139.#define bfd_mach_mips16 16
140.#define bfd_mach_mips32 32
141.#define bfd_mach_mips32_4k 3204113 {* 32, 04, octal 'K' *}
142.#define bfd_mach_mips5 5
143.#define bfd_mach_mips64 64
144.#define bfd_mach_mips_sb1 12310201 {* octal 'SB', 01 *}
145. bfd_arch_i386, {* Intel 386 *}
146.#define bfd_mach_i386_i386 0
147.#define bfd_mach_i386_i8086 1
148.#define bfd_mach_i386_i386_intel_syntax 2
149.#define bfd_mach_x86_64 3
150.#define bfd_mach_x86_64_intel_syntax 4
151. bfd_arch_we32k, {* AT&T WE32xxx *}
152. bfd_arch_tahoe, {* CCI/Harris Tahoe *}
153. bfd_arch_i860, {* Intel 860 *}
154. bfd_arch_i370, {* IBM 360/370 Mainframes *}
155. bfd_arch_romp, {* IBM ROMP PC/RT *}
156. bfd_arch_alliant, {* Alliant *}
157. bfd_arch_convex, {* Convex *}
158. bfd_arch_m88k, {* Motorola 88xxx *}
159. bfd_arch_pyramid, {* Pyramid Technology *}
160. bfd_arch_h8300, {* Hitachi H8/300 *}
161.#define bfd_mach_h8300 1
162.#define bfd_mach_h8300h 2
163.#define bfd_mach_h8300s 3
164. bfd_arch_powerpc, {* PowerPC *}
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
182. bfd_arch_rs6000, {* IBM RS/6000 *}
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
187. bfd_arch_hppa, {* HP PA RISC *}
188. bfd_arch_d10v, {* Mitsubishi D10V *}
189.#define bfd_mach_d10v 0
190.#define bfd_mach_d10v_ts2 2
191.#define bfd_mach_d10v_ts3 3
192. bfd_arch_d30v, {* Mitsubishi D30V *}
193. bfd_arch_m68hc11, {* Motorola 68HC11 *}
194. bfd_arch_m68hc12, {* Motorola 68HC12 *}
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
201.#define bfd_mach_sh2 0x20
202.#define bfd_mach_sh_dsp 0x2d
203.#define bfd_mach_sh3 0x30
204.#define bfd_mach_sh3_dsp 0x3d
205.#define bfd_mach_sh3e 0x3e
206.#define bfd_mach_sh4 0x40
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
213.#define bfd_mach_arm_2a 2
214.#define bfd_mach_arm_3 3
215.#define bfd_mach_arm_3M 4
216.#define bfd_mach_arm_4 5
217.#define bfd_mach_arm_4T 6
218.#define bfd_mach_arm_5 7
219.#define bfd_mach_arm_5T 8
220.#define bfd_mach_arm_5TE 9
221.#define bfd_mach_arm_XScale 10
222. bfd_arch_ns32k, {* National Semiconductors ns32000 *}
223. bfd_arch_w65, {* WDC 65816 *}
224. bfd_arch_tic30, {* Texas Instruments TMS320C30 *}
225. bfd_arch_tic54x, {* Texas Instruments TMS320C54X *}
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'
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
236. bfd_arch_m32r, {* Mitsubishi M32R/D *}
237.#define bfd_mach_m32r 0 {* backwards compatibility *}
238.#define bfd_mach_m32rx 'x'
239. bfd_arch_mn10200, {* Matsushita MN10200 *}
240. bfd_arch_mn10300, {* Matsushita MN10300 *}
241.#define bfd_mach_mn10300 300
242.#define bfd_mach_am33 330
243. bfd_arch_fr30,
244.#define bfd_mach_fr30 0x46523330
245. bfd_arch_mcore,
246. bfd_arch_ia64, {* HP/Intel ia64 *}
247.#define bfd_mach_ia64_elf64 0
248.#define bfd_mach_ia64_elf32 1
249. bfd_arch_pj,
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
255.#define bfd_mach_avr5 5
256. bfd_arch_cris, {* Axis CRIS *}
257. bfd_arch_last
258. };
259*/
260
261/*
262SUBSECTION
263 bfd_arch_info
264
265DESCRIPTION
266 This structure contains information on architectures for use
267 within BFD.
268
269.
270.typedef struct bfd_arch_info
271.{
272. int bits_per_word;
273. int bits_per_address;
274. int bits_per_byte;
275. enum bfd_architecture arch;
276. unsigned long mach;
277. const char *arch_name;
278. const char *printable_name;
279. unsigned int section_align_power;
280. {* True if this is the default machine for the architecture. *}
281. boolean the_default;
282. const struct bfd_arch_info * (*compatible)
283. PARAMS ((const struct bfd_arch_info *a,
284. const struct bfd_arch_info *b));
285.
286. boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
287.
288. const struct bfd_arch_info *next;
289.} bfd_arch_info_type;
290*/
291
292extern const bfd_arch_info_type bfd_a29k_arch;
293extern const bfd_arch_info_type bfd_alpha_arch;
294extern const bfd_arch_info_type bfd_arc_arch;
295extern const bfd_arch_info_type bfd_arm_arch;
296extern const bfd_arch_info_type bfd_cris_arch;
297extern const bfd_arch_info_type bfd_d10v_arch;
298extern const bfd_arch_info_type bfd_d30v_arch;
299extern const bfd_arch_info_type bfd_h8300_arch;
300extern const bfd_arch_info_type bfd_h8500_arch;
301extern const bfd_arch_info_type bfd_hppa_arch;
302extern const bfd_arch_info_type bfd_i370_arch;
303extern const bfd_arch_info_type bfd_i386_arch;
304extern const bfd_arch_info_type bfd_i860_arch;
305extern const bfd_arch_info_type bfd_i960_arch;
306extern const bfd_arch_info_type bfd_m32r_arch;
307extern const bfd_arch_info_type bfd_m68hc11_arch;
308extern const bfd_arch_info_type bfd_m68hc12_arch;
309extern const bfd_arch_info_type bfd_m68k_arch;
310extern const bfd_arch_info_type bfd_m88k_arch;
311extern const bfd_arch_info_type bfd_mips_arch;
312extern const bfd_arch_info_type bfd_mn10200_arch;
313extern const bfd_arch_info_type bfd_mn10300_arch;
314extern const bfd_arch_info_type bfd_powerpc_arch;
315extern const bfd_arch_info_type bfd_rs6000_arch;
316extern const bfd_arch_info_type bfd_pj_arch;
317extern const bfd_arch_info_type bfd_sh_arch;
318extern const bfd_arch_info_type bfd_sparc_arch;
319extern const bfd_arch_info_type bfd_tic30_arch;
320extern const bfd_arch_info_type bfd_tic54x_arch;
321extern const bfd_arch_info_type bfd_tic80_arch;
322extern const bfd_arch_info_type bfd_vax_arch;
323extern const bfd_arch_info_type bfd_we32k_arch;
324extern const bfd_arch_info_type bfd_z8k_arch;
325extern const bfd_arch_info_type bfd_ns32k_arch;
326extern const bfd_arch_info_type bfd_w65_arch;
327extern const bfd_arch_info_type bfd_v850_arch;
328extern const bfd_arch_info_type bfd_fr30_arch;
329extern const bfd_arch_info_type bfd_mcore_arch;
330extern const bfd_arch_info_type bfd_avr_arch;
331extern const bfd_arch_info_type bfd_ia64_arch;
332
333static const bfd_arch_info_type * const bfd_archures_list[] = {
334#ifdef SELECT_ARCHITECTURES
335 SELECT_ARCHITECTURES,
336#else
337 &bfd_a29k_arch,
338 &bfd_alpha_arch,
339 &bfd_arc_arch,
340 &bfd_arm_arch,
341 &bfd_cris_arch,
342 &bfd_d10v_arch,
343 &bfd_d30v_arch,
344 &bfd_h8300_arch,
345 &bfd_h8500_arch,
346 &bfd_hppa_arch,
347 &bfd_i370_arch,
348 &bfd_i386_arch,
349 &bfd_i860_arch,
350 &bfd_i960_arch,
351 &bfd_m32r_arch,
352 &bfd_m68hc11_arch,
353 &bfd_m68hc12_arch,
354 &bfd_m68k_arch,
355 &bfd_m88k_arch,
356 &bfd_mips_arch,
357 &bfd_mn10200_arch,
358 &bfd_mn10300_arch,
359 &bfd_powerpc_arch,
360 &bfd_rs6000_arch,
361 &bfd_sh_arch,
362 &bfd_sparc_arch,
363 &bfd_tic30_arch,
364 &bfd_tic54x_arch,
365 &bfd_tic80_arch,
366 &bfd_vax_arch,
367 &bfd_we32k_arch,
368 &bfd_z8k_arch,
369 &bfd_ns32k_arch,
370 &bfd_w65_arch,
371 &bfd_v850_arch,
372 &bfd_fr30_arch,
373 &bfd_mcore_arch,
374 &bfd_avr_arch,
375 &bfd_ia64_arch,
376#endif
377 0
378};
379
380/*
381FUNCTION
382 bfd_printable_name
383
384SYNOPSIS
385 const char *bfd_printable_name(bfd *abfd);
386
387DESCRIPTION
388 Return a printable string representing the architecture and machine
389 from the pointer to the architecture info structure.
390
391*/
392
393const char *
394bfd_printable_name (abfd)
395 bfd *abfd;
396{
397 return abfd->arch_info->printable_name;
398}
399
400/*
401FUNCTION
402 bfd_scan_arch
403
404SYNOPSIS
405 const bfd_arch_info_type *bfd_scan_arch(const char *string);
406
407DESCRIPTION
408 Figure out if BFD supports any cpu which could be described with
409 the name @var{string}. Return a pointer to an <<arch_info>>
410 structure if a machine is found, otherwise NULL.
411*/
412
413const bfd_arch_info_type *
414bfd_scan_arch (string)
415 const char *string;
416{
417 const bfd_arch_info_type * const *app, *ap;
418
419 /* Look through all the installed architectures. */
420 for (app = bfd_archures_list; *app != NULL; app++)
421 {
422 for (ap = *app; ap != NULL; ap = ap->next)
423 {
424 if (ap->scan (ap, string))
425 return ap;
426 }
427 }
428
429 return NULL;
430}
431
432/*
433FUNCTION
434 bfd_arch_list
435
436SYNOPSIS
437 const char **bfd_arch_list(void);
438
439DESCRIPTION
440 Return a freshly malloced NULL-terminated vector of the names
441 of all the valid BFD architectures. Do not modify the names.
442*/
443
444const char **
445bfd_arch_list ()
446{
447 int vec_length = 0;
448 const char **name_ptr;
449 const char **name_list;
450 const bfd_arch_info_type * const *app;
451
452 /* Determine the number of architectures. */
453 vec_length = 0;
454 for (app = bfd_archures_list; *app != NULL; app++)
455 {
456 const bfd_arch_info_type *ap;
457 for (ap = *app; ap != NULL; ap = ap->next)
458 {
459 vec_length++;
460 }
461 }
462
463 name_list = (const char **)
464 bfd_malloc ((vec_length + 1) * sizeof (char **));
465 if (name_list == NULL)
466 return NULL;
467
468 /* Point the list at each of the names. */
469 name_ptr = name_list;
470 for (app = bfd_archures_list; *app != NULL; app++)
471 {
472 const bfd_arch_info_type *ap;
473 for (ap = *app; ap != NULL; ap = ap->next)
474 {
475 *name_ptr = ap->printable_name;
476 name_ptr++;
477 }
478 }
479 *name_ptr = NULL;
480
481 return name_list;
482}
483
484/*
485FUNCTION
486 bfd_arch_get_compatible
487
488SYNOPSIS
489 const bfd_arch_info_type *bfd_arch_get_compatible(
490 const bfd *abfd,
491 const bfd *bbfd);
492
493DESCRIPTION
494 Determine whether two BFDs'
495 architectures and machine types are compatible. Calculates
496 the lowest common denominator between the two architectures
497 and machine types implied by the BFDs and returns a pointer to
498 an <<arch_info>> structure describing the compatible machine.
499*/
500
501const bfd_arch_info_type *
502bfd_arch_get_compatible (abfd, bbfd)
503 const bfd *abfd;
504 const bfd *bbfd;
505{
506 /* If either architecture is unknown, then all we can do is assume
507 the user knows what he's doing. */
508 if (abfd->arch_info->arch == bfd_arch_unknown)
509 return bbfd->arch_info;
510 if (bbfd->arch_info->arch == bfd_arch_unknown)
511 return abfd->arch_info;
512
513 /* Otherwise architecture-specific code has to decide. */
514 return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info);
515}
516
517/*
518INTERNAL_DEFINITION
519 bfd_default_arch_struct
520
521DESCRIPTION
522 The <<bfd_default_arch_struct>> is an item of
523 <<bfd_arch_info_type>> which has been initialized to a fairly
524 generic state. A BFD starts life by pointing to this
525 structure, until the correct back end has determined the real
526 architecture of the file.
527
528.extern const bfd_arch_info_type bfd_default_arch_struct;
529*/
530
531const bfd_arch_info_type bfd_default_arch_struct = {
532 32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, true,
533 bfd_default_compatible,
534 bfd_default_scan,
535 0,
536};
537
538/*
539FUNCTION
540 bfd_set_arch_info
541
542SYNOPSIS
543 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
544
545DESCRIPTION
546 Set the architecture info of @var{abfd} to @var{arg}.
547*/
548
549void
550bfd_set_arch_info (abfd, arg)
551 bfd *abfd;
552 const bfd_arch_info_type *arg;
553{
554 abfd->arch_info = arg;
555}
556
557/*
558INTERNAL_FUNCTION
559 bfd_default_set_arch_mach
560
561SYNOPSIS
562 boolean bfd_default_set_arch_mach(bfd *abfd,
563 enum bfd_architecture arch,
564 unsigned long mach);
565
566DESCRIPTION
567 Set the architecture and machine type in BFD @var{abfd}
568 to @var{arch} and @var{mach}. Find the correct
569 pointer to a structure and insert it into the <<arch_info>>
570 pointer.
571*/
572
573boolean
574bfd_default_set_arch_mach (abfd, arch, mach)
575 bfd *abfd;
576 enum bfd_architecture arch;
577 unsigned long mach;
578{
579 const bfd_arch_info_type * const *app, *ap;
580
581 for (app = bfd_archures_list; *app != NULL; app++)
582 {
583 for (ap = *app; ap != NULL; ap = ap->next)
584 {
585 if (ap->arch == arch
586 && (ap->mach == mach
587 || (mach == 0 && ap->the_default)))
588 {
589 abfd->arch_info = ap;
590 return true;
591 }
592 }
593 }
594
595 abfd->arch_info = &bfd_default_arch_struct;
596 bfd_set_error (bfd_error_bad_value);
597 return false;
598}
599
600/*
601FUNCTION
602 bfd_get_arch
603
604SYNOPSIS
605 enum bfd_architecture bfd_get_arch(bfd *abfd);
606
607DESCRIPTION
608 Return the enumerated type which describes the BFD @var{abfd}'s
609 architecture.
610*/
611
612enum bfd_architecture
613bfd_get_arch (abfd)
614 bfd *abfd;
615{
616 return abfd->arch_info->arch;
617}
618
619/*
620FUNCTION
621 bfd_get_mach
622
623SYNOPSIS
624 unsigned long bfd_get_mach(bfd *abfd);
625
626DESCRIPTION
627 Return the long type which describes the BFD @var{abfd}'s
628 machine.
629*/
630
631unsigned long
632bfd_get_mach (abfd)
633 bfd *abfd;
634{
635 return abfd->arch_info->mach;
636}
637
638/*
639FUNCTION
640 bfd_arch_bits_per_byte
641
642SYNOPSIS
643 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
644
645DESCRIPTION
646 Return the number of bits in one of the BFD @var{abfd}'s
647 architecture's bytes.
648*/
649
650unsigned int
651bfd_arch_bits_per_byte (abfd)
652 bfd *abfd;
653{
654 return abfd->arch_info->bits_per_byte;
655}
656
657/*
658FUNCTION
659 bfd_arch_bits_per_address
660
661SYNOPSIS
662 unsigned int bfd_arch_bits_per_address(bfd *abfd);
663
664DESCRIPTION
665 Return the number of bits in one of the BFD @var{abfd}'s
666 architecture's addresses.
667*/
668
669unsigned int
670bfd_arch_bits_per_address (abfd)
671 bfd *abfd;
672{
673 return abfd->arch_info->bits_per_address;
674}
675
676/*
677INTERNAL_FUNCTION
678 bfd_default_compatible
679
680SYNOPSIS
681 const bfd_arch_info_type *bfd_default_compatible
682 (const bfd_arch_info_type *a,
683 const bfd_arch_info_type *b);
684
685DESCRIPTION
686 The default function for testing for compatibility.
687*/
688
689const bfd_arch_info_type *
690bfd_default_compatible (a, b)
691 const bfd_arch_info_type *a;
692 const bfd_arch_info_type *b;
693{
694 if (a->arch != b->arch)
695 return NULL;
696
697 if (a->mach > b->mach)
698 return a;
699
700 if (b->mach > a->mach)
701 return b;
702
703 return a;
704}
705
706/*
707INTERNAL_FUNCTION
708 bfd_default_scan
709
710SYNOPSIS
711 boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
712
713DESCRIPTION
714 The default function for working out whether this is an
715 architecture hit and a machine hit.
716*/
717
718boolean
719bfd_default_scan (info, string)
720 const struct bfd_arch_info *info;
721 const char *string;
722{
723 const char *ptr_src;
724 const char *ptr_tst;
725 unsigned long number;
726 enum bfd_architecture arch;
727 const char *printable_name_colon;
728
729 /* Exact match of the architecture name (ARCH_NAME) and also the
730 default architecture? */
731 if (strcasecmp (string, info->arch_name) == 0
732 && info->the_default)
733 return true;
734
735 /* Exact match of the machine name (PRINTABLE_NAME)? */
736 if (strcasecmp (string, info->printable_name) == 0)
737 return true;
738
739 /* Given that printable_name contains no colon, attempt to match:
740 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
741 printable_name_colon = strchr (info->printable_name, ':');
742 if (printable_name_colon == NULL)
743 {
744 int strlen_arch_name = strlen (info->arch_name);
745 if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0)
746 {
747 if (string[strlen_arch_name] == ':')
748 {
749 if (strcasecmp (string + strlen_arch_name + 1,
750 info->printable_name) == 0)
751 return true;
752 }
753 else
754 {
755 if (strcasecmp (string + strlen_arch_name,
756 info->printable_name) == 0)
757 return true;
758 }
759 }
760 }
761
762 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
763 Attempt to match: <arch> <mach>? */
764 if (printable_name_colon != NULL)
765 {
766 int colon_index = printable_name_colon - info->printable_name;
767 if (strncasecmp (string, info->printable_name, colon_index) == 0
768 && strcasecmp (string + colon_index,
769 info->printable_name + colon_index + 1) == 0)
770 return true;
771 }
772
773 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
774 attempt to match just <mach>, it could be ambigious. This test
775 is left until later. */
776
777 /* NOTE: The below is retained for compatibility only. Please do
778 not add to this code. */
779
780 /* See how much of the supplied string matches with the
781 architecture, eg the string m68k:68020 would match the 68k entry
782 up to the :, then we get left with the machine number. */
783
784 for (ptr_src = string, ptr_tst = info->arch_name;
785 *ptr_src && *ptr_tst;
786 ptr_src++, ptr_tst++)
787 {
788 if (*ptr_src != *ptr_tst)
789 break;
790 }
791
792 /* Chewed up as much of the architecture as will match, skip any
793 colons. */
794 if (*ptr_src == ':')
795 ptr_src++;
796
797 if (*ptr_src == 0)
798 {
799 /* Nothing more, then only keep this one if it is the default
800 machine for this architecture. */
801 return info->the_default;
802 }
803
804 number = 0;
805 while (isdigit ((unsigned char) *ptr_src))
806 {
807 number = number * 10 + *ptr_src - '0';
808 ptr_src++;
809 }
810
811 /* NOTE: The below is retained for compatibility only.
812 PLEASE DO NOT ADD TO THIS CODE. */
813
814 switch (number)
815 {
816 /* FIXME: These are needed to parse IEEE objects. */
817 /* The following seven case's are here only for compatibility with
818 older binutils (at least IEEE objects from binutils 2.9.1 require
819 them). */
820 case bfd_mach_m68000:
821 case bfd_mach_m68010:
822 case bfd_mach_m68020:
823 case bfd_mach_m68030:
824 case bfd_mach_m68040:
825 case bfd_mach_m68060:
826 case bfd_mach_cpu32:
827 arch = bfd_arch_m68k;
828 break;
829 case 68000:
830 arch = bfd_arch_m68k;
831 number = bfd_mach_m68000;
832 break;
833 case 68010:
834 arch = bfd_arch_m68k;
835 number = bfd_mach_m68010;
836 break;
837 case 68020:
838 arch = bfd_arch_m68k;
839 number = bfd_mach_m68020;
840 break;
841 case 68030:
842 arch = bfd_arch_m68k;
843 number = bfd_mach_m68030;
844 break;
845 case 68040:
846 arch = bfd_arch_m68k;
847 number = bfd_mach_m68040;
848 break;
849 case 68060:
850 arch = bfd_arch_m68k;
851 number = bfd_mach_m68060;
852 break;
853 case 68332:
854 arch = bfd_arch_m68k;
855 number = bfd_mach_cpu32;
856 break;
857 case 5200:
858 arch = bfd_arch_m68k;
859 number = bfd_mach_mcf5200;
860 break;
861 case 5206:
862 arch = bfd_arch_m68k;
863 number = bfd_mach_mcf5206e;
864 break;
865 case 5307:
866 arch = bfd_arch_m68k;
867 number = bfd_mach_mcf5307;
868 break;
869 case 5407:
870 arch = bfd_arch_m68k;
871 number = bfd_mach_mcf5407;
872 break;
873
874 case 32000:
875 arch = bfd_arch_we32k;
876 break;
877
878 case 3000:
879 arch = bfd_arch_mips;
880 number = bfd_mach_mips3000;
881 break;
882
883 case 4000:
884 arch = bfd_arch_mips;
885 number = bfd_mach_mips4000;
886 break;
887
888 case 6000:
889 arch = bfd_arch_rs6000;
890 break;
891
892 case 7410:
893 arch = bfd_arch_sh;
894 number = bfd_mach_sh_dsp;
895 break;
896
897 case 7708:
898 arch = bfd_arch_sh;
899 number = bfd_mach_sh3;
900 break;
901
902 case 7729:
903 arch = bfd_arch_sh;
904 number = bfd_mach_sh3_dsp;
905 break;
906
907 case 7750:
908 arch = bfd_arch_sh;
909 number = bfd_mach_sh4;
910 break;
911
912 default:
913 return false;
914 }
915
916 if (arch != info->arch)
917 return false;
918
919 if (number != info->mach)
920 return false;
921
922 return true;
923}
924
925/*
926FUNCTION
927 bfd_get_arch_info
928
929SYNOPSIS
930 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
931
932DESCRIPTION
933 Return the architecture info struct in @var{abfd}.
934*/
935
936const bfd_arch_info_type *
937bfd_get_arch_info (abfd)
938 bfd *abfd;
939{
940 return abfd->arch_info;
941}
942
943/*
944FUNCTION
945 bfd_lookup_arch
946
947SYNOPSIS
948 const bfd_arch_info_type *bfd_lookup_arch
949 (enum bfd_architecture
950 arch,
951 unsigned long machine);
952
953DESCRIPTION
954 Look for the architecure info structure which matches the
955 arguments @var{arch} and @var{machine}. A machine of 0 matches the
956 machine/architecture structure which marks itself as the
957 default.
958*/
959
960const bfd_arch_info_type *
961bfd_lookup_arch (arch, machine)
962 enum bfd_architecture arch;
963 unsigned long machine;
964{
965 const bfd_arch_info_type * const *app, *ap;
966
967 for (app = bfd_archures_list; *app != NULL; app++)
968 {
969 for (ap = *app; ap != NULL; ap = ap->next)
970 {
971 if (ap->arch == arch
972 && (ap->mach == machine
973 || (machine == 0 && ap->the_default)))
974 return ap;
975 }
976 }
977
978 return NULL;
979}
980
981/*
982FUNCTION
983 bfd_printable_arch_mach
984
985SYNOPSIS
986 const char *bfd_printable_arch_mach
987 (enum bfd_architecture arch, unsigned long machine);
988
989DESCRIPTION
990 Return a printable string representing the architecture and
991 machine type.
992
993 This routine is depreciated.
994*/
995
996const char *
997bfd_printable_arch_mach (arch, machine)
998 enum bfd_architecture arch;
999 unsigned long machine;
1000{
1001 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine);
1002
1003 if (ap)
1004 return ap->printable_name;
1005 return "UNKNOWN!";
1006}
1007
1008/*
1009FUNCTION
1010 bfd_octets_per_byte
1011
1012SYNOPSIS
1013 unsigned int bfd_octets_per_byte(bfd *abfd);
1014
1015DESCRIPTION
1016 Return the number of octets (8-bit quantities) per target byte
1017 (minimum addressable unit). In most cases, this will be one, but some
1018 DSP targets have 16, 32, or even 48 bits per byte.
1019*/
1020
1021unsigned int
1022bfd_octets_per_byte (abfd)
1023 bfd *abfd;
1024{
1025 return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd),
1026 bfd_get_mach (abfd));
1027}
1028
1029/*
1030FUNCTION
1031 bfd_arch_mach_octets_per_byte
1032
1033SYNOPSIS
1034 unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch,
1035 unsigned long machine);
1036
1037DESCRIPTION
1038 See bfd_octets_per_byte.
1039
1040 This routine is provided for those cases where a bfd * is not
1041 available
1042*/
1043
1044unsigned int
1045bfd_arch_mach_octets_per_byte (arch, mach)
1046 enum bfd_architecture arch;
1047 unsigned long mach;
1048{
1049 const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach);
1050
1051 if (ap)
1052 return ap->bits_per_byte / 8;
1053 return 1;
1054}
Note: See TracBrowser for help on using the repository browser.