mdb.c 128 KB
Newer Older
1
2
3
4
5
6
/** @file mdb.c
 *	@brief memory-mapped database library
 *
 *	A Btree-based database management library modeled loosely on the
 *	BerkeleyDB API, but much simplified.
 */
Howard Chu's avatar
Howard Chu committed
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
/*
 * 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>.
 *
 * This code is derived from btree.c written by Martin Hedenfalk.
 *
 * Copyright (c) 2009, 2010 Martin Hedenfalk <martin@bzero.se>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */
Howard Chu's avatar
Howard Chu committed
35
36
37
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/param.h>
Howard Chu's avatar
Howard Chu committed
38
39
40
#ifdef _WIN32
#include <windows.h>
#else
Howard Chu's avatar
Howard Chu committed
41
42
43
44
45
#include <sys/uio.h>
#include <sys/mman.h>
#ifdef HAVE_SYS_FILE_H
#include <sys/file.h>
#endif
Howard Chu's avatar
Howard Chu committed
46
#include <fcntl.h>
Howard Chu's avatar
Howard Chu committed
47
#endif
Howard Chu's avatar
Howard Chu committed
48
49
50
51
52
53
54
55
56
57

#include <assert.h>
#include <errno.h>
#include <stddef.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <unistd.h>
58
59
60
61
62
63
64
65
66
67
68
69

#ifndef _WIN32
#include <pthread.h>
#endif

#include "mdb.h"
#include "midl.h"

/** @defgroup internal	MDB Internals
 *	@{
 */
/** @defgroup compat	Windows Compatibility Macros
Howard Chu's avatar
Howard Chu committed
70
71
72
73
 *	A bunch of macros to minimize the amount of platform-specific ifdefs
 *	needed throughout the rest of the code. When the features this library
 *	needs are similar enough to POSIX to be hidden in a one-or-two line
 *	replacement, this macro approach is used.
74
75
 *	@{
 */
Howard Chu's avatar
Howard Chu committed
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
#ifdef _WIN32
#define pthread_t	DWORD
#define pthread_mutex_t	HANDLE
#define pthread_key_t	DWORD
#define pthread_self()	GetCurrentThreadId()
#define pthread_key_create(x,y)	*(x) = TlsAlloc()
#define pthread_key_delete(x)	TlsFree(x)
#define pthread_getspecific(x)	TlsGetValue(x)
#define pthread_setspecific(x,y)	TlsSetValue(x,y)
#define pthread_mutex_unlock(x)	ReleaseMutex(x)
#define pthread_mutex_lock(x)	WaitForSingleObject(x, INFINITE)
#define LOCK_MUTEX_R(env)	pthread_mutex_lock(env->me_rmutex)
#define UNLOCK_MUTEX_R(env)	pthread_mutex_unlock(env->me_rmutex)
#define LOCK_MUTEX_W(env)	pthread_mutex_lock(env->me_wmutex)
#define UNLOCK_MUTEX_W(env)	pthread_mutex_unlock(env->me_wmutex)
#define getpid()	GetCurrentProcessId()
#define	fdatasync(fd)	!FlushFileBuffers(fd)
#define	ErrCode()	GetLastError()
#define GetPageSize(x)	{SYSTEM_INFO si; GetSystemInfo(&si); (x) = si.dwPageSize;}
#define	close(fd)	CloseHandle(fd)
#define	munmap(ptr,len)	UnmapViewOfFile(ptr)
#else
Howard Chu's avatar
Howard Chu committed
98
99
	/** Lock the reader mutex.
	 */
100
#define LOCK_MUTEX_R(env)	pthread_mutex_lock(&env->me_txns->mti_mutex)
Howard Chu's avatar
Howard Chu committed
101
102
	/** Unlock the reader mutex.
	 */
103
#define UNLOCK_MUTEX_R(env)	pthread_mutex_unlock(&env->me_txns->mti_mutex)
Howard Chu's avatar
Howard Chu committed
104
105
106
107
108

	/** Lock the writer mutex.
	 *	Only a single write transaction is allowed at a time. Other writers
	 *	will block waiting for this mutex.
	 */
109
#define LOCK_MUTEX_W(env)	pthread_mutex_lock(&env->me_txns->mti_wmutex)
Howard Chu's avatar
Howard Chu committed
110
111
	/** Unlock the writer mutex.
	 */
112
#define UNLOCK_MUTEX_W(env)	pthread_mutex_unlock(&env->me_txns->mti_wmutex)
Howard Chu's avatar
Howard Chu committed
113
114
115

	/** Get the error code for the last failed system function.
	 */
Howard Chu's avatar
Howard Chu committed
116
#define	ErrCode()	errno
Howard Chu's avatar
Howard Chu committed
117
118
119
120
121

	/** An abstraction for a file handle.
	 *	On POSIX systems file handles are small integers. On Windows
	 *	they're opaque pointers.
	 */
Howard Chu's avatar
Howard Chu committed
122
#define	HANDLE	int
Howard Chu's avatar
Howard Chu committed
123
124
125
126
127

	/**	A value for an invalid file handle.
	 *	Mainly used to initialize file variables and signify that they are
	 *	unused.
	 */
Howard Chu's avatar
Howard Chu committed
128
#define INVALID_HANDLE_VALUE	-1
Howard Chu's avatar
Howard Chu committed
129
130
131
132
133

	/** Get the size of a memory page for the system.
	 *	This is the basic size that the platform's memory manager uses, and is
	 *	fundamental to the use of memory-mapped files.
	 */
Howard Chu's avatar
Howard Chu committed
134
135
#define	GetPageSize(x)	(x) = sysconf(_SC_PAGE_SIZE)
#endif
Howard Chu's avatar
Howard Chu committed
136

137
/** @} */
Howard Chu's avatar
Howard Chu committed
138

139
#ifndef _WIN32
Howard Chu's avatar
Howard Chu committed
140
141
142
143
144
145
/**	A flag for opening a file and requesting synchronous data writes.
 *	This is only used when writing a meta page. It's not strictly needed;
 *	we could just do a normal write and then immediately perform a flush.
 *	But if this flag is available it saves us an extra system call.
 *
 *	@note If O_DSYNC is undefined but exists in /usr/include,
Hallvard Furuseth's avatar
Hallvard Furuseth committed
146
147
148
149
150
151
 * preferably set some compiler flag to get the definition.
 * Otherwise compile with the less efficient -DMDB_DSYNC=O_SYNC.
 */
#ifndef MDB_DSYNC
# define MDB_DSYNC	O_DSYNC
#endif
152
153
#endif

Howard Chu's avatar
Howard Chu committed
154
155
156
157
158
159
160
161
	/** A page number in the database.
	 *	Note that 64 bit page numbers are overkill, since pages themselves
	 *	already represent 12-13 bits of addressable memory, and the OS will
	 *	always limit applications to a maximum of 63 bits of address space.
	 *
	 *	@note In the #MDB_node structure, we only store 48 bits of this value,
	 *	which thus limits us to only 60 bits of addressable data.
	 */
162
typedef ULONG		pgno_t;
Hallvard Furuseth's avatar
Hallvard Furuseth committed
163

Howard Chu's avatar
Howard Chu committed
164
165
166
/** @defgroup debug	Debug Macros
 *	@{
 */
167
#ifndef DEBUG
Howard Chu's avatar
Howard Chu committed
168
169
170
171
	/**	Enable debug output.
	 *	Set this to 1 for copious tracing. Set to 2 to add dumps of all IDLs
	 *	read from and written to the database (used for free space management).
	 */
172
#define DEBUG 0
173
#endif
Howard Chu's avatar
Howard Chu committed
174

175
176
177
#if !(__STDC_VERSION__ >= 199901L || defined(__GNUC__))
# define DPRINTF	(void)	/* Vararg macros may be unsupported */
#elif DEBUG
Howard Chu's avatar
Howard Chu committed
178
179
	/**	Print a debug message with printf formatting. */
# define DPRINTF(fmt, ...)	/**< Requires 2 or more args */ \
Howard Chu's avatar
Howard Chu committed
180
	fprintf(stderr, "%s:%d:(%p) " fmt "\n", __func__, __LINE__, pthread_self(), __VA_ARGS__)
Howard Chu's avatar
Howard Chu committed
181
#else
182
# define DPRINTF(fmt, ...)	((void) 0)
Howard Chu's avatar
Howard Chu committed
183
#endif
Howard Chu's avatar
Howard Chu committed
184
185
186
	/**	Print a debug string.
	 *	The string is printed literally, with no format processing.
	 */
187
#define DPUTS(arg)	DPRINTF("%s", arg)
Howard Chu's avatar
Howard Chu committed
188
/** @} */
Howard Chu's avatar
Howard Chu committed
189

Howard Chu's avatar
Howard Chu committed
190
191
192
193
194
195
196
197
198
199
200
201
	/** A default memory page size.
	 *	The actual size is platform-dependent, but we use this for
	 *	boot-strapping. We probably should not be using this any more.
	 *	The #GetPageSize() macro is used to get the actual size.
	 *
	 *	Note that we don't currently support Huge pages. On Linux,
	 *	regular data files cannot use Huge pages, and in general
	 *	Huge pages aren't actually pageable. We rely on the OS
	 *	demand-pager to read our data and page it out when memory
	 *	pressure from other processes is high. So until OSs have
	 *	actual paging support for Huge pages, they're not viable.
	 */
