ld/emultempl/armcoff.em

   1 # This shell script emits a C file. -*- C -*-
   2 # It does some substitutions.
   3 cat >e${EMULATION_NAME}.c <<EOF
   4 /* This file is is generated by a shell script.  DO NOT EDIT! */
   5
   6 /* emulate the original gld for the given ${EMULATION_NAME}
   7    Copyright 1991, 1993, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
   8    Free Software Foundation, Inc.
   9    Written by Steve Chamberlain steve@cygnus.com
  10
  11 This file is part of GLD, the Gnu Linker.
  12
  13 This program is free software; you can redistribute it and/or modify
  14 it under the terms of the GNU General Public License as published by
  15 the Free Software Foundation; either version 2 of the License, or
  16 (at your option) any later version.
  17
  18 This program is distributed in the hope that it will be useful,
  19 but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 GNU General Public License for more details.
  22
  23 You should have received a copy of the GNU General Public License
  24 along with this program; if not, write to the Free Software
  25 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  26
  27 #define TARGET_IS_${EMULATION_NAME}
  28
  29 #include "bfd.h"
  30 #include "sysdep.h"
  31 #include "bfdlink.h"
  32 #include "getopt.h"
  33
  34 #include "ld.h"
  35 #include "ldmain.h"
  36 #include "ldmisc.h"
  37
  38 #include "ldexp.h"
  39 #include "ldlang.h"
  40 #include "ldfile.h"
  41 #include "ldemul.h"
  42
  43 static void gld${EMULATION_NAME}_before_parse PARAMS ((void));
  44 static void gld${EMULATION_NAME}_before_allocation PARAMS ((void));
  45 static char *gld${EMULATION_NAME}_get_script PARAMS ((int *isfile));
  46 static void gld${EMULATION_NAME}_add_options
  47   PARAMS ((int, char **, int, struct option **, int, struct option **));
  48 static void gld${EMULATION_NAME}_list_options PARAMS ((FILE *));
  49 static bfd_boolean gld${EMULATION_NAME}_handle_option PARAMS ((int));
  50 static void gld${EMULATION_NAME}_finish PARAMS ((void));
  51 static void gld${EMULATION_NAME}_after_open PARAMS ((void));
  52
  53 /* If TRUE, then interworking stubs which support calls to old, non-interworking
  54    aware ARM code should be generated.  */
  55
  56 static int support_old_code = 0;
  57 static char * thumb_entry_symbol = NULL;
  58
  59 #define OPTION_SUPPORT_OLD_CODE         300
  60 #define OPTION_THUMB_ENTRY              301
  61
  62 static void
  63 gld${EMULATION_NAME}_add_options (ns, shortopts, nl, longopts, nrl, really_longopts)
  64      int ns ATTRIBUTE_UNUSED;
  65      char **shortopts ATTRIBUTE_UNUSED;
  66      int nl;
  67      struct option **longopts;
  68      int nrl ATTRIBUTE_UNUSED;
  69      struct option **really_longopts ATTRIBUTE_UNUSED;
  70 {
  71   static const struct option xtra_long[] = {
  72     {"support-old-code", no_argument, NULL, OPTION_SUPPORT_OLD_CODE},
  73     {"thumb-entry", required_argument, NULL, OPTION_THUMB_ENTRY},
  74     {NULL, no_argument, NULL, 0}
  75   };
  76
  77   *longopts = (struct option *)
  78     xrealloc (*longopts, nl * sizeof (struct option) + sizeof (xtra_long));
  79   memcpy (*longopts + nl, &xtra_long, sizeof (xtra_long));
  80 }
  81
  82 static void
  83 gld${EMULATION_NAME}_list_options (file)
  84      FILE * file;
  85 {
  86   fprintf (file, _("  --support-old-code   Support interworking with old code\n"));
  87   fprintf (file, _("  --thumb-entry=<sym>  Set the entry point to be Thumb symbol <sym>\n"));
  88 }
  89
  90 static bfd_boolean
  91 gld${EMULATION_NAME}_handle_option (optc)
  92      int optc;
  93 {
  94   switch (optc)
  95     {
  96     default:
  97       return FALSE;
  98
  99     case OPTION_SUPPORT_OLD_CODE:
 100       support_old_code = 1;
 101       break;
 102
 103     case OPTION_THUMB_ENTRY:
 104       thumb_entry_symbol = optarg;
 105       break;
 106     }
 107
 108   return TRUE;
 109 }
 110 \f
 111 static void
 112 gld${EMULATION_NAME}_before_parse ()
 113 {
 114 #ifndef TARGET_                 /* I.e., if not generic.  */
 115   ldfile_set_output_arch ("`echo ${ARCH}`");
 116 #endif /* not TARGET_ */
 117 }
 118
 119 /* This is called after the sections have been attached to output
 120    sections, but before any sizes or addresses have been set.  */
 121
 122 static void
 123 gld${EMULATION_NAME}_before_allocation ()
 124 {
 125   /* we should be able to set the size of the interworking stub section */
 126
 127   /* Here we rummage through the found bfds to collect glue information */
 128   /* FIXME: should this be based on a command line option? krk@cygnus.com */
 129   {
 130     LANG_FOR_EACH_INPUT_STATEMENT (is)
 131       {
 132         if (! bfd_arm_process_before_allocation
 133             (is->the_bfd, & link_info, support_old_code))
 134           {
 135             /* xgettext:c-format */
 136             einfo (_("Errors encountered processing file %s"), is->filename);
 137           }
 138       }
 139   }
 140
 141   /* We have seen it all. Allocate it, and carry on */
 142   bfd_arm_allocate_interworking_sections (& link_info);
 143 }
 144
 145 static void
 146 gld${EMULATION_NAME}_after_open ()
 147 {
 148   if (strstr (bfd_get_target (output_bfd), "arm") == NULL)
 149     {
 150       /* The arm backend needs special fields in the output hash structure.
 151          These will only be created if the output format is an arm format,
 152          hence we do not support linking and changing output formats at the
 153          same time.  Use a link followed by objcopy to change output formats.  */
 154       einfo ("%F%X%P: error: cannot change output format whilst linking ARM binaries\n");
 155       return;
 156     }
 157
 158   {
 159     LANG_FOR_EACH_INPUT_STATEMENT (is)
 160       {
 161         if (bfd_arm_get_bfd_for_interworking (is->the_bfd, & link_info))
 162           break;
 163       }
 164   }
 165 }
 166
 167 static void
 168 gld${EMULATION_NAME}_finish PARAMS((void))
 169 {
 170   struct bfd_link_hash_entry * h;
 171
 172   if (thumb_entry_symbol == NULL)
 173     return;
 174
 175   h = bfd_link_hash_lookup (link_info.hash, thumb_entry_symbol,
 176                             FALSE, FALSE, TRUE);
 177
 178   if (h != (struct bfd_link_hash_entry *) NULL
 179       && (h->type == bfd_link_hash_defined
 180           || h->type == bfd_link_hash_defweak)
 181       && h->u.def.section->output_section != NULL)
 182     {
 183       static char buffer[32];
 184       bfd_vma val;
 185
 186       /* Special procesing is required for a Thumb entry symbol.  The
 187          bottom bit of its address must be set.  */
 188       val = (h->u.def.value
 189              + bfd_get_section_vma (output_bfd,
 190                                     h->u.def.section->output_section)
 191              + h->u.def.section->output_offset);
 192
 193       val |= 1;
 194
 195       /* Now convert this value into a string and store it in entry_symbol
 196          where the lang_finish() function will pick it up.  */
 197       buffer[0] = '0';
 198       buffer[1] = 'x';
 199
 200       sprintf_vma (buffer + 2, val);
 201
 202       if (entry_symbol.name != NULL && entry_from_cmdline)
 203         einfo (_("%P: warning: '--thumb-entry %s' is overriding '-e %s'\n"),
 204                thumb_entry_symbol, entry_symbol.name);
 205       entry_symbol.name = buffer;
 206     }
 207   else
 208     einfo (_("%P: warning: connot find thumb start symbol %s\n"), thumb_entry_symbol);
 209 }
 210
 211 static char *
 212 gld${EMULATION_NAME}_get_script (isfile)
 213      int *isfile;
 214 EOF
 215
 216 if test -n "$COMPILE_IN"
 217 then
 218 # Scripts compiled in.
 219
 220 # sed commands to quote an ld script as a C string.
 221 sc="-f stringify.sed"
 222
 223 cat >>e${EMULATION_NAME}.c <<EOF
 224 {
 225   *isfile = 0;
 226
 227   if (link_info.relocatable && config.build_constructors)
 228     return
 229 EOF
 230 sed $sc ldscripts/${EMULATION_NAME}.xu                 >> e${EMULATION_NAME}.c
 231 echo '  ; else if (link_info.relocatable) return'     >> e${EMULATION_NAME}.c
 232 sed $sc ldscripts/${EMULATION_NAME}.xr                 >> e${EMULATION_NAME}.c
 233 echo '  ; else if (!config.text_read_only) return'     >> e${EMULATION_NAME}.c
 234 sed $sc ldscripts/${EMULATION_NAME}.xbn                >> e${EMULATION_NAME}.c
 235 echo '  ; else if (!config.magic_demand_paged) return' >> e${EMULATION_NAME}.c
 236 sed $sc ldscripts/${EMULATION_NAME}.xn                 >> e${EMULATION_NAME}.c
 237 echo '  ; else return'                                 >> e${EMULATION_NAME}.c
 238 sed $sc ldscripts/${EMULATION_NAME}.x                  >> e${EMULATION_NAME}.c
 239 echo '; }'                                             >> e${EMULATION_NAME}.c
 240
 241 else
 242 # Scripts read from the filesystem.
 243
 244 cat >>e${EMULATION_NAME}.c <<EOF
 245 {
 246   *isfile = 1;
 247
 248   if (link_info.relocatable && config.build_constructors)
 249     return "ldscripts/${EMULATION_NAME}.xu";
 250   else if (link_info.relocatable)
 251     return "ldscripts/${EMULATION_NAME}.xr";
 252   else if (!config.text_read_only)
 253     return "ldscripts/${EMULATION_NAME}.xbn";
 254   else if (!config.magic_demand_paged)
 255     return "ldscripts/${EMULATION_NAME}.xn";
 256   else
 257     return "ldscripts/${EMULATION_NAME}.x";
 258 }
 259 EOF
 260
 261 fi
 262
 263 cat >>e${EMULATION_NAME}.c <<EOF
 264
 265 struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation =
 266 {
 267   gld${EMULATION_NAME}_before_parse,
 268   syslib_default,
 269   hll_default,
 270   after_parse_default,
 271   gld${EMULATION_NAME}_after_open,
 272   after_allocation_default,
 273   set_output_arch_default,
 274   ldemul_default_target,
 275   gld${EMULATION_NAME}_before_allocation,
 276   gld${EMULATION_NAME}_get_script,
 277   "${EMULATION_NAME}",
 278   "${OUTPUT_FORMAT}",
 279   gld${EMULATION_NAME}_finish,
 280   NULL, /* create output section statements */
 281   NULL, /* open dynamic archive */
 282   NULL, /* place orphan */
 283   NULL, /* set symbols */
 284   NULL, /* parse_args */
 285   gld${EMULATION_NAME}_add_options,
 286   gld${EMULATION_NAME}_handle_option,
 287   NULL, /* unrecognised file */
 288   gld${EMULATION_NAME}_list_options,
 289   NULL, /* recognized file */
 290   NULL, /* find_potential_libraries */
 291   NULL  /* new_vers_pattern */
 292 };
 293 EOF