1 #include <ccan/tdb2/private.h>
3 #include "lock-tracking.h"
4 #include <ccan/tap/tap.h>
7 static ssize_t pwrite_check(int fd, const void *buf, size_t count, off_t offset);
8 static ssize_t write_check(int fd, const void *buf, size_t count);
9 static int ftruncate_check(int fd, off_t length);
11 #define pwrite pwrite_check
12 #define write write_check
13 #define fcntl fcntl_with_lockcheck
14 #define ftruncate ftruncate_check
16 /* There's a malloc inside transaction_setup_recovery, and valgrind complains
17 * when we longjmp and leak it. */
18 #define MAX_ALLOCATIONS 10
19 static void *allocated[MAX_ALLOCATIONS];
20 static unsigned max_alloc = 0;
22 static void *malloc_noleak(size_t len)
26 for (i = 0; i < MAX_ALLOCATIONS; i++)
28 allocated[i] = malloc(len);
31 diag("max_alloc: %i", max_alloc);
35 diag("Too many allocations!");
39 static void *realloc_noleak(void *p, size_t size)
43 for (i = 0; i < MAX_ALLOCATIONS; i++) {
44 if (allocated[i] == p) {
47 diag("max_alloc: %i", max_alloc);
49 return allocated[i] = realloc(p, size);
52 diag("Untracked realloc!");
56 static void free_noleak(void *p)
60 /* We don't catch asprintf, so don't complain if we miss one. */
61 for (i = 0; i < MAX_ALLOCATIONS; i++) {
62 if (allocated[i] == p) {
70 static void free_all(void)
74 for (i = 0; i < MAX_ALLOCATIONS; i++) {
80 #define malloc malloc_noleak
81 #define free free_noleak
82 #define realloc realloc_noleak
84 #include "tdb2-source.h"
98 #include "external-agent.h"
101 static bool in_transaction;
102 static int target, current;
103 static jmp_buf jmpbuf;
104 #define TEST_DBNAME "run-57-die-during-transaction.tdb"
105 #define KEY_STRING "helloworld"
107 static void maybe_die(int fd)
109 if (in_transaction && current++ == target) {
114 static ssize_t pwrite_check(int fd,
115 const void *buf, size_t count, off_t offset)
121 ret = pwrite(fd, buf, count, offset);
129 static ssize_t write_check(int fd, const void *buf, size_t count)
135 ret = write(fd, buf, count);
143 static int ftruncate_check(int fd, off_t length)
149 ret = ftruncate(fd, length);
155 static bool test_death(enum operation op, struct agent *agent, int flags)
157 struct tdb_context *tdb = NULL;
159 enum agent_return ret;
160 int needed_recovery = 0;
162 current = target = 0;
165 tdb = tdb_open(TEST_DBNAME, flags|TDB_NOMMAP,
166 O_CREAT|O_TRUNC|O_RDWR, 0600, &tap_log_attr);
168 diag("Failed opening TDB: %s", strerror(errno));
172 if (setjmp(jmpbuf) != 0) {
173 /* We're partway through. Simulate our death. */
174 close(tdb->file->fd);
176 in_transaction = false;
178 ret = external_agent_operation(agent, NEEDS_RECOVERY, "");
181 else if (ret != FAILED) {
182 diag("Step %u agent NEEDS_RECOVERY = %s", current,
183 agent_return_name(ret));
187 ret = external_agent_operation(agent, op, KEY_STRING);
188 if (ret != SUCCESS) {
189 diag("Step %u op %s failed = %s", current,
191 agent_return_name(ret));
195 ret = external_agent_operation(agent, NEEDS_RECOVERY, "");
197 diag("Still needs recovery after step %u = %s",
198 current, agent_return_name(ret));
202 ret = external_agent_operation(agent, CHECK, "");
203 if (ret != SUCCESS) {
204 diag("Step %u check failed = %s", current,
205 agent_return_name(ret));
209 ret = external_agent_operation(agent, CLOSE, "");
210 if (ret != SUCCESS) {
211 diag("Step %u close failed = %s", current,
212 agent_return_name(ret));
216 /* Suppress logging as this tries to use closed fd. */
217 suppress_logging = true;
218 suppress_lockcheck = true;
220 suppress_logging = false;
221 suppress_lockcheck = false;
228 /* Put key for agent to fetch. */
229 key = tdb_mkdata(KEY_STRING, strlen(KEY_STRING));
230 if (tdb_store(tdb, key, key, TDB_INSERT) != 0)
233 /* This is the key we insert in transaction. */
236 ret = external_agent_operation(agent, OPEN, TEST_DBNAME);
238 errx(1, "Agent failed to open: %s", agent_return_name(ret));
240 ret = external_agent_operation(agent, FETCH, KEY_STRING);
242 errx(1, "Agent failed find key: %s", agent_return_name(ret));
244 in_transaction = true;
245 if (tdb_transaction_start(tdb) != 0)
248 if (tdb_store(tdb, key, key, TDB_INSERT) != 0)
251 if (tdb_transaction_commit(tdb) != 0)
254 in_transaction = false;
257 diag("Completed %u runs", current);
259 ret = external_agent_operation(agent, CLOSE, "");
260 if (ret != SUCCESS) {
261 diag("Step %u close failed = %s", current,
262 agent_return_name(ret));
266 ok1(needed_recovery);
267 ok1(locking_errors == 0);
268 ok1(forget_locking() == 0);
273 int main(int argc, char *argv[])
275 enum operation ops[] = { FETCH, STORE, TRANSACTION_START };
280 unlock_callback = maybe_die;
282 external_agent_free = free_noleak;
283 agent = prepare_external_agent();
285 err(1, "preparing agent");
287 for (flags = TDB_DEFAULT; flags <= TDB_VERSION1; flags += TDB_VERSION1) {
288 for (i = 0; i < sizeof(ops)/sizeof(ops[0]); i++) {
289 diag("Testing %s after death", operation_name(ops[i]));
290 ok1(test_death(ops[i], agent, flags));
294 free_external_agent(agent);
295 return exit_status();