xref: /freebsd/contrib/unbound/util/configlexer.lex (revision 5a2b666ce590a56f147e167aa07684af2d6b854a)
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"
21 void 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 
40 struct inc_state {
41 	char* filename;
42 	int line;
43 	YY_BUFFER_STATE buffer;
44 	struct inc_state* next;
45 };
46 static struct inc_state* config_include_stack = NULL;
47 static int inc_depth = 0;
48 static int inc_prev = 0;
49 static int num_args = 0;
50 
51 void init_cfg_parse(void)
52 {
53 	config_include_stack = NULL;
54 	inc_depth = 0;
55 	inc_prev = 0;
56 	num_args = 0;
57 }
58 
59 static 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 
106 static 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 
156 static 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 
191 SPACE   [ \t]
192 LETTER  [a-zA-Z]
193 UNQUOTEDLETTER [^\'\"\n\r \t\\]|\\.
194 UNQUOTEDLETTER_NOCOLON [^\:\'\"\n\r \t\\]|\\.
195 NEWLINE [\r\n]
196 COMMENT \#
197 COLON 	\:
198 DQANY     [^\"\n\r\\]|\\.
199 SQANY     [^\'\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 */ }
209 server{COLON}			{ YDVAR(0, VAR_SERVER) }
210 num-threads{COLON}		{ YDVAR(1, VAR_NUM_THREADS) }
211 verbosity{COLON}		{ YDVAR(1, VAR_VERBOSITY) }
212 port{COLON}			{ YDVAR(1, VAR_PORT) }
213 outgoing-range{COLON}		{ YDVAR(1, VAR_OUTGOING_RANGE) }
214 outgoing-port-permit{COLON}	{ YDVAR(1, VAR_OUTGOING_PORT_PERMIT) }
215 outgoing-port-avoid{COLON}	{ YDVAR(1, VAR_OUTGOING_PORT_AVOID) }
216 outgoing-num-tcp{COLON}		{ YDVAR(1, VAR_OUTGOING_NUM_TCP) }
217 incoming-num-tcp{COLON}		{ YDVAR(1, VAR_INCOMING_NUM_TCP) }
218 do-ip4{COLON}			{ YDVAR(1, VAR_DO_IP4) }
219 do-ip6{COLON}			{ YDVAR(1, VAR_DO_IP6) }
220 do-udp{COLON}			{ YDVAR(1, VAR_DO_UDP) }
221 do-tcp{COLON}			{ YDVAR(1, VAR_DO_TCP) }
222 tcp-upstream{COLON}		{ YDVAR(1, VAR_TCP_UPSTREAM) }
223 ssl-upstream{COLON}		{ YDVAR(1, VAR_SSL_UPSTREAM) }
224 ssl-service-key{COLON}		{ YDVAR(1, VAR_SSL_SERVICE_KEY) }
225 ssl-service-pem{COLON}		{ YDVAR(1, VAR_SSL_SERVICE_PEM) }
226 ssl-port{COLON}			{ YDVAR(1, VAR_SSL_PORT) }
227 do-daemonize{COLON}		{ YDVAR(1, VAR_DO_DAEMONIZE) }
228 interface{COLON}		{ YDVAR(1, VAR_INTERFACE) }
229 ip-address{COLON}		{ YDVAR(1, VAR_INTERFACE) }
230 outgoing-interface{COLON}	{ YDVAR(1, VAR_OUTGOING_INTERFACE) }
231 interface-automatic{COLON}	{ YDVAR(1, VAR_INTERFACE_AUTOMATIC) }
232 so-rcvbuf{COLON}		{ YDVAR(1, VAR_SO_RCVBUF) }
233 so-sndbuf{COLON}		{ YDVAR(1, VAR_SO_SNDBUF) }
234 so-reuseport{COLON}		{ YDVAR(1, VAR_SO_REUSEPORT) }
235 ip-transparent{COLON}		{ YDVAR(1, VAR_IP_TRANSPARENT) }
236 chroot{COLON}			{ YDVAR(1, VAR_CHROOT) }
237 username{COLON}			{ YDVAR(1, VAR_USERNAME) }
238 directory{COLON}		{ YDVAR(1, VAR_DIRECTORY) }
239 logfile{COLON}			{ YDVAR(1, VAR_LOGFILE) }
240 pidfile{COLON}			{ YDVAR(1, VAR_PIDFILE) }
241 root-hints{COLON}		{ YDVAR(1, VAR_ROOT_HINTS) }
242 edns-buffer-size{COLON}		{ YDVAR(1, VAR_EDNS_BUFFER_SIZE) }
243 msg-buffer-size{COLON}		{ YDVAR(1, VAR_MSG_BUFFER_SIZE) }
244 msg-cache-size{COLON}		{ YDVAR(1, VAR_MSG_CACHE_SIZE) }
245 msg-cache-slabs{COLON}		{ YDVAR(1, VAR_MSG_CACHE_SLABS) }
246 rrset-cache-size{COLON}		{ YDVAR(1, VAR_RRSET_CACHE_SIZE) }
247 rrset-cache-slabs{COLON}	{ YDVAR(1, VAR_RRSET_CACHE_SLABS) }
248 cache-max-ttl{COLON}     	{ YDVAR(1, VAR_CACHE_MAX_TTL) }
249 cache-max-negative-ttl{COLON}   { YDVAR(1, VAR_CACHE_MAX_NEGATIVE_TTL) }
250 cache-min-ttl{COLON}     	{ YDVAR(1, VAR_CACHE_MIN_TTL) }
251 infra-host-ttl{COLON}		{ YDVAR(1, VAR_INFRA_HOST_TTL) }
252 infra-lame-ttl{COLON}		{ YDVAR(1, VAR_INFRA_LAME_TTL) }
253 infra-cache-slabs{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_SLABS) }
254 infra-cache-numhosts{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_NUMHOSTS) }
255 infra-cache-lame-size{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_LAME_SIZE) }
256 infra-cache-min-rtt{COLON}	{ YDVAR(1, VAR_INFRA_CACHE_MIN_RTT) }
257 num-queries-per-thread{COLON}	{ YDVAR(1, VAR_NUM_QUERIES_PER_THREAD) }
258 jostle-timeout{COLON}		{ YDVAR(1, VAR_JOSTLE_TIMEOUT) }
259 delay-close{COLON}		{ YDVAR(1, VAR_DELAY_CLOSE) }
260 target-fetch-policy{COLON}	{ YDVAR(1, VAR_TARGET_FETCH_POLICY) }
261 harden-short-bufsize{COLON}	{ YDVAR(1, VAR_HARDEN_SHORT_BUFSIZE) }
262 harden-large-queries{COLON}	{ YDVAR(1, VAR_HARDEN_LARGE_QUERIES) }
263 harden-glue{COLON}		{ YDVAR(1, VAR_HARDEN_GLUE) }
264 harden-dnssec-stripped{COLON}	{ YDVAR(1, VAR_HARDEN_DNSSEC_STRIPPED) }
265 harden-below-nxdomain{COLON}	{ YDVAR(1, VAR_HARDEN_BELOW_NXDOMAIN) }
266 harden-referral-path{COLON}	{ YDVAR(1, VAR_HARDEN_REFERRAL_PATH) }
267 harden-algo-downgrade{COLON}	{ YDVAR(1, VAR_HARDEN_ALGO_DOWNGRADE) }
268 use-caps-for-id{COLON}		{ YDVAR(1, VAR_USE_CAPS_FOR_ID) }
269 caps-whitelist{COLON}		{ YDVAR(1, VAR_CAPS_WHITELIST) }
270 unwanted-reply-threshold{COLON}	{ YDVAR(1, VAR_UNWANTED_REPLY_THRESHOLD) }
271 private-address{COLON}		{ YDVAR(1, VAR_PRIVATE_ADDRESS) }
272 private-domain{COLON}		{ YDVAR(1, VAR_PRIVATE_DOMAIN) }
273 prefetch-key{COLON}		{ YDVAR(1, VAR_PREFETCH_KEY) }
274 prefetch{COLON}			{ YDVAR(1, VAR_PREFETCH) }
275 stub-zone{COLON}		{ YDVAR(0, VAR_STUB_ZONE) }
276 name{COLON}			{ YDVAR(1, VAR_NAME) }
277 stub-addr{COLON}		{ YDVAR(1, VAR_STUB_ADDR) }
278 stub-host{COLON}		{ YDVAR(1, VAR_STUB_HOST) }
279 stub-prime{COLON}		{ YDVAR(1, VAR_STUB_PRIME) }
280 stub-first{COLON}		{ YDVAR(1, VAR_STUB_FIRST) }
281 forward-zone{COLON}		{ YDVAR(0, VAR_FORWARD_ZONE) }
282 forward-addr{COLON}		{ YDVAR(1, VAR_FORWARD_ADDR) }
283 forward-host{COLON}		{ YDVAR(1, VAR_FORWARD_HOST) }
284 forward-first{COLON}		{ YDVAR(1, VAR_FORWARD_FIRST) }
285 do-not-query-address{COLON}	{ YDVAR(1, VAR_DO_NOT_QUERY_ADDRESS) }
286 do-not-query-localhost{COLON}	{ YDVAR(1, VAR_DO_NOT_QUERY_LOCALHOST) }
287 access-control{COLON}		{ YDVAR(2, VAR_ACCESS_CONTROL) }
288 hide-identity{COLON}		{ YDVAR(1, VAR_HIDE_IDENTITY) }
289 hide-version{COLON}		{ YDVAR(1, VAR_HIDE_VERSION) }
290 identity{COLON}			{ YDVAR(1, VAR_IDENTITY) }
291 version{COLON}			{ YDVAR(1, VAR_VERSION) }
292 module-config{COLON}     	{ YDVAR(1, VAR_MODULE_CONF) }
293 dlv-anchor{COLON}		{ YDVAR(1, VAR_DLV_ANCHOR) }
294 dlv-anchor-file{COLON}		{ YDVAR(1, VAR_DLV_ANCHOR_FILE) }
295 trust-anchor-file{COLON}	{ YDVAR(1, VAR_TRUST_ANCHOR_FILE) }
296 auto-trust-anchor-file{COLON}	{ YDVAR(1, VAR_AUTO_TRUST_ANCHOR_FILE) }
297 trusted-keys-file{COLON}	{ YDVAR(1, VAR_TRUSTED_KEYS_FILE) }
298 trust-anchor{COLON}		{ YDVAR(1, VAR_TRUST_ANCHOR) }
299 val-override-date{COLON}	{ YDVAR(1, VAR_VAL_OVERRIDE_DATE) }
300 val-sig-skew-min{COLON}		{ YDVAR(1, VAR_VAL_SIG_SKEW_MIN) }
301 val-sig-skew-max{COLON}		{ YDVAR(1, VAR_VAL_SIG_SKEW_MAX) }
302 val-bogus-ttl{COLON}		{ YDVAR(1, VAR_BOGUS_TTL) }
303 val-clean-additional{COLON}	{ YDVAR(1, VAR_VAL_CLEAN_ADDITIONAL) }
304 val-permissive-mode{COLON}	{ YDVAR(1, VAR_VAL_PERMISSIVE_MODE) }
305 ignore-cd-flag{COLON}		{ YDVAR(1, VAR_IGNORE_CD_FLAG) }
306 val-log-level{COLON}		{ YDVAR(1, VAR_VAL_LOG_LEVEL) }
307 key-cache-size{COLON}		{ YDVAR(1, VAR_KEY_CACHE_SIZE) }
308 key-cache-slabs{COLON}		{ YDVAR(1, VAR_KEY_CACHE_SLABS) }
309 neg-cache-size{COLON}		{ YDVAR(1, VAR_NEG_CACHE_SIZE) }
310 val-nsec3-keysize-iterations{COLON}	{
311 				  YDVAR(1, VAR_VAL_NSEC3_KEYSIZE_ITERATIONS) }
312 add-holddown{COLON}		{ YDVAR(1, VAR_ADD_HOLDDOWN) }
313 del-holddown{COLON}		{ YDVAR(1, VAR_DEL_HOLDDOWN) }
314 keep-missing{COLON}		{ YDVAR(1, VAR_KEEP_MISSING) }
315 use-syslog{COLON}		{ YDVAR(1, VAR_USE_SYSLOG) }
316 log-time-ascii{COLON}		{ YDVAR(1, VAR_LOG_TIME_ASCII) }
317 log-queries{COLON}		{ YDVAR(1, VAR_LOG_QUERIES) }
318 local-zone{COLON}		{ YDVAR(2, VAR_LOCAL_ZONE) }
319 local-data{COLON}		{ YDVAR(1, VAR_LOCAL_DATA) }
320 local-data-ptr{COLON}		{ YDVAR(1, VAR_LOCAL_DATA_PTR) }
321 unblock-lan-zones{COLON}	{ YDVAR(1, VAR_UNBLOCK_LAN_ZONES) }
322 statistics-interval{COLON}	{ YDVAR(1, VAR_STATISTICS_INTERVAL) }
323 statistics-cumulative{COLON}	{ YDVAR(1, VAR_STATISTICS_CUMULATIVE) }
324 extended-statistics{COLON}	{ YDVAR(1, VAR_EXTENDED_STATISTICS) }
325 remote-control{COLON}		{ YDVAR(0, VAR_REMOTE_CONTROL) }
326 control-enable{COLON}		{ YDVAR(1, VAR_CONTROL_ENABLE) }
327 control-interface{COLON}	{ YDVAR(1, VAR_CONTROL_INTERFACE) }
328 control-port{COLON}		{ YDVAR(1, VAR_CONTROL_PORT) }
329 control-use-cert{COLON}		{ YDVAR(1, VAR_CONTROL_USE_CERT) }
330 server-key-file{COLON}		{ YDVAR(1, VAR_SERVER_KEY_FILE) }
331 server-cert-file{COLON}		{ YDVAR(1, VAR_SERVER_CERT_FILE) }
332 control-key-file{COLON}		{ YDVAR(1, VAR_CONTROL_KEY_FILE) }
333 control-cert-file{COLON}	{ YDVAR(1, VAR_CONTROL_CERT_FILE) }
334 python-script{COLON}		{ YDVAR(1, VAR_PYTHON_SCRIPT) }
335 python{COLON}			{ YDVAR(0, VAR_PYTHON) }
336 domain-insecure{COLON}		{ YDVAR(1, VAR_DOMAIN_INSECURE) }
337 minimal-responses{COLON}	{ YDVAR(1, VAR_MINIMAL_RESPONSES) }
338 rrset-roundrobin{COLON}		{ YDVAR(1, VAR_RRSET_ROUNDROBIN) }
339 max-udp-size{COLON}		{ YDVAR(1, VAR_MAX_UDP_SIZE) }
340 dns64-prefix{COLON}		{ YDVAR(1, VAR_DNS64_PREFIX) }
341 dns64-synthall{COLON}		{ YDVAR(1, VAR_DNS64_SYNTHALL) }
342 dnstap{COLON}			{ YDVAR(0, VAR_DNSTAP) }
343 dnstap-enable{COLON}		{ YDVAR(1, VAR_DNSTAP_ENABLE) }
344 dnstap-socket-path{COLON}	{ YDVAR(1, VAR_DNSTAP_SOCKET_PATH) }
345 dnstap-send-identity{COLON}	{ YDVAR(1, VAR_DNSTAP_SEND_IDENTITY) }
346 dnstap-send-version{COLON}	{ YDVAR(1, VAR_DNSTAP_SEND_VERSION) }
347 dnstap-identity{COLON}		{ YDVAR(1, VAR_DNSTAP_IDENTITY) }
348 dnstap-version{COLON}		{ YDVAR(1, VAR_DNSTAP_VERSION) }
349 dnstap-log-resolver-query-messages{COLON}	{
350 		YDVAR(1, VAR_DNSTAP_LOG_RESOLVER_QUERY_MESSAGES) }
351 dnstap-log-resolver-response-messages{COLON}	{
352 		YDVAR(1, VAR_DNSTAP_LOG_RESOLVER_RESPONSE_MESSAGES) }
353 dnstap-log-client-query-messages{COLON}		{
354 		YDVAR(1, VAR_DNSTAP_LOG_CLIENT_QUERY_MESSAGES) }
355 dnstap-log-client-response-messages{COLON}	{
356 		YDVAR(1, VAR_DNSTAP_LOG_CLIENT_RESPONSE_MESSAGES) }
357 dnstap-log-forwarder-query-messages{COLON}	{
358 		YDVAR(1, VAR_DNSTAP_LOG_FORWARDER_QUERY_MESSAGES) }
359 dnstap-log-forwarder-response-messages{COLON}	{
360 		YDVAR(1, VAR_DNSTAP_LOG_FORWARDER_RESPONSE_MESSAGES) }
361 ratelimit{COLON}		{ YDVAR(1, VAR_RATELIMIT) }
362 ratelimit-slabs{COLON}		{ YDVAR(1, VAR_RATELIMIT_SLABS) }
363 ratelimit-size{COLON}		{ YDVAR(1, VAR_RATELIMIT_SIZE) }
364 ratelimit-for-domain{COLON}	{ YDVAR(2, VAR_RATELIMIT_FOR_DOMAIN) }
365 ratelimit-below-domain{COLON}	{ YDVAR(2, VAR_RATELIMIT_BELOW_DOMAIN) }
366 ratelimit-factor{COLON}		{ YDVAR(1, VAR_RATELIMIT_FACTOR) }
367 <INITIAL,val>{NEWLINE}		{ LEXOUT(("NL\n")); cfg_parser->line++; }
368 
369 	/* Quoted strings. Strip leading and ending quotes */
370 <val>\"			{ BEGIN(quotedstring); LEXOUT(("QS ")); }
371 <quotedstring><<EOF>>   {
372         ub_c_error("EOF inside quoted string");
373 	if(--num_args == 0) { BEGIN(INITIAL); }
374 	else		    { BEGIN(val); }
375 }
376 <quotedstring>{DQANY}*  { LEXOUT(("STR(%s) ", ub_c_text)); yymore(); }
377 <quotedstring>{NEWLINE} { ub_c_error("newline inside quoted string, no end \"");
378 			  cfg_parser->line++; BEGIN(INITIAL); }
379 <quotedstring>\" {
380         LEXOUT(("QE "));
381 	if(--num_args == 0) { BEGIN(INITIAL); }
382 	else		    { BEGIN(val); }
383         ub_c_text[ub_c_leng - 1] = '\0';
384 	ub_c_lval.str = strdup(ub_c_text);
385 	if(!ub_c_lval.str)
386 		ub_c_error("out of memory");
387         return STRING_ARG;
388 }
389 
390 	/* Single Quoted strings. Strip leading and ending quotes */
391 <val>\'			{ BEGIN(singlequotedstr); LEXOUT(("SQS ")); }
392 <singlequotedstr><<EOF>>   {
393         ub_c_error("EOF inside quoted string");
394 	if(--num_args == 0) { BEGIN(INITIAL); }
395 	else		    { BEGIN(val); }
396 }
397 <singlequotedstr>{SQANY}*  { LEXOUT(("STR(%s) ", ub_c_text)); yymore(); }
398 <singlequotedstr>{NEWLINE} { ub_c_error("newline inside quoted string, no end '");
399 			     cfg_parser->line++; BEGIN(INITIAL); }
400 <singlequotedstr>\' {
401         LEXOUT(("SQE "));
402 	if(--num_args == 0) { BEGIN(INITIAL); }
403 	else		    { BEGIN(val); }
404         ub_c_text[ub_c_leng - 1] = '\0';
405 	ub_c_lval.str = strdup(ub_c_text);
406 	if(!ub_c_lval.str)
407 		ub_c_error("out of memory");
408         return STRING_ARG;
409 }
410 
411 	/* include: directive */
412 <INITIAL,val>include{COLON}	{
413 	LEXOUT(("v(%s) ", ub_c_text)); inc_prev = YYSTATE; BEGIN(include); }
414 <include><<EOF>>	{
415         ub_c_error("EOF inside include directive");
416         BEGIN(inc_prev);
417 }
418 <include>{SPACE}*	{ LEXOUT(("ISP ")); /* ignore */ }
419 <include>{NEWLINE}	{ LEXOUT(("NL\n")); cfg_parser->line++;}
420 <include>\"		{ LEXOUT(("IQS ")); BEGIN(include_quoted); }
421 <include>{UNQUOTEDLETTER}*	{
422 	LEXOUT(("Iunquotedstr(%s) ", ub_c_text));
423 	config_start_include_glob(ub_c_text);
424 	BEGIN(inc_prev);
425 }
426 <include_quoted><<EOF>>	{
427         ub_c_error("EOF inside quoted string");
428         BEGIN(inc_prev);
429 }
430 <include_quoted>{DQANY}*	{ LEXOUT(("ISTR(%s) ", ub_c_text)); yymore(); }
431 <include_quoted>{NEWLINE}	{ ub_c_error("newline before \" in include name");
432 				  cfg_parser->line++; BEGIN(inc_prev); }
433 <include_quoted>\"	{
434 	LEXOUT(("IQE "));
435 	ub_c_text[ub_c_leng - 1] = '\0';
436 	config_start_include_glob(ub_c_text);
437 	BEGIN(inc_prev);
438 }
439 <INITIAL,val><<EOF>>	{
440 	LEXOUT(("LEXEOF "));
441 	yy_set_bol(1); /* Set beginning of line, so "^" rules match.  */
442 	if (!config_include_stack) {
443 		yyterminate();
444 	} else {
445 		fclose(ub_c_in);
446 		config_end_include();
447 	}
448 }
449 
450 <val>{UNQUOTEDLETTER}*	{ LEXOUT(("unquotedstr(%s) ", ub_c_text));
451 			if(--num_args == 0) { BEGIN(INITIAL); }
452 			ub_c_lval.str = strdup(ub_c_text); return STRING_ARG; }
453 
454 {UNQUOTEDLETTER_NOCOLON}*	{
455 	ub_c_error_msg("unknown keyword '%s'", ub_c_text);
456 	}
457 
458 <*>.	{
459 	ub_c_error_msg("stray '%s'", ub_c_text);
460 	}
461 
462 %%
463