X-Git-Url: https://git.kengrimes.com/?a=blobdiff_plain;f=src%2Fapc.c;h=e49d03b05c8aa0e4eab4b68ff7ad6d0c16038549;hb=598910007024e398205daba6ee894309e19743e1;hp=cea384743f0377d264eaa7145ddc7bf50fefdb6d;hpb=d47bdba72dd5fef398bc485067fdc59147303253;p=henge%2Fapc.git

diff --git a/src/apc.c b/src/apc.c
index cea3847..e49d03b 100644
--- a/src/apc.c
+++ b/src/apc.c
@@ -17,25 +17,30 @@
 #include <string.h> //strndupa
 /* Posix */
 #include <stdlib.h> //exit
-#include <unistd.h> //getopt
+#include <unistd.h> //getopt, sysconf
 /* Internal */
 #include "parser.tab.h" //bison
 
+#define DEFAULT_PAGESIZE 4096
 const char* cargs['Z'] = {0};
+long  sys_pagesize;
 
 int main(int, char*[]);
 
-extern //bison
-int yyparse(void);
 extern //lexer.c
-int lexer_init(void);
+int  lexer_init(void);
+extern //scanner.c
+int  scanner_init(void);
+extern //scanner.c
+void scanner_quit(void);
+extern //scanner.c
+int  scanner_scanpath(char const*);
 extern //ir.c
-int ir_init(void);
-
-extern //apc/parser.tab.c
-YYSTYPE yylval;
-extern //lexer.c
-int  lexer(void);
+int  ir_init(void);
+extern //ir.c
+int  ir_linker(void);
+extern //ir.c
+int  ir_condenser(void);
 
 /* Main entry from terminal
    parses the command line and kicks off recursive scanning
@@ -55,13 +60,12 @@ int main
   "\t\t-o\tOutput filename \t\t[a.asspak]\n"		\
   "\t\t-h\tPrint this help\n"
 #define DONE   -1
+#define SCANPATH (cargs['d'] ? cargs['d'] : "./")
 { int   opt;
 
  getopt:
   switch (opt = getopt(argc, argv, OPTS))
-  { case DONE:
-      break;
-    case 'd' :
+  { case 'd' :
     case 'o' :
       if (strnlen(optarg, MAXSTR) != MAXSTR)
         { cargs[opt] = optarg;
@@ -75,12 +79,23 @@ int main
       printf(USAGE);
       printf(USAGE_LONG);
       exit(EXIT_SUCCESS);
+    case DONE:
+      break;
   }
-  if (lexer_init() || ir_init())
+  if ((sys_pagesize = sysconf(_SC_PAGESIZE)) == 0)
+    sys_pagesize = DEFAULT_PAGESIZE;
+
+  if (scanner_init() || ir_init())
     { perror("init");
       exit(EXIT_FAILURE);
     }
-  yyparse();
+  if (scanner_scanpath(SCANPATH))
+    { perror("scanner");
+      exit(EXIT_FAILURE);
+    }
+  scanner_quit();
+  ir_linker();
+  ir_condenser();
   exit(EXIT_SUCCESS);
 }