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
|
local json = require "util.json";
describe("util.json", function()
describe("#encode()", function()
it("should work", function()
local function test(f, j, e)
if e then
assert.are.equal(f(j), e);
end
assert.are.equal(f(j), f(json.decode(f(j))));
end
test(json.encode, json.null, "null")
test(json.encode, {}, "{}")
test(json.encode, {a=1});
test(json.encode, {a={1,2,3}});
test(json.encode, {1}, "[1]");
end);
end);
describe("#decode()", function()
it("should work", function()
local empty_array = json.decode("[]");
assert.are.equal(type(empty_array), "table");
assert.are.equal(#empty_array, 0);
assert.are.equal(next(empty_array), nil);
end);
end);
describe("testcases", function()
local valid_data = {};
local invalid_data = {};
local skip = "fail1.json fail9.json fail18.json fail15.json fail13.json fail25.json fail26.json fail27.json fail28.json fail17.json pass1.json";
setup(function()
local lfs = require "lfs";
local path = "spec/json";
for name in lfs.dir(path) do
if name:match("%.json$") then
local f = assert(io.open(path.."/"..name));
local content = assert(f:read("*a"));
assert(f:close());
if skip:find(name) then
-- Skip
elseif name:match("^pass") then
valid_data[name] = content;
elseif name:match("^fail") then
invalid_data[name] = content;
end
end
end
end)
it("should pass valid testcases", function()
for name, content in pairs(valid_data) do
local parsed, err = json.decode(content);
assert(parsed, name..": "..tostring(err));
end
end);
it("should fail invalid testcases", function()
for name, content in pairs(invalid_data) do
local parsed, err = json.decode(content);
assert(not parsed, name..": "..tostring(err));
end
end);
end)
end);
|
