1 /* $OpenBSD: ex_at.c,v 1.14 2016/05/27 09:18:12 martijn Exp $ */
2
3 /*-
4 * Copyright (c) 1992, 1993, 1994
5 * The Regents of the University of California. All rights reserved.
6 * Copyright (c) 1992, 1993, 1994, 1995, 1996
7 * Keith Bostic. All rights reserved.
8 *
9 * See the LICENSE file for redistribution information.
10 */
11
12 #include "config.h"
13
14 #include <sys/types.h>
15 #include <sys/queue.h>
16
17 #include <bitstring.h>
18 #include <ctype.h>
19 #include <limits.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23
24 #include "../common/common.h"
25
26 /*
27 * ex_at -- :@[@ | buffer]
28 * :*[* | buffer]
29 *
30 * Execute the contents of the buffer.
31 *
32 * PUBLIC: int ex_at(SCR *, EXCMD *);
33 */
34 int
ex_at(SCR * sp,EXCMD * cmdp)35 ex_at(SCR *sp, EXCMD *cmdp)
36 {
37 CB *cbp;
38 CHAR_T name;
39 EXCMD *ecp;
40 RANGE *rp;
41 TEXT *tp;
42 size_t len;
43 char *p;
44
45 /*
46 * !!!
47 * Historically, [@*]<carriage-return> and [@*][@*] executed the most
48 * recently executed buffer in ex mode.
49 */
50 name = FL_ISSET(cmdp->iflags, E_C_BUFFER) ? cmdp->buffer : '@';
51 if (name == '@' || name == '*') {
52 if (!F_ISSET(sp, SC_AT_SET)) {
53 ex_emsg(sp, NULL, EXM_NOPREVBUF);
54 return (1);
55 }
56 name = sp->at_lbuf;
57 }
58 sp->at_lbuf = name;
59 F_SET(sp, SC_AT_SET);
60
61 CBNAME(sp, cbp, name);
62 if (cbp == NULL) {
63 ex_emsg(sp, KEY_NAME(sp, name), EXM_EMPTYBUF);
64 return (1);
65 }
66
67 /*
68 * !!!
69 * Historically the @ command took a range of lines, and the @ buffer
70 * was executed once per line. The historic vi could be trashed by
71 * this because it didn't notice if the underlying file changed, or,
72 * for that matter, if there were no more lines on which to operate.
73 * For example, take a 10 line file, load "%delete" into a buffer,
74 * and enter :8,10@<buffer>.
75 *
76 * The solution is a bit tricky. If the user specifies a range, take
77 * the same approach as for global commands, and discard the command
78 * if exit or switch to a new file/screen. If the user doesn't specify
79 * the range, continue to execute after a file/screen switch, which
80 * means @ buffers are still useful in a multi-screen environment.
81 */
82 CALLOC_RET(sp, ecp, 1, sizeof(EXCMD));
83 TAILQ_INIT(&ecp->rq);
84 CALLOC_RET(sp, rp, 1, sizeof(RANGE));
85 rp->start = cmdp->addr1.lno;
86 if (F_ISSET(cmdp, E_ADDR_DEF)) {
87 rp->stop = rp->start;
88 FL_SET(ecp->agv_flags, AGV_AT_NORANGE);
89 } else {
90 rp->stop = cmdp->addr2.lno;
91 FL_SET(ecp->agv_flags, AGV_AT);
92 }
93 TAILQ_INSERT_HEAD(&ecp->rq, rp, q);
94
95 /*
96 * Buffers executed in ex mode or from the colon command line in vi
97 * were ex commands. We can't push it on the terminal queue, since
98 * it has to be executed immediately, and we may be in the middle of
99 * an ex command already. Push the command on the ex command stack.
100 * Build two copies of the command. We need two copies because the
101 * ex parser may step on the command string when it's parsing it.
102 */
103 len = 0;
104 TAILQ_FOREACH_REVERSE(tp, &cbp->textq, _texth, q) {
105 len += tp->len + 1;
106 }
107
108 MALLOC_RET(sp, ecp->cp, len * 2);
109 ecp->o_cp = ecp->cp;
110 ecp->o_clen = len;
111 ecp->cp[len] = '\0';
112
113 /* Copy the buffer into the command space. */
114 p = ecp->cp + len;
115 TAILQ_FOREACH_REVERSE(tp, &cbp->textq, _texth, q) {
116 memcpy(p, tp->lb, tp->len);
117 p += tp->len;
118 *p++ = '\n';
119 }
120
121 LIST_INSERT_HEAD(&sp->gp->ecq, ecp, q);
122 return (0);
123 }
124