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
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