summaryrefslogtreecommitdiffstats
path: root/usr.bin/vi/svi/svi_split.c
diff options
context:
space:
mode:
Diffstat (limited to 'usr.bin/vi/svi/svi_split.c')
-rw-r--r--usr.bin/vi/svi/svi_split.c635
1 files changed, 0 insertions, 635 deletions
diff --git a/usr.bin/vi/svi/svi_split.c b/usr.bin/vi/svi/svi_split.c
deleted file mode 100644
index dbf151c..0000000
--- a/usr.bin/vi/svi/svi_split.c
+++ /dev/null
@@ -1,635 +0,0 @@
-/*-
- * Copyright (c) 1993, 1994
- * The Regents of the University of California. All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- */
-
-#ifndef lint
-static char sccsid[] = "@(#)svi_split.c 8.49 (Berkeley) 8/17/94";
-#endif /* not lint */
-
-#include <sys/types.h>
-#include <sys/queue.h>
-#include <sys/time.h>
-
-#include <bitstring.h>
-#include <errno.h>
-#include <limits.h>
-#include <signal.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <termios.h>
-
-#include "compat.h"
-#include <curses.h>
-#include <db.h>
-#include <regex.h>
-
-#include "vi.h"
-#include "svi_screen.h"
-
-/*
- * svi_split --
- * Split the screen.
- */
-int
-svi_split(sp, argv, argc)
- SCR *sp;
- ARGS *argv[];
- int argc;
-{
- MSG *mp, *next;
- SCR *tsp, saved_sp;
- SVI_PRIVATE saved_svp;
- SMAP *smp;
- size_t cnt, half;
- int issmallscreen, splitup;
- char **ap;
-
- /* Check to see if it's possible. */
- half = sp->rows / 2;
- if (half < MINIMUM_SCREEN_ROWS) {
- msgq(sp, M_ERR, "Screen must be larger than %d to split",
- MINIMUM_SCREEN_ROWS);
- return (1);
- }
-
- /* Get a new screen. */
- if (screen_init(sp, &tsp, 0))
- return (1);
- CALLOC(sp, _HMAP(tsp), SMAP *, SIZE_HMAP(sp), sizeof(SMAP));
- if (_HMAP(tsp) == NULL)
- return (1);
-
- /*
- * We're about to modify the current screen. Save the contents
- * in case something goes horribly, senselessly wrong.
- */
- saved_sp = *sp;
- saved_svp = *SVP(sp);
-
-/* INITIALIZED AT SCREEN CREATE. */
-
-/* PARTIALLY OR COMPLETELY COPIED FROM PREVIOUS SCREEN. */
- /*
- * Small screens: see svi/svi_refresh.c:svi_refresh, section 3b.
- * Set a flag so we know to fix the screen up later.
- */
- issmallscreen = ISSMALLSCREEN(sp);
-
- /*
- * Split the screen, and link the screens together. If the cursor
- * is in the top half of the current screen, the new screen goes
- * under the current screen. Else, it goes above the current screen.
- *
- * The columns in the screen don't change.
- */
- tsp->cols = sp->cols;
-
- cnt = svi_sm_cursor(sp, sp->ep, &smp) ? 0 : smp - HMAP;
- if (cnt <= half) { /* Parent is top half. */
- /* Child. */
- tsp->rows = sp->rows - half;
- tsp->woff = sp->woff + half;
- tsp->t_maxrows = tsp->rows - 1;
-
- /* Parent. */
- sp->rows = half;
- sp->t_maxrows = sp->rows - 1;
-
- splitup = 0;
- } else { /* Parent is bottom half. */
- /* Child. */
- tsp->rows = sp->rows - half;
- tsp->woff = sp->woff;
- tsp->t_maxrows = tsp->rows - 1;
-
- /* Parent. */
- sp->rows = half;
- sp->woff += tsp->rows;
- sp->t_maxrows = sp->rows - 1;
-
- /* Shift the parent's map down. */
- memmove(_HMAP(sp),
- _HMAP(sp) + tsp->rows, sp->t_maxrows * sizeof(SMAP));
-
- splitup = 1;
- }
-
- /*
- * Small screens: see svi/svi_refresh.c:svi_refresh, section 3b.
- *
- * The child may have different screen options sizes than the
- * parent, so use them. Make sure that the text counts aren't
- * larger than the new screen sizes.
- */
- if (issmallscreen) {
- /* Fix the text line count for the parent. */
- if (splitup)
- sp->t_rows -= tsp->rows;
-
- /* Fix the parent screen. */
- if (sp->t_rows > sp->t_maxrows)
- sp->t_rows = sp->t_maxrows;
- if (sp->t_minrows > sp->t_maxrows)
- sp->t_minrows = sp->t_maxrows;
-
- /* Fix the child screen. */
- tsp->t_minrows = tsp->t_rows = O_VAL(sp, O_WINDOW);
- if (tsp->t_rows > tsp->t_maxrows)
- tsp->t_rows = tsp->t_maxrows;
- if (tsp->t_minrows > tsp->t_maxrows)
- tsp->t_minrows = tsp->t_maxrows;
-
- /*
- * If we split up, i.e. the child is on top, lines that
- * were painted in the parent may not be painted in the
- * child. Clear any lines not being used in the child
- * screen.
- *
- */
- if (splitup)
- for (cnt = tsp->t_rows; ++cnt <= tsp->t_maxrows;) {
- MOVE(tsp, cnt, 0);
- clrtoeol();
- }
- } else {
- sp->t_minrows = sp->t_rows = sp->rows - 1;
-
- /*
- * The new screen may be a small screen, even though the
- * parent was not. Don't complain if O_WINDOW is too large,
- * we're splitting the screen so the screen is much smaller
- * than normal. Clear any lines not being used in the child
- * screen.
- */
- tsp->t_minrows = tsp->t_rows = O_VAL(sp, O_WINDOW);
- if (tsp->t_rows > tsp->rows - 1)
- tsp->t_minrows = tsp->t_rows = tsp->rows - 1;
- else
- for (cnt = tsp->t_rows; ++cnt <= tsp->t_maxrows;) {
- MOVE(tsp, cnt, 0);
- clrtoeol();
- }
- }
-
- /* Adjust the ends of both maps. */
- _TMAP(sp) = _HMAP(sp) + (sp->t_rows - 1);
- _TMAP(tsp) = _HMAP(tsp) + (tsp->t_rows - 1);
-
- /* Reset the length of the default scroll. */
- sp->defscroll = sp->t_maxrows / 2;
- tsp->defscroll = tsp->t_maxrows / 2;
-
- /*
- * If files specified, build the file list, else, link to the
- * current file.
- */
- if (argv == NULL) {
- if ((tsp->frp = file_add(tsp, sp->frp->name)) == NULL)
- goto err;
- } else {
- /* Create a new argument list. */
- CALLOC(sp, tsp->argv, char **, argc + 1, sizeof(char *));
- if (tsp->argv == NULL)
- goto err;
- for (ap = tsp->argv, argv; argv[0]->len != 0; ++ap, ++argv)
- if ((*ap =
- v_strdup(sp, argv[0]->bp, argv[0]->len)) == NULL)
- goto err;
- *ap = NULL;
-
- /* Switch to the first one. */
- tsp->cargv = tsp->argv;
- if ((tsp->frp = file_add(tsp, *tsp->cargv)) == NULL)
- goto err;
- }
-
- /*
- * Copy the file state flags, start the file. Fill the child's
- * screen map. If the file is unchanged, keep the screen and
- * cursor the same.
- */
- if (argv == NULL) {
- tsp->ep = sp->ep;
- ++sp->ep->refcnt;
-
- tsp->frp->flags = sp->frp->flags;
- tsp->frp->lno = sp->lno;
- tsp->frp->cno = sp->cno;
- F_SET(tsp->frp, FR_CURSORSET);
-
- /* Copy the parent's map into the child's map. */
- memmove(_HMAP(tsp), _HMAP(sp), tsp->t_rows * sizeof(SMAP));
- } else {
- if (file_init(tsp, tsp->frp, NULL, 0))
- goto err;
- (void)svi_sm_fill(tsp, tsp->ep, 1, P_TOP);
- }
-
- /* Everything's initialized, put the screen on the displayed queue.*/
- SIGBLOCK(sp->gp);
- if (splitup) {
- /* Link in before the parent. */
- CIRCLEQ_INSERT_BEFORE(&sp->gp->dq, sp, tsp, q);
- } else {
- /* Link in after the parent. */
- CIRCLEQ_INSERT_AFTER(&sp->gp->dq, sp, tsp, q);
- }
- SIGUNBLOCK(sp->gp);
-
- /* Clear the current information lines in both screens. */
- MOVE(sp, INFOLINE(sp), 0);
- clrtoeol();
- MOVE(tsp, INFOLINE(tsp), 0);
- clrtoeol();
-
- /* Redraw the status line for the parent screen. */
- (void)msg_status(sp, sp->ep, sp->lno, 0);
-
- /* Save the parent screen's cursor information. */
- sp->frp->lno = sp->lno;
- sp->frp->cno = sp->cno;
- F_SET(sp->frp, FR_CURSORSET);
-
- /* Completely redraw the child screen. */
- F_SET(tsp, S_REDRAW);
-
- /* Switch screens. */
- sp->nextdisp = tsp;
- F_SET(sp, S_SSWITCH);
- return (0);
-
- /* Recover the original screen. */
-err: *sp = saved_sp;
- *SVP(sp) = saved_svp;
-
- /* Copy any (probably error) messages in the new screen. */
- for (mp = tsp->msgq.lh_first; mp != NULL; mp = next) {
- if (!F_ISSET(mp, M_EMPTY))
- msg_app(sp->gp, sp,
- mp->flags & M_INV_VIDEO, mp->mbuf, mp->len);
- next = mp->q.le_next;
- if (mp->mbuf != NULL)
- free(mp->mbuf);
- free(mp);
- }
-
- /* Free the new screen. */
- if (tsp->argv != NULL) {
- for (ap = tsp->argv; *ap != NULL; ++ap)
- free(*ap);
- free(tsp->argv);
- }
- free(_HMAP(tsp));
- free(SVP(tsp));
- FREE(tsp, sizeof(SCR));
- return (1);
-}
-
-/*
- * svi_bg --
- * Background the screen, and switch to the next one.
- */
-int
-svi_bg(csp)
- SCR *csp;
-{
- SCR *sp;
-
- /* Try and join with another screen. */
- if ((svi_join(csp, &sp)))
- return (1);
- if (sp == NULL) {
- msgq(csp, M_ERR,
- "You may not background your only displayed screen");
- return (1);
- }
-
- /* Move the old screen to the hidden queue. */
- SIGBLOCK(csp->gp);
- CIRCLEQ_REMOVE(&csp->gp->dq, csp, q);
- CIRCLEQ_INSERT_TAIL(&csp->gp->hq, csp, q);
- SIGUNBLOCK(csp->gp);
-
- /* Switch screens. */
- csp->nextdisp = sp;
- F_SET(csp, S_SSWITCH);
-
- return (0);
-}
-
-/*
- * svi_join --
- * Join the screen into a related screen, if one exists,
- * and return that screen.
- */
-int
-svi_join(csp, nsp)
- SCR *csp, **nsp;
-{
- SCR *sp;
- size_t cnt;
-
- /*
- * If a split screen, add space to parent/child. Make no effort
- * to clean up the screen's values. If it's not exiting, we'll
- * get it when the user asks to show it again.
- */
- if ((sp = csp->q.cqe_prev) == (void *)&csp->gp->dq) {
- if ((sp = csp->q.cqe_next) == (void *)&csp->gp->dq) {
- *nsp = NULL;
- return (0);
- }
- sp->woff = csp->woff;
- }
- sp->rows += csp->rows;
- if (ISSMALLSCREEN(sp)) {
- sp->t_maxrows += csp->rows;
- for (cnt = sp->t_rows; ++cnt <= sp->t_maxrows;) {
- MOVE(sp, cnt, 0);
- clrtoeol();
- }
- TMAP = HMAP + (sp->t_rows - 1);
- } else {
- sp->t_maxrows += csp->rows;
- sp->t_rows = sp->t_minrows = sp->t_maxrows;
- TMAP = HMAP + (sp->t_rows - 1);
- if (svi_sm_fill(sp, sp->ep, sp->lno, P_FILL))
- return (1);
- F_SET(sp, S_REDRAW);
- }
-
- /* Reset the length of the default scroll. */
- sp->defscroll = sp->t_maxrows / 2;
-
- /*
- * Save the old screen's cursor information.
- *
- * XXX
- * If called after file_end(), if the underlying file was a tmp
- * file it may have gone away.
- */
- if (csp->frp != NULL) {
- csp->frp->lno = csp->lno;
- csp->frp->cno = csp->cno;
- F_SET(csp->frp, FR_CURSORSET);
- }
-
- *nsp = sp;
- return (0);
-}
-
-/*
- * svi_fg --
- * Background the current screen, and foreground a new one.
- */
-int
-svi_fg(csp, name)
- SCR *csp;
- CHAR_T *name;
-{
- SCR *sp;
-
- if (svi_swap(csp, &sp, name))
- return (1);
- if (sp == NULL) {
- if (name == NULL)
- msgq(csp, M_ERR, "There are no background screens");
- else
- msgq(csp, M_ERR,
- "There's no background screen editing a file named %s",
- name);
- return (1);
- }
-
- /* Move the old screen to the hidden queue. */
- SIGBLOCK(csp->gp);
- CIRCLEQ_REMOVE(&csp->gp->dq, csp, q);
- CIRCLEQ_INSERT_TAIL(&csp->gp->hq, csp, q);
- SIGUNBLOCK(csp->gp);
-
- return (0);
-}
-
-/*
- * svi_swap --
- * Swap the current screen with a hidden one.
- */
-int
-svi_swap(csp, nsp, name)
- SCR *csp, **nsp;
- char *name;
-{
- SCR *sp;
- int issmallscreen;
-
- /* Find the screen, or, if name is NULL, the first screen. */
- for (sp = csp->gp->hq.cqh_first;
- sp != (void *)&csp->gp->hq; sp = sp->q.cqe_next)
- if (name == NULL || !strcmp(sp->frp->name, name))
- break;
- if (sp == (void *)&csp->gp->hq) {
- *nsp = NULL;
- return (0);
- }
- *nsp = sp;
-
- /*
- * Save the old screen's cursor information.
- *
- * XXX
- * If called after file_end(), if the underlying file was a tmp
- * file it may have gone away.
- */
- if (csp->frp != NULL) {
- csp->frp->lno = csp->lno;
- csp->frp->cno = csp->cno;
- F_SET(csp->frp, FR_CURSORSET);
- }
-
- /* Switch screens. */
- csp->nextdisp = sp;
- F_SET(csp, S_SSWITCH);
-
- /* Initialize terminal information. */
- SVP(sp)->srows = SVP(csp)->srows;
-
- issmallscreen = ISSMALLSCREEN(sp);
-
- /* Initialize screen information. */
- sp->rows = csp->rows;
- sp->cols = csp->cols;
- sp->woff = csp->woff;
-
- /*
- * Small screens: see svi/svi_refresh.c:svi_refresh, section 3b.
- *
- * The new screens may have different screen options sizes than the
- * old one, so use them. Make sure that text counts aren't larger
- * than the new screen sizes.
- */
- if (issmallscreen) {
- sp->t_minrows = sp->t_rows = O_VAL(sp, O_WINDOW);
- if (sp->t_rows > csp->t_maxrows)
- sp->t_rows = sp->t_maxrows;
- if (sp->t_minrows > csp->t_maxrows)
- sp->t_minrows = sp->t_maxrows;
- } else
- sp->t_rows = sp->t_maxrows = sp->t_minrows = sp->rows - 1;
-
- /* Reset the length of the default scroll. */
- sp->defscroll = sp->t_maxrows / 2;
-
- /*
- * Don't change the screen's cursor information other than to
- * note that the cursor is wrong.
- */
- F_SET(SVP(sp), SVI_CUR_INVALID);
-
- /*
- * The HMAP may be NULL, if the screen got resized and
- * a bunch of screens had to be hidden.
- */
- if (HMAP == NULL)
- CALLOC_RET(sp, HMAP, SMAP *, SIZE_HMAP(sp), sizeof(SMAP));
- TMAP = HMAP + (sp->t_rows - 1);
-
- /* Fill the map. */
- if (svi_sm_fill(sp, sp->ep, sp->lno, P_FILL))
- return (1);
-
- /*
- * The new screen replaces the old screen in the parent/child list.
- * We insert the new screen after the old one. If we're exiting,
- * the exit will delete the old one, if we're foregrounding, the fg
- * code will move the old one to the hidden queue.
- */
- SIGBLOCK(sp->gp);
- CIRCLEQ_REMOVE(&sp->gp->hq, sp, q);
- CIRCLEQ_INSERT_AFTER(&csp->gp->dq, csp, sp, q);
- SIGUNBLOCK(sp->gp);
-
- F_SET(sp, S_REDRAW);
- return (0);
-}
-
-/*
- * svi_rabs --
- * Change the absolute size of the current screen.
- */
-int
-svi_rabs(sp, count, adj)
- SCR *sp;
- long count;
- enum adjust adj;
-{
- SCR *g, *s;
-
- /*
- * Figure out which screens will grow, which will shrink, and
- * make sure it's possible.
- */
- if (count == 0)
- return (0);
- if (adj == A_SET) {
- if (sp->t_maxrows == count)
- return (0);
- if (sp->t_maxrows > count) {
- adj = A_DECREASE;
- count = sp->t_maxrows - count;
- } else {
- adj = A_INCREASE;
- count = count - sp->t_maxrows;
- }
- }
- if (adj == A_DECREASE) {
- if (count < 0)
- count = -count;
- s = sp;
- if (s->t_maxrows < MINIMUM_SCREEN_ROWS + count)
- goto toosmall;
- if ((g = sp->q.cqe_prev) == (void *)&sp->gp->dq) {
- if ((g = sp->q.cqe_next) == (void *)&sp->gp->dq)
- goto toobig;
- g->woff -= count;
- } else
- s->woff += count;
- } else {
- g = sp;
- if ((s = sp->q.cqe_next) != (void *)&sp->gp->dq)
- if (s->t_maxrows < MINIMUM_SCREEN_ROWS + count)
- s = NULL;
- else
- s->woff += count;
- else
- s = NULL;
- if (s == NULL) {
- if ((s = sp->q.cqe_prev) == (void *)&sp->gp->dq) {
-toobig: msgq(sp, M_BERR, "The screen cannot %s",
- adj == A_DECREASE ? "shrink" : "grow");
- return (1);
- }
- if (s->t_maxrows < MINIMUM_SCREEN_ROWS + count) {
-toosmall: msgq(sp, M_BERR,
- "The screen can only shrink to %d rows",
- MINIMUM_SCREEN_ROWS);
- return (1);
- }
- g->woff -= count;
- }
- }
-
- /*
- * Update the screens; we could optimize the reformatting of the
- * screen, but this isn't likely to be a common enough operation
- * to make it worthwhile.
- */
- g->rows += count;
- g->t_rows += count;
- if (g->t_minrows == g->t_maxrows)
- g->t_minrows += count;
- g->t_maxrows += count;
- _TMAP(g) += count;
- (void)msg_status(g, g->ep, g->lno, 0);
- F_SET(g, S_REFORMAT);
-
- s->rows -= count;
- s->t_rows -= count;
- s->t_maxrows -= count;
- if (s->t_minrows > s->t_maxrows)
- s->t_minrows = s->t_maxrows;
- _TMAP(s) -= count;
- (void)msg_status(s, s->ep, s->lno, 0);
- F_SET(s, S_REFORMAT);
-
- return (0);
-}
OpenPOWER on IntegriCloud