widgets/weather.lua

   1
   2 --[[
   3
   4      Licensed under GNU General Public License v2
   5       * (c) 2015, Luke Bonham
   6
   7 --]]
   8
   9 local newtimer     = require("lain.helpers").newtimer
  10 local read_pipe    = require("lain.helpers").read_pipe
  11
  12 local async        = require("lain.asyncshell")
  13 local json         = require("lain.util").dkjson
  14 local lain_icons   = require("lain.helpers").icons_dir
  15
  16 local naughty      = require("naughty")
  17 local wibox        = require("wibox")
  18
  19 local math         = { floor  = math.floor }
  20 local mouse        = mouse
  21 local os           = { time   = os.time }
  22 local string       = { format = string.format,
  23                        gsub   = string.gsub }
  24
  25 local tonumber     = tonumber
  26 local setmetatable = setmetatable
  27
  28 -- OpenWeatherMap
  29 -- current weather and X-days forecast
  30 -- lain.widgets.weather
  31
  32 local function worker(args)
  33     local weather               = {}
  34     local args                  = args or {}
  35     local APPID                 = args.APPID or "3e321f9414eaedbfab34983bda77a66e" -- lain default
  36     local timeout               = args.timeout or 900   -- 15 min
  37     local timeout_forecast      = args.timeout or 86400 -- 24 hrs
  38     local current_call          = args.current_call  or "curl -s 'http://api.openweathermap.org/data/2.5/weather?id=%s&units=%s&lang=%s&APPID=%s'"
  39     local forecast_call         = args.forecast_call or "curl -s 'http://api.openweathermap.org/data/2.5/forecast/daily?id=%s&units=%s&lang=%s&cnt=%s&APPID=%s'"
  40     local city_id               = args.city_id or 0 -- placeholder
  41     local utc                   = args.utc or 0
  42     local units                 = args.units or "metric"
  43     local lang                  = args.lang or "en"
  44     local cnt                   = args.cnt or 5
  45     local date_cmd              = args.date_cmd or "date -u -d @%d +'%%a %%d'"
  46     local icons_path            = args.icons_path or lain_icons .. "openweathermap/"
  47     local notification_preset   = args.notification_preset or {}
  48     local notification_text_fun = args.notification_text_fun or
  49                                   function (wn)
  50                                       local day = string.gsub(read_pipe(string.format(date_cmd, wn["dt"])), "\n", "")
  51                                       local tmin = math.floor(wn["temp"]["min"])
  52                                       local tmax = math.floor(wn["temp"]["max"])
  53                                       local desc = wn["weather"][1]["description"]
  54
  55                                       return string.format("<b>%s</b>: %s, %d - %d ", day, desc, tmin, tmax)
  56                                   end
  57     local weather_na_markup     = args.weather_na_markup or " N/A "
  58     local followmouse           = args.followmouse or false
  59     local settings              = args.settings or function() end
  60
  61     weather.widget    = wibox.widget.textbox(weather_na_markup)
  62     weather.icon_path = icons_path .. "na.png"
  63     weather.icon      = wibox.widget.imagebox(weather.icon_path)
  64
  65     function weather.show(t_out)
  66         weather.hide()
  67
  68         if followmouse then
  69             notification_preset.screen = mouse.screen
  70         end
  71
  72         if not weather.notification_text then
  73             weather.forecast_update()
  74         end
  75
  76         weather.notification = naughty.notify({
  77             text    = weather.current_text .. weather.notification_text,
  78             icon    = weather.icon_path,
  79             timeout = t_out,
  80             preset  = notification_preset
  81         })
  82     end
  83
  84     function weather.hide()
  85         if weather.notification then
  86             naughty.destroy(weather.notification)
  87             weather.notification = nil
  88         end
  89     end
  90
  91     function weather.attach(obj)
  92         obj:connect_signal("mouse::enter", function()
  93             weather.show(0)
  94         end)
  95         obj:connect_signal("mouse::leave", function()
  96             weather.hide()
  97         end)
  98     end
  99
 100     function weather.forecast_update()
 101         local cmd = string.format(forecast_call, city_id, units, lang, cnt, APPID)
 102         async.request(cmd, function(f)
 103             local pos, err
 104             weather_now, pos, err = json.decode(f, 1, nil)
 105
 106             if not err and weather_now and tonumber(weather_now["cod"]) == 200 then
 107                 weather.notification_text = ''
 108                 for i = 1, weather_now["cnt"] do
 109                     weather.notification_text = weather.notification_text ..
 110                                                 notification_text_fun(weather_now["list"][i])
 111
 112                     if i < weather_now["cnt"] then
 113                         weather.notification_text = weather.notification_text .. "\n"
 114                     end
 115                 end
 116             end
 117         end)
 118     end
 119
 120     function weather.update()
 121         local cmd = string.format(current_call, city_id, units, lang, APPID)
 122         async.request(cmd, function(f)
 123             local pos, err, icon
 124             weather_now, pos, err = json.decode(f, 1, nil)
 125             weather.current_text=''
 126             if not err and weather_now and tonumber(weather_now["cod"]) == 200 then
 127                 -- weather icon based on localtime
 128                 now     = os.time() - (utc * 3600)
 129                 sunrise = tonumber(weather_now["sys"]["sunrise"])
 130                 sunset  = tonumber(weather_now["sys"]["sunset"])
 131                 icon    = weather_now["weather"][1]["icon"]
 132
 133                 if sunrise <= now and now <= sunset then
 134                     icon = string.gsub(icon, "n", "d")
 135                 else
 136                     icon = string.gsub(icon, "d", "n")
 137                 end
 138
 139                 weather.icon_path = icons_path .. icon .. ".png"
 140
 141                 widget = weather.widget
 142                 weather.current_text = "Now:" .. weather_now["weather"][1]["description"] .. "\n"
 143                 settings()
 144             else
 145                 weather.icon_path = icons_path .. "na.png"
 146                 weather.widget:set_markup(weather_na_markup)
 147             end
 148
 149             weather.icon:set_image(weather.icon_path)
 150         end)
 151     end
 152
 153     weather.attach(weather.widget)
 154
 155     newtimer("weather-" .. city_id, timeout, weather.update)
 156     newtimer("weather_forecast-" .. city_id, timeout, weather.forecast_update)
 157
 158     return setmetatable(weather, { __index = weather.widget })
 159 end
 160
 161 return setmetatable({}, { __call = function(_, ...) return worker(...) end })