Files
opus-apps/shellex/apis/filesystem.lua
2020-05-27 14:49:51 -06:00

75 lines
1.6 KiB
Lua

local fs = _G.fs
local function get(path)
while not fs.exists(path) do
path = fs.getDir(path)
end
if fs.exists(path) then
local proxy = {
getLabel = function() return fs.getDrive(path) end,
isReadOnly = function() return fs.isReadOnly(path) end,
spaceTotal = function() return fs.getSize(path, true) + fs.getFreeSpace(path) end,
spaceUsed = function() return fs.getSize(path, true) end,
}
return proxy, path
end
end
local function mounts()
local t = {
[ fs.getDrive('/') ] = '/'
}
for _,path in pairs(fs.list('/')) do
local label = fs.getDrive(path)
if not t[label] then
t[label] = path
end
end
return function()
local label, path = next(t)
if label then
t[label] = nil
return get(path)
end
end
end
local function list(path)
local success, set = pcall(fs.list, path)
if success then
return function()
local key, value = next(set)
set[key or false] = nil
return value
end
end
return success, set
end
return {
canonical = function(...) return ... end,
concat = fs.combine,
copy = function(...) fs.copy(...) return true end,
exists = fs.exists,
get = get,
isDirectory = fs.isDir,
isLink = function() return false end,
link = function(s, t) return fs.mount(t, 'linkfs', s) end,
list = list,
makeDirectory = fs.makeDir,
mounts = mounts,
name = fs.getName,
open = function(n, m) return fs.open(n, m or 'r') end,
realPath = function(...) return ... end,
remove = function(a) fs.delete(a) return true end,
size = fs.getSize,
attributes = function(f)
local s, m = pcall(fs.attributes, f)
if s then
return m
end
end
}