mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-29 08:01:23 +03:00
Add fault-injection and other tests (and fixes) to improve coverage of vdbesort.c.
FossilOrigin-Name: 0e6defa6aa540b413ea3f4bb6dcd86364d547067
This commit is contained in:
dan
248
test/indexfault.test
Normal file
248
test/indexfault.test
Normal file
@ -0,0 +1,248 @@
|
||||
# 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
|
||||
|
||||
set testprefix indexfault
|
||||
|
||||
#-------------------------------------------------------------------------
|
||||
# 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.
|
||||
#
|
||||
#
|
||||
|
||||
# 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.
|
||||
#
|
||||
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
|
||||
}
|
||||
|
||||
# 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
|
||||
}
|
||||
|
||||
finish_test
|
||||
Reference in New Issue
Block a user