Zip file question

cos00kun

Hi..
Can I send any table from within the file into a zip file as a file?
for example;

local compression = require "compression"
local archive = compression.Zip("new_archive.zip", "write")
archive:write("addme.txt")

this code puts "addme.txt" file into our new_archive.zip.
but I want it to print the text in the "addme.txt" file and transfer it to new_archive.zip as a file (for example; "Hi all how are you?" text) . so I want to send the code from within our program. Is it possible?

Samir

Hi Coskun,

Not sure ta have understood your question.
Are you asking if it's possible to change a file entry content from an Zip archive ?

cos00kun

No, I didn't mean that. Sorry for not explaining properly.
With archive:write("addme.txt") we put an existing file in *.zip but this is not what I want;
For example, I want to put a text like "bla bla bla bla...." into the "addme.txt" file and put this "addme.txt" file in *.zip. Of course, first the "addme.txt" file
file = io.open (filename)
method and then put it in *.zip file with above method but I don't use "file = io.open (filename)" but directly put "bla bla bla bla bla...." into "addme.txt" file *. I want to put it in zip.

It's a difficult subject to explain, if you don't understand, forget it 🙂

cos00kun

Samir

cos00kun Also, if there is a folder inside the zip file, how can I add a file inside that folder?

For this question, just use the wanted path as second argument of the Zip:write() function

Samir

For the first question, you can do that by using a Buffer object as first argument in the Zip:write() method:

archive:write(sys.Buffer("Put here any text content"),  "file.txt")

cos00kun

Samir
ok

["offline"] = 
        {
            ["conditions"] = 
            {
            }, 
            ["actions"] = 
            {
            }, 
            ["func"] = 
            {
            }, 
        }

So how do we place such a table as a buffer in the file?

Samir

Hi Coskun,

You will need to serialize first your table to a string.
For that, you can use the json module and then json.encode() with your table as argument to encode it to a json string

cos00kun

hmm okey [Login to see the link]

Samir

Hi Coskun,

Did you manage to do what you wanted ?

cos00kun

yes, but i found another way. 🙂

cos00kun

I handle it by writing and reading the file like this. I can then zip it into the file.

function Formatted(_Table)

    local Ram, Stack, Out = {},{},{}
    local Space = 1
    local FormattedOutput = "DosyaDataTablosu=\n{\n"

    while true do
        local Size = 0
        for i,j in pairs(_Table) do
            Size = Size + 1
        end
	
        local CurrentIndex = 1
        for i,j in pairs(_Table) do
            if (Ram[_Table] == nil) or (CurrentIndex >= Ram[_Table]) then

                if (string.find(FormattedOutput,"}",FormattedOutput:len())) then
                    FormattedOutput = FormattedOutput .. ",\n"
                elseif not (string.find(FormattedOutput,"\n",FormattedOutput:len())) then
                    FormattedOutput = FormattedOutput .. "\n"
                end

                table.insert(Out,FormattedOutput)
                FormattedOutput = ""

                local key
                if (type(i) == "number" or type(i) == "boolean") then
                    key = "["..tostring(i).."]"
                else
                    key = "[\""..tostring(i).."\"]"
                end

                if (type(j) == "number" or type(j) == "boolean") then
                    FormattedOutput = FormattedOutput .. string.rep('\t',Space) .. key .. " = "..tostring(j)
                elseif (type(j) == "table") then
                    FormattedOutput = FormattedOutput .. string.rep('\t',Space) .. key .. " =\n"
                    FormattedOutput = FormattedOutput .. string.rep('\t',Space) .. "{\n"					
                    table.insert(Stack,_Table)
                    table.insert(Stack,j)
                    Ram[_Table] = CurrentIndex+1
                    break
                else
                    FormattedOutput = FormattedOutput .. string.rep('\t',Space) .. key .. " = \""..tostring(j).."\""
                end

                if (CurrentIndex == Size) then
                    FormattedOutput = FormattedOutput .. "\n" .. string.rep('\t',Space-1) .. "}"
                else
                    FormattedOutput = FormattedOutput .. ","
                end
            else
                -- close the table
                if (CurrentIndex == Size) then
                    FormattedOutput = FormattedOutput .. "\n" .. string.rep('\t',Space-1) .. "}"
                end
            end

            CurrentIndex = CurrentIndex + 1
        end

        if (Size == 0) then
            FormattedOutput = FormattedOutput .. "\n" .. string.rep('\t',Space-1) .. "}"
        end

        if (#Stack > 0) then
            _Table = Stack[#Stack]
            Stack[#Stack] = nil
            Space = Ram[_Table] == nil and Space + 1 or Space - 1
        else
            break
        end
    end
	
    table.insert(Out,FormattedOutput)
    FormattedOutput = table.concat(Out)
    return FormattedOutput
end

function FileSave()
	local file= io.open(FileData, "w") 
	file:write(Formatted(DosyaDataTablosu))
	file:close()
end

function FileRead()
	local file= io.open(FileData, "r")
	if (file~=nil) then
		dofile(FileData)
		file:close()			
	end
end

cos00kun

I don't know much about json. Maybe if it was a simple example I could have done it differently.

Samir

What you have done is to construct a string which contains the Lua table (it's a serialization process).
Using dofile() on external data might be dangerous as it can run any Lua code.

I will post an example using JSON serialization, you will see it's very simple 😉

cos00kun

Samir
🙏🙏🙏🙏

cos00kun

Samir I will post an example using JSON serialization,

I'm looking forward to this. 🙏🙏🙏

Samir

Sorry for the wait !
Using your previous example, you can do this :

local json = require "json"

function FileSave()
	local file = sys.File(FileData, "write")
	file:write(json.encode(DosyaDataTablosu))
end

function FileRead()
	local file = sys.File(FileData)
	DosyaDataTablosu = json.decode(file:read()) 		
end

cos00kun

this has been perfect for me. 🙂 Thank you again.
I also hope that the conflicts in France will end as soon as possible and everything will return to normal..🙏🙏🙏

cos00kun

This is how it worked and that's the feature I was looking for. 🙂

local json = require "json"
local array = { 1, 2, 3, "Hello !" }

function FileSave()
	local file = sys.File("FileData")
	file:open("write")
	file:write(json.encode(array))
end

function FileRead()
	local file = sys.File("FileData")
	file:open("read")
	copyArray= json.decode(file:read()) 		
end

FileSave()  -- or  FileRead()