OLD | NEW |
| (Empty) |
1 # 2010 July 29 | |
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 | |
13 set testdir [file dirname $argv0] | |
14 source $testdir/tester.tcl | |
15 source $testdir/malloc_common.tcl | |
16 | |
17 foreach f [glob -nocomplain test.db*mj*] { forcedelete $f } | |
18 forcedelete test.db2 | |
19 | |
20 do_test tkt-f3e5abed55-1.1 { | |
21 execsql { | |
22 ATTACH 'test.db2' AS aux; | |
23 CREATE TABLE main.t1(a, b); | |
24 CREATE TABLE aux.t2(c, d); | |
25 } | |
26 } {} | |
27 | |
28 do_test tkt-f3e5abed55-1.2 { | |
29 glob -nocomplain test.db*mj* | |
30 } {} | |
31 | |
32 do_test tkt-f3e5abed55-1.3 { | |
33 sqlite3 db2 test.db | |
34 execsql { BEGIN; SELECT * FROM t1 } db2 | |
35 } {} | |
36 | |
37 do_test tkt-f3e5abed55-1.4 { | |
38 execsql { | |
39 BEGIN; | |
40 INSERT INTO t1 VALUES(1, 2); | |
41 INSERT INTO t2 VALUES(1, 2); | |
42 } | |
43 catchsql COMMIT | |
44 } {1 {database is locked}} | |
45 | |
46 do_test tkt-f3e5abed55-1.5 { | |
47 execsql COMMIT db2 | |
48 execsql COMMIT | |
49 } {} | |
50 | |
51 do_test tkt-f3e5abed55-1.6 { | |
52 glob -nocomplain test.db*mj* | |
53 } {} | |
54 foreach f [glob -nocomplain test.db*mj*] { forcedelete $f } | |
55 db close | |
56 db2 close | |
57 | |
58 | |
59 | |
60 # Set up a testvfs so that the next time SQLite tries to delete the | |
61 # file "test.db-journal", a snapshot of the current file-system contents | |
62 # is taken. | |
63 # | |
64 # This test will not work with an in-memory journal. | |
65 # | |
66 if {[permutation]!="inmemory_journal"} { | |
67 testvfs tvfs -default 1 | |
68 tvfs script xDelete | |
69 tvfs filter xDelete | |
70 proc xDelete {method file args} { | |
71 if {[file tail $file] == "test.db-journal"} { | |
72 faultsim_save | |
73 tvfs filter {} | |
74 } | |
75 return "SQLITE_OK" | |
76 } | |
77 | |
78 sqlite3 db test.db | |
79 sqlite3 db2 test.db | |
80 do_test tkt-f3e5abed55-2.1 { | |
81 execsql { | |
82 ATTACH 'test.db2' AS aux; | |
83 BEGIN; | |
84 INSERT INTO t1 VALUES(3, 4); | |
85 INSERT INTO t2 VALUES(3, 4); | |
86 } | |
87 } {} | |
88 do_test tkt-f3e5abed55-2.2 { | |
89 execsql { BEGIN; SELECT * FROM t1 } db2 | |
90 } {1 2} | |
91 do_test tkt-f3e5abed55-2.3 { | |
92 catchsql COMMIT | |
93 } {1 {database is locked}} | |
94 | |
95 do_test tkt-f3e5abed55-2.4 { | |
96 execsql COMMIT db2 | |
97 execsql { | |
98 COMMIT; | |
99 SELECT * FROM t1; | |
100 SELECT * FROM t2; | |
101 } | |
102 } {1 2 3 4 1 2 3 4} | |
103 do_test tkt-f3e5abed55-2.5 { | |
104 db close | |
105 db2 close | |
106 faultsim_restore_and_reopen | |
107 execsql { | |
108 ATTACH 'test.db2' AS aux; | |
109 SELECT * FROM t1; | |
110 SELECT * FROM t2; | |
111 } | |
112 } {1 2 3 4 1 2 3 4} | |
113 } | |
114 | |
115 | |
116 finish_test | |
OLD | NEW |