[unix-history] / src / clear.c

/* Copyright (c) 1979 Regents of the University of California */
#include <retrofit.h>
#include <sgtty.h>
/*
 * clear - clear the screen
 */

#include <stdio.h>

char	*getenv();
char	*tgetstr();
char	PC;
short	ospeed;
#undef	putchar
int	putchar();

main()
{
	char *cp = getenv("TERM");
	char clbuf[20];
	char pcbuf[20];
	char *clbp = clbuf;
	char *pcbp = pcbuf;
	char *clear;
	char buf[BUFSIZ];
	char *pc;
	struct sgttyb tty;

	gtty(1, &tty);
	ospeed = tty.sg_ospeed;
	if (cp == (char *) 0)
		exit(1);
	if (tgetent(buf, cp) != 1)
		exit(1);
	pc = tgetstr("pc", &pcbp);
	if (pc)
		PC = *pc;
	clear = tgetstr("cl", &clbp);
	if (clear)
		tputs(clear, tgetnum("li"), putchar);
	exit (clear != (char *) 0);
}
Commit	Line	Data
783c5c09 BJ	1	/* Copyright (c) 1979 Regents of the University of California */
	2	#include <retrofit.h>
	3	#include <sgtty.h>
	4	/*
	5	* clear - clear the screen
	6	*/
	7
	8	#include <stdio.h>
	9
	10	char *getenv();
	11	char *tgetstr();
	12	char PC;
	13	short ospeed;
	14	#undef putchar
	15	int putchar();
	16
	17	main()
	18	{
	19	char *cp = getenv("TERM");
	20	char clbuf[20];
	21	char pcbuf[20];
	22	char *clbp = clbuf;
	23	char *pcbp = pcbuf;
	24	char *clear;
	25	char buf[BUFSIZ];
	26	char *pc;
	27	struct sgttyb tty;
	28
	29	gtty(1, &tty);
	30	ospeed = tty.sg_ospeed;
	31	if (cp == (char *) 0)
	32	exit(1);
	33	if (tgetent(buf, cp) != 1)
	34	exit(1);
	35	pc = tgetstr("pc", &pcbp);
	36	if (pc)
	37	PC = *pc;
	38	clear = tgetstr("cl", &clbp);
	39	if (clear)
	40	tputs(clear, tgetnum("li"), putchar);
	41	exit (clear != (char *) 0);
	42	}