1 #define _XOPEN_SOURCE 500
3 #include "lock-tracking.h"
5 #define fcntl fcntl_with_lockcheck
7 #include <ccan/tdb/tdb.h>
8 #include <ccan/tdb/io.c>
9 #include <ccan/tdb/tdb.c>
10 #include <ccan/tdb/lock.c>
11 #include <ccan/tdb/freelist.c>
12 #include <ccan/tdb/traverse.c>
13 #include <ccan/tdb/transaction.c>
14 #include <ccan/tdb/error.c>
15 #include <ccan/tdb/open.c>
16 #include <ccan/tdb/check.c>
17 #include <ccan/tdb/hash.c>
18 #include <ccan/tap/tap.h>
25 #define NUM_ENTRIES 10
27 static bool prepare_entries(struct tdb_context *tdb)
32 for (i = 0; i < NUM_ENTRIES; i++) {
33 key.dsize = sizeof(i);
34 key.dptr = (void *)&i;
35 data.dsize = strlen("world");
36 data.dptr = (void *)"world";
38 if (tdb_store(tdb, key, data, 0) != 0)
44 static void delete_entries(struct tdb_context *tdb)
49 for (i = 0; i < NUM_ENTRIES; i++) {
50 key.dsize = sizeof(i);
51 key.dptr = (void *)&i;
53 ok1(tdb_delete(tdb, key) == 0);
57 /* We don't know how many times this will run. */
58 static int delete_other(struct tdb_context *tdb, TDB_DATA key, TDB_DATA data,
62 memcpy(&i, key.dptr, 4);
63 i = (i + 1) % NUM_ENTRIES;
64 key.dptr = (void *)&i;
65 if (tdb_delete(tdb, key) != 0)
66 (*(int *)private_data)++;
70 static int delete_self(struct tdb_context *tdb, TDB_DATA key, TDB_DATA data,
73 ok1(tdb_delete(tdb, key) == 0);
77 int main(int argc, char *argv[])
79 struct tdb_context *tdb;
83 tdb = tdb_open_ex("run-no-lock-during-traverse.tdb",
84 1024, TDB_CLEAR_IF_FIRST, O_CREAT|O_TRUNC|O_RDWR,
85 0600, &taplogctx, NULL);
88 ok1(prepare_entries(tdb));
89 ok1(locking_errors == 0);
90 ok1(tdb_lockall(tdb) == 0);
91 ok1(locking_errors == 0);
92 tdb_traverse(tdb, delete_other, &errors);
94 ok1(locking_errors == 0);
95 ok1(tdb_unlockall(tdb) == 0);
97 ok1(prepare_entries(tdb));
98 ok1(locking_errors == 0);
99 ok1(tdb_lockall(tdb) == 0);
100 ok1(locking_errors == 0);
101 tdb_traverse(tdb, delete_self, NULL);
102 ok1(locking_errors == 0);
103 ok1(tdb_unlockall(tdb) == 0);
105 ok1(prepare_entries(tdb));
106 ok1(locking_errors == 0);
107 ok1(tdb_lockall(tdb) == 0);
108 ok1(locking_errors == 0);
110 ok1(locking_errors == 0);
111 ok1(tdb_unlockall(tdb) == 0);
113 ok1(tdb_close(tdb) == 0);
115 return exit_status();