Gitiles
Code Review Sign In
gerrit.openfyde.cn / chromium.googlesource.com / chromium / deps / sqlite / refs/heads/upstream/pager-get-method / . / test / permutations.test
blob: f8880da225ec8e97e0b310cc36c28d10d2597575 [file] [log] [blame]
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]1# 2008 June 21
2#
3# The author disclaims copyright to this source code. In place of
4# a legal notice, here is a blessing:
5#
6# May you do good and not evil.
7# May you find forgiveness for yourself and forgive others.
8# May you share freely, never taking more than you give.
9#
10#***********************************************************************
11#
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]12
13set testdir [file dirname $argv0]
14source $testdir/tester.tcl
dan13a3cb82010-06-11 19:04:21 +0000[diff] [blame]15db close
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]16
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]17#-------------------------------------------------------------------------
18# test_suite NAME OPTIONS
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]19#
20# where available options are:
21#
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]22# -description TITLE (default "")
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]23# -initialize SCRIPT (default "")
24# -shutdown SCRIPT (default "")
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]25# -presql SQL (default "")
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]26# -files LIST-OF-FILES (default $::ALLTESTS)
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]27# -prefix NAME (default "$::NAME.")
dan1ce1b4a2010-12-07 14:32:28 +0000[diff] [blame]28# -dbconfig SCRIPT (default "")
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]29#
30proc test_suite {name args} {
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]31
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]32 set default(-shutdown) ""
33 set default(-initialize) ""
34 set default(-presql) ""
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]35 set default(-description) "no description supplied (fixme)"
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]36 set default(-files) ""
37 set default(-prefix) "${name}."
dan1ce1b4a2010-12-07 14:32:28 +0000[diff] [blame]38 set default(-dbconfig) ""
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]39
40 array set options [array get default]
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]41 if {[llength $args]%2} {
42 error "uneven number of options/switches passed to test_suite"
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]43 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]44 foreach {k v} $args {
45 set o [array names options ${k}*]
46 if {[llength $o]>1} { error "ambiguous option: $k" }
47 if {[llength $o]==0} { error "unknown option: $k" }
48 set options([lindex $o 0]) $v
drh0a846f92008-08-25 17:23:29 +0000[diff] [blame]49 }
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]50
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]51 set ::testspec($name) [array get options]
52 lappend ::testsuitelist $name
53}
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]54
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]55#-------------------------------------------------------------------------
56# test_set ARGS...
57#
58proc test_set {args} {
59 set isExclude 0
60 foreach a $args {
61 if {[string match -* $a]} {
62 switch -- $a {
63 -include { set isExclude 0 }
64 -exclude { set isExclude 1 }
65 default {
66 error "Unknown switch: $a"
67 }
danielk1977c1def3e2008-08-30 13:25:10 +0000[diff] [blame]68 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]69 } elseif {$isExclude == 0} {
70 foreach f $a { set t($f) 1 }
drh0a846f92008-08-25 17:23:29 +0000[diff] [blame]71 } else {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]72 foreach f $a { array unset t $f }
dan897230e2010-08-26 14:15:37 +0000[diff] [blame]73 foreach f $a { array unset t */$f }
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]74 }
75 }
76
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]77 return [array names t]
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]78}
79
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]80#-------------------------------------------------------------------------
81# Set up the following global list variables containing the names of
82# various test scripts:
83#
84# $alltests
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]85# $allquicktests
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]86#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]87set alltests [list]
88foreach f [glob $testdir/*.test] { lappend alltests [file tail $f] }
dane82126c2016-03-01 16:02:57 +0000[diff] [blame]89foreach f [glob -nocomplain \
dane82126c2016-03-01 16:02:57 +0000[diff] [blame]90 $testdir/../ext/rtree/*.test \
91 $testdir/../ext/fts5/test/*.test \
92] {
dan897230e2010-08-26 14:15:37 +0000[diff] [blame]93 lappend alltests $f
94}
dan7cf7df72011-03-19 15:37:02 +0000[diff] [blame]95foreach f [glob -nocomplain $testdir/../ext/session/*.test] {
96 lappend alltests $f
97}
dan897230e2010-08-26 14:15:37 +0000[diff] [blame]98
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]99if {$::tcl_platform(platform)!="unix"} {
100 set alltests [test_set $alltests -exclude crash.test crash2.test]
danielk1977c1def3e2008-08-30 13:25:10 +0000[diff] [blame]101}
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]102set alltests [test_set $alltests -exclude {
103 all.test async.test quick.test veryquick.test
104 memleak.test permutations.test soak.test fts3.test
drh905da632015-06-10 18:53:09 +0000[diff] [blame]105 mallocAll.test rtree.test full.test extraquick.test
drh60c97e62015-06-11 18:01:29 +0000[diff] [blame]106 session.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]107}]
108
109set allquicktests [test_set $alltests -exclude {
110 async2.test async3.test backup_ioerr.test corrupt.test
111 corruptC.test crash.test crash2.test crash3.test crash4.test crash5.test
112 crash6.test crash7.test delete3.test e_fts3.test fts3rnd.test
113 fkey_malloc.test fuzz.test fuzz3.test fuzz_malloc.test in2.test loadext.test
dan273f3f02010-06-26 15:42:33 +0000[diff] [blame]114 misc7.test mutex2.test notify2.test onefile.test pagerfault2.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]115 savepoint4.test savepoint6.test select9.test
116 speed1.test speed1p.test speed2.test speed3.test speed4.test
117 speed4p.test sqllimits1.test tkt2686.test thread001.test thread002.test
118 thread003.test thread004.test thread005.test trans2.test vacuum3.test
119 incrvacuum_ioerr.test autovacuum_crash.test btree8.test shared_err.test
dan533100d2011-12-17 08:10:34 +0000[diff] [blame]120 vtab_err.test walslow.test walcrash.test walcrash3.test
dan2aba5d92012-08-07 17:41:50 +0000[diff] [blame]121 walthread.test rtree3.test indexfault.test securedel2.test
drhdb2f9192014-05-19 23:17:33 +0000[diff] [blame]122 sort3.test sort4.test fts4growth.test fts4growth2.test
danbe7721d2016-02-04 17:31:03 +0000[diff] [blame]123 bigsort.test rbu.test walprotocol.test mmap4.test fuzzer2.test
124 walcrash2.test e_fkey.test backup.test
125
126 fts4merge.test fts4merge2.test fts4merge4.test fts4check.test
127 fts3cov.test fts3snippet.test fts3corrupt2.test fts3an.test
128 fts3defer.test fts4langid.test fts3sort.test fts5unicode.test
129
130 rtree4.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]131}]
dan63109902010-07-05 05:54:55 +0000[diff] [blame]132if {[info exists ::env(QUICKTEST_INCLUDE)]} {
133 set allquicktests [concat $allquicktests $::env(QUICKTEST_INCLUDE)]
134}
drh4081d5d2015-01-01 23:02:01 +0000[diff] [blame]135if {[info exists ::env(QUICKTEST_OMIT)]} {
136 foreach x [split $::env(QUICKTEST_OMIT) ,] {
137 regsub -all \\y$x\\y $allquicktests {} allquicktests
138 }
139}
danielk1977c1def3e2008-08-30 13:25:10 +0000[diff] [blame]140
drhedb31cd2015-01-08 02:15:11 +0000[diff] [blame]141# If the TEST_FAILURE environment variable is set, it means that we what to
142# deliberately provoke test failures in order to test the test infrastructure.
143# Only the main.test module is needed for this.
144#
145if {[info exists ::env(TEST_FAILURE)]} {
146 set allquicktests main.test
147}
drhd63bd752008-07-30 13:15:46 +0000[diff] [blame]148
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]149#############################################################################
150# Start of tests
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]151#
152
153#-------------------------------------------------------------------------
154# Define the generic test suites:
155#
156# veryquick
157# quick
158# full
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]159#
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]160lappend ::testsuitelist xxx
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]161
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]162test_suite "veryquick" -prefix "" -description {
drh905da632015-06-10 18:53:09 +0000[diff] [blame]163 "Very" quick test suite. Runs in minutes on a workstation.
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]164 This test suite is the same as the "quick" tests, except that some files
165 that test malloc and IO errors are omitted.
166} -files [
dane82126c2016-03-01 16:02:57 +0000[diff] [blame]167 test_set $allquicktests -exclude *malloc* *ioerr* *fault* *bigfile* *_err* \
168 *fts5corrupt* *fts5big* *fts5aj*
drh905da632015-06-10 18:53:09 +0000[diff] [blame]169]
170
171test_suite "extraquick" -prefix "" -description {
172 "Extra" quick test suite. Runs in a few minutes on a workstation.
173 This test suite is the same as the "veryquick" tests, except that
174 slower tests are omitted.
175} -files [
danbe7721d2016-02-04 17:31:03 +0000[diff] [blame]176 test_set $allquicktests -exclude *malloc* *ioerr* *fault* *bigfile* *_err* \
drh905da632015-06-10 18:53:09 +0000[diff] [blame]177 wal3.test fts4merge* sort2.test mmap1.test walcrash* \
178 percentile.test where8m.test walcksum.test savepoint3.test \
179 fuzzer1.test fuzzer3.test fts3expr3.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]180]
181
drh9b4c59f2013-04-15 17:03:42 +0000[diff] [blame]182test_suite "mmap" -prefix "mm-" -description {
dane895b872014-12-31 09:52:15 +0000[diff] [blame]183 Similar to veryquick. Except with memory mapping enabled.
dan5d8a1372013-03-19 19:28:06 +0000[diff] [blame]184} -presql {
drh9b4c59f2013-04-15 17:03:42 +0000[diff] [blame]185 pragma mmap_size = 268435456;
dan5d8a1372013-03-19 19:28:06 +0000[diff] [blame]186} -files [
dan23f8a7c2014-12-31 18:08:46 +0000[diff] [blame]187 test_set $allquicktests -exclude *malloc* *ioerr* *fault* -include malloc.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]188]
189
dan25568442010-12-03 10:32:06 +0000[diff] [blame]190test_suite "valgrind" -prefix "" -description {
191 Run the "veryquick" test suite with a couple of multi-process tests (that
192 fail under valgrind) omitted.
193} -files [
danbe7721d2016-02-04 17:31:03 +0000[diff] [blame]194 test_set $allquicktests -exclude *malloc* *ioerr* *fault* *_err* wal.test \
drh64134662015-01-08 22:08:57 +0000[diff] [blame]195 shell*.test crash8.test atof1.test selectG.test \
drh51675f22015-11-06 20:04:08 +0000[diff] [blame]196 tkt-fc62af4523.test numindex1.test
dan25568442010-12-03 10:32:06 +0000[diff] [blame]197] -initialize {
198 set ::G(valgrind) 1
199} -shutdown {
200 unset -nocomplain ::G(valgrind)
201}
202
dan5f438122014-06-02 09:39:24 +0000[diff] [blame]203test_suite "valgrind-nolookaside" -prefix "" -description {
204 Run the "veryquick" test suite with a couple of multi-process tests (that
205 fail under valgrind) omitted.
206} -files [
danbe7721d2016-02-04 17:31:03 +0000[diff] [blame]207 test_set $allquicktests -exclude *malloc* *ioerr* *fault* *_err* \
208 wal.test atof1.test
dan5f438122014-06-02 09:39:24 +0000[diff] [blame]209] -initialize {
210 set ::G(valgrind) 1
211 catch {db close}
212 sqlite3_shutdown
213 sqlite3_config_lookaside 0 0
214 sqlite3_initialize
215 autoinstall_test_functions
216} -shutdown {
217 catch {db close}
218 sqlite3_shutdown
219 sqlite3_config_lookaside 100 500
220 sqlite3_initialize
221 autoinstall_test_functions
222 unset -nocomplain ::G(valgrind)
223}
224
225
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]226test_suite "quick" -prefix "" -description {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]227 Quick test suite. Runs in around 10 minutes on a workstation.
228} -files [
229 test_set $allquicktests
230]
231
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]232test_suite "full" -prefix "" -description {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]233 Full test suite. Takes a long time.
234} -files [
235 test_set $alltests
236] -initialize {
237 unset -nocomplain ::G(isquick)
238}
239
danea5542d2010-07-06 11:26:15 +0000[diff] [blame]240test_suite "threads" -prefix "" -description {
241 All multi-threaded tests.
242} -files {
243 notify2.test thread001.test thread002.test thread003.test
244 thread004.test thread005.test walthread.test
245}
246
dana69f7d52010-07-19 11:16:36 +0000[diff] [blame]247test_suite "fts3" -prefix "" -description {
danddf80eb2010-10-25 12:47:43 +0000[diff] [blame]248 All FTS3 tests except fts3rnd.test.
dana69f7d52010-07-19 11:16:36 +0000[diff] [blame]249} -files {
250 fts3aa.test fts3ab.test fts3ac.test fts3ad.test fts3ae.test
251 fts3af.test fts3ag.test fts3ah.test fts3ai.test fts3aj.test
252 fts3ak.test fts3al.test fts3am.test fts3an.test fts3ao.test
253 fts3atoken.test fts3b.test fts3c.test fts3cov.test fts3d.test
danddf80eb2010-10-25 12:47:43 +0000[diff] [blame]254 fts3defer.test fts3defer2.test fts3e.test fts3expr.test fts3expr2.test
danaa29c862013-04-25 20:34:02 +0000[diff] [blame]255 fts3expr3.test
danddf80eb2010-10-25 12:47:43 +0000[diff] [blame]256 fts3near.test fts3query.test fts3shared.test fts3snippet.test
dane4148542011-06-02 19:57:24 +0000[diff] [blame]257 fts3sort.test
danaf4c2142010-11-02 17:41:52 +0000[diff] [blame]258 fts3fault.test fts3malloc.test fts3matchinfo.test
dan2cf1a1d2011-06-14 09:00:27 +0000[diff] [blame]259 fts3aux1.test fts3comp1.test fts3auto.test
dand8e454e2011-10-04 11:22:59 +0000[diff] [blame]260 fts4aa.test fts4content.test
dancc5b8142011-10-04 16:37:35 +0000[diff] [blame]261 fts3conf.test fts3prefix.test fts3fault2.test fts3corrupt.test
dan5730ef52012-03-14 20:01:52 +0000[diff] [blame]262 fts3corrupt2.test fts3first.test fts4langid.test fts4merge.test
dan8def92b2013-06-21 17:30:47 +0000[diff] [blame]263 fts4check.test fts4unicode.test fts4noti.test
dan85963f52013-11-12 17:46:44 +0000[diff] [blame]264 fts3varint.test
dan9e83e462014-05-14 15:58:47 +0000[diff] [blame]265 fts4growth.test fts4growth2.test
dana69f7d52010-07-19 11:16:36 +0000[diff] [blame]266}
267
dan22d43ec2014-06-25 20:28:38 +0000[diff] [blame]268test_suite "fts5" -prefix "" -description {
269 All FTS5 tests.
dane716aca2014-12-29 15:59:36 +0000[diff] [blame]270} -files [glob -nocomplain $::testdir/../ext/fts5/test/*.test]
dan22d43ec2014-06-25 20:28:38 +0000[diff] [blame]271
dan23d53882015-05-13 17:15:32 +0000[diff] [blame]272test_suite "fts5-light" -prefix "" -description {
273 All FTS5 tests.
274} -files [
275 test_set \
276 [glob -nocomplain $::testdir/../ext/fts5/test/*.test] \
277 -exclude *corrupt* *fault* *big* *fts5aj*
278]
279
dana8793422012-06-07 07:24:04 +0000[diff] [blame]280test_suite "nofaultsim" -prefix "" -description {
281 "Very" quick test suite. Runs in less than 5 minutes on a workstation.
282 This test suite is the same as the "quick" tests, except that some files
283 that test malloc and IO errors are omitted.
284} -files [
danbe7721d2016-02-04 17:31:03 +0000[diff] [blame]285 test_set $allquicktests -exclude *malloc* *ioerr* *fault* *_err*
dana8793422012-06-07 07:24:04 +0000[diff] [blame]286] -initialize {
287 catch {db close}
288 sqlite3_shutdown
289 install_malloc_faultsim 0
290 sqlite3_initialize
291 autoinstall_test_functions
292} -shutdown {
293 unset -nocomplain ::G(valgrind)
294}
danea5542d2010-07-06 11:26:15 +0000[diff] [blame]295
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]296test_suite "queryplanner" -prefix "" -description {
297 Tests of the query planner and query optimizer
298} -files {
299 alter2.test alter3.test alter4.test alter.test analyze3.test
300 analyze4.test analyze5.test analyze6.test analyze7.test analyze8.test
drh4fe425a2013-06-12 17:08:06 +0000[diff] [blame]301 analyze.test attach2.test attach3.test attach4.test
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]302 attach.test autoinc.test autoindex1.test between.test cast.test
303 check.test closure01.test coalesce.test collate1.test collate2.test
304 collate3.test collate4.test collate5.test collate6.test collate7.test
305 collate8.test collate9.test collateA.test colmeta.test colname.test
306 conflict.test count.test coveridxscan.test createtab.test cse.test
307 date.test dbstatus2.test dbstatus.test default.test delete2.test
308 delete3.test delete.test descidx1.test descidx2.test descidx3.test
309 distinctagg.test distinct.test e_createtable.test e_delete.test
drh4fe425a2013-06-12 17:08:06 +0000[diff] [blame]310 e_droptrigger.test e_dropview.test e_expr.test e_insert.test
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]311 eqp.test e_reindex.test e_resolve.test e_select2.test e_select.test
312 e_update.test exists.test expr.test fkey1.test fkey2.test fkey3.test
drh4fe425a2013-06-12 17:08:06 +0000[diff] [blame]313 fkey4.test fkey5.test func2.test func3.test func.test
314 in3.test in4.test in5.test index2.test index3.test
315 index4.test index5.test indexedby.test index.test
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]316 insert2.test insert3.test insert4.test insert5.test insert.test
317 instr.test in.test intpkey.test join2.test join3.test join4.test
318 join5.test join6.test join.test like2.test like.test limit.test
319 minmax2.test minmax3.test minmax4.test minmax.test misc1.test misc2.test
320 misc3.test misc4.test misc5.test misc6.test misc7.test orderby1.test
321 orderby2.test orderby3.test orderby4.test randexpr1.test regexp1.test
322 reindex.test rowhash.test rowid.test schema2.test schema3.test
drh4fe425a2013-06-12 17:08:06 +0000[diff] [blame]323 schema4.test schema5.test schema.test
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]324 select1.test select2.test select3.test select4.test select5.test
325 select6.test select7.test select8.test select9.test selectA.test
326 selectB.test selectC.test selectD.test selectE.test sidedelete.test
327 sort.test spellfix.test subquery2.test subquery.test subselect.test
328 substr.test tkt-02a8e81d44.test tkt1435.test tkt1443.test tkt1444.test
329 tkt1449.test tkt1473.test tkt1501.test tkt1512.test tkt1514.test
330 tkt1536.test tkt1537.test tkt1567.test tkt1644.test tkt1667.test
331 tkt1873.test tkt2141.test tkt2192.test tkt2213.test tkt2251.test
332 tkt2285.test tkt2332.test tkt2339.test tkt2391.test tkt2409.test
333 tkt2450.test tkt2565.test tkt2640.test tkt2643.test tkt2686.test
334 tkt-26ff0c2d1e.test tkt2767.test tkt2817.test tkt2820.test tkt2822.test
335 tkt2832.test tkt2854.test tkt2920.test tkt2927.test tkt2942.test
336 tkt-2a5629202f.test tkt-2d1a5c67d.test tkt-2ea2425d34.test tkt3080.test
337 tkt3093.test tkt3121.test tkt-31338dca7e.test tkt-313723c356.test
338 tkt3201.test tkt3292.test tkt3298.test tkt3334.test tkt3346.test
339 tkt3357.test tkt3419.test tkt3424.test tkt3442.test tkt3457.test
340 tkt3461.test tkt3493.test tkt3508.test tkt3522.test tkt3527.test
341 tkt3541.test tkt3554.test tkt3581.test tkt35xx.test tkt3630.test
342 tkt3718.test tkt3731.test tkt3757.test tkt3761.test tkt3762.test
343 tkt3773.test tkt3791.test tkt3793.test tkt3810.test tkt3824.test
344 tkt3832.test tkt3838.test tkt3841.test tkt-385a5b56b9.test tkt3871.test
345 tkt3879.test tkt-38cb5df375.test tkt3911.test tkt3918.test tkt3922.test
346 tkt3929.test tkt3935.test tkt3992.test tkt3997.test tkt-3998683a16.test
347 tkt-3a77c9714e.test tkt-3fe897352e.test tkt4018.test tkt-4a03edc4c8.test
348 tkt-4dd95f6943.test tkt-54844eea3f.test tkt-5d863f876e.test
349 tkt-5e10420e8d.test tkt-5ee23731f.test tkt-6bfb98dfc0.test
350 tkt-752e1646fc.test tkt-78e04e52ea.test tkt-7a31705a7e6.test
351 tkt-7bbfb7d442.test tkt-80ba201079.test tkt-80e031a00f.test
352 tkt-8454a207b9.test tkt-91e2e8ba6f.test tkt-94c04eaadb.test
353 tkt-9d68c883.test tkt-a7b7803e.test tkt-b1d3a2e531.test
354 tkt-b351d95f9.test tkt-b72787b1.test tkt-bd484a090c.test
355 tkt-bdc6bbbb38.test tkt-c48d99d690.test tkt-cbd054fa6b.test
356 tkt-d11f09d36e.test tkt-d635236375.test tkt-d82e3f3721.test
357 tkt-f3e5abed55.test tkt-f777251dc7a.test tkt-f7b4edec.test
358 tkt-f973c7ac31.test tkt-fa7bf5ec.test tkt-fc62af4523.test
359 tkt-fc7bd6358f.test trigger1.test trigger2.test trigger3.test
360 trigger4.test trigger5.test trigger6.test trigger7.test trigger8.test
361 trigger9.test triggerA.test triggerB.test triggerC.test triggerD.test
362 types2.test types3.test types.test unique.test unordered.test
363 update.test view.test vtab1.test vtab2.test vtab3.test vtab4.test
364 vtab5.test vtab6.test vtab7.test vtab8.test vtab9.test vtab_alter.test
drh4fe425a2013-06-12 17:08:06 +0000[diff] [blame]365 vtabA.test vtabB.test vtabC.test vtabD.test vtabE.test
drhfd5874d2013-06-12 14:52:39 +0000[diff] [blame]366 vtabF.test where2.test where3.test where4.test where5.test where6.test
367 where7.test where8m.test where8.test where9.test whereA.test whereB.test
368 whereC.test whereD.test whereE.test whereF.test wherelimit.test
369 where.test
370}
371
dan30e2f0a2013-10-10 13:04:46 +0000[diff] [blame]372test_suite "vfslog" -prefix "" -description {
373 "Vfslog" quick test suite. Like "veryquick" except does not omits
374 a few tests that do not work with a version 1 VFS. And the quota* tests,
375 which do not work with a VFS that uses the pVfs argument passed to
376 sqlite3_vfs methods.
377} -files [
378 test_set $allquicktests -exclude *malloc* *ioerr* *fault* oserror.test \
379 pager1.test syscall.test sysfault.test tkt3457.test quota* superlock* \
380 wal* mmap*
381]
382
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]383lappend ::testsuitelist xxx
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]384#-------------------------------------------------------------------------
385# Define the coverage related test suites:
386#
387# coverage-wal
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]388#
389test_suite "coverage-wal" -description {
390 Coverage tests for file wal.c.
391} -files {
danf43d7fc2010-07-03 10:00:00 +0000[diff] [blame]392 wal.test wal2.test wal3.test walmode.test
393 walbak.test walhook.test walcrash2.test walcksum.test
dan8c408002010-11-01 17:38:24 +0000[diff] [blame]394 walfault.test walbig.test walnoshm.test
dan28f9b0b2011-02-07 16:24:39 +0000[diff] [blame]395 wal5.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]396}
397
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]398test_suite "coverage-pager" -description {
399 Coverage tests for file pager.c.
400} -files {
danf43d7fc2010-07-03 10:00:00 +0000[diff] [blame]401 pager1.test pager2.test pagerfault.test pagerfault2.test
402 walfault.test walbak.test journal2.test tkt-9d68c883.test
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]403}
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]404
danb49d1042013-09-02 18:58:11 +0000[diff] [blame]405test_suite "coverage-analyze" -description {
406 Coverage tests for file analyze.c.
407} -files {
408 analyze3.test analyze4.test analyze5.test analyze6.test
409 analyze7.test analyze8.test analyze9.test analyzeA.test
danaf0d8bc2013-09-04 16:38:42 +0000[diff] [blame]410 analyze.test analyzeB.test mallocA.test
danb49d1042013-09-02 18:58:11 +0000[diff] [blame]411}
412
dan0d51def2014-05-03 14:28:14 +0000[diff] [blame]413test_suite "coverage-sorter" -description {
414 Coverage tests for file vdbesort.c.
415} -files {
416 sort.test sortfault.test
417}
418
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]419
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]420lappend ::testsuitelist xxx
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]421#-------------------------------------------------------------------------
422# Define the permutation test suites:
423#
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]424
425# Run some tests using pre-allocated page and scratch blocks.
426#
dan4c5aeec2013-05-16 19:15:07 +0000[diff] [blame]427# mmap1.test is excluded because a good number of its tests depend on
428# the page-cache being larger than the database. But this permutation
429# causes the effective limit on the page-cache to be just 24 pages.
430#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]431test_suite "memsubsys1" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]432 Tests using pre-allocated page and scratch blocks
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]433} -files [
dan4c5aeec2013-05-16 19:15:07 +0000[diff] [blame]434 test_set $::allquicktests -exclude ioerr5.test malloc5.test mmap1.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]435] -initialize {
dan03bc5252015-07-24 14:17:17 +0000[diff] [blame]436 test_set_config_pagecache 4096 24
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]437 catch {db close}
438 sqlite3_shutdown
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]439 sqlite3_config_scratch 25000 1
440 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]441 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]442} -shutdown {
dan03bc5252015-07-24 14:17:17 +0000[diff] [blame]443 test_restore_config_pagecache
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]444 catch {db close}
445 sqlite3_shutdown
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]446 sqlite3_config_scratch 0 0
447 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]448 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]449}
450
451# Run some tests using pre-allocated page and scratch blocks. This time
452# the allocations are too small to use in most cases.
453#
danielk197734c61e62008-08-29 12:00:20 +0000[diff] [blame]454# Both ioerr5.test and malloc5.test are excluded because they test the
455# sqlite3_soft_heap_limit() and sqlite3_release_memory() functionality.
456# This functionality is disabled if a pre-allocated page block is provided.
457#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]458test_suite "memsubsys2" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]459 Tests using small pre-allocated page and scratch blocks
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]460} -files [
461 test_set $::allquicktests -exclude ioerr5.test malloc5.test
462] -initialize {
dan03bc5252015-07-24 14:17:17 +0000[diff] [blame]463 test_set_config_pagecache 512 5
drhd63bd752008-07-30 13:15:46 +0000[diff] [blame]464 catch {db close}
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]465 sqlite3_shutdown
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]466 sqlite3_config_scratch 1000 1
467 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]468 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]469} -shutdown {
dan03bc5252015-07-24 14:17:17 +0000[diff] [blame]470 test_restore_config_pagecache
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]471 catch {db close}
472 sqlite3_shutdown
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]473 sqlite3_config_scratch 0 0
474 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]475 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]476}
477
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]478# Run all tests with the lookaside allocator disabled.
479#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]480test_suite "nolookaside" -description {
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]481 OOM tests with lookaside disabled
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]482} -initialize {
483 catch {db close}
484 sqlite3_shutdown
485 sqlite3_config_lookaside 0 0
486 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]487 autoinstall_test_functions
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]488} -shutdown {
489 catch {db close}
490 sqlite3_shutdown
491 sqlite3_config_lookaside 100 500
492 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]493 autoinstall_test_functions
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]494} -files $::allquicktests
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]495
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]496# Run some tests in SQLITE_CONFIG_SINGLETHREAD mode.
497#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]498test_suite "singlethread" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]499 Tests run in SQLITE_CONFIG_SINGLETHREAD mode
500} -initialize {
drh04df18d2009-01-06 14:50:11 +0000[diff] [blame]501 catch {db close}
502 sqlite3_shutdown
503 catch {sqlite3_config singlethread}
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]504 sqlite3_initialize
505 autoinstall_test_functions
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]506} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]507 delete.test delete2.test insert.test rollback.test select1.test
508 select2.test trans.test update.test vacuum.test types.test
509 types2.test types3.test
510} -shutdown {
drh04df18d2009-01-06 14:50:11 +0000[diff] [blame]511 catch {db close}
512 sqlite3_shutdown
513 catch {sqlite3_config serialized}
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]514 sqlite3_initialize
515 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]516}
517
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]518test_suite "nomutex" -description {
drh039963a2008-09-03 00:43:15 +0000[diff] [blame]519 Tests run with the SQLITE_OPEN_MULTITHREADED flag passed to sqlite3_open().
danielk19779a6284c2008-07-10 17:52:49 +0000[diff] [blame]520} -initialize {
521 rename sqlite3 sqlite3_nomutex
522 proc sqlite3 {args} {
523 if {[string range [lindex $args 0] 0 0] ne "-"} {
drhcc91e7f2008-09-03 01:08:00 +0000[diff] [blame]524 lappend args -fullmutex 0 -nomutex 1
danielk19779a6284c2008-07-10 17:52:49 +0000[diff] [blame]525 }
526 uplevel [concat sqlite3_nomutex $args]
527 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]528} -files {
danielk19779a6284c2008-07-10 17:52:49 +0000[diff] [blame]529 delete.test delete2.test insert.test rollback.test select1.test
530 select2.test trans.test update.test vacuum.test types.test
531 types2.test types3.test
532} -shutdown {
533 rename sqlite3 {}
534 rename sqlite3_nomutex sqlite3
535}
536
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]537# Run some tests in SQLITE_CONFIG_MULTITHREAD mode.
538#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]539test_suite "multithread" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]540 Tests run in SQLITE_CONFIG_MULTITHREAD mode
541} -initialize {
drh04df18d2009-01-06 14:50:11 +0000[diff] [blame]542 catch {db close}
543 sqlite3_shutdown
544 catch {sqlite3_config multithread}
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]545 sqlite3_initialize
546 autoinstall_test_functions
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]547} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]548 delete.test delete2.test insert.test rollback.test select1.test
549 select2.test trans.test update.test vacuum.test types.test
dandfea4532014-05-06 15:38:07 +0000[diff] [blame]550 types2.test types3.test sort4.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]551} -shutdown {
drh04df18d2009-01-06 14:50:11 +0000[diff] [blame]552 catch {db close}
553 sqlite3_shutdown
554 catch {sqlite3_config serialized}
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]555 sqlite3_initialize
556 autoinstall_test_functions
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]557}
558
drh039963a2008-09-03 00:43:15 +0000[diff] [blame]559# Run some tests in SQLITE_OPEN_FULLMUTEX mode.
560#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]561test_suite "fullmutex" -description {
drh039963a2008-09-03 00:43:15 +0000[diff] [blame]562 Tests run in SQLITE_OPEN_FULLMUTEX mode
563} -initialize {
564 rename sqlite3 sqlite3_fullmutex
565 proc sqlite3 {args} {
566 if {[string range [lindex $args 0] 0 0] ne "-"} {
drhcc91e7f2008-09-03 01:08:00 +0000[diff] [blame]567 lappend args -nomutex 0 -fullmutex 1
drh039963a2008-09-03 00:43:15 +0000[diff] [blame]568 }
569 uplevel [concat sqlite3_fullmutex $args]
570 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]571} -files {
drh039963a2008-09-03 00:43:15 +0000[diff] [blame]572 delete.test delete2.test insert.test rollback.test select1.test
573 select2.test trans.test update.test vacuum.test types.test
574 types2.test types3.test
575} -shutdown {
576 rename sqlite3 {}
577 rename sqlite3_fullmutex sqlite3
578}
579
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]580# Run some tests using the "onefile" demo.
581#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]582test_suite "onefile" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]583 Run some tests using the "test_onefile.c" demo
584} -initialize {
585 rename sqlite3 sqlite3_onefile
586 proc sqlite3 {args} {
587 if {[string range [lindex $args 0] 0 0] ne "-"} {
588 lappend args -vfs fs
589 }
590 uplevel [concat sqlite3_onefile $args]
591 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]592} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]593 conflict.test insert.test insert2.test insert3.test
594 rollback.test select1.test select2.test select3.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]595} -shutdown {
596 rename sqlite3 {}
597 rename sqlite3_onefile sqlite3
598}
599
600# Run some tests using UTF-16 databases.
601#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]602test_suite "utf16" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]603 Run tests using UTF-16 databases
danielk19772dd6d802008-06-21 19:10:27 +0000[diff] [blame]604} -presql {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]605 pragma encoding = 'UTF-16'
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]606} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]607 alter.test alter3.test
dan22d73b12013-08-16 14:48:23 +0000[diff] [blame]608 analyze.test analyze3.test analyze4.test analyze5.test analyze6.test
dan8ff2d952013-09-05 18:40:29 +0000[diff] [blame]609 analyze7.test analyze8.test analyze9.test analyzeA.test analyzeB.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]610 auth.test bind.test blob.test capi2.test capi3.test collate1.test
611 collate2.test collate3.test collate4.test collate5.test collate6.test
612 conflict.test date.test delete.test expr.test fkey1.test func.test
613 hook.test index.test insert2.test insert.test interrupt.test in.test
614 intpkey.test ioerr.test join2.test join.test lastinsert.test
615 laststmtchanges.test limit.test lock2.test lock.test main.test
616 memdb.test minmax.test misc1.test misc2.test misc3.test notnull.test
617 null.test progress.test quote.test rowid.test select1.test select2.test
618 select3.test select4.test select5.test select6.test sort.test
619 subselect.test tableapi.test table.test temptable.test
620 trace.test trigger1.test trigger2.test trigger3.test
621 trigger4.test types2.test types.test unique.test update.test
622 vacuum.test view.test where.test
danb78b83a2016-03-02 17:57:53 +0000[diff] [blame]623 bestindex1.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]624}
625
626# Run some tests in exclusive locking mode.
627#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]628test_suite "exclusive" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]629 Run tests in exclusive locking mode.
630} -presql {
631 pragma locking_mode = 'exclusive'
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]632} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]633 rollback.test select1.test select2.test
634 malloc.test ioerr.test
635}
636
drh04335882008-09-26 21:08:08 +0000[diff] [blame]637# Run some tests in exclusive locking mode with truncated journals.
638#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]639test_suite "exclusive-truncate" -description {
drh04335882008-09-26 21:08:08 +0000[diff] [blame]640 Run tests in exclusive locking mode and truncate journal mode.
641} -presql {
642 pragma locking_mode = 'exclusive';
643 pragma journal_mode = TRUNCATE;
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]644} -files {
drh04335882008-09-26 21:08:08 +0000[diff] [blame]645 delete.test delete2.test insert.test rollback.test select1.test
646 select2.test update.test malloc.test ioerr.test
647}
648
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]649# Run some tests in persistent journal mode.
650#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]651test_suite "persistent_journal" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]652 Run tests in persistent-journal mode.
653} -presql {
654 pragma journal_mode = persist
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]655} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]656 delete.test delete2.test insert.test rollback.test select1.test
657 select2.test trans.test update.test vacuum.test
658}
659
drh04335882008-09-26 21:08:08 +0000[diff] [blame]660# Run some tests in truncating journal mode.
661#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]662test_suite "truncate_journal" -description {
drh04335882008-09-26 21:08:08 +0000[diff] [blame]663 Run tests in persistent-journal mode.
664} -presql {
665 pragma journal_mode = truncate
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]666} -files {
drh04335882008-09-26 21:08:08 +0000[diff] [blame]667 delete.test delete2.test insert.test rollback.test select1.test
668 select2.test trans.test update.test vacuum.test
669 malloc.test ioerr.test
670}
671
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]672# Run some error tests in persistent journal mode.
673#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]674test_suite "persistent_journal_error" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]675 Run malloc.test and ioerr.test in persistent-journal mode.
676} -presql {
677 pragma journal_mode = persist
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]678} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]679 malloc.test ioerr.test
680}
681
682# Run some tests in no journal mode.
683#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]684test_suite "no_journal" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]685 Run tests in no-journal mode.
686} -presql {
687 pragma journal_mode = persist
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]688} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]689 delete.test delete2.test insert.test rollback.test select1.test
690 select2.test trans.test update.test vacuum.test
691}
692
693# Run some error tests in no journal mode.
694#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]695test_suite "no_journal_error" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]696 Run malloc.test and ioerr.test in no-journal mode.
697} -presql {
698 pragma journal_mode = persist
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]699} -files {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]700 malloc.test ioerr.test
701}
702
703# Run some crash-tests in autovacuum mode.
704#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]705test_suite "autovacuum_crash" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]706 Run crash.test in autovacuum mode.
707} -presql {
708 pragma auto_vacuum = 1
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]709} -files crash.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]710
711# Run some ioerr-tests in autovacuum mode.
712#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]713test_suite "autovacuum_ioerr" -description {
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]714 Run ioerr.test in autovacuum mode.
715} -presql {
716 pragma auto_vacuum = 1
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]717} -files ioerr.test
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]718
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]719# Run tests with an in-memory journal.
720#
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]721test_suite "inmemory_journal" -description {
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]722 Run tests with an in-memory journal file.
723} -presql {
724 pragma journal_mode = 'memory'
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]725} -files [test_set $::allquicktests -exclude {
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]726 # Exclude all tests that simulate IO errors.
drh85979cd2015-11-04 13:03:36 +0000[diff] [blame]727 autovacuum_ioerr2.test cffault.test incrvacuum_ioerr.test ioerr.test
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]728 ioerr.test ioerr2.test ioerr3.test ioerr4.test ioerr5.test
drh2206a2b2009-04-01 23:09:43 +0000[diff] [blame]729 vacuum3.test incrblob_err.test diskfull.test backup_ioerr.test
shanehc3b84832010-07-09 19:32:28 +0000[diff] [blame]730 e_fts3.test fts3cov.test fts3malloc.test fts3rnd.test
dan14cee382016-04-28 14:54:54 +0000[diff] [blame]731 fts3snippet.test mmapfault.test sessionfault.test sessionfault2.test
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]732
733 # Exclude test scripts that use tcl IO to access journal files or count
734 # the number of fsync() calls.
735 pager.test exclusive.test jrnlmode.test sync.test misc1.test
danielk1977cb257902009-04-10 18:32:29 +0000[diff] [blame]736 journal1.test conflict.test crash8.test tkt3457.test io.test
drh8b0228f2011-08-02 20:14:55 +0000[diff] [blame]737 journal3.test 8_3_names.test
dan01d38562010-03-08 10:32:38 +0000[diff] [blame]738
dancb354602010-07-08 09:44:42 +0000[diff] [blame]739 pager1.test async4.test corrupt.test filefmt.test pager2.test
740 corrupt5.test corruptA.test pageropt.test
741
dan01d38562010-03-08 10:32:38 +0000[diff] [blame]742 # Exclude stmt.test, which expects sub-journals to use temporary files.
drh85979cd2015-11-04 13:03:36 +0000[diff] [blame]743 stmt.test symlink.test
drh0b944132010-05-24 20:24:38 +0000[diff] [blame]744
dan6b4e9a82012-01-13 10:51:52 +0000[diff] [blame]745 zerodamage.test
746
drh0b944132010-05-24 20:24:38 +0000[diff] [blame]747 # WAL mode is different.
drhb5a2d552015-05-29 15:15:40 +0000[diff] [blame]748 wal* tkt-2d1a5c67d.test backcompat.test e_wal* rowallock.test
danee7de912016-05-16 14:35:15 +0000[diff] [blame]749
750 # This test does not work as the "PRAGMA journal_mode = memory"
751 # statement switches the database out of wal mode at inopportune
752 # times.
753 snapshot_fault.test
danb3906812016-09-21 17:47:59 +0000[diff] [blame]754
755 # This test assumes a journal file is created on disk.
756 delete_db.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]757}]
danielk1977b3175382008-10-17 18:51:52 +0000[diff] [blame]758
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]759ifcapable mem3 {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]760 test_suite "memsys3" -description {
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]761 Run tests using the allocator in mem3.c.
daneace5272010-07-05 05:31:48 +0000[diff] [blame]762 } -files [test_set $::allquicktests -exclude {
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]763 autovacuum.test delete3.test manydb.test
764 bigrow.test incrblob2.test memdb.test
765 bitvec.test index2.test memsubsys1.test
766 capi3c.test ioerr.test memsubsys2.test
767 capi3.test join3.test pagesize.test
danielk19778b322822009-07-01 18:09:01 +0000[diff] [blame]768 collate5.test limit.test backup_ioerr.test
769 backup_malloc.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]770 }] -initialize {
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]771 catch {db close}
772 sqlite3_reset_auto_extension
773 sqlite3_shutdown
drh7830cd42008-07-16 12:25:32 +0000[diff] [blame]774 sqlite3_config_heap 25000000 0
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]775 sqlite3_config_lookaside 0 0
danielk19778b322822009-07-01 18:09:01 +0000[diff] [blame]776 ifcapable mem5 {
777 # If both memsys3 and memsys5 are enabled in the build, the call to
778 # [sqlite3_config_heap] will initialize the system to use memsys5.
779 # The following overrides this preference and installs the memsys3
780 # allocator.
781 sqlite3_install_memsys3
782 }
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]783 install_malloc_faultsim 1
784 sqlite3_initialize
785 autoinstall_test_functions
786 } -shutdown {
787 catch {db close}
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]788 sqlite3_shutdown
danielk19770d84e5b2008-06-27 14:05:24 +0000[diff] [blame]789 sqlite3_config_heap 0 0
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]790 sqlite3_config_lookaside 100 500
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]791 install_malloc_faultsim 1
792 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]793 autoinstall_test_functions
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]794 }
danielk197757e5ea92008-06-24 19:02:55 +0000[diff] [blame]795}
796
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]797ifcapable mem5 {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]798 test_suite "memsys5" -description {
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]799 Run tests using the allocator in mem5.c.
daneace5272010-07-05 05:31:48 +0000[diff] [blame]800 } -files [test_set $::allquicktests -exclude {
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]801 autovacuum.test delete3.test manydb.test
802 bigrow.test incrblob2.test memdb.test
803 bitvec.test index2.test memsubsys1.test
804 capi3c.test ioerr.test memsubsys2.test
805 capi3.test join3.test pagesize.test
danielk1977ac8d7b32008-11-13 16:21:50 +0000[diff] [blame]806 collate5.test limit.test zeroblob.test
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]807 }] -initialize {
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]808 catch {db close}
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]809 sqlite3_shutdown
drh7830cd42008-07-16 12:25:32 +0000[diff] [blame]810 sqlite3_config_heap 25000000 64
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]811 sqlite3_config_lookaside 0 0
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]812 install_malloc_faultsim 1
813 sqlite3_initialize
814 autoinstall_test_functions
815 } -shutdown {
816 catch {db close}
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]817 sqlite3_shutdown
danielk19770d84e5b2008-06-27 14:05:24 +0000[diff] [blame]818 sqlite3_config_heap 0 0
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]819 sqlite3_config_lookaside 100 500
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]820 install_malloc_faultsim 1
821 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]822 autoinstall_test_functions
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]823 }
824
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]825 test_suite "memsys5-2" -description {
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]826 Run tests using the allocator in mem5.c in a different configuration.
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]827 } -files {
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]828 select1.test
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]829 } -initialize {
830 catch {db close}
danielk19775099be52008-06-27 13:27:03 +0000[diff] [blame]831 sqlite3_shutdown
danb0c6a882010-09-02 10:08:41 +0000[diff] [blame]832 sqlite3_config_memstatus 0
drh7830cd42008-07-16 12:25:32 +0000[diff] [blame]833 sqlite3_config_heap 40000000 16
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]834 sqlite3_config_lookaside 0 0
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]835 install_malloc_faultsim 1
836 sqlite3_initialize
837 autoinstall_test_functions
838 } -shutdown {
839 catch {db close}
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]840 sqlite3_shutdown
danielk19770d84e5b2008-06-27 14:05:24 +0000[diff] [blame]841 sqlite3_config_heap 0 0
drhe2a7c6e2008-08-01 15:06:30 +0000[diff] [blame]842 sqlite3_config_lookaside 100 500
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]843 install_malloc_faultsim 1
844 sqlite3_initialize
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]845 autoinstall_test_functions
danielk19776b39c2e2008-06-25 14:57:53 +0000[diff] [blame]846 }
danielk1977c66c0e12008-06-25 14:26:07 +0000[diff] [blame]847}
848
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]849ifcapable threadsafe {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]850 test_suite "no_mutex_try" -description {
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]851 The sqlite3_mutex_try() interface always fails
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]852 } -files [
853 test_set $::allquicktests -exclude mutex1.test mutex2.test
854 ] -initialize {
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]855 catch {db close}
856 sqlite3_shutdown
857 install_mutex_counters 1
858 set ::disable_mutex_try 1
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]859 sqlite3_initialize
860 autoinstall_test_functions
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]861 } -shutdown {
862 catch {db close}
863 sqlite3_shutdown
864 install_mutex_counters 0
drhbb77b752009-04-09 01:23:49 +0000[diff] [blame]865 sqlite3_initialize
866 autoinstall_test_functions
drh8a42cbd2008-07-10 18:13:42 +0000[diff] [blame]867 }
868}
869
danielk1977b13dee92008-06-23 15:55:52 +0000[diff] [blame]870# run_tests "crash_safe_append" -description {
871# Run crash.test with persistent journals on a SAFE_APPEND file-system.
872# } -initialize {
873# rename crashsql sa_crashsql
874# proc crashsql {args} {
875# set options [lrange $args 0 [expr {[llength $args]-2}]]
876# lappend options -char safe_append
877# set sql [lindex $args end]
878# lappend options "
879# PRAGMA journal_mode=persistent;
880# $sql
881# "
882# set fd [open test.db-journal w]
883# puts $fd [string repeat 1234567890 100000]
884# close $fd
885# eval sa_crashsql $options
886# }
887# } -shutdown {
888# rename crashsql {}
889# rename sa_crashsql crashsql
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]890# } -files crash.test
danielk1977b13dee92008-06-23 15:55:52 +0000[diff] [blame]891
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]892test_suite "safe_append" -description {
danielk1977755339e2008-09-12 10:22:40 +0000[diff] [blame]893 Run some tests on a SAFE_APPEND file-system.
894} -initialize {
895 rename sqlite3 sqlite3_safeappend
896 proc sqlite3 {args} {
897 if {[string range [lindex $args 0] 0 0] ne "-"} {
898 lappend args -vfs devsym
899 }
900 uplevel [concat sqlite3_safeappend $args]
901 }
902 sqlite3_simulate_device -char safe_append
903} -shutdown {
904 rename sqlite3 {}
905 rename sqlite3_shutdown sqlite3
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]906} -files [
907 test_set $::allquicktests shared_err.test -exclude async3.test
908]
danielk1977755339e2008-09-12 10:22:40 +0000[diff] [blame]909
drhb232c232008-11-19 01:20:26 +0000[diff] [blame]910# The set of tests to run on the alternative-pcache
911set perm-alt-pcache-testset {
912 async.test
913 attach.test
914 delete.test delete2.test
915 index.test
916 insert.test insert2.test
917 join.test join2.test
918 rollback.test
919 select1.test select2.test
920 trans.test
921 update.test
922}
923
dan2acd4c62010-07-13 14:22:39 +0000[diff] [blame]924foreach discard_rate {0 10 50 90 100} {
925 test_suite "pcache${discard_rate}" -description "
926 Alternative pcache implementation with ${discard_rate}% random discard
927 " -initialize "
928 catch {db close}
929 sqlite3_shutdown
930 sqlite3_config_alt_pcache 1 $discard_rate 1
931 sqlite3_initialize
932 autoinstall_test_functions
933 " -shutdown {
934 catch {db close}
935 sqlite3_shutdown
936 sqlite3_config_alt_pcache 0 0 0
937 sqlite3_config_lookaside 100 500
938 install_malloc_faultsim 1
939 sqlite3_initialize
940 autoinstall_test_functions
941 } -files ${perm-alt-pcache-testset}
942}
danielk1977b13dee92008-06-23 15:55:52 +0000[diff] [blame]943
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]944test_suite "journaltest" -description {
danielk1977f3107512008-12-22 10:58:46 +0000[diff] [blame]945 Check that pages are synced before being written (test_journal.c).
946} -initialize {
danielk1977f3107512008-12-22 10:58:46 +0000[diff] [blame]947 catch {db close}
948 register_jt_vfs -default ""
949} -shutdown {
950 unregister_jt_vfs
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]951} -files [test_set $::allquicktests -exclude {
952 wal* incrvacuum.test ioerr.test corrupt4.test io.test crash8.test
dan05accd22016-04-27 18:54:49 +0000[diff] [blame]953 async4.test bigfile.test backcompat.test e_wal* fstat.test mmap2.test
954 pager1.test syscall.test tkt3457.test *malloc* mmap* multiplex* nolock*
955 pager2.test *fault* rowal* snapshot* superlock* symlink.test
danb3906812016-09-21 17:47:59 +0000[diff] [blame]956 delete_db.test
drhfb4a6262010-05-06 19:55:57 +0000[diff] [blame]957}]
danielk1977f3107512008-12-22 10:58:46 +0000[diff] [blame]958
dan0a7a9152010-04-07 07:57:38 +0000[diff] [blame]959if {[info commands register_demovfs] != ""} {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]960 test_suite "demovfs" -description {
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]961 Check that the demovfs (code in test_demovfs.c) more or less works.
dan0a7a9152010-04-07 07:57:38 +0000[diff] [blame]962 } -initialize {
963 register_demovfs
964 } -shutdown {
965 unregister_demovfs
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]966 } -files {
dan0a7a9152010-04-07 07:57:38 +0000[diff] [blame]967 insert.test insert2.test insert3.test rollback.test
968 select1.test select2.test select3.test
969 }
970}
971
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]972test_suite "wal" -description {
dan71cb5182010-04-26 12:39:03 +0000[diff] [blame]973 Run tests with journal_mode=WAL
dan31f98fc2010-04-27 05:42:32 +0000[diff] [blame]974} -initialize {
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]975 set ::G(savepoint6_iterations) 100
dan31f98fc2010-04-27 05:42:32 +0000[diff] [blame]976} -shutdown {
dan430e74c2010-06-07 17:47:26 +0000[diff] [blame]977 unset -nocomplain ::G(savepoint6_iterations)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]978} -files {
dane106de62010-04-27 06:49:34 +0000[diff] [blame]979 savepoint.test savepoint2.test savepoint6.test
980 trans.test avtrans.test
dan60f9da72010-07-07 11:42:59 +0000[diff] [blame]981
982 fts3aa.test fts3ab.test fts3ac.test fts3ad.test
983 fts3ae.test fts3af.test fts3ag.test fts3ah.test
984 fts3ai.test fts3aj.test fts3ak.test fts3al.test
985 fts3am.test fts3an.test fts3ao.test fts3b.test
986 fts3c.test fts3d.test fts3e.test fts3query.test
dan71cb5182010-04-26 12:39:03 +0000[diff] [blame]987}
dan897230e2010-08-26 14:15:37 +0000[diff] [blame]988
989test_suite "rtree" -description {
990 All R-tree related tests. Provides coverage of source file rtree.c.
991} -files [glob -nocomplain $::testdir/../ext/rtree/*.test]
992
dan7cf7df72011-03-19 15:37:02 +0000[diff] [blame]993test_suite "session" -description {
994 All session module related tests.
995} -files [glob -nocomplain $::testdir/../ext/session/*.test]
996
dan35e28582013-07-02 20:23:40 +0000[diff] [blame]997test_suite "session_eec" -description {
998 All session module related tests with sqlite3_extended_result_codes() set.
999} -files [
1000 glob -nocomplain $::testdir/../ext/session/*.test
1001] -dbconfig {
1002 sqlite3_extended_result_codes $::dbhandle 1
1003}
1004
drhf1a08ad2014-09-27 20:45:48 +0000[diff] [blame]1005test_suite "session_strm" -description {
danef7a6302014-09-23 20:39:55 +0000[diff] [blame]1006 All session module related tests using the streaming APIs.
1007} -files [
1008 glob -nocomplain $::testdir/../ext/session/*.test
1009] -dbconfig {
1010 set ::sqlite3session_streams 1
1011}
1012
drhcfb8f8d2015-07-23 20:44:49 +0000[diff] [blame]1013test_suite "rbu" -description {
1014 RBU tests.
dan93fdbfa2014-09-19 18:08:39 +0000[diff] [blame]1015} -files [
drhcfb8f8d2015-07-23 20:44:49 +0000[diff] [blame]1016 test_set [glob -nocomplain $::testdir/../ext/rbu/*.test] -exclude rbu.test
dan93fdbfa2014-09-19 18:08:39 +0000[diff] [blame]1017]
1018
dan1ce1b4a2010-12-07 14:32:28 +0000[diff] [blame]1019test_suite "no_optimization" -description {
1020 Run test scripts with optimizations disabled using the
1021 sqlite3_test_control(SQLITE_TESTCTRL_OPTIMIZATIONS) interface.
1022} -files {
1023 where.test where2.test where3.test where4.test where5.test
1024 where6.test where7.test where8.test where9.test
1025 whereA.test whereB.test wherelimit.test
1026 select1.test select2.test select3.test select4.test select5.test
1027 select7.test select8.test selectA.test selectC.test
1028} -dbconfig {
1029 optimization_control $::dbhandle all 0
1030}
1031
danc431fd52011-06-27 16:55:50 +0000[diff] [blame]1032test_suite "prepare" -description {
1033 Run tests with the db connection using sqlite3_prepare() instead of _v2().
1034} -dbconfig {
1035 db_use_legacy_prepare $::dbhandle 1
1036 #$::dbhandle cache size 0
1037} -files [
1038 test_set $allquicktests -exclude *malloc* *ioerr* *fault*
1039]
1040
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]1041# End of tests
1042#############################################################################
1043
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1044# run_tests NAME OPTIONS
1045#
1046# where available options are:
1047#
dan2fce9ab2010-06-15 18:00:06 +0000[diff] [blame]1048# -description TITLE
1049# -initialize SCRIPT
1050# -shutdown SCRIPT
1051# -presql SQL
1052# -files LIST-OF-FILES
1053# -prefix NAME
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1054#
1055proc run_tests {name args} {
1056 array set options $args
danielk19771077e3f2008-06-21 18:07:37 +0000[diff] [blame]1057
dand506de02010-07-03 13:59:01 +0000[diff] [blame]1058 set ::G(perm:name) $name
1059 set ::G(perm:prefix) $options(-prefix)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1060 set ::G(perm:presql) $options(-presql)
1061 set ::G(isquick) 1
dan1ce1b4a2010-12-07 14:32:28 +0000[diff] [blame]1062 set ::G(perm:dbconfig) $options(-dbconfig)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1063
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1064 foreach file [lsort $options(-files)] {
dan05accd22016-04-27 18:54:49 +0000[diff] [blame]1065 uplevel $options(-initialize)
dan897230e2010-08-26 14:15:37 +0000[diff] [blame]1066 if {[file tail $file] == $file} { set file [file join $::testdir $file] }
1067 slave_test_file $file
dan05accd22016-04-27 18:54:49 +0000[diff] [blame]1068 uplevel $options(-shutdown)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1069 }
1070
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1071 unset ::G(perm:name)
dand506de02010-07-03 13:59:01 +0000[diff] [blame]1072 unset ::G(perm:prefix)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1073 unset ::G(perm:presql)
dan1ce1b4a2010-12-07 14:32:28 +0000[diff] [blame]1074 unset ::G(perm:dbconfig)
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1075}
1076
1077proc run_test_suite {name} {
1078 if {[info exists ::testspec($name)]==0} {
1079 error "No such test suite: $name"
1080 }
1081 uplevel run_tests $name $::testspec($name)
1082}
1083
1084proc help {} {
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]1085 puts "Usage: $::argv0 TESTSUITE ?TESTFILE?"
1086 puts ""
1087 puts "Available test-suites are:"
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1088 foreach k $::testsuitelist {
dane91a54e2010-06-15 17:44:47 +0000[diff] [blame]1089 if {[info exists ::testspec($k)]==0} {
1090 puts " ----------------------------------------"
1091 puts ""
1092 } else {
1093 array set o $::testspec($k)
1094 puts "Test suite: \"$k\""
1095 set d [string trim $o(-description)]
1096 set d [regsub {\n *} $d "\n "]
1097 puts " $d"
1098 puts ""
1099 }
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1100 }
1101 exit -1
1102}
1103
drha5809362016-03-14 21:26:25 +0000[diff] [blame]1104if {[file tail $argv0] == "permutations.test"} {
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1105 proc main {argv} {
1106 if {[llength $argv]==0} {
1107 help
1108 } else {
drha5809362016-03-14 21:26:25 +0000[diff] [blame]1109 set suite [file tail [lindex $argv 0]]
dan0626dfc2010-06-15 06:56:37 +0000[diff] [blame]1110 if {[info exists ::testspec($suite)]==0} help
1111 set extra ""
1112 if {[llength $argv]>1} { set extra [list -files [lrange $argv 1 end]] }
1113 eval run_tests $suite $::testspec($suite) $extra
1114 }
1115 }
1116 main $argv
1117 finish_test
1118}