Tue Jun 16 13:06:21 1998 Alan Modra <alan@spri.levels.unisa.edu.au>
[binutils-gdb.git] / bfd / targets.c
index dca32f2cf384aaa3cdb51f9ff6079b0dd1de8b07..65a2165887d7adbee5c44e27a39abca23724536b 100644 (file)
@@ -1,5 +1,5 @@
 /* Generic target-file-type support for the BFD library.
-   Copyright 1990, 91, 92, 93, 94, 1995 Free Software Foundation, Inc.
+   Copyright 1990, 91, 92, 93, 94, 95, 96, 1997 Free Software Foundation, Inc.
    Written by Cygnus Support.
 
 This file is part of BFD, the Binary File Descriptor library.
@@ -21,6 +21,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include "bfd.h"
 #include "sysdep.h"
 #include "libbfd.h"
+#include "fnmatch.h"
 
 /*
 SECTION 
@@ -145,12 +146,16 @@ DESCRIPTION
 .  bfd_target_oasys_flavour,
 .  bfd_target_tekhex_flavour,
 .  bfd_target_srec_flavour,
+.  bfd_target_ihex_flavour,
 .  bfd_target_som_flavour,
 .  bfd_target_os9k_flavour,
 .  bfd_target_versados_flavour,
-.  bfd_target_msdos_flavour
+.  bfd_target_msdos_flavour,
+.  bfd_target_evax_flavour
 .};
 .
+.enum bfd_endian { BFD_ENDIAN_BIG, BFD_ENDIAN_LITTLE, BFD_ENDIAN_UNKNOWN };
+.
 .{* Forward declaration.  *}
 .typedef struct bfd_link_info _bfd_link_info;
 .
@@ -168,14 +173,14 @@ of a file.
 
 The order of bytes within the data area of a file.
 
-.  boolean byteorder_big_p;
+.  enum bfd_endian byteorder;
 
 The order of bytes within the header parts of a file.
 
-.  boolean header_byteorder_big_p;
+.  enum bfd_endian header_byteorder;
 
 A mask of all the flags which an executable may have set -
-from the set <<NO_FLAGS>>, <<HAS_RELOC>>, ...<<D_PAGED>>.
+from the set <<BFD_NO_FLAGS>>, <<HAS_RELOC>>, ...<<D_PAGED>>.
 
 .  flagword object_flags;       
 
@@ -308,6 +313,7 @@ The general target vector.
 .CAT(NAME,_write_armap),\
 .CAT(NAME,_read_ar_hdr),\
 .CAT(NAME,_openr_next_archived_file),\
+.CAT(NAME,_get_elt_at_index),\
 .CAT(NAME,_generic_stat_arch_elt),\
 .CAT(NAME,_update_armap_timestamp)
 .  boolean  (*_bfd_slurp_armap) PARAMS ((bfd *));
@@ -322,6 +328,8 @@ The general target vector.
 .                              int stridx));
 .  PTR (*_bfd_read_ar_hdr_fn) PARAMS ((bfd *));
 .  bfd *    (*openr_next_archived_file) PARAMS ((bfd *arch, bfd *prev));
+.#define bfd_get_elt_at_index(b,i) BFD_SEND(b, _bfd_get_elt_at_index, (b,i))
+.  bfd *    (*_bfd_get_elt_at_index) PARAMS ((bfd *, symindex));
 .  int      (*_bfd_stat_arch_elt) PARAMS ((bfd *, struct stat *));
 .  boolean  (*_bfd_update_armap_timestamp) PARAMS ((bfd *));
 .
@@ -332,7 +340,7 @@ The general target vector.
 .CAT(NAME,_make_empty_symbol),\
 .CAT(NAME,_print_symbol),\
 .CAT(NAME,_get_symbol_info),\
-.CAT(NAME,_bfd_is_local_label),\
+.CAT(NAME,_bfd_is_local_label_name),\
 .CAT(NAME,_get_lineno),\
 .CAT(NAME,_find_nearest_line),\
 .CAT(NAME,_bfd_make_debug_symbol),\
@@ -351,7 +359,7 @@ The general target vector.
 .                                      struct symbol_cache_entry *,
 .                                      symbol_info *));
 .#define bfd_get_symbol_info(b,p,e) BFD_SEND(b, _bfd_get_symbol_info, (b,p,e))
-.  boolean      (*_bfd_is_local_label) PARAMS ((bfd *, asymbol *));
+.  boolean      (*_bfd_is_local_label_name) PARAMS ((bfd *, const char *));
 .
 .  alent *    (*_get_lineno) PARAMS ((bfd *, struct symbol_cache_entry *));
 .  boolean    (*_bfd_find_nearest_line) PARAMS ((bfd *abfd,
@@ -474,29 +482,42 @@ extern const bfd_target armpei_little_vec;
 extern const bfd_target armpei_big_vec;
 extern const bfd_target b_out_vec_big_host;
 extern const bfd_target b_out_vec_little_host;
-/* start-sanitize-arc */
+extern const bfd_target bfd_elf64_alpha_vec;
 extern const bfd_target bfd_elf32_bigarc_vec;
 extern const bfd_target bfd_elf32_littlearc_vec;
