X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/2eea62e1e3ef4496c0a850250d6575a65a6f2f3d..63621a81d16ab743de6b57d47578a9a2c670ad22:/uip/scansbr.c

diff --git a/uip/scansbr.c b/uip/scansbr.c
index 715357bc..457379cd 100644
--- a/uip/scansbr.c
+++ b/uip/scansbr.c
@@ -11,6 +11,7 @@
 #include <h/scansbr.h>
 #include <h/tws.h>
 #include <h/utils.h>
+#include "sbr/terminal.h"
 
 static struct format *fmt;
 static struct comp *datecomp;		/* pntr to "date" comp             */
@@ -26,15 +27,30 @@ static m_getfld_state_t gstate;		/* for accessor functions below    */
 
 #define DIEWRERR() adios (scnmsg, "write error on")
 
+#define PUTC(c) \
+    if (putc((c), scnout) == EOF) \
+        DIEWRERR();
+
 #define FPUTS(buf) {\
 		if (fputs(buf,scnout) == EOF)\
 		    DIEWRERR();\
 		}
 
+/* outnum determines how the input from inb is copied.  If positive then
+ * it is the number of the message to create, e.g. for inc(1), and all
+ * of the email is copied into that message, with some tweaks.  If 0,
+ * e.g. `scan 42', then reading inb can dubiously stop after a whole
+ * buffer of body, even though this might not be enough to fulfill the
+ * scan format and width.  Or if -1 then no copy is being created, but
+ * all of inb must be read because the next message must be found, e.g.
+ * `scan -file foo.mbox'. */
+
 int
 scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
       int unseen, char *folder, long size, int noisy, charstring_t *scanl)
 {
+    static bool deja_vu;
+    static int tty_width;
     int i, compnum, encrypted, state;
     char *cp, *tmpbuf, *startbody, **nxtbuf;
     char *saved_c_text = NULL;
@@ -51,15 +67,18 @@ scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
        scanl used to be a global. */
     if (! *scanl) {
 	if (width == -1) {
-	    /* Default:  width of the terminal, but at least WIDTH/2. */
-	    if ((width = sc_width ()) < WIDTH/2)
-		width = WIDTH/2;
+            if (!deja_vu) {
+                deja_vu = true;
+                tty_width = sc_width();
+            }
+
+            width = max(tty_width, WIDTH / 2);
 	} else if (width == 0) {
 	    /* Unlimited width. */
 	    width = INT_MAX;
 	}
 	dat[3] = slwidth = width;
-	*scanl = charstring_create (width < NMH_BUFSIZ ? width : NMH_BUFSIZ);
+        *scanl = charstring_create (min(width, NMH_BUFSIZ));
 	if (outnum)
 	    umask(~m_gmprot());
 
@@ -143,16 +162,12 @@ scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
         return SCNEOF;
     }
 
-    if (outnum) {
-	if (outnum > 0) {
-	    scnmsg = m_name (outnum);
-	    if (*scnmsg == '?')		/* msg num out of range */
-		return SCNNUM;
-	} else {
-	    scnmsg = "/dev/null";
-	}
-	if ((scnout = fopen (scnmsg, "w")) == NULL)
-	    adios (scnmsg, "unable to write");
+    if (outnum > 0) {
+        scnmsg = m_name (outnum);
+        if (*scnmsg == '?')		/* msg num out of range */
+            return SCNNUM;
+        if ((scnout = fopen (scnmsg, "w")) == NULL)
+            adios (scnmsg, "unable to write");
     }
 
     /* scan - main loop */
@@ -162,9 +177,9 @@ scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
 	    case FLD: 
 	    case FLDPLUS: 
 		compnum++;
-		if (outnum) {
+		if (scnout) {
 		    FPUTS (name);
-		    if ( putc (':', scnout) == EOF) DIEWRERR();
+		    PUTC(':');
 		    FPUTS (tmpbuf);
 		}
 		/*
@@ -190,7 +205,7 @@ scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
 		while (state == FLDPLUS) {
 		    bufsz = rlwidth;
 		    state = m_getfld (&gstate, name, tmpbuf, &bufsz, inb);
-		    if (outnum)
+		    if (scnout)
 			FPUTS (tmpbuf);
 		}
 		break;
@@ -206,14 +221,16 @@ scan (FILE *inb, int innum, int outnum, char *nfs, int width, int curflg,
 		    state = m_getfld (&gstate, name, tmpbuf + i, &bufsz, inb);
 		}
 
-		if (! outnum) {
+		if (outnum == 0) {
 		    state = FILEEOF; /* stop now if scan cmd */
 		    if (bodycomp && startbody == NULL)
 		    	startbody = tmpbuf;
 		    goto finished;
 		}
-		if (putc ('\n', scnout) == EOF) DIEWRERR();
-		FPUTS (tmpbuf);
+                if (scnout) {
+                    PUTC('\n');
+                    FPUTS (tmpbuf);
+                }
 		/*
                  * The previous code here used to call m_getfld() using
                  * pointers to the underlying output stdio buffers to
@@ -239,7 +256,8 @@ body:;
 		while (state == BODY) {
 		    bufsz = rlwidth;
 		    state = m_getfld (&gstate, name, tmpbuf, &bufsz, inb);
-		    FPUTS(tmpbuf);
+                    if (scnout)
+                        FPUTS(tmpbuf);
 		}
 		goto finished;
 
@@ -253,14 +271,14 @@ body:;
 
 		fprintf (stderr, "component %d\n", compnum);
 
-		if (outnum) {
+		if (scnout) {
 		    FPUTS ("\n\nBAD MSG:\n");
 		    FPUTS (name);
-		    if (putc ('\n', scnout) == EOF) DIEWRERR();
+		    PUTC('\n');
 		    state = BODY;
 		    goto body;
 		}
-		/* FALLTHRU */
+		goto finished;
 
 	    case FILEEOF:
 		goto finished;
@@ -287,7 +305,7 @@ finished:
 
     if (size)
 	dat[2] = size;
-    else if (outnum > 0)
+    else if (scnout)
     {
 	dat[2] = ftell(scnout);
 	if (dat[2] == EOF) DIEWRERR();
@@ -327,7 +345,7 @@ finished:
 	cptr->c_text = NULL;
     }
 
-    if (outnum && (ferror(scnout) || fclose (scnout) == EOF))
+    if (scnout && (ferror(scnout) || fclose (scnout) == EOF))
 	DIEWRERR();
 
     return (state != FILEEOF ? SCNERR : encrypted ? SCNENC : SCNMSG);
@@ -336,7 +354,7 @@ finished:
 
 /* The following two functions allow access to the global gstate above. */
 void
-scan_finished () {
+scan_finished(void) {
     m_getfld_state_destroy (&gstate);
 }