/[virtual-ldap]/bin/ldap-rewrite.pl
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 /bin/ldap-rewrite.pl

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

revision 67 by dpavlin, Sun Feb 21 01:02:47 2010 UTC revision 68 by dpavlin, Sun Feb 21 16:12:31 2010 UTC
# Line 103  sub log_request { Line 103  sub log_request {
103                  if ( $request->{bindRequest}->{name} =~ m{@} ) {                  if ( $request->{bindRequest}->{name} =~ m{@} ) {
104                          my $old = $request->{bindRequest}->{name};                          my $old = $request->{bindRequest}->{name};
105                          $request->{bindRequest}->{name} =~ s/[@\.]/,dc=/g;                          $request->{bindRequest}->{name} =~ s/[@\.]/,dc=/g;
106                          $request->{bindRequest}->{name} =~ s/^/uid=/;                          $request->{bindRequest}->{name} =~ s/^/uid=/ unless $request->{bindRequest}->{name} =~ m/^uid=/;
107                          warn "rewrite bind cn $old -> ", $request->{bindRequest}->{name};                          warn "rewrite bind cn $old -> ", $request->{bindRequest}->{name};
108                          Convert::ASN1::asn_hexdump(\*STDOUT,$pdu) if $debug;                          Convert::ASN1::asn_hexdump(\*STDOUT,$pdu) if $debug;
109                          $pdu = $LDAPRequest->encode($request);                          $pdu = $LDAPRequest->encode($request);

Legend:
Removed from v.67  
changed lines
  Added in v.68

  ViewVC Help
Powered by ViewVC 1.1.26