aboutsummaryrefslogtreecommitdiffstats
path: root/src/datetime-parser.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/datetime-parser.c')
-rw-r--r--src/datetime-parser.c375
1 files changed, 375 insertions, 0 deletions
diff --git a/src/datetime-parser.c b/src/datetime-parser.c
new file mode 100644
index 0000000..1d39490
--- /dev/null
+++ b/src/datetime-parser.c
@@ -0,0 +1,375 @@
+/*
+ * blogc: A blog compiler.
+ * Copyright (C) 2015 Rafael G. Martins <rafael@rafaelmartins.eng.br>
+ *
+ * This program can be distributed under the terms of the BSD License.
+ * See the file LICENSE.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif /* HAVE_CONFIG_H */
+
+#ifdef HAVE_TIME_H
+#include <time.h>
+#endif /* HAVE_TIME_H */
+
+#include <string.h>
+#include <stdio.h>
+
+#include "error.h"
+#include "utils/utils.h"
+#include "datetime-parser.h"
+
+
+typedef enum {
+ DATETIME_FIRST_YEAR = 1,
+ DATETIME_SECOND_YEAR,
+ DATETIME_THIRD_YEAR,
+ DATETIME_FOURTH_YEAR,
+ DATETIME_FIRST_HYPHEN,
+ DATETIME_FIRST_MONTH,
+ DATETIME_SECOND_MONTH,
+ DATETIME_SECOND_HYPHEN,
+ DATETIME_FIRST_DAY,
+ DATETIME_SECOND_DAY,
+ DATETIME_SPACE,
+ DATETIME_FIRST_HOUR,
+ DATETIME_SECOND_HOUR,
+ DATETIME_FIRST_COLON,
+ DATETIME_FIRST_MINUTE,
+ DATETIME_SECOND_MINUTE,
+ DATETIME_SECOND_COLON,
+ DATETIME_FIRST_SECOND,
+ DATETIME_SECOND_SECOND,
+ DATETIME_DONE,
+} blogc_datetime_state_t;
+
+
+char*
+blogc_convert_datetime(const char *orig, const char *format,
+ blogc_error_t **err)
+{
+ if (err == NULL || *err != NULL)
+ return NULL;
+
+ struct tm t;
+ memset(&t, 0, sizeof(struct tm));
+ t.tm_isdst = -1;
+
+ blogc_datetime_state_t state = DATETIME_FIRST_YEAR;
+ int tmp = 0;
+ int diff = '0';
+
+ for (unsigned int i = 0; orig[i] != '\0'; i++) {
+ char c = orig[i];
+
+ switch (state) {
+
+ case DATETIME_FIRST_YEAR:
+ if (c >= '0' && c <= '9') {
+ tmp += (c - diff) * 1000;
+ state = DATETIME_SECOND_YEAR;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of year. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_SECOND_YEAR:
+ if (c >= '0' && c <= '9') {
+ tmp += (c - diff) * 100;
+ state = DATETIME_THIRD_YEAR;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of year. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_THIRD_YEAR:
+ if (c >= '0' && c <= '9') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_FOURTH_YEAR;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid third digit of year. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_FOURTH_YEAR:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff - 1900;
+ if (tmp < 0) {
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid year. Found %d, must be >= 1900.",
+ tmp + 1900);
+ break;
+ }
+ t.tm_year = tmp;
+ state = DATETIME_FIRST_HYPHEN;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid fourth digit of year. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_FIRST_HYPHEN:
+ if (c == '-') {
+ tmp = 0;
+ state = DATETIME_FIRST_MONTH;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid separator between year and month. "
+ "Found '%c', must be '-'.", c);
+ break;
+
+ case DATETIME_FIRST_MONTH:
+ if (c >= '0' && c <= '1') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_SECOND_MONTH;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of month. "
+ "Found '%c', must be integer >= 0 and <= 1.", c);
+ break;
+
+ case DATETIME_SECOND_MONTH:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff - 1;
+ if (tmp < 0 || tmp > 11) {
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid month. Found %d, must be >= 1 and <= 12.",
+ tmp + 1);
+ break;
+ }
+ t.tm_mon = tmp;
+ state = DATETIME_SECOND_HYPHEN;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of month. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_SECOND_HYPHEN:
+ if (c == '-') {
+ tmp = 0;
+ state = DATETIME_FIRST_DAY;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid separator between month and day. "
+ "Found '%c', must be '-'.", c);
+ break;
+
+ case DATETIME_FIRST_DAY:
+ if (c >= '0' && c <= '3') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_SECOND_DAY;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of day. "
+ "Found '%c', must be integer >= 0 and <= 3.", c);
+ break;
+
+ case DATETIME_SECOND_DAY:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff;
+ if (tmp < 1 || tmp > 31) {
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid day. Found %d, must be >= 1 and <= 31.",
+ tmp);
+ break;
+ }
+ t.tm_mday = tmp;
+ state = DATETIME_SPACE;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of day. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_SPACE:
+ if (c == ' ') {
+ tmp = 0;
+ state = DATETIME_FIRST_HOUR;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid separator between date and time. "
+ "Found '%c', must be ' ' (empty space).", c);
+ break;
+
+ case DATETIME_FIRST_HOUR:
+ if (c >= '0' && c <= '2') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_SECOND_HOUR;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of hours. "
+ "Found '%c', must be integer >= 0 and <= 2.", c);
+ break;
+
+ case DATETIME_SECOND_HOUR:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff;
+ if (tmp < 0 || tmp > 23) {
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid hours. Found %d, must be >= 0 and <= 23.",
+ tmp);
+ break;
+ }
+ t.tm_hour = tmp;
+ state = DATETIME_FIRST_COLON;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of hours. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_FIRST_COLON:
+ if (c == ':') {
+ tmp = 0;
+ state = DATETIME_FIRST_MINUTE;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid separator between hours and minutes. "
+ "Found '%c', must be ':'.", c);
+ break;
+
+ case DATETIME_FIRST_MINUTE:
+ if (c >= '0' && c <= '5') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_SECOND_MINUTE;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of minutes. "
+ "Found '%c', must be integer >= 0 and <= 5.", c);
+ break;
+
+ case DATETIME_SECOND_MINUTE:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff;
+ if (tmp < 0 || tmp > 59) {
+ // this won't happen because we are restricting the digits
+ // to 00-59 already, but lets keep the code here for
+ // reference.
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid minutes. Found %d, must be >= 0 and <= 59.",
+ tmp);
+ break;
+ }
+ t.tm_min = tmp;
+ state = DATETIME_SECOND_COLON;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of minutes. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_SECOND_COLON:
+ if (c == ':') {
+ tmp = 0;
+ state = DATETIME_FIRST_SECOND;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid separator between minutes and seconds. "
+ "Found '%c', must be ':'.", c);
+ break;
+
+ case DATETIME_FIRST_SECOND:
+ if (c >= '0' && c <= '6') {
+ tmp += (c - diff) * 10;
+ state = DATETIME_SECOND_SECOND;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid first digit of seconds. "
+ "Found '%c', must be integer >= 0 and <= 6.", c);
+ break;
+
+ case DATETIME_SECOND_SECOND:
+ if (c >= '0' && c <= '9') {
+ tmp += c - diff;
+ if (tmp < 0 || tmp > 60) {
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid seconds. Found %d, must be >= 0 and <= 60.",
+ tmp);
+ break;
+ }
+ t.tm_sec = tmp;
+ state = DATETIME_DONE;
+ break;
+ }
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid second digit of seconds. "
+ "Found '%c', must be integer >= 0 and <= 9.", c);
+ break;
+
+ case DATETIME_DONE:
+ // well, its done ;)
+ break;
+ }
+
+ if (*err != NULL)
+ return NULL;
+ }
+
+ if (*err == NULL) {
+ switch (state) {
+ case DATETIME_FIRST_YEAR:
+ case DATETIME_SECOND_YEAR:
+ case DATETIME_THIRD_YEAR:
+ case DATETIME_FOURTH_YEAR:
+ case DATETIME_FIRST_HYPHEN:
+ case DATETIME_FIRST_MONTH:
+ case DATETIME_SECOND_MONTH:
+ case DATETIME_SECOND_HYPHEN:
+ case DATETIME_FIRST_DAY:
+ case DATETIME_SECOND_DAY:
+ case DATETIME_FIRST_HOUR:
+ case DATETIME_SECOND_HOUR:
+ case DATETIME_FIRST_MINUTE:
+ case DATETIME_SECOND_MINUTE:
+ case DATETIME_FIRST_SECOND:
+ case DATETIME_SECOND_SECOND:
+ *err = blogc_error_new_printf(BLOGC_ERROR_DATETIME_PARSER,
+ "Invalid datetime string. "
+ "Found '%s', formats allowed are: 'yyyy-mm-dd hh:mm:ss', "
+ "'yyyy-mm-dd hh:ss', 'yyyy-mm-dd hh' and 'yyyy-mm-dd'.",
+ orig);
+ return NULL;
+
+ case DATETIME_SPACE:
+ case DATETIME_FIRST_COLON:
+ case DATETIME_SECOND_COLON:
+ case DATETIME_DONE:
+ break; // these states are ok
+ }
+ }
+
+ mktime(&t);
+
+ char buf[1024];
+ if (0 == strftime(buf, sizeof(buf), format, &t)) {
+ fprintf(stderr, "blogc: warning: Failed to format DATE variable, "
+ "FORMAT is too long: %s\n", format);
+ return b_strdup(orig);
+ }
+
+ return b_strdup(buf);
+}