135 lines
3.6 KiB
C
135 lines
3.6 KiB
C
|
/*
|
||
|
* mkcapsort.c
|
||
|
*
|
||
|
* By Ross Ridge
|
||
|
* Public Domain
|
||
|
* 92/06/04 11:38:02
|
||
|
*
|
||
|
* mkcapsort
|
||
|
*
|
||
|
* make the sorted lists of pointers to strins
|
||
|
*
|
||
|
*/
|
||
|
|
||
|
#define NOTLIB
|
||
|
#include "defs.h"
|
||
|
#include <term.h>
|
||
|
|
||
|
#ifdef USE_MYQSORT
|
||
|
#include "qsort.c"
|
||
|
#endif
|
||
|
|
||
|
const char SCCSid[] = "@(#) mytinfo mkcapsort.c 3.3 92/06/04 public domain, By Ross Ridge";
|
||
|
|
||
|
char **sboolnames[NUM_OF_BOOLS], **sboolcodes[NUM_OF_BOOLS], **sboolfnames[NUM_OF_BOOLS];
|
||
|
char **snumnames[NUM_OF_NUMS], **snumcodes[NUM_OF_NUMS], **snumfnames[NUM_OF_NUMS];
|
||
|
char **sstrnames[NUM_OF_STRS], **sstrcodes[NUM_OF_STRS], **sstrfnames[NUM_OF_STRS];
|
||
|
|
||
|
|
||
|
int
|
||
|
main() {
|
||
|
register int i;
|
||
|
|
||
|
i = NUM_OF_BOOLS;
|
||
|
while(i) {
|
||
|
i--;
|
||
|
sboolnames[i] = &boolnames[i];
|
||
|
sboolcodes[i] = &boolcodes[i];
|
||
|
sboolfnames[i] = &boolfnames[i];
|
||
|
}
|
||
|
|
||
|
i = NUM_OF_NUMS;
|
||
|
while(i) {
|
||
|
i--;
|
||
|
snumnames[i] = &numnames[i];
|
||
|
snumcodes[i] = &numcodes[i];
|
||
|
snumfnames[i] = &numfnames[i];
|
||
|
}
|
||
|
|
||
|
i = NUM_OF_STRS;
|
||
|
while(i) {
|
||
|
i--;
|
||
|
sstrnames[i] = &strnames[i];
|
||
|
sstrcodes[i] = &strcodes[i];
|
||
|
sstrfnames[i] = &strfnames[i];
|
||
|
}
|
||
|
|
||
|
qsort((anyptr) sboolnames, NUM_OF_BOOLS, sizeof(*sboolnames), _compar);
|
||
|
qsort((anyptr) sboolcodes, NUM_OF_BOOLS, sizeof(*sboolcodes), _compar);
|
||
|
qsort((anyptr) sboolfnames, NUM_OF_BOOLS, sizeof(*sboolfnames),_compar);
|
||
|
qsort((anyptr) snumnames, NUM_OF_NUMS, sizeof(*snumnames), _compar);
|
||
|
qsort((anyptr) snumcodes, NUM_OF_NUMS, sizeof(*snumcodes), _compar);
|
||
|
qsort((anyptr) snumfnames, NUM_OF_NUMS, sizeof(*snumfnames), _compar);
|
||
|
qsort((anyptr) sstrnames, NUM_OF_STRS, sizeof(*sstrnames), _compar);
|
||
|
qsort((anyptr) sstrcodes, NUM_OF_STRS, sizeof(*sstrcodes), _compar);
|
||
|
qsort((anyptr) sstrfnames, NUM_OF_STRS, sizeof(*sstrfnames), _compar);
|
||
|
|
||
|
printf("/*\n");
|
||
|
printf(" * capsort.c\n");
|
||
|
printf(" *\n");
|
||
|
printf(" * This file was generated automatically.\n");
|
||
|
printf(" *\n");
|
||
|
printf(" */\n\n");
|
||
|
|
||
|
puts("extern char *boolnames[], *boolcodes[], *boolfnames[];");
|
||
|
puts("extern char *numnames[], *numcodes[], *numfnames[];");
|
||
|
puts("extern char *strnames[], *strcodes[], *strfnames[];");
|
||
|
putchar('\n');
|
||
|
|
||
|
printf("char **_sboolnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_BOOLS; i++)
|
||
|
printf("\tboolnames + %d,\n", sboolnames[i] - boolnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_sboolcodes[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_BOOLS; i++)
|
||
|
printf("\tboolcodes + %d,\n", sboolcodes[i] - boolcodes);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_sboolfnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_BOOLS; i++)
|
||
|
printf("\tboolfnames + %d,\n", sboolfnames[i] - boolfnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_snumnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_NUMS; i++)
|
||
|
printf("\tnumnames + %d,\n", snumnames[i] - numnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_snumcodes[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_NUMS; i++)
|
||
|
printf("\tnumcodes + %d,\n", snumcodes[i] - numcodes);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_snumfnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_NUMS; i++)
|
||
|
printf("\tnumfnames + %d,\n", snumfnames[i] - numfnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_sstrnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_STRS; i++)
|
||
|
printf("\tstrnames + %d,\n", sstrnames[i] - strnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_sstrcodes[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_STRS; i++)
|
||
|
printf("\tstrcodes + %d,\n", sstrcodes[i] - strcodes);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
printf("char **_sstrfnames[] = {\n");
|
||
|
for(i = 0; i < NUM_OF_STRS; i++)
|
||
|
printf("\tstrfnames + %d,\n", sstrfnames[i] - strfnames);
|
||
|
printf(" (char **) 0\n");
|
||
|
printf("};\n\n");
|
||
|
|
||
|
return 0;
|
||
|
}
|