/* * 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. */ #ifdef HAVE_CONFIG_H #include #endif /* HAVE_CONFIG_H */ #include #include #include #include #include "utils/utils.h" #include "error.h" blogc_error_t* blogc_error_new(blogc_error_type_t type, const char *msg) { blogc_error_t *err = b_malloc(sizeof(blogc_error_t)); err->type = type; err->msg = b_strdup(msg); return err; } blogc_error_t* blogc_error_new_printf(blogc_error_type_t type, const char *format, ...) { va_list ap; va_start(ap, format); char *tmp = b_strdup_vprintf(format, ap); va_end(ap); blogc_error_t *rv = blogc_error_new(type, tmp); free(tmp); return rv; } blogc_error_t* blogc_error_parser(blogc_error_type_t type, const char *src, size_t src_len, size_t current, const char *format, ...) { va_list ap; va_start(ap, format); char *msg = b_strdup_vprintf(format, ap); va_end(ap); size_t lineno = 1; size_t linestart = 0; size_t lineend = 0; size_t pos = 1; for (size_t i = 0; i < src_len; i++) { char c = src[i]; if (i < current) { if ((i + 1) < src_len) { if ((c == '\n' && src[i + 1] == '\r') || (c == '\r' && src[i + 1] == '\n')) { lineno++; i++; pos = 1; if ((i + 1) < src_len) linestart = i + 1; continue; } } if (c == '\n' || c == '\r') { lineno++; pos = 1; if ((i + 1) < src_len) linestart = i + 1; continue; } pos++; } else if (c == '\n' || c == '\r') { lineend = i; break; } } if (lineend <= linestart && src_len >= linestart) lineend = src_len; char *line = b_strndup(src + linestart, lineend - linestart); blogc_error_t *rv = NULL; if (line[0] == '\0') // "near" message isn't useful if line is empty rv = blogc_error_new(type, msg); else rv = blogc_error_new_printf(type, "%s\nError occurred near line %d, position %d: %s", msg, lineno, pos, line); free(msg); free(line); return rv; } void blogc_error_print(blogc_error_t *err) { if (err == NULL) return; switch(err->type) { case BLOGC_ERROR_SOURCE_PARSER: fprintf(stderr, "blogc: error: source: %s\n", err->msg); break; case BLOGC_ERROR_TEMPLATE_PARSER: fprintf(stderr, "blogc: error: template: %s\n", err->msg); break; case BLOGC_ERROR_LOADER: fprintf(stderr, "blogc: error: loader: %s\n", err->msg); break; case BLOGC_WARNING_DATETIME_PARSER: fprintf(stderr, "blogc: warning: datetime: %s\n", err->msg); break; case BLOGC_WARNING_CONTENT_PARSER: fprintf(stderr, "blogc: warning: content: %s\n", err->msg); break; default: fprintf(stderr, "blogc: error: %s\n", err->msg); } } void blogc_error_free(blogc_error_t *err) { if (err == NULL) return; free(err->msg); free(err); }