ex_vclear.c

#include "ex.h"
#ifdef VISUAL
#include "ex_tty.h"
#include "ex_vis.h"
/*
 * Ex - a text editor
 * Bill Joy UCB September, 1977
 */

static void vputs(char *);

/*
 * Clear the entire (physical and logical) screen
 */
void
vclear(void)
{

	vputs(CLEAR);
	destcol = 0;
	outcol = 0;
	destline = 0;
	outline = 0;
	vclrbyte(vtube0, LINES * COLUMNS);
}

/*
 * Put out a control sequence to the terminal.
 */
static void
vputs(char *cp)
{

	while (*cp)
		vputc(*cp++);
}

/*
 * Clear bytes logically
 */
void
vclrbyte(char *cp, int i)
{

	if (i > 0)
		do
			*cp++ = 0;
		while (--i != 0);
}

/*
 * Clear a physical line
 */
void
vclrlin(int l, int *tp)
{

	vigoto(l, 0);
	if (!holdat)
		ex_putchar(tp > dol ? '~' : '@');
	vclreol();
}

/*
 * Clear to the end of the current physical line
 */
void
vclreol(void)
{
	register int i;
	register char *tp;

	if (destcol == VCOLUMNS)
		return;
	destline += destcol / VCOLUMNS;
	destcol %= VCOLUMNS;
#ifdef DEBUG
	if (destline < 0 || destline > TUBELINES)
		error("Internal error: vclreol@- please tell someone");
#endif
	i = VCOLUMNS - destcol;
	tp = vtube[destline] + destcol;
	if (*tp == 0)
		return;
	if (CE) {
		vcsync();
		vputs(CE);
		vclrbyte(tp, i);
		return;
	}
	while (i > 0 && *tp != 0) {
		vputchar(' ');
		--i, tp++;
	}
}
#endif