bionic (3) Mozilla::LDAP::Conn.3pm.gz
NAME
Mozilla::LDAP::Conn - Object Oriented API for the LDAP SDK.
SYNOPSIS
use Mozilla::LDAP::Conn;
use Mozilla::LDAP::Utils;
ABSTRACT
This package is the main API for using our Perl Object Oriented LDAP module. Even though it's certainly
possible, and sometimes even necessary, to call the native LDAP C SDK functions, we strongly recommend
you use these object classes.
It's not required to use our Mozilla::LDAP::Utils.pm package, but it's convenient and good for
portability if you use as much as you can from that package as well. This implies using the LdapConf
package as well, even though you usually don't need to use it directly.
You should read this document in combination with the Mozilla::LDAP::Entry document. Both modules depend
on each other heavily.
DESCRIPTION
First, this is not meant to be a crash course in how LDAP works, if you have no experience with LDAP, I
suggest you read some of the literature that's available out there. The LDAP Deployment Book from
Netscape, or the LDAP C SDK documentation are good starting points.
This object class basically tracks and manages the LDAP connection, it's current status, and the current
search operation (if any). Every time you call the search method of an object instance, you'll reset it's
internal state. It depends heavily on the ::Entry class, which are used to retrieve, modify and update a
single entry.
The search and nextEntry methods returns Mozilla::LDAP::Entry objects, or an appropriately subclass of
it. You also have to instantiate (and modify) a new ::Entry object when you want to add new entries to an
LDAP server. Alternatively, the add() method will also take a hash array as argument, to make it easy to
create new LDAP entries.
To assure that changes to an entry are updated properly, we strongly recommend you use the native methods
of the ::Entry object class. Even though you can modify certain elements directly, it could cause changes
not to be committed to the LDAP server. If there's something missing from the API, please let us know, or
even fix it yourself.
SOME PERLDAP/OO BASICS
An entry consist of a DN, and a hash array of pointers to attribute values. Each attribute value (except
the DN) is an array, but you have to remember the hash array in the entry stores pointers to the array,
not the array. So, to access the first CN value of an entry, you'd do
$cn = $entry->{cn}[0];
To set the CN attribute to a completely new array of values, you'd do
$entry->{cn} = [ "Leif Hedstrom", "The Swede" ];
As long as you remember this, and try to use native Mozilla::LDAP::Entry methods, this package will take
care of most the work. Once you master this, working with LDAP in Perl is surprisingly easy.
We already mentioned DN, which stands for Distinguished Name. Every entry on an LDAP server must have a
DN, and it's always guaranteed to be unique within your database. Some typical DNs are
uid=leif,ou=people,o=netscape.com
cn=gene-staff,ou=mailGroup,o=netscape.com
dc=data,dc=netscape,dc=com
There's also a term called RDN, which stands for Relative Distinguished Name. In the above examples,
"uid=leif", "cn=gene-staff" and "dc=data" are all RDNs. One particular property for a RDN is that they
must be unique within it's sub-tree. Hence, there can only be one user with "uid=leif" within the
"ou=people" tree, there can never be a name conflict.
CREATING A NEW OBJECT INSTANCE
Before you can do anything with PerLDAP, you'll need to instantiate at least one Mozilla::LDAP::Conn
object, and connect it to an LDAP server. As you probably guessed already, this is done with the new
method:
$conn = Mozilla::LDAP::Conn->new("ldap", "389", $bind, $pswd, $cert, $ver);
die "Couldn't connect to LDAP server ldap" unless $conn;
The arguments are: Host name, port number, and optionally a bind-DN, it's password, and a certificate. A
recent addition is the LDAP protocol version, which is by default LDAP v3. If there is no bind-DN, the
connection will be bound as the anonymous user. If the certificate file is specified, the connection will
be over SSL, and you should then probably connect to port 636. You have to check that the object was
created properly, and take proper actions if you couldn't get a connection.
There's one convenient alternative call method to this function. Instead of providing each individual
argument, you can provide one hash array (actually, a pointer to a hash). For example:
%ld = Mozilla::LDAP::Utils::ldapArgs();
$conn = Mozilla::LDAP::Conn->new(\%ld);
The components of the hash are:
$ld->{"host"}
$ld->{"port"}
$ld->{"base"}
$ld->{"bind"}
$ld->{"pswd"}
$ld->{"cert"}
$ld->{"vers"}
and (not used in the new method)
$ld->{"scope"}
New for PerLDAP v1.5 and later are the following:
$ld->{"nspr"}
$ld->{"timeout"}
$ld->{"callback"}
$ld->{"entryclass"}
The nspr flag (1/0) indicates that we wish to use the NSPR layer for the LDAP connection. This obviously
only works if PerLDAP has been compiled with NSPR support and libraries. The default is for NSPR to be
disabled.
For an NSPR enabled connection, you can also provide an optional timeout parameter, which will be used
during the lifetime of the connection. This includes the initial setup and connection to the LDAP server.
You can change this parameter later using the setNSPRTimeout() method.
During the bind process, you can provide a callback function to be called when the asynchronus bind has
completed. The callback should take two arguments, a reference to the ::Conn object ("self") and a result
structure as returned by the call to ldap_result().
Finally, you can optionally specify what class the different methods should use when instantiating Entry
result objects. The default is Mozilla::LDAP::Entry.
Once a connection is established, the package will take care of the rest. If for some reason the
connection is lost, the object should reconnect on it's own, automatically. [Note: This doesn't work
now... ]. You can use the Mozilla::LDAP:Conn object for any number of operations, but since everything is
currently done synchronously, you can only have one operation active at any single time. You can of
course have multiple Mozilla::LDAP::Conn instanced active at the same time.
PERFORMING LDAP SEARCHES
We assume that you are familiar with the LDAP filter syntax already, all searches performed by this
object class uses these filters. You should also be familiar with LDAP URLs, and LDAP object classes.
There are some of the few things you actually must know about LDAP. Perhaps the simples filter is
(uid=leif)
This matches all entries with the UID set to "leif". Normally that would only match one entry, but there
is no guarantee for that. To find everyone with the name "leif", you'd instead do
(cn=*leif*)
A more complicated search involves logic operators. To find all mail groups owned by "leif" (or actually
his DN), you could do
(&(objectclass=mailGroup)(owner=uid=leif,ou=people,o=netscape))
The owner attribute is what's called a DN attribute, so to match on it we have to specify the entire DN
in the filter above. We could of course also do a sub string "wild card" match, but it's less efficient,
and requires indexes to perform reasonably well.
Ok, now we are prepared to actually do a real search on the LDAP server:
$base = "o=netscape.com";
$conn = Mozilla::LDAP::Conn->new("ldap", "389", "", ""); die "No LDAP
connection" unless $conn;
$entry = $conn->search($base, "subtree", "(uid=leif)");
if (! $entry)
{ # handle this event, no entries found, dude!
}
else
{
while ($entry)
{
$entry->printLDIF();
$entry = $conn->nextEntry();
}
}
This is in fact a poor mans implementation of the ldapsearch command line utility. The search method
returns an Mozilla::LDAP::Entry object (or derived subclass), which holds the first entry from the
search, if any. To get the second and subsequent entries you call the entry method, until there are no
more entries. The printLDIF method is a convenient function, requesting the entry to print itself on
STDOUT, in LDIF format.
The arguments to the search methods are the LDAP Base-DN, the scope of the search ("base", "one" or
"sub"), and the actual LDAP filter. The entry return contains the DN, and all attribute values. To access
a specific attribute value, you just have to use the hash array:
$cn = $entry->{cn}[0];
Since many LDAP attributes can have more than one value, value of the hash array is another array (or
actually a pointer to an array). In many cases you can just assume the value is in the first slot
(indexed by [0]), but for some attributes you have to support multiple values. To find out how many
values a specific attribute has, you'd call the size method:
$numVals = $entry->size("objectclass");
One caveat: Many LDAP attributes are case insensitive, but the methods in the Mozilla::LDAP::Entry
package are not aware of this. Hence, if you compare values with case sensitivity, you can experience
weird behavior. If you know an attribute is CIS (Case Insensitive), make sure you do case insensitive
string comparisons.
Unfortunately some methods in this package can't do this, and by default will do case sensitive
comparisons. We are working on this, and in a future release some of the methods will handle this more
gracefully. As an extension (for LDAP v3.0) we could also use schema discovery for handling this even
better.
There is an alternative search method, to use LDAP URLs instead of a filter string. This can be used to
easily parse and process URLs, which is a compact way of storing a "link" to some specific LDAP
information. To process such a search, you use the searchURL method:
$entry->searchURL("ldap:///o=netscape.com??sub?(uid=leif)");
As it turns out, the search method also supports LDAP URL searches. If the search filter looks like a
proper URL, we will actually do an URL search instead. This is for backward compatibility, and for ease
of use.
To achieve better performance and use less memory, you can limit your search to only retrieve certain
attributes. With the LDAP URLs you specify this as an optional parameter, and with the search method you
add two more options, like
$entry = $conn->search($base, "sub", $filter, 0, ("mail", "cn"));
The last argument specifies an array of attributes to retrieve, the fewer the attributes, the faster the
search will be. The second to last argument is a boolean value indicating if we should retrieve only the
attribute names (and no values). In most cases you want this to be FALSE, to retrieve both the attribute
names, and all their values. To do this with the searchURL method, add a second argument, which should be
0 or 1.
PERFORMING ASYNCHRONOUS SEARCHES
Conn also supports an async_search method that takes the same arguments as the search method but returns
an instance of SearchIter instead of Entry. As its name implies, the SearchIter is used to iterate
through the search results. The nextEntry method works just like the nextEntry method of Conn. The
abandon method should be called if search result processing is aborted before the last result is
received, to allow the client and server to release resources. Example:
$iter = $conn->async_search($base, $scope, $filter, ...);
if ($rc = $iter->getResultCode()) {
# process error condition
} else {
while (my $entry = $iter->nextEntry) {
# process entry
if (some abort condition) {
$iter->abandon;
last;
}
}
}
MODIFYING AND CREATING NEW LDAP ENTRIES
Once you have an LDAP entry, either from a search, or created directly to get a new empty object, you are
ready to modify it. If you are creating a new entry, the first thing to set it it's DN, like
$entry = $conn->newEntry();
$entry->setDN("uid=leif,ou=people,o=netscape.com");
alternatively you can still use the new method on the Entry class, like
$entry = Mozilla::LDAP::Entry->new();
You should not do this for an existing LDAP entry, changing the RDN (or DN) for such an entry must be
done with modifyRDN. To populate (or modify) some other attributes, we can do
$entry->{objectclass} = [ "top", "person", "inetOrgPerson" ];
$entry->{cn} = [ "Leif Hedstrom" ];
$entry->{mail} = [ "leif@netscape.com" ];
Once you are done modifying your LDAP entry, call the update method from the Mozilla::LDAP::Conn object
instance:
$conn->update($entry);
Or, if you are creating an entirely new LDAP entry, you must call the add method:
$conn->add($entry);
If all comes to worse, and you have to remove an entry again from the LDAP server, just call the delete
method, like
$conn->delete($entry->getDN());
You can't use native Perl functions like push() and splice() on attribute values, since they won't update
the ::Entry instance state properly. Instead use one of the methods provided by the Mozilla::LDAP::Entry
object class, for instance
$entry->addValue("cn", "The Swede");
$entry->removeValue("mailAlternateAddress", "leif@mcom.com");
$entry->remove("seeAlso");
These methods return a TRUE or FALSE value, depending on the outcome of the operation. If there was no
value to remove, or a value already exists, we return FALSE, otherwise TRUE. To check if an attribute has
a certain value, use the hasValue method, like
if ($entry->hasValue("mail", "leif@netscape.com")) {
# Do something
}
There is a similar method, matchValue, which takes a regular expression to match against, instead of the
entire string. For more information this and other methods in the Entry class, see below.
OBJECT CLASS METHODS
We have already described the fundamentals of this class earlier. This is a summary of all available
methods which you can use. Be careful not to use any undocumented features or heaviour, since the
internals in this module is likely to change.
Searching and updating entries
add Add a new entry to the LDAP server. Make sure you use the new method for the
Mozilla::LDAP::Entry object, to create a proper entry.
browse Searches for an LDAP entry, but sets some default values to begin with, such as scope=BASE,
filter=(objectclass=*) and so on. Much like search except for these defaults. Requires a
DN value as an argument. An optional second argument is an array of which attributes to
return from the entry. Note that this does not support the "attributesOnly" flag.
$secondEntry = $conn->browse($entry->getDN());
close Close the LDAP connection, and clean up the object. If you don't call this directly, the
destructor for the object instance will do the job for you.
compare Compares an attribute and value to a given DN without first doing a search. Requires three
arguments: a DN, the attribute name, and the value of the attribute. Returns TRUE if the
attribute/value compared ok.
print "not" unless $conn->compare($entry->getDN(), "cn", "Big Swede");
print "ok";
delete This will delete the current entry, or possibly an entry as specified with the optional
argument. You can use this function to delete any entry you like, by passing it an explicit
DN. If you don't pass it this argument, delete defaults to delete the current entry, from
the last call to search or entry. I'd recommend doing a delete with the explicit DN, like
$conn->delete($entry->getDN());
modifyRDN This will rename the specified LDAP entry, by modifying it's RDN. For example, assuming you
have a DN of
uid=leif, ou=people, dc=netscape, dc=com
and you wish to rename to
uid=fiel, ou=people, dc=netscape, dc=com
you'd do something like
$rdn = "uid=fiel";
$conn->modifyRDN($rdn, $entry->getDN());
Note that this can only be done on the RDN, you could not change say "ou=people" to be
"ou=hackers" in the example above. To do that, you have to add a new entry (a copy of the
old one), and then remove the old entry.
The last argument is a boolean (0 or 1), which indicates if the old RDN value should be
removed from the entry. The default is TRUE ("1").
new This creates and initialized a new LDAP connection and object. The required arguments are
host name, port number, bind DN and the bind password. An optional argument is a certificate
(public key), which causes the LDAP connection to be established over an SSL channel.
Currently we do not support Client Authentication, so you still have to use the simple
authentication method (i.e. with a password).
A typical usage could be something like
%ld = Mozilla::LDAP::Utils::ldapArgs();
$conn = Mozilla::LDAP::Conn->new(\%ld);
Also, remember that if you use SSL, the port is (usually) 636.
newEntry This will create an empty Mozilla::LDAP::Entry object, which is properly tied into the
appropriate objectclass. Use this method instead of manually creating new Entry objects, or
at least make sure that you use the "tie" function when creating the entry. This function
takes no arguments, and returns a pointer to an ::Entry object. For instance
$entry = $conn->newEntry();
or
$entry = Mozilla::LDAP::Conn->newEntry();
nextEntry This method will return the next entry from the search result, and can therefore only be
called after a successful search has been initiated. If there are no more entries to
retrieve, it returns nothing (empty string).
search The search method is the main entry point into this module. It requires at least three
arguments: The Base DN, the scope, and the search strings. Two more optional arguments can
be given, the first specifies if only attribute names should be returned (TRUE or FALSE).
The second argument is a list (array) of attributes to return.
The last option is very important for performance. If you are only interested in say the
"mail" and "mailHost" attributes, specifying this in the search will signficantly reduce the
search time. An example of an efficient search is
@attr = ("cn", "uid", "mail");
$filter = "(uid=*)";
$entry = $conn->search($base, $scope, $filter, 0, @attr);
while ($entry) {
# do something
$entry = $conn->nextEntry();
}
searchURL This is almost identical to search, except this function takes only two arguments, an LDAP
URL and an optional flag to specify if we only want the attribute names to be returned (and
no values). This function isn't very useful, since the search method will actually honor
properly formed LDAP URL's, and use it if appropriate.
simpleAuth This method will rebind the LDAP connection using new credentials (i.e. a new user-DN and
password). To rebind "anonymously", just don't pass a DN and password, and it will default
to binding as the unprivleged user. For example:
$user = "leif";
$password = "secret";
$conn = Mozilla::LDAP::Conn->new($host, $port); # Anonymous bind
die "Could't connect to LDAP server $host" unless $conn;
$entry = $conn->search($base, $scope, "(uid=$user)", 0, (uid));
exit (-1) unless $entry;
$ret = $conn->simpleAuth($entry->getDN(), $password);
exit (-1) unless $ret;
$ret = $conn->simpleAuth(); # Bind as anon again.
update After modifying an Ldap::Entry entry (see below), use the update method to commit changes to
the LDAP server. Only attributes that has been changed will be updated, assuming you have
used the appropriate methods in the Entry object. For instance, do not use push or splice to
modify an entry, the update will not recognize such changes.
To change the CN value for an entry, you could do
$entry->{cn} = ["Leif Hedstrom"];
$conn->update($entry);
Other methods
getErrorCode Return the error code (numeric) from the last LDAP API function call. Remember that this can
only be called after the successful creation of a new :Conn object instance. A typical usage
could be
if (! $opt_n) {
$conn->modifyRDN($rdn, $entry->getDN());
$conn->printError() if $conn->getErrorCode();
}
Which will report any error message as generated by the call to modifyRDN. Some LDAP
functions return extra error information, which can be retrieved like:
$err = getErrorCode(\$matched, \$string);
$matched will then contain the portion of the matched DN (if applicable to the error code),
and $string will contain any additional error string returned by the LDAP server.
getErrorString
Very much like getErrorCode, but return a string with a human readable error message. This
can then be used to print a good error message on the console.
getLD Return the (internal) LDAP* connection handle, which you can use (carefully) to call the
native LDAP API functions. You shouldn't have to use this in most cases, unless of course
our OO layer is seriously flawed.
getRes Just like getLD, except it returns the internal LDAP return message structure. Again, use
this very carefully, and be aware that this might break in future releases of PerLDAP. These
two methods can be used to call some useful API functions, like
$cld = $conn->getLD();
$res = $conn->getRes();
$count = Mozilla::LDAP::API::ldap_count_entries($cld, $res);
isURL Returns TRUE or FALSE if the given argument is a properly formed URL.
printError Print the last error message on standard output.
setRebindProc
Tell the LDAP SDK to call the provided Perl function when it has to follow referrals. The
Perl function should return an array of three elements, the new Bind DN, password and
authentication method. A typical usage is
sub rebindProc {
return ("uid=ldapadmin", "secret", LDAP_AUTH_SIMPLE);
}
$ld->setRebindProc(\&rebindProc);
setDefaultRebindProc
This is very much like the previous function, except instead of specifying the function to
use, you give it the DN, password and Auth method. Then we'll use a default rebind procedure
(internal in C) to handle the rebind credentials. This was a solution for the Windows/NT
problem/bugs we have with rebind procedures written in Perl.
setVersion Change the LDAP protocol version on the already initialized connection. The default is LDAP
v3 (new for PerLDAP v1.5!), but you can downgrade the connection to LDAP v2 if necessary
using this function. Example:
$conn->setVersion(2);
getVersion Return the protocol version currently in used by the connection.
setSizelimit Set the sizelimit on a connection, to limit the maximum number of entries that we want to
retrieve. For example:
$conn->setSizelimit(10);
getSizelimit Get the current sizelimit on a connection (if any).
setOption Set an (integer) LDAP option.
getOption Get an (integer) LDAP option.
installNSPR Install NSPR I/O, threading, and DNS functions so they will be used by 'ld'.
Pass a non-zero value for the 'shared' parameter if you plan to use this LDAP * handle from
more than one thread. This is highly unlikely since PerLDAP is asynchronous.
setNSPRTimeout
Set the TCP timeout value, in millisecond, for the NSPR enabled connection. It's an error
to call this before calling installNSPR(), unless you created the new connection object with
the nspr option.
This method can also be invoked as a class method, and it will then apply to all new
connections created. Like
Mozilla::LDAP::Conn->installNSPR(1);
Mozilla::LDAP::Conn->setNSPRTimeout(1000);
EXAMPLES
There are plenty of examples to look at, in the examples directory. We are adding more examples every day
(almost).
INSTALLATION
Installing this package is part of the Makefile supplied in the package. See the installation procedures
which are part of this package.
AVAILABILITY
This package can be retrieved from a number of places, including:
http://www.mozilla.org/directory/
Your local CPAN server
CREDITS
Most of this code was developed by Leif Hedstrom, Netscape Communications Corporation.
BUGS
None. :)
SEE ALSO
Mozilla::LDAP::Entry, LDAP::Mozilla:Utils LDAP::Mozilla:API and of course Perl.