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