usr/src/usr.bin/tput/tput.c

/*
 * Copyright (c) 1980 Regents of the University of California.
 * All rights reserved.  The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1980 Regents of the University of California.\n\
 All rights reserved.\n";
#endif not lint

#ifndef lint
static char sccsid[] = "@(#)tput.c      5.1 (Berkeley) %G%";
#endif not lint

/* load me with -ltermlib */
/* #include <retrofit.h> on version 6 */
/*
 * clear - clear the screen
 */

#include <stdio.h>
#include <sgtty.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[1024];
        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);
}