git.iko.soy/typeable/pandoc
on 6baebcb help sign in
typeable/pandoc/test/lua/test-pandoc-utils.lua
115 lines 3.6 kB history raw
1utils = require 'pandoc.utils'
3-- hierarchicalize
4------------------------------------------------------------------------
5function test_hierarchicalize ()
6 local blks = {
7 pandoc.Header(1, {pandoc.Str 'First'}),
8 pandoc.Header(2, {pandoc.Str 'Second'}),
9 pandoc.Header(2, {pandoc.Str 'Third'}),
10 }
11 local hblks = utils.hierarchicalize(blks)
12 return hblks[1].t == "Sec"
13 and hblks[1].contents[1].t == "Sec"
14 and hblks[1].contents[2].numbering[1] == 1
15 and hblks[1].contents[2].numbering[2] == 2
16end
18-- SHA1
19------------------------------------------------------------------------
20function test_sha1 ()
21 local ref_hash = '0a0a9f2a6772942557ab5355d76af442f8f65e01'
22 local hash = utils.sha1 'Hello, World!'
23 return hash == ref_hash
24end
26-- Pipe
27------------------------------------------------------------------------
28function file_exists (filename)
29 local fh = io.open(filename, 'r')
30 return fh ~= nil and (fh:close() or true)
31end
33function warn (...) io.stderr:write(...) end
35function test_pipe ()
36 if not file_exists('/bin/sed') then
37 warn 'Did not find /bin/sed, skipping test'
38 return true
39 end
40 local pipe_result = pandoc.pipe('/bin/sed', {'-e', 's/a/b/'}, 'abc')
41 return pipe_result == 'bbc'
42end
44function test_failing_pipe ()
45 if not file_exists('/bin/false') then
46 warn 'Did not find /bin/false, skipping test'
47 return true
48 end
49 local res, err = pcall(pandoc.pipe, '/bin/false', {}, 'abc')
50 return not res and
51 err.command == '/bin/false' and
52 err.error_code == 1 and
53 err.output == ''
54end
56-- Read
57------------------------------------------------------------------------
58function test_read ()
59 local valid_markdown = '*Hello*, World!\n'
60 local res = pandoc.read(valid_markdown).blocks[1].content
61 return res[1].t == 'Emph' and res[3].t == 'Space' and res[4].t == 'Str'
62end
64function test_failing_read ()
65 local res, err = pcall(pandoc.read, 'foo', 'nosuchreader')
66 return not res and err:match 'Unknown reader: nosuchreader'
67end
69-- Stringify
70------------------------------------------------------------------------
71function test_stringify ()
72 local inline = pandoc.Emph{
73 pandoc.Str 'Cogito',
74 pandoc.Space(),
75 pandoc.Str 'ergo',
76 pandoc.Space(),
77 pandoc.Str 'sum.',
78 }
79 return utils.stringify(inline) == 'Cogito ergo sum.'
80end
82-- to_roman_numeral
83------------------------------------------------------------------------
84function test_to_roman_numeral ()
85 return utils.to_roman_numeral(1888) == 'MDCCCLXXXVIII'
86 -- calling with a string fails
87 and not pcall(utils.to_roman_numeral, 'not a number')
88end
90-- normalize_date
91------------------------------------------------------------------------
92function test_normalize_date ()
93 return utils.normalize_date("12/31/2017") == '2017-12-31'
94 and utils.normalize_date("pandoc") == nil
95end
97-- Return result
98------------------------------------------------------------------------
99function run(fn)
100 return fn() and "OK" or "FAIL"
101end
103function Para (el)
104 return {
105 pandoc.Plain{pandoc.Str("hierarchicalize: " .. run(test_hierarchicalize))},
106 pandoc.Plain{pandoc.Str("normalize_date: " .. run(test_normalize_date))},
107 pandoc.Plain{pandoc.Str("pipe: " .. run(test_pipe))},
108 pandoc.Plain{pandoc.Str("failing pipe: " .. run(test_failing_pipe))},
109 pandoc.Plain{pandoc.Str("read: " .. run(test_read))},
110 pandoc.Plain{pandoc.Str("failing read: " .. run(test_failing_read))},
111 pandoc.Plain{pandoc.Str("sha1: " .. run(test_sha1))},
112 pandoc.Plain{pandoc.Str("stringify: " .. run(test_stringify))},
113 pandoc.Plain{pandoc.Str("to_roman_numeral: " .. run(test_to_roman_numeral))},
114 }
115end