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