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();