main.c

   1 /*
   2  * Copyright (C) 2012
   3  *      Dale Weiler
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a copy of
   6  * this software and associated documentation files (the "Software"), to deal in
   7  * the Software without restriction, including without limitation the rights to
   8  * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
   9  * of the Software, and to permit persons to whom the Software is furnished to do
  10  * so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice shall be included in all
  13  * copies or substantial portions of the Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  20  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  21  * SOFTWARE.
  22  */
  23 #include <stdlib.h>
  24 #include <string.h>
  25 #include <limits.h>
  26 #include  "gmqcc.h"
  27 int main(int argc, char **argv) {
  28         argc--;
  29         argv++;
  30
  31         const char *ifile = argv[0];
  32
  33         FILE *fp = fopen(ifile, "r");
  34         if  (!fp) {
  35                 fclose(fp);
  36                 return error(ERROR_COMPILER, "Source file: %s not found\n", ifile);
  37         } else {
  38                 struct lex_file *lex = lex_open(fp);
  39                 lex->name = util_strdup(ifile);
  40                 if (!lex) {
  41                         fclose(fp);
  42                         return 0;
  43                 }
  44                 parse_tree(lex);
  45                 mem_d(lex->name);
  46                 lex_close (lex);
  47         }
  48
  49         code_write();
  50         return 0;
  51 }