235 lines
6.2 KiB
C
235 lines
6.2 KiB
C
|
/* Specific flags and argument handling of the C preprocessor.
|
||
|
|
Copyright (C) 1999 Free Software Foundation, Inc.
|
||
|
|
|
||
|
|
This file is part of GNU CC.
|
||
|
|
|
||
|
|
GNU CC 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.
|
||
|
|
|
||
|
|
GNU CC 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 GNU CC; 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"
|
||
|
|
|
||
|
|
/* 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"))
|
||
|
|
|
||
|
|
#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 (errfn, in_argc, in_argv, in_added_libraries)
|
||
|
|
void (*errfn) PVPROTO((const char *, ...));
|
||
|
|
int *in_argc;
|
||
|
|
char ***in_argv;
|
||
|
|
int *in_added_libraries ATTRIBUTE_UNUSED;
|
||
|
|
{
|
||
|
|
int argc = *in_argc;
|
||
|
|
char **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;
|
||
|
|
char **new_argv;
|
||
|
|
int new_argc;
|
||
|
|
|
||
|
|
/* 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')
|
||
|
|
{
|
||
|
|
(*errfn) ("`%s' is not a legal 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)
|
||
|
|
{
|
||
|
|
(*errfn) ("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;
|
||
|
|
|
||
|
|
new_argv = xmalloc (new_argc * 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] = "-";
|
||
|
|
|
||
|
|
*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. */
|