void utf8proc_detab(strbuf *ob, const uint8_t *line, size_t size)
{
static const uint8_t whitespace[] = " ";
size_t i = 0, tab = 0;
while (i < size) {
size_t org = i;
while (i < size && line[i] != '\t' && line[i] != '\0'
&& line[i] < 0x80) {
i++; tab++;
}
if (i > org)
strbuf_put(ob, line + org, i - org);
if (i >= size)
break;
if (line[i] == '\t') {
int numspaces = 4 - (tab % 4);
strbuf_put(ob, whitespace, numspaces);
i += 1;
tab += numspaces;
} else {
int charlen = utf8proc_valid(line + i, size - i);
if (charlen >= 0) {
strbuf_put(ob, line + i, charlen);
} else {
encode_unknown(ob);
charlen = -charlen;
}
i += charlen;
tab += 1;
}
}
}
static void encode_unknown(strbuf *buf)
{
static const uint8_t repl[] = {239, 191, 189};
strbuf_put(buf, repl, 3);
}
static void add_line(cmark_node* cmark_node, chunk *ch, int offset)
{
assert(cmark_node->open);
strbuf_put(&cmark_node->string_content, ch->data + offset, ch->len - offset);
}
// Convert a node_block list to HTML. Returns 0 on success, and sets result.
static void blocks_to_html(strbuf *html, node_block *b)
{
struct ListData *data;
render_stack* rstack = NULL;
bool visit_children = false;
bool tight = false;
while(b != NULL) {
visit_children = false;
switch(b->tag) {
case BLOCK_DOCUMENT:
rstack = push_block(rstack, b->next, "", false, false);
visit_children = true;
break;
case BLOCK_PARAGRAPH:
if (tight) {
inlines_to_html(html, b->inline_content);
} else {
cr(html);
strbuf_puts(html, "<p>");
inlines_to_html(html, b->inline_content);
strbuf_puts(html, "</p>\n");
}
break;
case BLOCK_BQUOTE:
cr(html);
strbuf_puts(html, "<blockquote>\n");
rstack = push_block(rstack, b->next, "</blockquote>\n", tight, false);
tight = false;
visit_children = true;
break;
case BLOCK_LIST_ITEM:
cr(html);
strbuf_puts(html, "<li>");
rstack = push_block(rstack, b->next, "</li>\n", tight, true);
visit_children = true;
break;
case BLOCK_LIST:
// make sure a list starts at the beginning of the line:
cr(html);
data = &(b->as.list);
if (data->start > 1) {
strbuf_printf(html, "<%s start=\"%d\">\n",
data->list_type == bullet ? "ul" : "ol",
data->start);
} else {
strbuf_puts(html, data->list_type == bullet ? "<ul>\n" : "<ol>\n");
}
rstack = push_block(rstack, b->next,
data->list_type == bullet ?
"\n</ul>\n" : "\n</ol>\n", tight, false);
tight = data->tight;
visit_children = true;
break;
case BLOCK_ATX_HEADER:
case BLOCK_SETEXT_HEADER:
cr(html);
strbuf_printf(html, "<h%d>", b->as.header.level);
inlines_to_html(html, b->inline_content);
strbuf_printf(html, "</h%d>\n", b->as.header.level);
break;
case BLOCK_INDENTED_CODE:
case BLOCK_FENCED_CODE:
cr(html);
strbuf_puts(html, "<pre><code");
if (b->tag == BLOCK_FENCED_CODE) {
strbuf *info = &b->as.code.info;
if (strbuf_len(info) > 0) {
int first_tag = strbuf_strchr(info, ' ', 0);
if (first_tag < 0)
first_tag = strbuf_len(info);
strbuf_puts(html, " class=\"language-");
escape_html(html, info->ptr, first_tag);
strbuf_putc(html, '"');
}
}
strbuf_putc(html, '>');
escape_html(html, b->string_content.ptr, b->string_content.size);
strbuf_puts(html, "</code></pre>\n");
break;
case BLOCK_HTML:
strbuf_put(html, b->string_content.ptr, b->string_content.size);
break;
case BLOCK_HRULE:
strbuf_puts(html, "<hr />\n");
break;
case BLOCK_REFERENCE_DEF:
break;
default:
assert(false);
}
if (visit_children) {
b = b->children;
} else {
b = b->next;
}
while (b == NULL && rstack != NULL) {
strbuf_puts(html, rstack->literal);
if (rstack->trim) {
strbuf_rtrim(html);
}
tight = rstack->tight;
b = rstack->next_sibling.block;
rstack = pop_render_stack(rstack);
}
}
free_render_stack(rstack);
}
// Convert an inline list to HTML. Returns 0 on success, and sets result.
static void inlines_to_html(strbuf *html, node_inl* ils)
{
node_inl* children;
render_stack* rstack = NULL;
while(ils != NULL) {
children = NULL;
switch(ils->tag) {
case INL_STRING:
escape_html(html, ils->content.literal.data, ils->content.literal.len);
break;
case INL_LINEBREAK:
strbuf_puts(html, "<br />\n");
break;
case INL_SOFTBREAK:
strbuf_putc(html, '\n');
break;
case INL_CODE:
strbuf_puts(html, "<code>");
escape_html(html, ils->content.literal.data, ils->content.literal.len);
strbuf_puts(html, "</code>");
break;
case INL_RAW_HTML:
strbuf_put(html,
ils->content.literal.data,
ils->content.literal.len);
break;
case INL_LINK:
strbuf_puts(html, "<a href=\"");
if (ils->content.linkable.url)
escape_href(html, ils->content.linkable.url, -1);
if (ils->content.linkable.title) {
strbuf_puts(html, "\" title=\"");
escape_html(html, ils->content.linkable.title, -1);
}
strbuf_puts(html, "\">");
children = ils->content.linkable.label;
rstack = push_inline(rstack, ils->next, "</a>");
break;
case INL_IMAGE:
strbuf_puts(html, "<img src=\"");
if (ils->content.linkable.url)
escape_href(html, ils->content.linkable.url, -1);
strbuf_puts(html, "\" alt=\"");
inlines_to_plain_html(html, ils->content.inlines);
if (ils->content.linkable.title) {
strbuf_puts(html, "\" title=\"");
escape_html(html, ils->content.linkable.title, -1);
}
strbuf_puts(html, "\"/>");
break;
case INL_STRONG:
strbuf_puts(html, "<strong>");
children = ils->content.inlines;
rstack = push_inline(rstack, ils->next, "</strong>");
break;
case INL_EMPH:
strbuf_puts(html, "<em>");
children = ils->content.inlines;
rstack = push_inline(rstack, ils->next, "</em>");
break;
}
if (children) {
ils = children;
} else {
ils = ils->next;
}
while (ils == NULL && rstack != NULL) {
strbuf_puts(html, rstack->literal);
ils = rstack->next_sibling.inl;
rstack = pop_render_stack(rstack);
}
}
free_render_stack(rstack);
}
