ttwrite added

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

diff --git a/usr/src/usr.bin/window/win.c b/usr/src/usr.bin/window/win.c
index ffef6d4..3c3adab 100644 (file)
--- a/usr/src/usr.bin/window/win.c
+++ b/usr/src/usr.bin/window/win.c
@@ -1,19 +1,40 @@
 #ifndef lint
 #ifndef lint

-static char *sccsid = "@(#)win.c       3.1 84/01/13";
+static char sccsid[] = "@(#)win.c      3.14 %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 "defs.h"
 #include "defs.h"

+#include "char.h"

 
 /*
 
 /*

- * Routines for opening and closing windows
+ * Higher level routines for dealing with windows.
+ *
+ * There are two types of windows: user window, and information window.
+ * User windows are the ones with a pty and shell.  Information windows
+ * are for displaying error messages, and other information.
+ *
+ * The windows are doubly linked in overlapping order and divided into
+ * two groups: foreground and normal.  Information
+ * windows are always foreground.  User windows can be either.
+ * Addwin() adds a window to the list at the top of one of the two groups.
+ * Deletewin() deletes a window.  Front() moves a window to the front
+ * of its group.  Wwopen(), wwadd(), and wwdelete() should never be called
+ * directly.

  */
 
 /*
  * Open a user window.
  */
 struct ww *
  */
 
 /*
  * Open a user window.
  */
 struct ww *

-openwin(id, row, col, nrow, ncol, nline, label)
+openwin(id, row, col, nrow, ncol, nline, label, haspty, hasframe, shf, sh)

 char *label;
 char *label;

+char haspty, hasframe;
+char *shf, **sh;

 {
        register struct ww *w;
 
 {
        register struct ww *w;
 


@@ -24,26 +45,31 @@ char *label;
                error("Illegal window position.");
                return 0;
        }
                error("Illegal window position.");
                return 0;
        }

-       if ((w = wwopen(WWO_PTY, nrow, ncol, row, col, nline)) == 0) {
-               error("%s.", wwerror());
+       w = wwopen(haspty ? WWO_PTY : WWO_SOCKET, nrow, ncol, row, col, nline);
+       if (w == 0) {
+               error("Can't open window: %s.", wwerror());

                return 0;
        }
        w->ww_id = id;
        window[id] = w;
                return 0;
        }
        w->ww_id = id;
        window[id] = w;

-       w->ww_hasframe = 1;
-       w->ww_altpos.r = 1;
-       w->ww_altpos.c = 0;
+       w->ww_hasframe = hasframe;
+       w->ww_alt = w->ww_w;

        if (label != 0 && setlabel(w, label) < 0)
                error("No memory for label.");
        wwcursor(w, 1);
        if (label != 0 && setlabel(w, label) < 0)
                error("No memory for label.");
        wwcursor(w, 1);

-       wwadd(w, framewin);
-       selwin = w;
-       reframe();
+       /*
+        * We have to do this little maneuver to make sure
+        * addwin() puts w at the top, so we don't waste an
+        * insert and delete operation.
+        */
+       setselwin((struct ww *)0);
+       addwin(w, 0);
+       setselwin(w);

        wwupdate();
        wwflush();
        wwupdate();
        wwflush();

-       if (wwspawn(w, shell, shellname, (char *)0) < 0) {
+       if (wwspawn(w, shf, sh) < 0) {
+               error("Can't execute %s: %s.", shf, wwerror());

                c_close(w);
                c_close(w);

-               error("%s: %s.", shell, wwerror());

                return 0;
        }
        return w;
                return 0;
        }
        return w;


@@ -64,6 +90,7 @@ findid()
 
 /*
  * Close a user window.
 
 /*
  * Close a user window.

+ * May leave selwin == 0.

  */
 closewin(w)
 register struct ww *w;
  */
 closewin(w)
 register struct ww *w;


@@ -76,7 +103,7 @@ register struct ww *w;
                window[w->ww_id] = 0;
        if (w->ww_label)
                str_free(w->ww_label);
                window[w->ww_id] = 0;
        if (w->ww_label)
                str_free(w->ww_label);

-       wwdelete(w);
+       deletewin(w);

        wwclose(w);
 }
 
        wwclose(w);
 }
 


@@ -93,11 +120,15 @@ char *label;
                return 0;
        w->ww_mapnl = 1;
        w->ww_hasframe = 1;
                return 0;
        w->ww_mapnl = 1;
        w->ww_hasframe = 1;

+       w->ww_nointr = 1;
+       w->ww_noupdate = 1;
+       w->ww_unctrl = 1;

        w->ww_id = -1;
        w->ww_center = 1;
        (void) setlabel(w, label);
        w->ww_id = -1;
        w->ww_center = 1;
        (void) setlabel(w, label);

-       wwadd(w, framewin);
+       addwin(w, 1);

        reframe();
        reframe();

+       wwupdate();

        return w;
 }
 
        return w;
 }
 


@@ -111,34 +142,157 @@ struct ww *w;
        reframe();
 }
 
        reframe();
 }
 

