trunk/src/config-lexer.l

/*
 *  Copyright (c) 2002 Erik Fears
 *  Copyright (c) 2014-2017 ircd-hybrid development team
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
 *  USA
 */

%option case-insensitive
%option noyywrap
%option noinput
%option nounput
%option never-interactive

%x IN_COMMENT

%{
#include <stdio.h>
#include <string.h>

#include "compat.h"
#include "config.h"
#include "config-parser.h"  /* autogenerated header file */
#include "log.h"

#undef YY_FATAL_ERROR
#define YY_FATAL_ERROR(msg) conf_yy_fatal_error(msg)

#undef YY_INPUT
#define YY_INPUT(buf,result,max_size) \
  if (!(result = conf_yy_input(buf, max_size))) \
    YY_FATAL_ERROR("input in flex scanner failed");
#define MAX_INCLUDE_DEPTH 10


unsigned int lineno = 1;
char linebuf[512];
char conffilebuf[512];

static struct included_file
{
  YY_BUFFER_STATE state;
  unsigned int lineno;
  FILE *file;
  char conffile[512];
} include_stack[MAX_INCLUDE_DEPTH];

static unsigned int include_stack_ptr;


static void conf_include(void);
static int conf_eof(void);

static int
conf_yy_input(char *lbuf, unsigned int max_size)
{
  return fgets(lbuf, max_size, conf_file) == NULL ? 0 : strlen(lbuf);
}

static int
conf_yy_fatal_error(const char *msg)
{
  return 0;
}
%}

