feat: refresh token authentication

Adds support for refresh token based authentication

Author: ikubicki

Config.lua

@@ -53,6 +53,10 @@ function Config:setAccessToken(token)
     self.token = token
 end
 
+function Config:getRefreshToken()
+    return self.rtoken
+end
+
 function Config:getTimeoutInterval()
     return tonumber(self.interval) * 60000
 end
@@ -76,6 +80,7 @@ function Config:init()
     self.type = tostring(self.app:getVariable('Type'))
     self.interval = self.app:getVariable('Interval')
     self.token = self.app:getVariable('AccessToken')
+    self.rtoken = self.app:getVariable('RefreshToken')
 
     local storedClientID = Globals:get('netatmo_client_id')
     local storedClientSecret = Globals:get('netatmo_client_secret')

Netatmo.lua

@@ -14,6 +14,7 @@ function Netatmo:new(config)
     self.module_id = config:getModuleID()
     self.access_token = config:getAccessToken()
     self.token = Globals:get('netatmo_atoken', '')
+    self.refresh_token = config:getRefreshToken()
     self.http = HTTPClient:new({})
     return self
 end
@@ -209,6 +210,13 @@ function Netatmo:auth(callback)
         end
         return
     end
+    if string.len(self.access_token) > 10 then
+        if callback ~= nil then
+            Netatmo:setToken(self.access_token)
+            callback({})
+        end
+        return
+    end
     local data = {
         ["grant_type"] = 'password',
         ["scope"] = 'read_station',
@@ -217,6 +225,14 @@ function Netatmo:auth(callback)
         ["username"] = self.user,
         ["password"] = self.pass,
     }
+    if string.len(self.refresh_token) > 10 then
+        data = {
+            ["grant_type"] = 'refresh_token',
+            ["refresh_token"] = self.refresh_token,
+            ["client_id"] = self.client_id,
+            ["client_secret"] = self.client_secret,
+        }
+    end
     local fail = function(response)
         QuickApp:error('Unable to authenticate')
         if self.access_token == self.token then