Domoticz

Code: Select all

function os.capture(cmd, raw)				-- os.command uitvoeren en resultaat daarvan lezen in string
  if (dbug == true) then print("Os.Capture") end
  local f = assert(io.popen(cmd, 'r'))
  local s = assert(f:read('*a'))
  f:close()
  if raw then return s end
  s = string.gsub(s, '^%s+', '')
  s = string.gsub(s, '%s+$', '')
  s = string.gsub(s, '[\n\r]+', ' ')
  return s
end

Code: Select all

function GetCam(idx,naam,save)
    if (dbug == true) then print("GetCam") end

	local Cam = 'idx='..idx..'" -OutFile "cam/'..naam..'.jpg"'
	commando = 'powershell Invoke-WebRequest -Uri "http://IP:Port/camsnapshot.jpg?'..Cam
	os.execute(commando) 
    if (save) then
		Cam = 'idx='..idx..'" -OutFile "cam/'..naam..now..'.jpg"'
		commando = 'powershell Invoke-WebRequest -Uri "http://IP:Port/camsnapshot.jpg?'..Cam
		os.execute(commando)
		SendText('Beeld opgeslagen '..naam..now)
	end

Code: Select all

function SendCam(naam)
    if (dbug == true) then print("SendCam") end

	commando = 'curl -s https://api.telegram.org/'..apikey..'/sendPhoto -F chat_id='..chat_id..' -F photo=@cam/'..naam..'.jpg'
	result = os.capture(commando)
	if (not(string.find(result, '"ok"'))) then print(result) end
end	

Code: Select all

		if (string.find(UtTekst, "CAM1")) then 
					if (string.find(UtTekst, "SAVE")) then save=true else save=false end
					GetCam("1","garage",save)
					SendCam("garage")
					Gedaan = "ok"