Merge the latest trunk changes, especially the ORDER BY optimizer enhancements
but also other fixes, onto the sessions branch. FossilOrigin-Name: f1fbb8c5bfa84e84e0b8e2872d83b06a0c0d5acc
This commit is contained in:
@@ -16,6 +16,7 @@
|
||||
#
|
||||
|
||||
if {[file exists skip-big-file]} return
|
||||
if {$tcl_platform(os)=="Darwin"} return
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
|
||||
@@ -14,6 +14,7 @@
|
||||
#
|
||||
|
||||
if {[file exists skip-big-file]} return
|
||||
if {$tcl_platform(os)=="Darwin"} return
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
|
||||
@@ -1864,5 +1864,3 @@ do_execsql_test 10.3 {
|
||||
} {1 21 41 61 81}
|
||||
|
||||
finish_test
|
||||
|
||||
|
||||
|
||||
+26
-14
@@ -114,7 +114,7 @@ do_test 1.4c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title DESC, tn
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mixed DESC/ASC
|
||||
} {~/ORDER BY/} ;# optimized out
|
||||
|
||||
|
||||
do_test 1.5a {
|
||||
@@ -132,7 +132,7 @@ do_test 1.5c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title, tn DESC
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mixed DESC/ASC
|
||||
} {~/ORDER BY/} ;# optimized out
|
||||
|
||||
do_test 1.6a {
|
||||
db eval {
|
||||
@@ -170,14 +170,14 @@ do_test 2.0 {
|
||||
name TEXT,
|
||||
UNIQUE(aid, tn)
|
||||
);
|
||||
INSERT INTO album VALUES(1, '1-one'), (2, '2-two'), (3, '3-three');
|
||||
INSERT INTO album VALUES(1, '1-one'), (20, '2-two'), (3, '3-three');
|
||||
INSERT INTO track VALUES
|
||||
(1, 1, 'one-a'),
|
||||
(2, 2, 'two-b'),
|
||||
(3, 3, 'three-c'),
|
||||
(1, 3, 'one-c'),
|
||||
(2, 1, 'two-a'),
|
||||
(3, 1, 'three-a');
|
||||
(1, 1, 'one-a'),
|
||||
(20, 2, 'two-b'),
|
||||
(3, 3, 'three-c'),
|
||||
(1, 3, 'one-c'),
|
||||
(20, 1, 'two-a'),
|
||||
(3, 1, 'three-a');
|
||||
COMMIT;
|
||||
}
|
||||
} {}
|
||||
@@ -196,6 +196,18 @@ do_test 2.1b {
|
||||
}
|
||||
} {~/ORDER BY/} ;# ORDER BY optimized out
|
||||
|
||||
do_test 2.1c {
|
||||
db eval {
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title, aid, tn
|
||||
}
|
||||
} {one-a one-c two-a two-b three-a three-c}
|
||||
do_test 2.1d {
|
||||
db eval {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title, aid, tn
|
||||
}
|
||||
} {~/ORDER BY/} ;# ORDER BY optimized out
|
||||
|
||||
# The same query with ORDER BY clause optimization disabled via + operators
|
||||
# should give exactly the same answer.
|
||||
#
|
||||
@@ -249,7 +261,7 @@ do_test 2.4c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title DESC, tn
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mixed DESC/ASC
|
||||
} {~/ORDER BY/} ;# optimized out
|
||||
|
||||
|
||||
do_test 2.5a {
|
||||
@@ -267,7 +279,7 @@ do_test 2.5c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title, tn DESC
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mixed ASC/DESC
|
||||
} {~/ORDER BY/} ;# optimized out
|
||||
|
||||
do_test 2.6a {
|
||||
db eval {
|
||||
@@ -284,7 +296,7 @@ do_test 2.6c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title DESC, tn DESC
|
||||
}
|
||||
} {~/ORDER BY/} ;# ORDER BY optimized-out
|
||||
} {~/ORDER BY/} ;# ORDER BY optimized out
|
||||
|
||||
|
||||
# Generate another test dataset, but this time using mixed ASC/DESC indices.
|
||||
@@ -384,7 +396,7 @@ do_test 3.4c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title, tn
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mismatched DESC/ASC
|
||||
} {~/ORDER BY/} ;# optimized out
|
||||
|
||||
|
||||
do_test 3.5a {
|
||||
@@ -402,7 +414,7 @@ do_test 3.5c {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT name FROM album JOIN track USING (aid) ORDER BY title DESC, tn DESC
|
||||
}
|
||||
} {/ORDER BY/} ;# separate sorting pass due to mismatched ASC/DESC
|
||||
} {~/ORDER BY/} ;# optimzed out
|
||||
|
||||
|
||||
do_test 3.6a {
|
||||
|
||||
@@ -0,0 +1,117 @@
|
||||
# 2012 Sept 27
|
||||
#
|
||||
# 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 file is testing that the optimizations that disable
|
||||
# ORDER BY clauses when the natural order of a query is correct.
|
||||
#
|
||||
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
set ::testprefix orderby2
|
||||
|
||||
# Generate test data for a join. Verify that the join gets the
|
||||
# correct answer.
|
||||
#
|
||||
do_test 1.0 {
|
||||
db eval {
|
||||
CREATE TABLE t1(a INTEGER PRIMARY KEY, b);
|
||||
INSERT INTO t1 VALUES(1,11), (2,22);
|
||||
CREATE TABLE t2(d, e, UNIQUE(d,e));
|
||||
INSERT INTO t2 VALUES(10, 'ten'), (11,'eleven'), (12,'twelve'),
|
||||
(11, 'oneteen');
|
||||
}
|
||||
} {}
|
||||
|
||||
do_test 1.1a {
|
||||
db eval {
|
||||
SELECT e FROM t1, t2 WHERE a=1 AND d=b ORDER BY d, e;
|
||||
}
|
||||
} {eleven oneteen}
|
||||
do_test 1.1b {
|
||||
db eval {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT e FROM t1, t2 WHERE a=1 AND d=b ORDER BY d, e;
|
||||
}
|
||||
} {~/ORDER BY/}
|
||||
|
||||
do_test 1.2a {
|
||||
db eval {
|
||||
SELECT e FROM t1, t2 WHERE a=1 AND d=b ORDER BY e;
|
||||
}
|
||||
} {eleven oneteen}
|
||||
do_test 1.2b {
|
||||
db eval {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT e FROM t1, t2 WHERE a=1 AND d=b ORDER BY e;
|
||||
}
|
||||
} {~/ORDER BY/}
|
||||
|
||||
do_test 1.3a {
|
||||
db eval {
|
||||
SELECT e, b FROM t1, t2 WHERE a=1 ORDER BY d, e;
|
||||
}
|
||||
} {ten 11 eleven 11 oneteen 11 twelve 11}
|
||||
do_test 1.3b {
|
||||
db eval {
|
||||
EXPLAIN QUERY PLAN
|
||||
SELECT e, b FROM t1, t2 WHERE a=1 ORDER BY d, e;
|
||||
}
|
||||
} {~/ORDER BY/}
|
||||
|
||||
# The following tests derived from TH3 test module cov1/where34.test
|
||||
#
|
||||
do_test 2.0 {
|
||||
db eval {
|
||||
CREATE TABLE t31(a,b); CREATE INDEX t31ab ON t31(a,b);
|
||||
CREATE TABLE t32(c,d); CREATE INDEX t32cd ON t32(c,d);
|
||||
CREATE TABLE t33(e,f); CREATE INDEX t33ef ON t33(e,f);
|
||||
CREATE TABLE t34(g,h); CREATE INDEX t34gh ON t34(g,h);
|
||||
|
||||
INSERT INTO t31 VALUES(1,4), (2,3), (1,3);
|
||||
INSERT INTO t32 VALUES(4,5), (3,6), (3,7), (4,8);
|
||||
INSERT INTO t33 VALUES(5,9), (7,10), (6,11), (8,12), (8,13), (7,14);
|
||||
INSERT INTO t34 VALUES(11,20), (10,21), (12,22), (9,23), (13,24),
|
||||
(14,25), (12,26);
|
||||
SELECT a||','||c||','||e||','||g FROM t31, t32, t33, t34
|
||||
WHERE c=b AND e=d AND g=f
|
||||
ORDER BY a ASC, c ASC, e DESC, g ASC;
|
||||
}
|
||||
} {1,3,7,10 1,3,7,14 1,3,6,11 1,4,8,12 1,4,8,12 1,4,8,13 1,4,5,9 2,3,7,10 2,3,7,14 2,3,6,11}
|
||||
do_test 2.1 {
|
||||
db eval {
|
||||
SELECT a||','||c||','||e||','||g FROM t31, t32, t33, t34
|
||||
WHERE c=b AND e=d AND g=f
|
||||
ORDER BY +a ASC, +c ASC, +e DESC, +g ASC;
|
||||
}
|
||||
} {1,3,7,10 1,3,7,14 1,3,6,11 1,4,8,12 1,4,8,12 1,4,8,13 1,4,5,9 2,3,7,10 2,3,7,14 2,3,6,11}
|
||||
do_test 2.2 {
|
||||
db eval {
|
||||
SELECT a||','||c||','||e||','||g FROM t31, t32, t33, t34
|
||||
WHERE c=b AND e=d AND g=f
|
||||
ORDER BY a ASC, c ASC, e ASC, g ASC;
|
||||
}
|
||||
} {1,3,6,11 1,3,7,10 1,3,7,14 1,4,5,9 1,4,8,12 1,4,8,12 1,4,8,13 2,3,6,11 2,3,7,10 2,3,7,14}
|
||||
do_test 2.3 {
|
||||
optimization_control db cover-idx-scan off
|
||||
db cache flush
|
||||
db eval {
|
||||
SELECT a||','||c||','||e||','||g FROM t31, t32, t33, t34
|
||||
WHERE c=b AND e=d AND g=f
|
||||
ORDER BY a ASC, c ASC, e ASC, g ASC;
|
||||
}
|
||||
} {1,3,6,11 1,3,7,10 1,3,7,14 1,4,5,9 1,4,8,12 1,4,8,12 1,4,8,13 2,3,6,11 2,3,7,10 2,3,7,14}
|
||||
optimization_control db all on
|
||||
db cache flush
|
||||
|
||||
|
||||
|
||||
finish_test
|
||||
@@ -0,0 +1,207 @@
|
||||
# 2012 October 5
|
||||
#
|
||||
# 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.
|
||||
#
|
||||
#***********************************************************************
|
||||
#
|
||||
# The tests in this file are intended to show if two connections attach
|
||||
# to the same shared cache using different database names, views and
|
||||
# virtual tables may still be accessed.
|
||||
#
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
source $testdir/lock_common.tcl
|
||||
set testprefix shared9
|
||||
|
||||
ifcapable !view||!trigger {
|
||||
finish_test
|
||||
return
|
||||
}
|
||||
|
||||
db close
|
||||
set enable_shared_cache [sqlite3_enable_shared_cache 1]
|
||||
|
||||
sqlite3 db1 test.db
|
||||
sqlite3 db2 test.db
|
||||
forcedelete test.db2
|
||||
|
||||
do_test 1.1 {
|
||||
db1 eval {
|
||||
ATTACH 'test.db2' AS 'fred';
|
||||
CREATE TABLE fred.t1(a, b, c);
|
||||
CREATE VIEW fred.v1 AS SELECT * FROM t1;
|
||||
|
||||
CREATE TABLE fred.t2(a, b);
|
||||
CREATE TABLE fred.t3(a, b);
|
||||
CREATE TRIGGER fred.trig AFTER INSERT ON t2 BEGIN
|
||||
DELETE FROM t3;
|
||||
INSERT INTO t3 SELECT * FROM t2;
|
||||
END;
|
||||
INSERT INTO t2 VALUES(1, 2);
|
||||
SELECT * FROM t3;
|
||||
}
|
||||
} {1 2}
|
||||
|
||||
do_test 1.2 { db2 eval "ATTACH 'test.db2' AS 'jones'" } {}
|
||||
do_test 1.3 { db2 eval "SELECT * FROM v1" } {}
|
||||
do_test 1.4 { db2 eval "INSERT INTO t2 VALUES(3, 4)" } {}
|
||||
|
||||
ifcapable fts3 {
|
||||
do_test 1.5 {
|
||||
db1 eval {
|
||||
CREATE VIRTUAL TABLE fred.t4 USING fts4;
|
||||
INSERT INTO t4 VALUES('hello world');
|
||||
}
|
||||
} {}
|
||||
|
||||
do_test 1.6 {
|
||||
db2 eval {
|
||||
INSERT INTO t4 VALUES('shared cache');
|
||||
SELECT * FROM t4 WHERE t4 MATCH 'hello';
|
||||
}
|
||||
} {{hello world}}
|
||||
|
||||
do_test 1.7 {
|
||||
db1 eval {
|
||||
SELECT * FROM t4 WHERE t4 MATCH 'c*';
|
||||
}
|
||||
} {{shared cache}}
|
||||
}
|
||||
|
||||
db1 close
|
||||
db2 close
|
||||
|
||||
#-------------------------------------------------------------------------
|
||||
# The following tests attempt to find a similar problem with collation
|
||||
# sequence names - pointers to database handle specific allocations leaking
|
||||
# into schema objects and being used after the original handle has been
|
||||
# closed.
|
||||
#
|
||||
forcedelete test.db test.db2
|
||||
sqlite3 db1 test.db
|
||||
sqlite3 db2 test.db
|
||||
foreach x {collate1 collate2 collate3} {
|
||||
proc $x {a b} { string compare $a $b }
|
||||
db1 collate $x $x
|
||||
db2 collate $x $x
|
||||
}
|
||||
do_test 2.1 {
|
||||
db1 eval {
|
||||
CREATE TABLE t1(a, b, c COLLATE collate1);
|
||||
CREATE INDEX i1 ON t1(a COLLATE collate2, c, b);
|
||||
}
|
||||
} {}
|
||||
do_test 2.2 {
|
||||
db1 close
|
||||
db2 eval "INSERT INTO t1 VALUES('abc', 'def', 'ghi')"
|
||||
} {}
|
||||
db2 close
|
||||
|
||||
#-------------------------------------------------------------------------
|
||||
# At one point, the following would cause a collation sequence belonging
|
||||
# to connection [db1] to be invoked by a call to [db2 eval]. Which is a
|
||||
# problem if [db1] has already been closed.
|
||||
#
|
||||
forcedelete test.db test.db2
|
||||
sqlite3 db1 test.db
|
||||
sqlite3 db2 test.db
|
||||
|
||||
proc mycollate_db1 {a b} {set ::invoked_mycollate_db1 1 ; string compare $a $b}
|
||||
proc mycollate_db2 {a b} {string compare $a $b}
|
||||
|
||||
db1 collate mycollate mycollate_db1
|
||||
db2 collate mycollate mycollate_db2
|
||||
|
||||
do_test 2.3 {
|
||||
set ::invoked_mycollate_db1 0
|
||||
db1 eval {
|
||||
CREATE TABLE t1(a COLLATE mycollate, CHECK (a IN ('one', 'two', 'three')));
|
||||
INSERT INTO t1 VALUES('one');
|
||||
}
|
||||
db1 close
|
||||
set ::invoked_mycollate_db1
|
||||
} {1}
|
||||
do_test 2.4 {
|
||||
set ::invoked_mycollate_db1 0
|
||||
db2 eval {
|
||||
INSERT INTO t1 VALUES('two');
|
||||
}
|
||||
db2 close
|
||||
set ::invoked_mycollate_db1
|
||||
} {0}
|
||||
|
||||
#-------------------------------------------------------------------------
|
||||
# This test verifies that a bug causing a busy-handler belonging to one
|
||||
# shared-cache connection to be executed as a result of an sqlite3_step()
|
||||
# on another has been fixed.
|
||||
#
|
||||
forcedelete test.db test.db2
|
||||
sqlite3 db1 test.db
|
||||
sqlite3 db2 test.db
|
||||
|
||||
proc busyhandler {handle args} {
|
||||
set ::busyhandler_invoked_for $handle
|
||||
return 1
|
||||
}
|
||||
db1 busy [list busyhandler db1]
|
||||
db2 busy [list busyhandler db2]
|
||||
|
||||
do_test 3.1 {
|
||||
db1 eval {
|
||||
BEGIN;
|
||||
CREATE TABLE t1(a, b);
|
||||
CREATE TABLE t2(a, b);
|
||||
INSERT INTO t1 VALUES(1, 2);
|
||||
INSERT INTO t2 VALUES(1, 2);
|
||||
}
|
||||
# Keep this next COMMIT as a separate statement. This ensures that COMMIT
|
||||
# has already been compiled and loaded into the tcl interface statement
|
||||
# cache when it is attempted below.
|
||||
db1 eval COMMIT
|
||||
db1 eval {
|
||||
BEGIN;
|
||||
INSERT INTO t1 VALUES(3, 4);
|
||||
}
|
||||
} {}
|
||||
|
||||
do_test 3.2 {
|
||||
set ::tf [launch_testfixture]
|
||||
testfixture $::tf {
|
||||
sqlite3 db test.db
|
||||
db eval {
|
||||
BEGIN;
|
||||
SELECT * FROM t1;
|
||||
}
|
||||
}
|
||||
} {1 2}
|
||||
|
||||
do_test 3.3 {
|
||||
db2 eval { SELECT * FROM t2 }
|
||||
} {1 2}
|
||||
|
||||
do_test 3.4 {
|
||||
list [catch { db1 eval COMMIT } msg] $msg
|
||||
} {1 {database is locked}}
|
||||
|
||||
# At one point the following would fail, showing that the busy-handler
|
||||
# belonging to [db2] was invoked instead.
|
||||
do_test 3.5 {
|
||||
set ::busyhandler_invoked_for
|
||||
} {db1}
|
||||
do_test 3.6 {
|
||||
close $::tf
|
||||
db1 eval COMMIT
|
||||
} {}
|
||||
|
||||
db1 close
|
||||
db2 close
|
||||
|
||||
sqlite3_enable_shared_cache $::enable_shared_cache
|
||||
finish_test
|
||||
|
||||
+10
-1
@@ -319,14 +319,23 @@ do_test tcl-8.1 {
|
||||
execsql {INSERT INTO t1 VALUES(30,NULL)}
|
||||
db eval {SELECT * FROM t1 WHERE b IS NULL}
|
||||
} {30 NaN}
|
||||
proc concatFunc args {return [join $args {}]}
|
||||
do_test tcl-8.2 {
|
||||
db function concat concatFunc
|
||||
db eval {SELECT concat('a', b, 'z') FROM t1 WHERE b is NULL}
|
||||
} {aNaNz}
|
||||
do_test tcl-8.3 {
|
||||
db nullvalue NULL
|
||||
db nullvalue
|
||||
} {NULL}
|
||||
do_test tcl-8.3 {
|
||||
do_test tcl-8.4 {
|
||||
db nullvalue {}
|
||||
db eval {SELECT * FROM t1 WHERE b IS NULL}
|
||||
} {30 {}}
|
||||
do_test tcl-8.5 {
|
||||
db function concat concatFunc
|
||||
db eval {SELECT concat('a', b, 'z') FROM t1 WHERE b is NULL}
|
||||
} {az}
|
||||
|
||||
# Test the return type of user-defined functions
|
||||
#
|
||||
|
||||
+28
-28
@@ -11,20 +11,20 @@
|
||||
# with the database COMMIT/ROLLBACK logic.
|
||||
#
|
||||
# 1. CREATE and DROP TRIGGER tests
|
||||
# trig-1.1: Error if table does not exist
|
||||
# trig-1.2: Error if trigger already exists
|
||||
# trig-1.3: Created triggers are deleted if the transaction is rolled back
|
||||
# trig-1.4: DROP TRIGGER removes trigger
|
||||
# trig-1.5: Dropped triggers are restored if the transaction is rolled back
|
||||
# trig-1.6: Error if dropped trigger doesn't exist
|
||||
# trig-1.7: Dropping the table automatically drops all triggers
|
||||
# trig-1.8: A trigger created on a TEMP table is not inserted into sqlite_master
|
||||
# trig-1.9: Ensure that we cannot create a trigger on sqlite_master
|
||||
# trig-1.10:
|
||||
# trig-1.11:
|
||||
# trig-1.12: Ensure that INSTEAD OF triggers cannot be created on tables
|
||||
# trig-1.13: Ensure that AFTER triggers cannot be created on views
|
||||
# trig-1.14: Ensure that BEFORE triggers cannot be created on views
|
||||
# trigger1-1.1: Error if table does not exist
|
||||
# trigger1-1.2: Error if trigger already exists
|
||||
# trigger1-1.3: Created triggers are deleted if the transaction is rolled back
|
||||
# trigger1-1.4: DROP TRIGGER removes trigger
|
||||
# trigger1-1.5: Dropped triggers are restored if the transaction is rolled back
|
||||
# trigger1-1.6: Error if dropped trigger doesn't exist
|
||||
# trigger1-1.7: Dropping the table automatically drops all triggers
|
||||
# trigger1-1.8: A trigger created on a TEMP table is not inserted into sqlite_master
|
||||
# trigger1-1.9: Ensure that we cannot create a trigger on sqlite_master
|
||||
# trigger1-1.10:
|
||||
# trigger1-1.11:
|
||||
# trigger1-1.12: Ensure that INSTEAD OF triggers cannot be created on tables
|
||||
# trigger1-1.13: Ensure that AFTER triggers cannot be created on views
|
||||
# trigger1-1.14: Ensure that BEFORE triggers cannot be created on views
|
||||
#
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
@@ -210,7 +210,7 @@ do_test trigger1-1.12 {
|
||||
delete from t1 WHERE a=old.a+2;
|
||||
end;
|
||||
}
|
||||
} {1 {cannot create INSTEAD OF trigger on table: main.t1}}
|
||||
} {1 {cannot create INSTEAD OF trigger on table: t1}}
|
||||
|
||||
ifcapable view {
|
||||
# Ensure that we cannot create BEFORE triggers on views
|
||||
@@ -221,7 +221,7 @@ do_test trigger1-1.13 {
|
||||
delete from t1 WHERE a=old.a+2;
|
||||
end;
|
||||
}
|
||||
} {1 {cannot create BEFORE trigger on view: main.v1}}
|
||||
} {1 {cannot create BEFORE trigger on view: v1}}
|
||||
# Ensure that we cannot create AFTER triggers on views
|
||||
do_test trigger1-1.14 {
|
||||
catchsql {
|
||||
@@ -231,7 +231,7 @@ do_test trigger1-1.14 {
|
||||
delete from t1 WHERE a=old.a+2;
|
||||
end;
|
||||
}
|
||||
} {1 {cannot create AFTER trigger on view: main.v1}}
|
||||
} {1 {cannot create AFTER trigger on view: v1}}
|
||||
} ;# ifcapable view
|
||||
|
||||
# Check for memory leaks in the trigger parser
|
||||
@@ -265,32 +265,32 @@ ifcapable tempdb {
|
||||
END;
|
||||
}
|
||||
} {0 {}}
|
||||
do_test trigger-3.2 {
|
||||
do_test trigger1-3.2 {
|
||||
catchsql {
|
||||
INSERT INTO t1 VALUES(1,2);
|
||||
SELECT * FROM t2;
|
||||
}
|
||||
} {1 {no such table: main.t2}}
|
||||
do_test trigger-3.3 {
|
||||
do_test trigger1-3.3 {
|
||||
db close
|
||||
set rc [catch {sqlite3 db test.db} err]
|
||||
if {$rc} {lappend rc $err}
|
||||
set rc
|
||||
} {0}
|
||||
do_test trigger-3.4 {
|
||||
do_test trigger1-3.4 {
|
||||
catchsql {
|
||||
INSERT INTO t1 VALUES(1,2);
|
||||
SELECT * FROM t2;
|
||||
}
|
||||
} {1 {no such table: main.t2}}
|
||||
do_test trigger-3.5 {
|
||||
do_test trigger1-3.5 {
|
||||
catchsql {
|
||||
CREATE TEMP TABLE t2(x,y);
|
||||
INSERT INTO t1 VALUES(1,2);
|
||||
SELECT * FROM t2;
|
||||
}
|
||||
} {1 {no such table: main.t2}}
|
||||
do_test trigger-3.6.1 {
|
||||
do_test trigger1-3.6.1 {
|
||||
catchsql {
|
||||
DROP TRIGGER r1;
|
||||
CREATE TEMP TRIGGER r1 AFTER INSERT ON t1 BEGIN
|
||||
@@ -300,7 +300,7 @@ ifcapable tempdb {
|
||||
SELECT * FROM t2;
|
||||
}
|
||||
} {0 {1 2 200 100}}
|
||||
do_test trigger-3.6.2 {
|
||||
do_test trigger1-3.6.2 {
|
||||
catchsql {
|
||||
DROP TRIGGER r1;
|
||||
DELETE FROM t1;
|
||||
@@ -312,7 +312,7 @@ ifcapable tempdb {
|
||||
SELECT * FROM t2;
|
||||
}
|
||||
} {0 {1 2}}
|
||||
do_test trigger-3.7 {
|
||||
do_test trigger1-3.7 {
|
||||
execsql {
|
||||
DROP TABLE t2;
|
||||
CREATE TABLE t2(x,y);
|
||||
@@ -320,7 +320,7 @@ ifcapable tempdb {
|
||||
}
|
||||
} {}
|
||||
|
||||
# There are two versions of trigger-3.8 and trigger-3.9. One that uses
|
||||
# There are two versions of trigger1-3.8 and trigger1-3.9. One that uses
|
||||
# compound SELECT statements, and another that does not.
|
||||
ifcapable compound {
|
||||
do_test trigger1-3.8 {
|
||||
@@ -446,7 +446,7 @@ do_test trigger1-6.8 {
|
||||
execsql {SELECT * FROM t2}
|
||||
} {3 4 7 8}
|
||||
|
||||
integrity_check trigger-7.1
|
||||
integrity_check trigger1-7.1
|
||||
|
||||
# Check to make sure the name of a trigger can be quoted so that keywords
|
||||
# can be used as trigger names. Ticket #468
|
||||
@@ -491,7 +491,7 @@ do_test trigger1-8.6 {
|
||||
ifcapable conflict {
|
||||
# Make sure REPLACE works inside of triggers.
|
||||
#
|
||||
# There are two versions of trigger-9.1 and trigger-9.2. One that uses
|
||||
# There are two versions of trigger1-9.1 and trigger1-9.2. One that uses
|
||||
# compound SELECT statements, and another that does not.
|
||||
ifcapable compound {
|
||||
do_test trigger1-9.1 {
|
||||
@@ -612,7 +612,7 @@ ifcapable tempdb&&attach {
|
||||
SELECT * FROM insert_log;
|
||||
}
|
||||
} {main 11 12 13 temp 14 15 16 aux 17 18 19}
|
||||
do_test trigger1-10.8 {
|
||||
do_test trigger1-10.9 {
|
||||
# Drop and re-create the insert_log table in a different database. Note
|
||||
# that we can change the column names because the trigger programs don't
|
||||
# use them explicitly.
|
||||
|
||||
+2
-2
@@ -1088,12 +1088,12 @@ do_test where-14.1 {
|
||||
cksort {
|
||||
SELECT x.a || '/' || y.a FROM t8 x, t8 y ORDER BY x.a, y.b
|
||||
}
|
||||
} {1/4 1/1 4/4 4/1 sort}
|
||||
} {1/4 1/1 4/4 4/1 nosort}
|
||||
do_test where-14.2 {
|
||||
cksort {
|
||||
SELECT x.a || '/' || y.a FROM t8 x, t8 y ORDER BY x.a, y.b DESC
|
||||
}
|
||||
} {1/1 1/4 4/1 4/4 sort}
|
||||
} {1/1 1/4 4/1 4/4 nosort}
|
||||
do_test where-14.3 {
|
||||
cksort {
|
||||
SELECT x.a || '/' || y.a FROM t8 x, t8 y ORDER BY x.a, x.b
|
||||
|
||||
Reference in New Issue
Block a user