tdb2: failtest on tdb_expand
[ccan] / ccan / tdb2 / test / run-02-expand.c
index b303f5b23b3e0c5871aa41ccccd133300dffd690..0a1bc99176e4a2c2795fcffd0d50e75b19ab4851 100644 (file)
@@ -1,10 +1,26 @@
+#include <ccan/failtest/failtest_override.h>
 #include <ccan/tdb2/tdb.c>
 #include <ccan/tdb2/free.c>
 #include <ccan/tdb2/lock.c>
 #include <ccan/tdb2/io.c>
 #include <ccan/tdb2/check.c>
+#include <ccan/tdb2/transaction.c>
+#include <ccan/tdb2/hash.c>
 #include <ccan/tap/tap.h>
+#include <ccan/failtest/failtest.h>
 #include "logging.h"
+#include "failtest_helper.h"
+
+static bool failtest_suppress = false;
+
+/* Don't need to test everything here, just want expand testing. */
+static enum failtest_result
+suppress_failure(struct failtest_call *history, unsigned num)
+{
+       if (failtest_suppress)
+               return FAIL_DONT_FAIL;
+       return block_repeat_failures(history, num);
+}
 
 int main(int argc, char *argv[])
 {
@@ -15,48 +31,49 @@ int main(int argc, char *argv[])
                        TDB_INTERNAL|TDB_CONVERT, TDB_CONVERT,
                        TDB_NOMMAP|TDB_CONVERT };
 
-       plan_tests(sizeof(flags) / sizeof(flags[0]) * 18 + 1);
+       plan_tests(sizeof(flags) / sizeof(flags[0]) * 11 + 1);
+
+       failtest_init(argc, argv);
+       failtest_hook = suppress_failure;
+       failtest_exit_check = exit_check_log;
 
        for (i = 0; i < sizeof(flags) / sizeof(flags[0]); i++) {
+               failtest_suppress = true;
                tdb = tdb_open("run-expand.tdb", flags[i],
                               O_RDWR|O_CREAT|O_TRUNC, 0600, &tap_log_attr);
-               ok1(tdb);
-               if (!tdb)
-                       continue;
-
-               /* First expand. Should add a zone, doubling file size.. */
-               val = tdb->map_size - 1 - sizeof(struct tdb_header);
-               ok1(tdb_expand(tdb, 1, 1, false) == 0);
-               ok1(tdb->map_size == 2 * val + 1 + sizeof(struct tdb_header));
-               ok1(tdb_check(tdb, NULL, NULL) == 0);
+               if (!ok1(tdb))
+                       break;
 
-               /* Second expand, add another zone of same size. */
-               ok1(tdb_expand(tdb, 1, 1, false) == 0);
-               ok1(tdb->map_size == 3 * val + 1 + sizeof(struct tdb_header));
+               val = tdb->map_size;
+               /* Need some hash lock for expand. */
+               ok1(tdb_lock_hashes(tdb, 0, 1, F_WRLCK, TDB_LOCK_WAIT) == 0);
+               failtest_suppress = false;
+               if (!ok1(tdb_expand(tdb, 1) == 0)) {
+                       failtest_suppress = true;
+                       tdb_close(tdb);
+                       break;
+               }
+               failtest_suppress = true;
+                       
+               ok1(tdb->map_size >= val + 1 * TDB_EXTENSION_FACTOR);
+               ok1(tdb_unlock_hashes(tdb, 0, 1, F_WRLCK) == 0);
                ok1(tdb_check(tdb, NULL, NULL) == 0);
 
-               /* Large expand, but can only add 4th zone of same size. */
-               ok1(tdb_expand(tdb, 0, 4*val, false) == 0);
-               ok1(tdb->map_size == 4 * val + 1 + sizeof(struct tdb_header));
+               val = tdb->map_size;
+               ok1(tdb_lock_hashes(tdb, 0, 1, F_WRLCK, TDB_LOCK_WAIT) == 0);
+               failtest_suppress = false;
+               if (!ok1(tdb_expand(tdb, 1024) == 0)) {
+                       failtest_suppress = true;
+                       tdb_close(tdb);
+                       break;
+               }
+               failtest_suppress = true;
+               ok1(tdb_unlock_hashes(tdb, 0, 1, F_WRLCK) == 0);
+               ok1(tdb->map_size >= val + 1024 * TDB_EXTENSION_FACTOR);
                ok1(tdb_check(tdb, NULL, NULL) == 0);
-
-               /* Large expand now will double file. */
-               ok1(tdb_expand(tdb, 0, 4*val, false) == 0);
-               ok1(tdb->map_size == 8 * val + 1 + sizeof(struct tdb_header));
-               ok1(tdb_check(tdb, NULL, NULL) == 0);
-
-               /* And again? */
-               ok1(tdb_expand(tdb, 0, 4*val, false) == 0);
-               ok1(tdb->map_size == 16 * val + 1 + sizeof(struct tdb_header));
-               ok1(tdb_check(tdb, NULL, NULL) == 0);
-
-               /* Below comfort level, will add a single 8*val zone. */
-               ok1(tdb_expand(tdb, 0, ((8*val) >> TDB_COMFORT_FACTOR_BITS)
-                              - sizeof(struct tdb_used_record), false) == 0);
-               ok1(tdb->map_size == 24 * val + 1 + sizeof(struct tdb_header));
                tdb_close(tdb);
        }
 
        ok1(tap_log_messages == 0);
-       return exit_status();
+       failtest_exit(exit_status());
 }