| Index: third_party/sqlite/sqlite-src-3080704/test/syscall.test
|
| diff --git a/third_party/sqlite/sqlite-src-3080704/test/syscall.test b/third_party/sqlite/sqlite-src-3080704/test/syscall.test
|
| deleted file mode 100644
|
| index c2d9979031ff61b827e783472328526017902503..0000000000000000000000000000000000000000
|
| --- a/third_party/sqlite/sqlite-src-3080704/test/syscall.test
|
| +++ /dev/null
|
| @@ -1,278 +0,0 @@
|
| -# 2011 March 29
|
| -#
|
| -# 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
|
| -}
|
| -
|
| -if {[test_syscall defaultvfs] != "unix"} {
|
| - finish_test
|
| - return
|
| -}
|
| -set testprefix syscall
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# Tests for the xSetSystemCall method.
|
| -#
|
| -do_test 1.1.1 {
|
| - list [catch { test_syscall reset open } msg] $msg
|
| -} {0 {}}
|
| -do_test 1.1.2 {
|
| - list [catch { test_syscall reset nosuchcall } msg] $msg
|
| -} {1 SQLITE_NOTFOUND}
|
| -do_test 1.1.3 {
|
| - list [catch { test_syscall reset open } msg] $msg
|
| -} {0 {}}
|
| -do_test 1.1.4 {
|
| - list [catch { test_syscall reset ""} msg] $msg
|
| -} {1 SQLITE_NOTFOUND}
|
| -
|
| -do_test 1.2 { test_syscall reset } {}
|
| -
|
| -do_test 1.3.1 { test_syscall install {open getcwd access} } {}
|
| -do_test 1.3.2 { test_syscall reset } {}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# Tests for the xGetSystemCall method.
|
| -#
|
| -do_test 2.1.1 { test_syscall exists open } 1
|
| -do_test 2.1.2 { test_syscall exists nosuchcall } 0
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# Tests for the xNextSystemCall method.
|
| -#
|
| -foreach s {
|
| - open close access getcwd stat fstat ftruncate
|
| - fcntl read pread write pwrite fchmod fallocate
|
| - pread64 pwrite64 unlink openDirectory mkdir rmdir
|
| - statvfs fchown umask mmap munmap mremap
|
| - getpagesize
|
| -} {
|
| - if {[test_syscall exists $s]} {lappend syscall_list $s}
|
| -}
|
| -do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list]
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# This test verifies that if a call to open() fails and errno is set to
|
| -# EINTR, the call is retried. If it succeeds, execution continues as if
|
| -# nothing happened.
|
| -#
|
| -test_syscall reset
|
| -forcedelete test.db2
|
| -do_execsql_test 4.1 {
|
| - CREATE TABLE t1(x, y);
|
| - INSERT INTO t1 VALUES(1, 2);
|
| - ATTACH 'test.db2' AS aux;
|
| - CREATE TABLE aux.t2(x, y);
|
| - INSERT INTO t2 VALUES(3, 4);
|
| -}
|
| -
|
| -db_save_and_close
|
| -test_syscall install open
|
| -foreach jrnl [list wal delete] {
|
| - for {set i 1} {$i < 20} {incr i} {
|
| - db_restore_and_reopen
|
| - test_syscall fault $i 0
|
| - test_syscall errno open EINTR
|
| -
|
| - do_test 4.2.$jrnl.$i {
|
| - sqlite3 db test.db
|
| - execsql { ATTACH 'test.db2' AS aux }
|
| - execsql "PRAGMA main.journal_mode = $jrnl"
|
| - execsql "PRAGMA aux.journal_mode = $jrnl"
|
| - execsql {
|
| - BEGIN;
|
| - INSERT INTO t1 VALUES(5, 6);
|
| - INSERT INTO t2 VALUES(7, 8);
|
| - COMMIT;
|
| - }
|
| -
|
| - db close
|
| - sqlite3 db test.db
|
| - execsql { ATTACH 'test.db2' AS aux }
|
| - execsql {
|
| - SELECT * FROM t1;
|
| - SELECT * FROM t2;
|
| - }
|
| - } {1 2 5 6 3 4 7 8}
|
| - }
|
| -}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# This test verifies that closing database handles does not drop locks
|
| -# held by other database handles in the same process on the same file.
|
| -#
|
| -# The os_unix.c module has to take precautions to prevent this as the
|
| -# close() system call drops locks held by other file-descriptors on the
|
| -# same file. From the Linux man page:
|
| -#
|
| -# close() closes a file descriptor, so that it no longer refers to any file
|
| -# and may be reused. Any record locks (see fcntl(2)) held on the file it
|
| -# was associated with, and owned by the process, are removed (regardless
|
| -# of the file descriptor that was used to obtain the lock).
|
| -#
|
| -catch { db close }
|
| -forcedelete test.db test.db2
|
| -
|
| -do_multiclient_test tn {
|
| - code1 {
|
| - sqlite3 dbX1 test.db
|
| - sqlite3 dbX2 test.db
|
| - }
|
| -
|
| - do_test syscall-5.$tn.1 {
|
| - sql1 {
|
| - CREATE TABLE t1(a, b);
|
| - INSERT INTO t1 VALUES(1, 2);
|
| - BEGIN;
|
| - INSERT INTO t1 VALUES(3, 4);
|
| - }
|
| - } {}
|
| -
|
| - do_test syscall-5.$tn.2 { sql2 { SELECT * FROM t1 } } {1 2}
|
| - do_test syscall-5.$tn.3 {
|
| - csql2 { INSERT INTO t1 VALUES(5, 6) }
|
| - } {1 {database is locked}}
|
| -
|
| - do_test syscall-5.$tn.4 {
|
| - code1 {
|
| - dbX1 close
|
| - dbX2 close
|
| - }
|
| - } {}
|
| -
|
| - do_test syscall-5.$tn.5 {
|
| - csql2 { INSERT INTO t1 VALUES(5, 6) }
|
| - } {1 {database is locked}}
|
| -
|
| - do_test syscall-5.$tn.6 { sql1 { COMMIT } } {}
|
| -
|
| - do_test syscall-5.$tn.7 {
|
| - csql2 { INSERT INTO t1 VALUES(5, 6) }
|
| - } {0 {}}
|
| -}
|
| -
|
| -catch {db close}
|
| -do_test 6.1 {
|
| - sqlite3 db1 test.db1
|
| - sqlite3 db2 test.db2
|
| - sqlite3 db3 test.db3
|
| - sqlite3 dbM ""
|
| -
|
| - db2 close
|
| - db3 close
|
| - dbM close
|
| - db1 close
|
| -} {}
|
| -
|
| -do_test 6.2 {
|
| - sqlite3 db test.db
|
| - execsql {
|
| - PRAGMA temp_store = file;
|
| -
|
| - PRAGMA main.cache_size = 10;
|
| - PRAGMA temp.cache_size = 10;
|
| - CREATE TABLE temp.tt(a, b);
|
| - INSERT INTO tt VALUES(randomblob(500), randomblob(600));
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - INSERT INTO tt SELECT randomblob(500), randomblob(600) FROM tt;
|
| - }
|
| -
|
| - db close
|
| -} {}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -# Test that a database file a single byte in size is treated as an empty
|
| -# file. Whereas a file 2 bytes or larger might be considered corrupt.
|
| -#
|
| -catch { db close }
|
| -forcedelete test.db test.db2
|
| -
|
| -proc create_db_file {nByte} {
|
| - set fd [open test.db w]
|
| - fconfigure $fd -translation binary -encoding binary
|
| - puts -nonewline $fd [string range "xSQLite" 1 $nByte]
|
| - close $fd
|
| -}
|
| -
|
| -foreach {nByte res} {
|
| - 1 {0 {}}
|
| - 2 {1 {file is encrypted or is not a database}}
|
| - 3 {1 {file is encrypted or is not a database}}
|
| -} {
|
| - do_test 7.$nByte {
|
| - create_db_file $nByte
|
| - list [catch {
|
| - sqlite3 db test.db
|
| - execsql { CREATE TABLE t1(a, b) }
|
| - } msg] $msg
|
| - } $res
|
| - catch { db close }
|
| -}
|
| -
|
| -#-------------------------------------------------------------------------
|
| -#
|
| -catch { db close }
|
| -forcedelete test.db test.db2
|
| -
|
| -do_test 8.1 {
|
| - sqlite3 db test.db
|
| - file_control_chunksize_test db main 4096
|
| - file size test.db
|
| -} {0}
|
| -foreach {tn hint size} {
|
| - 1 1000 4096
|
| - 2 1000 4096
|
| - 3 3000 4096
|
| - 4 4096 4096
|
| - 5 4197 8192
|
| -} {
|
| - do_test 8.2.$tn {
|
| - file_control_sizehint_test db main $hint
|
| - file size test.db
|
| - } $size
|
| -}
|
| -
|
| -do_test 8.3 {
|
| - db close
|
| - forcedelete test.db test.db2
|
| - sqlite3 db test.db
|
| - file_control_chunksize_test db main 16
|
| - file size test.db
|
| -} {0}
|
| -foreach {tn hint size} {
|
| - 1 5 16
|
| - 2 13 16
|
| - 3 45 48
|
| - 4 48 48
|
| - 5 49 64
|
| -} {
|
| - do_test 8.4.$tn {
|
| - file_control_sizehint_test db main $hint
|
| - file size test.db
|
| - } $size
|
| -}
|
| -
|
| -test_syscall reset
|
| -finish_test
|
|
|