You can edit this page using wiki syntax for markup.

Article contents:== Outdated egg! This is an egg for CHICKEN 4, the unsupported old release. You're almost certainly looking for [[/eggref/5/ldap-bind|the CHICKEN 5 version of this egg]], if it exists. If it does not exist, there may be equivalent functionality provided by another egg; have a look at the [[https://wiki.call-cc.org/chicken-projects/egg-index-5.html|egg index]]. Otherwise, please consider porting this egg to the current version of CHICKEN. [[tags: egg]] == ldap-bind [[toc:]] === Description A CHICKEN egg implementing LDAP bind for authentication purposes using the OpenLDAP library. This is not a complete binding to the OpenLDAP library and only covers the authentication use-case. Requires OpenLDAP / libldap and liblber to be installed. === API <procedure>(ldap-initialize uris #!optional (version 3))</procedure> Initializes the LDAP library and opens a connection to an LDAP server. Returns an ldap-connection record. <procedure>(ldap-bind conn dn pass)</procedure> Attempts to bind to a dn using the given password. The conn argument is a connection record returned from ldap-initialize. Returns #t if the bind succeeded, #f otherwise. <procedure>(ldap-unbind conn)</procedure> Terminate the current association, and free the resources contained in the connecction record. After calling ldap-unbind the connection to the LDAP server is closed and the connection record becomes invalid. === Example <enscript highlight="scheme"> (use ldap-bind) (define ld (ldap-initialize "ldaps://example.com")) (if (ldap-bind ld "uid=testuser,cn=users,dc=example,dc=com" "password") (print "Welcome, authenticated user!") (print "Invalid Credentials")) ;; or, using list syntax for a base dn: (define base-dn '((cn "users") (dc "example") (dc "com"))) (if (ldap-bind ld (cons '(uid "testuser") base-dn) "password") (print "Welcome, authenticated user!") (print "Invalid Credentials")) (ldap-unbind ld) </enscript> === Author Original implementation work by Moritz Heidkamp, updated to latest APIs and released with just the ldap-bind feature by Caolan McMahon (with kind permission). Description of your changes:

I would like to authenticate

Spam control

What do you get when you subtract 0 from 22?