Flush out the last dregs in the terminal before quitting when

[unix-history] / usr / src / usr.bin / mail / tty.c

diff --git a/usr/src/usr.bin/mail/tty.c b/usr/src/usr.bin/mail/tty.c
index 4c8ab42..c7236be 100644 (file)
--- a/usr/src/usr.bin/mail/tty.c
+++ b/usr/src/usr.bin/mail/tty.c
@@ -1,4 +1,23 @@
-#
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that the above copyright notice and this paragraph are
+ * duplicated in all such forms and that any documentation,
+ * advertising materials, and other materials related to such
+ * distribution and use acknowledge that the software was developed
+ * by the University of California, Berkeley.  The name of the
+ * University may not be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)tty.c      5.7 (Berkeley) %G%";
+#endif /* not lint */

 
 /*
  * Mail -- a mail program
 
 /*
  * Mail -- a mail program


@@ -7,12 +26,11 @@
  */
 
 #include "rcv.h"
  */
 
 #include "rcv.h"

-#include <sgtty.h>
-
-static char *SccsId = "@(#)tty.c       1.3 %G%";

 
 static int     c_erase;                /* Current erase char */
 static int     c_kill;                 /* Current kill char */
 
 static int     c_erase;                /* Current erase char */
 static int     c_kill;                 /* Current kill char */

+static int     hadcont;                /* Saw continue signal */
+static jmp_buf rewrite;                /* Place to go when continued */

 #ifndef TIOCSTI
 static int     ttyset;                 /* We must now do erase/kill */
 #endif
 #ifndef TIOCSTI
 static int     ttyset;                 /* We must now do erase/kill */
 #endif


@@ -26,11 +44,12 @@ grabh(hp, gflags)
 {
        struct sgttyb ttybuf;
 #ifndef TIOCSTI
 {
        struct sgttyb ttybuf;
 #ifndef TIOCSTI

-       int (*savesigs[2])();
+       int (*saveint)(), (*savequit)();

 #endif
 #endif

-       register int s;
+       int (*savecont)();

        int errs;
 
        int errs;
 

+       savecont = signal(SIGCONT, SIG_DFL);

        errs = 0;
 #ifndef TIOCSTI
        ttyset = 0;
        errs = 0;
 #ifndef TIOCSTI
        ttyset = 0;


@@ -44,18 +63,18 @@ grabh(hp, gflags)
 #ifndef TIOCSTI
        ttybuf.sg_erase = 0;
        ttybuf.sg_kill = 0;
 #ifndef TIOCSTI
        ttybuf.sg_erase = 0;
        ttybuf.sg_kill = 0;

-       for (s = SIGINT; s <= SIGQUIT; s++)
-               if ((savesigs[s-SIGINT] = sigset(s, SIG_IGN)) == SIG_DFL)
-                       sigset(s, SIG_DFL);
+       if ((saveint = signal(SIGINT, SIG_IGN)) == SIG_DFL)
+               signal(SIGINT, SIG_DFL);
+       if ((savequit = signal(SIGQUIT, SIG_IGN)) == SIG_DFL)
+               signal(SIGQUIT, SIG_DFL);

 #endif
        if (gflags & GTO) {
 #ifndef TIOCSTI
 #endif
        if (gflags & GTO) {
 #ifndef TIOCSTI

-               if (!ttyset && hp->h_to != NOSTR)
+               if (!ttyset && hp->h_to != NIL)

                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif
                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif

-               hp->h_to = readtty("To: ", hp->h_to);
-               if (hp->h_to != NOSTR)
-                       hp->h_seq++;
+               hp->h_to =
+                       extract(readtty("To: ", detract(hp->h_to, 0)), GTO);

        }
        if (gflags & GSUBJECT) {
 #ifndef TIOCSTI
        }
        if (gflags & GSUBJECT) {
 #ifndef TIOCSTI


@@ -63,34 +82,31 @@ grabh(hp, gflags)
                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif
                hp->h_subject = readtty("Subject: ", hp->h_subject);
                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif
                hp->h_subject = readtty("Subject: ", hp->h_subject);

-               if (hp->h_subject != NOSTR)
-                       hp->h_seq++;

        }
        if (gflags & GCC) {
 #ifndef TIOCSTI
        }
        if (gflags & GCC) {
 #ifndef TIOCSTI

-               if (!ttyset && hp->h_cc != NOSTR)
+               if (!ttyset && hp->h_cc != NIL)

                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif
                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif

-               hp->h_cc = readtty("Cc: ", hp->h_cc);
-               if (hp->h_cc != NOSTR)
-                       hp->h_seq++;
+               hp->h_cc =
+                       extract(readtty("Cc: ", detract(hp->h_cc, 0)), GCC);

        }
        if (gflags & GBCC) {
 #ifndef TIOCSTI
        }
        if (gflags & GBCC) {
 #ifndef TIOCSTI

-               if (!ttyset && hp->h_bcc != NOSTR)
+               if (!ttyset && hp->h_bcc != NIL)

                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif
                        ttyset++, stty(fileno(stdin), &ttybuf);
 #endif

-               hp->h_bcc = readtty("Bcc: ", hp->h_bcc);
-               if (hp->h_bcc != NOSTR)
-                       hp->h_seq++;
+               hp->h_bcc =
+                       extract(readtty("Bcc: ", detract(hp->h_bcc, 0)), GBCC);

        }
        }

+       signal(SIGCONT, savecont);

 #ifndef TIOCSTI
        ttybuf.sg_erase = c_erase;
        ttybuf.sg_kill = c_kill;
        if (ttyset)
                stty(fileno(stdin), &ttybuf);
 #ifndef TIOCSTI
        ttybuf.sg_erase = c_erase;
        ttybuf.sg_kill = c_kill;
        if (ttyset)
                stty(fileno(stdin), &ttybuf);

-       for (s = SIGINT; s <= SIGQUIT; s++)
-               sigset(s, savesigs[s-SIGINT]);
+       signal(SIGINT, saveint);
+       signal(SIGQUIT, savequit);

 #endif
        return(errs);
 }
 #endif
        return(errs);
 }


