BSD 4_4_Lite2 release
[unix-history] / usr / src / usr.bin / telnet / terminal.c
index ea33ff7..b5ceeda 100644 (file)
+/*
+ * Copyright (c) 1988, 1990, 1993
+ *     The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)terminal.c 8.2 (Berkeley) 2/16/95";
+#endif /* not lint */
+
 #include <arpa/telnet.h>
 #include <arpa/telnet.h>
+#include <sys/types.h>
+
+#include "ring.h"
 
 #include "externs.h"
 #include "types.h"
 
 
 #include "externs.h"
 #include "types.h"
 
-char   ttyobuf[2*BUFSIZ], *tfrontp, *tbackp;
-
-char
-    termEofChar,
-    termEraseChar,
-    termFlushChar,
-    termIntChar,
-    termKillChar,
-    termLiteralNextChar,
-    termQuitChar;
+Ring           ttyoring, ttyiring;
+unsigned char  ttyobuf[2*BUFSIZ], ttyibuf[BUFSIZ];
+
+int termdata;                  /* Debugging flag */
+
+#ifdef USE_TERMIO
+# ifndef VDISCARD
+cc_t termFlushChar;
+# endif
+# ifndef VLNEXT
+cc_t termLiteralNextChar;
+# endif
+# ifndef VSUSP
+cc_t termSuspChar;
+# endif
+# ifndef VWERASE
+cc_t termWerasChar;
+# endif
+# ifndef VREPRINT
+cc_t termRprntChar;
+# endif
+# ifndef VSTART
+cc_t termStartChar;
+# endif
+# ifndef VSTOP
+cc_t termStopChar;
+# endif
+# ifndef VEOL
+cc_t termForw1Char;
+# endif
+# ifndef VEOL2
+cc_t termForw2Char;
+# endif
+# ifndef VSTATUS
+cc_t termAytChar;
+# endif
+#else
+cc_t termForw2Char;
+cc_t termAytChar;
+#endif
 
 /*
  * initialize the terminal data structures.
  */
 
 
 /*
  * initialize the terminal data structures.
  */
 
+    void
 init_terminal()
 {
 init_terminal()
 {
-    tfrontp = tbackp = ttyobuf;
+    if (ring_init(&ttyoring, ttyobuf, sizeof ttyobuf) != 1) {
+       exit(1);
+    }
+    if (ring_init(&ttyiring, ttyibuf, sizeof ttyibuf) != 1) {
+       exit(1);
+    }
     autoflush = TerminalAutoFlush();
 }
 
     autoflush = TerminalAutoFlush();
 }
 
@@ -28,95 +104,57 @@ init_terminal()
 /*
  *             Send as much data as possible to the terminal.
  *
 /*
  *             Send as much data as possible to the terminal.
  *
- *             The return value indicates whether we did any
- *     useful work.
+ *             Return value:
+ *                     -1: No useful work done, data waiting to go out.
+ *                      0: No data was waiting, so nothing was done.
+ *                      1: All waiting data was written out.
+ *                      n: All data - n was written out.
  */
 
 
  */
 
 
-int
-ttyflush()
+    int
+ttyflush(drop)
+    int drop;
 {
 {
-    int n;
+    register int n, n0, n1;
 
 
-    if ((n = tfrontp - tbackp) > 0) {
-       if (!(SYNCHing||flushout)) {
-           n = TerminalWrite(tout, tbackp, n);
-       } else {
+    n0 = ring_full_count(&ttyoring);
+    if ((n1 = n = ring_full_consecutive(&ttyoring)) > 0) {
+       if (drop) {
            TerminalFlushOutput();
            /* we leave 'n' alone! */
            TerminalFlushOutput();
            /* we leave 'n' alone! */
+       } else {
+           n = TerminalWrite(ttyoring.consume, n);
        }
     }
        }
     }
-    if (n >= 0) {
-       tbackp += n;
-       if (tbackp == tfrontp) {
-           tbackp = tfrontp = ttyobuf;
+    if (n > 0) {
+       if (termdata && n) {
+           Dump('>', ttyoring.consume, n);
        }
        }
+       /*
+        * If we wrote everything, and the full count is
+        * larger than what we wrote, then write the
+        * rest of the buffer.
+        */
+       if (n1 == n && n0 > n) {
+               n1 = n0 - n;
+               if (!drop)
+                       n1 = TerminalWrite(ttyoring.bottom, n1);
+               if (n1 > 0)
+                       n += n1;
+       }
+       ring_consumed(&ttyoring, n);
     }
     }
-    return n > 0;
-}
-
-#if    defined(TN3270)
-
-#if    defined(unix)
-static void
-inputAvailable()
-{
-    HaveInput = 1;
-}
-#endif /* defined(unix) */
-
-void
-outputPurge()
-{
-    int tmp = flushout;
-
-    flushout = 1;
-
-    ttyflush();
-
-    flushout = tmp;
-}
-
-#endif /* defined(TN3270) */
-\f
-#if    defined(unix)
-/*
- * Various signal handling routines.
- */
-
-void
-deadpeer()
-{
-       setcommandmode();
-       longjmp(peerdied, -1);
-}
-
-void
-intr()
-{
-    if (localchars) {
-       intp();
-       return;
-    }
-    setcommandmode();
-    longjmp(toplevel, -1);
-}
-
-void
-intr2()
-{
-    if (localchars) {
-       sendbrk();
-       return;
+    if (n < 0)
+       return -1;
+    if (n == n0) {
+       if (n0)
+           return -1;
+       return 0;
     }
     }
+    return n0 - n + 1;
 }
 
 }
 
