BSD 4_4 release
[unix-history] / usr / src / lib / libcurses / newwin.c
index 57fd77e..a2f577a 100644 (file)
 /*
 /*
- * allocate space for and set up defaults for a new window
+ * Copyright (c) 1981, 1993
+ *     The Regents of the University of California.  All rights reserved.
  *
  *
- * %G% (Berkeley) %W
+ * 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.
  */
 
  */
 
-# include      "curses.ext"
+#ifndef lint
+static char sccsid[] = "@(#)newwin.c   8.1 (Berkeley) 7/20/93";
+#endif /* not lint */
+
+#include <curses.h>
+#include <stdlib.h>
 
 
-short  *calloc();
-WINDOW *malloc();
+#undef nl              /* Don't need it here, and it interferes. */
 
 
-static WINDOW  *makenew();
+static WINDOW  *__makenew __P((int, int, int, int, int));
 
 
-# undef                nl      /* don't need it here, and it interferes        */
+void    __set_subwin __P((WINDOW *, WINDOW *));
 
 
+/*
+ * newwin --
+ *     Allocate space for and set up defaults for a new window.
+ */
 WINDOW *
 WINDOW *
-newwin(num_lines, num_cols, begy, begx)
-int    num_lines, num_cols, begy, begx;
+newwin(nl, nc, by, bx)
+       register int nl, nc, by, bx;
 {
 {
-       reg WINDOW      *win;
-       reg char        *sp;
-       reg int         i, by, bx, nl, nc;
-
-       by = begy;
-       bx = begx;
-       nl = num_lines;
-       nc = num_cols;
+       register WINDOW *win;
+       register __LINE *lp;
+       register int  i, j;
+       register __LDATA *sp;
 
        if (nl == 0)
                nl = LINES - by;
        if (nc == 0)
                nc = COLS - bx;
 
        if (nl == 0)
                nl = LINES - by;
        if (nc == 0)
                nc = COLS - bx;
-       if ((win = makenew(nl, nc, by, bx)) == NULL)
-               return ERR;
-       for (i = 0; i < nl; i++)
-               if ((win->_y[i] = (char *) calloc(nc, sizeof (char))) == NULL) {
-                       reg int         j;
-
-                       for (j = 0; j < i; j++)
-                               cfree(win->_y[j]);
-                       cfree(win->_firstch);
-                       cfree(win->_lastch);
-                       cfree(win->_y);
-                       cfree(win);
-                       return ERR;
+
+       if ((win = __makenew(nl, nc, by, bx, 0)) == NULL)
+               return (NULL);
+
+       win->nextp = win;
+       win->ch_off = 0;
+       win->orig = NULL;
+
+#ifdef DEBUG
+       __CTRACE("newwin: win->ch_off = %d\n", win->ch_off);
+#endif
+
+       for (i = 0; i < nl; i++) {
+               lp = win->lines[i];
+               lp->flags = 0;
+               for (sp = lp->line, j = 0; j < nc; j++, sp++) {
+                       sp->ch = ' ';
+                       sp->attr = 0;
                }
                }
-               else
-                       for (sp = win->_y[i]; sp < win->_y[i] + nc; )
-                               *sp++ = ' ';
-       return win;
+               lp->hash = __hash((char *) lp->line, nc * __LDATASIZE);
+       }
+       return (win);
 }
 
 WINDOW *
 }
 
 WINDOW *
