diff options
Diffstat (limited to 'third_party/sqlite/src/test/sync.test')
-rw-r--r-- | third_party/sqlite/src/test/sync.test | 98 |
1 files changed, 98 insertions, 0 deletions
diff --git a/third_party/sqlite/src/test/sync.test b/third_party/sqlite/src/test/sync.test new file mode 100644 index 0000000..98aa773 --- /dev/null +++ b/third_party/sqlite/src/test/sync.test @@ -0,0 +1,98 @@ +# 2005 August 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. +# +#*********************************************************************** +# This file implements regression tests for SQLite library. +# +# This file implements tests to verify that fsync is disabled when +# pragma synchronous=off even for multi-database commits. +# +# $Id: sync.test,v 1.6 2007/10/09 08:29:33 danielk1977 Exp $ + +set testdir [file dirname $argv0] +source $testdir/tester.tcl + +# +# These tests are only applicable on unix when pager pragma are +# enabled. Also, since every test uses an ATTACHed database, they +# are only run when ATTACH is enabled. +# +if {$::tcl_platform(platform)!="unix"} { + finish_test + return +} +ifcapable !pager_pragmas||!attach { + finish_test + return +} + +do_test sync-1.1 { + set sqlite_sync_count 0 + file delete -force test2.db + file delete -force test2.db-journal + execsql { + PRAGMA fullfsync=OFF; + CREATE TABLE t1(a,b); + ATTACH DATABASE 'test2.db' AS db2; + CREATE TABLE db2.t2(x,y); + } + ifcapable !dirsync { + incr sqlite_sync_count 2 + } + set sqlite_sync_count +} 8 +ifcapable pager_pragmas { + do_test sync-1.2 { + set sqlite_sync_count 0 + execsql { + PRAGMA main.synchronous=on; + PRAGMA db2.synchronous=on; + BEGIN; + INSERT INTO t1 VALUES(1,2); + INSERT INTO t2 VALUES(3,4); + COMMIT; + } + ifcapable !dirsync { + incr sqlite_sync_count 3 + } + set sqlite_sync_count + } 8 +} +do_test sync-1.3 { + set sqlite_sync_count 0 + execsql { + PRAGMA main.synchronous=full; + PRAGMA db2.synchronous=full; + BEGIN; + INSERT INTO t1 VALUES(3,4); + INSERT INTO t2 VALUES(5,6); + COMMIT; + } + ifcapable !dirsync { + incr sqlite_sync_count 3 + } + set sqlite_sync_count +} 10 +ifcapable pager_pragmas { + do_test sync-1.4 { + set sqlite_sync_count 0 + execsql { + PRAGMA main.synchronous=off; + PRAGMA db2.synchronous=off; + BEGIN; + INSERT INTO t1 VALUES(5,6); + INSERT INTO t2 VALUES(7,8); + COMMIT; + } + set sqlite_sync_count + } 0 +} + + +finish_test |