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