bfd/
[deliverable/binutils-gdb.git] / ld / emultempl / armelf.em
index d9409f2ac7ce50b636090fd73873cb8b5566f183..5505f1230d0f33520ce3dbbcfd0dbbddd756b9b6 100644 (file)
 # 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}
-   Copyright (C) 1991, 93, 96, 97, 1998 Free Software Foundation, Inc.
-   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.  */
+#   Copyright 1991, 1993, 1996, 1997, 1998, 1999, 2000, 2002, 2003, 2004
+#   Free Software Foundation, Inc.
+#
+# 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.
+#
+
+# This file is sourced from elf32.em, and defines extra arm-elf
+# specific routines.
+#
+cat >>e${EMULATION_NAME}.c <<EOF
 
-#define TARGET_IS_${EMULATION_NAME}
+static int no_pipeline_knowledge = 0;
+static char *thumb_entry_symbol = NULL;
+static bfd *bfd_for_interwork;
+static int byteswap_code = 0;
 
-#include "bfd.h"
-#include "sysdep.h"
-#include "bfdlink.h"
-#include "getopt.h"
+static void
+gld${EMULATION_NAME}_before_parse (void)
+{
+#ifndef TARGET_                        /* I.e., if not generic.  */
+  ldfile_set_output_arch ("`echo ${ARCH}`", bfd_arch_unknown);
+#endif /* not TARGET_ */
+  config.dynamic_link = ${DYNAMIC_LINK-TRUE};
+  config.has_shared = `if test -n "$GENERATE_SHLIB_SCRIPT" ; then echo TRUE ; else echo FALSE ; fi`;
+}
 
-#include "ld.h"
-#include "ldmain.h"
-#include "ldemul.h"
-#include "ldfile.h"
-#include "ldmisc.h"
+static void
+arm_elf_after_open (void)
+{
+  if (strstr (bfd_get_target (output_bfd), "arm") == NULL)
+    {
+      /* 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;
+    }
 
-#include "ldexp.h"
-#include "ldlang.h"
+  {
+    LANG_FOR_EACH_INPUT_STATEMENT (is)
+      {
+       bfd_elf32_arm_add_glue_sections_to_bfd (is->the_bfd, & link_info);
+      }
+  }
 
-static void gld${EMULATION_NAME}_before_parse PARAMS ((void));
-static void gld${EMULATION_NAME}_before_allocation PARAMS ((void));
-static char *gld${EMULATION_NAME}_get_script PARAMS ((int *isfile));
+  /* Call the standard elf routine.  */
+  gld${EMULATION_NAME}_after_open ();
+}
 
 static void
-gld${EMULATION_NAME}_before_parse ()
+arm_elf_set_bfd_for_interworking (lang_statement_union_type *statement)
 {
-#ifndef TARGET_                        /* I.e., if not generic.  */
-  ldfile_set_output_arch ("`echo ${ARCH}`");
-#endif /* not TARGET_ */
+  if (statement->header.type == lang_input_section_enum
+      && !statement->input_section.ifile->just_syms_flag
+      && (statement->input_section.section->flags & SEC_EXCLUDE) == 0)
+    {
+      asection *i = statement->input_section.section;
+      asection *output_section = i->output_section;
+
+      ASSERT (output_section->owner == output_bfd);
+
+      if ((output_section->flags & SEC_HAS_CONTENTS) != 0
+         && (i->flags & SEC_NEVER_LOAD) == 0
+         && ! i->owner->output_has_begun)
+       {
+         bfd_for_interwork = i->owner;
+         bfd_for_interwork->output_has_begun = TRUE;
+       }
+    }
 }
 
-/* This is called after the sections have been attached to output
-   sections, but before any sizes or addresses have been set.  */
-
 static void
-gld${EMULATION_NAME}_before_allocation ()
+arm_elf_before_allocation (void)
 {
-  /* we should be able to set the size of the interworking stub section */
+  bfd *tem;
+
+  /* Call the standard elf routine.  */
+  gld${EMULATION_NAME}_before_allocation ();
+
+  if (link_info.input_bfds != NULL)
+    {
+      /* The interworking bfd must be the last one in the link.  */
+      bfd_for_interwork = NULL;
+      for (tem = link_info.input_bfds; tem != NULL; tem = tem->link_next)
+       tem->output_has_begun = FALSE;
+
+      lang_for_each_statement (arm_elf_set_bfd_for_interworking);
+      for (tem = link_info.input_bfds; tem != NULL; tem = tem->link_next)
+       tem->output_has_begun = FALSE;
+
+      /* If bfd_for_interwork is NULL, then there are no loadable sections
+        with real contents to be linked, so we are not going to have to
+        create any interworking stubs, so it is OK not to call
+        bfd_elf32_arm_get_bfd_for_interworking.  */
+      if (bfd_for_interwork != NULL)
+       bfd_elf32_arm_get_bfd_for_interworking (bfd_for_interwork, &link_info);
+    }
+  /* 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 */
+  /* 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_elf32_arm_process_before_allocation (is->the_bfd, &link_info))
+       if (!bfd_elf32_arm_process_before_allocation (is->the_bfd, & link_info,
+                                                     no_pipeline_knowledge,
+                                                     byteswap_code))
          {
            /* xgettext:c-format */
            einfo (_("Errors encountered processing file %s"), is->filename);
@@ -72,97 +128,103 @@ gld${EMULATION_NAME}_before_allocation ()
       }
   }
 
