apisix/t/core/table.t

80 lines
2.2 KiB
Perl

#
# Licensed to the Apache Software Foundation (ASF) under one or more
# contributor license agreements. See the NOTICE file distributed with
# this work for additional information regarding copyright ownership.
# The ASF licenses this file to You under the Apache License, Version 2.0
# (the "License"); you may not use this file except in compliance with
# the License. You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
use t::APISIX 'no_plan';
repeat_each(2);
no_long_string();
no_root_location();
run_tests;
__DATA__
=== TEST 1: sanity
--- config
location /t {
content_by_lua_block {
local core = require("apisix.core")
local t = {"first"}
core.table.insert_tail(t, 'a', 1, true)
ngx.say("encode: ", core.json.encode(t))
core.table.set(t, 'a', 1, true)
ngx.say("encode: ", core.json.encode(t))
}
}
--- request
GET /t
--- response_body
encode: ["first","a",1,true]
encode: ["a",1,true,true]
--- no_error_log
[error]
=== TEST 2: deepcopy
--- config
location /t {
content_by_lua_block {
local core = require("apisix.core")
local deepcopy = core.table.deepcopy
local cases = {
{t = {1, 2, a = {2, 3}}},
{t = {{a = b}, 2, true}},
{t = {{a = b}, {{a = c}, {}, 1}, true}},
}
for _, case in ipairs(cases) do
local t = case.t
local actual = core.json.encode(deepcopy(t))
local expect = core.json.encode(t)
if actual ~= expect then
ngx.say("expect ", expect, ", actual ", actual)
return
end
end
ngx.say("ok")
}
}
--- request
GET /t
--- response_body
ok
--- no_error_log
[error]