xref: /sqlite-3.40.0/test/stmt.test (revision 69aedc8d) 
1# 2010 February 18
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#
12# The tests in this file check that SQLite uses (or does not use) a
13# statement journal for various SQL statements.
14#
15
16set testdir [file dirname $argv0]
17source $testdir/tester.tcl
18
19if {[atomic_batch_write test.db]} {
20  finish_test
21  return
22}
23
24do_test stmt-1.1 {
25  execsql { CREATE TABLE t1(a integer primary key, b INTEGER NOT NULL) }
26} {}
27
28# The following tests verify the method used for the tests in this file -
29# that if a statement journal is required by a statement it is opened and
30# remains open until the current transaction is committed or rolled back.
31#
32# This only work if SQLITE_TEMP_STORE!=3
33#
34if {$::TEMP_STORE==3} {
35  finish_test
36  return
37}
38do_test stmt-1.2 {
39  set sqlite_open_file_count
40} {1}
41do_test stmt-1.3 {
42  execsql {
43    PRAGMA temp_store = file;
44    BEGIN;
45      INSERT INTO t1 VALUES(1, 1);
46  }
47  set sqlite_open_file_count
48} {2}
49do_test stmt-1.4 {
50  execsql {
51    INSERT INTO t1 SELECT a+1, b+1 FROM t1;
52  }
53  set sqlite_open_file_count
54  # 2016-03-04: statement-journal open deferred
55} {2}
56do_test stmt-1.5 {
57  execsql COMMIT
58  set sqlite_open_file_count
59} {1}
60do_test stmt-1.6.1 {
61  execsql {
62    BEGIN;
63      INSERT INTO t1 SELECT a+2, b+2 FROM t1;
64  }
65  set sqlite_open_file_count
66} {2}
67do_test stmt-1.6.2 {
68  execsql { INSERT INTO t1 SELECT a+4, b+4 FROM t1 }
69  set sqlite_open_file_count
70  # 2016-03-04: statement-journal open deferred
71} {2}
72do_test stmt-1.7 {
73  execsql COMMIT
74  set sqlite_open_file_count
75} {1}
76
77
78proc filecount {testname sql expected} {
79  uplevel [list do_test $testname [subst -nocommand {
80    execsql BEGIN
81    execsql { $sql }
82    set ret [set sqlite_open_file_count]
83    execsql ROLLBACK
84    set ret
85  }] $expected]
86}
87
88filecount stmt-2.1 { INSERT INTO t1 VALUES(9, 9)  } 2
89filecount stmt-2.2 { REPLACE INTO t1 VALUES(9, 9) } 2
90filecount stmt-2.3 { INSERT INTO t1 SELECT 9, 9   } 2
91filecount stmt-2.4 {
92    INSERT INTO t1 SELECT 9, 9;
93    INSERT INTO t1 SELECT 10, 10;
94} 2
95
96do_test stmt-2.5 {
97  execsql { CREATE INDEX i1 ON t1(b) }
98} {}
99filecount stmt-2.6 {
100  REPLACE INTO t1 VALUES(5, 5);
101  REPLACE INTO t1 VALUES(5, 5);
102} 2
103
104finish_test
105