Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Increase the number of repititions in crash.test. (CVS 4027) |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
f3c3412afa95e7e4b2e6477718785b51 |
User & Date: | danielk1977 2007-05-23 06:25:13.000 |
Context
2007-05-23
| ||
06:31 | Make sure zeroblob() works with the concatenation operator. Ticket #2379. (CVS 4028) (check-in: 6e19ef7582 user: drh tags: trunk) | |
06:25 | Increase the number of repititions in crash.test. (CVS 4027) (check-in: f3c3412afa user: danielk1977 tags: trunk) | |
2007-05-21
| ||
21:59 | Fix overzealous fts2 assertions WRT rowid 0 or lower. Only check that docids are ascending if there was a prior docid set for the doclist, ignore the initial docid of 0. (CVS 4026) (check-in: ed3a131f1d user: shess tags: trunk) | |
Changes
Changes to test/crash.test.
︙ | ︙ | |||
13 14 15 16 17 18 19 | # The focus of this file is testing the ability of the database to # uses its rollback journal to recover intact (no database corruption) # from a power failure during the middle of a COMMIT. The OS interface # modules are overloaded using the modified I/O routines found in test6.c. # These routines allow us to simulate the kind of file damage that # occurs after a power failure. # | | | | | 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 | # The focus of this file is testing the ability of the database to # uses its rollback journal to recover intact (no database corruption) # from a power failure during the middle of a COMMIT. The OS interface # modules are overloaded using the modified I/O routines found in test6.c. # These routines allow us to simulate the kind of file damage that # occurs after a power failure. # # $Id: crash.test,v 1.24 2007/05/23 06:25:13 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl ifcapable !crashtest { finish_test return } set repeats 100 # set repeats 10 # The following procedure computes a "signature" for table "abc". If # abc changes in any way, the signature should change. proc signature {} { return [db eval {SELECT count(*), md5sum(a), md5sum(b), md5sum(c) FROM abc}] } proc signature2 {} { |
︙ | ︙ | |||
216 217 218 219 220 221 222 223 224 225 226 227 228 229 | ATTACH 'test2.db' AS aux; PRAGMA aux.default_cache_size = 10; CREATE TABLE aux.abc2 AS SELECT 2*a as a, 2*b as b, 2*c as c FROM abc; } expr ([file size test2.db] / 1024) > 450 } {1} for {set i 1} {$i<$repeats} {incr i} { set sig [signature] set sig2 [signature2] do_test crash-4.1.$i.1 { set c [crashsql -delay $i -file test.db-journal " ATTACH 'test2.db' AS aux; BEGIN; | > | > > > > > > | | 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 | ATTACH 'test2.db' AS aux; PRAGMA aux.default_cache_size = 10; CREATE TABLE aux.abc2 AS SELECT 2*a as a, 2*b as b, 2*c as c FROM abc; } expr ([file size test2.db] / 1024) > 450 } {1} set fin 0 for {set i 1} {$i<$repeats} {incr i} { set sig [signature] set sig2 [signature2] do_test crash-4.1.$i.1 { set c [crashsql -delay $i -file test.db-journal " ATTACH 'test2.db' AS aux; BEGIN; SELECT randstr($i,$i) FROM abc LIMIT $i; INSERT INTO abc VALUES(randstr(10,10), 0, 0); DELETE FROM abc WHERE random()%10!=0; INSERT INTO abc2 VALUES(randstr(10,10), 0, 0); DELETE FROM abc2 WHERE random()%10!=0; COMMIT; "] if { $c == {0 {}} } { set ::fin 1 set c {1 {child process exited abnormally}} } set c } {1 {child process exited abnormally}} if {$::fin} break do_test crash-4.1.$i.2 { signature } $sig do_test crash-4.1.$i.3 { signature2 } $sig2 } set i 0 set fin 0 while {[incr i]} { set sig [signature] set sig2 [signature2] set ::fin 0 do_test crash-4.2.$i.1 { set c [crashsql -delay $i -file test2.db-journal " ATTACH 'test2.db' AS aux; BEGIN; SELECT randstr($i,$i) FROM abc LIMIT $i; INSERT INTO abc VALUES(randstr(10,10), 0, 0); DELETE FROM abc WHERE random()%10!=0; INSERT INTO abc2 VALUES(randstr(10,10), 0, 0); DELETE FROM abc2 WHERE random()%10!=0; COMMIT; "] if { $c == {0 {}} } { |
︙ | ︙ |