Skip Menu |

This queue is for tickets about the Net-FTPSSL CPAN distribution.

Report information
The Basics
Id: 104407
Status: resolved
Priority: 0/
Queue: Net-FTPSSL

People
Owner: Nobody in particular
Requestors: forrestt [...] usa.net
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.27
Fixed in: 0.29



Subject: rt.cpan.org #76108
Date: Wed, 13 May 2015 11:55:11 -0400
To: <bug-Net-FTPSSL [...] rt.cpan.org>
From: "Forrest Tiffany" <forrestt [...] usa.net>
I know this is an old bug, but I needed to support session reuse in a project I'm working on.  I have it working (although a bit of a kludge).  Here is a diff of FTPSSL.pm:

269a270,271
>      my $cache = IO::Socket::SSL::Session_Cache->new(10);
>
282a285,286
>      $ssl_args{SSL_session_cache} = $cache;
>      $ssl_args{SSL_session_key} = 'abcd1234';
657a662
>      $ssl_opts{SSL_session_key} = 'abcd1234';


I used 'abcd1234' as the session key because I couldn't quickly figure out how to access the original host/port to give the line at #662 the original values to reuse (i.e. "$commandChannelHost:$commandChannelPort").  This should point you in the right direction though.

Forrest

Hi Forrest, Thank you for using my module and taking the time to open a new CPAN bug report and submitting a patch. I'll look into it as soon as I can. In the meantime, can you please give me a trace using your patch so that I can follow your logs on what is happening? This will give me some needed information on implementing it. Including the version of my software you are using. Also can you please let me know what version of IO::Socket::SSL you are using? My logs don't currently tell me that. Try doing this in your sample program: use IO::Socket::SSL qw (debug3): # Turns on verbose SSL loging. use Net::FTPSSL; open (STDERR, "> myLogfile.txt"); # Redirects STDERR to this file. $ftps = Net::FTPSSL->new ($server, ..., Debug=>1); $ftps->trapWarn (); $ftps->login (user,pwd); $ftps->nlst(); $ftps->quit(); The above code snippet should be enough to demonstrate your patch in action & the logs should help me out a lot. Thanks Curtis On Wed May 13 11:55:27 2015, forrestt@usa.net wrote: Show quoted text
> I know this is an old bug, but I needed to support session reuse in a > project > I'm working on. I have it working (although a bit of a kludge). Here > is a diff > of FTPSSL.pm: > > 269a270,271
> > my $cache = IO::Socket::SSL::Session_Cache->new(10); > >
> 282a285,286
> > $ssl_args{SSL_session_cache} = $cache; > > $ssl_args{SSL_session_key} = 'abcd1234';
> 657a662
> > $ssl_opts{SSL_session_key} = 'abcd1234';
> > > I used 'abcd1234' as the session key because I couldn't quickly figure > out how > to access the original host/port to give the line at #662 the original > values > to reuse (i.e. "$commandChannelHost:$commandChannelPort"). This should > point > you in the right direction though. > > Forrest
Subject: [rt.cpan.org #104407]
Date: Thu, 28 May 2015 11:17:36 -0400
To: <bug-Net-FTPSSL [...] rt.cpan.org>
From: "Forrest Tiffany" <forrestt [...] usa.net>

This bug was actually a duplicate of BUG#76108.  I will update that bug with the requested information.  This bug should actually be closed as a duplicate.

Forrest

Forest, Just in case the other ticket doesn't forward the note to you since someone else opened the ticket. Attached is a beta for you to try out. Can you please run it against your test program & send me the logs it generates as an attachment? I've implemented your patch slightly different & I've updated the logging a bit as well. I'm hoping to see something that will give me a better way to assign the session key. When I implement a final release, I plan on adding a new option called "ReuseSession=>1" so that this logic is conditional. Since not everyone will need it. Curtis On Thu May 28 11:17:54 2015, forrestt@usa.net wrote: Show quoted text
> This bug was actually a duplicate of BUG#76108. I will update that bug > with the > requested information. This bug should actually be closed as a > duplicate. > > Forrest
Subject: FTPSSL.pm

Message body is not shown because it is too large.