ld/emultempl/linux.em

   1 # This shell script emits a C file. -*- C -*-
   2 # It does some substitutions.
   3 if [ -z "$MACHINE" ]; then
   4   OUTPUT_ARCH=${ARCH}
   5 else
   6   OUTPUT_ARCH=${ARCH}:${MACHINE}
   7 fi
   8 cat >e${EMULATION_NAME}.c <<EOF
   9 /* This file is is generated by a shell script.  DO NOT EDIT! */
  10
  11 /* Linux a.out emulation code for ${EMULATION_NAME}
  12    Copyright 1991, 1993, 1994, 1995, 1996, 1998, 1999, 2000
  13    Free Software Foundation, Inc.
  14    Written by Steve Chamberlain <sac@cygnus.com>
  15    Linux support by Eric Youngdale <ericy@cais.cais.com>
  16
  17 This file is part of GLD, the Gnu Linker.
  18
  19 This program is free software; you can redistribute it and/or modify
  20 it under the terms of the GNU General Public License as published by
  21 the Free Software Foundation; either version 2 of the License, or
  22 (at your option) any later version.
  23
  24 This program is distributed in the hope that it will be useful,
  25 but WITHOUT ANY WARRANTY; without even the implied warranty of
  26 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27 GNU General Public License for more details.
  28
  29 You should have received a copy of the GNU General Public License
  30 along with this program; if not, write to the Free Software
  31 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  32
  33 #define TARGET_IS_${EMULATION_NAME}
  34
  35 #include "bfd.h"
  36 #include "sysdep.h"
  37 #include "bfdlink.h"
  38
  39 #include "ld.h"
  40 #include "ldmain.h"
  41 #include "ldmisc.h"
  42 #include "ldexp.h"
  43 #include "ldlang.h"
  44 #include "ldfile.h"
  45 #include "ldemul.h"
  46
  47 static void gld${EMULATION_NAME}_before_parse PARAMS ((void));
  48 static boolean gld${EMULATION_NAME}_open_dynamic_archive
  49   PARAMS ((const char *, search_dirs_type *, lang_input_statement_type *));
  50 static void gld${EMULATION_NAME}_find_address_statement
  51   PARAMS ((lang_statement_union_type *));
  52 static void gld${EMULATION_NAME}_create_output_section_statements
  53   PARAMS ((void));
  54 static void gld${EMULATION_NAME}_before_allocation PARAMS ((void));
  55 static char *gld${EMULATION_NAME}_get_script PARAMS ((int *isfile));
  56
  57 static void
  58 gld${EMULATION_NAME}_before_parse()
  59 {
  60   const bfd_arch_info_type *arch = bfd_scan_arch ("${OUTPUT_ARCH}");
  61   if (arch)
  62     {
  63       ldfile_output_architecture = arch->arch;
  64       ldfile_output_machine = arch->mach;
  65       ldfile_output_machine_name = arch->printable_name;
  66     }
  67   else
  68     ldfile_output_architecture = bfd_arch_${ARCH};
  69   config.dynamic_link = true;
  70   config.has_shared = true;
  71 }
  72
  73 /* Try to open a dynamic archive.  This is where we know that Linux
  74    dynamic libraries have an extension of .sa.  */
  75
  76 static boolean
  77 gld${EMULATION_NAME}_open_dynamic_archive (arch, search, entry)
  78      const char *arch;
  79      search_dirs_type *search;
  80      lang_input_statement_type *entry;
  81 {
  82   char *string;
  83
  84   if (! entry->is_archive)
  85     return false;
  86
  87   string = (char *) xmalloc (strlen (search->name)
  88                              + strlen (entry->filename)
  89                              + strlen (arch)
  90                              + sizeof "/lib.sa");
  91
  92   sprintf (string, "%s/lib%s%s.sa", search->name, entry->filename, arch);
  93
  94   if (! ldfile_try_open_bfd (string, entry))
  95     {
  96       free (string);
  97       return false;
  98     }
  99
 100   entry->filename = string;
 101
 102   return true;
 103 }
 104
 105 /* This is called by the create_output_section_statements routine via
 106    lang_for_each_statement.  It locates any address assignment to
 107    .text, and modifies it to include the size of the headers.  This
 108    causes -Ttext to mean the starting address of the header, rather
 109    than the starting address of .text, which is compatible with other
 110    Linux tools.  */
 111
 112 static void
 113 gld${EMULATION_NAME}_find_address_statement (s)
 114      lang_statement_union_type *s;
 115 {
 116   if (s->header.type == lang_address_statement_enum
 117       && strcmp (s->address_statement.section_name, ".text") == 0)
 118     {
 119       ASSERT (s->address_statement.address->type.node_class == etree_value);
 120       s->address_statement.address->value.value += 0x20;
 121     }
 122 }
 123
 124 /* This is called before opening the input BFD's.  */
 125
 126 static void
 127 gld${EMULATION_NAME}_create_output_section_statements ()
 128 {
 129   lang_for_each_statement (gld${EMULATION_NAME}_find_address_statement);
 130 }
 131
 132 /* This is called after the sections have been attached to output
 133    sections, but before any sizes or addresses have been set.  */
 134
 135 static void
 136 gld${EMULATION_NAME}_before_allocation ()
 137 {
 138   if (link_info.relocateable)
 139     return;
 140
 141   /* Let the backend work out the sizes of any sections required by
 142      dynamic linking.  */
 143   if (! bfd_${EMULATION_NAME}_size_dynamic_sections (output_bfd, &link_info))
 144     einfo ("%P%F: failed to set dynamic section sizes: %E\n");
 145 }
 146
 147 static char *
 148 gld${EMULATION_NAME}_get_script(isfile)
 149      int *isfile;
 150 EOF
 151
 152 if test -n "$COMPILE_IN"
 153 then
 154 # Scripts compiled in.
 155
 156 # sed commands to quote an ld script as a C string.
 157 sc="-f stringify.sed"
 158
 159 cat >>e${EMULATION_NAME}.c <<EOF
 160 {
 161   *isfile = 0;
 162
 163   if (link_info.relocateable == true && config.build_constructors == true)
 164     return
 165 EOF
 166 sed $sc ldscripts/${EMULATION_NAME}.xu                     >> e${EMULATION_NAME}.c
 167 echo '  ; else if (link_info.relocateable == true) return' >> e${EMULATION_NAME}.c
 168 sed $sc ldscripts/${EMULATION_NAME}.xr                     >> e${EMULATION_NAME}.c
 169 echo '  ; else if (!config.text_read_only) return'         >> e${EMULATION_NAME}.c
 170 sed $sc ldscripts/${EMULATION_NAME}.xbn                    >> e${EMULATION_NAME}.c
 171 echo '  ; else if (!config.magic_demand_paged) return'     >> e${EMULATION_NAME}.c
 172 sed $sc ldscripts/${EMULATION_NAME}.xn                     >> e${EMULATION_NAME}.c
 173 echo '  ; else return'                                     >> e${EMULATION_NAME}.c
 174 sed $sc ldscripts/${EMULATION_NAME}.x                      >> e${EMULATION_NAME}.c
 175 echo '; }'                                                 >> e${EMULATION_NAME}.c
 176
 177 else
 178 # Scripts read from the filesystem.
 179
 180 cat >>e${EMULATION_NAME}.c <<EOF
 181 {
 182   *isfile = 1;
 183
 184   if (link_info.relocateable == true && config.build_constructors == true)
 185     return "ldscripts/${EMULATION_NAME}.xu";
 186   else if (link_info.relocateable == true)
 187     return "ldscripts/${EMULATION_NAME}.xr";
 188   else if (!config.text_read_only)
 189     return "ldscripts/${EMULATION_NAME}.xbn";
 190   else if (!config.magic_demand_paged)
 191     return "ldscripts/${EMULATION_NAME}.xn";
 192   else
 193     return "ldscripts/${EMULATION_NAME}.x";
 194 }
 195 EOF
 196
 197 fi
 198
 199 cat >>e${EMULATION_NAME}.c <<EOF
 200
 201 struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation =
 202 {
 203   gld${EMULATION_NAME}_before_parse,
 204   syslib_default,
 205   hll_default,
 206   after_parse_default,
 207   after_open_default,
 208   after_allocation_default,
 209   set_output_arch_default,
 210   ldemul_default_target,
 211   gld${EMULATION_NAME}_before_allocation,
 212   gld${EMULATION_NAME}_get_script,
 213   "${EMULATION_NAME}",
 214   "${OUTPUT_FORMAT}",
 215   NULL, /* finish */
 216   gld${EMULATION_NAME}_create_output_section_statements,
 217   gld${EMULATION_NAME}_open_dynamic_archive,
 218   NULL, /* place orphan */
 219   NULL, /* set symbols */
 220   NULL, /* parse args */
 221   NULL, /* unrecognized file */
 222   NULL, /* list options */
 223   NULL, /* recognized file */
 224   NULL  /* find_potential_libraries */
 225 };
 226 EOF