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