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
13 static 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 */
36 void
ex_cinit(SCR * sp,EXCMD * cmdp,int cmd_id,int naddr,recno_t lno1,recno_t lno2,int force)37 ex_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 */
56 int
ex_getline(SCR * sp,FILE * fp,size_t * lenp)57 ex_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 */
96 int
ex_ncheck(SCR * sp,int force)97 ex_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 */
125 int
ex_init(SCR * sp)126 ex_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 */
150 void
ex_wemsg(SCR * sp,CHAR_T * p,exm_t which)151 ex_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 */
167 void
ex_emsg(SCR * sp,char * p,exm_t which)168 ex_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