Skip to content
Browse files

created search method

  • Loading branch information...
1 parent bf18ae0 commit e2032a122931b45b8ee2d49d22fe3cfd7f381ee4 @russoz russoz committed Nov 21, 2010
Showing with 13 additions and 0 deletions.
  1. +13 −0 lib/Net/LDAP/SimpleServer/ProtocolHandler.pm
View
13 lib/Net/LDAP/SimpleServer/ProtocolHandler.pm
@@ -106,6 +106,15 @@ sub bind {
return $ok;
}
+sub search {
+ my ( $self, $request ) = @_;
+
+ print STDERR '=' x 70 . "\n";
+ print STDERR Dumper($request);
+
+ return _make_result(qw/LDAP_SUCCESS/);
+}
+
1; # Magic true value required at end of module
__END__
@@ -151,6 +160,10 @@ as in the L<Net::LDAP::Server> module.
Handles a bind REQUEST from the LDAP client.
+=item search( REQUEST )
+
+Performs a search in the data store
+
=back
=for head1 DIAGNOSTICS

0 comments on commit e2032a1

Please sign in to comment.
Something went wrong with that request. Please try again.