1 # 2005 August 28 2 # 3 # The author disclaims copyright to this source code. In place of 4 # a legal notice, here is a blessing: 5 # 6 # May you do good and not evil. 7 # May you find forgiveness for yourself and forgive others. 8 # May you share freely, never taking more than you give. 9 # 10 #*********************************************************************** 11 # This file implements regression tests for SQLite library. 12 # 13 # This file implements tests to verify that fsync is disabled when 14 # pragma synchronous=off even for multi-database commits. 15 # 16 # $Id: sync.test,v 1.6 2007/10/09 08:29:33 danielk1977 Exp $ 17 18 set testdir [file dirname $argv0] 19 source $testdir/tester.tcl 20 21 # 22 # These tests are only applicable on unix when pager pragma are 23 # enabled. Also, since every test uses an ATTACHed database, they 24 # are only run when ATTACH is enabled. 25 # 26 if {$::tcl_platform(platform)!="unix"} { 27 finish_test 28 return 29 } 30 ifcapable !pager_pragmas||!attach { 31 finish_test 32 return 33 } 34 35 do_test sync-1.1 { 36 set sqlite_sync_count 0 37 file delete -force test2.db 38 file delete -force test2.db-journal 39 execsql { 40 PRAGMA fullfsync=OFF; 41 CREATE TABLE t1(a,b); 42 ATTACH DATABASE 'test2.db' AS db2; 43 CREATE TABLE db2.t2(x,y); 44 } 45 ifcapable !dirsync { 46 incr sqlite_sync_count 2 47 } 48 set sqlite_sync_count 49 } 8 50 ifcapable pager_pragmas { 51 do_test sync-1.2 { 52 set sqlite_sync_count 0 53 execsql { 54 PRAGMA main.synchronous=on; 55 PRAGMA db2.synchronous=on; 56 BEGIN; 57 INSERT INTO t1 VALUES(1,2); 58 INSERT INTO t2 VALUES(3,4); 59 COMMIT; 60 } 61 ifcapable !dirsync { 62 incr sqlite_sync_count 3 63 } 64 set sqlite_sync_count 65 } 8 66 } 67 do_test sync-1.3 { 68 set sqlite_sync_count 0 69 execsql { 70 PRAGMA main.synchronous=full; 71 PRAGMA db2.synchronous=full; 72 BEGIN; 73 INSERT INTO t1 VALUES(3,4); 74 INSERT INTO t2 VALUES(5,6); 75 COMMIT; 76 } 77 ifcapable !dirsync { 78 incr sqlite_sync_count 3 79 } 80 set sqlite_sync_count 81 } 10 82 ifcapable pager_pragmas { 83 do_test sync-1.4 { 84 set sqlite_sync_count 0 85 execsql { 86 PRAGMA main.synchronous=off; 87 PRAGMA db2.synchronous=off; 88 BEGIN; 89 INSERT INTO t1 VALUES(5,6); 90 INSERT INTO t2 VALUES(7,8); 91 COMMIT; 92 } 93 set sqlite_sync_count 94 } 0 95 } 96 97 98 finish_test 99