ox-bundlecachetest 2.14.23

data/ext/ox/sax_buf.h

@@ -0,0 +1,204 @@
+/* sax_buf.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef OX_SAX_BUF_H
+#define OX_SAX_BUF_H
+
+#include <stdio.h>
+
+typedef struct _buf {
+    char  base[0x00001000];
+    char *head;
+    char *end;
+    char *tail;
+    char *read_end; /* one past last character read */
+    char *pro;      /* protection start, buffer can not slide past this point */
+    char *str;      /* start of current string being read */
+    off_t pos;
+    off_t line;
+    off_t col;
+    off_t pro_pos;
+    off_t pro_line;
+    off_t pro_col;
+    int (*read_func)(struct _buf *buf);
+    union {
+        int         fd;
+        VALUE       io;
+        const char *str;
+    } in;
+    struct _saxDrive *dr;
+} *Buf;
+
+typedef struct _checkPt {
+    off_t pro_dif;
+    off_t pos;
+    off_t line;
+    off_t col;
+    char  c;
+} *CheckPt;
+
+#define CHECK_PT_INIT {-1, 0, 0, 0, '\0'}
+
+extern void ox_sax_buf_init(Buf buf, VALUE io);
+extern int  ox_sax_buf_read(Buf buf);
+
+static inline char buf_get(Buf buf) {
+    // printf("*** drive get from '%s'  from start: %ld  buf: %p  from read_end: %ld\n", buf->tail, buf->tail -
+    // buf->head, buf->head, buf->read_end - buf->tail);
+    if (buf->read_end <= buf->tail) {
+        if (0 != ox_sax_buf_read(buf)) {
+            return '\0';
+        }
+    }
+    if ('\n' == *buf->tail) {
+        buf->line++;
+        buf->col = 0;
+    } else {
+        buf->col++;
+    }
+    buf->pos++;
+
+    return *buf->tail++;
+}
+
+static inline void buf_backup(Buf buf) {
+    buf->tail--;
+    buf->col--;
+    buf->pos--;
+    if (0 >= buf->col) {
+        buf->line--;
+        // allow col to be negative since we never backup twice in a row
+    }
+}
+
+static inline void buf_protect(Buf buf) {
+    buf->pro      = buf->tail;
+    buf->str      = buf->tail;  // can't have str before pro
+    buf->pro_pos  = buf->pos;
+    buf->pro_line = buf->line;
+    buf->pro_col  = buf->col;
+}
+
+static inline void buf_reset(Buf buf) {
+    buf->tail = buf->pro;
+    buf->pos  = buf->pro_pos;
+    buf->line = buf->pro_line;
+    buf->col  = buf->pro_col;
+}
+
+/* Starts by reading a character so it is safe to use with an empty or
+ * compacted buffer.
+ */
+static inline char buf_next_non_white(Buf buf) {
+    char c;
+
+    while ('\0' != (c = buf_get(buf))) {
+        switch (c) {
+        case ' ':
+        case '\t':
+        case '\f':
+        case '\n':
+        case '\r': break;
+        default: return c;
+        }
+    }
+    return '\0';
+}
+
+/* Starts by reading a character so it is safe to use with an empty or
+ * compacted buffer.
+ */
+static inline char buf_next_white(Buf buf) {
+    char c;
+
+    while ('\0' != (c = buf_get(buf))) {
+        switch (c) {
+        case ' ':
+        case '\t':
+        case '\f':
+        case '\n':
+        case '\r':
+        case '\0': return c;
+        default: break;
+        }
+    }
+    return '\0';
+}
+
+static inline void buf_cleanup(Buf buf) {
+    if (buf->base != buf->head && 0 != buf->head) {
+        xfree(buf->head);
+        buf->head = 0;
+    }
+}
+
+static inline int is_white(char c) {
+    switch (c) {
+    case ' ':
+    case '\t':
+    case '\f':
+    case '\n':
+    case '\r': return 1;
+    default: break;
+    }
+    return 0;
+}
+
+static inline void buf_checkpoint(Buf buf, CheckPt cp) {
+    cp->pro_dif = (int)(buf->tail - buf->pro);
+    cp->pos     = buf->pos;
+    cp->line    = buf->line;
+    cp->col     = buf->col;
+    cp->c       = *(buf->tail - 1);
+}
+
+static inline int buf_checkset(CheckPt cp) {
+    return (0 <= cp->pro_dif);
+}
+
+static inline char buf_checkback(Buf buf, CheckPt cp) {
+    buf->tail = buf->pro + cp->pro_dif;
+    buf->pos  = cp->pos;
+    buf->line = cp->line;
+    buf->col  = cp->col;
+    return cp->c;
+}
+
+static inline void buf_collapse_return(char *str) {
+    char *s    = str;
+    char *back = str;
+
+    for (; '\0' != *s; s++) {
+        if (back != str && '\n' == *s && '\r' == *(back - 1)) {
+            *(back - 1) = '\n';
+        } else {
+            *back++ = *s;
+        }
+    }
+    *back = '\0';
+}
+
+static inline void buf_collapse_white(char *str) {
+    char *s    = str;
+    char *back = str;
+
+    for (; '\0' != *s; s++) {
+        switch (*s) {
+        case ' ':
+        case '\t':
+        case '\f':
+        case '\n':
+        case '\r':
+            if (back == str || ' ' != *(back - 1)) {
+                *back++ = ' ';
+            }
+            break;
+        default: *back++ = *s; break;
+        }
+    }
+    *back = '\0';
+}
+
+#endif /* OX_SAX_BUF_H */

