add pragma page_size compatibility so it will operate on encrypted databases
[sqlcipher.git] / test / tkt-f7b4edec.test
blobd21da31917e81e4ed60a503d5367df7ce27bc99c
1 # 2011 March 18
3 # The author disclaims copyright to this source code.  In place of
4 # a legal notice, here is a blessing:
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.
10 #***********************************************************************
11 # This file implements regression tests for SQLite library.
13 # This file implements tests to verify that ticket 
14 # [f7b4edece25c994857dc139207f55a53c8319fae] has been fixed.
17 set testdir [file dirname $argv0]
18 source $testdir/tester.tcl
19 ifcapable !shared_cache { finish_test ; return }
21 # Open two database connections to the same database file in
22 # shared cache mode.  Create update hooks that will fire on
23 # each connection.
25 db close
26 set ::enable_shared_cache [sqlite3_enable_shared_cache 1]
27 sqlite3 db1 test.db
28 sqlite3 db2 test.db
29 unset -nocomplain HOOKS
30 set HOOKS {}
31 proc update_hook {args} { lappend ::HOOKS $args }
32 db1 update_hook update_hook
33 db2 update_hook update_hook
35 # Create a prepared statement
37 do_test tkt-f7b4edec-1 {
38   execsql { CREATE TABLE t1(x, y); } db1
39   execsql { INSERT INTO t1 VALUES(1, 2) } db1
40   set ::HOOKS
41 } {{INSERT main t1 1}}
43 # In the second database connection cause the schema to be reparsed
44 # without changing the schema cookie.
46 set HOOKS {}
47 do_test tkt-f7b4edec-2 {
48   execsql {
49     BEGIN;
50       DROP TABLE t1;
51       CREATE TABLE t1(x, y);
52     ROLLBACK;
53   } db2
54   set ::HOOKS
55 } {}
57 # Rerun the prepared statement that was created prior to the 
58 # schema reparse.  Verify that the update-hook gives the correct
59 # output.
61 set HOOKS {}
62 do_test tkt-f7b4edec-3 {
63   execsql { INSERT INTO t1 VALUES(1, 2) } db1
64   set ::HOOKS
65 } {{INSERT main t1 2}}
67 # Be sure to restore the original shared-cache mode setting before
68 # returning.
70 db1 close
71 db2 close
72 sqlite3_enable_shared_cache $::enable_shared_cache
75 finish_test