eldap

20122013 Ericsson AB. All Rights Reserved. The contents of this file are subject to the Erlang Public License, Version 1.1, (the "License"); you may not use this file except in compliance with the License. You should have received a copy of the Erlang Public License along with this software. If not, it can be retrieved online at http://www.erlang.org/. Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. eldap Peter Högfeldt 2000-06-20 B

eldap Eldap Functions

This module provides a client api to the Lightweight Directory Access Protocol (LDAP).

References:

RFC 4510 - RFC 4519

RFC 2830

The above publications can be found at IETF.

Types

handle()    Connection handle
attribute() {Type = string(), Values=[string()]}
modify_op() See mod_add/2, mod_delete/2, mod_replace/2
scope()     See baseObject/0, singleLevel/0, wholeSubtree/0
dereference() See neverDerefAliases/0, derefInSearching/0, derefFindingBaseObj/0, derefAlways/0
filter()    See present/1, substrings/2,
                equalityMatch/2, greaterOrEqual/2, lessOrEqual/2,
                approxMatch/2, extensibleMatch/2,
                'and'/1, 'or'/1, 'not'/1.

open([Host]) -> {ok, Handle} | {error, Reason} Open a connection to an LDAP server. Handle = handle()

Setup a connection to an LDAP server, the HOST's are tried in order.

open([Host], [Option]) -> {ok, Handle} | {error, Reason} Open a connection to an LDAP server. Handle = handle() Option = {port, integer()} | {log, function()} | {timeout, integer()} | {ssl, boolean()} | {sslopts, list()} | {tcpopts, list()}

Setup a connection to an LDAP server, the HOST's are tried in order.

The log function takes three arguments, fun(Level, FormatString, [FormatArg]) end.

Timeout set the maximum time in milliseconds that each server request may take.

All TCP socket options are accepted except active, binary, deliver, list, mode and packet

close(Handle) -> ok Shutdown the connection. Handle = handle()

Shutdown the connection.

start_tls(Handle, Options) -> ok | {error,Error} Upgrade a connection to TLS.

Same as start_tls(Handle, Options, infinity)

start_tls(Handle, Options, Timeout) -> ok | {error,Error} Upgrade a connection to TLS. Handle = handle() Options = ssl:ssl_options() Timeout = inifinity | positive_integer()

Upgrade the connection associated with Handle to a tls connection if possible.

The upgrade is done in two phases: first the server is asked for permission to upgrade. Second, if the request is acknowledged, the upgrade is performed.

Error responese from phase one will not affect the current encryption state of the connection. Those responses are:

tls_already_started The connection is already encrypted. The connection is not affected. {response,ResponseFromServer} The upgrade was refused by the LDAP server. The ResponseFromServer is an atom delivered byt the LDAP server explained in section 2.3 of rfc 2830. The connection is not affected, so it is still un-encrypted.

Errors in the seconde phase will however end the connection:

Error Any error responded from ssl:connect/3 simple_bind(Handle, Dn, Password) -> ok | {error, Reason} Authenticate the connection. Handle = handle() Dn = string() Password = string()

Authenticate the connection using simple authentication.

add(Handle, Dn, [Attribute]) -> ok | {error, Reason} Add an entry. Handle = handle() Dn = string() Attribute = attribute()

Add an entry. The entry must not exist.

  add(Handle,
      "cn=Bill Valentine, ou=people, o=Example Org, dc=example, dc=com",
       [{"objectclass", ["person"]},
        {"cn", ["Bill Valentine"]},
        {"sn", ["Valentine"]},
        {"telephoneNumber", ["545 555 00"]}]
     )

delete(Handle, Dn) -> ok | {error, Reason} Delete an entry. Dn = string()

Delete an entry.

  delete(Handle, "cn=Bill Valentine, ou=people, o=Example Org, dc=example, dc=com")

mod_add(Type, [Value]) -> modify_op() Create a modification operation. Type = string() Value = string()

Create an add modification operation.

mod_delete(Type, [Value]) -> modify_op() Create a modification operation. Type = string() Value = string()

Create a delete modification operation.

mod_replace(Type, [Value]) -> modify_op() Create a modification operation. Type = string() Value = string()

Create a replace modification operation.

modify(Handle, Dn, [ModifyOp]) -> ok | {error, Reason} Modify an entry. Dn = string() ModifyOp = modify_op()

