aboutsummaryrefslogtreecommitdiffstats
path: root/libical/src/libicalss/icalsslexer.l
blob: be1dc553cd9cbab8e38fd42e3518df6de8a56a0f (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
%{
/* -*- Mode: C -*-
  ======================================================================
  FILE: icalsslexer.l
  CREATOR: eric 8 Aug 2000
  
  DESCRIPTION:
  
  $Id: icalsslexer.l,v 1.3 2003/09/22 07:32:31 hansp Exp $
  $Locker:  $

(C) COPYRIGHT 2000, Eric Busboom, http://www.softwarestudio.org

 This program is free software; you can redistribute it and/or modify
 it under the terms of either: 

    The LGPL as published by the Free Software Foundation, version
    2.1, available at: http://www.fsf.org/copyleft/lesser.html

  Or:

    The Mozilla Public License Version 1.0. You may obtain a copy of
    the License at http://www.mozilla.org/MPL/

 The Original Code is eric. The Initial Developer of the Original
 Code is Eric Busboom

  ======================================================================*/

#include "icalssyacc.h"
#include "icalgaugeimpl.h"
#include "assert.h"

#include <string.h> /* For strdup() */

#undef YYPURE
#define YYPURE

#undef SS_FATAL_ERROR
#define SS_FATAL_ERROR(msg) sserror(msg)

%}

crlf        \x0D?\x0A
space       [ ]
qsafechar   [^\x00-\x1F\"]
safechar    [^\x00-\x1F\"\:\;\,]
tsafechar   [\x20-\x21\x23-\x2B\x2D-\x39\x3C-\x5B\x5D-\x7E]
valuechar   [^\x00-\x08\x10-\x1F]
xname       X-[a-zA-Z0-9\-]+
xname2          [a-zA-Z0-9\-\ ]
paramtext   {safechar}+
value       {valuechar}+
quotedstring    \"{qsafechar}+\"
digit       [0-9]

%array /* Make yytext an array. Slow, but handy. HACK */

%option caseless
%option reentrant bison-bridge
%option yylineno

%s sql string_value



%%

%{
%}


SELECT          { return SELECT; }
FROM            { return FROM; }
WHERE           { return WHERE; }
,           { return COMMA; }
"="             { return EQUALS; }
"=="            { return EQUALS; }
"!="            { return NOTEQUALS; }
"<"             { return LESS; }
">"             { return GREATER; }
"<="            { return LESSEQUALS; }
">="            { return GREATEREQUALS; }
AND             { return AND; }
OR          { return OR; }
IS          { return IS; }
NOT         { return NOT; }
NULL            { return SQLNULL; }
\'                      { return QUOTE; }
[ \t\n\r]+ ;            
;           { return EOL; }

\'[\@\*A-Za-z0-9\-\.\:\ ]+\' {
    int c = input(yyscanner);
    unput(c);
    if(c!='\''){
        yylval_param->v_string= icalmemory_tmp_copy(yytext);
        return STRING;
    } else {
        /*ssmore();*/
    }
}

[\@\*A-Za-z0-9\-\.]+ {
        yylval->v_string= icalmemory_tmp_copy(yytext);
    return STRING; 
}


.           { return yytext[0]; }

%% 

int yywrap(yyscan_t yyscanner)
{
     return 1;
}