main.c

#include "pg.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

void usage(char *c) {
  printf("usage: %s <file> [pretty] [genhc]\n",c);
  printf("   <file>: grammar definition\n");
  printf("    [lr0]: build lr(0) parse table\n");
  printf("    [slr]: build slr(1) parse table (*default*)\n");
  printf("    [lr1]: build lr(1) parse table\n");
  printf("   [lalr]: build lalr(1) parse table\n");
  printf("    [ll1]: build ll(1) parse table\n");
  printf(" [pretty]: pretty print action table\n");
  printf("  [genhc]: generate p.h and p.c\n");
  printf("  [first]: print first() for each token\n");
  printf(" [follow]: print follow() for each token\n");
  printf(" [eunitr]: eliminate unit reductions (*experimental*)\n");
  printf(" [fullst]: print the full state table\n");
  printf("  [showd]: show deleted states and transitions\n");
}

int inargv(int c, char **argv, char *a) {
  while(--c) if(!strcmp(argv[c],a)) return 1;
  return 0;
}

int main(int argc, char **argv) {
  int d=0,m=SLR;
  if(argc<2) { usage(argv[0]); exit(1); }
  if(inargv(argc,argv,"showd")) d=1;
  pgread(argv[1]);
  pgparse();
  pgreport();
  if(inargv(argc,argv,"slr")) m=SLR;
  if(inargv(argc,argv,"lr0")) m=LR0;
  if(inargv(argc,argv,"lr1")) m=LR1;
  if(inargv(argc,argv,"lalr")) m=LALR;
  if(inargv(argc,argv,"ll1")) {
    m=LL1;
    pgbuildll(m);
    if(inargv(argc,argv,"genhc")) { pghll(); pgcll(); }
  }
  else {
    pgbuild(m);
    if(m==LALR) pglalr();
    if(inargv(argc,argv,"eunitr")) pgeunitr();
    if(inargv(argc,argv,"printstates")) pgprint();
    if(inargv(argc,argv,"pretty")) pgprintt2();
    else pgprintt(d);
    if(inargv(argc,argv,"genhc")) { pgh(); pgc(); }
    if(inargv(argc,argv,"fullst")) pgprintst(d);
  }
  if(inargv(argc,argv,"first")) pgprintfirst();
  if(inargv(argc,argv,"follow")) pgprintfollow();
  return 0;
}