| Index: third_party/sqlite/src/test/misc2.test
|
| diff --git a/third_party/sqlite/src/test/misc2.test b/third_party/sqlite/src/test/misc2.test
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..f6fc3833f91891599db3a788f3b5d999c0e091ad
|
| --- /dev/null
|
| +++ b/third_party/sqlite/src/test/misc2.test
|
| @@ -0,0 +1,441 @@
|
| +# 2003 June 21
|
| +#
|
| +# 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.
|
| +#
|
| +# This file implements tests for miscellanous features that were
|
| +# left out of other test files.
|
| +#
|
| +# $Id: misc2.test,v 1.28 2007/09/12 17:01:45 danielk1977 Exp $
|
| +
|
| +set testdir [file dirname $argv0]
|
| +source $testdir/tester.tcl
|
| +
|
| +# The tests in this file were written before SQLite supported recursive
|
| +# trigger invocation, and some tests depend on that to pass. So disable
|
| +# recursive triggers for this file.
|
| +catchsql { pragma recursive_triggers = off }
|
| +
|
| +ifcapable {trigger} {
|
| +# Test for ticket #360
|
| +#
|
| +do_test misc2-1.1 {
|
| + catchsql {
|
| + CREATE TABLE FOO(bar integer);
|
| + CREATE TRIGGER foo_insert BEFORE INSERT ON foo BEGIN
|
| + SELECT CASE WHEN (NOT new.bar BETWEEN 0 AND 20)
|
| + THEN raise(rollback, 'aiieee') END;
|
| + END;
|
| + INSERT INTO foo(bar) VALUES (1);
|
| + }
|
| +} {0 {}}
|
| +do_test misc2-1.2 {
|
| + catchsql {
|
| + INSERT INTO foo(bar) VALUES (111);
|
| + }
|
| +} {1 aiieee}
|
| +} ;# endif trigger
|
| +
|
| +# Make sure ROWID works on a view and a subquery. Ticket #364
|
| +#
|
| +do_test misc2-2.1 {
|
| + execsql {
|
| + CREATE TABLE t1(a,b,c);
|
| + INSERT INTO t1 VALUES(1,2,3);
|
| + CREATE TABLE t2(a,b,c);
|
| + INSERT INTO t2 VALUES(7,8,9);
|
| + }
|
| +} {}
|
| +ifcapable subquery {
|
| + do_test misc2-2.2 {
|
| + execsql {
|
| + SELECT rowid, * FROM (SELECT * FROM t1, t2);
|
| + }
|
| + } {{} 1 2 3 7 8 9}
|
| +}
|
| +ifcapable view {
|
| + do_test misc2-2.3 {
|
| + execsql {
|
| + CREATE VIEW v1 AS SELECT * FROM t1, t2;
|
| + SELECT rowid, * FROM v1;
|
| + }
|
| + } {{} 1 2 3 7 8 9}
|
| +} ;# ifcapable view
|
| +
|
| +# Ticket #2002 and #1952.
|
| +ifcapable subquery {
|
| + do_test misc2-2.4 {
|
| + execsql2 {
|
| + SELECT * FROM (SELECT a, b AS 'a', c AS 'a', 4 AS 'a' FROM t1)
|
| + }
|
| + } {a 1 a:1 2 a:2 3 a:3 4}
|
| +}
|
| +
|
| +# Check name binding precedence. Ticket #387
|
| +#
|
| +do_test misc2-3.1 {
|
| + catchsql {
|
| + SELECT t1.b+t2.b AS a, t1.a, t2.a FROM t1, t2 WHERE a==10
|
| + }
|
| +} {1 {ambiguous column name: a}}
|
| +
|
| +# Make sure 32-bit integer overflow is handled properly in queries.
|
| +# ticket #408
|
| +#
|
| +do_test misc2-4.1 {
|
| + execsql {
|
| + INSERT INTO t1 VALUES(4000000000,'a','b');
|
| + SELECT a FROM t1 WHERE a>1;
|
| + }
|
| +} {4000000000}
|
| +do_test misc2-4.2 {
|
| + execsql {
|
| + INSERT INTO t1 VALUES(2147483648,'b2','c2');
|
| + INSERT INTO t1 VALUES(2147483647,'b3','c3');
|
| + SELECT a FROM t1 WHERE a>2147483647;
|
| + }
|
| +} {4000000000 2147483648}
|
| +do_test misc2-4.3 {
|
| + execsql {
|
| + SELECT a FROM t1 WHERE a<2147483648;
|
| + }
|
| +} {1 2147483647}
|
| +do_test misc2-4.4 {
|
| + execsql {
|
| + SELECT a FROM t1 WHERE a<=2147483648;
|
| + }
|
| +} {1 2147483648 2147483647}
|
| +do_test misc2-4.5 {
|
| + execsql {
|
| + SELECT a FROM t1 WHERE a<10000000000;
|
| + }
|
| +} {1 4000000000 2147483648 2147483647}
|
| +do_test misc2-4.6 {
|
| + execsql {
|
| + SELECT a FROM t1 WHERE a<1000000000000 ORDER BY 1;
|
| + }
|
| +} {1 2147483647 2147483648 4000000000}
|
| +
|
| +# There were some issues with expanding a SrcList object using a call
|
| +# to sqliteSrcListAppend() if the SrcList had previously been duplicated
|
| +# using a call to sqliteSrcListDup(). Ticket #416. The following test
|
| +# makes sure the problem has been fixed.
|
| +#
|
| +ifcapable view {
|
| +do_test misc2-5.1 {
|
| + execsql {
|
| + CREATE TABLE x(a,b);
|
| + CREATE VIEW y AS
|
| + SELECT x1.b AS p, x2.b AS q FROM x AS x1, x AS x2 WHERE x1.a=x2.a;
|
| + CREATE VIEW z AS
|
| + SELECT y1.p, y2.p FROM y AS y1, y AS y2 WHERE y1.q=y2.q;
|
| + SELECT * from z;
|
| + }
|
| +} {}
|
| +}
|
| +
|
| +# Make sure we can open a database with an empty filename. What this
|
| +# does is store the database in a temporary file that is deleted when
|
| +# the database is closed. Ticket #432.
|
| +#
|
| +do_test misc2-6.1 {
|
| + db close
|
| + sqlite3 db {}
|
| + execsql {
|
| + CREATE TABLE t1(a,b);
|
| + INSERT INTO t1 VALUES(1,2);
|
| + SELECT * FROM t1;
|
| + }
|
| +} {1 2}
|
| +
|
| +# Make sure we get an error message (not a segfault) on an attempt to
|
| +# update a table from within the callback of a select on that same
|
| +# table.
|
| +#
|
| +# 2006-08-16: This has changed. It is now permitted to update
|
| +# the table being SELECTed from within the callback of the query.
|
| +#
|
| +ifcapable tclvar {
|
| + do_test misc2-7.1 {
|
| + db close
|
| + file delete -force test.db
|
| + sqlite3 db test.db
|
| + execsql {
|
| + CREATE TABLE t1(x);
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + SELECT * FROM t1;
|
| + }
|
| + } {1 2 3}
|
| + do_test misc2-7.2 {
|
| + set rc [catch {
|
| + db eval {SELECT rowid FROM t1} {} {
|
| + db eval "DELETE FROM t1 WHERE rowid=$rowid"
|
| + }
|
| + } msg]
|
| + lappend rc $msg
|
| + } {0 {}}
|
| + do_test misc2-7.3 {
|
| + execsql {SELECT * FROM t1}
|
| + } {}
|
| + do_test misc2-7.4 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1 WHERE rowid=$rowid}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {2 4}
|
| + do_test misc2-7.5 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1 WHERE rowid=$rowid+1}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {1 3}
|
| + do_test misc2-7.6 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {}
|
| + do_test misc2-7.7 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x & 1} {
|
| + db eval {UPDATE t1 SET x=x+100 WHERE rowid=$rowid}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {101 2 103 4}
|
| + do_test misc2-7.8 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x<10} {
|
| + db eval {INSERT INTO t1 VALUES($x+1)}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {1 2 3 4 5 6 7 8 9 10}
|
| +
|
| + # Repeat the tests 7.1 through 7.8 about but this time do the SELECTs
|
| + # in reverse order so that we exercise the sqlite3BtreePrev() routine
|
| + # instead of sqlite3BtreeNext()
|
| + #
|
| + do_test misc2-7.11 {
|
| + db close
|
| + file delete -force test.db
|
| + sqlite3 db test.db
|
| + execsql {
|
| + CREATE TABLE t1(x);
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + SELECT * FROM t1;
|
| + }
|
| + } {1 2 3}
|
| + do_test misc2-7.12 {
|
| + set rc [catch {
|
| + db eval {SELECT rowid FROM t1 ORDER BY rowid DESC} {} {
|
| + db eval "DELETE FROM t1 WHERE rowid=$rowid"
|
| + }
|
| + } msg]
|
| + lappend rc $msg
|
| + } {0 {}}
|
| + do_test misc2-7.13 {
|
| + execsql {SELECT * FROM t1}
|
| + } {}
|
| + do_test misc2-7.14 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1 WHERE rowid=$rowid}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {2 4}
|
| + do_test misc2-7.15 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1 WHERE rowid=$rowid+1}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {1 3}
|
| + do_test misc2-7.16 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
|
| + if {$x & 1} {
|
| + db eval {DELETE FROM t1}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {}
|
| + do_test misc2-7.17 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1 VALUES(1);
|
| + INSERT INTO t1 VALUES(2);
|
| + INSERT INTO t1 VALUES(3);
|
| + INSERT INTO t1 VALUES(4);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
|
| + if {$x & 1} {
|
| + db eval {UPDATE t1 SET x=x+100 WHERE rowid=$rowid}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {101 2 103 4}
|
| + do_test misc2-7.18 {
|
| + execsql {
|
| + DELETE FROM t1;
|
| + INSERT INTO t1(rowid,x) VALUES(10,10);
|
| + }
|
| + db eval {SELECT rowid, x FROM t1 ORDER BY rowid DESC} {
|
| + if {$x>1} {
|
| + db eval {INSERT INTO t1(rowid,x) VALUES($x-1,$x-1)}
|
| + }
|
| + }
|
| + execsql {SELECT * FROM t1}
|
| + } {1 2 3 4 5 6 7 8 9 10}
|
| +}
|
| +
|
| +db close
|
| +file delete -force test.db
|
| +sqlite3 db test.db
|
| +catchsql { pragma recursive_triggers = off }
|
| +
|
| +# Ticket #453. If the SQL ended with "-", the tokenizer was calling that
|
| +# an incomplete token, which caused problem. The solution was to just call
|
| +# it a minus sign.
|
| +#
|
| +do_test misc2-8.1 {
|
| + catchsql {-}
|
| +} {1 {near "-": syntax error}}
|
| +
|
| +# Ticket #513. Make sure the VDBE stack does not grow on a 3-way join.
|
| +#
|
| +ifcapable tempdb {
|
| + do_test misc2-9.1 {
|
| + execsql {
|
| + BEGIN;
|
| + CREATE TABLE counts(n INTEGER PRIMARY KEY);
|
| + INSERT INTO counts VALUES(0);
|
| + INSERT INTO counts VALUES(1);
|
| + INSERT INTO counts SELECT n+2 FROM counts;
|
| + INSERT INTO counts SELECT n+4 FROM counts;
|
| + INSERT INTO counts SELECT n+8 FROM counts;
|
| + COMMIT;
|
| +
|
| + CREATE TEMP TABLE x AS
|
| + SELECT dim1.n, dim2.n, dim3.n
|
| + FROM counts AS dim1, counts AS dim2, counts AS dim3
|
| + WHERE dim1.n<10 AND dim2.n<10 AND dim3.n<10;
|
| +
|
| + SELECT count(*) FROM x;
|
| + }
|
| + } {1000}
|
| + do_test misc2-9.2 {
|
| + execsql {
|
| + DROP TABLE x;
|
| + CREATE TEMP TABLE x AS
|
| + SELECT dim1.n, dim2.n, dim3.n
|
| + FROM counts AS dim1, counts AS dim2, counts AS dim3
|
| + WHERE dim1.n>=6 AND dim2.n>=6 AND dim3.n>=6;
|
| +
|
| + SELECT count(*) FROM x;
|
| + }
|
| + } {1000}
|
| + do_test misc2-9.3 {
|
| + execsql {
|
| + DROP TABLE x;
|
| + CREATE TEMP TABLE x AS
|
| + SELECT dim1.n, dim2.n, dim3.n, dim4.n
|
| + FROM counts AS dim1, counts AS dim2, counts AS dim3, counts AS dim4
|
| + WHERE dim1.n<5 AND dim2.n<5 AND dim3.n<5 AND dim4.n<5;
|
| +
|
| + SELECT count(*) FROM x;
|
| + }
|
| + } [expr 5*5*5*5]
|
| +}
|
| +
|
| +# Ticket #1229. Sometimes when a "NEW.X" appears in a SELECT without
|
| +# a FROM clause deep within a trigger, the code generator is unable to
|
| +# trace the NEW.X back to an original table and thus figure out its
|
| +# declared datatype.
|
| +#
|
| +# The SQL code below was causing a segfault.
|
| +#
|
| +ifcapable subquery&&trigger {
|
| + do_test misc2-10.1 {
|
| + execsql {
|
| + CREATE TABLE t1229(x);
|
| + CREATE TRIGGER r1229 BEFORE INSERT ON t1229 BEGIN
|
| + INSERT INTO t1229 SELECT y FROM (SELECT new.x y);
|
| + END;
|
| + INSERT INTO t1229 VALUES(1);
|
| + }
|
| + } {}
|
| +}
|
| +
|
| +finish_test
|
|
|