# UserDB::AD inherits from UserDB::LDAP. It just redefined default filter
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;