lua 文件编译相关工具

 -- 编译一个代码文件
 -- loadfile (lua_State *L, const char *filename);
 -- 将一个文件加载为lua代码块,仅编译不执行,返回值为编译后的
 -- 代码块函数和错误信息。
 function COMPILE(file)
     local fun, err = loadfile(file);
     return fun;
 end

 -- 编译并运行一个代码文件
 function LOAD_RUN(file)
     return require(file);
 end

 -- 载入一个目录下的所有代码文件(list.lua指明了有哪些文件)
 function LOAD_PATH(path)
     -- 取得list.lua的地址
     local listPath = path .. "/" .. "list";

     -- 加载list，需要加载的所有文件名字
     local fileNames = LOAD_RUN(listPath);

     -- 进行加载
     local file = {};
     for i = , #fileNames do
         local bin = path .. "/" .. fileNames[i];
         file[fileNames[i]] = LOAD_RUN(bin);
     end
     return file;
 end

 -- 卸载目录下的所有文件
 function UNLOAD_PATH(path)
    local listPath  = path .. "/" .. "list";
    local fileNames = LOAD_RUN(listPath);
    local file = {};
    for i = , #fileNames do
         -- 设置已经被加载的fileNames[i]为空
        package.loaded[path .. "/" .. fileNames[i]] = nil;
    end

    -- 回收内存（"collect"做一次完整的垃圾收集循环）
    collectgarbage("collect");
 end

 -- 重新载入某个文件
 function update(file)
     local pos = string.find(file,"[^%/.]*$");
     local module_name = string.sub(file, pos);
     local mod = package.loaded[module_name];
     if not mod then
         mod = package.loaded[module_name.."M"];
     end

     -- 若该文件为模块，且存在 destruct 方法，则先调用析构方法，再重新加载
     if type(mod) == "table" and type(mod.destruct) == "function" then
         mod.destruct();
     end

     package.loaded[file] = false;
     local ret = require(file);

     mod = package.loaded[module_name];
     if not mod then
         mod = package.loaded[module_name.."M"];
     end

     -- 若该文件为模块，且存在 destruct 方法，则先调用析构方法，再重新加载
     if type(mod) == "table" and type(mod.init) == "function" then
         mod.init();
     end

     -- 回收垃圾
     -- 无须开启 gc，否则会导致客户端启动速度变慢，见 SLIMEC-7396
     --collectgarbage("collect");
     return ret;
 end

 -- 使用代码更新指定文件
 function updateByScript(file, script)
     local pos = string.find(file,"[^%/.]*$");
     local module_name = string.sub(file, pos);
     local mod = package.loaded[module_name];
     if not mod then
         mod = package.loaded[module_name.."M"];
     end

     -- 若该文件为模块，且存在 destruct 方法，则先调用析构方法，再重新加载
     if type(mod) == "table" and type(mod.destruct) == "function" then
         mod.destruct();
     end
     package.loaded[file] = false;

     -- 载入
     local ret = loadstring(script)();

     -- 若该文件为模块，且存在 destruct 方法，则先调用析构方法，再重新加载
     mod = package.loaded[module_name];
     if not mod then
         mod = package.loaded[module_name.."M"];
     end

     if type(mod) == "table" and type(mod.init) == "function" then
         mod.init();
     end

     -- 回收垃圾
     --collectgarbage("collect");

     return ret;
 end

 -- 重新载入一个目录下的所有代码文件(list.lua指明了有哪些文件)
 function RRLOAD_PATH(path)
     local listPath  = path .. "/" .. "list";
     local fileNames = LOAD_RUN(listPath);
     local file      = {};
     for i = , #fileNames do
         package.loaded[path .. "/" .. fileNames[i]] = nil;
         local bin = update(path .. "/" .. fileNames[i]);
         file[fileNames[i]] = bin;
     end
     return file;
 end

complier