lexer/main.c

   1 #include <stdlib.h>
   2 #include <stdio.h>
   3 #include <string.h>
   4 #include <stdbool.h>
   5 #include <getopt.h>
   6
   7 #include "global_vars.h"
   8 #include "lexical_analyzer.h"
   9 #include "syntactic_analyzer.h"
  10 #include "print_helper.h"
  11
  12 void do_lexical_analysis() {
  13     c = fgetwc(source); // lecture du premier caractere
  14     do {
  15         scanner();
  16         wprint_token_target();
  17         token[tokenFound].type = tokenTypestr[tokenType];
  18         tokenFound++;
  19     } while (tokenType != FIN); // tant que la fin du fichier n'est pas atteinte
  20 }
  21
  22 void do_syntactic_analysis() {
  23     fputws(L"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"fr_FR\" lang=\"fr_FR\">\n",
  24            target);
  25     c = fgetwc(source); // lecture du premier caractere
  26     analyze_AXIOME();
  27     fputws(L"</html>\n", target);
  28 }
  29
  30 void print_usage(const char* name) {
  31     fprintf(stdout,"Usage: %s [options]\n"
  32                    "Where [options] are:\n"
  33                    " -h, --help: display this help message\n"
  34                    " -l, --lexical-only: do only the lexical analysis\n"
  35                    " -i, --input<filename>: use <filename> as input file instead of standard input\n"
  36                    " -o, --output<filename>: use <filename> as output file instead of standard output\n",
  37             name);
  38     fflush(stdout);
  39 }
  40
  41 int main(int argc, char **argv) {
  42     /* In and out files name */
  43     const char* in_file = NULL;
  44     const char* out_file = NULL;
  45     static int hflag = 0;
  46     static int lflag = 0;
  47
  48     /* getopt_long stores the option index here. */
  49     int option_index = 0;
  50
  51     static struct option long_options[] =
  52     {
  53         {"help", no_argument, &hflag, 1},
  54         {"input", optional_argument, NULL, 'i'},
  55         {"lexical-only", no_argument, &lflag, 1},
  56         {"output", optional_argument, NULL, 'o'},
  57         {0, 0, 0, 0}
  58     };
  59
  60     int c_in;
  61
  62     while ((c_in = getopt_long(argc, argv, "hi::lo::", long_options,
  63                                &option_index)) != -1) {
  64         switch (c_in) {
  65             case 'h':
  66                 hflag = 1;
  67                 break;
  68             case 'i':
  69                 if (optarg != NULL) {
  70                     in_file = optarg;
  71                 }
  72                 break;
  73             case 'l':
  74                 lflag = 1;
  75                 break;
  76             case 'o':
  77                 if (optarg != NULL) {
  78                     out_file = optarg;
  79                 }
  80                 break;
  81             case 0:
  82                 /* getopt_long() set a variable, just keep going */
  83                 break;
  84             case ':':
  85                 /* missing option argument */
  86                 pr_error("%s: option '-%c' requires an argument\n",
  87                         argv[0], optopt);
  88                 break;
  89             case '?':
  90             default:
  91                 /* invalid option */
  92                 pr_error("%s: option '-%c' is invalid: ignored\n",
  93                         argv[0], optopt);
  94                 break;
  95         }
  96     }
  97
  98     if (in_file != NULL) {
  99         // Ouvre le fichier source en lecture seulement (le fichier doit exister) :
 100         source = fopen(in_file, "r+");
 101         if (source == NULL) {
 102             pr_error("Fail to open file %s\n", in_file);
 103             return EXIT_FAILURE;
 104         }
 105     } else {
 106         source = stdin;
 107     }
 108
 109     if (out_file != NULL) {
 110         // Cree et ouvre le fichier cible en lecture/ecriture
 111         // avec suppression du contenu au prealable :
 112         target = fopen(out_file, "w+");
 113         if (target == NULL) {
 114             pr_error("Fail to open file %s\n", out_file);
 115             return EXIT_FAILURE;
 116         }
 117     } else {
 118         target = stdout;
 119     }
 120
 121     if (hflag) {
 122         print_usage(argv[0]);
 123     } else if (lflag){
 124         do_lexical_analysis();
 125     } else {
 126         do_syntactic_analysis();
 127     }
 128
 129     if (source != NULL) fclose(source); // fermeture du fichier source
 130     if (target != NULL) fclose(target); // fermeture du fichier target
 131
 132     return EXIT_SUCCESS;
 133 }