/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/* LINTLIBRARY */

/*
 * scr_dump.c
 *
 * XCurses Library
 *
 * Copyright 1990, 1995 by Mortice Kern Systems Inc.  All rights reserved.
 *
 */

#if M_RCSID
#ifndef lint
static char rcsID[] =
"$Header: /team/ps/sun_xcurses/archive/local_changes/xcurses/src/lib/"
"libxcurses/src/libc/xcurses/rcs/scr_dump.c 1.6 1998/06/01 16:25:23 "
"cbates Exp $";
#endif
#endif

#include <private.h>
#include <sys/types.h>
#include <sys/stat.h>

/*
 * Save the current screen image.
 */
int
scr_dump(const char *f)
{
        int     code;
        FILE    *fp;

        code = ERR;

        if ((fp = fopen(f, "wF")) != NULL) {
                code = putwin(curscr, fp);
                (void) fclose(fp);
        }

        return (code);
}

static int
scr_replace(WINDOW *w, const char *f)
{
        int     i;
        FILE    *fp;
        WINDOW  *new;

        if ((fp = fopen(f, "rF")) == NULL)
                return (ERR);

        new = getwin(fp);
        (void) fclose(fp);

        if (new == NULL)
                return (ERR);

        if (new->_maxy != w->_maxy || new->_maxx != w->_maxx) {
                (void) delwin(new);
                return (ERR);
        }

        /* Replace contents of curscr window structure. */
        free(w->_base);
        free(w->_line);
        free(w->_first);
        new->_flags &= ~W_CLEAR_WINDOW; /* Removed default clear command */
        *w = *new;

        /* Rehash the current screen? */
        if (w == curscr)
                for (i = 0; i < w->_maxy; ++i)
                        __m_cc_hash(w, __m_screen->_hash, i);

        /* Discard the working window. */
        new->_base = NULL;
        new->_line = NULL;
        new->_first = NULL;
        (void) delwin(new);
        /* Make sure we know where the cursor is */
        (void) __m_mvcur(-1, -1, curscr->_cury, curscr->_curx, __m_outc);
        return (OK);
}

/*
 * A picture of what scr_restore(), scr_init(), and scr_set() do :
 *
 *                              scr_restore()           scr_init()
 *                                  |                       |
 *      stdscr                      V                       V
 *      +----+                   newscr                  curscr
 *      |    |                  +-------+               +-------+
 *      +----+  refresh() ->    |       |               |       |
 *                              |       | doupdate() -> |       |
 *        w                     |       |               |       |
 *      +----+  wrefresh(w) ->  |       |               |       |
 *      |    |                  +-------+               +-------+
 *      +----+                        ^                   ^
 *                                    |                   |
 *                                    \---- scr_set() ----/
 */

/*
 * Get a screen image that will appear next doupdate(),
 * replacing the current screen.
 */
int
scr_restore(const char *f)
{
        int     code;

        code = scr_replace(__m_screen->_newscr, f);

        return (code);
}

/*
 * Get the screen image that really reflects what is on the screen,
 * though the applicatiion may not want it.  A subsequent doupdate()
 * will compared and make changes against this image.
 */
int
scr_init(const char *f)
{
        int     code;
        struct stat     tty, dump;
        char    *name;

        name = ttyname(cur_term->_ofd);
        if ((non_rev_rmcup && exit_ca_mode != NULL) ||
                stat(f, &dump) != 0 || name == NULL || stat(name, &tty) != 0)
                code = ERR;
        else {
                if (dump.st_mtime < tty.st_mtime)
                        code = ERR;
                else {
                        code = scr_replace(__m_screen->_curscr, f);
                }
        }

        return (code);
}

/*
 * Get the screen image that is really on the screen and that the
 * application wants on the screen.
 */
int
scr_set(const char *f)
{
        int     code;

        if ((code = scr_init(f)) == OK)
                code = scr_restore(f);

        return (code);
}