From f54674f1b5d07148d9655fc3b337ad5f725272a7 Mon Sep 17 00:00:00 2001
From: David Levine <levinedl@acm.org>
Date: Sun, 28 Oct 2018 14:27:39 -0400
Subject: [PATCH] scan(1) now checks for full output device [Bug #50925].

Added fflush(3) after every output line:  may slow down scan on
output with large number of lines.
---
 docs/pending-release-notes |  1 +
 test/scan/test-scan        |  9 +++++++++
 uip/scan.c                 |  5 +++--
 uip/scansbr.c              | 10 ++++++++--
 4 files changed, 21 insertions(+), 4 deletions(-)

diff --git a/docs/pending-release-notes b/docs/pending-release-notes
index 138a909b..4623da54 100644
--- a/docs/pending-release-notes
+++ b/docs/pending-release-notes
@@ -19,3 +19,4 @@ DEPRECATED FEATURES
 BUG FIXES
 ---------
 
+- scan(1) now checks for full output device [Bug #50925].
\ No newline at end of file
diff --git a/test/scan/test-scan b/test/scan/test-scan
index 00e383cb..510ad36a 100755
--- a/test/scan/test-scan
+++ b/test/scan/test-scan
@@ -39,6 +39,15 @@ run_prog scan +inbox -width 80 >"$actual" || exit 1
 check "$expected" "$actual"
 
 
+# check full output device, if one exists
+if test -c /dev/full; then
+  start_test 'full output device'
+  printf 'scan: failed to fflush stdout: No space left on device\n' >"$expected"
+  scan last >/dev/full 2>"$actual"  &&  false
+  check "$expected" "$actual"
+fi
+
+
 # check highlighting
 start_test 'highlighting'
 cat >"$expected" <<EOF
diff --git a/uip/scan.c b/uip/scan.c
index b999378b..c85a9efd 100644
--- a/uip/scan.c
+++ b/uip/scan.c
@@ -299,8 +299,9 @@ main (int argc, char **argv)
 	    scan_finished ();
 	    hdrflag = false;
 	    fclose (in);
-	    if (ontty)
-		fflush (stdout);
+	    if (ontty  &&  fflush (stdout) == EOF) {
+		adios("stdout", "failed to fflush");
+	    }
 	}
     }
     charstring_free (scanl);
diff --git a/uip/scansbr.c b/uip/scansbr.c
index 38b2ca41..2d281c2b 100644
--- a/uip/scansbr.c
+++ b/uip/scansbr.c
@@ -340,8 +340,14 @@ finished:
     if (bodycomp)
 	bodycomp->c_text = saved_c_text;
 
-    if (noisy)
-	fputs (charstring_buffer (*scanl), stdout);
+    if (noisy) {
+	if (fputs (charstring_buffer (*scanl), stdout) == EOF) {
+	    adios("stdout", "failed to fputs");
+	}
+	if (fflush (stdout)) {
+	    adios("stdout", "failed to fflush");
+	}
+    }
 
     cptr = fmt_findcomp ("encrypted");
     encrypted = cptr && cptr->c_text;
-- 
2.56.0