Howard Chu's avatar
Howard Chu committed
202
#define PAGESIZE	 4096
Howard Chu's avatar
Howard Chu committed
203
204
205
206
207
208
209
210
211
212
213
214
215

	/** The minimum number of keys required in a database page.
	 *	Setting this to a larger value will place a smaller bound on the
	 *	maximum size of a data item. Data items larger than this size will
	 *	be pushed into overflow pages instead of being stored directly in
	 *	the B-tree node. This value used to default to 4. With a page size
	 *	of 4096 bytes that meant that any item larger than 1024 bytes would
	 *	go into an overflow page. That also meant that on average 2-3KB of
	 *	each overflow page was wasted space. The value cannot be lower than
	 *	2 because then there would no longer be a tree structure. With this
	 *	value, items larger than 2KB will go into overflow pages, and on
	 *	average only 1KB will be wasted.
	 */
Howard Chu's avatar
Howard Chu committed
216
#define MDB_MINKEYS	 2
Howard Chu's avatar
Howard Chu committed
217
218
219
220
221

	/**	A stamp that identifies a file as an MDB file.
	 *	There's nothing special about this value other than that it is easily
	 *	recognizable, and it will reflect any byte order mismatches.
	 */
Howard Chu's avatar
Howard Chu committed
222
#define MDB_MAGIC	 0xBEEFC0DE
Howard Chu's avatar
Howard Chu committed
223
224

	/**	The version number for a database's file format. */
Howard Chu's avatar
Howard Chu committed
225
#define MDB_VERSION	 1
Howard Chu's avatar
Howard Chu committed
226
227
228
229
230
231

	/**	The maximum size of a key in the database.
	 *	While data items have essentially unbounded size, we require that
	 *	keys all fit onto a regular page. This limit could be raised a bit
	 *	further if needed; to something just under #PAGESIZE / #MDB_MINKEYS.
	 */
Howard Chu's avatar
Howard Chu committed
232
#define MAXKEYSIZE	 511
Howard Chu's avatar
Howard Chu committed
233

Howard Chu's avatar
Howard Chu committed
234
#if DEBUG
Howard Chu's avatar
Howard Chu committed
235
236
237
238
239
240
241
242
243
	/**	A key buffer.
	 *	@ingroup debug
	 *	This is used for printing a hex dump of a key's contents.
	 */
#define DKBUF	char kbuf[(MAXKEYSIZE*2+1)]
	/**	Display a key in hex.
	 *	@ingroup debug
	 *	Invoke a function to display a key in hex.
	 */
Howard Chu's avatar
Howard Chu committed
244
245
246
247
248
#define	DKEY(x)	mdb_dkey(x, kbuf)
#else
#define	DKBUF
#define DKEY(x)
#endif
Howard Chu's avatar
Howard Chu committed
249

Howard Chu's avatar
Howard Chu committed
250
251
252
253
254
/**	@defgroup lazylock	Lazy Locking
 *	Macros for locks that are't actually needed.
 *	The DB view is always consistent because all writes are wrapped in
 *	the wmutex. Finer-grained locks aren't necessary.
 *	@{
Howard Chu's avatar
Howard Chu committed
255
256
 */
#ifndef	LAZY_LOCKS
Howard Chu's avatar
Howard Chu committed
257
	/**	Use lazy locking. I.e., don't lock these accesses at all. */
Howard Chu's avatar
Howard Chu committed
258
259
260
#define	LAZY_LOCKS	1
#endif
#if	LAZY_LOCKS
Howard Chu's avatar
Howard Chu committed
261
	/** Grab the reader lock */
Howard Chu's avatar
Howard Chu committed
262
#define	LAZY_MUTEX_LOCK(x)
Howard Chu's avatar
Howard Chu committed
263
	/** Release the reader lock */
Howard Chu's avatar
Howard Chu committed
264
#define	LAZY_MUTEX_UNLOCK(x)
Howard Chu's avatar
Howard Chu committed
265
	/** Release the DB table reader/writer lock */
Howard Chu's avatar
Howard Chu committed
266
#define	LAZY_RWLOCK_UNLOCK(x)
Howard Chu's avatar
Howard Chu committed
267
	/** Grab the DB table write lock */
Howard Chu's avatar
Howard Chu committed
268
#define	LAZY_RWLOCK_WRLOCK(x)
Howard Chu's avatar
Howard Chu committed
269
	/** Grab the DB table read lock */
Howard Chu's avatar
Howard Chu committed
270
#define	LAZY_RWLOCK_RDLOCK(x)
Howard Chu's avatar
Howard Chu committed
271
	/** Declare the DB table rwlock */
Howard Chu's avatar
Howard Chu committed
272
#define	LAZY_RWLOCK_DEF(x)
Howard Chu's avatar
Howard Chu committed
273
	/** Initialize the DB table rwlock */
Howard Chu's avatar
Howard Chu committed
274
#define	LAZY_RWLOCK_INIT(x,y)
Howard Chu's avatar
Howard Chu committed
275
	/**	Destroy the DB table rwlock */
Howard Chu's avatar
Howard Chu committed
276
277
278
279
280
281
282
283
284
285
286
#define	LAZY_RWLOCK_DESTROY(x)
#else
#define	LAZY_MUTEX_LOCK(x)		pthread_mutex_lock(x)
#define	LAZY_MUTEX_UNLOCK(x)	pthread_mutex_unlock(x)
#define	LAZY_RWLOCK_UNLOCK(x)	pthread_rwlock_unlock(x)
#define	LAZY_RWLOCK_WRLOCK(x)	pthread_rwlock_wrlock(x)
#define	LAZY_RWLOCK_RDLOCK(x)	pthread_rwlock_rdlock(x)
#define	LAZY_RWLOCK_DEF(x)		pthread_rwlock_t	x
#define	LAZY_RWLOCK_INIT(x,y)	pthread_rwlock_init(x,y)
#define	LAZY_RWLOCK_DESTROY(x)	pthread_rwlock_destroy(x)
#endif
Howard Chu's avatar
Howard Chu committed
287
/** @} */
Howard Chu's avatar
Howard Chu committed
288

Howard Chu's avatar
Howard Chu committed
289
290
291
	/** An invalid page number.
	 *	Mainly used to denote an empty tree.
	 */
Hallvard Furuseth's avatar
Hallvard Furuseth committed
292
#define P_INVALID	 (~0UL)
Howard Chu's avatar
Howard Chu committed
293

Howard Chu's avatar
Howard Chu committed
294
	/** Test if a flag \b f is set in a flag word \b w. */
Howard Chu's avatar
Howard Chu committed
295
296
#define F_ISSET(w, f)	 (((w) & (f)) == (f))

Howard Chu's avatar
Howard Chu committed
297
298
299
300
	/**	Used for offsets within a single page.
	 *	Since memory pages are typically 4 or 8KB in size, 12-13 bits,
	 *	this is plenty.
	 */
Howard Chu's avatar
Howard Chu committed
301
302
typedef uint16_t	 indx_t;

Howard Chu's avatar
Howard Chu committed
303
304
305
306
	/**	Default size of memory map.
	 *	This is certainly too small for any actual applications. Apps should always set
	 *	the size explicitly using #mdb_env_set_mapsize().
	 */
Howard Chu's avatar
Howard Chu committed
307
308
#define DEFAULT_MAPSIZE	1048576

Howard Chu's avatar
Howard Chu committed
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
/**	@defgroup readers	Reader Lock Table
 *	Readers don't acquire any locks for their data access. Instead, they
 *	simply record their transaction ID in the reader table. The reader
 *	mutex is needed just to find an empty slot in the reader table. The
 *	slot's address is saved in thread-specific data so that subsequent read
 *	transactions started by the same thread need no further locking to proceed.
 *
 *	Since the database uses multi-version concurrency control, readers don't
 *	actually need any locking. This table is used to keep track of which
 *	readers are using data from which old transactions, so that we'll know
 *	when a particular old transaction is no longer in use, Old transactions
 *	that have freed any data pages can then have their freed pages reclaimed
 *	for use by a later write transaction.
 *
 *	The lock table is constructed such that reader slots are aligned with the
 *	processor's cache line size. Any slot is only ever used by one thread.
 *	This alignment guarantees that there will be no contention or cache
 *	thrashing as threads update their own slot info, and also eliminates
 *	any need for locking when accessing a slot.
 *
 *	A writer thread will scan every slot in the table to determine the oldest
 *	outstanding reader transaction. Any freed pages older than this will be
 *	reclaimed by the writer. The writer doesn't use any locks when scanning
 *	this table. This means that there's no guarantee that the writer will
 *	see the most up-to-date reader info, but that's not required for correct
 *	operation - all we need is to know the upper bound on the oldest reader,
 *	we don't care at all about the newest reader. So the only consequence of
 *	reading stale information here is that old pages might hang around a
 *	while longer before being reclaimed. That's actually good anyway, because
 *	the longer we delay reclaiming old pages, the more likely it is that a
 *	string of contiguous pages can be found after coalescing old pages from
 *	many old transactions together.
 *
 *	@todo We don't actually do such coalescing yet, we grab pages from one
 *	old transaction at a time.
 *	@{
 */
	/**	Number of slots in the reader table.
	 *	This value was chosen somewhat arbitrarily. 126 readers plus a
	 *	couple mutexes fit exactly into 8KB on my development machine.
	 *	Applications should set the table size using #mdb_env_set_maxreaders().
	 */
