Return to setmaps.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / jove

Annotation of 43BSD/contrib/jove/setmaps.c, revision 1.1.1.1

1.1       root        1: /*************************************************************************
                      2:  * This program is copyright (C) 1985, 1986 by Jonathan Payne.  It is    *
                      3:  * provided to you without charge for use only on a licensed Unix        *
                      4:  * system.  You may copy JOVE provided that this notice is included with *
                      5:  * the copy.  You may not sell copies of this program or versions        *
                      6:  * modified for use on microcomputer systems, unless the copies are      *
                      7:  * included with a Unix system distribution and the source is provided.  *
                      8:  *************************************************************************/
                      9: 
                     10: #define TXT_TO_C
                     11: 
                     12: #include "funcdefs.c"
                     13: #undef putchar /* From jove.h via funcdefs.c, conflicts with STDIO */
                     14: #undef putc
                     15: #undef getc
                     16: #undef EOF
                     17: #undef FILE
                     18: #undef BUFSIZ
                     19: #include <stdio.h>
                     20: 
                     21: match(choices, what)
                     22: register struct cmd    choices[];
                     23: register char  *what;
                     24: {
                     25:        register int    len;
                     26:        int     i,
                     27:                found = 0,
                     28:                save,
                     29:                exactmatch = -1;
                     30: 
                     31:        len = strlen(what);
                     32:        for (i = 0; choices[i].Name != 0; i++) {
                     33:                if (*what != *choices[i].Name)
                     34:                        continue;
                     35:                if (strncmp(what, choices[i].Name, len) == 0)
                     36:                        return i;
                     37:        }
                     38:        return -1;
                     39: }
                     40: 
                     41: char *
                     42: PPchar(c)
                     43: int    c;
                     44: {
                     45:        static char     str[10];
                     46:        char    *cp = str;
                     47: 
                     48:        if (c == '\033')
                     49:                strcpy(cp, "ESC");
                     50:        else if (c < ' ')
                     51:                (void) sprintf(cp, "C-%c", c + '@');
                     52:        else if (c == '\177')
                     53:                strcpy(cp, "^?");
                     54:        else
                     55:                (void) sprintf(cp, "%c", c);
                     56:        return cp;
                     57: }
                     58: 
                     59: extract(into, from)
                     60: char   *into,
                     61:        *from;
                     62: {
                     63:        from += 2;      /* Past tab and first double quote. */
                     64:        while ((*into = *from++) != '"')
                     65:                into++;
                     66:        *into = 0;
                     67: }
                     68: 
                     69: main()
                     70: {
                     71:        FILE    *ifile,
                     72:                *of;
                     73:        char    line[100],
                     74:                comname[70];
                     75:        int     comnum,
                     76:                ch;
                     77: 
                     78:        ifile = stdin;
                     79:        of = stdout;
                     80:        if (ifile == NULL || of == NULL) {
                     81:                printf("Cannot read input or write output.\n");
                     82:                exit(1);
                     83:        }
                     84:        while (fgets(line, sizeof line, ifile) != NULL) {
                     85:                if (strncmp(line, "\t\"", 2) != 0) {
                     86:                        fprintf(of, line);
                     87:                        ch = 0;
                     88:                        continue;
                     89:                }
                     90:                extract(comname, line);
                     91:                if (strcmp(comname, "unbound") == 0) 
                     92:                        comnum = 12345;
                     93:                else {
                     94:                        comnum = match(commands, comname);
                     95:                        if (comnum < 0) {
                     96:                                fprintf(stderr, "Cannot find command \"%s\".\n", comname);
                     97:                                exit(1);
                     98:                        }
                     99:                }
                    100:                if (comnum == 12345)
                    101:                        fprintf(of, "   (data_obj *) 0,                 /* %s */\n", PPchar(ch++));
                    102:                else
                    103:                        fprintf(of, "   (data_obj *) &commands[%d],     /* %s */\n", comnum, PPchar(ch++));
                    104:        }
                    105:        fclose(of);
                    106:        fclose(ifile);
                    107:        exit(0);
                    108: }

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