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

Added comments for TLS Session Resumption settings to FTPSSL recording transfer scripts

Browse Source 
git-svn-id: svn://192.168.202.10@3194 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2020-02-05 22:23:50 +00:00
parent a33676bdc4
commit f7fa139b9a
2 changed files with 29 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
agc_2-X/trunk/bin/AST_CRON_audio_3_ftp_FTPSSL.pl
+15 -1
View File
@@ -52,11 +52,12 @@
#
# This program assumes that recordings are saved by Asterisk as .wav
#
# Copyright (C) 2018 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
# Copyright (C) 2020 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
#
#
# 180518-0732 - First Build based upon AST_CRON_audio_3_ftp.pl script
# 180616-2248 - Added --localdatedir option
# 200205-1716 - Added comments for TLS Session Resumption settings
#
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
@@ -530,6 +531,19 @@ foreach(@FILES)
{
$ftps = Net::FTPSSL->new("$VARFTP_host", Port => $VARFTP_port, Encryption => EXP_CRYPT, Debug => $FTPdb);
}
# for "TLS Session Resumption", use the below connection options:
# $ftps = Net::FTPSSL->new("$VARFTP_host", Port => $VARFTP_port, Encryption => IMP_CRYPT, Debug => $FTPdb, Trace => 1, SSL_Client_Certificate => { SSL_session_cache_size => 100 });
# For advanced debug, you may need to do the following:
# Here is how to enable high debug in the IO::Socket::SSL library that Net::FTPSSL is using:
# $IO::Socket::SSL::DEBUG = 3;
# and here are the possible values:
# 0 - No debugging (default).
# 1 - Print out errors from IO::Socket::SSL and ciphers from Net::SSLeay.
# 2 - Print also information about call flow from IO::Socket::SSL and progress information from Net::SSLeay.
# 3 - Print also some data dumps from IO::Socket::SSL and from Net::SSLeay.
if($DBX){print STDERR "DEBUG: auth: ($VARFTP_user|$VARFTP_pass)\n";}
$ftps->login($VARFTP_user,$VARFTP_pass);
$ftps->cwd("$VARFTP_dir");
agc_2-X/trunk/bin/AST_CRON_audio_4_ftp2_FTPSSL.pl
+14 -1
View File
@@ -39,12 +39,13 @@
#
# This program assumes that recordings are saved by Asterisk as .wav
#
# Copyright (C) 2018 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
# Copyright (C) 2020 Matt Florell <vicidial@gmail.com> LICENSE: AGPLv2
#
# CHANGES:
# 130730-1849 - First Build based upon AST_CRON_audio_4_ftp2.pl script
# 161212-1650 - Changed to use hard-coded encryption flag for module
# 180516-2011 - Added --noping option
# 200205-1717 - Added comments for TLS Session Resumption settings
#
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
@@ -424,6 +425,18 @@ foreach(@FILES)
{
$ftps = Net::FTPSSL->new("$VARFTP_host", Port => $VARFTP_port, Encryption => EXP_CRYPT, Debug => $FTPdb);
}
# for "TLS Session Resumption", use the below connection options:
# $ftps = Net::FTPSSL->new("$VARFTP_host", Port => $VARFTP_port, Encryption => IMP_CRYPT, Debug => $FTPdb, Trace => 1, SSL_Client_Certificate => { SSL_session_cache_size => 100 });
# For advanced debug, you may need to do the following:
# Here is how to enable high debug in the IO::Socket::SSL library that Net::FTPSSL is using:
# $IO::Socket::SSL::DEBUG = 3;
# and here are the possible values:
# 0 - No debugging (default).
# 1 - Print out errors from IO::Socket::SSL and ciphers from Net::SSLeay.
# 2 - Print also information about call flow from IO::Socket::SSL and progress information from Net::SSLeay.
# 3 - Print also some data dumps from IO::Socket::SSL and from Net::SSLeay.
if($DBX){print STDERR "DEBUG: auth: ($VARFTP_user|$VARFTP_pass)\n";}
$ftps->login($VARFTP_user,$VARFTP_pass);
$ftps->cwd("$VARFTP_dir");