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