/trunk/test/stmt.test |
@@ -0,0 +1,97 @@ |
# 2010 February 18 |
# |
# 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. |
# |
#*********************************************************************** |
# |
# The tests in this file check that SQLite uses (or does not use) a |
# statement journal for various SQL statements. |
# |
|
set testdir [file dirname $argv0] |
source $testdir/tester.tcl |
|
do_test stmt-1.1 { |
execsql { CREATE TABLE t1(a integer primary key, b INTEGER NOT NULL) } |
} {} |
|
# The following tests verify the method used for the tests in this file - |
# that if a statement journal is required by a statement it is opened and |
# remains open until the current transaction is committed or rolled back. |
# |
# This only work if SQLITE_TEMP_STORE!=3 |
# |
if {$::TEMP_STORE==3} { |
finish_test |
return |
} |
do_test stmt-1.2 { |
set sqlite_open_file_count |
} {1} |
do_test stmt-1.3 { |
execsql { |
PRAGMA temp_store = file; |
BEGIN; |
INSERT INTO t1 VALUES(1, 1); |
} |
set sqlite_open_file_count |
} {2} |
do_test stmt-1.4 { |
execsql { |
INSERT INTO t1 SELECT a+1, b+1 FROM t1; |
} |
set sqlite_open_file_count |
} {3} |
do_test stmt-1.5 { |
execsql COMMIT |
set sqlite_open_file_count |
} {1} |
do_test stmt-1.6.1 { |
execsql { |
BEGIN; |
INSERT INTO t1 SELECT a+2, b+2 FROM t1; |
} |
set sqlite_open_file_count |
} {2} |
do_test stmt-1.6.2 { |
execsql { INSERT INTO t1 SELECT a+4, b+4 FROM t1 } |
set sqlite_open_file_count |
} {3} |
do_test stmt-1.7 { |
execsql COMMIT |
set sqlite_open_file_count |
} {1} |
|
|
proc filecount {testname sql expected} { |
uplevel [list do_test $testname [subst -nocommand { |
execsql BEGIN |
execsql { $sql } |
set ret [set sqlite_open_file_count] |
execsql ROLLBACK |
set ret |
}] $expected] |
} |
|
filecount stmt-2.1 { INSERT INTO t1 VALUES(9, 9) } 2 |
filecount stmt-2.2 { REPLACE INTO t1 VALUES(9, 9) } 2 |
filecount stmt-2.3 { INSERT INTO t1 SELECT 9, 9 } 2 |
filecount stmt-2.4 { |
INSERT INTO t1 SELECT 9, 9; |
INSERT INTO t1 SELECT 10, 10; |
} 3 |
|
do_test stmt-2.5 { |
execsql { CREATE INDEX i1 ON t1(b) } |
} {} |
filecount stmt-2.6 { |
REPLACE INTO t1 VALUES(5, 5); |
REPLACE INTO t1 VALUES(5, 5); |
} 3 |
|
finish_test |