-  /* We have seen it all. Allocate it, and carry on */
+  /* We have seen it all. Allocate it, and carry on */
   bfd_elf32_arm_allocate_interworking_sections (& link_info);
 }
 
 static void
-gld${EMULATION_NAME}_after_open ()
+arm_elf_finish (void)
 {
+  struct bfd_link_hash_entry * h;
 
-  LANG_FOR_EACH_INPUT_STATEMENT (is)
-    {
-      /* The interworking bfd must be the last one to be processed */
-      if (!is->next)
-         bfd_elf32_arm_get_bfd_for_interworking (is->the_bfd, & link_info);
-    }
-}
+  /* Call the elf32.em routine.  */
+  gld${EMULATION_NAME}_finish ();
 
-static char *
-gld${EMULATION_NAME}_get_script (isfile)
-     int *isfile;
-EOF
+  if (thumb_entry_symbol == NULL)
+    return;
 
-if test -n "$COMPILE_IN"
-then
-# Scripts compiled in.
+  h = bfd_link_hash_lookup (link_info.hash, thumb_entry_symbol,
+                           FALSE, FALSE, TRUE);
 
-# sed commands to quote an ld script as a C string.
-sc="-f ${srcdir}/emultempl/stringify.sed"
+  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;
 
-cat >>e${EMULATION_NAME}.c <<EOF
-{                           
-  *isfile = 0;
+      /* 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);
 
-  if (link_info.relocateable == true && config.build_constructors == true)
-    return
-EOF
-sed $sc ldscripts/${EMULATION_NAME}.xu                     >> e${EMULATION_NAME}.c
-echo '  ; else if (link_info.relocateable == true) return' >> e${EMULATION_NAME}.c
-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
-
-else
-# Scripts read from the filesystem.
+      val |= 1;
 
-cat >>e${EMULATION_NAME}.c <<EOF
-{                           
-  *isfile = 1;
-
-  if (link_info.relocateable == true && config.build_constructors == true)
-    return "ldscripts/${EMULATION_NAME}.xu";
-  else if (link_info.relocateable == true)
-    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
+      /* Now convert this value into a string and store it in entry_symbol
+        where the lang_finish() function will pick it up.  */
+      buffer[0] = '0';
+      buffer[1] = 'x';
 
-fi
+      sprintf_vma (buffer + 2, val);
 
-cat >>e${EMULATION_NAME}.c <<EOF
+      if (entry_symbol.name != NULL && entry_from_cmdline)
+       einfo (_("%P: warning: '--thumb-entry %s' is overriding '-e %s'\n"),
+              thumb_entry_symbol, entry_symbol.name);
+      entry_symbol.name = buffer;
+    }
+  else
+    einfo (_("%P: warning: connot find thumb start symbol %s\n"),
+          thumb_entry_symbol);
+}
 
-struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation = 
-{
-  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}",
-  NULL, /* finish */
-  NULL, /* create output section statements */
-  NULL, /* open dynamic archive */
-  NULL, /* place orphan */
-  NULL, /* set_symbols */
-  NULL,
-  NULL, /* unrecognised file */
-  NULL
-};
 EOF
+
+# Define some shell vars to insert bits of code into the standard elf
+# parse_args and list_options functions.
+#
+PARSE_AND_LIST_PROLOGUE='
+#define OPTION_THUMB_ENTRY             301
+#define OPTION_BE8                     302
+'
+
+PARSE_AND_LIST_SHORTOPTS=p
+
+PARSE_AND_LIST_LONGOPTS='
+  { "no-pipeline-knowledge", no_argument, NULL, '\'p\''},
+  { "thumb-entry", required_argument, NULL, OPTION_THUMB_ENTRY},
+  { "be8", no_argument, NULL, OPTION_BE8},
+'
+
+PARSE_AND_LIST_OPTIONS='
+  fprintf (file, _("  -p --no-pipeline-knowledge  Stop the linker knowing about the pipeline length\n"));
+  fprintf (file, _("     --thumb-entry=<sym>      Set the entry point to be Thumb symbol <sym>\n"));
+  fprintf (file, _("     --be8                    Oputput BE8 format image\n"));
+'
+
+PARSE_AND_LIST_ARGS_CASES='
+    case '\'p\'':
+      no_pipeline_knowledge = 1;
+      break;
+
+    case OPTION_THUMB_ENTRY:
+      thumb_entry_symbol = optarg;
+      break;
+
+    case OPTION_BE8:
+      byteswap_code = 1;
+      break;
+'
+
+# We have our own after_open and before_allocation functions, but they call
+# the standard routines, so give them a different name.
+LDEMUL_AFTER_OPEN=arm_elf_after_open
+LDEMUL_BEFORE_ALLOCATION=arm_elf_before_allocation
+
+# Replace the elf before_parse function with our own.
+LDEMUL_BEFORE_PARSE=gld"${EMULATION_NAME}"_before_parse
+
+# Call the extra arm-elf function
+LDEMUL_FINISH=arm_elf_finish
This page took 0.028005 seconds and 4 git commands to generate.