diff --git a/agc_2-X/trunk/experimental/FastAGIServer/AGIHandlers/VD_amd.pm b/agc_2-X/trunk/experimental/FastAGIServer/AGIHandlers/VD_amd.pm index 559cbd46..7861b86c 100644 --- a/agc_2-X/trunk/experimental/FastAGIServer/AGIHandlers/VD_amd.pm +++ b/agc_2-X/trunk/experimental/FastAGIServer/AGIHandlers/VD_amd.pm @@ -20,10 +20,10 @@ package AGIHandlers::VD_amd; # exten => 8381,n,Hangup() # # 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*,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() # # To use the new "AMDMINLEN" feature, put a similar line like following line in your outbound dialing dialplan IMMEDIATELY BEFORE the "Dial(" line: diff --git a/agc_2-X/trunk/experimental/FastAGIServer/FastAGIServer.pl b/agc_2-X/trunk/experimental/FastAGIServer/FastAGIServer.pl index 77a47ef0..113f2b30 100644 --- a/agc_2-X/trunk/experimental/FastAGIServer/FastAGIServer.pl +++ b/agc_2-X/trunk/experimental/FastAGIServer/FastAGIServer.pl @@ -14,6 +14,7 @@ # # changes: # 260826-1814 - Initial Build +# 260827-1559 - Changed to dated logfiles # use strict; @@ -35,9 +36,20 @@ use Getopt::Long qw(GetOptions); 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 $loglevel = 3; -my $logfile = '/var/log/astguiclient/FastAGI-server.log'; +my $logfile = '/var/log/astguiclient/FastAGI-server.'.$file_date; # Bind options to variables GetOptions(