119304Speter/*- 219304Speter * Copyright (c) 1993, 1994 319304Speter * The Regents of the University of California. All rights reserved. 419304Speter * Copyright (c) 1993, 1994, 1995, 1996 519304Speter * Keith Bostic. All rights reserved. 619304Speter * 719304Speter * See the LICENSE file for redistribution information. 819304Speter */ 919304Speter 1019304Speter#include "config.h" 1119304Speter 1219304Speter#ifndef lint 13254225Speterstatic const char sccsid[] = "$Id: ex_z.c,v 10.12 2001/06/25 15:19:22 skimo Exp $"; 1419304Speter#endif /* not lint */ 1519304Speter 1619304Speter#include <sys/types.h> 1719304Speter#include <sys/queue.h> 18254225Speter#include <sys/time.h> 1919304Speter 2019304Speter#include <bitstring.h> 2119304Speter#include <limits.h> 2219304Speter#include <stdio.h> 2319304Speter#include <stdlib.h> 2419304Speter#include <string.h> 2519304Speter 2619304Speter#include "../common/common.h" 2719304Speter 2819304Speter/* 2919304Speter * ex_z -- :[line] z [^-.+=] [count] [flags] 3019304Speter * Adjust window. 3119304Speter * 32281373Sbapt * PUBLIC: int ex_z(SCR *, EXCMD *); 3319304Speter */ 3419304Speterint 35254225Speterex_z(SCR *sp, EXCMD *cmdp) 3619304Speter{ 3719304Speter MARK abs; 3819304Speter recno_t cnt, equals, lno; 3919304Speter int eofcheck; 4019304Speter 4119304Speter NEEDFILE(sp, cmdp); 4219304Speter 4319304Speter /* 4419304Speter * !!! 4519304Speter * If no count specified, use either two times the size of the 4619304Speter * scrolling region, or the size of the window option. POSIX 4719304Speter * 1003.2 claims that the latter is correct, but historic ex/vi 4819304Speter * documentation and practice appear to use the scrolling region. 4919304Speter * I'm using the window size as it means that the entire screen 5019304Speter * is used instead of losing a line to roundoff. Note, we drop 5119304Speter * a line from the cnt if using the window size to leave room for 5219304Speter * the next ex prompt. 5319304Speter */ 5419304Speter if (FL_ISSET(cmdp->iflags, E_C_COUNT)) 5519304Speter cnt = cmdp->count; 5619304Speter else 5719304Speter cnt = O_VAL(sp, O_WINDOW) - 1; 5819304Speter 5919304Speter equals = 0; 6019304Speter eofcheck = 0; 6119304Speter lno = cmdp->addr1.lno; 6219304Speter 6319304Speter switch (FL_ISSET(cmdp->iflags, 6419304Speter E_C_CARAT | E_C_DASH | E_C_DOT | E_C_EQUAL | E_C_PLUS)) { 6519304Speter case E_C_CARAT: /* Display cnt * 2 before the line. */ 6619304Speter eofcheck = 1; 6719304Speter if (lno > cnt * 2) 6819304Speter cmdp->addr1.lno = (lno - cnt * 2) + 1; 6919304Speter else 7019304Speter cmdp->addr1.lno = 1; 7119304Speter cmdp->addr2.lno = (cmdp->addr1.lno + cnt) - 1; 7219304Speter break; 7319304Speter case E_C_DASH: /* Line goes at the bottom of the screen. */ 7419304Speter cmdp->addr1.lno = lno > cnt ? (lno - cnt) + 1 : 1; 7519304Speter cmdp->addr2.lno = lno; 7619304Speter break; 7719304Speter case E_C_DOT: /* Line goes in the middle of the screen. */ 7819304Speter /* 7919304Speter * !!! 8019304Speter * Historically, the "middleness" of the line overrode the 8119304Speter * count, so that "3z.19" or "3z.20" would display the first 8219304Speter * 12 lines of the file, i.e. (N - 1) / 2 lines before and 8319304Speter * after the specified line. 8419304Speter */ 8519304Speter eofcheck = 1; 8619304Speter cnt = (cnt - 1) / 2; 8719304Speter cmdp->addr1.lno = lno > cnt ? lno - cnt : 1; 8819304Speter cmdp->addr2.lno = lno + cnt; 8919304Speter 9019304Speter /* 9119304Speter * !!! 9219304Speter * Historically, z. set the absolute cursor mark. 9319304Speter */ 9419304Speter abs.lno = sp->lno; 9519304Speter abs.cno = sp->cno; 9619304Speter (void)mark_set(sp, ABSMARK1, &abs, 1); 9719304Speter break; 9819304Speter case E_C_EQUAL: /* Center with hyphens. */ 9919304Speter /* 10019304Speter * !!! 10119304Speter * Strangeness. The '=' flag is like the '.' flag (see the 10219304Speter * above comment, it applies here as well) but with a special 10319304Speter * little hack. Print out lines of hyphens before and after 10419304Speter * the specified line. Additionally, the cursor remains set 10519304Speter * on that line. 10619304Speter */ 10719304Speter eofcheck = 1; 10819304Speter cnt = (cnt - 1) / 2; 10919304Speter cmdp->addr1.lno = lno > cnt ? lno - cnt : 1; 11019304Speter cmdp->addr2.lno = lno - 1; 11119304Speter if (ex_pr(sp, cmdp)) 11219304Speter return (1); 11319304Speter (void)ex_puts(sp, "----------------------------------------\n"); 11419304Speter cmdp->addr2.lno = cmdp->addr1.lno = equals = lno; 11519304Speter if (ex_pr(sp, cmdp)) 11619304Speter return (1); 11719304Speter (void)ex_puts(sp, "----------------------------------------\n"); 11819304Speter cmdp->addr1.lno = lno + 1; 11919304Speter cmdp->addr2.lno = (lno + cnt) - 1; 12019304Speter break; 12119304Speter default: 12219304Speter /* If no line specified, move to the next one. */ 12319304Speter if (F_ISSET(cmdp, E_ADDR_DEF)) 12419304Speter ++lno; 12519304Speter /* FALLTHROUGH */ 12619304Speter case E_C_PLUS: /* Line goes at the top of the screen. */ 12719304Speter eofcheck = 1; 12819304Speter cmdp->addr1.lno = lno; 12919304Speter cmdp->addr2.lno = (lno + cnt) - 1; 13019304Speter break; 13119304Speter } 13219304Speter 13319304Speter if (eofcheck) { 13419304Speter if (db_last(sp, &lno)) 13519304Speter return (1); 13619304Speter if (cmdp->addr2.lno > lno) 13719304Speter cmdp->addr2.lno = lno; 13819304Speter } 13919304Speter 14019304Speter if (ex_pr(sp, cmdp)) 14119304Speter return (1); 14219304Speter if (equals) 14319304Speter sp->lno = equals; 14419304Speter return (0); 14519304Speter} 146