#define DEFAULT_READERS	126

	/**	The size of a CPU cache line in bytes. We want our lock structures
	 *	aligned to this size to avoid false cache line sharing in the
	 *	lock table.
	 *	This value works for most CPUs. For Itanium this should be 128.
	 */
Howard Chu's avatar
Howard Chu committed
358
#ifndef CACHELINE
Howard Chu's avatar
Howard Chu committed
359
#define CACHELINE	64
Howard Chu's avatar
Howard Chu committed
360
361
#endif

Howard Chu's avatar
Howard Chu committed
362
363
364
365
366
367
368
369
	/**	The information we store in a single slot of the reader table.
	 *	In addition to a transaction ID, we also record the process and
	 *	thread ID that owns a slot, so that we can detect stale information,
	 *	e.g. threads or processes that went away without cleaning up.
	 *	@note We currently don't check for stale records. We simply re-init
	 *	the table when we know that we're the only process opening the
	 *	lock file.
	 */
Howard Chu's avatar
Howard Chu committed
370
typedef struct MDB_rxbody {
Howard Chu's avatar
Howard Chu committed
371
372
373
374
375
376
377
	/**	The current Transaction ID when this transaction began.
	 *	Multiple readers that start at the same time will probably have the
	 *	same ID here. Again, it's not important to exclude them from
	 *	anything; all we need to know is which version of the DB they
	 *	started from so we can avoid overwriting any data used in that
	 *	particular version.
	 */
Howard Chu's avatar
Howard Chu committed
378
	ULONG		mrb_txnid;
Howard Chu's avatar
Howard Chu committed
379
	/** The process ID of the process owning this reader txn. */
Howard Chu's avatar
Howard Chu committed
380
	pid_t		mrb_pid;
Howard Chu's avatar
Howard Chu committed
381
	/** The thread ID of the thread owning this txn. */
Howard Chu's avatar
Howard Chu committed
382
383
384
	pthread_t	mrb_tid;
} MDB_rxbody;

Howard Chu's avatar
Howard Chu committed
385
	/** The actual reader record, with cacheline padding. */
Howard Chu's avatar
Howard Chu committed
386
typedef struct MDB_reader {
Howard Chu's avatar
Howard Chu committed
387
388
	union {
		MDB_rxbody mrx;
Howard Chu's avatar
Howard Chu committed
389
		/** shorthand for mrb_txnid */
Howard Chu's avatar
Howard Chu committed
390
391
392
#define	mr_txnid	mru.mrx.mrb_txnid
#define	mr_pid	mru.mrx.mrb_pid
#define	mr_tid	mru.mrx.mrb_tid
Howard Chu's avatar
Howard Chu committed
393
		/** cache line alignment */
Howard Chu's avatar
Howard Chu committed
394
395
		char pad[(sizeof(MDB_rxbody)+CACHELINE-1) & ~(CACHELINE-1)];
	} mru;
Howard Chu's avatar
Howard Chu committed
396
397
} MDB_reader;

Howard Chu's avatar
Howard Chu committed
398
399
400
401
402
403
404
405
406
407
408
	/** The header for the reader table.
	 *	The table resides in a memory-mapped file. (This is a different file
	 *	than is used for the main database.)
	 *
	 *	For POSIX the actual mutexes reside in the shared memory of this
	 *	mapped file. On Windows, mutexes are named objects allocated by the
	 *	kernel; we store the mutex names in this mapped file so that other
	 *	processes can grab them. This same approach will also be used on
	 *	MacOSX/Darwin (using named semaphores) since MacOSX doesn't support
	 *	process-shared POSIX mutexes.
	 */
Howard Chu's avatar
Howard Chu committed
409
typedef struct MDB_txbody {
Howard Chu's avatar
Howard Chu committed
410
411
		/** Stamp identifying this as an MDB lock file. It must be set
		 *	to #MDB_MAGIC. */
Howard Chu's avatar
Howard Chu committed
412
	uint32_t	mtb_magic;
Howard Chu's avatar
Howard Chu committed
413
		/** Version number of this lock file. Must be set to #MDB_VERSION. */
Howard Chu's avatar
Howard Chu committed
414
	uint32_t	mtb_version;
Howard Chu's avatar
Howard Chu committed
415
416
417
#ifdef _WIN32
	char	mtb_rmname[32];
#else
Howard Chu's avatar
Howard Chu committed
418
419
420
		/** Mutex protecting access to this table.
		 *	This is the reader lock that #LOCK_MUTEX_R acquires.
		 */
Howard Chu's avatar
Howard Chu committed
421
	pthread_mutex_t	mtb_mutex;
Howard Chu's avatar
Howard Chu committed
422
#endif
Howard Chu's avatar
Howard Chu committed
423
424
425
426
		/**	The ID of the last transaction committed to the database.
		 *	This is recorded here only for convenience; the value can always
		 *	be determined by reading the main database meta pages.
		 */
Howard Chu's avatar
Howard Chu committed
427
	ULONG		mtb_txnid;
Howard Chu's avatar
Howard Chu committed
428
429
430
431
		/** The number of slots that have been used in the reader table.
		 *	This always records the maximum count, it is not decremented
		 *	when readers release their slots.
		 */
Howard Chu's avatar
Howard Chu committed
432
	uint32_t	mtb_numreaders;
Howard Chu's avatar
Howard Chu committed
433
434
435
436
		/**	The ID of the most recent meta page in the database.
		 *	This is recorded here only for convenience; the value can always
		 *	be determined by reading the main database meta pages.
		 */
Howard Chu's avatar
Howard Chu committed
437
	uint32_t	mtb_me_toggle;
Howard Chu's avatar
Howard Chu committed
438
439
} MDB_txbody;

Howard Chu's avatar
Howard Chu committed
440
	/** The actual reader table definition. */
Howard Chu's avatar
Howard Chu committed
441
typedef struct MDB_txninfo {
Howard Chu's avatar
Howard Chu committed
442
443
444
445
446
	union {
		MDB_txbody mtb;
#define mti_magic	mt1.mtb.mtb_magic
#define mti_version	mt1.mtb.mtb_version
#define mti_mutex	mt1.mtb.mtb_mutex
Howard Chu's avatar
Howard Chu committed
447
#define mti_rmname	mt1.mtb.mtb_rmname
Howard Chu's avatar
Howard Chu committed
448
449
#define mti_txnid	mt1.mtb.mtb_txnid
#define mti_numreaders	mt1.mtb.mtb_numreaders
Howard Chu's avatar
Howard Chu committed
450
#define mti_me_toggle	mt1.mtb.mtb_me_toggle
Howard Chu's avatar
Howard Chu committed
451
452
453
		char pad[(sizeof(MDB_txbody)+CACHELINE-1) & ~(CACHELINE-1)];
	} mt1;
	union {
Howard Chu's avatar
Howard Chu committed
454
455
456
457
#ifdef _WIN32
		char mt2_wmname[32];
#define	mti_wmname	mt2.mt2_wmname
#else
Howard Chu's avatar
Howard Chu committed
458
459
		pthread_mutex_t	mt2_wmutex;
#define mti_wmutex	mt2.mt2_wmutex
Howard Chu's avatar
Howard Chu committed
460
#endif
Howard Chu's avatar
Howard Chu committed
461
462
463
		char pad[(sizeof(pthread_mutex_t)+CACHELINE-1) & ~(CACHELINE-1)];
	} mt2;
	MDB_reader	mti_readers[1];
Howard Chu's avatar
Howard Chu committed
464
} MDB_txninfo;
Howard Chu's avatar
Howard Chu committed
465
/** @} */
Howard Chu's avatar
Howard Chu committed
466

Howard Chu's avatar
Howard Chu committed
467
468
/** Common header for all page types.
 * Overflow pages occupy a number of contiguous pages with no
Howard Chu's avatar
Howard Chu committed
469
470
 * headers on any page after the first.
 */
Howard Chu's avatar
Howard Chu committed
471
472
473
474
475
476
477
478
479
480
481
typedef struct MDB_page {
	union {
		pgno_t		mp_pgno;	/**< page number */
		void *		mp_next;	/**< for in-memory list of freed structs */
	};
#define	P_BRANCH	 0x01		/**< branch page */
#define	P_LEAF		 0x02		/**< leaf page */
#define	P_OVERFLOW	 0x04		/**< overflow page */
#define	P_META		 0x08		/**< meta page */
#define	P_DIRTY		 0x10		/**< dirty page */
#define	P_LEAF2		 0x20		/**< for #MDB_DUPFIXED records */
Howard Chu's avatar
Howard Chu committed
482
	uint32_t	mp_flags;
Howard Chu's avatar
Howard Chu committed
483
	union {
Howard Chu's avatar
Howard Chu committed
484
		struct {
Howard Chu's avatar
Howard Chu committed
485
486
487
488
489
490
			indx_t		mp_lower;		/**< lower bound of free space */
			indx_t		mp_upper;		/**< upper bound of free space */
		};
		uint32_t	mp_pages;	/**< number of overflow pages */
	};
	indx_t		mp_ptrs[1];		/**< dynamic size */
Howard Chu's avatar
Howard Chu committed
491
492
} MDB_page;

