[unix-history] / usr / src / lib / libcurses / newwin.c

/*
 * allocate space for and set up defaults for a new window
 *
 * @(#)newwin.c	1.7 (Berkeley) %G%
 */

# include	"curses.ext"

char	*malloc();

# define	SMALLOC	(short *) malloc

static WINDOW	*makenew();

# undef		nl	/* don't need it here, and it interferes	*/

WINDOW *
newwin(num_lines, num_cols, begy, begx)
int	num_lines, num_cols, begy, begx;
{
	reg WINDOW	*win;
	reg char	*sp;
	reg int		i, by, bx, nl, nc;
	reg int		j;

	by = begy;
	bx = begx;
	nl = num_lines;
	nc = num_cols;

	if (nl == 0)
		nl = LINES - by;
	if (nc == 0)
		nc = COLS - bx;
	if ((win = makenew(nl, nc, by, bx)) == NULL)
		return ERR;
	if ((win->_firstch = SMALLOC(nl * sizeof win->_firstch[0])) == NULL) {
		free(win->_y);
		free(win);
		return NULL;
	}
	if ((win->_lastch = SMALLOC(nl * sizeof win->_lastch[0])) == NULL) {
		free(win->_y);
		free(win->_firstch);
		free(win);
		return NULL;
	}
	win->_nextp = win;
	for (i = 0; i < nl; i++) {
		win->_firstch[i] = _NOCHANGE;
		win->_lastch[i] = _NOCHANGE;
	}
	for (i = 0; i < nl; i++)
		if ((win->_y[i] = malloc(nc * sizeof win->_y[0])) == NULL) {
			for (j = 0; j < i; j++)
				free(win->_y[j]);
			free(win->_firstch);
			free(win->_lastch);
			free(win->_y);
			free(win);
			return ERR;
		}
		else
			for (sp = win->_y[i]; sp < win->_y[i] + nc; )
				*sp++ = ' ';
	win->_ch_off = 0;
# ifdef DEBUG
	fprintf(outf, "NEWWIN: win->_ch_off = %d\n", win->_ch_off);
# endif
	return win;
}

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;

	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 + orig->_begy
	    || bx + nc > orig->_maxx + orig->_begx)
		return ERR;
	if (nl == 0)
		nl = orig->_maxy + orig->_begy - by;
	if (nc == 0)
		nc = orig->_maxx + orig->_begx - bx;
	if ((win = makenew(nl, nc, by, bx)) == NULL)
		return ERR;
	win->_nextp = orig->_nextp;
	orig->_nextp = win;
	win->_orig = orig;
	_set_subwin_(orig, win);
	return win;
}

/*
 * this code is shared with mvwin()
 */
_set_subwin_(orig, win)
register WINDOW	*orig, *win;
{
	register int	i, j, k;

	j = win->_begy - orig->_begy;
	k = win->_begx - orig->_begx;
	win->_ch_off = k;
# ifdef DEBUG
	fprintf(outf, "_SET_SUBWIN_: win->_ch_off = %d\n", win->_ch_off);
# endif
	win->_firstch = &orig->_firstch[j];
	win->_lastch = &orig->_lastch[j];
	for (i = 0; i < win->_maxy; i++, j++)
		win->_y[i] = &orig->_y[j][k];

}

/*
 *	This routine sets up a window buffer and returns a pointer to it.
 */
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 *win)) == NULL)
		return NULL;
# ifdef DEBUG
	fprintf(outf, "MAKENEW: nl = %d\n", nl);
# endif
	if ((win->_y = (char **) malloc(nl * sizeof win->_y[0])) == NULL) {
		free(win);
		return NULL;
	}
# ifdef DEBUG
	fprintf(outf, "MAKENEW: nc = %d\n", nc);
# endif
	win->_cury = win->_curx = 0;
	win->_clear = FALSE;
	win->_maxy = nl;
	win->_maxx = nc;
	win->_begy = by;
	win->_begx = bx;
	win->_flags = 0;
	win->_scroll = win->_leave = FALSE;
	_swflags_(win);
# 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;
}

