您最多选择25个主题
主题必须以字母或数字开头，可以包含连字符 (-)，并且长度不得超过35个字符
304 行
9.0 KiB
304 行
9.0 KiB
--[[lua obj tool]]
|
|
luaobj = luaobj or {}
|
|
|
|
function luaobj.isobj(obj)
|
|
local meta = getmetatable(obj)
|
|
if meta ~= nil then
|
|
return meta.__is_co_meta or false
|
|
end
|
|
return false
|
|
end
|
|
|
|
function luaobj.getid(obj)
|
|
if luaobj.isobj(obj) then
|
|
return obj._iid, obj._cid
|
|
end
|
|
return 0, 0
|
|
end
|
|
|
|
function luaobj.getclasscountinfo( class_type )
|
|
local all_alloc_count = _in_obj_count_map[class_type]
|
|
local not_call_del_count = 0
|
|
local total_live_count = 0
|
|
|
|
for k, v in pairs(_in_obj_ins_map[class_type]) do
|
|
if not v._use_delete_method then
|
|
not_call_del_count = not_call_del_count + 1
|
|
end
|
|
|
|
total_live_count = total_live_count + 1
|
|
end
|
|
|
|
return total_live_count, not_call_del_count, all_alloc_count
|
|
end
|
|
|
|
_snap_luaobj_map = snap_luaobj_map or {}
|
|
function luaobj.memtool( action, extend )
|
|
local handle_content = action or "info"
|
|
local save_file = extend or "console"
|
|
|
|
local is_use_file = false
|
|
if save_file ~= "console" then
|
|
is_use_file = true
|
|
end
|
|
|
|
local open_write_func = function()
|
|
local tmp_file = nil
|
|
local out_func = print
|
|
if is_use_file then
|
|
tmp_file = io.open(save_file, "w+")
|
|
if tmp_file ~= nil then
|
|
out_func = function( ... )
|
|
tmp_file:write(...)
|
|
end
|
|
end
|
|
end
|
|
return tmp_file, out_func
|
|
end
|
|
|
|
local close_write_func = function(write_file)
|
|
if write_file ~= nil then
|
|
write_file:close()
|
|
end
|
|
end
|
|
|
|
|
|
if handle_content == "info" then
|
|
local tmp_file, out_func = open_write_func()
|
|
|
|
-- -- print("_in_index_Count = ",_in_index_Count)
|
|
|
|
local index = 0
|
|
-- for k,v in pairs(_in_ctype_map) do
|
|
-- t = Split(v._source,"/")
|
|
-- class_name = t[#t]
|
|
-- class_name = string.gsub(class_name,".lua","")
|
|
-- if class_name and LuaMemManager.Instance.agent_list[class_name] then
|
|
-- print("not delete agent_list = ",class_name)
|
|
-- index = index + 1
|
|
-- end
|
|
-- end
|
|
-- local class_name = ""
|
|
-- local t = nil
|
|
-- for class_name,v in pairs(LuaMemManager.Instance.agent_list) do
|
|
-- if class_name and _in_ctype_map[_G[class_name]] then
|
|
-- print("not delete agent_list = ",class_name)
|
|
-- index = index + 1
|
|
-- end
|
|
-- end
|
|
-- print("index = ",index)
|
|
|
|
-- local index = 0
|
|
-- -- for pro,v in pairs(_G) do
|
|
-- -- if LuaMemManager.Instance.notPreLoadGame_table[pro] then
|
|
-- -- print("_G pro=",pro)
|
|
-- -- index = index + 1
|
|
-- -- end
|
|
-- -- end
|
|
-- -- print("对象总数：",index)
|
|
-- for k,v in pairs(_in_ctype_map) do
|
|
-- local total_live, not_del_count, all_alloc_count = luaobj.getclasscountinfo(v)
|
|
-- -- if v._source then
|
|
-- -- -- print(v._source)
|
|
-- -- local t = Split(v._source,"/")
|
|
-- -- local class_name = t[#t]
|
|
-- -- class_name = string.gsub(class_name,".lua","")
|
|
-- -- if LuaMemManager.Instance.notPreLoadGame_table[class_name] then
|
|
-- if total_live > 10 then
|
|
-- -- if string.find(v._source,"SingleServiceBossEnterView") then
|
|
-- out_func(string.format("live num %4d, cid:%8d, not call del num:%4d, all alloc:%8d|src: %s[%d]\n",
|
|
-- total_live, k, not_del_count, all_alloc_count, v._source, v._cline))
|
|
-- index = index + 1
|
|
-- end
|
|
-- -- end
|
|
-- -- end
|
|
-- -- end
|
|
-- end
|
|
-- print("类对象总数：",index,"实例化对象总数：",_in_obj_ins_id)
|
|
-- close_write_func(tmp_file)
|
|
-- index = 0
|
|
for k,v in pairs(Config) do
|
|
-- if _in_index_count_map[k] and _in_index_count_map[k] > 10 then
|
|
-- if LuaMemManager.Instance.notPreLoadCfg_table[k] then
|
|
print("~~~~~~~~配置属性：",k)
|
|
index = index + 1
|
|
-- end
|
|
-- end
|
|
end
|
|
print("配置总数：",index)
|
|
|
|
elseif handle_content == "pmc" then
|
|
local tmp_file, out_func = open_write_func()
|
|
local index = 0
|
|
|
|
_test_baseclass_list = _test_baseclass_list or {}
|
|
local test_vo = nil
|
|
for k,v in pairs(_in_ctype_map) do
|
|
test_vo = _test_baseclass_list[k]
|
|
local total_live, not_del_count, all_alloc_count = luaobj.getclasscountinfo(v)
|
|
if test_vo then
|
|
total_live = total_live - test_vo.total_live
|
|
not_del_count = not_del_count - test_vo.not_del_count
|
|
all_alloc_count = all_alloc_count - test_vo.all_alloc_count
|
|
|
|
test_vo["total_live"] = total_live + test_vo.total_live
|
|
test_vo["not_del_count"] = not_del_count + test_vo.not_del_count
|
|
test_vo["all_alloc_count"] = all_alloc_count + test_vo.all_alloc_count
|
|
else
|
|
test_vo = {}
|
|
_test_baseclass_list[k] = test_vo
|
|
test_vo["total_live"] = total_live
|
|
test_vo["not_del_count"] = not_del_count
|
|
test_vo["all_alloc_count"] = all_alloc_count
|
|
end
|
|
if total_live ~= 0 or not_del_count ~= 0 or all_alloc_count ~= 0 then
|
|
out_func(string.format("此过程中创建的类对象src: %s[%d]增加了:%4d个,其中存活的 %2d个,没有调用deleteMe的:%2d个\n",
|
|
v._source, v._cline,all_alloc_count,total_live, not_del_count))
|
|
index = index + 1
|
|
end
|
|
end
|
|
print("类对象总数：",index)
|
|
index = 0
|
|
_test_config_list = _test_config_list or {}
|
|
for k,v in pairs(Config) do
|
|
if LuaMemManager.Instance.notPreLoadCfg_table[k] and _test_config_list[k] == nil then
|
|
print("~~~~~~~~配置属性：",k)
|
|
_test_config_list[k] = true
|
|
index = index + 1
|
|
else
|
|
_test_config_list[k] = nil
|
|
end
|
|
end
|
|
print("配置总数：",index)
|
|
elseif handle_content == "snap" then
|
|
_snap_luaobj_map = {}
|
|
for k,v in pairs(_in_ctype_map) do
|
|
local total_live, not_del_count, all_alloc_count = luaobj.getclasscountinfo(v)
|
|
_snap_luaobj_map[k] = total_live
|
|
end
|
|
|
|
|
|
print("Lua memory tools: handle snap action suc!")
|
|
elseif handle_content == "diff" then
|
|
local tmp_file, out_func = open_write_func()
|
|
|
|
for k,v in pairs(_in_ctype_map) do
|
|
local total_live, not_del_count, all_alloc_count = luaobj.getclasscountinfo(v)
|
|
local old_live_num = _snap_luaobj_map[k] or 0
|
|
if old_live_num < total_live then
|
|
out_func(string.format("add_num:%4d, cid:%8d | src: %s[%d]\n", total_live - old_live_num, k, v._source, v._cline))
|
|
end
|
|
end
|
|
|
|
close_write_func(tmp_file)
|
|
print("Lua memory tools: handle diff action suc!")
|
|
elseif handle_content == "search" then
|
|
if extend ~= nil then
|
|
for k,v in pairs(_in_ctype_map) do
|
|
if string.find(v._source, extend) ~= nil then
|
|
print(string.format("search class info: cid = %8d, source = %s[%d]\n", k, v._source, v._cline))
|
|
end
|
|
end
|
|
end
|
|
print("Lua memory tools: handle search action suc!")
|
|
elseif handle_content == "list" then
|
|
if extend ~= nil then
|
|
local val = tonumber(extend)
|
|
local ctype = _in_ctype_map[val]
|
|
if ctype ~= nil then
|
|
for k, v in pairs(_in_obj_ins_map[ctype]) do
|
|
print(string.format("list live obj: id = %8d, is_del = %d", k, v._use_delete_method and 1 or 0))
|
|
end
|
|
end
|
|
end
|
|
else
|
|
print("Lua memory tools: error args when call lua mem tool!")
|
|
end
|
|
end
|
|
|
|
--[[lua debug tool]]
|
|
luaobj_debug_tool = luaobj_debug_tool or {}
|
|
|
|
|
|
function luaobj_debug_tool.is_lua_class_type( obj )
|
|
return obj.__is_cc_type or false
|
|
end
|
|
|
|
function luaobj_debug_tool.get_lua_class_type_vtable( obj )
|
|
local meta = getmetatable(obj)
|
|
return meta.__index
|
|
end
|
|
|
|
function luaobj_debug_tool.detect_lua_obj_in_val( v, id, is_instance_id, path_desc, detect_list )
|
|
--print("now detect", v, path_desc)
|
|
local type_name = type(v)
|
|
if type_name == "table" then
|
|
if not detect_list[v] then
|
|
if luaobj.isobj(v) then
|
|
local new_path_desc = path_desc .."[luaobj]"
|
|
local obj_id, obj_cid = luaobj.getid(v)
|
|
if is_instance_id then
|
|
if obj_id == id then
|
|
print("Find Obj Path", path_desc)
|
|
end
|
|
else
|
|
if obj_cid == id then
|
|
print("Find Obj Path", path_desc)
|
|
end
|
|
end
|
|
|
|
local delegate_tbl = v
|
|
--print("delegate table is:")
|
|
--PrintTable(delegate_tbl)
|
|
luaobj_debug_tool.search_obj_in_table(delegate_tbl, id, is_instance_id, new_path_desc, detect_list)
|
|
detect_list[v] = true
|
|
else
|
|
luaobj_debug_tool.search_obj_in_table(v, id, is_instance_id, path_desc, detect_list)
|
|
|
|
if luaobj_debug_tool.is_lua_class_type(v) then
|
|
luaobj_debug_tool.search_obj_in_table(luaobj_debug_tool.get_lua_class_type_vtable(v), id, is_instance_id, path_desc, detect_list)
|
|
end
|
|
end
|
|
end
|
|
elseif type_name == "function" then
|
|
detect_list[v] = true
|
|
local func_path_desc = path_desc .. "[function]"
|
|
local up_index = 1
|
|
while true do
|
|
local up_val_name, up_val = debug.getupvalue(v, up_index)
|
|
|
|
if up_val == nil then
|
|
break
|
|
end
|
|
|
|
|
|
local new_path_desc = func_path_desc .. "->[up(" .. up_val_name .. ")]"
|
|
|
|
--print("up value detect", new_path_desc)
|
|
|
|
luaobj_debug_tool.detect_lua_obj_in_val(up_val, id, is_instance_id, new_path_desc, detect_list)
|
|
|
|
up_index = up_index + 1
|
|
end
|
|
|
|
end
|
|
end
|
|
|
|
function luaobj_debug_tool.search_obj_in_table( tbl, id, is_instance_id, path_desc, detect_list)
|
|
--print("now detect", tbl, path_desc)
|
|
-- body
|
|
if detect_list[tbl] then
|
|
return
|
|
end
|
|
detect_list[tbl] = true
|
|
|
|
for k, v in pairs(tbl) do
|
|
--io.stderr:write(tostring(k))
|
|
local new_path_desc = path_desc .. "->" .. tostring(k)
|
|
|
|
luaobj_debug_tool.detect_lua_obj_in_val(v, id, is_instance_id, new_path_desc, detect_list)
|
|
|
|
new_path_desc = path_desc .. "->[key]" .. tostring(k)
|
|
luaobj_debug_tool.detect_lua_obj_in_val(k, id, is_instance_id, new_path_desc, detect_list)
|
|
end
|
|
end
|