Return to tc2.c CVS log

Up to [Research Unix] / researchv10no / libtermlib

Annotation of researchv10no/libtermlib/tc2.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * tc2 [term]
                      3:  * Dummy program to test out termlib.
                      4:  * Commands are "tcc\n" where t is type (s for string, f for flag,
                      5:  * or n for number) and cc is the name of the capability.
                      6:  */
                      7: #include <stdio.h>
                      8: char buf[1024];
                      9: char *getenv(), *tgetstr();
                     10: 
                     11: main(argc, argv) char **argv; {
                     12:        char *p, *q;
                     13:        int rc;
                     14:        char b[3], c;
                     15:        char area[200];
                     16: 
                     17:        if (argc < 2)
                     18:                p = getenv("TERM");
                     19:        else
                     20:                p = argv[1];
                     21:        rc = tgetent(buf,p);
                     22:        for (;;) {
                     23:                c = getchar();
                     24:                if (c < 0)
                     25:                        exit(0);
                     26:                b[0] = getchar();
                     27:                if (b[0] < ' ')
                     28:                        exit(0);
                     29:                b[1] = getchar();
                     30:                b[2] = 0;
                     31:                getchar();
                     32:                switch(c) {
                     33:                        case 'f':
                     34:                                printf("%s: %d\n",b,tgetflag(b));
                     35:                                break;
                     36:                        case 'n':
                     37:                                printf("%s: %d\n",b,tgetnum(b));
                     38:                                break;
                     39:                        case 's':
                     40:                                q = area;
                     41:                                printf("%s: %s\n",b,tgetstr(b,&q));
                     42:                                break;
                     43:                        default:
                     44:                                exit(0);
                     45:                }
                     46:        }
                     47: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.