+/*
+ * Move the window to the top of its group.
+ * Don't do it if already fully visible.
+ * Wwvisible() doesn't work for tinted windows.
+ * But anything to make it faster.
+ * Always reframe() if doreframe is true.
+ */
+front(w, doreframe)
+register struct ww *w;
+char doreframe;
+{
+       if (w->ww_back != (isfg(w) ? framewin : fgwin) && !wwvisible(w)) {
+               deletewin(w);
+               addwin(w, isfg(w));
+               doreframe = 1;
+       }
+       if (doreframe)
+               reframe();
+}
+
+/*
+ * Add a window at the top of normal windows or foreground windows.
+ * For normal windows, we put it behind the current window.
+ */
+addwin(w, fg)
+register struct ww *w;
+char fg;
+{
+       if (fg) {
+               wwadd(w, framewin);
+               if (fgwin == framewin)
+                       fgwin = w;
+       } else
+               wwadd(w, selwin != 0 && selwin != w && !isfg(selwin)
+                               ? selwin : fgwin);
+}
+
+/*
+ * Delete a window.
+ */
+deletewin(w)
+register struct ww *w;
+{
+       if (fgwin == w)
+               fgwin = w->ww_back;
+       wwdelete(w);
+}
+
+reframe()
+{
+       register struct ww *w;
+
+       wwunframe(framewin);
+       for (w = wwhead.ww_back; w != &wwhead; w = w->ww_back)
+               if (w->ww_hasframe) {
+                       wwframe(w, framewin);
+                       labelwin(w);
+               }
+}
+
+labelwin(w)
+register struct ww *w;
+{
+       int mode = w == selwin ? WWM_REV : 0;
+
+       if (!w->ww_hasframe)
+               return;
+       if (w->ww_id >= 0) {
+               char buf[2];
+
+               buf[0] = w->ww_id + '1';
+               buf[1] = 0;
+               wwlabel(w, framewin, 1, buf, mode);
+       }
+       if (w->ww_label) {
+               int col;
+
+               if (w->ww_center) {
+                       col = (w->ww_w.nc - strlen(w->ww_label)) / 2;
+                       col = MAX(3, col);
+               } else
+                       col = 3;
+               wwlabel(w, framewin, col, w->ww_label, mode);
+       }
+}
+
+stopwin(w)
+       register struct ww *w;
+{
+       w->ww_stopped = 1;
+       if (w->ww_pty >= 0 && w->ww_ispty)
+               (void) ioctl(w->ww_pty, (int)TIOCSTOP, (char *)0);
+}
+
+startwin(w)
+       register struct ww *w;
+{
+       w->ww_stopped = 0;
+       if (w->ww_pty >= 0 && w->ww_ispty)
+               (void) ioctl(w->ww_pty, (int)TIOCSTART, (char *)0);
+}
+
+sizewin(w, nrow, ncol)
+register struct ww *w;
+{
+       struct ww *back = w->ww_back;
+
+       w->ww_alt.nr = w->ww_w.nr;
+       w->ww_alt.nc = w->ww_w.nc;
+       wwdelete(w);
+       if (wwsize(w, nrow, ncol) < 0)
+               error("Can't resize window: %s.", wwerror());
+       wwadd(w, back);
+       reframe();
+}
+

 waitnl(w)
 struct ww *w;
 {
        (void) waitnl1(w, "[Type any key to continue]");
 }
 
 waitnl(w)
 struct ww *w;
 {
        (void) waitnl1(w, "[Type any key to continue]");
 }
 

-more(w, alway)
+more(w, always)

 register struct ww *w;
 register struct ww *w;

-char alway;
+char always;

 {
        int c;
 {
        int c;

+       char uc = w->ww_unctrl;

 
 

-       if (!alway && w->ww_cur.r < w->ww_w.b - 2)
+       if (!always && w->ww_cur.r < w->ww_w.b - 2)

                return 0;
        c = waitnl1(w, "[Type escape to abort, any other key to continue]");
                return 0;
        c = waitnl1(w, "[Type escape to abort, any other key to continue]");

-       (void) wwputs("\033E", w);
-       return c == CTRL([) ? 2 : 1;
+       w->ww_unctrl = 0;
+       wwputs("\033E", w);
+       w->ww_unctrl = uc;
+       return c == ctrl([) ? 2 : 1;

 }
 
 waitnl1(w, prompt)
 register struct ww *w;
 char *prompt;
 {
 }
 
 waitnl1(w, prompt)
 register struct ww *w;
 char *prompt;
 {

+       char uc = w->ww_unctrl;
+
+       w->ww_unctrl = 0;

        front(w, 0);
        front(w, 0);

-       (void) wwprintf(w, "\033Y%c%c\033p%s\033q ",
+       wwprintf(w, "\033Y%c%c\033p%s\033q ",

                w->ww_w.nr - 1 + ' ', ' ', prompt);     /* print on last line */
        wwcurtowin(w);
                w->ww_w.nr - 1 + ' ', ' ', prompt);     /* print on last line */
        wwcurtowin(w);

-       while (bpeekc() < 0)
-               bread();
-       return bgetc();
+       while (wwpeekc() < 0)
+               wwiomux();
+       w->ww_unctrl = uc;
+       return wwgetc();

 }
 }