configlexer.lex revision 291767 
1%{
2/*
3 * configlexer.lex - lexical analyzer for unbound config file
4 *
5 * Copyright (c) 2001-2006, NLnet Labs. All rights reserved
6 *
7 * See LICENSE for the license.
8 *
9 */
10#include "config.h"
11
12#include <ctype.h>
13#include <string.h>
14#include <strings.h>
15#ifdef HAVE_GLOB_H
16# include <glob.h>
17#endif
18
19#include "util/config_file.h"
20#include "configparser.h"
21void ub_c_error(const char *message);
22
23#if 0
24#define LEXOUT(s)  printf s /* used ONLY when debugging */
25#else
26#define LEXOUT(s)
27#endif
28
29/** avoid warning in about fwrite return value */
30#define ECHO ub_c_error_msg("syntax error at text: %s", ub_c_text)
31
32/** A parser variable, this is a statement in the config file which is
33 * of the form variable: value1 value2 ...  nargs is the number of values. */
34#define YDVAR(nargs, var) \
35	num_args=(nargs); \
36	LEXOUT(("v(%s%d) ", ub_c_text, num_args)); \
37	if(num_args > 0) { BEGIN(val); } \
38	return (var);
39
40struct inc_state {
41	char* filename;
42	int line;
43	YY_BUFFER_STATE buffer;
44	struct inc_state* next;
45};
46static struct inc_state* config_include_stack = NULL;
47static int inc_depth = 0;
48static int inc_prev = 0;
49static int num_args = 0;
50
51void init_cfg_parse(void)
52{
53	config_include_stack = NULL;
54	inc_depth = 0;
55	inc_prev = 0;
56	num_args = 0;
57}
58
59static void config_start_include(const char* filename)
60{
61	FILE *input;
62	struct inc_state* s;
63	char* nm;
64	if(inc_depth++ > 100000) {
65		ub_c_error_msg("too many include files");
66		return;
67	}
68	if(strlen(filename) == 0) {
69		ub_c_error_msg("empty include file name");
70		return;
71	}
72	s = (struct inc_state*)malloc(sizeof(*s));
73	if(!s) {
74		ub_c_error_msg("include %s: malloc failure", filename);
75		return;
76	}
77	if(cfg_parser->chroot && strncmp(filename, cfg_parser->chroot,
78		strlen(cfg_parser->chroot)) == 0) {
79		filename += strlen(cfg_parser->chroot);
80	}
81	nm = strdup(filename);
82	if(!nm) {
83		ub_c_error_msg("include %s: strdup failure", filename);
84		free(s);
85		return;
86	}
87	input = fopen(filename, "r");
88	if(!input) {
89		ub_c_error_msg("cannot open include file '%s': %s",
90			filename, strerror(errno));
91		free(s);
92		free(nm);
93		return;
94	}
95	LEXOUT(("switch_to_include_file(%s)\n", filename));
96	s->filename = cfg_parser->filename;
97	s->line = cfg_parser->line;
98	s->buffer = YY_CURRENT_BUFFER;
99	s->next = config_include_stack;
100	config_include_stack = s;
101	cfg_parser->filename = nm;
102	cfg_parser->line = 1;
103	yy_switch_to_buffer(yy_create_buffer(input, YY_BUF_SIZE));
104}
105
106static void config_start_include_glob(const char* filename)
107{
108
109	/* check for wildcards */
110#ifdef HAVE_GLOB
111	glob_t g;
112	size_t i;
113	int r, flags;
114	if(!(!strchr(filename, '*') && !strchr(filename, '?') && !strchr(filename, '[') &&
115		!strchr(filename, '{') && !strchr(filename, '~'))) {
116		flags = 0
117#ifdef GLOB_ERR
118			| GLOB_ERR
119#endif
120#ifdef GLOB_NOSORT
121			| GLOB_NOSORT
122#endif
123#ifdef GLOB_BRACE
124			| GLOB_BRACE
125#endif
126#ifdef GLOB_TILDE
127			| GLOB_TILDE
128#endif
129		;
130		memset(&g, 0, sizeof(g));
131		if(cfg_parser->chroot && strncmp(filename, cfg_parser->chroot,
132			strlen(cfg_parser->chroot)) == 0) {
133			filename += strlen(cfg_parser->chroot);
134		}
135		r = glob(filename, flags, NULL, &g);
136		if(r) {
137			/* some error */
138			globfree(&g);
139			if(r == GLOB_NOMATCH)
140				return; /* no matches for pattern */
141			config_start_include(filename); /* let original deal with it */
142			return;
143		}
144		/* process files found, if any */
145		for(i=0; i<(size_t)g.gl_pathc; i++) {
146			config_start_include(g.gl_pathv[i]);
147		}
148		globfree(&g);
149		return;
150	}
151#endif /* HAVE_GLOB */
152
153	config_start_include(filename);
154}
155
156static void config_end_include(void)
157{
158	struct inc_state* s = config_include_stack;
159	--inc_depth;
160	if(!s) return;
161	free(cfg_parser->filename);
162	cfg_parser->filename = s->filename;
163	cfg_parser->line = s->line;
164	yy_delete_buffer(YY_CURRENT_BUFFER);
165	yy_switch_to_buffer(s->buffer);
166	config_include_stack = s->next;
167	free(s);
168}
169
170#ifndef yy_set_bol /* compat definition, for flex 2.4.6 */
171#define yy_set_bol(at_bol) \
172        { \
173	        if ( ! yy_current_buffer ) \
174	                yy_current_buffer = yy_create_buffer( ub_c_in, YY_BUF_SIZE ); \
175	        yy_current_buffer->yy_ch_buf[0] = ((at_bol)?'\n':' '); \
176        }
177#endif
178
179%}
180%option noinput
181%option nounput
182%{
183#ifndef YY_NO_UNPUT
184#define YY_NO_UNPUT 1
185#endif
186#ifndef YY_NO_INPUT
187#define YY_NO_INPUT 1
188#endif
189%}
190
191SPACE   [ \t]
192LETTER  [a-zA-Z]
193UNQUOTEDLETTER [^\'\"\n\r \t\\]|\\.
194UNQUOTEDLETTER_NOCOLON [^\:\'\"\n\r \t\\]|\\.
195NEWLINE [\r\n]
196COMMENT \#
197COLON 	\:
198DQANY     [^\"\n\r\\]|\\.
199SQANY     [^\'\n\r\\]|\\.
200
201%x	quotedstring singlequotedstr include include_quoted val
202
203%%
204<INITIAL,val>{SPACE}*	{
205	LEXOUT(("SP ")); /* ignore */ }
206<INITIAL,val>{SPACE}*{COMMENT}.*	{
207	/* note that flex makes the longest match and '.' is any but not nl */
208	LEXOUT(("comment(%s) ", ub_c_text)); /* ignore */ }
209server{COLON}			{ YDVAR(0, VAR_SERVER) }
210num-threads{COLON}		{ YDVAR(1, VAR_NUM_THREADS) }
211verbosity{COLON}		{ YDVAR(1, VAR_VERBOSITY) }
212port{COLON}			{ YDVAR(1, VAR_PORT) }
213outgoing-range{COLON}		{ YDVAR(1, VAR_OUTGOING_RANGE) }
214outgoing-port-permit{COLON}	{ YDVAR(1, VAR_OUTGOING_PORT_PERMIT) }
215outgoing-port-avoid{COLON}	{ YDVAR(1, VAR_OUTGOING_PORT_AVOID) }
216outgoing-num-tcp{COLON}		{ YDVAR(1, VAR_OUTGOING_NUM_TCP) }
217incoming-num-tcp{COLON}		{ YDVAR(1, VAR_INCOMING_NUM_TCP) }
218do-ip4{COLON}			{ YDVAR(1, VAR_DO_IP4) }
219do-ip6{COLON}			{ YDVAR(1, VAR_DO_IP6) }
220do-udp{COLON}			{ YDVAR(1, VAR_DO_UDP) }
221do-tcp{COLON}			{ YDVAR(1, VAR_DO_TCP) }
222tcp-upstream{COLON}		{ YDVAR(1, VAR_TCP_UPSTREAM) }
223ssl-upstream{COLON}		{ YDVAR(1, VAR_SSL_UPSTREAM) }
224ssl-service-key{COLON}		{ YDVAR(1, VAR_SSL_SERVICE_KEY) }
225ssl-service-pem{COLON}		{ YDVAR(1, VAR_SSL_SERVICE_PEM) }
226ssl-port{COLON}			{ YDVAR(1, VAR_SSL_PORT) }
227do-daemonize{COLON}		{ YDVAR(1, VAR_DO_DAEMONIZE) }
228interface{COLON}		{ YDVAR(1, VAR_INTERFACE) }
229ip-address{COLON}		{ YDVAR(1, VAR_INTERFACE) }
230outgoing-interface{COLON}	{ YDVAR(1, VAR_OUTGOING_INTERFACE) }
231interface-automatic{COLON}	{ YDVAR(1, VAR_INTERFACE_AUTOMATIC) }
232so-rcvbuf{COLON}		{ YDVAR(1, VAR_SO_RCVBUF) }
233so-sndbuf{COLON}		{ YDVAR(1, VAR_SO_SNDBUF) }
234so-reuseport{COLON}		{ YDVAR(1, VAR_SO_REUSEPORT) }
235ip-transparent{COLON}		{ YDVAR(1, VAR_IP_TRANSPARENT) }
236chroot{COLON}			{ YDVAR(1, VAR_CHROOT) }
237username{COLON}			{ YDVAR(1, VAR_USERNAME) }
238directory{COLON}		{ YDVAR(1, VAR_DIRECTORY) }
239logfile{COLON}			{ YDVAR(1, VAR_LOGFILE) }
240pidfile{COLON}			{ YDVAR(1, VAR_PIDFILE) }
241root-hints{COLON}		{ YDVAR(1, VAR_ROOT_HINTS) }
242edns-buffer-size{COLON}		{ YDVAR(1, VAR_EDNS_BUFFER_SIZE) }
243msg-buffer-size{COLON}		{ YDVAR(1, VAR_MSG_BUFFER_SIZE) }
244msg-cache-size{COLON}		{ YDVAR(1, VAR_MSG_CACHE_SIZE) }
245msg-cache-slabs{COLON}		{ YDVAR(1, VAR_MSG_CACHE_SLABS) }
246rrset-cache-size{COLON}		{ YDVAR(1, VAR_RRSET_CACHE_SIZE) }
247rrset-cache-slabs{COLON}	{ YDVAR(1, VAR_RRSET_CACHE_SLABS) }
248cache-max-ttl{COLON}     	{ YDVAR(1, VAR_CACHE_MAX_TTL) }
249cache-max-negative-ttl{COLON}   { YDVAR(1, VAR_CACHE_MAX_NEGATIVE_TTL) }
250cache-min-ttl{COLON}     	{ YDVAR(1, VAR_CACHE_MIN_TTL) }
251infra-host-ttl{COLON}		{ YDVAR(1, VAR_INFRA_HOST_TTL) }
252infra-lame-ttl{COLON}		{ YDVAR(1, VAR_INFRA_LAME_TTL) }
253infra-cache-slabs{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_SLABS) }
254infra-cache-numhosts{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_NUMHOSTS) }
255infra-cache-lame-size{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_LAME_SIZE) }
256infra-cache-min-rtt{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_MIN_RTT) }
257num-queries-per-thread{COLON}	{ YDVAR(1, VAR_NUM_QUERIES_PER_THREAD) }
258jostle-timeout{COLON}		{ YDVAR(1, VAR_JOSTLE_TIMEOUT) }
259delay-close{COLON}		{ YDVAR(1, VAR_DELAY_CLOSE) }
260target-fetch-policy{COLON}	{ YDVAR(1, VAR_TARGET_FETCH_POLICY) }
261harden-short-bufsize{COLON}	{ YDVAR(1, VAR_HARDEN_SHORT_BUFSIZE) }
262harden-large-queries{COLON}	{ YDVAR(1, VAR_HARDEN_LARGE_QUERIES) }
263harden-glue{COLON}		{ YDVAR(1, VAR_HARDEN_GLUE) }
264harden-dnssec-stripped{COLON}	{ YDVAR(1, VAR_HARDEN_DNSSEC_STRIPPED) }
265harden-below-nxdomain{COLON}	{ YDVAR(1, VAR_HARDEN_BELOW_NXDOMAIN) }
266harden-referral-path{COLON}	{ YDVAR(1, VAR_HARDEN_REFERRAL_PATH) }
267harden-algo-downgrade{COLON}	{ YDVAR(1, VAR_HARDEN_ALGO_DOWNGRADE) }
268use-caps-for-id{COLON}		{ YDVAR(1, VAR_USE_CAPS_FOR_ID) }
269caps-whitelist{COLON}		{ YDVAR(1, VAR_CAPS_WHITELIST) }
270unwanted-reply-threshold{COLON}	{ YDVAR(1, VAR_UNWANTED_REPLY_THRESHOLD) }
271private-address{COLON}		{ YDVAR(1, VAR_PRIVATE_ADDRESS) }
272private-domain{COLON}		{ YDVAR(1, VAR_PRIVATE_DOMAIN) }
273prefetch-key{COLON}		{ YDVAR(1, VAR_PREFETCH_KEY) }
274prefetch{COLON}			{ YDVAR(1, VAR_PREFETCH) }
275stub-zone{COLON}		{ YDVAR(0, VAR_STUB_ZONE) }
276name{COLON}			{ YDVAR(1, VAR_NAME) }
277stub-addr{COLON}		{ YDVAR(1, VAR_STUB_ADDR) }
278stub-host{COLON}		{ YDVAR(1, VAR_STUB_HOST) }
279stub-prime{COLON}		{ YDVAR(1, VAR_STUB_PRIME) }
280stub-first{COLON}		{ YDVAR(1, VAR_STUB_FIRST) }
281forward-zone{COLON}		{ YDVAR(0, VAR_FORWARD_ZONE) }
282forward-addr{COLON}		{ YDVAR(1, VAR_FORWARD_ADDR) }
283forward-host{COLON}		{ YDVAR(1, VAR_FORWARD_HOST) }
284forward-first{COLON}		{ YDVAR(1, VAR_FORWARD_FIRST) }
285do-not-query-address{COLON}	{ YDVAR(1, VAR_DO_NOT_QUERY_ADDRESS) }
286do-not-query-localhost{COLON}	{ YDVAR(1, VAR_DO_NOT_QUERY_LOCALHOST) }
287access-control{COLON}		{ YDVAR(2, VAR_ACCESS_CONTROL) }
288hide-identity{COLON}		{ YDVAR(1, VAR_HIDE_IDENTITY) }
289hide-version{COLON}		{ YDVAR(1, VAR_HIDE_VERSION) }
290identity{COLON}			{ YDVAR(1, VAR_IDENTITY) }
291version{COLON}			{ YDVAR(1, VAR_VERSION) }
292module-config{COLON}     	{ YDVAR(1, VAR_MODULE_CONF) }
293dlv-anchor{COLON}		{ YDVAR(1, VAR_DLV_ANCHOR) }
294dlv-anchor-file{COLON}		{ YDVAR(1, VAR_DLV_ANCHOR_FILE) }
295trust-anchor-file{COLON}	{ YDVAR(1, VAR_TRUST_ANCHOR_FILE) }
296auto-trust-anchor-file{COLON}	{ YDVAR(1, VAR_AUTO_TRUST_ANCHOR_FILE) }
297trusted-keys-file{COLON}	{ YDVAR(1, VAR_TRUSTED_KEYS_FILE) }
298trust-anchor{COLON}		{ YDVAR(1, VAR_TRUST_ANCHOR) }
299val-override-date{COLON}	{ YDVAR(1, VAR_VAL_OVERRIDE_DATE) }
300val-sig-skew-min{COLON}		{ YDVAR(1, VAR_VAL_SIG_SKEW_MIN) }
301val-sig-skew-max{COLON}		{ YDVAR(1, VAR_VAL_SIG_SKEW_MAX) }
302val-bogus-ttl{COLON}		{ YDVAR(1, VAR_BOGUS_TTL) }
303val-clean-additional{COLON}	{ YDVAR(1, VAR_VAL_CLEAN_ADDITIONAL) }
304val-permissive-mode{COLON}	{ YDVAR(1, VAR_VAL_PERMISSIVE_MODE) }
305ignore-cd-flag{COLON}		{ YDVAR(1, VAR_IGNORE_CD_FLAG) }
306val-log-level{COLON}		{ YDVAR(1, VAR_VAL_LOG_LEVEL) }
307key-cache-size{COLON}		{ YDVAR(1, VAR_KEY_CACHE_SIZE) }
308key-cache-slabs{COLON}		{ YDVAR(1, VAR_KEY_CACHE_SLABS) }
309neg-cache-size{COLON}		{ YDVAR(1, VAR_NEG_CACHE_SIZE) }
310val-nsec3-keysize-iterations{COLON}	{
311				  YDVAR(1, VAR_VAL_NSEC3_KEYSIZE_ITERATIONS) }
312add-holddown{COLON}		{ YDVAR(1, VAR_ADD_HOLDDOWN) }
313del-holddown{COLON}		{ YDVAR(1, VAR_DEL_HOLDDOWN) }
314keep-missing{COLON}		{ YDVAR(1, VAR_KEEP_MISSING) }
315permit-small-holddown{COLON}	{ YDVAR(1, VAR_PERMIT_SMALL_HOLDDOWN) }
316use-syslog{COLON}		{ YDVAR(1, VAR_USE_SYSLOG) }
317log-time-ascii{COLON}		{ YDVAR(1, VAR_LOG_TIME_ASCII) }
318log-queries{COLON}		{ YDVAR(1, VAR_LOG_QUERIES) }
319local-zone{COLON}		{ YDVAR(2, VAR_LOCAL_ZONE) }
320local-data{COLON}		{ YDVAR(1, VAR_LOCAL_DATA) }
321local-data-ptr{COLON}		{ YDVAR(1, VAR_LOCAL_DATA_PTR) }
322unblock-lan-zones{COLON}	{ YDVAR(1, VAR_UNBLOCK_LAN_ZONES) }
323statistics-interval{COLON}	{ YDVAR(1, VAR_STATISTICS_INTERVAL) }
324statistics-cumulative{COLON}	{ YDVAR(1, VAR_STATISTICS_CUMULATIVE) }
325extended-statistics{COLON}	{ YDVAR(1, VAR_EXTENDED_STATISTICS) }
326remote-control{COLON}		{ YDVAR(0, VAR_REMOTE_CONTROL) }
327control-enable{COLON}		{ YDVAR(1, VAR_CONTROL_ENABLE) }
328control-interface{COLON}	{ YDVAR(1, VAR_CONTROL_INTERFACE) }
329control-port{COLON}		{ YDVAR(1, VAR_CONTROL_PORT) }
330control-use-cert{COLON}		{ YDVAR(1, VAR_CONTROL_USE_CERT) }
331server-key-file{COLON}		{ YDVAR(1, VAR_SERVER_KEY_FILE) }
332server-cert-file{COLON}		{ YDVAR(1, VAR_SERVER_CERT_FILE) }
333control-key-file{COLON}		{ YDVAR(1, VAR_CONTROL_KEY_FILE) }
334control-cert-file{COLON}	{ YDVAR(1, VAR_CONTROL_CERT_FILE) }
335python-script{COLON}		{ YDVAR(1, VAR_PYTHON_SCRIPT) }
336python{COLON}			{ YDVAR(0, VAR_PYTHON) }
337domain-insecure{COLON}		{ YDVAR(1, VAR_DOMAIN_INSECURE) }
338minimal-responses{COLON}	{ YDVAR(1, VAR_MINIMAL_RESPONSES) }
339rrset-roundrobin{COLON}		{ YDVAR(1, VAR_RRSET_ROUNDROBIN) }
340max-udp-size{COLON}		{ YDVAR(1, VAR_MAX_UDP_SIZE) }
341dns64-prefix{COLON}		{ YDVAR(1, VAR_DNS64_PREFIX) }
342dns64-synthall{COLON}		{ YDVAR(1, VAR_DNS64_SYNTHALL) }
343dnstap{COLON}			{ YDVAR(0, VAR_DNSTAP) }
344dnstap-enable{COLON}		{ YDVAR(1, VAR_DNSTAP_ENABLE) }
345dnstap-socket-path{COLON}	{ YDVAR(1, VAR_DNSTAP_SOCKET_PATH) }
346dnstap-send-identity{COLON}	{ YDVAR(1, VAR_DNSTAP_SEND_IDENTITY) }
347dnstap-send-version{COLON}	{ YDVAR(1, VAR_DNSTAP_SEND_VERSION) }
348dnstap-identity{COLON}		{ YDVAR(1, VAR_DNSTAP_IDENTITY) }
349dnstap-version{COLON}		{ YDVAR(1, VAR_DNSTAP_VERSION) }
350dnstap-log-resolver-query-messages{COLON}	{
351		YDVAR(1, VAR_DNSTAP_LOG_RESOLVER_QUERY_MESSAGES) }
352dnstap-log-resolver-response-messages{COLON}	{
353		YDVAR(1, VAR_DNSTAP_LOG_RESOLVER_RESPONSE_MESSAGES) }
354dnstap-log-client-query-messages{COLON}		{
355		YDVAR(1, VAR_DNSTAP_LOG_CLIENT_QUERY_MESSAGES) }
356dnstap-log-client-response-messages{COLON}	{
357		YDVAR(1, VAR_DNSTAP_LOG_CLIENT_RESPONSE_MESSAGES) }
358dnstap-log-forwarder-query-messages{COLON}	{
359		YDVAR(1, VAR_DNSTAP_LOG_FORWARDER_QUERY_MESSAGES) }
360dnstap-log-forwarder-response-messages{COLON}	{
361		YDVAR(1, VAR_DNSTAP_LOG_FORWARDER_RESPONSE_MESSAGES) }
362ratelimit{COLON}		{ YDVAR(1, VAR_RATELIMIT) }
363ratelimit-slabs{COLON}		{ YDVAR(1, VAR_RATELIMIT_SLABS) }
364ratelimit-size{COLON}		{ YDVAR(1, VAR_RATELIMIT_SIZE) }
365ratelimit-for-domain{COLON}	{ YDVAR(2, VAR_RATELIMIT_FOR_DOMAIN) }
366ratelimit-below-domain{COLON}	{ YDVAR(2, VAR_RATELIMIT_BELOW_DOMAIN) }
367ratelimit-factor{COLON}		{ YDVAR(1, VAR_RATELIMIT_FACTOR) }
368<INITIAL,val>{NEWLINE}		{ LEXOUT(("NL\n")); cfg_parser->line++; }
369
370	/* Quoted strings. Strip leading and ending quotes */
371<val>\"			{ BEGIN(quotedstring); LEXOUT(("QS ")); }
372<quotedstring><<EOF>>   {
373        ub_c_error("EOF inside quoted string");
374	if(--num_args == 0) { BEGIN(INITIAL); }
375	else		    { BEGIN(val); }
376}
377<quotedstring>{DQANY}*  { LEXOUT(("STR(%s) ", ub_c_text)); yymore(); }
378<quotedstring>{NEWLINE} { ub_c_error("newline inside quoted string, no end \"");
379			  cfg_parser->line++; BEGIN(INITIAL); }
380<quotedstring>\" {
381        LEXOUT(("QE "));
382	if(--num_args == 0) { BEGIN(INITIAL); }
383	else		    { BEGIN(val); }
384        ub_c_text[ub_c_leng - 1] = '\0';
385	ub_c_lval.str = strdup(ub_c_text);
386	if(!ub_c_lval.str)
387		ub_c_error("out of memory");
388        return STRING_ARG;
389}
390
391	/* Single Quoted strings. Strip leading and ending quotes */
392<val>\'			{ BEGIN(singlequotedstr); LEXOUT(("SQS ")); }
393<singlequotedstr><<EOF>>   {
394        ub_c_error("EOF inside quoted string");
395	if(--num_args == 0) { BEGIN(INITIAL); }
396	else		    { BEGIN(val); }
397}
398<singlequotedstr>{SQANY}*  { LEXOUT(("STR(%s) ", ub_c_text)); yymore(); }
399<singlequotedstr>{NEWLINE} { ub_c_error("newline inside quoted string, no end '");
400			     cfg_parser->line++; BEGIN(INITIAL); }
401<singlequotedstr>\' {
402        LEXOUT(("SQE "));
403	if(--num_args == 0) { BEGIN(INITIAL); }
404	else		    { BEGIN(val); }
405        ub_c_text[ub_c_leng - 1] = '\0';
406	ub_c_lval.str = strdup(ub_c_text);
407	if(!ub_c_lval.str)
408		ub_c_error("out of memory");
409        return STRING_ARG;
410}
411
412	/* include: directive */
413<INITIAL,val>include{COLON}	{
414	LEXOUT(("v(%s) ", ub_c_text)); inc_prev = YYSTATE; BEGIN(include); }
415<include><<EOF>>	{
416        ub_c_error("EOF inside include directive");
417        BEGIN(inc_prev);
418}
419<include>{SPACE}*	{ LEXOUT(("ISP ")); /* ignore */ }
420<include>{NEWLINE}	{ LEXOUT(("NL\n")); cfg_parser->line++;}
421<include>\"		{ LEXOUT(("IQS ")); BEGIN(include_quoted); }
422<include>{UNQUOTEDLETTER}*	{
423	LEXOUT(("Iunquotedstr(%s) ", ub_c_text));
424	config_start_include_glob(ub_c_text);
425	BEGIN(inc_prev);
426}
427<include_quoted><<EOF>>	{
428        ub_c_error("EOF inside quoted string");
429        BEGIN(inc_prev);
430}
431<include_quoted>{DQANY}*	{ LEXOUT(("ISTR(%s) ", ub_c_text)); yymore(); }
432<include_quoted>{NEWLINE}	{ ub_c_error("newline before \" in include name");
433				  cfg_parser->line++; BEGIN(inc_prev); }
434<include_quoted>\"	{
435	LEXOUT(("IQE "));
436	ub_c_text[ub_c_leng - 1] = '\0';
437	config_start_include_glob(ub_c_text);
438	BEGIN(inc_prev);
439}
440<INITIAL,val><<EOF>>	{
441	LEXOUT(("LEXEOF "));
442	yy_set_bol(1); /* Set beginning of line, so "^" rules match.  */
443	if (!config_include_stack) {
444		yyterminate();
445	} else {
446		fclose(ub_c_in);
447		config_end_include();
448	}
449}
450
451<val>{UNQUOTEDLETTER}*	{ LEXOUT(("unquotedstr(%s) ", ub_c_text));
452			if(--num_args == 0) { BEGIN(INITIAL); }
453			ub_c_lval.str = strdup(ub_c_text); return STRING_ARG; }
454
455{UNQUOTEDLETTER_NOCOLON}*	{
456	ub_c_error_msg("unknown keyword '%s'", ub_c_text);
457	}
458
459<*>.	{
460	ub_c_error_msg("stray '%s'", ub_c_text);
461	}
462
463%%
464