ViciDial/ViciDialSVN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Small changes for last commit, FastAGIServer

Browse Source 
git-svn-id: svn://192.168.202.10@4016 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2026-08-27 20:05:07 +00:00
parent 74888700cd
commit 11f445e249
2 changed files with 15 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
agc_2-X/trunk/experimental/FastAGIServer/AGIHandlers/VD_amd.pm
+2 -2
View File
@@ -20,10 +20,10 @@ package AGIHandlers::VD_amd;
# exten => 8381,n,Hangup() # exten => 8381,n,Hangup()
# #
# exten => 8320,1,Set(AGIARGS=${EXTEN},YES) # exten => 8320,1,Set(AGIARGS=${EXTEN},YES)
# exten => 8320,n,AGI(agi://127.0.0.1:4573/VD_amd.agi) # exten => 8320,n,AGI(agi://127.0.0.1:4573/VD_amd)
# exten => 8320,n,Hangup() # exten => 8320,n,Hangup()
# exten => _8320*,1,Set(AGIARGS=${EXTEN},YES) # exten => _8320*,1,Set(AGIARGS=${EXTEN},YES)
# exten => _8320*,n,AGI(agi://127.0.0.1:4573/VD_amd.agi) # exten => _8320*,n,AGI(agi://127.0.0.1:4573/VD_amd)
# exten => _8320*,n,Hangup() # exten => _8320*,n,Hangup()
# #
# To use the new "AMDMINLEN" feature, put a similar line like following line in your outbound dialing dialplan IMMEDIATELY BEFORE the "Dial(" line: # To use the new "AMDMINLEN" feature, put a similar line like following line in your outbound dialing dialplan IMMEDIATELY BEFORE the "Dial(" line:
agc_2-X/trunk/experimental/FastAGIServer/FastAGIServer.pl
+13 -1
View File
@@ -14,6 +14,7 @@
# #
# changes: # changes:
# 260826-1814 - Initial Build # 260826-1814 - Initial Build
# 260827-1559 - Changed to dated logfiles
# #
use strict; use strict;
@@ -35,9 +36,20 @@ use Getopt::Long qw(GetOptions);
BEGIN { $0 = abs_path($0); } BEGIN { $0 = abs_path($0); }
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$year = ($year + 1900);
$mon++;
my $wtoday = $wday;
if ($mon < 10) {$mon = "0$mon";}
if ($mday < 10) {$mday = "0$mday";}
if ($hour < 10) {$hour = "0$hour";}
if ($min < 10) {$min = "0$min";}
if ($sec < 10) {$sec = "0$sec";}
my $file_date = "$year-$mon-$mday";
my $nofork = 0; my $nofork = 0;
my $loglevel = 3; my $loglevel = 3;
my $logfile = '/var/log/astguiclient/FastAGI-server.log'; my $logfile = '/var/log/astguiclient/FastAGI-server.'.$file_date;
# Bind options to variables # Bind options to variables
GetOptions( GetOptions(