blob: 7bd3f933231fad908e118c0c8a514813f6c92ccb (
plain)
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
|
template::generate () {
log INFO 'Generating files from templates'
local -i num_tpl_files=0
while read -r tpl_path; do
if test -n "$CONTENT_FILTER" && ! $GREP -q "$CONTENT_FILTER" <<< "$tpl_path"; then
continue
fi
num_tpl_files=$(( num_tpl_files + 1 ))
template::_generate_file "$tpl_path"
done < <(find "$CONTENT_BASE_DIR/gemtext" -type f -name \*.gmi.tpl)
wait
log INFO "Converted $num_tpl_files template files"
}
template::draft () {
CONTENT_FILTER=DRAFT-
template::generate
}
template::_generate_file () {
local -r tpl_path="$1"; shift
local -r tpl_dir="$(dirname "$tpl_path")"
local -r tpl="$(basename "$tpl_path")"
local -r dest="${tpl/.tpl/}"
cd "$tpl_dir" || log PANIC "Unable to chdir to $tpl_dir"
log INFO "Generating $tpl_path -> $dest"
# Environment variables can be used from .gmi.tpl files
export CURRENT_TPL="$tpl_path"
export CURRENT_GMI="$dest"
template::_generate < "$tpl" > "$dest.tmp"
mv "$dest.tmp" "$dest"
log INFO "Done generating $dest"
cd -
}
template::_generate () {
local is_block=no
local block=''
while IFS='' read -r line; do
if [ "$is_block" = yes ]; then
if [ "$line" = '>>>' ]; then
eval "$block"
is_block=no
block=''
else
block="$block
$line"
fi
continue
fi
case "$line" in
'<< '*)
template::_line "$line"
;;
'<<<'*)
is_block=yes
;;
*)
echo "$line"
;;
esac
done | $SED 's/^\[\[\[/<<</; s/^\]\]\]/>>>/; s/^\[\[/<</; s/^\]/>/;'
}
template::_line () {
eval "${1/<< /}"
}
# Sugesting adding a ToC when there are many sections
template::suggester::toc () {
find "$CONTENT_BASE_DIR/gemtext" -name \*.gmi | while read -r gmi_file; do
if test -f "$gmi_file.tpl" && $GREP -q '<< template::inline::toc' "$gmi_file.tpl"; then
continue # Has alread a ToC
fi
local -i num_sections="$($SED -E -n '/^```/,/^```/! { /^#+ /p; }' "$gmi_file" | wc -l)"
if [ $num_sections -ge 7 ]; then
echo "$gmi_file with $num_sections sections and no ToC - consider adding template::inline::toc!"
fi
done
}
# Can be used from a .gmi.tpl template for generating an index for a given topic.
template::inline::index () {
local topic=''
for topic in "$@"; do
while read -r gmi_file; do
local date=$(cut -d- -f1,2,3 <<< "$gmi_file")
local title=$($SED -n "/^# / { s/# //; p; q; }" "$gmi_file")
local current=''
if [ "$gmi_file" = "$CURRENT_GMI" ]; then
current=" (You are currently reading this)"
fi
echo "=> ./$gmi_file $date $title$current"
done < <(ls | $GREP -i "$topic.*\\.gmi\$" | $GREP -v DRAFT)
done | sort | uniq
}
# TODO: Write unit test.
# To generate a table of contents
template::inline::toc () {
echo '## Table of Contents'
echo ''
< "$(basename "$CURRENT_TPL")" $SED -E -n '
/^```/,/^```/! {
/^#+ / {
s/^###/* ⇢ ⇢ ⇢/
s/^##/* ⇢ ⇢/
s/^#/* ⇢/
p
}
}
'
}
template::test () {
assert::equals "$(template::_line '<< echo -n foo')" 'foo'
assert::equals "$(template::_line '<< echo foo')" 'foo'
assert::equals "$(template::_line '<< $DATE --date @0 +%Y%m%d')" '19700101'
assert::equals "$(template::_line '<< echo "$AUTHOR"')" "$AUTHOR"
template::_line '<< foo=bar'
assert::equals "$(template::_line '<< echo $foo')" bar
local -r template1='# Hello Mister
<<<
echo -n "Epoch 0 starts at: "
$DATE --date @0 +%Y%m%d
echo Just so that you know
>>>'
local -r expect1='# Hello Mister
Epoch 0 starts at: 19700101
Just so that you know'
assert::equals "$(template::_generate <<< "$template1")" "$expect1"
local -r template2='<<<
for i in {1..10}; do
echo -n $i
done
>>>'
assert::equals "$(template::_generate <<< "$template2")" 12345678910
local -r template3='<<<
foo=baz
>>>
<<<bash
echo $foo
>>>'
assert::equals "$(template::_generate <<< "$template3")" baz
local -r template4='<<<
>>>
<<<
>>>
<< :'
assert::equals "$(template::_generate <<< "$template4")" ''
local -r template5='[[ echo foo
[[[
echo bar
]]]'
local -r expect5='<< echo foo
<<<
echo bar
>>>'
assert::equals "$(template::_generate <<< "$template5")" "$expect5"
assert::equals "$(template::_generate <<< ']')" '>'
# local -r template6='# Hello world
# << template::inline::toc
# ## Heading 1
# ### Heading 1b
# foo bar baz
# ## Heading 2
# ### Heading 2b
# foo bar baz'
# local -r expect6='<< echo foo
# <<<
# echo bar
# >>>'
# assert::equals "$(template::_generate <<< "$template6")" "$expect6"
# assert::equals "$(template::_generate <<< ']')" '>'
}
|
