Added post answer send dtmf global script.
git-svn-id: http://voip.null.ro/svn/yate@4446 acf43c95-373e-0410-b603-e72c3f656dc1
This commit is contained in:
parent
bf8bc1a591
commit
d53ab41f26
|
@ -0,0 +1,169 @@
|
||||||
|
#!/usr/bin/php -q
|
||||||
|
<?php
|
||||||
|
/* Post answer DTMF sender
|
||||||
|
Set in extmodule.conf:
|
||||||
|
|
||||||
|
[scripts]
|
||||||
|
postanm_dtmf.php=
|
||||||
|
|
||||||
|
Parameters handled in call.answered:
|
||||||
|
postanm_dtmf: boolean: Handle the message. Defaults to true
|
||||||
|
postanm_dtmf_text: string: Tones to send. The message will be ignored if text is empty
|
||||||
|
postanm_dtmf_outbound: boolean: Send DTMFs to called (true) or caller (false). Defaults to false
|
||||||
|
postanm_dtmf_delay: integer: Interval to delay the tones in seconds. Defaults to 0
|
||||||
|
*/
|
||||||
|
require_once("libyate.php");
|
||||||
|
|
||||||
|
$param = "postanm_dtmf";
|
||||||
|
$calls = array();
|
||||||
|
$tones = array();
|
||||||
|
$defDelay = 0; // Default delay value
|
||||||
|
|
||||||
|
// Always the first action to do
|
||||||
|
Yate::Init();
|
||||||
|
// Uncomment next line to get debugging messages
|
||||||
|
Yate::Debug(true);
|
||||||
|
|
||||||
|
function getBoolValue($str,$defVal)
|
||||||
|
{
|
||||||
|
if (empty($str))
|
||||||
|
return $defVal;
|
||||||
|
return Yate::Str2bool($str);
|
||||||
|
}
|
||||||
|
|
||||||
|
// Set/unset array value
|
||||||
|
function setupCall($key,$set,$interval = 0,$text = "")
|
||||||
|
{
|
||||||
|
global $param;
|
||||||
|
global $calls;
|
||||||
|
global $tones;
|
||||||
|
|
||||||
|
Yate::Debug($param . ": setupCall(" . $key . "," . $set . ")");
|
||||||
|
if ($set) {
|
||||||
|
$calls[$key] = $interval;
|
||||||
|
$tones[$key] = $text;
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
unset($calls[$key]);
|
||||||
|
unset($tones[$key]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// Masquerade a chan.dtmf
|
||||||
|
function sendTones($id,$text)
|
||||||
|
{
|
||||||
|
global $param;
|
||||||
|
|
||||||
|
Yate::Debug($param . ": sendTones(" . $id ."," . $text . ")");
|
||||||
|
$m = new Yate("chan.masquerade");
|
||||||
|
$m->params["id"] = $id;
|
||||||
|
$m->params["message"] = "chan.dtmf";
|
||||||
|
$m->params["text"] = $text;
|
||||||
|
$m->Dispatch();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Handle call.answered
|
||||||
|
function callAnswered($ev,$text)
|
||||||
|
{
|
||||||
|
global $param;
|
||||||
|
global $defDelay;
|
||||||
|
|
||||||
|
$evId = $ev->GetValue("id");
|
||||||
|
$evPeerId = $ev->GetValue("peerid");
|
||||||
|
$outbound = getBoolValue($ev->getValue($param . "_outbound"),false);
|
||||||
|
$tmp = $ev->getValue($param . "_delay");
|
||||||
|
$delay = $defDelay;
|
||||||
|
if (!empty($tmp)) {
|
||||||
|
$val = (int)$tmp;
|
||||||
|
if ($val >= 0)
|
||||||
|
$delay = $val;
|
||||||
|
}
|
||||||
|
Yate::Debug($param . ": Handling " . $ev->name . " text=" . $text . " id=" . $evId . " peerid=" . $evPeerId . " outbound=" . $outbound . " delay=" . $delay);
|
||||||
|
if ($outbound) {
|
||||||
|
if (empty($evPeerId))
|
||||||
|
return;
|
||||||
|
$evId = $evPeerId;
|
||||||
|
}
|
||||||
|
else if (empty($evId))
|
||||||
|
return;
|
||||||
|
if ($delay > 0)
|
||||||
|
setupCall($evId,true,$delay,$text);
|
||||||
|
else
|
||||||
|
sendTones($evId,$text);
|
||||||
|
}
|
||||||
|
|
||||||
|
function checkCalls()
|
||||||
|
{
|
||||||
|
global $calls;
|
||||||
|
global $tones;
|
||||||
|
|
||||||
|
foreach ($calls as $key => $call) {
|
||||||
|
$calls[$key]--;
|
||||||
|
if ($calls[$key] <= 0) {
|
||||||
|
sendTones($key,$tones[$key]);
|
||||||
|
setupCall($key,false);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
Yate::Watch("call.answered");
|
||||||
|
Yate::Install("chan.hangup");
|
||||||
|
Yate::Install("engine.timer");
|
||||||
|
// Restart if terminated
|
||||||
|
Yate::SetLocal("restart",true);
|
||||||
|
|
||||||
|
Yate::Debug($param . ": Starting");
|
||||||
|
|
||||||
|
/* The main loop. We pick events and handle them */
|
||||||
|
for (;;) {
|
||||||
|
$ev=Yate::GetEvent();
|
||||||
|
/* If Yate disconnected us then exit cleanly */
|
||||||
|
if ($ev === false)
|
||||||
|
break;
|
||||||
|
/* Empty events are normal in non-blocking operation.
|
||||||
|
This is an opportunity to do idle tasks and check timers */
|
||||||
|
if ($ev === true) {
|
||||||
|
Yate::Debug($param . ": empty event");
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
switch ($ev->type) {
|
||||||
|
case "incoming":
|
||||||
|
if ($ev->name == "engine.timer")
|
||||||
|
checkCalls();
|
||||||
|
else if ($ev->name == "chan.hangup") {
|
||||||
|
$id = $ev->getValue("id");
|
||||||
|
if (!empty($id))
|
||||||
|
setupCall($id,false);
|
||||||
|
}
|
||||||
|
$ev->Acknowledge();
|
||||||
|
break;
|
||||||
|
case "answer":
|
||||||
|
if ($ev->name == "call.answered") {
|
||||||
|
$text = "";
|
||||||
|
if (getBoolValue($ev->getValue($param),true))
|
||||||
|
$text = $ev->getValue($param . "_text");
|
||||||
|
if (!empty($text))
|
||||||
|
callAnswered($ev,$text);
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case "watched":
|
||||||
|
Yate::Debug($param . ": Watching " . $ev->name);
|
||||||
|
break;
|
||||||
|
case "installed":
|
||||||
|
Yate::Debug($param . ": Installed " . $ev->name);
|
||||||
|
break;
|
||||||
|
case "uninstalled":
|
||||||
|
Yate::Debug($param . ": Uninstalled " . $ev->name);
|
||||||
|
break;
|
||||||
|
case "setlocal":
|
||||||
|
Yate::Debug($param . ": Parameter ". $ev->name . "=" . $ev->retval . ($ev->handled ? " (OK)" : " (error)"));
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
Yate::Debug($param . ": Event " . $ev->type);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
Yate::Debug($param . ": Terminated");
|
||||||
|
|
||||||
|
/* vi: set ts=8 sw=4 sts=4 noet: */
|
||||||
|
?>
|
Loading…
Reference in New Issue