OLD | NEW |
(Empty) | |
| 1 # 2013 March 13 |
| 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. |
| 12 # |
| 13 |
| 14 set testdir [file dirname $argv0] |
| 15 source $testdir/tester.tcl |
| 16 set ::testprefix tkt-4dd95f6943 |
| 17 |
| 18 do_execsql_test 1.0 { |
| 19 CREATE TABLE t1(x); |
| 20 INSERT INTO t1 VALUES (3), (4), (2), (1), (5), (6); |
| 21 } |
| 22 |
| 23 foreach {tn1 idx} { |
| 24 1 { CREATE INDEX i1 ON t1(x ASC) } |
| 25 2 { CREATE INDEX i1 ON t1(x DESC) } |
| 26 } { |
| 27 do_execsql_test 1.$tn1.1 { DROP INDEX IF EXISTS i1; } |
| 28 do_execsql_test 1.$tn1.2 $idx |
| 29 |
| 30 do_execsql_test 1.$tn1.3 { |
| 31 SELECT x FROM t1 WHERE x IN(2, 4, 5) ORDER BY x ASC; |
| 32 } {2 4 5} |
| 33 |
| 34 do_execsql_test 1.$tn1.4 { |
| 35 SELECT x FROM t1 WHERE x IN(2, 4, 5) ORDER BY x DESC; |
| 36 } {5 4 2} |
| 37 } |
| 38 |
| 39 |
| 40 do_execsql_test 2.0 { |
| 41 CREATE TABLE t2(x, y); |
| 42 INSERT INTO t2 VALUES (5, 3), (5, 4), (5, 2), (5, 1), (5, 5), (5, 6); |
| 43 INSERT INTO t2 VALUES (1, 3), (1, 4), (1, 2), (1, 1), (1, 5), (1, 6); |
| 44 INSERT INTO t2 VALUES (3, 3), (3, 4), (3, 2), (3, 1), (3, 5), (3, 6); |
| 45 INSERT INTO t2 VALUES (2, 3), (2, 4), (2, 2), (2, 1), (2, 5), (2, 6); |
| 46 INSERT INTO t2 VALUES (4, 3), (4, 4), (4, 2), (4, 1), (4, 5), (4, 6); |
| 47 INSERT INTO t2 VALUES (6, 3), (6, 4), (6, 2), (6, 1), (6, 5), (6, 6); |
| 48 |
| 49 CREATE TABLE t3(a, b); |
| 50 INSERT INTO t3 VALUES (2, 2), (4, 4), (5, 5); |
| 51 CREATE UNIQUE INDEX t3i1 ON t3(a ASC); |
| 52 CREATE UNIQUE INDEX t3i2 ON t3(b DESC); |
| 53 } |
| 54 |
| 55 foreach {tn1 idx} { |
| 56 1 { CREATE INDEX i1 ON t2(x ASC, y ASC) } |
| 57 2 { CREATE INDEX i1 ON t2(x ASC, y DESC) } |
| 58 3 { CREATE INDEX i1 ON t2(x DESC, y ASC) } |
| 59 4 { CREATE INDEX i1 ON t2(x DESC, y DESC) } |
| 60 |
| 61 5 { CREATE INDEX i1 ON t2(y ASC, x ASC) } |
| 62 6 { CREATE INDEX i1 ON t2(y ASC, x DESC) } |
| 63 7 { CREATE INDEX i1 ON t2(y DESC, x ASC) } |
| 64 8 { CREATE INDEX i1 ON t2(y DESC, x DESC) } |
| 65 } { |
| 66 do_execsql_test 2.$tn1.1 { DROP INDEX IF EXISTS i1; } |
| 67 do_execsql_test 2.$tn1.2 $idx |
| 68 |
| 69 foreach {tn2 inexpr} { |
| 70 3 "(2, 4, 5)" |
| 71 4 "(SELECT a FROM t3)" |
| 72 5 "(SELECT b FROM t3)" |
| 73 } { |
| 74 do_execsql_test 2.$tn1.$tn2.1 " |
| 75 SELECT x, y FROM t2 WHERE x = 1 AND y IN $inexpr ORDER BY x ASC, y ASC; |
| 76 " {1 2 1 4 1 5} |
| 77 |
| 78 do_execsql_test 2.$tn1.$tn2.2 " |
| 79 SELECT x, y FROM t2 WHERE x = 2 AND y IN $inexpr ORDER BY x ASC, y DESC; |
| 80 " {2 5 2 4 2 2} |
| 81 |
| 82 do_execsql_test 2.$tn1.$tn2.3 " |
| 83 SELECT x, y FROM t2 WHERE x = 3 AND y IN $inexpr ORDER BY x DESC, y ASC; |
| 84 " {3 2 3 4 3 5} |
| 85 |
| 86 do_execsql_test 2.$tn1.$tn2.4 " |
| 87 SELECT x, y FROM t2 WHERE x = 4 AND y IN $inexpr ORDER BY x DESC, y DESC; |
| 88 " {4 5 4 4 4 2} |
| 89 |
| 90 do_execsql_test 2.$tn1.$tn2.5 " |
| 91 SELECT a, x, y FROM t2, t3 WHERE a = 4 AND x = 1 AND y IN $inexpr |
| 92 ORDER BY a, x ASC, y ASC; |
| 93 " {4 1 2 4 1 4 4 1 5} |
| 94 do_execsql_test 2.$tn1.$tn2.6 " |
| 95 SELECT a, x, y FROM t2, t3 WHERE a = 2 AND x = 1 AND y IN $inexpr |
| 96 ORDER BY x ASC, y ASC; |
| 97 " {2 1 2 2 1 4 2 1 5} |
| 98 |
| 99 do_execsql_test 2.$tn1.$tn2.7 " |
| 100 SELECT a, x, y FROM t2, t3 WHERE a = 4 AND x = 1 AND y IN $inexpr |
| 101 ORDER BY a, x ASC, y DESC; |
| 102 " {4 1 5 4 1 4 4 1 2} |
| 103 do_execsql_test 2.$tn1.8 " |
| 104 SELECT a, x, y FROM t2, t3 WHERE a = 2 AND x = 1 AND y IN $inexpr |
| 105 ORDER BY x ASC, y DESC; |
| 106 " {2 1 5 2 1 4 2 1 2} |
| 107 |
| 108 do_execsql_test 2.$tn1.$tn2.9 " |
| 109 SELECT a, x, y FROM t2, t3 WHERE a = 4 AND x = 1 AND y IN $inexpr |
| 110 ORDER BY a, x DESC, y ASC; |
| 111 " {4 1 2 4 1 4 4 1 5} |
| 112 do_execsql_test 2.$tn1.10 " |
| 113 SELECT a, x, y FROM t2, t3 WHERE a = 2 AND x = 1 AND y IN $inexpr |
| 114 ORDER BY x DESC, y ASC; |
| 115 " {2 1 2 2 1 4 2 1 5} |
| 116 |
| 117 do_execsql_test 2.$tn1.$tn2.11 " |
| 118 SELECT a, x, y FROM t2, t3 WHERE a = 4 AND x = 1 AND y IN $inexpr |
| 119 ORDER BY a, x DESC, y DESC; |
| 120 " {4 1 5 4 1 4 4 1 2} |
| 121 do_execsql_test 2.$tn1.$tn2.12 " |
| 122 SELECT a, x, y FROM t2, t3 WHERE a = 2 AND x = 1 AND y IN $inexpr |
| 123 ORDER BY x DESC, y DESC; |
| 124 " {2 1 5 2 1 4 2 1 2} |
| 125 } |
| 126 } |
| 127 |
| 128 do_execsql_test 3.0 { |
| 129 CREATE TABLE t7(x); |
| 130 INSERT INTO t7 VALUES (1), (2), (3); |
| 131 CREATE INDEX i7 ON t7(x); |
| 132 |
| 133 CREATE TABLE t8(y); |
| 134 INSERT INTO t8 VALUES (1), (2), (3); |
| 135 } |
| 136 |
| 137 foreach {tn idxdir sortdir sortdata} { |
| 138 1 ASC ASC {1 2 3} |
| 139 2 ASC DESC {3 2 1} |
| 140 3 DESC ASC {1 2 3} |
| 141 4 ASC DESC {3 2 1} |
| 142 } { |
| 143 |
| 144 do_execsql_test 3.$tn " |
| 145 DROP INDEX IF EXISTS i8; |
| 146 CREATE UNIQUE INDEX i8 ON t8(y $idxdir); |
| 147 SELECT x FROM t7 WHERE x IN (SELECT y FROM t8) ORDER BY x $sortdir; |
| 148 " $sortdata |
| 149 } |
| 150 |
| 151 finish_test |
OLD | NEW |