Some assistance needed to improve HTTP call efficiency

Code:

-- Enter IP Address of Tasmota Device

IPaddr = '192.168.0.212'

-- Enter Tasmota Channel Number

CH = 1

-- Enter Group Number of CBUS GA

GA = 100 -- (This is the Garage Main Lights)



function send_tasmota_http_command(ip, ch, state)

   http = require('socket.http') 

   res, err = http.request({

      url = 'http://' .. ip .. '/cm?cmnd=Power' .. ch .. '%20' .. state,

    method = 'GET',

  })

end



storage.set('Tasmota_Update_Event_Blocker', true)



if (GetLightingState(GA) == true) then

  send_tasmota_http_command(IPaddr, CH, 'On')

elseif (GetLightingState(GA) == false)  then

  send_tasmota_http_command(IPaddr, CH, 'Off')

end



os.sleep(1)

storage.set('Tasmota_Update_Event_Blocker', false)

Code:

-- Enter IP Address of Tasmota Device

IPaddr = '192.168.0.212' -- (This is the Garage Main Light)

-- Enter Tasmota Channel Number

CH = 1

-- Enter Group Number of CBUS GA

GA = 100 -- (This is the Garage Main Light)



-- In reality this function is in a User Library but shown here for simplicity



-- A function to request status feedback from a Tasmota Device

function Request_tasmota_http_get_feedback(ip, CH)

   http = require('socket.http')

   ltn12 = require('ltn12')

   require('json')

   sink = {}

   res, err = http.request({

      url = 'http://' .. ip .. '/cm?cmnd=Power' ..CH,

      method = 'GET',

      headers = {["Content-Type"] = "application/json"},

      sink = ltn12.sink.table(sink)

  })



  if sink then

    return table.concat(sink)

  else

    return nil, err

  end

end



 -- Again in reality, the remainder of this code runs in a for loop, iterating through an array of approx 10 devices 

 -- The array is a LUA table containing the IP, Sonoff Channel number and Group address of each device to be polled...

 

  reply = Request_tasmota_http_get_feedback(IPaddr, CH) -- Returns an array

  -- Walk through array, load into a LUA table

  data = {}

  for val in string.gmatch(reply, "\"(%a+)\"") do -- split the array on double quotes (needs to be escaped with \ )

          table.insert(data, val)

       end

  --log(data) -- Log the array if needed, to find the correct index

  --log("Resident: Light at Address : " .. GA .. " is " .. data[2])

    

Update_Blocked = storage.get('Tasmota_Update_Event_Blocker', false) -- get unblocker status, with default of false if not set

--log("Update_Blocked is : ", Update_Blocked)



-- Fix The feeback, if allowed

if (data[2] == 'ON' and (GetLightingState(GA) == false) and (Update_Blocked == false)) then

    SetLightingState(GA, true)

elseif (data[2] == 'OFF' and (GetLightingState(GA) == true) and (Update_Blocked == false)) then

    SetLightingState(GA, false)

end

Code:

-- do nothing if triggered by a resident script

if event.sender == 'sr' then

  return

end

Code:

log ("Event Sender : ", event.sender) -- Inspect the sender - Returns 'cb' if a real event from cbus bus or 'cl' if it came from my resident script

-- Do nothing if this event has been caused by a 'cl' event

if event.sender == 'cl' then

  log ("Bailing out...")  

  return  -- Script exits here, the rest is ignored

end