-/* end-sanitize-arc */
 extern const bfd_target bfd_elf32_big_generic_vec;
 extern const bfd_target bfd_elf32_bigmips_vec;
+extern const bfd_target bfd_elf64_bigmips_vec;
+extern const bfd_target bfd_elf32_d10v_vec;
+/* start-sanitize-d30v */
+extern const bfd_target bfd_elf32_d30v_vec;
+/* end-sanitize-d30v */
 extern const bfd_target bfd_elf32_hppa_vec;
 extern const bfd_target bfd_elf32_i386_vec;
 extern const bfd_target bfd_elf32_i860_vec;
 extern const bfd_target bfd_elf32_little_generic_vec;
 extern const bfd_target bfd_elf32_littlemips_vec;
+extern const bfd_target bfd_elf64_littlemips_vec;
+extern const bfd_target bfd_elf32_m32r_vec;
 extern const bfd_target bfd_elf32_m68k_vec;
 extern const bfd_target bfd_elf32_m88k_vec;
+extern const bfd_target bfd_elf32_mn10200_vec;
+extern const bfd_target bfd_elf32_mn10300_vec;
 extern const bfd_target bfd_elf32_powerpc_vec;
 extern const bfd_target bfd_elf32_powerpcle_vec;
+extern const bfd_target bfd_elf32_sh_vec;
+extern const bfd_target bfd_elf32_shl_vec;
 extern const bfd_target bfd_elf32_sparc_vec;
+extern const bfd_target bfd_elf32_v850_vec;
 extern const bfd_target bfd_elf64_big_generic_vec;
 extern const bfd_target bfd_elf64_little_generic_vec;
 extern const bfd_target bfd_elf64_sparc_vec;
 extern const bfd_target demo_64_vec;
 extern const bfd_target ecoff_big_vec;
 extern const bfd_target ecoff_little_vec;
+extern const bfd_target ecoff_biglittle_vec;
 extern const bfd_target ecoffalpha_little_vec;
+extern const bfd_target evax_alpha_vec;
 extern const bfd_target h8300coff_vec;
 extern const bfd_target h8500coff_vec;
 extern const bfd_target host_aout_vec;
@@ -506,6 +527,7 @@ extern const bfd_target som_vec;
 extern const bfd_target i386aout_vec;
 extern const bfd_target i386bsd_vec;
 extern const bfd_target i386dynix_vec;
+extern const bfd_target i386freebsd_vec;
 extern const bfd_target i386os9k_vec;
 extern const bfd_target i386coff_vec;
 extern const bfd_target bfd_powerpc_pe_vec;
@@ -515,6 +537,7 @@ extern const bfd_target bfd_powerpcle_pei_vec;
 extern const bfd_target i386pe_vec;
 extern const bfd_target i386pei_vec;
 extern const bfd_target go32coff_vec;
+extern const bfd_target go32stubbedcoff_vec;
 extern const bfd_target i386linux_vec;
 extern const bfd_target i386lynx_aout_vec;
 extern const bfd_target i386lynx_coff_vec;
