spsf/HyperionOS
1
0
Fork 0
forked from Hyperion/HyperionOS
Code Pull Requests 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

39
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("/$", "")
if clean_name ~= "" then
local clean_name = name:gsub("/$", "") local parent_path = clean_name:match("(.+)/")
if clean_name == "" then goto continue end local fname = clean_name:match("([^/]+)$")
if not fname then
local parent_path = clean_name:match("(.+)/") local parent = root
local fname = clean_name:match("([^/]+)$") if parent_path then
if not fname then goto continue end parent = make_dirs(root, parent_path .. "/")
end
local parent = root
if parent_path then if is_dir then
parent = make_dirs(root, parent_path .. "/") 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)