s4: popt: Global replace of cmdline_credentials -> popt_get_cmdline_credentials().
[gd/samba-autobuild/.git] / source4 / torture / raw / composite.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    libcli composite function testing
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 #include "includes.h"
23 #include "torture/torture.h"
24 #include "lib/events/events.h"
25 #include "libcli/raw/libcliraw.h"
26 #include "libcli/libcli.h"
27 #include "libcli/security/security.h"
28 #include "libcli/composite/composite.h"
29 #include "libcli/smb_composite/smb_composite.h"
30 #include "librpc/gen_ndr/ndr_misc.h"
31 #include "lib/cmdline/popt_common.h"
32 #include "torture/util.h"
33 #include "param/param.h"
34 #include "libcli/resolve/resolve.h"
35 #include "torture/raw/proto.h"
36
37 #define BASEDIR "\\composite"
38
39 static void loadfile_complete(struct composite_context *c)
40 {
41         int *count = talloc_get_type(c->async.private_data, int);
42         (*count)++;
43 }
44
45 /*
46   test a simple savefile/loadfile combination
47 */
48 static bool test_loadfile(struct torture_context *tctx, struct smbcli_state *cli)
49 {
50         const char *fname = BASEDIR "\\test.txt";
51         NTSTATUS status;
52         struct smb_composite_savefile io1;
53         struct smb_composite_loadfile *io2;
54         struct composite_context **c;
55         uint8_t *data;
56         size_t len = random() % 100000;
57         const int num_ops = 50;
58         int i;
59         int *count = talloc_zero(tctx, int);
60
61         data = talloc_array(tctx, uint8_t, len);
62
63         generate_random_buffer(data, len);
64
65         io1.in.fname = fname;
66         io1.in.data  = data;
67         io1.in.size  = len;
68
69         torture_comment(tctx, "Testing savefile\n");
70
71         status = smb_composite_savefile(cli->tree, &io1);
72         torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "savefile failed");
73
74         torture_comment(tctx, "Testing parallel loadfile with %d ops\n", num_ops);
75
76         c = talloc_array(tctx, struct composite_context *, num_ops);
77         io2 = talloc_zero_array(tctx, struct smb_composite_loadfile, num_ops);
78
79         for (i=0;i<num_ops;i++) {
80                 io2[i].in.fname = fname;
81                 c[i] = smb_composite_loadfile_send(cli->tree, &io2[i]);
82                 c[i]->async.fn = loadfile_complete;
83                 c[i]->async.private_data = count;
84         }
85
86         torture_comment(tctx, "waiting for completion\n");
87         while (*count != num_ops) {
88                 tevent_loop_once(tctx->ev);
89                 if (torture_setting_bool(tctx, "progress", true)) {
90                         torture_comment(tctx, "(%s) count=%d\r", __location__, *count);
91                         fflush(stdout);
92                 }
93         }
94         torture_comment(tctx, "count=%d\n", *count);
95         
96         for (i=0;i<num_ops;i++) {
97                 status = smb_composite_loadfile_recv(c[i], tctx);
98                 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "loadfile failed");
99
100                 torture_assert_int_equal(tctx, io2[i].out.size, len, "wrong length in returned data");
101                 torture_assert_mem_equal(tctx, io2[i].out.data, data, len, "wrong data in loadfile");
102         }
103
104         talloc_free(data);
105
106         return true;
107 }
108
109 static bool test_loadfile_t(struct torture_context *tctx, struct smbcli_state *cli)
110 {
111         int ret;
112         torture_assert(tctx, torture_setup_dir(cli, BASEDIR), "failed to setup " BASEDIR);
113
114         ret = test_loadfile(tctx, cli);
115         smb_raw_exit(cli->session);
116         smbcli_deltree(cli->tree, BASEDIR);
117
118         return ret;
119 }
120
121 /*
122   test a simple savefile/loadfile combination
123 */
124 static bool test_fetchfile(struct torture_context *tctx, struct smbcli_state *cli)
125 {
126         const char *fname = BASEDIR "\\test.txt";
127         NTSTATUS status;
128         struct smb_composite_savefile io1;
129         struct smb_composite_fetchfile io2;
130         struct composite_context **c;
131         uint8_t *data;
132         int i;
133         size_t len = random() % 10000;
134         extern int torture_numops;
135         struct tevent_context *event_ctx;
136         int *count = talloc_zero(tctx, int);
137         bool ret = true;
138
139         data = talloc_array(tctx, uint8_t, len);
140
141         generate_random_buffer(data, len);
142
143         ZERO_STRUCT(io1);
144         io1.in.fname = fname;
145         io1.in.data  = data;
146         io1.in.size  = len;
147
148         torture_comment(tctx, "Testing savefile\n");
149
150         status = smb_composite_savefile(cli->tree, &io1);
151         torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "savefile failed");
152
153         ZERO_STRUCT(io2);
154
155         io2.in.dest_host = torture_setting_string(tctx, "host", NULL);
156         io2.in.ports = lpcfg_smb_ports(tctx->lp_ctx);
157         io2.in.called_name = torture_setting_string(tctx, "host", NULL);
158         io2.in.service = torture_setting_string(tctx, "share", NULL);
159         io2.in.service_type = "A:";
160         io2.in.socket_options = lpcfg_socket_options(tctx->lp_ctx);
161
162         io2.in.credentials = popt_get_cmdline_credentials();
163         io2.in.workgroup  = lpcfg_workgroup(tctx->lp_ctx);
164         io2.in.filename = fname;
165         lpcfg_smbcli_options(tctx->lp_ctx, &io2.in.options);
166         lpcfg_smbcli_session_options(tctx->lp_ctx, &io2.in.session_options);
167         io2.in.resolve_ctx = lpcfg_resolve_context(tctx->lp_ctx);
168         io2.in.gensec_settings = lpcfg_gensec_settings(tctx, tctx->lp_ctx);
169
170         torture_comment(tctx, "Testing parallel fetchfile with %d ops\n", torture_numops);
171
172         event_ctx = tctx->ev;
173         c = talloc_array(tctx, struct composite_context *, torture_numops);
174
175         for (i=0; i<torture_numops; i++) {
176                 c[i] = smb_composite_fetchfile_send(&io2, event_ctx);
177                 c[i]->async.fn = loadfile_complete;
178                 c[i]->async.private_data = count;
179         }
180
181         torture_comment(tctx, "waiting for completion\n");
182
183         while (*count != torture_numops) {
184                 tevent_loop_once(event_ctx);
185                 if (torture_setting_bool(tctx, "progress", true)) {
186                         torture_comment(tctx, "(%s) count=%d\r", __location__, *count);
187                         fflush(stdout);
188                 }
189         }
190         torture_comment(tctx, "count=%d\n", *count);
191
192         for (i=0;i<torture_numops;i++) {
193                 status = smb_composite_fetchfile_recv(c[i], tctx);
194                 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "loadfile failed");
195
196                 torture_assert_int_equal(tctx, io2.out.size, len, "wrong length in returned data");
197                 torture_assert_mem_equal(tctx, io2.out.data, data, len, "wrong data in loadfile");
198         }
199
200         return ret;
201 }
202
203 static bool test_fetchfile_t(struct torture_context *tctx, struct smbcli_state *cli)
204 {
205         int ret;
206         torture_assert(tctx, torture_setup_dir(cli, BASEDIR), "failed to setup " BASEDIR);
207         ret = test_fetchfile(tctx, cli);
208         smb_raw_exit(cli->session);
209         smbcli_deltree(cli->tree, BASEDIR);
210
211         return ret;
212 }
213
214 /*
215   test setfileacl
216 */
217 static bool test_appendacl(struct torture_context *tctx, struct smbcli_state *cli)
218 {
219         struct smb_composite_appendacl **io;
220         struct smb_composite_appendacl **io_orig;
221         struct composite_context **c;
222         struct tevent_context *event_ctx;
223
224         struct security_descriptor *test_sd;
225         struct security_ace *ace;
226         struct dom_sid *test_sid;
227
228         const int num_ops = 50;
229         int *count = talloc_zero(tctx, int);
230         struct smb_composite_savefile io1;
231
232         NTSTATUS status;
233         int i;
234
235         io_orig = talloc_array(tctx, struct smb_composite_appendacl *, num_ops);
236
237         printf ("creating %d empty files and getting their acls with appendacl\n", num_ops);
238
239         for (i = 0; i < num_ops; i++) {
240                 io1.in.fname = talloc_asprintf(io_orig, BASEDIR "\\test%d.txt", i);
241                 io1.in.data  = NULL;
242                 io1.in.size  = 0;
243           
244                 status = smb_composite_savefile(cli->tree, &io1);
245                 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "savefile failed");
246
247                 io_orig[i] = talloc (io_orig, struct smb_composite_appendacl);
248                 io_orig[i]->in.fname = talloc_steal(io_orig[i], io1.in.fname);
249                 io_orig[i]->in.sd = security_descriptor_initialise(io_orig[i]);
250                 status = smb_composite_appendacl(cli->tree, io_orig[i], io_orig[i]);
251                 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "appendacl failed");
252         }
253         
254
255         /* fill Security Descriptor with aces to be added */
256
257         test_sd = security_descriptor_initialise(tctx);
258         test_sid = dom_sid_parse_talloc (tctx, "S-1-5-32-1234-5432");
259
260         ace = talloc_zero(tctx, struct security_ace);
261
262         ace->type = SEC_ACE_TYPE_ACCESS_ALLOWED;
263         ace->flags = 0;
264         ace->access_mask = SEC_STD_ALL;
265         ace->trustee = *test_sid;
266
267         status = security_descriptor_dacl_add(test_sd, ace);
268         torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "appendacl failed");
269
270         /* set parameters for appendacl async call */
271
272         torture_comment(tctx, "Testing parallel appendacl with %d ops\n", num_ops);
273
274         c = talloc_array(tctx, struct composite_context *, num_ops);
275         io = talloc_array(tctx, struct  smb_composite_appendacl *, num_ops);
276
277         for (i=0; i < num_ops; i++) {
278                 io[i] = talloc (io, struct smb_composite_appendacl);
279                 io[i]->in.sd = test_sd;
280                 io[i]->in.fname = talloc_asprintf(io[i], BASEDIR "\\test%d.txt", i);
281
282                 c[i] = smb_composite_appendacl_send(cli->tree, io[i]);
283                 c[i]->async.fn = loadfile_complete;
284                 c[i]->async.private_data = count;
285         }
286
287         event_ctx = tctx->ev;
288         torture_comment(tctx, "waiting for completion\n");
289         while (*count != num_ops) {
290                 tevent_loop_once(event_ctx);
291                 if (torture_setting_bool(tctx, "progress", true)) {
292                         torture_comment(tctx, "(%s) count=%d\r", __location__, *count);
293                         fflush(stdout);
294                 }
295         }
296         torture_comment(tctx, "count=%d\n", *count);
297
298         for (i=0; i < num_ops; i++) {
299                 status = smb_composite_appendacl_recv(c[i], io[i]);
300                 if (!NT_STATUS_IS_OK(status)) {
301                         torture_comment(tctx, "(%s) appendacl[%d] failed - %s\n", __location__, i, nt_errstr(status));
302                         return false;
303                 }
304                 
305                 security_descriptor_dacl_add(io_orig[i]->out.sd, ace);
306                 torture_assert(tctx,
307                                security_acl_equal(io_orig[i]->out.sd->dacl,
308                                                   io[i]->out.sd->dacl),
309                                "appendacl failed - needed acl isn't set");
310         }
311         
312
313         talloc_free (ace);
314         talloc_free (test_sid);
315         talloc_free (test_sd);
316                 
317         return true;
318 }
319
320 static bool test_appendacl_t(struct torture_context *tctx, struct smbcli_state *cli)
321 {
322         int ret;
323         torture_assert(tctx, torture_setup_dir(cli, BASEDIR), "failed to setup " BASEDIR);
324         ret = test_appendacl(tctx, cli);
325         smb_raw_exit(cli->session);
326         smbcli_deltree(cli->tree, BASEDIR);
327
328         return ret;
329 }
330
331 /* test a query FS info by asking for share's GUID */
332 static bool test_fsinfo(struct torture_context *tctx, struct smbcli_state *cli)
333 {
334         char *guid = NULL;
335         NTSTATUS status;
336         struct smb_composite_fsinfo io1;
337         struct composite_context **c;
338
339         int i;
340         extern int torture_numops;
341         struct tevent_context *event_ctx;
342         int *count = talloc_zero(tctx, int);
343         bool ret = true;
344
345         io1.in.dest_host = torture_setting_string(tctx, "host", NULL);
346         io1.in.dest_ports = lpcfg_smb_ports(tctx->lp_ctx);
347         io1.in.socket_options = lpcfg_socket_options(tctx->lp_ctx);
348         io1.in.called_name = torture_setting_string(tctx, "host", NULL);
349         io1.in.service = torture_setting_string(tctx, "share", NULL);
350         io1.in.service_type = "A:";
351         io1.in.credentials = popt_get_cmdline_credentials();
352         io1.in.workgroup = lpcfg_workgroup(tctx->lp_ctx);
353         io1.in.level = RAW_QFS_OBJECTID_INFORMATION;
354         io1.in.gensec_settings = lpcfg_gensec_settings(tctx, tctx->lp_ctx);
355
356         torture_comment(tctx, "Testing parallel queryfsinfo [Object ID] with %d ops\n",
357                         torture_numops);
358
359         event_ctx = tctx->ev;
360         c = talloc_array(tctx, struct composite_context *, torture_numops);
361
362         for (i=0; i<torture_numops; i++) {
363                 c[i] = smb_composite_fsinfo_send(cli->tree, &io1, lpcfg_resolve_context(tctx->lp_ctx), event_ctx);
364                 torture_assert(tctx, c[i], "smb_composite_fsinfo_send failed!");
365                 c[i]->async.fn = loadfile_complete;
366                 c[i]->async.private_data = count;
367         }
368
369         torture_comment(tctx, "waiting for completion\n");
370
371         while (*count < torture_numops) {
372                 tevent_loop_once(event_ctx);
373                 if (torture_setting_bool(tctx, "progress", true)) {
374                         torture_comment(tctx, "(%s) count=%d\r", __location__, *count);
375                         fflush(stdout);
376                 }
377         }
378         torture_comment(tctx, "count=%d\n", *count);
379
380         for (i=0;i<torture_numops;i++) {
381                 status = smb_composite_fsinfo_recv(c[i], tctx);
382                 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_OK, "smb_composite_fsinfo_recv failed");
383
384                 torture_assert_int_equal(tctx, io1.out.fsinfo->generic.level, RAW_QFS_OBJECTID_INFORMATION, "wrong level in returned info");
385
386                 guid=GUID_string(tctx, &io1.out.fsinfo->objectid_information.out.guid);
387                 torture_comment(tctx, "[%d] GUID: %s\n", i, guid);
388         }
389
390         return ret;
391 }
392
393 static bool test_fsinfo_t(struct torture_context *tctx, struct smbcli_state *cli)
394 {
395         int ret;
396         torture_assert(tctx, torture_setup_dir(cli, BASEDIR), "failed to setup " BASEDIR);
397         ret = test_fsinfo(tctx, cli);
398         smb_raw_exit(cli->session);
399         smbcli_deltree(cli->tree, BASEDIR);
400
401         return ret;
402 }
403
404 /*
405    basic testing of all RAW_SEARCH_* calls using a single file
406 */
407 struct torture_suite *torture_raw_composite(TALLOC_CTX *mem_ctx)
408 {
409         struct torture_suite *suite = torture_suite_create(mem_ctx, "composite");
410
411         torture_suite_add_1smb_test(suite, "fetchfile", test_fetchfile_t);
412         torture_suite_add_1smb_test(suite, "loadfile", test_loadfile_t);
413         torture_suite_add_1smb_test(suite, "appendacl", test_appendacl_t);
414         torture_suite_add_1smb_test(suite, "fsinfo", test_fsinfo_t);
415
416         return suite;
417 }