1 files changed, 130 insertions, 0 deletions
diff --git a/lain/widgets/weather.lua b/lain/widgets/weather.lua
new file mode 100644
index 0000000..d1624fa
--- /dev/null
+++ b/lain/widgets/weather.lua
@@ -0,0 +1,130 @@
+
+--[[
+                                                  
+     Licensed under GNU General Public License v2 
+      * (c) 2015, Luke Bonham                     
+                                                  
+--]]
+
+local newtimer     = require("lain.helpers").newtimer
+local async        = require("lain.asyncshell")
+local json         = require("lain.util").dkjson
+local lain_icons   = require("lain.helpers").icons_dir
+local naughty      = require("naughty")
+local wibox        = require("wibox")
+
+local math         = { floor  = math.floor }
+local string       = { format = string.format,
+                       gsub   = string.gsub }
+
+local setmetatable = setmetatable
+
+-- OpenWeatherMap
+-- current weather and X-days forecast
+-- lain.widgets.weather
+
+local function worker(args)
+    local weather               = {}
+    local args                  = args or {}
+    local timeout               = args.timeout or 900   -- 15 min
+    local timeout_forecast      = args.timeout or 86400 -- 24 hrs
+    local current_call          = "curl -s 'http://api.openweathermap.org/data/2.5/weather?id=%s&units=%s&lang=%s'"
+    local forecast_call         = "curl -s 'http://api.openweathermap.org/data/2.5/forecast/daily?id=%s&units=%s&lang=%s&cnt=%s'"
+    local city_id               = args.city_id or 0 -- placeholder
+    local units                 = args.units or "metric"
+    local lang                  = args.lang or "en"
+    local cnt                   = args.cnt or 7
+    local date_cmd              = args.date_cmd or "date -u -d @%d +'%%a %%d'"
+    local icons_path            = args.icons_path or lain_icons .. "openweathermap/"
+    local w_notification_preset = args.w_notification_preset or {}
+    local settings              = args.settings or function() end
+
+    weather.widget = wibox.widget.textbox('')
+    weather.icon   = wibox.widget.imagebox()
+
+    function weather.show(t_out)
+        weather.hide()
+        weather.notification = naughty.notify({
+            text    = weather.notification_text,
+            icon    = weather.icon_path,
+            timeout = t_out,
+            preset  = w_notification_preset
+        })
+    end
+
+    function weather.hide()
+        if weather.notification ~= nil then
+            naughty.destroy(weather.notification)
+            weather.notification = nil
+        end
+    end
+
+    function weather.attach(obj)
+        obj:connect_signal("mouse::enter", function()
+            weather.show(0)
+        end)
+        obj:connect_signal("mouse::leave", function()
+            weather.hide()
+        end)
+    end
+
+    function weather.forecast_update()
+        local cmd = string.format(forecast_call, city_id, units, lang, cnt)
+        async.request(cmd, function(f)
+            j = f:read("*a")
+            f:close()
+            weather_now, pos, err = json.decode(j, 1, nil)
+
+            if not err and weather_now ~= nil and tonumber(weather_now["cod"]) == 200 then
+                weather.notification_text = ''
+                for i = 1, weather_now["cnt"] do
+                    local f = assert(io.popen(string.format(date_cmd, weather_now["list"][i]["dt"])))
+                    day = string.gsub(f:read("a"), "\n", "")
+                    f:close()
+
+                    tmin = math.floor(weather_now["list"][i]["temp"]["min"])
+                    tmax = math.floor(weather_now["list"][i]["temp"]["max"])
+                    desc = weather_now["list"][i]["weather"][1]["description"]
+
+                    weather.notification_text = weather.notification_text ..
+                                                string.format("<b>%s</b>: %s, %d - %d  ", day, desc, tmin, tmax)
+
+                    if i < weather_now["cnt"] then
+                        weather.notification_text = weather.notification_text .. "\n"
+                    end
+                end
+            else
+                weather.icon_path = icons_path .. "na.png"
+                weather.notification_text = "API/connection error or bad/not set city ID"
+            end
+        end)
+    end
+
+    function weather.update()
+        local cmd = string.format(current_call, city_id, units, lang)
+        async.request(cmd, function(f)
+            j = f:read("*a")
+            f:close()
+            weather_now, pos, err = json.decode(j, 1, nil)
+
+            if not err and weather_now ~= nil and tonumber(weather_now["cod"]) == 200 then
+                weather.icon_path = icons_path .. weather_now["weather"][1]["icon"] .. ".png"
+                weather.icon:set_image(weather.icon_path)
+                widget = weather.widget
+                settings()
+            else
+                weather.widget._layout.text = " N/A " -- tries to avoid textbox bugs
+                weather.icon:set_image(icons_path .. "na.png")
+            end
+        end)
+    end
+
+    weather.attach(weather.widget)
+
+    newtimer("weather", timeout, weather.update)
+    newtimer("weather_forecast", timeout, weather.forecast_update)
+
+    return setmetatable(weather, { __index = weather.widget })
+end
+
+return setmetatable({}, { __call = function(_, ...) return worker(...) end })