diff options
| author | Lucas de Castro Borges <lucas@gnuabordo.com.br> | 2025-02-14 14:26:38 -0300 |
|---|---|---|
| committer | Lucas de Castro Borges <lucas@gnuabordo.com.br> | 2025-02-14 14:26:38 -0300 |
| commit | 294bc6ecabf14c09c9bc8644704921dcf97cb44e (patch) | |
| tree | 279b1e0bab53901a1647ac63c1c724f0f789a663 /src/third_party/timelib/parse_iso_intervals.re | |
| parent | 70be7c27a251621187a1de533462ae2bb1e3bd39 (diff) | |
| parent | 1e917fd798aa25b7066d4b414b51184f13d5a092 (diff) | |
Update upstream source from tag 'upstream/6.0.10'debian/6.0.10-1
Update to upstream version '6.0.10'
with Debian dir 2d176fa254eee97b139f712fec5709641335a8c3
Diffstat (limited to 'src/third_party/timelib/parse_iso_intervals.re')
| -rw-r--r-- | src/third_party/timelib/parse_iso_intervals.re | 448 |
1 files changed, 448 insertions, 0 deletions
diff --git a/src/third_party/timelib/parse_iso_intervals.re b/src/third_party/timelib/parse_iso_intervals.re new file mode 100644 index 00000000000..2a394156f98 --- /dev/null +++ b/src/third_party/timelib/parse_iso_intervals.re @@ -0,0 +1,448 @@ +/* + * The MIT License (MIT) + * + * Copyright (c) 2015-2019 Derick Rethans + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN + * THE SOFTWARE. + */ + +#include "timelib.h" +#include "timelib_private.h" + +#include <ctype.h> + +#if defined(_MSC_VER) +# define strtoll(s, f, b) _atoi64(s) +#elif !defined(HAVE_STRTOLL) +# if defined(HAVE_ATOLL) +# define strtoll(s, f, b) atoll(s) +# else +# define strtoll(s, f, b) strtol(s, f, b) +# endif +#endif + +#define EOI 257 + +#define TIMELIB_PERIOD 260 +#define TIMELIB_ISO_DATE 261 +#define TIMELIB_ERROR 999 + +typedef unsigned char uchar; + +#define BSIZE 8192 + +#define YYCTYPE uchar +#define YYCURSOR cursor +#define YYLIMIT s->lim +#define YYMARKER s->ptr +#define YYFILL(n) return EOI; + +#define RET(i) {s->cur = cursor; return i;} + +#define timelib_string_free timelib_free + +#define TIMELIB_INIT s->cur = cursor; str = timelib_string(s); ptr = str +#define TIMELIB_DEINIT timelib_string_free(str) + +#ifdef DEBUG_PARSER +#define DEBUG_OUTPUT(s) printf("%s\n", s); +#define YYDEBUG(s,c) { if (s != -1) { printf("state: %d ", s); printf("[%c]\n", c); } } +#else +#define DEBUG_OUTPUT(s) +#define YYDEBUG(s,c) +#endif + +typedef struct _Scanner { + int fd; + uchar *lim, *str, *ptr, *cur, *tok, *pos; + unsigned int line, len; + timelib_error_container *errors; + + timelib_time *begin; + timelib_time *end; + timelib_rel_time *period; + int recurrences; + + int have_period; + int have_recurrences; + int have_date; + int have_begin_date; + int have_end_date; +} Scanner; + +static void add_error(Scanner *s, const char *error) +{ + s->errors->error_count++; + s->errors->error_messages = timelib_realloc(s->errors->error_messages, s->errors->error_count * sizeof(timelib_error_message)); + s->errors->error_messages[s->errors->error_count - 1].position = s->tok ? s->tok - s->str : 0; + s->errors->error_messages[s->errors->error_count - 1].character = s->tok ? *s->tok : 0; + s->errors->error_messages[s->errors->error_count - 1].message = timelib_strdup(error); +} + +static char *timelib_string(Scanner *s) +{ + char *tmp = timelib_calloc(1, s->cur - s->tok + 1); + memcpy(tmp, s->tok, s->cur - s->tok); + + return tmp; +} + +static timelib_sll timelib_get_nr(const char **ptr, int max_length) +{ + const char *begin, *end; + char *str; + timelib_sll tmp_nr = TIMELIB_UNSET; + int len = 0; + + while ((**ptr < '0') || (**ptr > '9')) { + if (**ptr == '\0') { + return TIMELIB_UNSET; + } + ++*ptr; + } + begin = *ptr; + while ((**ptr >= '0') && (**ptr <= '9') && len < max_length) { + ++*ptr; + ++len; + } + end = *ptr; + str = timelib_calloc(1, end - begin + 1); + memcpy(str, begin, end - begin); + tmp_nr = strtoll(str, NULL, 10); + timelib_free(str); + return tmp_nr; +} + +static timelib_ull timelib_get_unsigned_nr(const char **ptr, int max_length) +{ + timelib_ull dir = 1; + + while (((**ptr < '0') || (**ptr > '9')) && (**ptr != '+') && (**ptr != '-')) { + if (**ptr == '\0') { + return TIMELIB_UNSET; + } + ++*ptr; + } + + while (**ptr == '+' || **ptr == '-') + { + if (**ptr == '-') { + dir *= -1; + } + ++*ptr; + } + return dir * timelib_get_nr(ptr, max_length); +} + +#define timelib_split_free(arg) { \ + int i; \ + for (i = 0; i < arg.c; i++) { \ + timelib_free(arg.v[i]); \ + } \ + if (arg.v) { \ + timelib_free(arg.v); \ + } \ +} + +/* date parser's scan function too large for VC6 - VC7.x + drop the optimization solves the problem */ +#ifdef PHP_WIN32 +#pragma optimize( "", off ) +#endif +static int scan(Scanner *s) +{ + uchar *cursor = s->cur; + char *str; + const char *ptr = NULL; + +std: + s->tok = cursor; + s->len = 0; +/*!re2c + +/* */ +any = [\000-\377]; +number = [0-9]+; + +hour24lz = [01][0-9] | "2"[0-4]; +minutelz = [0-5][0-9]; +monthlz = "0" [1-9] | "1" [0-2]; +monthlzz = "0" [0-9] | "1" [0-2]; +daylz = "0" [1-9] | [1-2][0-9] | "3" [01]; +daylzz = "0" [0-9] | [1-2][0-9] | "3" [01]; +secondlz = minutelz; +year4 = [0-9]{4}; +weekofyear = "0"[1-9] | [1-4][0-9] | "5"[0-3]; + +space = [ \t]+; +datetimebasic = year4 monthlz daylz "T" hour24lz minutelz secondlz "Z"; +datetimeextended = year4 "-" monthlz "-" daylz "T" hour24lz ':' minutelz ':' secondlz "Z"; +period = "P" (number "Y")? (number "M")? (number "W")? (number "D")? ("T" (number "H")? (number "M")? (number "S")?)?; +combinedrep = "P" year4 "-" monthlzz "-" daylzz "T" hour24lz ':' minutelz ':' secondlz; + +recurrences = "R" number; + +isoweekday = year4 "-"? "W" weekofyear "-"? [0-7]; +isoweek = year4 "-"? "W" weekofyear; + +*/ + +/*!re2c + /* so that vim highlights correctly */ + recurrences + { + DEBUG_OUTPUT("recurrences"); + TIMELIB_INIT; + ptr++; + s->recurrences = timelib_get_unsigned_nr(&ptr, 9); + TIMELIB_DEINIT; + s->have_recurrences = 1; + return TIMELIB_PERIOD; + } + + datetimebasic| datetimeextended + { + timelib_time *current; + + if (s->have_date || s->have_period) { + current = s->end; + s->have_end_date = 1; + } else { + current = s->begin; + s->have_begin_date = 1; + } + DEBUG_OUTPUT("datetimebasic | datetimeextended"); + TIMELIB_INIT; + current->y = timelib_get_nr(&ptr, 4); + current->m = timelib_get_nr(&ptr, 2); + current->d = timelib_get_nr(&ptr, 2); + current->h = timelib_get_nr(&ptr, 2); + current->i = timelib_get_nr(&ptr, 2); + current->s = timelib_get_nr(&ptr, 2); + s->have_date = 1; + TIMELIB_DEINIT; + return TIMELIB_ISO_DATE; + } + + period + { + timelib_sll nr; + int in_time = 0; + DEBUG_OUTPUT("period"); + TIMELIB_INIT; + ptr++; + do { + if ( *ptr == 'T' ) { + in_time = 1; + ptr++; + } + if ( *ptr == '\0' ) { + add_error(s, "Missing expected time part"); + break; + } + + nr = timelib_get_unsigned_nr(&ptr, 12); + switch (*ptr) { + case 'Y': s->period->y = nr; break; + case 'W': s->period->d += nr * 7; break; + case 'D': s->period->d += nr; break; + case 'H': s->period->h = nr; break; + case 'S': s->period->s = nr; break; + case 'M': + if (in_time) { + s->period->i = nr; + } else { + s->period->m = nr; + } + break; + default: + add_error(s, "Undefined period specifier"); + break; + } + ptr++; + } while (!s->errors->error_count && *ptr); + s->have_period = 1; + TIMELIB_DEINIT; + return TIMELIB_PERIOD; + } + + combinedrep + { + DEBUG_OUTPUT("combinedrep"); + TIMELIB_INIT; + s->period->y = timelib_get_unsigned_nr(&ptr, 4); + ptr++; + s->period->m = timelib_get_unsigned_nr(&ptr, 2); + ptr++; + s->period->d = timelib_get_unsigned_nr(&ptr, 2); + ptr++; + s->period->h = timelib_get_unsigned_nr(&ptr, 2); + ptr++; + s->period->i = timelib_get_unsigned_nr(&ptr, 2); + ptr++; + s->period->s = timelib_get_unsigned_nr(&ptr, 2); + s->have_period = 1; + TIMELIB_DEINIT; + return TIMELIB_PERIOD; + } + + [ .,\t/] + { + goto std; + } + + "\000"|"\n" + { + s->pos = cursor; s->line++; + goto std; + } + + any + { + add_error(s, "Unexpected character"); + goto std; + } +*/ +} +#ifdef PHP_WIN32 +#pragma optimize( "", on ) +#endif + +/*!max:re2c */ + +void timelib_strtointerval(const char *s, size_t len, + timelib_time **begin, timelib_time **end, + timelib_rel_time **period, int *recurrences, + timelib_error_container **errors) +{ + Scanner in; + int t; + const char *e = s + len - 1; + + memset(&in, 0, sizeof(in)); + in.errors = timelib_malloc(sizeof(timelib_error_container)); + in.errors->warning_count = 0; + in.errors->warning_messages = NULL; + in.errors->error_count = 0; + in.errors->error_messages = NULL; + + if (len > 0) { + while (isspace(*s) && s < e) { + s++; + } + while (isspace(*e) && e > s) { + e--; + } + } + if (e - s < 0) { + add_error(&in, "Empty string"); + if (errors) { + *errors = in.errors; + } else { + timelib_error_container_dtor(in.errors); + } + return; + } + e++; + + /* init cursor */ + in.str = timelib_malloc((e - s) + YYMAXFILL); + memset(in.str, 0, (e - s) + YYMAXFILL); + memcpy(in.str, s, (e - s)); + in.lim = in.str + (e - s) + YYMAXFILL; + in.cur = in.str; + + /* init value containers */ + in.begin = timelib_time_ctor(); + in.begin->y = TIMELIB_UNSET; + in.begin->d = TIMELIB_UNSET; + in.begin->m = TIMELIB_UNSET; + in.begin->h = TIMELIB_UNSET; + in.begin->i = TIMELIB_UNSET; + in.begin->s = TIMELIB_UNSET; + in.begin->us = 0; + in.begin->z = 0; + in.begin->dst = 0; + in.begin->is_localtime = 0; + in.begin->zone_type = TIMELIB_ZONETYPE_OFFSET; + + in.end = timelib_time_ctor(); + in.end->y = TIMELIB_UNSET; + in.end->d = TIMELIB_UNSET; + in.end->m = TIMELIB_UNSET; + in.end->h = TIMELIB_UNSET; + in.end->i = TIMELIB_UNSET; + in.end->s = TIMELIB_UNSET; + in.end->us = 0; + in.end->z = 0; + in.end->dst = 0; + in.end->is_localtime = 0; + in.end->zone_type = TIMELIB_ZONETYPE_OFFSET; + + in.period = timelib_rel_time_ctor(); + in.period->y = 0; + in.period->d = 0; + in.period->m = 0; + in.period->h = 0; + in.period->i = 0; + in.period->s = 0; + in.period->weekday = 0; + in.period->weekday_behavior = 0; + in.period->first_last_day_of = 0; + in.period->days = TIMELIB_UNSET; + + in.recurrences = 1; + + do { + t = scan(&in); +#ifdef DEBUG_PARSER + printf("%d\n", t); +#endif + } while(t != EOI); + + timelib_free(in.str); + if (errors) { + *errors = in.errors; + } else { + timelib_error_container_dtor(in.errors); + } + if (in.have_begin_date) { + *begin = in.begin; + } else { + timelib_time_dtor(in.begin); + } + if (in.have_end_date) { + *end = in.end; + } else { + timelib_time_dtor(in.end); + } + if (in.have_period) { + *period = in.period; + } else { + timelib_rel_time_dtor(in.period); + } + if (in.have_recurrences) { + *recurrences = in.recurrences; + } +} + + +/* + * vim: syntax=c + */ |
