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