-- source include/have_ndb.inc

###
### PK vs PK
###
create table parent (
  a int primary key auto_increment,
  b int not null,
  c int not null,
  unique(b) using hash,
  index(c)) engine = ndb;

create table child (
  a int primary key auto_increment,
  b int not null,
  c int not null,
  unique(b) using hash,
  index(c)) engine = ndb;

create table blobchild (
  a int primary key auto_increment,
  b int not null,
  c int not null,
  d text,
  unique(b) using hash,
  index(c)) engine = ndb;

--error 1215
alter table blobchild add constraint fkbad foreign key(a) references parent (a) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (a) references parent (a) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
insert into child values (3,3,3);

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

###
### PK vs UK
###
--error 1215
alter table blobchild add constraint fkbad foreign key(b) references parent (a) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (b) references parent (a) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
insert into child values (3,3,3);

--error 1452
update child set b = 3 where a = 1;

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

###
### UK vs PK
###
--error 1215
alter table blobchild add constraint fkbad foreign key(a) references parent (b) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (a) references parent (b) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
insert into child values (3,3,3);

--error 1451
update parent set b = 3 where a = 1;

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

###
### UK vs UK
###
--error 1215
alter table blobchild add constraint fkbad foreign key(b) references parent (b) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (b) references parent (b) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
update child set b = 3 where a = 1;

--error 1452
insert into child values (3,3,3);

--error 1451
update parent set b = 3 where a = 1;

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

###
### PK vs OI
###
--error 1215
alter table blobchild add constraint fkbad foreign key(c) references parent (a) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (c) references parent (a) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
update child set c = 3 where a = 1;

--error 1452
insert into child values (3,3,3);

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

###
### UK vs OI
###
--error 1215
alter table blobchild add constraint fkbad foreign key(c) references parent (b) on delete cascade on update restrict;
show warnings;

alter table child add constraint fkname foreign key (c) references parent (b) on delete cascade on update restrict;

insert into parent values (1,1,1),(2,2,2);
insert into child values (1,1,1),(2,2,2);

--error 1452
update child set c = 3 where a = 1;

--error 1452
insert into child values (3,3,3);

--error 1451
update parent set b = 3 where a = 1;

begin;
delete from parent where a = 1;
select * from child order by 1,2,3;
commit;

###
#
# test with a few more rows
insert into parent values (1,1,1);
insert into child values (1,1,1);
insert into child select a+2,a+2,1+(a % 2) from child;
insert into child select a+4,a+4,1+(a % 2) from child;
insert into child select a+8,a+8,1+(a % 2) from child;
insert into child select a+16,a+16,1+(a % 2) from child;
insert into child select a+32,a+32,1+(a % 2) from child;
insert into child select a+64,a+64,1+(a % 2) from child;
select c, count(*) from child
group by c
order by 1,2;
delete from parent where a = 1;
select c, count(*) from child
group by c
order by 1,2;
delete from parent where a = 2;

delete from child;
delete from parent;

alter table child drop foreign key fkname;

drop table parent, child, blobchild;