+++ /dev/null
-
---[[
-
- Licensed under GNU General Public License v2
- * (c) 2013, Luke Bonham
-
---]]
-
-local helpers = require("lain.helpers")
-local naughty = require("naughty")
-local wibox = require("wibox")
-local string = { format = string.format,
- gsub = string.gsub }
-local type = type
-local tonumber = tonumber
-
--- Mail IMAP check
--- 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 settings = args.settings or function() end
-
- local head_command = "curl --connect-timeout 3 -fsm 3"
- local request = "-X 'SEARCH (UNSEEN)'"
-
- if not server or not mail or not password then return end
-
- 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()
- 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
-
- curl = string.format("%s --url imaps://%s:%s/INBOX -u %s:%q %s -k",
- head_command, server, port, mail, password, request)
-
- helpers.async(curl, function(f)
- _, mailcount = string.gsub(f, "%d+", "")
- _ = nil
-
- widget = imap.widget
- settings()
-
- if mailcount >= 1 and mailcount > helpers.get_map(mail) then
- if mailcount == 1 then
- nt = mail .. " has one new message"
- else
- nt = mail .. " has <b>" .. mailcount .. "</b> new messages"
- end
- naughty.notify({ preset = mail_notification_preset, text = nt })
- end
-
- helpers.set_map(mail, mailcount)
- end)
-
- end
-
- imap.timer = helpers.newtimer(mail, timeout, update, true, true)
-
- return imap
-end
-
-return factory