lua中基類和“繼承機制”

基類：基類定義了所有對於派生類來說普通的屬性和方法，派生類從基類繼承所需的屬性和方法，且在派生類中增加新的屬性和方法。

繼承：繼承是Ｃ＋＋語言的一種重要機制，它允許在已定義的類的基礎上產生新類。

 

lua基類和C++基類極為相似，但是lua中卻沒有繼承這一說，更沒有所謂的派生類。lua只能通過一種行為（元表）來模擬C++繼承這一方法。

元表：lua中提供的元表是用於幫助lua數據變量完成某些非預定義功能的個性化行為，當它做某一種操作，然而self表中卻沒有定義實現這種操作的方法，那么為了實現這一操作便會去元表中找實現這一操作的方法。

如果每一層的元表都定義一種方法指向上一層要“繼承”的lua表，這樣是不是就和C++繼承一樣了，有木有！

元方法：C++中的繼承不會改變語言的常規行為。但是lua中卻提供了一種可以改變table行為的方法，有兩種可以改變的table行為：（__index元方法）查詢table及（ __newindex元方法）修改table中不存在的字段

（1）__index元方法：當對元表中不存在的字段進行訪問時，得到的結果為nil。通過定義這個元表的__index，那個訪問結果將由這個方法決定。

這個方法也是“繼承”父類的方法。

（2）__newindex元方法：當對元表中不存在的字段進行賦值時，解釋器會先找到這個元表的__newindex，如果有就調用它，對__newindex指向的表進行賦值操作， 如果沒有才對self表進行賦值。

--保存類類型的虛表
local _class = {}

GLOBAL_OBJ_COUNT = {}
ENABLE_OBJ_COUNT = 0

function FindClassName(target, depth)
    for key,value in pairs(_G) do
        if value == target then
            return key
        end
    end
end

function ClasCountRetain(c)
    local key = FindClassName(c)
    if GLOBAL_OBJ_COUNT[key] == nil then
        GLOBAL_OBJ_COUNT[key] = 1
    else
        GLOBAL_OBJ_COUNT[key] = GLOBAL_OBJ_COUNT[key] + 1
    end
end

function ClasCountRelease(c)
    local key = FindClassName(c)
    if GLOBAL_OBJ_COUNT[key] == nil then
        GLOBAL_OBJ_COUNT[key] = -100000--標識異常
    else
        GLOBAL_OBJ_COUNT[key] = GLOBAL_OBJ_COUNT[key] - 1
    end
end




function PrintLuaClassCount( ... )
    print("PrintLuaClassCount.............")
    for key,value in pairs(GLOBAL_OBJ_COUNT) do
        print("PrintLuaClassCount:"..key..":",value)
    end
end


function BaseClass(super)

    -- 生成一個類類型
    local class_type = {}
    -- 在創建對象的時候自動調用
    class_type.__init = false
    class_type.__delete = false
    class_type.super = super

    class_type.New = function(...)           --定義New成員方法
        -- 生成一個類對象
        local obj = {}
        obj._class_type = class_type

        -- 在初始化之前注冊基類方法
        setmetatable(obj, { __index = _class[class_type] })

        -- 調用初始化方法
        do
            local create 
            create = function(c, ...)         
                if c.super then
                    create(c.super, ...)      --對所有基類都進行init
                end
                if ENABLE_OBJ_COUNT ~= 0 then
                    ClasCountRetain(c)
                end
                if c.__init then
                    c.__init(obj, ...)
                end
            end

            create(class_type, ...)
        end

        -- 注冊一個delete方法
        obj.DeleteMe = function(self)
            local now_super = self._class_type 
            while now_super ~= nil do
                if ENABLE_OBJ_COUNT ~= 0 then
                    ClasCountRelease(now_super)
                end    
                if now_super.__delete then
                    now_super.__delete(self)        --對所有基類都進行delete
                end
                now_super = now_super.super
            end
        end

        return obj
    end

    local vtbl = {}
    _class[class_type] = vtbl    

    setmetatable(class_type, {__newindex =
        function(t,k,v)
            vtbl[k] = v                      --賦值操作時self找不到的字段則對vtbl表賦值
        end
        , 
        __index = vtbl, --For call parent method
    })

    if super then
        setmetatable(vtbl, {__index =       --元表做“繼承”操作
            function(t,k)
                local ret = _class[super][k]
                return ret
            end
        })
    end

    return class_type
end