diff options
| author | bernard <[email protected]> | 2017-11-02 13:50:42 +0800 |
|---|---|---|
| committer | bernard <[email protected]> | 2017-11-02 13:50:42 +0800 |
| commit | b2057f506a09e2adef81fc77efd697d16ae14bec (patch) | |
| tree | 3affefabfe376a0ec1b3ac4a5eef957c1dd58dc8 /components/external/SQLite-3.8.1/test/trigger2.test | |
| parent | 23582c8129228b4961ad35319cfd2d270039345f (diff) | |
[External] Remove external from RT-Thread
Diffstat (limited to 'components/external/SQLite-3.8.1/test/trigger2.test')
| -rw-r--r-- | components/external/SQLite-3.8.1/test/trigger2.test | 759 |
1 files changed, 0 insertions, 759 deletions
diff --git a/components/external/SQLite-3.8.1/test/trigger2.test b/components/external/SQLite-3.8.1/test/trigger2.test deleted file mode 100644 index b4b922a5ee..0000000000 --- a/components/external/SQLite-3.8.1/test/trigger2.test +++ /dev/null @@ -1,759 +0,0 @@ -# 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. -# -#*********************************************************************** -# -# Regression testing of FOR EACH ROW table triggers -# -# 1. Trigger execution order tests. -# These tests ensure that BEFORE and AFTER triggers are fired at the correct -# times relative to each other and the triggering statement. -# -# trigger2-1.1.*: ON UPDATE trigger execution model. -# trigger2-1.2.*: DELETE trigger execution model. -# trigger2-1.3.*: INSERT trigger execution model. -# -# 2. Trigger program execution tests. -# These tests ensure that trigger programs execute correctly (ie. that a -# trigger program can correctly execute INSERT, UPDATE, DELETE * SELECT -# statements, and combinations thereof). -# -# 3. Selective trigger execution -# This tests that conditional triggers (ie. UPDATE OF triggers and triggers -# with WHEN clauses) are fired only fired when they are supposed to be. -# -# trigger2-3.1: UPDATE OF triggers -# trigger2-3.2: WHEN clause -# -# 4. Cascaded trigger execution -# Tests that trigger-programs may cause other triggers to fire. Also that a -# trigger-program is never executed recursively. -# -# trigger2-4.1: Trivial cascading trigger -# trigger2-4.2: Trivial recursive trigger handling -# -# 5. Count changes behaviour. -# Verify that rows altered by triggers are not included in the return value -# of the "count changes" interface. -# -# 6. ON CONFLICT clause handling -# trigger2-6.1[a-f]: INSERT statements -# trigger2-6.2[a-f]: UPDATE statements -# -# 7. & 8. Triggers on views fire correctly. -# - -set testdir [file dirname $argv0] -source $testdir/tester.tcl -ifcapable {!trigger} { - finish_test - return -} - -# 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 } - -# 1. -ifcapable subquery { - set ii 0 - set tbl_definitions [list \ - {CREATE TABLE tbl (a, b);} \ - {CREATE TABLE tbl (a INTEGER PRIMARY KEY, b);} \ - {CREATE TABLE tbl (a, b PRIMARY KEY);} \ - {CREATE TABLE tbl (a, b); CREATE INDEX tbl_idx ON tbl(b);} \ - ] - ifcapable tempdb { - lappend tbl_definitions \ - {CREATE TEMP TABLE tbl (a, b); CREATE INDEX tbl_idx ON tbl(b);} - lappend tbl_definitions {CREATE TEMP TABLE tbl (a, b);} - lappend tbl_definitions \ - {CREATE TEMPORARY TABLE tbl (a INTEGER PRIMARY KEY, b);} - } - foreach tbl_defn $tbl_definitions { - incr ii - catchsql { DROP INDEX tbl_idx; } - catchsql { - DROP TABLE rlog; - DROP TABLE clog; - DROP TABLE tbl; - DROP TABLE other_tbl; - } - - execsql $tbl_defn - - execsql { - INSERT INTO tbl VALUES(1, 2); - INSERT INTO tbl VALUES(3, 4); - - CREATE TABLE rlog (idx, old_a, old_b, db_sum_a, db_sum_b, new_a, new_b); - CREATE TABLE clog (idx, old_a, old_b, db_sum_a, db_sum_b, new_a, new_b); - - CREATE TRIGGER before_update_row BEFORE UPDATE ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - old.a, old.b, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - new.a, new.b); - END; - - CREATE TRIGGER after_update_row AFTER UPDATE ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - old.a, old.b, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - new.a, new.b); - END; - - CREATE TRIGGER conditional_update_row AFTER UPDATE ON tbl FOR EACH ROW - WHEN old.a = 1 - BEGIN - INSERT INTO clog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM clog), - old.a, old.b, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - new.a, new.b); - END; - } - - do_test trigger2-1.$ii.1 { - set r {} - foreach v [execsql { - UPDATE tbl SET a = a * 10, b = b * 10; - SELECT * FROM rlog ORDER BY idx; - SELECT * FROM clog ORDER BY idx; - }] { - lappend r [expr {int($v)}] - } - set r - } [list 1 1 2 4 6 10 20 \ - 2 1 2 13 24 10 20 \ - 3 3 4 13 24 30 40 \ - 4 3 4 40 60 30 40 \ - 1 1 2 13 24 10 20 ] - - execsql { - DELETE FROM rlog; - DELETE FROM tbl; - INSERT INTO tbl VALUES (100, 100); - INSERT INTO tbl VALUES (300, 200); - CREATE TRIGGER delete_before_row BEFORE DELETE ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - old.a, old.b, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - 0, 0); - END; - - CREATE TRIGGER delete_after_row AFTER DELETE ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - old.a, old.b, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - 0, 0); - END; - } - do_test trigger2-1.$ii.2 { - set r {} - foreach v [execsql { - DELETE FROM tbl; - SELECT * FROM rlog; - }] { - lappend r [expr {int($v)}] - } - set r - } [list 1 100 100 400 300 0 0 \ - 2 100 100 300 200 0 0 \ - 3 300 200 300 200 0 0 \ - 4 300 200 0 0 0 0 ] - - execsql { - DELETE FROM rlog; - CREATE TRIGGER insert_before_row BEFORE INSERT ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - 0, 0, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - new.a, new.b); - END; - - CREATE TRIGGER insert_after_row AFTER INSERT ON tbl FOR EACH ROW - BEGIN - INSERT INTO rlog VALUES ( (SELECT coalesce(max(idx),0) + 1 FROM rlog), - 0, 0, - (SELECT coalesce(sum(a),0) FROM tbl), - (SELECT coalesce(sum(b),0) FROM tbl), - new.a, new.b); - END; - } - do_test trigger2-1.$ii.3 { - execsql { - - CREATE TABLE other_tbl(a, b); - INSERT INTO other_tbl VALUES(1, 2); - INSERT INTO other_tbl VALUES(3, 4); - -- INSERT INTO tbl SELECT * FROM other_tbl; - INSERT INTO tbl VALUES(5, 6); - DROP TABLE other_tbl; - - SELECT * FROM rlog; - } - } [list 1 0 0 0 0 5 6 \ - 2 0 0 5 6 5 6 ] - - integrity_check trigger2-1.$ii.4 - } - catchsql { - DROP TABLE rlog; - DROP TABLE clog; - DROP TABLE tbl; - DROP TABLE other_tbl; - } -} - -# 2. -set ii 0 -foreach tr_program { - {UPDATE tbl SET b = old.b;} - {INSERT INTO log VALUES(new.c, 2, 3);} - {DELETE FROM log WHERE a = 1;} - {INSERT INTO tbl VALUES(500, new.b * 10, 700); - UPDATE tbl SET c = old.c; - DELETE FROM log;} - {INSERT INTO log select * from tbl;} -} { - foreach test_varset [ list \ - { - set statement {UPDATE tbl SET c = 10 WHERE a = 1;} - set prep {INSERT INTO tbl VALUES(1, 2, 3);} - set newC 10 - set newB 2 - set newA 1 - set oldA 1 - set oldB 2 - set oldC 3 - } \ - { - set statement {DELETE FROM tbl WHERE a = 1;} - set prep {INSERT INTO tbl VALUES(1, 2, 3);} - set oldA 1 - set oldB 2 - set oldC 3 - } \ - { - set statement {INSERT INTO tbl VALUES(1, 2, 3);} - set newA 1 - set newB 2 - set newC 3 - } - ] \ - { - set statement {} - set prep {} - set newA {''} - set newB {''} - set newC {''} - set oldA {''} - set oldB {''} - set oldC {''} - - incr ii - - eval $test_varset - - set statement_type [string range $statement 0 5] - set tr_program_fixed $tr_program - if {$statement_type == "DELETE"} { - regsub -all new\.a $tr_program_fixed {''} tr_program_fixed - regsub -all new\.b $tr_program_fixed {''} tr_program_fixed - regsub -all new\.c $tr_program_fixed {''} tr_program_fixed - } - if {$statement_type == "INSERT"} { - regsub -all old\.a $tr_program_fixed {''} tr_program_fixed - regsub -all old\.b $tr_program_fixed {''} tr_program_fixed - regsub -all old\.c $tr_program_fixed {''} tr_program_fixed - } - - - set tr_program_cooked $tr_program - regsub -all new\.a $tr_program_cooked $newA tr_program_cooked - regsub -all new\.b $tr_program_cooked $newB tr_program_cooked - regsub -all new\.c $tr_program_cooked $newC tr_program_cooked - regsub -all old\.a $tr_program_cooked $oldA tr_program_cooked - regsub -all old\.b $tr_program_cooked $oldB tr_program_cooked - regsub -all old\.c $tr_program_cooked $oldC tr_program_cooked - - catchsql { - DROP TABLE tbl; - DROP TABLE log; - } - - execsql { - CREATE TABLE tbl(a PRIMARY KEY, b, c); - CREATE TABLE log(a, b, c); - } - - set query {SELECT * FROM tbl; SELECT * FROM log;} - set prep "$prep; INSERT INTO log VALUES(1, 2, 3);\ - INSERT INTO log VALUES(10, 20, 30);" - -# Check execution of BEFORE programs: - - set before_data [ execsql "$prep $tr_program_cooked $statement $query" ] - - execsql "DELETE FROM tbl; DELETE FROM log; $prep"; - execsql "CREATE TRIGGER the_trigger BEFORE [string range $statement 0 6]\ - ON tbl BEGIN $tr_program_fixed END;" - - do_test trigger2-2.$ii-before "execsql {$statement $query}" $before_data - - execsql "DROP TRIGGER the_trigger;" - execsql "DELETE FROM tbl; DELETE FROM log;" - -# Check execution of AFTER programs - set after_data [ execsql "$prep $statement $tr_program_cooked $query" ] - - execsql "DELETE FROM tbl; DELETE FROM log; $prep"; - execsql "CREATE TRIGGER the_trigger AFTER [string range $statement 0 6]\ - ON tbl BEGIN $tr_program_fixed END;" - - do_test trigger2-2.$ii-after "execsql {$statement $query}" $after_data - execsql "DROP TRIGGER the_trigger;" - - integrity_check trigger2-2.$ii-integrity - } -} -catchsql { - DROP TABLE tbl; - DROP TABLE log; -} - -# 3. - -# trigger2-3.1: UPDATE OF triggers -execsql { - CREATE TABLE tbl (a, b, c, d); - CREATE TABLE log (a); - INSERT INTO log VALUES (0); - INSERT INTO tbl VALUES (0, 0, 0, 0); - INSERT INTO tbl VALUES (1, 0, 0, 0); - CREATE TRIGGER tbl_after_update_cd BEFORE UPDATE OF c, d ON tbl - BEGIN - UPDATE log SET a = a + 1; - END; -} -do_test trigger2-3.1 { - execsql { - UPDATE tbl SET b = 1, c = 10; -- 2 - UPDATE tbl SET b = 10; -- 0 - UPDATE tbl SET d = 4 WHERE a = 0; --1 - UPDATE tbl SET a = 4, b = 10; --0 - SELECT * FROM log; - } -} {3} -execsql { - DROP TABLE tbl; - DROP TABLE log; -} - -# trigger2-3.2: WHEN clause -set when_triggers [list {t1 BEFORE INSERT ON tbl WHEN new.a > 20}] -ifcapable subquery { - lappend when_triggers \ - {t2 BEFORE INSERT ON tbl WHEN (SELECT count(*) FROM tbl) = 0} -} - -execsql { - CREATE TABLE tbl (a, b, c, d); - CREATE TABLE log (a); - INSERT INTO log VALUES (0); -} - -foreach trig $when_triggers { - execsql "CREATE TRIGGER $trig BEGIN UPDATE log set a = a + 1; END;" -} - -ifcapable subquery { - set t232 {1 0 1} -} else { - set t232 {0 0 1} -} -do_test trigger2-3.2 { - execsql { - - INSERT INTO tbl VALUES(0, 0, 0, 0); -- 1 (ifcapable subquery) - SELECT * FROM log; - UPDATE log SET a = 0; - - INSERT INTO tbl VALUES(0, 0, 0, 0); -- 0 - SELECT * FROM log; - UPDATE log SET a = 0; - - INSERT INTO tbl VALUES(200, 0, 0, 0); -- 1 - SELECT * FROM log; - UPDATE log SET a = 0; - } -} $t232 -execsql { - DROP TABLE tbl; - DROP TABLE log; -} -integrity_check trigger2-3.3 - -# Simple cascaded trigger -execsql { - CREATE TABLE tblA(a, b); - CREATE TABLE tblB(a, b); - CREATE TABLE tblC(a, b); - - CREATE TRIGGER tr1 BEFORE INSERT ON tblA BEGIN - INSERT INTO tblB values(new.a, new.b); - END; - - CREATE TRIGGER tr2 BEFORE INSERT ON tblB BEGIN - INSERT INTO tblC values(new.a, new.b); - END; -} -do_test trigger2-4.1 { - execsql { - INSERT INTO tblA values(1, 2); - SELECT * FROM tblA; - SELECT * FROM tblB; - SELECT * FROM tblC; - } -} {1 2 1 2 1 2} -execsql { - DROP TABLE tblA; - DROP TABLE tblB; - DROP TABLE tblC; -} - -# Simple recursive trigger -execsql { - CREATE TABLE tbl(a, b, c); - CREATE TRIGGER tbl_trig BEFORE INSERT ON tbl - BEGIN - INSERT INTO tbl VALUES (new.a, new.b, new.c); - END; -} -do_test trigger2-4.2 { - execsql { - INSERT INTO tbl VALUES (1, 2, 3); - select * from tbl; - } -} {1 2 3 1 2 3} -execsql { - DROP TABLE tbl; -} - -# 5. -execsql { - CREATE TABLE tbl(a, b, c); - CREATE TRIGGER tbl_trig BEFORE INSERT ON tbl - BEGIN - INSERT INTO tbl VALUES (1, 2, 3); - INSERT INTO tbl VALUES (2, 2, 3); - UPDATE tbl set b = 10 WHERE a = 1; - DELETE FROM tbl WHERE a = 1; - DELETE FROM tbl; - END; -} -do_test trigger2-5 { - execsql { - INSERT INTO tbl VALUES(100, 200, 300); - } - db changes -} {1} -execsql { - DROP TABLE tbl; -} - -ifcapable conflict { - # Handling of ON CONFLICT by INSERT statements inside triggers - execsql { - CREATE TABLE tbl (a primary key, b, c); - CREATE TRIGGER ai_tbl AFTER INSERT ON tbl BEGIN - INSERT OR IGNORE INTO tbl values (new.a, 0, 0); - END; - } - do_test trigger2-6.1a { - execsql { - BEGIN; - INSERT INTO tbl values (1, 2, 3); - SELECT * from tbl; - } - } {1 2 3} - do_test trigger2-6.1b { - catchsql { - INSERT OR ABORT INTO tbl values (2, 2, 3); - } - } {1 {column a is not unique}} - do_test trigger2-6.1c { - execsql { - SELECT * from tbl; - } - } {1 2 3} - do_test trigger2-6.1d { - catchsql { - INSERT OR FAIL INTO tbl values (2, 2, 3); - } - } {1 {column a is not unique}} - do_test trigger2-6.1e { - execsql { - SELECT * from tbl; - } - } {1 2 3 2 2 3} - do_test trigger2-6.1f { - execsql { - INSERT OR REPLACE INTO tbl values (2, 2, 3); - SELECT * from tbl; - } - } {1 2 3 2 0 0} - do_test trigger2-6.1g { - catchsql { - INSERT OR ROLLBACK INTO tbl values (3, 2, 3); - } - } {1 {column a is not unique}} - do_test trigger2-6.1h { - execsql { - SELECT * from tbl; - } - } {} - execsql {DELETE FROM tbl} - - - # Handling of ON CONFLICT by UPDATE statements inside triggers - execsql { - INSERT INTO tbl values (4, 2, 3); - INSERT INTO tbl values (6, 3, 4); - CREATE TRIGGER au_tbl AFTER UPDATE ON tbl BEGIN - UPDATE OR IGNORE tbl SET a = new.a, c = 10; - END; - } - do_test trigger2-6.2a { - execsql { - BEGIN; - UPDATE tbl SET a = 1 WHERE a = 4; - SELECT * from tbl; - } - } {1 2 10 6 3 4} - do_test trigger2-6.2b { - catchsql { - UPDATE OR ABORT tbl SET a = 4 WHERE a = 1; - } - } {1 {column a is not unique}} - do_test trigger2-6.2c { - execsql { - SELECT * from tbl; - } - } {1 2 10 6 3 4} - do_test trigger2-6.2d { - catchsql { - UPDATE OR FAIL tbl SET a = 4 WHERE a = 1; - } - } {1 {column a is not unique}} - do_test trigger2-6.2e { - execsql { - SELECT * from tbl; - } - } {4 2 10 6 3 4} - do_test trigger2-6.2f.1 { - execsql { - UPDATE OR REPLACE tbl SET a = 1 WHERE a = 4; - SELECT * from tbl; - } - } {1 3 10} - do_test trigger2-6.2f.2 { - execsql { - INSERT INTO tbl VALUES (2, 3, 4); - SELECT * FROM tbl; - } - } {1 3 10 2 3 4} - do_test trigger2-6.2g { - catchsql { - UPDATE OR ROLLBACK tbl SET a = 4 WHERE a = 1; - } - } {1 {column a is not unique}} - do_test trigger2-6.2h { - execsql { - SELECT * from tbl; - } - } {4 2 3 6 3 4} - execsql { - DROP TABLE tbl; - } -} ; # ifcapable conflict - -# 7. Triggers on views -ifcapable view { - -do_test trigger2-7.1 { - execsql { - CREATE TABLE ab(a, b); - CREATE TABLE cd(c, d); - INSERT INTO ab VALUES (1, 2); - INSERT INTO ab VALUES (0, 0); - INSERT INTO cd VALUES (3, 4); - - CREATE TABLE tlog(ii INTEGER PRIMARY KEY, - olda, oldb, oldc, oldd, newa, newb, newc, newd); - - CREATE VIEW abcd AS SELECT a, b, c, d FROM ab, cd; - - CREATE TRIGGER before_update INSTEAD OF UPDATE ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - old.a, old.b, old.c, old.d, new.a, new.b, new.c, new.d); - END; - CREATE TRIGGER after_update INSTEAD OF UPDATE ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - old.a, old.b, old.c, old.d, new.a, new.b, new.c, new.d); - END; - - CREATE TRIGGER before_delete INSTEAD OF DELETE ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - old.a, old.b, old.c, old.d, 0, 0, 0, 0); - END; - CREATE TRIGGER after_delete INSTEAD OF DELETE ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - old.a, old.b, old.c, old.d, 0, 0, 0, 0); - END; - - CREATE TRIGGER before_insert INSTEAD OF INSERT ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - 0, 0, 0, 0, new.a, new.b, new.c, new.d); - END; - CREATE TRIGGER after_insert INSTEAD OF INSERT ON abcd BEGIN - INSERT INTO tlog VALUES(NULL, - 0, 0, 0, 0, new.a, new.b, new.c, new.d); - END; - } -} {}; - -do_test trigger2-7.2 { - execsql { - UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1; - DELETE FROM abcd WHERE a = 1; - INSERT INTO abcd VALUES(10, 20, 30, 40); - SELECT * FROM tlog; - } -} [ list 1 1 2 3 4 100 25 3 4 \ - 2 1 2 3 4 100 25 3 4 \ - 3 1 2 3 4 0 0 0 0 \ - 4 1 2 3 4 0 0 0 0 \ - 5 0 0 0 0 10 20 30 40 \ - 6 0 0 0 0 10 20 30 40 ] - -do_test trigger2-7.3 { - execsql { - DELETE FROM tlog; - INSERT INTO abcd VALUES(10, 20, 30, 40); - UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1; - DELETE FROM abcd WHERE a = 1; - SELECT * FROM tlog; - } -} [ list \ - 1 0 0 0 0 10 20 30 40 \ - 2 0 0 0 0 10 20 30 40 \ - 3 1 2 3 4 100 25 3 4 \ - 4 1 2 3 4 100 25 3 4 \ - 5 1 2 3 4 0 0 0 0 \ - 6 1 2 3 4 0 0 0 0 \ -] -do_test trigger2-7.4 { - execsql { - DELETE FROM tlog; - DELETE FROM abcd WHERE a = 1; - INSERT INTO abcd VALUES(10, 20, 30, 40); - UPDATE abcd SET a = 100, b = 5*5 WHERE a = 1; - SELECT * FROM tlog; - } -} [ list \ - 1 1 2 3 4 0 0 0 0 \ - 2 1 2 3 4 0 0 0 0 \ - 3 0 0 0 0 10 20 30 40 \ - 4 0 0 0 0 10 20 30 40 \ - 5 1 2 3 4 100 25 3 4 \ - 6 1 2 3 4 100 25 3 4 \ -] - -do_test trigger2-8.1 { - execsql { - CREATE TABLE t1(a,b,c); - INSERT INTO t1 VALUES(1,2,3); - CREATE VIEW v1 AS - SELECT a+b AS x, b+c AS y, a+c AS z FROM t1; - SELECT * FROM v1; - } -} {3 5 4} -do_test trigger2-8.2 { - execsql { - CREATE TABLE v1log(a,b,c,d,e,f); - CREATE TRIGGER r1 INSTEAD OF DELETE ON v1 BEGIN - INSERT INTO v1log VALUES(OLD.x,NULL,OLD.y,NULL,OLD.z,NULL); - END; - DELETE FROM v1 WHERE x=1; - SELECT * FROM v1log; - } -} {} -do_test trigger2-8.3 { - execsql { - DELETE FROM v1 WHERE x=3; - SELECT * FROM v1log; - } -} {3 {} 5 {} 4 {}} -do_test trigger2-8.4 { - execsql { - INSERT INTO t1 VALUES(4,5,6); - DELETE FROM v1log; - DELETE FROM v1 WHERE y=11; - SELECT * FROM v1log; - } -} {9 {} 11 {} 10 {}} -do_test trigger2-8.5 { - execsql { - CREATE TRIGGER r2 INSTEAD OF INSERT ON v1 BEGIN - INSERT INTO v1log VALUES(NULL,NEW.x,NULL,NEW.y,NULL,NEW.z); - END; - DELETE FROM v1log; - INSERT INTO v1 VALUES(1,2,3); - SELECT * FROM v1log; - } -} {{} 1 {} 2 {} 3} -do_test trigger2-8.6 { - execsql { - CREATE TRIGGER r3 INSTEAD OF UPDATE ON v1 BEGIN - INSERT INTO v1log VALUES(OLD.x,NEW.x,OLD.y,NEW.y,OLD.z,NEW.z); - END; - DELETE FROM v1log; - UPDATE v1 SET x=x+100, y=y+200, z=z+300; - SELECT * FROM v1log; - } -} {3 103 5 205 4 304 9 109 11 211 10 310} - -# At one point the following was causing a segfault. -do_test trigger2-9.1 { - execsql { - CREATE TABLE t3(a TEXT, b TEXT); - CREATE VIEW v3 AS SELECT t3.a FROM t3; - CREATE TRIGGER trig1 INSTEAD OF DELETE ON v3 BEGIN - SELECT 1; - END; - DELETE FROM v3 WHERE a = 1; - } -} {} - -} ;# ifcapable view - -integrity_check trigger2-9.9 - -finish_test |
