server/lex.l

   1 /*
   2  * Copyright (c) 2017 Mohamed Aslan <maslan@sce.carleton.ca>
   3  *
   4  * Permission to use, copy, modify, and distribute this software for any
   5  * purpose with or without fee is hereby granted, provided that the above
   6  * copyright notice and this permission notice appear in all copies.
   7  *
   8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  15  */
  16
  17
  18 %{
  19 #include <stdio.h>
  20 #include "y.tab.h"
  21
  22 extern int yyerror(const char *fmt, ...);
  23 %}
  24
  25 %option yylineno
  26 %option noyywrap
  27
  28 %x dquotes
  29
  30 %%
  31
  32 at                              { return AT; }
  33 to                              { return TO; }
  34 for                             { return FOR; }
  35 is                              { return IS; }
  36 and                             { return AND; }
  37 with                            { return WITH; }
  38
  39 listen                          { return LISTEN; }
  40 on                              { return ON; }
  41 port                            { return PORT; }
  42
  43 transport                       { return TRANSPORT; }
  44 udp                             { return UDP; }
  45 tcp                             { return TCP; }
  46
  47 buffer                          { return BUFFER; }
  48 size                            { return SIZE; }
  49
  50 log                             { return LOG; }
  51 csv                             { return CSV; }
  52
  53
  54 \{                              { return LCBRACKET;}
  55 \}                              { return RCBRACKET;}
  56
  57 [0-9]+\.[0-9]+\.[0-9]+\.[0-9]+  { yylval.s = strdup(yytext); return IPADDR; }   /* XXX: do better than that! */
  58 [0-9]+\.[0-9]+                  { yylval.d = strtod(yytext, NULL); return REAL; }
  59 [0-9]+                          { yylval.i = atoi(yytext); return INTEGER; }
  60
  61 \"                              { BEGIN(dquotes); }
  62 <dquotes>[^\"]*\"               {
  63                                         yylval.s = strndup(yytext, yyleng - 1);
  64                                         BEGIN(INITIAL);
  65                                         return STRING;
  66                                 }
  67
  68 [ \t\n]                         { ; }
  69 \#.*\n                          { ; }
  70 .                               { yyerror("error: invalid character: %s", yytext); }
  71
  72 %%