![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tty.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / ucb / Mail|
Return to tty.c CVS log | Up to [CSRG BSD Unix] / 43BSD / ucb / Mail |
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: */ ! 6: ! 7: #ifndef lint ! 8: static char *sccsid = "@(#)tty.c 5.2 (Berkeley) 6/21/85"; ! 9: #endif not lint ! 10: ! 11: /* ! 12: * Mail -- a mail program ! 13: * ! 14: * Generally useful tty stuff. ! 15: */ ! 16: ! 17: #include "rcv.h" ! 18: ! 19: static int c_erase; /* Current erase char */ ! 20: static int c_kill; /* Current kill char */ ! 21: static int hadcont; /* Saw continue signal */ ! 22: static jmp_buf rewrite; /* Place to go when continued */ ! 23: #ifndef TIOCSTI ! 24: static int ttyset; /* We must now do erase/kill */ ! 25: #endif ! 26: ! 27: /* ! 28: * Read all relevant header fields. ! 29: */ ! 30: ! 31: grabh(hp, gflags) ! 32: struct header *hp; ! 33: { ! 34: struct sgttyb ttybuf; ! 35: int ttycont(), signull(); ! 36: #ifndef TIOCSTI ! 37: int (*savesigs[2])(); ! 38: #endif ! 39: int (*savecont)(); ! 40: register int s; ! 41: int errs; ! 42: ! 43: # ifdef VMUNIX ! 44: savecont = sigset(SIGCONT, signull); ! 45: # endif VMUNIX ! 46: errs = 0; ! 47: #ifndef TIOCSTI ! 48: ttyset = 0; ! 49: #endif ! 50: if (gtty(fileno(stdin), &ttybuf) < 0) { ! 51: perror("gtty"); ! 52: return(-1); ! 53: } ! 54: c_erase = ttybuf.sg_erase; ! 55: c_kill = ttybuf.sg_kill; ! 56: #ifndef TIOCSTI ! 57: ttybuf.sg_erase = 0; ! 58: ttybuf.sg_kill = 0; ! 59: for (s = SIGINT; s <= SIGQUIT; s++) ! 60: if ((savesigs[s-SIGINT] = sigset(s, SIG_IGN)) == SIG_DFL) ! 61: sigset(s, SIG_DFL); ! 62: #endif ! 63: if (gflags & GTO) { ! 64: #ifndef TIOCSTI ! 65: if (!ttyset && hp->h_to != NOSTR) ! 66: ttyset++, stty(fileno(stdin), &ttybuf); ! 67: #endif ! 68: hp->h_to = readtty("To: ", hp->h_to); ! 69: if (hp->h_to != NOSTR) ! 70: hp->h_seq++; ! 71: } ! 72: if (gflags & GSUBJECT) { ! 73: #ifndef TIOCSTI ! 74: if (!ttyset && hp->h_subject != NOSTR) ! 75: ttyset++, stty(fileno(stdin), &ttybuf); ! 76: #endif ! 77: hp->h_subject = readtty("Subject: ", hp->h_subject); ! 78: if (hp->h_subject != NOSTR) ! 79: hp->h_seq++; ! 80: } ! 81: if (gflags & GCC) { ! 82: #ifndef TIOCSTI ! 83: if (!ttyset && hp->h_cc != NOSTR) ! 84: ttyset++, stty(fileno(stdin), &ttybuf); ! 85: #endif ! 86: hp->h_cc = readtty("Cc: ", hp->h_cc); ! 87: if (hp->h_cc != NOSTR) ! 88: hp->h_seq++; ! 89: } ! 90: if (gflags & GBCC) { ! 91: #ifndef TIOCSTI ! 92: if (!ttyset && hp->h_bcc != NOSTR) ! 93: ttyset++, stty(fileno(stdin), &ttybuf); ! 94: #endif ! 95: hp->h_bcc = readtty("Bcc: ", hp->h_bcc); ! 96: if (hp->h_bcc != NOSTR) ! 97: hp->h_seq++; ! 98: } ! 99: # ifdef VMUNIX ! 100: sigset(SIGCONT, savecont); ! 101: # endif VMUNIX ! 102: #ifndef TIOCSTI ! 103: ttybuf.sg_erase = c_erase; ! 104: ttybuf.sg_kill = c_kill; ! 105: if (ttyset) ! 106: stty(fileno(stdin), &ttybuf); ! 107: for (s = SIGINT; s <= SIGQUIT; s++) ! 108: sigset(s, savesigs[s-SIGINT]); ! 109: #endif ! 110: return(errs); ! 111: } ! 112: ! 113: /* ! 114: * Read up a header from standard input. ! 115: * The source string has the preliminary contents to ! 116: * be read. ! 117: * ! 118: */ ! 119: ! 120: char * ! 121: readtty(pr, src) ! 122: char pr[], src[]; ! 123: { ! 124: char ch, canonb[BUFSIZ]; ! 125: int c, signull(); ! 126: register char *cp, *cp2; ! 127: ! 128: fputs(pr, stdout); ! 129: fflush(stdout); ! 130: if (src != NOSTR && strlen(src) > BUFSIZ - 2) { ! 131: printf("too long to edit\n"); ! 132: return(src); ! 133: } ! 134: #ifndef TIOCSTI ! 135: if (src != NOSTR) ! 136: cp = copy(src, canonb); ! 137: else ! 138: cp = copy("", canonb); ! 139: fputs(canonb, stdout); ! 140: fflush(stdout); ! 141: #else ! 142: cp = src == NOSTR ? "" : src; ! 143: while (c = *cp++) { ! 144: if (c == c_erase || c == c_kill) { ! 145: ch = '\\'; ! 146: ioctl(0, TIOCSTI, &ch); ! 147: } ! 148: ch = c; ! 149: ioctl(0, TIOCSTI, &ch); ! 150: } ! 151: cp = canonb; ! 152: *cp = 0; ! 153: #endif ! 154: cp2 = cp; ! 155: while (cp2 < canonb + BUFSIZ) ! 156: *cp2++ = 0; ! 157: cp2 = cp; ! 158: if (setjmp(rewrite)) ! 159: goto redo; ! 160: # ifdef VMUNIX ! 161: sigset(SIGCONT, ttycont); ! 162: # endif VMUNIX ! 163: clearerr(stdin); ! 164: while (cp2 < canonb + BUFSIZ) { ! 165: c = getc(stdin); ! 166: if (c == EOF || c == '\n') ! 167: break; ! 168: *cp2++ = c; ! 169: } ! 170: *cp2 = 0; ! 171: # ifdef VMUNIX ! 172: sigset(SIGCONT, signull); ! 173: # endif VMUNIX ! 174: if (c == EOF && ferror(stdin) && hadcont) { ! 175: redo: ! 176: hadcont = 0; ! 177: cp = strlen(canonb) > 0 ? canonb : NOSTR; ! 178: clearerr(stdin); ! 179: return(readtty(pr, cp)); ! 180: } ! 181: #ifndef TIOCSTI ! 182: if (cp == NOSTR || *cp == '\0') ! 183: return(src); ! 184: cp2 = cp; ! 185: if (!ttyset) ! 186: return(strlen(canonb) > 0 ? savestr(canonb) : NOSTR); ! 187: while (*cp != '\0') { ! 188: c = *cp++; ! 189: if (c == c_erase) { ! 190: if (cp2 == canonb) ! 191: continue; ! 192: if (cp2[-1] == '\\') { ! 193: cp2[-1] = c; ! 194: continue; ! 195: } ! 196: cp2--; ! 197: continue; ! 198: } ! 199: if (c == c_kill) { ! 200: if (cp2 == canonb) ! 201: continue; ! 202: if (cp2[-1] == '\\') { ! 203: cp2[-1] = c; ! 204: continue; ! 205: } ! 206: cp2 = canonb; ! 207: continue; ! 208: } ! 209: *cp2++ = c; ! 210: } ! 211: *cp2 = '\0'; ! 212: #endif ! 213: if (equal("", canonb)) ! 214: return(NOSTR); ! 215: return(savestr(canonb)); ! 216: } ! 217: ! 218: # ifdef VMUNIX ! 219: /* ! 220: * Receipt continuation. ! 221: */ ! 222: ttycont(s) ! 223: { ! 224: ! 225: hadcont++; ! 226: longjmp(rewrite, 1); ! 227: } ! 228: # endif VMUNIX ! 229: ! 230: /* ! 231: * Null routine to satisfy ! 232: * silly system bug that denies us holding SIGCONT ! 233: */ ! 234: signull(s) ! 235: {}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.