Howard Chu's avatar
Howard Chu committed
493
	/** Size of the page header, excluding dynamic data at the end */
494
#define PAGEHDRSZ	 ((unsigned) offsetof(MDB_page, mp_ptrs))
Howard Chu's avatar
Howard Chu committed
495

Howard Chu's avatar
Howard Chu committed
496
497
498
499
	/** Address of first usable data byte in a page, after the header */
#define METADATA(p)	 ((void *)((char *)(p) + PAGEHDRSZ))

	/** Number of nodes on a page */
Howard Chu's avatar
Howard Chu committed
500
#define NUMKEYS(p)	 (((p)->mp_lower - PAGEHDRSZ) >> 1)
Howard Chu's avatar
Howard Chu committed
501
502

	/** The amount of space remaining in the page */
Howard Chu's avatar
Howard Chu committed
503
#define SIZELEFT(p)	 (indx_t)((p)->mp_upper - (p)->mp_lower)
Howard Chu's avatar
Howard Chu committed
504
505

	/** The percentage of space used in the page, in tenths of a percent. */
Howard Chu's avatar
Howard Chu committed
506
507
#define PAGEFILL(env, p) (1000L * ((env)->me_psize - PAGEHDRSZ - SIZELEFT(p)) / \
				((env)->me_psize - PAGEHDRSZ))
Howard Chu's avatar
Howard Chu committed
508
509
510
511
512
513
	/** The minimum page fill factor, in tenths of a percent.
	 *	Pages emptier than this are candidates for merging.
	 */
#define FILL_THRESHOLD	 250

	/** Test if a page is a leaf page */
Howard Chu's avatar
Howard Chu committed
514
#define IS_LEAF(p)	 F_ISSET((p)->mp_flags, P_LEAF)
Howard Chu's avatar
Howard Chu committed
515
	/** Test if a page is a LEAF2 page */
Howard Chu's avatar
Howard Chu committed
516
#define IS_LEAF2(p)	 F_ISSET((p)->mp_flags, P_LEAF2)
Howard Chu's avatar
Howard Chu committed
517
	/** Test if a page is a branch page */
Howard Chu's avatar
Howard Chu committed
518
#define IS_BRANCH(p)	 F_ISSET((p)->mp_flags, P_BRANCH)
Howard Chu's avatar
Howard Chu committed
519
	/** Test if a page is an overflow page */
Howard Chu's avatar
Howard Chu committed
520
521
#define IS_OVERFLOW(p)	 F_ISSET((p)->mp_flags, P_OVERFLOW)

Howard Chu's avatar
Howard Chu committed
522
	/** The number of overflow pages needed to store the given size. */
523
#define OVPAGES(size, psize)	((PAGEHDRSZ-1 + (size)) / (psize) + 1)
Howard Chu's avatar
Howard Chu committed
524

Howard Chu's avatar
Howard Chu committed
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
	/** Header for a single key/data pair within a page.
	 * We guarantee 2-byte alignment for nodes.
	 */
typedef struct MDB_node {
	/** lo and hi are used for data size on leaf nodes and for
	 * child pgno on branch nodes. On 64 bit platforms, flags
	 * is also used for pgno. (branch nodes ignore flags)
	 */
	unsigned short	mn_lo;
	unsigned short	mn_hi;			/**< part of dsize or pgno */
	unsigned short	mn_flags;		/**< flags for special node types */
#define F_BIGDATA	 0x01			/**< data put on overflow page */
#define F_SUBDATA	 0x02			/**< data is a sub-database */
#define F_DUPDATA	 0x04			/**< data has duplicates */
	unsigned short	mn_ksize;		/**< key size */
	char		mn_data[1];			/**< key and data are appended here */
} MDB_node;

	/** Size of the node header, excluding dynamic data at the end */
#define NODESIZE	 offsetof(MDB_node, mn_data)

Howard Chu's avatar
Howard Chu committed
546
	/** Size of a node in a branch page with a given key.
Howard Chu's avatar
Howard Chu committed
547
548
549
550
	 *	This is just the node header plus the key, there is no data.
	 */
#define INDXSIZE(k)	 (NODESIZE + ((k) == NULL ? 0 : (k)->mv_size))

Howard Chu's avatar
Howard Chu committed
551
	/** Size of a node in a leaf page with a given key and data.
Howard Chu's avatar
Howard Chu committed
552
553
554
555
	 *	This is node header plus key plus data size.
	 */
#define LEAFSIZE(k, d)	 (NODESIZE + (k)->mv_size + (d)->mv_size)

Howard Chu's avatar
Howard Chu committed
556
	/** Address of node \b i in page \b p */
Howard Chu's avatar
Howard Chu committed
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
#define NODEPTR(p, i)	 ((MDB_node *)((char *)(p) + (p)->mp_ptrs[i]))

	/** Address of the key for the node */
#define NODEKEY(node)	 (void *)((node)->mn_data)

	/** Address of the data for a node */
#define NODEDATA(node)	 (void *)((char *)(node)->mn_data + (node)->mn_ksize)

	/** Get the page number pointed to by a branch node */
#if LONG_MAX == 0x7fffffff
#define NODEPGNO(node)	 ((node)->mn_lo | ((node)->mn_hi << 16))
	/** Set the page number in a branch node */
#define SETPGNO(node,pgno)	do { \
	(node)->mn_lo = (pgno) & 0xffff; (node)->mn_hi = (pgno) >> 16;} while(0)
#else
#define NODEPGNO(node)	 ((node)->mn_lo | ((node)->mn_hi << 16) | ((unsigned long)(node)->mn_flags << 32))
	/** Set the page number in a branch node */
#define SETPGNO(node,pgno)	do { \
	(node)->mn_lo = (pgno) & 0xffff; (node)->mn_hi = (pgno) >> 16; \
	(node)->mn_flags = (pgno) >> 32; } while(0)
#endif

	/** Get the size of the data in a leaf node */
#define NODEDSZ(node)	 ((node)->mn_lo | ((unsigned)(node)->mn_hi << 16))
	/** Set the size of the data for a leaf node */
#define SETDSZ(node,size)	do { \
	(node)->mn_lo = (size) & 0xffff; (node)->mn_hi = (size) >> 16;} while(0)
	/** The size of a key in a node */
#define NODEKSZ(node)	 ((node)->mn_ksize)

	/** The address of a key in a LEAF2 page.
	 *	LEAF2 pages are used for #MDB_DUPFIXED sorted-duplicate sub-DBs.
	 *	There are no node headers, keys are stored contiguously.
	 */
#define LEAF2KEY(p, i, ks)	((char *)(p) + PAGEHDRSZ + ((i)*(ks)))

	/** Set the \b node's key into \b key, if requested. */
#define MDB_SET_KEY(node, key)	if (key!=NULL) {(key)->mv_size = NODEKSZ(node); (key)->mv_data = NODEKEY(node);}

	/** Information about a single database in the environment. */
Howard Chu's avatar
Howard Chu committed
597
typedef struct MDB_db {
Howard Chu's avatar
Howard Chu committed
598
599
600
601
602
603
604
605
	uint32_t	md_pad;		/**< also ksize for LEAF2 pages */
	uint16_t	md_flags;	/**< @ref mdb_open */
	uint16_t	md_depth;	/**< depth of this tree */
	ULONG		md_branch_pages;	/**< number of internal pages */
	ULONG		md_leaf_pages;		/**< number of leaf pages */
	ULONG		md_overflow_pages;	/**< number of overflow pages */
	ULONG		md_entries;		/**< number of data items */
	pgno_t		md_root;		/**< the root page of this tree */
Howard Chu's avatar
Howard Chu committed
606
607
} MDB_db;

Howard Chu's avatar
Howard Chu committed
608
	/** Handle for the DB used to track free pages. */
Howard Chu's avatar
Howard Chu committed
609
#define	FREE_DBI	0
Howard Chu's avatar
Howard Chu committed
610
	/** Handle for the default DB. */
Howard Chu's avatar
Howard Chu committed
611
612
#define	MAIN_DBI	1

Howard Chu's avatar
Howard Chu committed
613
614
615
616
	/** Meta page content. */
typedef struct MDB_meta {
		/** Stamp identifying this as an MDB data file. It must be set
		 *	to #MDB_MAGIC. */
Howard Chu's avatar
Howard Chu committed
617
	uint32_t	mm_magic;
Howard Chu's avatar
Howard Chu committed
618
		/** Version number of this lock file. Must be set to #MDB_VERSION. */
Howard Chu's avatar
Howard Chu committed
619
	uint32_t	mm_version;
Howard Chu's avatar
Howard Chu committed
620
621
622
623
	void		*mm_address;		/**< address for fixed mapping */
	size_t		mm_mapsize;			/**< size of mmap region */
	MDB_db		mm_dbs[2];			/**< first is free space, 2nd is main db */
	/** The size of pages used in this DB */
Howard Chu's avatar
Howard Chu committed
624
#define	mm_psize	mm_dbs[0].md_pad
Howard Chu's avatar
Howard Chu committed
625
	/** Any persistent environment flags. @ref mdb_env */
Howard Chu's avatar
Howard Chu committed
626
#define	mm_flags	mm_dbs[0].md_flags
Howard Chu's avatar
Howard Chu committed
627
628
	pgno_t		mm_last_pg;			/**< last used page in file */
	ULONG		mm_txnid;			/**< txnid that committed this page */
Howard Chu's avatar
Howard Chu committed
629
630
} MDB_meta;

