Index: third_party/sqlite/sqlite-src-3080704/test/triggerB.test |
diff --git a/third_party/sqlite/sqlite-src-3080704/test/triggerB.test b/third_party/sqlite/sqlite-src-3080704/test/triggerB.test |
deleted file mode 100644 |
index ac4f37bcf4cadab496cadb73f97af825d08e222f..0000000000000000000000000000000000000000 |
--- a/third_party/sqlite/sqlite-src-3080704/test/triggerB.test |
+++ /dev/null |
@@ -1,153 +0,0 @@ |
-# 2008 April 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. Specifically, |
-# it tests updating tables with constraints within a trigger. Ticket #3055. |
-# |
- |
-set testdir [file dirname $argv0] |
-source $testdir/tester.tcl |
-ifcapable {!trigger} { |
- finish_test |
- return |
-} |
- |
-# Create test tables with constraints. |
-# |
-do_test triggerB-1.1 { |
- execsql { |
- CREATE TABLE x(x INTEGER PRIMARY KEY, y INT NOT NULL); |
- INSERT INTO x(y) VALUES(1); |
- INSERT INTO x(y) VALUES(1); |
- CREATE TEMP VIEW vx AS SELECT x, y, 0 AS yy FROM x; |
- CREATE TEMP TRIGGER tx INSTEAD OF UPDATE OF y ON vx |
- BEGIN |
- UPDATE x SET y = new.y WHERE x = new.x; |
- END; |
- SELECT * FROM vx; |
- } |
-} {1 1 0 2 1 0} |
-do_test triggerB-1.2 { |
- execsql { |
- UPDATE vx SET y = yy; |
- SELECT * FROM vx; |
- } |
-} {1 0 0 2 0 0} |
- |
-# Added 2008-08-22: |
-# |
-# Name resolution within triggers. |
-# |
-do_test triggerB-2.1 { |
- catchsql { |
- CREATE TRIGGER ty AFTER INSERT ON x BEGIN |
- SELECT wen.x; -- Unrecognized name |
- END; |
- INSERT INTO x VALUES(1,2); |
- } |
-} {1 {no such column: wen.x}} |
-do_test triggerB-2.2 { |
- catchsql { |
- CREATE TRIGGER tz AFTER UPDATE ON x BEGIN |
- SELECT dlo.x; -- Unrecognized name |
- END; |
- UPDATE x SET y=y+1; |
- } |
-} {1 {no such column: dlo.x}} |
- |
-do_test triggerB-2.3 { |
- execsql { |
- CREATE TABLE t2(a INTEGER PRIMARY KEY, b); |
- INSERT INTO t2 VALUES(1,2); |
- CREATE TABLE changes(x,y); |
- CREATE TRIGGER r1t2 AFTER UPDATE ON t2 BEGIN |
- INSERT INTO changes VALUES(new.a, new.b); |
- END; |
- } |
- execsql { |
- UPDATE t2 SET a=a+10; |
- SELECT * FROM changes; |
- } |
-} {11 2} |
-do_test triggerB-2.4 { |
- execsql { |
- CREATE TRIGGER r2t2 AFTER DELETE ON t2 BEGIN |
- INSERT INTO changes VALUES(old.a, old.c); |
- END; |
- } |
- catchsql { |
- DELETE FROM t2; |
- } |
-} {1 {no such column: old.c}} |
- |
-# Triggers maintain a mask of columns from the invoking table that are |
-# used in the trigger body as NEW.column or OLD.column. That mask is then |
-# used to reduce the amount of information that needs to be loaded into |
-# the NEW and OLD pseudo-tables at run-time. |
-# |
-# These tests cases check the logic for when there are many columns - more |
-# than will fit in a bitmask. |
-# |
-do_test triggerB-3.1 { |
- execsql { |
- CREATE TABLE t3( |
- c0, c1, c2, c3, c4, c5, c6, c7, c8, c9, |
- c10, c11, c12, c13, c14, c15, c16, c17, c18, c19, |
- c20, c21, c22, c23, c24, c25, c26, c27, c28, c29, |
- c30, c31, c32, c33, c34, c35, c36, c37, c38, c39, |
- c40, c41, c42, c43, c44, c45, c46, c47, c48, c49, |
- c50, c51, c52, c53, c54, c55, c56, c57, c58, c59, |
- c60, c61, c62, c63, c64, c65 |
- ); |
- CREATE TABLE t3_changes(colnum, oldval, newval); |
- INSERT INTO t3 VALUES( |
- 'a0', 'a1', 'a2', 'a3', 'a4', 'a5', 'a6', 'a7', 'a8', 'a9', |
- 'a10','a11','a12','a13','a14','a15','a16','a17','a18','a19', |
- 'a20','a21','a22','a23','a24','a25','a26','a27','a28','a29', |
- 'a30','a31','a32','a33','a34','a35','a36','a37','a38','a39', |
- 'a40','a41','a42','a43','a44','a45','a46','a47','a48','a49', |
- 'a50','a51','a52','a53','a54','a55','a56','a57','a58','a59', |
- 'a60','a61','a62','a63','a64','a65' |
- ); |
- } |
- for {set i 0} {$i<=65} {incr i} { |
- set sql [subst { |
- CREATE TRIGGER t3c$i AFTER UPDATE ON t3 |
- WHEN old.c$i!=new.c$i BEGIN |
- INSERT INTO t3_changes VALUES($i, old.c$i, new.c$i); |
- END |
- }] |
- db eval $sql |
- } |
- execsql { |
- SELECT * FROM t3_changes |
- } |
-} {} |
-for {set i 0} {$i<=64} {incr i} { |
- do_test triggerB-3.2.$i.1 [subst { |
- execsql { |
- UPDATE t3 SET c$i='b$i'; |
- SELECT * FROM t3_changes ORDER BY rowid DESC LIMIT 1; |
- } |
- }] [subst {$i a$i b$i}] |
- do_test triggerB-3.2.$i.2 [subst { |
- execsql { |
- SELECT count(*) FROM t3_changes |
- } |
- }] [expr {$i+1}] |
- do_test triggerB-3.2.$i.2 [subst { |
- execsql { |
- SELECT * FROM t3_changes WHERE colnum=$i |
- } |
- }] [subst {$i a$i b$i}] |
-} |
- |
- |
-finish_test |