oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

changes for adding ldap recursive filter

Browse source
This commit is contained in:
Frank Dillon 2006-07-12 20:31:02 +00:00
parent 45b5d6ea5b
commit ec4245a7d8
2 changed files with 24 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/LDAPLink.pm
View file

@ -267,6 +267,7 @@ sub recurseProperty {
my $property = $_[2];
my $recProperty = $_[3] || $property;
my $count = $_[4] || 0;
my $recurseFilter = $_[5] || $self->get->{globalRecursiveFilter};
return unless($ldap && $base && $property);
#Prevent infinate recursion
@ -293,7 +294,8 @@ sub recurseProperty {
$properties = $entry->get_value($recProperty,asref => 1);
}
foreach my $prop (@{$properties}) {
$self->recurseProperty($prop,$array,$property,$recProperty,$count);
next if ($recurseFilter && $prop =~ m/$recurseFilter/ig);
$self->recurseProperty($prop,$array,$property,$recProperty,$count,$recurseFilter);
}
}
}