_swflags_(win)
register WINDOW	*win;
{
	win->_flags &= ~(_ENDLINE|_FULLLINE|_FULLWIN|_SCROLLWIN);
	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;
	}
}
Commit	Line	Data
f1d89179 KA	1	/*
	2	* allocate space for and set up defaults for a new window
	3	*
52f06ac3	4	* @(#)newwin.c 1.7 (Berkeley) %G%
f1d89179 KA	5	*/
	6
	7	# include "curses.ext"
	8
52f06ac3 JB	9	char *malloc();
	10
	11	# define SMALLOC (short *) malloc
f1d89179 KA	12
	13	static WINDOW *makenew();
	14
	15	# undef nl /* don't need it here, and it interferes */
	16
	17	WINDOW *
	18	newwin(num_lines, num_cols, begy, begx)
	19	int num_lines, num_cols, begy, begx;
	20	{
	21	reg WINDOW *win;
	22	reg char *sp;
	23	reg int i, by, bx, nl, nc;
52f06ac3	24	reg int j;
f1d89179 KA	25
	26	by = begy;
	27	bx = begx;
	28	nl = num_lines;
	29	nc = num_cols;
	30
	31	if (nl == 0)
	32	nl = LINES - by;
	33	if (nc == 0)
	34	nc = COLS - bx;
	35	if ((win = makenew(nl, nc, by, bx)) == NULL)
	36	return ERR;
52f06ac3 JB	37	if ((win->_firstch = SMALLOC(nl * sizeof win->_firstch[0])) == NULL) {
	38	free(win->_y);
	39	free(win);
	40	return NULL;
	41	}
	42	if ((win->_lastch = SMALLOC(nl * sizeof win->_lastch[0])) == NULL) {
	43	free(win->_y);
	44	free(win->_firstch);
	45	free(win);
	46	return NULL;
	47	}
	48	win->_nextp = win;
	49	for (i = 0; i < nl; i++) {
	50	win->_firstch[i] = _NOCHANGE;
	51	win->_lastch[i] = _NOCHANGE;
	52	}
f1d89179	53	for (i = 0; i < nl; i++)
52f06ac3	54	if ((win->_y[i] = malloc(nc * sizeof win->_y[0])) == NULL) {
f1d89179	55	for (j = 0; j < i; j++)
52f06ac3 JB	56	free(win->_y[j]);
	57	free(win->_firstch);
	58	free(win->_lastch);
	59	free(win->_y);
	60	free(win);
f1d89179 KA	61	return ERR;
	62	}
	63	else
	64	for (sp = win->_y[i]; sp < win->_y[i] + nc; )
	65	*sp++ = ' ';
52f06ac3 JB	66	win->_ch_off = 0;
	67	# ifdef DEBUG
	68	fprintf(outf, "NEWWIN: win->_ch_off = %d\n", win->_ch_off);
	69	# endif
f1d89179 KA	70	return win;
	71	}
	72
	73	WINDOW *
	74	subwin(orig, num_lines, num_cols, begy, begx)
	75	reg WINDOW *orig;
52f06ac3 JB	76	int num_lines, num_cols, begy, begx;
52f06ac3 JB	77	{
f1d89179 KA	78	reg int i;
	79	reg WINDOW *win;
	80	reg int by, bx, nl, nc;
f1d89179 KA	81
	82	by = begy;
	83	bx = begx;
	84	nl = num_lines;
	85	nc = num_cols;
	86
	87	/*
	88	* make sure window fits inside the original one
	89	*/
	90	# ifdef DEBUG
	91	fprintf(outf, "SUBWIN(%0.2o, %d, %d, %d, %d)\n", orig, nl, nc, by, bx);
	92	# endif
	93	if (by < orig->_begy \|\| bx < orig->_begx
ab41d2db	94	\|\| by + nl > orig->_maxy + orig->_begy
52f06ac3	95	\|\| bx + nc > orig->_maxx + orig->_begx)
f1d89179 KA	96	return ERR;
f1d89179 KA	97	if (nl == 0)
ab41d2db	98	nl = orig->_maxy + orig->_begy - by;
f1d89179	99	if (nc == 0)
ab41d2db	100	nc = orig->_maxx + orig->_begx - bx;
52f06ac3	101	if ((win = makenew(nl, nc, by, bx)) == NULL)
f1d89179	102	return ERR;
60d72089 KA	103	win->_nextp = orig->_nextp;
	104	orig->_nextp = win;
	105	win->_orig = orig;
52f06ac3	106	_set_subwin_(orig, win);
f1d89179 KA	107	return win;
	108	}
	109
