diff options
Diffstat (limited to 'x/binutils/ld/ldemul.c')
-rw-r--r-- | x/binutils/ld/ldemul.c | 313 |
1 files changed, 313 insertions, 0 deletions
diff --git a/x/binutils/ld/ldemul.c b/x/binutils/ld/ldemul.c new file mode 100644 index 0000000..760c55d --- /dev/null +++ b/x/binutils/ld/ldemul.c @@ -0,0 +1,313 @@ +/* ldemul.c -- clearing house for ld emulation states + Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2000, 2002, 2003 + Free Software Foundation, Inc. + +This file is part of GLD, the Gnu Linker. + +GLD 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, or (at your option) +any later version. + +GLD 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 GLD; see the file COPYING. If not, write to the Free +Software Foundation, 59 Temple Place - Suite 330, Boston, MA +02111-1307, USA. */ + +#include "bfd.h" +#include "sysdep.h" +#include "getopt.h" + +#include "ld.h" +#include "ldmisc.h" +#include "ldexp.h" +#include "ldlang.h" +#include "ldfile.h" +#include "ldemul.h" +#include "ldmain.h" +#include "ldemul-list.h" + +ld_emulation_xfer_type *ld_emulation; + +void +ldemul_hll (char *name) +{ + ld_emulation->hll (name); +} + +void +ldemul_syslib (char *name) +{ + ld_emulation->syslib (name); +} + +void +ldemul_after_parse (void) +{ + ld_emulation->after_parse (); +} + +void +ldemul_before_parse (void) +{ + ld_emulation->before_parse (); +} + +void +ldemul_after_open (void) +{ + ld_emulation->after_open (); +} + +void +ldemul_after_allocation (void) +{ + ld_emulation->after_allocation (); +} + +void +ldemul_before_allocation (void) +{ + if (ld_emulation->before_allocation) + ld_emulation->before_allocation (); +} + +void +ldemul_set_output_arch (void) +{ + ld_emulation->set_output_arch (); +} + +void +ldemul_finish (void) +{ + if (ld_emulation->finish) + ld_emulation->finish (); +} + +void +ldemul_set_symbols (void) +{ + if (ld_emulation->set_symbols) + ld_emulation->set_symbols (); +} + +void +ldemul_create_output_section_statements (void) +{ + if (ld_emulation->create_output_section_statements) + ld_emulation->create_output_section_statements (); +} + +char * +ldemul_get_script (int *isfile) +{ + return ld_emulation->get_script (isfile); +} + +bfd_boolean +ldemul_open_dynamic_archive (const char *arch, search_dirs_type *search, + lang_input_statement_type *entry) +{ + if (ld_emulation->open_dynamic_archive) + return (*ld_emulation->open_dynamic_archive) (arch, search, entry); + return FALSE; +} + +bfd_boolean +ldemul_place_orphan (lang_input_statement_type *file, asection *s) +{ + if (ld_emulation->place_orphan) + return (*ld_emulation->place_orphan) (file, s); + return FALSE; +} + +void +ldemul_add_options (int ns, char **shortopts, int nl, + struct option **longopts, int nrl, + struct option **really_longopts) +{ + if (ld_emulation->add_options) + (*ld_emulation->add_options) (ns, shortopts, nl, longopts, + nrl, really_longopts); +} + +bfd_boolean +ldemul_handle_option (int optc) +{ + if (ld_emulation->handle_option) + return (*ld_emulation->handle_option) (optc); + return FALSE; +} + +bfd_boolean +ldemul_parse_args (int argc, char **argv) +{ + /* Try and use the emulation parser if there is one. */ + if (ld_emulation->parse_args) + return (*ld_emulation->parse_args) (argc, argv); + return FALSE; +} + +/* Let the emulation code handle an unrecognized file. */ + +bfd_boolean +ldemul_unrecognized_file (lang_input_statement_type *entry) +{ + if (ld_emulation->unrecognized_file) + return (*ld_emulation->unrecognized_file) (entry); + return FALSE; +} + +/* Let the emulation code handle a recognized file. */ + +bfd_boolean +ldemul_recognized_file (lang_input_statement_type *entry) +{ + if (ld_emulation->recognized_file) + return (*ld_emulation->recognized_file) (entry); + return FALSE; +} + +char * +ldemul_choose_target (int argc, char **argv) +{ + return ld_emulation->choose_target (argc, argv); +} + + +/* The default choose_target function. */ + +char * +ldemul_default_target (int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) +{ + char *from_outside = getenv (TARGET_ENVIRON); + if (from_outside != (char *) NULL) + return from_outside; + return ld_emulation->target_name; +} + +void +after_parse_default (void) +{ +} + +void +after_open_default (void) +{ +} + +void +after_allocation_default (void) +{ +} + +void +before_allocation_default (void) +{ +} + +void +set_output_arch_default (void) +{ + /* Set the output architecture and machine if possible. */ + bfd_set_arch_mach (output_bfd, + ldfile_output_architecture, ldfile_output_machine); +} + +void +syslib_default (char *ignore ATTRIBUTE_UNUSED) +{ + info_msg (_("%S SYSLIB ignored\n")); +} + +void +hll_default (char *ignore ATTRIBUTE_UNUSED) +{ + info_msg (_("%S HLL ignored\n")); +} + +ld_emulation_xfer_type *ld_emulations[] = { EMULATION_LIST }; + +void +ldemul_choose_mode (char *target) +{ + ld_emulation_xfer_type **eptr = ld_emulations; + /* Ignore "gld" prefix. */ + if (target[0] == 'g' && target[1] == 'l' && target[2] == 'd') + target += 3; + for (; *eptr; eptr++) + { + if (strcmp (target, (*eptr)->emulation_name) == 0) + { + ld_emulation = *eptr; + return; + } + } + einfo (_("%P: unrecognised emulation mode: %s\n"), target); + einfo (_("Supported emulations: ")); + ldemul_list_emulations (stderr); + einfo ("%F\n"); +} + +void +ldemul_list_emulations (FILE *f) +{ + ld_emulation_xfer_type **eptr = ld_emulations; + bfd_boolean first = TRUE; + + for (; *eptr; eptr++) + { + if (first) + first = FALSE; + else + fprintf (f, " "); + fprintf (f, "%s", (*eptr)->emulation_name); + } +} + +void +ldemul_list_emulation_options (FILE *f) +{ + ld_emulation_xfer_type **eptr; + int options_found = 0; + + for (eptr = ld_emulations; *eptr; eptr++) + { + ld_emulation_xfer_type *emul = *eptr; + + if (emul->list_options) + { + fprintf (f, "%s: \n", emul->emulation_name); + + emul->list_options (f); + + options_found = 1; + } + } + + if (! options_found) + fprintf (f, _(" no emulation specific options.\n")); +} + +int +ldemul_find_potential_libraries (char *name, lang_input_statement_type *entry) +{ + if (ld_emulation->find_potential_libraries) + return ld_emulation->find_potential_libraries (name, entry); + + return 0; +} + +struct bfd_elf_version_expr * +ldemul_new_vers_pattern (struct bfd_elf_version_expr *entry) +{ + if (ld_emulation->new_vers_pattern) + entry = (*ld_emulation->new_vers_pattern) (entry); + return entry; +} |