ttwrite added

[unix-history] / usr / src / usr.bin / window / wwinit.c

diff --git a/usr/src/usr.bin/window/wwinit.c b/usr/src/usr.bin/window/wwinit.c
index 28526a4..dc8c2b2 100644 (file)
--- a/usr/src/usr.bin/window/wwinit.c
+++ b/usr/src/usr.bin/window/wwinit.c
@@ -1,44 +1,61 @@
 #ifndef lint
 #ifndef lint

-static char *sccsid = "@(#)wwinit.c    3.15 84/03/03";
+static char sccsid[] = "@(#)wwinit.c   3.25 %G%";

 #endif
 
 #endif
 

+/*
+ * Copyright (c) 1983 Regents of the University of California,
+ * All rights reserved.  Redistribution permitted subject to
+ * the terms of the Berkeley Software License Agreement.
+ */
+

 #include "ww.h"
 #include "tt.h"
 #include <sys/signal.h>
 #include <fcntl.h>
 #include "ww.h"
 #include "tt.h"
 #include <sys/signal.h>
 #include <fcntl.h>

-
-static char *kp = wwkeys;
+#include "char.h"

 
 wwinit()
 {
        register i, j;
 
 wwinit()
 {
        register i, j;

-       int kn;
+       char *kp;
+       register char **p, **q;
+       char **env, **termcap = 0;
+       extern char **environ;
+       int s;

 
 

-#ifndef O_4_1A

        wwdtablesize = getdtablesize();
        wwdtablesize = getdtablesize();

-#else
-#include <sys/param.h>
-       wwdtablesize = NOFILE;
-#endif
+       wwhead.ww_forw = &wwhead;
+       wwhead.ww_back = &wwhead;

 
 

+       s = sigblock(sigmask(SIGIO));

        if (signal(SIGIO, wwrint) == BADSIG)
                return -1;
        if (signal(SIGIO, wwrint) == BADSIG)
                return -1;

-       (void) sighold(SIGIO);

 
        if (wwgettty(0, &wwoldtty) < 0)
                return -1;
        wwwintty = wwoldtty;
        wwwintty.ww_sgttyb.sg_flags &= ~XTABS;
 
        if (wwgettty(0, &wwoldtty) < 0)
                return -1;
        wwwintty = wwoldtty;
        wwwintty.ww_sgttyb.sg_flags &= ~XTABS;

-       wwnewtty.ww_sgttyb.sg_flags = wwoldtty.ww_sgttyb.sg_flags;
-       wwnewtty.ww_sgttyb.sg_ispeed = wwoldtty.ww_sgttyb.sg_ispeed;
-       wwnewtty.ww_sgttyb.sg_ospeed = wwoldtty.ww_sgttyb.sg_ospeed;
-       wwnewtty.ww_lmode = wwoldtty.ww_lmode;
-       wwnewtty.ww_ldisc = wwoldtty.ww_ldisc;
+       wwnewtty.ww_sgttyb = wwoldtty.ww_sgttyb;
+       wwnewtty.ww_sgttyb.sg_erase = -1;
+       wwnewtty.ww_sgttyb.sg_kill = -1;

        wwnewtty.ww_sgttyb.sg_flags |= CBREAK;
        wwnewtty.ww_sgttyb.sg_flags &= ~(ECHO|CRMOD);
        wwnewtty.ww_sgttyb.sg_flags |= CBREAK;
        wwnewtty.ww_sgttyb.sg_flags &= ~(ECHO|CRMOD);

-       wwnewtty.ww_lmode |= LLITOUT;
-       wwnewtty.ww_fflags |= FASYNC;
-       if (wwsettty(0, &wwnewtty) < 0)
+       wwnewtty.ww_tchars.t_intrc = -1;
+       wwnewtty.ww_tchars.t_quitc = -1;
+       wwnewtty.ww_tchars.t_startc = -1;
+       wwnewtty.ww_tchars.t_stopc = -1;
+       wwnewtty.ww_tchars.t_eofc = -1;
+       wwnewtty.ww_tchars.t_brkc = -1;
+       wwnewtty.ww_ltchars.t_suspc = -1;
+       wwnewtty.ww_ltchars.t_dsuspc = -1;
+       wwnewtty.ww_ltchars.t_rprntc = -1;
+       wwnewtty.ww_ltchars.t_flushc = -1;
+       wwnewtty.ww_ltchars.t_werasc = -1;
+       wwnewtty.ww_ltchars.t_lnextc = -1;
+       wwnewtty.ww_lmode = wwoldtty.ww_lmode | LLITOUT;
+       wwnewtty.ww_ldisc = wwoldtty.ww_ldisc;
+       wwnewtty.ww_fflags = wwoldtty.ww_fflags | FASYNC;
+       if (wwsettty(0, &wwnewtty, &wwoldtty) < 0)

                goto bad;
 
        if ((wwterm = getenv("TERM")) == 0) {
                goto bad;
 
        if ((wwterm = getenv("TERM")) == 0) {


@@ -101,57 +118,75 @@ wwinit()
        wwindex[WWX_NOBODY] = &wwnobody;
        wwnobody.ww_order = NWW;
 
        wwindex[WWX_NOBODY] = &wwnobody;
        wwnobody.ww_order = NWW;
 

-       addcap("kb");
-       addcap("ku");
-       addcap("kd");
-       addcap("kl");
-       addcap("kr");
-       addcap("kh");
-       if ((kn = tgetnum("kn")) >= 0) {
-               char cap[5];
+       kp = wwkeys;
+       wwaddcap("kb", &kp);
+       wwaddcap("ku", &kp);
+       wwaddcap("kd", &kp);
+       wwaddcap("kl", &kp);
+       wwaddcap("kr", &kp);
+       wwaddcap("kh", &kp);
+       if ((j = tgetnum("kn")) >= 0) {
+               char cap[32];

                int i;
 
                int i;
 

-               (void) sprintf(kp, "kn#%d:", kn);
+               (void) sprintf(kp, "kn#%d:", j);

                for (; *kp; kp++)
                        ;
                for (; *kp; kp++)
                        ;

-               for (i = 1; i <= kn; i++) {
+               for (i = 1; i <= j; i++) {

                        (void) sprintf(cap, "k%d", i);
                        (void) sprintf(cap, "k%d", i);

-                       addcap(cap);
+                       wwaddcap(cap, &kp);

                        cap[0] = 'l';
                        cap[0] = 'l';

-                       addcap(cap);
+                       wwaddcap(cap, &kp);

                }
        }
                }
        }

-       (void) sigrelse(SIGIO);
+       for (i = 0, p = environ; *p++; i++)
+               ;
+       if ((env = (char **)malloc((unsigned)(i + 3) * sizeof (char *))) == 0)
+               goto bad;
+       for (p = environ, q = env; *p; p++, q++) {
+               if (strncmp(*p, "TERM=", 5) == 0)
+                       *q = WWT_TERM;
+               else if (strncmp(*p, "TERMCAP=", 8) == 0)
+                       termcap = q;
+               else
+                       *q = *p;
+       }
+       *(termcap ? termcap : q++) = wwwintermcap;
+       *q = 0;
+       environ = env;
+
+       (void) signal(SIGPIPE, SIG_IGN);
+       (void) sigsetmask(s);

        return 0;
 bad:
        /*
         * Don't bother to free storage.  We're supposed
         * to exit when wwinit fails anyway.
         */
        return 0;
 bad:
        /*
         * Don't bother to free storage.  We're supposed
         * to exit when wwinit fails anyway.
         */

-       (void) wwsettty(0, &wwoldtty);
+       (void) wwsettty(0, &wwoldtty, &wwnewtty);

        (void) signal(SIGIO, SIG_DFL);
        (void) signal(SIGIO, SIG_DFL);

-       (void) sigrelse(SIGIO);
+       (void) sigsetmask(s);

        return -1;
 }
 
        return -1;
 }
 

-static
-addcap(cap)
+wwaddcap(cap, kp)

 register char *cap;
 register char *cap;

+register char **kp;

 {
        char tbuf[512];
        char *tp = tbuf;
        register char *str, *p;
 
        if ((str = tgetstr(cap, &tp)) != 0) {
 {
        char tbuf[512];
        char *tp = tbuf;
        register char *str, *p;
 
        if ((str = tgetstr(cap, &tp)) != 0) {

-               while (*kp++ = *cap++)
+               while (*(*kp)++ = *cap++)

                        ;
                        ;

-               kp[-1] = '=';
+               (*kp)[-1] = '=';

                while (*str) {
                while (*str) {

-                       for (p = unctrl(*str++); *kp++ = *p++;)
+                       for (p = unctrl(*str++); *(*kp)++ = *p++;)

                                ;
                                ;

-                       kp--;
+                       (*kp)--;

                }
                }

-               *kp++ = ':';
-               *kp = 0;
+               *(*kp)++ = ':';
+               **kp = 0;

        }
 }
        }
 }