mirrors/neovim
1
0
Fork 0
mirror of https://github.com/neovim/neovim.git synced 2026-03-06 09:07:15 +00:00
Code Issues Packages Projects Releases Wiki Activity

unittests: Add tests for tv_list_insert*()/…append*() functions

Browse Source
This commit is contained in:
ZyX
2016-09-17 04:25:49 +03:00
parent be360d8841
commit 9b8beaff02
2 changed files with 207 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
test/unit/eval/helpers.lua
View File

@@ -369,7 +369,7 @@ lua2typvalt = function(l, processed)
return typvalt(eval.VAR_STRING, {v_string=eval.xmemdupz(to_cstr(l), #l)})
elseif type(l) == 'cdata' then
local tv = typvalt(eval.VAR_UNKNOWN)
eval.copy_tv(l, tv)
eval.tv_copy(l, tv)
return tv
end
end
@@ -379,14 +379,28 @@ local function void(ptr)
return ffi.cast(void_ptr, ptr)
end
local function alloc_len(len, get_ptr)
if type(len) == 'string' or type(len) == 'table' then
return #len
elseif len == nil then
return eval.strlen(get_ptr())
else
return len
end
end
local alloc_logging_helpers = {
list = function(l) return {func='calloc', args={1, ffi.sizeof('list_T')}, ret=void(l)} end,
li = function(li) return {func='malloc', args={ffi.sizeof('listitem_T')}, ret=void(li)} end,
dict = function(d) return {func='malloc', args={ffi.sizeof('dict_T')}, ret=void(d)} end,
di = function(di, size)
size = alloc_len(size, function() return di.di_key end)
return {func='malloc', args={ffi.offsetof('dictitem_T', 'di_key') + size + 1}, ret=void(di)}
end,
str = function(s, size) return {func='malloc', args={size + 1}, ret=void(s)} end,
str = function(s, size)
size = alloc_len(size, function() return s end)
return {func='malloc', args={size + 1}, ret=void(s)}
end,
freed = function(p) return {func='free', args={type(p) == 'table' and p or void(p)}} end,
}

222
test/unit/eval/typval_spec.lua
View File

@@ -13,10 +13,14 @@ local a = eval_helpers.alloc_logging_helpers
local list = eval_helpers.list
local type_key = eval_helpers.type_key
local li_alloc = eval_helpers.li_alloc
local int_type = eval_helpers.int_type
local dict_type = eval_helpers.dict_type
local list_type = eval_helpers.list_type
local null_list = eval_helpers.null_list
local null_dict = eval_helpers.null_dict
local lua2typvalt = eval_helpers.lua2typvalt
local typvalt2lua = eval_helpers.typvalt2lua
local null_string = eval_helpers.null_string
local lib = cimport('./src/nvim/eval/typval.h', './src/nvim/memory.h')
@@ -367,43 +371,199 @@ describe('typval.c', function()
alloc_log:check({})
end)
end)
describe('insert()', function()
itp('works', function()
local l_tv = lua2typvalt({1, 2, 3, 4, 5, 6, 7})
local l = l_tv.vval.v_list
local lis = list_items(l)
local li
describe('insert', function()
describe('()', function()
itp('works', function()
local l_tv = lua2typvalt({1, 2, 3, 4, 5, 6, 7})
local l = l_tv.vval.v_list
local lis = list_items(l)
local li
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=100500}}
lib.tv_list_insert(l, li, nil)
eq(l.lv_last, li)
eq({1, 2, 3, 4, 5, 6, 7, 100500}, typvalt2lua(l_tv))
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=100500}}
lib.tv_list_insert(l, li, nil)
eq(l.lv_last, li)
eq({1, 2, 3, 4, 5, 6, 7, 100500}, typvalt2lua(l_tv))
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=0}}
lib.tv_list_insert(l, li, lis[1])
eq(l.lv_first, li)
eq({0, 1, 2, 3, 4, 5, 6, 7, 100500}, typvalt2lua(l_tv))
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=0}}
lib.tv_list_insert(l, li, lis[1])
eq(l.lv_first, li)
eq({0, 1, 2, 3, 4, 5, 6, 7, 100500}, typvalt2lua(l_tv))
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=4.5}}
lib.tv_list_insert(l, li, lis[5])
eq(list_items(l)[6], li)
eq({0, 1, 2, 3, 4, 4.5, 5, 6, 7, 100500}, typvalt2lua(l_tv))
li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=4.5}}
lib.tv_list_insert(l, li, lis[5])
eq(list_items(l)[6], li)
eq({0, 1, 2, 3, 4, 4.5, 5, 6, 7, 100500}, typvalt2lua(l_tv))
end)
itp('works with an empty list', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
eq(nil, l.lv_first)
eq(nil, l.lv_last)
local li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=100500}}
lib.tv_list_insert(l, li, nil)
eq(l.lv_last, li)
eq({100500}, typvalt2lua(l_tv))
end)
end)
itp('works with an empty list', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
describe('tv()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
eq(nil, l.lv_first)
eq(nil, l.lv_last)
local l_l_tv = lua2typvalt({[type_key]=list_type})
alloc_log:clear()
local l_l = l_l_tv.vval.v_list
eq(1, l_l.lv_refcount)
lib.tv_list_insert_tv(l, l_l_tv, nil)
eq(2, l_l.lv_refcount)
eq(l_l, l.lv_first.li_tv.vval.v_list)
alloc_log:check({
a.li(l.lv_first),
})
local li = li_alloc(true)
li.li_tv = {v_type=lib.VAR_FLOAT, vval={v_float=100500}}
lib.tv_list_insert(l, li, nil)
eq(l.lv_last, li)
eq({100500}, typvalt2lua(l_tv))
local l_s_tv = lua2typvalt('test')
alloc_log:check({
a.str(l_s_tv.vval.v_string, 'test'),
})
lib.tv_list_insert_tv(l, l_s_tv, l.lv_first)
alloc_log:check({
a.li(l.lv_first),
a.str(l.lv_first.li_tv.vval.v_string, 'test'),
})
eq({'test', {[type_key]=list_type}}, typvalt2lua(l_tv))
end)
end)
end)
describe('append', function()
describe('list()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
local l_l = list(1)
alloc_log:clear()
eq(1, l_l.lv_refcount)
lib.tv_list_append_list(l, l_l)
eq(2, l_l.lv_refcount)
eq(l_l, l.lv_first.li_tv.vval.v_list)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_list(l, nil)
alloc_log:check({
a.li(l.lv_last),
})
eq({{1}, null_list}, typvalt2lua(l_tv))
end)
end)
describe('dict()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
local l_d_tv = lua2typvalt({test=1})
local l_d = l_d_tv.vval.v_dict
alloc_log:clear()
eq(1, l_d.dv_refcount)
lib.tv_list_append_dict(l, l_d)
eq(2, l_d.dv_refcount)
eq(l_d, l.lv_first.li_tv.vval.v_list)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_dict(l, nil)
alloc_log:check({
a.li(l.lv_last),
})
eq({{test=1}, null_dict}, typvalt2lua(l_tv))
end)
end)
describe('string()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
alloc_log:clear()
lib.tv_list_append_string(l, 'test', 3)
alloc_log:check({
a.str(l.lv_last.li_tv.vval.v_string, 'tes'),
a.li(l.lv_last),
})
lib.tv_list_append_string(l, nil, 0)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_string(l, nil, -1)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_string(l, 'test', -1)
alloc_log:check({
a.str(l.lv_last.li_tv.vval.v_string, 'test'),
a.li(l.lv_last),
})
eq({'tes', null_string, null_string, 'test'}, typvalt2lua(l_tv))
end)
end)
describe('allocated string()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
local s = lib.xstrdup('test')
alloc_log:clear()
lib.tv_list_append_allocated_string(l, s)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_allocated_string(l, nil)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_allocated_string(l, nil)
alloc_log:check({
a.li(l.lv_last),
})
eq({'test', null_string, null_string}, typvalt2lua(l_tv))
end)
end)
describe('number()', function()
itp('works', function()
local l_tv = lua2typvalt({[type_key]=list_type})
local l = l_tv.vval.v_list
alloc_log:clear()
lib.tv_list_append_number(l, -100500)
alloc_log:check({
a.li(l.lv_last),
})
lib.tv_list_append_number(l, 100500)
alloc_log:check({
a.li(l.lv_last),
})
eq({{[type_key]=int_type, value=-100500},
{[type_key]=int_type, value=100500}}, typvalt2lua(l_tv))
end)
end)
end)
end)