source: trunk/athena/bin/lpr/filters/ln01filter.l @ 16

%{
#include <sys/file.h>
#include <signal.h>
extern int sighandler();
struct sigvec vector =
{
        sighandler,
        (int) 0xFFFFFFFF,
        (int) 0
};
char *reset="\033c";                    /* ris  */
char *land_length="\033[2550t";
char *landscape="\033[10m";
char *port_length="\033[3300t";         /* form length = 11 inches */
char *portrait="\033[11m";
char *beginunderline = "\033[4m";
char *endunderline = "\033[0m";
char *mode;
char *form_length;
%}
PRINTABLE    [0-9A-Za-z \t`\[\];'\\<,./-=~!@#$%^&*()_+{}:"|>?]
%%
\f                      {
                                printf("\f%s%s%s",reset,mode,form_length);
                                fflush(stdout);
                        }
(_\b{PRINTABLE})+       {
                                register char *p = &yytext[0];
                                printf(beginunderline);
                                while(*p)
                                {
                                        if((*p != '_') && (*p != '\b'))
                                        {
                                                putchar(*p);
                                        }
                                        ++p;
                                }
                                printf(endunderline);
                                fflush(stdout);
                        }
%%

yywrap()
{
        fflush(stdout);
        flock(1, LOCK_UN);
        return(1);
}
main(argc,argv)
int argc;
register char *argv[];
{
        register int i;
        for(i = 1; i <= 27; ++i) {
                sigvec(i, &vector, 0);
        }
        flock(1, LOCK_EX);
        if(!strcmp(argv[0], "ln01l")) {
                mode = landscape;
                form_length = land_length;
        }
        else {
                mode = portrait;
                form_length = port_length;
        }
        setbuf(stdout, NULL);
        printf("%s%s%s",reset,mode,form_length);
        fflush(stdout);
        while(1) {
                        if(yylex() <= 0) break;
        }
}

int
sighandler(sig)
register int sig;
{
        yywrap();
        exit(sig);
}

/* Local Modes: */
/* Mode:C */
/* End: */