140 lines
2.5 KiB
Lua
140 lines
2.5 KiB
Lua
|
local _class = {}
|
||
|
|
local _super = {}
|
||
|
|
local api = {}
|
||
|
|
local _weaktb = {}
|
||
|
|
local _weakcnt = 0
|
||
|
|
setmetatable(_weaktb,{__mode="k"})
|
||
|
|
|
||
|
|
function api.show()
|
||
|
|
local cnt = 0
|
||
|
|
for tb,__ in pairs(_weaktb) do
|
||
|
|
cnt = cnt + 1
|
||
|
|
end
|
||
|
|
log.info("class obj len:",cnt)
|
||
|
|
log.info("class max cnt:",_weakcnt)
|
||
|
|
end
|
||
|
|
|
||
|
|
function api.class(super)
|
||
|
|
local class_type = {}
|
||
|
|
class_type.ctor=false
|
||
|
|
class_type.super=super
|
||
|
|
class_type.new=function(...)
|
||
|
|
local obj={}
|
||
|
|
do
|
||
|
|
local create
|
||
|
|
create=function(c,...)
|
||
|
|
if c.super then
|
||
|
|
create(c.super,...)
|
||
|
|
end
|
||
|
|
if c.ctor then
|
||
|
|
c.ctor(obj,...)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
create(class_type,...)
|
||
|
|
end
|
||
|
|
setmetatable(obj,
|
||
|
|
{
|
||
|
|
__index=_class[class_type],
|
||
|
|
})
|
||
|
|
--obj.super = _class[super]
|
||
|
|
_weakcnt = _weakcnt + 1
|
||
|
|
_weaktb[obj] = _weakcnt
|
||
|
|
return obj
|
||
|
|
end
|
||
|
|
local vtbl={}
|
||
|
|
_class[class_type]=vtbl
|
||
|
|
|
||
|
|
setmetatable(class_type,{__newindex=
|
||
|
|
function(t,k,v)
|
||
|
|
vtbl[k]=v
|
||
|
|
end,
|
||
|
|
__index=vtbl,
|
||
|
|
})
|
||
|
|
|
||
|
|
if super then
|
||
|
|
_super[vtbl]={}
|
||
|
|
setmetatable(vtbl,{__index=
|
||
|
|
function(t,k)
|
||
|
|
local ret=_class[super][k]
|
||
|
|
vtbl[k]=ret
|
||
|
|
_super[vtbl][k]=ret
|
||
|
|
return ret
|
||
|
|
end
|
||
|
|
})
|
||
|
|
end
|
||
|
|
|
||
|
|
return class_type
|
||
|
|
end
|
||
|
|
|
||
|
|
|
||
|
|
function api.hotfix_super(old_t,vtbl_o)
|
||
|
|
for k,v in pairs(_class) do
|
||
|
|
if k.super == old_t then
|
||
|
|
for super_k,super_v in pairs(vtbl_o) do
|
||
|
|
if _super[v] ~= nil and _super[v][super_k] ~= nil then
|
||
|
|
v[super_k] = super_v
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
api.hotfix_super(k,v)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
function api.hotfix(old_obj,new_obj)
|
||
|
|
if type(old_obj)~="table" or type(new_obj) ~="table" then
|
||
|
|
return
|
||
|
|
end
|
||
|
|
local vtbl_o = _class[old_obj]
|
||
|
|
local vtbl_n = _class[new_obj]
|
||
|
|
if vtbl_o ~= nil and vtbl_n ~= nil then
|
||
|
|
for k,v in pairs(vtbl_n) do
|
||
|
|
vtbl_o[k] = v
|
||
|
|
end
|
||
|
|
|
||
|
|
for k,v in pairs(new_obj) do
|
||
|
|
if k ~="new" and k ~= "super" then
|
||
|
|
old_obj[k] = v
|
||
|
|
end
|
||
|
|
end
|
||
|
|
api.hotfix_super(old_obj,vtbl_o)
|
||
|
|
else
|
||
|
|
for k,v in pairs(new_obj) do
|
||
|
|
old_obj[k] = v
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
_class[new_obj] = nil
|
||
|
|
end
|
||
|
|
|
||
|
|
function api.require_handler(handlers)
|
||
|
|
for _,v in ipairs(handlers) do
|
||
|
|
package.loaded[v] = nil
|
||
|
|
require(v)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
function api.require_module(modules)
|
||
|
|
for _,v in ipairs(modules) do
|
||
|
|
local new_module = nil
|
||
|
|
local old_module = package.loaded[v]
|
||
|
|
if old_module == nil then
|
||
|
|
new_module = require(v)
|
||
|
|
else
|
||
|
|
package.loaded[v] = nil
|
||
|
|
local ret,new_module = pcall(require,v)
|
||
|
|
if ret and new_module then
|
||
|
|
api.hotfix(old_module,new_module)
|
||
|
|
else
|
||
|
|
log.info("error exist in file:",v,ret,new_module)
|
||
|
|
end
|
||
|
|
package.loaded[v] = old_module
|
||
|
|
end
|
||
|
|
old_module = nil
|
||
|
|
new_module = nil
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
|
||
|
|
return api
|