nvi/ex/ex_at.c

/*-
 * Copyright (c) 1992, 1993, 1994
 *      The Regents of the University of California.  All rights reserved.
 * Copyright (c) 1992, 1993, 1994, 1995, 1996
 *      Keith Bostic.  All rights reserved.
 *
 * See the LICENSE file for redistribution information.
 */

#include "config.h"

#ifndef lint
static const char sccsid[] = "$Id: ex_at.c,v 10.16 2001/06/25 15:19:14 skimo Exp $";
#endif /* not lint */

#include <sys/types.h>
#include <sys/queue.h>
#include <sys/time.h>

#include <bitstring.h>
#include <ctype.h>
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "../common/common.h"

/*
 * ex_at -- :@[@ | buffer]
 *          :*[* | buffer]
 *
 *      Execute the contents of the buffer.
 *
 * PUBLIC: int ex_at __P((SCR *, EXCMD *));
 */
int
ex_at(SCR *sp, EXCMD *cmdp)
{
        CB *cbp;
        CHAR_T name;
        EXCMD *ecp;
        RANGE *rp;
        TEXT *tp;
        size_t len = 0;
        CHAR_T *p;

        /*
         * !!!
         * Historically, [@*]<carriage-return> and [@*][@*] executed the most
         * recently executed buffer in ex mode.
         */
        name = FL_ISSET(cmdp->iflags, E_C_BUFFER) ? cmdp->buffer : '@';
        if (name == '@' || name == '*') {
                if (!F_ISSET(sp, SC_AT_SET)) {
                        ex_emsg(sp, NULL, EXM_NOPREVBUF);
                        return (1);
                }
                name = sp->at_lbuf;
        }
        sp->at_lbuf = name;
        F_SET(sp, SC_AT_SET);

        CBNAME(sp, cbp, name);
        if (cbp == NULL) {
                ex_emsg(sp, KEY_NAME(sp, name), EXM_EMPTYBUF);
                return (1);
        }

        /*
         * !!!
         * Historically the @ command took a range of lines, and the @ buffer
         * was executed once per line.  The historic vi could be trashed by
         * this because it didn't notice if the underlying file changed, or,
         * for that matter, if there were no more lines on which to operate.
         * For example, take a 10 line file, load "%delete" into a buffer,
         * and enter :8,10@<buffer>.
         *
         * The solution is a bit tricky.  If the user specifies a range, take
         * the same approach as for global commands, and discard the command
         * if exit or switch to a new file/screen.  If the user doesn't specify
         * the  range, continue to execute after a file/screen switch, which
         * means @ buffers are still useful in a multi-screen environment.
         */
        CALLOC_RET(sp, ecp, EXCMD *, 1, sizeof(EXCMD));
        TAILQ_INIT(ecp->rq);
        CALLOC_RET(sp, rp, RANGE *, 1, sizeof(RANGE));
        rp->start = cmdp->addr1.lno;
        if (F_ISSET(cmdp, E_ADDR_DEF)) {
                rp->stop = rp->start;
                FL_SET(ecp->agv_flags, AGV_AT_NORANGE);
        } else {
                rp->stop = cmdp->addr2.lno;
                FL_SET(ecp->agv_flags, AGV_AT);
        }
        TAILQ_INSERT_HEAD(ecp->rq, rp, q);

        /*
         * Buffers executed in ex mode or from the colon command line in vi
         * were ex commands.  We can't push it on the terminal queue, since
         * it has to be executed immediately, and we may be in the middle of
         * an ex command already.  Push the command on the ex command stack.
         * Build two copies of the command.  We need two copies because the
         * ex parser may step on the command string when it's parsing it.
         */
        TAILQ_FOREACH_REVERSE(tp, cbp->textq, _texth, q)
                len += tp->len + 1;

        MALLOC_RET(sp, ecp->cp, CHAR_T *, len * 2 * sizeof(CHAR_T));
        ecp->o_cp = ecp->cp;
        ecp->o_clen = len;
        ecp->cp[len] = '\0';

        /* Copy the buffer into the command space. */
        p = ecp->cp + len;
        TAILQ_FOREACH_REVERSE(tp, cbp->textq, _texth, q) {
                MEMCPY(p, tp->lb, tp->len);
                p += tp->len;
                *p++ = '\n';
        }

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