freebsd-skq/contrib/nvi/vi/v_util.c
peter 59cc89c2c2 Import of nvi-1.79, minus a few bits that we dont need (eg: postscript
files, curses, db, regex etc that we already have).  The other glue will
follow shortly.

Obtained from: Keith Bostic <bostic@bostic.com>
1996-11-01 06:45:43 +00:00

181 lines
3.1 KiB
C

/*-
* Copyright (c) 1992, 1993, 1994
* The Regents of the University of California. All rights reserved.
* Copyright (c) 1992, 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[] = "@(#)v_util.c 10.11 (Berkeley) 6/30/96";
#endif /* not lint */
#include <sys/types.h>
#include <sys/queue.h>
#include <sys/time.h>
#include <bitstring.h>
#include <ctype.h>
#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "../common/common.h"
#include "vi.h"
/*
* v_eof --
* Vi end-of-file error.
*
* PUBLIC: void v_eof __P((SCR *, MARK *));
*/
void
v_eof(sp, mp)
SCR *sp;
MARK *mp;
{
recno_t lno;
if (mp == NULL)
v_emsg(sp, NULL, VIM_EOF);
else {
if (db_last(sp, &lno))
return;
if (mp->lno >= lno)
v_emsg(sp, NULL, VIM_EOF);
else
msgq(sp, M_BERR, "195|Movement past the end-of-file");
}
}
/*
* v_eol --
* Vi end-of-line error.
*
* PUBLIC: void v_eol __P((SCR *, MARK *));
*/
void
v_eol(sp, mp)
SCR *sp;
MARK *mp;
{
size_t len;
if (mp == NULL)
v_emsg(sp, NULL, VIM_EOL);
else {
if (db_get(sp, mp->lno, DBG_FATAL, NULL, &len))
return;
if (mp->cno == len - 1)
v_emsg(sp, NULL, VIM_EOL);
else
msgq(sp, M_BERR, "196|Movement past the end-of-line");
}
}
/*
* v_nomove --
* Vi no cursor movement error.
*
* PUBLIC: void v_nomove __P((SCR *));
*/
void
v_nomove(sp)
SCR *sp;
{
msgq(sp, M_BERR, "197|No cursor movement made");
}
/*
* v_sof --
* Vi start-of-file error.
*
* PUBLIC: void v_sof __P((SCR *, MARK *));
*/
void
v_sof(sp, mp)
SCR *sp;
MARK *mp;
{
if (mp == NULL || mp->lno == 1)
msgq(sp, M_BERR, "198|Already at the beginning of the file");
else
msgq(sp, M_BERR, "199|Movement past the beginning of the file");
}
/*
* v_sol --
* Vi start-of-line error.
*
* PUBLIC: void v_sol __P((SCR *));
*/
void
v_sol(sp)
SCR *sp;
{
msgq(sp, M_BERR, "200|Already in the first column");
}
/*
* v_isempty --
* Return if the line contains nothing but white-space characters.
*
* PUBLIC: int v_isempty __P((char *, size_t));
*/
int
v_isempty(p, len)
char *p;
size_t len;
{
for (; len--; ++p)
if (!isblank(*p))
return (0);
return (1);
}
/*
* v_emsg --
* Display a few common vi messages.
*
* PUBLIC: void v_emsg __P((SCR *, char *, vim_t));
*/
void
v_emsg(sp, p, which)
SCR *sp;
char *p;
vim_t which;
{
switch (which) {
case VIM_COMBUF:
msgq(sp, M_ERR,
"201|Buffers should be specified before the command");
break;
case VIM_EMPTY:
msgq(sp, M_BERR, "209|The file is empty");
break;
case VIM_EOF:
msgq(sp, M_BERR, "202|Already at end-of-file");
break;
case VIM_EOL:
msgq(sp, M_BERR, "203|Already at end-of-line");
break;
case VIM_NOCOM:
case VIM_NOCOM_B:
msgq(sp,
which == VIM_NOCOM_B ? M_BERR : M_ERR,
"204|%s isn't a vi command", p);
break;
case VIM_WRESIZE:
msgq(sp, M_ERR, "Window resize interrupted text input mode");
break;
case VIM_USAGE:
msgq(sp, M_ERR, "205|Usage: %s", p);
break;
}
}