Index: third_party/sqlite/sqlite-src-3080704/test/sysfault.test |
diff --git a/third_party/sqlite/sqlite-src-3080704/test/sysfault.test b/third_party/sqlite/sqlite-src-3080704/test/sysfault.test |
deleted file mode 100644 |
index 92fb534dd09dd6fe770a14efd648d676d167b385..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/test/sysfault.test |
+++ /dev/null |
@@ -1,277 +0,0 @@ |
-# 2011 March 28 |
-# |
-# 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 |
- |
-if {[llength [info commands test_syscall]]==0} { |
- finish_test |
- return |
-} |
- |
-set testprefix sysfault |
- |
-set FAULTSIM(vfsfault-transient) [list \ |
- -injectinstall vfsfault_install \ |
- -injectstart vfsfault_injectstart_t \ |
- -injectstop vfsfault_injectstop \ |
- -injecterrlist {} \ |
- -injectuninstall {test_syscall uninstall} \ |
-] |
-set FAULTSIM(vfsfault-persistent) [list \ |
- -injectinstall vfsfault_install \ |
- -injectstart vfsfault_injectstart_p \ |
- -injectstop vfsfault_injectstop \ |
- -injecterrlist {} \ |
- -injectuninstall {test_syscall uninstall} \ |
-] |
- |
-proc vfsfault_injectstart_t {iFail} { test_syscall fault $iFail 0 } |
-proc vfsfault_injectstart_p {iFail} { test_syscall fault $iFail 1 } |
-proc vfsfault_injectstop {} { test_syscall fault } |
- |
-faultsim_save_and_close |
- |
- |
-set open_and_write_body { |
- sqlite3 db test.db |
- db eval { |
- CREATE TABLE t1(a, b); |
- INSERT INTO t1 VALUES(1, 2); |
- PRAGMA journal_mode = WAL; |
- INSERT INTO t1 VALUES(3, 4); |
- SELECT * FROM t1; |
- CREATE TEMP TABLE t2(x); |
- INSERT INTO t2 VALUES('y'); |
- } |
-} |
- |
-proc vfsfault_install {} { test_syscall install {open getcwd} } |
-do_faultsim_test 1 -faults vfsfault-* -prep { |
- faultsim_restore |
-} -body $open_and_write_body -test { |
- faultsim_test_result {0 {wal 1 2 3 4}} \ |
- {1 {unable to open database file}} \ |
- {1 {attempt to write a readonly database}} |
-} |
- |
-#------------------------------------------------------------------------- |
-# Errors in the fstat() function when opening and writing a file. Cases |
-# where fstat() fails and sets errno to ENOMEM and EOVERFLOW are both |
-# tested. EOVERFLOW is interpreted as meaning that a file on disk is |
-# too large to be opened by the OS. |
-# |
-foreach {tn errno errlist} { |
- 1 ENOMEM {{disk I/O error}} |
- 2 EOVERFLOW {{disk I/O error} {large file support is disabled}} |
-} { |
- proc vfsfault_install {} { test_syscall install fstat } |
- set errs [list] |
- foreach e $errlist { lappend errs [list 1 $e] } |
- do_faultsim_test 1.2.$tn -faults vfsfault-* -prep { |
- faultsim_restore |
- } -body " |
- test_syscall errno fstat $errno |
- $open_and_write_body |
- " -test " |
- faultsim_test_result {0 {wal 1 2 3 4}} $errs |
- " |
-} |
- |
-#------------------------------------------------------------------------- |
-# Various errors in locking functions. |
-# |
-foreach vfs {unix unix-excl} { |
- foreach {tn errno errlist} { |
- 1 EAGAIN {{database is locked} {disk I/O error}} |
- 2 ETIMEDOUT {{database is locked} {disk I/O error}} |
- 3 EBUSY {{database is locked} {disk I/O error}} |
- 4 EINTR {{database is locked} {disk I/O error}} |
- 5 ENOLCK {{database is locked} {disk I/O error}} |
- 6 EACCES {{database is locked} {disk I/O error}} |
- 7 EPERM {{access permission denied} {disk I/O error}} |
- 8 EDEADLK {{disk I/O error}} |
- 9 ENOMEM {{disk I/O error}} |
- } { |
- proc vfsfault_install {} { test_syscall install fcntl } |
- set errs [list] |
- foreach e $errlist { lappend errs [list 1 $e] } |
- |
- set body [string map [list %VFS% $vfs] { |
- sqlite3 db test.db |
- db eval { |
- CREATE TABLE t1(a, b); |
- INSERT INTO t1 VALUES(1, 2); |
- } |
- set fd [open test.db-journal w] |
- puts $fd "hello world" |
- close $fd |
- sqlite3 db test.db -vfs %VFS% |
- db eval { |
- SELECT * FROM t1; |
- } |
- }] |
- |
- do_faultsim_test 1.3.$vfs.$tn -faults vfsfault-* -prep { |
- faultsim_restore |
- } -body " |
- test_syscall errno fcntl $errno |
- $body |
- " -test " |
- faultsim_test_result {0 {1 2}} $errs |
- " |
- } |
-} |
- |
-#------------------------------------------------------------------------- |
-# Check that a single EINTR error does not affect processing. |
-# |
-proc vfsfault_install {} { |
- test_syscall reset |
- test_syscall install {open ftruncate close read pread pread64 write fallocate} |
-} |
- |
-forcedelete test.db test.db2 |
-sqlite3 db test.db |
-do_test 2.setup { |
- execsql { |
- CREATE TABLE t1(a, b, c, PRIMARY KEY(a)); |
- INSERT INTO t1 VALUES('abc', 'def', 'ghi'); |
- ATTACH 'test.db2' AS 'aux'; |
- CREATE TABLE aux.t2(x); |
- INSERT INTO t2 VALUES(1); |
- } |
- faultsim_save_and_close |
-} {} |
- |
-do_faultsim_test 2.1 -faults vfsfault-transient -prep { |
- catch { db close } |
- faultsim_restore |
-} -body { |
- test_syscall errno open EINTR |
- test_syscall errno ftruncate EINTR |
- test_syscall errno close EINTR |
- test_syscall errno read EINTR |
- test_syscall errno pread EINTR |
- test_syscall errno pread64 EINTR |
- test_syscall errno write EINTR |
- test_syscall errno fallocate EINTR |
- |
- sqlite3 db test.db |
- file_control_chunksize_test db main 8192 |
- |
- set res [db eval { |
- ATTACH 'test.db2' AS 'aux'; |
- SELECT * FROM t1; |
- PRAGMA journal_mode = truncate; |
- BEGIN; |
- INSERT INTO t1 VALUES('jkl', 'mno', 'pqr'); |
- INSERT INTO t1 VALUES(randomblob(10000), 0, 0); |
- UPDATE t2 SET x = 2; |
- COMMIT; |
- DELETE FROM t1 WHERE length(a)>3; |
- SELECT * FROM t1; |
- SELECT * FROM t2; |
- }] |
- db close |
- set res |
-} -test { |
- faultsim_test_result {0 {abc def ghi truncate abc def ghi jkl mno pqr 2}} |
-} |
- |
-do_faultsim_test 2.2 -faults vfsfault-* -prep { |
- catch { db close } |
- faultsim_restore |
-} -body { |
- sqlite3 db test.db |
- set res [db eval { |
- ATTACH 'test.db2' AS 'aux'; |
- SELECT * FROM t1; |
- PRAGMA journal_mode = truncate; |
- BEGIN; |
- INSERT INTO t1 VALUES('jkl', 'mno', 'pqr'); |
- UPDATE t2 SET x = 2; |
- COMMIT; |
- SELECT * FROM t1; |
- SELECT * FROM t2; |
- }] |
- db close |
- set res |
-} -test { |
- faultsim_test_result {0 {abc def ghi truncate abc def ghi jkl mno pqr 2}} \ |
- {1 {unable to open database file}} \ |
- {1 {unable to open database: test.db2}} \ |
- {1 {attempt to write a readonly database}} \ |
- {1 {disk I/O error}} |
-} |
- |
-#------------------------------------------------------------------------- |
- |
-proc vfsfault_install {} { |
- test_syscall reset |
- test_syscall install {fstat fallocate} |
-} |
-do_faultsim_test 3 -faults vfsfault-* -prep { |
- faultsim_delete_and_reopen |
- file_control_chunksize_test db main 8192 |
- execsql { |
- CREATE TABLE t1(a, b); |
- BEGIN; |
- SELECT * FROM t1; |
- } |
-} -body { |
- test_syscall errno fstat EIO |
- test_syscall errno fallocate EIO |
- |
- execsql { |
- INSERT INTO t1 VALUES(randomblob(10000), randomblob(10000)); |
- SELECT length(a) + length(b) FROM t1; |
- COMMIT; |
- } |
-} -test { |
- faultsim_test_result {0 20000} |
-} |
- |
-#------------------------------------------------------------------------- |
-# Test errors in mmap(). |
-# |
-proc vfsfault_install {} { |
- test_syscall reset |
- test_syscall install {mmap} |
-} |
- |
-faultsim_delete_and_reopen |
-execsql { |
- CREATE TABLE t1(a, b); |
- INSERT INTO t1 VALUES(1, 2); |
-} |
-faultsim_save_and_close |
- |
-do_faultsim_test 4 -faults vfsfault-* -prep { |
- faultsim_restore_and_reopen |
- file_control_chunksize_test db main 8192 |
- execsql { |
- PRAGMA mmap_size = 1000000; |
- } |
-} -body { |
- test_syscall errno mmap EACCES |
- |
- execsql { |
- SELECT * FROM t1; |
- } |
-} -test { |
- faultsim_test_result {0 {1 2}} {1 {disk I/O error}} |
-} |
- |
-finish_test |