xref: /sqlite-3.40.0/test/sync.test (revision 45f31be8) 
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
17set testdir [file dirname $argv0]
18source $testdir/tester.tcl
19
20#
21# These tests are only applicable when pager pragma are
22# enabled. Also, since every test uses an ATTACHed database, they
23# are only run when ATTACH is enabled.
24#
25ifcapable !pager_pragmas||!attach {
26  finish_test
27  return
28}
29
30set sqlite_sync_count 0
31proc cond_incr_sync_count {adj} {
32  global sqlite_sync_count
33  if {$::tcl_platform(platform) == "windows"} {
34    incr sqlite_sync_count $adj
35  } else {
36    ifcapable !dirsync {
37      incr sqlite_sync_count $adj
38    }
39  }
40}
41
42do_test sync-1.1 {
43  set sqlite_sync_count 0
44  forcedelete test2.db
45  forcedelete test2.db-journal
46  execsql {
47    PRAGMA fullfsync=OFF;
48    CREATE TABLE t1(a,b);
49    ATTACH DATABASE 'test2.db' AS db2;
50    CREATE TABLE db2.t2(x,y);
51  }
52  cond_incr_sync_count 2
53  set sqlite_sync_count
54} 8
55ifcapable pager_pragmas {
56  do_test sync-1.2 {
57    set sqlite_sync_count 0
58    execsql {
59      PRAGMA main.synchronous=on;
60      PRAGMA db2.synchronous=on;
61      BEGIN;
62      INSERT INTO t1 VALUES(1,2);
63      INSERT INTO t2 VALUES(3,4);
64      COMMIT;
65    }
66    cond_incr_sync_count 4
67    set sqlite_sync_count
68  } 9
69}
70do_test sync-1.3 {
71  set sqlite_sync_count 0
72  execsql {
73    PRAGMA main.synchronous=full;
74    PRAGMA db2.synchronous=full;
75    BEGIN;
76    INSERT INTO t1 VALUES(3,4);
77    INSERT INTO t2 VALUES(5,6);
78    COMMIT;
79  }
80  cond_incr_sync_count 4
81  set sqlite_sync_count
82} 11
83ifcapable pager_pragmas {
84  do_test sync-1.4 {
85    set sqlite_sync_count 0
86    execsql {
87      PRAGMA main.synchronous=off;
88      PRAGMA db2.synchronous=off;
89      BEGIN;
90      INSERT INTO t1 VALUES(5,6);
91      INSERT INTO t2 VALUES(7,8);
92      COMMIT;
93    }
94    set sqlite_sync_count
95  } 0
96}
97
98
99finish_test
100