gcc/cppspec.c

   1 /* Specific flags and argument handling of the C preprocessor.
   2    Copyright (C) 1999 Free Software Foundation, Inc.
   3
   4 This file is part of GCC.
   5
   6 GCC is free software; you can redistribute it and/or modify it under
   7 the terms of the GNU General Public License as published by the Free
   8 Software Foundation; either version 2, or (at your option) any later
   9 version.
  10
  11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
  12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14 for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GCC; see the file COPYING.  If not, write to the Free
  18 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  19 02111-1307, USA.  */
  20
  21 #include "config.h"
  22 #include "system.h"
  23 #include "coretypes.h"
  24 #include "tm.h"
  25 #include "gcc.h"
  26
  27 /* The `cpp' executable installed in $(bindir) and $(cpp_install_dir)
  28    is a customized version of the gcc driver.  It forces -E; -S and -c
  29    are errors.  It defaults to -x c for files with unrecognized
  30    extensions, unless -x options appear in argv, in which case we
  31    assume the user knows what they're doing.  If no explicit input is
  32    mentioned, it will read stdin.  */
  33
  34 #ifndef SWITCH_TAKES_ARG
  35 #define SWITCH_TAKES_ARG(CHAR) DEFAULT_SWITCH_TAKES_ARG(CHAR)
  36 #endif
  37
  38 #ifndef WORD_SWITCH_TAKES_ARG
  39 #define WORD_SWITCH_TAKES_ARG(STR) DEFAULT_WORD_SWITCH_TAKES_ARG (STR)
  40 #endif
  41
  42 /* Suffixes for known sorts of input files.  Note that we do not list
  43    files which are normally considered to have been preprocessed already,
  44    since the user's expectation is that `cpp' always preprocesses.  */
  45 static const char *const known_suffixes[] =
  46 {
  47   ".c",  ".C",   ".S",   ".m",
  48   ".cc", ".cxx", ".cpp", ".cp",  ".c++",
  49   NULL
  50 };
  51
  52 /* Filter argc and argv before processing by the gcc driver proper.  */
  53 void
  54 lang_specific_driver (in_argc, in_argv, in_added_libraries)
  55      int *in_argc;
  56      const char *const **in_argv;
  57      int *in_added_libraries ATTRIBUTE_UNUSED;
  58 {
  59   int argc = *in_argc;
  60   const char *const *argv = *in_argv;
  61
  62   /* Do we need to read stdin? */
  63   int read_stdin = 1;
  64
  65   /* Do we need to insert -E? */
  66   int need_E = 1;
  67
  68   /* Do we need to insert -no-gcc? */
  69   int need_no_gcc = 1;
  70
  71   /* Have we seen an input file? */
  72   int seen_input = 0;
  73
  74   /* Positions to insert -xc, -xassembler-with-cpp, and -o, if necessary.
  75      0 means unnecessary.  */
  76   int lang_c_here = 0;
  77   int lang_S_here = 0;
  78   int o_here = 0;
  79
  80   /* Do we need to fix up an input file with an unrecognized suffix? */
  81   int need_fixups = 1;
  82
  83   int i, j, quote = 0;
  84   const char **new_argv;
  85   int new_argc;
  86   extern int is_cpp_driver;
  87
  88   is_cpp_driver = 1;
  89
  90   /* First pass.  If we see an -S or -c, barf.  If we see an input file,
  91      turn off read_stdin.  If we see a second input file, it is actually
  92      the output file.  If we see a third input file, barf.  */
  93   for (i = 1; i < argc; i++)
  94     {
  95       if (quote == 1)
  96         {
  97           quote = 0;
  98           continue;
  99         }
 100
 101       if (argv[i][0] == '-')
 102         {
 103           if (argv[i][1] == '\0')
 104             read_stdin = 0;
 105           else if (argv[i][2] == '\0')
 106             {
 107               if (argv[i][1] == 'E')
 108                 need_E = 0;
 109               else if (argv[i][1] == 'S' || argv[i][1] == 'c')
 110                 {
 111                   fatal ("\"%s\" is not a valid option to the preprocessor",
 112                          argv[i]);
 113                   return;
 114                 }
 115               else if (argv[i][1] == 'x')
 116                 {
 117                   need_fixups = 0;
 118                   quote = 1;
 119                 }
 120               else if (SWITCH_TAKES_ARG (argv[i][1]))
 121                 quote = 1;
 122             }
 123           else if (argv[i][1] == 'x')
 124             need_fixups = 0;
 125           else if (argv[i][1] == 'g' && !strcmp(&argv[i][2], "cc"))
 126             need_no_gcc = 0;
 127           else if (WORD_SWITCH_TAKES_ARG (&argv[i][1]))
 128             quote = 1;
 129         }
 130       else /* not an option */
 131         {
 132           seen_input++;
 133           if (seen_input == 3)
 134             {
 135               fatal ("too many input files");
 136               return;
 137             }
 138           else if (seen_input == 2)
 139             {
 140               o_here = i;
 141             }
 142           else
 143             {
 144               read_stdin = 0;
 145               if (need_fixups)
 146                 {
 147                   int l = strlen (argv[i]);
 148                   int known = 0;
 149                   const char *const *suff;
 150
 151                   for (suff = known_suffixes; *suff; suff++)
 152                     if (!strcmp (*suff, &argv[i][l - strlen(*suff)]))
 153                       {
 154                         known = 1;
 155                         break;
 156                       }
 157
 158                   if (! known)
 159                     {
 160                       /* .s files are a special case; we have to treat
 161                          them like .S files so -D__ASSEMBLER__ will be
 162                          in effect.  */
 163                       if (!strcmp (".s", &argv[i][l - 2]))
 164                         lang_S_here = i;
 165                       else
 166                         lang_c_here = i;
 167                     }
 168                 }
 169             }
 170         }
 171     }
 172
 173   /* If we don't need to edit the command line, we can bail early.  */
 174
 175   new_argc = argc + need_E + need_no_gcc + read_stdin
 176     + !!o_here + !!lang_c_here + !!lang_S_here;
 177
 178   if (new_argc == argc)
 179     return;
 180
 181   /* One more slot for a terminating null.  */
 182   new_argv = (const char **) xmalloc ((new_argc + 1) * sizeof(char *));
 183
 184   new_argv[0] = argv[0];
 185   j = 1;
 186
 187   if (need_E)
 188     new_argv[j++] = "-E";
 189
 190   if (need_no_gcc)
 191     new_argv[j++] = "-no-gcc";
 192
 193   for (i = 1; i < argc; i++, j++)
 194     {
 195       if (i == lang_c_here)
 196         new_argv[j++] = "-xc";
 197       else if (i == lang_S_here)
 198         new_argv[j++] = "-xassembler-with-cpp";
 199       else if (i == o_here)
 200         new_argv[j++] = "-o";
 201
 202       new_argv[j] = argv[i];
 203     }
 204
 205   if (read_stdin)
 206     new_argv[j++] = "-";
 207
 208   new_argv[j] = NULL;
 209   *in_argc = new_argc;
 210   *in_argv = new_argv;
 211 }
 212
 213 /* Called before linking.  Returns 0 on success and -1 on failure.  */
 214 int lang_specific_pre_link ()
 215 {
 216   return 0;  /* Not used for cpp.  */
 217 }
 218
 219 /* Number of extra output files that lang_specific_pre_link may generate.  */
 220 int lang_specific_extra_outfiles = 0;  /* Not used for cpp.  */
 221
 222 /* Table of language-specific spec functions.  */
 223 const struct spec_function lang_specific_spec_functions[] =
 224 {
 225   { 0, 0 }
 226 };