1/*-
2 * Copyright (c) 1993, 1994
3 *	The Regents of the University of California.  All rights reserved.
4 * Copyright (c) 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
13static const char sccsid[] = "$Id: ex_util.c,v 10.32 2001/06/25 15:19:21 skimo Exp $";
14#endif /* not lint */
15
16#include <sys/types.h>
17#include <sys/queue.h>
18#include <sys/stat.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
30/*
31 * ex_cinit --
32 *	Create an EX command structure.
33 *
34 * PUBLIC: void ex_cinit __P((SCR *, EXCMD *, int, int, recno_t, recno_t, int));
35 */
36void
37ex_cinit(SCR *sp, EXCMD *cmdp, int cmd_id, int naddr, recno_t lno1, recno_t lno2, int force)
38{
39	memset(cmdp, 0, sizeof(EXCMD));
40	cmdp->cmd = &cmds[cmd_id];
41	cmdp->addrcnt = naddr;
42	cmdp->addr1.lno = lno1;
43	cmdp->addr2.lno = lno2;
44	cmdp->addr1.cno = cmdp->addr2.cno = 1;
45	if (force)
46		cmdp->iflags |= E_C_FORCE;
47	(void)argv_init(sp, cmdp);
48}
49
50/*
51 * ex_getline --
52 *	Return a line from the file.
53 *
54 * PUBLIC: int ex_getline __P((SCR *, FILE *, size_t *));
55 */
56int
57ex_getline(SCR *sp, FILE *fp, size_t *lenp)
58{
59	EX_PRIVATE *exp;
60	size_t off;
61	int ch;
62	char *p;
63
64	exp = EXP(sp);
65	for (errno = 0, off = 0, p = exp->ibp;;) {
66		if (off >= exp->ibp_len) {
67			BINC_RETC(sp, exp->ibp, exp->ibp_len, off + 1);
68			p = exp->ibp + off;
69		}
70		if ((ch = getc(fp)) == EOF && !feof(fp)) {
71			if (errno == EINTR) {
72				errno = 0;
73				clearerr(fp);
74				continue;
75			}
76			return (1);
77		}
78		if (ch == EOF || ch == '\n') {
79			if (ch == EOF && !off)
80				return (1);
81			*lenp = off;
82			return (0);
83		}
84		*p++ = ch;
85		++off;
86	}
87	/* NOTREACHED */
88}
89
90/*
91 * ex_ncheck --
92 *	Check for more files to edit.
93 *
94 * PUBLIC: int ex_ncheck __P((SCR *, int));
95 */
96int
97ex_ncheck(SCR *sp, int force)
98{
99	char **ap;
100
101	/*
102	 * !!!
103	 * Historic practice: quit! or two quit's done in succession
104	 * (where ZZ counts as a quit) didn't check for other files.
105	 */
106	if (!force && sp->ccnt != sp->q_ccnt + 1 &&
107	    sp->cargv != NULL && sp->cargv[1] != NULL) {
108		sp->q_ccnt = sp->ccnt;
109
110		for (ap = sp->cargv + 1; *ap != NULL; ++ap);
111		msgq(sp, M_ERR,
112		    "167|%d more files to edit", (int)(ap - sp->cargv) - 1);
113
114		return (1);
115	}
116	return (0);
117}
118
119/*
120 * ex_init --
121 *	Init the screen for ex.
122 *
123 * PUBLIC: int ex_init __P((SCR *));
124 */
125int
126ex_init(SCR *sp)
127{
128	GS *gp;
129
130	gp = sp->gp;
131
132	if (gp->scr_screen(sp, SC_EX))
133		return (1);
134	(void)gp->scr_attr(sp, SA_ALTERNATE, 0);
135
136	sp->rows = O_VAL(sp, O_LINES);
137	sp->cols = O_VAL(sp, O_COLUMNS);
138
139	F_CLR(sp, SC_VI);
140	F_SET(sp, SC_EX | SC_SCR_EX);
141	return (0);
142}
143
144/*
145 * ex_emsg --
146 *	Display a few common ex and vi error messages.
147 *
148 * PUBLIC: void ex_wemsg __P((SCR *, CHAR_T *, exm_t));
149 */
150void
151ex_wemsg(SCR* sp, CHAR_T *p, exm_t which)
152{
153	char *np;
154	size_t nlen;
155
156	if (p) INT2CHAR(sp, p, STRLEN(p), np, nlen);
157	else np = NULL;
158	ex_emsg(sp, np, which);
159}
160
161/*
162 * ex_emsg --
163 *	Display a few common ex and vi error messages.
164 *
165 * PUBLIC: void ex_emsg __P((SCR *, char *, exm_t));
166 */
167void
168ex_emsg(SCR *sp, char *p, exm_t which)
169{
170	switch (which) {
171	case EXM_EMPTYBUF:
172		msgq(sp, M_ERR, "168|Buffer %s is empty", p);
173		break;
174	case EXM_FILECOUNT:
175		 msgq_str(sp, M_ERR, p,
176		     "144|%s: expanded into too many file names");
177		break;
178	case EXM_NOCANON:
179		msgq(sp, M_ERR,
180		    "283|The %s command requires the ex terminal interface", p);
181		break;
182	case EXM_NOCANON_F:
183		msgq(sp, M_ERR,
184		    "272|That form of %s requires the ex terminal interface",
185		    p);
186		break;
187	case EXM_NOFILEYET:
188		if (p == NULL)
189			msgq(sp, M_ERR,
190			    "274|Command failed, no file read in yet.");
191		else
192			msgq(sp, M_ERR,
193	"173|The %s command requires that a file have already been read in", p);
194		break;
195	case EXM_NOPREVBUF:
196		msgq(sp, M_ERR, "171|No previous buffer to execute");
197		break;
198	case EXM_NOPREVRE:
199		msgq(sp, M_ERR, "172|No previous regular expression");
200		break;
201	case EXM_NOSUSPEND:
202		msgq(sp, M_ERR, "230|This screen may not be suspended");
203		break;
204	case EXM_SECURE:
205		msgq(sp, M_ERR,
206"290|The %s command is not supported when the secure edit option is set", p);
207		break;
208	case EXM_SECURE_F:
209		msgq(sp, M_ERR,
210"284|That form of %s is not supported when the secure edit option is set", p);
211		break;
212	case EXM_USAGE:
213		msgq(sp, M_ERR, "174|Usage: %s", p);
214		break;
215	}
216}
217