1 files changed, 20 insertions, 0 deletions
diff --git a/storage/rocksdb/mysql-test/rocksdb/t/optimize_table.inc b/storage/rocksdb/mysql-test/rocksdb/t/optimize_table.inc
new file mode 100644
index 00000000..5f66937c
--- /dev/null
+++ b/storage/rocksdb/mysql-test/rocksdb/t/optimize_table.inc
@@ -0,0 +1,20 @@
+# run a check script to verify sst files reduced enough during each optimize table
+perl;
+
+$size += -s $_ for (<$ENV{datadir}/#rocksdb/*.sst>);
+$file= "$ENV{MYSQL_TMP_DIR}/sst_size.dat";
+
+if (-f $file) {
+  open(F, '<', $file) || die("Can't open file $file: $!");
+  $old = <F>;
+  close F;
+  if ($old - $size < 1e6) {
+    print "sst file reduction was not enough $old -> $size (minimum 1000kb)\n";
+  } else {
+    print "sst file reduction ok\n";
+  }
+}
+open(F, '>', $file) || die("Can't open file $file: $!");
+print F $size;
+close F;
+EOF