LDAP Bind Operation mit Perl

Question

Ich versuche, einen LDAP-Server zu verbinden. Kunden gesendet folgende 3 info mir:

1. IP-Adresse des LDAP-Servers
2. Benutzername
3. Passwort

ich folgenden Code verwenden:

my $ldap = Net::LDAP->new ($ip_address) or die "$@"; 

my $mesg = $ldap->bind ($username, 
         password => $password, 
           ) or die $@; 

my $result = $ldap->search(
     base => $base, 
     filter => $filter 
     attrs => \@attributes, 
     ); 

die $result->error if $result->code; 

$ result-> Fehlerwert ist:

‚000004DC: LdapErr: DSID-0C090728, Kommentar:. Um diese Operation zu einem erfolgreichen binden ausführen muss auf der Verbindung abgeschlossen sein,

Nach Nachricht, binden ist nicht erfolgreich. Aber es sollte sterben, wenn es nicht erfolgreich war. Ich habe das Passwort geändert, habe den falschen Wert geschrieben, es ist wieder nicht gestorben.

ich abgeladen $ mesg die Rückgabewert binden und sah folgende Meldung:

‚80.090.308: LdapErr: DSID-0C0903C5, Kommentar: AcceptSecurityContext Fehler

Aber es ist auch mit dem korrekten Benutzernamen und Passwort auch. Der Benutzername lautet 'itservice'. Ich verwende wie folgt:

my $mesg = $ldap->bind ('itservice', 
         password => $password, 
         ) or die $@; 

Ich habe versucht, wie folgt, aber Ergebnis ist das gleiche

my $mesg = $ldap->bind ('cn=itservice', 
          password => $password, 
          ) or die $@; 

Gibt es ein anderes Format von Benutzername oder Passwort?

Answer 1

Die LDAP-Bind-Anforderung erfordert einen gültigen DN für den Benutzer und nicht nur einen Benutzernamen. Normalerweise suchen Anwendungen zuerst nach Benutzername, um den Benutzer-DN abzurufen, und binden dann als Benutzer.