OSDN Git Service

2008-02-05 H.J. Lu <hongjiu.lu@intel.com>
[pf3gnuchains/gcc-fork.git] / gcc / cppspec.c
index 387b1ce..344da17 100644 (file)
 /* Specific flags and argument handling of the C preprocessor.
-   Copyright (C) 1999 Free Software Foundation, Inc.
+   Copyright (C) 1999, 2007 Free Software Foundation, Inc.
 
-This file is part of GNU CC.
+This file is part of GCC.
 
-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.
+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 3, 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.
+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 GNU CC; see the file COPYING.  If not, write to
-the Free Software Foundation, 59 Temple Place - Suite 330,
-Boston, MA 02111-1307, USA.  */
+along with GCC; see the file COPYING3.  If not see
+<http://www.gnu.org/licenses/>.  */
 
 #include "config.h"
 #include "system.h"
+#include "coretypes.h"
+#include "tm.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')
+   mentioned, it will read stdin.  */
 
 #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.  We let gcc.c worry about
-   which are appropriate preprocessor input.  */
+/* 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",   ".S",   ".m",
+  ".c",  ".C",   ".S",   ".m",
   ".cc", ".cxx", ".cpp", ".cp",  ".c++",
-  ".i",  ".ii",  ".mi",  ".o",   ".a",
+  ".sx",
   NULL
 };
 
-/* Filter argc and argv before processing by the gcc driver proper. */
+/* 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;
+lang_specific_driver (int *in_argc, const char *const **in_argv,
+                     int *in_added_libraries ATTRIBUTE_UNUSED)
 {
   int argc = *in_argc;
-  char **argv = *in_argv;
-  
+  const char *const *argv = *in_argv;
+
   /* Do we need to read stdin? */
-  int read_stdin;
+  int read_stdin = 1;
 
   /* Do we need to insert -E? */
-  int need_E;
+  int need_E = 1;
+
+  /* Have we seen an input file? */
+  int seen_input = 0;
 
-  /* Do we need to fixup files with unrecognized suffixes? */
-  int need_fixups;
+  /* 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;
 
-  /* Table of input files with unrecognized suffixes. */
-  char *urs_tab;
-  int urs_count;
-  int urs_block;
+  /* 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 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, and if it has an unrecognizable suffix, mark
-     it for fixup. */
-  urs_tab = xmalloc (argc);
-  memset (urs_tab, 0, argc);
-  urs_count = 0;
-  urs_block = 0;
-  quote = 0;
-  read_stdin = 1;
-  need_E = 1;
-  need_fixups = 1;
+     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)
@@ -114,7 +92,7 @@ lang_specific_driver (errfn, in_argc, in_argv, in_added_libraries)
          quote = 0;
          continue;
        }
-      
+
       if (argv[i][0] == '-')
        {
          if (argv[i][1] == '\0')
@@ -125,9 +103,9 @@ lang_specific_driver (errfn, in_argc, in_argv, in_added_libraries)
                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]);
-                 goto done;
+                 fatal ("\"%s\" is not a valid option to the preprocessor",
+                        argv[i]);
+                 return;
                }
              else if (argv[i][1] == 'x')
                {
@@ -144,82 +122,89 @@ lang_specific_driver (errfn, in_argc, in_argv, in_added_libraries)
        }
       else /* not an option */
        {
-         int l = strlen (argv[i]);
-         int known = 0;
-         const char **suff;
-         
-         read_stdin = 0;
-         for (suff = known_suffixes; *suff; suff++)
-           if (!strcmp (*suff, &argv[i][l - strlen(*suff)]))
-             {
-               known = 1;
-               break;
-             }
-
-         if (known)
+         seen_input++;
+         if (seen_input == 3)
            {
-             if (urs_block)
-               {
-                 urs_block = 0;
-                 urs_tab[i] = 2;
-                 urs_count++;
-               }
+             fatal ("too many input files");
+             return;
+           }
+         else if (seen_input == 2)
+           {
+             o_here = i;
            }
          else
            {
-             if (!urs_block)
+             read_stdin = 0;
+             if (need_fixups)
                {
-                 urs_block = 1;
-                 urs_tab[i] = 1;
-                 urs_count++;
+                 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 were given an -E option and an input file, and no input
-     files have unrecognized suffixes, we can bail early.  */
-  if (!need_E && !read_stdin && (!need_fixups || urs_count == 0))
-    goto done;
+  /* If we don't need to edit the command line, we can bail early.  */
+
+  new_argc = argc + need_E + read_stdin
+    + !!o_here + !!lang_c_here + !!lang_S_here;
+
+  if (new_argc == argc)
+    return;
 
-  new_argc = argc + need_E + read_stdin + (need_fixups ? urs_count : 0);
-  new_argv = xmalloc (new_argc * sizeof(char *));
+  /* One more slot for a terminating null.  */
+  new_argv = XNEWVEC (const char *, new_argc + 1);
 
   new_argv[0] = argv[0];
+  j = 1;
+
   if (need_E)
+    new_argv[j++] = "-E";
+
+  for (i = 1; i < argc; i++, j++)
     {
-      new_argv[1] = "-E";
-      j = 2;
+      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];
     }
-  else
-    j = 1;
-
-  if (need_fixups)
-    for (i = 1; i < argc; i++, j++)
-      {
-       if (urs_tab[i])
-         new_argv[j++] = (urs_tab[i] == 1) ? "-xc" : "-xnone";
-
-       new_argv[j] = argv[i];
-      }
-  else
-    memcpy (&new_argv[j], &argv[1], (argc - 1)*sizeof (char *));
 
   if (read_stdin)
-    new_argv[j] = "-";
+    new_argv[j++] = "-";
 
+  new_argv[j] = NULL;
   *in_argc = new_argc;
   *in_argv = new_argv;
-
-done:
-  free (urs_tab);
 }
 
-/* Called before linking.  Returns 0 on success and -1 on failure. */
-int lang_specific_pre_link ()
+/* Called before linking.  Returns 0 on success and -1 on failure.  */
+int lang_specific_pre_link (void)
 {
-  return 0;  /* Not used for cpp. */
+  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. */
+/* Number of extra output files that lang_specific_pre_link may generate.  */
+int lang_specific_extra_outfiles = 0;  /* Not used for cpp.  */