dan
44 lines
1.1 KiB
Plaintext
44 lines
1.1 KiB
Plaintext
# 2010 October 27
|
|
#
|
|
# 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.
|
|
#
|
|
#***********************************************************************
|
|
# Test that the FTS3 extension does not crash when it encounters a
|
|
# corrupt data structure on disk.
|
|
#
|
|
|
|
|
|
set testdir [file dirname $argv0]
|
|
source $testdir/tester.tcl
|
|
|
|
# If SQLITE_ENABLE_FTS3 is not defined, omit this file.
|
|
ifcapable !fts3 { finish_test ; return }
|
|
|
|
set ::testprefix fts3corrupt
|
|
|
|
do_execsql_test 1.0 {
|
|
CREATE VIRTUAL TABLE t1 USING fts3;
|
|
INSERT INTO t1 VALUES('hello');
|
|
} {}
|
|
|
|
do_test fts3corrupt-1.1 {
|
|
set blob [db one {SELECT root from t1_segdir}]
|
|
set blob [binary format a7ca* $blob 24 [string range $blob 8 end]]
|
|
execsql { UPDATE t1_segdir SET root = $blob }
|
|
} {}
|
|
|
|
do_test fts3corrupt-1.2 {
|
|
foreach w {a b c d e f g h i j k l m n o} {
|
|
execsql { INSERT INTO t1 VALUES($w) }
|
|
}
|
|
} {}
|
|
|
|
do_catchsql_test 1.3 {
|
|
INSERT INTO t1 VALUES('world');
|
|
} {1 {database disk image is malformed}}
|
|
|
|
finish_test
|
|
|