Add xml handler fixed sip call forward.

resources/install/scripts/app/xml_handler/resources/scripts/directory/action/domains.lua

@@ -0,0 +1,38 @@
+--	xml_handler.lua
+--	Part of FusionPBX
+--	Copyright (C) 2013 Mark J Crane <markjcrane@fusionpbx.com>
+--	All rights reserved.
+--
+--	Redistribution and use in source and binary forms, with or without
+--	modification, are permitted provided that the following conditions are met:
+--
+--	1. Redistributions of source code must retain the above copyright notice,
+--	   this list of conditions and the following disclaimer.
+--
+--	2. Redistributions in binary form must reproduce the above copyright
+--	   notice, this list of conditions and the following disclaimer in the
+--	   documentation and/or other materials provided with the distribution.
+--
+--	THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
+--	INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
+--	AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
+--	AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
+--	OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+--	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+--	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+--	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+--	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+--	POSSIBILITY OF SUCH DAMAGE.
+
+--process when the sip profile is rescanned, sofia is reloaded, or sip redirect
+	local xml = {}
+	table.insert(xml, [[<?xml version="1.0" encoding="UTF-8" standalone="no"?>]]);
+	table.insert(xml, [[<document type="freeswitch/xml">]]);
+	table.insert(xml, [[	<section name="directory">]]);
+	sql = "SELECT * FROM v_domains ";
+	dbh:query(sql, function(row)
+		table.insert(xml, [[		<domain name="]]..row.domain_name..[[" />]]);
+	end);
+	table.insert(xml, [[	</section>]]);
+	table.insert(xml, [[</document>]]);
+	XML_STRING = table.concat(xml, "\n");

resources/install/scripts/app/xml_handler/resources/scripts/directory/directory.lua

@@ -39,24 +39,13 @@
 
 --determine the correction action to perform
 	if (purpose == "gateways") then
-		if (params:getHeader("profile") == "internal") then
+		dofile(scripts_dir.."/app/xml_handler/resources/scripts/directory/action/domains.lua");
-			--process when the sip profile is rescanned or sofia is reloaded
-			local xml = {}
-			table.insert(xml, [[<?xml version="1.0" encoding="UTF-8" standalone="no"?>]]);
-			table.insert(xml, [[<document type="freeswitch/xml">]]);
-			table.insert(xml, [[	<section name="directory">]]);
-			sql = "SELECT * FROM v_domains ";
-			dbh:query(sql, function(row)
-				table.insert(xml, [[		<domain name="]]..row.domain_name..[[" />]]);
-			end);
-			table.insert(xml, [[	</section>]]);
-			table.insert(xml, [[</document>]]);
-			XML_STRING = table.concat(xml, "\n");
-		end
 	elseif (action == "message-count") then
 		dofile(scripts_dir.."/app/xml_handler/resources/scripts/directory/action/message-count.lua");
 	elseif (action == "group_call") then
 		dofile(scripts_dir.."/app/xml_handler/resources/scripts/directory/action/group_call.lua");
+	elseif (params:getHeader("Event-Calling-Function") == "switch_xml_locate_domain") then
+		dofile(scripts_dir.."/app/xml_handler/resources/scripts/directory/action/domains.lua");
 	else
 		--handle action
 			--all other directory actions: sip_auth, user_call 
@@ -367,6 +356,10 @@
 					<result status="not found" />
 				</section>
 			</document>]];
+		--set the cache
+			if (user and domain_name) then
+				result = trim(api:execute("memcache", "set directory:" .. user .. "@" .. domain_name .. " '"..XML_STRING:gsub("'", "&#39;").."' "..expire["directory"]));
+			end
 	end
 
 --send the xml to the console