| /* BFD library support routines for architectures. |
| Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, |
| 2000, 2001, 2002, 2003 |
| Free Software Foundation, Inc. |
| Hacked by John Gilmore and Steve Chamberlain of Cygnus Support. |
| |
| This file is part of BFD, the Binary File Descriptor library. |
| |
| This program is free software; you can redistribute it and/or modify |
| it under the terms of the GNU General Public License as published by |
| the Free Software Foundation; either version 2 of the License, or |
| (at your option) any later version. |
| |
| This program is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of the GNU General Public License |
| along with this program; if not, write to the Free Software |
| Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
| |
| #include "bfd.h" |
| #include "sysdep.h" |
| #include "libbfd.h" |
| #include "safe-ctype.h" |
| |
| /* |
| |
| SECTION |
| Architectures |
| |
| BFD keeps one atom in a BFD describing the |
| architecture of the data attached to the BFD: a pointer to a |
| <<bfd_arch_info_type>>. |
| |
| Pointers to structures can be requested independently of a BFD |
| so that an architecture's information can be interrogated |
| without access to an open BFD. |
| |
| The architecture information is provided by each architecture package. |
| The set of default architectures is selected by the macro |
| <<SELECT_ARCHITECTURES>>. This is normally set up in the |
| @file{config/@var{target}.mt} file of your choice. If the name is not |
| defined, then all the architectures supported are included. |
| |
| When BFD starts up, all the architectures are called with an |
| initialize method. It is up to the architecture back end to |
| insert as many items into the list of architectures as it wants to; |
| generally this would be one for each machine and one for the |
| default case (an item with a machine field of 0). |
| |
| BFD's idea of an architecture is implemented in @file{archures.c}. |
| */ |
| |
| /* |
| |
| SUBSECTION |
| bfd_architecture |
| |
| DESCRIPTION |
| This enum gives the object file's CPU architecture, in a |
| global sense---i.e., what processor family does it belong to? |
| Another field indicates which processor within |
| the family is in use. The machine gives a number which |
| distinguishes different versions of the architecture, |
| containing, for example, 2 and 3 for Intel i960 KA and i960 KB, |
| and 68020 and 68030 for Motorola 68020 and 68030. |
| |
| .enum bfd_architecture |
| .{ |
| . bfd_arch_unknown, {* File arch not known. *} |
| . bfd_arch_obscure, {* Arch known, not one of these. *} |
| . bfd_arch_m68k, {* Motorola 68xxx *} |
| .#define bfd_mach_m68000 1 |
| .#define bfd_mach_m68008 2 |
| .#define bfd_mach_m68010 3 |
| .#define bfd_mach_m68020 4 |
| .#define bfd_mach_m68030 5 |
| .#define bfd_mach_m68040 6 |
| .#define bfd_mach_m68060 7 |
| .#define bfd_mach_cpu32 8 |
| .#define bfd_mach_mcf5200 9 |
| .#define bfd_mach_mcf5206e 10 |
| .#define bfd_mach_mcf5307 11 |
| .#define bfd_mach_mcf5407 12 |
| . bfd_arch_vax, {* DEC Vax *} |
| . bfd_arch_i960, {* Intel 960 *} |
| . {* The order of the following is important. |
| . lower number indicates a machine type that |
| . only accepts a subset of the instructions |
| . available to machines with higher numbers. |
| . The exception is the "ca", which is |
| . incompatible with all other machines except |
| . "core". *} |
| . |
| .#define bfd_mach_i960_core 1 |
| .#define bfd_mach_i960_ka_sa 2 |
| .#define bfd_mach_i960_kb_sb 3 |
| .#define bfd_mach_i960_mc 4 |
| .#define bfd_mach_i960_xa 5 |
| .#define bfd_mach_i960_ca 6 |
| .#define bfd_mach_i960_jx 7 |
| .#define bfd_mach_i960_hx 8 |
| . |
| . bfd_arch_or32, {* OpenRISC 32 *} |
| . |
| . bfd_arch_a29k, {* AMD 29000 *} |
| . bfd_arch_sparc, {* SPARC *} |
| .#define bfd_mach_sparc 1 |
| .{* The difference between v8plus and v9 is that v9 is a true 64 bit env. *} |
| .#define bfd_mach_sparc_sparclet 2 |
| .#define bfd_mach_sparc_sparclite 3 |
| .#define bfd_mach_sparc_v8plus 4 |
| .#define bfd_mach_sparc_v8plusa 5 {* with ultrasparc add'ns. *} |
| .#define bfd_mach_sparc_sparclite_le 6 |
| .#define bfd_mach_sparc_v9 7 |
| .#define bfd_mach_sparc_v9a 8 {* with ultrasparc add'ns. *} |
| .#define bfd_mach_sparc_v8plusb 9 {* with cheetah add'ns. *} |
| .#define bfd_mach_sparc_v9b 10 {* with cheetah add'ns. *} |
| .{* Nonzero if MACH has the v9 instruction set. *} |
| .#define bfd_mach_sparc_v9_p(mach) \ |
| . ((mach) >= bfd_mach_sparc_v8plus && (mach) <= bfd_mach_sparc_v9b \ |
| . && (mach) != bfd_mach_sparc_sparclite_le) |
| . bfd_arch_mips, {* MIPS Rxxxx *} |
| .#define bfd_mach_mips3000 3000 |
| .#define bfd_mach_mips3900 3900 |
| .#define bfd_mach_mips4000 4000 |
| .#define bfd_mach_mips4010 4010 |
| .#define bfd_mach_mips4100 4100 |
| .#define bfd_mach_mips4111 4111 |
| .#define bfd_mach_mips4120 4120 |
| .#define bfd_mach_mips4300 4300 |
| .#define bfd_mach_mips4400 4400 |
| .#define bfd_mach_mips4600 4600 |
| .#define bfd_mach_mips4650 4650 |
| .#define bfd_mach_mips5000 5000 |
| .#define bfd_mach_mips5400 5400 |
| .#define bfd_mach_mips5500 5500 |
| .#define bfd_mach_mips6000 6000 |
| .#define bfd_mach_mips8000 8000 |
| .#define bfd_mach_mips10000 10000 |
| .#define bfd_mach_mips12000 12000 |
| .#define bfd_mach_mips16 16 |
| .#define bfd_mach_mips5 5 |
| .#define bfd_mach_mips_sb1 12310201 {* octal 'SB', 01 *} |
| .#define bfd_mach_mipsisa32 32 |
| .#define bfd_mach_mipsisa32r2 33 |
| .#define bfd_mach_mipsisa64 64 |
| . bfd_arch_i386, {* Intel 386 *} |
| .#define bfd_mach_i386_i386 1 |
| .#define bfd_mach_i386_i8086 2 |
| .#define bfd_mach_i386_i386_intel_syntax 3 |
| .#define bfd_mach_x86_64 64 |
| .#define bfd_mach_x86_64_intel_syntax 65 |
| . bfd_arch_we32k, {* AT&T WE32xxx *} |
| . bfd_arch_tahoe, {* CCI/Harris Tahoe *} |
| . bfd_arch_i860, {* Intel 860 *} |
| . bfd_arch_i370, {* IBM 360/370 Mainframes *} |
| . bfd_arch_romp, {* IBM ROMP PC/RT *} |
| . bfd_arch_alliant, {* Alliant *} |
| . bfd_arch_convex, {* Convex *} |
| . bfd_arch_m88k, {* Motorola 88xxx *} |
| . bfd_arch_m98k, {* Motorola 98xxx *} |
| . bfd_arch_pyramid, {* Pyramid Technology *} |
| . bfd_arch_h8300, {* Hitachi H8/300 *} |
| .#define bfd_mach_h8300 1 |
| .#define bfd_mach_h8300h 2 |
| .#define bfd_mach_h8300s 3 |
| . bfd_arch_pdp11, {* DEC PDP-11 *} |
| . bfd_arch_powerpc, {* PowerPC *} |
| .#define bfd_mach_ppc 32 |
| .#define bfd_mach_ppc64 64 |
| .#define bfd_mach_ppc_403 403 |
| .#define bfd_mach_ppc_403gc 4030 |
| .#define bfd_mach_ppc_505 505 |
| .#define bfd_mach_ppc_601 601 |
| .#define bfd_mach_ppc_602 602 |
| .#define bfd_mach_ppc_603 603 |
| .#define bfd_mach_ppc_ec603e 6031 |
| .#define bfd_mach_ppc_604 604 |
| .#define bfd_mach_ppc_620 620 |
| .#define bfd_mach_ppc_630 630 |
| .#define bfd_mach_ppc_750 750 |
| .#define bfd_mach_ppc_860 860 |
| .#define bfd_mach_ppc_a35 35 |
| .#define bfd_mach_ppc_rs64ii 642 |
| .#define bfd_mach_ppc_rs64iii 643 |
| .#define bfd_mach_ppc_7400 7400 |
| .#define bfd_mach_ppc_e500 500 |
| . bfd_arch_rs6000, {* IBM RS/6000 *} |
| .#define bfd_mach_rs6k 6000 |
| .#define bfd_mach_rs6k_rs1 6001 |
| .#define bfd_mach_rs6k_rsc 6003 |
| .#define bfd_mach_rs6k_rs2 6002 |
| . bfd_arch_hppa, {* HP PA RISC *} |
| . bfd_arch_d10v, {* Mitsubishi D10V *} |
| .#define bfd_mach_d10v 1 |
| .#define bfd_mach_d10v_ts2 2 |
| .#define bfd_mach_d10v_ts3 3 |
| . bfd_arch_d30v, {* Mitsubishi D30V *} |
| . bfd_arch_dlx, {* DLX *} |
| . bfd_arch_m68hc11, {* Motorola 68HC11 *} |
| . bfd_arch_m68hc12, {* Motorola 68HC12 *} |
| .#define bfd_mach_m6812_default 0 |
| .#define bfd_mach_m6812 1 |
| .#define bfd_mach_m6812s 2 |
| . bfd_arch_z8k, {* Zilog Z8000 *} |
| .#define bfd_mach_z8001 1 |
| .#define bfd_mach_z8002 2 |
| . bfd_arch_h8500, {* Hitachi H8/500 *} |
| . bfd_arch_sh, {* Hitachi SH *} |
| .#define bfd_mach_sh 1 |
| .#define bfd_mach_sh2 0x20 |
| .#define bfd_mach_sh_dsp 0x2d |
| .#define bfd_mach_sh3 0x30 |
| .#define bfd_mach_sh3_dsp 0x3d |
| .#define bfd_mach_sh3e 0x3e |
| .#define bfd_mach_sh4 0x40 |
| .#define bfd_mach_sh5 0x50 |
| . bfd_arch_alpha, {* Dec Alpha *} |
| .#define bfd_mach_alpha_ev4 0x10 |
| .#define bfd_mach_alpha_ev5 0x20 |
| .#define bfd_mach_alpha_ev6 0x30 |
| . bfd_arch_arm, {* Advanced Risc Machines ARM. *} |
| .#define bfd_mach_arm_2 1 |
| .#define bfd_mach_arm_2a 2 |
| .#define bfd_mach_arm_3 3 |
| .#define bfd_mach_arm_3M 4 |
| .#define bfd_mach_arm_4 5 |
| .#define bfd_mach_arm_4T 6 |
| .#define bfd_mach_arm_5 7 |
| .#define bfd_mach_arm_5T 8 |
| .#define bfd_mach_arm_5TE 9 |
| .#define bfd_mach_arm_XScale 10 |
| . bfd_arch_ns32k, {* National Semiconductors ns32000 *} |
| . bfd_arch_w65, {* WDC 65816 *} |
| . bfd_arch_tic30, {* Texas Instruments TMS320C30 *} |
| . bfd_arch_tic4x, {* Texas Instruments TMS320C3X/4X *} |
| .#define bfd_mach_c3x 30 |
| .#define bfd_mach_c4x 40 |
| . bfd_arch_tic54x, {* Texas Instruments TMS320C54X *} |
| . bfd_arch_tic80, {* TI TMS320c80 (MVP) *} |
| . bfd_arch_v850, {* NEC V850 *} |
| .#define bfd_mach_v850 1 |
| .#define bfd_mach_v850e 'E' |
| . bfd_arch_arc, {* ARC Cores *} |
| .#define bfd_mach_arc_5 5 |
| .#define bfd_mach_arc_6 6 |
| .#define bfd_mach_arc_7 7 |
| .#define bfd_mach_arc_8 8 |
| . bfd_arch_m32r, {* Mitsubishi M32R/D *} |
| .#define bfd_mach_m32r 1 {* For backwards compatibility. *} |
| .#define bfd_mach_m32rx 'x' |
| . bfd_arch_mn10200, {* Matsushita MN10200 *} |
| . bfd_arch_mn10300, {* Matsushita MN10300 *} |
| .#define bfd_mach_mn10300 300 |
| .#define bfd_mach_am33 330 |
| . bfd_arch_fr30, |
| .#define bfd_mach_fr30 0x46523330 |
| . bfd_arch_frv, |
| .#define bfd_mach_frv 1 |
| .#define bfd_mach_frvsimple 2 |
| .#define bfd_mach_fr300 300 |
| .#define bfd_mach_fr400 400 |
| .#define bfd_mach_frvtomcat 499 {* fr500 prototype *} |
| .#define bfd_mach_fr500 500 |
| . bfd_arch_mcore, |
| . bfd_arch_ia64, {* HP/Intel ia64 *} |
| .#define bfd_mach_ia64_elf64 64 |
| .#define bfd_mach_ia64_elf32 32 |
| . bfd_arch_ip2k, {* Ubicom IP2K microcontrollers. *} |
| .#define bfd_mach_ip2022 1 |
| .#define bfd_mach_ip2022ext 2 |
| . bfd_arch_iq2000, {* Vitesse IQ2000. *} |
| .#define bfd_mach_iq2000 1 |
| .#define bfd_mach_iq10 2 |
| . bfd_arch_pj, |
| . bfd_arch_avr, {* Atmel AVR microcontrollers. *} |
| .#define bfd_mach_avr1 1 |
| .#define bfd_mach_avr2 2 |
| .#define bfd_mach_avr3 3 |
| .#define bfd_mach_avr4 4 |
| .#define bfd_mach_avr5 5 |
| . bfd_arch_cris, {* Axis CRIS *} |
| . bfd_arch_s390, {* IBM s390 *} |
| .#define bfd_mach_s390_31 31 |
| .#define bfd_mach_s390_64 64 |
| . bfd_arch_openrisc, {* OpenRISC *} |
| . bfd_arch_mmix, {* Donald Knuth's educational processor. *} |
| . bfd_arch_xstormy16, |
| .#define bfd_mach_xstormy16 1 |
| . bfd_arch_msp430, {* Texas Instruments MSP430 architecture. *} |
| .#define bfd_mach_msp110 110 |
| .#define bfd_mach_msp11 11 |
| .#define bfd_mach_msp12 12 |
| .#define bfd_mach_msp13 13 |
| .#define bfd_mach_msp14 14 |
| .#define bfd_mach_msp41 41 |
| .#define bfd_mach_msp31 31 |
| .#define bfd_mach_msp32 32 |
| .#define bfd_mach_msp33 33 |
| .#define bfd_mach_msp43 43 |
| .#define bfd_mach_msp44 44 |
| .#define bfd_mach_msp15 15 |
| .#define bfd_mach_msp16 16 |
| . bfd_arch_last |
| . }; |
| */ |
| |
| /* |
| SUBSECTION |
| bfd_arch_info |
| |
| DESCRIPTION |
| This structure contains information on architectures for use |
| within BFD. |
| |
| . |
| .typedef struct bfd_arch_info |
| .{ |
| . int bits_per_word; |
| . int bits_per_address; |
| . int bits_per_byte; |
| . enum bfd_architecture arch; |
| . unsigned long mach; |
| . const char *arch_name; |
| . const char *printable_name; |
| . unsigned int section_align_power; |
| . {* TRUE if this is the default machine for the architecture. |
| . The default arch should be the first entry for an arch so that |
| . all the entries for that arch can be accessed via <<next>>. *} |
| . bfd_boolean the_default; |
| . const struct bfd_arch_info * (*compatible) |
| . PARAMS ((const struct bfd_arch_info *a, |
| . const struct bfd_arch_info *b)); |
| . |
| . bfd_boolean (*scan) PARAMS ((const struct bfd_arch_info *, const char *)); |
| . |
| . const struct bfd_arch_info *next; |
| .} |
| .bfd_arch_info_type; |
| . |
| */ |
| |
| extern const bfd_arch_info_type bfd_a29k_arch; |
| extern const bfd_arch_info_type bfd_alpha_arch; |
| extern const bfd_arch_info_type bfd_arc_arch; |
| extern const bfd_arch_info_type bfd_arm_arch; |
| extern const bfd_arch_info_type bfd_avr_arch; |
| extern const bfd_arch_info_type bfd_cris_arch; |
| extern const bfd_arch_info_type bfd_d10v_arch; |
| extern const bfd_arch_info_type bfd_d30v_arch; |
| extern const bfd_arch_info_type bfd_dlx_arch; |
| extern const bfd_arch_info_type bfd_fr30_arch; |
| extern const bfd_arch_info_type bfd_frv_arch; |
| extern const bfd_arch_info_type bfd_h8300_arch; |
| extern const bfd_arch_info_type bfd_h8500_arch; |
| extern const bfd_arch_info_type bfd_hppa_arch; |
| extern const bfd_arch_info_type bfd_i370_arch; |
| extern const bfd_arch_info_type bfd_i386_arch; |
| extern const bfd_arch_info_type bfd_i860_arch; |
| extern const bfd_arch_info_type bfd_i960_arch; |
| extern const bfd_arch_info_type bfd_ia64_arch; |
| extern const bfd_arch_info_type bfd_ip2k_arch; |
| extern const bfd_arch_info_type bfd_iq2000_arch; |
| extern const bfd_arch_info_type bfd_m32r_arch; |
| extern const bfd_arch_info_type bfd_m68hc11_arch; |
| extern const bfd_arch_info_type bfd_m68hc12_arch; |
| extern const bfd_arch_info_type bfd_m68k_arch; |
| extern const bfd_arch_info_type bfd_m88k_arch; |
| extern const bfd_arch_info_type bfd_mcore_arch; |
| extern const bfd_arch_info_type bfd_mips_arch; |
| extern const bfd_arch_info_type bfd_mmix_arch; |
| extern const bfd_arch_info_type bfd_mn10200_arch; |
| extern const bfd_arch_info_type bfd_mn10300_arch; |
| extern const bfd_arch_info_type bfd_msp430_arch; |
| extern const bfd_arch_info_type bfd_ns32k_arch; |
| extern const bfd_arch_info_type bfd_openrisc_arch; |
| extern const bfd_arch_info_type bfd_or32_arch; |
| extern const bfd_arch_info_type bfd_pdp11_arch; |
| extern const bfd_arch_info_type bfd_pj_arch; |
| extern const bfd_arch_info_type bfd_powerpc_archs[]; |
| #define bfd_powerpc_arch bfd_powerpc_archs[0] |
| extern const bfd_arch_info_type bfd_rs6000_arch; |
| extern const bfd_arch_info_type bfd_s390_arch; |
| extern const bfd_arch_info_type bfd_sh_arch; |
| extern const bfd_arch_info_type bfd_sparc_arch; |
| extern const bfd_arch_info_type bfd_tic30_arch; |
| extern const bfd_arch_info_type bfd_tic4x_arch; |
| extern const bfd_arch_info_type bfd_tic54x_arch; |
| extern const bfd_arch_info_type bfd_tic80_arch; |
| extern const bfd_arch_info_type bfd_v850_arch; |
| extern const bfd_arch_info_type bfd_vax_arch; |
| extern const bfd_arch_info_type bfd_we32k_arch; |
| extern const bfd_arch_info_type bfd_w65_arch; |
| extern const bfd_arch_info_type bfd_xstormy16_arch; |
| extern const bfd_arch_info_type bfd_z8k_arch; |
| |
| static const bfd_arch_info_type * const bfd_archures_list[] = |
| { |
| #ifdef SELECT_ARCHITECTURES |
| SELECT_ARCHITECTURES, |
| #else |
| &bfd_a29k_arch, |
| &bfd_alpha_arch, |
| &bfd_arc_arch, |
| &bfd_arm_arch, |
| &bfd_avr_arch, |
| &bfd_cris_arch, |
| &bfd_d10v_arch, |
| &bfd_d30v_arch, |
| &bfd_dlx_arch, |
| &bfd_fr30_arch, |
| &bfd_frv_arch, |
| &bfd_h8300_arch, |
| &bfd_h8500_arch, |
| &bfd_hppa_arch, |
| &bfd_i370_arch, |
| &bfd_i386_arch, |
| &bfd_i860_arch, |
| &bfd_i960_arch, |
| &bfd_ia64_arch, |
| &bfd_ip2k_arch, |
| &bfd_iq2000_arch, |
| &bfd_m32r_arch, |
| &bfd_m68hc11_arch, |
| &bfd_m68hc12_arch, |
| &bfd_m68k_arch, |
| &bfd_m88k_arch, |
| &bfd_mcore_arch, |
| &bfd_mips_arch, |
| &bfd_mmix_arch, |
| &bfd_mn10200_arch, |
| &bfd_mn10300_arch, |
| &bfd_msp430_arch, |
| &bfd_ns32k_arch, |
| &bfd_openrisc_arch, |
| &bfd_or32_arch, |
| &bfd_pdp11_arch, |
| &bfd_powerpc_arch, |
| &bfd_rs6000_arch, |
| &bfd_s390_arch, |
| &bfd_sh_arch, |
| &bfd_sparc_arch, |
| &bfd_tic30_arch, |
| &bfd_tic4x_arch, |
| &bfd_tic54x_arch, |
| &bfd_tic80_arch, |
| &bfd_v850_arch, |
| &bfd_vax_arch, |
| &bfd_w65_arch, |
| &bfd_we32k_arch, |
| &bfd_xstormy16_arch, |
| &bfd_z8k_arch, |
| #endif |
| 0 |
| }; |
| |
| /* |
| FUNCTION |
| bfd_printable_name |
| |
| SYNOPSIS |
| const char *bfd_printable_name(bfd *abfd); |
| |
| DESCRIPTION |
| Return a printable string representing the architecture and machine |
| from the pointer to the architecture info structure. |
| |
| */ |
| |
| const char * |
| bfd_printable_name (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info->printable_name; |
| } |
| |
| /* |
| FUNCTION |
| bfd_scan_arch |
| |
| SYNOPSIS |
| const bfd_arch_info_type *bfd_scan_arch(const char *string); |
| |
| DESCRIPTION |
| Figure out if BFD supports any cpu which could be described with |
| the name @var{string}. Return a pointer to an <<arch_info>> |
| structure if a machine is found, otherwise NULL. |
| */ |
| |
| const bfd_arch_info_type * |
| bfd_scan_arch (string) |
| const char *string; |
| { |
| const bfd_arch_info_type * const *app, *ap; |
| |
| /* Look through all the installed architectures. */ |
| for (app = bfd_archures_list; *app != NULL; app++) |
| { |
| for (ap = *app; ap != NULL; ap = ap->next) |
| { |
| if (ap->scan (ap, string)) |
| return ap; |
| } |
| } |
| |
| return NULL; |
| } |
| |
| /* |
| FUNCTION |
| bfd_arch_list |
| |
| SYNOPSIS |
| const char **bfd_arch_list(void); |
| |
| DESCRIPTION |
| Return a freshly malloced NULL-terminated vector of the names |
| of all the valid BFD architectures. Do not modify the names. |
| */ |
| |
| const char ** |
| bfd_arch_list () |
| { |
| int vec_length = 0; |
| const char **name_ptr; |
| const char **name_list; |
| const bfd_arch_info_type * const *app; |
| bfd_size_type amt; |
| |
| /* Determine the number of architectures. */ |
| vec_length = 0; |
| for (app = bfd_archures_list; *app != NULL; app++) |
| { |
| const bfd_arch_info_type *ap; |
| for (ap = *app; ap != NULL; ap = ap->next) |
| { |
| vec_length++; |
| } |
| } |
| |
| amt = (vec_length + 1) * sizeof (char **); |
| name_list = (const char **) bfd_malloc (amt); |
| if (name_list == NULL) |
| return NULL; |
| |
| /* Point the list at each of the names. */ |
| name_ptr = name_list; |
| for (app = bfd_archures_list; *app != NULL; app++) |
| { |
| const bfd_arch_info_type *ap; |
| for (ap = *app; ap != NULL; ap = ap->next) |
| { |
| *name_ptr = ap->printable_name; |
| name_ptr++; |
| } |
| } |
| *name_ptr = NULL; |
| |
| return name_list; |
| } |
| |
| /* |
| FUNCTION |
| bfd_arch_get_compatible |
| |
| SYNOPSIS |
| const bfd_arch_info_type *bfd_arch_get_compatible( |
| const bfd *abfd, |
| const bfd *bbfd, |
| bfd_boolean accept_unknowns); |
| |
| DESCRIPTION |
| Determine whether two BFDs' architectures and machine types |
| are compatible. Calculates the lowest common denominator |
| between the two architectures and machine types implied by |
| the BFDs and returns a pointer to an <<arch_info>> structure |
| describing the compatible machine. |
| */ |
| |
| const bfd_arch_info_type * |
| bfd_arch_get_compatible (abfd, bbfd, accept_unknowns) |
| const bfd *abfd; |
| const bfd *bbfd; |
| bfd_boolean accept_unknowns; |
| { |
| const bfd * ubfd = NULL; |
| |
| /* Look for an unknown architecture. */ |
| if (((ubfd = abfd) && ubfd->arch_info->arch == bfd_arch_unknown) |
| || ((ubfd = bbfd) && ubfd->arch_info->arch == bfd_arch_unknown)) |
| { |
| /* We can allow an unknown architecture if accept_unknowns |
| is true, or if the target is the "binary" format, which |
| has an unknown architecture. Since the binary format can |
| only be set by explicit request from the user, it is safe |
| to assume that they know what they are doing. */ |
| if (accept_unknowns |
| || strcmp (bfd_get_target (ubfd), "binary") == 0) |
| return ubfd->arch_info; |
| return NULL; |
| } |
| |
| /* Otherwise architecture-specific code has to decide. */ |
| return abfd->arch_info->compatible (abfd->arch_info, bbfd->arch_info); |
| } |
| |
| /* |
| INTERNAL_DEFINITION |
| bfd_default_arch_struct |
| |
| DESCRIPTION |
| The <<bfd_default_arch_struct>> is an item of |
| <<bfd_arch_info_type>> which has been initialized to a fairly |
| generic state. A BFD starts life by pointing to this |
| structure, until the correct back end has determined the real |
| architecture of the file. |
| |
| .extern const bfd_arch_info_type bfd_default_arch_struct; |
| */ |
| |
| const bfd_arch_info_type bfd_default_arch_struct = { |
| 32, 32, 8, bfd_arch_unknown, 0, "unknown", "unknown", 2, TRUE, |
| bfd_default_compatible, |
| bfd_default_scan, |
| 0, |
| }; |
| |
| /* |
| FUNCTION |
| bfd_set_arch_info |
| |
| SYNOPSIS |
| void bfd_set_arch_info(bfd *abfd, const bfd_arch_info_type *arg); |
| |
| DESCRIPTION |
| Set the architecture info of @var{abfd} to @var{arg}. |
| */ |
| |
| void |
| bfd_set_arch_info (abfd, arg) |
| bfd *abfd; |
| const bfd_arch_info_type *arg; |
| { |
| abfd->arch_info = arg; |
| } |
| |
| /* |
| INTERNAL_FUNCTION |
| bfd_default_set_arch_mach |
| |
| SYNOPSIS |
| bfd_boolean bfd_default_set_arch_mach(bfd *abfd, |
| enum bfd_architecture arch, |
| unsigned long mach); |
| |
| DESCRIPTION |
| Set the architecture and machine type in BFD @var{abfd} |
| to @var{arch} and @var{mach}. Find the correct |
| pointer to a structure and insert it into the <<arch_info>> |
| pointer. |
| */ |
| |
| bfd_boolean |
| bfd_default_set_arch_mach (abfd, arch, mach) |
| bfd *abfd; |
| enum bfd_architecture arch; |
| unsigned long mach; |
| { |
| abfd->arch_info = bfd_lookup_arch (arch, mach); |
| if (abfd->arch_info != NULL) |
| return TRUE; |
| |
| abfd->arch_info = &bfd_default_arch_struct; |
| bfd_set_error (bfd_error_bad_value); |
| return FALSE; |
| } |
| |
| /* |
| FUNCTION |
| bfd_get_arch |
| |
| SYNOPSIS |
| enum bfd_architecture bfd_get_arch(bfd *abfd); |
| |
| DESCRIPTION |
| Return the enumerated type which describes the BFD @var{abfd}'s |
| architecture. |
| */ |
| |
| enum bfd_architecture |
| bfd_get_arch (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info->arch; |
| } |
| |
| /* |
| FUNCTION |
| bfd_get_mach |
| |
| SYNOPSIS |
| unsigned long bfd_get_mach(bfd *abfd); |
| |
| DESCRIPTION |
| Return the long type which describes the BFD @var{abfd}'s |
| machine. |
| */ |
| |
| unsigned long |
| bfd_get_mach (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info->mach; |
| } |
| |
| /* |
| FUNCTION |
| bfd_arch_bits_per_byte |
| |
| SYNOPSIS |
| unsigned int bfd_arch_bits_per_byte(bfd *abfd); |
| |
| DESCRIPTION |
| Return the number of bits in one of the BFD @var{abfd}'s |
| architecture's bytes. |
| */ |
| |
| unsigned int |
| bfd_arch_bits_per_byte (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info->bits_per_byte; |
| } |
| |
| /* |
| FUNCTION |
| bfd_arch_bits_per_address |
| |
| SYNOPSIS |
| unsigned int bfd_arch_bits_per_address(bfd *abfd); |
| |
| DESCRIPTION |
| Return the number of bits in one of the BFD @var{abfd}'s |
| architecture's addresses. |
| */ |
| |
| unsigned int |
| bfd_arch_bits_per_address (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info->bits_per_address; |
| } |
| |
| /* |
| INTERNAL_FUNCTION |
| bfd_default_compatible |
| |
| SYNOPSIS |
| const bfd_arch_info_type *bfd_default_compatible |
| (const bfd_arch_info_type *a, |
| const bfd_arch_info_type *b); |
| |
| DESCRIPTION |
| The default function for testing for compatibility. |
| */ |
| |
| const bfd_arch_info_type * |
| bfd_default_compatible (a, b) |
| const bfd_arch_info_type *a; |
| const bfd_arch_info_type *b; |
| { |
| if (a->arch != b->arch) |
| return NULL; |
| |
| if (a->bits_per_word != b->bits_per_word) |
| return NULL; |
| |
| if (a->mach > b->mach) |
| return a; |
| |
| if (b->mach > a->mach) |
| return b; |
| |
| return a; |
| } |
| |
| /* |
| INTERNAL_FUNCTION |
| bfd_default_scan |
| |
| SYNOPSIS |
| bfd_boolean bfd_default_scan(const struct bfd_arch_info *info, const char *string); |
| |
| DESCRIPTION |
| The default function for working out whether this is an |
| architecture hit and a machine hit. |
| */ |
| |
| bfd_boolean |
| bfd_default_scan (info, string) |
| const bfd_arch_info_type *info; |
| const char *string; |
| { |
| const char *ptr_src; |
| const char *ptr_tst; |
| unsigned long number; |
| enum bfd_architecture arch; |
| const char *printable_name_colon; |
| |
| /* Exact match of the architecture name (ARCH_NAME) and also the |
| default architecture? */ |
| if (strcasecmp (string, info->arch_name) == 0 |
| && info->the_default) |
| return TRUE; |
| |
| /* Exact match of the machine name (PRINTABLE_NAME)? */ |
| if (strcasecmp (string, info->printable_name) == 0) |
| return TRUE; |
| |
| /* Given that printable_name contains no colon, attempt to match: |
| ARCH_NAME [ ":" ] PRINTABLE_NAME? */ |
| printable_name_colon = strchr (info->printable_name, ':'); |
| if (printable_name_colon == NULL) |
| { |
| size_t strlen_arch_name = strlen (info->arch_name); |
| if (strncasecmp (string, info->arch_name, strlen_arch_name) == 0) |
| { |
| if (string[strlen_arch_name] == ':') |
| { |
| if (strcasecmp (string + strlen_arch_name + 1, |
| info->printable_name) == 0) |
| return TRUE; |
| } |
| else |
| { |
| if (strcasecmp (string + strlen_arch_name, |
| info->printable_name) == 0) |
| return TRUE; |
| } |
| } |
| } |
| |
| /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; |
| Attempt to match: <arch> <mach>? */ |
| if (printable_name_colon != NULL) |
| { |
| size_t colon_index = printable_name_colon - info->printable_name; |
| if (strncasecmp (string, info->printable_name, colon_index) == 0 |
| && strcasecmp (string + colon_index, |
| info->printable_name + colon_index + 1) == 0) |
| return TRUE; |
| } |
| |
| /* Given that PRINTABLE_NAME has the form: <arch> ":" <mach>; Do not |
| attempt to match just <mach>, it could be ambigious. This test |
| is left until later. */ |
| |
| /* NOTE: The below is retained for compatibility only. Please do |
| not add to this code. */ |
| |
| /* See how much of the supplied string matches with the |
| architecture, eg the string m68k:68020 would match the 68k entry |
| up to the :, then we get left with the machine number. */ |
| |
| for (ptr_src = string, ptr_tst = info->arch_name; |
| *ptr_src && *ptr_tst; |
| ptr_src++, ptr_tst++) |
| { |
| if (*ptr_src != *ptr_tst) |
| break; |
| } |
| |
| /* Chewed up as much of the architecture as will match, skip any |
| colons. */ |
| if (*ptr_src == ':') |
| ptr_src++; |
| |
| if (*ptr_src == 0) |
| { |
| /* Nothing more, then only keep this one if it is the default |
| machine for this architecture. */ |
| return info->the_default; |
| } |
| |
| number = 0; |
| while (ISDIGIT (*ptr_src)) |
| { |
| number = number * 10 + *ptr_src - '0'; |
| ptr_src++; |
| } |
| |
| /* NOTE: The below is retained for compatibility only. |
| PLEASE DO NOT ADD TO THIS CODE. */ |
| |
| switch (number) |
| { |
| /* FIXME: These are needed to parse IEEE objects. */ |
| /* The following seven case's are here only for compatibility with |
| older binutils (at least IEEE objects from binutils 2.9.1 require |
| them). */ |
| case bfd_mach_m68000: |
| case bfd_mach_m68010: |
| case bfd_mach_m68020: |
| case bfd_mach_m68030: |
| case bfd_mach_m68040: |
| case bfd_mach_m68060: |
| case bfd_mach_cpu32: |
| arch = bfd_arch_m68k; |
| break; |
| case 68000: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68000; |
| break; |
| case 68010: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68010; |
| break; |
| case 68020: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68020; |
| break; |
| case 68030: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68030; |
| break; |
| case 68040: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68040; |
| break; |
| case 68060: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_m68060; |
| break; |
| case 68332: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_cpu32; |
| break; |
| case 5200: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_mcf5200; |
| break; |
| case 5206: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_mcf5206e; |
| break; |
| case 5307: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_mcf5307; |
| break; |
| case 5407: |
| arch = bfd_arch_m68k; |
| number = bfd_mach_mcf5407; |
| break; |
| |
| case 32000: |
| arch = bfd_arch_we32k; |
| break; |
| |
| case 3000: |
| arch = bfd_arch_mips; |
| number = bfd_mach_mips3000; |
| break; |
| |
| case 4000: |
| arch = bfd_arch_mips; |
| number = bfd_mach_mips4000; |
| break; |
| |
| case 6000: |
| arch = bfd_arch_rs6000; |
| break; |
| |
| case 7410: |
| arch = bfd_arch_sh; |
| number = bfd_mach_sh_dsp; |
| break; |
| |
| case 7708: |
| arch = bfd_arch_sh; |
| number = bfd_mach_sh3; |
| break; |
| |
| case 7729: |
| arch = bfd_arch_sh; |
| number = bfd_mach_sh3_dsp; |
| break; |
| |
| case 7750: |
| arch = bfd_arch_sh; |
| number = bfd_mach_sh4; |
| break; |
| |
| default: |
| return FALSE; |
| } |
| |
| if (arch != info->arch) |
| return FALSE; |
| |
| if (number != info->mach) |
| return FALSE; |
| |
| return TRUE; |
| } |
| |
| /* |
| FUNCTION |
| bfd_get_arch_info |
| |
| SYNOPSIS |
| const bfd_arch_info_type * bfd_get_arch_info(bfd *abfd); |
| |
| DESCRIPTION |
| Return the architecture info struct in @var{abfd}. |
| */ |
| |
| const bfd_arch_info_type * |
| bfd_get_arch_info (abfd) |
| bfd *abfd; |
| { |
| return abfd->arch_info; |
| } |
| |
| /* |
| FUNCTION |
| bfd_lookup_arch |
| |
| SYNOPSIS |
| const bfd_arch_info_type *bfd_lookup_arch |
| (enum bfd_architecture |
| arch, |
| unsigned long machine); |
| |
| DESCRIPTION |
| Look for the architecure info structure which matches the |
| arguments @var{arch} and @var{machine}. A machine of 0 matches the |
| machine/architecture structure which marks itself as the |
| default. |
| */ |
| |
| const bfd_arch_info_type * |
| bfd_lookup_arch (arch, machine) |
| enum bfd_architecture arch; |
| unsigned long machine; |
| { |
| const bfd_arch_info_type * const *app, *ap; |
| |
| for (app = bfd_archures_list; *app != NULL; app++) |
| { |
| for (ap = *app; ap != NULL; ap = ap->next) |
| { |
| if (ap->arch == arch |
| && (ap->mach == machine |
| || (machine == 0 && ap->the_default))) |
| return ap; |
| } |
| } |
| |
| return NULL; |
| } |
| |
| /* |
| FUNCTION |
| bfd_printable_arch_mach |
| |
| SYNOPSIS |
| const char *bfd_printable_arch_mach |
| (enum bfd_architecture arch, unsigned long machine); |
| |
| DESCRIPTION |
| Return a printable string representing the architecture and |
| machine type. |
| |
| This routine is depreciated. |
| */ |
| |
| const char * |
| bfd_printable_arch_mach (arch, machine) |
| enum bfd_architecture arch; |
| unsigned long machine; |
| { |
| const bfd_arch_info_type *ap = bfd_lookup_arch (arch, machine); |
| |
| if (ap) |
| return ap->printable_name; |
| return "UNKNOWN!"; |
| } |
| |
| /* |
| FUNCTION |
| bfd_octets_per_byte |
| |
| SYNOPSIS |
| unsigned int bfd_octets_per_byte(bfd *abfd); |
| |
| DESCRIPTION |
| Return the number of octets (8-bit quantities) per target byte |
| (minimum addressable unit). In most cases, this will be one, but some |
| DSP targets have 16, 32, or even 48 bits per byte. |
| */ |
| |
| unsigned int |
| bfd_octets_per_byte (abfd) |
| bfd *abfd; |
| { |
| return bfd_arch_mach_octets_per_byte (bfd_get_arch (abfd), |
| bfd_get_mach (abfd)); |
| } |
| |
| /* |
| FUNCTION |
| bfd_arch_mach_octets_per_byte |
| |
| SYNOPSIS |
| unsigned int bfd_arch_mach_octets_per_byte(enum bfd_architecture arch, |
| unsigned long machine); |
| |
| DESCRIPTION |
| See bfd_octets_per_byte. |
| |
| This routine is provided for those cases where a bfd * is not |
| available |
| */ |
| |
| unsigned int |
| bfd_arch_mach_octets_per_byte (arch, mach) |
| enum bfd_architecture arch; |
| unsigned long mach; |
| { |
| const bfd_arch_info_type *ap = bfd_lookup_arch (arch, mach); |
| |
| if (ap) |
| return ap->bits_per_byte / 8; |
| return 1; |
| } |