AryaWu/sqlite

1#2# 2007 June 203#4# The author disclaims copyright to this source code.  In place of5# a legal notice, here is a blessing:6#7#    May you do good and not evil.8#    May you find forgiveness for yourself and forgive others.9#    May you share freely, never taking more than you give.10#11#***********************************************************************12# This file implements regression tests for SQLite library.  The13# focus of this script is making sure collations pass through the14# unary + operator.15#16# 2015-02-09:  Added tests to make sure COLLATE passes through function17# calls.  Ticket [ca0d20b6cdddec5e81b8d66f89c46a5583b5f6f6].18#19 20set testdir [file dirname $argv0]21source $testdir/tester.tcl22 23do_test collate8-1.1 {24  execsql {25    CREATE TABLE t1(a TEXT COLLATE nocase);26    INSERT INTO t1 VALUES('aaa');27    INSERT INTO t1 VALUES('BBB');28    INSERT INTO t1 VALUES('ccc');29    INSERT INTO t1 VALUES('DDD');30    SELECT a FROM t1 ORDER BY a;31  }32} {aaa BBB ccc DDD}33do_test collate8-1.2 {34  execsql {35    SELECT rowid FROM t1 WHERE a<'ccc' ORDER BY 136  }37} {1 2}38do_test collate8-1.3 {39  execsql {40    SELECT rowid FROM t1 WHERE a<'ccc' COLLATE binary ORDER BY 141  }42} {1 2 4}43do_test collate8-1.4 {44  execsql {45    SELECT rowid FROM t1 WHERE +a<'ccc' ORDER BY 146  }47} {1 2}48do_test collate8-1.5 {49  execsql {50    SELECT a FROM t1 ORDER BY +a51  }52} {aaa BBB ccc DDD}53do_test collate8-1.11 {54  execsql {55    SELECT a AS x FROM t1 ORDER BY "x";56  }57} {aaa BBB ccc DDD}58do_test collate8-1.12 {59  execsql {60    SELECT a AS x FROM t1 WHERE x<'ccc' ORDER BY 161  }62} {aaa BBB}63do_test collate8-1.13 {64  execsql {65    SELECT a AS x FROM t1 WHERE x<'ccc' COLLATE binary ORDER BY [x]66  }67} {aaa BBB DDD}68do_test collate8-1.14 {69  execsql {70    SELECT a AS x FROM t1 WHERE +x<'ccc' ORDER BY 171  }72} {aaa BBB}73do_test collate8-1.15 {74  execsql {75    SELECT a AS x FROM t1 ORDER BY +x76  }77} {aaa BBB ccc DDD}78 79 80# When a result-set column is aliased into a WHERE clause, make sure the81# collating sequence logic works correctly.82#83do_test collate8-2.1 {84  execsql {85    CREATE TABLE t2(a);86    INSERT INTO t2 VALUES('abc');87    INSERT INTO t2 VALUES('ABC');88    SELECT a AS x FROM t2 WHERE x='abc';89  }90} {abc}91do_test collate8-2.2 {92  execsql {93    SELECT a AS x FROM t2 WHERE x='abc' COLLATE nocase;94  }95} {abc ABC}96do_test collate8-2.3 {97  execsql {98    SELECT a AS x FROM t2 WHERE (x COLLATE nocase)='abc';99  }100} {abc ABC}101do_test collate8-2.4 {102  execsql {103    SELECT a COLLATE nocase AS x FROM t2 WHERE x='abc';104  }105} {abc ABC}106do_test collate8-2.5 {107  execsql {108    SELECT a COLLATE nocase AS x FROM t2 WHERE (x COLLATE binary)='abc';109  }110} {abc}111do_test collate8-2.6 {112  execsql {113    SELECT a COLLATE nocase AS x FROM t2 WHERE x='abc' COLLATE binary;114  }115} {abc ABC}116do_test collate8-2.7 {117  execsql {118    SELECT * FROM t2 WHERE (a COLLATE nocase)='abc' COLLATE binary;119  }120} {abc ABC}121do_test collate8-2.8 {122  execsql {123    SELECT a COLLATE nocase AS x FROM t2 WHERE 'abc'=x COLLATE binary;124  }125} {abc}126 127# Make sure the COLLATE operator perculates up through function calls128# and other Expr structures that use the Expr.x.pList field.129#130do_execsql_test collate8-3.1 {131  SELECT 'abc'==('ABC'||'') COLLATE nocase;132  SELECT 'abc'==('ABC'||'' COLLATE nocase);133  SELECT 'abc'==('ABC'||('' COLLATE nocase));134  SELECT 'abc'==('ABC'||upper('' COLLATE nocase));135} {1 1 1 1}136do_execsql_test collate8-3.2 {137  SELECT 'abc'==('ABC'||max('' COLLATE nocase,'' COLLATE binary));138} {1}139 140# The COLLATE binary is on the left and so takes precedence141do_execsql_test collate8-3.3 {142  SELECT 'abc'==('ABC'||max('' COLLATE binary,'' COLLATE nocase));143} {0}144 145do_execsql_test collate8-3.4 {146  SELECT 'abc'==('ABC'||CASE WHEN 1-1=2 THEN '' COLLATE nocase147                                        ELSE '' COLLATE binary END);148  SELECT 'abc'==('ABC'||CASE WHEN 1+1=2 THEN '' COLLATE nocase149                                        ELSE '' COLLATE binary END);150} {1 1}151do_execsql_test collate8-3.5 {152  SELECT 'abc'==('ABC'||CASE WHEN 1=2 THEN '' COLLATE binary153                                      ELSE '' COLLATE nocase END);154} {0}155 156 157finish_test158