Index: third_party/sqlite/sqlite-src-3080704/test/collate3.test |
diff --git a/third_party/sqlite/sqlite-src-3080704/test/collate3.test b/third_party/sqlite/sqlite-src-3080704/test/collate3.test |
deleted file mode 100644 |
index 2c051cb9a74fbdca4b60cdebace083de0cc4d090..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/test/collate3.test |
+++ /dev/null |
@@ -1,526 +0,0 @@ |
-# 2001 September 15 |
-# |
-# The author disclaims copyright to this source code. In place of |
-# a legal notice, here is a blessing: |
-# |
-# May you do good and not evil. |
-# May you find forgiveness for yourself and forgive others. |
-# May you share freely, never taking more than you give. |
-# |
-#*********************************************************************** |
-# This file implements regression tests for SQLite library. The |
-# focus of this script is page cache subsystem. |
-# |
-# $Id: collate3.test,v 1.13 2008/08/20 16:35:10 drh Exp $ |
- |
-set testdir [file dirname $argv0] |
-source $testdir/tester.tcl |
- |
-# |
-# Tests are organised as follows: |
-# |
-# collate3.1.* - Errors related to unknown collation sequences. |
-# collate3.2.* - Errors related to undefined collation sequences. |
-# collate3.3.* - Writing to a table that has an index with an undefined c.s. |
-# collate3.4.* - Misc errors. |
-# collate3.5.* - Collation factory. |
-# |
- |
-# |
-# These tests ensure that when a user executes a statement with an |
-# unknown collation sequence an error is returned. |
-# |
-do_test collate3-1.0 { |
- execsql { |
- CREATE TABLE collate3t1(c1); |
- } |
-} {} |
-do_test collate3-1.1 { |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY 1 collate garbage; |
- } |
-} {1 {no such collation sequence: garbage}} |
-do_test collate3-1.2 { |
- catchsql { |
- CREATE TABLE collate3t2(c1 collate garbage); |
- } |
-} {1 {no such collation sequence: garbage}} |
-do_test collate3-1.3 { |
- catchsql { |
- CREATE INDEX collate3i1 ON collate3t1(c1 COLLATE garbage); |
- } |
-} {1 {no such collation sequence: garbage}} |
- |
-execsql { |
- DROP TABLE collate3t1; |
-} |
- |
-proc caseless {a b} { string compare -nocase $a $b } |
-do_test collate3-1.4 { |
- db collate caseless caseless |
- execsql { |
- CREATE TABLE t1(a COLLATE caseless); |
- INSERT INTO t1 VALUES('Abc2'); |
- INSERT INTO t1 VALUES('abc1'); |
- INSERT INTO t1 VALUES('aBc3'); |
- } |
- execsql { SELECT * FROM t1 ORDER BY a } |
-} {abc1 Abc2 aBc3} |
- |
-do_test collate3-1.5 { |
- db close |
- sqlite3 db test.db |
- catchsql { SELECT * FROM t1 ORDER BY a } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.6.1 { |
- db collate caseless caseless |
- execsql { CREATE INDEX i1 ON t1(a) } |
- execsql { SELECT * FROM t1 ORDER BY a } |
-} {abc1 Abc2 aBc3} |
- |
-do_test collate3-1.6.2 { |
- db close |
- sqlite3 db test.db |
- catchsql { SELECT * FROM t1 ORDER BY a } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.6.3 { |
- db close |
- sqlite3 db test.db |
- catchsql { PRAGMA integrity_check } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.6.4 { |
- db close |
- sqlite3 db test.db |
- catchsql { REINDEX } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.7.1 { |
- db collate caseless caseless |
- execsql { |
- DROP TABLE t1; |
- CREATE TABLE t1(a); |
- CREATE INDEX i1 ON t1(a COLLATE caseless); |
- INSERT INTO t1 VALUES('Abc2'); |
- INSERT INTO t1 VALUES('abc1'); |
- INSERT INTO t1 VALUES('aBc3'); |
- SELECT * FROM t1 ORDER BY a COLLATE caseless; |
- } |
-} {abc1 Abc2 aBc3} |
- |
-do_test collate3-1.7.2 { |
- db close |
- sqlite3 db test.db |
- catchsql { SELECT * FROM t1 ORDER BY a COLLATE caseless} |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.7.4 { |
- db close |
- sqlite3 db test.db |
- catchsql { REINDEX } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.7.3 { |
- db close |
- sqlite3 db test.db |
- catchsql { PRAGMA integrity_check } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.7.4 { |
- db close |
- sqlite3 db test.db |
- catchsql { REINDEX } |
-} {1 {no such collation sequence: caseless}} |
- |
-do_test collate3-1.7.5 { |
- db close |
- sqlite3 db test.db |
- db collate caseless caseless |
- catchsql { PRAGMA integrity_check } |
-} {0 ok} |
- |
-proc needed {nm} { db collate caseless caseless } |
-do_test collate3-1.7.6 { |
- db close |
- sqlite3 db test.db |
- db collation_needed needed |
- catchsql { PRAGMA integrity_check } |
-} {0 ok} |
- |
-do_test collate3-1.8 { |
- execsql { DROP TABLE t1 } |
-} {} |
- |
-# |
-# Create a table with a default collation sequence, then close |
-# and re-open the database without re-registering the collation |
-# sequence. Then make sure the library stops us from using |
-# the collation sequence in: |
-# * an explicitly collated ORDER BY |
-# * an ORDER BY that uses the default collation sequence |
-# * an expression (=) |
-# * a CREATE TABLE statement |
-# * a CREATE INDEX statement that uses a default collation sequence |
-# * a GROUP BY that uses the default collation sequence |
-# * a SELECT DISTINCT that uses the default collation sequence |
-# * Compound SELECTs that uses the default collation sequence |
-# * An ORDER BY on a compound SELECT with an explicit ORDER BY. |
-# |
-do_test collate3-2.0 { |
- db collate string_compare {string compare} |
- execsql { |
- CREATE TABLE collate3t1(c1 COLLATE string_compare, c2); |
- } |
- db close |
- sqlite3 db test.db |
- expr 0 |
-} 0 |
-do_test collate3-2.1 { |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY 1 COLLATE string_compare; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.2 { |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY c1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.3 { |
- catchsql { |
- SELECT * FROM collate3t1 WHERE c1 = 'xxx'; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.4 { |
- catchsql { |
- CREATE TABLE collate3t2(c1 COLLATE string_compare); |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.5 { |
- catchsql { |
- CREATE INDEX collate3t1_i1 ON collate3t1(c1); |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.6 { |
- catchsql { |
- SELECT * FROM collate3t1; |
- } |
-} {0 {}} |
-do_test collate3-2.7.1 { |
- catchsql { |
- SELECT count(*) FROM collate3t1 GROUP BY c1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-# do_test collate3-2.7.2 { |
-# catchsql { |
-# SELECT * FROM collate3t1 GROUP BY c1; |
-# } |
-# } {1 {GROUP BY may only be used on aggregate queries}} |
-do_test collate3-2.7.2 { |
- catchsql { |
- SELECT * FROM collate3t1 GROUP BY c1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-2.8 { |
- catchsql { |
- SELECT DISTINCT c1 FROM collate3t1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
- |
-ifcapable compound { |
- do_test collate3-2.9 { |
- catchsql { |
- SELECT c1 FROM collate3t1 UNION SELECT c1 FROM collate3t1; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.10 { |
- catchsql { |
- SELECT c1 FROM collate3t1 EXCEPT SELECT c1 FROM collate3t1; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.11 { |
- catchsql { |
- SELECT c1 FROM collate3t1 INTERSECT SELECT c1 FROM collate3t1; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.12 { |
- catchsql { |
- SELECT c1 FROM collate3t1 UNION ALL SELECT c1 FROM collate3t1; |
- } |
- } {0 {}} |
- do_test collate3-2.13 { |
- catchsql { |
- SELECT 10 UNION ALL SELECT 20 ORDER BY 1 COLLATE string_compare; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.14 { |
- catchsql { |
- SELECT 10 INTERSECT SELECT 20 ORDER BY 1 COLLATE string_compare; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.15 { |
- catchsql { |
- SELECT 10 EXCEPT SELECT 20 ORDER BY 1 COLLATE string_compare; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.16 { |
- catchsql { |
- SELECT 10 UNION SELECT 20 ORDER BY 1 COLLATE string_compare; |
- } |
- } {1 {no such collation sequence: string_compare}} |
- do_test collate3-2.17 { |
- catchsql { |
- SELECT c1 FROM collate3t1 UNION ALL SELECT c1 FROM collate3t1 ORDER BY 1; |
- } |
- } {1 {no such collation sequence: string_compare}} |
-} ;# ifcapable compound |
- |
-# |
-# Create an index that uses a collation sequence then close and |
-# re-open the database without re-registering the collation |
-# sequence. Then check that for the table with the index |
-# * An INSERT fails, |
-# * An UPDATE on the column with the index fails, |
-# * An UPDATE on a different column succeeds. |
-# * A DELETE with a WHERE clause fails |
-# * A DELETE without a WHERE clause succeeds |
-# |
-# Also, ensure that the restrictions tested by collate3-2.* still |
-# apply after the index has been created. |
-# |
-do_test collate3-3.0 { |
- db collate string_compare {string compare} |
- execsql { |
- CREATE INDEX collate3t1_i1 ON collate3t1(c1); |
- INSERT INTO collate3t1 VALUES('xxx', 'yyy'); |
- } |
- db close |
- sqlite3 db test.db |
- expr 0 |
-} 0 |
-db eval {select * from collate3t1} |
-do_test collate3-3.1 { |
- catchsql { |
- INSERT INTO collate3t1 VALUES('xxx', 0); |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.2 { |
- catchsql { |
- UPDATE collate3t1 SET c1 = 'xxx'; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.3 { |
- catchsql { |
- UPDATE collate3t1 SET c2 = 'xxx'; |
- } |
-} {0 {}} |
-do_test collate3-3.4 { |
- catchsql { |
- DELETE FROM collate3t1 WHERE 1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.5 { |
- catchsql { |
- SELECT * FROM collate3t1; |
- } |
-} {0 {xxx xxx}} |
-do_test collate3-3.6 { |
- catchsql { |
- DELETE FROM collate3t1; |
- } |
-} {0 {}} |
-ifcapable {integrityck} { |
- do_test collate3-3.8 { |
- catchsql { |
- PRAGMA integrity_check |
- } |
- } {1 {no such collation sequence: string_compare}} |
-} |
-do_test collate3-3.9 { |
- catchsql { |
- SELECT * FROM collate3t1; |
- } |
-} {0 {}} |
-do_test collate3-3.10 { |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY 1 COLLATE string_compare; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.11 { |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY c1; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.12 { |
- catchsql { |
- SELECT * FROM collate3t1 WHERE c1 = 'xxx'; |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.13 { |
- catchsql { |
- CREATE TABLE collate3t2(c1 COLLATE string_compare); |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.14 { |
- catchsql { |
- CREATE INDEX collate3t1_i2 ON collate3t1(c1); |
- } |
-} {1 {no such collation sequence: string_compare}} |
-do_test collate3-3.15 { |
- execsql { |
- DROP TABLE collate3t1; |
- } |
-} {} |
- |
-# Check we can create an index that uses an explicit collation |
-# sequence and then close and re-open the database. |
-do_test collate3-4.6 { |
- db collate user_defined "string compare" |
- execsql { |
- CREATE TABLE collate3t1(a, b); |
- INSERT INTO collate3t1 VALUES('hello', NULL); |
- CREATE INDEX collate3i1 ON collate3t1(a COLLATE user_defined); |
- } |
-} {} |
-do_test collate3-4.7 { |
- db close |
- sqlite3 db test.db |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY a COLLATE user_defined; |
- } |
-} {1 {no such collation sequence: user_defined}} |
-do_test collate3-4.8.1 { |
- db collate user_defined "string compare" |
- catchsql { |
- SELECT * FROM collate3t1 ORDER BY a COLLATE user_defined; |
- } |
-} {0 {hello {}}} |
-do_test collate3-4.8.2 { |
- db close |
- lindex [catch { |
- sqlite3 db test.db |
- }] 0 |
-} {0} |
-do_test collate3-4.8.3 { |
- execsql { |
- DROP TABLE collate3t1; |
- } |
-} {} |
- |
-# Compare strings as numbers. |
-proc numeric_compare {lhs rhs} { |
- if {$rhs > $lhs} { |
- set res -1 |
- } else { |
- set res [expr ($lhs > $rhs)?1:0] |
- } |
- return $res |
-} |
- |
-# Check we can create a view that uses an explicit collation |
-# sequence and then close and re-open the database. |
-ifcapable view { |
-do_test collate3-4.9 { |
- db collate user_defined numeric_compare |
- execsql { |
- CREATE TABLE collate3t1(a, b); |
- INSERT INTO collate3t1 VALUES('2', NULL); |
- INSERT INTO collate3t1 VALUES('101', NULL); |
- INSERT INTO collate3t1 VALUES('12', NULL); |
- CREATE VIEW collate3v1 AS SELECT * FROM collate3t1 |
- ORDER BY 1 COLLATE user_defined; |
- SELECT * FROM collate3v1; |
- } |
-} {2 {} 12 {} 101 {}} |
-do_test collate3-4.10 { |
- db close |
- sqlite3 db test.db |
- catchsql { |
- SELECT * FROM collate3v1; |
- } |
-} {1 {no such collation sequence: user_defined}} |
-do_test collate3-4.11 { |
- db collate user_defined numeric_compare |
- catchsql { |
- SELECT * FROM collate3v1; |
- } |
-} {0 {2 {} 12 {} 101 {}}} |
-do_test collate3-4.12 { |
- execsql { |
- DROP TABLE collate3t1; |
- } |
-} {} |
-} ;# ifcapable view |
- |
-# |
-# Test the collation factory. In the code, the "no such collation sequence" |
-# message is only generated in two places. So these tests just test that |
-# the collation factory can be called once from each of those points. |
-# |
-do_test collate3-5.0 { |
- catchsql { |
- CREATE TABLE collate3t1(a); |
- INSERT INTO collate3t1 VALUES(10); |
- SELECT a FROM collate3t1 ORDER BY 1 COLLATE unk; |
- } |
-} {1 {no such collation sequence: unk}} |
-do_test collate3-5.1 { |
- set ::cfact_cnt 0 |
- proc cfact {nm} { |
- db collate $nm {string compare} |
- incr ::cfact_cnt |
- } |
- db collation_needed cfact |
-} {} |
-do_test collate3-5.2 { |
- catchsql { |
- SELECT a FROM collate3t1 ORDER BY 1 COLLATE unk; |
- } |
-} {0 10} |
-do_test collate3-5.3 { |
- set ::cfact_cnt |
-} {1} |
-do_test collate3-5.4 { |
- catchsql { |
- SELECT a FROM collate3t1 ORDER BY 1 COLLATE unk; |
- } |
-} {0 10} |
-do_test collate3-5.5 { |
- set ::cfact_cnt |
-} {1} |
-do_test collate3-5.6 { |
- catchsql { |
- SELECT a FROM collate3t1 ORDER BY 1 COLLATE unk; |
- } |
-} {0 10} |
-do_test collate3-5.7 { |
- execsql { |
- DROP TABLE collate3t1; |
- CREATE TABLE collate3t1(a COLLATE unk); |
- } |
- db close |
- sqlite3 db test.db |
- catchsql { |
- SELECT a FROM collate3t1 ORDER BY 1; |
- } |
-} {1 {no such collation sequence: unk}} |
-do_test collate3-5.8 { |
- set ::cfact_cnt 0 |
- proc cfact {nm} { |
- db collate $nm {string compare} |
- incr ::cfact_cnt |
- } |
- db collation_needed cfact |
- catchsql { |
- SELECT a FROM collate3t1 ORDER BY 1; |
- } |
-} {0 {}} |
- |
-do_test collate3-5.9 { |
- execsql { |
- DROP TABLE collate3t1; |
- } |
-} {} |
- |
-finish_test |