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
|
/* snac - A simple, minimalistic ActivityPub instance */
/* copyright (c) 2022 grunfink - MIT license */
#include "xs.h"
#include "xs_io.h"
#include "xs_json.h"
#include "xs_regex.h"
#include "snac.h"
d_char *not_really_markdown(char *content, d_char **f_content)
/* formats a content using some Markdown rules */
{
d_char *s = NULL;
int in_pre = 0;
int in_blq = 0;
xs *list;
char *p, *v;
xs *wrk = xs_dup(content);
/* global changes */
{
/* backticks */
xs *ml = xs_regex_matchall(wrk, "`[^`]+`");
p = ml;
while (xs_list_iter(&p, &v)) {
xs *s1 = xs_crop(xs_dup(v), 1, -1);
xs *s2 = xs_fmt("<code>%s</code>", s1);
wrk = xs_replace_i(wrk, v, s2);
}
}
{
/* double asterisks */
xs *ml = xs_regex_matchall(wrk, "\\*\\*[^\\*]+\\*\\*");
p = ml;
while (xs_list_iter(&p, &v)) {
xs *s1 = xs_crop(xs_dup(v), 2, -2);
xs *s2 = xs_fmt("<b>%s</b>", s1);
wrk = xs_replace_i(wrk, v, s2);
}
}
{
/* single asterisks */
xs *ml = xs_regex_matchall(wrk, "\\*[^\\*]+\\*");
p = ml;
while (xs_list_iter(&p, &v)) {
xs *s1 = xs_crop(xs_dup(v), 1, -1);
xs *s2 = xs_fmt("<i>%s</i>", s1);
wrk = xs_replace_i(wrk, v, s2);
}
}
{
/* urls */
xs *ml = xs_regex_matchall(wrk, "https?:/" "/[^ ]+");
p = ml;
while (xs_list_iter(&p, &v)) {
xs *s2 = xs_fmt("<a href=\"%s\">%s</a>", v, v);
wrk = xs_replace_i(wrk, v, s2);
}
}
/* now work on lines */
p = list = xs_split(wrk, "\n");
s = xs_str_new(NULL);
while (xs_list_iter(&p, &v)) {
xs *ss = xs_strip(xs_dup(v));
if (xs_startswith(ss, "```")) {
if (!in_pre)
s = xs_str_cat(s, "<pre>");
else
s = xs_str_cat(s, "</pre>");
in_pre = !in_pre;
continue;
}
if (xs_startswith(ss, ">")) {
/* delete the > and subsequent spaces */
ss = xs_strip(xs_crop(ss, 1, 0));
if (!in_blq) {
s = xs_str_cat(s, "<blockquote>");
in_blq = 1;
}
s = xs_str_cat(s, ss);
s = xs_str_cat(s, "<br>");
continue;
}
if (in_blq) {
s = xs_str_cat(s, "</blockquote>");
in_blq = 0;
}
s = xs_str_cat(s, ss);
s = xs_str_cat(s, "<br>");
}
if (in_blq)
s = xs_str_cat(s, "</blockquote>");
if (in_pre)
s = xs_str_cat(s, "</pre>");
/* some beauty fixes */
s = xs_replace_i(s, "</blockquote><br>", "</blockquote>");
*f_content = s;
return *f_content;
}
|
