/*
 * 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	<sys/types.h>
#include	<stdlib.h>
#include	"curses_inc.h"

/* This routine clears up to the end of line. */

int
wclrtoeol(WINDOW *win)
{
	int	y = win->_cury;
	int	x = win->_curx;
	int	maxx = win->_maxx;
	int			cx;
	chtype		wc;

	if (win != curscr) {
		win->_nbyte = -1;
		if (_scrmax > 1) {
			if (ISMBIT(win->_y[y][x])) {
				win->_insmode = TRUE;
				if (_mbvalid(win) == ERR)
					return (ERR);
				x = win->_curx;
			}
			if (ISMBIT(win->_y[y][maxx - 1])) {
				for (cx = maxx - 1; cx >= x; --cx)
					if (!ISCBIT(win->_y[y][cx]))
						break;
				wc = RBYTE(win->_y[y][cx]);
				if (cx + _curs_scrwidth[TYPE(wc)] > maxx)
					maxx = cx - 1;
			}
		}
	}

	memSset(&win->_y[y][x], win->_bkgd, maxx - x);
	maxx = win->_maxx;

#ifdef	_VR3_COMPAT_CODE
	if (_y16update)
		(*_y16update)(win, 1, maxx - x, y, x);
#endif	/* _VR3_COMPAT_CODE */

	/* if curscr, reset blank structure */
	if (win == curscr) {
		if (_BEGNS[y] >= x)
			/* LINTED */
			_BEGNS[y] = (short) maxx;
		if (_ENDNS[y] >= x)
			_ENDNS[y] = _BEGNS[y] > x ? -1 : x-1;

		_CURHASH[y] = x == 0 ? 0 : _NOHASH;

		if (_MARKS != NULL) {
			char	*mkp = _MARKS[y];
			int	endx = COLS /
				BITSPERBYTE + (COLS  %BITSPERBYTE ? 1 : 0);
			int	m = x / BITSPERBYTE + 1;

			for (; m < endx; ++m)
				mkp[m] = 0;
			mkp += x / BITSPERBYTE;
			if ((m = x % BITSPERBYTE) == 0)
				*mkp = 0;
			else
				for (; m < BITSPERBYTE; ++m)
					*mkp &= ~(1 << m);

			/* if color terminal, do the same for color marks */

			if (_COLOR_MARKS != NULL) {
				mkp = _COLOR_MARKS[y];

				m = x / BITSPERBYTE + 1;
				for (; m < endx; ++m)
					mkp[m] = 0;
				mkp += x / BITSPERBYTE;
				if ((m = x % BITSPERBYTE) == 0)
					*mkp = 0;
				else
					for (; m < BITSPERBYTE; ++m)
						*mkp &= ~(1 << m);
			}
		}
		return (OK);
	} else {
		/* update firstch and lastch for the line. */
#ifdef	DEBUG
	if (outf)
		fprintf(outf, "CLRTOEOL: line %d begx = %d, maxx = %d, "
		    "lastch = %d, next firstch %d\n", y, win->_begx,
		    win->_firstch[y], win->_lastch[y], win->_firstch[y+1]);
#endif	/* DEBUG */

		if (win->_firstch[y] > x)
		    /* LINTED */
		    win->_firstch[y] = (short) x;
		win->_lastch[y] = maxx - 1;
		win->_flags |= _WINCHANGED;
		/* sync with ancestors structures */
		if (win->_sync)
			wsyncup(win);

		return (win->_immed ? wrefresh(win) : OK);
	}
}