203 lines
6.9 KiB
Lua
203 lines
6.9 KiB
Lua
--
|
|
-- 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-2022
|
|
-- the Initial Developer. All Rights Reserved.
|
|
--
|
|
-- Contributor(s):
|
|
-- Mark J Crane <markjcrane@fusionpbx.com>
|
|
|
|
--predefined variables
|
|
predefined_destination = '';
|
|
fallback_destination = '';
|
|
|
|
--define the trim function
|
|
require "resources.functions.trim";
|
|
|
|
--define the explode function
|
|
require "resources.functions.explode";
|
|
|
|
--prepare the api object
|
|
api = freeswitch.API();
|
|
|
|
--answer the call
|
|
if (session:ready()) then
|
|
session:answer();
|
|
end
|
|
|
|
--get and save the variables
|
|
if (session:ready()) then
|
|
sound_greeting = session:getVariable("sound_greeting");
|
|
sound_pin = session:getVariable("sound_pin");
|
|
sound_extension = session:getVariable("sound_extension");
|
|
pin_number = session:getVariable("pin_number");
|
|
sounds_dir = session:getVariable("sounds_dir");
|
|
predefined_destination = session:getVariable("predefined_destination");
|
|
fallback_destination = session:getVariable("fallback_destination");
|
|
digit_min_length = session:getVariable("digit_min_length");
|
|
digit_max_length = session:getVariable("digit_max_length");
|
|
digit_timeout = session:getVariable("digit_timeout");
|
|
context = session:getVariable("context");
|
|
privacy = session:getVariable("privacy");
|
|
max_tries = session:getVariable("max_tries");
|
|
pin_tries = session:getVariable("pin_tries");
|
|
extension_tries = session:getVariable("extension_tries");
|
|
end
|
|
|
|
--set the sounds path for the language, dialect and voice
|
|
if (session:ready()) then
|
|
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
|
|
end
|
|
|
|
--set defaults
|
|
if (not digit_min_length) then
|
|
digit_min_length = "7";
|
|
end
|
|
|
|
if (not digit_max_length) then
|
|
digit_max_length = "11";
|
|
end
|
|
|
|
if (not digit_timeout) then
|
|
digit_timeout = "5000";
|
|
end
|
|
|
|
session:sleep(1500);
|
|
|
|
if (not sound_pin) then
|
|
sound_pin = sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/ivr/ivr-please_enter_pin_followed_by_pound.wav";
|
|
end
|
|
|
|
if (not sound_extension) then
|
|
sound_extension = sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/ivr/ivr-enter_destination_telephone_number.wav";
|
|
end
|
|
|
|
if (not max_tries) then
|
|
max_tries = "3";
|
|
end
|
|
|
|
if (not pin_tries) then
|
|
pin_tries = max_tries;
|
|
end
|
|
|
|
if (not extension_tries) then
|
|
extension_tries = max_tries;
|
|
end
|
|
|
|
--if the sound_greeting is provided then play it
|
|
if (session:ready() and sound_greeting) then
|
|
session:streamFile(sound_greeting);
|
|
session:sleep(200);
|
|
end
|
|
|
|
--if the pin number is provided then require it
|
|
if (session:ready() and pin_number) then
|
|
min_digits = string.len(pin_number);
|
|
max_digits = string.len(pin_number)+1;
|
|
digits = session:playAndGetDigits(min_digits, max_digits, pin_tries, digit_timeout, "#", sound_pin, "", "\\d+");
|
|
if (digits == pin_number) then
|
|
--pin is correct
|
|
else
|
|
session:streamFile(sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/ivr/ivr-pin_or_extension_is-invalid.wav");
|
|
session:streamFile(sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/ivr/ivr-im_sorry.wav");
|
|
session:streamFile(sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/voicemail/vm-goodbye.wav");
|
|
session:hangup("NORMAL_CLEARING");
|
|
return;
|
|
end
|
|
end
|
|
|
|
--if a predefined_destination is provided then set the number to the predefined_destination
|
|
if (session:ready()) then
|
|
if (predefined_destination) then
|
|
destination_number = predefined_destination;
|
|
else
|
|
session:sleep(1000);
|
|
dtmf = ""; --clear dtmf digits to prepare for next dtmf request
|
|
destination_number = session:playAndGetDigits(digit_min_length, digit_max_length, extension_tries, digit_timeout, "#", sound_extension, "", "\\d+");
|
|
if (string.len(destination_number) == 0 and fallback_destination) then
|
|
destination_number = fallback_destination;
|
|
end
|
|
--if (string.len(destination_number) == 10) then destination_number = "1"..destination_number; end
|
|
end
|
|
end
|
|
|
|
--set privacy
|
|
if (session:ready()) then
|
|
if (privacy == "true") then
|
|
session:execute("privacy", "full");
|
|
session:execute("set", "sip_h_Privacy=id");
|
|
session:execute("set", "privacy=yes");
|
|
end
|
|
end
|
|
|
|
--set the caller id name and number for external calls
|
|
if (session:ready()) then
|
|
cmd = "user_exists id ".. destination_number .." "..context;
|
|
user_exists = trim(api:executeString(cmd));
|
|
if (user_exists == "false") then
|
|
--get the outbound caller id variables
|
|
outbound_caller_id_name = session:getVariable("outbound_caller_id_name");
|
|
outbound_caller_id_number = session:getVariable("outbound_caller_id_number");
|
|
|
|
--get the outbound caller ID information if it is set otherwise keep the original caller id
|
|
if (outbound_caller_id_name) then
|
|
caller_id_name = session:getVariable("outbound_caller_id_name");
|
|
else
|
|
caller_id_name = session:getVariable("caller_id_name");
|
|
end
|
|
if (outbound_caller_id_number) then
|
|
caller_id_number = session:getVariable("outbound_caller_id_number");
|
|
else
|
|
caller_id_number = session:getVariable("caller_id_number");
|
|
end
|
|
|
|
--set the outbound and effective caller ID information
|
|
if (caller_id_name) then
|
|
session:execute("set", "outbound_caller_id_name="..caller_id_name);
|
|
session:execute("set", "effective_caller_id_name="..caller_id_name);
|
|
end
|
|
if (caller_id_number) then
|
|
session:execute("set", "outbound_caller_id_number="..caller_id_number);
|
|
session:execute("set", "effective_caller_id_number="..caller_id_number);
|
|
end
|
|
end
|
|
end
|
|
|
|
--get the caller id number
|
|
--if (session:ready()) then
|
|
-- min_digits = 7;
|
|
-- max_digits = 20;
|
|
-- session:sleep(1000);
|
|
-- caller_id_number = session:playAndGetDigits(min_digits, max_digits, max_tries, digit_timeout, "#", sounds_dir.."/"..default_language.."/"..default_dialect.."/"..default_voice.."/ivr/ivr-enter_source_telephone_number.wav", "", "\\d+");
|
|
-- caller_id_name = '';
|
|
-- if (string.len(caller_id_number) == 0) then
|
|
-- sesssion:hangup();
|
|
-- end
|
|
--end
|
|
|
|
--send the destination
|
|
if (session:ready()) then
|
|
session:execute("set","disa_outbound=true");
|
|
session:execute("transfer", destination_number .. " XML " .. context);
|
|
end
|