Home | History | Annotate | Line # | Download | only in libcurses
newwin.c revision 1.50
      1 /*	$NetBSD: newwin.c,v 1.50 2017/01/06 13:53:18 roy Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1981, 1993, 1994
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 #ifndef lint
     34 #if 0
     35 static char sccsid[] = "@(#)newwin.c	8.3 (Berkeley) 7/27/94";
     36 #else
     37 __RCSID("$NetBSD: newwin.c,v 1.50 2017/01/06 13:53:18 roy Exp $");
     38 #endif
     39 #endif				/* not lint */
     40 
     41 #include <stdlib.h>
     42 
     43 #include "curses.h"
     44 #include "curses_private.h"
     45 
     46 
     47 static WINDOW *__makenew(SCREEN *screen, int nlines, int ncols, int by,
     48 			 int bx, int sub, int ispad);
     49 static WINDOW *__subwin(WINDOW *orig, int nlines, int ncols, int by, int bx,
     50 			 int ispad);
     51 
     52 /*
     53  * derwin --
     54  *      Create a new window in the same manner as subwin but (by, bx)
     55  *      are relative to the origin of window orig instead of absolute.
     56  */
     57 WINDOW *
     58 derwin(WINDOW *orig, int nlines, int ncols, int by, int bx)
     59 {
     60 
     61 	return __subwin(orig, nlines, ncols, orig->begy + by, orig->begx + bx,
     62 	    FALSE);
     63 }
     64 
     65 /*
     66  * subpad --
     67  *      Create a new pad in the same manner as subwin but (by, bx)
     68  *      are relative to the origin of window orig instead of absolute.
     69  */
     70 WINDOW *
     71 subpad(WINDOW *orig, int nlines, int ncols, int by, int bx)
     72 {
     73 
     74 	return __subwin(orig, nlines, ncols, orig->begy + by, orig->begx + bx,
     75 	    TRUE);
     76 }
     77 
     78 /*
     79  * dupwin --
     80  *      Create a copy of the given window.
     81  */
     82 WINDOW *
     83 dupwin(WINDOW *win)
     84 {
     85 	WINDOW *new_one;
     86 
     87 	if ((new_one = __newwin(_cursesi_screen, win->maxy, win->maxx,
     88 				win->begy, win->begx, FALSE)) == NULL)
     89 		return NULL;
     90 
     91 	overwrite(win, new_one);
     92 	return new_one;
     93 }
     94 
     95 /*
     96  * newwin --
     97  *	Allocate space for and set up defaults for a new window.
     98  */
     99 WINDOW *
    100 newwin(int nlines, int ncols, int by, int bx)
    101 {
    102 
    103 	return __newwin(_cursesi_screen, nlines, ncols, by, bx, FALSE);
    104 }
    105 
    106 /*
    107  * newpad --
    108  *	Allocate space for and set up defaults for a new pad.
    109  */
    110 WINDOW *
    111 newpad(int nlines, int ncols)
    112 {
    113 
    114 	if (nlines < 1 || ncols < 1)
    115 		return NULL;
    116 	return __newwin(_cursesi_screen, nlines, ncols, 0, 0, TRUE);
    117 }
    118 
    119 WINDOW *
    120 __newwin(SCREEN *screen, int nlines, int ncols, int by, int bx, int ispad)
    121 {
    122 	WINDOW *win;
    123 	__LINE *lp;
    124 	int     i, j;
    125 	int	maxy, maxx;
    126 	__LDATA *sp;
    127 
    128 	if (by < 0 || bx < 0)
    129 		return NULL;
    130 
    131 	maxy = nlines > 0 ? nlines : LINES - by + nlines;
    132 	maxx = ncols > 0 ? ncols : COLS - bx + ncols;
    133 
    134 	if ((win = __makenew(screen, maxy, maxx, by, bx, 0, ispad)) == NULL)
    135 		return NULL;
    136 
    137 	win->bch = ' ';
    138 	if (__using_color)
    139 		win->battr = __default_color;
    140 	else
    141 		win->battr = 0;
    142 	win->nextp = win;
    143 	win->ch_off = 0;
    144 	win->orig = NULL;
    145 	win->reqy = nlines;
    146 	win->reqx = ncols;
    147 
    148 #ifdef DEBUG
    149 	__CTRACE(__CTRACE_WINDOW, "newwin: win->ch_off = %d\n", win->ch_off);
    150 #endif
    151 
    152 	for (i = 0; i < maxy; i++) {
    153 		lp = win->alines[i];
    154 		if (ispad)
    155 			lp->flags = __ISDIRTY;
    156 		else
    157 			lp->flags = 0;
    158 		for (sp = lp->line, j = 0; j < maxx; j++, sp++) {
    159 			sp->attr = 0;
    160 #ifndef HAVE_WCHAR
    161 			sp->ch = win->bch;
    162 #else
    163 			sp->ch = (wchar_t)btowc((int) win->bch);
    164 			sp->nsp = NULL;
    165 			SET_WCOL(*sp, 1);
    166 #endif /* HAVE_WCHAR */
    167 		}
    168 		lp->hash = __hash((char *)(void *)lp->line,
    169 				  (size_t)(ncols * __LDATASIZE));
    170 	}
    171 	return (win);
    172 }
    173 
    174 WINDOW *
    175 subwin(WINDOW *orig, int nlines, int ncols, int by, int bx)
    176 {
    177 
    178 	return __subwin(orig, nlines, ncols, by, bx, FALSE);
    179 }
    180 
    181 static WINDOW *
    182 __subwin(WINDOW *orig, int nlines, int ncols, int by, int bx, int ispad)
    183 {
    184 	int     i;
    185 	__LINE *lp;
    186 	WINDOW *win;
    187 	int	maxy, maxx;
    188 
    189 #ifdef	DEBUG
    190 	__CTRACE(__CTRACE_WINDOW, "subwin: (%p, %d, %d, %d, %d, %d)\n",
    191 	    orig, nlines, ncols, by, bx, ispad);
    192 #endif
    193 	if (orig == NULL || orig->orig != NULL)
    194 		return NULL;
    195 
    196 	/* Make sure window fits inside the original one. */
    197 	maxy = nlines > 0 ? nlines : orig->maxy + orig->begy - by + nlines;
    198 	maxx = ncols > 0 ? ncols : orig->maxx + orig->begx - bx + ncols;
    199 	if (by < orig->begy || bx < orig->begx
    200 	    || by + maxy > orig->maxy + orig->begy
    201 	    || bx + maxx > orig->maxx + orig->begx)
    202 		return NULL;
    203 	if ((win = __makenew(_cursesi_screen, maxy, maxx,
    204 			     by, bx, 1, ispad)) == NULL)
    205 		return NULL;
    206 	win->bch = orig->bch;
    207 	win->battr = orig->battr;
    208 	win->reqy = nlines;
    209 	win->reqx = ncols;
    210 	win->nextp = orig->nextp;
    211 	orig->nextp = win;
    212 	win->orig = orig;
    213 
    214 	/* Initialize flags here so that refresh can also use __set_subwin. */
    215 	for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++)
    216 		lp->flags = 0;
    217 	__set_subwin(orig, win);
    218 	return win;
    219 }
    220 /*
    221  * This code is shared with mvwin().
    222  */
    223 void
    224 __set_subwin(WINDOW *orig, WINDOW *win)
    225 {
    226 	int     i;
    227 	__LINE *lp, *olp;
    228 #ifdef HAVE_WCHAR
    229 	__LDATA *cp;
    230 	int j;
    231 	nschar_t *np;
    232 #endif /* HAVE_WCHAR */
    233 
    234 	win->ch_off = win->begx - orig->begx;
    235 	/* Point line pointers to line space. */
    236 	for (lp = win->lspace, i = 0; i < win->maxy; i++, lp++) {
    237 		win->alines[i] = lp;
    238 		olp = orig->alines[i + win->begy - orig->begy];
    239 #ifdef DEBUG
    240 		lp->sentinel = SENTINEL_VALUE;
    241 #endif
    242 		lp->line = &olp->line[win->ch_off];
    243 		lp->firstchp = &olp->firstch;
    244 		lp->lastchp = &olp->lastch;
    245 #ifndef HAVE_WCHAR
    246 		lp->hash = __hash((char *)(void *)lp->line,
    247 				  (size_t)(win->maxx * __LDATASIZE));
    248 #else
    249 		for (cp = lp->line, j = 0; j < win->maxx; j++, cp++) {
    250 			lp->hash = __hash_more( &cp->ch,
    251 			    sizeof( wchar_t ), lp->hash );
    252 			lp->hash = __hash_more( &cp->attr,
    253 			    sizeof( wchar_t ), lp->hash );
    254 			if ( cp->nsp ) {
    255 				np = cp->nsp;
    256 				while ( np ) {
    257 					lp->hash = __hash_more( &np->ch,
    258 					    sizeof( wchar_t ), lp->hash );
    259 					np = np->next;
    260 				}
    261 			}
    262 		}
    263 #endif /* HAVE_WCHAR */
    264 	}
    265 
    266 #ifdef DEBUG
    267 	__CTRACE(__CTRACE_WINDOW, "__set_subwin: win->ch_off = %d\n",
    268 	    win->ch_off);
    269 #endif
    270 }
    271 /*
    272  * __makenew --
    273  *	Set up a window buffer and returns a pointer to it.
    274  */
    275 static WINDOW *
    276 __makenew(SCREEN *screen, int nlines, int ncols, int by, int bx, int sub,
    277 	int ispad)
    278 {
    279 	WINDOW			*win;
    280 	__LINE			*lp;
    281 	struct __winlist	*wlp, *wlp2;
    282 	int			 i;
    283 
    284 
    285 #ifdef	DEBUG
    286 	__CTRACE(__CTRACE_WINDOW, "makenew: (%d, %d, %d, %d)\n",
    287 	    nlines, ncols, by, bx);
    288 #endif
    289 	if (nlines <= 0 || ncols <= 0)
    290 		return NULL;
    291 
    292 	if ((win = malloc(sizeof(WINDOW))) == NULL)
    293 		return NULL;
    294 #ifdef DEBUG
    295 	__CTRACE(__CTRACE_WINDOW, "makenew: win = %p\n", win);
    296 #endif
    297 	win->fp = NULL;
    298 
    299 	/* Set up line pointer array and line space. */
    300 	if ((win->alines = malloc(nlines * sizeof(__LINE *))) == NULL) {
    301 		free(win);
    302 		return NULL;
    303 	}
    304 	if ((win->lspace = malloc(nlines * sizeof(__LINE))) == NULL) {
    305 		free(win->alines);
    306 		free(win);
    307 		return NULL;
    308 	}
    309 	/* Don't allocate window and line space if it's a subwindow */
    310 	if (sub)
    311 		win->wspace = NULL;
    312 	else {
    313 		/*
    314 		 * Allocate window space in one chunk.
    315 		 */
    316 		if ((win->wspace =
    317 			malloc(ncols * nlines * sizeof(__LDATA))) == NULL) {
    318 			free(win->lspace);
    319 			free(win->alines);
    320 			free(win);
    321 			return NULL;
    322 		}
    323 		/*
    324 		 * Append window to window list.
    325 		 */
    326 		if ((wlp = malloc(sizeof(struct __winlist))) == NULL) {
    327 			free(win->wspace);
    328 			free(win->lspace);
    329 			free(win->alines);
    330 			free(win);
    331 			return NULL;
    332 		}
    333 		wlp->winp = win;
    334 		wlp->nextp = NULL;
    335 		if (screen->winlistp == NULL)
    336 			screen->winlistp = wlp;
    337 		else {
    338 			wlp2 = screen->winlistp;
    339 			while (wlp2->nextp != NULL)
    340 				wlp2 = wlp2->nextp;
    341 			wlp2->nextp = wlp;
    342 		}
    343 		/*
    344 		 * Point line pointers to line space, and lines themselves into
    345 		 * window space.
    346 		 */
    347 		for (lp = win->lspace, i = 0; i < nlines; i++, lp++) {
    348 			win->alines[i] = lp;
    349 			lp->line = &win->wspace[i * ncols];
    350 #ifdef DEBUG
    351 			lp->sentinel = SENTINEL_VALUE;
    352 #endif
    353 			lp->firstchp = &lp->firstch;
    354 			lp->lastchp = &lp->lastch;
    355 			if (ispad) {
    356 				lp->firstch = 0;
    357 				lp->lastch = ncols;
    358 			} else {
    359 				lp->firstch = ncols;
    360 				lp->lastch = 0;
    361 			}
    362 		}
    363 	}
    364 #ifdef DEBUG
    365 	__CTRACE(__CTRACE_WINDOW, "makenew: ncols = %d\n", ncols);
    366 #endif
    367 	win->screen = screen;
    368 	win->cury = win->curx = 0;
    369 	win->maxy = nlines;
    370 	win->maxx = ncols;
    371 	win->reqy = nlines;
    372 	win->reqx = ncols;
    373 
    374 	win->begy = by;
    375 	win->begx = bx;
    376 	win->flags = (__IDLINE | __IDCHAR);
    377 	win->delay = -1;
    378 	win->wattr = 0;
    379 #ifdef HAVE_WCHAR
    380 	win->bnsp = NULL;
    381 	SET_BGWCOL(*win, 1);
    382 #endif /* HAVE_WCHAR */
    383 	win->scr_t = 0;
    384 	win->scr_b = win->maxy - 1;
    385 	if (ispad) {
    386 		win->flags |= __ISPAD;
    387 		win->pbegy = 0;
    388 		win->pbegx = 0;
    389 		win->sbegy = 0;
    390 		win->sbegx = 0;
    391 		win->smaxy = 0;
    392 		win->smaxx = 0;
    393 	} else
    394 		__swflags(win);
    395 #ifdef DEBUG
    396 	__CTRACE(__CTRACE_WINDOW, "makenew: win->wattr = %08x\n", win->wattr);
    397 	__CTRACE(__CTRACE_WINDOW, "makenew: win->flags = %#.4x\n", win->flags);
    398 	__CTRACE(__CTRACE_WINDOW, "makenew: win->maxy = %d\n", win->maxy);
    399 	__CTRACE(__CTRACE_WINDOW, "makenew: win->maxx = %d\n", win->maxx);
    400 	__CTRACE(__CTRACE_WINDOW, "makenew: win->begy = %d\n", win->begy);
    401 	__CTRACE(__CTRACE_WINDOW, "makenew: win->begx = %d\n", win->begx);
    402 	__CTRACE(__CTRACE_WINDOW, "makenew: win->scr_t = %d\n", win->scr_t);
    403 	__CTRACE(__CTRACE_WINDOW, "makenew: win->scr_b = %d\n", win->scr_b);
    404 #endif
    405 	return win;
    406 }
    407 
    408 void
    409 __swflags(WINDOW *win)
    410 {
    411 
    412 	win->flags &= ~(__ENDLINE | __FULLWIN | __SCROLLWIN | __LEAVEOK);
    413 	if (win->begx + win->maxx == COLS && !(win->flags & __ISPAD)) {
    414 		win->flags |= __ENDLINE;
    415 		if (win->begx == 0 && win->maxy == LINES && win->begy == 0)
    416 			win->flags |= __FULLWIN;
    417 		if (win->begy + win->maxy == LINES)
    418 			win->flags |= __SCROLLWIN;
    419 	}
    420 }
    421 
    422 /*
    423  * is_pad --
    424  *	Return true if window was created by newpad.
    425  */
    426 bool
    427 is_pad(const WINDOW *win)
    428 {
    429 
    430 	return win->flags & __ISPAD ? true : false;
    431 }
    432