contrib/nvi/ex/ex_visual.c

   1 /*-
   2  * Copyright (c) 1992, 1993, 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  * Copyright (c) 1992, 1993, 1994, 1995, 1996
   5  *      Keith Bostic.  All rights reserved.
   6  *
   7  * See the LICENSE file for redistribution information.
   8  */
   9
  10 #include "config.h"
  11
  12 #ifndef lint
  13 static const char sccsid[] = "@(#)ex_visual.c   10.13 (Berkeley) 6/28/96";
  14 #endif /* not lint */
  15
  16 #include <sys/types.h>
  17 #include <sys/queue.h>
  18 #include <sys/time.h>
  19
  20 #include <bitstring.h>
  21 #include <limits.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25 #include <unistd.h>
  26
  27 #include "../common/common.h"
  28 #include "../vi/vi.h"
  29
  30 /*
  31  * ex_visual -- :[line] vi[sual] [^-.+] [window_size] [flags]
  32  *      Switch to visual mode.
  33  *
  34  * PUBLIC: int ex_visual __P((SCR *, EXCMD *));
  35  */
  36 int
  37 ex_visual(sp, cmdp)
  38         SCR *sp;
  39         EXCMD *cmdp;
  40 {
  41         SCR *tsp;
  42         size_t len;
  43         int pos;
  44         char buf[256];
  45
  46         /* If open option off, disallow visual command. */
  47         if (!O_ISSET(sp, O_OPEN)) {
  48                 msgq(sp, M_ERR,
  49             "175|The visual command requires that the open option be set");
  50                 return (1);
  51         }
  52
  53         /* Move to the address. */
  54         sp->lno = cmdp->addr1.lno == 0 ? 1 : cmdp->addr1.lno;
  55
  56         /*
  57          * Push a command based on the line position flags.  If no
  58          * flag specified, the line goes at the top of the screen.
  59          */
  60         switch (FL_ISSET(cmdp->iflags,
  61             E_C_CARAT | E_C_DASH | E_C_DOT | E_C_PLUS)) {
  62         case E_C_CARAT:
  63                 pos = '^';
  64                 break;
  65         case E_C_DASH:
  66                 pos = '-';
  67                 break;
  68         case E_C_DOT:
  69                 pos = '.';
  70                 break;
  71         case E_C_PLUS:
  72                 pos = '+';
  73                 break;
  74         default:
  75                 sp->frp->lno = sp->lno;
  76                 sp->frp->cno = 0;
  77                 (void)nonblank(sp, sp->lno, &sp->cno);
  78                 F_SET(sp->frp, FR_CURSORSET);
  79                 goto nopush;
  80         }
  81
  82         if (FL_ISSET(cmdp->iflags, E_C_COUNT))
  83                 len = snprintf(buf, sizeof(buf),
  84                      "%luz%c%lu", (u_long)sp->lno, pos, cmdp->count);
  85         else
  86                 len = snprintf(buf, sizeof(buf), "%luz%c",
  87                     (u_long)sp->lno, pos);
  88         (void)v_event_push(sp, NULL, buf, len, CH_NOMAP | CH_QUOTED);
  89
  90         /*
  91          * !!!
  92          * Historically, if no line address was specified, the [p#l] flags
  93          * caused the cursor to be moved to the last line of the file, which
  94          * was then positioned as described above.  This seems useless, so
  95          * I haven't implemented it.
  96          */
  97         switch (FL_ISSET(cmdp->iflags, E_C_HASH | E_C_LIST | E_C_PRINT)) {
  98         case E_C_HASH:
  99                 O_SET(sp, O_NUMBER);
 100                 break;
 101         case E_C_LIST:
 102                 O_SET(sp, O_LIST);
 103                 break;
 104         case E_C_PRINT:
 105                 break;
 106         }
 107
 108 nopush: /*
 109          * !!!
 110          * You can call the visual part of the editor from within an ex
 111          * global command.
 112          *
 113          * XXX
 114          * Historically, undoing a visual session was a single undo command,
 115          * i.e. you could undo all of the changes you made in visual mode.
 116          * We don't get this right; I'm waiting for the new logging code to
 117          * be available.
 118          *
 119          * It's explicit, don't have to wait for the user, unless there's
 120          * already a reason to wait.
 121          */
 122         if (!F_ISSET(sp, SC_SCR_EXWROTE))
 123                 F_SET(sp, SC_EX_WAIT_NO);
 124
 125         if (F_ISSET(sp, SC_EX_GLOBAL)) {
 126                 /*
 127                  * When the vi screen(s) exit, we don't want to lose our hold
 128                  * on this screen or this file, otherwise we're going to fail
 129                  * fairly spectacularly.
 130                  */
 131                 ++sp->refcnt;
 132                 ++sp->ep->refcnt;
 133
 134                 /*
 135                  * Fake up a screen pointer -- vi doesn't get to change our
 136                  * underlying file, regardless.
 137                  */
 138                 tsp = sp;
 139                 if (vi(&tsp))
 140                         return (1);
 141
 142                 /*
 143                  * !!!
 144                  * Historically, if the user exited the vi screen(s) using an
 145                  * ex quit command (e.g. :wq, :q) ex/vi exited, it was only if
 146                  * they exited vi using the Q command that ex continued.  Some
 147                  * early versions of nvi continued in ex regardless, but users
 148                  * didn't like the semantic.
 149                  *
 150                  * Reset the screen.
 151                  */
 152                 if (ex_init(sp))
 153                         return (1);
 154
 155                 /* Move out of the vi screen. */
 156                 (void)ex_puts(sp, "\n");
 157         } else {
 158                 F_CLR(sp, SC_EX | SC_SCR_EX);
 159                 F_SET(sp, SC_VI);
 160         }
 161         return (0);
 162 }