@@ -525,11 +548,14 @@ extern const bfd_target i860coff_vec;
 extern const bfd_target icoff_big_vec;
 extern const bfd_target icoff_little_vec;
 extern const bfd_target ieee_vec;
+extern const bfd_target m68kaux_coff_vec;
 extern const bfd_target m68kcoff_vec;
 extern const bfd_target m68kcoffun_vec;
+extern const bfd_target m68klinux_vec;
 extern const bfd_target m68klynx_aout_vec;
 extern const bfd_target m68klynx_coff_vec;
 extern const bfd_target m68knetbsd_vec;
+extern const bfd_target m68ksysvcoff_vec;
 extern const bfd_target m68k4knetbsd_vec;
 extern const bfd_target m88kbcs_vec;
 extern const bfd_target m88kmach3_vec;
@@ -541,20 +567,27 @@ extern const bfd_target nlm32_powerpc_vec;
 extern const bfd_target pc532netbsd_vec;
 extern const bfd_target oasys_vec;
 extern const bfd_target pc532machaout_vec;
+extern const bfd_target ppcboot_vec;
 extern const bfd_target riscix_vec;
 extern const bfd_target pmac_xcoff_vec;
 extern const bfd_target rs6000coff_vec;
 extern const bfd_target shcoff_vec;
-/* start-sanitize-rce */
-extern bfd_target rce_aout_vec;
-/* end-sanitize-rce */
 extern const bfd_target shlcoff_vec;
+extern const bfd_target shcoff_small_vec;
+extern const bfd_target shlcoff_small_vec;
+extern const bfd_target sparcle_aout_vec;
+extern const bfd_target sparclinux_vec;
 extern const bfd_target sparclynx_aout_vec;
 extern const bfd_target sparclynx_coff_vec;
 extern const bfd_target sparcnetbsd_vec;
 extern const bfd_target sparccoff_vec;
 extern const bfd_target sunos_big_vec;
 extern const bfd_target tekhex_vec;
+extern const bfd_target tic30_aout_vec;
+extern const bfd_target tic30_coff_vec;
+/* start-sanitize-tic80 */
+extern const bfd_target tic80coff_vec;
+/* end-sanitize-tic80 */
 extern const bfd_target versados_vec;
 extern const bfd_target we32kcoff_vec;
 extern const bfd_target w65_vec;
@@ -567,12 +600,16 @@ extern const bfd_target symbolsrec_vec;
 /* binary is always included.  */
 extern const bfd_target binary_vec;
 
+/* ihex is always included.  */
+extern const bfd_target ihex_vec;
+
 /* All of the xvecs for core files.  */
 extern const bfd_target aix386_core_vec;
 extern const bfd_target cisco_core_vec;
 extern const bfd_target hpux_core_vec;
 extern const bfd_target hppabsd_core_vec;
 extern const bfd_target irix_core_vec;
+extern const bfd_target netbsd_core_vec;
 extern const bfd_target osf_core_vec;
 extern const bfd_target sco_core_vec;
 extern const bfd_target trad_core_vec;
