# HG changeset patch # User Matthew Wild # Date 1457129836 0 # Node ID 71ca252d9f69b3569026a8b8bcf5deb62861a53b # Parent c018a44b822a8efd82f2051c89a00b0db190ad3c Add tests for util.json diff -r c018a44b822a -r 71ca252d9f69 tests/test.lua --- a/tests/test.lua Thu Mar 03 16:05:34 2016 +0100 +++ b/tests/test.lua Fri Mar 04 22:17:16 2016 +0000 @@ -18,6 +18,7 @@ dotest "core.s2smanager" dotest "core.configmanager" dotest "util.ip" + dotest "util.json" dotest "util.stanza" dotest "util.sasl.scram" dotest "util.cache" diff -r c018a44b822a -r 71ca252d9f69 tests/test_util_json.lua --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/test_util_json.lua Fri Mar 04 22:17:16 2016 +0000 @@ -0,0 +1,21 @@ + +function encode(encode, json) + local function test(f, j, e) + if e then + assert_equal(f(j), e); + end + assert_equal(f(j), f(json.decode(f(j)))); + end + test(encode, json.null, "null") + test(encode, {}, "{}") + test(encode, {a=1}); + test(encode, {a={1,2,3}}); + test(encode, {1}, "[1]"); +end + +function decode(decode) + local empty_array = decode("[]"); + assert_equal(type(empty_array), "table"); + assert_equal(#empty_array, 0); + assert_equal(next(empty_array), nil); +end