2 * Copyright (c) 1991, 1993, 1994
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1991, 1993, 1994, 1995, 1996
5 * Keith Bostic. All rights reserved.
7 * See the LICENSE file for redistribution information.
13 static const char sccsid
[] = "$Id: ex_args.c,v 10.17 2000/07/14 14:29:19 skimo Exp $ (Berkeley) $Date: 2000/07/14 14:29:19 $";
16 #include <sys/types.h>
17 #include <sys/queue.h>
20 #include <bitstring.h>
27 #include "../common/common.h"
30 static int ex_N_next
__P((SCR
*, EXCMD
*));
33 * ex_next -- :next [+cmd] [files]
34 * Edit the next file, optionally setting the list of files.
37 * The :next command behaved differently from the :rewind command in
38 * historic vi. See nvi/docs/autowrite for details, but the basic
39 * idea was that it ignored the force flag if the autowrite flag was
40 * set. This implementation handles them all identically.
42 * PUBLIC: int ex_next __P((SCR *, EXCMD *));
58 /* Check for file to move to. */
59 if (cmdp
->argc
== 0 && (sp
->cargv
== NULL
|| sp
->cargv
[1] == NULL
)) {
60 msgq(sp
, M_ERR
, "111|No more files to edit");
64 if (F_ISSET(cmdp
, E_NEWSCREEN
)) {
65 /* By default, edit the next file in the old argument list. */
66 if (cmdp
->argc
== 0) {
67 CHAR2INT(sp
, sp
->cargv
[1], strlen(sp
->cargv
[1]) + 1,
69 if (argv_exp0(sp
, cmdp
, wp
, wlen
- 1))
71 return (ex_edit(sp
, cmdp
));
73 return (ex_N_next(sp
, cmdp
));
76 /* Check modification. */
78 FL_ISSET(cmdp
->iflags
, E_C_FORCE
), FS_ALL
| FS_POSSIBLE
))
81 /* Any arguments are a replacement file list. */
83 /* Free the current list. */
84 if (!F_ISSET(sp
, SC_ARGNOFREE
) && sp
->argv
!= NULL
) {
85 for (ap
= sp
->argv
; *ap
!= NULL
; ++ap
)
89 F_CLR(sp
, SC_ARGNOFREE
| SC_ARGRECOVER
);
92 /* Create a new list. */
94 sp
->argv
, char **, cmdp
->argc
+ 1, sizeof(char *));
96 argv
= cmdp
->argv
; argv
[0]->len
!= 0; ++ap
, ++argv
) {
97 INT2CHAR(sp
, argv
[0]->bp
, argv
[0]->len
, np
, nlen
);
98 if ((*ap
= v_strdup(sp
, np
, nlen
)) == NULL
)
103 /* Switch to the first file. */
104 sp
->cargv
= sp
->argv
;
105 if ((frp
= file_add(sp
, *sp
->cargv
)) == NULL
)
109 /* Display a file count with the welcome message. */
110 F_SET(sp
, SC_STATUS_CNT
);
112 if ((frp
= file_add(sp
, sp
->cargv
[1])) == NULL
)
114 if (F_ISSET(sp
, SC_ARGRECOVER
))
115 F_SET(frp
, FR_RECOVER
);
119 if (file_init(sp
, frp
, NULL
, FS_SETALT
|
120 (FL_ISSET(cmdp
->iflags
, E_C_FORCE
) ? FS_FORCE
: 0)))
125 F_SET(sp
, SC_FSWITCH
);
131 * New screen version of ex_next.
143 /* Get a new screen. */
144 if (screen_init(sp
->gp
, sp
, &new))
146 if (vs_split(sp
, new, 0)) {
147 (void)screen_end(new);
151 /* Get a backing file. */
152 INT2CHAR(sp
, cmdp
->argv
[0]->bp
, cmdp
->argv
[0]->len
+ 1, np
, nlen
);
153 if ((frp
= file_add(new, np
)) == NULL
||
154 file_init(new, frp
, NULL
,
155 (FL_ISSET(cmdp
->iflags
, E_C_FORCE
) ? FS_FORCE
: 0))) {
156 (void)vs_discard(new, NULL
);
157 (void)screen_end(new);
161 /* The arguments are a replacement file list. */
162 new->cargv
= new->argv
= ex_buildargv(sp
, cmdp
, NULL
);
164 /* Display a file count with the welcome message. */
165 F_SET(new, SC_STATUS_CNT
);
167 /* Set up the switch. */
169 F_SET(sp
, SC_SSWITCH
);
176 * Edit the previous file.
178 * PUBLIC: int ex_prev __P((SCR *, EXCMD *));
189 if (sp
->cargv
== sp
->argv
) {
190 msgq(sp
, M_ERR
, "112|No previous files to edit");
194 if (F_ISSET(cmdp
, E_NEWSCREEN
)) {
195 CHAR2INT(sp
, sp
->cargv
[-1], strlen(sp
->cargv
[-1]) + 1,
197 if (argv_exp0(sp
, cmdp
, wp
, wlen
- 1))
199 return (ex_edit(sp
, cmdp
));
203 FL_ISSET(cmdp
->iflags
, E_C_FORCE
), FS_ALL
| FS_POSSIBLE
))
206 if ((frp
= file_add(sp
, sp
->cargv
[-1])) == NULL
)
209 if (file_init(sp
, frp
, NULL
, FS_SETALT
|
210 (FL_ISSET(cmdp
->iflags
, E_C_FORCE
) ? FS_FORCE
: 0)))
214 F_SET(sp
, SC_FSWITCH
);
220 * Re-edit the list of files.
223 * Historic practice was that all files would start editing at the beginning
224 * of the file. We don't get this right because we may have multiple screens
225 * and we can't clear the FR_CURSORSET bit for a single screen. I don't see
226 * anyone noticing, but if they do, we'll have to put information into the SCR
227 * structure so we can keep track of it.
229 * PUBLIC: int ex_rew __P((SCR *, EXCMD *));
240 * Historic practice -- you can rewind to the current file.
242 if (sp
->argv
== NULL
) {
243 msgq(sp
, M_ERR
, "113|No previous files to rewind");
248 FL_ISSET(cmdp
->iflags
, E_C_FORCE
), FS_ALL
| FS_POSSIBLE
))
251 /* Switch to the first one. */
252 sp
->cargv
= sp
->argv
;
253 if ((frp
= file_add(sp
, *sp
->cargv
)) == NULL
)
255 if (file_init(sp
, frp
, NULL
, FS_SETALT
|
256 (FL_ISSET(cmdp
->iflags
, E_C_FORCE
) ? FS_FORCE
: 0)))
259 /* Switch and display a file count with the welcome message. */
260 F_SET(sp
, SC_FSWITCH
| SC_STATUS_CNT
);
267 * Display the list of files.
269 * PUBLIC: int ex_args __P((SCR *, EXCMD *));
277 int cnt
, col
, len
, sep
;
280 if (sp
->argv
== NULL
) {
281 (void)msgq(sp
, M_ERR
, "114|No file list to display");
287 for (cnt
= 1, ap
= sp
->argv
; *ap
!= NULL
; ++ap
) {
288 col
+= len
= strlen(*ap
) + sep
+ (ap
== sp
->cargv
? 2 : 0);
289 if (col
>= sp
->cols
- 1) {
292 (void)ex_puts(sp
, "\n");
293 } else if (cnt
!= 1) {
295 (void)ex_puts(sp
, " ");
299 (void)ex_printf(sp
, "%s%s%s", ap
== sp
->cargv
? "[" : "",
300 *ap
, ap
== sp
->cargv
? "]" : "");
304 (void)ex_puts(sp
, "\n");
310 * Build a new file argument list.
312 * PUBLIC: char **ex_buildargv __P((SCR *, EXCMD *, char *));
315 ex_buildargv(sp
, cmdp
, name
)
326 argc
= cmdp
== NULL
? 1 : cmdp
->argc
;
327 CALLOC(sp
, s_argv
, char **, argc
+ 1, sizeof(char *));
328 if ((ap
= s_argv
) == NULL
)
332 if ((*ap
= v_strdup(sp
, name
, strlen(name
))) == NULL
)
336 for (argv
= cmdp
->argv
; argv
[0]->len
!= 0; ++ap
, ++argv
) {
337 INT2CHAR(sp
, cmdp
->argv
[0]->bp
, cmdp
->argv
[0]->len
,
339 if ((*ap
= v_strdup(sp
, np
, nlen
)) == NULL
)