1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/persistentdata/persistentstorage/sqlite3api/TEST/TclScript/trigger7.test Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,121 @@
1.4 +# 2005 August 18
1.5 +#
1.6 +# The author disclaims copyright to this source code. In place of
1.7 +# a legal notice, here is a blessing:
1.8 +#
1.9 +# May you do good and not evil.
1.10 +# May you find forgiveness for yourself and forgive others.
1.11 +# May you share freely, never taking more than you give.
1.12 +#
1.13 +#***********************************************************************
1.14 +# This file implements regression tests for SQLite library.
1.15 +#
1.16 +# This file implements tests to increase coverage of trigger.c.
1.17 +#
1.18 +# $Id: trigger7.test,v 1.3 2008/08/11 18:44:58 drh Exp $
1.19 +
1.20 +set testdir [file dirname $argv0]
1.21 +source $testdir/tester.tcl
1.22 +ifcapable {!trigger} {
1.23 + finish_test
1.24 + return
1.25 +}
1.26 +
1.27 +
1.28 +# Error messages resulting from qualified trigger names.
1.29 +#
1.30 +do_test trigger7-1.1 {
1.31 + execsql {
1.32 + CREATE TABLE t1(x, y);
1.33 + }
1.34 + catchsql {
1.35 + CREATE TEMP TRIGGER main.r1 AFTER INSERT ON t1 BEGIN
1.36 + SELECT 'no nothing';
1.37 + END
1.38 + }
1.39 +} {1 {temporary trigger may not have qualified name}}
1.40 +do_test trigger7-1.2 {
1.41 + catchsql {
1.42 + CREATE TRIGGER not_a_db.r1 AFTER INSERT ON t1 BEGIN
1.43 + SELECT 'no nothing';
1.44 + END
1.45 + }
1.46 +} {1 {unknown database not_a_db}}
1.47 +
1.48 +
1.49 +# When the UPDATE OF syntax is used, no code is generated for triggers
1.50 +# that do not match the update columns.
1.51 +#
1.52 +ifcapable explain {
1.53 + do_test trigger7-2.1 {
1.54 + execsql {
1.55 + CREATE TRIGGER r1 AFTER UPDATE OF x ON t1 BEGIN
1.56 + SELECT '___update_t1.x___';
1.57 + END;
1.58 + CREATE TRIGGER r2 AFTER UPDATE OF y ON t1 BEGIN
1.59 + SELECT '___update_t1.y___';
1.60 + END;
1.61 + }
1.62 + set txt [db eval {EXPLAIN UPDATE t1 SET x=5}]
1.63 + string match *___update_t1.x___* $txt
1.64 + } 1
1.65 + do_test trigger7-2.2 {
1.66 + set txt [db eval {EXPLAIN UPDATE t1 SET x=5}]
1.67 + string match *___update_t1.y___* $txt
1.68 + } 0
1.69 + do_test trigger7-2.3 {
1.70 + set txt [db eval {EXPLAIN UPDATE t1 SET y=5}]
1.71 + string match *___update_t1.x___* $txt
1.72 + } 0
1.73 + do_test trigger7-2.4 {
1.74 + set txt [db eval {EXPLAIN UPDATE t1 SET y=5}]
1.75 + string match *___update_t1.y___* $txt
1.76 + } 1
1.77 + do_test trigger7-2.5 {
1.78 + set txt [db eval {EXPLAIN UPDATE t1 SET rowid=5}]
1.79 + string match *___update_t1.x___* $txt
1.80 + } 0
1.81 + do_test trigger7-2.6 {
1.82 + set txt [db eval {EXPLAIN UPDATE t1 SET rowid=5}]
1.83 + string match *___update_t1.x___* $txt
1.84 + } 0
1.85 +}
1.86 +
1.87 +# Test the ability to create many triggers on the same table, then
1.88 +# selectively drop those triggers.
1.89 +#
1.90 +do_test trigger7-3.1 {
1.91 + execsql {
1.92 + CREATE TABLE t2(x,y,z);
1.93 + CREATE TRIGGER t2r1 AFTER INSERT ON t2 BEGIN SELECT 1; END;
1.94 + CREATE TRIGGER t2r2 BEFORE INSERT ON t2 BEGIN SELECT 1; END;
1.95 + CREATE TRIGGER t2r3 AFTER UPDATE ON t2 BEGIN SELECT 1; END;
1.96 + CREATE TRIGGER t2r4 BEFORE UPDATE ON t2 BEGIN SELECT 1; END;
1.97 + CREATE TRIGGER t2r5 AFTER DELETE ON t2 BEGIN SELECT 1; END;
1.98 + CREATE TRIGGER t2r6 BEFORE DELETE ON t2 BEGIN SELECT 1; END;
1.99 + CREATE TRIGGER t2r7 AFTER INSERT ON t2 BEGIN SELECT 1; END;
1.100 + CREATE TRIGGER t2r8 BEFORE INSERT ON t2 BEGIN SELECT 1; END;
1.101 + CREATE TRIGGER t2r9 AFTER UPDATE ON t2 BEGIN SELECT 1; END;
1.102 + CREATE TRIGGER t2r10 BEFORE UPDATE ON t2 BEGIN SELECT 1; END;
1.103 + CREATE TRIGGER t2r11 AFTER DELETE ON t2 BEGIN SELECT 1; END;
1.104 + CREATE TRIGGER t2r12 BEFORE DELETE ON t2 BEGIN SELECT 1; END;
1.105 + DROP TRIGGER t2r6;
1.106 + }
1.107 +} {}
1.108 +
1.109 +# This test corrupts the database file so it must be the last test
1.110 +# in the series.
1.111 +#
1.112 +do_test trigger7-99.1 {
1.113 + execsql {
1.114 + PRAGMA writable_schema=on;
1.115 + UPDATE sqlite_master SET sql='nonsense';
1.116 + }
1.117 + db close
1.118 + sqlite3 db test.db
1.119 + catchsql {
1.120 + DROP TRIGGER t2r5
1.121 + }
1.122 +} {1 {malformed database schema (t2r12) - near "nonsense": syntax error}}
1.123 +
1.124 +finish_test