ansi.c

/* ANSI.C
 *
 * The routines in this file provide support for ANSI style terminals
 * over a serial line. The serial I/O services are provided by routines in
 * "termio.c". It compiles into nothing if not an ANSI device.
 *
 * modified by Petri Kutvonen
 */

#definetermdef 1 /* don't define "term" external */

#include<stdio.h>
#include"estruct.h"
#include"edef.h"

#ifANSI

#defineNROW 25 /* Screen size. */
#defineNCOL 80 /* Edit if you want to. */

#ifPKCODE
#defineMROW 64
#endif
#defineNPAUSE 100 /* # times thru update to pause */
#defineMARGIN 8 /* size of minimim margin and */
#defineSCRSIZ 64 /* scroll size for extended lines */
#defineBEL 0x07 /* BEL character. */
#defineESC 0x1B /* ESC character. */

externintttopen(); /* Forward references. */
externintttgetc();
externintttputc();
externintttflush();
externintttclose();
externintansimove();
externintansieeol();
externintansieeop();
externintansibeep();
externintansiopen();
externintansirev();
externintansiclose();
externintansikopen();
externintansikclose();
externintansicres();

#ifCOLOR
externintansifcol();
externintansibcol();

intcfcolor=-1; /* current forground color */
intcbcolor=-1; /* current background color */

#endif

/*
 * Standard terminal interface dispatch table. Most of the fields point into
 * "termio" code.
 */
structterminalterm= {
#ifPKCODE
MROW-1,
#else
NROW-1,
#endif
NROW-1,
NCOL,
NCOL,
MARGIN,
SCRSIZ,
NPAUSE,
ansiopen,
ansiclose,
ansikopen,
ansikclose,
ttgetc,
ttputc,
ttflush,
ansimove,
ansieeol,
ansieeop,
ansibeep,
ansirev,
ansicres
#ifCOLOR
 , ansifcol,
ansibcol
#endif
#ifSCROLLCODE
 , NULL
#endif
};

#ifCOLOR
ansifcol(color)
/* set the current output color */
intcolor; /* color to set */

{
if (color==cfcolor)
return;
ttputc(ESC);
ttputc('[');
ansiparm(color+30);
ttputc('m');
cfcolor=color;
}

/* Set the current background color.
 * color: color to set.
 */
voidansibcol(intcolor)
{
if (color==cbcolor)
return;
ttputc(ESC);
ttputc('[');
ansiparm(color+40);
ttputc('m');
cbcolor=color;
}
#endif

ansimove(row, col)
{
ttputc(ESC);
ttputc('[');
ansiparm(row+1);
ttputc(';');
ansiparm(col+1);
ttputc('H');
}

voidansieeol(void)
{
ttputc(ESC);
ttputc('[');
ttputc('K');
}

voidansieeop(void)
{
#ifCOLOR
ansifcol(gfcolor);
ansibcol(gbcolor);
#endif
ttputc(ESC);
ttputc('[');
ttputc('J');
}

/* Change reverse video state.
 * state: TRUE = reverse, FALSE = normal
 */
voidansirev(intstate)
{
#ifCOLOR
intftmp, btmp; /* temporaries for colors */
#endif

ttputc(ESC);
ttputc('[');
ttputc(state ? '7' : '0');
ttputc('m');
#ifCOLOR
if (state== FALSE) {
ftmp=cfcolor;
btmp=cbcolor;
cfcolor=-1;
cbcolor=-1;
ansifcol(ftmp);
ansibcol(btmp);
 }
#endif
}

/* Change screen resolution. */
intansicres()
{
return TRUE;
}

voidansibeep(void)
{
ttputc(BEL);
ttflush();
}

voidansiparm(intn)
{
intq, r;

q=n / 10;
if (q!=0) {
r=q / 10;
if (r!=0) {
ttputc((r % 10) +'0');
 }
ttputc((q % 10) +'0');
 }
ttputc((n % 10) +'0');
}

voidansiopen(void)
{
#ifV7 | USG | BSD
char*cp;

if ((cp=getenv("TERM")) ==NULL) {
puts("Shell variable TERM not defined!");
exit(1);
 }
if (strcmp(cp, "vt100") !=0) {
puts("Terminal type not 'vt100'!");
exit(1);
 }
#endif
strcpy(sres, "NORMAL");
revexist= TRUE;
ttopen();
}

voidansiclose(void)
{
#ifCOLOR
ansifcol(7);
ansibcol(0);
#endif
ttclose();
}

/* Open the keyboard (a noop here). */
voidansikopen(void)
{
}

/* Close the keyboard (a noop here). */
voidansikclose(void)
{
}

#endif