1 /* BFD library support routines for architectures.
2 Copyright (C) 1990-1991 Free Software Foundation, Inc.
3 Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
27 BFD's idea of an architecture is implimented in
28 <<archures.c>>. BFD keeps one atom in a BFD describing the
29 architecture of the data attached to the BFD; a pointer to a
30 <<bfd_arch_info_type>>.
32 Pointers to structures can be requested independently of a bfd
33 so that an architecture's information can be interrogated
34 without access to an open bfd.
36 The arch information is provided by each architecture package.
37 The set of default architectures is selected by the #define
38 <<SELECT_ARCHITECTURES>>. This is normally set up in the
39 <<config/target.mt>> file of your choice. If the name is not
40 defined, then all the architectures supported are included.
42 When BFD starts up, all the architectures are called with an
43 initialize method. It is up to the architecture back end to
44 insert as many items into the list of architectures as it wants to;
45 generally this would be one for each machine and one for the
46 default case (an item with a machine field of 0).
55 This enum gives the object file's CPU architecture, in a
56 global sense --- i.e., what processor family does it belong to?
57 There is another field, which indicates what processor within
58 the family is in use. The machine gives a number which
59 distingushes different versions of the architecture,
60 containing for example 2 and 3 for Intel i960 KA and i960 KB,
61 and 68020 and 68030 for Motorola 68020 and 68030.
63 .enum bfd_architecture
65 . bfd_arch_unknown, {* File arch not known *}
66 . bfd_arch_obscure, {* Arch known, not one of these *}
67 . bfd_arch_m68k, {* Motorola 68xxx *}
68 . bfd_arch_vax, {* DEC Vax *}
69 . bfd_arch_i960, {* Intel 960 *}
70 . {* The order of the following is important.
71 . lower number indicates a machine type that
72 . only accepts a subset of the instructions
73 . available to machines with higher numbers.
74 . The exception is the "ca", which is
75 . incompatible with all other machines except
78 .#define bfd_mach_i960_core 1
79 .#define bfd_mach_i960_ka_sa 2
80 .#define bfd_mach_i960_kb_sb 3
81 .#define bfd_mach_i960_mc 4
82 .#define bfd_mach_i960_xa 5
83 .#define bfd_mach_i960_ca 6
85 . bfd_arch_a29k, {* AMD 29000 *}
86 . bfd_arch_sparc, {* SPARC *}
87 . bfd_arch_mips, {* MIPS Rxxxx *}
88 . bfd_arch_i386, {* Intel 386 *}
89 . bfd_arch_we32k, {* AT&T WE32xxx *}
90 . bfd_arch_tahoe, {* CCI/Harris Tahoe *}
91 . bfd_arch_i860, {* Intel 860 *}
92 . bfd_arch_romp, {* IBM ROMP PC/RT *}
93 . bfd_arch_alliant, {* Alliant *}
94 . bfd_arch_convex, {* Convex *}
95 . bfd_arch_m88k, {* Motorola 88xxx *}
96 . bfd_arch_pyramid, {* Pyramid Technology *}
97 . bfd_arch_h8300, {* Hitachi H8/300 *}
98 .#define bfd_mach_h8300 1
99 .#define bfd_mach_h8300h 2
100 . bfd_arch_rs6000, {* IBM RS/6000 *}
101 . bfd_arch_hppa, {* HP PA RISC *}
102 . bfd_arch_z8k, {* Zilog Z8000 *}
103 .#define bfd_mach_z8001 1
104 .#define bfd_mach_z8002 2
105 . bfd_arch_h8500, {* Hitachi H8/500 *}
106 . bfd_arch_sh, {* Hitachi SH *}
107 . bfd_arch_alpha, {* Dec Alpha *}
124 This structure contains information on architectures for use
128 .typedef struct bfd_arch_info
131 . int bits_per_address;
133 . enum bfd_architecture arch;
136 . CONST char *printable_name;
137 . unsigned int section_align_power;
138 . {* true if this is the default machine for the architecture *}
139 . boolean the_default;
140 . CONST struct bfd_arch_info * (*compatible)
141 . PARAMS ((CONST struct bfd_arch_info *a,
142 . CONST struct bfd_arch_info *b));
144 . boolean (*scan) PARAMS ((CONST struct bfd_arch_info *, CONST char *));
145 . {* How to disassemble an instruction, producing a printable
146 . representation on a specified stdio stream. This isn't
147 . defined for most processors at present, because of the size
148 . of the additional tables it would drag in, and because gdb
149 . wants to use a different interface. *}
150 . unsigned int (*disassemble) PARAMS ((bfd_vma addr, CONST char *data,
153 . struct bfd_arch_info *next;
154 .} bfd_arch_info_type;
157 bfd_arch_info_type
*bfd_arch_info_list
;
165 CONST char *bfd_printable_name(bfd *abfd);
168 Return a printable string representing the architecture and machine
169 from the pointer to the arch info structure
174 DEFUN(bfd_printable_name
, (abfd
),
177 return abfd
->arch_info
->printable_name
;
187 bfd_arch_info_type *bfd_scan_arch(CONST char *);
190 This routine is provided with a string and tries to work out
191 if bfd supports any cpu which could be described with the name
192 provided. The routine returns a pointer to an arch_info
193 structure if a machine is found, otherwise NULL.
198 DEFUN(bfd_scan_arch
,(string
),
201 struct bfd_arch_info
*ap
;
203 /* Look through all the installed architectures */
204 for (ap
= bfd_arch_info_list
;
205 ap
!= (bfd_arch_info_type
*)NULL
;
208 if (ap
->scan(ap
, string
))
211 return (bfd_arch_info_type
*)NULL
;
218 bfd_arch_get_compatible
221 CONST bfd_arch_info_type *bfd_arch_get_compatible(
226 This routine is used to determine whether two BFDs'
227 architectures and achine types are compatible. It calculates
228 the lowest common denominator between the two architectures
229 and machine types implied by the BFDs and returns a pointer to
230 an arch_info structure describing the compatible machine.
233 CONST bfd_arch_info_type
*
234 DEFUN(bfd_arch_get_compatible
,(abfd
, bbfd
),
239 return abfd
->arch_info
->compatible(abfd
->arch_info
,bbfd
->arch_info
);
245 bfd_default_arch_struct
248 The <<bfd_default_arch_struct>> is an item of
249 <<bfd_arch_info_type>> which has been initialized to a fairly
250 generic state. A BFD starts life by pointing to this
251 structure, until the correct back end has determined the real
252 architecture of the file.
254 .extern bfd_arch_info_type bfd_default_arch_struct;
258 bfd_arch_info_type bfd_default_arch_struct
=
260 32,32,8,bfd_arch_unknown
,0,"unknown","unknown",2,true,
261 bfd_default_compatible
,
271 void bfd_set_arch_info(bfd *, bfd_arch_info_type *);
275 void DEFUN(bfd_set_arch_info
,(abfd
, arg
),
277 bfd_arch_info_type
*arg
)
279 abfd
->arch_info
= arg
;
284 bfd_default_set_arch_mach
287 boolean bfd_default_set_arch_mach(bfd *abfd,
288 enum bfd_architecture arch,
292 Set the architecture and machine type in a bfd. This finds the
293 correct pointer to structure and inserts it into the arch_info
297 boolean
DEFUN(bfd_default_set_arch_mach
,(abfd
, arch
, mach
),
299 enum bfd_architecture arch AND
302 static struct bfd_arch_info
*old_ptr
= &bfd_default_arch_struct
;
303 boolean found
= false;
304 /* run through the table to find the one we want, we keep a little
305 cache to speed things up */
306 if (old_ptr
== 0 || arch
!= old_ptr
->arch
|| mach
!= old_ptr
->mach
) {
307 bfd_arch_info_type
*ptr
;
308 old_ptr
= (bfd_arch_info_type
*)NULL
;
309 for (ptr
= bfd_arch_info_list
;
310 ptr
!= (bfd_arch_info_type
*)NULL
;
312 if (ptr
->arch
== arch
&&
313 ((ptr
->mach
== mach
) || (ptr
->the_default
&& mach
== 0))) {
320 /*looked for it and it wasn't there, so put in the default */
321 old_ptr
= &bfd_default_arch_struct
;
322 bfd_error
= bad_value
;
326 /* it was in the cache */
330 abfd
->arch_info
= old_ptr
;
344 enum bfd_architecture bfd_get_arch(bfd *abfd);
347 Returns the enumerated type which describes the supplied bfd's
352 enum bfd_architecture
DEFUN(bfd_get_arch
, (abfd
), bfd
*abfd
)
354 return abfd
->arch_info
->arch
;
362 unsigned long bfd_get_mach(bfd *abfd);
365 Returns the long type which describes the supplied bfd's
370 DEFUN(bfd_get_mach
, (abfd
), bfd
*abfd
)
372 return abfd
->arch_info
->mach
;
377 bfd_arch_bits_per_byte
380 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
383 Returns the number of bits in one of the architectures bytes
387 unsigned int DEFUN(bfd_arch_bits_per_byte
, (abfd
), bfd
*abfd
)
389 return abfd
->arch_info
->bits_per_byte
;
394 bfd_arch_bits_per_address
397 unsigned int bfd_arch_bits_per_address(bfd *abfd);
400 Returns the number of bits in one of the architectures addresses
403 unsigned int DEFUN(bfd_arch_bits_per_address
, (abfd
), bfd
*abfd
)
405 return abfd
->arch_info
->bits_per_address
;
410 extern void bfd_h8300_arch
PARAMS ((void));
411 extern void bfd_sh_arch
PARAMS ((void));
412 extern void bfd_h8500_arch
PARAMS ((void));
413 extern void bfd_alpha_arch
PARAMS ((void));
414 extern void bfd_i960_arch
PARAMS ((void));
415 extern void bfd_empty_arch
PARAMS ((void));
416 extern void bfd_sparc_arch
PARAMS ((void));
417 extern void bfd_m88k_arch
PARAMS ((void));
418 extern void bfd_m68k_arch
PARAMS ((void));
419 extern void bfd_vax_arch
PARAMS ((void));
420 extern void bfd_a29k_arch
PARAMS ((void));
421 extern void bfd_mips_arch
PARAMS ((void));
422 extern void bfd_i386_arch
PARAMS ((void));
423 extern void bfd_rs6000_arch
PARAMS ((void));
424 extern void bfd_hppa_arch
PARAMS ((void));
425 extern void bfd_z8k_arch
PARAMS ((void));
426 extern void bfd_we32k_arch
PARAMS ((void));
428 static void (*archures_init_table
[]) PARAMS ((void)) =
430 #ifdef SELECT_ARCHITECTURES
431 SELECT_ARCHITECTURES
,
460 void bfd_arch_init(void);
463 This routine initializes the architecture dispatch table by
464 calling all installed architecture packages and getting them
469 DEFUN_VOID(bfd_arch_init
)
471 void (**ptable
) PARAMS ((void));
472 for (ptable
= archures_init_table
;
486 void bfd_arch_linkin(bfd_arch_info_type *);
489 Link the provided arch info structure into the list
492 void DEFUN(bfd_arch_linkin
,(ptr
),
493 bfd_arch_info_type
*ptr
)
495 ptr
->next
= bfd_arch_info_list
;
496 bfd_arch_info_list
= ptr
;
502 bfd_default_compatible
505 CONST bfd_arch_info_type *bfd_default_compatible
506 (CONST bfd_arch_info_type *a,
507 CONST bfd_arch_info_type *b);
510 The default function for testing for compatibility.
513 CONST bfd_arch_info_type
*
514 DEFUN(bfd_default_compatible
,(a
,b
),
515 CONST bfd_arch_info_type
*a AND
516 CONST bfd_arch_info_type
*b
)
518 if(a
->arch
!= b
->arch
) return NULL
;
520 if (a
->mach
> b
->mach
) {
523 if (b
->mach
> a
->mach
) {
535 boolean bfd_default_scan(CONST struct bfd_arch_info *, CONST char *);
538 The default function for working out whether this is an
539 architecture hit and a machine hit.
543 DEFUN(bfd_default_scan
,(info
, string
),
544 CONST
struct bfd_arch_info
*info AND
549 unsigned long number
;
550 enum bfd_architecture arch
;
551 /* First test for an exact match */
552 if (strcmp(string
, info
->printable_name
) == 0) return true;
554 /* See how much of the supplied string matches with the
555 architecture, eg the string m68k:68020 would match the 68k entry
556 up to the :, then we get left with the machine number */
558 for (ptr_src
= string
,
559 ptr_tst
= info
->arch_name
;
560 *ptr_src
&& *ptr_tst
;
564 if (*ptr_src
!= *ptr_tst
) break;
567 /* Chewed up as much of the architecture as will match, skip any
569 if (*ptr_src
== ':') ptr_src
++;
572 /* nothing more, then only keep this one if it is the default
573 machine for this architecture */
574 return info
->the_default
;
577 while (isdigit(*ptr_src
)) {
578 number
= number
* 10 + *ptr_src
- '0';
585 arch
= bfd_arch_h8300
;
589 arch
= bfd_arch_h8500
;
599 arch
= bfd_arch_m68k
;
605 arch
= bfd_arch_i386
;
608 arch
= bfd_arch_a29k
;
616 arch
= bfd_arch_we32k
;
621 arch
= bfd_arch_i860
;
625 arch
= bfd_arch_i960
;
632 arch
= bfd_arch_mips
;
636 arch
= bfd_arch_rs6000
;
642 if (arch
!= info
->arch
)
645 if (number
!= info
->mach
)
660 bfd_arch_info_type * bfd_get_arch_info(bfd *);
665 DEFUN(bfd_get_arch_info
,(abfd
),
668 return abfd
->arch_info
;
677 bfd_arch_info_type *bfd_lookup_arch
678 (enum bfd_architecture
683 Look for the architecure info struct which matches the
684 arguments given. A machine of 0 will match the
685 machine/architecture structure which marks itself as the
690 DEFUN(bfd_lookup_arch
,(arch
, machine
),
691 enum bfd_architecture arch AND
694 bfd_arch_info_type
*ap
;
696 for (ap
= bfd_arch_info_list
;
697 ap
!= (bfd_arch_info_type
*)NULL
;
699 if (ap
->arch
== arch
&&
700 ((ap
->mach
== machine
)
701 || (ap
->the_default
&& machine
== 0))) {
705 return (bfd_arch_info_type
*)NULL
;
712 bfd_printable_arch_mach
715 CONST char * bfd_printable_arch_mach
716 (enum bfd_architecture arch, unsigned long machine);
719 Return a printable string representing the architecture and
722 NB. The use of this routine is depreciated.
726 DEFUN(bfd_printable_arch_mach
,(arch
, machine
),
727 enum bfd_architecture arch AND
728 unsigned long machine
)
730 bfd_arch_info_type
*ap
= bfd_lookup_arch(arch
, machine
);
731 if(ap
) return ap
->printable_name
;