1# 2010 July 09 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 the SELECT statement. 13# 14 15set testdir [file dirname $argv0] 16source $testdir/tester.tcl 17 18ifcapable !vtab||!compound { 19 finish_test 20 return 21} 22 23 24set ::asc 1 25proc a_string {n} { string range [string repeat [incr ::asc]. $n] 1 $n } 26db func a_string a_string 27 28register_dbstat_vtab db 29do_execsql_test stat-0.0 { 30 PRAGMA auto_vacuum = OFF; 31 CREATE VIRTUAL TABLE temp.stat USING dbstat; 32 SELECT * FROM stat; 33} {} 34 35ifcapable wal { 36 do_execsql_test stat-0.1 { 37 PRAGMA journal_mode = WAL; 38 PRAGMA journal_mode = delete; 39 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 40 FROM stat; 41 } {wal delete sqlite_master / 1 leaf 0 0 916 0} 42} 43 44do_test stat-1.0 { 45 execsql { 46 CREATE TABLE t1(a, b); 47 CREATE INDEX i1 ON t1(b); 48 INSERT INTO t1(rowid, a, b) VALUES(2, 2, 3); 49 INSERT INTO t1(rowid, a, b) VALUES(3, 4, 5); 50 } 51} {} 52do_test stat-1.1 { 53 execsql { 54 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 55 FROM stat WHERE name = 't1'; 56 } 57} {t1 / 2 leaf 2 10 998 5} 58do_test stat-1.2 { 59 execsql { 60 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 61 FROM stat WHERE name = 'i1'; 62 } 63} {i1 / 3 leaf 2 10 1000 5} 64do_test stat-1.3 { 65 execsql { 66 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 67 FROM stat WHERE name = 'sqlite_master'; 68 } 69} {sqlite_master / 1 leaf 2 77 831 40} 70do_test stat-1.4 { 71 execsql { 72 DROP TABLE t1; 73 } 74} {} 75 76do_execsql_test stat-2.1 { 77 CREATE TABLE t3(a PRIMARY KEY, b); 78 INSERT INTO t3(rowid, a, b) VALUES(2, a_string(111), a_string(222)); 79 INSERT INTO t3 SELECT a_string(110+rowid), a_string(221+rowid) FROM t3 80 ORDER BY rowid; 81 INSERT INTO t3 SELECT a_string(110+rowid), a_string(221+rowid) FROM t3 82 ORDER BY rowid; 83 INSERT INTO t3 SELECT a_string(110+rowid), a_string(221+rowid) FROM t3 84 ORDER BY rowid; 85 INSERT INTO t3 SELECT a_string(110+rowid), a_string(221+rowid) FROM t3 86 ORDER BY rowid; 87 INSERT INTO t3 SELECT a_string(110+rowid), a_string(221+rowid) FROM t3 88 ORDER BY rowid; 89 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 90 FROM stat WHERE name != 'sqlite_master'; 91} [list \ 92 sqlite_autoindex_t3_1 / 3 internal 3 368 623 125 \ 93 sqlite_autoindex_t3_1 /000/ 8 leaf 8 946 46 123 \ 94 sqlite_autoindex_t3_1 /001/ 9 leaf 8 988 2 131 \ 95 sqlite_autoindex_t3_1 /002/ 15 leaf 7 857 137 132 \ 96 sqlite_autoindex_t3_1 /003/ 20 leaf 6 739 257 129 \ 97 t3 / 2 internal 15 0 907 0 \ 98 t3 /000/ 4 leaf 2 678 328 340 \ 99 t3 /001/ 5 leaf 2 682 324 342 \ 100 t3 /002/ 6 leaf 2 682 324 342 \ 101 t3 /003/ 7 leaf 2 690 316 346 \ 102 t3 /004/ 10 leaf 2 682 324 342 \ 103 t3 /005/ 11 leaf 2 690 316 346 \ 104 t3 /006/ 12 leaf 2 698 308 350 \ 105 t3 /007/ 13 leaf 2 706 300 354 \ 106 t3 /008/ 14 leaf 2 682 324 342 \ 107 t3 /009/ 16 leaf 2 690 316 346 \ 108 t3 /00a/ 17 leaf 2 698 308 350 \ 109 t3 /00b/ 18 leaf 2 706 300 354 \ 110 t3 /00c/ 19 leaf 2 714 292 358 \ 111 t3 /00d/ 21 leaf 2 722 284 362 \ 112 t3 /00e/ 22 leaf 2 730 276 366 \ 113 t3 /00f/ 23 leaf 2 738 268 370 \ 114] 115 116# With every index entry overflowing, make sure no pages are missed 117# (other than the locking page which is 64 in this test build.) 118# 119do_execsql_test stat-2.2 { 120 UPDATE t3 SET a=a||hex(randomblob(700)); 121 VACUUM; 122 SELECT pageno FROM stat EXCEPT SELECT pageno-1 FROM stat; 123} {64 136} 124 125do_execsql_test stat-2.3 { DROP TABLE t3; VACUUM; } {} 126 127do_execsql_test stat-3.1 { 128 CREATE TABLE t4(x); 129 CREATE INDEX i4 ON t4(x); 130 INSERT INTO t4(rowid, x) VALUES(2, a_string(7777)); 131 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 132 FROM stat WHERE name != 'sqlite_master'; 133} [list \ 134 i4 / 3 leaf 1 103 905 7782 \ 135 i4 /000+000000 4 overflow 0 1020 0 0 \ 136 i4 /000+000001 5 overflow 0 1020 0 0 \ 137 i4 /000+000002 6 overflow 0 1020 0 0 \ 138 i4 /000+000003 7 overflow 0 1020 0 0 \ 139 i4 /000+000004 8 overflow 0 1020 0 0 \ 140 i4 /000+000005 9 overflow 0 1020 0 0 \ 141 i4 /000+000006 10 overflow 0 1020 0 0 \ 142 i4 /000+000007 11 overflow 0 539 481 0 \ 143 t4 / 2 leaf 1 640 367 7780 \ 144 t4 /000+000000 12 overflow 0 1020 0 0 \ 145 t4 /000+000001 13 overflow 0 1020 0 0 \ 146 t4 /000+000002 14 overflow 0 1020 0 0 \ 147 t4 /000+000003 15 overflow 0 1020 0 0 \ 148 t4 /000+000004 16 overflow 0 1020 0 0 \ 149 t4 /000+000005 17 overflow 0 1020 0 0 \ 150 t4 /000+000006 18 overflow 0 1020 0 0 \ 151] 152 153do_execsql_test stat-4.1 { 154 CREATE TABLE t5(x); 155 CREATE INDEX i5 ON t5(x); 156 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 157 FROM stat WHERE name = 't5' OR name = 'i5'; 158} [list \ 159 i5 / 20 leaf 0 0 1016 0 \ 160 t5 / 19 leaf 0 0 1016 0 \ 161] 162 163db close 164forcedelete test.db 165sqlite3 db test.db 166register_dbstat_vtab db 167do_execsql_test stat-5.1 { 168 PRAGMA auto_vacuum = OFF; 169 CREATE VIRTUAL TABLE temp.stat USING dbstat; 170 CREATE TABLE t1(x); 171 INSERT INTO t1 VALUES(zeroblob(1513)); 172 INSERT INTO t1 VALUES(zeroblob(1514)); 173 SELECT name, path, pageno, pagetype, ncell, payload, unused, mx_payload 174 FROM stat WHERE name = 't1'; 175} [list \ 176 t1 / 2 leaf 2 993 5 1517 \ 177 t1 /000+000000 3 overflow 0 1020 0 0 \ 178 t1 /001+000000 4 overflow 0 1020 0 0 \ 179] 180 181finish_test 182