b653c460a634d4e623c1bb35aa529d21171b99ef
[awesomized/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 #pragma GCC diagnostic ignored "-fpermissive"
26
27 #include <libmemcached/options/context.h>
28 #include <libmemcached/options/parser.h>
29 #include <libmemcached/options/string.h>
30 #include <libmemcached/options/symbol.h>
31
32 #define YY_EXTRA_TYPE Context*
33
34 }
35
36
37 %{
38 #include <cstdlib>
39 #include <cstring>
40
41 #define PARAM yyget_extra(yyscanner)
42
43 static void get_lex_chars(char* buffer, int& result, int max_size, Context *context)
44 {
45 if (context->pos >= context->length)
46 {
47 result= YY_NULL;
48 }
49 else
50 {
51 result= context->length - context->pos;
52 result > (int)max_size ? result = max_size : 0;
53 memcpy(buffer, context->buf + context->pos, result);
54 context->pos += result;
55 }
56 }
57
58
59 #define YY_INPUT(buffer, result, max_size) get_lex_chars(buffer, result, max_size, PARAM)
60
61 %}
62
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="libmemcached_"
71 %option reentrant
72
73 %%
74
75
76 =|,|[ ] { return yytext[0];}
77
78
79 [[:digit:]]+ { yylval->number = atoi(yytext); return (NUMBER); }
80
81 [\t\r\n] ; /* skip whitespace */
82
83 ^#.*$ {
84 return COMMENT;
85 }
86
87 "--SERVER" { yyextra->begin= yytext; return SERVER; }
88 "--SERVERS" { yyextra->begin= yytext; return SERVERS_OPTION; }
89
90 "--VERIFY_KEY" { yyextra->begin= yytext; return VERIFY_KEY; }
91 "--VERIFY-KEY" { yyextra->begin= yytext; return VERIFY_KEY; }
92 "--AUTO_EJECT_HOSTS" { yyextra->begin= yytext; return AUTO_EJECT_HOSTS; }
93 "--AUTO-EJECT_HOSTS" { yyextra->begin= yytext; return AUTO_EJECT_HOSTS; }
94 "--BINARY_PROTOCOL" { yyextra->begin= yytext; return BINARY_PROTOCOL; }
95 "--BINARY-PROTOCOL" { yyextra->begin= yytext; return BINARY_PROTOCOL; }
96 "--BUFFER_REQUESTS" { yyextra->begin= yytext; return BUFFER_REQUESTS; }
97 "--BUFFER-REQUESTS" { yyextra->begin= yytext; return BUFFER_REQUESTS; }
98 "--CACHE_LOOKUPS" { yyextra->begin= yytext; return CACHE_LOOKUPS; }
99 "--CACHE-LOOKUPS" { yyextra->begin= yytext; return CACHE_LOOKUPS; }
100 "--CONFIGURE_FILE" { yyextra->begin= yytext; return CONFIGURE_FILE; }
101 "--CONFIGURE-FILE" { yyextra->begin= yytext; return CONFIGURE_FILE; }
102 "--CONNECT_TIMEOUT" { yyextra->begin= yytext; return CONNECT_TIMEOUT; }
103 "--CONNECT-TIMEOUT" { yyextra->begin= yytext; return CONNECT_TIMEOUT; }
104 "--CORK" { yyextra->begin= yytext; return _CORK; }
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 "--KETAMA" { yyextra->begin= yytext; return KETAMA; }
116 "--KETAMA_HASH" { yyextra->begin= yytext; return KETAMA_HASH; }
117 "--KETAMA-HASH" { yyextra->begin= yytext; return KETAMA_HASH; }
118 "--KETAMA_WEIGHTED" { yyextra->begin= yytext; return KETAMA_WEIGHTED; }
119 "--KETAMA-WEIGHTED" { yyextra->begin= yytext; return KETAMA_WEIGHTED; }
120 "--NOREPLY" { yyextra->begin= yytext; return NOREPLY; }
121 "--NUMBER_OF_REPLICAS" { yyextra->begin= yytext; return NUMBER_OF_REPLICAS; }
122 "--NUMBER-OF-REPLICAS" { yyextra->begin= yytext; return NUMBER_OF_REPLICAS; }
123 "--POLL_TIMEOUT" { yyextra->begin= yytext; return POLL_TIMEOUT; }
124 "--POLL-TIMEOUT" { yyextra->begin= yytext; return POLL_TIMEOUT; }
125 "--RANDOMIZE_REPLICA_READ" { yyextra->begin= yytext; return RANDOMIZE_REPLICA_READ; }
126 "--RANDOMIZE-REPLICA-READ" { yyextra->begin= yytext; return RANDOMIZE_REPLICA_READ; }
127 "--RCV_TIMEOUT" { yyextra->begin= yytext; return RCV_TIMEOUT; }
128 "--RCV-TIMEOUT" { yyextra->begin= yytext; return RCV_TIMEOUT; }
129 "--RETRY_TIMEOUT" { yyextra->begin= yytext; return RETRY_TIMEOUT; }
130 "--RETRY-TIMEOUT" { yyextra->begin= yytext; return RETRY_TIMEOUT; }
131 "--SERVER_FAILURE_LIMIT" { yyextra->begin= yytext; return SERVER_FAILURE_LIMIT; }
132 "--SERVER-FAILURE-LIMIT" { yyextra->begin= yytext; return SERVER_FAILURE_LIMIT; }
133 "--SND_TIMEOUT" { yyextra->begin= yytext; return SND_TIMEOUT; }
134 "--SND-TIMEOUT" { yyextra->begin= yytext; return SND_TIMEOUT; }
135 "--SOCKET_RECV_SIZE" { yyextra->begin= yytext; return SOCKET_RECV_SIZE; }
136 "--SOCKET-RECV-SIZE" { yyextra->begin= yytext; return SOCKET_RECV_SIZE; }
137 "--SOCKET_SEND_SIZE" { yyextra->begin= yytext; return SOCKET_SEND_SIZE; }
138 "--SOCKET-SEND-SIZE" { yyextra->begin= yytext; return SOCKET_SEND_SIZE; }
139 "--SORT_HOSTS" { yyextra->begin= yytext; return SORT_HOSTS; }
140 "--SORT-HOSTS" { yyextra->begin= yytext; return SORT_HOSTS; }
141 "--SUPPORT_CAS" { yyextra->begin= yytext; return SUPPORT_CAS; }
142 "--SUPPORT-CAS" { yyextra->begin= yytext; return SUPPORT_CAS; }
143 "--TCP_NODELAY" { yyextra->begin= yytext; return _TCP_NODELAY; }
144 "--TCP-NODELAY" { yyextra->begin= yytext; return _TCP_NODELAY; }
145 "--TCP_KEEPALIVE" { yyextra->begin= yytext; return _TCP_KEEPALIVE; }
146 "--TCP-KEEPALIVE" { yyextra->begin= yytext; return _TCP_KEEPALIVE; }
147 "--TCP_KEEPIDLE" { yyextra->begin= yytext; return _TCP_KEEPIDLE; }
148 "--TCP-KEEPIDLE" { yyextra->begin= yytext; return _TCP_KEEPIDLE; }
149 "--USER_DATA" { yyextra->begin= yytext; return USER_DATA; }
150 "--USER-DATA" { yyextra->begin= yytext; return USER_DATA; }
151 "--USE_UDP" { yyextra->begin= yytext; return USE_UDP; }
152 "--USE-UDP" { yyextra->begin= yytext; return USE_UDP; }
153
154 "--PREFIX-KEY" { yyextra->begin= yytext; return PREFIX_KEY; }
155 "--PREFIX_KEY" { yyextra->begin= yytext; return PREFIX_KEY; }
156
157 INCLUDE { yyextra->begin= yytext; return INCLUDE; }
158 RESET { yyextra->begin= yytext; return RESET; }
159 DEBUG { yyextra->begin= yytext; return PARSER_DEBUG; }
160 SERVERS { yyextra->begin= yytext; return SERVERS; }
161 END { yyextra->begin= yytext; return END; }
162 ERROR { yyextra->begin= yytext; return ERROR; }
163
164 TRUE { return TRUE; }
165 FALSE { return FALSE; }
166
167
168 "--"[[:alnum:]]* {
169 yyextra->begin= yytext;
170 return UNKNOWN_OPTION;
171 }
172
173 CONSISTENT { return CONSISTENT; }
174 MODULA { return MODULA; }
175 RANDOM { return RANDOM; }
176
177 MD5 { return MD5; }
178 CRC { return CRC; }
179 FNV1_64 { return FNV1_64; }
180 FNV1A_64 { return FNV1A_64; }
181 FNV1_32 { return FNV1_32; }
182 FNV1A_32 { return FNV1A_32; }
183 HSIEH { return HSIEH; }
184 MURMUR { return MURMUR; }
185 JENKINS { return JENKINS; }
186
187 [[:alnum:]][[:alnum:].]*[[:alpha:]]: {
188 yylval->string.c_str = yytext;
189 yylval->string.length = yyleng;
190 return HOSTNAME_WITH_PORT;
191 }
192
193 [[:alnum:]]+"."[[:alpha:].]+[[:alnum:]] {
194 yylval->string.c_str = yytext;
195 yylval->string.length = yyleng;
196 return HOSTNAME;
197 }
198
199 (([[:digit:]]{1,3}"."){3}([[:digit:]]{1,3})): {
200 yylval->string.c_str = yytext;
201 yylval->string.length = yyleng;
202 return IPADDRESS_WITH_PORT;
203 }
204
205 (([[:digit:]]{1,3}"."){3}([[:digit:]]{1,3})) {
206 yylval->string.c_str = yytext;
207 yylval->string.length = yyleng;
208 return IPADDRESS;
209 }
210
211 [[:alnum:]]+ {
212 yylval->string.c_str = yytext;
213 yylval->string.length = yyleng;
214 return STRING;
215 }
216
217 (\".*\") {
218 yylval->string.c_str = yytext;
219 yylval->string.length = yyleng;
220 return QUOTED_STRING;
221 }
222
223 . {
224 yyextra->begin= yytext;
225 return UNKNOWN;
226 }
227
228 %%
229
230 void Context::init_scanner()
231 {
232 yylex_init(&scanner);
233 yyset_extra(this, scanner);
234 }
235
236 void Context::destroy_scanner()
237 {
238 yylex_destroy(scanner);
239 }
240