[t:3465], add tests to mainline

git-svn-id: file:///svn/mysql/tests/mysql-test@30355 c7de825b-a66e-492c-adef-691d508d4ae1

mysql-test/suite/tokudb.hotindex/t/hotindex-del-1.test

+# test that deletes work when hot indexing is on
+
+set storage_engine='tokudb';
+
+--echo # Establish connection conn1 (user = root)
+connect (conn1,localhost,root,,);
+
+connection default;
+
+# create table s
+--disable_warnings
+drop table if exists s;
+--enable_warnings
+create table s (a int, b int);
+
+# populate table s
+let $a = 10000;
+while ($a) {
+    eval insert into s values ($a,0),($a,1),($a,2),($a,3),($a,4),($a,5),($a,6),($a,7),($a,8),($a,9);
+    dec $a;
+}
+
+set tokudb_create_index_online=1;
+send create clustering index i_a on s(a);
+
+connection conn1;
+set tokudb_write_lock_wait=1;
+set tokudb_read_lock_wait=1;
+let $a = 10000;
+while ($a) {
+    eval delete from s where a=$a;
+    dec $a;
+}
+
+connection default;
+reap;
+select count(*) from s;
+select count(*) from s use index(i_a);
+disconnect conn1;
+
+#cleanup
+drop table s;

mysql-test/suite/tokudb.hotindex/t/hotindex-insert-1.test

+# test that deletes work when hot indexing is on
+
+set storage_engine='tokudb';
+
+--echo # Establish connection conn1 (user = root)
+connect (conn1,localhost,root,,);
+
+connection default;
+
+# create table s
+--disable_warnings
+drop table if exists s;
+--enable_warnings
+create table s (a int, b int);
+
+# populate table s
+let $a = 10000;
+while ($a) {
+    eval insert into s values ($a,0),($a,1),($a,2),($a,3),($a,4),($a,5),($a,6),($a,7),($a,8),($a,9);
+    dec $a;
+}
+
+set tokudb_create_index_online=1;
+send create clustering index i_a on s(a);
+
+connection conn1;
+set tokudb_write_lock_wait=1;
+set tokudb_read_lock_wait=1;
+let $b=10000;
+while ($b) {
+    eval insert into s values (1000000000,$b);
+    dec $b;
+}
+
+connection default;
+reap;
+select count(*) from s;
+select count(*) from s use index(i_a);
+disconnect conn1;
+
+#cleanup
+drop table s;

mysql-test/suite/tokudb.hotindex/t/hotindex-update-1.test

+# test that deletes work when hot indexing is on
+
+set storage_engine='tokudb';
+
+--echo # Establish connection conn1 (user = root)
+connect (conn1,localhost,root,,);
+
+connection default;
+
+# create table s
+--disable_warnings
+drop table if exists s;
+--enable_warnings
+create table s (a int, b int);
+
+# populate table s
+let $a = 10000;
+while ($a) {
+    eval insert into s values ($a,0),($a,1),($a,2),($a,3),($a,4),($a,5),($a,6),($a,7),($a,8),($a,9);
+    dec $a;
+}
+
+set tokudb_create_index_online=1;
+send create clustering index i_a on s(a);
+
+connection conn1;
+set tokudb_write_lock_wait=1;
+set tokudb_read_lock_wait=1;
+let $a = 10000;
+while ($a) {
+    eval update s set a=20000+$a where a=$a;
+    dec $a;
+}
+
+connection default;
+reap;
+disconnect conn1;
+
+#cleanup
+drop table s;