X-Git-Url: https://git.danieliu.xyz/?a=blobdiff_plain;ds=sidebyside;f=parser.c;fp=parser.c;h=0343509b5976f151884ecc123081689c3811bb34;hb=4a1ae435f312e8d76558ef1e64f141ebffd15f9d;hp=0000000000000000000000000000000000000000;hpb=b68b33bdf38847668c349c3df09f9b29f58fc1b1;p=smdp.git

diff --git a/parser.c b/parser.c
new file mode 100644
index 0000000..0343509
--- /dev/null
+++ b/parser.c
@@ -0,0 +1,221 @@
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "include/parser.h"
+
+document_t *markdown_load(FILE *input) {
+
+    int c = 0, i = 0, bits = 0;
+
+    document_t *doc;
+    page_t *page;
+    line_t *line;
+    cstring_t *text;
+
+    doc = new_document();
+    page = new_page();
+    doc->page = page;
+    text = cstring_init();
+
+    while ((c = fgetc(input)) != EOF) {
+        if(c == '\n') {
+
+            // markdown analyse
+            bits = markdown_analyse(text);
+
+            // if text is markdown hr
+            if(CHECK_BIT(bits, IS_HR) &&
+               CHECK_BIT(line->bits, IS_EMPTY)) {
+
+                // clear text
+                (text->reset)(text);
+                // create next page
+                page = next_page(page);
+
+            } else {
+
+                // if page ! has line
+                if(!page->line) {
+
+                    // create new line
+                    line = new_line();
+                    page->line = line;
+
+                } else {
+
+                    // create next line
+                    line = next_line(line);
+
+                }
+
+                // add text to line
+                line->text = text;
+
+                // add bits to line
+                line->bits = bits;
+
+                // calc offset
+                line->offset = next_nonblank(text, 0);
+
+                // new text
+                text = cstring_init();
+            }
+
+        } else if(c == '\t') {
+
+            // expand tab to spaces
+            for (i = 0;  i <= 4;  i++)
+                (text->expand)(text, ' ');
+
+        } else if(isprint(c) || isspace(c) || is_utf8(c)) {
+
+            // add char to line
+            (text->expand)(text, c);
+        }
+    }
+
+    // detect header
+    line = doc->page->line;
+    if(line && line->text->size > 0 && line->text->text[0] == '%') {
+
+        // assign header to document
+        doc->header = line;
+
+        // find first non-header line
+        while(line->text->size > 0 && line->text->text[0] == '%') {
+            line = line->next;
+        }
+
+        // split linked list
+        line->prev->next = (void*)0;
+        line->prev = (void*)0;
+
+        // remove header lines from page
+        doc->page->line = line;
+    }
+
+    // combine underlined H1/H2 in single line
+    page = doc->page;
+    while(page) {
+        line = page->line;
+        while(line) {
+            if((CHECK_BIT(line->bits, IS_H1) ||
+                CHECK_BIT(line->bits, IS_H2)) &&
+               CHECK_BIT(line->bits, IS_EMPTY) &&
+               line->prev &&
+               !CHECK_BIT(line->prev->bits, IS_EMPTY)) {
+
+                // remove line from linked list
+                line->prev->next = line->next;
+                line->next->prev = line->prev;
+
+                // set bits on revious line
+                if(CHECK_BIT(line->bits, IS_H1)) {
+                    SET_BIT(line->prev->bits, IS_H1);
+                } else {
+                    SET_BIT(line->prev->bits, IS_H2);
+                }
+
+                // delete line
+                (line->text->delete)(line->text);
+                free(line);
+            }
+            line = line->next;
+        }
+        page = page->next;
+    }
+
+    return doc;
+}
+
+int markdown_analyse(cstring_t *text) {
+    int i = 0, bits = 0,
+        offset = 0, eol    = 0,
+        equals = 0, hashes = 0,
+        stars  = 0, minus  = 0,
+        spaces = 0, other  = 0;
+
+    // count leading spaces
+    offset = next_nonblank(text, 0);
+
+    // strip trailing spaces
+    for(eol = text->size; eol > offset && isspace(text->text[eol - 1]); eol--);
+
+    for(i = offset; i < eol; i++) {
+
+        switch(text->text[i]) {
+            case '=': equals++;  break;
+            case '#': hashes++;  break;
+            case '*': stars++;   break;
+            case '-': minus++;   break;
+            case ' ': spaces++;  break;
+            default:  other++;   break;
+        }
+    }
+
+    // IS_H1
+    if((equals > 0 &&
+        hashes + stars + minus + spaces + other == 0) ||
+       (text &&
+        text->text &&
+        text->text[offset] == '#' &&
+        text->text[offset+1] != '#')) {
+
+        SET_BIT(bits, IS_H1);
+    }
+
+    // IS_H2
+    if((minus > 0 &&
+        equals + hashes + stars + spaces + other == 0) ||
+       (text &&
+        text->text &&
+        text->text[offset] == '#' &&
+        text->text[offset+1] == '#')) {
+
+        SET_BIT(bits, IS_H2);
+    }
+
+    // IS_QUOTE
+    if(text &&
+       text->text &&
+       text->text[offset] == '>') {
+
+        SET_BIT(bits, IS_QUOTE);
+    }
+
+    // IS_CODE
+    if(offset >= 4) {
+        SET_BIT(bits, IS_CODE);
+    }
+
+    // IS_HR
+    if((minus >= 3 && equals + hashes + stars + other == 0) ||
+       (stars >= 3 && equals + hashes + minus + other == 0)) {
+
+        SET_BIT(bits, IS_HR);
+    }
+
+    // IS_EMPTY
+    if(other == 0) {
+        SET_BIT(bits, IS_EMPTY);
+    }
+
+    return bits;
+}
+
+int is_utf8(char ch) {
+    return (ch & 0x80);
+}
+
+int next_nonblank(cstring_t *text, int i) {
+    while ((i < text->size) && isspace((text->text)[i]))
+        ++i;
+    return i;
+};
+
+int next_blank(cstring_t *text, int i) {
+    while ((i < text->size) && !isspace((text->text)[i]))
+        ++i;
+    return i;
+};
+