Howard Chu's avatar
Howard Chu committed
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
	/** Auxiliary DB info.
	 *	The information here is mostly static/read-only. There is
	 *	only a single copy of this record in the environment.
	 *	The \b md_dirty flag is not read-only, but only a write
	 *	transaction can ever update it, and only write transactions
	 *	need to worry about it.
	 */
typedef struct MDB_dbx {
	MDB_val		md_name;		/**< name of the database */
	MDB_cmp_func	*md_cmp;	/**< function for comparing keys */
	MDB_cmp_func	*md_dcmp;	/**< function for comparing data items */
	MDB_rel_func	*md_rel;	/**< user relocate function */
	MDB_dbi	md_parent;			/**< parent DB of a sub-DB */
	unsigned int	md_dirty;	/**< TRUE if DB was written in this txn */
} MDB_dbx;
Howard Chu's avatar
Howard Chu committed
646

Howard Chu's avatar
Howard Chu committed
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
	/** A database transaction.
	 *	Every operation requires a transaction handle.
	 */
struct MDB_txn {
	pgno_t		mt_next_pgno;	/**< next unallocated page */
	/** The ID of this transaction. IDs are integers incrementing from 1.
	 *	Only committed write transactions increment the ID. If a transaction
	 *	aborts, the ID may be re-used by the next writer.
	 */
	ULONG		mt_txnid;
	MDB_env		*mt_env;		/**< the DB environment */
	/** The list of pages that became unused during this transaction.
	 *	This is an #IDL.
	 */
	pgno_t		*mt_free_pgs;
	union {
		ID2L	dirty_list;	/**< modified pages */
		MDB_reader	*reader;	/**< this thread's slot in the reader table */
	} mt_u;
	/** Array of records for each DB known in the environment. */
	MDB_dbx		*mt_dbxs;
	/** Array of MDB_db records for each known DB */
	MDB_db		*mt_dbs;
	/**	Number of DB records in use. This number only ever increments;
	 *	we don't decrement it when individual DB handles are closed.
	 */
	unsigned int	mt_numdbs;

#define MDB_TXN_RDONLY		0x01		/**< read-only transaction */
#define MDB_TXN_ERROR		0x02		/**< an error has occurred */
	unsigned int	mt_flags;
	/** Tracks which of the two meta pages was used at the start
	 * 	of this transaction.
	 */
	unsigned int	mt_toggle;
};
Howard Chu's avatar
Howard Chu committed
683

Howard Chu's avatar
Howard Chu committed
684
/** Enough space for 2^32 nodes with minimum of 2 keys per node. I.e., plenty.
685
686
687
 * At 4 keys per node, enough for 2^64 nodes, so there's probably no need to
 * raise this on a 64 bit machine.
 */
Howard Chu's avatar
Howard Chu committed
688
#define CURSOR_STACK		 32
Howard Chu's avatar
Howard Chu committed
689

Howard Chu's avatar
Howard Chu committed
690
struct MDB_xcursor;
691

Howard Chu's avatar
Howard Chu committed
692
	/** Cursors are used for all DB operations */
Howard Chu's avatar
Howard Chu committed
693
struct MDB_cursor {
Howard Chu's avatar
Howard Chu committed
694
	/** Context used for databases with #MDB_DUPSORT, otherwise NULL */
Howard Chu's avatar
Howard Chu committed
695
	struct MDB_xcursor	*mc_xcursor;
Howard Chu's avatar
Howard Chu committed
696
	/** The transaction that owns this cursor */
Howard Chu's avatar
Howard Chu committed
697
	MDB_txn		*mc_txn;
Howard Chu's avatar
Howard Chu committed
698
	/** The database handle this cursor operates on */
Howard Chu's avatar
Howard Chu committed
699
	MDB_dbi		mc_dbi;
Howard Chu's avatar
Howard Chu committed
700
701
	unsigned short 	mc_snum;	/**< number of pushed pages */
	unsigned short	mc_top;		/**< index of top page, mc_snum-1 */
Howard Chu's avatar
Howard Chu committed
702
	unsigned int	mc_flags;
Howard Chu's avatar
Howard Chu committed
703
704
705
706
707
#define C_INITIALIZED	0x01	/**< cursor has been initialized and is valid */
#define C_EOF	0x02			/**< No more data */
#define C_XDIRTY	0x04		/**< @deprecated mc_xcursor needs to be flushed */
	MDB_page	*mc_pg[CURSOR_STACK];	/**< stack of pushed pages */
	indx_t		mc_ki[CURSOR_STACK];	/**< stack of page indices */
Howard Chu's avatar
Howard Chu committed
708
709
};

Howard Chu's avatar
Howard Chu committed
710
711
712
713
	/** Context for sorted-dup records.
	 *	We could have gone to a fully recursive design, with arbitrarily
	 *	deep nesting of sub-databases. But for now we only handle these
	 *	levels - main DB, optional sub-DB, sorted-duplicate DB.
714
	 */
Howard Chu's avatar
Howard Chu committed
715
typedef struct MDB_xcursor {
Howard Chu's avatar
Howard Chu committed
716
	/** A sub-cursor for traversing the Dup DB */
Howard Chu's avatar
Howard Chu committed
717
	MDB_cursor mx_cursor;
Howard Chu's avatar
Howard Chu committed
718
719
720
	/** A fake transaction struct for pointing to our own table
	 *	of DB info.
	 */
Howard Chu's avatar
Howard Chu committed
721
	MDB_txn mx_txn;
Howard Chu's avatar
Howard Chu committed
722
723
724
725
726
727
728
	/**	Our private DB information tables. Slots 0 and 1 are always
	 *	copies of the corresponding slots in the main transaction. These
	 *	hold the FREEDB and MAINDB, respectively. If the main cursor is
	 *	on a sub-database, that will be copied to slot 2, and the duplicate
	 *	database info will be in slot 3. If the main cursor is on the MAINDB
	 *	then the duplicate DB info will be in slot 2 and slot 3 will be unused.
	 */
Howard Chu's avatar
Howard Chu committed
729
	MDB_dbx	mx_dbxs[4];
Howard Chu's avatar
Howard Chu committed
730
	/** MDB_db table */
Howard Chu's avatar
Howard Chu committed
731
732
733
	MDB_db	mx_dbs[4];
} MDB_xcursor;

Howard Chu's avatar
Howard Chu committed
734
735
736
737
738
739
740
741
742
743
744
745
746
	/** A set of pages freed by an earlier transaction. */
typedef struct MDB_oldpages {
	/** Usually we only read one record from the FREEDB at a time, but
	 *	in case we read more, this will chain them together.
	 */
	struct MDB_oldpages *mo_next;
	/**	The ID of the transaction in which these pages were freed. */
	ULONG		mo_txnid;
	/** An #IDL of the pages */
	pgno_t		mo_pages[1];	/* dynamic */
} MDB_oldpages;

	/** The database environment. */
Howard Chu's avatar
Howard Chu committed
747
struct MDB_env {
Howard Chu's avatar
Howard Chu committed
748
749
750
	HANDLE		me_fd;		/**< The main data file */
	HANDLE		me_lfd;		/**< The lock file */
	HANDLE		me_mfd;			/**< just for writing the meta pages */
Howard Chu's avatar
Howard Chu committed
751
	/** Failed to update the meta page. Probably an I/O error. */
Howard Chu's avatar
Howard Chu committed
752
753
#define	MDB_FATAL_ERROR	0x80000000U
	uint32_t 	me_flags;
Howard Chu's avatar
Howard Chu committed
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
	uint32_t	me_extrapad;	/**< unused for now */
	unsigned int	me_maxreaders;	/**< size of the reader table */
	unsigned int	me_numdbs;		/**< number of DBs opened */
	unsigned int	me_maxdbs;		/**< size of the DB table */
	char		*me_path;		/**< path to the DB files */
	char		*me_map;		/**< the memory map of the data file */
	MDB_txninfo	*me_txns;		/**< the memory map of the lock file */
	MDB_meta	*me_metas[2];	/**< pointers to the two meta pages */
	MDB_txn		*me_txn;		/**< current write transaction */
	size_t		me_mapsize;		/**< size of the data memory map */
	off_t		me_size;		/**< current file size */
	pgno_t		me_maxpg;		/**< me_mapsize / me_psize */
	unsigned int	me_psize;	/**< size of a page, from #GetPageSize */
	unsigned int	me_db_toggle;	/**< which DB table is current */
	MDB_dbx		*me_dbxs;		/**< array of static DB info */
	MDB_db		*me_dbs[2];		/**< two arrays of MDB_db info */
	MDB_oldpages *me_pghead;	/**< list of old page records */
	pthread_key_t	me_txkey;	/**< thread-key for readers */
	MDB_page	*me_dpages;		/**< list of malloc'd blocks for re-use */
	/** IDL of pages that became unused in a write txn */
774
	pgno_t		me_free_pgs[MDB_IDL_UM_SIZE];
Howard Chu's avatar
Howard Chu committed
775
	/** ID2L of pages that were written during a write txn */
Howard Chu's avatar
Howard Chu committed
776
	ID2			me_dirty_list[MDB_IDL_UM_SIZE];
Howard Chu's avatar
Howard Chu committed
777
	/** rwlock for the DB tables, if #LAZY_LOCKS is false */
Howard Chu's avatar
Howard Chu committed
778
	LAZY_RWLOCK_DEF(me_dblock);
Howard Chu's avatar
Howard Chu committed
779
780
781
782
#ifdef _WIN32
	HANDLE		me_rmutex;		/* Windows mutexes don't reside in shared mem */
	HANDLE		me_wmutex;
#endif
Howard Chu's avatar
Howard Chu committed
783
};
Howard Chu's avatar
Howard Chu committed
784
785
	/** max number of pages to commit in one writev() call */
