]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/nvi/ex/ex_visual.c
Update nvi to 2.2.0
[FreeBSD/FreeBSD.git] / 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 }