include var.h and lcmd.c only in some of the parser?.c

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

diff --git a/usr/src/usr.bin/window/wwopen.c b/usr/src/usr.bin/window/wwopen.c
index 549bb1d..bb81230 100644 (file)
--- a/usr/src/usr.bin/window/wwopen.c
+++ b/usr/src/usr.bin/window/wwopen.c
@@ -1,89 +1,122 @@
 #ifndef lint
 #ifndef lint

-static char *sccsid = "@(#)wwopen.c    1.3 83/07/18";
+static char *sccsid = "@(#)wwopen.c    3.14 83/12/01";

 #endif
 
 #include "ww.h"
 #endif
 
 #include "ww.h"

-#include <sys/types.h>
-#include <sys/stat.h>

 
 struct ww *
 
 struct ww *

-wwopen(flag, id, nrow, ncol, row, col)
+wwopen(flags, nrow, ncol, row, col, nline)

 {
 {

-       register struct ww *w = 0;
+       register struct ww *w;
+       register i, j;
+       char m;
+       short nvis;

 
        w = (struct ww *)calloc(sizeof (struct ww), 1);
 
        w = (struct ww *)calloc(sizeof (struct ww), 1);

-       if (w == 0)
+       if (w == 0) {
+               wwerrno = WWE_NOMEM;
+               goto bad;
+       }
+       w->ww_pty = -1;
+
+       for (i = 0; i < NWW && wwindex[i] != 0; i++)
+               ;
+       if (i >= NWW) {
+               wwerrno = WWE_TOOMANY;

                goto bad;
                goto bad;

-       w->ww_pty = w->ww_tty = -1;
-       switch (flag) {
-       case WW_PTY:
+       }
+       w->ww_index = i;
+
+       if (nline < nrow)
+               nline = nrow;
+
+       w->ww_w.t = row;
+       w->ww_w.b = row + nrow;
+       w->ww_w.l = col;
+       w->ww_w.r = col + ncol;
+       w->ww_w.nr = nrow;
+       w->ww_w.nc = ncol;
+
+       w->ww_b.t = row;
+       w->ww_b.b = row + nline;
+       w->ww_b.l = col;
+       w->ww_b.r = col + ncol;
+       w->ww_b.nr = nline;
+       w->ww_b.nc = ncol;
+
+       w->ww_i.t = MAX(w->ww_w.t, 0);
+       w->ww_i.b = MIN(w->ww_w.b, wwnrow);
+       w->ww_i.l = MAX(w->ww_w.l, 0);
+       w->ww_i.r = MIN(w->ww_w.r, wwncol);
+       w->ww_i.nr = w->ww_i.b - w->ww_i.t;
+       w->ww_i.nc = w->ww_i.r - w->ww_i.l;
+
+       w->ww_cur.r = w->ww_w.t;
+       w->ww_cur.c = w->ww_w.l;
+
+       if (flags & WWO_PTY) {

                if (wwgetpty(w) < 0)
                        goto bad;
                if (wwgetpty(w) < 0)
                        goto bad;

-               if (wwsettty(w->ww_pty, &wwoldtty) < 0)
+               if (wwsettty(w->ww_pty, &wwwintty) < 0)

                        goto bad;
                        goto bad;

-               break;
-       case WW_SOCKET:
-               break;
-       case WW_NONE:
-               break;
-       default:
-               goto bad;

        }
        }

-       if ((w->ww_win = Wopen(id, col, row, ncol, nrow, ncol, nrow)) == 0)
+
+       w->ww_win = wwalloc(w->ww_w.t, w->ww_w.l,
+               w->ww_w.nr, w->ww_w.nc, sizeof (char));
+       if (w->ww_win == 0)

                goto bad;
                goto bad;

-       Woncursor(w->ww_win, 0);                /* don't show cursor */
-       w->ww_ident = id;
-       w->ww_icol = w->ww_col = col;
-       w->ww_irow = w->ww_row = row;
-       w->ww_incol = w->ww_ncol = ncol;
-       w->ww_inrow = w->ww_nrow = nrow;
-       w->ww_next = wwhead;
-       w->ww_state = WW_INITIAL;
-       wwhead = w;
-       return w;
-bad:
-       if (w != 0) {
-               close(w->ww_tty);
-               close(w->ww_pty);
-               cfree((char *)w);
-       }
-       return 0;
-}
+       m = 0;
+       if (flags & WWO_GLASS)
+               m |= WWM_GLS;
+       if (flags & WWO_REVERSE)
+               m |= WWM_REV;
+       for (i = w->ww_w.t; i < w->ww_w.b; i++)
+               for (j = w->ww_w.l; j < w->ww_w.r; j++)
+                       w->ww_win[i][j] = m;

 
 

-wwgetpty(w)
-       register struct ww *w;
-{
-       register char c;
-       register char *line;
-       register int i;
-#define PTY "/dev/XtyXX"
+       if (flags & WWO_FRAME) {
+               w->ww_fmap = wwalloc(w->ww_w.t, w->ww_w.l,
+                       w->ww_w.nr, w->ww_w.nc, sizeof (char));
+               if (w->ww_fmap == 0)
+                       wwerrno = WWE_NOMEM;
+               for (i = w->ww_w.t; i < w->ww_w.b; i++)
+                       for (j = w->ww_w.l; j < w->ww_w.r; j++)
+                               w->ww_fmap[i][j] = 0;
+       }
+       
+       w->ww_buf = (union ww_char **)
+               wwalloc(w->ww_b.t, w->ww_b.l,
+                       w->ww_b.nr, w->ww_b.nc, sizeof (union ww_char));
+       if (w->ww_buf == 0)
+               goto bad;
+       for (i = w->ww_b.t; i < w->ww_b.b; i++)
+               for (j = w->ww_b.l; j < w->ww_b.r; j++)
+                       w->ww_buf[i][j].c_w = ' ';

 
 

-       for (c = 'p'; c <= 's'; c++) {
-               struct stat stb;
+       w->ww_nvis = (short *)malloc((unsigned) w->ww_w.nr * sizeof (short));
+       if (w->ww_nvis == 0) {
+               wwerrno = WWE_NOMEM;
+               goto bad;
+       }
+       w->ww_nvis -= w->ww_w.t;
+       nvis = m ? 0 : w->ww_w.nc;
+       for (i = w->ww_w.t; i < w->ww_w.b; i++)
+               w->ww_nvis[i] = nvis;

 
 

-               line = PTY;
-               line[sizeof PTY - 6] = 'p';
-               line[sizeof PTY - 3] = c;
-               line[sizeof PTY - 2] = '0';
-               if (stat(line, &stb) < 0)
-                       break;
-               for (i = 0; i < 16; i++) {
-                       line[sizeof PTY - 2] = "0123456789abcdef"[i];
-                       w->ww_pty = open(line, 2);
-                       if (w->ww_pty >= 0) {
-                               line[sizeof PTY - 6] = 't';
-                               w->ww_tty = open(line, 2);
-                               if (w->ww_tty >= 0)
-                                       goto good;
-                               close(w->ww_pty);
-                       }
-               }
+       w->ww_state = WWS_INITIAL;
+       return wwindex[w->ww_index] = w;
+bad:
+       if (w != 0) {
+               if (w->ww_win != 0)
+                       wwfree(w->ww_win, w->ww_w.t);
+               if (w->ww_fmap != 0)
+                       wwfree(w->ww_fmap, w->ww_w.t);
+               if (w->ww_buf != 0)
+                       wwfree((char **)w->ww_buf, w->ww_b.t);
+               if (w->ww_nvis != 0)
+                       free((char *)(w->ww_nvis + w->ww_w.t));
+               (void) close(w->ww_pty);
+               free((char *)w);

        }
        }

-       return -1;
-good:

        return 0;
        return 0;

-bad:
-       close(w->ww_pty);
-       close(w->ww_tty);
-       return -1;

 }
 }