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
ex_visual(SCR * sp,EXCMD * cmdp)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 }
160