/* 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,
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);
}
}