#define MDB_COMMIT_PAGES	 64
Howard Chu's avatar
Howard Chu committed
786

Howard Chu's avatar
Howard Chu committed
787
788
static MDB_page *mdb_alloc_page(MDB_cursor *mc, int num);
static int 		mdb_touch(MDB_cursor *mc);
Howard Chu's avatar
Howard Chu committed
789

790
791
792
793
static int  mdb_search_page_root(MDB_cursor *mc,
			    MDB_val *key, int modify);
static int  mdb_search_page(MDB_cursor *mc,
			    MDB_val *key, int modify);
Howard Chu's avatar
Howard Chu committed
794

Howard Chu's avatar
Howard Chu committed
795
796
797
static int  mdb_env_read_header(MDB_env *env, MDB_meta *meta);
static int  mdb_env_read_meta(MDB_env *env, int *which);
static int  mdb_env_write_meta(MDB_txn *txn);
Howard Chu's avatar
Howard Chu committed
798
static int  mdb_get_page(MDB_txn *txn, pgno_t pgno, MDB_page **mp);
Howard Chu's avatar
Howard Chu committed
799

800
801
802
static MDB_node *mdb_search_node(MDB_cursor *mc, MDB_val *key, int *exactp);
static int  mdb_add_node(MDB_cursor *mc, indx_t indx,
			    MDB_val *key, MDB_val *data, pgno_t pgno, uint8_t flags);
Howard Chu's avatar
Howard Chu committed
803
static void mdb_del_node(MDB_page *mp, indx_t indx, int ksize);
804
static int mdb_del0(MDB_cursor *mc, MDB_node *leaf);
Howard Chu's avatar
Howard Chu committed
805
static int  mdb_read_data(MDB_txn *txn, MDB_node *leaf, MDB_val *data);
Howard Chu's avatar
Howard Chu committed
806

807
static int	mdb_rebalance(MDB_cursor *mc);
Howard Chu's avatar
Howard Chu committed
808
static int	mdb_update_key(MDB_page *mp, indx_t indx, MDB_val *key);
Howard Chu's avatar
Howard Chu committed
809
810
static int	mdb_move_node(MDB_cursor *csrc, MDB_cursor *cdst);
static int	mdb_merge(MDB_cursor *csrc, MDB_cursor *cdst);
811
812
813
814
815
816
817
818
819
820
821
822
823
824
static int	mdb_split(MDB_cursor *mc, MDB_val *newkey, MDB_val *newdata,
				pgno_t newpgno);
static MDB_page *mdb_new_page(MDB_cursor *mc, uint32_t flags, int num);

static void	cursor_pop_page(MDB_cursor *mc);
static int	cursor_push_page(MDB_cursor *mc, MDB_page *mp);

static int	mdb_sibling(MDB_cursor *mc, int move_right);
static int	mdb_cursor_next(MDB_cursor *mc, MDB_val *key, MDB_val *data, MDB_cursor_op op);
static int	mdb_cursor_prev(MDB_cursor *mc, MDB_val *key, MDB_val *data, MDB_cursor_op op);
static int	mdb_cursor_set(MDB_cursor *mc, MDB_val *key, MDB_val *data, MDB_cursor_op op,
				int *exactp);
static int	mdb_cursor_first(MDB_cursor *mc, MDB_val *key, MDB_val *data);
static int	mdb_cursor_last(MDB_cursor *mc, MDB_val *key, MDB_val *data);
Howard Chu's avatar
Howard Chu committed
825

Howard Chu's avatar
Howard Chu committed
826
static void	mdb_xcursor_init0(MDB_cursor *mc);
827
static void	mdb_xcursor_init1(MDB_cursor *mc, MDB_node *node);
Howard Chu's avatar
Howard Chu committed
828
829
static void	mdb_xcursor_init2(MDB_cursor *mc);
static void	mdb_xcursor_fini(MDB_cursor *mc);
Howard Chu's avatar
Howard Chu committed
830

831
static size_t	mdb_leaf_size(MDB_env *env, MDB_val *key, MDB_val *data);
Howard Chu's avatar
Howard Chu committed
832
static size_t	mdb_branch_size(MDB_env *env, MDB_val *key);
Howard Chu's avatar
Howard Chu committed
833

Howard Chu's avatar
Howard Chu committed
834
835
static void mdb_default_cmp(MDB_txn *txn, MDB_dbi dbi);

Howard Chu's avatar
Howard Chu committed
836
/** @cond */
Howard Chu's avatar
Howard Chu committed
837
static MDB_cmp_func	memncmp, memnrcmp, intcmp, cintcmp;
Howard Chu's avatar
Howard Chu committed
838
/** @endcond */
Howard Chu's avatar
Howard Chu committed
839

Howard Chu's avatar
Howard Chu committed
840
841
842
843
844
845
#ifdef _WIN32
static SECURITY_DESCRIPTOR mdb_null_sd;
static SECURITY_ATTRIBUTES mdb_all_sa;
static int mdb_sec_inited;
#endif

Howard Chu's avatar
Howard Chu committed
846
/** Return the library version info. */
Howard Chu's avatar
Howard Chu committed
847
char *
Howard Chu's avatar
Howard Chu committed
848
mdb_version(int *major, int *minor, int *patch)
Howard Chu's avatar
Howard Chu committed
849
{
Howard Chu's avatar
Howard Chu committed
850
851
852
	if (major) *major = MDB_VERSION_MAJOR;
	if (minor) *minor = MDB_VERSION_MINOR;
	if (patch) *patch = MDB_VERSION_PATCH;
Howard Chu's avatar
Howard Chu committed
853
854
855
	return MDB_VERSION_STRING;
}

Howard Chu's avatar
Howard Chu committed
856
/** Table of descriptions for MDB @ref errors */
Howard Chu's avatar
Howard Chu committed
857
static char *const mdb_errstr[] = {
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
	"MDB_KEYEXIST: Key/data pair already exists",
	"MDB_NOTFOUND: No matching key/data pair found",
	"MDB_PAGE_NOTFOUND: Requested page not found",
	"MDB_CORRUPTED: Located page was wrong type",
	"MDB_PANIC: Update of meta page failed",
	"MDB_VERSION_MISMATCH: Database environment version mismatch"
};

char *
mdb_strerror(int err)
{
	if (!err)
		return ("Successful return: 0");

	if (err >= MDB_KEYEXIST && err <= MDB_VERSION_MISMATCH)
Howard Chu's avatar
Howard Chu committed
873
		return mdb_errstr[err - MDB_KEYEXIST];
874
875
876
877

	return strerror(err);
}

878
#if DEBUG
Howard Chu's avatar
Howard Chu committed
879
880
881
882
883
/** Display a key in hexadecimal and return the address of the result.
 * @param[in] key the key to display
 * @param[in] buf the buffer to write into. Should always be #DKBUF.
 * @return The key in hexadecimal form.
 */
Howard Chu's avatar
Howard Chu committed
884
885
886
887
888
889
890
891
static char *
mdb_dkey(MDB_val *key, char *buf)
{
	char *ptr = buf;
	unsigned char *c = key->mv_data;
	unsigned int i;
	if (key->mv_size > MAXKEYSIZE)
		return "MAXKEYSIZE";
Howard Chu's avatar
Howard Chu committed
892
893
894
	/* may want to make this a dynamic check: if the key is mostly
	 * printable characters, print it as-is instead of converting to hex.
	 */
895
#if 1
Howard Chu's avatar
Howard Chu committed
896
897
	for (i=0; i<key->mv_size; i++)
		ptr += sprintf(ptr, "%02x", *c++);
Howard Chu's avatar
Howard Chu committed
898
899
900
#else
	sprintf(buf, "%.*s", key->mv_size, key->mv_data);
#endif
Howard Chu's avatar
Howard Chu committed
901
902
	return buf;
}
903
#endif
Howard Chu's avatar
Howard Chu committed
904

Howard Chu's avatar
Howard Chu committed
905
int
Howard Chu's avatar
Howard Chu committed
906
mdb_cmp(MDB_txn *txn, MDB_dbi dbi, const MDB_val *a, const MDB_val *b)
Howard Chu's avatar
Howard Chu committed
907
{
Howard Chu's avatar
Howard Chu committed
908
	return txn->mt_dbxs[dbi].md_cmp(a, b);
Howard Chu's avatar
Howard Chu committed
909
910
}

