1da730f6eSdan# 2010 February 18 2da730f6eSdan# 3da730f6eSdan# The author disclaims copyright to this source code. In place of 4da730f6eSdan# a legal notice, here is a blessing: 5da730f6eSdan# 6da730f6eSdan# May you do good and not evil. 7da730f6eSdan# May you find forgiveness for yourself and forgive others. 8da730f6eSdan# May you share freely, never taking more than you give. 9da730f6eSdan# 10da730f6eSdan#*********************************************************************** 11da730f6eSdan# 12da730f6eSdan# The tests in this file check that SQLite uses (or does not use) a 13da730f6eSdan# statement journal for various SQL statements. 14da730f6eSdan# 15da730f6eSdan 16da730f6eSdanset testdir [file dirname $argv0] 17da730f6eSdansource $testdir/tester.tcl 18da730f6eSdan 19*69aedc8dSdanif {[atomic_batch_write test.db]} { 20*69aedc8dSdan finish_test 21*69aedc8dSdan return 22*69aedc8dSdan} 23*69aedc8dSdan 24da730f6eSdando_test stmt-1.1 { 25da730f6eSdan execsql { CREATE TABLE t1(a integer primary key, b INTEGER NOT NULL) } 26da730f6eSdan} {} 27da730f6eSdan 28da730f6eSdan# The following tests verify the method used for the tests in this file - 29da730f6eSdan# that if a statement journal is required by a statement it is opened and 30da730f6eSdan# remains open until the current transaction is committed or rolled back. 31da730f6eSdan# 3278e0fcf9Sdrh# This only work if SQLITE_TEMP_STORE!=3 3378e0fcf9Sdrh# 3478e0fcf9Sdrhif {$::TEMP_STORE==3} { 3578e0fcf9Sdrh finish_test 3678e0fcf9Sdrh return 3778e0fcf9Sdrh} 38da730f6eSdando_test stmt-1.2 { 39da730f6eSdan set sqlite_open_file_count 40da730f6eSdan} {1} 41da730f6eSdando_test stmt-1.3 { 42da730f6eSdan execsql { 43d2db0906Sdan PRAGMA temp_store = file; 44da730f6eSdan BEGIN; 45da730f6eSdan INSERT INTO t1 VALUES(1, 1); 46da730f6eSdan } 47da730f6eSdan set sqlite_open_file_count 48da730f6eSdan} {2} 49da730f6eSdando_test stmt-1.4 { 50da730f6eSdan execsql { 51da730f6eSdan INSERT INTO t1 SELECT a+1, b+1 FROM t1; 52da730f6eSdan } 53da730f6eSdan set sqlite_open_file_count 543ac9a864Sdrh # 2016-03-04: statement-journal open deferred 553ac9a864Sdrh} {2} 56da730f6eSdando_test stmt-1.5 { 57da730f6eSdan execsql COMMIT 58da730f6eSdan set sqlite_open_file_count 59da730f6eSdan} {1} 60459564f4Sdando_test stmt-1.6.1 { 61da730f6eSdan execsql { 62da730f6eSdan BEGIN; 63da730f6eSdan INSERT INTO t1 SELECT a+2, b+2 FROM t1; 64da730f6eSdan } 65da730f6eSdan set sqlite_open_file_count 66459564f4Sdan} {2} 67459564f4Sdando_test stmt-1.6.2 { 68459564f4Sdan execsql { INSERT INTO t1 SELECT a+4, b+4 FROM t1 } 69459564f4Sdan set sqlite_open_file_count 703ac9a864Sdrh # 2016-03-04: statement-journal open deferred 713ac9a864Sdrh} {2} 72da730f6eSdando_test stmt-1.7 { 73da730f6eSdan execsql COMMIT 74da730f6eSdan set sqlite_open_file_count 75da730f6eSdan} {1} 76da730f6eSdan 77da730f6eSdan 78da730f6eSdanproc filecount {testname sql expected} { 79da730f6eSdan uplevel [list do_test $testname [subst -nocommand { 80da730f6eSdan execsql BEGIN 81da730f6eSdan execsql { $sql } 82da730f6eSdan set ret [set sqlite_open_file_count] 83da730f6eSdan execsql ROLLBACK 84da730f6eSdan set ret 85da730f6eSdan }] $expected] 86da730f6eSdan} 87da730f6eSdan 88459564f4Sdanfilecount stmt-2.1 { INSERT INTO t1 VALUES(9, 9) } 2 89459564f4Sdanfilecount stmt-2.2 { REPLACE INTO t1 VALUES(9, 9) } 2 90459564f4Sdanfilecount stmt-2.3 { INSERT INTO t1 SELECT 9, 9 } 2 91459564f4Sdanfilecount stmt-2.4 { 92459564f4Sdan INSERT INTO t1 SELECT 9, 9; 93459564f4Sdan INSERT INTO t1 SELECT 10, 10; 943ac9a864Sdrh} 2 95da730f6eSdan 96459564f4Sdando_test stmt-2.5 { 97da730f6eSdan execsql { CREATE INDEX i1 ON t1(b) } 98da730f6eSdan} {} 99459564f4Sdanfilecount stmt-2.6 { 100459564f4Sdan REPLACE INTO t1 VALUES(5, 5); 101459564f4Sdan REPLACE INTO t1 VALUES(5, 5); 1023ac9a864Sdrh} 2 103da730f6eSdan 104da730f6eSdanfinish_test 105