dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

exported vars are now asked to the LDAP server (instead of *)

Browse Source
This commit is contained in:
Xavier Guimard 2009-12-10 21:48:43 +00:00
parent 5499a042ab
commit 04ed7be634
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/UserDBLDAP.pm
View File

@ -5,6 +5,7 @@
# LDAP user database backend class
package Lemonldap::NG::Portal::UserDBLDAP;
use strict;
use Lemonldap::NG::Portal::Simple;
use Lemonldap::NG::Portal::_LDAP 'ldap'; #link protected ldap
@ -57,20 +58,25 @@ sub search {
base => $self->{ldapBase},
scope => 'sub',
filter => $self->{LDAPFilter},
(
ref( $self->{exportedVars} )
? ( attrs => values( %{ $self->{exportedVars} } ) )
: ()
),
);
$self->lmLog(
"LDAP Search with base: "
'LDAP Search with base: '
. $self->{ldapBase}
. " and filter: "
. ' and filter: '
. $self->{LDAPFilter},
'debug'
);
if ( $mesg->code() != 0 ) {
$self->lmLog( "LDAP Search error: " . $mesg->error, 'error' );
$self->lmLog( 'LDAP Search error: ' . $mesg->error, 'error' );
return PE_LDAPERROR;
}
unless ( $self->{entry} = $mesg->entry(0) ) {
$user = $self->{mail} || $self->{user};
my $user = $self->{mail} || $self->{user};
$self->_sub( 'userError', "$user was not found in LDAP directory" );
return PE_BADCREDENTIALS;
}