[ Index ] |
PHP Cross Reference of Unnamed Project |
[Summary view] [Print] [Text view]
1 2 package Net::LDAP::Extension::WhoAmI; 3 4 require Net::LDAP::Extension; 5 6 $VERSION = "0.01"; 7 @ISA = qw(Net::LDAP::Extension); 8 9 sub Net::LDAP::who_am_i { 10 my $ldap = shift; 11 my %opt = @_; 12 13 my $res = $ldap->extension( name => '1.3.6.1.4.1.4203.1.11.3', %opt ); 14 return $res; 15 } 16 17 1; 18 19 __END__ 20 21 =head1 NAME 22 23 Net::LDAP::Extension::WhoAmI - LDAP "Who am I?" Operation 24 25 =head1 SYNOPSIS 26 27 use Net::LDAP; 28 use Net::LDAP::Extension::WhoAmI; 29 30 $ldap = Net::LDAP->new( "ldap.mydomain.eg" ); 31 32 $ldap->bind('cn=Joe User,cn=People,dc=example,dc=com", 33 password => 'secret'); 34 35 $mesg = $ldap->who_am_i(); 36 37 die "error: ", $mesg->code(), ": ", $mesg->error() if ($mesg->code()); 38 39 print "you are bound with authzId ", $mesg->response(), "\n"; 40 41 42 =head1 DESCRIPTION 43 44 C<Net::LDAP::Extension::WhoAmI> implements the C<Who am I?> 45 extended LDAPv3 operation as described in draft-zeilenga-ldap-authzid-09. 46 47 It implements no object by itself but extends the L<Net::LDAP> object 48 by another method: 49 50 =head1 METHODS 51 52 =over 4 53 54 =item who_am_i 55 56 Obtain the authorization identity which the server has associated 57 with the user or application entity. 58 59 =back 60 61 =head1 SEE ALSO 62 63 L<Net::LDAP>, 64 L<Net::LDAP::Extension> 65 66 =head1 AUTHOR 67 68 Norbert Klasen E<lt>norbert.klasen@avinci.deE<gt>, 69 70 Please report any bugs, or post any suggestions, to the perl-ldap 71 mailing list E<lt>perl-ldap@perl.orgE<gt> 72 73 =head1 COPYRIGHT 74 75 Copyright (c) 2002-2004 Graham Barr. All rights reserved. This program is 76 free software; you can redistribute it and/or modify it under the same 77 terms as Perl itself. 78 79 =cut 80
title
Description
Body
title
Description
Body
title
Description
Body
title
Body
Generated: Tue Mar 17 22:47:18 2015 | Cross-referenced by PHPXref 0.7.1 |