2 Copyright (c) 2008,2009 Frank Lahm <franklahm@gmail.com>
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
17 #endif /* HAVE_CONFIG_H */
24 #define LDAP_DEPRECATED 1
27 #include <atalk/logger.h>
28 #include <atalk/afp.h>
29 #include <atalk/uuid.h>
30 #include <atalk/ldapconfig.h> /* For struct ldap_pref */
36 /********************************************************
37 * LDAP config stuff. Filled by libatalk/acl/ldap_config.c
38 ********************************************************/
39 int ldap_config_valid;
51 char *ldap_group_attr;
54 struct ldap_pref ldap_prefs[] = {
55 {&ldap_server, "ldap_server", 0, 0, -1},
56 {&ldap_auth_method,"ldap_auth_method", 1, 1, -1},
57 {&ldap_auth_dn, "ldap_auth_dn", 0, 0, 0},
58 {&ldap_auth_pw, "ldap_auth_pw", 0, 0, 0},
59 {&ldap_userbase, "ldap_userbase", 0, 0, -1},
60 {&ldap_userscope, "ldap_userscope", 1 ,1, -1},
61 {&ldap_groupbase, "ldap_groupbase", 0, 0, -1},
62 {&ldap_groupscope, "ldap_groupscope", 1 ,1, -1},
63 {&ldap_uuid_attr, "ldap_uuid_attr", 0, 0, -1},
64 {&ldap_name_attr, "ldap_name_attr", 0, 0, -1},
65 {&ldap_group_attr, "ldap_group_attr", 0, 0, -1},
66 {&ldap_uid_attr, "ldap_uid_attr", 0, 0, 0},
67 {NULL, NULL, 0, 0, -1}
70 struct pref_array prefs_array[] = {
71 {"ldap_auth_method", "none", LDAP_AUTH_NONE},
72 {"ldap_auth_method", "simple", LDAP_AUTH_SIMPLE},
73 {"ldap_auth_method", "sasl", LDAP_AUTH_SASL},
74 {"ldap_userscope", "base", LDAP_SCOPE_BASE},
75 {"ldap_userscope", "one", LDAP_SCOPE_ONELEVEL},
76 {"ldap_userscope", "sub", LDAP_SCOPE_SUBTREE},
77 {"ldap_groupscope", "base", LDAP_SCOPE_BASE},
78 {"ldap_groupscope", "one", LDAP_SCOPE_ONELEVEL},
79 {"ldap_groupscope", "sub", LDAP_SCOPE_SUBTREE},
83 /********************************************************
84 * Static helper function
85 ********************************************************/
88 * ldap_getattr_fromfilter_withbase_scope():
90 * scope: LDAP_SCOPE_BASE, LDAP_SCOPE_ONELEVEL, LDAP_SCOPE_SUBTREE
91 * result: return unique search result here, allocated here, caller must free
93 * returns: -1 on error
95 * 1 successfull search, result int 'result'
97 * All connection managment to the LDAP server is done here. Just set KEEPALIVE if you know
98 * you will be dispatching more than one search in a row, then don't set it with the last search.
99 * You MUST dispatch the queries timely, otherwise the LDAP handle might timeout.
101 static int ldap_getattr_fromfilter_withbase_scope( const char *searchbase,
110 int desired_version = LDAP_VERSION3;
111 static int ldapconnected = 0;
112 static LDAP *ld = NULL;
113 LDAPMessage* msg = NULL;
114 LDAPMessage* entry = NULL;
115 char **attribute_values = NULL;
116 struct timeval timeout;
118 LOG(log_maxdebug, logtype_afpd,"ldap: BEGIN");
123 /* init LDAP if necessary */
128 LOG(log_maxdebug, logtype_default, "ldap: server: \"%s\"",
130 if ((ld = ldap_init(ldap_server, LDAP_PORT)) == NULL ) {
131 LOG(log_error, logtype_default, "ldap: ldap_init error: %s",
135 if (ldap_set_option(ld, LDAP_OPT_PROTOCOL_VERSION, &desired_version) != 0) {
136 /* LDAP_OPT_SUCCESS is not in the proposed standard, so we check for 0
137 http://tools.ietf.org/id/draft-ietf-ldapext-ldap-c-api-05.txt */
138 LOG(log_error, logtype_default, "ldap: ldap_set_option failed!");
146 if (!ldapconnected) {
147 if (LDAP_AUTH_NONE == ldap_auth_method) {
148 if (ldap_bind_s(ld, "", "", LDAP_AUTH_SIMPLE) != LDAP_SUCCESS ) {
149 LOG(log_error, logtype_default, "ldap: ldap_bind failed, auth_method: \'%d\'",
157 } else if (LDAP_AUTH_SIMPLE == ldap_auth_method) {
158 if (ldap_bind_s(ld, ldap_auth_dn, ldap_auth_pw, ldap_auth_method) != LDAP_SUCCESS ) {
159 LOG(log_error, logtype_default,
160 "ldap: ldap_bind failed: ldap_auth_dn: \'%s\', ldap_auth_pw: \'%s\', ldap_auth_method: \'%d\'",
161 ldap_auth_dn, ldap_auth_pw, ldap_auth_method);
170 LOG(log_maxdebug, logtype_afpd, "ldap: start search: base: %s, filter: %s, attr: %s",
171 searchbase, filter, attributes[0]);
173 /* start LDAP search */
174 ldaperr = ldap_search_st(ld, searchbase, scope, filter, attributes, 0, &timeout, &msg);
175 LOG(log_maxdebug, logtype_default, "ldap: ldap_search_st returned: %s",
176 ldap_err2string(ldaperr));
177 if (ldaperr != LDAP_SUCCESS) {
178 LOG(log_error, logtype_default, "ldap: ldap_search_st failed: %s, retrycount: %i",
179 ldap_err2string(ldaperr), retrycount);
184 /* parse search result */
185 LOG(log_maxdebug, logtype_default, "ldap: got %d entries from ldap search",
186 ldap_count_entries(ld, msg));
187 if ((ret = ldap_count_entries(ld, msg)) != 1) {
192 entry = ldap_first_entry(ld, msg);
194 LOG(log_error, logtype_default, "ldap: ldap_first_entry error");
198 attribute_values = ldap_get_values(ld, entry, attributes[0]);
199 if (attribute_values == NULL) {
200 LOG(log_error, logtype_default, "ldap: ldap_get_values error");
205 LOG(log_maxdebug, logtype_afpd,"ldap: search result: %s: %s",
206 attributes[0], attribute_values[0]);
208 /* allocate result */
209 *result = strdup(attribute_values[0]);
210 if (*result == NULL) {
211 LOG(log_error, logtype_default, "ldap: strdup error: %s",strerror(errno));
217 if (attribute_values)
218 ldap_value_free(attribute_values);
219 /* FIXME: is there another way to free entry ? */
220 while (entry != NULL)
221 entry = ldap_next_entry(ld, entry);
226 if ((ret == -1) || !(conflags & KEEPALIVE)) {
227 LOG(log_maxdebug, logtype_default,"ldap: unbind");
228 if (ldap_unbind_s(ld) != 0) {
229 LOG(log_error, logtype_default, "ldap: unbind: %s\n", ldap_err2string(ldaperr));
235 /* In case of error we try twice */
246 /********************************************************
248 ********************************************************/
251 * Search UUID for name in LDAP
253 * Caller must free uuid_string when done with it
255 * @param name (r) name to search
256 * @param type (r) type of USER or GROUP
257 * @param uuid_string (w) result as pointer to allocated UUID-string
259 * @returns 0 on success, -1 on error or not found
261 int ldap_getuuidfromname( const char *name, uuidtype_t type, char **uuid_string) {
264 char filter[256]; /* this should really be enough. we dont want to malloc everything! */
265 char *attributes[] = { ldap_uuid_attr, NULL};
269 if (type == UUID_GROUP)
270 ldap_attr = ldap_group_attr;
271 else /* type hopefully == UUID_USER */
272 ldap_attr = ldap_name_attr;
273 len = snprintf( filter, 256, "%s=%s", ldap_attr, name);
274 if (len >= 256 || len == -1) {
275 LOG(log_error, logtype_default, "ldap_getnamefromuuid: filter error:%d, \"%s\"", len, filter);
279 if (type == UUID_GROUP) {
280 ret = ldap_getattr_fromfilter_withbase_scope( ldap_groupbase, filter, attributes, ldap_groupscope, KEEPALIVE, uuid_string);
281 } else { /* type hopefully == UUID_USER */
282 ret = ldap_getattr_fromfilter_withbase_scope( ldap_userbase, filter, attributes, ldap_userscope, KEEPALIVE, uuid_string);
290 * LDAP search wrapper
291 * returns allocated storage in name, caller must free it
292 * returns 0 on success, -1 on error or not found
294 * @param uuidstr (r) uuid to search as ascii string
295 * @param name (w) return pointer to name as allocated string
296 * @param type (w) return type: USER or GROUP
298 * returns 0 on success, -1 on errror
300 int ldap_getnamefromuuid( const char *uuidstr, char **name, uuidtype_t *type) {
303 char filter[256]; /* this should really be enough. we dont want to malloc everything! */
304 char *attributes[] = { NULL, NULL};
307 len = snprintf( filter, 256, "%s=%s", ldap_uuid_attr, uuidstr);
308 if (len >= 256 || len == -1) {
309 LOG(log_error, logtype_default, "ldap_getnamefromuuid: filter overflow:%d, \"%s\"", len, filter);
312 /* search groups first. group acls are probably used more often */
313 attributes[0] = ldap_group_attr;
314 ret = ldap_getattr_fromfilter_withbase_scope( ldap_groupbase, filter, attributes, ldap_groupscope, KEEPALIVE, name);
322 attributes[0] = ldap_name_attr;
323 ret = ldap_getattr_fromfilter_withbase_scope( ldap_userbase, filter, attributes, ldap_userscope, KEEPALIVE, name);