r23484: When chasing AD referrals make sure to honor the base returned from the server.

[kai/samba.git] / examples / misc / adssearch.pl

diff --git a/examples/misc/adssearch.pl b/examples/misc/adssearch.pl
index 4482222934f5e7e2ba6db0c49da33910a0f8b7e8..da22c57f7e4032a87c51a837f052a740242c9c20 100755 (executable)
--- a/examples/misc/adssearch.pl
+++ b/examples/misc/adssearch.pl
@@ -1781,8 +1781,9 @@ sub main () {
                if (!$opt_notify && ($async_search->code == LDAP_REFERRAL)) {
                        foreach my $ref ($async_search->referrals) {
                                print "\ngot Referral: [$ref]\n";
+                               my ($prot, $host, $base) = split(/\/+/, $ref);
                                $async_ldap_hd->unbind();
-                               $async_ldap_hd = get_ldap_hd($ref, 1);
+                               $async_ldap_hd = get_ldap_hd($host, 1);
                                if (do_bind($async_ldap_hd, $sasl_bind) == -1) {
                                        $async_ldap_hd->unbind();
                                        next;