2.9BSD - /usr/src/ucb/clear.c

   1: /* load me with -ltermlib */
   2: /* #include <retrofit.h> on version 6 */
   3: /*
   4:  * clear - clear the screen
   5:  */
   6: 
   7: #include <stdio.h>
   8: #include <sgtty.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[1024];
  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: }

Defined functions

Defined variables