commit be4c41c762566514c0daff828a27f593cbedd265
Author: Michael Uleysky <uleysky@poi.dvo.ru>
Date:   Fri Aug 21 13:15:58 2015 +1000

    Lexical parser

diff --git a/src/Makefile b/src/Makefile
new file mode 100644
index 0000000..04aa6ef
--- /dev/null
+++ b/src/Makefile
@@ -0,0 +1,21 @@
+CFLAGS=-O2 -g
+
+OBJECTS=main.o debug.o init.o parser/lexical.o
+
+
+
+makemap: $(OBJECTS)
+	 g++ $(CFLAGS) -o $@ $(OBJECTS)
+
+main.o: debug.h init.h
+init.o: parser/lexical.h parser/parser.h debug.h init.h
+parser/lexical.o: parser/parser.h debug.h
+
+parser/lexical.h parser/lexical.cpp: parser/lexical.l
+	 cd parser && flex lexical.l
+
+clean:
+	 rm -f *.o parser/*.o parser/lexical.{cpp,h}
+
+distclean: clean
+	 rm -f makemap	 
\ No newline at end of file
diff --git a/src/debug.cpp b/src/debug.cpp
new file mode 100644
index 0000000..0c5579b
--- /dev/null
+++ b/src/debug.cpp
@@ -0,0 +1,19 @@
+#include <iostream>
+#include "debug.h"
+
+std::ostream& COUT(debug_level dl)
+{
+ if(dl==ERROR) return std::cerr;
+ if(dl>=SetDebugLevel(INTERNALREQUEST)) std::cout.clear();
+ else std::cout.setstate(std::cout.failbit);
+ return std::cout;
+}
+
+debug_level SetDebugLevel(debug_level dl)
+{
+ static debug_level DEBUG_LEVEL=INFO;
+ if(dl==INTERNALREQUEST) return DEBUG_LEVEL;
+ debug_level s=DEBUG_LEVEL;
+ DEBUG_LEVEL=dl;
+ return s;
+}
diff --git a/src/debug.h b/src/debug.h
new file mode 100644
index 0000000..3bfdf3c
--- /dev/null
+++ b/src/debug.h
@@ -0,0 +1,11 @@
+#ifndef DEBUG_H
+#define DEBUG_H
+#include <iostream>
+
+enum debug_level {INTERNALREQUEST,DEBUG,INFO,WARNING,ERROR};
+
+std::ostream& COUT(debug_level dl);
+
+debug_level SetDebugLevel(debug_level dl=INTERNALREQUEST);
+
+#endif
diff --git a/src/init.cpp b/src/init.cpp
new file mode 100644
index 0000000..d5879c9
--- /dev/null
+++ b/src/init.cpp
@@ -0,0 +1,26 @@
+#include "init.h"
+#include "debug.h"
+#include "parser/lexical.h"
+#include "parser/parser.h"
+
+int ParseConfigFile(char* config)
+{
+ yyscan_t scanner;
+ struct lexical_extra extra;
+ FILE* conffd;
+
+ conffd=fopen(config,"r");
+ if(conffd==0)
+ {
+  COUT(ERROR)<<"Can't open file "<<config<<std::endl;
+  return 1;
+ }
+ extra.filename=config;
+ extra.inclevel=0;
+ extra.maxinclevel=10;
+ conflex_init_extra(&extra,&scanner);
+ confset_in(conffd,scanner);
+ conflex(scanner);
+ conflex_destroy(scanner);
+ fclose(conffd);
+}
diff --git a/src/init.h b/src/init.h
new file mode 100644
index 0000000..3a86955
--- /dev/null
+++ b/src/init.h
@@ -0,0 +1,6 @@
+#ifndef INIT_H
+#define INIT_H
+
+int ParseConfigFile(char* config);
+
+#endif
diff --git a/src/main.cpp b/src/main.cpp
new file mode 100644
index 0000000..8b42e67
--- /dev/null
+++ b/src/main.cpp
@@ -0,0 +1,13 @@
+#include "debug.h"
+#include "init.h"
+
+int main(int argc, char** argv)
+{
+ if(argc!=2) return 1;
+
+ SetDebugLevel(DEBUG);
+
+ ParseConfigFile(argv[1]);
+
+ return 0;
+}
diff --git a/src/parser/lexical.l b/src/parser/lexical.l
new file mode 100644
index 0000000..624aad0
--- /dev/null
+++ b/src/parser/lexical.l
@@ -0,0 +1,58 @@
+%option 8bit reentrant
+%option warn
+%option yylineno
+%option noyywrap
+%option yylineno
+%option header-file="lexical.h"
+%option outfile="lexical.cpp"
+%option prefix="conf"
+%option extra-type="const struct lexical_extra*"
+%x STRING
+%x PARSE
+
+%{
+#include <string>
+#include "../debug.h"
+#include "parser.h"
+int nc;
+%}
+
+%%
+include\(\".+\"\);                              {
+                                                        if(yyextra->inclevel>=yyextra->maxinclevel) { COUT(ERROR)<<"Max include level reached in file "<<yyextra->filename<<" at line "<<yylineno<<std::endl; return 1; }
+                                                        yyscan_t scanner;
+                                                        struct lexical_extra extra;
+                                                        std::string fname(yytext+9,yyleng-12);
+                                                        FILE* fd;
+                                                        fd=fopen(fname.c_str(),"r");
+                                                        if(fd==0) { COUT(ERROR)<<"Can't open file "<<fname<<std::endl; return 1; }
+                                                        COUT(DEBUG)<<"Include "<<fname<<std::endl;
+                                                        extra.filename=fname.c_str();
+                                                        extra.inclevel=yyextra->inclevel+1;
+                                                        extra.maxinclevel=yyextra->maxinclevel;
+                                                        yylex_init_extra(&extra,&scanner);
+                                                        yyset_in(fd,scanner);
+                                                        yylex(scanner);
+                                                        yylex_destroy(scanner);
+                                                        fclose(fd);
+
+                                                }
+[a-zA-Z][a-zA-Z0-9_]*                           printf("NAME\n"); BEGIN(PARSE);
+<PARSE>[+-]?[0-9]+				printf("INTEGER\n");
+<PARSE>[+-]?[0-9]+(\.[0-9]*)?([eE][+-][0-9]+)?	printf("REAL\n");
+<PARSE>\(					printf("OBRACE\n");
+<PARSE>\)					printf("CBRACE\n");
+<PARSE>\;					printf("ENDL\n"); BEGIN(0);
+<PARSE>=					printf("ASSIGN\n");
+<PARSE>[a-zA-Z][a-zA-Z0-9_]*			printf("IDENTIFIER\n");
+<PARSE,INITIAL>[ ,\n\t]
+<PARSE,INITIAL>\#.*
+<PARSE>\"				        BEGIN(STRING); nc=0;
+<PARSE,INITIAL>.                                COUT(ERROR)<<"Unknown symbol "<<yytext<<" in file "<<yyextra->filename<<" at line "<<yylineno<<std::endl;
+<STRING>\\\\					nc++;
+<STRING>\\\"					nc++;
+<STRING>\"					BEGIN(PARSE); printf("STRING%d\n",nc);
+<STRING>.					nc++;
+<STRING><<EOF>>					COUT(ERROR)<<"Unclosed quote!"<<std::endl; yyterminate();
+<<EOF>>						yyterminate();
+%%
diff --git a/src/parser/parser.h b/src/parser/parser.h
new file mode 100644
index 0000000..b5960ab
--- /dev/null
+++ b/src/parser/parser.h
@@ -0,0 +1,9 @@
+#ifndef PARSER_PARSER_H
+#define PARSER_PARSER_H
+
+struct lexical_extra
+{
+ const char* filename;
+ unsigned int inclevel,maxinclevel;
+};
+#endif