1999-05-03 15:29:11 +08:00
|
|
|
|
# This shell script emits a C file. -*- C -*-
|
|
|
|
|
# It does some substitutions.
|
|
|
|
|
cat >e${EMULATION_NAME}.c <<EOF
|
|
|
|
|
/* This file is is generated by a shell script. DO NOT EDIT! */
|
|
|
|
|
|
|
|
|
|
/* emulate the original gld for the given ${EMULATION_NAME}
|
2004-01-03 19:09:07 +08:00
|
|
|
|
Copyright 1991, 1993, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
|
2005-05-04 19:00:28 +08:00
|
|
|
|
2004, 2005 Free Software Foundation, Inc.
|
1999-05-03 15:29:11 +08:00
|
|
|
|
Written by Steve Chamberlain steve@cygnus.com
|
|
|
|
|
|
|
|
|
|
This file is part of GLD, the Gnu Linker.
|
|
|
|
|
|
|
|
|
|
This program 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 of the License, or
|
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
|
|
This program 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 this program; if not, write to the Free Software
|
|
|
|
|
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
|
|
|
|
|
|
|
|
#define TARGET_IS_${EMULATION_NAME}
|
|
|
|
|
|
|
|
|
|
#include "bfd.h"
|
|
|
|
|
#include "sysdep.h"
|
|
|
|
|
#include "bfdlink.h"
|
|
|
|
|
#include "getopt.h"
|
|
|
|
|
|
|
|
|
|
#include "ld.h"
|
|
|
|
|
#include "ldmain.h"
|
|
|
|
|
#include "ldmisc.h"
|
|
|
|
|
|
|
|
|
|
#include "ldexp.h"
|
|
|
|
|
#include "ldlang.h"
|
2000-07-11 11:42:41 +08:00
|
|
|
|
#include "ldfile.h"
|
|
|
|
|
#include "ldemul.h"
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
2003-06-27 08:38:25 +08:00
|
|
|
|
/* If TRUE, then interworking stubs which support calls to old,
|
|
|
|
|
non-interworking aware ARM code should be generated. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
static int support_old_code = 0;
|
1999-06-21 11:30:32 +08:00
|
|
|
|
static char * thumb_entry_symbol = NULL;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
#define OPTION_SUPPORT_OLD_CODE 300
|
1999-06-21 11:30:32 +08:00
|
|
|
|
#define OPTION_THUMB_ENTRY 301
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
2003-02-28 09:32:31 +08:00
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_add_options
|
|
|
|
|
(int ns ATTRIBUTE_UNUSED, char **shortopts ATTRIBUTE_UNUSED, int nl,
|
|
|
|
|
struct option **longopts, int nrl ATTRIBUTE_UNUSED,
|
|
|
|
|
struct option **really_longopts ATTRIBUTE_UNUSED)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
2003-02-28 09:32:31 +08:00
|
|
|
|
static const struct option xtra_long[] = {
|
|
|
|
|
{"support-old-code", no_argument, NULL, OPTION_SUPPORT_OLD_CODE},
|
|
|
|
|
{"thumb-entry", required_argument, NULL, OPTION_THUMB_ENTRY},
|
|
|
|
|
{NULL, no_argument, NULL, 0}
|
|
|
|
|
};
|
|
|
|
|
|
2003-06-27 08:38:25 +08:00
|
|
|
|
*longopts = xrealloc (*longopts,
|
|
|
|
|
nl * sizeof (struct option) + sizeof (xtra_long));
|
2003-02-28 09:32:31 +08:00
|
|
|
|
memcpy (*longopts + nl, &xtra_long, sizeof (xtra_long));
|
|
|
|
|
}
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_list_options (FILE *file)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
fprintf (file, _(" --support-old-code Support interworking with old code\n"));
|
1999-06-21 11:30:32 +08:00
|
|
|
|
fprintf (file, _(" --thumb-entry=<sym> Set the entry point to be Thumb symbol <sym>\n"));
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
|
|
|
|
|
2003-02-28 09:32:31 +08:00
|
|
|
|
static bfd_boolean
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_handle_option (int optc)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
switch (optc)
|
|
|
|
|
{
|
|
|
|
|
default:
|
2003-02-28 09:32:31 +08:00
|
|
|
|
return FALSE;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
case OPTION_SUPPORT_OLD_CODE:
|
|
|
|
|
support_old_code = 1;
|
|
|
|
|
break;
|
1999-06-21 11:30:32 +08:00
|
|
|
|
|
|
|
|
|
case OPTION_THUMB_ENTRY:
|
|
|
|
|
thumb_entry_symbol = optarg;
|
|
|
|
|
break;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
2003-02-28 09:32:31 +08:00
|
|
|
|
return TRUE;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_before_parse (void)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
#ifndef TARGET_ /* I.e., if not generic. */
|
2004-01-03 19:09:07 +08:00
|
|
|
|
ldfile_set_output_arch ("`echo ${ARCH}`", bfd_arch_unknown);
|
1999-05-03 15:29:11 +08:00
|
|
|
|
#endif /* not TARGET_ */
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* This is called after the sections have been attached to output
|
|
|
|
|
sections, but before any sizes or addresses have been set. */
|
|
|
|
|
|
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_before_allocation (void)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
/* we should be able to set the size of the interworking stub section */
|
|
|
|
|
|
|
|
|
|
/* Here we rummage through the found bfds to collect glue information */
|
|
|
|
|
/* FIXME: should this be based on a command line option? krk@cygnus.com */
|
|
|
|
|
{
|
|
|
|
|
LANG_FOR_EACH_INPUT_STATEMENT (is)
|
|
|
|
|
{
|
|
|
|
|
if (! bfd_arm_process_before_allocation
|
|
|
|
|
(is->the_bfd, & link_info, support_old_code))
|
|
|
|
|
{
|
|
|
|
|
/* xgettext:c-format */
|
|
|
|
|
einfo (_("Errors encountered processing file %s"), is->filename);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* We have seen it all. Allocate it, and carry on */
|
|
|
|
|
bfd_arm_allocate_interworking_sections (& link_info);
|
2005-05-04 19:00:28 +08:00
|
|
|
|
|
|
|
|
|
if (!link_info.relocatable)
|
|
|
|
|
strip_excluded_output_sections ();
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_after_open (void)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
1999-07-05 15:51:39 +08:00
|
|
|
|
if (strstr (bfd_get_target (output_bfd), "arm") == NULL)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
1999-07-05 15:51:39 +08:00
|
|
|
|
/* The arm backend needs special fields in the output hash structure.
|
|
|
|
|
These will only be created if the output format is an arm format,
|
|
|
|
|
hence we do not support linking and changing output formats at the
|
|
|
|
|
same time. Use a link followed by objcopy to change output formats. */
|
|
|
|
|
einfo ("%F%X%P: error: cannot change output format whilst linking ARM binaries\n");
|
|
|
|
|
return;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
1999-07-05 15:51:39 +08:00
|
|
|
|
{
|
|
|
|
|
LANG_FOR_EACH_INPUT_STATEMENT (is)
|
|
|
|
|
{
|
|
|
|
|
if (bfd_arm_get_bfd_for_interworking (is->the_bfd, & link_info))
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
}
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
|
|
|
|
|
1999-06-21 11:30:32 +08:00
|
|
|
|
static void
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_finish (void)
|
1999-06-21 11:30:32 +08:00
|
|
|
|
{
|
|
|
|
|
struct bfd_link_hash_entry * h;
|
|
|
|
|
|
|
|
|
|
if (thumb_entry_symbol == NULL)
|
|
|
|
|
return;
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
2002-11-30 16:39:46 +08:00
|
|
|
|
h = bfd_link_hash_lookup (link_info.hash, thumb_entry_symbol,
|
|
|
|
|
FALSE, FALSE, TRUE);
|
1999-06-21 11:30:32 +08:00
|
|
|
|
|
|
|
|
|
if (h != (struct bfd_link_hash_entry *) NULL
|
|
|
|
|
&& (h->type == bfd_link_hash_defined
|
|
|
|
|
|| h->type == bfd_link_hash_defweak)
|
|
|
|
|
&& h->u.def.section->output_section != NULL)
|
|
|
|
|
{
|
|
|
|
|
static char buffer[32];
|
|
|
|
|
bfd_vma val;
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
1999-06-21 11:30:32 +08:00
|
|
|
|
/* Special procesing is required for a Thumb entry symbol. The
|
|
|
|
|
bottom bit of its address must be set. */
|
|
|
|
|
val = (h->u.def.value
|
|
|
|
|
+ bfd_get_section_vma (output_bfd,
|
|
|
|
|
h->u.def.section->output_section)
|
|
|
|
|
+ h->u.def.section->output_offset);
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
1999-06-21 11:30:32 +08:00
|
|
|
|
val |= 1;
|
|
|
|
|
|
|
|
|
|
/* Now convert this value into a string and store it in entry_symbol
|
2003-06-27 08:38:25 +08:00
|
|
|
|
where the lang_finish() function will pick it up. */
|
1999-06-21 11:30:32 +08:00
|
|
|
|
buffer[0] = '0';
|
|
|
|
|
buffer[1] = 'x';
|
2003-06-27 08:38:25 +08:00
|
|
|
|
|
1999-06-21 11:30:32 +08:00
|
|
|
|
sprintf_vma (buffer + 2, val);
|
|
|
|
|
|
2002-07-01 16:07:31 +08:00
|
|
|
|
if (entry_symbol.name != NULL && entry_from_cmdline)
|
1999-06-21 11:30:32 +08:00
|
|
|
|
einfo (_("%P: warning: '--thumb-entry %s' is overriding '-e %s'\n"),
|
2002-07-01 16:07:31 +08:00
|
|
|
|
thumb_entry_symbol, entry_symbol.name);
|
|
|
|
|
entry_symbol.name = buffer;
|
1999-06-21 11:30:32 +08:00
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
einfo (_("%P: warning: connot find thumb start symbol %s\n"), thumb_entry_symbol);
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
|
static char *
|
2003-06-27 08:38:25 +08:00
|
|
|
|
gld${EMULATION_NAME}_get_script (int *isfile)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
EOF
|
|
|
|
|
|
|
|
|
|
if test -n "$COMPILE_IN"
|
|
|
|
|
then
|
|
|
|
|
# Scripts compiled in.
|
|
|
|
|
|
|
|
|
|
# sed commands to quote an ld script as a C string.
|
1999-08-07 06:46:03 +08:00
|
|
|
|
sc="-f stringify.sed"
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
cat >>e${EMULATION_NAME}.c <<EOF
|
2003-06-27 08:38:25 +08:00
|
|
|
|
{
|
1999-05-03 15:29:11 +08:00
|
|
|
|
*isfile = 0;
|
|
|
|
|
|
2003-06-25 14:40:27 +08:00
|
|
|
|
if (link_info.relocatable && config.build_constructors)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
return
|
|
|
|
|
EOF
|
2002-11-30 16:39:46 +08:00
|
|
|
|
sed $sc ldscripts/${EMULATION_NAME}.xu >> e${EMULATION_NAME}.c
|
2003-06-25 14:40:27 +08:00
|
|
|
|
echo ' ; else if (link_info.relocatable) return' >> e${EMULATION_NAME}.c
|
2002-11-30 16:39:46 +08:00
|
|
|
|
sed $sc ldscripts/${EMULATION_NAME}.xr >> e${EMULATION_NAME}.c
|
|
|
|
|
echo ' ; else if (!config.text_read_only) return' >> e${EMULATION_NAME}.c
|
|
|
|
|
sed $sc ldscripts/${EMULATION_NAME}.xbn >> e${EMULATION_NAME}.c
|
|
|
|
|
echo ' ; else if (!config.magic_demand_paged) return' >> e${EMULATION_NAME}.c
|
|
|
|
|
sed $sc ldscripts/${EMULATION_NAME}.xn >> e${EMULATION_NAME}.c
|
|
|
|
|
echo ' ; else return' >> e${EMULATION_NAME}.c
|
|
|
|
|
sed $sc ldscripts/${EMULATION_NAME}.x >> e${EMULATION_NAME}.c
|
|
|
|
|
echo '; }' >> e${EMULATION_NAME}.c
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
else
|
|
|
|
|
# Scripts read from the filesystem.
|
|
|
|
|
|
|
|
|
|
cat >>e${EMULATION_NAME}.c <<EOF
|
2003-06-27 08:38:25 +08:00
|
|
|
|
{
|
1999-05-03 15:29:11 +08:00
|
|
|
|
*isfile = 1;
|
|
|
|
|
|
2003-06-25 14:40:27 +08:00
|
|
|
|
if (link_info.relocatable && config.build_constructors)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
return "ldscripts/${EMULATION_NAME}.xu";
|
2003-06-25 14:40:27 +08:00
|
|
|
|
else if (link_info.relocatable)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
return "ldscripts/${EMULATION_NAME}.xr";
|
|
|
|
|
else if (!config.text_read_only)
|
|
|
|
|
return "ldscripts/${EMULATION_NAME}.xbn";
|
|
|
|
|
else if (!config.magic_demand_paged)
|
|
|
|
|
return "ldscripts/${EMULATION_NAME}.xn";
|
|
|
|
|
else
|
|
|
|
|
return "ldscripts/${EMULATION_NAME}.x";
|
|
|
|
|
}
|
|
|
|
|
EOF
|
|
|
|
|
|
|
|
|
|
fi
|
|
|
|
|
|
|
|
|
|
cat >>e${EMULATION_NAME}.c <<EOF
|
|
|
|
|
|
2003-06-27 08:38:25 +08:00
|
|
|
|
struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation =
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
gld${EMULATION_NAME}_before_parse,
|
|
|
|
|
syslib_default,
|
|
|
|
|
hll_default,
|
|
|
|
|
after_parse_default,
|
|
|
|
|
gld${EMULATION_NAME}_after_open,
|
|
|
|
|
after_allocation_default,
|
|
|
|
|
set_output_arch_default,
|
|
|
|
|
ldemul_default_target,
|
|
|
|
|
gld${EMULATION_NAME}_before_allocation,
|
|
|
|
|
gld${EMULATION_NAME}_get_script,
|
|
|
|
|
"${EMULATION_NAME}",
|
|
|
|
|
"${OUTPUT_FORMAT}",
|
2000-01-23 07:22:18 +08:00
|
|
|
|
gld${EMULATION_NAME}_finish,
|
|
|
|
|
NULL, /* create output section statements */
|
|
|
|
|
NULL, /* open dynamic archive */
|
|
|
|
|
NULL, /* place orphan */
|
|
|
|
|
NULL, /* set symbols */
|
2003-02-28 09:32:31 +08:00
|
|
|
|
NULL, /* parse_args */
|
|
|
|
|
gld${EMULATION_NAME}_add_options,
|
|
|
|
|
gld${EMULATION_NAME}_handle_option,
|
2000-01-23 07:22:18 +08:00
|
|
|
|
NULL, /* unrecognised file */
|
|
|
|
|
gld${EMULATION_NAME}_list_options,
|
2000-02-29 13:53:53 +08:00
|
|
|
|
NULL, /* recognized file */
|
2002-05-22 17:04:48 +08:00
|
|
|
|
NULL, /* find_potential_libraries */
|
|
|
|
|
NULL /* new_vers_pattern */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
};
|
|
|
|
|
EOF
|