vicious/fs.lua

57 lines
1.6 KiB
Lua

---------------------------------------------------
-- Licensed under the GNU General Public License v2
-- * (c) 2010, Adrian C. <anrxc@sysphere.org>
-- * (c) 2009, Lucas de Vries <lucas@glacicle.com>
---------------------------------------------------
-- {{{ Grab environment
local tonumber = tonumber
local io = { popen = io.popen }
local setmetatable = setmetatable
local string = {
match = string.match,
format = string.format
}
-- }}}
-- FS: provides file system disk space usage
module("vicious.fs")
-- {{{ Helper functions
local function uformat(array, key, value)
array["{"..key.."_mb}"] = string.format("%.1f", value/1024)
array["{"..key.."_gb}"] = string.format("%.1f", value/1024/1024)
return array
end
-- }}}
-- {{{ Filesystem widget type
local function worker(format, nfs)
-- Fallback to listing only local file systems
if nfs then nfs = "" else nfs = "--local" end
-- Get data from df
local f = io.popen("LANG=C df -kP " .. nfs)
local fs_info = {}
for line in f:lines() do
if not string.match(line, "^Filesystem.*") then
local s, u, a, p, m = string.match(line, -- Match all at once (including NFS)
"^[%w%p]+[%s]+([%d]+)[%s]+([%d]+)[%s]+([%d]+)[%s]+([%d]+)%%[%s]+([%w%p]+)$")
uformat(fs_info, m .. " size", s)
uformat(fs_info, m .. " used", u)
uformat(fs_info, m .. " avail", a)
fs_info["{" .. m .. " used_p}"] = tonumber(p)
end
end
f:close()
return fs_info
end
-- }}}
setmetatable(_M, { __call = function(_, ...) return worker(...) end })