lua 테이블에서 파일로 정렬하기

2189 단어
선상 부호
function luautil.serialize(t, sort_parent, sort_child)
	local mark={}
	local assign={}
	
	local function ser_table(tbl,parent)
		mark[tbl]=parent
		local tmp={}
		local sortList = {};
		for k,v in pairs(tbl) do
			sortList[#sortList + 1] = {key=k, value=v};
		end

		if tostring(parent) == "ret" then
			if sort_parent then table.sort(sortList, sort_parent); end
		else
			if sort_child then table.sort(sortList, sort_child); end
		end

		for i = 1, #sortList do
			local info = sortList[i];
			local k = info.key;
			local v = info.value;
			local key= type(k)=="number" and "["..k.."]" or k;
			if type(v)=="table" then
				local dotkey= parent..(type(k)=="number" and key or "."..key)
				if mark[v] then
					table.insert(assign,dotkey.."="..mark[v])
				else
					table.insert(tmp, "
"..key.."="..ser_table(v,dotkey)) end else if type(v) == "string" then table.insert(tmp, key..'="'..v..'"'); else table.insert(tmp, key.."="..tostring(v)); end end end return "{"..table.concat(tmp,",").."}"; end return "do local ret=

"..ser_table(t,"ret")..table.concat(assign," ").."

return ret end" end function luautil.split(str, delimiter) if (delimiter=='') then return false end local pos,arr = 0, {} -- for each divider found for st,sp in function() return string.find(str, delimiter, pos, true) end do table.insert(arr, string.sub(str, pos, st - 1)) pos = sp + 1 end table.insert(arr, string.sub(str, pos)) return arr end function luautil.writefile(str, file) os.remove(file); local file=io.open(file,"ab"); local len = string.len(str); local tbl = luautil.split(str, "
"); for i = 1, #tbl do file:write(tbl[i].."
"); end file:close(); end

1. 기초 기능은 구름바람 초기의 코드를 베낀다.여기에 정렬 기능을 약간 추가하여 정렬 함수를 전송할 수 있습니다. 그렇지 않으면 테이블이 해시에 따라 정렬되어 출력된 후에 혼란스러워집니다.
2. writefile 함수를 추가했습니다. 루아의 파일 쓰기는 최대 바이트 수 제한이 있기 때문에 한 줄 한 줄 쓰기입니다.

좋은 웹페이지 즐겨찾기