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 */
32int
33ex_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
104nopush:	/*
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