| Index: third_party/sqlite/sqlite-src-3080704/test/indexfault.test
|
| diff --git a/third_party/sqlite/sqlite-src-3080704/test/indexfault.test b/third_party/sqlite/sqlite-src-3080704/test/indexfault.test
|
| deleted file mode 100644
|
| index efe493219edc907f8ef895842db7abbb8d2dea5a..0000000000000000000000000000000000000000
|
| --- a/third_party/sqlite/sqlite-src-3080704/test/indexfault.test
|
| +++ /dev/null
|
| @@ -1,342 +0,0 @@
|
| -# 2011 August 08
|
| -#
|
| -# 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.
|
| -#
|
| -#***********************************************************************
|
| -#
|
| -
|
| -set testdir [file dirname $argv0]
|
| -source $testdir/tester.tcl
|
| -source $testdir/lock_common.tcl
|
| -source $testdir/malloc_common.tcl
|
| -
|
| -ifcapable !mergesort {
|
| - finish_test
|
| - return
|
| -}
|
| -
|
| -set testprefix indexfault
|
| -
|
| -# Set up the custom fault-injector. This is further configured by using
|
| -# different values for $::custom_filter and different implementations
|
| -# of Tcl proc [xCustom] for each test case.
|
| -#
|
| -proc install_custom_faultsim {} {
|
| - set ::FAULTSIM(custom) [list \
|
| - -injectinstall custom_injectinstall \
|
| - -injectstart custom_injectstart \
|
| - -injectstop custom_injectstop \
|
| - -injecterrlist {{1 {disk I/O error}}} \
|
| - -injectuninstall custom_injectuninstall \
|
| - ]
|
| - proc custom_injectinstall {} {
|
| - testvfs shmfault -default true
|
| - shmfault filter $::custom_filter
|
| - shmfault script xCustom
|
| - }
|
| - proc custom_injectuninstall {} {
|
| - catch {db close}
|
| - catch {db2 close}
|
| - shmfault delete
|
| - }
|
| - set ::custom_ifail -1
|
| - set ::custom_nfail -1
|
| - proc custom_injectstart {iFail} {
|
| - set ::custom_ifail $iFail
|
| - set ::custom_nfail 0
|
| - }
|
| - proc custom_injectstop {} {
|
| - set ::custom_ifail -1
|
| - return $::custom_nfail
|
| - }
|
| -}
|
| -proc uninstall_custom_faultsim {} {
|
| - unset -nocomplain ::FAULTSIM(custom)
|
| -}
|
| -
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# These tests - indexfault-1.* - Build an index on a smallish table with
|
| -# all different kinds of fault-injection. The CREATE INDEX is run once
|
| -# with default options and once with a 50KB soft-heap-limit.
|
| -#
|
| -do_execsql_test 1.0 {
|
| - BEGIN;
|
| - CREATE TABLE t1(x);
|
| - INSERT INTO t1 VALUES(randomblob(202));
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 2
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 4
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 8
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 16
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 32
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 64
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 128
|
| - INSERT INTO t1 SELECT randomblob(202) FROM t1; -- 256
|
| - COMMIT;
|
| -}
|
| -faultsim_save_and_close
|
| -
|
| -do_faultsim_test 1.1 -prep {
|
| - faultsim_restore_and_reopen
|
| -} -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| - faultsim_integrity_check
|
| -}
|
| -ifcapable memorymanage {
|
| - set soft_limit [sqlite3_soft_heap_limit 50000]
|
| - do_faultsim_test 2.1 -prep {
|
| - faultsim_restore_and_reopen
|
| - } -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| - }
|
| - sqlite3_soft_heap_limit $soft_limit
|
| -}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# These are similar to the indexfault-1.* tests, except they create an
|
| -# index with more than one column.
|
| -#
|
| -sqlite3 db test.db
|
| -do_execsql_test 2.0 {
|
| - BEGIN;
|
| - DROP TABLE IF EXISTS t1;
|
| - CREATE TABLE t1(t,u,v,w,x,y,z);
|
| - INSERT INTO t1 VALUES(
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30)
|
| - );
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 2
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 4
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 8
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 16
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 32
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 64
|
| - INSERT INTO t1 SELECT
|
| - randomblob(30), randomblob(30), randomblob(30), randomblob(30),
|
| - randomblob(30), randomblob(30), randomblob(30) FROM t1; -- 128
|
| - COMMIT;
|
| -}
|
| -faultsim_save_and_close
|
| -
|
| -do_faultsim_test 2.1 -prep {
|
| - faultsim_restore_and_reopen
|
| -} -body {
|
| - execsql { CREATE INDEX i1 ON t1(t,u,v,w,x,y,z) }
|
| - faultsim_test_result {0 {}}
|
| - faultsim_integrity_check
|
| -}
|
| -ifcapable memorymanage {
|
| - set soft_limit [sqlite3_soft_heap_limit 50000]
|
| - do_faultsim_test 2.2 -prep {
|
| - faultsim_restore_and_reopen
|
| - } -body {
|
| - execsql { CREATE INDEX i1 ON t1(t,u,v,w,x,y,z) }
|
| - faultsim_test_result {0 {}}
|
| - }
|
| - sqlite3_soft_heap_limit $soft_limit
|
| -}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# The following tests - indexfault-2.* - all attempt to build a index
|
| -# on table t1 in the main database with injected IO errors. Individual
|
| -# test cases work as follows:
|
| -#
|
| -# 3.1: IO errors injected into xOpen() calls.
|
| -# 3.2: As 7.1, but with a low (50KB) soft-heap-limit.
|
| -#
|
| -# 3.3: IO errors injected into the first 200 write() calls made on the
|
| -# second temporary file.
|
| -# 3.4: As 7.3, but with a low (50KB) soft-heap-limit.
|
| -#
|
| -# 3.5: After a certain amount of data has been read from the main database
|
| -# file (and written into the temporary b-tree), sqlite3_release_memory()
|
| -# is called to free as much memory as possible. This causes the temp
|
| -# b-tree to be flushed to disk. So that before its contents can be
|
| -# transfered to a PMA they must be read back from disk - creating extra
|
| -# opportunities for IO errors.
|
| -#
|
| -install_custom_faultsim
|
| -
|
| -# Set up a table to build indexes on. Save the setup using the
|
| -# [faultsim_save_and_close] mechanism.
|
| -#
|
| -sqlite3 db test.db
|
| -do_execsql_test 3.0 {
|
| - BEGIN;
|
| - DROP TABLE IF EXISTS t1;
|
| - CREATE TABLE t1(x);
|
| - INSERT INTO t1 VALUES(randomblob(11000));
|
| - INSERT INTO t1 SELECT randomblob(11001) FROM t1; -- 2
|
| - INSERT INTO t1 SELECT randomblob(11002) FROM t1; -- 4
|
| - INSERT INTO t1 SELECT randomblob(11003) FROM t1; -- 8
|
| - INSERT INTO t1 SELECT randomblob(11004) FROM t1; -- 16
|
| - INSERT INTO t1 SELECT randomblob(11005) FROM t1; -- 32
|
| - INSERT INTO t1 SELECT randomblob(11006) FROM t1; -- 64
|
| - INSERT INTO t1 SELECT randomblob(11007) FROM t1; -- 128
|
| - INSERT INTO t1 SELECT randomblob(11008) FROM t1; -- 256
|
| - INSERT INTO t1 SELECT randomblob(11009) FROM t1; -- 512
|
| - COMMIT;
|
| -}
|
| -faultsim_save_and_close
|
| -
|
| -set ::custom_filter xOpen
|
| -proc xCustom {args} {
|
| - incr ::custom_ifail -1
|
| - if {$::custom_ifail==0} {
|
| - incr ::custom_nfail
|
| - return "SQLITE_IOERR"
|
| - }
|
| - return "SQLITE_OK"
|
| -}
|
| -do_faultsim_test 3.1 -faults custom -prep {
|
| - faultsim_restore_and_reopen
|
| -} -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| -}
|
| -ifcapable memorymanage {
|
| - set soft_limit [sqlite3_soft_heap_limit 50000]
|
| - do_faultsim_test 3.2 -faults custom -prep {
|
| - faultsim_restore_and_reopen
|
| - } -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| - }
|
| - sqlite3_soft_heap_limit $soft_limit
|
| -}
|
| -
|
| -set ::custom_filter {xOpen xWrite}
|
| -proc xCustom {method args} {
|
| - if {$method == "xOpen"} {
|
| - if {[lindex $args 0] == ""} {
|
| - incr ::nTmpOpen 1
|
| - if {$::nTmpOpen == 3} { return "failme" }
|
| - }
|
| - return "SQLITE_OK"
|
| - }
|
| - if {$::custom_ifail<200 && [lindex $args 1] == "failme"} {
|
| - incr ::custom_ifail -1
|
| - if {$::custom_ifail==0} {
|
| - incr ::custom_nfail
|
| - return "SQLITE_IOERR"
|
| - }
|
| - }
|
| - return "SQLITE_OK"
|
| -}
|
| -
|
| -do_faultsim_test 3.3 -faults custom -prep {
|
| - faultsim_restore_and_reopen
|
| - set ::nTmpOpen 0
|
| -} -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| -}
|
| -
|
| -ifcapable memorymanage {
|
| - set soft_limit [sqlite3_soft_heap_limit 50000]
|
| - do_faultsim_test 3.4 -faults custom -prep {
|
| - faultsim_restore_and_reopen
|
| - set ::nTmpOpen 0
|
| - } -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| - }
|
| - sqlite3_soft_heap_limit $soft_limit
|
| -}
|
| -
|
| -uninstall_custom_faultsim
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# Test 4: After a certain amount of data has been read from the main database
|
| -# file (and written into the temporary b-tree), sqlite3_release_memory() is
|
| -# called to free as much memory as possible. This causes the temp b-tree to be
|
| -# flushed to disk. So that before its contents can be transfered to a PMA they
|
| -# must be read back from disk - creating extra opportunities for IO errors.
|
| -#
|
| -install_custom_faultsim
|
| -
|
| -catch { db close }
|
| -forcedelete test.db
|
| -sqlite3 db test.db
|
| -
|
| -do_execsql_test 4.0 {
|
| - BEGIN;
|
| - DROP TABLE IF EXISTS t1;
|
| - CREATE TABLE t1(x);
|
| - INSERT INTO t1 VALUES(randomblob(11000));
|
| - INSERT INTO t1 SELECT randomblob(11001) FROM t1; -- 2
|
| - INSERT INTO t1 SELECT randomblob(11002) FROM t1; -- 4
|
| - INSERT INTO t1 SELECT randomblob(11003) FROM t1; -- 8
|
| - INSERT INTO t1 SELECT randomblob(11004) FROM t1; -- 16
|
| - INSERT INTO t1 SELECT randomblob(11005) FROM t1; -- 32
|
| - INSERT INTO t1 SELECT randomblob(11005) FROM t1; -- 64
|
| - COMMIT;
|
| -}
|
| -faultsim_save_and_close
|
| -
|
| -testvfs tvfs
|
| -tvfs script xRead
|
| -tvfs filter xRead
|
| -set ::nRead 0
|
| -proc xRead {method file args} {
|
| - if {[file tail $file] == "test.db"} { incr ::nRead }
|
| -}
|
| -
|
| -do_test 4.1 {
|
| - sqlite3 db test.db -vfs tvfs
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| -} {}
|
| -
|
| -db close
|
| -tvfs delete
|
| -
|
| -set ::custom_filter xRead
|
| -proc xCustom {method file args} {
|
| - incr ::nReadCall
|
| - if {$::nReadCall >= ($::nRead/5)} {
|
| - if {$::nReadCall == ($::nRead/5)} {
|
| - set nByte [sqlite3_release_memory [expr 64*1024*1024]]
|
| - sqlite3_soft_heap_limit 20000
|
| - }
|
| - if {$file == ""} {
|
| - incr ::custom_ifail -1
|
| - if {$::custom_ifail==0} {
|
| - incr ::custom_nfail
|
| - return "SQLITE_IOERR"
|
| - }
|
| - }
|
| - }
|
| - return "SQLITE_OK"
|
| -}
|
| -
|
| -do_faultsim_test 4.2 -faults custom -prep {
|
| - faultsim_restore_and_reopen
|
| - set ::nReadCall 0
|
| - sqlite3_soft_heap_limit 0
|
| -} -body {
|
| - execsql { CREATE INDEX i1 ON t1(x) }
|
| - faultsim_test_result {0 {}}
|
| -}
|
| -
|
| -uninstall_custom_faultsim
|
| -
|
| -finish_test
|
|
|