#include "intl.h"
#include "diagnostic.h"
#include "obstack.h"
+#include "opts.h"
+#include "options.h"
int debug; /* true if -save-temps. */
int verbose; /* true if -v. */
/* Template of LTRANS dumpbase suffix. */
#define DUMPBASE_SUFFIX ".ltrans18446744073709551615"
+/* Create decoded options from the COLLECT_GCC and COLLECT_GCC_OPTIONS
+ environment according to LANG_MASK. */
+
+static void
+get_options_from_collect_gcc_options (const char *collect_gcc,
+ const char *collect_gcc_options,
+ unsigned int lang_mask,
+ struct cl_decoded_option **decoded_options,
+ unsigned int *decoded_options_count)
+{
+ char *argv_storage;
+ const char **argv;
+ int i, j, argc;
+
+ /* Count arguments. */
+ argc = 0;
+ for (j = 0; collect_gcc_options[j] != '\0'; ++j)
+ if (collect_gcc_options[j] == '\'')
+ ++argc;
+ if (argc % 2 != 0)
+ fatal ("malformed COLLECT_GCC_OPTIONS");
+
+ /* Copy the options to a argv-like array. */
+ argc /= 2;
+ argv = (const char **) xmalloc ((argc + 2) * sizeof (char *));
+ argv[0] = collect_gcc;
+ argv_storage = xstrdup (collect_gcc_options);
+ for (i = 1, j = 0; argv_storage[j] != '\0'; ++j)
+ {
+ if (argv_storage[j] == '\'')
+ {
+ argv[i++] = &argv_storage[++j];
+ while (argv_storage[j] != '\'')
+ ++j;
+ argv_storage[j] = '\0';
+ }
+ }
+ argv[i] = NULL;
+
+ decode_cmdline_options_to_array (argc, (const char **)argv,
+ lang_mask,
+ decoded_options, decoded_options_count);
+ free (argv);
+}
+
+
/* Execute gcc. ARGC is the number of arguments. ARGV contains the arguments. */
static void
const char **argv_ptr;
char *list_option_full = NULL;
const char *linker_output = NULL;
- const char *collect_gcc_options, *collect_gcc;
+ const char *collect_gcc, *collect_gcc_options;
struct obstack env_obstack;
- bool seen_o = false;
int parallel = 0;
int jobserver = 0;
bool no_partition = false;
+ struct cl_decoded_option *decoded_options;
+ unsigned int decoded_options_count;
/* Get the driver and options. */
collect_gcc = getenv ("COLLECT_GCC");
if (!collect_gcc)
fatal ("environment variable COLLECT_GCC must be set");
-
- /* Set the CFLAGS environment variable. */
collect_gcc_options = getenv ("COLLECT_GCC_OPTIONS");
if (!collect_gcc_options)
fatal ("environment variable COLLECT_GCC_OPTIONS must be set");
-
- /* Count arguments. */
- i = 0;
- for (j = 0; collect_gcc_options[j] != '\0'; ++j)
- if (collect_gcc_options[j] == '\'')
- ++i;
-
- if (i % 2 != 0)
- fatal ("malformed COLLECT_GCC_OPTIONS");
+ get_options_from_collect_gcc_options (collect_gcc, collect_gcc_options,
+ CL_LANG_ALL,
+ &decoded_options,
+ &decoded_options_count);
/* Initalize the common arguments for the driver. */
- new_argv = (const char **) xmalloc ((15 + i / 2 + argc) * sizeof (char *));
+ new_argv = (const char **) xmalloc ((15 + decoded_options_count + argc)
+ * sizeof (char *));
argv_ptr = new_argv;
*argv_ptr++ = collect_gcc;
*argv_ptr++ = "-xlto";
*argv_ptr++ = "-c";
- for (j = 0; collect_gcc_options[j] != '\0'; ++j)
- if (collect_gcc_options[j] == '\'')
- {
- char *option;
-
- ++j;
- i = j;
- while (collect_gcc_options[j] != '\'')
- ++j;
-
- obstack_init (&env_obstack);
- obstack_grow (&env_obstack, &collect_gcc_options[i], j - i);
- obstack_1grow (&env_obstack, 0);
- option = XOBFINISH (&env_obstack, char *);
- if (seen_o)
- {
- linker_output = option;
- seen_o = false;
- continue;
- }
-
- /* If we see -o, skip it and skip and record its argument. */
- if (option[0] == '-' && option[1] == 'o')
- {
- if (option[2] == '\0')
- seen_o = true;
- else
- linker_output = &option[2];
- continue;
- }
+ for (j = 1; j < decoded_options_count; ++j)
+ {
+ struct cl_decoded_option *option = &decoded_options[j];
- if (strcmp (option, "-save-temps") == 0)
+ /* Do not pass on frontend specific flags. */
+ if (!(cl_options[option->opt_index].flags
+ & (CL_COMMON|CL_TARGET|CL_DRIVER)))
+ continue;
+
+ switch (option->opt_index)
+ {
+ case OPT_o:
+ linker_output = option->arg;
+ /* We generate new intermediate output, drop this arg. */
+ continue;
+
+ case OPT_save_temps:
debug = 1;
- if (strcmp (option, "-v") == 0)
+ break;
+
+ case OPT_v:
verbose = 1;
+ break;
- if (strcmp (option, "-flto-partition=none") == 0)
+ case OPT_flto_partition_none:
no_partition = true;
- /* We've handled these LTO options, do not pass them on. */
- if (strncmp (option, "-flto=", 6) == 0
- || !strcmp (option, "-flto"))
- {
- lto_mode = LTO_MODE_WHOPR;
- if (option[5] == '=')
- {
- if (!strcmp (option + 6, "jobserver"))
- {
- jobserver = 1;
- parallel = 1;
- }
- else
- {
- parallel = atoi (option + 6);
- if (parallel <= 1)
- parallel = 0;
- }
- }
- }
- else
- *argv_ptr++ = option;
- }
+ break;
+
+ case OPT_flto_:
+ if (strcmp (option->arg, "jobserver") == 0)
+ {
+ jobserver = 1;
+ parallel = 1;
+ }
+ else
+ {
+ parallel = atoi (option->arg);
+ if (parallel <= 1)
+ parallel = 0;
+ }
+ /* Fallthru. */
+
+ case OPT_flto:
+ lto_mode = LTO_MODE_WHOPR;
+ /* We've handled these LTO options, do not pass them on. */
+ continue;
+
+ default:
+ break;
+ }
+
+ /* Pass the option on. */
+ *argv_ptr++ = option->orig_option_with_args_text;
+ }
+
if (no_partition)
{
lto_mode = LTO_MODE_LTO;
/* We may be called with all the arguments stored in some file and
passed with @file. Expand them into argv before processing. */
expandargv (&argc, &argv);
+
run_gcc (argc, argv);
return 0;
OSDN Git Service
