# UserDB::AD inherits from UserDB::LDAP. It just redefined default filter
package
Lemonldap::NG::Portal::UserDB::AD;
use
strict;
use
Mouse;
our
$VERSION
=
'2.0.11'
;
# PROPERTIES
has
filter
=> (
is
=>
'rw'
,
lazy
=> 1,
builder
=>
sub
{
$_
[0]->{conf}->{AuthLDAPFilter} ||=
'(&(sAMAccountName=$user)(objectClass=person))'
;
$_
[0]->{conf}->{mailLDAPFilter} ||=
'(&(mail=$mail)(objectClass=person))'
;
return
$_
[0]->buildFilter;
}
);
has
findUserFilter
=> (
is
=>
'ro'
,
lazy
=> 1,
builder
=>
sub
{
$_
[0]->conf->{AuthLDAPFilter}
||
$_
[0]->conf->{LDAPFilter}
||
'(&(sAMAccountName=$user)(objectClass=person))'
;
}
);
1;