data/ext/ox/sax_hint.c

@@ -0,0 +1,207 @@
+/* hint.c
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#include "sax_hint.h"
+
+#include <ruby.h>
+#include <stdbool.h>
+#include <stdio.h>
+#include <string.h>
+
+static const char *audio_video_0[]              = {"audio", "video", 0};
+static const char *colgroup_0[]                 = {"colgroup", 0};
+static const char *details_0[]                  = {"details", 0};
+static const char *dl_0[]                       = {"dl", 0};
+static const char *dt_th_0[]                    = {"dt", "th", 0};
+static const char *fieldset_0[]                 = {"fieldset", 0};
+static const char *figure_0[]                   = {"figure", 0};
+static const char *frameset_0[]                 = {"frameset", 0};
+static const char *head_0[]                     = {"head", 0};
+static const char *html_0[]                     = {"html", 0};
+static const char *map_0[]                      = {"map", 0};
+static const char *ol_ul_menu_0[]               = {"ol", "ul", "menu", 0};
+static const char *optgroup_select_datalist_0[] = {"optgroup", "select", "datalist", 0};
+static const char *ruby_0[]                     = {"ruby", 0};
+static const char *table_0[]                    = {"table", 0};
+static const char *tr_0[]                       = {"tr", 0};
+
+static struct _hint html_hint_array[] = {
+    {"!--", false, false, false, ActiveOverlay, NULL},  // comment
+    {"a", false, false, false, ActiveOverlay, NULL},
+    {"abbr", false, false, false, ActiveOverlay, NULL},
+    {"acronym", false, false, false, ActiveOverlay, NULL},
+    {"address", false, false, false, ActiveOverlay, NULL},
+    {"applet", false, false, false, ActiveOverlay, NULL},
+    {"area", true, false, false, ActiveOverlay, map_0},
+    {"article", false, false, false, ActiveOverlay, NULL},
+    {"aside", false, false, false, ActiveOverlay, NULL},
+    {"audio", false, false, false, ActiveOverlay, NULL},
+    {"b", false, false, false, ActiveOverlay, NULL},
+    {"base", true, false, false, ActiveOverlay, head_0},
+    {"basefont", true, false, false, ActiveOverlay, head_0},
+    {"bdi", false, false, false, ActiveOverlay, NULL},
+    {"bdo", false, true, false, ActiveOverlay, NULL},
+    {"big", false, false, false, ActiveOverlay, NULL},
+    {"blockquote", false, false, false, ActiveOverlay, NULL},
+    {"body", false, false, false, ActiveOverlay, html_0},
+    {"br", true, false, false, ActiveOverlay, NULL},
+    {"button", false, false, false, ActiveOverlay, NULL},
+    {"canvas", false, false, false, ActiveOverlay, NULL},
+    {"caption", false, false, false, ActiveOverlay, table_0},
+    {"center", false, false, false, ActiveOverlay, NULL},
+    {"cite", false, false, false, ActiveOverlay, NULL},
+    {"code", false, false, false, ActiveOverlay, NULL},
+    {"col", true, false, false, ActiveOverlay, colgroup_0},
+    {"colgroup", false, false, false, ActiveOverlay, NULL},
+    {"command", true, false, false, ActiveOverlay, NULL},
+    {"datalist", false, false, false, ActiveOverlay, NULL},
+    {"dd", false, false, false, ActiveOverlay, dl_0},
+    {"del", false, false, false, ActiveOverlay, NULL},
+    {"details", false, false, false, ActiveOverlay, NULL},
+    {"dfn", false, false, false, ActiveOverlay, NULL},
+    {"dialog", false, false, false, ActiveOverlay, dt_th_0},
+    {"dir", false, false, false, ActiveOverlay, NULL},
+    {"div", false, true, false, ActiveOverlay, NULL},
+    {"dl", false, false, false, ActiveOverlay, NULL},
+    {"dt", false, true, false, ActiveOverlay, dl_0},
+    {"em", false, false, false, ActiveOverlay, NULL},
+    {"embed", true, false, false, ActiveOverlay, NULL},
+    {"fieldset", false, false, false, ActiveOverlay, NULL},
+    {"figcaption", false, false, false, ActiveOverlay, figure_0},
+    {"figure", false, false, false, ActiveOverlay, NULL},
+    {"font", false, true, false, ActiveOverlay, NULL},
+    {"footer", false, false, false, ActiveOverlay, NULL},
+    {"form", false, false, false, ActiveOverlay, NULL},
+    {"frame", true, false, false, ActiveOverlay, frameset_0},
+    {"frameset", false, false, false, ActiveOverlay, NULL},
+    {"h1", false, false, false, ActiveOverlay, NULL},
+    {"h2", false, false, false, ActiveOverlay, NULL},
+    {"h3", false, false, false, ActiveOverlay, NULL},
+    {"h4", false, false, false, ActiveOverlay, NULL},
+    {"h5", false, false, false, ActiveOverlay, NULL},
+    {"h6", false, false, false, ActiveOverlay, NULL},
+    {"head", false, false, false, ActiveOverlay, html_0},
+    {"header", false, false, false, ActiveOverlay, NULL},
+    {"hgroup", false, false, false, ActiveOverlay, NULL},
+    {"hr", true, false, false, ActiveOverlay, NULL},
+    {"html", false, false, false, ActiveOverlay, NULL},
+    {"i", false, false, false, ActiveOverlay, NULL},
+    {"iframe", true, false, false, ActiveOverlay, NULL},
+    {"img", true, false, false, ActiveOverlay, NULL},
+    {"input", true, false, false, ActiveOverlay, NULL},  // somewhere under a form_0
+    {"ins", false, false, false, ActiveOverlay, NULL},
+    {"kbd", false, false, false, ActiveOverlay, NULL},
+    {"keygen", true, false, false, ActiveOverlay, NULL},
+    {"label", false, false, false, ActiveOverlay, NULL},  // somewhere under a form_0
+    {"legend", false, false, false, ActiveOverlay, fieldset_0},
+    {"li", false, false, false, ActiveOverlay, ol_ul_menu_0},
+    {"link", true, false, false, ActiveOverlay, head_0},
+    {"map", false, false, false, ActiveOverlay, NULL},
+    {"mark", false, false, false, ActiveOverlay, NULL},
+    {"menu", false, false, false, ActiveOverlay, NULL},
+    {"meta", true, false, false, ActiveOverlay, head_0},
+    {"meter", false, false, false, ActiveOverlay, NULL},
+    {"nav", false, false, false, ActiveOverlay, NULL},
+    {"noframes", false, false, false, ActiveOverlay, NULL},
+    {"noscript", false, false, false, ActiveOverlay, NULL},
+    {"object", false, false, false, ActiveOverlay, NULL},
+    {"ol", false, true, false, ActiveOverlay, NULL},
+    {"optgroup", false, false, false, ActiveOverlay, NULL},
+    {"option", false, false, false, ActiveOverlay, optgroup_select_datalist_0},
+    {"output", false, false, false, ActiveOverlay, NULL},
+    {"p", false, false, false, ActiveOverlay, NULL},
+    {"param", true, false, false, ActiveOverlay, NULL},
+    {"pre", false, false, false, ActiveOverlay, NULL},
+    {"progress", false, false, false, ActiveOverlay, NULL},
+    {"q", false, false, false, ActiveOverlay, NULL},
+    {"rp", false, false, false, ActiveOverlay, ruby_0},
+    {"rt", false, false, false, ActiveOverlay, ruby_0},
+    {"ruby", false, false, false, ActiveOverlay, NULL},
+    {"s", false, false, false, ActiveOverlay, NULL},
+    {"samp", false, false, false, ActiveOverlay, NULL},
+    {"script", false, false, true, ActiveOverlay, NULL},
+    {"section", false, true, false, ActiveOverlay, NULL},
+    {"select", false, false, false, ActiveOverlay, NULL},
+    {"small", false, false, false, ActiveOverlay, NULL},
+    {"source", false, false, false, ActiveOverlay, audio_video_0},
+    {"span", false, true, false, ActiveOverlay, NULL},
+    {"strike", false, false, false, ActiveOverlay, NULL},
+    {"strong", false, false, false, ActiveOverlay, NULL},
+    {"style", false, false, false, ActiveOverlay, NULL},
+    {"sub", false, false, false, ActiveOverlay, NULL},
+    {"summary", false, false, false, ActiveOverlay, details_0},
+    {"sup", false, false, false, ActiveOverlay, NULL},
+    {"table", false, false, false, ActiveOverlay, NULL},
+    {"tbody", false, false, false, ActiveOverlay, table_0},
+    {"td", false, false, false, ActiveOverlay, tr_0},
+    {"textarea", false, false, false, ActiveOverlay, NULL},
+    {"tfoot", false, false, false, ActiveOverlay, table_0},
+    {"th", false, false, false, ActiveOverlay, tr_0},
+    {"thead", false, false, false, ActiveOverlay, table_0},
+    {"time", false, false, false, ActiveOverlay, NULL},
+    {"title", false, false, false, ActiveOverlay, head_0},
+    {"tr", false, false, false, ActiveOverlay, table_0},
+    {"track", true, false, false, ActiveOverlay, audio_video_0},
+    {"tt", false, false, false, ActiveOverlay, NULL},
+    {"u", false, false, false, ActiveOverlay, NULL},
+    {"ul", false, false, false, ActiveOverlay, NULL},
+    {"var", false, false, false, ActiveOverlay, NULL},
+    {"video", false, false, false, ActiveOverlay, NULL},
+    {"wbr", true, false, false, ActiveOverlay, NULL},
+};
+static struct _hints html_hints = {"HTML", html_hint_array, sizeof(html_hint_array) / sizeof(*html_hint_array)};
+
+Hints ox_hints_html(void) {
+    return &html_hints;
+}
+
+Hints ox_hints_dup(Hints h) {
+    Hints nh = ALLOC(struct _hints);
+
+    nh->hints = ALLOC_N(struct _hint, h->size);
+    memcpy(nh->hints, h->hints, sizeof(struct _hint) * h->size);
+    nh->size = h->size;
+    nh->name = h->name;
+
+    return nh;
+}
+
+void ox_hints_destroy(Hints h) {
+    if (NULL != h && &html_hints != h) {
+        xfree(h->hints);
+        xfree(h);
+    }
+}
+
+Hint ox_hint_find(Hints hints, const char *name) {
+    if (0 != hints) {
+        Hint lo = hints->hints;
+        Hint hi = hints->hints + hints->size - 1;
+        Hint mid;
+        int  res;
+
+        if (0 == (res = strcasecmp(name, lo->name))) {
+            return lo;
+        } else if (0 > res) {
+            return 0;
+        }
+        if (0 == (res = strcasecmp(name, hi->name))) {
+            return hi;
+        } else if (0 < res) {
+            return 0;
+        }
+        while (1 < hi - lo) {
+            mid = lo + (hi - lo) / 2;
+            if (0 == (res = strcasecmp(name, mid->name))) {
+                return mid;
+            } else if (0 < res) {
+                lo = mid;
+            } else {
+                hi = mid;
+            }
+        }
+    }
+    return 0;
+}

data/ext/ox/sax_hint.h

@@ -0,0 +1,40 @@
+/* hint.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef OX_HINT_H
+#define OX_HINT_H
+
+#include <stdbool.h>
+
+typedef enum {
+    ActiveOverlay   = 0,
+    InactiveOverlay = 'i',
+    BlockOverlay    = 'b',
+    OffOverlay      = 'o',
+    AbortOverlay    = 'a',
+    NestOverlay     = 'n',  // nest flag is ignored
+} Overlay;
+
+typedef struct _hint {
+    const char  *name;
+    char         empty;    // must be closed or close auto it, not error
+    char         nest;     // nesting allowed
+    char         jump;     // jump to end <script> ... </script>
+    char         overlay;  // Overlay
+    const char **parents;
+} *Hint;
+
+typedef struct _hints {
+    const char *name;
+    Hint        hints;  // array of hints
+    int         size;
+} *Hints;
+
+extern Hints ox_hints_html(void);
+extern Hint  ox_hint_find(Hints hints, const char *name);
+extern Hints ox_hints_dup(Hints h);
+extern void  ox_hints_destroy(Hints h);
+
+#endif /* OX_HINT_H */

