| Index: third_party/sqlite/sqlite-src-3080704/test/fkey_malloc.test
|
| diff --git a/third_party/sqlite/sqlite-src-3080704/test/fkey_malloc.test b/third_party/sqlite/sqlite-src-3080704/test/fkey_malloc.test
|
| deleted file mode 100644
|
| index 382e6f67d95384ad09d871536453ae84fce887dc..0000000000000000000000000000000000000000
|
| --- a/third_party/sqlite/sqlite-src-3080704/test/fkey_malloc.test
|
| +++ /dev/null
|
| @@ -1,134 +0,0 @@
|
| -# 2009 September 22
|
| -#
|
| -# 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.
|
| -#
|
| -#***********************************************************************
|
| -#
|
| -#
|
| -
|
| -set testdir [file dirname $argv0]
|
| -source $testdir/tester.tcl
|
| -
|
| -ifcapable !foreignkey||!trigger {
|
| - finish_test
|
| - return
|
| -}
|
| -source $testdir/malloc_common.tcl
|
| -
|
| -do_malloc_test fkey_malloc-1 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(a PRIMARY KEY, b UNIQUE);
|
| - CREATE TABLE t2(x REFERENCES t1 ON UPDATE CASCADE ON DELETE CASCADE);
|
| -} -sqlbody {
|
| - INSERT INTO t1 VALUES('aaa', 1);
|
| - INSERT INTO t2 VALUES('aaa');
|
| - UPDATE t1 SET a = 'bbb';
|
| - DELETE FROM t1;
|
| - PRAGMA foreign_key_check;
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-2 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(a, b, UNIQUE(a, b));
|
| -} -sqlbody {
|
| - CREATE TABLE t2(x, y,
|
| - FOREIGN KEY(x, y) REFERENCES t1(a, b) DEFERRABLE INITIALLY DEFERRED
|
| - );
|
| - BEGIN;
|
| - INSERT INTO t2 VALUES('a', 'b');
|
| - INSERT INTO t1 VALUES('a', 'b');
|
| - UPDATE t1 SET a = 'c';
|
| - DELETE FROM t2;
|
| - INSERT INTO t2 VALUES('d', 'b');
|
| - UPDATE t2 SET x = 'c';
|
| - COMMIT;
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-3 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(x INTEGER PRIMARY KEY);
|
| - CREATE TABLE t2(y DEFAULT 14 REFERENCES t1(x) ON UPDATE SET DEFAULT);
|
| - CREATE TABLE t3(y REFERENCES t1 ON UPDATE SET NULL);
|
| - INSERT INTO t1 VALUES(13);
|
| - INSERT INTO t2 VALUES(13);
|
| - INSERT INTO t3 VALUES(13);
|
| -} -sqlbody {
|
| - UPDATE t1 SET x = 14;
|
| -}
|
| -
|
| -proc catch_fk_error {zSql} {
|
| - set rc [catch {db eval $zSql} msg]
|
| - if {$rc==0} {
|
| - return $msg
|
| - }
|
| - if {[string match {*foreign key*} $msg]} {
|
| - return ""
|
| - }
|
| - if {$msg eq "out of memory"
|
| - || $msg eq "FOREIGN KEY constraint failed"
|
| - || $msg eq "constraint failed"
|
| - } {
|
| - error 1
|
| - }
|
| - error $msg
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-4 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(x INTEGER PRIMARY KEY, y UNIQUE);
|
| - CREATE TABLE t2(z REFERENCES t1(x), a REFERENCES t1(y));
|
| - CREATE TABLE t3(x);
|
| - CREATE TABLE t4(z REFERENCES t3);
|
| - CREATE TABLE t5(x, y);
|
| - CREATE TABLE t6(z REFERENCES t5(x));
|
| - CREATE INDEX i51 ON t5(x);
|
| - CREATE INDEX i52 ON t5(y, x);
|
| - INSERT INTO t1 VALUES(1, 2);
|
| -} -tclbody {
|
| - catch_fk_error {INSERT INTO t2 VALUES(1, 3)}
|
| - catch_fk_error {INSERT INTO t4 VALUES(2)}
|
| - catch_fk_error {INSERT INTO t6 VALUES(2)}
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-5 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(x, y, PRIMARY KEY(x, y));
|
| - CREATE TABLE t2(a, b, FOREIGN KEY(a, b) REFERENCES t1 ON UPDATE CASCADE);
|
| - INSERT INTO t1 VALUES(1, 2);
|
| - INSERT INTO t2 VALUES(1, 2);
|
| -} -sqlbody {
|
| - UPDATE t1 SET x = 5;
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-6 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE t1(
|
| - x PRIMARY KEY,
|
| - y REFERENCES t1 ON DELETE RESTRICT ON UPDATE SET DEFAULT
|
| - );
|
| - INSERT INTO t1 VALUES('abc', 'abc');
|
| - INSERT INTO t1 VALUES('def', 'def');
|
| -} -sqlbody {
|
| - INSERT INTO t1 VALUES('ghi', 'ghi');
|
| - DELETE FROM t1 WHERE rowid>1;
|
| - UPDATE t1 SET x='jkl', y='jkl';
|
| -}
|
| -
|
| -do_malloc_test fkey_malloc-7 -sqlprep {
|
| - PRAGMA foreign_keys = 1;
|
| - CREATE TABLE x(a, b, PRIMARY KEY(a, b));
|
| - CREATE TABLE y(c, d,
|
| - FOREIGN KEY(d, c) REFERENCES x DEFERRABLE INITIALLY DEFERRED
|
| - );
|
| - CREATE TABLE z(e, f, FOREIGN KEY(e, f) REFERENCES x);
|
| -} -sqlbody {
|
| - DROP TABLE y;
|
| - DROP TABLE x;
|
| -}
|
| -
|
| -finish_test
|
|
|