-C Add\sa\smissing\sOP_Close\sopcode\sto\sVDBE\sprograms\sthat\scheck\sfor\sFK\sconstraint\sviolations.
-D 2009-10-07T16:04:47
+C Add\ssome\stests\sof\sstatements\sin\sforeignkeys.html.
+D 2009-10-07T18:41:20
F Makefile.arm-wince-mingw32ce-gcc fcd5e9cd67fe88836360bb4f9ef4cb7f8e2fb5a0
F Makefile.in 4ca3f1dd6efa2075bcb27f4dc43eef749877740d
F Makefile.linux-gcc d53183f4aa6a9192d249731c90dbdffbd2c68654
F src/sqlite.h.in 2c9fa83525b14fe3dda38146fb3005847d57a14e
F src/sqlite3ext.h 1db7d63ab5de4b3e6b83dd03d1a4e64fef6d2a17
F src/sqliteInt.h 61c55f5f83c63813903f374e9b33173572f0559a
-F src/sqliteLimit.h 504a3161886d2938cbd163054ad620b8356df758
+F src/sqliteLimit.h 38b2fffcd01faeaeaadea71b2b47695a81580c8b
F src/status.c 237b193efae0cf6ac3f0817a208de6c6c6ef6d76
F src/table.c cc86ad3d6ad54df7c63a3e807b5783c90411a08d
F src/tclsqlite.c 868d62910bc6b41c49554482bdcc1590efc01f3c
F src/test_autoext.c f53b0cdf7bf5f08100009572a5d65cdb540bd0ad
F src/test_backup.c 1384a18985a5a2d275c2662e48473bf1542ebd08
F src/test_btree.c 5adbba9b138988a3cf4d3b5424dbc7c85651da02
-F src/test_config.c 97d840717efcca8cad5e353debc69780ea8ad7ce
+F src/test_config.c 4ac1e6257dcf926a71b7934410b71c5c326e68f2
F src/test_devsym.c 9f4bc2551e267ce7aeda195f3897d0f30c5228f4
F src/test_func.c 26ac62d8ed7a9f45a1e05baffb1c1e55fe2a06f2
F src/test_hexio.c 2f1122aa3f012fa0142ee3c36ce5c902a70cd12f
F src/utf.c 99cf927eabb104621ba889ac0dd075fc1657ad30
F src/util.c 59d4e9456bf1fe581f415a783fa0cee6115c8f35
F src/vacuum.c 869d08eaab64e2a4eaf4ef9ea34b851892b65a75
-F src/vdbe.c cb9dae4c5c3706e5772756bb38710faa954f0bb9
+F src/vdbe.c df2824f4f8b38f313aea5f6ce651bff20eb29715
F src/vdbe.h 7d5075e3fa4e5587a9be8d5e503857c825490cef
F src/vdbeInt.h 7afb76c0296f9a2310e565803fa66798ef47e9d5
F src/vdbeapi.c 524d79eb17bbcbe31c37c908b8e01edc5c684a90
F test/descidx3.test 3394ad4d089335cac743c36a14129d6d931c316f
F test/diskfull.test 0cede7ef9d8f415d9d3944005c76be7589bb5ebb
F test/distinctagg.test 1a6ef9c87a58669438fc771450d7a72577417376
+F test/e_fkey.test 0f520315537039d6e2c72285dca2a63ab26b5c48
F test/enc.test e54531cd6bf941ee6760be041dff19a104c7acea
F test/enc2.test 6d91a5286f59add0cfcbb2d0da913b76f2242398
F test/enc3.test 5c550d59ff31dccdba5d1a02ae11c7047d77c041
F test/filectrl.test 8923a6dc7630f31c8a9dd3d3d740aa0922df7bf8
F test/filefmt.test 84e3d0fe9f12d0d2ac852465c6f8450aea0d6f43
F test/fkey1.test 01c7de578e11747e720c2d9aeef27f239853c4da
-F test/fkey2.test 2220d7384624d792b692a94c65239f6359480312
+F test/fkey2.test add654160d1b066f7b866d63d4435954ccbcab7d
F test/fkey3.test 42f88d6048d8dc079e2a8cf7baad1cc1483a7620
F test/fkey_malloc.test a5ede29bd2f6e56dea78c3d43fb86dd696c068c8
F test/format4.test 1f0cac8ff3895e9359ed87e41aaabee982a812eb
F test/tempdb.test 1bf52da28a9c24e29717362a87722dff08feb72b
F test/temptable.test f42121a0d29a62f00f93274464164177ab1cc24a
F test/temptrigger.test b0273db072ce5f37cf19140ceb1f0d524bbe9f05
-F test/tester.tcl b22f925f3c6eea6283e29a81a7379091ca89ab40
+F test/tester.tcl 2caf7980d7dbb99dab9507ae0646802bc4d12c79
F test/thread001.test a3e6a7254d1cb057836cb3145b60c10bf5b7e60f
F test/thread002.test afd20095e6e845b405df4f2c920cb93301ca69db
F test/thread003.test b824d4f52b870ae39fc5bae4d8070eca73085dca
F tool/speedtest8.c 2902c46588c40b55661e471d7a86e4dd71a18224
F tool/speedtest8inst1.c 293327bc76823f473684d589a8160bde1f52c14e
F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f
-P 2fd487fdb669df89a8eb62cd0b7dc27ea1016edf
-R 9ddc4e2fa5a388e13b394f0c6d81b590
+P 5caa4a2b050d5743b1407485cf419aa36cf16ac6
+R 6e2bec7f14be2bc8a2ff167508eb9921
U dan
-Z 7ec5b231b6f1f0bf46023d4eea263057
+Z 1105fea50b7c6c07e7cbb16d59bd372a
--- /dev/null
+# 2009 October 7
+#
+# 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 tests to verify the "testable statements" in the
+# foreignkeys.in document.
+#
+
+set testdir [file dirname $argv0]
+source $testdir/tester.tcl
+ifcapable {!foreignkey} { finish_test ; return }
+
+execsql "PRAGMA foreign_keys = ON"
+
+#-------------------------------------------------------------------------
+# /* EV: R-24728-13230 */
+# /* EV: R-24450-46174 */
+#
+# Test that MATCH clauses are parsed, but SQLite treats every foreign key
+# constraint as if it were "MATCH SIMPLE".
+#
+foreach zMatch [list SIMPLE PARTIAL FULL Simple parTIAL FuLL ] {
+ drop_all_tables
+ do_test e_fkey-1.$zMatch.1 {
+ execsql "
+ CREATE TABLE p(a, b, c, PRIMARY KEY(b, c));
+ CREATE TABLE c(d, e, f, FOREIGN KEY(e, f) REFERENCES p MATCH $zMatch);
+ "
+ } {}
+ do_test e_fkey-1.$zMatch.2 {
+ execsql { INSERT INTO p VALUES(1, 2, 3) }
+
+ # MATCH SIMPLE behaviour: Allow any child key that contains one or more
+ # NULL value to be inserted. Non-NULL values do not have to map to any
+ # parent key values, so long as at least one field of the child key is
+ # NULL.
+ execsql { INSERT INTO c VALUES('w', 2, 3) }
+ execsql { INSERT INTO c VALUES('x', 'x', NULL) }
+ execsql { INSERT INTO c VALUES('y', NULL, 'x') }
+ execsql { INSERT INTO c VALUES('z', NULL, NULL) }
+
+ # Check that the FK is enforced properly if there are no NULL values
+ # in the child key columns.
+ catchsql { INSERT INTO c VALUES('a', 2, 4) }
+ } {1 {foreign key constraint failed}}
+}
+
+#-------------------------------------------------------------------------
+# /* EV: R-21599-16038 */
+#
+# Test that SQLite does not support the SET CONSTRAINT statement. And
+# that it is possible to create both immediate and deferred constraints.
+#
+drop_all_tables
+do_test e_fkey-2.1 {
+ catchsql { SET CONSTRAINTS ALL IMMEDIATE }
+} {1 {near "SET": syntax error}}
+do_test e_fkey-2.2 {
+ catchsql { SET CONSTRAINTS ALL DEFERRED }
+} {1 {near "SET": syntax error}}
+
+do_test e_fkey-2.3 {
+ execsql {
+ CREATE TABLE p(a, b, PRIMARY KEY(a, b));
+ CREATE TABLE cd(c, d,
+ FOREIGN KEY(c, d) REFERENCES p DEFERRABLE INITIALLY DEFERRED);
+ CREATE TABLE ci(c, d,
+ FOREIGN KEY(c, d) REFERENCES p DEFERRABLE INITIALLY IMMEDIATE);
+ BEGIN;
+ }
+} {}
+do_test e_fkey-2.4 {
+ catchsql { INSERT INTO ci VALUES('x', 'y') }
+} {1 {foreign key constraint failed}}
+do_test e_fkey-2.5 {
+ catchsql { INSERT INTO cd VALUES('x', 'y') }
+} {0 {}}
+do_test e_fkey-2.6 {
+ catchsql { COMMIT }
+} {1 {foreign key constraint failed}}
+do_test e_fkey-2.7 {
+ execsql {
+ DELETE FROM cd;
+ COMMIT;
+ }
+} {}
+
+#-------------------------------------------------------------------------
+# /* EV: R-42264-30503 */
+#
+# Test that the maximum recursion depth of foreign key action programs is
+# governed by the SQLITE_MAX_TRIGGER_DEPTH and SQLITE_LIMIT_TRIGGER_DEPTH
+# settings.
+#
+proc test_on_delete_recursion {limit} {
+ drop_all_tables
+ execsql {
+ BEGIN;
+ CREATE TABLE t0(a PRIMARY KEY, b);
+ INSERT INTO t0 VALUES('x0', NULL);
+ }
+ for {set i 1} {$i <= $limit} {incr i} {
+ execsql "
+ CREATE TABLE t$i (
+ a PRIMARY KEY, b REFERENCES t[expr $i-1] ON DELETE CASCADE
+ );
+ INSERT INTO t$i VALUES('x$i', 'x[expr $i-1]');
+ "
+ }
+ execsql COMMIT
+ catchsql "
+ DELETE FROM t0;
+ SELECT count(*) FROM t$limit;
+ "
+}
+proc test_on_update_recursion {limit} {
+ drop_all_tables
+ execsql {
+ BEGIN;
+ CREATE TABLE t0(a PRIMARY KEY);
+ INSERT INTO t0 VALUES('xxx');
+ }
+ for {set i 1} {$i <= $limit} {incr i} {
+ set j [expr $i-1]
+
+ execsql "
+ CREATE TABLE t$i (a PRIMARY KEY REFERENCES t$j ON UPDATE CASCADE);
+ INSERT INTO t$i VALUES('xxx');
+ "
+ }
+ execsql COMMIT
+ catchsql "
+ UPDATE t0 SET a = 'yyy';
+ SELECT NOT (a='yyy') FROM t$limit;
+ "
+}
+
+do_test e_fkey-3.1.1 {
+ test_on_delete_recursion $SQLITE_MAX_TRIGGER_DEPTH
+} {0 0}
+do_test e_fkey-3.1.2 {
+ test_on_delete_recursion [expr $SQLITE_MAX_TRIGGER_DEPTH+1]
+} {1 {too many levels of trigger recursion}}
+do_test e_fkey-3.1.3 {
+ sqlite3_limit db SQLITE_LIMIT_TRIGGER_DEPTH 5
+ test_on_delete_recursion 5
+} {0 0}
+do_test e_fkey-3.1.4 {
+ test_on_delete_recursion 6
+} {1 {too many levels of trigger recursion}}
+do_test e_fkey-3.1.5 {
+ sqlite3_limit db SQLITE_LIMIT_TRIGGER_DEPTH 1000000
+} {5}
+do_test e_fkey-3.2.1 {
+ test_on_update_recursion $SQLITE_MAX_TRIGGER_DEPTH
+} {0 0}
+do_test e_fkey-3.2.2 {
+ test_on_update_recursion [expr $SQLITE_MAX_TRIGGER_DEPTH+1]
+} {1 {too many levels of trigger recursion}}
+do_test e_fkey-3.2.3 {
+ sqlite3_limit db SQLITE_LIMIT_TRIGGER_DEPTH 5
+ test_on_update_recursion 5
+} {0 0}
+do_test e_fkey-3.2.4 {
+ test_on_update_recursion 6
+} {1 {too many levels of trigger recursion}}
+do_test e_fkey-3.2.5 {
+ sqlite3_limit db SQLITE_LIMIT_TRIGGER_DEPTH 1000000
+} {5}
+
+#-------------------------------------------------------------------------
+# /* EV: R-51769-32730 */
+#
+# The setting of the recursive_triggers pragma does not affect foreign
+# key actions.
+#
+foreach recursive_triggers_setting [list 0 1 ON OFF] {
+ drop_all_tables
+ execsql "PRAGMA recursive_triggers = $recursive_triggers_setting"
+
+ do_test e_fkey-4.$recursive_triggers_setting.1 {
+ execsql {
+ CREATE TABLE t1(a PRIMARY KEY, b REFERENCES t1 ON DELETE CASCADE);
+ INSERT INTO t1 VALUES(1, NULL);
+ INSERT INTO t1 VALUES(2, 1);
+ INSERT INTO t1 VALUES(3, 2);
+ INSERT INTO t1 VALUES(4, 3);
+ INSERT INTO t1 VALUES(5, 4);
+ SELECT count(*) FROM t1;
+ }
+ } {5}
+ do_test e_fkey-4.$recursive_triggers_setting.2 {
+ execsql { SELECT count(*) FROM t1 WHERE a = 1 }
+ } {1}
+ do_test e_fkey-4.$recursive_triggers_setting.3 {
+ execsql {
+ DELETE FROM t1 WHERE a = 1;
+ SELECT count(*) FROM t1;
+ }
+ } {0}
+}
+
+finish_test
projects / thirdparty / sqlite.git / commitdiff