Howard Chu's avatar
Howard Chu committed
911
912
913
914
915
916
917
918
919
/** Compare two data items according to a particular database.
 * This returns a comparison as if the two items were data items of
 * a sorted duplicates #MDB_DUPSORT database.
 * @param[in] txn A transaction handle returned by #mdb_txn_begin()
 * @param[in] dbi A database handle returned by #mdb_open()
 * @param[in] a The first item to compare
 * @param[in] b The second item to compare
 * @return < 0 if a < b, 0 if a == b, > 0 if a > b
 */
Howard Chu's avatar
Howard Chu committed
920
921
922
923
924
int
mdb_dcmp(MDB_txn *txn, MDB_dbi dbi, const MDB_val *a, const MDB_val *b)
{
	if (txn->mt_dbxs[dbi].md_dcmp)
		return txn->mt_dbxs[dbi].md_dcmp(a, b);
Howard Chu's avatar
Howard Chu committed
925
	else
Howard Chu's avatar
Howard Chu committed
926
		return EINVAL;	/* too bad you can't distinguish this from a valid result */
Howard Chu's avatar
Howard Chu committed
927
928
}

Howard Chu's avatar
Howard Chu committed
929
930
931
932
933
934
935
936
937
/** Allocate pages for writing.
 * If there are free pages available from older transactions, they
 * will be re-used first. Otherwise a new page will be allocated.
 * @param[in] mc cursor A cursor handle identifying the transaction and
 *	database for which we are allocating.
 * @param[in] num the number of pages to allocate.
 * @return Address of the allocated page(s). Requests for multiple pages
 *  will always be satisfied by a single contiguous chunk of memory.
 */
938
939
static MDB_page *
mdb_alloc_page(MDB_cursor *mc, int num)
Howard Chu's avatar
Howard Chu committed
940
{
941
942
	MDB_txn *txn = mc->mc_txn;
	MDB_page *np;
Howard Chu's avatar
Howard Chu committed
943
	pgno_t pgno = P_INVALID;
944
	ID2 mid;
Howard Chu's avatar
Howard Chu committed
945

Howard Chu's avatar
Howard Chu committed
946
947
	if (txn->mt_txnid > 2) {

948
		if (!txn->mt_env->me_pghead && mc->mc_dbi != FREE_DBI &&
Howard Chu's avatar
Howard Chu committed
949
950
			txn->mt_dbs[FREE_DBI].md_root != P_INVALID) {
			/* See if there's anything in the free DB */
951
			MDB_cursor m2;
Howard Chu's avatar
Howard Chu committed
952
953
			MDB_node *leaf;
			ULONG *kptr, oldest;
Howard Chu's avatar
Howard Chu committed
954

955
956
957
958
959
960
			m2.mc_txn = txn;
			m2.mc_dbi = FREE_DBI;
			m2.mc_snum = 0;
			m2.mc_flags = 0;
			mdb_search_page(&m2, NULL, 0);
			leaf = NODEPTR(m2.mc_pg[m2.mc_top], 0);
Howard Chu's avatar
Howard Chu committed
961
			kptr = (ULONG *)NODEKEY(leaf);
Howard Chu's avatar
Howard Chu committed
962

Howard Chu's avatar
Howard Chu committed
963
964
			{
				unsigned int i;
Howard Chu's avatar
Howard Chu committed
965
966
967
968
969
				oldest = txn->mt_txnid - 1;
				for (i=0; i<txn->mt_env->me_txns->mti_numreaders; i++) {
					ULONG mr = txn->mt_env->me_txns->mti_readers[i].mr_txnid;
					if (mr && mr < oldest)
						oldest = mr;
Howard Chu's avatar
Howard Chu committed
970
971
				}
			}
Howard Chu's avatar
Howard Chu committed
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996

			if (oldest > *kptr) {
				/* It's usable, grab it.
				 */
				MDB_oldpages *mop;
				MDB_val data;
				pgno_t *idl;

				mdb_read_data(txn, leaf, &data);
				idl = (ULONG *)data.mv_data;
				mop = malloc(sizeof(MDB_oldpages) + MDB_IDL_SIZEOF(idl) - sizeof(pgno_t));
				mop->mo_next = txn->mt_env->me_pghead;
				mop->mo_txnid = *kptr;
				txn->mt_env->me_pghead = mop;
				memcpy(mop->mo_pages, idl, MDB_IDL_SIZEOF(idl));

#if DEBUG > 1
				{
					unsigned int i;
					DPRINTF("IDL read txn %lu root %lu num %lu",
						mop->mo_txnid, txn->mt_dbs[FREE_DBI].md_root, idl[0]);
					for (i=0; i<idl[0]; i++) {
						DPRINTF("IDL %lu", idl[i+1]);
					}
				}
Howard Chu's avatar
Howard Chu committed
997
#endif
Howard Chu's avatar
Howard Chu committed
998
				/* drop this IDL from the DB */
999
1000
1001
				m2.mc_ki[m2.mc_top] = 0;
				m2.mc_flags = C_INITIALIZED;
				mdb_cursor_del(&m2, 0);
Howard Chu's avatar
Howard Chu committed
1002
			}
Howard Chu's avatar
Howard Chu committed
1003
		}
Howard Chu's avatar
Howard Chu committed
1004
		if (txn->mt_env->me_pghead) {
Howard Chu's avatar
Howard Chu committed
1005
1006
			MDB_oldpages *mop = txn->mt_env->me_pghead;
			if (num > 1) {
1007
1008
1009
1010
				/* FIXME: For now, always use fresh pages. We
				 * really ought to search the free list for a
				 * contiguous range.
				 */
Howard Chu's avatar
Howard Chu committed
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
				;
			} else {
				/* peel pages off tail, so we only have to truncate the list */
				pgno = MDB_IDL_LAST(mop->mo_pages);
				if (MDB_IDL_IS_RANGE(mop->mo_pages)) {
					mop->mo_pages[2]++;
					if (mop->mo_pages[2] > mop->mo_pages[1])
						mop->mo_pages[0] = 0;
				} else {
					mop->mo_pages[0]--;
				}
				if (MDB_IDL_IS_ZERO(mop->mo_pages)) {
					txn->mt_env->me_pghead = mop->mo_next;
					free(mop);
				}
			}
		}
	}
Howard Chu's avatar
Howard Chu committed
1029

Howard Chu's avatar
Howard Chu committed
1030
1031
1032
1033
1034
	if (pgno == P_INVALID) {
		/* DB size is maxed out */
		if (txn->mt_next_pgno + num >= txn->mt_env->me_maxpg)
			return NULL;
	}
1035
	if (txn->mt_env->me_dpages && num == 1) {
1036
1037
		np = txn->mt_env->me_dpages;
		txn->mt_env->me_dpages = np->mp_next;
1038
	} else {
1039
		if ((np = malloc(txn->mt_env->me_psize * num )) == NULL)
1040
1041
			return NULL;
	}
Howard Chu's avatar
Howard Chu committed
1042
	if (pgno == P_INVALID) {
1043
		np->mp_pgno = txn->mt_next_pgno;
Howard Chu's avatar
Howard Chu committed
1044
1045
		txn->mt_next_pgno += num;
	} else {
1046
		np->mp_pgno = pgno;
Howard Chu's avatar
Howard Chu committed
1047
	}
1048
1049
	mid.mid = np->mp_pgno;
	mid.mptr = np;
1050
	mdb_mid2l_insert(txn->mt_u.dirty_list, &mid);
Howard Chu's avatar
Howard Chu committed
1051

1052
	return np;
Howard Chu's avatar
Howard Chu committed
1053
1054
}

Howard Chu's avatar
Howard Chu committed
1055
1056
1057
/** Touch a page: make it dirty and re-insert into tree with updated pgno.
 * @param[in] mc cursor pointing to the page to be touched
 * @return 0 on success, non-zero on failure.
Howard Chu's avatar
Howard Chu committed
1058
1059
 */
static int
1060
mdb_touch(MDB_cursor *mc)
Howard Chu's avatar
Howard Chu committed
1061
{
1062
	MDB_page *mp = mc->mc_pg[mc->mc_top];
Howard Chu's avatar
Howard Chu committed
1063
1064
1065
	pgno_t	pgno;

	if (!F_ISSET(mp->mp_flags, P_DIRTY)) {
1066
1067
		MDB_page *np;
		if ((np = mdb_alloc_page(mc, 1)) == NULL)
Howard Chu's avatar
Howard Chu committed
1068
			return ENOMEM;
1069
1070
1071
1072
1073
1074
		DPRINTF("touched db %u page %lu -> %lu", mc->mc_dbi, mp->mp_pgno, np->mp_pgno);
		assert(mp->mp_pgno != np->mp_pgno);
		mdb_midl_append(mc->mc_txn->mt_free_pgs, mp->mp_pgno);
		pgno = np->mp_pgno;
		memcpy(np, mp, mc->mc_txn->mt_env->me_psize);
		mp = np;
Howard Chu's avatar
Howard Chu committed
1075
1076
1077
		mp->mp_pgno = pgno;
		mp->mp_flags |= P_DIRTY;

1078
		mc->mc_pg[mc->mc_top] = mp;
Howard Chu's avatar
Howard Chu committed
1079
1080
1081
		/** If this page has a parent, update the parent to point to
		 * this new page.
		 */
1082
1083
		if (mc->mc_top)
			SETPGNO(NODEPTR(mc->mc_pg[mc->mc_top-1], mc->mc_ki[mc->mc_top-1]), mp->mp_pgno);
Howard Chu's avatar
Howard Chu committed
1084
1085
1086
1087
1088
	}
	return 0;
}

