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

/*
 * Insert/delete lines
 * id < 0 : number of lines to delete
 * id > 0 : number of lines to insert
 */

int
winsdelln(WINDOW *win, int id)
{
        int     endy, endx, to, fr, num_lines, dir;
        chtype  *sw;
        char    *mk;
        bool    savimmed, savesync;
        short   x, y, quick, *begch, *endch;
#ifdef  _VR3_COMPAT_CODE
        /* LINTED */
        void            (*update_ptr)();

        /*
         * Null out the update pointer so that in wclrtoeol we do not
         * update the _y16 area but we wait till the bottom of this
         * function to do it in one fell swoop.
         */

        if (_y16update) {
                update_ptr = _y16update;
                _y16update = NULL;
        } else
                update_ptr = NULL;
#endif  /* _VR3_COMPAT_CODE */

        if ((win->_cury >= win->_tmarg) && (win->_cury <= win->_bmarg))
                endy = win->_bmarg + 1;
        else
                endy = win->_maxy;

        if (id < 0) {
                /*
                 * Check that the amount of lines to delete aren't larger
                 * than the window.  We save num_lines only so that we
                 * don't have to re-compute if the if comes out true.
                 */

                if ((num_lines = win->_cury - endy) > id)
                        id = num_lines;

                /*
                 * "fr" is the line that we are coming "fr"om and
                 * moving "to" the new place.  This is the offset which
                 * we have to re-align our pointers by.
                 * We want to start setting the current line's pointer
                 * to point to the offset's line.  We want to move line "fr"
                 * to line "to".
                 */

                to = win->_cury;
                fr = to - id;
                num_lines = endy - fr;
                dir = 1;
        } else {
                /* can't insert more lines than are in the region */
                if ((num_lines = endy - win->_cury) < id)
                        id = num_lines;

                to = endy - 1;
                fr = to - id;
                num_lines = fr - (win->_cury - 1);
                dir = -1;
        }

        /*
         * If this window has no parents or children, then we can manipulate
         * pointers to simulate insert/delete line.  Otherwise,
         * to propogate the changes to parents and siblings
         * we have to memcpy the text around.
         *
         * Set quick to tell us which we have to do.
         */
        quick = ((win->_ndescs <= 0) && (win->_parent == NULL));

        begch = win->_firstch;
        endch = win->_lastch;
        endx = win->_maxx;

        for (; num_lines > 0; num_lines--, to += dir, fr += dir) {
                /* can be done quickly */
                if (quick) {
                        sw = win->_y[to];
                        win->_y[to] = win->_y[fr];
                        win->_y[fr] = sw;
                        if ((win == curscr) && _MARKS != NULL) {
                                mk = _MARKS[to];
                                _MARKS[to] = _MARKS[fr];
                                _MARKS[fr] = mk;

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

                                if (_COLOR_MARKS != NULL) {
                                        mk = _COLOR_MARKS[to];
                                        _COLOR_MARKS[to] = _COLOR_MARKS[fr];
                                        _COLOR_MARKS[fr] = mk;
                                }
                        }
                } else
                        /* slow update */
                        (void) memcpy((char *) win->_y[to], (char *)
                            win->_y[fr], (endx * sizeof (chtype)));


                /*
                 * If this is curscr, the firstch[] and lastch[]
                 * arrays contain blank information.
                 */

                if (win == curscr) {
                        begch[to] = begch[fr];
                        endch[to] = endch[fr];
                        _CURHASH[to] = _CURHASH[fr];
                } else {
                        /* regular window, update the change structure */
                        begch[to] = 0;
                        endch[to] = endx - 1;
                }
        }

        /* clear the insert/delete lines */
        if (id < 0)
                num_lines = endy - to;
        else
                num_lines = to - (win->_cury - 1);

        if (num_lines > 0) {            /* Is this if needed ? */
                savimmed = win->_immed;
                savesync = win->_sync;
                win->_immed = win->_sync = FALSE;
                x = win->_curx;
                y = win->_cury;

                win->_curx = 0;
                for (; num_lines > 0; --num_lines, to += dir) {
                        /* LINTED */
                        win->_cury = (short) to;
                        (void) wclrtoeol(win);
                }

                win->_curx = x;
                win->_cury = y;
                win->_immed = savimmed;
                win->_sync = savesync;
        }
        win->_flags |= (_WINCHANGED|_WINSDEL);

#ifdef  _VR3_COMPAT_CODE
        if (update_ptr) {
                _y16update = update_ptr;
                (*_y16update)(win, endy - y, endx, y, 0);
        }
#endif  /* _VR3_COMPAT_CODE */

        if (win->_sync)
                wsyncup(win);

        return ((win != curscr && savimmed) ? wrefresh(win) : OK);
}