59def798452b10cfe30c51164c938e26221a18c5
[ira/wip.git] / source / torture / ldap / cldap.c
1 /* 
2    Unix SMB/CIFS mplementation.
3
4    test CLDAP operations
5    
6    Copyright (C) Andrew Tridgell 2005
7     
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 3 of the License, or
11    (at your option) any later version.
12    
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.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20    
21 */
22
23 #include "includes.h"
24 #include "libcli/cldap/cldap.h"
25 #include "libcli/ldap/ldap.h"
26 #include "librpc/gen_ndr/ndr_nbt.h"
27 #include "torture/torture.h"
28 #include "lib/ldb/include/ldb.h"
29 #include "param/param.h"
30
31 #define CHECK_STATUS(status, correct) do { \
32         if (!NT_STATUS_EQUAL(status, correct)) { \
33                 printf("(%s) Incorrect status %s - should be %s\n", \
34                        __location__, nt_errstr(status), nt_errstr(correct)); \
35                 ret = false; \
36                 goto done; \
37         } \
38 } while (0)
39
40 /*
41   test netlogon operations
42 */
43 static bool test_cldap_netlogon(struct torture_context *tctx, const char *dest)
44 {
45         struct cldap_socket *cldap = cldap_socket_init(tctx, NULL);
46         NTSTATUS status;
47         struct cldap_netlogon search, empty_search;
48         union nbt_cldap_netlogon n1;
49         struct GUID guid;
50         int i;
51         bool ret = true;
52
53         ZERO_STRUCT(search);
54         search.in.dest_address = dest;
55         search.in.dest_port = lp_cldap_port(tctx->lp_ctx);
56         search.in.acct_control = -1;
57         search.in.version = 6;
58
59         empty_search = search;
60
61         printf("Trying without any attributes\n");
62         search = empty_search;
63         status = cldap_netlogon(cldap, tctx, &search);
64         CHECK_STATUS(status, NT_STATUS_OK);
65
66         n1 = search.out.netlogon;
67
68         search.in.user         = "Administrator";
69         search.in.realm        = n1.logon5.dns_domain;
70         search.in.host         = "__cldap_torture__";
71
72         printf("Scanning for netlogon levels\n");
73         for (i=0;i<256;i++) {
74                 search.in.version = i;
75                 printf("Trying netlogon level %d\n", i);
76                 status = cldap_netlogon(cldap, tctx, &search);
77                 CHECK_STATUS(status, NT_STATUS_OK);
78         }
79
80         printf("Scanning for netlogon level bits\n");
81         for (i=0;i<31;i++) {
82                 search.in.version = (1<<i);
83                 printf("Trying netlogon level 0x%x\n", i);
84                 status = cldap_netlogon(cldap, tctx, &search);
85                 CHECK_STATUS(status, NT_STATUS_OK);
86         }
87
88         search.in.version = 6;
89         status = cldap_netlogon(cldap, tctx, &search);
90         CHECK_STATUS(status, NT_STATUS_OK);
91
92         printf("Trying with User=NULL\n");
93
94         search.in.user = NULL;
95         status = cldap_netlogon(cldap, tctx, &search);
96         CHECK_STATUS(status, NT_STATUS_OK);
97
98         printf("Trying with User=Administrator\n");
99
100         search.in.user = "Administrator";
101         status = cldap_netlogon(cldap, tctx, &search);
102         CHECK_STATUS(status, NT_STATUS_OK);
103
104         printf("Trying with a GUID\n");
105         search.in.realm       = NULL;
106         search.in.domain_guid = GUID_string(tctx, &n1.logon5.domain_uuid);
107         status = cldap_netlogon(cldap, tctx, &search);
108         CHECK_STATUS(status, NT_STATUS_OK);
109
110         printf("Trying with a incorrect GUID\n");
111         guid = GUID_random();
112         search.in.user        = NULL;
113         search.in.domain_guid = GUID_string(tctx, &guid);
114         status = cldap_netlogon(cldap, tctx, &search);
115         CHECK_STATUS(status, NT_STATUS_NOT_FOUND);
116
117         printf("Trying with a AAC\n");
118         search.in.acct_control = 0x180;
119         search.in.realm = n1.logon5.dns_domain;
120         status = cldap_netlogon(cldap, tctx, &search);
121         CHECK_STATUS(status, NT_STATUS_OK);
122
123         printf("Trying with a bad AAC\n");
124         search.in.acct_control = 0xFF00FF00;
125         search.in.realm = n1.logon5.dns_domain;
126         status = cldap_netlogon(cldap, tctx, &search);
127         CHECK_STATUS(status, NT_STATUS_OK);
128
129         printf("Trying with a user only\n");
130         search = empty_search;
131         search.in.user = "Administrator";
132         status = cldap_netlogon(cldap, tctx, &search);
133         CHECK_STATUS(status, NT_STATUS_OK);
134
135         printf("Trying with just a bad username\n");
136         search.in.user = "___no_such_user___";
137         status = cldap_netlogon(cldap, tctx, &search);
138         CHECK_STATUS(status, NT_STATUS_OK);
139
140         printf("Trying with just a bad domain\n");
141         search = empty_search;
142         search.in.realm = "___no_such_domain___";
143         status = cldap_netlogon(cldap, tctx, &search);
144         CHECK_STATUS(status, NT_STATUS_NOT_FOUND);
145
146         printf("Trying with a incorrect domain and correct guid\n");
147         search.in.domain_guid = GUID_string(tctx, &n1.logon5.domain_uuid);
148         status = cldap_netlogon(cldap, tctx, &search);
149         CHECK_STATUS(status, NT_STATUS_OK);
150
151         printf("Trying with a incorrect domain and incorrect guid\n");
152         search.in.domain_guid = GUID_string(tctx, &guid);
153         status = cldap_netlogon(cldap, tctx, &search);
154         CHECK_STATUS(status, NT_STATUS_NOT_FOUND);
155
156         printf("Trying with a incorrect GUID and correct domain\n");
157         search.in.domain_guid = GUID_string(tctx, &guid);
158         search.in.realm = n1.logon5.dns_domain;
159         status = cldap_netlogon(cldap, tctx, &search);
160         CHECK_STATUS(status, NT_STATUS_OK);
161
162 done:
163         return ret;     
164 }
165
166 /*
167   convert a ldap result message to a ldb message. This allows us to
168   use the convenient ldif dump routines in ldb to print out cldap
169   search results
170 */
171 static struct ldb_message *ldap_msg_to_ldb(TALLOC_CTX *mem_ctx, struct ldb_context *ldb, struct ldap_SearchResEntry *res)
172 {
173         struct ldb_message *msg;
174
175         msg = ldb_msg_new(mem_ctx);
176         msg->dn = ldb_dn_new(msg, ldb, res->dn);
177         msg->num_elements = res->num_attributes;
178         msg->elements = talloc_steal(msg, res->attributes);
179         return msg;
180 }
181
182 /*
183   dump a set of cldap results
184 */
185 static void cldap_dump_results(struct cldap_search *search)
186 {
187         struct ldb_ldif ldif;
188         struct ldb_context *ldb;
189
190         if (!search || !(search->out.response)) {
191                 return;
192         }
193
194         /* we need a ldb context to use ldb_ldif_write_file() */
195         ldb = ldb_init(NULL);
196
197         ZERO_STRUCT(ldif);
198         ldif.msg = ldap_msg_to_ldb(ldb, ldb, search->out.response);
199
200         ldb_ldif_write_file(ldb, stdout, &ldif);
201
202         talloc_free(ldb);
203 }
204
205 /*
206   test generic cldap operations
207 */
208 static bool test_cldap_generic(struct torture_context *tctx, const char *dest)
209 {
210         struct cldap_socket *cldap = cldap_socket_init(tctx, NULL);
211         NTSTATUS status;
212         struct cldap_search search;
213         bool ret = true;
214         const char *attrs1[] = { "currentTime", "highestCommittedUSN", NULL };
215         const char *attrs2[] = { "currentTime", "highestCommittedUSN", "netlogon", NULL };
216         const char *attrs3[] = { "netlogon", NULL };
217
218         ZERO_STRUCT(search);
219         search.in.dest_address = dest;
220         search.in.dest_port = lp_cldap_port(tctx->lp_ctx);
221         search.in.timeout = 10;
222         search.in.retries = 3;
223
224         status = cldap_search(cldap, tctx, &search);
225         CHECK_STATUS(status, NT_STATUS_OK);
226
227         printf("fetching whole rootDSE\n");
228         search.in.filter = "(objectclass=*)";
229         search.in.attributes = NULL;
230
231         status = cldap_search(cldap, tctx, &search);
232         CHECK_STATUS(status, NT_STATUS_OK);
233
234         if (DEBUGLVL(3)) cldap_dump_results(&search);
235
236         printf("fetching currentTime and USN\n");
237         search.in.filter = "(objectclass=*)";
238         search.in.attributes = attrs1;
239
240         status = cldap_search(cldap, tctx, &search);
241         CHECK_STATUS(status, NT_STATUS_OK);
242         
243         if (DEBUGLVL(3)) cldap_dump_results(&search);
244
245         printf("Testing currentTime, USN and netlogon\n");
246         search.in.filter = "(objectclass=*)";
247         search.in.attributes = attrs2;
248
249         status = cldap_search(cldap, tctx, &search);
250         CHECK_STATUS(status, NT_STATUS_OK);
251
252         if (DEBUGLVL(3)) cldap_dump_results(&search);
253
254         printf("Testing objectClass=* and netlogon\n");
255         search.in.filter = "(objectclass2=*)";
256         search.in.attributes = attrs3;
257
258         status = cldap_search(cldap, tctx, &search);
259         CHECK_STATUS(status, NT_STATUS_OK);
260
261         if (DEBUGLVL(3)) cldap_dump_results(&search);
262
263         printf("Testing a false expression\n");
264         search.in.filter = "(&(objectclass=*)(highestCommittedUSN=2))";
265         search.in.attributes = attrs1;
266
267         status = cldap_search(cldap, tctx, &search);
268         CHECK_STATUS(status, NT_STATUS_OK);
269
270         if (DEBUGLVL(3)) cldap_dump_results(&search);   
271
272 done:
273         return ret;     
274 }
275
276 bool torture_cldap(struct torture_context *torture)
277 {
278         bool ret = true;
279         const char *host = torture_setting_string(torture, "host", NULL);
280
281         ret &= test_cldap_netlogon(torture, host);
282         ret &= test_cldap_generic(torture, host);
283
284         return ret;
285 }
286