Import nvi2 version 2.1.3 to vendor branch
[dragonfly.git] / contrib / nvi2 / ex / ex_bang.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 #ifndef lint
13 static const char sccsid[] = "$Id: ex_bang.c,v 10.36 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 <errno.h>
22 #include <limits.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <unistd.h>
27
28 #include "../common/common.h"
29 #include "../vi/vi.h"
30
31 /*
32  * ex_bang -- :[line [,line]] ! command
33  *
34  * Pass the rest of the line after the ! character to the program named by
35  * the O_SHELL option.
36  *
37  * Historical vi did NOT do shell expansion on the arguments before passing
38  * them, only file name expansion.  This means that the O_SHELL program got
39  * "$t" as an argument if that is what the user entered.  Also, there's a
40  * special expansion done for the bang command.  Any exclamation points in
41  * the user's argument are replaced by the last, expanded ! command.
42  *
43  * There's some fairly amazing slop in this routine to make the different
44  * ways of getting here display the right things.  It took a long time to
45  * get it right (wrong?), so be careful.
46  *
47  * PUBLIC: int ex_bang(SCR *, EXCMD *);
48  */
49 int
50 ex_bang(SCR *sp, EXCMD *cmdp)
51 {
52         enum filtertype ftype;
53         ARGS *ap;
54         EX_PRIVATE *exp;
55         MARK rm;
56         recno_t lno;
57         int rval;
58         const char *msg;
59         char *np;
60         size_t nlen;
61
62         ap = cmdp->argv[0];
63         if (ap->len == 0) {
64                 ex_emsg(sp, cmdp->cmd->usage, EXM_USAGE);
65                 return (1);
66         }
67
68         /* Set the "last bang command" remembered value. */
69         exp = EXP(sp);
70         if (exp->lastbcomm != NULL)
71                 free(exp->lastbcomm);
72         if ((exp->lastbcomm = v_wstrdup(sp, ap->bp, ap->len)) == NULL) {
73                 msgq(sp, M_SYSERR, NULL);
74                 return (1);
75         }
76
77         /*
78          * If the command was modified by the expansion, it was historically
79          * redisplayed.
80          */
81         if (F_ISSET(cmdp, E_MODIFY) && !F_ISSET(sp, SC_EX_SILENT)) {
82                 /*
83                  * Display the command if modified.  Historic ex/vi displayed
84                  * the command if it was modified due to file name and/or bang
85                  * expansion.  If piping lines in vi, it would be immediately
86                  * overwritten by any error or line change reporting.
87                  */
88                 if (F_ISSET(sp, SC_VI))
89                         vs_update(sp, "!", ap->bp);
90                 else {
91                         (void)ex_printf(sp, "!"WS"\n", ap->bp);
92                         (void)ex_fflush(sp);
93                 }
94         }
95
96         /*
97          * If no addresses were specified, run the command.  If there's an
98          * underlying file, it's been modified and autowrite is set, write
99          * the file back.  If the file has been modified, autowrite is not
100          * set and the warn option is set, tell the user about the file.
101          */
102         if (cmdp->addrcnt == 0) {
103                 msg = NULL;
104                 if (sp->ep != NULL && F_ISSET(sp->ep, F_MODIFIED))
105                         if (O_ISSET(sp, O_AUTOWRITE)) {
106                                 if (file_aw(sp, FS_ALL))
107                                         return (0);
108                         } else if (O_ISSET(sp, O_WARN) &&
109                             !F_ISSET(sp, SC_EX_SILENT))
110                                 msg = msg_cat(sp,
111                                     "303|File modified since last write.",
112                                     NULL);
113
114                 /* If we're still in a vi screen, move out explicitly. */
115                 INT2CHAR(sp, ap->bp, ap->len+1, np, nlen);
116                 (void)ex_exec_proc(sp,
117                     cmdp, np, msg, !F_ISSET(sp, SC_EX | SC_SCR_EXWROTE));
118         }
119
120         /*
121          * If addresses were specified, pipe lines from the file through the
122          * command.
123          *
124          * Historically, vi lines were replaced by both the stdout and stderr
125          * lines of the command, but ex lines by only the stdout lines.  This
126          * makes no sense to me, so nvi makes it consistent for both, and
127          * matches vi's historic behavior.
128          */
129         else {
130                 NEEDFILE(sp, cmdp);
131
132                 /* Autoprint is set historically, even if the command fails. */
133                 F_SET(cmdp, E_AUTOPRINT);
134
135                 /*
136                  * !!!
137                  * Historical vi permitted "!!" in an empty file.  When this
138                  * happens, we arrive here with two addresses of 1,1 and a
139                  * bad attitude.  The simple solution is to turn it into a
140                  * FILTER_READ operation, with the exception that stdin isn't
141                  * opened for the utility, and the cursor position isn't the
142                  * same.  The only historic glitch (I think) is that we don't
143                  * put an empty line into the default cut buffer, as historic
144                  * vi did.  Imagine, if you can, my disappointment.
145                  */
146                 ftype = FILTER_BANG;
147                 if (cmdp->addr1.lno == 1 && cmdp->addr2.lno == 1) {
148                         if (db_last(sp, &lno))
149                                 return (1);
150                         if (lno == 0) {
151                                 cmdp->addr1.lno = cmdp->addr2.lno = 0;
152                                 ftype = FILTER_RBANG;
153                         }
154                 }
155                 rval = ex_filter(sp, cmdp,
156                     &cmdp->addr1, &cmdp->addr2, &rm, ap->bp, ftype);
157
158                 /*
159                  * If in vi mode, move to the first nonblank.
160                  *
161                  * !!!
162                  * Historic vi wasn't consistent in this area -- if you used
163                  * a forward motion it moved to the first nonblank, but if you
164                  * did a backward motion it didn't.  And, if you followed a
165                  * backward motion with a forward motion, it wouldn't move to
166                  * the nonblank for either.  Going to the nonblank generally
167                  * seems more useful and consistent, so we do it.
168                  */
169                 sp->lno = rm.lno;
170                 if (F_ISSET(sp, SC_VI)) {
171                         sp->cno = 0;
172                         (void)nonblank(sp, sp->lno, &sp->cno);
173                 } else
174                         sp->cno = rm.cno;
175         }
176
177         /* Ex terminates with a bang, even if the command fails. */
178         if (!F_ISSET(sp, SC_VI) && !F_ISSET(sp, SC_EX_SILENT))
179                 (void)ex_puts(sp, "!\n");
180
181         /*
182          * XXX
183          * The ! commands never return an error, so that autoprint always
184          * happens in the ex parser.
185          */
186         return (0);
187 }