52f06ac3 JB	110	/*
	111	* this code is shared with mvwin()
	112	*/
	113	_set_subwin_(orig, win)
	114	register WINDOW orig, win;
	115	{
	116	register int i, j, k;
	117
	118	j = win->_begy - orig->_begy;
	119	k = win->_begx - orig->_begx;
	120	win->_ch_off = k;
	121	# ifdef DEBUG
	122	fprintf(outf, "_SET_SUBWIN_: win->_ch_off = %d\n", win->_ch_off);
	123	# endif
	124	win->_firstch = &orig->_firstch[j];
	125	win->_lastch = &orig->_lastch[j];
	126	for (i = 0; i < win->_maxy; i++, j++)
	127	win->_y[i] = &orig->_y[j][k];
	128
	129	}
	130
f1d89179 KA	131	/*
	132	* This routine sets up a window buffer and returns a pointer to it.
	133	*/
	134	static WINDOW *
	135	makenew(num_lines, num_cols, begy, begx)
	136	int num_lines, num_cols, begy, begx; {
	137
	138	reg int i;
	139	reg WINDOW *win;
	140	reg int by, bx, nl, nc;
	141
	142	by = begy;
	143	bx = begx;
	144	nl = num_lines;
	145	nc = num_cols;
	146
	147	# ifdef DEBUG
	148	fprintf(outf, "MAKENEW(%d, %d, %d, %d)\n", nl, nc, by, bx);
	149	# endif
52f06ac3	150	if ((win = (WINDOW ) malloc(sizeof win)) == NULL)
f1d89179 KA	151	return NULL;
	152	# ifdef DEBUG
	153	fprintf(outf, "MAKENEW: nl = %d\n", nl);
	154	# endif
52f06ac3 JB	155	if ((win->_y = (char *) malloc(nl sizeof win->_y[0])) == NULL) {
52f06ac3 JB	156	free(win);
95cc59cf	157	return NULL;
f1d89179 KA	158	}
	159	# ifdef DEBUG
	160	fprintf(outf, "MAKENEW: nc = %d\n", nc);
	161	# endif
	162	win->_cury = win->_curx = 0;
52f06ac3	163	win->_clear = FALSE;
f1d89179 KA	164	win->_maxy = nl;
	165	win->_maxx = nc;
	166	win->_begy = by;
	167	win->_begx = bx;
ab41d2db	168	win->_flags = 0;
f1d89179	169	win->_scroll = win->_leave = FALSE;
52f06ac3	170	_swflags_(win);
f1d89179 KA	171	# ifdef DEBUG
	172	fprintf(outf, "MAKENEW: win->_clear = %d\n", win->_clear);
	173	fprintf(outf, "MAKENEW: win->_leave = %d\n", win->_leave);
	174	fprintf(outf, "MAKENEW: win->_scroll = %d\n", win->_scroll);
	175	fprintf(outf, "MAKENEW: win->_flags = %0.2o\n", win->_flags);
	176	fprintf(outf, "MAKENEW: win->_maxy = %d\n", win->_maxy);
	177	fprintf(outf, "MAKENEW: win->_maxx = %d\n", win->_maxx);
	178	fprintf(outf, "MAKENEW: win->_begy = %d\n", win->_begy);
	179	fprintf(outf, "MAKENEW: win->_begx = %d\n", win->_begx);
	180	# endif
	181	return win;
	182	}
52f06ac3 JB	183
	184	_swflags_(win)
	185	register WINDOW *win;
	186	{
	187	win->_flags &= ~(_ENDLINE\|_FULLLINE\|_FULLWIN\|_SCROLLWIN);
	188	if (win->_begx + win->_maxx == COLS) {
	189	win->_flags \|= _ENDLINE;
	190	if (win->_begx == 0) {
	191	if (AL && DL)
	192	win->_flags \|= _FULLLINE;
	193	if (win->_maxy == LINES && win->_begy == 0)
	194	win->_flags \|= _FULLWIN;
	195	}
	196	if (win->_begy + win->_maxy == LINES)
	197	win->_flags \|= _SCROLLWIN;
	198	}
	199	}