|
Lines 146-152
sub checkpw_ldap {
Link Here
|
| 146 |
my $res = $db->bind( $principal_name, password => $password ); |
146 |
my $res = $db->bind( $principal_name, password => $password ); |
| 147 |
if ( $res->code ) { |
147 |
if ( $res->code ) { |
| 148 |
warn "LDAP bind failed as kohauser $userid: " . description($res); |
148 |
warn "LDAP bind failed as kohauser $userid: " . description($res); |
| 149 |
return -1; |
149 |
if ( $res->code == 34 ) { # invalid DN, probably local user |
|
|
150 |
return 0; # fallback to local auth |
| 151 |
} else { |
| 152 |
return -1; # invalid password |
| 153 |
} |
| 150 |
} |
154 |
} |
| 151 |
if ( !defined($userldapentry) |
155 |
if ( !defined($userldapentry) |
| 152 |
&& ( $config{update} or $config{replicate} ) ) |
156 |
&& ( $config{update} or $config{replicate} ) ) |
| 153 |
- |
|
|