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   /* Have we seen an input file? */
  69   int seen_input = 0;
  70
  71   /* Positions to insert -xc, -xassembler-with-cpp, and -o, if necessary.
  72      0 means unnecessary.  */
  73   int lang_c_here = 0;
  74   int lang_S_here = 0;
  75   int o_here = 0;
  76
  77   /* Do we need to fix up an input file with an unrecognized suffix? */
  78   int need_fixups = 1;
  79
  80   int i, j, quote = 0;
  81   const char **new_argv;
  82   int new_argc;
  83   extern int is_cpp_driver;
  84
  85   is_cpp_driver = 1;
  86
  87   /* First pass.  If we see an -S or -c, barf.  If we see an input file,
  88      turn off read_stdin.  If we see a second input file, it is actually
  89      the output file.  If we see a third input file, barf.  */
  90   for (i = 1; i < argc; i++)
  91     {
  92       if (quote == 1)
  93         {
  94           quote = 0;
  95           continue;
  96         }
  97
  98       if (argv[i][0] == '-')
  99         {
 100           if (argv[i][1] == '\0')
 101             read_stdin = 0;
 102           else if (argv[i][2] == '\0')
 103             {
 104               if (argv[i][1] == 'E')
 105                 need_E = 0;
 106               else if (argv[i][1] == 'S' || argv[i][1] == 'c')
 107                 {
 108                   fatal ("\"%s\" is not a valid option to the preprocessor",
 109                          argv[i]);
 110                   return;
 111                 }
 112               else if (argv[i][1] == 'x')
 113                 {
 114                   need_fixups = 0;
 115                   quote = 1;
 116                 }
 117               else if (SWITCH_TAKES_ARG (argv[i][1]))
 118                 quote = 1;
 119             }
 120           else if (argv[i][1] == 'x')
 121             need_fixups = 0;
 122           else if (WORD_SWITCH_TAKES_ARG (&argv[i][1]))
 123             quote = 1;
 124         }
 125       else /* not an option */
 126         {
 127           seen_input++;
 128           if (seen_input == 3)
 129             {
 130               fatal ("too many input files");
 131               return;
 132             }
 133           else if (seen_input == 2)
 134             {
 135               o_here = i;
 136             }
 137           else
 138             {
 139               read_stdin = 0;
 140               if (need_fixups)
 141                 {
 142                   int l = strlen (argv[i]);
 143                   int known = 0;
 144                   const char *const *suff;
 145
 146                   for (suff = known_suffixes; *suff; suff++)
 147                     if (!strcmp (*suff, &argv[i][l - strlen(*suff)]))
 148                       {
 149                         known = 1;
 150                         break;
 151                       }
 152
 153                   if (! known)
 154                     {
 155                       /* .s files are a special case; we have to treat
 156                          them like .S files so -D__ASSEMBLER__ will be
 157                          in effect.  */
 158                       if (!strcmp (".s", &argv[i][l - 2]))
 159                         lang_S_here = i;
 160                       else
 161                         lang_c_here = i;
 162                     }
 163                 }
 164             }
 165         }
 166     }
 167
 168   /* If we don't need to edit the command line, we can bail early.  */
 169
 170   new_argc = argc + need_E + read_stdin
 171     + !!o_here + !!lang_c_here + !!lang_S_here;
 172
 173   if (new_argc == argc)
 174     return;
 175
 176   /* One more slot for a terminating null.  */
 177   new_argv = (const char **) xmalloc ((new_argc + 1) * sizeof(char *));
 178
 179   new_argv[0] = argv[0];
 180   j = 1;
 181
 182   if (need_E)
 183     new_argv[j++] = "-E";
 184
 185   for (i = 1; i < argc; i++, j++)
 186     {
 187       if (i == lang_c_here)
 188         new_argv[j++] = "-xc";
 189       else if (i == lang_S_here)
 190         new_argv[j++] = "-xassembler-with-cpp";
 191       else if (i == o_here)
 192         new_argv[j++] = "-o";
 193
 194       new_argv[j] = argv[i];
 195     }
 196
 197   if (read_stdin)
 198     new_argv[j++] = "-";
 199
 200   new_argv[j] = NULL;
 201   *in_argc = new_argc;
 202   *in_argv = new_argv;
 203 }
 204
 205 /* Called before linking.  Returns 0 on success and -1 on failure.  */
 206 int lang_specific_pre_link ()
 207 {
 208   return 0;  /* Not used for cpp.  */
 209 }
 210
 211 /* Number of extra output files that lang_specific_pre_link may generate.  */
 212 int lang_specific_extra_outfiles = 0;  /* Not used for cpp.  */
 213
 214 /* Table of language-specific spec functions.  */
 215 const struct spec_function lang_specific_spec_functions[] =
 216 {
 217   { 0, 0 }
 218 };