mtest4.c 4.22 KB
Newer Older
Howard Chu's avatar
Howard Chu committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
/* mtest4.c - memory-mapped database tester/toy */
/*
 * Copyright 2011 Howard Chu, Symas Corp.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted only as authorized by the OpenLDAP
 * Public License.
 *
 * A copy of this license is available in the file LICENSE in the
 * top-level directory of the distribution or, alternatively, at
 * <http://www.OpenLDAP.org/license.html>.
 */

/* Tests for sorted duplicate DBs with fixed-size keys */
#define _XOPEN_SOURCE 500		/* srandom(), random() */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
Howard Chu's avatar
Howard Chu committed
21
#include "lmdb.h"
Howard Chu's avatar
Howard Chu committed
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

int main(int argc,char * argv[])
{
	int i = 0, j = 0, rc;
	MDB_env *env;
	MDB_dbi dbi;
	MDB_val key, data;
	MDB_txn *txn;
	MDB_stat mst;
	MDB_cursor *cursor;
	int count;
	int *values;
	char sval[8];
	char kval[sizeof(int)];

	memset(sval, 0, sizeof(sval));

	count = 510;
	values = (int *)malloc(count*sizeof(int));

	for(i = 0;i<count;i++) {
		values[i] = i*5;
	}

	rc = mdb_env_create(&env);
	rc = mdb_env_set_mapsize(env, 10485760);
	rc = mdb_env_set_maxdbs(env, 4);
	rc = mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664);
50
	rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
	rc = mdb_open(txn, "id2", MDB_CREATE|MDB_DUPSORT|MDB_DUPFIXED, &dbi);

	key.mv_size = sizeof(int);
	key.mv_data = kval;
	data.mv_size = sizeof(sval);
	data.mv_data = sval;

	printf("Adding %d values\n", count);
	strcpy(kval, "001");
	for (i=0;i<count;i++) {
		sprintf(sval, "%07x", values[i]);
		rc = mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA);
		if (rc) j++;
	}
	if (j) printf("%d duplicates skipped\n", j);
	rc = mdb_txn_commit(txn);
	rc = mdb_env_stat(env, &mst);

	/* there should be one full page of dups now.
	 */
71
	rc = mdb_txn_begin(env, NULL, 1, &txn);
Howard Chu's avatar
Howard Chu committed
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
	rc = mdb_cursor_open(txn, dbi, &cursor);
	while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0) {
		printf("key: %p %.*s, data: %p %.*s\n",
			key.mv_data,  (int) key.mv_size,  (char *) key.mv_data,
			data.mv_data, (int) data.mv_size, (char *) data.mv_data);
	}
	mdb_cursor_close(cursor);
	mdb_txn_abort(txn);

	/* test all 3 branches of split code:
	 * 1: new key in lower half
	 * 2: new key at split point
	 * 3: new key in upper half
	 */

	key.mv_size = sizeof(int);
	key.mv_data = kval;
	data.mv_size = sizeof(sval);
	data.mv_data = sval;

	sprintf(sval, "%07x", values[3]+1);
93
	rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
94
95
96
97
	rc = mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA);
	mdb_txn_abort(txn);

	sprintf(sval, "%07x", values[255]+1);
98
	rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
99
100
101
102
	rc = mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA);
	mdb_txn_abort(txn);

	sprintf(sval, "%07x", values[500]+1);
103
	rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
104
105
106
107
	rc = mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA);
	rc = mdb_txn_commit(txn);

	/* Try MDB_NEXT_MULTIPLE */
108
	rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
109
110
111
112
113
114
115
116
117
118
119
120
121
	rc = mdb_cursor_open(txn, dbi, &cursor);
	while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT_MULTIPLE)) == 0) {
		printf("key: %.*s, data: %.*s\n",
			(int) key.mv_size,  (char *) key.mv_data,
			(int) data.mv_size, (char *) data.mv_data);
	}
	mdb_cursor_close(cursor);
	mdb_txn_abort(txn);
	j=0;

	for (i= count - 1; i > -1; i-= (random()%3)) {
		j++;
		txn=NULL;
122
		rc = mdb_txn_begin(env, NULL, 0, &txn);
Howard Chu's avatar
Howard Chu committed
123
124
125
126
127
		sprintf(sval, "%07x", values[i]);
		key.mv_size = sizeof(int);
		key.mv_data = kval;
		data.mv_size = sizeof(sval);
		data.mv_data = sval;
128
		rc = mdb_del(txn, dbi, &key, &data);
Howard Chu's avatar
Howard Chu committed
129
130
131
132
133
134
135
136
137
138
139
		if (rc) {
			j--;
			mdb_txn_abort(txn);
		} else {
			rc = mdb_txn_commit(txn);
		}
	}
	free(values);
	printf("Deleted %d values\n", j);

	rc = mdb_env_stat(env, &mst);
140
	rc = mdb_txn_begin(env, NULL, 1, &txn);
Howard Chu's avatar
Howard Chu committed
141
142
143
144
145
146
147
148
149
150
151
152
153
154
	rc = mdb_cursor_open(txn, dbi, &cursor);
	printf("Cursor next\n");
	while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0) {
		printf("key: %.*s, data: %.*s\n",
			(int) key.mv_size,  (char *) key.mv_data,
			(int) data.mv_size, (char *) data.mv_data);
	}
	printf("Cursor prev\n");
	while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_PREV)) == 0) {
		printf("key: %.*s, data: %.*s\n",
			(int) key.mv_size,  (char *) key.mv_data,
			(int) data.mv_size, (char *) data.mv_data);
	}
	mdb_cursor_close(cursor);
Howard Chu's avatar
Howard Chu committed
155
	mdb_close(env, dbi);
Howard Chu's avatar
Howard Chu committed
156
157
158
159
160
161

	mdb_txn_abort(txn);
	mdb_env_close(env);

	return 0;
}