1# 2008 April 14 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# The focus of this file is in making sure that rolling back 13# a statement journal works correctly. 14# 15# $Id: tempdb.test,v 1.4 2009/06/05 17:09:12 drh Exp $ 16 17set testdir [file dirname $argv0] 18source $testdir/tester.tcl 19 20# Use a temporary database. 21# 22db close 23sqlite3 db {} 24 25# Force a statement journal rollback on a database file that 26# has never been opened. 27# 28do_test tempdb-1.1 { 29 execsql { 30 BEGIN; 31 CREATE TABLE t1(x UNIQUE); 32 CREATE TABLE t2(y); 33 INSERT INTO t2 VALUES('hello'); 34 INSERT INTO t2 VALUES(NULL); 35 } 36 # Because of the transaction, the temporary database file 37 # has not even been opened yet. The following statement 38 # will cause a statement journal rollback on this non-existant 39 # file. 40 catchsql { 41 INSERT INTO t1 42 SELECT CASE WHEN y IS NULL THEN test_error('oops', 11) ELSE y END 43 FROM t2; 44 } 45} {1 oops} 46 47# Verify that no writes occurred in t1. 48# 49do_test tempdb-1.2 { 50 execsql { 51 SELECT * FROM t1 52 } 53} {} 54 55do_test tempdb-2.1 { 56 # Set $::jrnl_in_memory if the journal file is expected to be in-memory. 57 # Similarly, set $::subj_in_memory if the sub-journal file is expected 58 # to be in memory. These variables are used to calculate the expected 59 # number of open files in the test cases below. 60 # 61 set jrnl_in_memory [expr {[permutation] eq "inmemory_journal"}] 62 set subj_in_memory [expr {$jrnl_in_memory || $TEMP_STORE>=2}] 63 64 db close 65 sqlite3 db test.db 66} {} 67do_test tempdb-2.2 { 68 execsql { 69 CREATE TABLE t1 (a PRIMARY KEY, b, c); 70 CREATE TABLE t2 (a, b, c); 71 BEGIN; 72 INSERT INTO t1 VALUES(1, 2, 3); 73 INSERT INTO t1 VALUES(4, 5, 6); 74 INSERT INTO t2 VALUES(7, 8, 9); 75 INSERT INTO t2 SELECT * FROM t1; 76 } 77 catchsql { INSERT INTO t1 SELECT * FROM t2 } 78 set sqlite_open_file_count 79} [expr 1 + (0==$jrnl_in_memory) + (0==$subj_in_memory)] 80do_test tempdb-2.3 { 81 execsql { 82 PRAGMA temp_store = 'memory'; 83 ROLLBACK; 84 BEGIN; 85 INSERT INTO t1 VALUES(1, 2, 3); 86 INSERT INTO t1 VALUES(4, 5, 6); 87 INSERT INTO t2 SELECT * FROM t1; 88 } 89 catchsql { INSERT INTO t1 SELECT * FROM t2 } 90 set sqlite_open_file_count 91} [expr 1 + (0==$jrnl_in_memory)] 92 93finish_test 94