diff options
author | gumi <git@gumi.ca> | 2020-05-03 22:47:07 -0400 |
---|---|---|
committer | gumi <git@gumi.ca> | 2020-05-07 16:09:29 -0400 |
commit | 57fc65aa5a1e1abf81370dd8e6f879d3562446b9 (patch) | |
tree | abc98b69f40dfcf660ec0b2f5e3391535d7e3c50 /3rdparty | |
parent | 79a92158c956c51b51777f37b545f94533fe9df6 (diff) | |
download | hercules-57fc65aa5a1e1abf81370dd8e6f879d3562446b9.tar.gz hercules-57fc65aa5a1e1abf81370dd8e6f879d3562446b9.tar.bz2 hercules-57fc65aa5a1e1abf81370dd8e6f879d3562446b9.tar.xz hercules-57fc65aa5a1e1abf81370dd8e6f879d3562446b9.zip |
libconfig: add support for number separators
Diffstat (limited to '3rdparty')
-rw-r--r-- | 3rdparty/libconfig/extra/gen/grammar.y | 8 | ||||
-rw-r--r-- | 3rdparty/libconfig/extra/gen/scanner.l | 196 | ||||
-rw-r--r-- | 3rdparty/libconfig/grammar.c | 8 | ||||
-rw-r--r-- | 3rdparty/libconfig/libconfig.c | 25 | ||||
-rw-r--r-- | 3rdparty/libconfig/scanner.c | 589 | ||||
-rw-r--r-- | 3rdparty/libconfig/scanner.h | 2 |
6 files changed, 392 insertions, 436 deletions
diff --git a/3rdparty/libconfig/extra/gen/grammar.y b/3rdparty/libconfig/extra/gen/grammar.y index a59fcc354..b02612435 100644 --- a/3rdparty/libconfig/extra/gen/grammar.y +++ b/3rdparty/libconfig/extra/gen/grammar.y @@ -315,7 +315,7 @@ simple_value: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int_elem(ctx->parent, -1, $1); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -332,7 +332,7 @@ simple_value: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int64_elem(ctx->parent, -1, $1); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -349,7 +349,7 @@ simple_value: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int_elem(ctx->parent, -1, $1); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -366,7 +366,7 @@ simple_value: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int64_elem(ctx->parent, -1, $1); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { diff --git a/3rdparty/libconfig/extra/gen/scanner.l b/3rdparty/libconfig/extra/gen/scanner.l index f75bf67f6..4a7e5a06d 100644 --- a/3rdparty/libconfig/extra/gen/scanner.l +++ b/3rdparty/libconfig/extra/gen/scanner.l @@ -50,100 +50,103 @@ #define YY_NO_INPUT // Suppress generation of useless input() function -static unsigned long long fromhex(const char *s) +/** + * converts a hexadecimal number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long fromhex(const char *p) { -#ifdef __MINGW32__ - - /* MinGW's strtoull() seems to be broken; it only returns the lower - * 32 bits... - */ - - const char *p = s; unsigned long long val = 0; - if(*p != '0') - return(0); - - ++p; - - if(*p != 'x' && *p != 'X') - return(0); - - for(++p; isxdigit(*p); ++p) - { - val <<= 4; - val |= ((*p < 'A') ? (*p & 0xF) : (9 + (*p & 0x7))); + if (*p != '0' || (p[1] != 'x' && p[1] != 'X')) { + return 0; } - return(val); - -#else /* ! __MINGW32__ */ - - return(strtoull(s, NULL, 16)); + for (p += 2; isxdigit(*p) || *p == '_'; ++p) { + if (*p != '_') { + val <<= 4; + val |= ((*p < 'A') ? (*p & 0xF) : (9 + (*p & 0x7))); + } + } -#endif /* __MINGW32__ */ + return val; } -static unsigned long long frombin (const char *s) +/** + * converts a binary number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long frombin (const char *p) { -#ifdef __MINGW32__ - - /* same problem as fromhex(): MinGW's strtoull() is broken */ - - const char *p = s; unsigned long long val = 0; - if (*p != '0') - return(0); - - ++p; - - if (*p != 'b' && *p != 'B') - return(0); + if (*p != '0' || (p[1] != 'b' && p[1] != 'B')) { + return 0; + } - for (++p; *p == '0' || *p == '1'; ++p) { - val <<= 1; - val |= *p == '0' ? 0 : 1; + for (p += 2; *p == '0' || *p == '1' || *p == '_'; ++p) { + if (*p != '_') { + val <<= 1; + val |= (*p == '0') ? 0 : 1; + } } return val; - -#else /* ! __MINGW32__ */ - - return strtoull(s + 2, NULL, 2); - -#endif /* __MINGW32__ */ } -static unsigned long long fromoct (const char *s) +/** + * converts an octal number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long fromoct (const char *p) { -#ifdef __MINGW32__ - - /* same problem as fromhex(): MinGW's strtoull() is broken */ - - const char *p = s; unsigned long long val = 0; - if (*p != '0') - return(0); - - ++p; - - if (*p != 'o' && *p != 'O') - return(0); + if (*p != '0' || (p[1] != 'o' && p[1] != 'O')) { + return 0; + } - for (++p; *p >= '0' && *p <= '7'; ++p) { - val <<= 3; - val |= *p & 0xF; + for (p += 2; (*p >= '0' && *p <= '7') || *p == '_'; ++p) { + if (*p != '_') { + val <<= 3; + val |= (*p & 0xF); + } } return val; +} -#else /* ! __MINGW32__ */ +/** + * converts a decimal number literal to a ll integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting signed long long integer + */ +static long long fromdec (const char *p) +{ + unsigned char is_neg = 0; - return strtoull(s + 2, NULL, 8); + if (*p == '-') { + is_neg = 1; + p++; + } + + long long val = 0; + + for (; isdigit(*p) || *p == '_'; ++p) { + if (*p != '_') { + val *= 10; + val += (*p & 0xF); + } + } -#endif /* __MINGW32__ */ + return (is_neg == 1) ? -val : val; } %} @@ -151,14 +154,14 @@ static unsigned long long fromoct (const char *s) true [Tt][Rr][Uu][Ee] false [Ff][Aa][Ll][Ss][Ee] name [A-Za-z0-9\*][-A-Za-z0-9_\*.]* -integer [-+]?[0-9]+ -integer64 [-+]?[0-9]+L(L)? -hex 0[Xx][0-9A-Fa-f]+ -hex64 0[Xx][0-9A-Fa-f]+L(L)? -bin 0[Bb][01]+ -bin64 0[Bb][01]+L(L)? -oct 0[Oo][0-7]+ -oct64 0[Oo][0-7]+L(L)? +integer [-+]?[0-9_]+ +integer64 [-+]?[0-9_]+L(L)? +hex 0[Xx][0-9A-Fa-f_]+ +hex64 0[Xx][0-9A-Fa-f_]+L(L)? +bin 0[Bb][01_]+ +bin64 0[Bb][01_]+L(L)? +oct 0[Oo][0-7_]+ +oct64 0[Oo][0-7_]+L(L)? hexchar \\[Xx][0-9A-Fa-f]{2} float ([-+]?([0-9]*)?\.[0-9]*([eE][-+]?[0-9]+)?)|([-+]?([0-9]+)(\.[0-9]*)?[eE][-+]?[0-9]+) comment (#|\/\/).*$ @@ -239,44 +242,13 @@ include_open ^[ \t]*@include[ \t]+\" {true} { yylval->ival = 1; return(TOK_BOOLEAN); } {false} { yylval->ival = 0; return(TOK_BOOLEAN); } {float} { yylval->fval = atof(yytext); return(TOK_FLOAT); } -{integer} { - long long llval; - llval = atoll(yytext); - if((llval < INT_MIN) || (llval > INT_MAX)) - { - yylval->llval = llval; - return(TOK_INTEGER64); - } - else - { - yylval->ival = (int)llval; - return(TOK_INTEGER); - } - } -{integer64} { yylval->llval = atoll(yytext); return(TOK_INTEGER64); } -{hex} { - unsigned long ulval = strtoul(yytext, NULL, 16); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return(TOK_HEX); - } -{hex64} { yylval->llval = fromhex(yytext); return(TOK_HEX64); } -{bin} { - unsigned long ulval = strtoul(yytext + 2, NULL, 2); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return TOK_BIN; - } +{integer} { yylval->ival = (int)fromdec(yytext); return TOK_INTEGER; } +{integer64} { yylval->llval = fromdec(yytext); return TOK_INTEGER64; } +{hex} { yylval->ival = (int)fromhex(yytext); return TOK_HEX; } +{hex64} { yylval->llval = fromhex(yytext); return TOK_HEX64; } +{bin} { yylval->ival = (int)frombin(yytext); return TOK_BIN; } {bin64} { yylval->llval = frombin(yytext); return TOK_BIN64; } -{oct} { - unsigned long ulval = strtoul(yytext + 2, NULL, 8); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return TOK_OCT; - } +{oct} { yylval->ival = (int)fromoct(yytext); return TOK_OCT; } {oct64} { yylval->llval = fromoct(yytext); return TOK_OCT64; } {name} { yylval->sval = yytext; return(TOK_NAME); } \[ { return(TOK_ARRAY_START); } diff --git a/3rdparty/libconfig/grammar.c b/3rdparty/libconfig/grammar.c index da528ee20..0c3206d23 100644 --- a/3rdparty/libconfig/grammar.c +++ b/3rdparty/libconfig/grammar.c @@ -1578,7 +1578,7 @@ yyreduce: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int_elem(ctx->parent, -1, (yyvsp[0].ival)); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -1599,7 +1599,7 @@ yyreduce: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int64_elem(ctx->parent, -1, (yyvsp[0].llval)); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -1620,7 +1620,7 @@ yyreduce: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int_elem(ctx->parent, -1, (yyvsp[0].ival)); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { @@ -1641,7 +1641,7 @@ yyreduce: if (IN_ARRAY() || IN_LIST()) { struct config_setting_t *e = config_setting_set_int64_elem(ctx->parent, -1, (yyvsp[0].llval)); - if (!e) { + if (e == NULL) { libconfig_yyerror(scanner, ctx, scan_ctx, err_array_elem_type); YYABORT; } else { diff --git a/3rdparty/libconfig/libconfig.c b/3rdparty/libconfig/libconfig.c index 68dd4fdd8..daf3ba42d 100644 --- a/3rdparty/libconfig/libconfig.c +++ b/3rdparty/libconfig/libconfig.c @@ -176,16 +176,21 @@ static void __config_indent(FILE *stream, int depth, unsigned short w) /** * converts an integer to a binary string (because itoa is not in C99) + * skips leading zeros, and does not prepend with a 0b prefix + * + * @param value - the integer to convert to a binary expression + * @param buffer - a pointer to the buffer used to build the string + * @returns the same buffer */ char *int_tobin(const unsigned long long value, char *buffer) { const unsigned long long mask = 1; - char nonzero = 0; + unsigned char nonzero = 0; for (char bit = 63; bit >= 0; --bit) { if ((value & (mask << bit)) == 1) { nonzero = 1; *buffer++ = '1'; - } else if (nonzero) { + } else if (nonzero != 0) { *buffer++ = '0'; } } @@ -217,7 +222,7 @@ static void __config_write_value(const struct config_t *config, case CONFIG_FORMAT_BIN: { - char buffer[33]; // 32 bits + null + char buffer[33]; // 32 individual bits (char '0' and '1') represented as 32 bytes + null fprintf(stream, "0b%s", int_tobin((unsigned int)(value->ival), buffer)); break; } @@ -243,7 +248,7 @@ static void __config_write_value(const struct config_t *config, case CONFIG_FORMAT_BIN: { - char buffer[65]; // 64 bits + null + char buffer[65]; // 64 individual bits (char '0' and '1') represented as 64 bytes + null fprintf(stream, "0b%s", int_tobin((unsigned long long)(value->llval), buffer)); break; } @@ -1216,15 +1221,15 @@ int config_setting_set_string(struct config_setting_t *setting, const char *valu int config_setting_set_format(struct config_setting_t *setting, short format) { - if(((setting->type != CONFIG_TYPE_INT) - && (setting->type != CONFIG_TYPE_INT64)) - || ((format != CONFIG_FORMAT_DEFAULT) && (format != CONFIG_FORMAT_HEX) && - (format != CONFIG_FORMAT_BIN) && (format != CONFIG_FORMAT_OCT))) - return(CONFIG_FALSE); + if (((setting->type != CONFIG_TYPE_INT) && (setting->type != CONFIG_TYPE_INT64)) + || ((format != CONFIG_FORMAT_DEFAULT) && (format != CONFIG_FORMAT_HEX) + && (format != CONFIG_FORMAT_BIN) && (format != CONFIG_FORMAT_OCT))) { + return CONFIG_FALSE; + } setting->format = format; - return(CONFIG_TRUE); + return CONFIG_TRUE; } /* ------------------------------------------------------------------------- */ diff --git a/3rdparty/libconfig/scanner.c b/3rdparty/libconfig/scanner.c index ba8f40821..584c8ae06 100644 --- a/3rdparty/libconfig/scanner.c +++ b/3rdparty/libconfig/scanner.c @@ -257,7 +257,7 @@ #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h, - * if you want the limit (max/min) macros for int types. + * if you want the limit (max/min) macros for int types. */ #ifndef __STDC_LIMIT_MACROS #define __STDC_LIMIT_MACROS 1 @@ -274,7 +274,7 @@ typedef uint32_t flex_uint32_t; typedef signed char flex_int8_t; typedef short int flex_int16_t; typedef int flex_int32_t; -typedef unsigned char flex_uint8_t; +typedef unsigned char flex_uint8_t; typedef unsigned short int flex_uint16_t; typedef unsigned int flex_uint32_t; @@ -398,7 +398,7 @@ typedef size_t yy_size_t; #define EOB_ACT_CONTINUE_SCAN 0 #define EOB_ACT_END_OF_FILE 1 #define EOB_ACT_LAST_MATCH 2 - + /* Note: We specifically omit the test for yy_rule_can_match_eol because it requires * access to the local variable yy_act. Since yyless() is a macro, it would break * existing scanners that call yyless() from OUTSIDE yylex. @@ -420,7 +420,7 @@ typedef size_t yy_size_t; if ( *p == '\n' )\ --yylineno;\ }while(0) - + /* Return all but the first "n" matched characters back to the input stream. */ #define yyless(n) \ do \ @@ -588,22 +588,23 @@ struct yy_trans_info flex_int32_t yy_verify; flex_int32_t yy_nxt; }; -static const flex_int16_t yy_accept[131] = +static const flex_int16_t yy_accept[134] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 50, 48, 25, 24, 24, 5, 48, 44, 45, 41, 48, 27, 32, 48, 33, 33, 26, 46, 48, 41, - 41, 42, 43, 28, 29, 25, 48, 3, 4, 3, - 6, 15, 14, 20, 23, 49, 17, 49, 25, 0, - 47, 41, 32, 33, 32, 0, 1, 0, 32, 33, - 41, 41, 34, 41, 41, 16, 41, 41, 25, 0, - 0, 2, 6, 12, 0, 11, 10, 7, 8, 9, - 20, 22, 21, 17, 0, 18, 32, 0, 34, 0, - 32, 32, 41, 37, 0, 41, 32, 34, 39, 35, - - 41, 41, 0, 0, 32, 0, 32, 34, 0, 41, - 32, 38, 40, 36, 41, 30, 0, 13, 32, 38, - 40, 36, 31, 0, 0, 0, 0, 0, 19, 0 + 41, 42, 43, 33, 28, 29, 25, 48, 3, 4, + 3, 6, 15, 14, 20, 23, 49, 17, 49, 25, + 0, 47, 41, 32, 33, 33, 32, 0, 1, 0, + 32, 33, 41, 41, 34, 41, 41, 33, 16, 41, + 41, 34, 25, 0, 0, 2, 6, 12, 0, 11, + 10, 7, 8, 9, 20, 22, 21, 17, 0, 18, + 32, 0, 0, 32, 32, 41, 37, 0, 41, 32, + + 34, 39, 35, 41, 41, 34, 0, 0, 32, 0, + 32, 0, 41, 32, 38, 40, 36, 41, 30, 0, + 13, 32, 38, 40, 36, 31, 0, 0, 0, 0, + 0, 19, 0 } ; static const YY_CHAR yy_ec[256] = @@ -648,93 +649,96 @@ static const YY_CHAR yy_meta[55] = 3, 3, 1, 1 } ; -static const flex_int16_t yy_base[142] = +static const flex_int16_t yy_base[145] = { 0, - 0, 53, 53, 54, 52, 53, 54, 55, 321, 320, - 325, 328, 322, 328, 328, 328, 320, 328, 328, 0, - 51, 328, 55, 65, 87, 49, 328, 328, 310, 286, - 47, 328, 328, 328, 328, 60, 232, 328, 328, 263, - 0, 328, 77, 0, 328, 71, 271, 239, 259, 226, - 328, 0, 117, 123, 131, 140, 328, 225, 148, 69, - 72, 162, 188, 92, 178, 328, 81, 93, 96, 170, - 143, 328, 0, 328, 0, 328, 328, 328, 328, 328, - 0, 328, 328, 180, 160, 328, 153, 172, 142, 183, - 193, 197, 214, 202, 219, 227, 231, 0, 223, 131, - - 126, 93, 111, 0, 235, 249, 240, 328, 253, 257, - 265, 112, 111, 99, 158, 0, 76, 328, 269, 0, - 0, 0, 0, 66, 68, 54, 89, 84, 328, 328, - 288, 292, 296, 300, 304, 306, 310, 314, 318, 75, - 62 + 0, 53, 53, 54, 52, 53, 54, 55, 347, 346, + 351, 354, 348, 354, 354, 354, 346, 354, 354, 0, + 54, 354, 58, 52, 90, 52, 354, 354, 342, 321, + 31, 354, 354, 82, 354, 354, 64, 299, 354, 354, + 330, 0, 354, 80, 0, 354, 76, 332, 310, 299, + 297, 354, 0, 120, 152, 125, 129, 143, 354, 280, + 134, 64, 156, 169, 249, 159, 186, 191, 354, 73, + 32, 206, 86, 188, 151, 354, 0, 354, 0, 354, + 354, 354, 354, 354, 0, 354, 354, 187, 154, 354, + 208, 223, 173, 201, 227, 241, 179, 231, 245, 249, + + 0, 253, 132, 120, 154, 354, 97, 0, 257, 271, + 261, 275, 280, 287, 102, 101, 95, 177, 0, 77, + 354, 291, 0, 0, 0, 0, 63, 69, 67, 108, + 249, 354, 354, 310, 314, 318, 322, 326, 328, 332, + 336, 340, 79, 76 } ; -static const flex_int16_t yy_def[142] = +static const flex_int16_t yy_def[145] = { 0, - 130, 1, 131, 131, 132, 132, 133, 133, 134, 134, - 130, 130, 130, 130, 130, 130, 135, 130, 130, 136, - 130, 130, 130, 130, 136, 25, 130, 130, 130, 136, - 136, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 137, 130, 130, 138, 130, 130, 139, 139, 130, 135, - 130, 136, 130, 130, 130, 130, 130, 135, 136, 25, - 136, 136, 136, 136, 136, 130, 136, 136, 130, 130, - 130, 130, 137, 130, 140, 130, 130, 130, 130, 130, - 138, 130, 130, 139, 139, 130, 130, 130, 130, 130, - 130, 136, 136, 136, 130, 136, 136, 136, 136, 65, - - 136, 136, 130, 141, 130, 130, 130, 130, 130, 136, - 136, 136, 136, 136, 136, 136, 130, 130, 130, 136, - 136, 136, 136, 130, 130, 130, 130, 130, 130, 0, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130 + 133, 1, 134, 134, 135, 135, 136, 136, 137, 137, + 133, 133, 133, 133, 133, 133, 138, 133, 133, 139, + 133, 133, 133, 133, 139, 25, 133, 133, 133, 139, + 139, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 140, 133, 133, 141, 133, 133, 142, 142, 133, + 138, 133, 139, 133, 133, 133, 133, 133, 133, 138, + 139, 25, 139, 139, 139, 139, 139, 139, 133, 139, + 139, 133, 133, 133, 133, 133, 140, 133, 143, 133, + 133, 133, 133, 133, 141, 133, 133, 142, 142, 133, + 133, 133, 133, 133, 139, 139, 139, 133, 139, 139, + + 139, 139, 67, 139, 139, 133, 133, 144, 133, 133, + 133, 133, 139, 139, 139, 139, 139, 139, 139, 133, + 133, 133, 139, 139, 139, 139, 133, 133, 133, 133, + 133, 133, 0, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133 } ; -static const flex_int16_t yy_nxt[383] = +static const flex_int16_t yy_nxt[409] = { 0, 12, 13, 14, 15, 15, 16, 17, 18, 19, 20, 21, 22, 21, 23, 24, 25, 26, 26, 26, 27, 28, 29, 27, 12, 12, 20, 20, 20, 20, 30, 20, 20, 20, 20, 20, 31, 20, 20, 32, 12, - 33, 12, 20, 20, 20, 30, 20, 20, 20, 20, - 31, 20, 34, 35, 36, 39, 39, 42, 42, 45, - 45, 69, 40, 40, 53, 118, 54, 54, 54, 54, - 55, 55, 55, 55, 57, 52, 82, 37, 104, 58, - 68, 52, 74, 56, 70, 128, 52, 94, 94, 129, - 128, 43, 43, 46, 46, 52, 68, 69, 127, 56, - - 59, 52, 60, 60, 60, 60, 52, 99, 99, 99, - 83, 126, 101, 61, 75, 62, 76, 125, 63, 64, - 70, 116, 77, 124, 65, 78, 79, 80, 101, 102, - 122, 62, 55, 55, 55, 55, 87, 116, 54, 54, - 54, 54, 121, 120, 102, 56, 55, 55, 55, 55, - 90, 88, 90, 117, 89, 91, 91, 91, 91, 56, - 115, 56, 114, 92, 92, 92, 92, 88, 105, 105, - 105, 105, 95, 108, 96, 56, 93, 97, 97, 97, - 97, 106, 95, 130, 95, 85, 123, 107, 107, 107, - 107, 103, 93, 100, 100, 100, 100, 106, 91, 91, - - 91, 91, 123, 100, 100, 100, 100, 100, 91, 91, - 91, 91, 92, 92, 92, 92, 71, 94, 94, 98, - 100, 100, 100, 100, 109, 93, 110, 51, 51, 111, - 111, 111, 111, 112, 107, 107, 107, 107, 99, 99, - 99, 93, 97, 97, 97, 97, 97, 97, 97, 97, - 105, 105, 105, 105, 113, 107, 107, 107, 107, 109, - 49, 109, 86, 106, 119, 119, 119, 119, 119, 119, - 119, 119, 111, 111, 111, 111, 85, 72, 71, 106, - 111, 111, 111, 111, 119, 119, 119, 119, 38, 38, - 38, 38, 41, 41, 41, 41, 44, 44, 44, 44, - - 47, 47, 47, 47, 50, 50, 50, 50, 52, 52, - 73, 67, 73, 73, 81, 66, 81, 81, 84, 84, - 84, 84, 51, 49, 130, 48, 48, 11, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130 + 33, 34, 20, 20, 20, 30, 20, 20, 20, 20, + 31, 20, 35, 36, 37, 40, 40, 43, 43, 46, + 46, 59, 41, 41, 71, 73, 60, 54, 105, 55, + 55, 55, 55, 57, 57, 57, 57, 38, 53, 121, + 71, 86, 108, 105, 53, 78, 58, 73, 74, 53, + 53, 44, 44, 47, 47, 56, 53, 56, 56, 56, + + 56, 53, 58, 61, 104, 62, 62, 62, 62, 131, + 74, 130, 129, 72, 128, 87, 63, 79, 64, 80, + 104, 65, 66, 56, 127, 81, 125, 67, 82, 83, + 84, 68, 124, 123, 64, 57, 57, 57, 57, 120, + 56, 56, 56, 56, 57, 57, 57, 57, 58, 95, + 95, 95, 95, 93, 118, 93, 72, 58, 94, 94, + 94, 94, 96, 117, 58, 91, 56, 55, 55, 55, + 55, 97, 97, 58, 102, 102, 102, 133, 96, 98, + 92, 99, 119, 72, 100, 100, 100, 100, 94, 94, + 94, 94, 89, 56, 97, 97, 92, 97, 119, 107, + + 102, 103, 103, 103, 103, 126, 68, 68, 68, 68, + 115, 103, 103, 103, 103, 103, 94, 94, 94, 94, + 97, 126, 65, 109, 109, 109, 109, 103, 103, 103, + 103, 103, 68, 98, 75, 98, 110, 106, 111, 111, + 111, 111, 95, 95, 95, 95, 111, 111, 111, 111, + 131, 112, 110, 113, 132, 96, 114, 114, 114, 114, + 100, 100, 100, 100, 100, 100, 100, 100, 102, 102, + 102, 96, 109, 109, 109, 109, 111, 111, 111, 111, + 101, 112, 52, 112, 116, 110, 122, 122, 122, 122, + 122, 122, 122, 122, 102, 114, 114, 114, 114, 52, + + 50, 110, 114, 114, 114, 114, 122, 122, 122, 122, + 39, 39, 39, 39, 42, 42, 42, 42, 45, 45, + 45, 45, 48, 48, 48, 48, 51, 51, 51, 51, + 53, 53, 77, 90, 77, 77, 85, 89, 85, 85, + 88, 88, 88, 88, 76, 75, 70, 69, 52, 50, + 133, 49, 49, 11, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + + 133, 133, 133, 133, 133, 133, 133, 133 } ; -static const flex_int16_t yy_chk[383] = +static const flex_int16_t yy_chk[409] = { 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, @@ -742,49 +746,52 @@ static const flex_int16_t yy_chk[383] = 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 4, 5, 6, 7, - 8, 36, 3, 4, 21, 141, 21, 21, 21, 21, - 23, 23, 23, 23, 24, 26, 46, 2, 140, 24, - 31, 26, 43, 23, 36, 128, 26, 61, 61, 128, - 127, 5, 6, 7, 8, 60, 31, 69, 126, 23, - - 25, 60, 25, 25, 25, 25, 60, 64, 64, 64, - 46, 125, 67, 25, 43, 25, 43, 124, 25, 25, - 69, 102, 43, 117, 25, 43, 43, 43, 67, 68, - 114, 25, 53, 53, 53, 53, 54, 102, 54, 54, - 54, 54, 113, 112, 68, 53, 55, 55, 55, 55, - 56, 54, 56, 103, 54, 56, 56, 56, 56, 55, - 101, 53, 100, 59, 59, 59, 59, 54, 87, 87, - 87, 87, 62, 89, 62, 55, 59, 62, 62, 62, - 62, 87, 88, 85, 88, 84, 115, 88, 88, 88, - 88, 71, 59, 65, 65, 65, 65, 87, 90, 90, - - 90, 90, 115, 65, 65, 65, 65, 65, 91, 91, - 91, 91, 92, 92, 92, 92, 70, 94, 94, 63, - 65, 65, 65, 65, 93, 92, 93, 58, 50, 93, - 93, 93, 93, 94, 95, 95, 95, 95, 99, 99, - 99, 92, 96, 96, 96, 96, 97, 97, 97, 97, - 105, 105, 105, 105, 99, 107, 107, 107, 107, 106, - 49, 106, 48, 105, 106, 106, 106, 106, 109, 109, - 109, 109, 110, 110, 110, 110, 47, 40, 37, 105, - 111, 111, 111, 111, 119, 119, 119, 119, 131, 131, - 131, 131, 132, 132, 132, 132, 133, 133, 133, 133, - + 8, 24, 3, 4, 31, 37, 24, 21, 71, 21, + 21, 21, 21, 23, 23, 23, 23, 2, 26, 144, + 31, 47, 143, 71, 26, 44, 23, 73, 37, 26, + 62, 5, 6, 7, 8, 21, 62, 34, 34, 34, + + 34, 62, 23, 25, 70, 25, 25, 25, 25, 130, + 73, 129, 128, 34, 127, 47, 25, 44, 25, 44, + 70, 25, 25, 34, 120, 44, 117, 25, 44, 44, + 44, 25, 116, 115, 25, 54, 54, 54, 54, 107, + 56, 56, 56, 56, 57, 57, 57, 57, 54, 61, + 61, 61, 61, 58, 104, 58, 56, 57, 58, 58, + 58, 58, 61, 103, 54, 55, 56, 55, 55, 55, + 55, 63, 63, 57, 66, 66, 66, 89, 61, 64, + 55, 64, 105, 55, 64, 64, 64, 64, 93, 93, + 93, 93, 88, 55, 97, 97, 55, 63, 105, 75, + + 66, 67, 67, 67, 67, 118, 68, 68, 68, 68, + 97, 67, 67, 67, 67, 67, 94, 94, 94, 94, + 97, 118, 68, 91, 91, 91, 91, 67, 67, 67, + 67, 67, 68, 92, 74, 92, 91, 72, 92, 92, + 92, 92, 95, 95, 95, 95, 98, 98, 98, 98, + 131, 96, 91, 96, 131, 95, 96, 96, 96, 96, + 99, 99, 99, 99, 100, 100, 100, 100, 102, 102, + 102, 95, 109, 109, 109, 109, 111, 111, 111, 111, + 65, 110, 60, 110, 102, 109, 110, 110, 110, 110, + 112, 112, 112, 112, 102, 113, 113, 113, 113, 51, + + 50, 109, 114, 114, 114, 114, 122, 122, 122, 122, 134, 134, 134, 134, 135, 135, 135, 135, 136, 136, - 137, 30, 137, 137, 138, 29, 138, 138, 139, 139, - 139, 139, 17, 13, 11, 10, 9, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130, 130, 130, 130, 130, 130, 130, 130, 130, - 130, 130 + 136, 136, 137, 137, 137, 137, 138, 138, 138, 138, + 139, 139, 140, 49, 140, 140, 141, 48, 141, 141, + 142, 142, 142, 142, 41, 38, 30, 29, 17, 13, + 11, 10, 9, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + 133, 133, 133, 133, 133, 133, 133, 133, 133, 133, + + 133, 133, 133, 133, 133, 133, 133, 133 } ; /* Table of booleans, true if rule could match eol. */ static const flex_int32_t yy_rule_can_match_eol[50] = { 0, -0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, - 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, +0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; /* The intent behind this definition is that it'll catch @@ -836,105 +843,108 @@ static const flex_int32_t yy_rule_can_match_eol[50] = #define YY_NO_INPUT // Suppress generation of useless input() function -static unsigned long long fromhex(const char *s) +/** + * converts a hexadecimal number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long fromhex(const char *p) { -#ifdef __MINGW32__ - - /* MinGW's strtoull() seems to be broken; it only returns the lower - * 32 bits... - */ - - const char *p = s; unsigned long long val = 0; - if(*p != '0') - return(0); - - ++p; - - if(*p != 'x' && *p != 'X') - return(0); - - for(++p; isxdigit(*p); ++p) - { - val <<= 4; - val |= ((*p < 'A') ? (*p & 0xF) : (9 + (*p & 0x7))); + if (*p != '0' || (p[1] != 'x' && p[1] != 'X')) { + return 0; } - return(val); - -#else /* ! __MINGW32__ */ - - return(strtoull(s, NULL, 16)); + for (p += 2; isxdigit(*p) || *p == '_'; ++p) { + if (*p != '_') { + val <<= 4; + val |= ((*p < 'A') ? (*p & 0xF) : (9 + (*p & 0x7))); + } + } -#endif /* __MINGW32__ */ + return val; } -static unsigned long long frombin (const char *s) +/** + * converts a binary number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long frombin (const char *p) { -#ifdef __MINGW32__ - - /* same problem as fromhex(): MinGW's strtoull() is broken */ - - const char *p = s; unsigned long long val = 0; - if (*p != '0') - return(0); - - ++p; - - if (*p != 'b' && *p != 'B') - return(0); + if (*p != '0' || (p[1] != 'b' && p[1] != 'B')) { + return 0; + } - for (++p; *p == '0' || *p == '1'; ++p) { - val <<= 1; - val |= *p == '0' ? 0 : 1; + for (p += 2; *p == '0' || *p == '1' || *p == '_'; ++p) { + if (*p != '_') { + val <<= 1; + val |= (*p == '0') ? 0 : 1; + } } return val; - -#else /* ! __MINGW32__ */ - - return strtoull(s + 2, NULL, 2); - -#endif /* __MINGW32__ */ } -static unsigned long long fromoct (const char *s) +/** + * converts an octal number literal to an ull integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting unsigned long long integer + */ +static unsigned long long fromoct (const char *p) { -#ifdef __MINGW32__ - - /* same problem as fromhex(): MinGW's strtoull() is broken */ - - const char *p = s; unsigned long long val = 0; - if (*p != '0') - return(0); - - ++p; - - if (*p != 'o' && *p != 'O') - return(0); + if (*p != '0' || (p[1] != 'o' && p[1] != 'O')) { + return 0; + } - for (++p; *p >= '0' && *p <= '7'; ++p) { - val <<= 3; - val |= *p & 0xF; + for (p += 2; (*p >= '0' && *p <= '7') || *p == '_'; ++p) { + if (*p != '_') { + val <<= 3; + val |= (*p & 0xF); + } } return val; +} -#else /* ! __MINGW32__ */ +/** + * converts a decimal number literal to a ll integer + * + * @param p - a pointer to the hexacimal expression to parse + * @returns the resulting signed long long integer + */ +static long long fromdec (const char *p) +{ + unsigned char is_neg = 0; - return strtoull(s + 2, NULL, 8); + if (*p == '-') { + is_neg = 1; + p++; + } -#endif /* __MINGW32__ */ + long long val = 0; + + for (; isdigit(*p) || *p == '_'; ++p) { + if (*p != '_') { + val *= 10; + val += (*p & 0xF); + } + } + + return (is_neg == 1) ? -val : val; } -#line 935 "scanner.c" +#line 945 "scanner.c" -#line 937 "scanner.c" +#line 947 "scanner.c" #define INITIAL 0 #define COMMENT 1 @@ -985,7 +995,7 @@ static int yy_init_globals ( yyscan_t yyscanner ); /* This must go here because YYSTYPE and YYLTYPE are included * from bison output in section 1.*/ # define yylval yyg->yylval_r - + int yylex_init (yyscan_t* scanner); int yylex_init_extra ( YY_EXTRA_TYPE user_defined, yyscan_t* scanner); @@ -1040,7 +1050,7 @@ extern int yywrap ( yyscan_t yyscanner ); #endif #ifndef YY_NO_UNPUT - + #endif #ifndef yytext_ptr @@ -1203,10 +1213,10 @@ YY_DECL } { -#line 169 "scanner.l" +#line 172 "scanner.l" -#line 1209 "scanner.c" +#line 1219 "scanner.c" while ( /*CONSTCOND*/1 ) /* loops until end-of-file is reached */ { @@ -1234,13 +1244,13 @@ yy_match: while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 131 ) + if ( yy_current_state >= 134 ) yy_c = yy_meta[yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; ++yy_cp; } - while ( yy_current_state != 130 ); + while ( yy_current_state != 133 ); yy_cp = yyg->yy_last_accepting_cpos; yy_current_state = yyg->yy_last_accepting_state; @@ -1254,7 +1264,7 @@ yy_find_action: int yyl; for ( yyl = 0; yyl < yyleng; ++yyl ) if ( yytext[yyl] == '\n' ) - + do{ yylineno++; yycolumn=0; }while(0) @@ -1274,69 +1284,69 @@ do_action: /* This label is used only to access EOF actions. */ case 1: YY_RULE_SETUP -#line 171 "scanner.l" +#line 174 "scanner.l" { BEGIN COMMENT; } YY_BREAK case 2: YY_RULE_SETUP -#line 172 "scanner.l" +#line 175 "scanner.l" { BEGIN INITIAL; } YY_BREAK case 3: YY_RULE_SETUP -#line 173 "scanner.l" +#line 176 "scanner.l" { /* ignore */ } YY_BREAK case 4: /* rule 4 can match eol */ YY_RULE_SETUP -#line 174 "scanner.l" +#line 177 "scanner.l" { /* ignore */ } YY_BREAK case 5: YY_RULE_SETUP -#line 176 "scanner.l" +#line 179 "scanner.l" { BEGIN STRING; } YY_BREAK case 6: /* rule 6 can match eol */ YY_RULE_SETUP -#line 177 "scanner.l" +#line 180 "scanner.l" { scanctx_append_string(yyextra, yytext); } YY_BREAK case 7: YY_RULE_SETUP -#line 178 "scanner.l" +#line 181 "scanner.l" { scanctx_append_string(yyextra, "\n"); } YY_BREAK case 8: YY_RULE_SETUP -#line 179 "scanner.l" +#line 182 "scanner.l" { scanctx_append_string(yyextra, "\r"); } YY_BREAK case 9: YY_RULE_SETUP -#line 180 "scanner.l" +#line 183 "scanner.l" { scanctx_append_string(yyextra, "\t"); } YY_BREAK case 10: YY_RULE_SETUP -#line 181 "scanner.l" +#line 184 "scanner.l" { scanctx_append_string(yyextra, "\f"); } YY_BREAK case 11: YY_RULE_SETUP -#line 182 "scanner.l" +#line 185 "scanner.l" { scanctx_append_string(yyextra, "\\"); } YY_BREAK case 12: YY_RULE_SETUP -#line 183 "scanner.l" +#line 186 "scanner.l" { scanctx_append_string(yyextra, "\""); } YY_BREAK case 13: YY_RULE_SETUP -#line 184 "scanner.l" +#line 187 "scanner.l" { char c[2] = { (char)(strtol(yytext + 2, NULL, 16) & 0xFF), 0 }; @@ -1345,12 +1355,12 @@ YY_RULE_SETUP YY_BREAK case 14: YY_RULE_SETUP -#line 189 "scanner.l" +#line 192 "scanner.l" { scanctx_append_string(yyextra, "\\"); } YY_BREAK case 15: YY_RULE_SETUP -#line 190 "scanner.l" +#line 193 "scanner.l" { yylval->sval = scanctx_take_string(yyextra); BEGIN INITIAL; @@ -1359,18 +1369,18 @@ YY_RULE_SETUP YY_BREAK case 16: YY_RULE_SETUP -#line 196 "scanner.l" +#line 199 "scanner.l" { BEGIN SCRIPTBLOCK; } YY_BREAK case 17: /* rule 17 can match eol */ YY_RULE_SETUP -#line 197 "scanner.l" +#line 200 "scanner.l" { scanctx_append_string(yyextra, yytext); } YY_BREAK case 18: YY_RULE_SETUP -#line 198 "scanner.l" +#line 201 "scanner.l" { yylval->sval = scanctx_take_string(yyextra); BEGIN INITIAL; @@ -1379,28 +1389,28 @@ YY_RULE_SETUP YY_BREAK case 19: YY_RULE_SETUP -#line 204 "scanner.l" +#line 207 "scanner.l" { BEGIN INCLUDE; } YY_BREAK case 20: /* rule 20 can match eol */ YY_RULE_SETUP -#line 205 "scanner.l" +#line 208 "scanner.l" { scanctx_append_string(yyextra, yytext); } YY_BREAK case 21: YY_RULE_SETUP -#line 206 "scanner.l" +#line 209 "scanner.l" { scanctx_append_string(yyextra, "\\"); } YY_BREAK case 22: YY_RULE_SETUP -#line 207 "scanner.l" +#line 210 "scanner.l" { scanctx_append_string(yyextra, "\""); } YY_BREAK case 23: YY_RULE_SETUP -#line 208 "scanner.l" +#line 211 "scanner.l" { const char *error; FILE *fp = scanctx_push_include(yyextra, @@ -1428,148 +1438,117 @@ YY_RULE_SETUP case 24: /* rule 24 can match eol */ YY_RULE_SETUP -#line 232 "scanner.l" +#line 235 "scanner.l" { /* ignore */ } YY_BREAK case 25: YY_RULE_SETUP -#line 233 "scanner.l" +#line 236 "scanner.l" { /* ignore */ } YY_BREAK case 26: YY_RULE_SETUP -#line 235 "scanner.l" +#line 238 "scanner.l" { return(TOK_EQUALS); } YY_BREAK case 27: YY_RULE_SETUP -#line 236 "scanner.l" +#line 239 "scanner.l" { return(TOK_COMMA); } YY_BREAK case 28: YY_RULE_SETUP -#line 237 "scanner.l" +#line 240 "scanner.l" { return(TOK_GROUP_START); } YY_BREAK case 29: YY_RULE_SETUP -#line 238 "scanner.l" +#line 241 "scanner.l" { return(TOK_GROUP_END); } YY_BREAK case 30: YY_RULE_SETUP -#line 239 "scanner.l" +#line 242 "scanner.l" { yylval->ival = 1; return(TOK_BOOLEAN); } YY_BREAK case 31: YY_RULE_SETUP -#line 240 "scanner.l" +#line 243 "scanner.l" { yylval->ival = 0; return(TOK_BOOLEAN); } YY_BREAK case 32: YY_RULE_SETUP -#line 241 "scanner.l" +#line 244 "scanner.l" { yylval->fval = atof(yytext); return(TOK_FLOAT); } YY_BREAK case 33: YY_RULE_SETUP -#line 242 "scanner.l" -{ - long long llval; - llval = atoll(yytext); - if((llval < INT_MIN) || (llval > INT_MAX)) - { - yylval->llval = llval; - return(TOK_INTEGER64); - } - else - { - yylval->ival = (int)llval; - return(TOK_INTEGER); - } - } +#line 245 "scanner.l" +{ yylval->ival = (int)fromdec(yytext); return TOK_INTEGER; } YY_BREAK case 34: YY_RULE_SETUP -#line 256 "scanner.l" -{ yylval->llval = atoll(yytext); return(TOK_INTEGER64); } +#line 246 "scanner.l" +{ yylval->llval = fromdec(yytext); return TOK_INTEGER64; } YY_BREAK case 35: YY_RULE_SETUP -#line 257 "scanner.l" -{ - unsigned long ulval = strtoul(yytext, NULL, 16); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return(TOK_HEX); - } +#line 247 "scanner.l" +{ yylval->ival = (int)fromhex(yytext); return TOK_HEX; } YY_BREAK case 36: YY_RULE_SETUP -#line 264 "scanner.l" -{ yylval->llval = fromhex(yytext); return(TOK_HEX64); } +#line 248 "scanner.l" +{ yylval->llval = fromhex(yytext); return TOK_HEX64; } YY_BREAK case 37: YY_RULE_SETUP -#line 265 "scanner.l" -{ - unsigned long ulval = strtoul(yytext + 2, NULL, 2); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return TOK_BIN; - } +#line 249 "scanner.l" +{ yylval->ival = (int)frombin(yytext); return TOK_BIN; } YY_BREAK case 38: YY_RULE_SETUP -#line 272 "scanner.l" +#line 250 "scanner.l" { yylval->llval = frombin(yytext); return TOK_BIN64; } YY_BREAK case 39: YY_RULE_SETUP -#line 273 "scanner.l" -{ - unsigned long ulval = strtoul(yytext + 2, NULL, 8); - if (ulval > INT32_MAX) - ulval &= INT32_MAX; - yylval->ival = (int)ulval; - return TOK_OCT; - } +#line 251 "scanner.l" +{ yylval->ival = (int)fromoct(yytext); return TOK_OCT; } YY_BREAK case 40: YY_RULE_SETUP -#line 280 "scanner.l" +#line 252 "scanner.l" { yylval->llval = fromoct(yytext); return TOK_OCT64; } YY_BREAK case 41: YY_RULE_SETUP -#line 281 "scanner.l" +#line 253 "scanner.l" { yylval->sval = yytext; return(TOK_NAME); } YY_BREAK case 42: YY_RULE_SETUP -#line 282 "scanner.l" +#line 254 "scanner.l" { return(TOK_ARRAY_START); } YY_BREAK case 43: YY_RULE_SETUP -#line 283 "scanner.l" +#line 255 "scanner.l" { return(TOK_ARRAY_END); } YY_BREAK case 44: YY_RULE_SETUP -#line 284 "scanner.l" +#line 256 "scanner.l" { return(TOK_LIST_START); } YY_BREAK case 45: YY_RULE_SETUP -#line 285 "scanner.l" +#line 257 "scanner.l" { return(TOK_LIST_END); } YY_BREAK case 46: YY_RULE_SETUP -#line 286 "scanner.l" +#line 258 "scanner.l" { return(TOK_SEMICOLON); } YY_BREAK case 47: @@ -1577,12 +1556,12 @@ case 47: yyg->yy_c_buf_p = yy_cp -= 1; YY_DO_BEFORE_ACTION; /* set up yytext again */ YY_RULE_SETUP -#line 287 "scanner.l" +#line 259 "scanner.l" { /* ignore */ } YY_BREAK case 48: YY_RULE_SETUP -#line 288 "scanner.l" +#line 260 "scanner.l" { return(TOK_GARBAGE); } YY_BREAK case YY_STATE_EOF(INITIAL): @@ -1590,7 +1569,7 @@ case YY_STATE_EOF(COMMENT): case YY_STATE_EOF(STRING): case YY_STATE_EOF(INCLUDE): case YY_STATE_EOF(SCRIPTBLOCK): -#line 290 "scanner.l" +#line 262 "scanner.l" { YY_BUFFER_STATE buf = (YY_BUFFER_STATE)scanctx_pop_include( yyextra); @@ -1605,10 +1584,10 @@ case YY_STATE_EOF(SCRIPTBLOCK): YY_BREAK case 49: YY_RULE_SETUP -#line 301 "scanner.l" +#line 273 "scanner.l" ECHO; YY_BREAK -#line 1611 "scanner.c" +#line 1590 "scanner.c" case YY_END_OF_BUFFER: { @@ -1907,7 +1886,7 @@ static int yy_get_next_buffer (yyscan_t yyscanner) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 131 ) + if ( yy_current_state >= 134 ) yy_c = yy_meta[yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; @@ -1936,11 +1915,11 @@ static int yy_get_next_buffer (yyscan_t yyscanner) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) { yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 131 ) + if ( yy_current_state >= 134 ) yy_c = yy_meta[yy_c]; } yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c]; - yy_is_jam = (yy_current_state == 130); + yy_is_jam = (yy_current_state == 133); (void)yyg; return yy_is_jam ? 0 : yy_current_state; @@ -2023,7 +2002,7 @@ static int yy_get_next_buffer (yyscan_t yyscanner) YY_CURRENT_BUFFER_LVALUE->yy_at_bol = (c == '\n'); if ( YY_CURRENT_BUFFER_LVALUE->yy_at_bol ) - + do{ yylineno++; yycolumn=0; }while(0) @@ -2108,7 +2087,7 @@ static void yy_load_buffer_state (yyscan_t yyscanner) YY_BUFFER_STATE yy_create_buffer (FILE * file, int size , yyscan_t yyscanner) { YY_BUFFER_STATE b; - + b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) , yyscanner ); if ( ! b ) YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); @@ -2174,7 +2153,7 @@ static void yy_load_buffer_state (yyscan_t yyscanner) } b->yy_is_interactive = 0; - + errno = oerrno; } @@ -2316,7 +2295,7 @@ static void yyensure_buffer_stack (yyscan_t yyscanner) YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size , yyscan_t yyscanner) { YY_BUFFER_STATE b; - + if ( size < 2 || base[size-2] != YY_END_OF_BUFFER_CHAR || base[size-1] != YY_END_OF_BUFFER_CHAR ) @@ -2352,7 +2331,7 @@ YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size , yyscan_t yyscann */ YY_BUFFER_STATE yy_scan_string (const char * yystr , yyscan_t yyscanner) { - + return yy_scan_bytes( yystr, (int) strlen(yystr) , yyscanner); } @@ -2369,7 +2348,7 @@ YY_BUFFER_STATE yy_scan_bytes (const char * yybytes, int _yybytes_len , yyscan char *buf; yy_size_t n; int i; - + /* Get memory for full buffer, including space for trailing EOB's. */ n = (yy_size_t) (_yybytes_len + 2); buf = (char *) yyalloc( n , yyscanner ); @@ -2442,7 +2421,7 @@ int yyget_lineno (yyscan_t yyscanner) if (! YY_CURRENT_BUFFER) return 0; - + return yylineno; } @@ -2455,7 +2434,7 @@ int yyget_column (yyscan_t yyscanner) if (! YY_CURRENT_BUFFER) return 0; - + return yycolumn; } @@ -2517,7 +2496,7 @@ void yyset_lineno (int _line_number , yyscan_t yyscanner) /* lineno is only valid if an input buffer exists. */ if (! YY_CURRENT_BUFFER ) YY_FATAL_ERROR( "yyset_lineno called with no buffer" ); - + yylineno = _line_number; } @@ -2532,7 +2511,7 @@ void yyset_column (int _column_no , yyscan_t yyscanner) /* column is only valid if an input buffer exists. */ if (! YY_CURRENT_BUFFER ) YY_FATAL_ERROR( "yyset_column called with no buffer" ); - + yycolumn = _column_no; } @@ -2761,4 +2740,4 @@ void yyfree (void * ptr , yyscan_t yyscanner) #define YYTABLES_NAME "yytables" -#line 301 "scanner.l" +#line 273 "scanner.l" diff --git a/3rdparty/libconfig/scanner.h b/3rdparty/libconfig/scanner.h index 28b0fe70c..92e55d04b 100644 --- a/3rdparty/libconfig/scanner.h +++ b/3rdparty/libconfig/scanner.h @@ -704,7 +704,7 @@ extern int yylex \ #undef yyTABLES_NAME #endif -#line 301 "scanner.l" +#line 273 "scanner.l" #line 710 "scanner.h" #undef libconfig_yyIN_HEADER |