ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/conf_lexer.l
Revision: 876
Committed: Wed Oct 24 21:51:21 2007 UTC (17 years, 10 months ago) by michael
Original Path: ircd-hybrid-7.2/src/ircd_lexer.l
File size: 16637 byte(s)
Log Message:
Backported WATCH

File Contents

# User Rev Content
1 adx 30 /*
2     * ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3     * ircd_lexer.l: Scans the ircd configuration file for tokens.
4     *
5     * Copyright (C) 2002 by the past and present ircd coders, and others.
6     *
7     * This program is free software; you can redistribute it and/or modify
8     * it under the terms of the GNU General Public License as published by
9     * the Free Software Foundation; either version 2 of the License, or
10     * (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 General Public License for more details.
16     *
17     * You should have received a copy of the GNU General Public License
18     * along with this program; if not, write to the Free Software
19     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
20     * USA
21     *
22 knight 31 * $Id$
23 adx 30 */
24    
25     %option case-insensitive
26     %option noyywrap
27     %option nounput
28     %option never-interactive
29    
30     %{
31     #include "stdinc.h"
32     #include "tools.h"
33     #include "irc_string.h"
34     #include "common.h"
35     #include "s_conf.h"
36     #include "memory.h"
37     #include "hostmask.h"
38     #include "s_log.h"
39    
40     #include "y.tab.h"
41    
42     #undef YY_INPUT
43     #define YY_FATAL_ERROR(msg) conf_yy_fatal_error(msg)
44     #define YY_INPUT(buf,result,max_size) \
45     if (!(result = conf_fbgets(buf, max_size, conf_fbfile_in))) \
46     YY_FATAL_ERROR("input in flex scanner failed");
47     #define MAX_INCLUDE_DEPTH 10
48    
49    
50     unsigned int lineno = 1;
51     char linebuf[IRCD_BUFSIZE];
52     char conffilebuf[IRCD_BUFSIZE];
53    
54     static int include_stack_ptr = 0;
55     static YY_BUFFER_STATE include_stack[MAX_INCLUDE_DEPTH];
56     static unsigned int lineno_stack[MAX_INCLUDE_DEPTH];
57     static FBFILE *inc_fbfile_in[MAX_INCLUDE_DEPTH];
58     static char conffile_stack[MAX_INCLUDE_DEPTH][IRCD_BUFSIZE];
59     static void ccomment(void);
60     static void cinclude(void);
61     static int ieof(void);
62     %}
63    
64     WS [[:blank:]]*
65     DIGIT [[:digit:]]+
66     COMMENT ("//"|"#").*
67     qstring \"[^\"\n]*[\"\n]
68     include \.include{WS}(\<.*\>|\".*\")
69    
70     %%
71     {include} { cinclude(); }
72     "/*" { ccomment(); }
73    
74     \n.* { strcpy(linebuf, yytext+1); ++lineno; yyless(1); }
75    
76     {WS} ;
77     {COMMENT} ;
78    
79     {DIGIT} { yylval.number = atoi(yytext); return NUMBER; }
80    
81     {qstring} { if (yytext[yyleng-2] == '\\')
82     {
83     yyless(yyleng-1); /* return last quote */
84     yymore(); /* append next string */
85     }
86     else
87     {
88     yylval.string = yytext+1;
89     if(yylval.string[yyleng-2] != '"')
90     ilog(L_ERROR, "Unterminated character string");
91     else
92     {
93     int i,j;
94    
95     yylval.string[yyleng-2] = '\0'; /* remove close
96     * quote
97     */
98    
99     for (j=i=0 ;yylval.string[i] != '\0'; i++,j++)
100     {
101     if (yylval.string[i] != '\\')
102     {
103     yylval.string[j] = yylval.string[i];
104     }
105     else
106     {
107     i++;
108     if (yylval.string[i] == '\0') /* XXX
109     * should not
110     * happen
111     */
112     {
113     ilog(L_ERROR,
114     "Unterminated character string");
115     break;
116     }
117     yylval.string[j] = yylval.string[i];
118     }
119     }
120     yylval.string[j] = '\0';
121     return QSTRING;
122     }
123     }
124     }
125    
126     ~ { return NOT; }
127     accept_password { return ACCEPT_PASSWORD; }
128     action { return ACTION; }
129     admin { return ADMIN; }
130     administrator { return ADMIN; }
131     aftype { return AFTYPE; }
132     all { return T_ALL; }
133     allow { return T_ALLOW; }
134     auth { return IRCD_AUTH; }
135     autoconn { return AUTOCONN; }
136     block { return T_BLOCK; }
137     burst_away { return BURST_AWAY; }
138     burst_topicwho { return BURST_TOPICWHO; }
139     can_flood { return CAN_FLOOD; }
140     can_idle { return CAN_IDLE; }
141     caller_id_wait { return CALLER_ID_WAIT; }
142     opers_bypass_callerid { return OPERS_BYPASS_CALLERID; }
143     channel { return CHANNEL; }
144     cidr_bitlen_ipv4 { return CIDR_BITLEN_IPV4; }
145     cidr_bitlen_ipv6 { return CIDR_BITLEN_IPV6; }
146     cipher_preference { return CIPHER_PREFERENCE; }
147     class { return CLASS; }
148     client_flood { return T_CLIENT_FLOOD; }
149     cluster { return T_CLUSTER; }
150     compressed { return COMPRESSED; }
151     compression_level { return COMPRESSION_LEVEL; }
152     connect { return CONNECT; }
153     connectfreq { return CONNECTFREQ; }
154     cryptlink { return CRYPTLINK; }
155     default_cipher_preference { return DEFAULT_CIPHER_PREFERENCE; }
156     default_floodcount { return DEFAULT_FLOODCOUNT; }
157     default_split_server_count { return DEFAULT_SPLIT_SERVER_COUNT; }
158     default_split_user_count { return DEFAULT_SPLIT_USER_COUNT; }
159     deny { return DENY; }
160     description { return DESCRIPTION; }
161     die { return DIE; }
162     disable_auth { return DISABLE_AUTH; }
163 michael 632 disable_fake_channels { return DISABLE_FAKE_CHANNELS; }
164 adx 30 disable_hidden { return DISABLE_HIDDEN; }
165     disable_local_channels { return DISABLE_LOCAL_CHANNELS; }
166     disable_remote_commands { return DISABLE_REMOTE_COMMANDS; }
167     dot_in_ip6_addr { return DOT_IN_IP6_ADDR; }
168     dots_in_ident { return DOTS_IN_IDENT; }
169     duration { return DURATION; }
170     egdpool_path { return EGDPOOL_PATH; }
171     email { return EMAIL; }
172     enable { return ENABLE; }
173     encrypted { return ENCRYPTED; }
174     exceed_limit { return EXCEED_LIMIT; }
175     exempt { return EXEMPT; }
176     fakename { return FAKENAME; }
177     flags { return IRCD_FLAGS; }
178     flatten_links { return FLATTEN_LINKS; }
179     fglinelog { return FGLINELOG; }
180     fname_glinelog { return FGLINELOG; }
181     fkilllog { return FKILLLOG; }
182     fioerrlog { return FIOERRLOG; }
183     fname_ioerrlog { return FIOERRLOG; }
184     fname_killlog { return FKILLLOG; }
185     fklinelog { return FKLINELOG; }
186     fname_klinelog { return FKLINELOG; }
187     ffailed_operlog { return FFAILED_OPERLOG; }
188     fname_operlog { return FOPERLOG; }
189     foperlog { return FOPERLOG; }
190     fname_userlog { return FUSERLOG; }
191     fuserlog { return FUSERLOG; }
192     gecos { return GECOS; }
193     general { return GENERAL; }
194     gline { return GLINE; }
195     glines { return GLINES; }
196     gline_exempt { return GLINE_EXEMPT; }
197     gline_min_cidr { return GLINE_MIN_CIDR; }
198     gline_min_cidr6 { return GLINE_MIN_CIDR6; }
199     global_kill { return GLOBAL_KILL; }
200     have_ident { return NEED_IDENT; }
201     need_ident { return NEED_IDENT; }
202     havent_read_conf { return HAVENT_READ_CONF; }
203     hidden { return HIDDEN; }
204     hidden_admin { return HIDDEN_ADMIN; }
205     hidden_name { return HIDDEN_NAME; }
206     hidden_oper { return HIDDEN_OPER; }
207     hide_server_ips { return HIDE_SERVER_IPS; }
208     hide_servers { return HIDE_SERVERS; }
209     hide_spoof_ips { return HIDE_SPOOF_IPS; }
210     host { return HOST; }
211     hub { return HUB; }
212     hub_mask { return HUB_MASK; }
213     idletime { return IDLETIME; }
214     ignore_bogus_ts { return IGNORE_BOGUS_TS; }
215     invisible_on_connect { return INVISIBLE_ON_CONNECT; }
216     ip { return IP; }
217     ipv4 { return T_IPV4; }
218     ipv6 { return T_IPV6; }
219     join_flood_count { return JOIN_FLOOD_COUNT; }
220     join_flood_time { return JOIN_FLOOD_TIME; }
221     kill { return KILL; }
222     kill_chase_time_limit { return KILL_CHASE_TIME_LIMIT; }
223     kline { return KLINE; }
224     kline_exempt { return KLINE_EXEMPT; }
225     l_crit { return T_L_CRIT; }
226     l_debug { return T_L_DEBUG; }
227     l_error { return T_L_ERROR; }
228     l_info { return T_L_INFO; }
229     l_notice { return T_L_NOTICE; }
230     l_trace { return T_L_TRACE; }
231     l_warn { return T_L_WARN; }
232     lazylink { return LAZYLINK; }
233     leaf_mask { return LEAF_MASK; }
234     listen { return LISTEN; }
235     log_level { return LOG_LEVEL; }
236     log { return LOGGING; }
237     logging { return LOGGING; }
238     logpath { return T_LOGPATH; }
239     masked { return TMASKED; }
240     max_clients { return T_MAX_CLIENTS; }
241     max_ident { return MAX_IDENT; }
242     max_local { return MAX_LOCAL; }
243     max_global { return MAX_GLOBAL; }
244     max_number { return MAX_NUMBER; }
245 michael 876 max_watch { return MAX_WATCH; }
246 adx 30 message_locale { return MESSAGE_LOCALE; }
247     min_nonwildcard { return MIN_NONWILDCARD; }
248     min_nonwildcard_simple { return MIN_NONWILDCARD_SIMPLE; }
249     name { return NAME; }
250     need_password { return NEED_PASSWORD; }
251     network_desc { return NETWORK_DESC; }
252     network_name { return NETWORK_NAME; }
253     nick { return NICK; }
254     nick_changes { return NICK_CHANGES; }
255     no { yylval.number = NO; return TBOOL; }
256     no_create_on_split { return NO_CREATE_ON_SPLIT; }
257     no_join_on_split { return NO_JOIN_ON_SPLIT; }
258     no_oper_flood { return NO_OPER_FLOOD; }
259     no_tilde { return NO_TILDE; }
260     number_per_cidr { return NUMBER_PER_CIDR; }
261     number_per_ip { return NUMBER_PER_IP; }
262     oper { return OPERATOR; }
263     oper_log { return OPER_LOG; }
264     oper_pass_resv { return OPER_PASS_RESV; }
265     operator { return OPERATOR; }
266     passwd { return PASSWORD; }
267     password { return PASSWORD; }
268     ping_cookie { return PING_COOKIE; }
269     ping_time { return PING_TIME; }
270     ping_warning { return PING_WARNING; }
271     port { return PORT; }
272     quarantine { return RESV; }
273     quiet_on_ban { return QUIET_ON_BAN; }
274     reason { return REASON; }
275     redirport { return REDIRPORT; }
276     redirserv { return REDIRSERV; }
277     regex { return REGEX_T; }
278     rehash { return REHASH; }
279     reject { return T_REJECT; }
280     reject_hold_time { return TREJECT_HOLD_TIME; }
281     remote { return REMOTE; }
282     remoteban { return REMOTEBAN; }
283     restrict_channels { return RESTRICT_CHANNELS; }
284     resv { return RESV; }
285     resv_exempt { return RESV_EXEMPT; }
286     rsa_private_key_file { return RSA_PRIVATE_KEY_FILE; }
287     rsa_public_key_file { return RSA_PUBLIC_KEY_FILE; }
288     ssl { return T_SSL; }
289     ssl_certificate_file { return SSL_CERTIFICATE_FILE; }
290     send_password { return SEND_PASSWORD; }
291     sendq { return SENDQ; }
292     serverhide { return SERVERHIDE; }
293     serverinfo { return SERVERINFO; }
294     servlink_path { return SERVLINK_PATH; }
295     shared { return T_SHARED; }
296     short_motd { return SHORT_MOTD; }
297     sid { return IRCD_SID; }
298     silent { return SILENT; }
299     spoof { return SPOOF; }
300     spoof_notice { return SPOOF_NOTICE; }
301     tkline_expire_notices { return TKLINE_EXPIRE_NOTICES; }
302     type { return TYPE; }
303     true_no_oper_flood { return TRUE_NO_OPER_FLOOD; }
304 michael 56 umodes { return T_UMODES; }
305 adx 30 unkline { return UNKLINE; }
306     use_egd { return USE_EGD; }
307     use_except { return USE_EXCEPT; }
308     use_invex { return USE_INVEX; }
309     use_knock { return USE_KNOCK; }
310     use_logging { return USE_LOGGING; }
311     use_whois_actually { return USE_WHOIS_ACTUALLY; }
312     throttle_time { return THROTTLE_TIME; }
313     user { return USER; }
314     tkline { return TKLINE; }
315     txline { return TXLINE; }
316     tresv { return TRESV; }
317     vhost { return VHOST; }
318     vhost6 { return VHOST6; }
319     warn { return WARN; }
320     xline { return XLINE; }
321     yes { yylval.number = YES; return TBOOL; }
322    
323     failed_oper_notice { return FAILED_OPER_NOTICE; }
324     max_accept { return MAX_ACCEPT; }
325     max_nick_changes { return MAX_NICK_CHANGES; }
326     max_chans_per_user { return MAX_CHANS_PER_USER; }
327     max_nick_time { return MAX_NICK_TIME; }
328     anti_nick_flood { return ANTI_NICK_FLOOD; }
329     anti_spam_exit_message_time { return ANTI_SPAM_EXIT_MESSAGE_TIME; }
330     ts_max_delta { return TS_MAX_DELTA; }
331     ts_warn_delta { return TS_WARN_DELTA; }
332     links_delay { return LINKS_DELAY; }
333     kline_reason { return KLINE_REASON; }
334     kline_with_reason { return KLINE_WITH_REASON; }
335     warn_no_nline { return WARN_NO_NLINE; }
336    
337 michael 584 stats_e_disabled { return STATS_E_DISABLED; }
338 adx 30 stats_o_oper_only { return STATS_O_OPER_ONLY; }
339     stats_k_oper_only { return STATS_K_OPER_ONLY; }
340     stats_i_oper_only { return STATS_I_OPER_ONLY; }
341     stats_P_oper_only { return STATS_P_OPER_ONLY; }
342     pace_wait { return PACE_WAIT; }
343     pace_wait_simple { return PACE_WAIT_SIMPLE; }
344     knock_delay { return KNOCK_DELAY; }
345     knock_delay_channel { return KNOCK_DELAY_CHANNEL; }
346     max_bans { return MAX_BANS; }
347     modules { return MODULES; }
348     module { return MODULE; }
349     path { return PATH; }
350     max_targets { return MAX_TARGETS; }
351    
352     unxline { return T_UNXLINE; }
353     unresv { return T_UNRESV; }
354    
355     oper_only_umodes { return OPER_ONLY_UMODES; }
356     oper_umodes { return OPER_UMODES; }
357     bots { return T_BOTS; }
358     cconn { return T_CCONN; }
359 db 849 cconn_full { return T_CCONN_FULL; }
360 adx 30 deaf { return T_DEAF; }
361     debug { return T_DEBUG; }
362     full { return T_FULL; }
363     skill { return T_SKILL; }
364     nchange { return T_NCHANGE; }
365     rej { return T_REJ; }
366     unauth { return T_UNAUTH; }
367     spy { return T_SPY; }
368     external { return T_EXTERNAL; }
369     operwall { return T_OPERWALL; }
370     servnotice { return T_SERVNOTICE; }
371     invisible { return T_INVISIBLE; }
372     wallop { return T_WALLOP; }
373     callerid { return T_CALLERID; }
374     softcallerid { return T_SOFTCALLERID; }
375     drone { return T_DRONE; }
376     locops { return T_LOCOPS; }
377     topicburst { return TOPICBURST; }
378    
379     weeks { return WEEKS; }
380     week { return WEEKS; }
381     days { return DAYS; }
382     day { return DAYS; }
383     hours { return HOURS; }
384     hour { return HOURS; }
385     minutes { return MINUTES; }
386     minute { return MINUTES; }
387     seconds { return SECONDS; }
388     second { return SECONDS; }
389    
390     bytes { return BYTES; }
391     byte { return BYTES; }
392     kilobytes { return KBYTES; }
393     kilobyte { return KBYTES; }
394     kbytes { return KBYTES; }
395     kbyte { return KBYTES; }
396     kb { return KBYTES; }
397     megabytes { return MBYTES; }
398     megabyte { return MBYTES; }
399     mbytes { return MBYTES; }
400     mbyte { return MBYTES; }
401     mb { return MBYTES; }
402     gigabytes { return GBYTES; }
403     gigabyte { return GBYTES; }
404     gbytes { return GBYTES; }
405     gbyte { return GBYTES; }
406     gb { return GBYTES; }
407     terabytes { return TBYTES; }
408     terabyte { return TBYTES; }
409     tbytes { return TBYTES; }
410     tbyte { return TBYTES; }
411     tb { return TBYTES; }
412     \.\. { return TWODOTS; }
413    
414     . { return yytext[0]; }
415     <<EOF>> { if (ieof()) yyterminate(); }
416    
417     %%
418    
419     /* C-comment ignoring routine -kre*/
420     static void
421     ccomment(void)
422     {
423     int c = 0;
424    
425     /* log(L_NOTICE, "got comment"); */
426     while (1)
427     {
428     while ((c = input()) != '*' && c != EOF)
429     if (c == '\n')
430     ++lineno;
431    
432     if (c == '*')
433     {
434     while ((c = input()) == '*')
435     /* Nothing */ ;
436     if (c == '/')
437     break;
438     else if (c == '\n')
439     ++lineno;
440     }
441    
442     if (c == EOF)
443     {
444     YY_FATAL_ERROR("EOF in comment");
445     /* XXX hack alert this disables
446     * the stupid unused function warning
447     * gcc generates
448     */
449     if (1 == 0)
450     yy_fatal_error("EOF in comment");
451     break;
452     }
453     }
454     }
455    
456     /* C-style .includes. This function will properly swap input conf buffers,
457     * and lineno -kre */
458     static void
459     cinclude(void)
460     {
461     char *p = NULL;
462    
463     if ((p = strchr(yytext, '<')) == NULL)
464     *strchr(p = strchr(yytext, '"') + 1, '"') = '\0';
465     else
466     *strchr(++p, '>') = '\0';
467    
468     /* log(L_NOTICE, "got include %s!", c); */
469    
470     /* do stacking and co. */
471     if (include_stack_ptr >= MAX_INCLUDE_DEPTH)
472     ilog(L_ERROR, "Includes nested too deep in %s", p);
473     else
474     {
475     FBFILE *tmp_fbfile_in = NULL;
476     char filenamebuf[IRCD_BUFSIZE];
477    
478     if (*p == '/') /* if it is an absolute path */
479     snprintf(filenamebuf, sizeof(filenamebuf), "%s", p);
480     else
481     snprintf(filenamebuf, sizeof(filenamebuf), "%s/%s", ETCPATH, p);
482    
483     tmp_fbfile_in = fbopen(filenamebuf, "r");
484    
485     if (tmp_fbfile_in == NULL)
486     {
487     ilog(L_ERROR, "Unable to read configuration file '%s': %s",
488     filenamebuf, strerror(errno));
489     return;
490     }
491    
492     lineno_stack[include_stack_ptr] = lineno;
493     lineno = 1;
494     inc_fbfile_in[include_stack_ptr] = conf_fbfile_in;
495     strlcpy(conffile_stack[include_stack_ptr], conffilebuf, IRCD_BUFSIZE);
496     include_stack[include_stack_ptr++] = YY_CURRENT_BUFFER;
497     conf_fbfile_in = tmp_fbfile_in;
498 michael 711 snprintf(conffilebuf, sizeof(conffilebuf), "%s", filenamebuf);
499 adx 30 yy_switch_to_buffer(yy_create_buffer(yyin, YY_BUF_SIZE));
500     }
501     }
502    
503     /* This is function that will be called on EOF in conf file. It will
504     * apropriately close conf if it not main conf and swap input buffers -kre
505     * */
506     static int
507     ieof(void)
508     {
509     /* log(L_NOTICE, "return from include stack!"); */
510     if (include_stack_ptr)
511     fbclose(conf_fbfile_in);
512     if (--include_stack_ptr < 0)
513     {
514     /* log(L_NOTICE, "terminating lexer"); */
515     /* We will now exit the lexer - restore init values if we get /rehash
516     * later and reenter lexer -kre */
517     include_stack_ptr = 0;
518     lineno = 1;
519     return 1;
520     }
521    
522     /* switch buffer */
523     /* log(L_NOTICE, "deleting include_stack_ptr=%d", include_stack_ptr); */
524     yy_delete_buffer(YY_CURRENT_BUFFER);
525     lineno = lineno_stack[include_stack_ptr];
526     conf_fbfile_in = inc_fbfile_in[include_stack_ptr];
527     strlcpy(conffilebuf, conffile_stack[include_stack_ptr], sizeof(conffilebuf));
528     yy_switch_to_buffer(include_stack[include_stack_ptr]);
529    
530     return 0;
531     }

Properties

Name Value
svn:eol-style native
svn:keywords Id Revision