widgets/imap.lua

   1
   2 --[[
   3
   4      Licensed under GNU General Public License v2
   5       * (c) 2013, Luke Bonham
   6
   7 --]]
   8
   9 local helpers      = require("lain.helpers")
  10
  11 local naughty      = require("naughty")
  12 local wibox        = require("wibox")
  13
  14 local string       = { format = string.format,
  15                        gsub   = string.gsub }
  16 local tonumber     = tonumber
  17
  18 local setmetatable = setmetatable
  19
  20 -- Mail IMAP check
  21 -- lain.widgets.imap
  22
  23 local function worker(args)
  24     local imap        = {}
  25     local args        = args or {}
  26
  27     local server      = args.server
  28     local mail        = args.mail
  29     local password    = args.password
  30
  31     local port        = args.port or 993
  32     local timeout     = args.timeout or 60
  33     local is_plain    = args.is_plain or false
  34     local followtag   = args.followtag or false
  35     local settings    = args.settings or function() end
  36
  37     local head_command  = "curl --connect-timeout 3 -fsm 3"
  38     local request = "-X 'SEARCH (UNSEEN)'"
  39
  40     helpers.set_map(mail, 0)
  41
  42     if not is_plain then
  43         password = helpers.read_pipe(password):gsub("\n", "")
  44     end
  45
  46     imap.widget = wibox.widget.textbox('')
  47
  48     function update()
  49         mail_notification_preset = {
  50             icon     = helpers.icons_dir .. "mail.png",
  51             position = "top_left"
  52         }
  53
  54         if followtag then
  55             mail_notification_preset.screen = awful.screen.focused()
  56         end
  57
  58         curl = string.format("%s --url imaps://%s:%s/INBOX -u %s:%q %s -k",
  59                head_command, server, port, mail, password, request)
  60
  61         helpers.async(curl, function(f)
  62             _, mailcount = string.gsub(f, "%d+", "")
  63
  64             widget = imap.widget
  65             settings()
  66
  67             if mailcount >= 1 and mailcount > helpers.get_map(mail) then
  68                 if mailcount == 1 then
  69                     nt = mail .. " has one new message"
  70                 else
  71                     nt = mail .. " has <b>" .. mailcount .. "</b> new messages"
  72                 end
  73                 naughty.notify({ preset = mail_notification_preset, text = nt })
  74             end
  75
  76             helpers.set_map(mail, mailcount)
  77         end)
  78
  79     end
  80
  81     helpers.newtimer(mail, timeout, update, true)
  82
  83     return setmetatable(imap, { __index = imap.widget })
  84 end
  85
  86 return setmetatable({}, { __call = function(_, ...) return worker(...) end })