From 05c81e2649c67117f2746df9f7eefbc8caee74fd Mon Sep 17 00:00:00 2001
From: Mark Crane <markjcrane@gmail.com>
Date: Fri, 29 May 2015 05:12:41 +0000
Subject: [PATCH] Add app/hangup to support originator cancel for missed calls.

---
 .../install/scripts/app/hangup/index.lua      | 111 ++++++++++++++++++
 1 file changed, 111 insertions(+)
 create mode 100644 resources/install/scripts/app/hangup/index.lua

diff --git a/resources/install/scripts/app/hangup/index.lua b/resources/install/scripts/app/hangup/index.lua
new file mode 100644
index 0000000000..05d4dd1329
--- /dev/null
+++ b/resources/install/scripts/app/hangup/index.lua
@@ -0,0 +1,111 @@
+--
+--	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