From 74ca21a41bcb5a49d19e65c9ba88f1f864cb7095 Mon Sep 17 00:00:00 2001 From: "Rafael G. Martins" Date: Sat, 3 Sep 2016 19:57:54 +0200 Subject: *: big code reorganization. - source and tests are now splitted by target - utils lib is now called common still pending move error.c from blogc to common --- src/source-parser.c | 218 ---------------------------------------------------- 1 file changed, 218 deletions(-) delete mode 100644 src/source-parser.c (limited to 'src/source-parser.c') diff --git a/src/source-parser.c b/src/source-parser.c deleted file mode 100644 index 5d29213..0000000 --- a/src/source-parser.c +++ /dev/null @@ -1,218 +0,0 @@ -/* - * blogc: A blog compiler. - * Copyright (C) 2015-2016 Rafael G. Martins - * - * This program can be distributed under the terms of the BSD License. - * See the file LICENSE. - */ - -#include -#include - -#include "content-parser.h" -#include "source-parser.h" -#include "error.h" -#include "utils.h" - - -typedef enum { - SOURCE_START = 1, - SOURCE_CONFIG_KEY, - SOURCE_CONFIG_VALUE_START, - SOURCE_CONFIG_VALUE, - SOURCE_SEPARATOR, - SOURCE_CONTENT_START, - SOURCE_CONTENT, -} blogc_source_parser_state_t; - - -sb_trie_t* -blogc_source_parse(const char *src, size_t src_len, blogc_error_t **err) -{ - if (err == NULL || *err != NULL) - return NULL; - - size_t current = 0; - size_t start = 0; - size_t end_excerpt = 0; - - char *key = NULL; - char *tmp = NULL; - char *content = NULL; - sb_trie_t *rv = sb_trie_new(free); - - blogc_source_parser_state_t state = SOURCE_START; - - while (current < src_len) { - char c = src[current]; - - switch (state) { - - case SOURCE_START: - if (c == ' ' || c == '\t' || c == '\n' || c == '\r') - break; - if (c >= 'A' && c <= 'Z') { - state = SOURCE_CONFIG_KEY; - start = current; - break; - } - if (c == '-') { - state = SOURCE_SEPARATOR; - break; - } - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, - "Can't find a configuration key or the content separator."); - break; - - case SOURCE_CONFIG_KEY: - if ((c >= 'A' && c <= 'Z') || (c >= '0' && c <= '9') || c == '_') - break; - if (c == ':') { - key = sb_strndup(src + start, current - start); - if (((current - start == 8) && - (0 == strncmp("FILENAME", src + start, 8))) || - ((current - start == 7) && - (0 == strncmp("CONTENT", src + start, 7))) || - ((current - start == 14) && - (0 == strncmp("DATE_FORMATTED", src + start, 14))) || - ((current - start == 20) && - (0 == strncmp("DATE_FIRST_FORMATTED", src + start, 20))) || - ((current - start == 19) && - (0 == strncmp("DATE_LAST_FORMATTED", src + start, 19))) || - ((current - start == 10) && - (0 == strncmp("PAGE_FIRST", src + start, 10))) || - ((current - start == 13) && - (0 == strncmp("PAGE_PREVIOUS", src + start, 13))) || - ((current - start == 12) && - (0 == strncmp("PAGE_CURRENT", src + start, 12))) || - ((current - start == 9) && - (0 == strncmp("PAGE_NEXT", src + start, 9))) || - ((current - start == 9) && - (0 == strncmp("PAGE_LAST", src + start, 9))) || - ((current - start == 13) && - (0 == strncmp("BLOGC_VERSION", src + start, 13)))) - { - *err = blogc_error_new_printf(BLOGC_ERROR_SOURCE_PARSER, - "'%s' variable is forbidden in source files. It will " - "be set for you by the compiler.", key); - break; - } - state = SOURCE_CONFIG_VALUE_START; - break; - } - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "Invalid configuration key."); - break; - - case SOURCE_CONFIG_VALUE_START: - if (c != '\n' && c != '\r') { - state = SOURCE_CONFIG_VALUE; - start = current; - break; - } - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "Configuration value not provided for '%s'.", - key); - break; - - case SOURCE_CONFIG_VALUE: - if (c == '\n' || c == '\r') { - tmp = sb_strndup(src + start, current - start); - sb_trie_insert(rv, key, sb_strdup(sb_str_strip(tmp))); - free(tmp); - free(key); - key = NULL; - state = SOURCE_START; - } - break; - - case SOURCE_SEPARATOR: - if (c == '-') - break; - if (c == '\n' || c == '\r') { - state = SOURCE_CONTENT_START; - break; - } - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, - "Invalid content separator. Must be more than one '-' characters."); - break; - - case SOURCE_CONTENT_START: - if (c == '\n' || c == '\r') - break; - start = current; - state = SOURCE_CONTENT; - break; - - case SOURCE_CONTENT: - if (current == (src_len - 1)) { - tmp = sb_strndup(src + start, src_len - start); - sb_trie_insert(rv, "RAW_CONTENT", tmp); - char *description = NULL; - content = blogc_content_parse(tmp, &end_excerpt, &description); - if (description != NULL) { - // do not override source-provided description. - if (NULL == sb_trie_lookup(rv, "DESCRIPTION")) { - // no need to free, because we are transfering memory - // ownership to the trie. - sb_trie_insert(rv, "DESCRIPTION", description); - } - else { - free(description); - } - } - sb_trie_insert(rv, "CONTENT", content); - sb_trie_insert(rv, "EXCERPT", end_excerpt == 0 ? - sb_strdup(content) : sb_strndup(content, end_excerpt)); - } - break; - } - - if (*err != NULL) - break; - - current++; - } - - if (*err == NULL && sb_trie_size(rv) == 0) { - - // ok, nothing found in the config trie, but no error set either. - // let's try to be nice with the users and provide some reasonable - // output. :) - switch (state) { - case SOURCE_START: - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "Your source file is empty."); - break; - case SOURCE_CONFIG_KEY: - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "Your last configuration key is missing ':' and " - "the value"); - break; - case SOURCE_CONFIG_VALUE_START: - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "Configuration value not provided for '%s'.", - key); - break; - case SOURCE_CONFIG_VALUE: - *err = blogc_error_parser(BLOGC_ERROR_SOURCE_PARSER, src, src_len, - current, "No line ending after the configuration value for " - "'%s'.", key); - break; - case SOURCE_SEPARATOR: - case SOURCE_CONTENT_START: - case SOURCE_CONTENT: - break; // won't happen, and if even happen, shouldn't be fatal - } - } - - if (*err != NULL) { - free(key); - sb_trie_free(rv); - return NULL; - } - - return rv; -} -- cgit v1.2.3-18-g5258