data/ext/ox/sax_stack.h

@@ -0,0 +1,113 @@
+/* sax_stack.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef OX_SAX_STACK_H
+#define OX_SAX_STACK_H
+
+#include <stdlib.h>
+
+#include "intern.h"
+#include "sax_hint.h"
+
+#define STACK_INC 32
+#define NV_BUF_MAX 64
+
+typedef struct _nv {
+    char        name_buf[NV_BUF_MAX];
+    const char *name;
+    VALUE       val;
+    int         childCnt;
+    Hint        hint;
+} *Nv;
+
+typedef struct _nStack {
+    struct _nv base[STACK_INC];
+    Nv         head; /* current stack */
+    Nv         end;  /* stack end */
+    Nv         tail; /* pointer to one past last element name on stack */
+} *NStack;
+
+inline static void stack_init(NStack stack) {
+    stack->head = stack->base;
+    stack->end  = stack->base + sizeof(stack->base) / sizeof(struct _nv);
+    stack->tail = stack->head;
+}
+
+inline static int stack_empty(NStack stack) {
+    return (stack->head == stack->tail);
+}
+
+inline static void stack_cleanup(NStack stack) {
+    if (stack->base != stack->head) {
+        xfree(stack->head);
+    }
+}
+
+inline static void stack_push(NStack stack, const char *name, size_t nlen, VALUE val, Hint hint) {
+    if (stack->end <= stack->tail) {
+        size_t len  = stack->end - stack->head;
+        size_t toff = stack->tail - stack->head;
+
+        if (stack->base == stack->head) {
+            stack->head = ALLOC_N(struct _nv, len + STACK_INC);
+            memcpy(stack->head, stack->base, sizeof(struct _nv) * len);
+        } else {
+            REALLOC_N(stack->head, struct _nv, len + STACK_INC);
+        }
+        stack->tail = stack->head + toff;
+        stack->end  = stack->head + len + STACK_INC;
+    }
+    if (NV_BUF_MAX <= nlen) {
+        stack->tail->name = ox_strndup(name, nlen);
+    } else {
+        strncpy(stack->tail->name_buf, name, nlen);
+        stack->tail->name_buf[nlen] = '\0';
+        stack->tail->name           = NULL;
+    }
+    stack->tail->val      = val;
+    stack->tail->hint     = hint;
+    stack->tail->childCnt = 0;
+    stack->tail++;
+}
+
+inline static Nv stack_peek(NStack stack) {
+    if (stack->head < stack->tail) {
+        return stack->tail - 1;
+    }
+    return NULL;
+}
+
+inline static Nv stack_pop(NStack stack) {
+    if (stack->head < stack->tail) {
+        stack->tail--;
+        if (NULL != stack->tail->name) {
+            xfree((char *)(stack->tail->name));
+        }
+        return stack->tail;
+    }
+    return NULL;
+}
+
+inline static const char *nv_name(Nv nv) {
+    if (NULL == nv->name) {
+        return nv->name_buf;
+    }
+    return nv->name;
+}
+
+inline static int nv_same_name(Nv nv, const char *name, bool smart) {
+    if (smart) {
+        if (NULL == nv->name) {
+            return (0 == strcasecmp(name, nv->name_buf));
+        }
+        return (0 == strcasecmp(name, nv->name));
+    }
+    if (NULL == nv->name) {
+        return (0 == strcmp(name, nv->name_buf));
+    }
+    return (0 == strcmp(name, nv->name));
+}
+
+#endif /* OX_SAX_STACK_H */