freebsd-src/lib/libmytinfo/mkbinorder.c
1994-10-06 23:38:41 +00:00

117 lines
1.9 KiB
C

/*
* mkbinorder.c
*
* By Ross Ridge
* Public Domain
* 92/02/01 07:30:04
*
*/
#define NOTLIB
#include "defs.h"
#include <term.h>
const char SCCSid[] = "@(#) mytinfo mkbinorder.c 3.2 92/02/01 public domain, By Ross Ridge";
char cap[MAX_NAME];
char *p2c = cap;
char **p2p2c = &p2c;
int
main(argc, argv)
int argc;
char **argv; {
int r;
int ind;
FILE *f;
if (argc == 1)
f = stdin;
else if (argc == 2) {
f = fopen(argv[1], "r");
if (f == NULL) {
fprintf(stderr, "can't open %s\n", argv[1]);
exit(1);
}
} else {
fprintf(stderr, "argument count\n");
exit(1);
}
do {
r = fscanf(f, "%s", cap);
} while(r == 1 && strcmp(cap, "!") != 0);
if (r != 1) {
fprintf(stderr, "expected '!'\n");
exit(1);
}
puts("/*");
puts(" * binorder.c");
puts(" *");
puts(" * This file was generated automatically");
puts(" *");
puts(" */\n");
puts("int _boolorder[] = {");
while(1) {
r = fscanf(f, "%s", cap);
cap[MAX_TINFONAME] = '\0';
if (r != 1) {
fprintf(stderr, "unexpected EOF\n");
exit(1);
}
if (strcmp(cap, "#") == 0)
break;
ind = _findboolname(cap);
if (ind == -1) {
fprintf(stderr, "unknown bool name '%s'\n", cap);
continue;
}
printf("\t%d,\n", ind);
}
puts("\t-1");
puts("};\n");
puts("int _numorder[] = {");
while(1) {
r = fscanf(f, "%s", cap);
cap[MAX_TINFONAME] = '\0';
if (r != 1) {
fprintf(stderr, "unexpected EOF\n");
exit(1);
}
if (strcmp(cap, "$") == 0)
break;
ind = _findnumname(cap);
if (ind == -1) {
fprintf(stderr, "unknown num name '%s'\n", cap);
continue;
}
printf("\t%d,\n", ind);
}
puts("\t-1");
puts("};\n");
puts("int _strorder[] = {");
while(1) {
r = fscanf(f, "%s", cap);
cap[MAX_TINFONAME] = '\0';
if (r != 1)
break;
ind = _findstrname(cap);
if (ind == -1) {
fprintf(stderr, "unknown str name '%s'\n", cap);
continue;
}
printf("\t%d,\n", ind);
}
puts("\t-1");
puts("};\n");
return 0;
}