44 lines
1.3 KiB
Lua
44 lines
1.3 KiB
Lua
---------------------------------------------------
|
|
-- Licensed under the GNU General Public License v2
|
|
-- * (c) 2010, Adrian C. <anrxc@sysphere.org>
|
|
-- * (c) Maildir Biff Widget, Fredrik Ax
|
|
---------------------------------------------------
|
|
|
|
-- {{{ Grab environment
|
|
local io = { popen = io.popen }
|
|
local setmetatable = setmetatable
|
|
local helpers = require("vicious.helpers")
|
|
-- }}}
|
|
|
|
|
|
-- Mdir: provides the number of new and unread messages in Maildir structures/dirs
|
|
-- vicious.widgets.mdir
|
|
local mdir = {}
|
|
|
|
|
|
-- {{{ Maildir widget type
|
|
local function worker(format, warg)
|
|
if not warg then return end
|
|
|
|
-- Initialize counters
|
|
local count = { new = 0, cur = 0 }
|
|
|
|
for i=1, #warg do
|
|
quoted_path = helpers.shellquote(warg[i])
|
|
-- Recursively find new messages
|
|
local f = io.popen("find "..quoted_path.." -type f -wholename '*/new/*'")
|
|
for line in f:lines() do count.new = count.new + 1 end
|
|
f:close()
|
|
|
|
-- Recursively find "old" messages lacking the Seen flag
|
|
local f = io.popen("find "..quoted_path.." -type f -regex '.*/cur/.*2,[^S]*$'")
|
|
for line in f:lines() do count.cur = count.cur + 1 end
|
|
f:close()
|
|
end
|
|
|
|
return {count.new, count.cur}
|
|
end
|
|
-- }}}
|
|
|
|
return setmetatable(mdir, { __call = function(_, ...) return worker(...) end })
|