Ser/tests.lua

70 lines
1.9 KiB
Lua
Raw Normal View History

2013-11-03 21:50:05 +00:00
local serialize = require 'ser'
local succeeded = 0
local failed = 0
function case(input, expected, message)
local output = serialize(input)
if output == expected then
succeeded = succeeded + 1
else
print('test failed: ' .. message)
print('expected:')
print(expected)
print('got:')
print(output)
failed = failed + 1
end
end
function case_error(input, expected, message)
local success, err = pcall(serialize, input)
if not success and err == expected then
succeeded = succeeded + 1
else
print('test failed: ' .. message)
print('expected error:')
print(expected)
print('got:')
print(success, err)
failed = failed + 1
end
end
case({}, 'return {}', 'empty table')
case({true}, 'return {true}', 'simple table')
case({{}}, [[
local _1 = {}
return {_1}]], 'empty table within a table')
local _t = {}
_t.self = _t
case(_t, [[local _0 = {}
_0.self = _0
return _0]], 'simple cycle')
case_error({coroutine.create(function()end)}, './ser.lua:27: Trying to serialize unsupported type thread', 'unsupported type')
case({"a", foo = "bar", ["3f"] = true, _1 = false, ["00"] = 9}, 'return {"a", ["3f"] = true, _1 = false, ["00"] = 9, foo = "bar"}', 'various')
case({'\127\230\255\254\128\12\0128\n\31'}, 'return {"\\127\\230\\255\\254\\128\\12\\0128\\n\\31"}', 'non-ASCII or control characters in string value')
case({['\127\230\255\254\128\12\0128\n\31'] = '\0'}, 'return {["\\127\\230\\255\\254\\128\\12\\0128\\n\\31"] = "\\0"}', 'non-ASCII or control characters in string key')
local x = {}
case({x, {x}, x}, [[
local _2 = {}
local _1 = {}
local _0 = {_1, _2, _1}
_2[1] = _1
return _0]], 'repeated table')
case({['end'] = true, ['false'] = false}, 'return {["false"] = false, ["end"] = true}', 'keywords as table keys')
case({1/0, -1/0, 0/0}, 'return {1/0, -1/0, 0/0}', 'representation of infinity and NaN')
print(failed .. ' tests failed')
print(succeeded .. ' tests succeeded')