From: lcpz Date: Sat, 24 Nov 2018 14:08:04 +0000 (+0000) Subject: lain.imap: various improvements X-Git-Url: https://git.madduck.net/etc/awesome.git/commitdiff_plain/8112df667d6c56dfec90695341f22af8718a6eb6?ds=inline;hp=-c lain.imap: various improvements 1. allow special chars in password 2. make it gmail/yandex compliant 3. fetch additional data (MESSAGES and RECENT) 4. support DBus Secret Service authentication method --- 8112df667d6c56dfec90695341f22af8718a6eb6 diff --git a/widget/imap.lua b/widget/imap.lua index 7e83d36..3f4d9cc 100644 --- a/widget/imap.lua +++ b/widget/imap.lua @@ -17,63 +17,74 @@ local tonumber = tonumber -- lain.widget.imap local function factory(args) - local imap = { widget = wibox.widget.textbox() } - local args = args or {} - local server = args.server - local mail = args.mail - local password = args.password - local port = args.port or 993 - local timeout = args.timeout or 60 - local is_plain = args.is_plain or false - local followtag = args.followtag or false - local notify = args.notify or "on" - local settings = args.settings or function() end + local imap = { widget = wibox.widget.textbox() } + local args = args or {} + local server = args.server + local mail = args.mail + local password = args.password + local port = args.port or 993 + local timeout = args.timeout or 60 + local pwdtimeout = args.pwdtimeout or 10 + local is_plain = args.is_plain or false + local followtag = args.followtag or false + local notify = args.notify or "on" + local settings = args.settings or function() end local head_command = "curl --connect-timeout 3 -fsm 3" - local request = "-X 'SEARCH (UNSEEN)'" + local request = "-X 'STATUS INBOX (MESSAGES RECENT UNSEEN)'" if not server or not mail or not password then return end + mail_notification_preset = { + icon = helpers.icons_dir .. "mail.png", + position = "top_left" + } + helpers.set_map(mail, 0) if not is_plain then if type(password) == "string" or type(password) == "table" then helpers.async(password, function(f) password = f:gsub("\n", "") end) elseif type(password) == "function" then - local p = password() + imap.pwdtimer = helpers.newtimer(mail .. "-password", pwdtimeout, function() + local retrieved_password, try_again = password() + if not try_again then + imap.pwdtimer:stop() -- stop trying to retrieve + password = retrieved_password or "" -- failsafe + end + end, true, true) end end - function update() - mail_notification_preset = { - icon = helpers.icons_dir .. "mail.png", - position = "top_left" - } - - if followtag then - mail_notification_preset.screen = awful.screen.focused() - end + function imap.update() + -- do not update if the password has not been retrieved yet + if type(password) ~= "string" then return end - local curl = string.format("%s --url imaps://%s:%s/INBOX -u %s:%q %s -k", + local curl = string.format("%s --url imaps://%s:%s/INBOX -u %s:'%s' %s -k", head_command, server, port, mail, password, request) helpers.async(curl, function(f) - mailcount = tonumber(f:match("UNSEEN (%d+)")) + imap_now = { ["MESSAGES"] = 0, ["RECENT"] = 0, ["UNSEEN"] = 0 } + + for s, d in f:gmatch("(%w+)%s+(%d+)") do imap_now[s] = tonumber(d) end + mailcount = imap_now["UNSEEN"] -- backwards compatibility + helpers.set_map(mail, mailcount) widget = imap.widget + settings() if notify == "on" and mailcount and mailcount >= 1 and mailcount > helpers.get_map(mail) then - local nt = mail .. " has " .. mailcount .. " new message" - if mailcount >= 1 then nt = nt .. "s" end - naughty.notify { preset = mail_notification_preset, text = nt } + if followtag then mail_notification_preset.screen = awful.screen.focused() end + naughty.notify { + preset = mail_notification_preset, + text = string.format("%s has %d new message%s", mail, mailcount, mailcount == 1 and "" or "s") + } end - - helpers.set_map(mail, mailcount) end) end - imap.timer = helpers.newtimer(mail, timeout, update, true, true) + imap.timer = helpers.newtimer(mail, timeout, imap.update, true, true) return imap end diff --git a/wiki b/wiki index 7c3a5bf..f03b097 160000 --- a/wiki +++ b/wiki @@ -1 +1 @@ -Subproject commit 7c3a5bfba6e779a86169a6cbb1eaf20bf19627f7 +Subproject commit f03b0979d5b3019979c58c6e4a649265e7951a10