@@ -106,11 +122,13 @@ char *
 readtty(pr, src)
        char pr[], src[];
 {
 readtty(pr, src)
        char pr[], src[];
 {

-       char canonb[BUFSIZ];
-       int c, ch;
+       char ch, canonb[BUFSIZ];
+       int c;

        register char *cp, *cp2;
        register char *cp, *cp2;

+       int ttycont();

 
 

-       fputs(pr, stdout); fflush(stdout);
+       fputs(pr, stdout);
+       fflush(stdout);

        if (src != NOSTR && strlen(src) > BUFSIZ - 2) {
                printf("too long to edit\n");
                return(src);
        if (src != NOSTR && strlen(src) > BUFSIZ - 2) {
                printf("too long to edit\n");
                return(src);


@@ -123,24 +141,45 @@ readtty(pr, src)
        fputs(canonb, stdout);
        fflush(stdout);
 #else
        fputs(canonb, stdout);
        fflush(stdout);
 #else

-       for (cp = src; c = *cp; cp++) {
+       cp = src == NOSTR ? "" : src;
+       while (c = *cp++) {

                if (c == c_erase || c == c_kill) {
                        ch = '\\';
                        ioctl(0, TIOCSTI, &ch);
                }
                if (c == c_erase || c == c_kill) {
                        ch = '\\';
                        ioctl(0, TIOCSTI, &ch);
                }

-               ioctl(0, TIOCSTI, &c);
+               ch = c;
+               ioctl(0, TIOCSTI, &ch);

        }
        cp = canonb;
        *cp = 0;
 #endif
        }
        cp = canonb;
        *cp = 0;
 #endif

-       cp2 = fgets(cp, BUFSIZ - (cp - canonb), stdin);
-       cp = index(canonb, '\n');
-       if (cp != NOSTR)
-               *cp = 0;
+       cp2 = cp;
+       while (cp2 < canonb + BUFSIZ)
+               *cp2++ = 0;
+       cp2 = cp;
+       if (setjmp(rewrite))
+               goto redo;
+       signal(SIGCONT, ttycont);
+       clearerr(stdin);
+       while (cp2 < canonb + BUFSIZ) {
+               c = getc(stdin);
+               if (c == EOF || c == '\n')
+                       break;
+               *cp2++ = c;
+       }
+       *cp2 = 0;
+       signal(SIGCONT, SIG_DFL);
+       if (c == EOF && ferror(stdin) && hadcont) {
+redo:
+               hadcont = 0;
+               cp = strlen(canonb) > 0 ? canonb : NOSTR;
+               clearerr(stdin);
+               return(readtty(pr, cp));
+       }

 #ifndef TIOCSTI
 #ifndef TIOCSTI

-       if (cp2 == NOSTR || *cp2 == '\0')
+       if (cp == NOSTR || *cp == '\0')

                return(src);
                return(src);

-       cp = cp2;
+       cp2 = cp;

        if (!ttyset)
                return(strlen(canonb) > 0 ? savestr(canonb) : NOSTR);
        while (*cp != '\0') {
        if (!ttyset)
                return(strlen(canonb) > 0 ? savestr(canonb) : NOSTR);
        while (*cp != '\0') {


@@ -173,3 +212,13 @@ readtty(pr, src)
                return(NOSTR);
        return(savestr(canonb));
 }
                return(NOSTR);
        return(savestr(canonb));
 }

+
+/*
+ * Receipt continuation.
+ */
+/*ARGSUSED*/
+ttycont(s)
+{
+       hadcont++;
+       longjmp(rewrite, 1);
+}