pyldb: avoid segfault when adding an element with no name
[sfrench/samba-autobuild/.git] / selftest / selftesthelpers.py
1 #!/usr/bin/python
2 # This script generates a list of testsuites that should be run as part of
3 # the Samba 4 test suite.
4
5 # The output of this script is parsed by selftest.pl, which then decides
6 # which of the tests to actually run. It will, for example, skip all tests
7 # listed in selftest/skip or only run a subset during "make quicktest".
8
9 # The idea is that this script outputs all of the tests of Samba 4, not
10 # just those that are known to pass, and list those that should be skipped
11 # or are known to fail in selftest/skip or selftest/knownfail. This makes it
12 # very easy to see what functionality is still missing in Samba 4 and makes
13 # it possible to run the testsuite against other servers, such as Samba 3 or
14 # Windows that have a different set of features.
15
16 # The syntax for a testsuite is "-- TEST --" on a single line, followed
17 # by the name of the test, the environment it needs and the command to run, all
18 # three separated by newlines. All other lines in the output are considered
19 # comments.
20 from __future__ import print_function
21
22 import os
23 import subprocess
24 import sys
25
26
27 def srcdir():
28     return os.path.normpath(os.getenv("SRCDIR", os.path.join(os.path.dirname(os.path.abspath(__file__)), "..")))
29
30
31 def source4dir():
32     return os.path.normpath(os.path.join(srcdir(), "source4"))
33
34
35 def source3dir():
36     return os.path.normpath(os.path.join(srcdir(), "source3"))
37
38
39 def bindir():
40     return os.path.normpath(os.getenv("BINDIR", "./bin"))
41
42
43 def binpath(name):
44     return os.path.join(bindir(), name)
45
46
47 # Split perl variable to allow $PERL to be set to e.g. "perl -W"
48 perl = os.getenv("PERL", "perl").split()
49
50 if subprocess.call(perl + ["-e", "eval require Test::More;"]) == 0:
51     has_perl_test_more = True
52 else:
53     has_perl_test_more = False
54
55 python = os.getenv("PYTHON", "python")
56
57 tap2subunit = python + " " + os.path.join(srcdir(), "selftest", "tap2subunit")
58
59
60 def valgrindify(cmdline):
61     """Run a command under valgrind, if $VALGRIND was set."""
62     valgrind = os.getenv("VALGRIND")
63     if valgrind is None:
64         return cmdline
65     return valgrind + " " + cmdline
66
67
68 def plantestsuite(name, env, cmdline):
69     """Plan a test suite.
70
71     :param name: Testsuite name
72     :param env: Environment to run the testsuite in
73     :param cmdline: Command line to run
74     """
75     print("-- TEST --")
76     if env == "none":
77         fullname = name
78     else:
79         fullname = "%s(%s)" % (name, env)
80     print(fullname)
81     print(env)
82     if isinstance(cmdline, list):
83         cmdline = " ".join(cmdline)
84     if "$LISTOPT" in cmdline:
85         raise AssertionError("test %s supports --list, but not --load-list" % name)
86     print(cmdline + " 2>&1 " + " | " + add_prefix(name, env))
87
88
89 def add_prefix(prefix, env, support_list=False):
90     if support_list:
91         listopt = "$LISTOPT "
92     else:
93         listopt = ""
94     return "%s %s/selftest/filter-subunit %s--fail-on-empty --prefix=\"%s.\" --suffix=\"(%s)\"" % (python, srcdir(), listopt, prefix, env)
95
96
97 def plantestsuite_loadlist(name, env, cmdline):
98     print("-- TEST-LOADLIST --")
99     if env == "none":
100         fullname = name
101     else:
102         fullname = "%s(%s)" % (name, env)
103     print(fullname)
104     print(env)
105     if isinstance(cmdline, list):
106         cmdline = " ".join(cmdline)
107     support_list = ("$LISTOPT" in cmdline)
108     if "$LISTOPT" not in cmdline:
109         raise AssertionError("loadlist test %s does not support not --list" % name)
110     if "$LOADLIST" not in cmdline:
111         raise AssertionError("loadlist test %s does not support --load-list" % name)
112     print(("%s | %s" % (cmdline.replace("$LOADLIST", ""), add_prefix(name, env, support_list))).replace("$LISTOPT", "--list"))
113     print(cmdline.replace("$LISTOPT", "") + " 2>&1 " + " | " + add_prefix(name, env, False))
114
115
116 def skiptestsuite(name, reason):
117     """Indicate that a testsuite was skipped.
118
119     :param name: Test suite name
120     :param reason: Reason the test suite was skipped
121     """
122     # FIXME: Report this using subunit, but re-adjust the testsuite count somehow
123     print("skipping %s (%s)" % (name, reason), file=sys.stderr)
124
125
126 def planperltestsuite(name, path):
127     """Run a perl test suite.
128
129     :param name: Name of the test suite
130     :param path: Path to the test runner
131     """
132     if has_perl_test_more:
133         plantestsuite(name, "none", "%s %s | %s" % (" ".join(perl), path, tap2subunit))
134     else:
135         skiptestsuite(name, "Test::More not available")
136
137
138 def planpythontestsuite(env, module, name=None, extra_path=None):
139     if name is None:
140         name = module
141     args = [python, "-m", "samba.subunit.run", "$LISTOPT", "$LOADLIST", module]
142     if extra_path:
143         pypath = ["PYTHONPATH=$PYTHONPATH:%s" % ":".join(extra_path)]
144     else:
145         pypath = []
146
147     plantestsuite_loadlist(name, env, pypath + args)
148
149
150 def get_env_torture_options():
151     ret = []
152     if not os.getenv("SELFTEST_VERBOSE"):
153         ret.append("--option=torture:progress=no")
154     if os.getenv("SELFTEST_QUICK"):
155         ret.append("--option=torture:quick=yes")
156     return ret
157
158
159 samba4srcdir = source4dir()
160 samba3srcdir = source3dir()
161 bbdir = os.path.join(srcdir(), "testprogs/blackbox")
162 configuration = "--configfile=$SMB_CONF_PATH"
163
164 smbtorture4 = binpath("smbtorture")
165 smbtorture4_testsuite_list = subprocess.Popen([smbtorture4, "--list-suites"], stdout=subprocess.PIPE, stderr=subprocess.PIPE).communicate("")[0].decode('utf8').splitlines()
166
167 smbtorture4_options = [
168     configuration,
169     "--option=\'fss:sequence timeout=1\'",
170     "--maximum-runtime=$SELFTEST_MAXTIME",
171     "--basedir=$SELFTEST_TMPDIR",
172     "--format=subunit"
173 ] + get_env_torture_options()
174
175
176 def plansmbtorture4testsuite(name, env, options, target, modname=None):
177     if modname is None:
178         modname = "samba4.%s" % name
179     if isinstance(options, list):
180         options = " ".join(options)
181     options = " ".join(smbtorture4_options + ["--target=%s" % target]) + " " + options
182     cmdline = "%s $LISTOPT $LOADLIST %s %s" % (valgrindify(smbtorture4), options, name)
183     plantestsuite_loadlist(modname, env, cmdline)
184
185
186 def smbtorture4_testsuites(prefix):
187     return list(filter(lambda x: x.startswith(prefix), smbtorture4_testsuite_list))
188
189
190 smbclient3 = binpath('smbclient')
191 smbtorture3 = binpath('smbtorture3')
192 ntlm_auth3 = binpath('ntlm_auth')
193 net = binpath('net')
194 scriptdir = os.path.join(srcdir(), "script/tests")
195
196 wbinfo = binpath('wbinfo')
197 dbwrap_tool = binpath('dbwrap_tool')
198 vfstest = binpath('vfstest')
199 smbcquotas = binpath('smbcquotas')
200 smbget = binpath('smbget')
201 rpcclient = binpath('rpcclient')
202 smbcacls = binpath('smbcacls')
203 smbcontrol = binpath('smbcontrol')
204 smbstatus = binpath('smbstatus')