gitlab.com/CoiaPrant/sqlite3@v1.19.1/testdata/tcl/shared8.test (about) 1 # 2012 May 15 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 are intended to show that closing one database 13 # connection to a shared-cache while there exist other connections (a) 14 # does not cause the schema to be reloaded and (b) does not cause any 15 # other problems. 16 # 17 18 set testdir [file dirname $argv0] 19 source $testdir/tester.tcl 20 ifcapable !shared_cache { finish_test ; return } 21 set testprefix shared8 22 23 db close 24 set ::enable_shared_cache [sqlite3_enable_shared_cache 1] 25 do_test 0.0 { sqlite3_enable_shared_cache } {1} 26 27 proc roman {n} { 28 array set R {1 i 2 ii 3 iii 4 iv 5 v 6 vi 7 vii 8 viii 9 ix 10 x} 29 set R($n) 30 } 31 32 #------------------------------------------------------------------------- 33 # The following tests work as follows: 34 # 35 # 1.0: Open connection [db1] and populate the database. 36 # 37 # 1.1: Using "PRAGMA writable_schema", destroy the database schema on 38 # disk. The schema is still in memory, so it is possible to keep 39 # using it, but any attempt to reload it from disk will fail. 40 # 41 # 1.3-4: Open connection db2. Check that it can see the db schema. Then 42 # close db1 and check that db2 still works. This shows that closing 43 # db1 did not reset the in-memory schema. 44 # 45 # 1.5-7: Similar to 1.3-4. 46 # 47 # 1.8: Close all database connections (deleting the in-memory schema). 48 # Then open a new connection and check that it cannot read the db. 49 # 50 do_test 1.0 { 51 sqlite3 db1 test.db 52 db1 func roman roman 53 execsql { 54 CREATE TABLE t1(a, b); 55 INSERT INTO t1 VALUES(1, 1); 56 INSERT INTO t1 VALUES(2, 2); 57 INSERT INTO t1 VALUES(3, 3); 58 INSERT INTO t1 VALUES(4, 4); 59 CREATE VIEW v1 AS SELECT a, roman(b) FROM t1; 60 SELECT * FROM v1; 61 } db1 62 } {1 i 2 ii 3 iii 4 iv} 63 64 do_test 1.1 { 65 sqlite3_db_config db1 DEFENSIVE 0 66 execsql { 67 PRAGMA writable_schema = 1; 68 DELETE FROM sqlite_master WHERE 1; 69 PRAGMA writable_schema = 0; 70 SELECT * FROM sqlite_master; 71 } db1 72 } {} 73 74 do_test 1.2 { 75 execsql { SELECT * FROM v1 } db1 76 } {1 i 2 ii 3 iii 4 iv} 77 78 do_test 1.3 { 79 sqlite3 db2 test.db 80 db2 func roman roman 81 execsql { SELECT * FROM v1 } db2 82 } {1 i 2 ii 3 iii 4 iv} 83 84 do_test 1.4 { 85 db1 close 86 execsql { SELECT * FROM v1 } db2 87 } {1 i 2 ii 3 iii 4 iv} 88 89 do_test 1.5 { 90 sqlite3 db3 test.db 91 db3 func roman roman 92 execsql { SELECT * FROM v1 } db3 93 } {1 i 2 ii 3 iii 4 iv} 94 95 do_test 1.6 { 96 execsql { SELECT * FROM v1 } db2 97 } {1 i 2 ii 3 iii 4 iv} 98 99 do_test 1.7 { 100 db2 close 101 execsql { SELECT * FROM v1 } db3 102 } {1 i 2 ii 3 iii 4 iv} 103 104 do_test 1.8 { 105 db3 close 106 sqlite3 db4 test.db 107 catchsql { SELECT * FROM v1 } db4 108 } {1 {no such table: v1}} 109 110 111 foreach db {db1 db2 db3 db4} { catch { $db close } } 112 sqlite3_enable_shared_cache $::enable_shared_cache 113 finish_test