mirror of
https://github.com/ctruLua/ctruLua.git
synced 2025-10-28 16:59:30 +00:00
29 lines
770 B
Lua
29 lines
770 B
Lua
local zlib = require"zlib"
|
|
|
|
local dataToDeflate = {}
|
|
print("Generating test data...")
|
|
for i = 0, 10000 do
|
|
table.insert(dataToDeflate, string.sub(tostring(math.random()), 3))
|
|
end
|
|
dataToDeflate = table.concat(dataToDeflate)
|
|
|
|
print("Length of data to deflate", #dataToDeflate)
|
|
|
|
local buffer = {}
|
|
local func = function(data)
|
|
table.insert(buffer, data)
|
|
end
|
|
|
|
stream = zlib.deflate(func) --best compression, deflated
|
|
stream:write(dataToDeflate)
|
|
--stream:flush("sync")
|
|
--stream:flush()
|
|
stream:close()
|
|
|
|
--local deflatedData = string.sub(table.concat(buffer), 3) -- needed for IE
|
|
local deflatedData = table.concat(buffer)
|
|
print(#deflatedData)
|
|
|
|
streamIn = zlib.inflate(deflatedData)
|
|
local inflatedData = streamIn:read()
|
|
assert(dataToDeflate == inflatedData)
|