1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
|
#include <stdlib.h>
#include <assert.h>
#include <stdio.h>
#include <stdbool.h>
#include "references.h"
#include "html/houdini.h"
#include "cmark.h"
#include "buffer.h"
unsigned char *cmark_markdown_to_html(unsigned char *text, int len)
{
node_block *blocks;
strbuf htmlbuf = GH_BUF_INIT;
unsigned char *result;
blocks = cmark_parse_document(text, len);
cmark_render_html(&htmlbuf, blocks);
cmark_free_blocks(blocks);
result = strbuf_detach(&htmlbuf);
strbuf_free(&htmlbuf);
return result;
}
// Free a node_block list and any children.
void cmark_free_blocks(cmark_node_block *e)
{
cmark_node_block * next;
while (e != NULL) {
cmark_free_inlines(e->inline_content);
strbuf_free(&e->string_content);
if (e->tag == CMARK_BLOCK_FENCED_CODE) {
strbuf_free(&e->as.code.info);
} else if (e->tag == CMARK_BLOCK_DOCUMENT) {
reference_map_free(e->as.document.refmap);
}
if (e->last_child) {
// Splice children into list
e->last_child->next = e->next;
e->next = e->children;
}
next = e->next;
free(e);
e = next;
}
}
// Utility function used by free_inlines
static void splice_into_list(cmark_node_inl* e, node_inl* children) {
cmark_node_inl * tmp;
if (children) {
tmp = children;
// Find last child
while (tmp->next) {
tmp = tmp->next;
}
// Splice children into list
tmp->next = e->next;
e->next = children;
}
return ;
}
// Free an inline list. Avoid recursion to prevent stack overflows
// on deeply nested structures.
void cmark_free_inlines(cmark_node_inl* e)
{
node_inl * next;
while (e != NULL) {
switch (e->tag){
case CMARK_INL_STRING:
case CMARK_INL_RAW_HTML:
case CMARK_INL_CODE:
cmark_chunk_free(&e->content.literal);
break;
case CMARK_INL_LINEBREAK:
case CMARK_INL_SOFTBREAK:
break;
case CMARK_INL_LINK:
case CMARK_INL_IMAGE:
free(e->content.linkable.url);
free(e->content.linkable.title);
splice_into_list(e, e->content.linkable.label);
break;
case CMARK_INL_EMPH:
case CMARK_INL_STRONG:
splice_into_list(e, e->content.inlines);
break;
default:
fprintf(stderr, "[WARN] (%s:%d) Unknown inline tag %d",
__FILE__, __LINE__, e->tag);
break;
}
next = e->next;
free(e);
e = next;
}
}
inline cmark_node_inl *cmark_make_link(cmark_node_inl *label, unsigned char *url, unsigned char *title)
{
cmark_node_inl* e = calloc(1, sizeof(*e));
if(e != NULL) {
e->tag = CMARK_INL_LINK;
e->content.linkable.label = label;
e->content.linkable.url = url;
e->content.linkable.title = title;
e->next = NULL;
}
return e;
}
unsigned char *clean_autolink(chunk *url, int is_email)
{
strbuf buf = GH_BUF_INIT;
chunk_trim(url);
if (url->len == 0)
return NULL;
if (is_email)
strbuf_puts(&buf, "mailto:");
houdini_unescape_html_f(&buf, url->data, url->len);
return strbuf_detach(&buf);
}
inline cmark_node_inl* cmark_make_autolink(cmark_node_inl* label, chunk url, int is_email)
{
return cmark_make_link(label, clean_autolink(&url, is_email), NULL);
}
inline cmark_node_inl* cmark_make_inlines(int t, cmark_node_inl* contents)
{
cmark_node_inl * e = calloc(1, sizeof(*e));
if(e != NULL) {
e->tag = t;
e->content.inlines = contents;
e->next = NULL;
}
return e;
}
// Create an inline with a literal string value.
inline cmark_node_inl* cmark_make_literal(int t, cmark_chunk s)
{
cmark_node_inl * e = calloc(1, sizeof(*e));
if(e != NULL) {
e->tag = t;
e->content.literal = s;
e->next = NULL;
}
return e;
}
// Create an inline with no value.
inline cmark_node_inl* cmark_make_simple(int t)
{
cmark_node_inl* e = calloc(1, sizeof(*e));
if(e != NULL) {
e->tag = t;
e->next = NULL;
}
return e;
}
// Append inline list b to the end of inline list a.
// Return pointer to head of new list.
inline cmark_node_inl* cmark_append_inlines(cmark_node_inl* a, cmark_node_inl* b)
{
if (a == NULL) { // NULL acts like an empty list
return b;
}
cmark_node_inl* cur = a;
while (cur->next != NULL) {
cur = cur->next;
}
cur->next = b;
return a;
}
// Append block list b to the end of block list a.
// Return pointer to head of new list.
inline cmark_node_block* cmark_append_blocks(cmark_node_block* a, cmark_node_block* b)
{
if (a == NULL) { // NULL acts like an empty list
return b;
}
cmark_node_block* cur = a;
while (cur->next != NULL) {
cur = cur->next;
}
cur->next = b;
b->prev = cur;
return a;
}
|