@@ -609,22 +646,35 @@ const bfd_target * const bfd_target_vector[] = {
           --enable-targets=all, objdump or gdb should be able to examine
           the file even if we don't recognize the machine type.  */
        &bfd_elf32_big_generic_vec,
-/* start-sanitize-arc */
+#ifdef BFD64
+       &bfd_elf64_alpha_vec,
+#endif
        &bfd_elf32_bigarc_vec,
-/* end-sanitize-arc */
        &bfd_elf32_bigmips_vec,
+#ifdef BFD64
+       &bfd_elf64_bigmips_vec,
+#endif
+       &bfd_elf32_d10v_vec,
+/* start-sanitize-d30v */
+       &bfd_elf32_d30v_vec,
+/* end-sanitize-d30v */
        &bfd_elf32_hppa_vec,
        &bfd_elf32_i386_vec,
        &bfd_elf32_i860_vec,
        &bfd_elf32_little_generic_vec,
-/* start-sanitize-arc */
        &bfd_elf32_littlearc_vec,
-/* end-sanitize-arc */
        &bfd_elf32_littlemips_vec,
+#ifdef BFD64
+       &bfd_elf64_littlemips_vec,
+#endif
+       &bfd_elf32_m32r_vec,
+       &bfd_elf32_mn10200_vec,
+       &bfd_elf32_mn10300_vec,
        &bfd_elf32_m68k_vec,
        &bfd_elf32_m88k_vec,
        &bfd_elf32_sparc_vec,
        &bfd_elf32_powerpc_vec,
+       &bfd_elf32_v850_vec,
 #ifdef BFD64                   /* No one seems to use this.  */
        &bfd_elf64_big_generic_vec,
        &bfd_elf64_little_generic_vec,
@@ -640,8 +690,10 @@ const bfd_target * const bfd_target_vector[] = {
 #endif
        &ecoff_big_vec,
        &ecoff_little_vec,
-#if 0
+       &ecoff_biglittle_vec,
+#ifdef BFD64
        &ecoffalpha_little_vec,
+       &evax_alpha_vec,
 #endif
        &h8300coff_vec,
        &h8500coff_vec,
@@ -660,12 +712,14 @@ const bfd_target * const bfd_target_vector[] = {
        &i386aout_vec,
        &i386bsd_vec,
        &i386coff_vec,
+       &i386freebsd_vec,
        &i860coff_vec,
        &bfd_powerpc_pe_vec,
        &bfd_powerpcle_pe_vec,
        &bfd_powerpc_pei_vec,
        &bfd_powerpcle_pei_vec,
        &go32coff_vec,
+       &go32stubbedcoff_vec,
 #if 0
        /* Since a.out files lack decent magic numbers, no way to recognize
           which kind of a.out file it is.  */
@@ -693,9 +747,15 @@ const bfd_target * const bfd_target_vector[] = {
        &ieee_vec,
        &m68kcoff_vec,
        &m68kcoffun_vec,
+#if 0
+       /* Since a.out files lack decent magic numbers, no way to recognize
+          which kind of a.out file it is.  */
+       &m68klinux_vec,
+#endif
        &m68klynx_aout_vec,
        &m68klynx_coff_vec,
        &m68knetbsd_vec,
+       &m68ksysvcoff_vec,
        &m88kbcs_vec,
        &m88kmach3_vec,
        &newsos3_vec,
@@ -725,17 +785,24 @@ const bfd_target * const bfd_target_vector[] = {
        &pmac_xcoff_vec,
 #endif
        &rs6000coff_vec,
+       &ppcboot_vec,
        &shcoff_vec,
        &shlcoff_vec,
-/* start-sanitize-rce */
-       &rce_aout_vec,
-/* end-sanitize-rce */
+       &shcoff_small_vec,
+       &shlcoff_small_vec,
+       &sparcle_aout_vec,
+       &sparclinux_vec,
        &sparclynx_aout_vec,
        &sparclynx_coff_vec,
        &sparcnetbsd_vec,
        &sunos_big_vec,
        &aout0_big_vec,
        &tekhex_vec,
+       &tic30_aout_vec,
+       &tic30_coff_vec,
+/* start-sanitize-tic80 */
+       &tic80coff_vec,
+/* end-sanitize-tic80 */
        &we32kcoff_vec,
        &versados_vec,
        &z8kcoff_vec,
@@ -749,6 +816,8 @@ const bfd_target * const bfd_target_vector[] = {
        &tekhex_vec,
 /* Likewise for binary output.  */
        &binary_vec,
+/* Likewise for ihex.  */
+       &ihex_vec,
 
 /* Add any required traditional-core-file-handler.  */
 
@@ -781,7 +850,7 @@ const bfd_target * const bfd_target_vector[] = {
 /* bfd_default_vector[0] contains either the address of the default vector,
    if there is one, or zero if there isn't.  */
 
-const bfd_target * const bfd_default_vector[] = {
+const bfd_target *bfd_default_vector[] = {
 #ifdef DEFAULT_VECTOR
        &DEFAULT_VECTOR,
 #endif
@@ -792,6 +861,88 @@ const bfd_target * const bfd_default_vector[] = {
    names of the matching targets in an array.  This variable is the maximum
    number of entries that the array could possibly need.  */
 const size_t _bfd_target_vector_entries = sizeof(bfd_target_vector)/sizeof(*bfd_target_vector);
+\f
+/* This array maps configuration triplets onto BFD vectors.  */
+
+struct targmatch
+{
+  /* The configuration triplet.  */
+  const char *triplet;
+  /* The BFD vector.  If this is NULL, then the vector is found by
+     searching forward for the next structure with a non NULL vector
+     field.  */
+  const bfd_target *vector;
+};
+
+/* targmatch.h is built by Makefile out of config.bfd.  */
+static const struct targmatch bfd_target_match[] = {
+#include "targmatch.h"
+  { NULL, NULL }
+};
+
+static const bfd_target *find_target PARAMS ((const char *));
+
+/* Find a target vector, given a name or configuration triplet.  */
+
+static const bfd_target *
+find_target (name)
+     const char *name;
+{
+  const bfd_target * const *target;
+  const struct targmatch *match;
+
+  for (target = &bfd_target_vector[0]; *target != NULL; target++)
+    if (strcmp (name, (*target)->name) == 0)
+      return *target;
+
+  /* If we couldn't match on the exact name, try matching on the
+     configuration triplet.  FIXME: We should run the triplet through
+     config.sub first, but that is hard.  */
+  for (match = &bfd_target_match[0]; match->triplet != NULL; match++)
+    {
+      if (fnmatch (match->triplet, name, 0) == 0)
+       {
+         while (match->vector == NULL)
+           ++match;
+         return match->vector;
+         break;
+       }
+    }
+
+  bfd_set_error (bfd_error_invalid_target);
+  return NULL;
+}
+
+/*
+FUNCTION
+       bfd_set_default_target
+
+SYNOPSIS
+       boolean bfd_set_default_target (const char *name);
+
+DESCRIPTION
+       Set the default target vector to use when recognizing a BFD.
+       This takes the name of the target, which may be a BFD target
+       name or a configuration triplet.
+*/
+
+boolean
+bfd_set_default_target (name)
+     const char *name;
+{
+  const bfd_target *target;
+
+  if (bfd_default_vector[0] != NULL
+      && strcmp (name, bfd_default_vector[0]->name) == 0)
+    return true;
+
+  target = find_target (name);
+  if (target == NULL)
+    return false;
+
+  bfd_default_vector[0] = target;
+  return true;
+}
 
 /*
 FUNCTION
@@ -814,32 +965,38 @@ DESCRIPTION
 
 const bfd_target *
 bfd_find_target (target_name, abfd)
-     CONST char *target_name;
+     const char *target_name;
      bfd *abfd;
 {
-  const bfd_target * const *target;
-  extern char *getenv ();
-  CONST char *targname = (target_name ? target_name : 
-                         (CONST char *) getenv ("GNUTARGET"));
+  const char *targname;
+  const bfd_target *target;
+
+  if (target_name != NULL)
+    targname = target_name;
+  else
+    targname = getenv ("GNUTARGET");
 
   /* This is safe; the vector cannot be null */
-  if (targname == NULL || !strcmp (targname, "default")) {
-    abfd->target_defaulted = true;
-    return abfd->xvec = bfd_target_vector[0];
-  }
+  if (targname == NULL || strcmp (targname, "default") == 0)
+    {
+      abfd->target_defaulted = true;
+      if (bfd_default_vector[0] != NULL)
+       abfd->xvec = bfd_default_vector[0];
+      else
+       abfd->xvec = bfd_target_vector[0];
+      return abfd->xvec;
+    }
 
   abfd->target_defaulted = false;
 
-  for (target = &bfd_target_vector[0]; *target != NULL; target++) {
-    if (!strcmp (targname, (*target)->name))
-      return abfd->xvec = *target;
-  }
+  target = find_target (targname);
+  if (target == NULL)
+    return NULL;
 
-  bfd_set_error (bfd_error_invalid_target);
-  return NULL;
+  abfd->xvec = target;
+  return target;
 }
 
-
 /*
 FUNCTION
        bfd_target_list