binutils-gdb/ld/ldemul.c

342 lines
6.5 KiB
C
Raw Normal View History

1999-05-03 15:29:11 +08:00
/* ldemul.c -- clearing house for ld emulation states
Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2000, 2002, 2003
Free Software Foundation, Inc.
1999-05-03 15:29:11 +08:00
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. */
1999-05-03 15:29:11 +08:00
#include "bfd.h"
#include "sysdep.h"
#include "getopt.h"
1999-05-03 15:29:11 +08:00
#include "ld.h"
#include "ldmisc.h"
#include "ldexp.h"
#include "ldlang.h"
#include "ldfile.h"
#include "ldemul.h"
1999-05-03 15:29:11 +08:00
#include "ldmain.h"
#include "ldemul-list.h"
ld_emulation_xfer_type *ld_emulation;
void
ldemul_hll (name)
1999-05-03 15:29:11 +08:00
char *name;
{
ld_emulation->hll (name);
1999-05-03 15:29:11 +08:00
}
void
ldemul_syslib (name)
1999-05-03 15:29:11 +08:00
char *name;
{
ld_emulation->syslib (name);
1999-05-03 15:29:11 +08:00
}
void
ldemul_after_parse ()
1999-05-03 15:29:11 +08:00
{
ld_emulation->after_parse ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_before_parse ()
1999-05-03 15:29:11 +08:00
{
ld_emulation->before_parse ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_after_open ()
{
ld_emulation->after_open ();
}
void
ldemul_after_allocation ()
1999-05-03 15:29:11 +08:00
{
ld_emulation->after_allocation ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_before_allocation ()
1999-05-03 15:29:11 +08:00
{
if (ld_emulation->before_allocation)
ld_emulation->before_allocation ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_set_output_arch ()
1999-05-03 15:29:11 +08:00
{
ld_emulation->set_output_arch ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_finish ()
1999-05-03 15:29:11 +08:00
{
if (ld_emulation->finish)
ld_emulation->finish ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_set_symbols ()
1999-05-03 15:29:11 +08:00
{
if (ld_emulation->set_symbols)
ld_emulation->set_symbols ();
1999-05-03 15:29:11 +08:00
}
void
ldemul_create_output_section_statements ()
1999-05-03 15:29:11 +08:00
{
if (ld_emulation->create_output_section_statements)
ld_emulation->create_output_section_statements ();
1999-05-03 15:29:11 +08:00
}
char *
ldemul_get_script (isfile)
1999-05-03 15:29:11 +08:00
int *isfile;
{
return ld_emulation->get_script (isfile);
1999-05-03 15:29:11 +08:00
}
bfd_boolean
1999-05-03 15:29:11 +08:00
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;
1999-05-03 15:29:11 +08:00
}
bfd_boolean
1999-05-03 15:29:11 +08:00
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;
1999-05-03 15:29:11 +08:00
}
* ldemul.c (ldemul_add_options, ldemul_handle_option): New functions. (ldemul_parse_args): Return bfd_boolean. Formatting. * ldemul.h (ldemul_add_options, ldemul_handle_option): Declare. (ldemul_parse_args): Adjust. (struct ld_emulation_xfer_struct): Add add_options and handle_option. Return bfd_boolean from parse_args. * lexsup.c (parse_args): Malloc shortopts, longopts and really_longopts. Call ldemul_add_options and ldemul_handle_option. * emultempl/aix.em (gld${EMULATION_NAME}_add_options): Split out from gld${EMULATION_NAME}_parse_args. (gld${EMULATION_NAME}_handle_option): Likewise. (ld_${EMULATION_NAME}_emulation): Adjust initializer. * emultempl/armcoff.em: As for aix.em, but remove parse_args. * emultempl/beos.em: Likewise. * emultempl/pe.em: Likewise. * emultempl/ticoff.em: Likewise. * emultempl/elf32.em: Likewise. Don't duplicate long options either. (gld${EMULATION_NAME}_add_sysroot): Prototype. * emultempl/armelf.em (PARSE_AND_LIST_LONGOPTS): Don't duplicate options. * emultempl/hppaelf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/ppc32elf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/ppc64elf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/armelf_oabi.em (ld_${EMULATION_NAME}_emulation): Adjust initializer. * emultempl/generic.em: Likewise. * emultempl/gld960.em: Likewise. * emultempl/gld960c.em: Likewise. * emultempl/linux.em: Likewise. * emultempl/lnk960.em: Likewise. * emultempl/m68kcoff.em: Likewise. * emultempl/mipsecoff.em: Likewise. * emultempl/sunos.em: Likewise. * emultempl/vanilla.em: Likewise. * emultempl/netbsd.em (gldnetbsd_before_parse): Prototype.
2003-02-28 09:32:31 +08:00
void
ldemul_add_options (ns, shortopts, nl, longopts, nrl, really_longopts)
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 (optc)
int optc;
{
if (ld_emulation->handle_option)
return (*ld_emulation->handle_option) (optc);
return FALSE;
}
bfd_boolean
1999-05-03 15:29:11 +08:00
ldemul_parse_args (argc, argv)
int argc;
char **argv;
{
/* Try and use the emulation parser if there is one. */
1999-05-03 15:29:11 +08:00
if (ld_emulation->parse_args)
* ldemul.c (ldemul_add_options, ldemul_handle_option): New functions. (ldemul_parse_args): Return bfd_boolean. Formatting. * ldemul.h (ldemul_add_options, ldemul_handle_option): Declare. (ldemul_parse_args): Adjust. (struct ld_emulation_xfer_struct): Add add_options and handle_option. Return bfd_boolean from parse_args. * lexsup.c (parse_args): Malloc shortopts, longopts and really_longopts. Call ldemul_add_options and ldemul_handle_option. * emultempl/aix.em (gld${EMULATION_NAME}_add_options): Split out from gld${EMULATION_NAME}_parse_args. (gld${EMULATION_NAME}_handle_option): Likewise. (ld_${EMULATION_NAME}_emulation): Adjust initializer. * emultempl/armcoff.em: As for aix.em, but remove parse_args. * emultempl/beos.em: Likewise. * emultempl/pe.em: Likewise. * emultempl/ticoff.em: Likewise. * emultempl/elf32.em: Likewise. Don't duplicate long options either. (gld${EMULATION_NAME}_add_sysroot): Prototype. * emultempl/armelf.em (PARSE_AND_LIST_LONGOPTS): Don't duplicate options. * emultempl/hppaelf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/ppc32elf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/ppc64elf.em (PARSE_AND_LIST_LONGOPTS): Likewise. * emultempl/armelf_oabi.em (ld_${EMULATION_NAME}_emulation): Adjust initializer. * emultempl/generic.em: Likewise. * emultempl/gld960.em: Likewise. * emultempl/gld960c.em: Likewise. * emultempl/linux.em: Likewise. * emultempl/lnk960.em: Likewise. * emultempl/m68kcoff.em: Likewise. * emultempl/mipsecoff.em: Likewise. * emultempl/sunos.em: Likewise. * emultempl/vanilla.em: Likewise. * emultempl/netbsd.em (gldnetbsd_before_parse): Prototype.
2003-02-28 09:32:31 +08:00
return (*ld_emulation->parse_args) (argc, argv);
return FALSE;
1999-05-03 15:29:11 +08:00
}
/* Let the emulation code handle an unrecognized file. */
bfd_boolean
1999-05-03 15:29:11 +08:00
ldemul_unrecognized_file (entry)
lang_input_statement_type *entry;
{
if (ld_emulation->unrecognized_file)
return (*ld_emulation->unrecognized_file) (entry);
return FALSE;
1999-05-03 15:29:11 +08:00
}
/* Let the emulation code handle a recognized file. */
bfd_boolean
1999-05-03 15:29:11 +08:00
ldemul_recognized_file (entry)
lang_input_statement_type *entry;
{
if (ld_emulation->recognized_file)
return (*ld_emulation->recognized_file) (entry);
return FALSE;
1999-05-03 15:29:11 +08:00
}
char *
ldemul_choose_target (argc, argv)
int argc;
char **argv;
1999-05-03 15:29:11 +08:00
{
return ld_emulation->choose_target (argc, argv);
1999-05-03 15:29:11 +08:00
}
1999-05-03 15:29:11 +08:00
/* The default choose_target function. */
char *
ldemul_default_target (argc, argv)
int argc ATTRIBUTE_UNUSED;
char **argv ATTRIBUTE_UNUSED;
1999-05-03 15:29:11 +08:00
{
char *from_outside = getenv (TARGET_ENVIRON);
if (from_outside != (char *) NULL)
1999-05-03 15:29:11 +08:00
return from_outside;
return ld_emulation->target_name;
}
void
after_parse_default ()
1999-05-03 15:29:11 +08:00
{
}
void
after_open_default ()
{
}
void
after_allocation_default ()
1999-05-03 15:29:11 +08:00
{
}
void
before_allocation_default ()
1999-05-03 15:29:11 +08:00
{
}
void
set_output_arch_default ()
1999-05-03 15:29:11 +08:00
{
/* Set the output architecture and machine if possible. */
bfd_set_arch_mach (output_bfd,
ldfile_output_architecture, ldfile_output_machine);
1999-05-03 15:29:11 +08:00
}
void
syslib_default (ignore)
char *ignore ATTRIBUTE_UNUSED;
1999-05-03 15:29:11 +08:00
{
info_msg (_("%S SYSLIB ignored\n"));
}
void
hll_default (ignore)
char *ignore ATTRIBUTE_UNUSED;
1999-05-03 15:29:11 +08:00
{
info_msg (_("%S HLL ignored\n"));
}
ld_emulation_xfer_type *ld_emulations[] = { EMULATION_LIST };
void
ldemul_choose_mode (target)
1999-05-03 15:29:11 +08:00
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");
1999-05-03 15:29:11 +08:00
}
void
ldemul_list_emulations (f)
FILE *f;
{
ld_emulation_xfer_type **eptr = ld_emulations;
bfd_boolean first = TRUE;
1999-05-03 15:29:11 +08:00
for (; *eptr; eptr++)
{
if (first)
first = FALSE;
1999-05-03 15:29:11 +08:00
else
fprintf (f, " ");
fprintf (f, "%s", (*eptr)->emulation_name);
}
}
void
ldemul_list_emulation_options (f)
FILE *f;
1999-05-03 15:29:11 +08:00
{
ld_emulation_xfer_type **eptr;
1999-05-03 15:29:11 +08:00
int options_found = 0;
for (eptr = ld_emulations; *eptr; eptr++)
1999-05-03 15:29:11 +08:00
{
ld_emulation_xfer_type *emul = *eptr;
1999-05-03 15:29:11 +08:00
if (emul->list_options)
{
fprintf (f, "%s: \n", emul->emulation_name);
1999-05-03 15:29:11 +08:00
emul->list_options (f);
options_found = 1;
}
}
1999-05-03 15:29:11 +08:00
if (! options_found)
fprintf (f, _(" no emulation specific options.\n"));
}
int
ldemul_find_potential_libraries (name, entry)
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 (entry)
struct bfd_elf_version_expr *entry;
{
if (ld_emulation->new_vers_pattern)
entry = (*ld_emulation->new_vers_pattern) (entry);
return entry;
}