1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
// test txn commit after db close
#include "test.h"
#include <sys/stat.h>
#include "../ydb-internal.h"
DB_ENV *null_env = NULL;
DB *null_db = NULL;
DB_TXN *null_txn = NULL;
DBC *null_cursor = NULL;
static void root_fifo_verify(DB_ENV *env, int n) {
if (verbose) printf("%s:%d %d\n", __FUNCTION__, __LINE__, n);
int r;
DB *db = null_db;
r = db_create(&db, env, 0); assert(r == 0); assert(db != NULL);
r = db->open(db, null_txn, "test.db", 0, DB_BTREE, DB_CREATE, S_IRWXU+S_IRWXG+S_IRWXO);
assert(r == 0);
DB_TXN *txn = null_txn;
r = env->txn_begin(env, null_txn, &txn, 0); assert(r == 0); assert(txn != NULL);
DBC *cursor = null_cursor;
r = db->cursor(db, txn, &cursor, 0); assert(r == 0);
int i;
for (i = 0; ; i++) {
DBT key, val;
memset(&key, 0, sizeof key); memset(&val, 0, sizeof val);
r = cursor->c_get(cursor, &key, &val, DB_NEXT);
if (r != 0) break;
int k;
assert(key.size == sizeof k);
memcpy(&k, key.data, key.size);
assert((int)toku_ntohl(k) == i);
}
assert(i == n);
r = cursor->c_close(cursor); assert(r == 0); cursor = null_cursor;
r = txn->commit(txn, 0); assert(r == 0); txn = null_txn;
r = db->close(db, 0); assert(r == 0); db = null_db;
}
static void root_fifo_1(int n) {
if (verbose) printf("%s:%d %d\n", __FUNCTION__, __LINE__, n);
int r;
// create the env
system("rm -rf " ENVDIR);
toku_os_mkdir(ENVDIR, S_IRWXU+S_IRWXG+S_IRWXO);
DB_ENV *env = null_env;
r = db_env_create(&env, 0); assert(r == 0); assert(env != NULL);
r = env->set_data_dir(env, ENVDIR);
r = env->set_lg_dir(env, ENVDIR);
r = env->open(env,
0,
DB_INIT_MPOOL+DB_INIT_LOG+DB_INIT_LOCK+DB_INIT_TXN+DB_PRIVATE+DB_CREATE,
S_IRWXU+S_IRWXG+S_IRWXO);
assert(r == 0);
DB_TXN *txn = null_txn;
r = env->txn_begin(env, null_txn, &txn, 0); assert(r == 0); assert(txn != NULL);
int i;
for (i=0; i<n; i++) {
DB *db = null_db;
r = db_create(&db, env, 0); assert(r == 0); assert(db != NULL);
if (verbose) printf("db %p brt %p\n", db, db->i->brt);
r = db->open(db, txn, "test.db", 0, DB_BTREE, DB_CREATE, S_IRWXU+S_IRWXG+S_IRWXO);
assert(r == 0);
DBT key, val;
int k = toku_htonl(i);
r = db->put(db, txn, dbt_init(&key, &k, sizeof k), dbt_init(&val, &i, sizeof i), 0);
assert(r == 0);
r = db->close(db, 0); assert(r == 0); db = null_db;
}
r = txn->commit(txn, 0); assert(r == 0); txn = null_txn;
// verify the db
root_fifo_verify(env, n);
// cleanup
r = env->close(env, 0); assert(r == 0); env = null_env;
}
int test_main(int argc, const char *argv[]) {
int i;
int n = -1;
// parse_args(argc, argv);
for (i = 1; i < argc; i++) {
if (strcmp(argv[i], "-v") == 0) {
verbose = 1;
continue;
}
if (strcmp(argv[i], "-n") == 0) {
if (i+1 < argc)
n = atoi(argv[++i]);
continue;
}
}
if (n >= 0)
root_fifo_1(n);
else
for (i=0; i<100; i++)
root_fifo_1(i);
return 0;
}