(IS_EINTR): Define.
[gnulib.git] / lib / closeout.c
index ac99045..90606f2 100644 (file)
@@ -1,5 +1,5 @@
 /* closeout.c - close standard output
-   Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
+   Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 # include <config.h>
 #endif
 
-#include <sys/types.h>
-#include <sys/stat.h>
-
-#if ENABLE_NLS
-# include <libintl.h>
-# define _(Text) gettext (Text)
-#else
-# define _(Text) Text
-#endif
-
 #if HAVE_STDLIB_H
 # include <stdlib.h>
 #endif
 # define EXIT_FAILURE 1
 #endif
 
-#if HAVE_UNISTD_H
-# include <unistd.h>
-#endif
-
 #include <stdio.h>
 
 #include <errno.h>
 extern int errno;
 #endif
 
-#ifndef STDOUT_FILENO
-# define STDOUT_FILENO 1
-#endif
+#include "gettext.h"
+#define _(msgid) gettext (msgid)
 
 #include "closeout.h"
 #include "error.h"
+#include "quotearg.h"
+#include "unlocked-io.h"
+#include "__fpending.h"
 
 static int default_exit_status = EXIT_FAILURE;
-static const char *file_name = NULL;
+static const char *file_name;
 
 /* Set the value to be used for the exit status when close_stdout is called.
    This is useful when it is not convenient to call close_stdout_status,
@@ -96,29 +84,27 @@ close_stdout_set_file_name (const char *file)
    It's important to detect such failures and exit nonzero because many
    tools (most notably `make' and other build-management systems) depend
    on being able to detect failure in other tools via their exit status.  */
+
 void
 close_stdout_status (int status)
 {
-#ifdef EBADF
-  struct stat sbuf;
-  if (fstat (STDOUT_FILENO, &sbuf) && errno == EBADF)
-    return;
-#endif
+  int e = ferror (stdout) ? 0 : -1;
 
-  if (ferror (stdout))
-    {
-      if (file_name)
-       error (status, 0, _("%s: write error"), file_name);
-      else
-       error (status, 0, _("write error"));
-    }
+  /* If the stream's error bit is clear and there is nothing to flush,
+     then return right away.  */
+  if (e && __fpending (stdout) == 0)
+    return;
 
   if (fclose (stdout) != 0)
+    e = errno;
+
+  if (0 <= e)
     {
+      char const *write_error = _("write error");
       if (file_name)
-       error (status, errno, _("%s: write error"), file_name);
+       error (status, e, "%s: %s", quotearg_colon (file_name), write_error);
       else
-       error (status, errno, _("write error"));
+       error (status, e, "%s", write_error);
     }
 }