--[[
%% Autostart
%% Globals
--]]
--LUA Script for handling dead nodes V1.0.1
--Copyright © 2013 Jean-christophe VERMANDE
fibaro : debug ( "HC2 start script at" .. os.date ( ) ) ;

--Check script instance count in memory
if ( fibaro : countScenes ( ) > 1 ) then
fibaro : abort ( ) ;
fibaro : debug ( "Script already running." ) ;
end

--SETTINGS

-- Debug true or false (output debug information in HC2 window)
local debug = true;
-- User ID (email)
local userID = 2;
-- List of nodes you want to check
local nodes = { 2 , 4 , 6 , 8 , 10 , 13 , 18 , 23 , 55 , 59 , 65 , 80 , 83 , 91 , 110 , 119 } ;
-- Polling Interval
local repeatTime = (60*60*1000); -- 60 minutes

-- DO NOT EDIT THE CODE BELOW (except to follow your needs) -

local lookFor = function()
local id, status, dtLog;
for i = 1, #nodes do
id = nodes;
status = fibaro:getValue(id, 'dead');
dtLog = os.date();
if status == "1" then
-- dead node found
local name = fibaro:getName(id);
local room = fibaro:getRoomNameByDeviceID(id);
local message = dtLog .. " [status] device (" .. name .. " ID#" .. id .. " in room [" .. room .. "]) is flagged as dead node."
if debug then fibaro:debug(message) end
-- try to wakeUp device
fibaro:wakeUpDeadDevice(id);
-- send mail
fibaro:call(userID, "sendEmail", "Dead Nodes", message);
end
end
end

-- START ENGINE LOOP PROCESS
while true do
lookFor();
fibaro:sleep(repeatTime);
end

--[[
v 1.0.1 (06-2013)
Implement new getRoomName / getRoomNameByDeviceID from 3.552+
v 1.0.0 (01-2013)
First stable release
--]]