mirror of
https://github.com/fusionpbx/fusionpbx.git
synced 2026-01-06 11:43:50 +00:00
Add intercept_group.lua
This commit is contained in:
Mark Crane
184
resources/install/scripts/intercept_group.lua
Normal file
184
resources/install/scripts/intercept_group.lua
Normal file
@@ -0,0 +1,184 @@
|
||||
--
|
||||
-- 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) 2010 - 2013
|
||||
-- the Initial Developer. All Rights Reserved.
|
||||
--
|
||||
-- Contributor(s):
|
||||
-- Mark J Crane <markjcrane@fusionpbx.com>
|
||||
|
||||
--user defined variables
|
||||
max_tries = "3";
|
||||
digit_timeout = "5000";
|
||||
extension = argv[1];
|
||||
|
||||
--set the debug options
|
||||
debug["sql"] = false;
|
||||
|
||||
--include config.lua
|
||||
scripts_dir = string.sub(debug.getinfo(1).source,2,string.len(debug.getinfo(1).source)-(string.len(argv[0])+1));
|
||||
dofile(scripts_dir.."/resources/functions/config.lua");
|
||||
dofile(config());
|
||||
|
||||
--add the function
|
||||
dofile(scripts_dir.."/resources/functions/explode.lua");
|
||||
|
||||
--connect to the database
|
||||
dofile(scripts_dir.."/resources/functions/database_handle.lua");
|
||||
dbh = database_handle('system');
|
||||
|
||||
--check if the session is ready
|
||||
if ( session:ready() ) then
|
||||
--answer the session
|
||||
session:answer();
|
||||
|
||||
--get session variables
|
||||
domain_uuid = session:getVariable("domain_uuid");
|
||||
domain_name = session:getVariable("domain_name");
|
||||
pin_number = session:getVariable("pin_number");
|
||||
sounds_dir = session:getVariable("sounds_dir");
|
||||
context = session:getVariable("context");
|
||||
caller_id_number = session:getVariable("caller_id_number");
|
||||
|
||||
--set the sounds path for the language, dialect and voice
|
||||
default_language = session:getVariable("default_language");
|
||||
default_dialect = session:getVariable("default_dialect");
|
||||
default_voice = session:getVariable("default_voice");
|
||||
if (not default_language) then default_language = 'en'; end
|
||||
if (not default_dialect) then default_dialect = 'us'; end
|
||||
if (not default_voice) then default_voice = 'callie'; end
|
||||
|
||||
--set defaults
|
||||
if (digit_min_length) then
|
||||
--do nothing
|
||||
else
|
||||
digit_min_length = "2";
|
||||
end
|
||||
|
||||
if (digit_max_length) then
|
||||
--do nothing
|
||||
else
|
||||
digit_max_length = "11";
|
||||
end
|
||||
|
||||
--if the pin number is provided then require it
|
||||
if (pin_number) then
|
||||
min_digits = string.len(pin_number);
|
||||
max_digits = string.len(pin_number)+1;
|
||||
--digits = session:playAndGetDigits(min_digits, max_digits, max_tries, digit_timeout, "#", sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/custom/please_enter_the_pin_number.wav", "", "\\d+");
|
||||
digits = session:playAndGetDigits(min_digits, max_digits, max_tries, digit_timeout, "#", "phrase:voicemail_enter_pass:#", "", "\\d+");
|
||||
if (digits == pin_number) then
|
||||
--pin is correct
|
||||
else
|
||||
--session:streamFile(sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/custom/your_pin_number_is_incorect_goodbye.wav");
|
||||
session:streamFile("phrase:voicemail_fail_auth:#");
|
||||
session:hangup("NORMAL_CLEARING");
|
||||
return;
|
||||
end
|
||||
end
|
||||
|
||||
--get the call groups the extension is a member of
|
||||
sql = "SELECT call_group FROM v_extensions ";
|
||||
sql = sql .. "WHERE domain_uuid = '"..domain_uuid.."' ";
|
||||
sql = sql .. "AND extension = '"..caller_id_number.."'";
|
||||
status = dbh:query(sql, function(row)
|
||||
call_group = row.call_group;
|
||||
freeswitch.consoleLog("NOTICE", "result "..call_group.."\n");
|
||||
end);
|
||||
call_groups = explode(",", call_group);
|
||||
|
||||
--get the extensions in the call groups
|
||||
sql = "SELECT extension FROM v_extensions ";
|
||||
sql = sql .. "WHERE domain_uuid = '"..domain_uuid.."' ";
|
||||
sql = sql .. "AND (";
|
||||
x = 0;
|
||||
for key,call_group in pairs(call_groups) do
|
||||
if (x == 0) then
|
||||
if (string.len(call_group) > 0) then
|
||||
sql = sql .. "call_group like '%"..call_group.."%' ";
|
||||
else
|
||||
sql = sql .. "call_group = '' ";
|
||||
end
|
||||
else
|
||||
if (string.len(call_group) > 0) then
|
||||
sql = sql .. "OR call_group like '%"..call_group.."%' ";
|
||||
end
|
||||
end
|
||||
x = x + 1;
|
||||
end
|
||||
x = 0;
|
||||
sql = sql .. ") ";
|
||||
freeswitch.consoleLog("NOTICE", "result "..sql.."\n");
|
||||
extensions = {}
|
||||
status = dbh:query(sql, function(row)
|
||||
extensions[x] = row.extension;
|
||||
freeswitch.consoleLog("NOTICE", "result "..row.extension.."\n");
|
||||
x = x + 1;
|
||||
end);
|
||||
|
||||
--connect to the database
|
||||
if (file_exists(database_dir.."/core.db")) then
|
||||
--dbh = freeswitch.Dbh("core:core"); -- when using sqlite
|
||||
dbh = freeswitch.Dbh("sqlite://"..database_dir.."/core.db");
|
||||
else
|
||||
dofile(scripts_dir.."/resources/functions/database_handle.lua");
|
||||
dbh = database_handle('switch');
|
||||
end
|
||||
|
||||
--exits the script if we didn't connect properly
|
||||
assert(dbh:connected());
|
||||
|
||||
--check the database to get the uuid of a ringing call
|
||||
sql = "SELECT call_uuid AS uuid FROM channels ";
|
||||
sql = sql .. "WHERE callstate = 'RINGING' ";
|
||||
sql = sql .. "AND (";
|
||||
x = 0;
|
||||
for key,extension in pairs(extensions) do
|
||||
if (x == 0) then
|
||||
sql = sql .. " presence_id = '"..extension.."@"..domain_name.."' ";
|
||||
else
|
||||
sql = sql .. "OR presence_id = '"..extension.."@"..domain_name.."' ";
|
||||
end
|
||||
x = x + 1;
|
||||
end
|
||||
sql = sql .. ")";
|
||||
if (domain_count > 1) then
|
||||
sql = sql .. "and context = '"..context.."' ";
|
||||
end
|
||||
if (debug["sql"]) then
|
||||
freeswitch.consoleLog("NOTICE", "sql "..sql.."\n");
|
||||
end
|
||||
dbh:query(sql, function(result)
|
||||
--for key, val in pairs(result) do
|
||||
-- freeswitch.consoleLog("NOTICE", "result "..key.." "..val.."\n");
|
||||
--end
|
||||
uuid = result.uuid;
|
||||
end);
|
||||
end
|
||||
|
||||
--intercept a call that is ringing
|
||||
if (uuid) then
|
||||
session:execute("intercept", uuid);
|
||||
end
|
||||
|
||||
--notes
|
||||
--originate a call
|
||||
--cmd = "originate user/1007@voip.example.com &intercept("..uuid..")";
|
||||
--api = freeswitch.API();
|
||||
--result = api:executeString(cmd);
|
||||
|
||||
Reference in New Issue
Block a user