b53298ccdca54756e7339ed430c26cccc6c40c5c
[m6w6/libmemcached] / libmemcached / options / scanner.l
1 /* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
2 *
3 * Libmemcached Scanner and Parser
4 *
5 * Copyright (C) 2011 DataDifferental, http://datadifferential.com
6 *
7 * This program is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU Affero General Public License as
9 * published by the Free Software Foundation, either version 3 of the
10 * License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU Affero General Public License for more details.
16 *
17 * You should have received a copy of the GNU Affero General Public License
18 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 %top{
22
23 #pragma GCC diagnostic ignored "-Wold-style-cast"
24 #pragma GCC diagnostic ignored "-Wunused-parameter"
25
26 #include <libmemcached/options/context.h>
27 #include <libmemcached/options/parser.h>
28 #include <libmemcached/options/string.h>
29 #include <libmemcached/options/symbol.h>
30
31 #define YY_EXTRA_TYPE Context*
32
33 }
34
35
36 %{
37 #include <cstdlib>
38 #include <cstring>
39
40 #define PARAM yyget_extra(yyscanner)
41
42 #define get_lex_chars(buffer, result, max_size, context) \
43 { \
44 if (context->pos >= context->length) \
45 { \
46 result= YY_NULL; \
47 } \
48 else \
49 { \
50 result= (int)(context->length - context->pos); \
51 (size_t)result > (size_t)max_size ? result= max_size : 0; \
52 memcpy(buffer, context->buf + context->pos, result); \
53 context->pos += result; \
54 } \
55 }
56
57
58 #define YY_INPUT(buffer, result, max_size) get_lex_chars(buffer, result, max_size, PARAM)
59
60 %}
61
62 %option 8bit
63 %option bison-bridge
64 %option case-insensitive
65 %option debug
66 %option nounput
67 %option noyywrap
68 %option outfile="libmemcached/options/scanner.cc" header-file="libmemcached/options/scanner.h"
69 %option perf-report
70 %option prefix="config_"
71 %option reentrant
72
73 %%
74
75
76 =|,|[ ] { return yytext[0];}
77
78 [[:digit:]]+ { yylval->number = atoi(yytext); return (NUMBER); }
79
80 :[[:digit:]]{1,5} { yylval->server.port = atoi(yytext +1); return PORT; }
81
82 "/?"[[:digit:]]{1,5} { yylval->server.weight = atoi(yytext +2); return WEIGHT_START; }
83
84 [\t\r\n] ; /* skip whitespace */
85
86
87 ^#.*$ {
88 return COMMENT;
89 }
90
91 "--SERVER=" { yyextra->begin= yytext; yyextra->set_server(); return SERVER; }
92
93 "--VERIFY_KEY" { yyextra->begin= yytext; return VERIFY_KEY; }
94 "--VERIFY-KEY" { yyextra->begin= yytext; return VERIFY_KEY; }
95 "--AUTO_EJECT_HOSTS" { yyextra->begin= yytext; return AUTO_EJECT_HOSTS; }
96 "--AUTO-EJECT_HOSTS" { yyextra->begin= yytext; return AUTO_EJECT_HOSTS; }
97 "--BINARY_PROTOCOL" { yyextra->begin= yytext; return BINARY_PROTOCOL; }
98 "--BINARY-PROTOCOL" { yyextra->begin= yytext; return BINARY_PROTOCOL; }
99 "--BUFFER_REQUESTS" { yyextra->begin= yytext; return BUFFER_REQUESTS; }
100 "--BUFFER-REQUESTS" { yyextra->begin= yytext; return BUFFER_REQUESTS; }
101 "--CONFIGURE_FILE=" { yyextra->begin= yytext; return CONFIGURE_FILE; }
102 "--CONFIGURE-FILE=" { yyextra->begin= yytext; return CONFIGURE_FILE; }
103 "--CONNECT_TIMEOUT=" { yyextra->begin= yytext; return CONNECT_TIMEOUT; }
104 "--CONNECT-TIMEOUT=" { yyextra->begin= yytext; return CONNECT_TIMEOUT; }
105 "--DISTRIBUTION=" { yyextra->begin= yytext; return DISTRIBUTION; }
106 "--HASH=" { yyextra->begin= yytext; return HASH; }
107 "--HASH_WITH_PREFIX_KEY" { yyextra->begin= yytext; return HASH_WITH_PREFIX_KEY; }
108 "--HASH-WITH-PREFIX_KEY" { yyextra->begin= yytext; return HASH_WITH_PREFIX_KEY; }
109 "--IO_BYTES_WATERMARK=" { yyextra->begin= yytext; return IO_BYTES_WATERMARK; }
110 "--IO-BYTES-WATERMARK=" { yyextra->begin= yytext; return IO_BYTES_WATERMARK; }
111 "--IO_KEY_PREFETCH=" { yyextra->begin= yytext; return IO_KEY_PREFETCH; }
112 "--IO-KEY-PREFETCH=" { yyextra->begin= yytext; return IO_KEY_PREFETCH; }
113 "--IO_MSG_WATERMARK=" { yyextra->begin= yytext; return IO_MSG_WATERMARK; }
114 "--IO-MSG-WATERMARK=" { yyextra->begin= yytext; return IO_MSG_WATERMARK; }
115 "--NOREPLY" { yyextra->begin= yytext; return NOREPLY; }
116 "--NUMBER_OF_REPLICAS=" { yyextra->begin= yytext; return NUMBER_OF_REPLICAS; }
117 "--NUMBER-OF-REPLICAS=" { yyextra->begin= yytext; return NUMBER_OF_REPLICAS; }
118 "--POLL_TIMEOUT=" { yyextra->begin= yytext; return POLL_TIMEOUT; }
119 "--POLL-TIMEOUT=" { yyextra->begin= yytext; return POLL_TIMEOUT; }
120 "--RANDOMIZE_REPLICA_READ" { yyextra->begin= yytext; return RANDOMIZE_REPLICA_READ; }
121 "--RANDOMIZE-REPLICA-READ" { yyextra->begin= yytext; return RANDOMIZE_REPLICA_READ; }
122 "--RCV_TIMEOUT=" { yyextra->begin= yytext; return RCV_TIMEOUT; }
123 "--RCV-TIMEOUT=" { yyextra->begin= yytext; return RCV_TIMEOUT; }
124 "--RETRY_TIMEOUT=" { yyextra->begin= yytext; return RETRY_TIMEOUT; }
125 "--RETRY-TIMEOUT=" { yyextra->begin= yytext; return RETRY_TIMEOUT; }
126 "--SERVER_FAILURE_LIMIT=" { yyextra->begin= yytext; return SERVER_FAILURE_LIMIT; }
127 "--SERVER-FAILURE-LIMIT=" { yyextra->begin= yytext; return SERVER_FAILURE_LIMIT; }
128 "--SND_TIMEOUT=" { yyextra->begin= yytext; return SND_TIMEOUT; }
129 "--SND-TIMEOUT=" { yyextra->begin= yytext; return SND_TIMEOUT; }
130 "--SOCKET_RECV_SIZE=" { yyextra->begin= yytext; return SOCKET_RECV_SIZE; }
131 "--SOCKET-RECV-SIZE=" { yyextra->begin= yytext; return SOCKET_RECV_SIZE; }
132 "--SOCKET_SEND_SIZE=" { yyextra->begin= yytext; return SOCKET_SEND_SIZE; }
133 "--SOCKET-SEND-SIZE=" { yyextra->begin= yytext; return SOCKET_SEND_SIZE; }
134 "--SORT_HOSTS" { yyextra->begin= yytext; return SORT_HOSTS; }
135 "--SORT-HOSTS" { yyextra->begin= yytext; return SORT_HOSTS; }
136 "--SUPPORT_CAS" { yyextra->begin= yytext; return SUPPORT_CAS; }
137 "--SUPPORT-CAS" { yyextra->begin= yytext; return SUPPORT_CAS; }
138 "--TCP_NODELAY" { yyextra->begin= yytext; return _TCP_NODELAY; }
139 "--TCP-NODELAY" { yyextra->begin= yytext; return _TCP_NODELAY; }
140 "--TCP_KEEPALIVE" { yyextra->begin= yytext; return _TCP_KEEPALIVE; }
141 "--TCP-KEEPALIVE" { yyextra->begin= yytext; return _TCP_KEEPALIVE; }
142 "--TCP_KEEPIDLE" { yyextra->begin= yytext; return _TCP_KEEPIDLE; }
143 "--TCP-KEEPIDLE" { yyextra->begin= yytext; return _TCP_KEEPIDLE; }
144 "--USER_DATA" { yyextra->begin= yytext; return USER_DATA; }
145 "--USER-DATA" { yyextra->begin= yytext; return USER_DATA; }
146 "--USE_UDP" { yyextra->begin= yytext; return USE_UDP; }
147 "--USE-UDP" { yyextra->begin= yytext; return USE_UDP; }
148
149 "--PREFIX-KEY=" { yyextra->begin= yytext; return PREFIX_KEY; }
150 "--PREFIX_KEY=" { yyextra->begin= yytext; return PREFIX_KEY; }
151
152 INCLUDE { yyextra->begin= yytext; return INCLUDE; }
153 RESET { yyextra->begin= yytext; return RESET; }
154 DEBUG { yyextra->begin= yytext; return PARSER_DEBUG; }
155 SERVERS { yyextra->begin= yytext; return SERVERS; }
156 END { yyextra->begin= yytext; return END; }
157 ERROR { yyextra->begin= yytext; return ERROR; }
158
159 TRUE { return TRUE; }
160 FALSE { return FALSE; }
161
162
163 "--"[[:alnum:]]* {
164 yyextra->begin= yytext;
165 return UNKNOWN_OPTION;
166 }
167
168 CONSISTENT { return CONSISTENT; }
169 MODULA { return MODULA; }
170 RANDOM { return RANDOM; }
171
172 MD5 { return MD5; }
173 CRC { return CRC; }
174 FNV1_64 { return FNV1_64; }
175 FNV1A_64 { return FNV1A_64; }
176 FNV1_32 { return FNV1_32; }
177 FNV1A_32 { return FNV1A_32; }
178 HSIEH { return HSIEH; }
179 MURMUR { return MURMUR; }
180 JENKINS { return JENKINS; }
181
182 (([[:digit:]]{1,3}"."){3}([[:digit:]]{1,3})) {
183 yylval->server.port= MEMCACHED_DEFAULT_PORT;
184 yylval->server.weight= 1;
185 yylval->server.c_str= yyextra->set_hostname(yytext, yyleng);
186 if (yylval->server.c_str)
187 yylval->server.length= yyleng;
188 return IPADDRESS;
189 }
190
191 [[:alnum:]]["."[:alnum:]_-]+[[:alnum:]] {
192 if (yyextra->is_server())
193 {
194 yylval->server.port= MEMCACHED_DEFAULT_PORT;
195 yylval->server.weight= 1;
196 yylval->server.c_str= yyextra->set_hostname(yytext, yyleng);
197 if (yylval->server.c_str)
198 yylval->server.length= yyleng;
199
200 return HOSTNAME;
201 }
202
203 yylval->string.c_str = yytext;
204 yylval->string.length = yyleng;
205
206 return STRING;
207 }
208
209 (\".*\") {
210 yylval->string.c_str = yytext;
211 yylval->string.length = yyleng;
212 return QUOTED_STRING;
213 }
214
215 . {
216 yyextra->begin= yytext;
217 return UNKNOWN;
218 }
219
220 %%
221
222 void Context::init_scanner()
223 {
224 yylex_init(&scanner);
225 yyset_extra(this, scanner);
226 }
227
228 void Context::destroy_scanner()
229 {
230 yylex_destroy(scanner);
231 }
232