From: Kurt A. Schoens <kas@ucbvax.Berkeley.EDU>
Date: Thu, 9 Oct 1980 01:52:04 +0000 (-0800)
Subject: date and time created 80/10/08 09:52:04 by kas
X-Git-Tag: BSD-4^3~472
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/80741a9fee3cf75b6d200dc8f66df5fc2537ddb5

date and time created 80/10/08 09:52:04 by kas

SCCS-vsn: usr.bin/mail/tty.c 1.1
---

diff --git a/usr/src/usr.bin/mail/tty.c b/usr/src/usr.bin/mail/tty.c
new file mode 100644
index 0000000000..a5e9a51daa
--- /dev/null
+++ b/usr/src/usr.bin/mail/tty.c
@@ -0,0 +1,172 @@
+#
+
+/*
+ * Mail -- a mail program
+ *
+ * Generally useful tty stuff.
+ */
+
+#include "rcv.h"
+#include <sgtty.h>
+
+static char *SccsId = "@(#)tty.c	1.1 %G%";
+
+static	int	c_erase;		/* Current erase char */
+static	int	c_kill;			/* Current kill char */
+#ifndef TIOCSTI
+static	int	ttyset;			/* We must now do erase/kill */
+#endif
+
+/*
+ * Read all relevant header fields.
+ */
+
+grabh(hp, gflags)
+	struct header *hp;
+{
+	struct sgttyb ttybuf;
+#ifndef TIOCSTI
+	int (*savesigs[2])();
+#endif
+	register int s;
+	int errs;
+
+	errs = 0;
+#ifndef TIOCSTI
+	ttyset = 0;
+#endif
+	if (gtty(fileno(stdin), &ttybuf) < 0) {
+		perror("gtty");
+		return(-1);
+	}
+	c_erase = ttybuf.sg_erase;
+	c_kill = ttybuf.sg_kill;
+#ifndef TIOCSTI
+	ttybuf.sg_erase = 0;
+	ttybuf.sg_kill = 0;
+	for (s = SIGINT; s <= SIGQUIT; s++)
+		if ((savesigs[s-SIGINT] = signal(s, SIG_IGN)) == SIG_DFL)
+			signal(s, SIG_DFL);
+#endif
+	if (gflags & GTO) {
+#ifndef TIOCSTI
+		if (!ttyset && hp->h_to != NOSTR)
+			ttyset++, stty(fileno(stdin), &ttybuf);
+#endif
+		hp->h_to = readtty("To: ", hp->h_to);
+		if (hp->h_to != NOSTR)
+			hp->h_seq++;
+	}
+	if (gflags & GSUBJECT) {
+#ifndef TIOCSTI
+		if (!ttyset && hp->h_subject != NOSTR)
+			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 (!ttyset && hp->h_cc != NOSTR)
+			ttyset++, stty(fileno(stdin), &ttybuf);
+#endif
+		hp->h_cc = readtty("Cc: ", hp->h_cc);
+		if (hp->h_cc != NOSTR)
+			hp->h_seq++;
+	}
+	if (gflags & GBCC) {
+#ifndef TIOCSTI
+		if (!ttyset && hp->h_bcc != NOSTR)
+			ttyset++, stty(fileno(stdin), &ttybuf);
+#endif
+		hp->h_bcc = readtty("Bcc: ", hp->h_bcc);
+		if (hp->h_bcc != NOSTR)
+			hp->h_seq++;
+	}
+#ifndef TIOCSTI
+	ttybuf.sg_erase = c_erase;
+	ttybuf.sg_kill = c_kill;
+	if (ttyset)
+		stty(fileno(stdin), &ttybuf);
+	for (s = SIGINT; s <= SIGQUIT; s++)
+		signal(s, savesigs[s-SIGINT]);
+#endif
+	return(errs);
+}
+
+/*
+ * Read up a header from standard input.
+ * The source string has the preliminary contents to
+ * be read.
+ *
+ */
+
+char *
+readtty(pr, src)
+	char pr[], src[];
+{
+	char canonb[BUFSIZ];
+	int c, ch;
+	register char *cp, *cp2;
+
+	fputs(pr, stdout); fflush(stdout);
+	if (src != NOSTR && strlen(src) > BUFSIZ - 2) {
+		printf("too long to edit\n");
+		return(src);
+	}
+#ifndef TIOCSTI
+	if (src != NOSTR)
+		cp = copy(src, canonb);
+	else
+		cp = copy("", canonb);
+	fputs(canonb, stdout);
+	fflush(stdout);
+#else
+	for (cp = src; c = *cp; cp++) {
+		if (c == c_erase || c == c_kill) {
+			ch = '\\';
+			ioctl(0, TIOCSTI, &ch);
+		}
+		ioctl(0, TIOCSTI, &c);
+	}
+	cp = canonb;
+#endif
+	cp2 = fgets(cp, BUFSIZ - (cp - canonb), stdin);
+	canonb[strlen(canonb) - 1] = '\0';
+#ifndef TIOCSTI
+	if (cp2 == NOSTR || *cp2 == '\0')
+		return(src);
+	cp = cp2;
+	if (!ttyset)
+		return(strlen(canonb) > 0 ? savestr(canonb) : NOSTR);
+	while (*cp != '\0') {
+		c = *cp++;
+		if (c == c_erase) {
+			if (cp2 == canonb)
+				continue;
+			if (cp2[-1] == '\\') {
+				cp2[-1] = c;
+				continue;
+			}
+			cp2--;
+			continue;
+		}
+		if (c == c_kill) {
+			if (cp2 == canonb)
+				continue;
+			if (cp2[-1] == '\\') {
+				cp2[-1] = c;
+				continue;
+			}
+			cp2 = canonb;
+			continue;
+		}
+		*cp2++ = c;
+	}
+	*cp2 = '\0';
+#endif
+	if (equal("", canonb))
+		return(NOSTR);
+	return(savestr(canonb));
+}