--]]
-local newtimer = require("lain.helpers").newtimer
-local read_pipe = require("lain.helpers").read_pipe
-
-local wibox = require("wibox")
-
-local util = require("lain.util")
-
-local io = { popen = io.popen }
-local os = { getenv = os.getenv }
-local pairs = pairs
-local string = { len = string.len,
- match = string.match }
-local table = { sort = table.sort }
-
-local setmetatable = setmetatable
-
--- Maildir check
+local awful = require("awful")
+local wibox = require("wibox")
+local helpers = require("lain.helpers")
+local io = { popen = io.popen }
+local os = { getenv = os.getenv }
+local string = { format = string.format,
+ match = string.match }
+local setmetatable = setmetatable
+
+-- Maildir check (synchronous)
-- lain.widgets.maildir
-local maildir = { total = 0 }
+local maildir = {}
local function worker(args)
local args = args or {}
local mailpath = args.mailpath or os.getenv("HOME") .. "/Mail"
local ignore_boxes = args.ignore_boxes or {}
local settings = args.settings or function() end
+ local ext_mail_cmd = args.external_mail_cmd
- maildir.widget = wibox.widget.textbox('')
+ maildir.widget = wibox.widget.textbox()
+
+ function maildir.update()
+ if ext_mail_cmd then awful.spawn(ext_mail_cmd) end
- function update()
-- Find pathes to mailboxes.
- local p = io.popen("find " .. mailpath ..
- " -mindepth 1 -maxdepth 1 -type d" ..
- " -not -name .git")
+ local p = io.popen(string.format("find %s -mindepth 1 -maxdepth 2 -type d -not -name .git", mailpath))
local boxes = {}
repeat
line = p:read("*l")
- if line ~= nil
- then
+ if line then
-- Find all files in the "new" subdirectory. For each
-- file, print a single character (no newline). Don't
-- match files that begin with a dot.
-- Afterwards the length of this string is the number of
-- new mails in that box.
- local mailstring = read_pipe("find " .. line ..
- "/new -mindepth 1 -type f " ..
- "-not -name '.*' -printf a")
+ local mailstring = helpers.read_pipe(string.format("find %s /new -mindepth 1 -type f -not -name '.*' -printf a", line))
-- Strip off leading mailpath.
- local box = string.match(line, mailpath .. "/*([^/]+)")
- local nummails = string.len(mailstring)
- if nummails > 0
- then
+ local box = string.match(line, mailpath .. "/(.*)")
+ local nummails = #mailstring
+
+ if nummails > 0 then
boxes[box] = nummails
end
end
- until line == nil
-
+ until not line
p:close()
- table.sort(boxes)
- newmail = "no mail"
- -- Count the total number of mails irrespective of where it was found
- total = 0
+ local newmail = "no mail"
+ local total = 0
- for box, number in pairs(boxes)
- do
+ for box, number in helpers.spairs(boxes) do
-- Add this box only if it's not to be ignored.
- if not util.element_in_table(box, ignore_boxes)
- then
+ if not helpers.element_in_table(box, ignore_boxes) then
total = total + number
- if newmail == "no mail"
- then
- newmail = box .. "(" .. number .. ")"
+ if newmail == "no mail" then
+ newmail = string.format("%s(%s)", box, number)
else
- newmail = newmail .. ", " ..
- box .. "(" .. number .. ")"
+ newmail = string.format("%s, %s(%s)", newmail, box, number)
end
end
end
- if maildir.total ~= total then
- widget = maildir.widget
- settings()
- end
+ widget = maildir.widget
+ settings()
end
- newtimer(mailpath, timeout, update, true)
- return maildir.widget
+ maildir.timer = helpers.newtimer(mailpath, timeout, maildir.update, true, true)
+
+ return setmetatable(maildir, { __index = maildir.widget })
end
return setmetatable(maildir, { __call = function(_, ...) return worker(...) end })