minix/external/bsd/nvi/dist/ex/ex_util.c

222 lines
4.6 KiB
C
Raw Normal View History

/* $NetBSD: ex_util.c,v 1.2 2013/11/22 15:52:05 christos Exp $ */
/*-
* Copyright (c) 1993, 1994
* The Regents of the University of California. All rights reserved.
* Copyright (c) 1993, 1994, 1995, 1996
* Keith Bostic. All rights reserved.
*
* See the LICENSE file for redistribution information.
*/
#include "config.h"
#ifndef lint
static const char sccsid[] = "Id: ex_util.c,v 10.32 2001/06/25 15:19:21 skimo Exp (Berkeley) Date: 2001/06/25 15:19:21 ";
#endif /* not lint */
#include <sys/types.h>
#include <sys/queue.h>
#include <sys/stat.h>
#include <bitstring.h>
#include <errno.h>
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "../common/common.h"
/*
* ex_cinit --
* Create an EX command structure.
*
* PUBLIC: void ex_cinit __P((SCR *, EXCMD *, int, int, db_recno_t, db_recno_t, int));
*/
void
ex_cinit(SCR *sp, EXCMD *cmdp, int cmd_id, int naddr, db_recno_t lno1, db_recno_t lno2, int force)
{
memset(cmdp, 0, sizeof(EXCMD));
cmdp->cmd = &cmds[cmd_id];
cmdp->addrcnt = naddr;
cmdp->addr1.lno = lno1;
cmdp->addr2.lno = lno2;
cmdp->addr1.cno = cmdp->addr2.cno = 1;
if (force)
cmdp->iflags |= E_C_FORCE;
(void)argv_init(sp, cmdp);
}
/*
* ex_getline --
* Return a line from the file.
*
* PUBLIC: int ex_getline __P((SCR *, FILE *, size_t *));
*/
int
ex_getline(SCR *sp, FILE *fp, size_t *lenp)
{
EX_PRIVATE *exp;
size_t off;
int ch;
char *p;
exp = EXP(sp);
for (errno = 0, off = 0, p = exp->ibp;;) {
if (off >= exp->ibp_len) {
BINC_RETC(sp, exp->ibp, exp->ibp_len, off + 1);
p = exp->ibp + off;
}
if ((ch = getc(fp)) == EOF && !feof(fp)) {
if (errno == EINTR) {
errno = 0;
clearerr(fp);
continue;
}
return (1);
}
if (ch == EOF || ch == '\n') {
if (ch == EOF && !off)
return (1);
*lenp = off;
return (0);
}
*p++ = ch;
++off;
}
/* NOTREACHED */
}
/*
* ex_ncheck --
* Check for more files to edit.
*
* PUBLIC: int ex_ncheck __P((SCR *, int));
*/
int
ex_ncheck(SCR *sp, int force)
{
char **ap;
/*
* !!!
* Historic practice: quit! or two quit's done in succession
* (where ZZ counts as a quit) didn't check for other files.
*/
if (!force && sp->ccnt != sp->q_ccnt + 1 &&
sp->cargv != NULL && sp->cargv[1] != NULL) {
sp->q_ccnt = sp->ccnt;
for (ap = sp->cargv + 1; *ap != NULL; ++ap);
msgq(sp, M_ERR,
"167|%zd more files to edit", (ap - sp->cargv) - 1);
return (1);
}
return (0);
}
/*
* ex_init --
* Init the screen for ex.
*
* PUBLIC: int ex_init __P((SCR *));
*/
int
ex_init(SCR *sp)
{
GS *gp;
gp = sp->gp;
if (gp->scr_screen(sp, SC_EX))
return (1);
(void)gp->scr_attr(sp, SA_ALTERNATE, 0);
sp->rows = O_VAL(sp, O_LINES);
sp->cols = O_VAL(sp, O_COLUMNS);
F_CLR(sp, SC_VI);
F_SET(sp, SC_EX | SC_SCR_EX);
return (0);
}
/*
* ex_emsg --
* Display a few common ex and vi error messages.
*
* PUBLIC: void ex_wemsg __P((SCR *, const CHAR_T *, exm_t));
*/
void
ex_wemsg(SCR* sp, const CHAR_T *p, exm_t which)
{
const char *np;
size_t nlen;
if (p) INT2CHAR(sp, p, STRLEN(p), np, nlen);
else np = NULL;
ex_emsg(sp, np, which);
}
/*
* ex_emsg --
* Display a few common ex and vi error messages.
*
* PUBLIC: void ex_emsg __P((SCR *, const char *, exm_t));
*/
void
ex_emsg(SCR *sp, const char *p, exm_t which)
{
switch (which) {
case EXM_EMPTYBUF:
msgq(sp, M_ERR, "168|Buffer %s is empty", p);
break;
case EXM_FILECOUNT:
msgq_str(sp, M_ERR, p,
"144|%s: expanded into too many file names");
break;
case EXM_LOCKED:
msgq(sp, M_ERR,
"Command failed, buffer is locked");
break;
case EXM_NOCANON:
msgq(sp, M_ERR,
"283|The %s command requires the ex terminal interface", p);
break;
case EXM_NOCANON_F:
msgq(sp, M_ERR,
"272|That form of %s requires the ex terminal interface",
p);
break;
case EXM_NOFILEYET:
if (p == NULL)
msgq(sp, M_ERR,
"274|Command failed, no file read in yet.");
else
msgq(sp, M_ERR,
"173|The %s command requires that a file have already been read in", p);
break;
case EXM_NOPREVBUF:
msgq(sp, M_ERR, "171|No previous buffer to execute");
break;
case EXM_NOPREVRE:
msgq(sp, M_ERR, "172|No previous regular expression");
break;
case EXM_NOSUSPEND:
msgq(sp, M_ERR, "230|This screen may not be suspended");
break;
case EXM_SECURE:
msgq(sp, M_ERR,
"290|The %s command is not supported when the secure edit option is set", p);
break;
case EXM_SECURE_F:
msgq(sp, M_ERR,
"284|That form of %s is not supported when the secure edit option is set", p);
break;
case EXM_USAGE:
msgq(sp, M_ERR, "174|Usage: %s", p);
break;
}
}