OSDN Git Service

config:
[pf3gnuchains/gcc-fork.git] / gcc / fix-header.c
index 73e7bb6..3741a13 100644 (file)
@@ -432,8 +432,6 @@ write_lbrac ()
 struct partial_proto
 {
   struct partial_proto *next;
-  char *fname; /* name of function */
-  char *rtype; /* return type */
   struct fn_decl *fn;
   int line_seen;
 };
@@ -497,15 +495,13 @@ recognized_macro (fname)
 }
 
 void
-recognized_extern (name, name_length, type, type_length)
-     const char *name;
-     const char *type ATTRIBUTE_UNUSED;
-     int name_length, type_length ATTRIBUTE_UNUSED;
+recognized_extern (name)
+     const cpp_token *name;
 {
   switch (special_file_handling)
     {
     case errno_h:
-      if (name_length == 5 && strncmp (name, "errno", 5) == 0 && !seen_errno)
+      if (cpp_ideq (name, "errno"))
        seen_errno = 1, required_other--;
       break;
 
@@ -515,25 +511,18 @@ recognized_extern (name, name_length, type, type_length)
 }
 
 /* Called by scan_decls if it saw a function definition for a function
-   named FNAME, with return type RTYPE, and argument list ARGS,
-   in source file FILE_SEEN on line LINE_SEEN.
-   KIND is 'I' for an inline function;
-   'F' if a normal function declaration preceded by 'extern "C"'
-   (or nested inside 'extern "C"' braces); or
+   named FNAME, in source file FILE_SEEN on line LINE_SEEN.  KIND is
+   'I' for an inline function; 'F' if a normal function declaration
+   preceded by 'extern "C"' (or nested inside 'extern "C"' braces); or
    'f' for other function declarations.  */
 
 void
-recognized_function (fname, fname_length,
-                    kind, rtype, rtype_length,
-                    have_arg_list, file_seen, line_seen)
-     const char *fname;
-     int fname_length;
+recognized_function (fname, line, kind, have_arg_list, file_seen)
+     const cpp_token *fname;
+     unsigned int line;
      int kind; /* One of 'f' 'F' or 'I' */
-     const char *rtype;
-     int rtype_length;
      int have_arg_list;
      const char *file_seen;
-     int line_seen;
 {
   struct partial_proto *partial;
   int i;
@@ -543,7 +532,8 @@ recognized_function (fname, fname_length,
     missing_extern_C_count++;
 #endif
 
-  fn = lookup_std_proto (fname, fname_length);
+  fn = lookup_std_proto ((const char *)fname->val.node->name,
+                        fname->val.node->length);
 
   /* Remove the function from the list of required function.  */
   if (fn)
@@ -577,12 +567,7 @@ recognized_function (fname, fname_length,
   partial_count++;
   partial = (struct partial_proto *)
     obstack_alloc (&scan_file_obstack, sizeof (struct partial_proto));
-  partial->fname = obstack_alloc (&scan_file_obstack, fname_length + 1);
-  bcopy (fname, partial->fname, fname_length);
-  partial->fname[fname_length] = 0;
-  partial->rtype = obstack_alloc (&scan_file_obstack, rtype_length + 1);
-  sprintf (partial->rtype, "%.*s", rtype_length, rtype);
-  partial->line_seen = line_seen;
+  partial->line_seen = line;
   partial->fn = fn;
   fn->partial = partial;
   partial->next = partial_proto_list;
@@ -590,7 +575,7 @@ recognized_function (fname, fname_length,
   if (verbose)
     {
       fprintf (stderr, "(%s: %s non-prototype function declaration.)\n",
-              inc_filename, partial->fname);
+              inc_filename, fn->fname);
     }
 }
 
@@ -602,11 +587,13 @@ check_macro_names (pfile, names)
      cpp_reader *pfile;
      namelist names;
 {
+  size_t len;
   while (*names)
     {
-      if (cpp_defined (pfile, names, -1))
+      len = strlen (names);
+      if (cpp_defined (pfile, (const unsigned char *)names, len))
        recognized_macro (names);
-      names += strlen (names) + 1;
+      names += len + 1;
     }
 }
 
@@ -623,7 +610,9 @@ read_scan_file (in_fname, argc, argv)
 
   obstack_init (&scan_file_obstack); 
 
+  cpp_init ();                 /* Initialize cpplib.   */
   cpp_reader_init (&scan_in);
+
   /* We are going to be scanning a header file out of its proper context,
      so ignore warnings and errors.  */
   CPP_OPTION (&scan_in, inhibit_warnings) = 1;
@@ -634,45 +623,41 @@ read_scan_file (in_fname, argc, argv)
   if (CPP_FATAL_ERRORS (&scan_in))
     exit (FATAL_EXIT_CODE);
 
-  if (! cpp_start_read (&scan_in, 0, in_fname))
+  if (! cpp_start_read (&scan_in, in_fname))
     exit (FATAL_EXIT_CODE);
 
+  /* We are scanning a system header, so mark it as such.  */
+  cpp_make_system_header (&scan_in, CPP_BUFFER (&scan_in), 1);
+
   scan_decls (&scan_in, argc, argv);
   for (cur_symbols = &symbol_table[0]; cur_symbols->names; cur_symbols++)
     check_macro_names (&scan_in, cur_symbols->names);
 
-  if (verbose && (scan_in.errors + warnings) > 0)
-    fprintf (stderr, "(%s: %d errors and %d warnings from cpp)\n",
-            inc_filename, scan_in.errors, warnings);
-  if (scan_in.errors)
-    exit (SUCCESS_EXIT_CODE);
-
   /* Traditionally, getc and putc are defined in terms of _filbuf and _flsbuf.
      If so, those functions are also required.  */
   if (special_file_handling == stdio_h
       && (fn = lookup_std_proto ("_filbuf", 7)) != NULL)
     {
-      static char getchar_call[] = "getchar();";
-      cpp_buffer *buf
-       = cpp_push_buffer (&scan_in, getchar_call, sizeof(getchar_call) - 1);
-      int old_written = CPP_WRITTEN (&scan_in);
+      static const unsigned char getchar_call[] = "getchar();";
       int seen_filbuf = 0;
+      cpp_buffer *buf = CPP_BUFFER (&scan_in);
+      if (cpp_push_buffer (&scan_in, getchar_call,
+                          sizeof(getchar_call) - 1) == NULL)
+       return;
 
       /* Scan the macro expansion of "getchar();".  */
       for (;;)
        {
-         enum cpp_ttype token = cpp_get_token (&scan_in);
-         int length = CPP_WRITTEN (&scan_in) - old_written;
-         CPP_SET_WRITTEN (&scan_in, old_written);
-         if (token == CPP_EOF) /* Should not happen ...  */
-           break;
-         if (token == CPP_POP && CPP_BUFFER (&scan_in) == buf)
+         cpp_token t;
+
+         cpp_get_token (&scan_in, &t);
+         if (t.type == CPP_EOF)
            {
              cpp_pop_buffer (&scan_in);
-             break;
+             if (CPP_BUFFER (&scan_in) == buf)
+               break;
            }
-         if (token == CPP_NAME && length == 7
-             && strcmp ("_filbuf", scan_in.token_buffer + old_written) == 0)
+         else if (cpp_ideq (&t, "_filbuf"))
            seen_filbuf++;
        }
       if (seen_filbuf)
@@ -690,7 +675,7 @@ read_scan_file (in_fname, argc, argv)
                SET_REQUIRED (fn);
              if (need_flsbuf)
                SET_REQUIRED (flsbuf_fn);
-             if (need_flsbuf + need_filbuf == 2)
+             if (need_flsbuf && need_filbuf)
                new_list = "_filbuf\0_flsbuf\0";
              else if (need_flsbuf)
                new_list = "_flsbuf\0";
@@ -795,6 +780,8 @@ write_rbrac ()
          /* In the case of memmove, protect in case the application
             defines it as a macro before including the header.  */
          if (!strcmp (fn->fname, "memmove")
+             || !strcmp (fn->fname, "putc")
+             || !strcmp (fn->fname, "getc")
              || !strcmp (fn->fname, "vprintf")
              || !strcmp (fn->fname, "vfprintf")
              || !strcmp (fn->fname, "vsprintf")
@@ -1027,8 +1014,6 @@ check_protection (ifndef_line, endif_line)
        }
       else if (!strcmp (buf.base, "define"))
        {
-         if (if_nesting != 1)
-           goto skip_to_eol;
          c = inf_skip_spaces (c);
          c = inf_scan_ident (&buf, c);
          if (buf.base[0] > 0 && strcmp (buf.base, protect_name) == 0)