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;
}
|