52 lines
1.1 KiB
Lua
52 lines
1.1 KiB
Lua
local romfs = {}
|
|
local arc = {}
|
|
|
|
local function readint(r, n)
|
|
return string.unpack("<i"..n, r(n))
|
|
end
|
|
|
|
function romfs.read(read, seek, close)
|
|
if read(7) ~= "romfs\1\0" then error("Invalid romfs") end
|
|
local tbl = {}
|
|
local lname
|
|
while lname ~= "TRAILER!!!" do
|
|
local name = read(readint(read, 1))
|
|
local fsize = readint(read, 2)
|
|
local exec = read(1)
|
|
tbl[#tbl+1] = {name = name, size = size, exec = exec == "x", pos = seek(0)}
|
|
seek(fsize)
|
|
end
|
|
tbl[#tbl] = nil
|
|
return setmetatable({tbl=tbl, read=read,seek=seek, close=close}, {__index=arc})
|
|
end
|
|
|
|
function arc:fetch(path)
|
|
for i=1, #self.tbl do
|
|
if self.tbl[i].name == path then
|
|
self.seek(self.tbl[i].pos-self.seek(0))
|
|
return self.read(self.tbl[i].size)
|
|
end
|
|
end
|
|
return nil, "file not found"
|
|
end
|
|
|
|
function arc:close()
|
|
self.close()
|
|
self.tbl = nil
|
|
self.read = nil
|
|
self.seek= nil
|
|
self.close = nil
|
|
end
|
|
|
|
function arc:list_dir(path)
|
|
if path:sub(#path) ~= "/" then path = path .. "/" end
|
|
local ent = {}
|
|
for i=1, #self.tbl do
|
|
if (self.tbl[i].name:sub(1, #path) == path and not self.tbl[i].name:find("/", #path+1, false)) then
|
|
ent[#ent+1] = self.tbl[i].name
|
|
end
|
|
end
|
|
return ent
|
|
end
|
|
|
|
return romfs |