Index: third_party/sqlite/sqlite-src-3170000/test/incrcorrupt.test |
diff --git a/third_party/sqlite/sqlite-src-3170000/test/incrcorrupt.test b/third_party/sqlite/sqlite-src-3170000/test/incrcorrupt.test |
new file mode 100644 |
index 0000000000000000000000000000000000000000..2ea68c8c7ca113025e6ed0d7a54b6817cacc9b55 |
--- /dev/null |
+++ b/third_party/sqlite/sqlite-src-3170000/test/incrcorrupt.test |
@@ -0,0 +1,126 @@ |
+# 2001 October 12 |
+# |
+# 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. |
+# |
+#*********************************************************************** |
+# Test that "PRAGMA incremental_vacuum" detects and reports database |
+# corruption properly. And that "PRAGMA auto_vacuum = INCREMENTAL" |
+# does as well. |
+# |
+ |
+set testdir [file dirname $argv0] |
+source $testdir/tester.tcl |
+set testprefix incrcorrupt |
+ |
+# If this build of the library does not support auto-vacuum, omit this |
+# whole file. |
+ifcapable {!autovacuum} { |
+ finish_test |
+ return |
+} |
+ |
+do_execsql_test 1.0 { |
+ PRAGMA auto_vacuum = 2; |
+ CREATE TABLE t1(a PRIMARY KEY, b); |
+ |
+ WITH data(i) AS ( |
+ SELECT 1 UNION ALL SELECT i+1 FROM data |
+ ) |
+ INSERT INTO t1 SELECT i, randomblob(600) FROM data LIMIT 20; |
+ PRAGMA page_count; |
+} {24} |
+ |
+do_execsql_test 1.1 { |
+ PRAGMA incremental_vacuum; |
+} {} |
+ |
+do_test 1.2 { |
+ db_save |
+ hexio_write test.db 36 00000019 |
+ catchsql { PRAGMA incremental_vacuum; } |
+} {1 {database disk image is malformed}} |
+ |
+do_test 1.3 { |
+ set stmt [sqlite3_prepare_v2 db "PRAGMA incremental_vacuum" -1 dummy] |
+ sqlite3_step $stmt |
+} {SQLITE_CORRUPT} |
+do_test 1.4 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 1.5 { sqlite3_errmsg db } {database disk image is malformed} |
+do_test 1.6 { sqlite3_finalize $stmt } {SQLITE_CORRUPT} |
+do_test 1.7 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 1.8 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+do_test 1.9 { |
+ set stmt [sqlite3_prepare_v2 db "PRAGMA incremental_vacuum" -1 dummy] |
+ sqlite3_step $stmt |
+} {SQLITE_CORRUPT} |
+do_test 1.10 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 1.11 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+do_test 1.12 { |
+ set stmt2 [sqlite3_prepare_v2 db "SELECT 1" -1 dummy] |
+ sqlite3_finalize $stmt2 |
+} {SQLITE_OK} |
+do_test 1.13 { sqlite3_errcode db } {SQLITE_OK} |
+do_test 1.14 { sqlite3_errmsg db } {not an error} |
+ |
+do_test 1.15 { sqlite3_finalize $stmt } {SQLITE_CORRUPT} |
+do_test 1.16 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 1.17 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+#------------------------------------------------------------------------- |
+# |
+reset_db |
+ |
+do_execsql_test 2.1 { |
+ PRAGMA auto_vacuum = 1; |
+ CREATE TABLE t1(a PRIMARY KEY, b); |
+ WITH data(i) AS ( |
+ SELECT 1 UNION ALL SELECT i+1 FROM data |
+ ) |
+ INSERT INTO t1 SELECT i, randomblob(600) FROM data LIMIT 20; |
+ PRAGMA page_count; |
+} {24} |
+ |
+do_test 2.2 { |
+ db_save |
+ set fd [open test.db r+] |
+ chan truncate $fd [expr 22*1024] |
+ close $fd |
+ catchsql { PRAGMA incremental_vacuum; } |
+} {1 {database disk image is malformed}} |
+ |
+do_test 2.3 { |
+ set stmt [sqlite3_prepare_v2 db "PRAGMA auto_vacuum = INCREMENTAL" -1 dummy] |
+ sqlite3_step $stmt |
+} {SQLITE_CORRUPT} |
+do_test 2.4 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 2.5 { sqlite3_errmsg db } {database disk image is malformed} |
+do_test 2.6 { sqlite3_finalize $stmt } {SQLITE_CORRUPT} |
+do_test 2.7 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 2.8 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+do_test 2.9 { |
+ set stmt [sqlite3_prepare_v2 db "PRAGMA auto_vacuum = INCREMENTAL" -1 dummy] |
+ sqlite3_step $stmt |
+} {SQLITE_CORRUPT} |
+do_test 2.10 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 2.11 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+do_test 2.12 { |
+ set stmt2 [sqlite3_prepare_v2 db "SELECT 1" -1 dummy] |
+ sqlite3_finalize $stmt2 |
+} {SQLITE_OK} |
+do_test 2.13 { sqlite3_errcode db } {SQLITE_OK} |
+do_test 2.14 { sqlite3_errmsg db } {not an error} |
+ |
+do_test 2.15 { sqlite3_finalize $stmt } {SQLITE_CORRUPT} |
+do_test 2.16 { sqlite3_errcode db } {SQLITE_CORRUPT} |
+do_test 2.17 { sqlite3_errmsg db } {database disk image is malformed} |
+ |
+finish_test |