diff options
Diffstat (limited to 'parser.c')
| -rw-r--r-- | parser.c | 235 |
1 files changed, 235 insertions, 0 deletions
diff --git a/parser.c b/parser.c new file mode 100644 index 0000000..c47096c --- /dev/null +++ b/parser.c @@ -0,0 +1,235 @@ +#include <libgen.h> + +#include "parser.h" +#include "util.h" + +typedef enum parser_type { + TITLE = 0, + ITEMS, + STEPS, +} pt; + +static const int +parse_title(const char * s, recipe * r, pt * type) +{ + fdebug("^ title\n"); + if (s[0] == '@' && strlen(s) > 1) { + char tmp[LINE_SIZE] = ""; + strcpy(tmp, ++s); + trim(tmp); + r->title = strdup(tmp); + } else { + r->title = strdup(r->filename); + } + *type = ITEMS; + return 0; +} + +static const int +parse_item(const char * s, recipe * r, pt * type, char * error) +{ + fdebug("^ item\n"); + if (!strcmp(s, "---")) { + *type = STEPS; + return 0; + } + + if (s[0] == '!') { + fdebug("INCLUDING: %s\n", s); + + char tmp[LINE_SIZE] = ""; + char path[LINE_SIZE] = ""; + strcpy(tmp, ++s); + trim(tmp); + + if (!strlen(tmp)) { + sprintf(error, "malformed include: %s", s); + return 1; + } + + if (tmp[0] == '/') { + strcpy(path, tmp); + } else { + strcpy(path, r->path); + strcat(path, "/"); + strcat(path, tmp); + } + + recipe * rr = parse(path, r->filename); + if (!rr) { + sprintf(error, "Couldn't include %s", path); + return 1; + } + copy_items(r, rr); + free_recipe(rr); + + return 0; + } + + int l = strlen(s); + int val = 1; /* key vs value flag */ + int itemc = 0; + int c = 0; + char buf[LINE_SIZE] = ""; + for (int i = 0; i < l; i++) { + if (val) { + if (s[i] == ',' || s[i] == '=') { + buf[c++] = '\0'; + if (!strlen(buf)) { + sprintf(error, "malformed ingredient: %s", s); + return 1; + } + trim(buf); + if (strlen(buf)) { + new_item(r); + r->i[r->in - 1]->name = strdup(buf); + itemc++; + buf[0] = '\0'; + c = 0; + } + if (s[i] == '=') + val = 0; + continue; + } + } + buf[c++] = s[i]; + } + + buf[c] = '\0'; + trim(buf); + + if (!strlen(buf)) { + sprintf(error, "empty ingredient quantity: %s", s); + return 1; + } + + for (int i = 0; i < itemc; i++) { + r->i[r->in - 1 - i]->qty = strdup(buf); + } + + return 0; +} + +static const int +parse_step(const char * s, recipe * r, char * error) +{ + fdebug("^ step\n"); + + if ((s[0] == '>' || s[0] == '-') && strlen(s+1)) { + new_step(r); + r->s[r->sn - 1]->type = s[0] == '>' ? COOK : PREP; + char *tmp = strdup(s+1); + trim(tmp); + r->s[r->sn - 1]->inst = tmp; + return 0; + } + + sprintf(error, "malformed step: %s", s); + return 1; +} + +static const int +handle_line(const char * s, recipe * r, char * error, pt * type, const char * prev) +{ + fdebug("Handling line: %s\n", s); + + if (strlen(s) == 0) return 0; + if (s[0] == '#') return 0; + + switch (*type) { + case TITLE: + if (!parse_title(s, r, type)) + if (parse_item(s, r, type, error)) + return 1; + break; + case ITEMS: + if (parse_item(s, r, type, error)) + return 1; + break; + case STEPS: + if (parse_step(s, r, error)) + return 1; + } + + return 0; +} + +static const int +next_escaped_line(FILE *f, char * line, int * lino, char * error) { + if (!fgets(line, LINE_SIZE, f)) + return 1; + (*lino)++; + + if (line[strlen(line) - 1] != '\n' && !feof(f)) { + sprintf(error, "line exceeds %d characters", LINE_SIZE); + return -1; + } + + trim(line); + int l = strlen(line); + + /* Last char is `\n` check if */ + /* (last - 1) is `\` */ + while (l > 0 && line[l - 1] == '\\') { + char tmp[LINE_SIZE] = ""; + + if (!fgets(tmp, LINE_SIZE, f)) + /* return line on EOF */ + break; + (*lino)++; + + trim(tmp); + if (strlen(tmp) + l >= LINE_SIZE) { + sprintf(error, "line exceeds %d characters", LINE_SIZE); + return -1; + } + + /* remove `\` */ + line[l - 1] = '\0'; + strcat(line, tmp); + l = strlen(line); + } + return 0; +} + +recipe * +parse(char * path, const char * prev) +{ + fdebug("Parsing: %s\n", path); + + FILE *f; + if (!strcmp(path, "-")) { + f = stdin; + } else { + f = fopen(path, "r"); + if (!f) return NULL; + } + + recipe * r = new_recipe(); + char line[LINE_SIZE] = ""; + char *dirc, *bname; + + dirc = strdup(path); + bname = strdup(path); + r->path = strdup(dirname(dirc)); + r->filename = strdup(basename(bname)); + free(dirc); free(bname); + + /* (re)init px */ + char error[LINE_SIZE] = ""; + int lino = 0; + enum parser_type type = TITLE; + + while (!next_escaped_line(f, line, &lino, error)) { + if (handle_line(line, r, error, &type, prev)) + break; + } + + if (strlen(error) > 0) { + fprintf(stderr, "%s:%d: %s\n", path, lino, error); + free_recipe(r); + return NULL; + } + + return r; +} |