2 Unix SMB/CIFS mplementation.
3 LDAP protocol helper functions for SAMBA
5 Copyright (C) Stefan Metzmacher 2004
6 Copyright (C) Simo Sorce 2004
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "lib/ldb/include/ldb.h"
26 #include "libcli/ldap/ldap.h"
27 #include "libcli/ldap/ldap_client.h"
28 #include "lib/cmdline/popt_common.h"
30 static BOOL test_bind_simple(struct ldap_connection *conn, const char *userdn, const char *password)
35 status = torture_ldap_bind(conn, userdn, password);
36 if (!NT_STATUS_IS_OK(status)) {
43 static BOOL test_bind_sasl(struct ldap_connection *conn, struct cli_credentials *creds)
48 printf("Testing sasl bind as user\n");
50 status = torture_ldap_bind_sasl(conn, creds);
51 if (!NT_STATUS_IS_OK(status)) {
58 static BOOL test_multibind(struct ldap_connection *conn, const char *userdn, const char *password)
62 printf("Testing multiple binds on a single connnection as anonymous and user\n");
64 ret = test_bind_simple(conn, NULL, NULL);
66 printf("1st bind as anonymous failed\n");
70 ret = test_bind_simple(conn, userdn, password);
72 printf("2nd bind as authenticated user failed\n");
78 static BOOL test_search_rootDSE(struct ldap_connection *conn, char **basedn)
81 struct ldap_message *msg, *result;
82 struct ldap_request *req;
84 struct ldap_SearchResEntry *r;
87 printf("Testing RootDSE Search\n");
91 msg = new_ldap_message(conn);
96 msg->type = LDAP_TAG_SearchRequest;
97 msg->r.SearchRequest.basedn = "";
98 msg->r.SearchRequest.scope = LDAP_SEARCH_SCOPE_BASE;
99 msg->r.SearchRequest.deref = LDAP_DEREFERENCE_NEVER;
100 msg->r.SearchRequest.timelimit = 0;
101 msg->r.SearchRequest.sizelimit = 0;
102 msg->r.SearchRequest.attributesonly = False;
103 msg->r.SearchRequest.tree = ldb_parse_tree(msg, "(objectclass=*)");
104 msg->r.SearchRequest.num_attributes = 0;
105 msg->r.SearchRequest.attributes = NULL;
107 req = ldap_request_send(conn, msg);
109 printf("Could not setup ldap search\n");
113 status = ldap_result_one(req, &result, LDAP_TAG_SearchResultEntry);
114 if (!NT_STATUS_IS_OK(status)) {
115 printf("search failed - %s\n", nt_errstr(status));
119 printf("received %d replies\n", req->num_replies);
121 r = &result->r.SearchResultEntry;
123 DEBUG(1,("\tdn: %s\n", r->dn));
124 for (i=0; i<r->num_attributes; i++) {
126 for (j=0; j<r->attributes[i].num_values; j++) {
127 DEBUG(1,("\t%s: %d %.*s\n", r->attributes[i].name,
128 (int)r->attributes[i].values[j].length,
129 (int)r->attributes[i].values[j].length,
130 (char *)r->attributes[i].values[j].data));
132 strcasecmp("defaultNamingContext",r->attributes[i].name)==0) {
133 *basedn = talloc_asprintf(conn, "%.*s",
134 (int)r->attributes[i].values[j].length,
135 (char *)r->attributes[i].values[j].data);
145 static BOOL test_compare_sasl(struct ldap_connection *conn, const char *basedn)
147 struct ldap_message *msg, *rep;
148 struct ldap_request *req;
152 printf("Testing SASL Compare: %s\n", basedn);
158 msg = new_ldap_message(conn);
163 msg->type = LDAP_TAG_CompareRequest;
164 msg->r.CompareRequest.dn = basedn;
165 msg->r.CompareRequest.attribute = talloc_strdup(msg, "objectClass");
167 msg->r.CompareRequest.value = data_blob_talloc(msg, val, strlen(val));
169 req = ldap_request_send(conn, msg);
174 status = ldap_result_one(req, &rep, LDAP_TAG_CompareResponse);
175 if (!NT_STATUS_IS_OK(status)) {
176 printf("error in ldap compare request - %s\n", nt_errstr(status));
180 DEBUG(5,("Code: %d DN: [%s] ERROR:[%s] REFERRAL:[%s]\n",
181 rep->r.CompareResponse.resultcode,
182 rep->r.CompareResponse.dn,
183 rep->r.CompareResponse.errormessage,
184 rep->r.CompareResponse.referral));
190 BOOL torture_ldap_basic(void)
193 struct ldap_connection *conn;
196 const char *host = lp_parm_string(-1, "torture", "host");
197 const char *userdn = lp_parm_string(-1, "torture", "ldap_userdn");
198 const char *secret = lp_parm_string(-1, "torture", "ldap_secret");
202 mem_ctx = talloc_init("torture_ldap_basic");
204 url = talloc_asprintf(mem_ctx, "ldap://%s/", host);
206 status = torture_ldap_connection(mem_ctx, &conn, url);
207 if (!NT_STATUS_IS_OK(status)) {
211 if (!test_search_rootDSE(conn, &basedn)) {
215 /* other basic tests here */
217 if (!test_multibind(conn, userdn, secret)) {
221 if (!test_bind_sasl(conn, cmdline_credentials)) {
225 if (!test_compare_sasl(conn, basedn)) {
229 /* no more test we are closing */
230 torture_ldap_close(conn);
231 talloc_free(mem_ctx);