# This shell script emits a C file. -*- C -*- # It does some substitutions. fragment <<EOF /* intel coff loader emulation specific stuff Copyright 1991, 1992, 1994, 1995, 1996, 1999, 2000, 2001, 2002, 2003, 2005, 2007, 2008 Free Software Foundation, Inc. Written by Steve Chamberlain steve@cygnus.com This file is part of the GNU Binutils. 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 3 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., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ #include "sysdep.h" #include "libiberty.h" #include "bfd.h" #include "bfdlink.h" /*#include "archures.h"*/ #include "ld.h" #include "ldmain.h" #include "ldmisc.h" #include "ldexp.h" #include "ldlang.h" #include "ldfile.h" #include "ldemul.h" typedef struct lib_list { char *name; struct lib_list *next; } lib_list_type; static lib_list_type *hll_list; static lib_list_type **hll_list_tail = &hll_list; static lib_list_type *syslib_list; static lib_list_type **syslib_list_tail = &syslib_list; static void append (lib_list_type ***list, char *name) { lib_list_type *element = (lib_list_type *) xmalloc (sizeof (lib_list_type)); element->name = name; element->next = (lib_list_type *) NULL; **list = element; *list = &element->next; } static bfd_boolean had_hll = FALSE; static bfd_boolean had_hll_name = FALSE; static void lnk960_hll (char *name) { had_hll = TRUE; if (name != (char *) NULL) { had_hll_name = TRUE; append (&hll_list_tail, name); } } static void lnk960_syslib (char *name) { append (&syslib_list_tail, name); } static void lnk960_before_parse (void) { char *name = getenv ("I960BASE"); if (name == (char *) NULL) { name = getenv("G960BASE"); if (name == (char *) NULL) einfo ("%P%F I960BASE and G960BASE not set\n"); } ldfile_add_library_path (concat (name, "/lib", (const char *) NULL), FALSE); ldfile_output_architecture = bfd_arch_i960; ldfile_output_machine = bfd_mach_i960_core; } static void add_on (lib_list_type *list, lang_input_file_enum_type search) { while (list) { lang_add_input_file (list->name, search, (char *) NULL); list = list->next; } } static void lnk960_after_parse (void) { /* If there has been no arch, default to -KB */ if (ldfile_output_machine_name[0] == 0) ldfile_add_arch ("KB"); /* if there has been no hll list then add our own */ if (had_hll && !had_hll_name) { append (&hll_list_tail, "cg"); if (ldfile_output_machine == bfd_mach_i960_ka_sa || ldfile_output_machine == bfd_mach_i960_ca) append (&hll_list_tail, "fpg"); } add_on (hll_list, lang_input_file_is_l_enum); add_on (syslib_list, lang_input_file_is_search_file_enum); } static void lnk960_after_allocation (void) { if (!link_info.relocatable) { lang_abs_symbol_at_end_of (".text", "_etext"); lang_abs_symbol_at_end_of (".data", "_edata"); lang_abs_symbol_at_beginning_of (".bss", "_bss_start"); lang_abs_symbol_at_end_of (".bss", "_end"); } } static struct { unsigned long number; char *name; } machine_table[] = { { bfd_mach_i960_core ,"CORE" }, { bfd_mach_i960_kb_sb ,"KB" }, { bfd_mach_i960_kb_sb ,"SB" }, { bfd_mach_i960_mc ,"MC" }, { bfd_mach_i960_xa ,"XA" }, { bfd_mach_i960_ca ,"CA" }, { bfd_mach_i960_ka_sa ,"KA" }, { bfd_mach_i960_ka_sa ,"SA" }, { bfd_mach_i960_jx ,"JX" }, { bfd_mach_i960_hx ,"HX" }, { bfd_mach_i960_core ,"core" }, { bfd_mach_i960_kb_sb ,"kb" }, { bfd_mach_i960_kb_sb ,"sb" }, { bfd_mach_i960_mc ,"mc" }, { bfd_mach_i960_xa ,"xa" }, { bfd_mach_i960_ca ,"ca" }, { bfd_mach_i960_ka_sa ,"ka" }, { bfd_mach_i960_ka_sa ,"sa" }, { bfd_mach_i960_jx ,"jx" }, { bfd_mach_i960_hx ,"hx" }, { 0, (char *) NULL } }; static void lnk960_set_output_arch (void) { /* Set the output architecture and machine if possible */ unsigned int i; ldfile_output_machine = bfd_mach_i960_core; for (i= 0; machine_table[i].name != (char*) NULL; i++) { if (strcmp (ldfile_output_machine_name, machine_table[i].name) == 0) { ldfile_output_machine = machine_table[i].number; break; } } bfd_set_arch_mach (link_info.output_bfd, ldfile_output_architecture, ldfile_output_machine); } static char * lnk960_choose_target (int argc ATTRIBUTE_UNUSED, char **argv ATTRIBUTE_UNUSED) { char *from_outside = getenv (TARGET_ENVIRON); if (from_outside != (char *) NULL) return from_outside; #ifdef LNK960_LITTLE return "coff-Intel-little"; #else return "coff-Intel-big"; #endif } static char * lnk960_get_script (int *isfile) EOF if test -n "$COMPILE_IN" then # Scripts compiled in. # sed commands to quote an ld script as a C string. sc="-f stringify.sed" fragment <<EOF { *isfile = 0; if (link_info.relocatable && config.build_constructors) return EOF sed $sc ldscripts/${EMULATION_NAME}.xu >> e${EMULATION_NAME}.c echo ' ; else if (link_info.relocatable) 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. fragment <<EOF { *isfile = 1; if (link_info.relocatable && config.build_constructors) return "ldscripts/${EMULATION_NAME}.xu"; else if (link_info.relocatable) 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 fragment <<EOF struct ld_emulation_xfer_struct ld_lnk960_emulation = { lnk960_before_parse, lnk960_syslib, lnk960_hll, lnk960_after_parse, after_open_default, lnk960_after_allocation, lnk960_set_output_arch, lnk960_choose_target, before_allocation_default, lnk960_get_script, "lnk960", "", finish_default, NULL, /* create output section statements */ NULL, /* open dynamic archive */ NULL, /* place orphan */ NULL, /* set symbols */ NULL, /* parse args */ NULL, /* add_options */ NULL, /* handle_option */ NULL, /* unrecognized file */ NULL, /* list options */ NULL, /* recognized file */ NULL, /* find_potential_libraries */ NULL /* new_vers_pattern */ }; EOF