X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Fldap.c;h=73e45ba23c2a777ee6072fe155b6a482c207edee;hb=HEAD;hp=8c60ee508d353adc637f393c12725a90daf987d3;hpb=666276d88610d1e0cc5013665ad8185fbff24336;p=citadel.git diff --git a/citadel/ldap.c b/citadel/ldap.c deleted file mode 100644 index 8c60ee508..000000000 --- a/citadel/ldap.c +++ /dev/null @@ -1,683 +0,0 @@ -/* - * These functions implement the portions of AUTHMODE_LDAP and AUTHMODE_LDAP_AD which - * actually speak to the LDAP server. - * - * Copyright (c) 2011-2017 by the citadel.org development team. - * - * This program is open source software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License, version 3. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - */ - -int ctdl_require_ldap_version = 3; - -#define _GNU_SOURCE // Needed to suppress warning about vasprintf() when running on Linux/Linux -#include -#include -#include "citserver.h" -#include "citadel_ldap.h" -#include "ctdl_module.h" -#include "user_ops.h" -#include "internet_addressing.h" -#include "config.h" - -#ifdef HAVE_LDAP -#define LDAP_DEPRECATED 1 // Suppress libldap's warning that we are using deprecated API calls -#include - - -/* - * Wrapper function for ldap_initialize() that consistently fills in the correct fields - */ -int ctdl_ldap_initialize(LDAP **ld) { - - char server_url[256]; - int ret; - - snprintf(server_url, sizeof server_url, "ldap://%s:%d", CtdlGetConfigStr("c_ldap_host"), CtdlGetConfigInt("c_ldap_port")); - ret = ldap_initialize(ld, server_url); - if (ret != LDAP_SUCCESS) { - syslog(LOG_ERR, "ldap: could not connect to %s : %m", server_url); - *ld = NULL; - return(errno); - } - - return(ret); -} - - -/* - * Look up a user in the directory to see if this is an account that can be authenticated - */ -int CtdlTryUserLDAP(char *username, - char *found_dn, int found_dn_size, - char *fullname, int fullname_size, - uid_t *uid, int lookup_based_on_username) -{ - LDAP *ldserver = NULL; - int i; - LDAPMessage *search_result = NULL; - LDAPMessage *entry = NULL; - char searchstring[1024]; - struct timeval tv; - char **values; - char *user_dn = NULL; - - if (fullname) safestrncpy(fullname, username, fullname_size); - - if (ctdl_ldap_initialize(&ldserver) != LDAP_SUCCESS) { - return(errno); - } - - ldap_set_option(ldserver, LDAP_OPT_PROTOCOL_VERSION, &ctdl_require_ldap_version); - ldap_set_option(ldserver, LDAP_OPT_REFERRALS, (void *)LDAP_OPT_OFF); - - striplt(CtdlGetConfigStr("c_ldap_bind_dn")); - striplt(CtdlGetConfigStr("c_ldap_bind_pw")); - syslog(LOG_DEBUG, "ldap: bind DN: %s", CtdlGetConfigStr("c_ldap_bind_dn")); - i = ldap_simple_bind_s(ldserver, - (!IsEmptyStr(CtdlGetConfigStr("c_ldap_bind_dn")) ? CtdlGetConfigStr("c_ldap_bind_dn") : NULL), - (!IsEmptyStr(CtdlGetConfigStr("c_ldap_bind_pw")) ? CtdlGetConfigStr("c_ldap_bind_pw") : NULL) - ); - if (i != LDAP_SUCCESS) { - syslog(LOG_ERR, "ldap: Cannot bind: %s (%d)", ldap_err2string(i), i); - return(i); - } - - tv.tv_sec = 10; - tv.tv_usec = 0; - - if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD) { - if (lookup_based_on_username != 0) - snprintf(searchstring, sizeof(searchstring), "(displayName=%s)",username); - else - snprintf(searchstring, sizeof(searchstring), "(sAMAccountName=%s)", username); - } - else { - if (lookup_based_on_username != 0) { - snprintf(searchstring, sizeof(searchstring), "(cn=%s)",username); - } - else { - snprintf(searchstring, sizeof(searchstring), "(&(objectclass=posixAccount)(uid=%s))", username); - } - } - - syslog(LOG_DEBUG, "ldap: search: %s", searchstring); - (void) ldap_search_ext_s( - ldserver, /* ld */ - CtdlGetConfigStr("c_ldap_base_dn"), /* base */ - LDAP_SCOPE_SUBTREE, /* scope */ - searchstring, /* filter */ - NULL, /* attrs (all attributes) */ - 0, /* attrsonly (attrs + values) */ - NULL, /* serverctrls (none) */ - NULL, /* clientctrls (none) */ - &tv, /* timeout */ - 1, /* sizelimit (1 result max) */ - &search_result /* res */ - ); - - /* Ignore the return value of ldap_search_ext_s(). Sometimes it returns an error even when - * the search succeeds. Instead, we check to see whether search_result is still NULL. - */ - if (search_result == NULL) { - syslog(LOG_DEBUG, "ldap: zero search results were returned"); - ldap_unbind(ldserver); - return(2); - } - - /* At this point we've got at least one result from our query. If there are multiple - * results, we still only look at the first one. - */ - entry = ldap_first_entry(ldserver, search_result); - if (entry) { - - user_dn = ldap_get_dn(ldserver, entry); - if (user_dn) { - syslog(LOG_DEBUG, "ldap: dn = %s", user_dn); - } - -/* begin - centralize this */ - if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD) { - values = ldap_get_values(ldserver, search_result, "displayName"); - if (values) { - if (values[0]) { - if (fullname) safestrncpy(fullname, values[0], fullname_size); - syslog(LOG_DEBUG, "ldap: displayName = %s", values[0]); - } - ldap_value_free(values); - } - } - else { - values = ldap_get_values(ldserver, search_result, "cn"); - if (values) { - if (values[0]) { - if (fullname) safestrncpy(fullname, values[0], fullname_size); - syslog(LOG_DEBUG, "ldap: cn = %s", values[0]); - } - ldap_value_free(values); - } - } -/* end - centralize this */ - - /* If we know the username is the CN/displayName, we already set the uid*/ - if (lookup_based_on_username==0) { - if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD) { - values = ldap_get_values(ldserver, search_result, "objectGUID"); - if (values) { - if (values[0]) { - if (uid != NULL) { - *uid = abs(HashLittle(values[0], strlen(values[0]))); - syslog(LOG_DEBUG, "ldap: uid hashed from objectGUID = %d", *uid); - } - } - ldap_value_free(values); - } - } - else { - values = ldap_get_values(ldserver, search_result, "uidNumber"); - if (values) { - if (values[0]) { - syslog(LOG_DEBUG, "ldap: uidNumber = %s", values[0]); - if (uid != NULL) { - *uid = atoi(values[0]); - } - } - ldap_value_free(values); - } - } - } - - } - - /* free the results */ - ldap_msgfree(search_result); - - /* unbind so we can go back in as the authenticating user */ - ldap_unbind(ldserver); - - if (!user_dn) { - syslog(LOG_DEBUG, "ldap: No such user was found."); - return(4); - } - - if (found_dn) safestrncpy(found_dn, user_dn, found_dn_size); - ldap_memfree(user_dn); - return(0); -} - - -int CtdlTryPasswordLDAP(char *user_dn, const char *password) -{ - LDAP *ldserver = NULL; - int i = (-1); - - if (IsEmptyStr(password)) { - syslog(LOG_DEBUG, "ldap: empty passwords are not permitted"); - return(1); - } - - syslog(LOG_DEBUG, "ldap: trying to bind as %s", user_dn); - i = ctdl_ldap_initialize(&ldserver); - if (i == LDAP_SUCCESS) { - ldap_set_option(ldserver, LDAP_OPT_PROTOCOL_VERSION, &ctdl_require_ldap_version); - i = ldap_simple_bind_s(ldserver, user_dn, password); - if (i == LDAP_SUCCESS) { - syslog(LOG_DEBUG, "ldap: bind succeeded"); - } - else { - syslog(LOG_DEBUG, "ldap: Cannot bind: %s (%d)", ldap_err2string(i), i); - } - ldap_set_option(ldserver, LDAP_OPT_REFERRALS, (void *)LDAP_OPT_OFF); - ldap_unbind(ldserver); - } - - if (i == LDAP_SUCCESS) { - return(0); - } - - return(1); -} - - -//return !0 iff property changed. -int vcard_set_props_iff_different(struct vCard *v,char *propname,int numvals, char **vals) { - int i; - char *oldval = ""; - for(i=0;i 512) { - syslog(LOG_ERR, "ldap: can't fit all email addresses into user record"); - } - else { - if (!IsEmptyStr(emailaddrs)) { - strcat(emailaddrs, "|"); - } - strcat(emailaddrs, mail[q]); - } - } - } - } - } - - /* free the results */ - ldap_msgfree(search_result); - - /* unbind so we can go back in as the authenticating user */ - ldap_unbind(ldserver); - return(0); -} - - -/* - * Scan LDAP for users and populate Citadel's user database with everyone - */ -void CtdlSynchronizeUsersFromLDAP(void) -{ - LDAP *ldserver = NULL; - int i; - LDAPMessage *search_result = NULL; - LDAPMessage *entry = NULL; - char *user_dn = NULL; - char searchstring[1024]; - struct timeval tv; - char **values; - - if ((CtdlGetConfigInt("c_auth_mode") != AUTHMODE_LDAP) && (CtdlGetConfigInt("c_auth_mode") != AUTHMODE_LDAP_AD)) { - return; // not running LDAP - } - - syslog(LOG_INFO, "ldap: synchronizing Citadel user database from LDAP"); - - if (ctdl_ldap_initialize(&ldserver) != LDAP_SUCCESS) { - return; - } - - ldap_set_option(ldserver, LDAP_OPT_PROTOCOL_VERSION, &ctdl_require_ldap_version); - ldap_set_option(ldserver, LDAP_OPT_REFERRALS, (void *)LDAP_OPT_OFF); - - striplt(CtdlGetConfigStr("c_ldap_bind_dn")); - striplt(CtdlGetConfigStr("c_ldap_bind_pw")); - syslog(LOG_DEBUG, "ldap: bind DN: %s", CtdlGetConfigStr("c_ldap_bind_dn")); - i = ldap_simple_bind_s(ldserver, - (!IsEmptyStr(CtdlGetConfigStr("c_ldap_bind_dn")) ? CtdlGetConfigStr("c_ldap_bind_dn") : NULL), - (!IsEmptyStr(CtdlGetConfigStr("c_ldap_bind_pw")) ? CtdlGetConfigStr("c_ldap_bind_pw") : NULL) - ); - if (i != LDAP_SUCCESS) { - syslog(LOG_ERR, "ldap: Cannot bind: %s (%d)", ldap_err2string(i), i); - return; - } - - tv.tv_sec = 10; - tv.tv_usec = 0; - - if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD) { - snprintf(searchstring, sizeof(searchstring), "(&(objectClass=user)(objectClass=person)(!(objectClass=computer)))"); - } else { - snprintf(searchstring, sizeof(searchstring), "(objectClass=inetOrgPerson)"); - } - - syslog(LOG_DEBUG, "ldap: search: %s", searchstring); - (void) ldap_search_ext_s( - ldserver, // ld - CtdlGetConfigStr("c_ldap_base_dn"), // base - LDAP_SCOPE_SUBTREE, // scope - searchstring, // filter - NULL, // attrs (all attributes) - 0, // attrsonly (attrs + values) - NULL, // serverctrls (none) - NULL, // clientctrls (none) - &tv, // timeout - INT_MAX, // sizelimit (max) - &search_result // result - ); - - /* Ignore the return value of ldap_search_ext_s(). Sometimes it returns an error even when - * the search succeeds. Instead, we check to see whether search_result is still NULL. - */ - if (search_result == NULL) { - syslog(LOG_DEBUG, "ldap: zero search results were returned"); - ldap_unbind(ldserver); - return; - } - - syslog(LOG_DEBUG, "ldap: %d entries returned", ldap_count_entries(ldserver, search_result)); - entry = ldap_first_entry(ldserver, search_result); - while (entry) { - - user_dn = ldap_get_dn(ldserver, entry); - if (user_dn) { - syslog(LOG_DEBUG, "ldap: found %s", user_dn); - - int fullname_size = 256; - char fullname[256] = { 0 } ; - uid_t uid = (-1); - - if (CtdlGetConfigInt("c_auth_mode") == AUTHMODE_LDAP_AD) { - values = ldap_get_values(ldserver, entry, "displayName"); // AD schema: fullname = displayName - if (values) { - if (values[0]) { - safestrncpy(fullname, values[0], fullname_size); - } - ldap_value_free(values); - } - values = ldap_get_values(ldserver, entry, "objectGUID"); // AD schema: uid hashed from objectGUID - if (values) { - if (values[0]) { - uid = abs(HashLittle(values[0], strlen(values[0]))); - } - ldap_value_free(values); - } - } - else { - values = ldap_get_values(ldserver, entry, "cn"); // POSIX schema: fullname = cn - if (values) { - if (values[0]) { - safestrncpy(fullname, values[0], fullname_size); - } - ldap_value_free(values); - } - values = ldap_get_values(ldserver, entry, "uidNumber"); // POSIX schema: uid = uidNumber - if (values) { - if (values[0]) { - uid = atoi(values[0]); - } - ldap_value_free(values); - } - } - - syslog(LOG_DEBUG, "\033[33mldap: display name: <%s> , uid = <%d>\033[0m", fullname, uid); - - // FIXME now create or update the user - - - } - - entry = ldap_next_entry(ldserver, entry); - } - - /* free the results */ - ldap_msgfree(search_result); - - /* unbind so we can go back in as the authenticating user */ - ldap_unbind(ldserver); -} - -#endif /* HAVE_LDAP */