# Referential Integrity test
#
# The assumption here is that the application code issuing the SELECT
# to test for the presence or absence of a related record would do the
# right thing -- this script doesn't include that logic.
#
# Any overlap between the transactions must cause a serialization failure.

setup
{
 CREATE TABLE a (i int PRIMARY KEY);
 CREATE TABLE b (a_id int);
 INSERT INTO a VALUES (1);
}

teardown
{
 DROP TABLE a, b;
}

session "s1"
setup		{ BEGIN ISOLATION LEVEL SERIALIZABLE; }
step "rx1"	{ SELECT i FROM a WHERE i = 1; }
step "wy1"	{ INSERT INTO b VALUES (1); }
step "c1"	{ COMMIT; }

session "s2"
setup		{ BEGIN ISOLATION LEVEL SERIALIZABLE; }
step "rx2"	{ SELECT i FROM a WHERE i = 1; }
step "ry2"	{ SELECT a_id FROM b WHERE a_id = 1; }
step "wx2"	{ DELETE FROM a WHERE i = 1; }
step "c2"	{ COMMIT; }