xaiml 0.1.0

data/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/sax_buf.h

@@ -0,0 +1,222 @@
+/* sax_buf.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef __OX_SAX_BUF_H__
+#define __OX_SAX_BUF_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 */
+    int		pos;
+    int		line;
+    int		col;
+    int		pro_pos;
+    int		pro_line;
+    int		pro_col;
+    int		(*read_func)(struct _Buf *buf);
+    union {
+        int     	fd;
+        VALUE   	io;
+	const char	*str;
+    } in;
+    struct _SaxDrive	*dr;
+} *Buf;
+
+typedef struct _CheckPt {
+    int		pro_dif;
+    int		pos;
+    int		line;
+    int		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/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/sax_has.h

@@ -0,0 +1,53 @@
+/* sax_has.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef __OX_SAX_HAS_H__
+#define __OX_SAX_HAS_H__
+
+typedef struct _Has {
+    int         instruct;
+    int         end_instruct;
+    int         attr;
+    int         attrs_done;
+    int         attr_value;
+    int         doctype;
+    int         comment;
+    int         cdata;
+    int         text;
+    int         value;
+    int         start_element;
+    int         end_element;
+    int         error;
+    int		pos;
+    int		line;
+    int		column;
+} *Has;
+
+inline static int
+respond_to(VALUE obj, ID method) {
+    return rb_respond_to(obj, method);
+}
+
+inline static void
+has_init(Has has, VALUE handler) {
+    has->instruct = respond_to(handler, ox_instruct_id);
+    has->end_instruct = respond_to(handler, ox_end_instruct_id);
+    has->attr = respond_to(handler, ox_attr_id);
+    has->attr_value = respond_to(handler, ox_attr_value_id);
+    has->attrs_done = respond_to(handler, ox_attrs_done_id);
+    has->doctype = respond_to(handler, ox_doctype_id);
+    has->comment = respond_to(handler, ox_comment_id);
+    has->cdata = respond_to(handler, ox_cdata_id);
+    has->text = respond_to(handler, ox_text_id);
+    has->value = respond_to(handler, ox_value_id);
+    has->start_element = respond_to(handler, ox_start_element_id);
+    has->end_element = respond_to(handler, ox_end_element_id);
+    has->error = respond_to(handler, ox_error_id);
+    has->pos = (Qtrue == rb_ivar_defined(handler, ox_at_pos_id));
+    has->line = (Qtrue == rb_ivar_defined(handler, ox_at_line_id));
+    has->column = (Qtrue == rb_ivar_defined(handler, ox_at_column_id));
+}
+
+#endif /* __OX_SAX_HAS_H__ */

data/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/sax_hint.c

@@ -0,0 +1,216 @@
+/* hint.c
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#include <string.h>
+#include <stdio.h>
+#include <stdbool.h>
+
+#include <ruby.h>
+
+#include "sax_hint.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() {
+    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/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/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/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/sax_stack.h

@@ -0,0 +1,85 @@
+/* sax_stack.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef __OX_SAX_STACK_H__
+#define __OX_SAX_STACK_H__
+
+#include "sax_hint.h"
+
+#define STACK_INC	32
+
+typedef struct _Nv {
+    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, 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;
+    }
+    stack->tail->name = name;
+    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 0;
+}
+
+inline static Nv
+stack_pop(NStack stack) {
+    if (stack->head < stack->tail) {
+	stack->tail--;
+	return stack->tail;
+    }
+    return 0;
+}
+
+#endif /* __OX_SAX_STACK_H__ */

data/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/special.c

@@ -0,0 +1,51 @@
+/* special.c
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#include "special.h"
+
+/*
+u0000..u007F                00000000000000xxxxxxx  0xxxxxxx
+u0080..u07FF                0000000000yyyyyxxxxxx  110yyyyy 10xxxxxx
+u0800..uD7FF, uE000..uFFFF  00000zzzzyyyyyyxxxxxx  1110zzzz 10yyyyyy 10xxxxxx
+u10000..u10FFFF             uuuzzzzzzyyyyyyxxxxxx  11110uuu 10zzzzzz 10yyyyyy 10xxxxxx
+*/
+char*
+ox_ucs_to_utf8_chars(char *text, uint64_t u) {
+    int			reading = 0;
+    int			i;
+    unsigned char	c;
+
+    if (u <= 0x000000000000007FULL) {
+	/* 0xxxxxxx */
+	*text++ = (char)u;
+    } else if (u <= 0x00000000000007FFULL) {
+	/* 110yyyyy 10xxxxxx */
+	*text++ = (char)(0x00000000000000C0ULL | (0x000000000000001FULL & (u >> 6)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & u));
+    } else if (u <= 0x000000000000D7FFULL || (0x000000000000E000ULL <= u && u <= 0x000000000000FFFFULL)) {
+	/* 1110zzzz 10yyyyyy 10xxxxxx */
+	*text++ = (char)(0x00000000000000E0ULL | (0x000000000000000FULL & (u >> 12)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & (u >> 6)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & u));
+    } else if (0x0000000000010000ULL <= u && u <= 0x000000000010FFFFULL) {
+	/* 11110uuu 10zzzzzz 10yyyyyy 10xxxxxx */
+	*text++ = (char)(0x00000000000000F0ULL | (0x0000000000000007ULL & (u >> 18)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & (u >> 12)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & (u >> 6)));
+	*text++ = (char)(0x0000000000000080ULL | (0x000000000000003FULL & u));
+    } else {
+	/* assume it is UTF-8 encoded directly and not UCS */
+	for (i = 56; 0 <= i; i -= 8) {
+	    c = (unsigned char)((u >> i) & 0x00000000000000FFULL);
+	    if (reading) {
+		*text++ = (char)c;
+	    } else if ('\0' != c) {
+		*text++ = (char)c;
+		reading = 1;
+	    }
+	}
+    }
+    return text;
+}

data/vendor/bundle/ruby/2.5.0/gems/ox-2.10.0/ext/ox/special.h

@@ -0,0 +1,13 @@
+/* special.h
+ * Copyright (c) 2011, Peter Ohler
+ * All rights reserved.
+ */
+
+#ifndef __OX_SPECIAL_H__
+#define __OX_SPECIAL_H__
+
+#include <stdint.h>
+
+extern char*	ox_ucs_to_utf8_chars(char *text, uint64_t u);
+
+#endif /* __OX_SPECIAL_H__ */