| Index: third_party/sqlite/sqlite-src-3080704/test/corruptG.test
|
| diff --git a/third_party/sqlite/sqlite-src-3080704/test/corruptG.test b/third_party/sqlite/sqlite-src-3080704/test/corruptG.test
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..af920edf41858ebadc3b81dff821ea6e8e1625d4
|
| --- /dev/null
|
| +++ b/third_party/sqlite/sqlite-src-3080704/test/corruptG.test
|
| @@ -0,0 +1,76 @@
|
| +# 2013-08-01
|
| +#
|
| +# 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
|
| +set testprefix corruptG
|
| +
|
| +# Do not use a codec for tests in this file, as the database file is
|
| +# manipulated directly using tcl scripts (using the [hexio_write] command).
|
| +#
|
| +do_not_use_codec
|
| +
|
| +# These tests deal with corrupt database files
|
| +#
|
| +database_may_be_corrupt
|
| +
|
| +# Create a simple database with a single entry. Then corrupt the
|
| +# header-size varint on the index payload so that it maps into a
|
| +# negative number. Try to use the database.
|
| +#
|
| +
|
| +do_execsql_test 1.1 {
|
| + PRAGMA page_size=512;
|
| + CREATE TABLE t1(a,b,c);
|
| + INSERT INTO t1(rowid,a,b,c) VALUES(52,'abc','xyz','123');
|
| + CREATE INDEX t1abc ON t1(a,b,c);
|
| +}
|
| +
|
| +set idxroot [db one {SELECT rootpage FROM sqlite_master WHERE name = 't1abc'}]
|
| +
|
| +# Corrupt the file
|
| +db close
|
| +hexio_write test.db [expr {$idxroot*512 - 15}] 888080807f
|
| +sqlite3 db test.db
|
| +
|
| +# Try to use the file.
|
| +do_test 1.2 {
|
| + catchsql {
|
| + SELECT c FROM t1 WHERE a>'abc';
|
| + }
|
| +} {1 {database disk image is malformed}}
|
| +do_test 1.3 {
|
| + catchsql {
|
| + PRAGMA integrity_check
|
| + }
|
| +} {1 {database disk image is malformed}}
|
| +do_test 1.4 {
|
| + catchsql {
|
| + SELECT c FROM t1 ORDER BY a;
|
| + }
|
| +} {1 {database disk image is malformed}}
|
| +
|
| +# Corrupt the same file in a slightly different way. Make the record header
|
| +# sane, but corrupt one of the serial_type value to indicate a huge payload
|
| +# such that the payload begins in allocated space but overflows the buffer.
|
| +#
|
| +db close
|
| +hexio_write test.db [expr {$idxroot*512-15}] 0513ff7f01
|
| +sqlite3 db test.db
|
| +
|
| +do_test 2.1 {
|
| + catchsql {
|
| + SELECT rowid FROM t1 WHERE a='abc' and b='xyz123456789XYZ';
|
| + }
|
| +} {1 {database disk image is malformed}}
|
| +
|
| +finish_test
|
|
|