/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*	Copyright (c) 1988 AT&T	*/
/*	  All Rights Reserved	*/

/*
 * University Copyright- Copyright (c) 1982, 1986, 1988
 * The Regents of the University of California
 * All Rights Reserved
 *
 * University Acknowledgment- Portions of this document are derived from
 * software developed by the University of California, Berkeley, and its
 * contributors.
 */

/*LINTLIBRARY*/

#include	<string.h>
#include	<sys/types.h>
#include	"curses_inc.h"

/* Like refresh but does not output */

int
wnoutrefresh(WINDOW *win)
{
	short	*bch, *ech, *sbch, *sech;
	chtype	**wcp, **scp, *wc, *sc;
	int	*hash;
	short	y, x, xorg, yorg, scrli, scrco, boty, sminy, smaxy, minx,
	    maxx, lo, hi;
	bool	doall;

	if (win->_parent)
		wsyncdown(win);

	doall = win->_clear;

	sminy = SP->Yabove;
	smaxy = sminy + LINES;
	scrli = curscr->_maxy;
	scrco = curscr->_maxx;

	yorg = win->_begy + win->_yoffset;
	xorg = win->_begx;

	/* save flags, cursor positions */
	SP->virt_scr->_leave = win->_leave;
	if ((!win->_leave && (win->_flags & (_WINCHANGED | _WINMOVED))) &&
	    ((y = win->_cury + yorg) >= 0) && (y < scrli) &&
	    ((x = win->_curx + xorg) >= 0) && (x < scrco)) {
		_virtscr->_cury = y;
		_virtscr->_curx = x;
	}
	if (!(win->_use_idc))
		_virtscr->_use_idc = FALSE;
	if (win->_use_idl)
		_virtscr->_use_idl = TRUE;
	if (win->_clear) {
		_virtscr->_clear = TRUE;
		win->_clear = FALSE;
		win->_flags |= _WINCHANGED;
	}

	if (!(win->_flags & _WINCHANGED))
		goto done;

	/* region to update */
	boty = win->_maxy+yorg;
	if (yorg >= sminy && yorg < smaxy && boty >= smaxy)
		boty = smaxy;
	else
		if (boty > scrli)
			boty = scrli;
	boty -= yorg;

	minx = 0;
	if ((maxx = win->_maxx+xorg) > scrco)
		maxx = scrco;
	maxx -= xorg + 1;

	/* update structure */
	bch = win->_firstch;
	ech = win->_lastch;
	wcp = win->_y;

	hash = _VIRTHASH + yorg;
	sbch = _virtscr->_firstch + yorg;
	sech = _virtscr->_lastch + yorg;
	scp  = _virtscr->_y + yorg;

	/* first time around, set proper top/bottom changed lines */
	if (curscr->_sync) {
		_VIRTTOP = scrli;
		_VIRTBOT = -1;
	}

	/* update each line */
	for (y = 0; y < boty; ++y, ++hash, ++bch, ++ech, ++sbch,
	    ++sech, ++wcp, ++scp) {
		if (!doall && *bch == _INFINITY)
			continue;

		lo = (doall || *bch == _REDRAW || *bch < minx) ? minx : *bch;
		hi = (doall || *bch == _REDRAW || *ech > maxx) ? maxx : *ech;

		wc = *wcp;
		sc = *scp;
		/* adjust lo and hi so they contain whole characters */
		if (_scrmax > 1) {
			if (ISCBIT(wc[lo])) {
				for (x = lo - 1; x >= minx; --x)
					if (!ISCBIT(wc[x]))
						break;
				if (x < minx) {
					for (x = lo + 1; x <= maxx; ++x)
						if (!ISCBIT(wc[x]))
							break;
					if (x > maxx)
						goto nextline;
				}
				lo = x;
			}
			if (ISMBIT(wc[hi])) {
				int		w;
				unsigned char	rb;
				for (x = hi; x >= lo; --x)
					if (!ISCBIT(wc[x]))
						break;
				/* LINTED */
				rb = (unsigned char) RBYTE(wc[x]);
				w = _curs_scrwidth[TYPE(rb)];
				hi = (x+w) <= maxx+1 ? x+w-1 : x;
			}
		}

		if (hi < lo)
			continue;

		/* clear partial multi-chars about to be overwritten */
		if (_scrmax > 1) {
			if (ISMBIT(sc[lo + xorg]))
				(void) _mbclrch(_virtscr, y + yorg, lo + xorg);
			if (ISMBIT(sc[hi + xorg]))
				(void) _mbclrch(_virtscr, y + yorg, hi + xorg);
		}

		/* update the change structure */
		if (*bch == _REDRAW || *sbch == _REDRAW)
			*sbch =  _REDRAW;
		else {
			if (*sbch > lo+xorg)
				*sbch = lo+xorg;
			if (*sech < hi+xorg)
				*sech = hi+xorg;
		}
		if ((y + yorg) < _VIRTTOP)
			_VIRTTOP = y+yorg;
		if ((y + yorg) > _VIRTBOT)
			_VIRTBOT = y + yorg;

		/* update the image */
		wc = *wcp + lo;
		sc = *scp + lo + xorg;
		(void) memcpy((char *)sc, (char *)wc, (size_t)
		    (((hi - lo) + 1) * sizeof (chtype)));

		/* the hash value of the line */
		*hash = _NOHASH;

nextline:
		*bch = _INFINITY;
		*ech = -1;
	}

done:
	_virtscr->_flags |= _WINCHANGED;
	win->_flags &= ~(_WINCHANGED | _WINMOVED | _WINSDEL);
	return (OK);
}