PerlによるLDAPバインド操作

Question

LDAPサーバーに接続しようとしています。

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->：私は次のコードを使用していLDAPサーバ

ユーザ名

パスワード

の

1. IPアドレス：お客様が私には3情報次送らエラー値：

   '000004DC：LdapErr：DSID-0C090728、コメント：この操作を実行するには、接続で正常なバインドを完了する必要があります。

   メッセージによると、バインドは成功しません。しかし、それが失敗した場合には死ぬべきです。私はパスワードを変更し、間違った価値を書いた、それは再び死ぬことはなかった。

   私は、バインドの戻り値である$のMESGをダンプし、次のメッセージを見た：

   「80090308：LdapErr：DSID-0C0903C5、コメント：AcceptSecurityContextエラー

   しかし、それは正しいユーザ名と同じですがとパスワードも。ユーザー名は 'itservice'です。

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

   は、私は次のように試みたが、結果は同じです

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

   ユーザー名やパスワードを使用して、任意の他の形式があります：私は次のように使用していますか？

Answer 1

LDAPバインド要求には、ユーザー名だけでなくユーザーの有効なDNが必要です。 通常、アプリケーションは最初にuserNameを検索してユーザーDNを取得し、ユーザーとしてバインドします。