Modify an entry.

  modify(Handle, "cn=Bill Valentine, ou=people, o=Example Org, dc=example, dc=com",
         [eldap:mod_replace("telephoneNumber", ["555 555 00"]),
	  eldap:mod_add("description", ["LDAP Hacker"]) ])

modify_password(Handle, Dn, NewPasswd) -> ok | {ok, GenPasswd} | {error, Reason} Modify the password of a user. Dn = string() NewPasswd = string()

Modify the password of a user. See modify_password/4.

modify_password(Handle, Dn, NewPasswd, OldPasswd) -> ok | {ok, GenPasswd} | {error, Reason} Modify the password of a user. Dn = string() NewPasswd = string() OldPasswd = string() GenPasswd = string()

Modify the password of a user.

Dn. The user to modify. Should be "" if the modify request is for the user of the LDAP session.

NewPasswd. The new password to set. Should be "" if the server is to generate the password. In this case, the result will be {ok, GenPasswd}.

OldPasswd. Sometimes required by server policy for a user to change their password. If not required, use modify_password/3.

modify_dn(Handle, Dn, NewRDN, DeleteOldRDN, NewSupDN) -> ok | {error, Reason} Modify the DN of an entry. Dn = string() NewRDN = string() DeleteOldRDN = boolean() NewSupDN = string()

Modify the DN of an entry. DeleteOldRDN indicates whether the current RDN should be removed after operation. NewSupDN should be "" if the RDN should not be moved or the new parent which the RDN will be moved to.

  modify_dn(Handle, "cn=Bill Valentine, ou=people, o=Example Org, dc=example, dc=com ",
            "cn=Bill Jr Valentine", true, "")

search(Handle, SearchOptions) -> {ok, #eldap_search_result{}} | {error, Reason} Search the Directory SearchOptions = #eldap_search{} | [SearchOption] SearchOption = {base, string()} | {filter, filter()} | {scope, scope()} | {attributes, [string()]} | {deref, dereference()} | | {types_only, boolean()} | {timeout, integer()}

Search the directory with the supplied the SearchOptions. The base and filter options must be supplied. Default values: scope is wholeSubtree(), deref is derefAlways(), types_only is false and timeout is 0 (meaning infinity).

  Filter = eldap:substrings("cn", [{any,"V"}]),
  search(Handle, [{base, "dc=example, dc=com"}, {filter, Filter}, {attributes, ["cn"]}]),

baseObject() -> scope() Create search scope.

Search baseobject only.

singleLevel() -> scope() Create search scope.

Search the specified level only, i.e. do not recurse.

wholeSubtree() -> scope() Create search scope.

Search the entire subtree.

neverDerefAliases() -> dereference() Create search option.

Never derefrence aliases, treat aliases as entries.

derefAlways() -> dereference() Create search option.

Always derefrence aliases.

derefInSearching() -> dereference() Create search option.

Derefrence aliases only when searching.

derefFindingBaseObj() -> dereference() Create search option.

Derefrence aliases only in finding the base.

present(Type) -> filter() Create search filter option. Type = string()

Create a filter which filters on attribute type presence.

substrings(Type, [SubString]) -> filter() Create search filter option. Type = string() SubString = {StringPart, string()} StringPart = initial | any | final

Create a filter which filters on substrings.

equalityMatch(Type, Value) -> filter() Create search filter option. Type = string() Value = string()

Create a equality filter.

greaterOrEqual(Type, Value) -> filter() Create search filter option. Type = string() Value = string()

Create a greater or equal filter.

lessOrEqual(Type, Value) -> filter() Create search filter option. Type = string() Value = string()

Create a less or equal filter.

approxMatch(Type, Value) -> filter() Create search filter option. Type = string() Value = string()

Create a approximation match filter.

extensibleMatch(MatchValue, OptionalAttrs) -> filter() Create search filter option. MatchValue = string() OptionalAttrs = [Attr] Attr = {matchingRule,string()} | {type,string()} | {dnAttributes,boolean()}

Creates an extensible match filter. For example, eldap:extensibleMatch("Bar",[{type,"sn"},{matchingRule,"caseExactMatch"}])) creates a filter which performs a caseExactMatch on the attribute sn and matches with the value "Bar". The default value of dnAttributes is false.

'and'([Filter]) -> filter() Create search filter option. Filter = filter()

Creates a filter where all Filter must be true.

'or'([Filter]) -> filter() Create search filter option. Filter = filter()

Create a filter where at least one of the Filter must be true.

'not'(Filter) -> filter() Create search filter option. Filter = filter()

Negate a filter.