1 /* BFD library support routines for architectures.
2 Copyright (C) 1990, 91, 92, 93, 94, 95, 96, 1997 Free Software Foundation, Inc.
3 Hacked by John Gilmore and Steve Chamberlain of Cygnus Support.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
31 BFD keeps one atom in a BFD describing the
32 architecture of the data attached to the BFD: a pointer to a
33 <<bfd_arch_info_type>>.
35 Pointers to structures can be requested independently of a BFD
36 so that an architecture's information can be interrogated
37 without access to an open BFD.
39 The architecture information is provided by each architecture package.
40 The set of default architectures is selected by the macro
41 <<SELECT_ARCHITECTURES>>. This is normally set up in the
42 @file{config/@var{target}.mt} file of your choice. If the name is not
43 defined, then all the architectures supported are included.
45 When BFD starts up, all the architectures are called with an
46 initialize method. It is up to the architecture back end to
47 insert as many items into the list of architectures as it wants to;
48 generally this would be one for each machine and one for the
49 default case (an item with a machine field of 0).
51 BFD's idea of an architecture is implemented in @file{archures.c}.
60 This enum gives the object file's CPU architecture, in a
61 global sense---i.e., what processor family does it belong to?
62 Another field indicates which processor within
63 the family is in use. The machine gives a number which
64 distinguishes different versions of the architecture,
65 containing, for example, 2 and 3 for Intel i960 KA and i960 KB,
66 and 68020 and 68030 for Motorola 68020 and 68030.
68 .enum bfd_architecture
70 . bfd_arch_unknown, {* File arch not known *}
71 . bfd_arch_obscure, {* Arch known, not one of these *}
72 . bfd_arch_m68k, {* Motorola 68xxx *}
73 . bfd_arch_vax, {* DEC Vax *}
74 . bfd_arch_i960, {* Intel 960 *}
75 . {* The order of the following is important.
76 . lower number indicates a machine type that
77 . only accepts a subset of the instructions
78 . available to machines with higher numbers.
79 . The exception is the "ca", which is
80 . incompatible with all other machines except
83 .#define bfd_mach_i960_core 1
84 .#define bfd_mach_i960_ka_sa 2
85 .#define bfd_mach_i960_kb_sb 3
86 .#define bfd_mach_i960_mc 4
87 .#define bfd_mach_i960_xa 5
88 .#define bfd_mach_i960_ca 6
89 .#define bfd_mach_i960_jx 7
90 .#define bfd_mach_i960_hx 8
92 . bfd_arch_a29k, {* AMD 29000 *}
93 . bfd_arch_sparc, {* SPARC *}
94 .#define bfd_mach_sparc 1
95 .{* The difference between v8plus and v9 is that v9 is a true 64 bit env. *}
96 .#define bfd_mach_sparc_sparclet 2
97 .#define bfd_mach_sparc_sparclite 3
98 .#define bfd_mach_sparc_v8plus 4
99 .#define bfd_mach_sparc_v8plusa 5 {* with ultrasparc add'ns *}
100 .#define bfd_mach_sparc_v9 6
101 .#define bfd_mach_sparc_v9a 7 {* with ultrasparc add'ns *}
102 .{* Nonzero if MACH has the v9 instruction set. *}
103 .#define bfd_mach_sparc_v9_p(mach) \
104 . ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9a)
105 . {* start-sanitize-tx19 *}
106 .#define bfd_mach_mips1900 1900
107 . {* end-sanitize-tx19 *}
108 .#define bfd_mach_mips3000 3000
109 .#define bfd_mach_mips3900 3900
110 .#define bfd_mach_mips4000 4000
111 .#define bfd_mach_mips4010 4010
112 .#define bfd_mach_mips4100 4100
113 .#define bfd_mach_mips4300 4300
114 .#define bfd_mach_mips4400 4400
115 .#define bfd_mach_mips4600 4600
116 .#define bfd_mach_mips4650 4650
117 . {* start-sanitize-tx49 *}
118 .#define bfd_mach_mips4900 4900
119 . {* end-sanitize-tx49 *}
120 .#define bfd_mach_mips5000 5000
121 . {* start-sanitize-vr5400 *}
122 .#define bfd_mach_mips5400 5400
123 . {* end-sanitize-vr5400 *}
124 . {* start-sanitize-r5900 *}
125 .#define bfd_mach_mips5900 5900
126 . {* end-sanitize-r5900 *}
127 .#define bfd_mach_mips6000 6000
128 .#define bfd_mach_mips8000 8000
129 .#define bfd_mach_mips10000 10000
130 .#define bfd_mach_mips16 16
131 . bfd_arch_mips, {* MIPS Rxxxx *}
132 . bfd_arch_i386, {* Intel 386 *}
133 .#define bfd_mach_i386_i386 0
134 .#define bfd_mach_i386_i8086 1
135 . bfd_arch_we32k, {* AT&T WE32xxx *}
136 . bfd_arch_tahoe, {* CCI/Harris Tahoe *}
137 . bfd_arch_i860, {* Intel 860 *}
138 . bfd_arch_romp, {* IBM ROMP PC/RT *}
139 . bfd_arch_alliant, {* Alliant *}
140 . bfd_arch_convex, {* Convex *}
141 . bfd_arch_m88k, {* Motorola 88xxx *}
142 . bfd_arch_pyramid, {* Pyramid Technology *}
143 . bfd_arch_h8300, {* Hitachi H8/300 *}
144 .#define bfd_mach_h8300 1
145 .#define bfd_mach_h8300h 2
146 .#define bfd_mach_h8300s 3
147 . bfd_arch_powerpc, {* PowerPC *}
148 . bfd_arch_rs6000, {* IBM RS/6000 *}
149 . bfd_arch_hppa, {* HP PA RISC *}
150 . bfd_arch_d10v, {* Mitsubishi D10V *}
151 . {* start-sanitize-d30v *}
152 . bfd_arch_d30v, {* Mitsubishi D30V *}
153 . {* end-sanitize-d30v *}
154 . bfd_arch_z8k, {* Zilog Z8000 *}
155 .#define bfd_mach_z8001 1
156 .#define bfd_mach_z8002 2
157 . bfd_arch_h8500, {* Hitachi H8/500 *}
158 . bfd_arch_sh, {* Hitachi SH *}
159 .#define bfd_mach_sh 0
160 .#define bfd_mach_sh3 0x30
161 .#define bfd_mach_sh3e 0x3e
162 . {* start-sanitize-sh4 *}
163 .#define bfd_mach_sh4 0x40
164 . {* end-sanitize-sh4 *}
165 . bfd_arch_alpha, {* Dec Alpha *}
166 . bfd_arch_arm, {* Advanced Risc Machines ARM *}
167 .#define bfd_mach_arm_2 1
168 .#define bfd_mach_arm_2a 2
169 .#define bfd_mach_arm_3 3
170 .#define bfd_mach_arm_3M 4
171 .#define bfd_mach_arm_4 5
172 .#define bfd_mach_arm_4T 6
173 . bfd_arch_ns32k, {* National Semiconductors ns32000 *}
174 . bfd_arch_w65, {* WDC 65816 *}
175 . {* start-sanitize-tic80 *}
176 . bfd_arch_tic80, {* TI TMS320c80 (MVP) *}
177 . {* end-sanitize-tic80 *}
178 . {* start-sanitize-sky *}
179 . bfd_arch_txvu, {* TX VU *}
180 .#define bfd_mach_txvu 0
181 . {* end-sanitize-sky *}
182 . bfd_arch_v850, {* NEC V850 *}
183 .#define bfd_mach_v850 0
184 . {* start-sanitize-v850e *}
185 .#define bfd_mach_v850e 'E'
186 .#define bfd_mach_v850ea 'A'
187 . {* end-sanitize-v850e *}
188 . bfd_arch_arc, {* Argonaut RISC Core *}
189 .#define bfd_mach_arc_base 0
190 . bfd_arch_m32r, {* Mitsubishi M32R/D *}
191 .#define bfd_mach_m32r 0 {* backwards compatibility *}
192 . {* start-sanitize-m32rx *}
193 .#define bfd_mach_m32rx 'x'
194 . {* end-sanitize-m32rx *}
195 . bfd_arch_mn10200, {* Matsushita MN10200 *}
196 . bfd_arch_mn10300, {* Matsushita MN10300 *}
209 This structure contains information on architectures for use
213 .typedef struct bfd_arch_info
216 . int bits_per_address;
218 . enum bfd_architecture arch;
219 . unsigned long mach;
220 . const char *arch_name;
221 . const char *printable_name;
222 . unsigned int section_align_power;
223 . {* true if this is the default machine for the architecture *}
224 . boolean the_default;
225 . const struct bfd_arch_info * (*compatible)
226 . PARAMS ((const struct bfd_arch_info *a,
227 . const struct bfd_arch_info *b));
229 . boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *));
231 . const struct bfd_arch_info *next;
232 .} bfd_arch_info_type;
235 extern const bfd_arch_info_type bfd_a29k_arch
;
236 extern const bfd_arch_info_type bfd_alpha_arch
;
237 extern const bfd_arch_info_type bfd_arc_arch
;
238 extern const bfd_arch_info_type bfd_arm_arch
;
239 extern const bfd_arch_info_type bfd_d10v_arch
;
240 /* start-sanitize-d30v */
241 extern const bfd_arch_info_type bfd_d30v_arch
;
242 /* end-sanitize-d30v */
243 extern const bfd_arch_info_type bfd_h8300_arch
;
244 extern const bfd_arch_info_type bfd_h8500_arch
;
245 extern const bfd_arch_info_type bfd_hppa_arch
;
246 extern const bfd_arch_info_type bfd_i386_arch
;
247 extern const bfd_arch_info_type bfd_i860_arch
;
248 extern const bfd_arch_info_type bfd_i960_arch
;
249 extern const bfd_arch_info_type bfd_m32r_arch
;
250 extern const bfd_arch_info_type bfd_m68k_arch
;
251 extern const bfd_arch_info_type bfd_m88k_arch
;
252 extern const bfd_arch_info_type bfd_mips_arch
;
253 extern const bfd_arch_info_type bfd_mn10200_arch
;
254 extern const bfd_arch_info_type bfd_mn10300_arch
;
255 extern const bfd_arch_info_type bfd_powerpc_arch
;
256 extern const bfd_arch_info_type bfd_rs6000_arch
;
257 extern const bfd_arch_info_type bfd_sh_arch
;
258 extern const bfd_arch_info_type bfd_sparc_arch
;
259 /* start-sanitize-tic80 */
260 extern const bfd_arch_info_type bfd_tic80_arch
;
261 /* end-sanitize-tic80 */
262 /* start-sanitize-sky */
263 extern const bfd_arch_info_type bfd_txvu_arch
;
264 /* end-sanitize-sky */
265 extern const bfd_arch_info_type bfd_vax_arch
;
266 extern const bfd_arch_info_type bfd_we32k_arch
;
267 extern const bfd_arch_info_type bfd_z8k_arch
;
268 extern const bfd_arch_info_type bfd_ns32k_arch
;
269 extern const bfd_arch_info_type bfd_w65_arch
;
270 extern const bfd_arch_info_type bfd_v850_arch
;
272 static const bfd_arch_info_type
* const bfd_archures_list
[] =
274 #ifdef SELECT_ARCHITECTURES
275 SELECT_ARCHITECTURES
,
282 /* start-sanitize-d30v */
284 /* end-sanitize-d30v */
301 /* start-sanitize-tic80 */
303 /* end-sanitize-tic80 */
304 /* start-sanitize-sky */
306 /* end-sanitize-sky */
322 const char *bfd_printable_name(bfd *abfd);
325 Return a printable string representing the architecture and machine
326 from the pointer to the architecture info structure.
331 bfd_printable_name (abfd
)
334 return abfd
->arch_info
->printable_name
;
344 const bfd_arch_info_type *bfd_scan_arch(const char *string);
347 Figure out if BFD supports any cpu which could be described with
348 the name @var{string}. Return a pointer to an <<arch_info>>
349 structure if a machine is found, otherwise NULL.
353 const bfd_arch_info_type
*
354 bfd_scan_arch (string
)
357 const bfd_arch_info_type
* const *app
, *ap
;
359 /* Look through all the installed architectures */
360 for (app
= bfd_archures_list
; *app
!= NULL
; app
++)
362 for (ap
= *app
; ap
!= NULL
; ap
= ap
->next
)
364 if (ap
->scan (ap
, string
))
379 const char **bfd_arch_list(void);
382 Return a freshly malloced NULL-terminated vector of the names
383 of all the valid BFD architectures. Do not modify the names.
391 const char **name_ptr
;
392 const char **name_list
;
393 const bfd_arch_info_type
* const *app
;
395 /* Determine the number of architectures */
397 for (app
= bfd_archures_list
; *app
!= NULL
; app
++)
399 const bfd_arch_info_type
*ap
;
400 for (ap
= *app
; ap
!= NULL
; ap
= ap
->next
)
406 name_list
= (CONST
char **)
407 bfd_malloc ((vec_length
+ 1) * sizeof (char **));
408 if (name_list
== NULL
)
411 /* Point the list at each of the names */
412 name_ptr
= name_list
;
413 for (app
= bfd_archures_list
; *app
!= NULL
; app
++)
415 const bfd_arch_info_type
*ap
;
416 for (ap
= *app
; ap
!= NULL
; ap
= ap
->next
)
418 *name_ptr
= ap
->printable_name
;
431 bfd_arch_get_compatible
434 const bfd_arch_info_type *bfd_arch_get_compatible(
439 Determine whether two BFDs'
440 architectures and machine types are compatible. Calculates
441 the lowest common denominator between the two architectures
442 and machine types implied by the BFDs and returns a pointer to
443 an <<arch_info>> structure describing the compatible machine.
446 const bfd_arch_info_type
*
447 bfd_arch_get_compatible (abfd
, bbfd
)
451 /* If either architecture is unknown, then all we can do is assume
452 the user knows what he's doing. */
453 if (abfd
->arch_info
->arch
== bfd_arch_unknown
)
454 return bbfd
->arch_info
;
455 if (bbfd
->arch_info
->arch
== bfd_arch_unknown
)
456 return abfd
->arch_info
;
458 /* Otherwise architecture-specific code has to decide. */
459 return abfd
->arch_info
->compatible (abfd
->arch_info
, bbfd
->arch_info
);
465 bfd_default_arch_struct
468 The <<bfd_default_arch_struct>> is an item of
469 <<bfd_arch_info_type>> which has been initialized to a fairly
470 generic state. A BFD starts life by pointing to this
471 structure, until the correct back end has determined the real
472 architecture of the file.
474 .extern const bfd_arch_info_type bfd_default_arch_struct;
478 const bfd_arch_info_type bfd_default_arch_struct
=
480 32,32,8,bfd_arch_unknown
,0,"unknown","unknown",2,true,
481 bfd_default_compatible
,
491 void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg);
494 Set the architecture info of @var{abfd} to @var{arg}.
498 bfd_set_arch_info (abfd
, arg
)
500 const bfd_arch_info_type
*arg
;
502 abfd
->arch_info
= arg
;
507 bfd_default_set_arch_mach
510 boolean bfd_default_set_arch_mach(bfd *abfd,
511 enum bfd_architecture arch,
515 Set the architecture and machine type in BFD @var{abfd}
516 to @var{arch} and @var{mach}. Find the correct
517 pointer to a structure and insert it into the <<arch_info>>
522 bfd_default_set_arch_mach (abfd
, arch
, mach
)
524 enum bfd_architecture arch
;
527 const bfd_arch_info_type
* const *app
, *ap
;
529 for (app
= bfd_archures_list
; *app
!= NULL
; app
++)
531 for (ap
= *app
; ap
!= NULL
; ap
= ap
->next
)
535 || (mach
== 0 && ap
->the_default
)))
537 abfd
->arch_info
= ap
;
543 abfd
->arch_info
= &bfd_default_arch_struct
;
544 bfd_set_error (bfd_error_bad_value
);
554 enum bfd_architecture bfd_get_arch(bfd *abfd);
557 Return the enumerated type which describes the BFD @var{abfd}'s
562 enum bfd_architecture
566 return abfd
->arch_info
->arch
;
574 unsigned long bfd_get_mach(bfd *abfd);
577 Return the long type which describes the BFD @var{abfd}'s
585 return abfd
->arch_info
->mach
;
590 bfd_arch_bits_per_byte
593 unsigned int bfd_arch_bits_per_byte(bfd *abfd);
596 Return the number of bits in one of the BFD @var{abfd}'s
597 architecture's bytes.
602 bfd_arch_bits_per_byte (abfd
)
605 return abfd
->arch_info
->bits_per_byte
;
610 bfd_arch_bits_per_address
613 unsigned int bfd_arch_bits_per_address(bfd *abfd);
616 Return the number of bits in one of the BFD @var{abfd}'s
617 architecture's addresses.
621 bfd_arch_bits_per_address (abfd
)
624 return abfd
->arch_info
->bits_per_address
;
630 bfd_default_compatible
633 const bfd_arch_info_type *bfd_default_compatible
634 (const bfd_arch_info_type *a,
635 const bfd_arch_info_type *b);
638 The default function for testing for compatibility.
641 const bfd_arch_info_type
*
642 bfd_default_compatible (a
,b
)
643 const bfd_arch_info_type
*a
;
644 const bfd_arch_info_type
*b
;
646 if (a
->arch
!= b
->arch
)
649 if (a
->mach
> b
->mach
)
652 if (b
->mach
> a
->mach
)
664 boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string);
667 The default function for working out whether this is an
668 architecture hit and a machine hit.
672 bfd_default_scan (info
, string
)
673 const struct bfd_arch_info
*info
;
678 unsigned long number
;
679 enum bfd_architecture arch
;
680 const char *printable_name_colon
;
682 /* Exact match of the architecture name (ARCH_NAME) and also the
683 default architecture? */
684 if (strcasecmp (string
, info
->arch_name
) == 0
685 && info
->the_default
)
688 /* Exact match of the machine name (PRINTABLE_NAME)? */
689 if (strcasecmp (string
, info
->printable_name
) == 0)
692 /* Given that printable_name contains no colon, attempt to match:
693 ARCH_NAME [ ":" ] PRINTABLE_NAME? */
694 printable_name_colon
= strchr (info
->printable_name
, ':');
695 if (printable_name_colon
== NULL
)
697 int strlen_arch_name
= strlen (info
->arch_name
);
698 if (strncasecmp (string
, info
->arch_name
, strlen_arch_name
) == 0)
699 if (string
[strlen_arch_name
] == ':')
701 if (strcasecmp (string
+ strlen_arch_name
+ 1,
702 info
->printable_name
) == 0)
707 if (strcasecmp (string
+ strlen_arch_name
,
708 info
->printable_name
) == 0)
713 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>;
714 Attempt to match: <arch> <mach>? */
715 if (printable_name_colon
!= NULL
)
717 int colon_index
= printable_name_colon
- info
->printable_name
;
718 if (strncasecmp (string
, info
->printable_name
, colon_index
) == 0
719 && strcasecmp (string
+ colon_index
,
720 info
->printable_name
+ colon_index
+ 1) == 0)
724 /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not
725 attempt to match just <mach>, it could be ambigious. This test
726 is left until later. */
728 /* NOTE: The below is retained for compatibility only. Please do not
731 /* See how much of the supplied string matches with the
732 architecture, eg the string m68k:68020 would match the 68k entry
733 up to the :, then we get left with the machine number */
735 for (ptr_src
= string
, ptr_tst
= info
->arch_name
;
736 *ptr_src
&& *ptr_tst
;
737 ptr_src
++, ptr_tst
++)
739 if (*ptr_src
!= *ptr_tst
) break;
742 /* Chewed up as much of the architecture as will match, skip any
749 /* nothing more, then only keep this one if it is the default
750 machine for this architecture */
751 return info
->the_default
;
755 while (isdigit(*ptr_src
))
757 number
= number
* 10 + *ptr_src
- '0';
761 /* NOTE: The below is retained for compatibility only.
762 PLEASE DO NOT ADD TO THIS CODE. */
773 arch
= bfd_arch_m68k
;
777 arch
= bfd_arch_we32k
;
781 arch
= bfd_arch_mips
;
782 number
= bfd_mach_mips3000
;
786 arch
= bfd_arch_mips
;
787 number
= bfd_mach_mips4000
;
791 arch
= bfd_arch_rs6000
;
798 if (arch
!= info
->arch
)
801 if (number
!= info
->mach
)
813 const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd);
816 Return the architecture info struct in @var{abfd}.
819 const bfd_arch_info_type
*
820 bfd_get_arch_info (abfd
)
823 return abfd
->arch_info
;
832 const bfd_arch_info_type *bfd_lookup_arch
833 (enum bfd_architecture
835 unsigned long machine);
838 Look for the architecure info structure which matches the
839 arguments @var{arch} and @var{machine}. A machine of 0 matches the
840 machine/architecture structure which marks itself as the
844 const bfd_arch_info_type
*
845 bfd_lookup_arch (arch
, machine
)
846 enum bfd_architecture arch
;
847 unsigned long machine
;
849 const bfd_arch_info_type
* const *app
, *ap
;
851 for (app
= bfd_archures_list
; *app
!= NULL
; app
++)
853 for (ap
= *app
; ap
!= NULL
; ap
= ap
->next
)
856 && (ap
->mach
== machine
857 || (machine
== 0 && ap
->the_default
)))
868 bfd_printable_arch_mach
871 const char *bfd_printable_arch_mach
872 (enum bfd_architecture arch, unsigned long machine);
875 Return a printable string representing the architecture and
878 This routine is depreciated.
882 bfd_printable_arch_mach (arch
, machine
)
883 enum bfd_architecture arch
;
884 unsigned long machine
;
886 const bfd_arch_info_type
*ap
= bfd_lookup_arch (arch
, machine
);
889 return ap
->printable_name
;