--
--	FusionPBX
--	Version: MPL 1.1
--
--	The contents of this file are subject to the Mozilla Public License Version
--	1.1 (the "License"); you may not use this file except in compliance with
--	the License. You may obtain a copy of the License at
--	http://www.mozilla.org/MPL/
--
--	Software distributed under the License is distributed on an "AS IS" basis,
--	WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
--	for the specific language governing rights and limitations under the
--	License.
--
--	The Original Code is FusionPBX
--
--	The Initial Developer of the Original Code is
--	Mark J Crane <markjcrane@fusionpbx.com>
--	Copyright (C) 2015
--	the Initial Developer. All Rights Reserved.

--set the debug options
	debug["params"] = false;
	debug["info"] = false;
	debug["sql"] = false;

--general functions
	dofile(scripts_dir .. "/resources/functions/config.lua");
	dofile(scripts_dir .. "/resources/functions/explode.lua");
	dofile(scripts_dir.."/resources/functions/trim.lua");
	--dofile(scripts_dir.."/resources/functions/file_exists.lua");

--create the api object
	api = freeswitch.API();

--check the missed calls
	function missed()
		if (missed_call_app ~= nil and missed_call_data ~= nil) then
			if (missed_call_app == "email") then
				headers = '{"X-FusionPBX-Domain-UUID":"'..domain_uuid..'",';
				headers = headers..'"X-FusionPBX-Domain-Name":"'..domain_name..'",';
				headers = headers..'"X-FusionPBX-Call-UUID":"'..uuid..'",';
				headers = headers..'"X-FusionPBX-Email-Type":"missed"}';

				subject = "Missed Call from ${caller_id_name} <${caller_id_number}>";
				subject = subject:gsub("${caller_id_name}", caller_id_name);
				subject = subject:gsub("${caller_id_number}", caller_id_number);
				subject = subject:gsub("${sip_to_user}", sip_to_user);
				subject = subject:gsub("${dialed_user}", dialed_user);

				body = "Missed Call from ${caller_id_name} <${caller_id_number}> to ${sip_to_user} ext ${dialed_user}";
				body = body:gsub("${caller_id_name}", caller_id_name);
				body = body:gsub("${caller_id_number}", caller_id_number);
				body = body:gsub("${sip_to_user}", sip_to_user);
				body = body:gsub("${dialed_user}", dialed_user);

				body = body:gsub(" ", "&nbsp;");
				body = body:gsub("%s+", "");
				body = body:gsub("&nbsp;", " ");
				body = body:gsub("\n", "");
				body = body:gsub("\n", "");
				body = body:gsub("'", "&#39;");
				body = body:gsub([["]], "&#34;");
				body = trim(body);

				cmd = "luarun email.lua "..missed_call_data.." "..missed_call_data.." "..headers.." '"..subject.."' '"..body.."'";
				if (debug["info"]) then
					freeswitch.consoleLog("notice", "[missed call] cmd: " .. cmd .. "\n");
				end
				result = api:executeString(cmd);
			end
		end
	end

-- show all channel variables
	--serialized = env:serialize()
	--freeswitch.consoleLog("INFO","[hangup]\n" .. serialized .. "\n")

-- set channel variables to lua variables
	originate_disposition = env:getHeader("originate_disposition");
	originate_causes = env:getHeader("originate_causes");
	uuid = env:getHeader("uuid");
	domain_uuid = env:getHeader("domain_uuid");
	domain_name = env:getHeader("domain_name");
	sip_to_user = env:getHeader("sip_to_user");
	dialed_user = env:getHeader("dialed_user");
	missed_call_app = env:getHeader("missed_call_app");
	missed_call_data = env:getHeader("missed_call_data");

-- get the Caller ID
	caller_id_name = env:getHeader("caller_id_name");
	caller_id_number = env:getHeader("caller_id_number");
	if (caller_id_name == nil) then
		caller_id_name = env:getHeader("Caller-Caller-ID-Name");
	end
	if (caller_id_number == nil) then
		caller_id_number = env:getHeader("Caller-Caller-ID-Number");
	end

--show the logs
	if (debug["info"] == true) then
		freeswitch.consoleLog("INFO", "[hangup] originate_causes: " .. tostring(originate_causes) .. "\n");
		freeswitch.consoleLog("INFO", "[hangup] originate_disposition: " .. tostring(originate_disposition) .. "\n");
	end

--handle originate disposition
	if (originate_disposition ~= nil) then
		if (originate_disposition == "ORIGINATOR_CANCEL") then
			missed();
		end
	end