/[virtual-ldap]/lib/LDAP/Virtual.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/LDAP/Virtual.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

lib/VLDAP/Server.pm revision 3 by dpavlin, Sat Mar 14 14:44:45 2009 UTC lib/LDAP/Virtual.pm revision 4 by dpavlin, Sat Mar 14 14:47:54 2009 UTC
# Line 1  Line 1 
1  package VLDAP::Server;  package LDAP::Virtual;
2    
3  use strict;  use strict;
4  use warnings;  use warnings;
# Line 24  use Data::Dump qw/dump/; Line 24  use Data::Dump qw/dump/;
24    
25  =head1 NAME  =head1 NAME
26    
27  VLDAP::Server  LDAP::Virtual
28    
29  =cut  =cut
30    
# Line 36  Provide LDAP server functionality somewh Line 36  Provide LDAP server functionality somewh
36    
37  =head2 run  =head2 run
38    
39    my $pid = VLDAP::Server->run({ port => 1389, fork => 0 });    my $pid = LDAP::Virtual->run({ port => 1389, fork => 0 });
40    
41  =cut  =cut
42    
# Line 82  sub run { Line 82  sub run {
82                                  # let's create a new socket                                  # let's create a new socket
83                                  my $psock = $sock->accept;                                  my $psock = $sock->accept;
84                                  $sel->add($psock);                                  $sel->add($psock);
85                                  $Handlers{*$psock} = VLDAP::Server->new($psock);                                  $Handlers{*$psock} = LDAP::Virtual->new($psock);
86                          } else {                          } else {
87                                  my $result = $Handlers{*$fh}->handle;                                  my $result = $Handlers{*$fh}->handle;
88                                  if ($result) {                                  if ($result) {
# Line 98  sub run { Line 98  sub run {
98    
99  =head2 stop  =head2 stop
100    
101    my $stopped_pids = VLDAP::Server->stop;    my $stopped_pids = LDAP::Virtual->stop;
102    
103  =cut  =cut
104    
Legend:
Removed from v.3  
changed lines
  Added in v.4
  ViewVC Help
Powered by ViewVC 1.1.26