2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1997-2003
5 Copyright (C) Jelmer Vernooij 2006-2008
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
22 #include "lib/cmdline/popt_common.h"
23 #include "system/time.h"
24 #include "system/wait.h"
25 #include "system/filesys.h"
26 #include "system/readline.h"
27 #include "../libcli/smbreadline/smbreadline.h"
28 #include "libcli/libcli.h"
29 #include "lib/events/events.h"
31 #include "torture/smbtorture.h"
32 #include "librpc/rpc/dcerpc.h"
33 #include "auth/gensec/gensec.h"
34 #include "param/param.h"
35 #include "lib/util/samba_modules.h"
37 #if HAVE_READLINE_HISTORY_H
38 #include <readline/history.h>
41 static char *prefix_name(TALLOC_CTX
*mem_ctx
, const char *prefix
, const char *name
)
44 return talloc_strdup(mem_ctx
, name
);
46 return talloc_asprintf(mem_ctx
, "%s.%s", prefix
, name
);
49 static void print_test_list(const struct torture_suite
*suite
, const char *prefix
, const char *expr
)
51 struct torture_suite
*o
;
52 struct torture_tcase
*t
;
53 struct torture_test
*p
;
55 for (o
= suite
->children
; o
; o
= o
->next
) {
56 char *name
= prefix_name(NULL
, prefix
, o
->name
);
57 print_test_list(o
, name
, expr
);
61 for (t
= suite
->testcases
; t
; t
= t
->next
) {
62 for (p
= t
->tests
; p
; p
= p
->next
) {
63 char *name
= talloc_asprintf(NULL
, "%s.%s.%s", prefix
, t
->name
, p
->name
);
64 if (strncmp(name
, expr
, strlen(expr
)) == 0) {
72 static bool run_matching(struct torture_context
*torture
,
75 const char **restricted
,
76 struct torture_suite
*suite
,
80 struct torture_suite
*o
;
81 struct torture_tcase
*t
;
82 struct torture_test
*p
;
84 for (o
= suite
->children
; o
; o
= o
->next
) {
86 name
= prefix_name(torture
, prefix
, o
->name
);
87 if (gen_fnmatch(expr
, name
) == 0) {
89 reload_charcnv(torture
->lp_ctx
);
90 if (restricted
!= NULL
)
91 ret
&= torture_run_suite_restricted(torture
, o
, restricted
);
93 ret
&= torture_run_suite(torture
, o
);
95 ret
&= run_matching(torture
, name
, expr
, restricted
, o
, matched
);
98 for (t
= suite
->testcases
; t
; t
= t
->next
) {
99 char *name
= talloc_asprintf(torture
, "%s.%s", prefix
, t
->name
);
100 if (gen_fnmatch(expr
, name
) == 0) {
102 reload_charcnv(torture
->lp_ctx
);
103 ret
&= torture_run_tcase_restricted(torture
, t
, restricted
);
105 for (p
= t
->tests
; p
; p
= p
->next
) {
106 name
= talloc_asprintf(torture
, "%s.%s.%s", prefix
, t
->name
, p
->name
);
107 if (gen_fnmatch(expr
, name
) == 0) {
109 reload_charcnv(torture
->lp_ctx
);
110 ret
&= torture_run_test_restricted(torture
, t
, p
, restricted
);
118 #define MAX_COLS 80 /* FIXME: Determine this at run-time */
120 /****************************************************************************
121 run a specified test or "ALL"
122 ****************************************************************************/
123 bool torture_run_named_tests(struct torture_context
*torture
, const char *name
,
124 const char **restricted
)
127 bool matched
= false;
128 struct torture_suite
*o
;
130 torture_ui_report_time(torture
);
132 if (strequal(name
, "ALL")) {
133 if (restricted
!= NULL
) {
134 printf("--load-list and ALL are incompatible\n");
137 for (o
= torture_root
->children
; o
; o
= o
->next
) {
138 ret
&= torture_run_suite(torture
, o
);
143 ret
= run_matching(torture
, NULL
, name
, restricted
, torture_root
, &matched
);
146 printf("Unknown torture operation '%s'\n", name
);
153 bool torture_parse_target(struct loadparm_context
*lp_ctx
, const char *target
)
155 char *host
= NULL
, *share
= NULL
;
156 struct dcerpc_binding
*binding_struct
;
159 /* see if its a RPC transport specifier */
160 if (!smbcli_parse_unc(target
, NULL
, &host
, &share
)) {
161 status
= dcerpc_parse_binding(talloc_autofree_context(), target
, &binding_struct
);
162 if (NT_STATUS_IS_ERR(status
)) {
163 d_printf("Invalid option: %s is not a valid torture target (share or binding string)\n\n", target
);
166 lpcfg_set_cmdline(lp_ctx
, "torture:host", binding_struct
->host
);
167 if (lpcfg_parm_string(lp_ctx
, NULL
, "torture", "share") == NULL
)
168 lpcfg_set_cmdline(lp_ctx
, "torture:share", "IPC$");
169 lpcfg_set_cmdline(lp_ctx
, "torture:binding", target
);
171 lpcfg_set_cmdline(lp_ctx
, "torture:host", host
);
172 lpcfg_set_cmdline(lp_ctx
, "torture:share", share
);
173 lpcfg_set_cmdline(lp_ctx
, "torture:binding", host
);
179 static void parse_dns(struct loadparm_context
*lp_ctx
, const char *dns
)
181 char *userdn
, *basedn
, *secret
;
184 /* retrievieng the userdn */
185 p
= strchr_m(dns
, '#');
187 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_userdn", "");
188 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_basedn", "");
189 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_secret", "");
192 userdn
= strndup(dns
, p
- dns
);
193 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_userdn", userdn
);
195 /* retrieve the basedn */
197 p
= strchr_m(d
, '#');
199 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_basedn", "");
200 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_secret", "");
203 basedn
= strndup(d
, p
- d
);
204 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_basedn", basedn
);
206 /* retrieve the secret */
209 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_secret", "");
213 lpcfg_set_cmdline(lp_ctx
, "torture:ldap_secret", secret
);
215 printf ("%s - %s - %s\n", userdn
, basedn
, secret
);
219 /* Print the full test list, formatted into separate labelled test
222 static void print_structured_testsuite_list(void)
224 struct torture_suite
*o
;
225 struct torture_suite
*s
;
226 struct torture_tcase
*t
;
229 if (torture_root
== NULL
) {
230 printf("NO TESTS LOADED\n");
234 for (o
= torture_root
->children
; o
; o
= o
->next
) {
235 printf("\n%s (%s):\n ", o
->description
, o
->name
);
238 for (s
= o
->children
; s
; s
= s
->next
) {
239 if (i
+ strlen(o
->name
) + strlen(s
->name
) >= (MAX_COLS
- 3)) {
243 i
+=printf("%s.%s ", o
->name
, s
->name
);
246 for (t
= o
->testcases
; t
; t
= t
->next
) {
247 if (i
+ strlen(o
->name
) + strlen(t
->name
) >= (MAX_COLS
- 3)) {
251 i
+=printf("%s.%s ", o
->name
, t
->name
);
257 printf("\nThe default test is ALL.\n");
260 static void print_testsuite_list(void)
262 struct torture_suite
*o
;
263 struct torture_suite
*s
;
264 struct torture_tcase
*t
;
266 if (torture_root
== NULL
)
269 for (o
= torture_root
->children
; o
; o
= o
->next
) {
270 for (s
= o
->children
; s
; s
= s
->next
) {
271 printf("%s.%s\n", o
->name
, s
->name
);
274 for (t
= o
->testcases
; t
; t
= t
->next
) {
275 printf("%s.%s\n", o
->name
, t
->name
);
280 void torture_print_testsuites(bool structured
)
283 print_structured_testsuite_list();
285 print_testsuite_list();
289 static void usage(poptContext pc
)
291 poptPrintUsage(pc
, stdout
, 0);
294 printf("The binding format is:\n\n");
296 printf(" TRANSPORT:host[flags]\n\n");
298 printf(" where TRANSPORT is either ncacn_np for SMB, ncacn_ip_tcp for RPC/TCP\n");
299 printf(" or ncalrpc for local connections.\n\n");
301 printf(" 'host' is an IP or hostname or netbios name. If the binding string\n");
302 printf(" identifies the server side of an endpoint, 'host' may be an empty\n");
303 printf(" string.\n\n");
305 printf(" 'flags' can include a SMB pipe name if using the ncacn_np transport or\n");
306 printf(" a TCP port number if using the ncacn_ip_tcp transport, otherwise they\n");
307 printf(" will be auto-determined.\n\n");
309 printf(" other recognised flags are:\n\n");
311 printf(" sign : enable ntlmssp signing\n");
312 printf(" seal : enable ntlmssp sealing\n");
313 printf(" connect : enable rpc connect level auth (auth, but no sign or seal)\n");
314 printf(" validate: enable the NDR validator\n");
315 printf(" print: enable debugging of the packets\n");
316 printf(" bigendian: use bigendian RPC\n");
317 printf(" padcheck: check reply data for non-zero pad bytes\n\n");
319 printf(" For example, these all connect to the samr pipe:\n\n");
321 printf(" ncacn_np:myserver\n");
322 printf(" ncacn_np:myserver[samr]\n");
323 printf(" ncacn_np:myserver[\\pipe\\samr]\n");
324 printf(" ncacn_np:myserver[/pipe/samr]\n");
325 printf(" ncacn_np:myserver[samr,sign,print]\n");
326 printf(" ncacn_np:myserver[\\pipe\\samr,sign,seal,bigendian]\n");
327 printf(" ncacn_np:myserver[/pipe/samr,seal,validate]\n");
328 printf(" ncacn_np:\n");
329 printf(" ncacn_np:[/pipe/samr]\n\n");
331 printf(" ncacn_ip_tcp:myserver\n");
332 printf(" ncacn_ip_tcp:myserver[1024]\n");
333 printf(" ncacn_ip_tcp:myserver[1024,sign,seal]\n\n");
335 printf(" ncalrpc:\n\n");
337 printf("The UNC format is:\n\n");
339 printf(" //server/share\n\n");
341 printf("Tests are:");
343 print_structured_testsuite_list();
347 _NORETURN_
static void max_runtime_handler(int sig
)
349 DEBUG(0,("maximum runtime exceeded for smbtorture - terminating\n"));
353 /****************************************************************************
355 ****************************************************************************/
356 int main(int argc
,char *argv
[])
362 struct torture_context
*torture
;
363 struct torture_results
*results
;
364 const struct torture_ui_ops
*ui_ops
;
367 static const char *target
= "other";
370 static const char *ui_ops_name
= "subunit";
371 const char *basedir
= NULL
;
373 const char *extra_module
= NULL
;
374 static int list_tests
= 0, list_testsuites
= 0;
375 int num_extra_users
= 0;
376 char **restricted
= NULL
;
377 int num_restricted
= -1;
378 const char *load_list
= NULL
;
379 enum {OPT_LOADFILE
=1000,OPT_UNCLIST
,OPT_TIMELIMIT
,OPT_DNS
, OPT_LIST
,
380 OPT_DANGEROUS
,OPT_SMB_PORTS
,OPT_ASYNC
,OPT_NUMPROGS
,
383 struct poptOption long_options
[] = {
385 {"format", 0, POPT_ARG_STRING
, &ui_ops_name
, 0, "Output format (one of: simple, subunit)", NULL
},
386 {"smb-ports", 'p', POPT_ARG_STRING
, NULL
, OPT_SMB_PORTS
, "SMB ports", NULL
},
387 {"basedir", 0, POPT_ARG_STRING
, &basedir
, 0, "base directory", "BASEDIR" },
388 {"seed", 0, POPT_ARG_INT
, &torture_seed
, 0, "Seed to use for randomizer", NULL
},
389 {"num-progs", 0, POPT_ARG_INT
, NULL
, OPT_NUMPROGS
, "num progs", NULL
},
390 {"num-ops", 0, POPT_ARG_INT
, &torture_numops
, 0, "num ops", NULL
},
391 {"entries", 0, POPT_ARG_INT
, &torture_entries
, 0, "entries", NULL
},
392 {"loadfile", 0, POPT_ARG_STRING
, NULL
, OPT_LOADFILE
, "NBench load file to use", NULL
},
393 {"list-suites", 0, POPT_ARG_NONE
, &list_testsuites
, 0, "List available testsuites and exit", NULL
},
394 {"list", 0, POPT_ARG_NONE
, &list_tests
, 0, "List available tests in specified suites and exit", NULL
},
395 {"unclist", 0, POPT_ARG_STRING
, NULL
, OPT_UNCLIST
, "unclist", NULL
},
396 {"timelimit", 't', POPT_ARG_INT
, NULL
, OPT_TIMELIMIT
, "Set time limit (in seconds)", NULL
},
397 {"failures", 'f', POPT_ARG_INT
, &torture_failures
, 0, "failures", NULL
},
398 {"parse-dns", 'D', POPT_ARG_STRING
, NULL
, OPT_DNS
, "parse-dns", NULL
},
399 {"dangerous", 'X', POPT_ARG_NONE
, NULL
, OPT_DANGEROUS
,
400 "run dangerous tests (eg. wiping out password database)", NULL
},
401 {"load-module", 0, POPT_ARG_STRING
, &extra_module
, 0, "load tests from DSO file", "SOFILE"},
402 {"shell", 0, POPT_ARG_NONE
, &shell
, true, "Run shell", NULL
},
403 {"target", 'T', POPT_ARG_STRING
, &target
, 0, "samba3|samba4|other", NULL
},
404 {"async", 'a', POPT_ARG_NONE
, NULL
, OPT_ASYNC
,
405 "run async tests", NULL
},
406 {"num-async", 0, POPT_ARG_INT
, &torture_numasync
, 0,
407 "number of simultaneous async requests", NULL
},
408 {"maximum-runtime", 0, POPT_ARG_INT
, &max_runtime
, 0,
409 "set maximum time for smbtorture to live", "seconds"},
410 {"extra-user", 0, POPT_ARG_STRING
, NULL
, OPT_EXTRA_USER
,
411 "extra user credentials", NULL
},
412 {"load-list", 0, POPT_ARG_STRING
, &load_list
, 0,
413 "load a test id list from a text file", NULL
},
415 POPT_COMMON_CONNECTION
416 POPT_COMMON_CREDENTIALS
423 printf("smbtorture %s\n", samba_version_string());
425 /* we are never interested in SIGPIPE */
426 BlockSignals(true, SIGPIPE
);
428 pc
= poptGetContext("smbtorture", argc
, (const char **) argv
, long_options
,
429 POPT_CONTEXT_KEEP_FIRST
);
431 poptSetOtherOptionHelp(pc
, "<binding>|<unc> TEST1 TEST2 ...");
433 while((opt
= poptGetNextOpt(pc
)) != -1) {
436 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:loadfile", poptGetOptArg(pc
));
439 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:unclist", poptGetOptArg(pc
));
442 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:timelimit", poptGetOptArg(pc
));
445 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:nprocs", poptGetOptArg(pc
));
448 parse_dns(cmdline_lp_ctx
, poptGetOptArg(pc
));
451 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:dangerous", "Yes");
454 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:async", "Yes");
457 lpcfg_set_cmdline(cmdline_lp_ctx
, "smb ports", poptGetOptArg(pc
));
461 char *option
= talloc_asprintf(NULL
, "torture:extra_user%u",
463 const char *value
= poptGetOptArg(pc
);
464 lpcfg_set_cmdline(cmdline_lp_ctx
, option
, value
);
470 printf("bad command line option %d\n", opt
);
476 if (load_list
!= NULL
) {
477 restricted
= file_lines_load(load_list
, &num_restricted
, 0,
478 talloc_autofree_context());
479 if (restricted
== NULL
) {
480 printf("Unable to read load list file '%s'\n", load_list
);
485 if (strcmp(target
, "samba3") == 0) {
486 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:samba3", "true");
487 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:resume_key_support", "false");
488 } else if (strcmp(target
, "samba4") == 0) {
489 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:samba4", "true");
490 } else if (strcmp(target
, "samba4-ntvfs") == 0) {
491 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:samba4", "true");
492 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:samba4-ntvfs", "true");
493 } else if (strcmp(target
, "winxp") == 0) {
494 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:winxp", "true");
495 } else if (strcmp(target
, "w2k3") == 0) {
496 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:w2k3", "true");
497 } else if (strcmp(target
, "w2k8") == 0) {
498 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:w2k8", "true");
499 lpcfg_set_cmdline(cmdline_lp_ctx
,
500 "torture:invalid_lock_range_support", "false");
501 } else if (strcmp(target
, "win7") == 0) {
502 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:win7", "true");
503 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:cn_max_buffer_size",
505 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:resume_key_support", "false");
506 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:rewind_support", "false");
508 /* RAW-SEARCH for fails for inexplicable reasons against win7 */
509 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:search_ea_support", "false");
511 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:hide_on_access_denied",
513 } else if (strcmp(target
, "onefs") == 0) {
514 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:onefs", "true");
515 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:openx_deny_dos_support",
517 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:range_not_locked_on_file_close", "false");
518 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:sacl_support", "false");
519 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:ea_support", "false");
520 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:smbexit_pdu_support",
522 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:smblock_pdu_support",
524 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:2_step_break_to_none",
526 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:deny_dos_support", "false");
527 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:deny_fcb_support", "false");
528 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:read_support", "false");
529 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:writeclose_support", "false");
530 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:resume_key_support", "false");
531 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:rewind_support", "false");
532 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:raw_search_search", "false");
533 lpcfg_set_cmdline(cmdline_lp_ctx
, "torture:search_ea_size", "false");
537 /* this will only work if nobody else uses alarm(),
538 which means it won't work for some tests, but we
539 can't use the event context method we use for smbd
540 as so many tests create their own event
541 context. This will at least catch most cases. */
542 signal(SIGALRM
, max_runtime_handler
);
546 if (extra_module
!= NULL
) {
547 init_module_fn fn
= load_module(poptGetOptArg(pc
), false, NULL
);
550 d_printf("Unable to load module from %s\n", poptGetOptArg(pc
));
553 if (NT_STATUS_IS_ERR(status
)) {
554 d_printf("Error initializing module %s: %s\n",
555 poptGetOptArg(pc
), nt_errstr(status
));
562 if (list_testsuites
) {
563 print_testsuite_list();
567 argv_new
= discard_const_p(char *, poptGetArgs(pc
));
570 for (i
=0; i
<argc
; i
++) {
571 if (argv_new
[i
] == NULL
) {
579 print_test_list(torture_root
, NULL
, "");
581 for (i
=1;i
<argc_new
;i
++) {
582 print_test_list(torture_root
, NULL
, argv_new
[i
]);
588 if (torture_seed
== 0) {
589 torture_seed
= time(NULL
);
591 printf("Using seed %d\n", torture_seed
);
592 srandom(torture_seed
);
594 if (!strcmp(ui_ops_name
, "simple")) {
595 ui_ops
= &torture_simple_ui_ops
;
596 } else if (!strcmp(ui_ops_name
, "subunit")) {
597 ui_ops
= &torture_subunit_ui_ops
;
599 printf("Unknown output format '%s'\n", ui_ops_name
);
603 results
= torture_results_init(talloc_autofree_context(), ui_ops
);
605 torture
= torture_context_init(s4_event_context_init(talloc_autofree_context()),
607 if (basedir
!= NULL
) {
608 if (basedir
[0] != '/') {
609 fprintf(stderr
, "Please specify an absolute path to --basedir\n");
612 outputdir
= talloc_asprintf(torture
, "%s/smbtortureXXXXXX", basedir
);
614 char *pwd
= talloc_size(torture
, PATH_MAX
);
615 if (!getcwd(pwd
, PATH_MAX
)) {
616 fprintf(stderr
, "Unable to determine current working directory\n");
619 outputdir
= talloc_asprintf(torture
, "%s/smbtortureXXXXXX", pwd
);
622 fprintf(stderr
, "Could not allocate per-run output dir\n");
625 torture
->outputdir
= mkdtemp(outputdir
);
626 if (!torture
->outputdir
) {
627 perror("Failed to make temp output dir");
630 torture
->lp_ctx
= cmdline_lp_ctx
;
635 /* In shell mode, just ignore any remaining test names. */
636 torture_shell(torture
);
639 /* At this point, we should just have a target string,
640 * followed by a series of test names. Unless we are in
641 * shell mode, in which case we don't need anythig more.
645 printf("You must specify a test to run, or 'ALL'\n");
647 torture
->results
->returncode
= 1;
648 } else if (!torture_parse_target(cmdline_lp_ctx
, argv_new
[1])) {
649 /* Take the target name or binding. */
651 torture
->results
->returncode
= 1;
653 for (i
=2;i
<argc_new
;i
++) {
654 if (!torture_run_named_tests(torture
, argv_new
[i
],
655 (const char **)restricted
)) {
662 /* Now delete the temp dir we created */
663 torture_deltree_outputdir(torture
);
665 if (torture
->results
->returncode
&& correct
) {