int
Howard Chu's avatar
Howard Chu committed
1089
mdb_env_sync(MDB_env *env, int force)
Howard Chu's avatar
Howard Chu committed
1090
1091
{
	int rc = 0;
Howard Chu's avatar
Howard Chu committed
1092
	if (force || !F_ISSET(env->me_flags, MDB_NOSYNC)) {
Howard Chu's avatar
Howard Chu committed
1093
		if (fdatasync(env->me_fd))
Howard Chu's avatar
Howard Chu committed
1094
			rc = ErrCode();
Howard Chu's avatar
Howard Chu committed
1095
1096
1097
1098
	}
	return rc;
}

Howard Chu's avatar
Howard Chu committed
1099
1100
1101
static inline void
mdb_txn_reset0(MDB_txn *txn);

Howard Chu's avatar
Howard Chu committed
1102
1103
1104
1105
1106
1107
/** Common code for #mdb_txn_begin() and #mdb_txn_renew().
 * @param[in] txn the transaction handle to initialize
 * @return 0 on success, non-zero on failure. This can only
 * fail for read-only transactions, and then only if the
 * reader table is full.
 */
Howard Chu's avatar
Howard Chu committed
1108
1109
static inline int
mdb_txn_renew0(MDB_txn *txn)
Howard Chu's avatar
Howard Chu committed
1110
{
Howard Chu's avatar
Howard Chu committed
1111
1112
1113
	MDB_env *env = txn->mt_env;

	if (txn->mt_flags & MDB_TXN_RDONLY) {
Howard Chu's avatar
Howard Chu committed
1114
1115
		MDB_reader *r = pthread_getspecific(env->me_txkey);
		if (!r) {
Howard Chu's avatar
Howard Chu committed
1116
			unsigned int i;
Howard Chu's avatar
Howard Chu committed
1117
1118
1119
			pid_t pid = getpid();
			pthread_t tid = pthread_self();

Howard Chu's avatar
Howard Chu committed
1120
			LOCK_MUTEX_R(env);
Howard Chu's avatar
Howard Chu committed
1121
1122
			for (i=0; i<env->me_txns->mti_numreaders; i++)
				if (env->me_txns->mti_readers[i].mr_pid == 0)
Howard Chu's avatar
Howard Chu committed
1123
1124
					break;
			if (i == env->me_maxreaders) {
Howard Chu's avatar
Howard Chu committed
1125
				UNLOCK_MUTEX_R(env);
1126
				return ENOMEM;
Howard Chu's avatar
Howard Chu committed
1127
			}
Howard Chu's avatar
Howard Chu committed
1128
1129
			env->me_txns->mti_readers[i].mr_pid = pid;
			env->me_txns->mti_readers[i].mr_tid = tid;
Howard Chu's avatar
Howard Chu committed
1130
1131
			if (i >= env->me_txns->mti_numreaders)
				env->me_txns->mti_numreaders = i+1;
Howard Chu's avatar
Howard Chu committed
1132
			UNLOCK_MUTEX_R(env);
Howard Chu's avatar
Howard Chu committed
1133
1134
			r = &env->me_txns->mti_readers[i];
			pthread_setspecific(env->me_txkey, r);
Howard Chu's avatar
Howard Chu committed
1135
		}
Howard Chu's avatar
Howard Chu committed
1136
		txn->mt_txnid = env->me_txns->mti_txnid;
Howard Chu's avatar
Howard Chu committed
1137
		txn->mt_toggle = env->me_txns->mti_me_toggle;
Howard Chu's avatar
Howard Chu committed
1138
1139
1140
		r->mr_txnid = txn->mt_txnid;
		txn->mt_u.reader = r;
	} else {
Howard Chu's avatar
Howard Chu committed
1141
		LOCK_MUTEX_W(env);
Howard Chu's avatar
Howard Chu committed
1142
1143

		txn->mt_txnid = env->me_txns->mti_txnid+1;
Howard Chu's avatar
Howard Chu committed
1144
		txn->mt_toggle = env->me_txns->mti_me_toggle;
Howard Chu's avatar
Howard Chu committed
1145
1146
1147
1148
		txn->mt_u.dirty_list = env->me_dirty_list;
		txn->mt_u.dirty_list[0].mid = 0;
		txn->mt_free_pgs = env->me_free_pgs;
		txn->mt_free_pgs[0] = 0;
Howard Chu's avatar
Howard Chu committed
1149
		txn->mt_next_pgno = env->me_metas[txn->mt_toggle]->mm_last_pg+1;
Howard Chu's avatar
Howard Chu committed
1150
1151
1152
		env->me_txn = txn;
	}

Howard Chu's avatar
Howard Chu committed
1153
	/* Copy the DB arrays */
Howard Chu's avatar
Howard Chu committed
1154
	LAZY_RWLOCK_RDLOCK(&env->me_dblock);
Howard Chu's avatar
Howard Chu committed
1155
	txn->mt_numdbs = env->me_numdbs;
Howard Chu's avatar
Howard Chu committed
1156
	txn->mt_dbxs = env->me_dbxs;	/* mostly static anyway */
Howard Chu's avatar
Howard Chu committed
1157
	memcpy(txn->mt_dbs, env->me_metas[txn->mt_toggle]->mm_dbs, 2 * sizeof(MDB_db));
Howard Chu's avatar
Howard Chu committed
1158
1159
1160
	if (txn->mt_numdbs > 2)
		memcpy(txn->mt_dbs+2, env->me_dbs[env->me_db_toggle]+2,
			(txn->mt_numdbs - 2) * sizeof(MDB_db));
Howard Chu's avatar
Howard Chu committed
1161
	LAZY_RWLOCK_UNLOCK(&env->me_dblock);
Howard Chu's avatar
Howard Chu committed
1162

Howard Chu's avatar
Howard Chu committed
1163
1164
1165
	return MDB_SUCCESS;
}

Howard Chu's avatar
Howard Chu committed
1166
1167
int
mdb_txn_renew(MDB_txn *txn)
Howard Chu's avatar
Howard Chu committed
1168
{
Howard Chu's avatar
Howard Chu committed
1169
	int rc;
Howard Chu's avatar
Howard Chu committed
1170

Howard Chu's avatar
Howard Chu committed
1171
1172
	if (!txn)
		return EINVAL;
Howard Chu's avatar
Howard Chu committed
1173

Howard Chu's avatar
Howard Chu committed
1174
1175
1176
1177
1178
	if (txn->mt_env->me_flags & MDB_FATAL_ERROR) {
		DPUTS("environment had fatal error, must shutdown!");
		return MDB_PANIC;
	}

Howard Chu's avatar
Howard Chu committed
1179
1180
	rc = mdb_txn_renew0(txn);
	if (rc == MDB_SUCCESS) {
Howard Chu's avatar
Howard Chu committed
1181
1182
		DPRINTF("renew txn %lu%c %p on mdbenv %p, root page %lu",
			txn->mt_txnid, (txn->mt_flags & MDB_TXN_RDONLY) ? 'r' : 'w', txn,
Howard Chu's avatar
Howard Chu committed
1183
1184
1185
1186
1187
1188
			(void *)txn->mt_env, txn->mt_dbs[MAIN_DBI].md_root);
	}
	return rc;
}

int
1189
mdb_txn_begin(MDB_env *env, unsigned int flags, MDB_txn **ret)
Howard Chu's avatar
Howard Chu committed
1190
1191
1192
1193
1194
{
	MDB_txn *txn;
	int rc;

	if (env->me_flags & MDB_FATAL_ERROR) {
Howard Chu's avatar
Howard Chu committed
1195
		DPUTS("environment had fatal error, must shutdown!");
Howard Chu's avatar
Howard Chu committed
1196
1197
1198
		return MDB_PANIC;
	}
	if ((txn = calloc(1, sizeof(MDB_txn) + env->me_maxdbs * sizeof(MDB_db))) == NULL) {
Howard Chu's avatar
Howard Chu committed
1199
		DPRINTF("calloc: %s", strerror(ErrCode()));
Howard Chu's avatar
Howard Chu committed
1200
1201
1202
		return ENOMEM;
	}
	txn->mt_dbs = (MDB_db *)(txn+1);
1203
	if (flags & MDB_RDONLY) {
Howard Chu's avatar
Howard Chu committed
1204
1205
1206
1207
1208
1209
1210
1211
1212
		txn->mt_flags |= MDB_TXN_RDONLY;
	}
	txn->mt_env = env;

	rc = mdb_txn_renew0(txn);
	if (rc)
		free(txn);
	else {
		*ret = txn;
Howard Chu's avatar
Howard Chu committed
1213
1214
		DPRINTF("begin txn %lu%c %p on mdbenv %p, root page %lu"<