Mercurial > hg > toybox
view scripts/mkflags.c @ 1203:2a68f22aa286 draft
Make CLEANUP transitions work, so multiple NEWTOY() can exist in the same file.
Don't #undefine TT in the CLEANUP blocks of generated/flags.h, and #ifdef
around the other TT definition. That way you can put a union at the start
of your GLOBALS() with the arguments filled out by option parsing, and then
have multiple main() functions with different argumetns and different
FLAG_x macros, while sharing infrastructure that's not under lib.
author | Rob Landley <rob@landley.net> |
---|---|
date | Sun, 16 Feb 2014 17:31:33 -0600 |
parents | 4f080cdb2f6e |
children | f170f978e81e |
line wrap: on
line source
// Take three word input lines on stdin (the three space separated words are // command name, option string with current config, option string from // allyesconfig; space separated, the last two are and double quotes) // and produce flag #defines to stdout. // This is intentionally crappy code because we control the inputs. It leaks // memory like a sieve and segfaults if malloc returns null, but does the job. #include <stdio.h> #include <stdlib.h> #include <string.h> #include <errno.h> struct flag { struct flag *next; char *command; struct flag *lopt; }; // Break down a command string into struct flag list. struct flag *digest(char *string) { struct flag *list = NULL; while (*string) { // Groups must be at end. if (*string == '[') break; // Longopts if (*string == '(') { struct flag *new = calloc(sizeof(struct flag), 1); new->command = ++string; // Attach longopt to previous short opt, if any. if (list && list->command) { new->next = list->lopt; list->lopt = new; } else { struct flag *blank = calloc(sizeof(struct flag), 1); blank->next = list; blank->lopt = new; list = blank; } while (*++string != ')'); // An empty longopt () would break this. *(string++) = 0; continue; } if (strchr("?&^-:#|@*; ", *string)) string++; else if (strchr("=<>", *string)) { while (isdigit(*++string)) { if (!list) { string++; break; } } } else { struct flag *new = calloc(sizeof(struct flag), 1); new->command = string++; new->next = list; list = new; } } return list; } int main(int argc, char *argv[]) { char command[256], flags[1023], allflags[1024]; for (;;) { struct flag *flist, *aflist, *offlist; unsigned bit = 0; if (3 != fscanf(stdin, "%255s \"%1023[^\"]\" \"%1023[^\"]\"\n", command, flags, allflags)) break; printf("// %s %s %s\n", command, flags, allflags); flist = digest(flags); offlist = aflist = digest(allflags); printf("#ifdef CLEANUP_%s\n#undef CLEANUP_%s\n#undef FOR_%s\n", command, command, command); while (offlist) { struct flag *f = offlist->lopt; while (f) { printf("#undef FLAG_%s\n", f->command); f = f->next; } if (offlist->command) printf("#undef FLAG_%c\n", *offlist->command); offlist = offlist->next; } printf("#endif\n\n"); printf("#ifdef FOR_%s\n#ifndef TT\n#define TT this.%s\n#endif\n", command, command); while (aflist) { if (aflist->lopt) { if (flist && flist->lopt && !strcmp(flist->lopt->command, aflist->lopt->command)) { printf("#define FLAG_%s (1<<%d)\n", flist->lopt->command, bit); flist->lopt = flist->lopt->next; } else printf("#define FLAG_%s 0\n", aflist->lopt->command); aflist->lopt = aflist->lopt->next; if (!aflist->command) aflist = aflist->next; } else if (aflist->command) { if (flist && (!aflist->command || *aflist->command == *flist->command)) { if (aflist->command) printf("#define FLAG_%c (1<<%d)\n", *aflist->command, bit); bit++; flist = flist->next; } else printf("#define FLAG_%c 0\n", *aflist->command); aflist = aflist->next; } } printf("#endif\n\n"); } return fflush(0) && ferror(stdout); }