dbxe
/
fusionpbx
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add a new caller id lua script.

This commit is contained in:
Mark Crane 2012-10-23 23:00:25 +00:00
parent 82e19a2060
commit 72e21a426b
1 changed files with 76 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

76
includes/install/scripts/destination_caller_id.lua Normal file
View File

@ -0,0 +1,76 @@
-- intercom.lua
-- Part of FusionPBX
-- Copyright (C) 2010 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.
--include the lua script
scripts_dir = string.sub(debug.getinfo(1).source,2,string.len(debug.getinfo(1).source)-(string.len(argv[0])+1));
include = assert(loadfile(scripts_dir .. "/resources/config.lua"));
include();
--connect to the database
--ODBC - data source name
if (dsn_name) then
dbh = freeswitch.Dbh(dsn_name,dsn_username,dsn_password);
end
--FreeSWITCH core db handler
if (db_type == "sqlite") then
dbh = freeswitch.Dbh("core:"..db_path.."/"..db_name);
end
--add a trim function
function trim (s)
return (string.gsub(s, "^%s*(.-)%s*$", "%1"))
end
--get the variables
domain_name = session:getVariable("domain_name");
outbound_number = session:getVariable("destination_number");
freeswitch.consoleLog("notice", "outbound_number: --" .. outbound_number .. "--\n");
outbound_area_code = string.sub(outbound_number,3,5);
freeswitch.consoleLog("notice", "Area Code: " .. outbound_area_code .. "\n");
--caller_id_name = session:getVariable("caller_id_name");
--caller_id_number = session:getVariable("caller_id_number");
--get the destination_number
sql = [[ SELECT * FROM v_destinations
where destination_number like '1]].. outbound_area_code ..[[%']]
freeswitch.consoleLog("notice", "SQL:" .. sql .. "\n");
x = 0;
dbh:query(sql, function(row)
destination_number = row.destination_number;
--destination_caller_id_name = row.destination_caller_id_name;
--destination_caller_id_number = row.destination_caller_id_number;
x = x + 1;
end);
--session actions
if (session:ready()) then
if (destination_number) then
freeswitch.consoleLog("notice", "effective_caller_id_number="..destination_number.."\n");
session:execute("set", "effective_caller_id_number="..destination_number);
end
--session:hangup();
end