-void
-doescape()
-{
-    command(0);
-}
-#endif /* defined(unix) */
 \f
 /*
  * These routines decides on what the mode should be (based on the values
 \f
 /*
  * These routines decides on what the mode should be (based on the values
@@ -124,241 +162,79 @@ doescape()
  */
 
 
  */
 
 
-int
+    int
 getconnmode()
 {
 getconnmode()
 {
-    static char newmode[16] =
-                       { 4, 5, 3, 3, 2, 2, 1, 1, 6, 6, 6, 6, 6, 6, 6, 6 };
-    int modeindex = 0;
-
-    if (dontlecho && (clocks.echotoggle > clocks.modenegotiated)) {
-       modeindex += 1;
-    }
-    if (hisopts[TELOPT_ECHO]) {
-       modeindex += 2;
-    }
-    if (hisopts[TELOPT_SGA]) {
-       modeindex += 4;
-    }
-    if (In3270) {
-       modeindex += 8;
-    }
-    return newmode[modeindex];
-}
-
-void
-setconnmode()
-{
-    TerminalNewMode(tin, tout, getconnmode());
-}
-
-
-void
-setcommandmode()
-{
-    TerminalNewMode(tin, tout, 0);
-}
-
-#if    defined(TN3270)
-
-/*
- * The following routines are places where the various tn3270
- * routines make calls into telnet.c.
- */
-
-/* TtyChars() - returns the number of characters in the TTY buffer */
-TtyChars()
-{
-    return(tfrontp-tbackp);
-}
+    extern int linemode;
+    int mode = 0;
+#ifdef KLUDGELINEMODE
+    extern int kludgelinemode;
+#endif
 
 
-/*
- * DataToNetwork - queue up some data to go to network.  If "done" is set,
- * then when last byte is queued, we add on an IAC EOR sequence (so,
- * don't call us with "done" until you want that done...)
- *
- * We actually do send all the data to the network buffer, since our
- * only client needs for us to do that.
- */
+    if (In3270)
+       return(MODE_FLOW);
 
 
-int
-DataToNetwork(buffer, count, done)
-register char  *buffer;        /* where the data is */
-register int   count;          /* how much to send */
-int            done;           /* is this the last of a logical block */
-{
-    register int c;
-    int origCount;
-    fd_set o;
+    if (my_want_state_is_dont(TELOPT_ECHO))
+       mode |= MODE_ECHO;
 
 
-    origCount = count;
-    FD_ZERO(&o);
+    if (localflow)
+       mode |= MODE_FLOW;
 
 
-    while (count) {
-       if ((netobuf+sizeof netobuf - nfrontp) < 6) {
-           netflush();
-           while ((netobuf+sizeof netobuf - nfrontp) < 6) {
-               FD_SET(net, &o);
-               (void) select(net+1, (fd_set *) 0, &o, (fd_set *) 0,
-                                               (struct timeval *) 0);
-               netflush();
-           }
-       }
-       c = *buffer++;
-       count--;
-       if (c == IAC) {
-           *nfrontp++ = IAC;
-           *nfrontp++ = IAC;
-       } else {
-           *nfrontp++ = c;
-       }
-    }
-
-    if (done && !count) {
-       *nfrontp++ = IAC;
-       *nfrontp++ = EOR;
-       netflush();             /* try to move along as quickly as ... */
-    }
-    return(origCount - count);
-}
-
-/* DataToTerminal - queue up some data to go to terminal. */
-
-int
-DataToTerminal(buffer, count)
-register char  *buffer;                /* where the data is */
-register int   count;                  /* how much to send */
-{
-    int origCount;
-#if    defined(unix)
-    fd_set     o;
+    if (my_want_state_is_will(TELOPT_BINARY))
+       mode |= MODE_INBIN;
 
 
-    FD_ZERO(&o);
-#endif /* defined(unix) */
-    origCount = count;
+    if (his_want_state_is_will(TELOPT_BINARY))
+       mode |= MODE_OUTBIN;
 
 
-    while (count) {
-       if (tfrontp >= ttyobuf+sizeof ttyobuf) {
-           ttyflush();
-           while (tfrontp >= ttyobuf+sizeof ttyobuf) {
-#if    defined(unix)
-               FD_SET(tout, &o);
-               (void) select(tout+1, (fd_set *) 0, &o, (fd_set *) 0,
-                                               (struct timeval *) 0);
-#endif /* defined(unix) */
-               ttyflush();
+#ifdef KLUDGELINEMODE
+    if (kludgelinemode) {
+       if (my_want_state_is_dont(TELOPT_SGA)) {
+           mode |= (MODE_TRAPSIG|MODE_EDIT);
+           if (dontlecho && (clocks.echotoggle > clocks.modenegotiated)) {
+               mode &= ~MODE_ECHO;
            }
        }
            }
        }
-       *tfrontp++ = *buffer++;
-       count--;
+       return(mode);
     }
     }
-    return(origCount - count);
+#endif
+    if (my_want_state_is_will(TELOPT_LINEMODE))
+       mode |= linemode;
+    return(mode);
 }
 
 }
 
