# This shell script emits a C file. -*- C -*- # It does some substitutions. cat >e${EMULATION_NAME}.c <<EOF /* intel coff loader emulation specific stuff Copyright (C) 1991, 93, 94, 95, 96, 99, 2000 Free Software Foundation, Inc. Written by Steve Chamberlain steve@cygnus.com This file is part of GLD, the Gnu Linker. GLD 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, or (at your option) any later version. GLD 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 GLD; see the file COPYING. If not, write to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include "libiberty.h" #include "bfd.h" #include "sysdep.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(list, name) 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 boolean had_hll = false; static boolean had_hll_name = false; static void lnk960_hll(name) char *name; { had_hll = true; if (name != (char *)NULL) { had_hll_name = true; append(&hll_list_tail, name); } } static void lnk960_syslib(name) char *name; { append(&syslib_list_tail,name); } #ifdef GNU960 static void lnk960_before_parse() { static char *env_variables[] = { "G960LIB", "G960BASE", 0 }; char **p; char *env ; for ( p = env_variables; *p; p++ ){ env = (char *) getenv(*p); if (env) { ldfile_add_library_path(concat(env,"/lib/libcoff",""), false); } } env= (char *) getenv("I960BASE"); if ( env ) { ldfile_add_library_path(concat(env,"/lib",""), false); } ldfile_output_architecture = bfd_arch_i960; ldfile_output_machine = bfd_mach_i960_core; } #else /* not GNU960 */ static void lnk960_before_parse() { 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",""), false); ldfile_output_architecture = bfd_arch_i960; ldfile_output_machine = bfd_mach_i960_core; } #endif /* GNU960 */ static void add_on(list, search) 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() { /* 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_before_allocation() { } static void lnk960_after_allocation() { if (link_info.relocateable == false) { 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() { /* 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(output_bfd, ldfile_output_architecture, ldfile_output_machine); } static char * lnk960_choose_target() { #ifdef GNU960 return bfd_make_targ_name(BFD_COFF_FORMAT, 0); #else 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 #endif } static char * lnk960_get_script(isfile) 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" cat >>e${EMULATION_NAME}.c <<EOF { *isfile = 0; 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. 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 fi cat >>e${EMULATION_NAME}.c <<EOF struct ld_emulation_xfer_struct ld_lnk960_emulation = { lnk960_before_parse, lnk960_syslib, lnk960_hll, lnk960_after_parse, NULL, /* after_open */ lnk960_after_allocation, lnk960_set_output_arch, lnk960_choose_target, lnk960_before_allocation, lnk960_get_script, "lnk960", "", NULL, /* finish */ NULL, /* create output section statements */ NULL, /* open dynamic archive */ NULL, /* place orphan */ NULL, /* set symbols */ NULL, /* parse args */ NULL, /* unrecognized file */ NULL, /* list options */ NULL, /* recognized file */ NULL /* find_potential_libraries */ }; EOF