diff options
author | dan miller | 2007-10-20 02:49:29 +0000 |
---|---|---|
committer | dan miller | 2007-10-20 02:49:29 +0000 |
commit | e36d23a85ebff914d74bb541558c2b6082b78edb (patch) | |
tree | 54b58fdf162e78af64055282a6035c8d2443389d /libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test | |
parent | * Fixed an issue whereby avatar chat distances were being calculated against ... (diff) | |
download | opensim-SC-e36d23a85ebff914d74bb541558c2b6082b78edb.zip opensim-SC-e36d23a85ebff914d74bb541558c2b6082b78edb.tar.gz opensim-SC-e36d23a85ebff914d74bb541558c2b6082b78edb.tar.bz2 opensim-SC-e36d23a85ebff914d74bb541558c2b6082b78edb.tar.xz |
sqlite source (unix build) added to libraries
Diffstat (limited to 'libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test')
-rw-r--r-- | libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test | 146 |
1 files changed, 146 insertions, 0 deletions
diff --git a/libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test b/libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test new file mode 100644 index 0000000..3f036b7 --- /dev/null +++ b/libraries/sqlite/unix/sqlite-3.5.1/test/createtab.test | |||
@@ -0,0 +1,146 @@ | |||
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 | ||