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