# This shell script emits a C file. -*- C -*- # It does some substitutions. fragment <<EOF /* This file is is generated by a shell script. DO NOT EDIT! */ /* Emulate the original gld for the given ${EMULATION_NAME} Copyright (C) 2014-2017 Free Software Foundation, Inc. Written by Steve Chamberlain steve@cygnus.com Extended for the MSP430 by Nick Clifton nickc@redhat.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. */ #define TARGET_IS_${EMULATION_NAME} #include "sysdep.h" #include "bfd.h" #include "bfdlink.h" #include "ld.h" #include "ldmain.h" #include "ldmisc.h" #include "ldexp.h" #include "ldlang.h" #include "ldfile.h" #include "ldemul.h" #include "libiberty.h" EOF # Import any needed special functions and/or overrides. # if test -n "$EXTRA_EM_FILE" ; then source_em ${srcdir}/emultempl/${EXTRA_EM_FILE}.em fi if test x"$LDEMUL_BEFORE_PARSE" != xgld"$EMULATION_NAME"_before_parse; then fragment <<EOF static void gld${EMULATION_NAME}_before_parse (void) { #ifndef TARGET_ /* I.e., if not generic. */ ldfile_set_output_arch ("`echo ${ARCH}`", bfd_arch_unknown); #endif /* not TARGET_ */ /* The MSP430 port *needs* linker relaxtion in order to cope with large functions where conditional branches do not fit into a +/- 1024 byte range. */ if (!bfd_link_relocatable (&link_info)) TARGET_ENABLE_RELAXATION; } EOF fi if test x"$LDEMUL_GET_SCRIPT" != xgld"$EMULATION_NAME"_get_script; then fragment <<EOF static char * gld${EMULATION_NAME}_get_script (int *isfile) EOF if test x"$COMPILE_IN" = xyes then # Scripts compiled in. # sed commands to quote an ld script as a C string. sc="-f stringify.sed" fragment <<EOF { *isfile = 0; if (bfd_link_relocatable (&link_info) && config.build_constructors) return EOF sed $sc ldscripts/${EMULATION_NAME}.xu >> e${EMULATION_NAME}.c echo ' ; else if (bfd_link_relocatable (&link_info)) 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 (bfd_link_relocatable (&link_info) && config.build_constructors) return "ldscripts/${EMULATION_NAME}.xu"; else if (bfd_link_relocatable (&link_info)) 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 fi if test x"$LDEMUL_PLACE_ORPHAN" != xgld"$EMULATION_NAME"_place_orphan; then fragment <<EOF /* Helper function for place_orphan that computes the size of sections already mapped to the given statement. */ static bfd_size_type scan_children (lang_statement_union_type * l) { bfd_size_type amount = 0; while (l != NULL) { switch (l->header.type) { case lang_input_section_enum: if (l->input_section.section->flags & SEC_ALLOC) amount += l->input_section.section->size; break; case lang_constructors_statement_enum: case lang_assignment_statement_enum: break; case lang_wild_statement_enum: amount += scan_children (l->wild_statement.children.head); break; default: fprintf (stderr, "msp430 orphan placer: unhandled lang type %d\n", l->header.type); break; } l = l->header.next; } return amount; } /* Place an orphan section. We use this to put .either sections into either their lower or their upper equivalents. */ static lang_output_section_statement_type * gld${EMULATION_NAME}_place_orphan (asection * s, const char * secname, int constraint) { char * lower_name; char * upper_name; char * name; char * buf = NULL; lang_output_section_statement_type * lower; lang_output_section_statement_type * upper; lang_output_section_statement_type * os; if ((s->flags & SEC_ALLOC) == 0) return NULL; if (bfd_link_relocatable (&link_info)) return NULL; /* If constraints are involved let the linker handle the placement normally. */ if (constraint != 0) return NULL; /* We only need special handling for .either sections. */ if (strncmp (secname, ".either.", 8) != 0) return NULL; /* Skip the .either prefix. */ secname += 7; /* Compute the names of the corresponding upper and lower sections. If the input section name contains another period, only use the part of the name before the second dot. */ if (strchr (secname + 1, '.') != NULL) { buf = name = xstrdup (secname); * strchr (name + 1, '.') = 0; } else name = (char *) secname; lower_name = concat (".lower", name, NULL); upper_name = concat (".upper", name, NULL); /* Find the corresponding lower and upper sections. */ lower = lang_output_section_find (lower_name); upper = lang_output_section_find (upper_name); /* If the upper section does not exist, try again without the suffix. */ if (upper == NULL) upper = lang_output_section_find (name); if (lower == NULL) { os = upper; if (upper == NULL) { einfo ("%P: error: no section named %s or %s in linker script\n", lower_name, upper_name); goto end; } } else if (upper == NULL) os = lower; else if (lower->region == NULL) os = lower; /* If the section is too big for the region containing the lower section then do not even try to use it. */ else if (lower->region->length < s->size) os = upper; else { bfd_size_type amount = 0; struct lang_output_section_statement_struct * p; amount += scan_children (lower->children.head); /* Also check forwards for other statements assigned to the same region. */ for (p = lower->next; p != NULL; p = p->next) if (p->region == lower->region) amount += scan_children (p->children.head); /* Scan backwards as well. */ for (p = lower->prev; p != NULL; p = p->prev) if (p->region == lower->region) amount += scan_children (p->children.head); if (amount + s->size >= lower->region->length) os = upper; else os = lower; } lang_add_section (& os->children, s, NULL, os); end: free (upper_name); free (lower_name); if (buf) free (buf); return os; } EOF fi fragment <<EOF struct ld_emulation_xfer_struct ld_${EMULATION_NAME}_emulation = { ${LDEMUL_BEFORE_PARSE-gld${EMULATION_NAME}_before_parse}, ${LDEMUL_SYSLIB-syslib_default}, ${LDEMUL_HLL-hll_default}, ${LDEMUL_AFTER_PARSE-after_parse_default}, ${LDEMUL_AFTER_OPEN-after_open_default}, ${LDEMUL_AFTER_ALLOCATION-after_allocation_default}, ${LDEMUL_SET_OUTPUT_ARCH-set_output_arch_default}, ${LDEMUL_CHOOSE_TARGET-ldemul_default_target}, ${LDEMUL_BEFORE_ALLOCATION-before_allocation_default}, ${LDEMUL_GET_SCRIPT-gld${EMULATION_NAME}_get_script}, "${EMULATION_NAME}", "${OUTPUT_FORMAT}", ${LDEMUL_FINISH-finish_default}, ${LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS-NULL}, ${LDEMUL_OPEN_DYNAMIC_ARCHIVE-NULL}, ${LDEMUL_PLACE_ORPHAN-gld${EMULATION_NAME}_place_orphan}, ${LDEMUL_SET_SYMBOLS-NULL}, ${LDEMUL_PARSE_ARGS-NULL}, ${LDEMUL_ADD_OPTIONS-NULL}, ${LDEMUL_HANDLE_OPTION-NULL}, ${LDEMUL_UNRECOGNIZED_FILE-NULL}, ${LDEMUL_LIST_OPTIONS-NULL}, ${LDEMUL_RECOGNIZED_FILE-NULL}, ${LDEMUL_FIND_POTENTIAL_LIBRARIES-NULL}, ${LDEMUL_NEW_VERS_PATTERN-NULL}, ${LDEMUL_EXTRA_MAP_FILE_TEXT-NULL} }; EOF # # Local Variables: # mode: c # End: