X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fgcc.c;h=9538c620a73b9b6f585c179571eac72e44b199c0;hb=a11012593e4f48eab77adfd4cbd3761edd630755;hp=1b79f5486b7b3d018bfde3dbd29dfa86130d30b2;hpb=4e6a6999ccefa847c97640111c3319149e368995;p=pf3gnuchains%2Fgcc-fork.git diff --git a/gcc/gcc.c b/gcc/gcc.c index 1b79f5486b7..9538c620a73 100644 --- a/gcc/gcc.c +++ b/gcc/gcc.c @@ -1,6 +1,6 @@ /* Compiler driver program that can handle many languages. Copyright (C) 1987, 1989, 1992, 1993, 1994, 1995, 1996, 1997, 1998, - 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. + 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc. This file is part of GCC. @@ -73,6 +73,7 @@ compilation is specified by a string called a "spec". */ #include "config.h" #include "system.h" #include "coretypes.h" +#include "multilib.h" /* before tm.h */ #include "tm.h" #include #if ! defined( SIGCHLD ) && defined( SIGCLD ) @@ -88,7 +89,7 @@ compilation is specified by a string called a "spec". */ #include #endif #if defined (HAVE_DECL_GETRUSAGE) && !HAVE_DECL_GETRUSAGE -extern int getrusage PARAMS ((int, struct rusage *)); +extern int getrusage (int, struct rusage *); #endif /* By default there is no special suffix for target executables. */ @@ -111,14 +112,6 @@ extern int getrusage PARAMS ((int, struct rusage *)); #define TARGET_OBJECT_SUFFIX ".o" #endif -#ifndef VMS -/* FIXME: the location independence code for VMS is hairier than this, - and hasn't been written. */ -#ifndef DIR_UP -#define DIR_UP ".." -#endif /* DIR_UP */ -#endif /* VMS */ - static const char dir_separator_str[] = { DIR_SEPARATOR, 0 }; /* Most every one is fine with LIBRARY_PATH. For some, it conflicts. */ @@ -212,6 +205,14 @@ static const char *target_system_root = 0; static int target_system_root_changed; +/* Nonzero means append this string to target_system_root. */ + +static const char *target_sysroot_suffix = 0; + +/* Nonzero means append this string to target_system_root for headers. */ + +static const char *target_sysroot_hdrs_suffix = 0; + /* Nonzero means write "temp" files in source directory and use the source file's name in them, and don't delete them. */ @@ -286,81 +287,74 @@ static struct rusage rus, prus; /* Forward declaration for prototypes. */ struct path_prefix; -static void init_spec PARAMS ((void)); -static void store_arg PARAMS ((const char *, int, int)); -static char *load_specs PARAMS ((const char *)); -static void read_specs PARAMS ((const char *, int)); -static void set_spec PARAMS ((const char *, const char *)); -static struct compiler *lookup_compiler PARAMS ((const char *, size_t, const char *)); -static char *build_search_list PARAMS ((struct path_prefix *, const char *, int)); -static void putenv_from_prefixes PARAMS ((struct path_prefix *, const char *)); -static int access_check PARAMS ((const char *, int)); -static char *find_a_file PARAMS ((struct path_prefix *, const char *, - int, int)); -static void add_prefix PARAMS ((struct path_prefix *, const char *, - const char *, int, int, int *, int)); -static void add_sysrooted_prefix PARAMS ((struct path_prefix *, const char *, - const char *, int, int, int *, int)); -static void translate_options PARAMS ((int *, const char *const **)); -static char *skip_whitespace PARAMS ((char *)); -static void delete_if_ordinary PARAMS ((const char *)); -static void delete_temp_files PARAMS ((void)); -static void delete_failure_queue PARAMS ((void)); -static void clear_failure_queue PARAMS ((void)); -static int check_live_switch PARAMS ((int, int)); -static const char *handle_braces PARAMS ((const char *)); -static inline bool input_suffix_matches PARAMS ((const char *, - const char *)); -static inline bool switch_matches PARAMS ((const char *, - const char *, int)); -static inline void mark_matching_switches PARAMS ((const char *, - const char *, int)); -static inline void process_marked_switches PARAMS ((void)); -static const char *process_brace_body PARAMS ((const char *, const char *, - const char *, int, int)); -static const struct spec_function *lookup_spec_function PARAMS ((const char *)); -static const char *eval_spec_function PARAMS ((const char *, const char *)); -static const char *handle_spec_function PARAMS ((const char *)); -static char *save_string PARAMS ((const char *, int)); -static void set_collect_gcc_options PARAMS ((void)); -static int do_spec_1 PARAMS ((const char *, int, const char *)); -static int do_spec_2 PARAMS ((const char *)); -static void do_self_spec PARAMS ((const char *)); -static const char *find_file PARAMS ((const char *)); -static int is_directory PARAMS ((const char *, const char *, int)); -static const char *validate_switches PARAMS ((const char *)); -static void validate_all_switches PARAMS ((void)); -static inline void validate_switches_from_spec PARAMS ((const char *)); -static void give_switch PARAMS ((int, int)); -static int used_arg PARAMS ((const char *, int)); -static int default_arg PARAMS ((const char *, int)); -static void set_multilib_dir PARAMS ((void)); -static void print_multilib_info PARAMS ((void)); -static void perror_with_name PARAMS ((const char *)); -static void pfatal_pexecute PARAMS ((const char *, const char *)) - ATTRIBUTE_NORETURN; -static void notice PARAMS ((const char *, ...)) - ATTRIBUTE_PRINTF_1; -static void display_help PARAMS ((void)); -static void add_preprocessor_option PARAMS ((const char *, int)); -static void add_assembler_option PARAMS ((const char *, int)); -static void add_linker_option PARAMS ((const char *, int)); -static void process_command PARAMS ((int, const char *const *)); -static int execute PARAMS ((void)); -static void alloc_args PARAMS ((void)); -static void clear_args PARAMS ((void)); -static void fatal_error PARAMS ((int)); -#ifdef ENABLE_SHARED_LIBGCC -static void init_gcc_specs PARAMS ((struct obstack *, - const char *, const char *, - const char *)); +static void init_spec (void); +static void store_arg (const char *, int, int); +static char *load_specs (const char *); +static void read_specs (const char *, int); +static void set_spec (const char *, const char *); +static struct compiler *lookup_compiler (const char *, size_t, const char *); +static char *build_search_list (struct path_prefix *, const char *, int); +static void putenv_from_prefixes (struct path_prefix *, const char *); +static int access_check (const char *, int); +static char *find_a_file (struct path_prefix *, const char *, int, int); +static void add_prefix (struct path_prefix *, const char *, const char *, + int, int, int *, int); +static void add_sysrooted_prefix (struct path_prefix *, const char *, + const char *, int, int, int *, int); +static void translate_options (int *, const char *const **); +static char *skip_whitespace (char *); +static void delete_if_ordinary (const char *); +static void delete_temp_files (void); +static void delete_failure_queue (void); +static void clear_failure_queue (void); +static int check_live_switch (int, int); +static const char *handle_braces (const char *); +static inline bool input_suffix_matches (const char *, const char *); +static inline bool switch_matches (const char *, const char *, int); +static inline void mark_matching_switches (const char *, const char *, int); +static inline void process_marked_switches (void); +static const char *process_brace_body (const char *, const char *, const char *, int, int); +static const struct spec_function *lookup_spec_function (const char *); +static const char *eval_spec_function (const char *, const char *); +static const char *handle_spec_function (const char *); +static char *save_string (const char *, int); +static void set_collect_gcc_options (void); +static int do_spec_1 (const char *, int, const char *); +static int do_spec_2 (const char *); +static void do_option_spec (const char *, const char *); +static void do_self_spec (const char *); +static const char *find_file (const char *); +static int is_directory (const char *, const char *, int); +static const char *validate_switches (const char *); +static void validate_all_switches (void); +static inline void validate_switches_from_spec (const char *); +static void give_switch (int, int); +static int used_arg (const char *, int); +static int default_arg (const char *, int); +static void set_multilib_dir (void); +static void print_multilib_info (void); +static void perror_with_name (const char *); +static void pfatal_pexecute (const char *, const char *) ATTRIBUTE_NORETURN; +static void notice (const char *, ...) ATTRIBUTE_PRINTF_1; +static void display_help (void); +static void add_preprocessor_option (const char *, int); +static void add_assembler_option (const char *, int); +static void add_linker_option (const char *, int); +static void process_command (int, const char **); +static int execute (void); +static void alloc_args (void); +static void clear_args (void); +static void fatal_error (int); +#if defined(ENABLE_SHARED_LIBGCC) && !defined(REAL_LIBGCC_SPEC) +static void init_gcc_specs (struct obstack *, const char *, const char *, + const char *); #endif #if defined(HAVE_TARGET_OBJECT_SUFFIX) || defined(HAVE_TARGET_EXECUTABLE_SUFFIX) -static const char *convert_filename PARAMS ((const char *, int, int)); +static const char *convert_filename (const char *, int, int); #endif -static const char *if_exists_spec_function PARAMS ((int, const char **)); -static const char *if_exists_else_spec_function PARAMS ((int, const char **)); +static const char *if_exists_spec_function (int, const char **); +static const char *if_exists_else_spec_function (int, const char **); /* The Specs Language @@ -502,9 +496,9 @@ or with constant text in a single argument. name starts with `o'. %{o*} would substitute this text, including the space; thus, two arguments would be generated. %{S*&T*} likewise, but preserve order of S and T options (the order - of S and T in the spec is not significant). Can be any number - of ampersand-separated variables; for each the wild card is - optional. Useful for CPP as %{D*&U*&A*}. + of S and T in the spec is not significant). Can be any number + of ampersand-separated variables; for each the wild card is + optional. Useful for CPP as %{D*&U*&A*}. %{S:X} substitutes X, if the -S switch was given to CC. %{!S:X} substitutes X, if the -S switch was NOT given to CC. @@ -604,7 +598,9 @@ proper position among the other output files. */ /* config.h can define LIBGCC_SPEC to override how and when libgcc.a is included. */ #ifndef LIBGCC_SPEC -#if defined(LINK_LIBGCC_SPECIAL) || defined(LINK_LIBGCC_SPECIAL_1) +#if defined(REAL_LIBGCC_SPEC) +#define LIBGCC_SPEC REAL_LIBGCC_SPEC +#elif defined(LINK_LIBGCC_SPECIAL) || defined(LINK_LIBGCC_SPECIAL_1) /* Have gcc do the search for libgcc.a. */ #define LIBGCC_SPEC "libgcc.a%s" #else @@ -664,6 +660,14 @@ proper position among the other output files. */ #define LINK_GCC_C_SEQUENCE_SPEC "%G %L %G" #endif +#ifndef LINK_PIE_SPEC +#ifdef HAVE_LD_PIE +#define LINK_PIE_SPEC "%{pie:-pie} " +#else +#define LINK_PIE_SPEC "%{pie:} " +#endif +#endif + /* -u* was put back because both BSD and SysV seem to support it. */ /* %{static:} simply prevents an error message if the target machine doesn't handle -static. */ @@ -673,9 +677,9 @@ proper position among the other output files. */ #ifndef LINK_COMMAND_SPEC #define LINK_COMMAND_SPEC "\ %{!fsyntax-only:%{!c:%{!M:%{!MM:%{!E:%{!S:\ - %(linker) %l %X %{o*} %{A} %{d} %{e*} %{m} %{N} %{n} %{r} %{s} %{t}\ - %{u*} %{x} %{z} %{Z} %{!A:%{!nostdlib:%{!nostartfiles:%S}}}\ - %{static:} %{L*} %(link_libgcc) %o %{fprofile-arcs:-lgcov}\ + %(linker) %l " LINK_PIE_SPEC "%X %{o*} %{A} %{d} %{e*} %{m} %{N} %{n} %{r}\ + %{s} %{t} %{u*} %{x} %{z} %{Z} %{!A:%{!nostdlib:%{!nostartfiles:%S}}}\ + %{static:} %{L*} %(link_libgcc) %o %{fprofile-arcs|fprofile-generate:-lgcov}\ %{!nostdlib:%{!nodefaultlibs:%(link_gcc_c_sequence)}}\ %{!A:%{!nostdlib:%{!nostartfiles:%E}}} %{T*} }}}}}}" #endif @@ -694,6 +698,14 @@ proper position among the other output files. */ # define STARTFILE_PREFIX_SPEC "" #endif +#ifndef SYSROOT_SUFFIX_SPEC +# define SYSROOT_SUFFIX_SPEC "" +#endif + +#ifndef SYSROOT_HEADERS_SUFFIX_SPEC +# define SYSROOT_HEADERS_SUFFIX_SPEC "" +#endif + static const char *asm_debug; static const char *cpp_spec = CPP_SPEC; static const char *cc1_spec = CC1_SPEC; @@ -711,6 +723,8 @@ static const char *linker_name_spec = LINKER_NAME; static const char *link_command_spec = LINK_COMMAND_SPEC; static const char *link_libgcc_spec = LINK_LIBGCC_SPEC; static const char *startfile_prefix_spec = STARTFILE_PREFIX_SPEC; +static const char *sysroot_suffix_spec = SYSROOT_SUFFIX_SPEC; +static const char *sysroot_hdrs_suffix_spec = SYSROOT_HEADERS_SUFFIX_SPEC; /* Standard options to cpp, cc1, and as, to reduce duplication in specs. There should be no need to override these in target dependent files, @@ -729,7 +743,7 @@ static const char *trad_capable_cpp = file that happens to exist is up-to-date. */ static const char *cpp_unique_options = "%{C|CC:%{!E:%eGCC does not support -C or -CC without -E}}\ - %{!Q:-quiet} %{nostdinc*} %{C} %{CC} %{v} %{I*} %{P} %I\ + %{!Q:-quiet} %{nostdinc*} %{C} %{CC} %{v} %{I*&F*} %{P} %I\ %{MD:-MD %{!o:%b.d}%{o*:%.d%*}}\ %{MMD:-MMD %{!o:%b.d}%{o*:%.d%*}}\ %{M} %{MM} %{MF*} %{MG} %{MP} %{MQ*} %{MT*}\ @@ -744,7 +758,7 @@ static const char *cpp_unique_options = in turn cause preprocessor symbols to be defined specially. */ static const char *cpp_options = "%(cpp_unique_options) %1 %{m*} %{std*} %{ansi} %{W*&pedantic*} %{w} %{f*}\ - %{O*} %{undef}"; + %{g*:%{!g0:%{!fno-working-directory:-fworking-directory}}} %{O*} %{undef}"; /* This contains cpp options which are not passed when the preprocessor output will be used by another program. */ @@ -780,7 +794,6 @@ static const char *multilib_select; static const char *multilib_matches; static const char *multilib_defaults; static const char *multilib_exclusions; -#include "multilib.h" /* Check whether a particular argument is a default argument. */ @@ -796,6 +809,19 @@ static const char *const multilib_defaults_raw[] = MULTILIB_DEFAULTS; static const char *const driver_self_specs[] = { DRIVER_SELF_SPECS }; +#ifndef OPTION_DEFAULT_SPECS +#define OPTION_DEFAULT_SPECS { "", "" } +#endif + +struct default_spec +{ + const char *name; + const char *spec; +}; + +static const struct default_spec + option_default_specs[] = { OPTION_DEFAULT_SPECS }; + struct user_specs { struct user_specs *next; @@ -926,9 +952,9 @@ static const struct compiler default_compilers[] = as %(asm_debug) %(asm_options) %m.s %A }}}}" #endif , 0}, - + #include "specs.h" - /* Mark end of table */ + /* Mark end of table. */ {0, 0, 0} }; @@ -1021,6 +1047,7 @@ static const struct option_map option_map[] = {"--param", "--param", "a"}, {"--pedantic", "-pedantic", 0}, {"--pedantic-errors", "-pedantic-errors", 0}, + {"--pie", "-pie", 0}, {"--pipe", "-pipe", 0}, {"--prefix", "-B", "a"}, {"--preprocess", "-E", 0}, @@ -1043,14 +1070,12 @@ static const struct option_map option_map[] = {"--static", "-static", 0}, {"--std", "-std=", "aj"}, {"--symbolic", "-symbolic", 0}, - {"--target", "-b", "a"}, {"--time", "-time", 0}, {"--trace-includes", "-H", 0}, {"--traditional", "-traditional", 0}, {"--traditional-cpp", "-traditional-cpp", 0}, {"--trigraphs", "-trigraphs", 0}, {"--undefine-macro", "-U", "aj"}, - {"--use-version", "-V", "a"}, {"--user-dependencies", "-MM", 0}, {"--verbose", "-v", 0}, {"--warn-", "-W", "*j"}, @@ -1076,16 +1101,13 @@ static const struct { and store its length in *ARGVC. */ static void -translate_options (argcp, argvp) - int *argcp; - const char *const **argvp; +translate_options (int *argcp, const char *const **argvp) { int i; int argc = *argcp; const char *const *argv = *argvp; int newvsize = (argc + 2) * 2 * sizeof (const char *); - const char **newv = - (const char **) xmalloc (newvsize); + const char **newv = xmalloc (newvsize); int newindex = 0; i = 0; @@ -1115,7 +1137,7 @@ translate_options (argcp, argvp) } newvsize += spaces * sizeof (const char *); - newv = (const char **) xrealloc (newv, newvsize); + newv = xrealloc (newv, newvsize); sp = target_option_translations[tott_idx].replacements; np = xstrdup (sp); @@ -1288,8 +1310,7 @@ translate_options (argcp, argvp) } static char * -skip_whitespace (p) - char *p; +skip_whitespace (char *p) { while (1) { @@ -1358,6 +1379,10 @@ static const char *just_machine_suffix = 0; static const char *gcc_exec_prefix; +/* Adjusted value of standard_libexec_prefix. */ + +static const char *gcc_libexec_prefix; + /* Default prefixes to attach to command names. */ #ifdef CROSS_COMPILE /* Don't use these prefixes for a cross compiler. */ @@ -1377,23 +1402,9 @@ static const char *gcc_exec_prefix; #define MD_STARTFILE_PREFIX_1 "" #endif -/* Supply defaults for the standard prefixes. */ - -#ifndef STANDARD_EXEC_PREFIX -#define STANDARD_EXEC_PREFIX "/usr/local/lib/gcc-lib/" -#endif -#ifndef STANDARD_STARTFILE_PREFIX -#define STANDARD_STARTFILE_PREFIX "/usr/local/lib/" -#endif -#ifndef TOOLDIR_BASE_PREFIX -#define TOOLDIR_BASE_PREFIX "/usr/local/" -#endif -#ifndef STANDARD_BINDIR_PREFIX -#define STANDARD_BINDIR_PREFIX "/usr/local/bin" -#endif - static const char *const standard_exec_prefix = STANDARD_EXEC_PREFIX; -static const char *const standard_exec_prefix_1 = "/usr/lib/gcc/"; +static const char *const standard_exec_prefix_1 = "/usr/libexec/gcc/"; +static const char *const standard_exec_prefix_2 = "/usr/lib/gcc/"; static const char *md_exec_prefix = MD_EXEC_PREFIX; static const char *md_startfile_prefix = MD_STARTFILE_PREFIX; @@ -1407,6 +1418,8 @@ static const char *tooldir_prefix; static const char *const standard_bindir_prefix = STANDARD_BINDIR_PREFIX; +static const char *standard_libexec_prefix = STANDARD_LIBEXEC_PREFIX; + /* Subdirectory to use for locating libraries. Set by set_multilib_dir based on the compilation options. */ @@ -1476,6 +1489,8 @@ static struct spec_list static_specs[] = INIT_STATIC_SPEC ("md_startfile_prefix", &md_startfile_prefix), INIT_STATIC_SPEC ("md_startfile_prefix_1", &md_startfile_prefix_1), INIT_STATIC_SPEC ("startfile_prefix_spec", &startfile_prefix_spec), + INIT_STATIC_SPEC ("sysroot_suffix_spec", &sysroot_suffix_spec), + INIT_STATIC_SPEC ("sysroot_hdrs_suffix_spec", &sysroot_hdrs_suffix_spec), }; #ifdef EXTRA_SPECS /* additional specs needed */ @@ -1509,13 +1524,10 @@ static int processing_spec_function; /* Add appropriate libgcc specs to OBSTACK, taking into account various permutations of -shared-libgcc, -shared, and such. */ -#ifdef ENABLE_SHARED_LIBGCC +#if defined(ENABLE_SHARED_LIBGCC) && !defined(REAL_LIBGCC_SPEC) static void -init_gcc_specs (obstack, shared_name, static_name, eh_name) - struct obstack *obstack; - const char *shared_name; - const char *static_name; - const char *eh_name; +init_gcc_specs (struct obstack *obstack, const char *shared_name, + const char *static_name, const char *eh_name) { char *buf; @@ -1540,7 +1552,7 @@ init_gcc_specs (obstack, shared_name, static_name, eh_name) /* Initialize the specs lookup routines. */ static void -init_spec () +init_spec (void) { struct spec_list *next = (struct spec_list *) 0; struct spec_list *sl = (struct spec_list *) 0; @@ -1553,8 +1565,8 @@ init_spec () notice ("Using built-in specs.\n"); #ifdef EXTRA_SPECS - extra_specs = (struct spec_list *) - xcalloc (sizeof (struct spec_list), ARRAY_SIZE (extra_specs_1)); + extra_specs = xcalloc (sizeof (struct spec_list), + ARRAY_SIZE (extra_specs_1)); for (i = ARRAY_SIZE (extra_specs_1) - 1; i >= 0; i--) { @@ -1579,7 +1591,7 @@ init_spec () next = sl; } -#ifdef ENABLE_SHARED_LIBGCC +#if defined(ENABLE_SHARED_LIBGCC) && !defined(REAL_LIBGCC_SPEC) /* ??? If neither -shared-libgcc nor --static-libgcc was seen, then we should be making an educated guess. Some proposed heuristics for ELF include: @@ -1623,12 +1635,14 @@ init_spec () #else "-lgcc_s%M" #endif + , + "-lgcc", + "-lgcc_eh" #ifdef USE_LIBUNWIND_EXCEPTIONS " -lunwind" #endif - , - "-lgcc", - "-lgcc_eh"); + ); + p += 5; in_sep = 0; } @@ -1644,7 +1658,11 @@ init_spec () #endif , "libgcc.a%s", - "libgcc_eh.a%s"); + "libgcc_eh.a%s" +#ifdef USE_LIBUNWIND_EXCEPTIONS + " -lunwind" +#endif + ); p += 10; in_sep = 0; } @@ -1684,9 +1702,7 @@ init_spec () current spec. */ static void -set_spec (name, spec) - const char *name; - const char *spec; +set_spec (const char *name, const char *spec) { struct spec_list *sl; const char *old_spec; @@ -1714,7 +1730,7 @@ set_spec (name, spec) if (!sl) { /* Not found - make it. */ - sl = (struct spec_list *) xmalloc (sizeof (struct spec_list)); + sl = xmalloc (sizeof (struct spec_list)); sl->name = xstrdup (name); sl->name_len = name_len; sl->ptr_spec = &sl->ptr; @@ -1736,7 +1752,7 @@ set_spec (name, spec) /* Free the old spec. */ if (old_spec && sl->alloc_p) - free ((PTR) old_spec); + free ((void *) old_spec); sl->alloc_p = 1; } @@ -1783,16 +1799,16 @@ static const char *programname; /* Allocate the argument vector. */ static void -alloc_args () +alloc_args (void) { argbuf_length = 10; - argbuf = (const char **) xmalloc (argbuf_length * sizeof (const char *)); + argbuf = xmalloc (argbuf_length * sizeof (const char *)); } /* Clear out the vector of arguments (after a command is executed). */ static void -clear_args () +clear_args (void) { argbuf_index = 0; } @@ -1805,14 +1821,10 @@ clear_args () and the file should be deleted if this compilation fails. */ static void -store_arg (arg, delete_always, delete_failure) - const char *arg; - int delete_always, delete_failure; +store_arg (const char *arg, int delete_always, int delete_failure) { if (argbuf_index + 1 == argbuf_length) - argbuf - = (const char **) xrealloc (argbuf, - (argbuf_length *= 2) * sizeof (const char *)); + argbuf = xrealloc (argbuf, (argbuf_length *= 2) * sizeof (const char *)); argbuf[argbuf_index++] = arg; argbuf[argbuf_index] = 0; @@ -1826,8 +1838,7 @@ store_arg (arg, delete_always, delete_failure) a single \n. */ static char * -load_specs (filename) - const char *filename; +load_specs (const char *filename) { int desc; int readlen; @@ -1891,9 +1902,7 @@ load_specs (filename) Anything invalid in the file is a fatal error. */ static void -read_specs (filename, main_p) - const char *filename; - int main_p; +read_specs (const char *filename, int main_p) { char *buffer; char *p; @@ -2035,7 +2044,7 @@ read_specs (filename, main_p) set_spec (p2, *(sl->ptr_spec)); if (sl->alloc_p) - free ((PTR) *(sl->ptr_spec)); + free ((void *) *(sl->ptr_spec)); *(sl->ptr_spec) = ""; sl->alloc_p = 0; @@ -2105,9 +2114,8 @@ read_specs (filename, main_p) { /* Add this pair to the vector. */ compilers - = ((struct compiler *) - xrealloc (compilers, - (n_compilers + 2) * sizeof (struct compiler))); + = xrealloc (compilers, + (n_compilers + 2) * sizeof (struct compiler)); compilers[n_compilers].suffix = suffix; compilers[n_compilers].spec = spec; @@ -2163,10 +2171,7 @@ static struct temp_file *failure_delete_queue; otherwise delete it in any case. */ void -record_temp_file (filename, always_delete, fail_delete) - const char *filename; - int always_delete; - int fail_delete; +record_temp_file (const char *filename, int always_delete, int fail_delete) { char *const name = xstrdup (filename); @@ -2177,7 +2182,7 @@ record_temp_file (filename, always_delete, fail_delete) if (! strcmp (name, temp->name)) goto already1; - temp = (struct temp_file *) xmalloc (sizeof (struct temp_file)); + temp = xmalloc (sizeof (struct temp_file)); temp->next = always_delete_queue; temp->name = name; always_delete_queue = temp; @@ -2192,7 +2197,7 @@ record_temp_file (filename, always_delete, fail_delete) if (! strcmp (name, temp->name)) goto already2; - temp = (struct temp_file *) xmalloc (sizeof (struct temp_file)); + temp = xmalloc (sizeof (struct temp_file)); temp->next = failure_delete_queue; temp->name = name; failure_delete_queue = temp; @@ -2204,8 +2209,7 @@ record_temp_file (filename, always_delete, fail_delete) /* Delete all the temporary files whose names we previously recorded. */ static void -delete_if_ordinary (name) - const char *name; +delete_if_ordinary (const char *name) { struct stat st; #ifdef DEBUG @@ -2227,7 +2231,7 @@ delete_if_ordinary (name) } static void -delete_temp_files () +delete_temp_files (void) { struct temp_file *temp; @@ -2239,7 +2243,7 @@ delete_temp_files () /* Delete all the files to be deleted on error. */ static void -delete_failure_queue () +delete_failure_queue (void) { struct temp_file *temp; @@ -2248,7 +2252,7 @@ delete_failure_queue () } static void -clear_failure_queue () +clear_failure_queue (void) { failure_delete_queue = 0; } @@ -2260,10 +2264,8 @@ clear_failure_queue () It is also used by the --print-search-dirs flag. */ static char * -build_search_list (paths, prefix, check_dir_p) - struct path_prefix *paths; - const char *prefix; - int check_dir_p; +build_search_list (struct path_prefix *paths, const char *prefix, + int check_dir_p) { int suffix_len = (machine_suffix) ? strlen (machine_suffix) : 0; int just_suffix_len @@ -2322,9 +2324,7 @@ build_search_list (paths, prefix, check_dir_p) for collect. */ static void -putenv_from_prefixes (paths, env_var) - struct path_prefix *paths; - const char *env_var; +putenv_from_prefixes (struct path_prefix *paths, const char *env_var) { putenv (build_search_list (paths, env_var, 1)); } @@ -2333,9 +2333,7 @@ putenv_from_prefixes (paths, env_var) except that it never considers directories to be executable. */ static int -access_check (name, mode) - const char *name; - int mode; +access_check (const char *name, int mode) { if (mode == X_OK) { @@ -2354,10 +2352,8 @@ access_check (name, mode) Return 0 if not found, otherwise return its name, allocated with malloc. */ static char * -find_a_file (pprefix, name, mode, multilib) - struct path_prefix *pprefix; - const char *name; - int mode, multilib; +find_a_file (struct path_prefix *pprefix, const char *name, int mode, + int multilib) { char *temp; const char *const file_suffix = @@ -2399,7 +2395,7 @@ find_a_file (pprefix, name, mode, multilib) /* Determine the filename to execute (special case for absolute paths). */ - if (IS_ABSOLUTE_PATHNAME (name)) + if (IS_ABSOLUTE_PATH (name)) { if (access (name, mode) == 0) { @@ -2532,15 +2528,9 @@ enum path_prefix_priority 2 means try both machine_suffix and just_machine_suffix. */ static void -add_prefix (pprefix, prefix, component, priority, require_machine_suffix, - warn, os_multilib) - struct path_prefix *pprefix; - const char *prefix; - const char *component; - /* enum prefix_priority */ int priority; - int require_machine_suffix; - int *warn; - int os_multilib; +add_prefix (struct path_prefix *pprefix, const char *prefix, + const char *component, /* enum prefix_priority */ int priority, + int require_machine_suffix, int *warn, int os_multilib) { struct prefix_list *pl, **prev; int len; @@ -2550,14 +2540,14 @@ add_prefix (pprefix, prefix, component, priority, require_machine_suffix, prev = &(*prev)->next) ; - /* Keep track of the longest prefix */ + /* Keep track of the longest prefix. */ prefix = update_path (prefix, component); len = strlen (prefix); if (len > pprefix->max_len) pprefix->max_len = len; - pl = (struct prefix_list *) xmalloc (sizeof (struct prefix_list)); + pl = xmalloc (sizeof (struct prefix_list)); pl->prefix = prefix; pl->require_machine_suffix = require_machine_suffix; pl->used_flag_ptr = warn; @@ -2566,29 +2556,27 @@ add_prefix (pprefix, prefix, component, priority, require_machine_suffix, if (warn) *warn = 0; - /* Insert after PREV */ + /* Insert after PREV. */ pl->next = (*prev); (*prev) = pl; } /* Same as add_prefix, but prepending target_system_root to prefix. */ static void -add_sysrooted_prefix (pprefix, prefix, component, priority, - require_machine_suffix, warn, os_multilib) - struct path_prefix *pprefix; - const char *prefix; - const char *component; - /* enum prefix_priority */ int priority; - int require_machine_suffix; - int *warn; - int os_multilib; +add_sysrooted_prefix (struct path_prefix *pprefix, const char *prefix, + const char *component, + /* enum prefix_priority */ int priority, + int require_machine_suffix, int *warn, int os_multilib) { - if (!IS_ABSOLUTE_PATHNAME (prefix)) + if (!IS_ABSOLUTE_PATH (prefix)) abort (); if (target_system_root) { + if (target_sysroot_suffix) + prefix = concat (target_sysroot_suffix, prefix, NULL); prefix = concat (target_system_root, prefix, NULL); + /* We have to override this because GCC's notion of sysroot moves along with GCC. */ component = "GCC"; @@ -2605,7 +2593,7 @@ add_sysrooted_prefix (pprefix, prefix, component, priority, Return 0 if successful, -1 if failed. */ static int -execute () +execute (void) { int i; int n_commands; /* # of command. */ @@ -2628,7 +2616,7 @@ execute () n_commands++; /* Get storage for each command. */ - commands = (struct command *) alloca (n_commands * sizeof (struct command)); + commands = alloca (n_commands * sizeof (struct command)); /* Split argbuf into its separate piped processes, and record info about each one. @@ -2698,7 +2686,14 @@ execute () } fflush (stderr); if (verbose_only_flag != 0) - return 0; + { + /* verbose_only_flag should act as if the spec was + executed, so increment execution_count before + returning. This prevents spurious warnings about + unused linker input files, etc. */ + execution_count++; + return 0; + } #ifdef DEBUG notice ("\nGo ahead? (y or n) "); fflush (stderr); @@ -2761,7 +2756,7 @@ execute () pfatal_pexecute (errmsg_fmt, errmsg_arg); if (string != commands[i].prog) - free ((PTR) string); + free ((void *) string); } execution_count++; @@ -2897,6 +2892,11 @@ static struct infile *infiles; int n_infiles; +/* True if multiple input files are being compiled to a single + assembly file. */ + +static bool combine_inputs; + /* This counts the number of libraries added by lang_specific_driver, so that we can tell if there were any user supplied any files or libraries. */ @@ -2919,10 +2919,8 @@ static int *warn_std_ptr = 0; is true if we should look for an object suffix. */ static const char * -convert_filename (name, do_exe, do_obj) - const char *name; - int do_exe ATTRIBUTE_UNUSED; - int do_obj ATTRIBUTE_UNUSED; +convert_filename (const char *name, int do_exe ATTRIBUTE_UNUSED, + int do_obj ATTRIBUTE_UNUSED) { #if defined(HAVE_TARGET_EXECUTABLE_SUFFIX) int i; @@ -2972,7 +2970,7 @@ convert_filename (name, do_exe, do_obj) /* Display the command line switches accepted by gcc. */ static void -display_help () +display_help (void) { printf (_("Usage: %s [options] file...\n"), programname); fputs (_("Options:\n"), stdout); @@ -3032,56 +3030,44 @@ display_help () } static void -add_preprocessor_option (option, len) - const char *option; - int len; +add_preprocessor_option (const char *option, int len) { n_preprocessor_options++; if (! preprocessor_options) - preprocessor_options - = (char **) xmalloc (n_preprocessor_options * sizeof (char *)); + preprocessor_options = xmalloc (n_preprocessor_options * sizeof (char *)); else - preprocessor_options - = (char **) xrealloc (preprocessor_options, - n_preprocessor_options * sizeof (char *)); + preprocessor_options = xrealloc (preprocessor_options, + n_preprocessor_options * sizeof (char *)); preprocessor_options [n_preprocessor_options - 1] = save_string (option, len); } static void -add_assembler_option (option, len) - const char *option; - int len; +add_assembler_option (const char *option, int len) { n_assembler_options++; if (! assembler_options) - assembler_options - = (char **) xmalloc (n_assembler_options * sizeof (char *)); + assembler_options = xmalloc (n_assembler_options * sizeof (char *)); else - assembler_options - = (char **) xrealloc (assembler_options, - n_assembler_options * sizeof (char *)); + assembler_options = xrealloc (assembler_options, + n_assembler_options * sizeof (char *)); assembler_options [n_assembler_options - 1] = save_string (option, len); } static void -add_linker_option (option, len) - const char *option; - int len; +add_linker_option (const char *option, int len) { n_linker_options++; if (! linker_options) - linker_options - = (char **) xmalloc (n_linker_options * sizeof (char *)); + linker_options = xmalloc (n_linker_options * sizeof (char *)); else - linker_options - = (char **) xrealloc (linker_options, - n_linker_options * sizeof (char *)); + linker_options = xrealloc (linker_options, + n_linker_options * sizeof (char *)); linker_options [n_linker_options - 1] = save_string (option, len); } @@ -3090,9 +3076,7 @@ add_linker_option (option, len) Store its length in `n_switches'. */ static void -process_command (argc, argv) - int argc; - const char *const *argv; +process_command (int argc, const char **argv) { int i; const char *temp; @@ -3137,7 +3121,7 @@ process_command (argc, argv) char **new_argv; char *new_argv0; int baselen; - + while (argc > 1 && argv[1][0] == '-' && (argv[1][1] == 'V' || argv[1][1] == 'b')) { @@ -3166,7 +3150,7 @@ process_command (argc, argv) for (baselen = strlen (progname); baselen > 0; baselen--) if (IS_DIR_SEPARATOR (progname[baselen-1])) break; - new_argv0 = xmemdup (progname, baselen, + new_argv0 = xmemdup (progname, baselen, baselen + concat_length (new_version, new_machine, "-gcc-", NULL) + 1); strcpy (new_argv0 + baselen, new_machine); @@ -3184,34 +3168,43 @@ process_command (argc, argv) /* Set up the default search paths. If there is no GCC_EXEC_PREFIX, see if we can create it from the pathname specified in argv[0]. */ + gcc_libexec_prefix = standard_libexec_prefix; #ifndef VMS /* FIXME: make_relative_prefix doesn't yet work for VMS. */ if (!gcc_exec_prefix) { gcc_exec_prefix = make_relative_prefix (argv[0], standard_bindir_prefix, standard_exec_prefix); + gcc_libexec_prefix = make_relative_prefix (argv[0], + standard_bindir_prefix, + standard_libexec_prefix); if (gcc_exec_prefix) putenv (concat ("GCC_EXEC_PREFIX=", gcc_exec_prefix, NULL)); } + else + gcc_libexec_prefix = make_relative_prefix (gcc_exec_prefix, + standard_exec_prefix, + standard_libexec_prefix); +#else #endif if (gcc_exec_prefix) { int len = strlen (gcc_exec_prefix); - if (len > (int) sizeof ("/lib/gcc-lib/") - 1 + if (len > (int) sizeof ("/lib/gcc/") - 1 && (IS_DIR_SEPARATOR (gcc_exec_prefix[len-1]))) { - temp = gcc_exec_prefix + len - sizeof ("/lib/gcc-lib/") + 1; + temp = gcc_exec_prefix + len - sizeof ("/lib/gcc/") + 1; if (IS_DIR_SEPARATOR (*temp) && strncmp (temp + 1, "lib", 3) == 0 && IS_DIR_SEPARATOR (temp[4]) - && strncmp (temp + 5, "gcc-lib", 7) == 0) - len -= sizeof ("/lib/gcc-lib/") - 1; + && strncmp (temp + 5, "gcc", 3) == 0) + len -= sizeof ("/lib/gcc/") - 1; } set_std_prefix (gcc_exec_prefix, len); - add_prefix (&exec_prefixes, gcc_exec_prefix, "GCC", + add_prefix (&exec_prefixes, gcc_libexec_prefix, "GCC", PREFIX_PRIORITY_LAST, 0, NULL, 0); add_prefix (&startfile_prefixes, gcc_exec_prefix, "GCC", PREFIX_PRIORITY_LAST, 0, NULL, 0); @@ -3224,7 +3217,7 @@ process_command (argc, argv) if (temp) { const char *startp, *endp; - char *nstore = (char *) alloca (strlen (temp) + 3); + char *nstore = alloca (strlen (temp) + 3); startp = endp = temp; while (1) @@ -3259,7 +3252,7 @@ process_command (argc, argv) if (temp && *cross_compile == '0') { const char *startp, *endp; - char *nstore = (char *) alloca (strlen (temp) + 3); + char *nstore = alloca (strlen (temp) + 3); startp = endp = temp; while (1) @@ -3292,7 +3285,7 @@ process_command (argc, argv) if (temp && *cross_compile == '0') { const char *startp, *endp; - char *nstore = (char *) alloca (strlen (temp) + 3); + char *nstore = alloca (strlen (temp) + 3); startp = endp = temp; while (1) @@ -3321,10 +3314,10 @@ process_command (argc, argv) } /* Convert new-style -- options to old-style. */ - translate_options (&argc, &argv); + translate_options (&argc, (const char *const **) &argv); /* Do language-specific adjustment/addition of flags. */ - lang_specific_driver (&argc, &argv, &added_libraries); + lang_specific_driver (&argc, (const char *const **) &argv, &added_libraries); /* Scan argv twice. Here, the first time, just count how many switches there will be in their vector, and how many input files in theirs. @@ -3356,8 +3349,8 @@ process_command (argc, argv) { /* translate_options () has turned --version into -fversion. */ printf (_("%s (GCC) %s\n"), programname, version_string); - fputs (_("Copyright (C) 2003 Free Software Foundation, Inc.\n"), - stdout); + printf ("Copyright %s 2004 Free Software Foundation, Inc.\n", + _("(C)")); fputs (_("This is free software; see the source for copying conditions. There is NO\n\ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n"), stdout); @@ -3495,8 +3488,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" } else if (strcmp (argv[i], "-specs") == 0) { - struct user_specs *user = (struct user_specs *) - xmalloc (sizeof (struct user_specs)); + struct user_specs *user = xmalloc (sizeof (struct user_specs)); if (++i >= argc) fatal ("argument to `-specs' is missing"); @@ -3510,8 +3502,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" } else if (strncmp (argv[i], "-specs=", 7) == 0) { - struct user_specs *user = (struct user_specs *) - xmalloc (sizeof (struct user_specs)); + struct user_specs *user = xmalloc (sizeof (struct user_specs)); if (strlen (argv[i]) == 7) fatal ("argument to `-specs=' is missing"); @@ -3684,9 +3675,8 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" for (j = 0; j < ARRAY_SIZE (modify_target); j++) if (! strcmp (argv[i], modify_target[j].sw)) { - char *new_name - = (char *) xmalloc (strlen (modify_target[j].str) - + strlen (spec_machine)); + char *new_name = xmalloc (strlen (modify_target[j].str) + + strlen (spec_machine)); const char *p, *r; char *q; int made_addition = 0; @@ -3731,8 +3721,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" } } - if (have_c && have_o && lang_n_infiles > 1) - fatal ("cannot specify -o with -c or -S and multiple compilations"); + combine_inputs = (have_c && have_o && lang_n_infiles > 1); if ((save_temps_flag || report_times) && use_pipes) { @@ -3746,7 +3735,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" use_pipes = 0; } - + /* Set up the search paths before we go looking for config files. */ /* These come before the md prefixes so that we will find gcc's subcommands @@ -3754,17 +3743,21 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" /* Use 2 as fourth arg meaning try just the machine as a suffix, as well as trying the machine and the version. */ #ifndef OS2 - add_prefix (&exec_prefixes, standard_exec_prefix, "GCC", + add_prefix (&exec_prefixes, standard_libexec_prefix, "GCC", PREFIX_PRIORITY_LAST, 1, warn_std_ptr, 0); + add_prefix (&exec_prefixes, standard_libexec_prefix, "BINUTILS", + PREFIX_PRIORITY_LAST, 2, warn_std_ptr, 0); add_prefix (&exec_prefixes, standard_exec_prefix, "BINUTILS", PREFIX_PRIORITY_LAST, 2, warn_std_ptr, 0); add_prefix (&exec_prefixes, standard_exec_prefix_1, "BINUTILS", PREFIX_PRIORITY_LAST, 2, warn_std_ptr, 0); + add_prefix (&exec_prefixes, standard_exec_prefix_2, "BINUTILS", + PREFIX_PRIORITY_LAST, 2, warn_std_ptr, 0); #endif add_prefix (&startfile_prefixes, standard_exec_prefix, "BINUTILS", PREFIX_PRIORITY_LAST, 1, warn_std_ptr, 0); - add_prefix (&startfile_prefixes, standard_exec_prefix_1, "BINUTILS", + add_prefix (&startfile_prefixes, standard_exec_prefix_2, "BINUTILS", PREFIX_PRIORITY_LAST, 1, warn_std_ptr, 0); tooldir_prefix = concat (tooldir_base_prefix, spec_machine, @@ -3777,7 +3770,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" directories, so that we can search both the user specified directory and the standard place. */ - if (!IS_ABSOLUTE_PATHNAME (tooldir_prefix)) + if (!IS_ABSOLUTE_PATH (tooldir_prefix)) { if (gcc_exec_prefix) { @@ -3830,9 +3823,8 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" /* Then create the space for the vectors and scan again. */ - switches = ((struct switchstr *) - xmalloc ((n_switches + 1) * sizeof (struct switchstr))); - infiles = (struct infile *) xmalloc ((n_infiles + 1) * sizeof (struct infile)); + switches = xmalloc ((n_switches + 1) * sizeof (struct switchstr)); + infiles = xmalloc ((n_infiles + 1) * sizeof (struct infile)); n_switches = 0; n_infiles = 0; last_language_n_infiles = -1; @@ -3981,7 +3973,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" if (i + n_args >= argc) fatal ("argument to `-%s' is missing", p); switches[n_switches].args - = (const char **) xmalloc ((n_args + 1) * sizeof(const char *)); + = xmalloc ((n_args + 1) * sizeof(const char *)); while (j < n_args) switches[n_switches].args[j++] = argv[++i]; /* Null-terminate the vector. */ @@ -3991,13 +3983,12 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" { /* On some systems, ld cannot handle some options without a space. So split the option from its argument. */ - char *part1 = (char *) xmalloc (2); + char *part1 = xmalloc (2); part1[0] = c; part1[1] = '\0'; switches[n_switches].part1 = part1; - switches[n_switches].args - = (const char **) xmalloc (2 * sizeof (const char *)); + switches[n_switches].args = xmalloc (2 * sizeof (const char *)); switches[n_switches].args[0] = xstrdup (p+1); switches[n_switches].args[1] = 0; } @@ -4082,7 +4073,7 @@ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n" and place that in the environment. */ static void -set_collect_gcc_options () +set_collect_gcc_options (void) { int i; int first_time; @@ -4187,8 +4178,7 @@ static const char *suffix_subst; Returns 0 if the spec is successfully processed; -1 if failed. */ int -do_spec (spec) - const char *spec; +do_spec (const char *spec) { int value; @@ -4211,8 +4201,7 @@ do_spec (spec) } static int -do_spec_2 (spec) - const char *spec; +do_spec_2 (const char *spec) { const char *string; int result; @@ -4248,8 +4237,56 @@ do_spec_2 (spec) of the switches/n_switches array. */ static void -do_self_spec (spec) - const char *spec; +do_option_spec (const char *name, const char *spec) +{ + unsigned int i, value_count, value_len; + const char *p, *q, *value; + char *tmp_spec, *tmp_spec_p; + + if (configure_default_options[0].name == NULL) + return; + + for (i = 0; i < ARRAY_SIZE (configure_default_options); i++) + if (strcmp (configure_default_options[i].name, name) == 0) + break; + if (i == ARRAY_SIZE (configure_default_options)) + return; + + value = configure_default_options[i].value; + value_len = strlen (value); + + /* Compute the size of the final spec. */ + value_count = 0; + p = spec; + while ((p = strstr (p, "%(VALUE)")) != NULL) + { + p ++; + value_count ++; + } + + /* Replace each %(VALUE) by the specified value. */ + tmp_spec = alloca (strlen (spec) + 1 + + value_count * (value_len - strlen ("%(VALUE)"))); + tmp_spec_p = tmp_spec; + q = spec; + while ((p = strstr (q, "%(VALUE)")) != NULL) + { + memcpy (tmp_spec_p, q, p - q); + tmp_spec_p = tmp_spec_p + (p - q); + memcpy (tmp_spec_p, value, value_len); + tmp_spec_p += value_len; + q = p + strlen ("%(VALUE)"); + } + strcpy (tmp_spec_p, q); + + do_self_spec (tmp_spec); +} + +/* Process the given spec string and add any new options to the end + of the switches/n_switches array. */ + +static void +do_self_spec (const char *spec) { do_spec_2 (spec); do_spec_1 (" ", 0, NULL); @@ -4295,10 +4332,7 @@ do_self_spec (spec) and the command on that line reported an error. */ static int -do_spec_1 (spec, inswitch, soft_matched_part) - const char *spec; - int inswitch; - const char *soft_matched_part; +do_spec_1 (const char *spec, int inswitch, const char *soft_matched_part) { const char *p = spec; int c; @@ -4422,7 +4456,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) { struct prefix_list *pl = startfile_prefixes.plist; size_t bufsize = 100; - char *buffer = (char *) xmalloc (bufsize); + char *buffer = xmalloc (bufsize); int idx; for (; pl; pl = pl->next) @@ -4433,7 +4467,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* Relative directories always come from -B, and it is better not to use them for searching at run time. In particular, stage1 loses. */ - if (!IS_ABSOLUTE_PATHNAME (pl->prefix)) + if (!IS_ABSOLUTE_PATH (pl->prefix)) continue; #endif /* Try subdirectory if there is one. */ @@ -4450,7 +4484,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) >= bufsize) bufsize = (strlen (pl->prefix) + strlen (machine_suffix)) * 2 + 1; - buffer = (char *) xrealloc (buffer, bufsize); + buffer = xrealloc (buffer, bufsize); strcpy (buffer, pl->prefix); strcat (buffer, machine_suffix); if (is_directory (buffer, multilib_dir, 1)) @@ -4492,7 +4526,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* Remove slash from machine_suffix. */ if (strlen (machine_suffix) >= bufsize) bufsize = strlen (machine_suffix) * 2 + 1; - buffer = (char *) xrealloc (buffer, bufsize); + buffer = xrealloc (buffer, bufsize); strcpy (buffer, machine_suffix); idx = strlen (buffer); if (IS_DIR_SEPARATOR (buffer[idx - 1])) @@ -4513,7 +4547,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* Remove slash from pl->prefix. */ if (strlen (pl->prefix) >= bufsize) bufsize = strlen (pl->prefix) * 2 + 1; - buffer = (char *) xrealloc (buffer, bufsize); + buffer = xrealloc (buffer, bufsize); strcpy (buffer, pl->prefix); idx = strlen (buffer); if (IS_DIR_SEPARATOR (buffer[idx - 1])) @@ -4536,7 +4570,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) char *buf; while (*p != 0 && *p != '\n') p++; - buf = (char *) alloca (p - q + 1); + buf = alloca (p - q + 1); strncpy (buf, q, p - q); buf[p - q] = 0; error ("%s", buf); @@ -4550,7 +4584,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) char *buf; while (*p != 0 && *p != '\n') p++; - buf = (char *) alloca (p - q + 1); + buf = alloca (p - q + 1); strncpy (buf, q, p - q); buf[p - q] = 0; notice ("%s\n", buf); @@ -4592,7 +4626,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) p++; if (p[0] == '%' && p[1] == 'O') p += 2; - + break; } goto create_temp_file; @@ -4604,7 +4638,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) p++; if (p[0] == '%' && p[1] == 'O') p += 2; - + break; } goto create_temp_file; @@ -4632,8 +4666,8 @@ do_spec_1 (spec, inswitch, soft_matched_part) else { saved_suffix - = (char *) xmalloc (suffix_length - + strlen (TARGET_OBJECT_SUFFIX)); + = xmalloc (suffix_length + + strlen (TARGET_OBJECT_SUFFIX)); strncpy (saved_suffix, suffix, suffix_length); strcpy (saved_suffix + suffix_length, TARGET_OBJECT_SUFFIX); @@ -4655,24 +4689,24 @@ do_spec_1 (spec, inswitch, soft_matched_part) temp_filename = alloca (temp_filename_length + 1); strncpy ((char *) temp_filename, input_basename, basename_length); strncpy ((char *) temp_filename + basename_length, suffix, - suffix_length); + suffix_length); *((char *) temp_filename + temp_filename_length) = '\0'; if (strcmp (temp_filename, input_filename) != 0) { - struct stat st_temp; + struct stat st_temp; - /* Note, set_input() resets input_stat_set to 0. */ - if (input_stat_set == 0) - { - input_stat_set = stat (input_filename, &input_stat); - if (input_stat_set >= 0) - input_stat_set = 1; - } + /* Note, set_input() resets input_stat_set to 0. */ + if (input_stat_set == 0) + { + input_stat_set = stat (input_filename, &input_stat); + if (input_stat_set >= 0) + input_stat_set = 1; + } - /* If we have the stat for the input_filename - and we can do the stat for the temp_filename - then the they could still refer to the same - file if st_dev/st_ino's are the same. */ + /* If we have the stat for the input_filename + and we can do the stat for the temp_filename + then the they could still refer to the same + file if st_dev/st_ino's are the same. */ if (input_stat_set != 1 || stat (temp_filename, &st_temp) < 0 @@ -4682,7 +4716,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) temp_filename = save_string (temp_filename, temp_filename_length + 1); obstack_grow (&obstack, temp_filename, - temp_filename_length); + temp_filename_length); arg_going = 1; delete_this_arg = 0; break; @@ -4704,7 +4738,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) { if (t == 0) { - t = (struct temp_name *) xmalloc (sizeof (struct temp_name)); + t = xmalloc (sizeof (struct temp_name)); t->next = temp_names; temp_names = t; } @@ -4733,8 +4767,16 @@ do_spec_1 (spec, inswitch, soft_matched_part) break; case 'i': - obstack_grow (&obstack, input_filename, input_filename_length); - arg_going = 1; + if (combine_inputs) + { + for (i = 0; (int) i < n_infiles; i++) + store_arg (infiles[i].name, 0, 0); + } + else + { + obstack_grow (&obstack, input_filename, input_filename_length); + arg_going = 1; + } break; case 'I': @@ -4750,12 +4792,15 @@ do_spec_1 (spec, inswitch, soft_matched_part) do_spec_1 (" ", 0, NULL); } - if (target_system_root_changed) + if (target_system_root_changed || + (target_system_root && target_sysroot_hdrs_suffix)) { do_spec_1 ("-isysroot", 1, NULL); /* Make this a separate argument. */ do_spec_1 (" ", 0, NULL); do_spec_1 (target_system_root, 1, NULL); + if (target_sysroot_hdrs_suffix) + do_spec_1 (target_sysroot_hdrs_suffix, 1, NULL); do_spec_1 (" ", 0, NULL); } @@ -4966,8 +5011,13 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* We assume there is a directory separator at the end of this string. */ if (target_system_root) - obstack_grow (&obstack, target_system_root, - strlen (target_system_root)); + { + obstack_grow (&obstack, target_system_root, + strlen (target_system_root)); + if (target_sysroot_suffix) + obstack_grow (&obstack, target_sysroot_suffix, + strlen (target_sysroot_suffix)); + } break; case 'S': @@ -5084,7 +5134,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) } else { - char *x = (char *) alloca (strlen (name) * 2 + 1); + char *x = alloca (strlen (name) * 2 + 1); char *buf = x; const char *y = name; int flag = 0; @@ -5140,7 +5190,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* Backslash: treat next character as ordinary. */ c = *p++; - /* fall through */ + /* Fall through. */ default: /* Ordinary character: put it into the current argument. */ obstack_1grow (&obstack, c); @@ -5167,8 +5217,7 @@ do_spec_1 (spec, inswitch, soft_matched_part) /* Look up a spec function. */ static const struct spec_function * -lookup_spec_function (name) - const char *name; +lookup_spec_function (const char *name) { static const struct spec_function * const spec_function_tables[] = { @@ -5191,8 +5240,7 @@ lookup_spec_function (name) /* Evaluate a spec function. */ static const char * -eval_spec_function (func, args) - const char *func, *args; +eval_spec_function (const char *func, const char *args) { const struct spec_function *sf; const char *funcval; @@ -5264,8 +5312,7 @@ eval_spec_function (func, args) NULL if no processing is required. */ static const char * -handle_spec_function (p) - const char *p; +handle_spec_function (const char *p) { char *func, *args; const char *endp, *funcval; @@ -5323,9 +5370,7 @@ handle_spec_function (p) /* Inline subroutine of handle_braces. Returns true if the current input suffix matches the atom bracketed by ATOM and END_ATOM. */ static inline bool -input_suffix_matches (atom, end_atom) - const char *atom; - const char *end_atom; +input_suffix_matches (const char *atom, const char *end_atom) { return (input_suffix && !strncmp (input_suffix, atom, end_atom - atom) @@ -5336,10 +5381,7 @@ input_suffix_matches (atom, end_atom) matching the atom bracketed by ATOM and END_ATOM appeared on the command line. */ static inline bool -switch_matches (atom, end_atom, starred) - const char *atom; - const char *end_atom; - int starred; +switch_matches (const char *atom, const char *end_atom, int starred) { int i; int len = end_atom - atom; @@ -5358,10 +5400,7 @@ switch_matches (atom, end_atom, starred) match ATOM (extends to END_ATOM; STARRED indicates whether there was a star after the atom) for later processing. */ static inline void -mark_matching_switches (atom, end_atom, starred) - const char *atom; - const char *end_atom; - int starred; +mark_matching_switches (const char *atom, const char *end_atom, int starred) { int i; int len = end_atom - atom; @@ -5377,7 +5416,7 @@ mark_matching_switches (atom, end_atom, starred) /* Inline subroutine of handle_braces. Process all the currently marked switches through give_switch, and clear the marks. */ static inline void -process_marked_switches () +process_marked_switches (void) { int i; @@ -5394,8 +5433,7 @@ process_marked_switches () if we call do_spec_1 and that returns -1. */ static const char * -handle_braces (p) - const char *p; +handle_braces (const char *p) { const char *atom, *end_atom; const char *d_atom = NULL, *d_end_atom = NULL; @@ -5543,12 +5581,8 @@ handle_braces (p) returns -1. */ static const char * -process_brace_body (p, atom, end_atom, starred, matched) - const char *p; - const char *atom; - const char *end_atom; - int starred; - int matched; +process_brace_body (const char *p, const char *atom, const char *end_atom, + int starred, int matched) { const char *body, *end_body; unsigned int nesting_level; @@ -5575,7 +5609,7 @@ process_brace_body (p, atom, end_atom, starred, matched) abort (); p++; } - + end_body = p; while (end_body[-1] == ' ' || end_body[-1] == '\t') end_body--; @@ -5628,9 +5662,7 @@ process_brace_body (p, atom, end_atom, starred, matched) with the "no-", similarly for a switch with the "no-" prefix. */ static int -check_live_switch (switchnum, prefix_length) - int switchnum; - int prefix_length; +check_live_switch (int switchnum, int prefix_length) { const char *name = switches[switchnum].part1; int i; @@ -5704,9 +5736,7 @@ check_live_switch (switchnum, prefix_length) If OMIT_FIRST_WORD is nonzero, then we omit .part1 of the argument. */ static void -give_switch (switchnum, omit_first_word) - int switchnum; - int omit_first_word; +give_switch (int switchnum, int omit_first_word) { if (switches[switchnum].live_cond == SWITCH_IGNORE) return; @@ -5756,8 +5786,7 @@ give_switch (switchnum, omit_first_word) Return the absolute file name found. If nothing is found, return NAME. */ static const char * -find_file (name) - const char *name; +find_file (const char *name) { char *newname; @@ -5782,14 +5811,11 @@ find_file (name) limit. */ static int -is_directory (path1, path2, linker) - const char *path1; - const char *path2; - int linker; +is_directory (const char *path1, const char *path2, int linker) { int len1 = strlen (path1); int len2 = strlen (path2); - char *path = (char *) alloca (3 + len1 + len2); + char *path = alloca (3 + len1 + len2); char *cp; struct stat st; @@ -5827,8 +5853,7 @@ is_directory (path1, path2, linker) the input file named FILENAME. */ void -set_input (filename) - const char *filename; +set_input (const char *filename) { const char *p; @@ -5869,8 +5894,7 @@ set_input (filename) /* On fatal signals, delete all the temporary files. */ static void -fatal_error (signum) - int signum; +fatal_error (int signum) { signal (signum, SIG_DFL); delete_failure_queue (); @@ -5880,12 +5904,10 @@ fatal_error (signum) kill (getpid (), signum); } -extern int main PARAMS ((int, const char *const *)); +extern int main (int, const char **); int -main (argc, argv) - int argc; - const char *const *argv; +main (int argc, const char **argv) { size_t i; int value; @@ -5997,9 +6019,8 @@ main (argc, argv) /* Initialize the vector of specs to just the default. This means one element containing 0s, as a terminator. */ - compilers = (struct compiler *) xmalloc (sizeof default_compilers); - memcpy ((char *) compilers, (char *) default_compilers, - sizeof default_compilers); + compilers = xmalloc (sizeof default_compilers); + memcpy (compilers, default_compilers, sizeof default_compilers); n_compilers = n_default_compilers; /* Read specs from a file if there is one. */ @@ -6017,9 +6038,8 @@ main (argc, argv) /* We need to check standard_exec_prefix/just_machine_suffix/specs for any override of as, ld and libraries. */ - specs_file = (char *) alloca (strlen (standard_exec_prefix) - + strlen (just_machine_suffix) - + sizeof ("specs")); + specs_file = alloca (strlen (standard_exec_prefix) + + strlen (just_machine_suffix) + sizeof ("specs")); strcpy (specs_file, standard_exec_prefix); strcat (specs_file, just_machine_suffix); @@ -6027,6 +6047,12 @@ main (argc, argv) if (access (specs_file, R_OK) == 0) read_specs (specs_file, TRUE); + /* Process any configure-time defaults specified for the command line + options, via OPTION_DEFAULT_SPECS. */ + for (i = 0; i < ARRAY_SIZE (option_default_specs); i++) + do_option_spec (option_default_specs[i].name, + option_default_specs[i].spec); + /* Process DRIVER_SELF_SPECS, adding any new options to the end of the command line. */ @@ -6044,6 +6070,26 @@ main (argc, argv) } } + /* Process sysroot_suffix_spec. */ + if (*sysroot_suffix_spec != 0 + && do_spec_2 (sysroot_suffix_spec) == 0) + { + if (argbuf_index > 1) + error ("spec failure: more than one arg to SYSROOT_SUFFIX_SPEC."); + else if (argbuf_index == 1) + target_sysroot_suffix = xstrdup (argbuf[argbuf_index -1]); + } + + /* Process sysroot_hdrs_suffix_spec. */ + if (*sysroot_hdrs_suffix_spec != 0 + && do_spec_2 (sysroot_hdrs_suffix_spec) == 0) + { + if (argbuf_index > 1) + error ("spec failure: more than one arg to SYSROOT_HEADERS_SUFFIX_SPEC."); + else if (argbuf_index == 1) + target_sysroot_hdrs_suffix = xstrdup (argbuf[argbuf_index -1]); + } + /* Look for startfiles in the standard places. */ if (*startfile_prefix_spec != 0 && do_spec_2 (startfile_prefix_spec) == 0 @@ -6073,12 +6119,15 @@ main (argc, argv) /* If standard_startfile_prefix is relative, base it on standard_exec_prefix. This lets us move the installed tree as a unit. If GCC_EXEC_PREFIX is defined, base - standard_startfile_prefix on that as well. */ - if (IS_ABSOLUTE_PATHNAME (standard_startfile_prefix)) + standard_startfile_prefix on that as well. + + If the prefix is relative, only search it for native compilers; + otherwise we will search a directory containing host libraries. */ + if (IS_ABSOLUTE_PATH (standard_startfile_prefix)) add_sysrooted_prefix (&startfile_prefixes, standard_startfile_prefix, "BINUTILS", PREFIX_PRIORITY_LAST, 0, NULL, 1); - else + else if (*cross_compile == '0') { if (gcc_exec_prefix) add_prefix (&startfile_prefixes, @@ -6252,13 +6301,34 @@ main (argc, argv) i = n_infiles; i += lang_specific_extra_outfiles; - outfiles = (const char **) xcalloc (i, sizeof (char *)); + outfiles = xcalloc (i, sizeof (char *)); /* Record which files were specified explicitly as link input. */ explicit_link_files = xcalloc (1, n_infiles); - for (i = 0; (int) i < n_infiles; i++) + if (combine_inputs) + { + int lang_n_infiles = 0; + for (i = 0; (int) i < n_infiles; i++) + { + const char *name = infiles[i].name; + struct compiler *compiler + = lookup_compiler (name, strlen (name), infiles[i].language); + if (compiler == NULL) + error ("%s: linker input file unused because linking not done", + name); + else if (lang_n_infiles > 0 && compiler != input_file_compiler) + fatal ("cannot specify -o with -c or -S and multiple languages"); + else + { + lang_n_infiles++; + input_file_compiler = compiler; + } + } + } + + for (i = 0; (int) i < (combine_inputs ? 1 : n_infiles); i++) { int this_file_error = 0; @@ -6273,9 +6343,10 @@ main (argc, argv) /* Figure out which compiler from the file's suffix. */ - input_file_compiler - = lookup_compiler (infiles[i].name, input_filename_length, - infiles[i].language); + if (! combine_inputs) + input_file_compiler + = lookup_compiler (infiles[i].name, input_filename_length, + infiles[i].language); if (input_file_compiler) { @@ -6389,10 +6460,7 @@ main (argc, argv) or 0 if this file is to be passed to the linker. */ static struct compiler * -lookup_compiler (name, length, language) - const char *name; - size_t length; - const char *language; +lookup_compiler (const char *name, size_t length, const char *language) { struct compiler *cp; @@ -6425,7 +6493,7 @@ lookup_compiler (name, length, language) } #if defined (OS2) ||defined (HAVE_DOS_BASED_FILE_SYSTEM) - /* look again, but case-insensitively this time. */ + /* Look again, but case-insensitively this time. */ if (cp < compilers) for (cp = compilers + n_compilers - 1; cp >= compilers; cp--) { @@ -6458,9 +6526,7 @@ lookup_compiler (name, length, language) } static char * -save_string (s, len) - const char *s; - int len; +save_string (const char *s, int len) { char *result = xmalloc (len + 1); @@ -6470,8 +6536,7 @@ save_string (s, len) } void -pfatal_with_name (name) - const char *name; +pfatal_with_name (const char *name) { perror_with_name (name); delete_temp_files (); @@ -6479,16 +6544,13 @@ pfatal_with_name (name) } static void -perror_with_name (name) - const char *name; +perror_with_name (const char *name) { error ("%s: %s", name, xstrerror (errno)); } static void -pfatal_pexecute (errmsg_fmt, errmsg_arg) - const char *errmsg_fmt; - const char *errmsg_arg; +pfatal_pexecute (const char *errmsg_fmt, const char *errmsg_arg) { if (errmsg_arg) { @@ -6505,21 +6567,21 @@ pfatal_pexecute (errmsg_fmt, errmsg_arg) pfatal_with_name (errmsg_fmt); } -/* Output an error message and exit */ +/* Output an error message and exit. */ void -fancy_abort () +fancy_abort (void) { fatal ("internal gcc abort"); } -/* Output an error message and exit */ +/* Output an error message and exit. */ void fatal (const char *msgid, ...) { va_list ap; - + va_start (ap, msgid); fprintf (stderr, "%s: ", programname); @@ -6534,7 +6596,7 @@ void error (const char *msgid, ...) { va_list ap; - + va_start (ap, msgid); fprintf (stderr, "%s: ", programname); vfprintf (stderr, _(msgid), ap); @@ -6547,15 +6609,14 @@ static void notice (const char *msgid, ...) { va_list ap; - + va_start (ap, msgid); vfprintf (stderr, _(msgid), ap); va_end (ap); } static inline void -validate_switches_from_spec (spec) - const char *spec; +validate_switches_from_spec (const char *spec) { const char *p = spec; char c; @@ -6566,7 +6627,7 @@ validate_switches_from_spec (spec) } static void -validate_all_switches () +validate_all_switches (void) { struct compiler *comp; struct spec_list *spec; @@ -6585,8 +6646,7 @@ validate_all_switches () and mark as valid all supplied switches that match it. */ static const char * -validate_switches (start) - const char *start; +validate_switches (const char *start) { const char *p = start; const char *atom; @@ -6594,9 +6654,9 @@ validate_switches (start) int i; bool suffix = false; bool starred = false; - + #define SKIP_WHITE() do { while (*p == ' ' || *p == '\t') p++; } while (0) - + next_member: SKIP_WHITE (); @@ -6669,9 +6729,7 @@ static int n_mdswitches; canonicalize the switches to keep only the ones we care about. */ static int -used_arg (p, len) - const char *p; - int len; +used_arg (const char *p, int len) { struct mswitchstr { @@ -6697,8 +6755,7 @@ used_arg (p, len) if (*q == ';') cnt++; - matches = - (struct mswitchstr *) alloca ((sizeof (struct mswitchstr)) * cnt); + matches = alloca ((sizeof (struct mswitchstr)) * cnt); i = 0; q = multilib_matches; while (*q != '\0') @@ -6730,8 +6787,7 @@ used_arg (p, len) xmalloc from calling fatal, and prevents us from re-executing this block of code. */ mswitches - = (struct mswitchstr *) - xmalloc (sizeof (struct mswitchstr) + = xmalloc (sizeof (struct mswitchstr) * (n_mdswitches + (n_switches ? n_switches : 1))); for (i = 0; i < n_switches; i++) { @@ -6809,9 +6865,7 @@ used_arg (p, len) } static int -default_arg (p, len) - const char *p; - int len; +default_arg (const char *p, int len) { int i; @@ -6834,7 +6888,7 @@ default_arg (p, len) will be used. */ static void -set_multilib_dir () +set_multilib_dir (void) { const char *p; unsigned int this_path_len; @@ -6860,9 +6914,7 @@ set_multilib_dir () { int i = 0; - mdswitches - = (struct mdswitchstr *) xmalloc (sizeof (struct mdswitchstr) - * n_mdswitches); + mdswitches = xmalloc (sizeof (struct mdswitchstr) * n_mdswitches); for (start = multilib_defaults; *start != '\0'; start = end + 1) { while (*start == ' ' || *start == '\t') @@ -6870,7 +6922,7 @@ set_multilib_dir () if (*start == '\0') break; - + for (end = start + 1; *end != ' ' && *end != '\t' && *end != '\0'; end++) ; @@ -7069,7 +7121,7 @@ set_multilib_dir () the exclusions. */ static void -print_multilib_info () +print_multilib_info (void) { const char *p = multilib_select; const char *last_path = 0, *this_path; @@ -7317,12 +7369,10 @@ print_multilib_info () (whose name has been expanded with %s). */ static const char * -if_exists_spec_function (argc, argv) - int argc; - const char **argv; +if_exists_spec_function (int argc, const char **argv) { /* Must have only one argument. */ - if (argc == 1 && IS_ABSOLUTE_PATHNAME (argv[0]) && ! access (argv[0], R_OK)) + if (argc == 1 && IS_ABSOLUTE_PATH (argv[0]) && ! access (argv[0], R_OK)) return argv[0]; return NULL; @@ -7334,15 +7384,13 @@ if_exists_spec_function (argc, argv) is returned if the first argument does not exist. */ static const char * -if_exists_else_spec_function (argc, argv) - int argc; - const char **argv; +if_exists_else_spec_function (int argc, const char **argv) { /* Must have exactly two arguments. */ if (argc != 2) return NULL; - if (IS_ABSOLUTE_PATHNAME (argv[0]) && ! access (argv[0], R_OK)) + if (IS_ABSOLUTE_PATH (argv[0]) && ! access (argv[0], R_OK)) return argv[0]; return argv[1];