/* Generic target-file-type support for the BFD library.
- Copyright 1990, 91, 92, 93, 94, 95, 1996 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.
.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),\
. 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,
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;
-/* start-sanitize-d10v */
extern const bfd_target bfd_elf32_d10v_vec;
-/* end-sanitize-d10v */
/* start-sanitize-d30v */
extern const bfd_target bfd_elf32_d30v_vec;
/* end-sanitize-d30v */
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;
-/* start-sanitize-m32r */
extern const bfd_target bfd_elf32_m32r_vec;
-/* end-sanitize-m32r */
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 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 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;
#ifdef BFD64
&bfd_elf64_bigmips_vec,
#endif
-/* start-sanitize-d10v */
&bfd_elf32_d10v_vec,
-/* end-sanitize-d10v */
/* start-sanitize-d30v */
&bfd_elf32_d30v_vec,
/* end-sanitize-d30v */
#ifdef BFD64
&bfd_elf64_littlemips_vec,
#endif
-/* start-sanitize-m32r */
&bfd_elf32_m32r_vec,
-/* end-sanitize-m32r */
&bfd_elf32_mn10200_vec,
&bfd_elf32_mn10300_vec,
&bfd_elf32_m68k_vec,
#endif
&ecoff_big_vec,
&ecoff_little_vec,
+ &ecoff_biglittle_vec,
#ifdef BFD64
&ecoffalpha_little_vec,
&evax_alpha_vec,
&m68klynx_aout_vec,
&m68klynx_coff_vec,
&m68knetbsd_vec,
+ &m68ksysvcoff_vec,
&m88kbcs_vec,
&m88kmach3_vec,
&newsos3_vec,
/* 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
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
{ 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;
+ if (match->vector != UNSUPPORTED_TARGET)
+ 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 *old_default;
+ const bfd_target *target;
+
+ old_default = bfd_default_vector[0];
+ if (old_default != NULL)
+ {
+ register const struct targmatch *match;
+
+ /* Try to save some strcmp and fnmatch calls by seeing if we
+ already have the default. */
+
+ if (strcmp (name, old_default->name) == 0)
+ return true;
+
+ for (match = &bfd_target_match[0]; match->triplet != NULL; match++)
+ {
+ if (match->vector == old_default)
+ {
+ const struct targmatch *back;
+
+ back = match;
+ do
+ {
+ if (fnmatch (back->triplet, name, 0) == 0)
+ return true;
+
+ if (back == &bfd_target_match[0])
+ break;
+
+ --back;
+ }
+ while (back->vector == NULL);
+ }
+ }
+ }
+
+ target = find_target (name);
+ if (target == NULL)
+ return false;
+
+ bfd_default_vector[0] = target;
+ return true;
+}
+
/*
FUNCTION
bfd_find_target
const char *target_name;
bfd *abfd;
{
- const bfd_target * const *target;
const char *targname;
- const struct targmatch *match;
+ const bfd_target *target;
if (target_name != NULL)
targname = target_name;
if (targname == NULL || strcmp (targname, "default") == 0)
{
abfd->target_defaulted = true;
- abfd->xvec = bfd_target_vector[0];
- return bfd_target_vector[0];
+ 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) == 0)
- {
- abfd->xvec = *target;
- 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, targname, 0) == 0)
- {
- while (match->vector == NULL)
- ++match;
- if (match->vector != UNSUPPORTED_TARGET)
- {
- abfd->xvec = match->vector;
- return match->vector;
- }
- break;
- }
- }
-
- bfd_set_error (bfd_error_invalid_target);
+ target = find_target (targname);
+ if (target == NULL)
+ return NULL;
- return NULL;
+ abfd->xvec = target;
+ return target;
}
-
/*
FUNCTION
bfd_target_list