-subwin(orig, num_lines, num_cols, begy, begx)
-reg WINDOW     *orig;
-int            num_lines, num_cols, begy, begx; {
-
-       reg int         i;
-       reg WINDOW      *win;
-       reg int         by, bx, nl, nc;
-       reg int         j, k;
-
-       by = begy;
-       bx = begx;
-       nl = num_lines;
-       nc = num_cols;
-
-       /*
-        * make sure window fits inside the original one
-        */
-# ifdef        DEBUG
-       fprintf(outf, "SUBWIN(%0.2o, %d, %d, %d, %d)\n", orig, nl, nc, by, bx);
-# endif
-       if (by < orig->_begy || bx < orig->_begx
-           || by + nl > orig->_maxy || bx + nc > orig->_maxx)
-               return ERR;
+subwin(orig, nl, nc, by, bx)
+       register WINDOW *orig;
+       register int by, bx, nl, nc;
+{
+       int i;
+       __LINE *lp;
+       register WINDOW *win;
+
+       /* Make sure window fits inside the original one. */
+#ifdef DEBUG
+       __CTRACE("subwin: (%0.2o, %d, %d, %d, %d)\n", orig, nl, nc, by, bx);
+#endif
+       if (by < orig->begy || bx < orig->begx
+           || by + nl > orig->maxy + orig->begy
+           || bx + nc > orig->maxx + orig->begx)
+               return (NULL);
        if (nl == 0)
        if (nl == 0)
-               nl = orig->_maxy - orig->_begy - by;
+               nl = orig->maxy + orig->begy - by;
        if (nc == 0)
        if (nc == 0)
-               nc = orig->_maxx - orig->_begx - bx;
-       if ((win = makenew(nl, nc, by, bx)) == NULL)
-               return ERR;
-       j = orig->_begy + by;
-       k = orig->_begx + bx;
-       for (i = 0; i < nl; i++)
-               win->_y[i] = &orig->_y[j++][k];
-       win->_flags = _SUBWIN;
-       return win;
+               nc = orig->maxx + orig->begx - bx;
+       if ((win = __makenew(nl, nc, by, bx, 1)) == NULL)
+               return (NULL);
+       win->nextp = orig->nextp;
+       orig->nextp = win;
+       win->orig = orig;
+
+       /* Initialize flags here so that refresh can also use __set_subwin. */
+       for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++)
+               lp->flags = 0;
+       __set_subwin(orig, win);
+       return (win);
 }
 
 /*
 }
 
 /*
- *     This routine sets up a window buffer and returns a pointer to it.
+ * This code is shared with mvwin().
+ */
+void
+__set_subwin(orig, win)
+       register WINDOW *orig, *win;
+{
+       int i;
+       __LINE *lp, *olp;
+
+       win->ch_off = win->begx - orig->begx;
+       /*  Point line pointers to line space. */
+       for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++) {
+               win->lines[i] = lp;
+               olp = orig->lines[i + win->begy];
+               lp->line = &olp->line[win->begx];
+               lp->firstchp = &olp->firstch;
+               lp->lastchp = &olp->lastch;
+               lp->hash = __hash((char *) lp->line, win->maxx * __LDATASIZE);
+       }
+
+#ifdef DEBUG
+       __CTRACE("__set_subwin: win->ch_off = %d\n", win->ch_off);
+#endif
+}
+
+/*
+ * __makenew --
+ *     Set up a window buffer and returns a pointer to it.
  */
 static WINDOW *
  */
 static WINDOW *