WS        [[:blank:]]*
DIGIT     [[:digit:]]+
COMMENT   ("//"|"#").*
qstring   \"[^\"\n]*[\"\n]
include   \.include{WS}(\<.*\>|\".*\")

%%

"/*"                { BEGIN IN_COMMENT; }
<IN_COMMENT>"*/"    { BEGIN INITIAL;    }
<IN_COMMENT>.       ;  /* Eat everything but a newline */
<IN_COMMENT>\n      { ++lineno; }
<IN_COMMENT><<EOF>> { BEGIN INITIAL; if (conf_eof()) yyterminate(); }

{include}       { conf_include(); }
\n.*            { strlcpy(linebuf, yytext + 1, sizeof(linebuf)); ++lineno; yyless(1); }
{WS}            ;
{COMMENT}       ;
{DIGIT}         { yylval.number = atoi(yytext); return NUMBER; }
{qstring}       { if (yytext[yyleng - 2] == '\\')
                  {
                    yyless(yyleng - 1);  /* Return last quote */
                    yymore();  /* Append next string */
                  }
                  else
                  {
                    yylval.string = yytext + 1;

                    if (yylval.string[yyleng - 2] != '"')
                      log_printf("CONFIG ->Unterminated character string");
                    else
                    {
                      unsigned int i = 0, j = 0;

                      yylval.string[yyleng - 2] = '\0';  /* Remove close quote */

                      for (; yylval.string[i] != '\0'; ++i, ++j)
                      {
                        if (yylval.string[i] != '\\')
                          yylval.string[j] = yylval.string[i];
                        else
                        {
                          ++i;

                          if (yylval.string[i] == '\0')  /* XXX: should not happen */
                          {
                            log_printf("CONFIG -> Unterminated character string");
                            break;
                          }

                          yylval.string[j] = yylval.string[i];
                        }
                      }

                      yylval.string[j] = '\0';
                      return STRING;
                    }
                  }
                }

ADDRESS_FAMILY          { return ADDRESS_FAMILY; }
AWAY                    { return AWAY;         }
BAN_UNKNOWN             { return BAN_UNKNOWN;  }
BLACKLIST               { return BLACKLIST;    }
CHANNEL                 { return CHANNEL;      }
COMMAND_INTERVAL        { return COMMAND_INTERVAL; }
COMMAND_QUEUE_SIZE      { return COMMAND_QUEUE_SIZE; }
COMMAND_TIMEOUT         { return COMMAND_TIMEOUT; }
CONNREGEX               { return CONNREGEX;    }
DNS_FDLIMIT             { return DNS_FDLIMIT;  }
DNS_TIMEOUT             { return DNS_TIMEOUT;  }
DNSBL_FROM              { return DNSBL_FROM;   }
DNSBL_TO                { return DNSBL_TO;     }
EXEMPT                  { return EXEMPT;       }
FD                      { return FD;           }
INVITE                  { return INVITE;       }
IPV4                    { return IPV4;         }
IPV6                    { return IPV6;         }
IRC                     { return IRC;          }
KLINE                   { return KLINE;        }
KEY                     { return KEY;          }
MASK                    { return MASK;         }
MAX_READ                { return MAX_READ;     }
MODE                    { return MODE;         }
NAME                    { return NAME;         }
NEGCACHE                { return NEGCACHE;     }
NEGCACHE_REBUILD        { return NEGCACHE_REBUILD; }
NICK                    { return NICK;         }
NICKSERV                { return NICKSERV;     }
NOTICE                  { return NOTICE;       }
OPER                    { return OPER;         }
OPM                     { return OPM;          }
OPTIONS                 { return OPTIONS;      }
PASSWORD                { return PASSWORD;     }
PERFORM                 { return PERFORM;      }
PIDFILE                 { return PIDFILE;      }
PORT                    { return PORT;         }
PROTOCOL                { return PROTOCOL;     }
READTIMEOUT             { return READTIMEOUT;  }
REALNAME                { return REALNAME;     }
RECONNECTINTERVAL       { return RECONNECTINTERVAL; }
REPLY                   { return REPLY;        }
SCANLOG                 { return SCANLOG;      }
SCANNER                 { return SCANNER;      }
SENDMAIL                { return SENDMAIL;     }
SERVER                  { return SERVER;       }
TARGET_IP               { return TARGET_IP;    }
TARGET_PORT             { return TARGET_PORT;  }
TARGET_STRING           { return TARGET_STRING;}
TIMEOUT                 { return TIMEOUT;      }
TYPE                    { return TYPE;         }
USER                    { return USER;         }
USERNAME                { return USERNAME;     }
VHOST                   { return VHOST;        }

years                   { return YEARS; }
year                    { return YEARS; }
months                  { return MONTHS; }
month                   { return MONTHS; }
weeks                   { return WEEKS; }
week                    { return WEEKS; }
days                    { return DAYS; }
day                     { return DAYS; }
hours                   { return HOURS; }
hour                    { return HOURS; }
minutes                 { return MINUTES; }
minute                  { return MINUTES; }
seconds                 { return SECONDS; }
second                  { return SECONDS; }

bytes                   { return BYTES; }
byte                    { return BYTES; }
kilobytes               { return KBYTES; }
kilobyte                { return KBYTES; }
kbytes                  { return KBYTES; }
kbyte                   { return KBYTES; }
kb                      { return KBYTES; }
megabytes               { return MBYTES; }
megabyte                { return MBYTES; }
mbytes                  { return MBYTES; }
mbyte                   { return MBYTES; }
mb                      { return MBYTES; }

HTTP                    {
                          yylval.number = OPM_TYPE_HTTP;
                          return PROTOCOLTYPE;
                        }

HTTPPOST                {
                          yylval.number = OPM_TYPE_HTTPPOST;
                          return PROTOCOLTYPE;
                        }

HTTPS                   {
                          yylval.number = OPM_TYPE_HTTPS;
                          return PROTOCOLTYPE;
                        }

HTTPSPOST               {
                          yylval.number = OPM_TYPE_HTTPSPOST;
                          return PROTOCOLTYPE;
                        }

SOCKS4                  {
                          yylval.number = OPM_TYPE_SOCKS4;
                          return PROTOCOLTYPE;
                        }

SOCKS5                  {
                          yylval.number = OPM_TYPE_SOCKS5;
                          return PROTOCOLTYPE;
                        }

WINGATE                 {
                          yylval.number = OPM_TYPE_WINGATE;
                          return PROTOCOLTYPE;
                        }

ROUTER                  {
                          yylval.number = OPM_TYPE_ROUTER;
                          return PROTOCOLTYPE;
                        }

DREAMBOX                {
                          yylval.number = OPM_TYPE_DREAMBOX;
                          return PROTOCOLTYPE;
                        }


TRUE                     {
                           yylval.number=1;
                           return NUMBER;
                         }
YES                      {
                           yylval.number=1;
                           return NUMBER;
                         }
ON                       {
                           yylval.number=1;
                           return NUMBER;
                         }


FALSE                    {
                           yylval.number=0;
                           return NUMBER;
                         }

NO                       {
                           yylval.number=0;
                           return NUMBER;
                         }

OFF                      {
                           yylval.number=0;
                           return NUMBER;
                         }

.                       { return yytext[0]; }
<<EOF>>                 { if (conf_eof()) yyterminate(); }

%%

static void
conf_include(void)
{
  char *p = NULL;
  char filenamebuf[512];

  if ((p = strchr(yytext, '<')) == NULL)
    *strchr(p = strchr(yytext, '"') + 1, '"') = '\0';
  else
    *strchr(++p, '>') = '\0';

  /* do stacking and co. */
  if (include_stack_ptr >= MAX_INCLUDE_DEPTH)
  {
    log_printf("CONFIG -> Includes nested too deep in %s", p);
    return;
  }

  if (*p == '/')  /* if it is an absolute path */
    snprintf(filenamebuf, sizeof(filenamebuf), "%s", p);
  else
    snprintf(filenamebuf, sizeof(filenamebuf), "%s/%s", HOPM_ETCDIR, p);

  FILE *tmp_fbfile_in = fopen(filenamebuf, "r");
  if (!tmp_fbfile_in)
  {
    log_printf("CONFIG -> Unable to read configuration file '%s': %s",
               filenamebuf, strerror(errno));
    return;
  }

  struct included_file *file = &include_stack[include_stack_ptr++];
  file->lineno = lineno;
  file->file = conf_file;
  file->state = YY_CURRENT_BUFFER;
  strlcpy(file->conffile, conffilebuf, sizeof(file->conffile));

  lineno = 1;
  conf_file = tmp_fbfile_in;
  strlcpy(conffilebuf, filenamebuf, sizeof(conffilebuf));

  yy_switch_to_buffer(yy_create_buffer(NULL, YY_BUF_SIZE));
}

static int
conf_eof(void)
{
  if (include_stack_ptr == 0)
    return 1;

  /* switch buffer */
  struct included_file *file = &include_stack[--include_stack_ptr];

  /* close current file */
  fclose(conf_file);

  /* switch buffers */
  yy_delete_buffer(YY_CURRENT_BUFFER);
  yy_switch_to_buffer(file->state);

  /* switch lineno */
  lineno = file->lineno;

  /* switch file */
  conf_file = file->file;

  strlcpy(conffilebuf, file->conffile, sizeof(conffilebuf));
  return 0;
}
Revision:	8098
Committed:	Sun Apr 2 10:09:50 2017 UTC (9 years, 4 months ago) by michael
File size:	11747 byte(s)
Log Message:	- Added IPv6 blacklist support. Initial patch by Andreas Rammhold.
#	User	Rev	Content
1	michael	5052	/*
2	michael	5351	* Copyright (c) 2002 Erik Fears
3	michael	7927	* Copyright (c) 2014-2017 ircd-hybrid development team
4	michael	5052	*
5	michael	5351	* This program is free software; you can redistribute it and/or modify
6			* it under the terms of the GNU General Public License as published by
7			* the Free Software Foundation; either version 2 of the License, or
8			* (at your option) any later version.
9	michael	5052	*
10	michael	5351	* This program is distributed in the hope that it will be useful,
11			* but WITHOUT ANY WARRANTY; without even the implied warranty of
12			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13			* GNU General Public License for more details.
14	michael	5052	*
15	michael	5351	* You should have received a copy of the GNU General Public License
16			* along with this program; if not, write to the Free Software
17			* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
18			* USA
19	michael	5052	*/
20
21			%option case-insensitive
22			%option noyywrap
23	michael	7750	%option noinput
24	michael	5052	%option nounput
25	michael	5687	%option never-interactive
26	michael	5052
27	michael	7748	%x IN_COMMENT
28
29	michael	5052	%{
30			#include <stdio.h>
31			#include <string.h>
32	michael	5078
33			#include "compat.h"
34	michael	5052	#include "config.h"
35	michael	7711	#include "config-parser.h" /* autogenerated header file */
36			#include "log.h"
37	michael	5052
38	michael	7719	#undef YY_FATAL_ERROR
39			#define YY_FATAL_ERROR(msg) conf_yy_fatal_error(msg)
40	michael	5052
41	michael	7711	#undef YY_INPUT
42			#define YY_INPUT(buf,result,max_size) \
43			if (!(result = conf_yy_input(buf, max_size))) \
44			YY_FATAL_ERROR("input in flex scanner failed");
45			#define MAX_INCLUDE_DEPTH 10
46	michael	5052
47	michael	7711
48			unsigned int lineno = 1;
49	michael	5052	char linebuf[512];
50	michael	7711	char conffilebuf[512];
51	michael	5052
52	michael	7711	static struct included_file
53			{
54			YY_BUFFER_STATE state;
55			unsigned int lineno;
56			FILE *file;
57			char conffile[512];
58			} include_stack[MAX_INCLUDE_DEPTH];
59
60			static unsigned int include_stack_ptr;
61
62
63			static void conf_include(void);
64			static int conf_eof(void);
65
66			static int
67			conf_yy_input(char *lbuf, unsigned int max_size)
68			{
69	michael	7719	return fgets(lbuf, max_size, conf_file) == NULL ? 0 : strlen(lbuf);
70	michael	7711	}
71
72	michael	7719	static int
73			conf_yy_fatal_error(const char *msg)
74			{
75			return 0;
76			}
77	michael	5052	%}
78
79	michael	7716	WS [[:blank:]]*
80			DIGIT [[:digit:]]+
81			COMMENT ("//"\|"#").*
82			qstring \"[^\"\n]*[\"\n]
83			include \.include{WS}(\<.\>\|\".\")
84	michael	5052
85			%%
86	michael	7748
87			"/*" { BEGIN IN_COMMENT; }
88			<IN_COMMENT>"*/" { BEGIN INITIAL; }
89			<IN_COMMENT>. ; /* Eat everything but a newline */
90			<IN_COMMENT>\n { ++lineno; }
91			<IN_COMMENT><<EOF>> { BEGIN INITIAL; if (conf_eof()) yyterminate(); }
92
93	michael	7716	{include} { conf_include(); }
94			\n.* { strlcpy(linebuf, yytext + 1, sizeof(linebuf)); ++lineno; yyless(1); }
95			{WS} ;
96			{COMMENT} ;
97			{DIGIT} { yylval.number = atoi(yytext); return NUMBER; }
98			{qstring} { if (yytext[yyleng - 2] == '\\')
99			{
100			yyless(yyleng - 1); /* Return last quote */
101			yymore(); /* Append next string */
102			}
103			else
104			{
105			yylval.string = yytext + 1;
106	michael	5052
107	michael	7716	if (yylval.string[yyleng - 2] != '"')
108			log_printf("CONFIG ->Unterminated character string");
109			else
110			{
111			unsigned int i = 0, j = 0;
112	michael	5052
113	michael	7716	yylval.string[yyleng - 2] = '\0'; /* Remove close quote */
114	michael	5052
115	michael	7716	for (; yylval.string[i] != '\0'; ++i, ++j)
116			{
117			if (yylval.string[i] != '\\')
118			yylval.string[j] = yylval.string[i];
119			else
120			{
121			++i;
122	michael	5052
123	michael	7716	if (yylval.string[i] == '\0') /* XXX: should not happen */
124			{
125			log_printf("CONFIG -> Unterminated character string");
126			break;
127			}
128	michael	5052
129	michael	7716	yylval.string[j] = yylval.string[i];
130	michael	5052	}
131	michael	7716	}
132	michael	5052
133	michael	7716	yylval.string[j] = '\0';
134			return STRING;
135			}
136			}
137			}
138
139	michael	8098	ADDRESS_FAMILY { return ADDRESS_FAMILY; }
140	michael	5052	AWAY { return AWAY; }
141			BAN_UNKNOWN { return BAN_UNKNOWN; }
142			BLACKLIST { return BLACKLIST; }
143			CHANNEL { return CHANNEL; }
144	michael	7014	COMMAND_INTERVAL { return COMMAND_INTERVAL; }
145			COMMAND_QUEUE_SIZE { return COMMAND_QUEUE_SIZE; }
146			COMMAND_TIMEOUT { return COMMAND_TIMEOUT; }
147	michael	5052	CONNREGEX { return CONNREGEX; }
148			DNS_FDLIMIT { return DNS_FDLIMIT; }
149	michael	6200	DNS_TIMEOUT { return DNS_TIMEOUT; }
150	michael	5052	DNSBL_FROM { return DNSBL_FROM; }
151			DNSBL_TO { return DNSBL_TO; }
152			EXEMPT { return EXEMPT; }
153			FD { return FD; }
154			INVITE { return INVITE; }
155	michael	8098	IPV4 { return IPV4; }
156			IPV6 { return IPV6; }
157	michael	5052	IRC { return IRC; }
158			KLINE { return KLINE; }
159			KEY { return KEY; }
160			MASK { return MASK; }
161			MAX_READ { return MAX_READ; }
162			MODE { return MODE; }
163			NAME { return NAME; }
164			NEGCACHE { return NEGCACHE; }
165	michael	5332	NEGCACHE_REBUILD { return NEGCACHE_REBUILD; }
166	michael	5052	NICK { return NICK; }
167			NICKSERV { return NICKSERV; }
168	michael	5405	NOTICE { return NOTICE; }
169	michael	5052	OPER { return OPER; }
170			OPM { return OPM; }
171			OPTIONS { return OPTIONS; }
172			PASSWORD { return PASSWORD; }
173			PERFORM { return PERFORM; }
174			PIDFILE { return PIDFILE; }
175			PORT { return PORT; }
176			PROTOCOL { return PROTOCOL; }
177	michael	5198	READTIMEOUT { return READTIMEOUT; }
178	michael	5052	REALNAME { return REALNAME; }
179	michael	6078	RECONNECTINTERVAL { return RECONNECTINTERVAL; }
180	michael	5052	REPLY { return REPLY; }
181			SCANLOG { return SCANLOG; }
182			SCANNER { return SCANNER; }
183			SENDMAIL { return SENDMAIL; }
184			SERVER { return SERVER; }
185			TARGET_IP { return TARGET_IP; }
186			TARGET_PORT { return TARGET_PORT; }
187			TARGET_STRING { return TARGET_STRING;}
188			TIMEOUT { return TIMEOUT; }
189			TYPE { return TYPE; }
190			USER { return USER; }
191			USERNAME { return USERNAME; }
192			VHOST { return VHOST; }
193
194	michael	5080	years { return YEARS; }
195			year { return YEARS; }
196			months { return MONTHS; }
197			month { return MONTHS; }
198			weeks { return WEEKS; }
199			week { return WEEKS; }
200			days { return DAYS; }
201			day { return DAYS; }
202			hours { return HOURS; }
203			hour { return HOURS; }
204			minutes { return MINUTES; }
205			minute { return MINUTES; }
206			seconds { return SECONDS; }
207			second { return SECONDS; }
208	michael	5052
209	michael	5080	bytes { return BYTES; }
210			byte { return BYTES; }
211			kilobytes { return KBYTES; }
212			kilobyte { return KBYTES; }
213			kbytes { return KBYTES; }
214			kbyte { return KBYTES; }
215			kb { return KBYTES; }
216			megabytes { return MBYTES; }
217			megabyte { return MBYTES; }
218			mbytes { return MBYTES; }
219			mbyte { return MBYTES; }
220			mb { return MBYTES; }
221
222	michael	5052	HTTP {
223			yylval.number = OPM_TYPE_HTTP;
224			return PROTOCOLTYPE;
225			}
226
227			HTTPPOST {
228			yylval.number = OPM_TYPE_HTTPPOST;
229			return PROTOCOLTYPE;
230			}
231
232	michael	6222	HTTPS {
233			yylval.number = OPM_TYPE_HTTPS;
234			return PROTOCOLTYPE;
235			}
236
237			HTTPSPOST {
238			yylval.number = OPM_TYPE_HTTPSPOST;
239			return PROTOCOLTYPE;
240			}
241
242	michael	5052	SOCKS4 {
243			yylval.number = OPM_TYPE_SOCKS4;
244			return PROTOCOLTYPE;
245			}
246
247			SOCKS5 {
248			yylval.number = OPM_TYPE_SOCKS5;
249			return PROTOCOLTYPE;
250			}
251
252			WINGATE {
253			yylval.number = OPM_TYPE_WINGATE;
254			return PROTOCOLTYPE;
255			}
256
257			ROUTER {
258			yylval.number = OPM_TYPE_ROUTER;
259			return PROTOCOLTYPE;
260			}
261
262	michael	5998	DREAMBOX {
263			yylval.number = OPM_TYPE_DREAMBOX;
264			return PROTOCOLTYPE;
265			}
266	michael	5052
267	michael	5998
268	michael	5052	TRUE {
269			yylval.number=1;
270			return NUMBER;
271			}
272			YES {
273			yylval.number=1;
274			return NUMBER;
275			}
276			ON {
277			yylval.number=1;
278			return NUMBER;
279			}
280
281
282
283			FALSE {
284			yylval.number=0;
285			return NUMBER;
286			}
287
288			NO {
289			yylval.number=0;
290			return NUMBER;
291			}
292
293			OFF {
294			yylval.number=0;
295			return NUMBER;
296			}
297
298	michael	7716	. { return yytext[0]; }
299	michael	7711	<<EOF>> { if (conf_eof()) yyterminate(); }
300	michael	5052
301			%%
302
303	michael	6046	static void
304	michael	7711	conf_include(void)
305			{
306			char *p = NULL;
307			char filenamebuf[512];
308
309			if ((p = strchr(yytext, '<')) == NULL)
310			*strchr(p = strchr(yytext, '"') + 1, '"') = '\0';
311			else
312			*strchr(++p, '>') = '\0';
313
314			/* do stacking and co. */
315			if (include_stack_ptr >= MAX_INCLUDE_DEPTH)
316			{
317			log_printf("CONFIG -> Includes nested too deep in %s", p);
318			return;
319			}
320
321			if (p == '/') / if it is an absolute path */
322			snprintf(filenamebuf, sizeof(filenamebuf), "%s", p);
323			else
324			snprintf(filenamebuf, sizeof(filenamebuf), "%s/%s", HOPM_ETCDIR, p);
325
326			FILE *tmp_fbfile_in = fopen(filenamebuf, "r");
327			if (!tmp_fbfile_in)
328			{
329			log_printf("CONFIG -> Unable to read configuration file '%s': %s",
330			filenamebuf, strerror(errno));
331			return;
332			}
333
334			struct included_file *file = &include_stack[include_stack_ptr++];
335			file->lineno = lineno;
336			file->file = conf_file;
337			file->state = YY_CURRENT_BUFFER;
338			strlcpy(file->conffile, conffilebuf, sizeof(file->conffile));
339
340			lineno = 1;
341			conf_file = tmp_fbfile_in;
342	michael	7742	strlcpy(conffilebuf, filenamebuf, sizeof(conffilebuf));
343	michael	7711
344	michael	7729	yy_switch_to_buffer(yy_create_buffer(NULL, YY_BUF_SIZE));
345	michael	7711	}
346
347			static int
348			conf_eof(void)
349			{
350			if (include_stack_ptr == 0)
351			return 1;
352
353			/* switch buffer */
354			struct included_file *file = &include_stack[--include_stack_ptr];
355
356			/* close current file */
357			fclose(conf_file);
358
359			/* switch buffers */
360			yy_delete_buffer(YY_CURRENT_BUFFER);
361			yy_switch_to_buffer(file->state);
362
363			/* switch lineno */
364			lineno = file->lineno;
365
366			/* switch file */
367			conf_file = file->file;
368
369			strlcpy(conffilebuf, file->conffile, sizeof(conffilebuf));
370			return 0;
371			}