241 lines
6.3 KiB
C
241 lines
6.3 KiB
C
/* Specific flags and argument handling of the C preprocessor.
|
|
Copyright (C) 1999 Free Software Foundation, Inc.
|
|
|
|
This file is part of GCC.
|
|
|
|
GCC 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.
|
|
|
|
GCC 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 GCC; see the file COPYING. If not, write to the Free
|
|
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
|
02111-1307, USA. */
|
|
|
|
#include "config.h"
|
|
#include "system.h"
|
|
#include "gcc.h"
|
|
|
|
/* The `cpp' executable installed in $(bindir) and $(cpp_install_dir)
|
|
is a customized version of the gcc driver. It forces -E; -S and -c
|
|
are errors. It defaults to -x c for files with unrecognized
|
|
extensions, unless -x options appear in argv, in which case we
|
|
assume the user knows what they're doing. If no explicit input is
|
|
mentioned, it will read stdin. */
|
|
|
|
/* Snarfed from gcc.c: */
|
|
|
|
/* This defines which switch letters take arguments. */
|
|
|
|
#define DEFAULT_SWITCH_TAKES_ARG(CHAR) \
|
|
((CHAR) == 'D' || (CHAR) == 'U' || (CHAR) == 'o' \
|
|
|| (CHAR) == 'e' || (CHAR) == 'T' || (CHAR) == 'u' \
|
|
|| (CHAR) == 'I' || (CHAR) == 'm' || (CHAR) == 'x' \
|
|
|| (CHAR) == 'L' || (CHAR) == 'A' || (CHAR) == 'V' \
|
|
|| (CHAR) == 'B' || (CHAR) == 'b')
|
|
|
|
#ifndef SWITCH_TAKES_ARG
|
|
#define SWITCH_TAKES_ARG(CHAR) DEFAULT_SWITCH_TAKES_ARG(CHAR)
|
|
#endif
|
|
|
|
/* This defines which multi-letter switches take arguments. */
|
|
|
|
#define DEFAULT_WORD_SWITCH_TAKES_ARG(STR) \
|
|
(!strcmp (STR, "Tdata") || !strcmp (STR, "Ttext") \
|
|
|| !strcmp (STR, "Tbss") || !strcmp (STR, "include") \
|
|
|| !strcmp (STR, "imacros") || !strcmp (STR, "aux-info") \
|
|
|| !strcmp (STR, "idirafter") || !strcmp (STR, "iprefix") \
|
|
|| !strcmp (STR, "iwithprefix") || !strcmp (STR, "iwithprefixbefore") \
|
|
|| !strcmp (STR, "isystem") || !strcmp (STR, "specs") \
|
|
|| !strcmp (STR, "MF") || !strcmp (STR, "MT") || !strcmp (STR, "MQ"))
|
|
|
|
#ifndef WORD_SWITCH_TAKES_ARG
|
|
#define WORD_SWITCH_TAKES_ARG(STR) DEFAULT_WORD_SWITCH_TAKES_ARG (STR)
|
|
#endif
|
|
|
|
/* Suffixes for known sorts of input files. Note that we do not list
|
|
files which are normally considered to have been preprocessed already,
|
|
since the user's expectation is that `cpp' always preprocesses. */
|
|
static const char *const known_suffixes[] =
|
|
{
|
|
".c", ".C", ".S", ".m",
|
|
".cc", ".cxx", ".cpp", ".cp", ".c++",
|
|
NULL
|
|
};
|
|
|
|
/* Filter argc and argv before processing by the gcc driver proper. */
|
|
void
|
|
lang_specific_driver (in_argc, in_argv, in_added_libraries)
|
|
int *in_argc;
|
|
const char *const **in_argv;
|
|
int *in_added_libraries ATTRIBUTE_UNUSED;
|
|
{
|
|
int argc = *in_argc;
|
|
const char *const *argv = *in_argv;
|
|
|
|
/* Do we need to read stdin? */
|
|
int read_stdin = 1;
|
|
|
|
/* Do we need to insert -E? */
|
|
int need_E = 1;
|
|
|
|
/* Do we need to insert -no-gcc? */
|
|
int need_no_gcc = 1;
|
|
|
|
/* Have we seen an input file? */
|
|
int seen_input = 0;
|
|
|
|
/* Positions to insert -xc, -xassembler-with-cpp, and -o, if necessary.
|
|
0 means unnecessary. */
|
|
int lang_c_here = 0;
|
|
int lang_S_here = 0;
|
|
int o_here = 0;
|
|
|
|
/* Do we need to fix up an input file with an unrecognized suffix? */
|
|
int need_fixups = 1;
|
|
|
|
int i, j, quote = 0;
|
|
const char **new_argv;
|
|
int new_argc;
|
|
extern int is_cpp_driver;
|
|
|
|
is_cpp_driver = 1;
|
|
|
|
/* First pass. If we see an -S or -c, barf. If we see an input file,
|
|
turn off read_stdin. If we see a second input file, it is actually
|
|
the output file. If we see a third input file, barf. */
|
|
for (i = 1; i < argc; i++)
|
|
{
|
|
if (quote == 1)
|
|
{
|
|
quote = 0;
|
|
continue;
|
|
}
|
|
|
|
if (argv[i][0] == '-')
|
|
{
|
|
if (argv[i][1] == '\0')
|
|
read_stdin = 0;
|
|
else if (argv[i][2] == '\0')
|
|
{
|
|
if (argv[i][1] == 'E')
|
|
need_E = 0;
|
|
else if (argv[i][1] == 'S' || argv[i][1] == 'c')
|
|
{
|
|
fatal ("\"%s\" is not a valid option to the preprocessor",
|
|
argv[i]);
|
|
return;
|
|
}
|
|
else if (argv[i][1] == 'x')
|
|
{
|
|
need_fixups = 0;
|
|
quote = 1;
|
|
}
|
|
else if (SWITCH_TAKES_ARG (argv[i][1]))
|
|
quote = 1;
|
|
}
|
|
else if (argv[i][1] == 'x')
|
|
need_fixups = 0;
|
|
else if (argv[i][1] == 'g' && !strcmp(&argv[i][2], "cc"))
|
|
need_no_gcc = 0;
|
|
else if (WORD_SWITCH_TAKES_ARG (&argv[i][1]))
|
|
quote = 1;
|
|
}
|
|
else /* not an option */
|
|
{
|
|
seen_input++;
|
|
if (seen_input == 3)
|
|
{
|
|
fatal ("too many input files");
|
|
return;
|
|
}
|
|
else if (seen_input == 2)
|
|
{
|
|
o_here = i;
|
|
}
|
|
else
|
|
{
|
|
read_stdin = 0;
|
|
if (need_fixups)
|
|
{
|
|
int l = strlen (argv[i]);
|
|
int known = 0;
|
|
const char *const *suff;
|
|
|
|
for (suff = known_suffixes; *suff; suff++)
|
|
if (!strcmp (*suff, &argv[i][l - strlen(*suff)]))
|
|
{
|
|
known = 1;
|
|
break;
|
|
}
|
|
|
|
if (! known)
|
|
{
|
|
/* .s files are a special case; we have to treat
|
|
them like .S files so -D__ASSEMBLER__ will be
|
|
in effect. */
|
|
if (!strcmp (".s", &argv[i][l - 2]))
|
|
lang_S_here = i;
|
|
else
|
|
lang_c_here = i;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/* If we don't need to edit the command line, we can bail early. */
|
|
|
|
new_argc = argc + need_E + need_no_gcc + read_stdin
|
|
+ !!o_here + !!lang_c_here + !!lang_S_here;
|
|
|
|
if (new_argc == argc)
|
|
return;
|
|
|
|
/* One more slot for a terminating null. */
|
|
new_argv = (const char **) xmalloc ((new_argc + 1) * sizeof(char *));
|
|
|
|
new_argv[0] = argv[0];
|
|
j = 1;
|
|
|
|
if (need_E)
|
|
new_argv[j++] = "-E";
|
|
|
|
if (need_no_gcc)
|
|
new_argv[j++] = "-no-gcc";
|
|
|
|
for (i = 1; i < argc; i++, j++)
|
|
{
|
|
if (i == lang_c_here)
|
|
new_argv[j++] = "-xc";
|
|
else if (i == lang_S_here)
|
|
new_argv[j++] = "-xassembler-with-cpp";
|
|
else if (i == o_here)
|
|
new_argv[j++] = "-o";
|
|
|
|
new_argv[j] = argv[i];
|
|
}
|
|
|
|
if (read_stdin)
|
|
new_argv[j++] = "-";
|
|
|
|
new_argv[j] = NULL;
|
|
*in_argc = new_argc;
|
|
*in_argv = new_argv;
|
|
}
|
|
|
|
/* Called before linking. Returns 0 on success and -1 on failure. */
|
|
int lang_specific_pre_link ()
|
|
{
|
|
return 0; /* Not used for cpp. */
|
|
}
|
|
|
|
/* Number of extra output files that lang_specific_pre_link may generate. */
|
|
int lang_specific_extra_outfiles = 0; /* Not used for cpp. */
|