用lua将xml文件转成lua文件配置

最新推荐文章于 2024-08-23 08:27:14 发布

置顶

帅气的小子

最新推荐文章于 2024-08-23 08:27:14 发布

阅读量1.5w

点赞数 5

分类专栏：程序技术文件预处理文章标签： lua xml

本文链接：https://blog.csdn.net/u011273264/article/details/50921216

版权

本文介绍了如何使用lua处理XML配置文件，通过luafilesystem库将XML转换为可直接读写的lua文件，便于在lua程序中调用。文章提供了一段lua代码示例，并详细说明了luaRocks的安装及luafilesystem的部署过程。

摘要由CSDN通过智能技术生成

这几天刚接到一个任务：要将xml配置文件转成可以直接读写的lua文件，方便在lua程序中直接调用，废话不多说直接上代码

(xmZMlua.lua文件)

saveDirPath = "/xxx/"   --- 保存转好的lua文件路劲(其中xxx代表的是路径，下同)
xmlDirPath  = "/xxx/" --- 待转的xml文件路径
require "lfs" 
function SaveTableContent(file, obj)
      local szType = type(obj);
      if szType == "number" then
            file:write(obj);
      elseif szType == "string" then
            file:write(string.format("%q", obj));
      elseif szType == "table" then
            --把table的内容格式化写入文件
            -- print(obj.nodeFlag)
            if obj.nodeFlag ~= nil then
                if obj:numProperties() == 0 and obj:numChildren() == 0 then 
                    SaveTableContent(file, obj:value() or "");
                else
                    file:write("{");
                    if obj:numProperties() ~= 0 then
                        -- print(obj)
                        file:write("[\"$\"]={");
                        local pTable = {}
                        local properties = obj:properties()
                        for i=1, #properties do
                           local propertie = properties[i]
                            local propertieName  = propertie.name
                            local propertieValue = propertie.value
                            -- print("")
                                file:write("[");
                                SaveTableContent(file, propertieName);
                                file:write("]=");
                                SaveTableContent(file, propertieValue);
                                if i ~= #properties then file:write(", ") end


                        end
                        file:write("}");
                        if obj:numChildren() ~= 0 then file:write(",") end
                    end
                    if obj:numChildren() ~= 0 then
                         -- print("numChildren:"..tostring(obj:numChildren()))
                        local allChildrenTable = {}
                        local children = obj:children()
                        local nextChildName = ""
                        local lastChildName = ""
                        for i=1,obj:numChildren() do
                            local child = children[i]     
                            nextChildName = child:name()
                            -- print("lastChildName1-----------:"..lastChildName)
                            if nextChildName ~= lastChildName then
                                -- print("lastChildName2-----------:"..lastChildName)
                                allChildrenTable[nextChildName] = {}
                                lastChildName = nextChildName
                                -- print("lastChildName4-----------:"..lastChildName)
                            end