1 /*-
2 * Copyright (c) 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_stop.c,v 10.11 2001/06/25 15:19:20 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 <string.h>
25 #include <unistd.h>
26
27 #include "../common/common.h"
28
29 /*
30 * ex_stop -- :stop[!]
31 * :suspend[!]
32 * Suspend execution.
33 *
34 * PUBLIC: int ex_stop(SCR *, EXCMD *);
35 */
36 int
ex_stop(SCR * sp,EXCMD * cmdp)37 ex_stop(SCR *sp, EXCMD *cmdp)
38 {
39 int allowed;
40
41 /* For some strange reason, the force flag turns off autowrite. */
42 if (!FL_ISSET(cmdp->iflags, E_C_FORCE) && file_aw(sp, FS_ALL))
43 return (1);
44
45 if (sp->gp->scr_suspend(sp, &allowed))
46 return (1);
47 if (!allowed)
48 ex_emsg(sp, NULL, EXM_NOSUSPEND);
49 return (0);
50 }
51