ld/emultempl/lnk960.em

   1 # This shell script emits a C file. -*- C -*-
   2 # It does some substitutions.
   3 fragment <<EOF
   4 /* intel coff loader emulation specific stuff
   5    Copyright 1991, 1992, 1994, 1995, 1996, 1999, 2000, 2001, 2002, 2003,
   6    2005, 2007 Free Software Foundation, Inc.
   7    Written by Steve Chamberlain steve@cygnus.com
   8
   9    This file is part of the GNU Binutils.
  10
  11    This program is free software; you can redistribute it and/or modify
  12    it under the terms of the GNU General Public License as published by
  13    the Free Software Foundation; either version 3 of the License, or
  14    (at your option) any later version.
  15
  16    This program is distributed in the hope that it will be useful,
  17    but WITHOUT ANY WARRANTY; without even the implied warranty of
  18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19    GNU General Public License for more details.
  20
  21    You should have received a copy of the GNU General Public License
  22    along with this program; if not, write to the Free Software
  23    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  24    MA 02110-1301, USA.  */
  25
  26 #include "sysdep.h"
  27 #include "libiberty.h"
  28 #include "bfd.h"
  29 #include "bfdlink.h"
  30
  31 /*#include "archures.h"*/
  32 #include "ld.h"
  33 #include "ldmain.h"
  34 #include "ldmisc.h"
  35 #include "ldexp.h"
  36 #include "ldlang.h"
  37 #include "ldfile.h"
  38 #include "ldemul.h"
  39
  40 typedef struct lib_list {
  41   char *name;
  42   struct lib_list *next;
  43 } lib_list_type;
  44
  45 static lib_list_type *hll_list;
  46 static lib_list_type **hll_list_tail = &hll_list;
  47
  48 static lib_list_type *syslib_list;
  49 static lib_list_type **syslib_list_tail = &syslib_list;
  50
  51
  52 static void
  53 append (lib_list_type ***list, char *name)
  54 {
  55   lib_list_type *element = (lib_list_type *) xmalloc (sizeof (lib_list_type));
  56
  57   element->name = name;
  58   element->next = (lib_list_type *) NULL;
  59   **list = element;
  60   *list = &element->next;
  61
  62 }
  63
  64 static bfd_boolean had_hll = FALSE;
  65 static bfd_boolean had_hll_name = FALSE;
  66
  67 static void
  68 lnk960_hll (char *name)
  69 {
  70   had_hll = TRUE;
  71   if (name != (char *) NULL)
  72     {
  73       had_hll_name = TRUE;
  74       append (&hll_list_tail, name);
  75     }
  76 }
  77
  78 static void
  79 lnk960_syslib (char *name)
  80 {
  81   append (&syslib_list_tail, name);
  82 }
  83
  84
  85 static void
  86 lnk960_before_parse (void)
  87 {
  88   char *name = getenv ("I960BASE");
  89
  90   if (name == (char *) NULL)
  91     {
  92       name = getenv("G960BASE");
  93       if (name == (char *) NULL)
  94         einfo ("%P%F I960BASE and G960BASE not set\n");
  95     }
  96
  97   ldfile_add_library_path (concat (name, "/lib", NULL), FALSE);
  98   ldfile_output_architecture = bfd_arch_i960;
  99   ldfile_output_machine = bfd_mach_i960_core;
 100 }
 101
 102 static void
 103 add_on (lib_list_type *list, lang_input_file_enum_type search)
 104 {
 105   while (list)
 106     {
 107       lang_add_input_file (list->name, search, (char *) NULL);
 108       list = list->next;
 109     }
 110 }
 111
 112 static void
 113 lnk960_after_parse (void)
 114 {
 115   /* If there has been no arch, default to -KB */
 116   if (ldfile_output_machine_name[0] == 0)
 117     ldfile_add_arch ("KB");
 118
 119   /* if there has been no hll list then add our own */
 120
 121   if (had_hll && !had_hll_name)
 122     {
 123       append (&hll_list_tail, "cg");
 124       if (ldfile_output_machine == bfd_mach_i960_ka_sa
 125           || ldfile_output_machine == bfd_mach_i960_ca)
 126         append (&hll_list_tail, "fpg");
 127     }
 128
 129   add_on (hll_list, lang_input_file_is_l_enum);
 130   add_on (syslib_list, lang_input_file_is_search_file_enum);
 131 }
 132
 133 static void
 134 lnk960_after_allocation (void)
 135 {
 136   if (!link_info.relocatable)
 137     {
 138       lang_abs_symbol_at_end_of (".text", "_etext");
 139       lang_abs_symbol_at_end_of (".data", "_edata");
 140       lang_abs_symbol_at_beginning_of (".bss", "_bss_start");
 141       lang_abs_symbol_at_end_of (".bss", "_end");
 142     }
 143 }
 144
 145
 146 static struct
 147  {
 148    unsigned  long number;
 149    char *name;
 150  }
 151 machine_table[] =
 152 {
 153   { bfd_mach_i960_core  ,"CORE" },
 154   { bfd_mach_i960_kb_sb ,"KB" },
 155   { bfd_mach_i960_kb_sb ,"SB" },
 156   { bfd_mach_i960_mc    ,"MC" },
 157   { bfd_mach_i960_xa    ,"XA" },
 158   { bfd_mach_i960_ca    ,"CA" },
 159   { bfd_mach_i960_ka_sa ,"KA" },
 160   { bfd_mach_i960_ka_sa ,"SA" },
 161   { bfd_mach_i960_jx    ,"JX" },
 162   { bfd_mach_i960_hx    ,"HX" },
 163
 164   { bfd_mach_i960_core  ,"core" },
 165   { bfd_mach_i960_kb_sb ,"kb" },
 166   { bfd_mach_i960_kb_sb ,"sb" },
 167   { bfd_mach_i960_mc    ,"mc" },
 168   { bfd_mach_i960_xa    ,"xa" },
 169   { bfd_mach_i960_ca    ,"ca" },
 170   { bfd_mach_i960_ka_sa ,"ka" },
 171   { bfd_mach_i960_ka_sa ,"sa" },
 172   { bfd_mach_i960_jx    ,"jx" },
 173   { bfd_mach_i960_hx    ,"hx" },
 174
 175   { 0, (char *) NULL }
 176 };
 177
 178 static void
 179 lnk960_set_output_arch (void)
 180 {
 181   /* Set the output architecture and machine if possible */
 182   unsigned int i;
 183   ldfile_output_machine = bfd_mach_i960_core;
 184   for (i= 0; machine_table[i].name != (char*) NULL; i++)
 185     {
 186       if (strcmp (ldfile_output_machine_name, machine_table[i].name) == 0)
 187         {
 188           ldfile_output_machine = machine_table[i].number;
 189           break;
 190         }
 191     }
 192   bfd_set_arch_mach (output_bfd, ldfile_output_architecture,
 193                      ldfile_output_machine);
 194 }
 195
 196 static char *
 197 lnk960_choose_target (int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED)
 198 {
 199   char *from_outside = getenv (TARGET_ENVIRON);
 200   if (from_outside != (char *) NULL)
 201     return from_outside;
 202 #ifdef LNK960_LITTLE
 203   return "coff-Intel-little";
 204 #else
 205   return "coff-Intel-big";
 206 #endif
 207 }
 208
 209 static char *
 210 lnk960_get_script (int *isfile)
 211 EOF
 212
 213 if test -n "$COMPILE_IN"
 214 then
 215 # Scripts compiled in.
 216
 217 # sed commands to quote an ld script as a C string.
 218 sc="-f stringify.sed"
 219
 220 fragment <<EOF
 221 {
 222   *isfile = 0;
 223
 224   if (link_info.relocatable && config.build_constructors)
 225     return
 226 EOF
 227 sed $sc ldscripts/${EMULATION_NAME}.xu                 >> e${EMULATION_NAME}.c
 228 echo '  ; else if (link_info.relocatable) return'     >> e${EMULATION_NAME}.c
 229 sed $sc ldscripts/${EMULATION_NAME}.xr                 >> e${EMULATION_NAME}.c
 230 echo '  ; else if (!config.text_read_only) return'     >> e${EMULATION_NAME}.c
 231 sed $sc ldscripts/${EMULATION_NAME}.xbn                >> e${EMULATION_NAME}.c
 232 echo '  ; else if (!config.magic_demand_paged) return' >> e${EMULATION_NAME}.c
 233 sed $sc ldscripts/${EMULATION_NAME}.xn                 >> e${EMULATION_NAME}.c
 234 echo '  ; else return'                                 >> e${EMULATION_NAME}.c
 235 sed $sc ldscripts/${EMULATION_NAME}.x                  >> e${EMULATION_NAME}.c
 236 echo '; }'                                             >> e${EMULATION_NAME}.c
 237
 238 else
 239 # Scripts read from the filesystem.
 240
 241 fragment <<EOF
 242 {
 243   *isfile = 1;
 244
 245   if (link_info.relocatable && config.build_constructors)
 246     return "ldscripts/${EMULATION_NAME}.xu";
 247   else if (link_info.relocatable)
 248     return "ldscripts/${EMULATION_NAME}.xr";
 249   else if (!config.text_read_only)
 250     return "ldscripts/${EMULATION_NAME}.xbn";
 251   else if (!config.magic_demand_paged)
 252     return "ldscripts/${EMULATION_NAME}.xn";
 253   else
 254     return "ldscripts/${EMULATION_NAME}.x";
 255 }
 256 EOF
 257
 258 fi
 259
 260 fragment <<EOF
 261
 262 struct ld_emulation_xfer_struct ld_lnk960_emulation =
 263 {
 264   lnk960_before_parse,
 265   lnk960_syslib,
 266   lnk960_hll,
 267   lnk960_after_parse,
 268   NULL,                 /* after_open */
 269   lnk960_after_allocation,
 270   lnk960_set_output_arch,
 271   lnk960_choose_target,
 272   before_allocation_default,
 273   lnk960_get_script,
 274   "lnk960",
 275   "",
 276   finish_default,
 277   NULL, /* create output section statements */
 278   NULL, /* open dynamic archive */
 279   NULL, /* place orphan */
 280   NULL, /* set symbols */
 281   NULL, /* parse args */
 282   NULL, /* add_options */
 283   NULL, /* handle_option */
 284   NULL, /* unrecognized file */
 285   NULL, /* list options */
 286   NULL, /* recognized file */
 287   NULL, /* find_potential_libraries */
 288   NULL  /* new_vers_pattern */
 289 };
 290 EOF