-makenew(num_lines, num_cols, begy, begx)
-int    num_lines, num_cols, begy, begx; {
-
-       reg int         i;
-       reg WINDOW      *win;
-       reg int         by, bx, nl, nc;
-
-       by = begy;
-       bx = begx;
-       nl = num_lines;
-       nc = num_cols;
-
-# ifdef        DEBUG
-       fprintf(outf, "MAKENEW(%d, %d, %d, %d)\n", nl, nc, by, bx);
-# endif
-       if ((win = (WINDOW *) malloc(sizeof (WINDOW))) == NULL)
+__makenew(nl, nc, by, bx, sub)
+       register int by, bx, nl, nc;
+       int sub;
+{
+       register WINDOW *win;
+       register __LINE *lp;
+       int i;
+       
+
+#ifdef DEBUG
+       __CTRACE("makenew: (%d, %d, %d, %d)\n", nl, nc, by, bx);
+#endif
+       if ((win = malloc(sizeof(*win))) == NULL)
+               return (NULL);
+#ifdef DEBUG
+       __CTRACE("makenew: nl = %d\n", nl);
+#endif
+
+       /* 
+        * Set up line pointer array and line space.
+        */
+       if ((win->lines = malloc (nl * sizeof(__LINE *))) == NULL) {
+               free(win);
                return NULL;
                return NULL;
-# ifdef DEBUG
-       fprintf(outf, "MAKENEW: nl = %d\n", nl);
-# endif
-       if ((win->_y = (char **) calloc(nl, sizeof (char *))) == NULL) {
-               cfree(win);
-               return (WINDOW *) NULL;
        }
        }
-       if ((win->_firstch = calloc(nl, sizeof (short))) == NULL) {
-               cfree(win);
-               cfree(win->_y);
+       if ((win->lspace = malloc (nl * sizeof(__LINE))) == NULL) {
+               free (win);
+               free (win->lines);
+               return NULL;
        }
        }
-       if ((win->_lastch = calloc(nl, sizeof (short))) == NULL) {
-               cfree(win);
-               cfree(win->_y);
-               cfree(win->_firstch);
+
+       /* Don't allocate window and line space if it's a subwindow */
+       if (!sub) {
+               /*
+                * Allocate window space in one chunk.
+                */
+               if ((win->wspace = 
+                   malloc(nc * nl * sizeof(__LDATA))) == NULL) {
+                       free(win->lines);
+                       free(win->lspace);
+                       free(win);
+                       return NULL;
+               }
+               
+               /*
+                * Point line pointers to line space, and lines themselves into
+                * window space.
+                */
+               for (lp = win->lspace, i = 0; i < nl; i++, lp++) {
+                       win->lines[i] = lp;
+                       lp->line = &win->wspace[i * nc];
+                       lp->firstchp = &lp->firstch;
+                       lp->lastchp = &lp->lastch;
+                       lp->firstch = 0;
+                       lp->lastch = 0;
+               }
        }
        }
-# ifdef DEBUG
-       fprintf(outf, "MAKENEW: nc = %d\n", nc);
-# endif
-       win->_cury = win->_curx = 0;
-       win->_clear = (nl == LINES && nc == COLS);
-       win->_maxy = nl;
-       win->_maxx = nc;
-       win->_begy = by;
-       win->_begx = bx;
-       win->_scroll = win->_leave = FALSE;
-       for (i = 0; i < nl; i++)
-               win->_firstch[i] = win->_lastch[i] = _NOCHANGE;
-       if (bx + nc == COLS) {
-               win->_flags |= _ENDLINE;
-               if (bx == 0 && nl == LINES && by == 0)
-                       win->_flags |= _FULLWIN;
-               if (by + nl == LINES)
-                       win->_flags |= _SCROLLWIN;
+#ifdef DEBUG
+       __CTRACE("makenew: nc = %d\n", nc);
+#endif
+       win->cury = win->curx = 0;
+       win->maxy = nl;
+       win->maxx = nc;
+
+       win->begy = by;
+       win->begx = bx;
+       win->flags = 0;
+       __swflags(win);
+#ifdef DEBUG
+       __CTRACE("makenew: win->flags = %0.2o\n", win->flags);
+       __CTRACE("makenew: win->maxy = %d\n", win->maxy);
+       __CTRACE("makenew: win->maxx = %d\n", win->maxx);
+       __CTRACE("makenew: win->begy = %d\n", win->begy);
+       __CTRACE("makenew: win->begx = %d\n", win->begx);
+#endif
+       return (win);
+}
+
+void
+__swflags(win)
+       register WINDOW *win;
+{
+       win->flags &= 
+           ~(__ENDLINE | __FULLLINE | __FULLWIN | __SCROLLWIN | __LEAVEOK);
+       if (win->begx + win->maxx == COLS) {
+               win->flags |= __ENDLINE;
+               if (win->begx == 0) {
+                       if (AL && DL)
+                               win->flags |= __FULLLINE;
+                       if (win->maxy == LINES && win->begy == 0)
+                               win->flags |= __FULLWIN;
+               }
+               if (win->begy + win->maxy == LINES)
+                       win->flags |= __SCROLLWIN;
        }
        }
-# ifdef DEBUG
-       fprintf(outf, "MAKENEW: win->_clear = %d\n", win->_clear);
-       fprintf(outf, "MAKENEW: win->_leave = %d\n", win->_leave);
-       fprintf(outf, "MAKENEW: win->_scroll = %d\n", win->_scroll);
-       fprintf(outf, "MAKENEW: win->_flags = %0.2o\n", win->_flags);
-       fprintf(outf, "MAKENEW: win->_maxy = %d\n", win->_maxy);
-       fprintf(outf, "MAKENEW: win->_maxx = %d\n", win->_maxx);
-       fprintf(outf, "MAKENEW: win->_begy = %d\n", win->_begy);
-       fprintf(outf, "MAKENEW: win->_begx = %d\n", win->_begx);
-# endif
-       return win;
 }
 }