-/* EmptyTerminal - called to make sure that the terminal buffer is empty.
- *                     Note that we consider the buffer to run all the
- *                     way to the kernel (thus the select).
- */
-
-void
-EmptyTerminal()
+    void
+setconnmode(force)
+    int force;
 {
 {
-#if    defined(unix)
-    fd_set     o;
-
-    FD_ZERO(&o);
-#endif /* defined(unix) */
-
-    if (tfrontp == tbackp) {
-#if    defined(unix)
-       FD_SET(tout, &o);
-       (void) select(tout+1, (int *) 0, &o, (int *) 0,
-                       (struct timeval *) 0);  /* wait for TTLOWAT */
-#endif /* defined(unix) */
-    } else {
-       while (tfrontp != tbackp) {
-           ttyflush();
-#if    defined(unix)
-           FD_SET(tout, &o);
-           (void) select(tout+1, (int *) 0, &o, (int *) 0,
-                               (struct timeval *) 0);  /* wait for TTLOWAT */
-#endif /* defined(unix) */
-       }
-    }
-}
-\f
+#ifdef ENCRYPTION
+    static int enc_passwd = 0;
+#endif /* ENCRYPTION */
+    register int newmode;
 
 
-/*
- * Push3270 - Try to send data along the 3270 output (to screen) direction.
- */
+    newmode = getconnmode()|(force?MODE_FORCE:0);
 
 
-static int
-Push3270()
-{
-    int save = scc;
+    TerminalNewMode(newmode);
 
 
-    if (scc) {
-       if (Ifrontp+scc > Ibuf+sizeof Ibuf) {
-           if (Ibackp != Ibuf) {
-               memcpy(Ibuf, Ibackp, Ifrontp-Ibackp);
-               Ifrontp -= (Ibackp-Ibuf);
-               Ibackp = Ibuf;
-           }
+#ifdef  ENCRYPTION
+    if ((newmode & (MODE_ECHO|MODE_EDIT)) == MODE_EDIT) {
+       if (my_want_state_is_will(TELOPT_ENCRYPT)
+                               && (enc_passwd == 0) && !encrypt_output) {
+           encrypt_request_start(0, 0);
+           enc_passwd = 1;
        }
        }
-       if (Ifrontp+scc < Ibuf+sizeof Ibuf) {
-           telrcv();
+    } else {
+       if (enc_passwd) {
+           encrypt_request_end();
+           enc_passwd = 0;
        }
     }
        }
     }
-    return save != scc;
-}
+#endif /* ENCRYPTION */
 
 
-
-/*
- * Finish3270 - get the last dregs of 3270 data out to the terminal
- *             before quitting.
- */
-
-static void
-Finish3270()
-{
-    while (Push3270() || !DoTerminalOutput()) {
-#if    defined(unix)
-       HaveInput = 0;
-#endif /* defined(unix) */
-       ;
-    }
 }
 
 
 }
 
 
-/* StringToTerminal - output a null terminated string to the terminal */
-
-void
-StringToTerminal(s)
-char *s;
-{
-    int count;
-
-    count = strlen(s);
-    if (count) {
-       (void) DataToTerminal(s, count);        /* we know it always goes... */
-    }
-}
-
-
-#if    ((!defined(NOT43)) || defined(PUTCHAR))
-/* _putchar - output a single character to the terminal.  This name is so that
- *     curses(3x) can call us to send out data.
- */
-
-void
-_putchar(c)
-char c;
+    void
+setcommandmode()
 {
 {
-    if (tfrontp >= ttyobuf+sizeof ttyobuf) {
-       (void) DataToTerminal(&c, 1);
-    } else {
-       *tfrontp++ = c;         /* optimize if possible. */
-    }
+    TerminalNewMode(-1);
 }
 }
-#endif /* ((!defined(NOT43)) || defined(PUTCHAR)) */
-#endif /* defined(TN3270) */