use ssl connection to upstream ldap

[virtual-ldap] / bin / ldap-rewrite.pl

diff --git a/bin/ldap-rewrite.pl b/bin/ldap-rewrite.pl
index b3080f8..58c8222 100755 (executable)
--- a/bin/ldap-rewrite.pl
+++ b/bin/ldap-rewrite.pl
@@ -9,6 +9,7 @@ use warnings;
 
 use IO::Select;
 use IO::Socket;
+use IO::Socket::SSL;
 use warnings;
 use Data::Dump qw/dump/;
 use Convert::ASN1 qw(asn_read);
@@ -144,6 +145,8 @@ my $targetsock = new IO::Socket::INET (
        PeerPort => 389,
 );
 
+$targetsock = IO::Socket::SSL->new("ldap.ffzg.hr:ldaps");
+
 run_proxy($listenersock,$targetsock);
 
 1;