diff options
-rw-r--r-- | miscutils/bc.c | 32 |
1 files changed, 19 insertions, 13 deletions
diff --git a/miscutils/bc.c b/miscutils/bc.c index 37c9012f9..5d969c9d0 100644 --- a/miscutils/bc.c +++ b/miscutils/bc.c | |||
@@ -3272,25 +3272,31 @@ static BC_STATUS zdc_lex_register(BcLex *l) | |||
3272 | 3272 | ||
3273 | static BC_STATUS zdc_lex_string(BcLex *l) | 3273 | static BC_STATUS zdc_lex_string(BcLex *l) |
3274 | { | 3274 | { |
3275 | size_t depth = 1, nls = 0, i = l->i; | 3275 | size_t depth, nls, i; |
3276 | char c; | ||
3277 | 3276 | ||
3278 | l->t.t = BC_LEX_STR; | 3277 | l->t.t = BC_LEX_STR; |
3279 | bc_vec_pop_all(&l->t.v); | 3278 | bc_vec_pop_all(&l->t.v); |
3280 | 3279 | ||
3281 | for (c = l->buf[i]; c != 0 && depth; c = l->buf[++i]) { | 3280 | nls = 0; |
3282 | 3281 | depth = 1; | |
3283 | depth += (c == '[' && (i == l->i || l->buf[i - 1] != '\\')); | 3282 | i = l->i; |
3284 | depth -= (c == ']' && (i == l->i || l->buf[i - 1] != '\\')); | 3283 | for (;;) { |
3284 | char c = l->buf[i]; | ||
3285 | if (c == '\0') { | ||
3286 | l->i = i; | ||
3287 | RETURN_STATUS(bc_error("string end could not be found")); | ||
3288 | } | ||
3285 | nls += (c == '\n'); | 3289 | nls += (c == '\n'); |
3286 | 3290 | if (i == l->i || l->buf[i - 1] != '\\') { | |
3287 | if (depth) bc_vec_push(&l->t.v, &c); | 3291 | if (c == '[') depth++; |
3288 | } | 3292 | if (c == ']') |
3289 | 3293 | if (--depth == 0) | |
3290 | if (c == '\0') { | 3294 | break; |
3291 | l->i = i; | 3295 | } |
3292 | RETURN_STATUS(bc_error("string end could not be found")); | 3296 | bc_vec_push(&l->t.v, &l->buf[i]); |
3297 | i++; | ||
3293 | } | 3298 | } |
3299 | i++; | ||
3294 | 3300 | ||
3295 | bc_vec_pushZeroByte(&l->t.v); | 3301 | bc_vec_pushZeroByte(&l->t.v); |
3296 | // This check makes sense only if size_t is (much) larger than BC_MAX_STRING. | 3302 | // This check makes sense only if size_t is (much) larger than BC_MAX_STRING. |