2008-07-30 13:15:43 +00:00
|
|
|
# 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 tests the RAISE() function.
|
|
|
|
#
|
|
|
|
|
|
|
|
|
|
|
|
set testdir [file dirname $argv0]
|
|
|
|
source $testdir/tester.tcl
|
|
|
|
ifcapable {!trigger} {
|
|
|
|
finish_test
|
|
|
|
return
|
|
|
|
}
|
|
|
|
|
2009-12-03 21:24:07 +00:00
|
|
|
# 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 }
|
2008-07-30 13:15:43 +00:00
|
|
|
|
2009-12-03 21:24:07 +00:00
|
|
|
# Test that we can cause ROLLBACK, FAIL and ABORT correctly
|
|
|
|
#
|
|
|
|
catchsql { CREATE TABLE tbl(a, b ,c) }
|
2008-07-30 13:15:43 +00:00
|
|
|
execsql {
|
|
|
|
CREATE TRIGGER before_tbl_insert BEFORE INSERT ON tbl BEGIN SELECT CASE
|
2009-12-03 21:24:07 +00:00
|
|
|
WHEN (new.a = 4) THEN RAISE(IGNORE) END;
|
2008-07-30 13:15:43 +00:00
|
|
|
END;
|
|
|
|
|
|
|
|
CREATE TRIGGER after_tbl_insert AFTER INSERT ON tbl BEGIN SELECT CASE
|
2009-12-03 21:24:07 +00:00
|
|
|
WHEN (new.a = 1) THEN RAISE(ABORT, 'Trigger abort')
|
|
|
|
WHEN (new.a = 2) THEN RAISE(FAIL, 'Trigger fail')
|
|
|
|
WHEN (new.a = 3) THEN RAISE(ROLLBACK, 'Trigger rollback') END;
|
2008-07-30 13:15:43 +00:00
|
|
|
END;
|
|
|
|
}
|
|
|
|
# ABORT
|
|
|
|
do_test trigger3-1.1 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
BEGIN;
|
2008-07-30 13:15:43 +00:00
|
|
|
INSERT INTO tbl VALUES (5, 5, 6);
|
|
|
|
INSERT INTO tbl VALUES (1, 5, 6);
|
|
|
|
}
|
|
|
|
} {1 {Trigger abort}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-1.1b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
do_test trigger3-1.2 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT * FROM tbl;
|
|
|
|
ROLLBACK;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {5 5 6}
|
|
|
|
do_test trigger3-1.3 {
|
|
|
|
execsql {SELECT * FROM tbl}
|
|
|
|
} {}
|
|
|
|
|
|
|
|
# FAIL
|
|
|
|
do_test trigger3-2.1 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
BEGIN;
|
2008-07-30 13:15:43 +00:00
|
|
|
INSERT INTO tbl VALUES (5, 5, 6);
|
|
|
|
INSERT INTO tbl VALUES (2, 5, 6);
|
|
|
|
}
|
|
|
|
} {1 {Trigger fail}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-2.1b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
do_test trigger3-2.2 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT * FROM tbl;
|
|
|
|
ROLLBACK;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {5 5 6 2 5 6}
|
|
|
|
# ROLLBACK
|
|
|
|
do_test trigger3-3.1 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
BEGIN;
|
2008-07-30 13:15:43 +00:00
|
|
|
INSERT INTO tbl VALUES (5, 5, 6);
|
|
|
|
INSERT INTO tbl VALUES (3, 5, 6);
|
|
|
|
}
|
|
|
|
} {1 {Trigger rollback}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-3.1b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
do_test trigger3-3.2 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT * FROM tbl;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {}
|
|
|
|
|
|
|
|
# Verify that a ROLLBACK trigger works like a FAIL trigger if
|
|
|
|
# we are not within a transaction. Ticket #3035.
|
|
|
|
#
|
|
|
|
do_test trigger3-3.3 {
|
|
|
|
catchsql {COMMIT}
|
|
|
|
catchsql {
|
|
|
|
INSERT INTO tbl VALUES (3, 9, 10);
|
|
|
|
}
|
|
|
|
} {1 {Trigger rollback}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-3.3b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
do_test trigger3-3.4 {
|
|
|
|
execsql {SELECT * FROM tbl}
|
|
|
|
} {}
|
|
|
|
|
|
|
|
# IGNORE
|
|
|
|
do_test trigger3-4.1 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
BEGIN;
|
2008-07-30 13:15:43 +00:00
|
|
|
INSERT INTO tbl VALUES (5, 5, 6);
|
|
|
|
INSERT INTO tbl VALUES (4, 5, 6);
|
|
|
|
}
|
|
|
|
} {0 {}}
|
|
|
|
do_test trigger3-4.2 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT * FROM tbl;
|
|
|
|
ROLLBACK;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {5 5 6}
|
|
|
|
|
|
|
|
# Check that we can also do RAISE(IGNORE) for UPDATE and DELETE
|
|
|
|
execsql {DROP TABLE tbl;}
|
|
|
|
execsql {CREATE TABLE tbl (a, b, c);}
|
|
|
|
execsql {INSERT INTO tbl VALUES(1, 2, 3);}
|
|
|
|
execsql {INSERT INTO tbl VALUES(4, 5, 6);}
|
|
|
|
execsql {
|
|
|
|
CREATE TRIGGER before_tbl_update BEFORE UPDATE ON tbl BEGIN
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT CASE WHEN (old.a = 1) THEN RAISE(IGNORE) END;
|
2008-07-30 13:15:43 +00:00
|
|
|
END;
|
|
|
|
|
|
|
|
CREATE TRIGGER before_tbl_delete BEFORE DELETE ON tbl BEGIN
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT CASE WHEN (old.a = 1) THEN RAISE(IGNORE) END;
|
2008-07-30 13:15:43 +00:00
|
|
|
END;
|
|
|
|
}
|
|
|
|
do_test trigger3-5.1 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
UPDATE tbl SET c = 10;
|
|
|
|
SELECT * FROM tbl;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {1 2 3 4 5 10}
|
|
|
|
do_test trigger3-5.2 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
DELETE FROM tbl;
|
|
|
|
SELECT * FROM tbl;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {1 2 3}
|
|
|
|
|
|
|
|
# Check that RAISE(IGNORE) works correctly for nested triggers:
|
|
|
|
execsql {CREATE TABLE tbl2(a, b, c)}
|
|
|
|
execsql {
|
|
|
|
CREATE TRIGGER after_tbl2_insert AFTER INSERT ON tbl2 BEGIN
|
2009-12-03 21:24:07 +00:00
|
|
|
UPDATE tbl SET c = 10;
|
2008-07-30 13:15:43 +00:00
|
|
|
INSERT INTO tbl2 VALUES (new.a, new.b, new.c);
|
|
|
|
END;
|
|
|
|
}
|
|
|
|
do_test trigger3-6 {
|
|
|
|
execsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
INSERT INTO tbl2 VALUES (1, 2, 3);
|
|
|
|
SELECT * FROM tbl2;
|
|
|
|
SELECT * FROM tbl;
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {1 2 3 1 2 3 1 2 3}
|
|
|
|
|
|
|
|
# Check that things also work for view-triggers
|
|
|
|
|
|
|
|
ifcapable view {
|
|
|
|
|
|
|
|
execsql {CREATE VIEW tbl_view AS SELECT * FROM tbl}
|
|
|
|
execsql {
|
|
|
|
CREATE TRIGGER tbl_view_insert INSTEAD OF INSERT ON tbl_view BEGIN
|
2009-12-03 21:24:07 +00:00
|
|
|
SELECT CASE WHEN (new.a = 1) THEN RAISE(ROLLBACK, 'View rollback')
|
|
|
|
WHEN (new.a = 2) THEN RAISE(IGNORE)
|
|
|
|
WHEN (new.a = 3) THEN RAISE(ABORT, 'View abort') END;
|
2008-07-30 13:15:43 +00:00
|
|
|
END;
|
|
|
|
}
|
|
|
|
|
|
|
|
do_test trigger3-7.1 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
INSERT INTO tbl_view VALUES(1, 2, 3);
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {1 {View rollback}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-7.1b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
do_test trigger3-7.2 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
INSERT INTO tbl_view VALUES(2, 2, 3);
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {0 {}}
|
|
|
|
do_test trigger3-7.3 {
|
|
|
|
catchsql {
|
2009-12-03 21:24:07 +00:00
|
|
|
INSERT INTO tbl_view VALUES(3, 2, 3);
|
2008-07-30 13:15:43 +00:00
|
|
|
}
|
|
|
|
} {1 {View abort}}
|
2013-05-21 20:38:11 +00:00
|
|
|
verify_ex_errcode trigger3-7.3b SQLITE_CONSTRAINT_TRIGGER
|
2008-07-30 13:15:43 +00:00
|
|
|
|
|
|
|
} ;# ifcapable view
|
|
|
|
|
|
|
|
integrity_check trigger3-8.1
|
|
|
|
|
|
|
|
catchsql { DROP TABLE tbl; }
|
|
|
|
catchsql { DROP TABLE tbl2; }
|
|
|
|
catchsql { DROP VIEW tbl_view; }
|
|
|
|
|
|
|
|
finish_test
|