tdb2: now checking a new empty database works.
[ccan] / ccan / tdb2 / test / run-encode.c
1 #include <ccan/tdb2/tdb.c>
2 #include <ccan/tdb2/free.c>
3 #include <ccan/tdb2/lock.c>
4 #include <ccan/tdb2/io.c>
5 #include <ccan/tap/tap.h>
6 #include "logging.h"
7
8 int main(int argc, char *argv[])
9 {
10         unsigned int i;
11         struct tdb_used_record rec;
12         struct tdb_context tdb = { .log = tap_log_fn, .log_priv = NULL };
13
14         plan_tests(64 + 32 + 48*6 + 1);
15
16         /* We should be able to encode any data value. */
17         for (i = 0; i < 64; i++)
18                 ok1(set_header(&tdb, &rec, 0, 1ULL << i, 1ULL << i, 0) == 0);
19
20         /* And any key and data with < 64 bits between them. */
21         for (i = 0; i < 32; i++) {
22                 tdb_len_t dlen = 1ULL >> (63 - i), klen = 1ULL << i;
23                 ok1(set_header(&tdb, &rec, klen, dlen, klen + dlen, 0) == 0);
24         }
25
26         /* We should neatly encode all values. */
27         for (i = 0; i < 48; i++) {
28                 uint64_t h = 1ULL << (i < 11 ? 63 - i : 63 - 10);
29                 uint64_t klen = 1ULL << (i < 16 ? i : 15);
30                 uint64_t dlen = 1ULL << i;
31                 uint64_t xlen = 1ULL << (i < 32 ? i : 31);
32                 ok1(set_header(&tdb, &rec, klen, dlen, klen + dlen + xlen, h)
33                     == 0);
34                 ok1(rec_key_length(&rec) == klen);
35                 ok1(rec_data_length(&rec) == dlen);
36                 ok1(rec_extra_padding(&rec) == xlen);
37                 ok1(rec_hash(&rec) == h);
38                 ok1(rec_magic(&rec) == TDB_MAGIC);
39         }
40         ok1(tap_log_messages == 0);
41         return exit_status();
42 }