Hyperion/HyperionOS
6
1
Fork 1
Code Issues Pull Requests Actions Packages Projects Releases 7 Wiki Activity

Update install/data/tarbad

Browse Source
This commit is contained in:
Astronand
2026-03-12 11:56:58 -04:00
parent 5e3cdbe40c
commit 08323e00ff
1 changed files with 20 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
install/data/tarbad
View File

@@ -98,29 +98,30 @@ local function unpack_tar(tarstr)
local pad = (512 - (size % 512)) % 512 local pad = (512 - (size % 512)) % 512
i = i + size + pad i = i + size + pad
if name == "" then goto continue end if name ~= "" then
local is_dir = typeflag == "5" or name:sub(-1) == "/" local is_dir = typeflag == "5" or name:sub(-1) == "/
local clean_name = name:gsub("/$", "")
local clean_name = name:gsub("/$", "") if clean_name ~= "" then
if clean_name == "" then goto continue end
local parent_path = clean_name:match("(.+)/") local parent_path = clean_name:match("(.+)/")
local fname = clean_name:match("([^/]+)$") local fname = clean_name:match("([^/]+)$")
if not fname then goto continue end if not fname then
local parent = root local parent = root
if parent_path then if parent_path then
parent = make_dirs(root, parent_path .. "/") parent = make_dirs(root, parent_path .. "/")
end
if is_dir then
parent[fname] = parent[fname] or { __type = "dir", __entries = {} }
else
parent[fname] = { __type = "file", __contents = contents }
end
end
end
end end
if is_dir then
parent[fname] = parent[fname] or { __type = "dir", __entries = {} }
else
parent[fname] = { __type = "file", __contents = contents }
end
::continue::
end end
return flatten(root) return flatten(root)