This commits the changes to AEL to use the gosub-with-args from Tilghman to perform macro calls. This results in substantially smaller stack footprint, which allows macro call depths in excess of 100,000 levels, rather than the limit of 7 calls deep, which the Macro app is subject to.

git-svn-id: https://origsvn.digium.com/svn/asterisk/trunk@43747 65c4cc65-6c06-0410-ace0-fbb531ad65f3
This commit is contained in:
Steve Murphy
2006-09-27 03:45:22 +00:00
parent 2b7debf368
commit 35b951d2ac
14 changed files with 785 additions and 451 deletions

View File

@@ -10,7 +10,7 @@ context hd-queue {
0 => goto default|0|1;
1 => {
Dial(u41950@svm1.shsu.edu);
Dial(u41950@ixtlchochitl.zvbwu.edu);
Congestion(10);
Hangup;
};
@@ -116,12 +116,13 @@ context huntsville-calling {
macro dialout( number ) {
Realtime(call_info,exten,${CALLERIDNUM:5},mon_);
if ("${mon_monitor}" = "YES") {
Dial(SIP/${number}@sgw1.shsu.edu,,wW);
Dial(SIP/${number}@sgw2.shsu.edu,,wW);
Dial(SIP/${number}@zgw1.zvbwu.edu,,wW);
Dial(SIP/${number}@zgw2.zvbwu.edu,,wW);
} else {
Dial(SIP/${number}@sgw1.shsu.edu);
Dial(SIP/${number}@sgw2.shsu.edu);
Dial(SIP/${number}@zgw1.zvbwu.edu);
Dial(SIP/${number}@zgw2.zvbwu.edu);
};
return;
};
// Standard extension macro:
@@ -151,7 +152,7 @@ macro stdexten( ext ) {
&checkcfb(${ext});
break;
case "CHANUNAVAIL":
Dial(IAX2/asterisk:password@scm2.shsu.edu/${info_forwardto},25,wW);
Dial(IAX2/asterisk:password@ixtlchochitl.zvbwu.edu/${info_forwardto},25,wW);
MailboxExists(${ext});
// if ("${VMBOXEXISTSSTATUS}" = "FAILED") {
// Congestion(10);
@@ -182,7 +183,7 @@ macro stdexten( ext ) {
};
macro uvm( ext ) {
Dial(SIP/u${ext}@svm1.shsu.edu);
Dial(SIP/u${ext}@ixtlchochitl.zvbwu.edu);
Playback(im-sorry);
Playback(voice-mail-system);
Playback(down);
@@ -191,7 +192,7 @@ macro uvm( ext ) {
};
macro bvm( ext ) {
Dial(SIP/b${ext}@svm1.shsu.edu);
Dial(SIP/b${ext}@ixtlchochitl.zvbwu.edu);
Playback(im-sorry);
Playback(voice-mail-system);
Playback(down);
@@ -204,6 +205,7 @@ macro checkdnd( ext ) {
NoOp(Do Not Disturb is not active);
} else
&uvm(${ext});
return;
};
macro checkcf( ext ) {
@@ -213,6 +215,7 @@ macro checkcf( ext ) {
} else {
Set(info_forwardto=${ext}&SIP/${ext}w);
};
return;
};
macro checkcfb( ext ) {
@@ -227,6 +230,7 @@ macro checkcfb( ext ) {
Hangup;
};
&stdexten(${info_forwardbusy});
return;
};
///////////////////////////////////////////////////////////////////////////////
@@ -691,6 +695,7 @@ macro check-psd-exists ( ext ) {
System(/usr/local/bin/create_psd.sh ${ext});
} else
NoOp(PSD set for ${ext});
return;
};
context app-psd {
@@ -798,7 +803,7 @@ context vm-include {
context vm-direct {
s => {
Dial(SIP/5555@svm1.shsu.edu,20);
Dial(SIP/5555@ixtlchochitl.zvbwu.edu,20);
Playback(im-sorry);
Playback(voice-mail-system);
Playback(down);
@@ -810,7 +815,7 @@ context vm-direct {
context vm-extension {
s => {
Dial(SIP/62100@svm1.shsu.edu,20);
Dial(SIP/62100@ixtlchochitl.zvbwu.edu,20);
Playback(im-sorry);
Playback(voice-mail-system);
Playback(down);
@@ -822,7 +827,7 @@ context vm-extension {
context vm-directory {
5556 => {
Dial(SIP/5556@svm1.shsu.edu);
Dial(SIP/5556@ixtlchochitl.zvbwu.edu);
Playback(im-sorry);
Playback(voice-mail-system);
Playback(down);