wasCSharpSQLite – Blame information for rev

Subversion Repositories:
Rev:
Rev Author Line No. Line
1 office 1 # 2007 May 02
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. The
12 # focus of this file is testing that it is OK to create new tables
13 # and indices while creating existing tables and indices.
14 #
15 # $Id: createtab.test,v 1.3 2007/09/12 17:01:45 danielk1977 Exp $
16  
17 set testdir [file dirname $argv0]
18 source $testdir/tester.tcl
19  
20 ifcapable autovacuum {
21 set upperBound 2
22 } else {
23 set upperBound 0
24 }
25  
26 # Run these tests for all possible values of autovacuum.
27 #
28 for {set av 0} {$av<=$upperBound} {incr av} {
29 db close
30 file delete -force test.db test.db-journal
31 sqlite3 db test.db
32  
33 # Create a table that spans multiple pages. It is important
34 # that part of the database be in pages beyond the root page.
35 #
36 do_test createtab-$av.1 {
37 execsql "PRAGMA auto_vacuum=$av"
38 execsql {
39 PRAGMA page_size=1024;
40 CREATE TABLE t1(x INTEGER PRIMARY KEY, y);
41 INSERT INTO t1 VALUES(1, hex(randomblob(200)));
42 INSERT INTO t1 VALUES(2, hex(randomblob(200)));
43 INSERT INTO t1 VALUES(3, hex(randomblob(200)));
44 INSERT INTO t1 VALUES(4, hex(randomblob(200)));
45 SELECT count(*) FROM t1;
46 }
47 } {4}
48  
49 set isUtf16 0
50 ifcapable utf16 {
51 set isUtf16 [expr {[execsql {PRAGMA encoding}] != "UTF-8"}]
52 }
53  
54 do_test createtab-$av.2 {
55 file size test.db
56 } [expr {1024*(4+($av!=0)+(${isUtf16}*2))}]
57  
58 # Start reading the table
59 #
60 do_test createtab-$av.3 {
61 set STMT [sqlite3_prepare db {SELECT x FROM t1} -1 TAIL]
62 sqlite3_step $STMT
63 } {SQLITE_ROW}
64 do_test createtab-$av.4 {
65 sqlite3_column_int $STMT 0
66 } {1}
67  
68 # While still reading the table, create a new table.
69 #
70 do_test createtab-$av.5 {
71 execsql {
72 CREATE TABLE t2(a,b);
73 INSERT INTO t2 VALUES(1,2);
74 SELECT * FROM t2;
75 }
76 } {1 2}
77  
78 # Continue reading the original table.
79 #
80 do_test createtab-$av.6 {
81 sqlite3_column_int $STMT 0
82 } {1}
83 do_test createtab-$av.7 {
84 sqlite3_step $STMT
85 } {SQLITE_ROW}
86 do_test createtab-$av.8 {
87 sqlite3_column_int $STMT 0
88 } {2}
89  
90 # Do another cycle of creating a new database table while contining
91 # to read the original table.
92 #
93 do_test createtab-$av.11 {
94 execsql {
95 CREATE TABLE t3(a,b);
96 INSERT INTO t3 VALUES(4,5);
97 SELECT * FROM t3;
98 }
99 } {4 5}
100 do_test createtab-$av.12 {
101 sqlite3_column_int $STMT 0
102 } {2}
103 do_test createtab-$av.13 {
104 sqlite3_step $STMT
105 } {SQLITE_ROW}
106 do_test createtab-$av.14 {
107 sqlite3_column_int $STMT 0
108 } {3}
109  
110 # One more cycle.
111 #
112 do_test createtab-$av.21 {
113 execsql {
114 CREATE TABLE t4(a,b);
115 INSERT INTO t4 VALUES('abc','xyz');
116 SELECT * FROM t4;
117 }
118 } {abc xyz}
119 do_test createtab-$av.22 {
120 sqlite3_column_int $STMT 0
121 } {3}
122 do_test createtab-$av.23 {
123 sqlite3_step $STMT
124 } {SQLITE_ROW}
125 do_test createtab-$av.24 {
126 sqlite3_column_int $STMT 0
127 } {4}
128  
129 # Finish reading. Do an integrity check on the database.
130 #
131 do_test createtab-$av.30 {
132 sqlite3_step $STMT
133 } {SQLITE_DONE}
134 do_test createtab-$av.31 {
135 sqlite3_finalize $STMT
136 } {SQLITE_OK}
137 do_test createtab-$av.32 {
138 execsql {
139 SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1
140 }
141 } {t1 t2 t3 t4}
142 integrity_check createtab-$av.40
143  
144 }
145  
146 finish_test