From 252b5132c753830d5fd56823373aed85f2a0db63 Mon Sep 17 00:00:00 2001 From: Richard Henderson Date: Mon, 3 May 1999 07:29:11 +0000 Subject: 19990502 sourceware import --- ld/ldemul.c | 298 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 298 insertions(+) create mode 100644 ld/ldemul.c (limited to 'ld/ldemul.c') diff --git a/ld/ldemul.c b/ld/ldemul.c new file mode 100644 index 0000000..eab0432 --- /dev/null +++ b/ld/ldemul.c @@ -0,0 +1,298 @@ +/* ldemul.c -- clearing house for ld emulation states + Copyright (C) 1991, 92, 93, 94, 95, 96, 1997, 1998 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 "ld.h" +#include "ldemul.h" +#include "ldmisc.h" +#include "ldexp.h" +#include "ldlang.h" +#include "ldfile.h" +#include "ldmain.h" +#include "ldemul-list.h" + +ld_emulation_xfer_type *ld_emulation; + +void +ldemul_hll(name) + char *name; +{ + ld_emulation->hll(name); +} + + +void ldemul_syslib(name) + char *name; +{ + ld_emulation->syslib(name); +} + +void +ldemul_after_parse() +{ + ld_emulation->after_parse(); +} + +void +ldemul_before_parse() +{ + ld_emulation->before_parse(); +} + +void +ldemul_after_open () +{ + ld_emulation->after_open (); +} + +void +ldemul_after_allocation() +{ + ld_emulation->after_allocation(); +} + +void +ldemul_before_allocation() +{ + if (ld_emulation->before_allocation) + ld_emulation->before_allocation(); +} + + +void +ldemul_set_output_arch() +{ + ld_emulation->set_output_arch(); +} + +void +ldemul_finish() +{ + if (ld_emulation->finish) + ld_emulation->finish(); +} + +void +ldemul_set_symbols() +{ + if (ld_emulation->set_symbols) + ld_emulation->set_symbols(); +} + +void +ldemul_create_output_section_statements() +{ + if (ld_emulation->create_output_section_statements) + ld_emulation->create_output_section_statements(); +} + +char * +ldemul_get_script(isfile) + int *isfile; +{ + return ld_emulation->get_script(isfile); +} + +boolean +ldemul_open_dynamic_archive (arch, search, entry) + 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; +} + +boolean +ldemul_place_orphan (file, s) + lang_input_statement_type *file; + asection *s; +{ + if (ld_emulation->place_orphan) + return (*ld_emulation->place_orphan) (file, s); + return false; +} + +int +ldemul_parse_args (argc, argv) + 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 0; +} + +/* Let the emulation code handle an unrecognized file. */ + +boolean +ldemul_unrecognized_file (entry) + 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. */ + +boolean +ldemul_recognized_file (entry) + lang_input_statement_type *entry; +{ + if (ld_emulation->recognized_file) + return (*ld_emulation->recognized_file) (entry); + return false; +} + +char * +ldemul_choose_target() +{ + return ld_emulation->choose_target(); +} + +/* The default choose_target function. */ + +char * +ldemul_default_target() +{ + char *from_outside = getenv (TARGET_ENVIRON); + if (from_outside != (char *)NULL) + return from_outside; + return ld_emulation->target_name; +} + +void +after_parse_default() +{ + +} + +void +after_open_default () +{ +} + +void +after_allocation_default() +{ + +} + +void +before_allocation_default() +{ + +} + +void +set_output_arch_default() +{ + /* Set the output architecture and machine if possible */ + bfd_set_arch_mach(output_bfd, + ldfile_output_architecture, ldfile_output_machine); +} + +/*ARGSUSED*/ +void +syslib_default(ignore) + char *ignore; +{ + info_msg (_("%S SYSLIB ignored\n")); +} + +/*ARGSUSED*/ +void +hll_default(ignore) + char *ignore; +{ + info_msg (_("%S HLL ignored\n")); +} + +ld_emulation_xfer_type *ld_emulations[] = { EMULATION_LIST }; + +void +ldemul_choose_mode(target) + 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 (f) + FILE *f; +{ + ld_emulation_xfer_type **eptr = ld_emulations; + boolean first = true; + + for (; *eptr; eptr++) + { + if (first) + first = false; + else + fprintf (f, " "); + fprintf (f, "%s", (*eptr)->emulation_name); + } +} + +void +ldemul_list_emulation_options (f) + 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")); +} -- cgit v1.1