aboutsummaryrefslogtreecommitdiffstats
path: root/wlp/commands.l
diff options
context:
space:
mode:
Diffstat (limited to 'wlp/commands.l')
-rw-r--r--wlp/commands.l76
1 files changed, 76 insertions, 0 deletions
diff --git a/wlp/commands.l b/wlp/commands.l
new file mode 100644
index 0000000..ab954cf
--- /dev/null
+++ b/wlp/commands.l
@@ -0,0 +1,76 @@
+%{
+/* Lex analyzer for bison grammar */
+
+#include "commands.tab.h"
+/*#define DEBUG*/
+#include "macro.h"
+#include <string.h>
+%}
+
+OWNER "<"[a-zA-Z0-9_.+-]+@[a-zA-Z0-9._-]+">"
+VAL ['`"][a-zA-Z0-9@_+.<>() -]+['`"]
+VAR [a-zA-Z0-9_<>-]+[:]?
+
+%option noyywrap
+
+%%
+
+
+
+
+{OWNER} {
+ DBG("OWNER %s\n",yytext);
+ yylval.text=yytext;
+ return(OWNERID);
+ }
+
+
+{VAL} {
+ DBG("VAL %s\n",yytext);
+ yylval.text=yytext;
+ return(VALID);
+ }
+
+{VAR} {
+ DBG("VAR %s\n",yytext);
+ yylval.text=yytext;
+ return(VARID);
+ }
+
+
+"{" |
+"}" |
+"=" {
+ yylval.text=yytext;
+ return(*yytext);
+ }
+
+
+"#"[^\n]* |
+"\n" |
+[[:space:]] ; /* comments 'til EOL and strip all spaces and \n */
+
+
+"." {
+ DBG("NOTSTR %s\n",yytext);
+ yylval.text=yytext;
+ return(ERROR);
+ }
+
+
+%%
+
+#include "structs.h"
+
+extern struct wlp_list_t *list;
+
+int parse(FILE *file)
+{
+ struct wlp_node_t *tmp;
+ int count;
+ yyin=file;
+
+ DBG("go!\n");
+ yyparse();
+ DBG("EOF found\n");
+}