summaryrefslogtreecommitdiff
path: root/chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test
diff options
context:
space:
mode:
Diffstat (limited to 'chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test')
-rw-r--r--chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test106
1 files changed, 0 insertions, 106 deletions
diff --git a/chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test b/chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test
deleted file mode 100644
index 5f2ba604d12..00000000000
--- a/chromium/third_party/sqlite/sqlite-src-3240000/ext/rbu/rbucrash2.test
+++ /dev/null
@@ -1,106 +0,0 @@
-# 2017 March 02
-#
-# The author disclaims copyright to this source code. In place of
-# a legal notice, here is a blessing:
-#
-# May you do good and not evil.
-# May you find forgiveness for yourself and forgive others.
-# May you share freely, never taking more than you give.
-#
-#***********************************************************************
-#
-
-if {![info exists testdir]} {
- set testdir [file join [file dirname [info script]] .. .. test]
-}
-source $testdir/tester.tcl
-set ::testprefix rbucrash2
-
-db close
-forcedelete test.db-oal rbu.db
-sqlite3_shutdown
-sqlite3_config_uri 1
-reset_db
-
-# Set up a target database and an rbu update database. The target
-# db is the usual "test.db", the rbu db is "test.db2".
-#
-forcedelete test.db2
-do_execsql_test 1.0 {
- CREATE TABLE t1(a, b, c, PRIMARY KEY(a), UNIQUE(b));
- INSERT INTO t1 VALUES(1, 2, 3);
- INSERT INTO t1 VALUES(4, 5, 6);
- INSERT INTO t1 VALUES(7, 8, 9);
-
- ATTACH 'test.db2' AS rbu;
- CREATE TABLE rbu.data_t1(a, b, c, rbu_control);
- INSERT INTO data_t1 VALUES('one', randomblob(3500), NULL, 0);
- INSERT INTO data_t1 VALUES('two', randomblob(3500), NULL, 0);
- INSERT INTO data_t1 VALUES('three', randomblob(3500), NULL, 0);
- INSERT INTO data_t1 VALUES('four', randomblob(3500), NULL, 0);
- INSERT INTO data_t1 VALUES('five', randomblob(3500), NULL, 0);
- INSERT INTO data_t1 VALUES('six', randomblob(3500), NULL, 0);
-}
-db_save_and_close
-
-proc do_rbu_crash_test2 {tn script} {
-
- foreach {f blksz} {
- test.db 512
- test.db2 512
- test.db 4096
- test.db2 4096
- } {
- set bDone 0
- for {set iDelay 1} {$bDone==0} {incr iDelay} {
- forcedelete test.db2 test.db2-journal test.db test.db-oal test.db-wal
- db_restore
-
- set res [
- crashsql -file $f -delay $iDelay -tclbody $script -dflt 1 -opendb {} \
- -blocksize $blksz {}
- ]
-
- set bDone 1
- if {$res == "1 {child process exited abnormally}"} {
- set bDone 0
- } elseif {$res != "0 {}"} {
- error "unexected catchsql result: $res"
- }
-
- sqlite3rbu rbu test.db test.db2
- while {[rbu step]=="SQLITE_OK"} {}
- rbu close
-
- sqlite3 db test.db
- do_execsql_test $tn.delay=$iDelay.f=$f.blksz=$blksz {
- PRAGMA integrity_check;
- } {ok}
- db close
- }
- }
-}
-
-for {set x 1} {$x < 10} {incr x} {
- do_rbu_crash_test2 1.$x {
- sqlite3rbu rbu test.db test.db2
- while {[rbu step]=="SQLITE_OK"} {
- rbu savestate
- }
- rbu close
- }
-}
-
-for {set x 1} {$x < 2} {incr x} {
- do_rbu_crash_test2 2.$x {
- sqlite3rbu rbu test.db test.db2
- while {[rbu step]=="SQLITE_OK"} {
- rbu close
- sqlite3rbu rbu test.db test.db2
- }
- rbu close
- }
-}
-
-finish_test
-