mirror of
https://github.com/isar/libmdbx.git
synced 2024-12-30 02:34:13 +08:00
OpenLDAP mdb.RE/0.9 at fe8b13f2251d49689b05876b86b3e10bb89993cd (2015-01-01).
This commit is contained in:
commit
8431fb6372
23
.gitignore
vendored
Normal file
23
.gitignore
vendored
Normal file
@ -0,0 +1,23 @@
|
|||||||
|
mtest
|
||||||
|
mtest[23456]
|
||||||
|
testdb
|
||||||
|
mdb_copy
|
||||||
|
mdb_stat
|
||||||
|
mdb_dump
|
||||||
|
mdb_load
|
||||||
|
*.lo
|
||||||
|
*.[ao]
|
||||||
|
*.so
|
||||||
|
*.exe
|
||||||
|
*[~#]
|
||||||
|
*.bak
|
||||||
|
*.orig
|
||||||
|
*.rej
|
||||||
|
*.gcov
|
||||||
|
*.gcda
|
||||||
|
*.gcno
|
||||||
|
core
|
||||||
|
core.*
|
||||||
|
valgrind.*
|
||||||
|
man/
|
||||||
|
html/
|
126
CHANGES
Normal file
126
CHANGES
Normal file
@ -0,0 +1,126 @@
|
|||||||
|
LMDB 0.9 Change Log
|
||||||
|
|
||||||
|
LMDB 0.9.15 Release Engineering
|
||||||
|
Fix txn init (ITS#7961,#7987)
|
||||||
|
Fix MDB_PREV_DUP (ITS#7955,#7671)
|
||||||
|
Fix compact of empty env (ITS#7956)
|
||||||
|
Added workaround for fdatasync bug in ext3fs
|
||||||
|
Build
|
||||||
|
Don't use -fPIC for static lib
|
||||||
|
Update .gitignore (ITS#7952,#7953)
|
||||||
|
Cleanup for "make test" (ITS#7841)
|
||||||
|
Misc. Android/Windows cleanup
|
||||||
|
Documentation
|
||||||
|
Fix MDB_APPEND doc
|
||||||
|
Clarify mdb_dbi_open doc
|
||||||
|
|
||||||
|
LMDB 0.9.14 Release (2014/09/20)
|
||||||
|
Fix to support 64K page size (ITS#7713)
|
||||||
|
Fix to persist decreased as well as increased mapsizes (ITS#7789)
|
||||||
|
Fix cursor bug when deleting last node of a DUPSORT key
|
||||||
|
Fix mdb_env_info to return FIXEDMAP address
|
||||||
|
Fix ambiguous error code from writing to closed DBI (ITS#7825)
|
||||||
|
Fix mdb_copy copying past end of file (ITS#7886)
|
||||||
|
Fix cursor bugs from page_merge/rebalance
|
||||||
|
Fix to dirty fewer pages in deletes (mdb_page_loose())
|
||||||
|
Fix mdb_dbi_open creating subDBs (ITS#7917)
|
||||||
|
Fix mdb_cursor_get(_DUP) with single value (ITS#7913)
|
||||||
|
Fix Windows compat issues in mtests (ITS#7879)
|
||||||
|
Add compacting variant of mdb_copy
|
||||||
|
Add BigEndian integer key compare code
|
||||||
|
Add mdb_dump/mdb_load utilities
|
||||||
|
|
||||||
|
LMDB 0.9.13 Release (2014/06/18)
|
||||||
|
Fix mdb_page_alloc unlimited overflow page search
|
||||||
|
Documentation
|
||||||
|
Re-fix MDB_CURRENT doc (ITS#7793)
|
||||||
|
Fix MDB_GET_MULTIPLE/MDB_NEXT_MULTIPLE doc
|
||||||
|
|
||||||
|
LMDB 0.9.12 Release (2014/06/13)
|
||||||
|
Fix MDB_GET_BOTH regression (ITS#7875,#7681)
|
||||||
|
Fix MDB_MULTIPLE writing multiple keys (ITS#7834)
|
||||||
|
Fix mdb_rebalance (ITS#7829)
|
||||||
|
Fix mdb_page_split (ITS#7815)
|
||||||
|
Fix md_entries count (ITS#7861,#7828,#7793)
|
||||||
|
Fix MDB_CURRENT (ITS#7793)
|
||||||
|
Fix possible crash on Windows DLL detach
|
||||||
|
Misc code cleanup
|
||||||
|
Documentation
|
||||||
|
mdb_cursor_put: cursor moves on error (ITS#7771)
|
||||||
|
|
||||||
|
|
||||||
|
LMDB 0.9.11 Release (2014/01/15)
|
||||||
|
Add mdb_env_set_assert() (ITS#7775)
|
||||||
|
Fix: invalidate txn on page allocation errors (ITS#7377)
|
||||||
|
Fix xcursor tracking in mdb_cursor_del0() (ITS#7771)
|
||||||
|
Fix corruption from deletes (ITS#7756)
|
||||||
|
Fix Windows/MSVC build issues
|
||||||
|
Raise safe limit of max MDB_MAXKEYSIZE
|
||||||
|
Misc code cleanup
|
||||||
|
Documentation
|
||||||
|
Remove spurious note about non-overlapping flags (ITS#7665)
|
||||||
|
|
||||||
|
LMDB 0.9.10 Release (2013/11/12)
|
||||||
|
Add MDB_NOMEMINIT option
|
||||||
|
Fix mdb_page_split() again (ITS#7589)
|
||||||
|
Fix MDB_NORDAHEAD definition (ITS#7734)
|
||||||
|
Fix mdb_cursor_del() positioning (ITS#7733)
|
||||||
|
Partial fix for larger page sizes (ITS#7713)
|
||||||
|
Fix Windows64/MSVC build issues
|
||||||
|
|
||||||
|
LMDB 0.9.9 Release (2013/10/24)
|
||||||
|
Add mdb_env_get_fd()
|
||||||
|
Add MDB_NORDAHEAD option
|
||||||
|
Add MDB_NOLOCK option
|
||||||
|
Avoid wasting space in mdb_page_split() (ITS#7589)
|
||||||
|
Fix mdb_page_merge() cursor fixup (ITS#7722)
|
||||||
|
Fix mdb_cursor_del() on last delete (ITS#7718)
|
||||||
|
Fix adding WRITEMAP on existing env (ITS#7715)
|
||||||
|
Fix nested txns (ITS#7515)
|
||||||
|
Fix mdb_env_copy() O_DIRECT bug (ITS#7682)
|
||||||
|
Fix mdb_cursor_set(SET_RANGE) return code (ITS#7681)
|
||||||
|
Fix mdb_rebalance() cursor fixup (ITS#7701)
|
||||||
|
Misc code cleanup
|
||||||
|
Documentation
|
||||||
|
Note that by default, readers need write access
|
||||||
|
|
||||||
|
|
||||||
|
LMDB 0.9.8 Release (2013/09/09)
|
||||||
|
Allow mdb_env_set_mapsize() on an open environment
|
||||||
|
Fix mdb_dbi_flags() (ITS#7672)
|
||||||
|
Fix mdb_page_unspill() in nested txns
|
||||||
|
Fix mdb_cursor_get(CURRENT|NEXT) after a delete
|
||||||
|
Fix mdb_cursor_get(DUP) to always return key (ITS#7671)
|
||||||
|
Fix mdb_cursor_del() to always advance to next item (ITS#7670)
|
||||||
|
Fix mdb_cursor_set(SET_RANGE) for tree with single page (ITS#7681)
|
||||||
|
Fix mdb_env_copy() retry open if O_DIRECT fails (ITS#7682)
|
||||||
|
Tweak mdb_page_spill() to be less aggressive
|
||||||
|
Documentation
|
||||||
|
Update caveats since mdb_reader_check() added in 0.9.7
|
||||||
|
|
||||||
|
LMDB 0.9.7 Release (2013/08/17)
|
||||||
|
Don't leave stale lockfile on failed RDONLY open (ITS#7664)
|
||||||
|
Fix mdb_page_split() ref beyond cursor depth
|
||||||
|
Fix read txn data race (ITS#7635)
|
||||||
|
Fix mdb_rebalance (ITS#7536, #7538)
|
||||||
|
Fix mdb_drop() (ITS#7561)
|
||||||
|
Misc DEBUG macro fixes
|
||||||
|
Add MDB_NOTLS envflag
|
||||||
|
Add mdb_env_copyfd()
|
||||||
|
Add mdb_txn_env() (ITS#7660)
|
||||||
|
Add mdb_dbi_flags() (ITS#7661)
|
||||||
|
Add mdb_env_get_maxkeysize()
|
||||||
|
Add mdb_env_reader_list()/mdb_env_reader_check()
|
||||||
|
Add mdb_page_spill/unspill, remove hard txn size limit
|
||||||
|
Use shorter names for semaphores (ITS#7615)
|
||||||
|
Build
|
||||||
|
Fix install target (ITS#7656)
|
||||||
|
Documentation
|
||||||
|
Misc updates for cursors, DB handles, data lifetime
|
||||||
|
|
||||||
|
LMDB 0.9.6 Release (2013/02/25)
|
||||||
|
Many fixes/enhancements
|
||||||
|
|
||||||
|
LMDB 0.9.5 Release (2012/11/30)
|
||||||
|
Renamed from libmdb to liblmdb
|
||||||
|
Many fixes/enhancements
|
20
COPYRIGHT
Normal file
20
COPYRIGHT
Normal file
@ -0,0 +1,20 @@
|
|||||||
|
Copyright 2011-2014 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>.
|
||||||
|
|
||||||
|
OpenLDAP is a registered trademark of the OpenLDAP Foundation.
|
||||||
|
|
||||||
|
Individual files and/or contributed packages may be copyright by
|
||||||
|
other parties and/or subject to additional restrictions.
|
||||||
|
|
||||||
|
This work also contains materials derived from public sources.
|
||||||
|
|
||||||
|
Additional information about OpenLDAP can be obtained at
|
||||||
|
<http://www.openldap.org/>.
|
47
LICENSE
Normal file
47
LICENSE
Normal file
@ -0,0 +1,47 @@
|
|||||||
|
The OpenLDAP Public License
|
||||||
|
Version 2.8, 17 August 2003
|
||||||
|
|
||||||
|
Redistribution and use of this software and associated documentation
|
||||||
|
("Software"), with or without modification, are permitted provided
|
||||||
|
that the following conditions are met:
|
||||||
|
|
||||||
|
1. Redistributions in source form must retain copyright statements
|
||||||
|
and notices,
|
||||||
|
|
||||||
|
2. Redistributions in binary form must reproduce applicable copyright
|
||||||
|
statements and notices, this list of conditions, and the following
|
||||||
|
disclaimer in the documentation and/or other materials provided
|
||||||
|
with the distribution, and
|
||||||
|
|
||||||
|
3. Redistributions must contain a verbatim copy of this document.
|
||||||
|
|
||||||
|
The OpenLDAP Foundation may revise this license from time to time.
|
||||||
|
Each revision is distinguished by a version number. You may use
|
||||||
|
this Software under terms of this license revision or under the
|
||||||
|
terms of any subsequent revision of the license.
|
||||||
|
|
||||||
|
THIS SOFTWARE IS PROVIDED BY THE OPENLDAP FOUNDATION AND ITS
|
||||||
|
CONTRIBUTORS ``AS IS'' AND ANY EXPRESSED OR IMPLIED WARRANTIES,
|
||||||
|
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
|
||||||
|
AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
|
||||||
|
SHALL THE OPENLDAP FOUNDATION, ITS CONTRIBUTORS, OR THE AUTHOR(S)
|
||||||
|
OR OWNER(S) OF THE SOFTWARE BE LIABLE FOR ANY DIRECT, INDIRECT,
|
||||||
|
INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
||||||
|
BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||||
|
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
|
||||||
|
CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||||
|
LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
||||||
|
ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||||
|
POSSIBILITY OF SUCH DAMAGE.
|
||||||
|
|
||||||
|
The names of the authors and copyright holders must not be used in
|
||||||
|
advertising or otherwise to promote the sale, use or other dealing
|
||||||
|
in this Software without specific, written prior permission. Title
|
||||||
|
to copyright in this Software shall at all times remain with copyright
|
||||||
|
holders.
|
||||||
|
|
||||||
|
OpenLDAP is a registered trademark of the OpenLDAP Foundation.
|
||||||
|
|
||||||
|
Copyright 1999-2003 The OpenLDAP Foundation, Redwood City,
|
||||||
|
California, USA. All Rights Reserved. Permission to copy and
|
||||||
|
distribute verbatim copies of this document is granted.
|
103
Makefile
Normal file
103
Makefile
Normal file
@ -0,0 +1,103 @@
|
|||||||
|
# Makefile for liblmdb (Lightning memory-mapped database library).
|
||||||
|
|
||||||
|
########################################################################
|
||||||
|
# Configuration. The compiler options must enable threaded compilation.
|
||||||
|
#
|
||||||
|
# Preprocessor macros (for CPPFLAGS) of interest...
|
||||||
|
# Note that the defaults should already be correct for most
|
||||||
|
# platforms; you should not need to change any of these.
|
||||||
|
# Read their descriptions in mdb.c if you do:
|
||||||
|
#
|
||||||
|
# - MDB_USE_POSIX_SEM
|
||||||
|
# - MDB_DSYNC
|
||||||
|
# - MDB_FDATASYNC
|
||||||
|
# - MDB_USE_PWRITEV
|
||||||
|
#
|
||||||
|
# There may be other macros in mdb.c of interest. You should
|
||||||
|
# read mdb.c before changing any of them.
|
||||||
|
#
|
||||||
|
CC = gcc
|
||||||
|
W = -W -Wall -Wno-unused-parameter -Wbad-function-cast -Wuninitialized
|
||||||
|
THREADS = -pthread
|
||||||
|
OPT = -O2 -g
|
||||||
|
CFLAGS = $(THREADS) $(OPT) $(W) $(XCFLAGS)
|
||||||
|
LDLIBS =
|
||||||
|
SOLIBS =
|
||||||
|
prefix = /usr/local
|
||||||
|
|
||||||
|
########################################################################
|
||||||
|
|
||||||
|
IHDRS = lmdb.h
|
||||||
|
ILIBS = liblmdb.a liblmdb.so
|
||||||
|
IPROGS = mdb_stat mdb_copy mdb_dump mdb_load
|
||||||
|
IDOCS = mdb_stat.1 mdb_copy.1 mdb_dump.1 mdb_load.1
|
||||||
|
PROGS = $(IPROGS) mtest mtest2 mtest3 mtest4 mtest5
|
||||||
|
all: $(ILIBS) $(PROGS)
|
||||||
|
|
||||||
|
install: $(ILIBS) $(IPROGS) $(IHDRS)
|
||||||
|
for f in $(IPROGS); do cp $$f $(DESTDIR)$(prefix)/bin; done
|
||||||
|
for f in $(ILIBS); do cp $$f $(DESTDIR)$(prefix)/lib; done
|
||||||
|
for f in $(IHDRS); do cp $$f $(DESTDIR)$(prefix)/include; done
|
||||||
|
for f in $(IDOCS); do cp $$f $(DESTDIR)$(prefix)/man/man1; done
|
||||||
|
|
||||||
|
clean:
|
||||||
|
rm -rf $(PROGS) *.[ao] *.[ls]o *~ testdb
|
||||||
|
|
||||||
|
test: all
|
||||||
|
rm -rf testdb && mkdir testdb
|
||||||
|
./mtest && ./mdb_stat testdb
|
||||||
|
|
||||||
|
liblmdb.a: mdb.o midl.o
|
||||||
|
ar rs $@ mdb.o midl.o
|
||||||
|
|
||||||
|
liblmdb.so: mdb.lo midl.lo
|
||||||
|
# $(CC) $(LDFLAGS) -pthread -shared -Wl,-Bsymbolic -o $@ mdb.o midl.o $(SOLIBS)
|
||||||
|
$(CC) $(LDFLAGS) -pthread -shared -o $@ mdb.lo midl.lo $(SOLIBS)
|
||||||
|
|
||||||
|
mdb_stat: mdb_stat.o liblmdb.a
|
||||||
|
mdb_copy: mdb_copy.o liblmdb.a
|
||||||
|
mdb_dump: mdb_dump.o liblmdb.a
|
||||||
|
mdb_load: mdb_load.o liblmdb.a
|
||||||
|
mtest: mtest.o liblmdb.a
|
||||||
|
mtest2: mtest2.o liblmdb.a
|
||||||
|
mtest3: mtest3.o liblmdb.a
|
||||||
|
mtest4: mtest4.o liblmdb.a
|
||||||
|
mtest5: mtest5.o liblmdb.a
|
||||||
|
mtest6: mtest6.o liblmdb.a
|
||||||
|
|
||||||
|
mdb.o: mdb.c lmdb.h midl.h
|
||||||
|
$(CC) $(CFLAGS) $(CPPFLAGS) -c mdb.c
|
||||||
|
|
||||||
|
midl.o: midl.c midl.h
|
||||||
|
$(CC) $(CFLAGS) $(CPPFLAGS) -c midl.c
|
||||||
|
|
||||||
|
mdb.lo: mdb.c lmdb.h midl.h
|
||||||
|
$(CC) $(CFLAGS) -fPIC $(CPPFLAGS) -c mdb.c -o $@
|
||||||
|
|
||||||
|
midl.lo: midl.c midl.h
|
||||||
|
$(CC) $(CFLAGS) -fPIC $(CPPFLAGS) -c midl.c -o $@
|
||||||
|
|
||||||
|
%: %.o
|
||||||
|
$(CC) $(CFLAGS) $(LDFLAGS) $^ $(LDLIBS) -o $@
|
||||||
|
|
||||||
|
%.o: %.c lmdb.h
|
||||||
|
$(CC) $(CFLAGS) $(CPPFLAGS) -c $<
|
||||||
|
|
||||||
|
COV_FLAGS=-fprofile-arcs -ftest-coverage
|
||||||
|
COV_OBJS=xmdb.o xmidl.o
|
||||||
|
|
||||||
|
coverage: xmtest
|
||||||
|
for i in mtest*.c [0-9]*.c; do j=`basename \$$i .c`; $(MAKE) $$j.o; \
|
||||||
|
gcc -o x$$j $$j.o $(COV_OBJS) -pthread $(COV_FLAGS); \
|
||||||
|
rm -rf testdb; mkdir testdb; ./x$$j; done
|
||||||
|
gcov xmdb.c
|
||||||
|
gcov xmidl.c
|
||||||
|
|
||||||
|
xmtest: mtest.o xmdb.o xmidl.o
|
||||||
|
gcc -o xmtest mtest.o xmdb.o xmidl.o -pthread $(COV_FLAGS)
|
||||||
|
|
||||||
|
xmdb.o: mdb.c lmdb.h midl.h
|
||||||
|
$(CC) $(CFLAGS) -fPIC $(CPPFLAGS) -O0 $(COV_FLAGS) -c mdb.c -o $@
|
||||||
|
|
||||||
|
xmidl.o: midl.c midl.h
|
||||||
|
$(CC) $(CFLAGS) -fPIC $(CPPFLAGS) -O0 $(COV_FLAGS) -c midl.c -o $@
|
54
mdb_copy.1
Normal file
54
mdb_copy.1
Normal file
@ -0,0 +1,54 @@
|
|||||||
|
.TH MDB_COPY 1 "2014/06/20" "LMDB 0.9.14"
|
||||||
|
.\" Copyright 2012-2014 Howard Chu, Symas Corp. All Rights Reserved.
|
||||||
|
.\" Copying restrictions apply. See COPYRIGHT/LICENSE.
|
||||||
|
.SH NAME
|
||||||
|
mdb_copy \- LMDB environment copy tool
|
||||||
|
.SH SYNOPSIS
|
||||||
|
.B mdb_copy
|
||||||
|
[\c
|
||||||
|
.BR \-V ]
|
||||||
|
[\c
|
||||||
|
.BR \-c ]
|
||||||
|
[\c
|
||||||
|
.BR \-n ]
|
||||||
|
.B srcpath
|
||||||
|
[\c
|
||||||
|
.BR dstpath ]
|
||||||
|
.SH DESCRIPTION
|
||||||
|
The
|
||||||
|
.B mdb_copy
|
||||||
|
utility copies an LMDB environment. The environment can
|
||||||
|
be copied regardless of whether it is currently in use.
|
||||||
|
No lockfile is created, since it gets recreated at need.
|
||||||
|
|
||||||
|
If
|
||||||
|
.I dstpath
|
||||||
|
is specified it must be the path of an empty directory
|
||||||
|
for storing the backup. Otherwise, the backup will be
|
||||||
|
written to stdout.
|
||||||
|
|
||||||
|
.SH OPTIONS
|
||||||
|
.TP
|
||||||
|
.BR \-V
|
||||||
|
Write the library version number to the standard output, and exit.
|
||||||
|
.TP
|
||||||
|
.BR \-c
|
||||||
|
Compact while copying. Only current data pages will be copied; freed
|
||||||
|
or unused pages will be omitted from the copy. This option will
|
||||||
|
slow down the backup process as it is more CPU-intensive.
|
||||||
|
.TP
|
||||||
|
.BR \-n
|
||||||
|
Open LDMB environment(s) which do not use subdirectories.
|
||||||
|
|
||||||
|
.SH DIAGNOSTICS
|
||||||
|
Exit status is zero if no errors occur.
|
||||||
|
Errors result in a non-zero exit status and
|
||||||
|
a diagnostic message being written to standard error.
|
||||||
|
.SH CAVEATS
|
||||||
|
This utility can trigger significant file size growth if run
|
||||||
|
in parallel with write transactions, because pages which they
|
||||||
|
free during copying cannot be reused until the copy is done.
|
||||||
|
.SH "SEE ALSO"
|
||||||
|
.BR mdb_stat (1)
|
||||||
|
.SH AUTHOR
|
||||||
|
Howard Chu of Symas Corporation <http://www.symas.com>
|
82
mdb_copy.c
Normal file
82
mdb_copy.c
Normal file
@ -0,0 +1,82 @@
|
|||||||
|
/* mdb_copy.c - memory-mapped database backup tool */
|
||||||
|
/*
|
||||||
|
* Copyright 2012 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>.
|
||||||
|
*/
|
||||||
|
#ifdef _WIN32
|
||||||
|
#include <windows.h>
|
||||||
|
#define MDB_STDOUT GetStdHandle(STD_OUTPUT_HANDLE)
|
||||||
|
#else
|
||||||
|
#define MDB_STDOUT 1
|
||||||
|
#endif
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <signal.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
static void
|
||||||
|
sighandle(int sig)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
int main(int argc,char * argv[])
|
||||||
|
{
|
||||||
|
int rc;
|
||||||
|
MDB_env *env;
|
||||||
|
const char *progname = argv[0], *act;
|
||||||
|
unsigned flags = MDB_RDONLY;
|
||||||
|
unsigned cpflags = 0;
|
||||||
|
|
||||||
|
for (; argc > 1 && argv[1][0] == '-'; argc--, argv++) {
|
||||||
|
if (argv[1][1] == 'n' && argv[1][2] == '\0')
|
||||||
|
flags |= MDB_NOSUBDIR;
|
||||||
|
else if (argv[1][1] == 'c' && argv[1][2] == '\0')
|
||||||
|
cpflags |= MDB_CP_COMPACT;
|
||||||
|
else if (argv[1][1] == 'V' && argv[1][2] == '\0') {
|
||||||
|
printf("%s\n", MDB_VERSION_STRING);
|
||||||
|
exit(0);
|
||||||
|
} else
|
||||||
|
argc = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (argc<2 || argc>3) {
|
||||||
|
fprintf(stderr, "usage: %s [-V] [-c] [-n] srcpath [dstpath]\n", progname);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
|
||||||
|
#ifdef SIGPIPE
|
||||||
|
signal(SIGPIPE, sighandle);
|
||||||
|
#endif
|
||||||
|
#ifdef SIGHUP
|
||||||
|
signal(SIGHUP, sighandle);
|
||||||
|
#endif
|
||||||
|
signal(SIGINT, sighandle);
|
||||||
|
signal(SIGTERM, sighandle);
|
||||||
|
|
||||||
|
act = "opening environment";
|
||||||
|
rc = mdb_env_create(&env);
|
||||||
|
if (rc == MDB_SUCCESS) {
|
||||||
|
rc = mdb_env_open(env, argv[1], flags, 0664);
|
||||||
|
}
|
||||||
|
if (rc == MDB_SUCCESS) {
|
||||||
|
act = "copying";
|
||||||
|
if (argc == 2)
|
||||||
|
rc = mdb_env_copyfd2(env, MDB_STDOUT, cpflags);
|
||||||
|
else
|
||||||
|
rc = mdb_env_copy2(env, argv[2], cpflags);
|
||||||
|
}
|
||||||
|
if (rc)
|
||||||
|
fprintf(stderr, "%s: %s failed, error %d (%s)\n",
|
||||||
|
progname, act, rc, mdb_strerror(rc));
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return rc ? EXIT_FAILURE : EXIT_SUCCESS;
|
||||||
|
}
|
75
mdb_dump.1
Normal file
75
mdb_dump.1
Normal file
@ -0,0 +1,75 @@
|
|||||||
|
.TH MDB_DUMP 1 "2014/06/20" "LMDB 0.9.14"
|
||||||
|
.\" Copyright 2014 Howard Chu, Symas Corp. All Rights Reserved.
|
||||||
|
.\" Copying restrictions apply. See COPYRIGHT/LICENSE.
|
||||||
|
.SH NAME
|
||||||
|
mdb_dump \- LMDB environment export tool
|
||||||
|
.SH SYNOPSIS
|
||||||
|
.B mdb_dump
|
||||||
|
.BR \ envpath
|
||||||
|
[\c
|
||||||
|
.BR \-V ]
|
||||||
|
[\c
|
||||||
|
.BI \-f \ file\fR]
|
||||||
|
[\c
|
||||||
|
.BR \-l ]
|
||||||
|
[\c
|
||||||
|
.BR \-n ]
|
||||||
|
[\c
|
||||||
|
.BR \-p ]
|
||||||
|
[\c
|
||||||
|
.BR \-a \ |
|
||||||
|
.BI \-s \ subdb\fR]
|
||||||
|
.SH DESCRIPTION
|
||||||
|
The
|
||||||
|
.B mdb_dump
|
||||||
|
utility reads a database and writes its contents to the
|
||||||
|
standard output using a portable flat-text format
|
||||||
|
understood by the
|
||||||
|
.BR mdb_load (1)
|
||||||
|
utility.
|
||||||
|
.SH OPTIONS
|
||||||
|
.TP
|
||||||
|
.BR \-V
|
||||||
|
Write the library version number to the standard output, and exit.
|
||||||
|
.TP
|
||||||
|
.BR \-f \ file
|
||||||
|
Write to the specified file instead of to the standard output.
|
||||||
|
.TP
|
||||||
|
.BR \-l
|
||||||
|
List the databases stored in the environment. Just the
|
||||||
|
names will be listed, no data will be output.
|
||||||
|
.TP
|
||||||
|
.BR \-n
|
||||||
|
Dump an LMDB database which does not use subdirectories.
|
||||||
|
.TP
|
||||||
|
.BR \-p
|
||||||
|
If characters in either the key or data items are printing characters (as
|
||||||
|
defined by isprint(3)), output them directly. This option permits users to
|
||||||
|
use standard text editors and tools to modify the contents of databases.
|
||||||
|
|
||||||
|
Note: different systems may have different notions about what characters
|
||||||
|
are considered printing characters, and databases dumped in this manner may
|
||||||
|
be less portable to external systems.
|
||||||
|
.TP
|
||||||
|
.BR \-a
|
||||||
|
Dump all of the subdatabases in the environment.
|
||||||
|
.TP
|
||||||
|
.BR \-s \ subdb
|
||||||
|
Dump a specific subdatabase. If no database is specified, only the main database is dumped.
|
||||||
|
.SH DIAGNOSTICS
|
||||||
|
Exit status is zero if no errors occur.
|
||||||
|
Errors result in a non-zero exit status and
|
||||||
|
a diagnostic message being written to standard error.
|
||||||
|
|
||||||
|
Dumping and reloading databases that use user-defined comparison functions
|
||||||
|
will result in new databases that use the default comparison functions.
|
||||||
|
\fBIn this case it is quite likely that the reloaded database will be
|
||||||
|
damaged beyond repair permitting neither record storage nor retrieval.\fP
|
||||||
|
|
||||||
|
The only available workaround is to modify the source for the
|
||||||
|
.BR mdb_load (1)
|
||||||
|
utility to load the database using the correct comparison functions.
|
||||||
|
.SH "SEE ALSO"
|
||||||
|
.BR mdb_load (1)
|
||||||
|
.SH AUTHOR
|
||||||
|
Howard Chu of Symas Corporation <http://www.symas.com>
|
317
mdb_dump.c
Normal file
317
mdb_dump.c
Normal file
@ -0,0 +1,317 @@
|
|||||||
|
/* mdb_dump.c - memory-mapped database dump tool */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <ctype.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <signal.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
#define Z "I"
|
||||||
|
#else
|
||||||
|
#define Z "z"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#define PRINT 1
|
||||||
|
static int mode;
|
||||||
|
|
||||||
|
typedef struct flagbit {
|
||||||
|
int bit;
|
||||||
|
char *name;
|
||||||
|
} flagbit;
|
||||||
|
|
||||||
|
flagbit dbflags[] = {
|
||||||
|
{ MDB_REVERSEKEY, "reversekey" },
|
||||||
|
{ MDB_DUPSORT, "dupsort" },
|
||||||
|
{ MDB_INTEGERKEY, "integerkey" },
|
||||||
|
{ MDB_DUPFIXED, "dupfixed" },
|
||||||
|
{ MDB_INTEGERDUP, "integerdup" },
|
||||||
|
{ MDB_REVERSEDUP, "reversedup" },
|
||||||
|
{ 0, NULL }
|
||||||
|
};
|
||||||
|
|
||||||
|
static volatile sig_atomic_t gotsig;
|
||||||
|
|
||||||
|
static void dumpsig( int sig )
|
||||||
|
{
|
||||||
|
gotsig=1;
|
||||||
|
}
|
||||||
|
|
||||||
|
static const char hexc[] = "0123456789abcdef";
|
||||||
|
|
||||||
|
static void hex(unsigned char c)
|
||||||
|
{
|
||||||
|
putchar(hexc[c >> 4]);
|
||||||
|
putchar(hexc[c & 0xf]);
|
||||||
|
}
|
||||||
|
|
||||||
|
static void text(MDB_val *v)
|
||||||
|
{
|
||||||
|
unsigned char *c, *end;
|
||||||
|
|
||||||
|
putchar(' ');
|
||||||
|
c = v->mv_data;
|
||||||
|
end = c + v->mv_size;
|
||||||
|
while (c < end) {
|
||||||
|
if (isprint(*c)) {
|
||||||
|
putchar(*c);
|
||||||
|
} else {
|
||||||
|
putchar('\\');
|
||||||
|
hex(*c);
|
||||||
|
}
|
||||||
|
c++;
|
||||||
|
}
|
||||||
|
putchar('\n');
|
||||||
|
}
|
||||||
|
|
||||||
|
static void byte(MDB_val *v)
|
||||||
|
{
|
||||||
|
unsigned char *c, *end;
|
||||||
|
|
||||||
|
putchar(' ');
|
||||||
|
c = v->mv_data;
|
||||||
|
end = c + v->mv_size;
|
||||||
|
while (c < end) {
|
||||||
|
hex(*c++);
|
||||||
|
}
|
||||||
|
putchar('\n');
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Dump in BDB-compatible format */
|
||||||
|
static int dumpit(MDB_txn *txn, MDB_dbi dbi, char *name)
|
||||||
|
{
|
||||||
|
MDB_cursor *mc;
|
||||||
|
MDB_stat ms;
|
||||||
|
MDB_val key, data;
|
||||||
|
MDB_envinfo info;
|
||||||
|
unsigned int flags;
|
||||||
|
int rc, i;
|
||||||
|
|
||||||
|
rc = mdb_dbi_flags(txn, dbi, &flags);
|
||||||
|
if (rc) return rc;
|
||||||
|
|
||||||
|
rc = mdb_stat(txn, dbi, &ms);
|
||||||
|
if (rc) return rc;
|
||||||
|
|
||||||
|
rc = mdb_env_info(mdb_txn_env(txn), &info);
|
||||||
|
if (rc) return rc;
|
||||||
|
|
||||||
|
printf("VERSION=3\n");
|
||||||
|
printf("format=%s\n", mode & PRINT ? "print" : "bytevalue");
|
||||||
|
if (name)
|
||||||
|
printf("database=%s\n", name);
|
||||||
|
printf("type=btree\n");
|
||||||
|
printf("mapsize=%" Z "u\n", info.me_mapsize);
|
||||||
|
if (info.me_mapaddr)
|
||||||
|
printf("mapaddr=%p\n", info.me_mapaddr);
|
||||||
|
printf("maxreaders=%u\n", info.me_maxreaders);
|
||||||
|
|
||||||
|
if (flags & MDB_DUPSORT)
|
||||||
|
printf("duplicates=1\n");
|
||||||
|
|
||||||
|
for (i=0; dbflags[i].bit; i++)
|
||||||
|
if (flags & dbflags[i].bit)
|
||||||
|
printf("%s=1\n", dbflags[i].name);
|
||||||
|
|
||||||
|
printf("db_pagesize=%d\n", ms.ms_psize);
|
||||||
|
printf("HEADER=END\n");
|
||||||
|
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &mc);
|
||||||
|
if (rc) return rc;
|
||||||
|
|
||||||
|
while ((rc = mdb_cursor_get(mc, &key, &data, MDB_NEXT) == MDB_SUCCESS)) {
|
||||||
|
if (gotsig) {
|
||||||
|
rc = EINTR;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
if (mode & PRINT) {
|
||||||
|
text(&key);
|
||||||
|
text(&data);
|
||||||
|
} else {
|
||||||
|
byte(&key);
|
||||||
|
byte(&data);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
printf("DATA=END\n");
|
||||||
|
if (rc == MDB_NOTFOUND)
|
||||||
|
rc = MDB_SUCCESS;
|
||||||
|
|
||||||
|
return rc;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void usage(char *prog)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "usage: %s dbpath [-V] [-f output] [-l] [-n] [-p] [-a|-s subdb]\n", prog);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
|
||||||
|
int main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
int i, rc;
|
||||||
|
MDB_env *env;
|
||||||
|
MDB_txn *txn;
|
||||||
|
MDB_dbi dbi;
|
||||||
|
char *prog = argv[0];
|
||||||
|
char *envname;
|
||||||
|
char *subname = NULL;
|
||||||
|
int alldbs = 0, envflags = 0, list = 0;
|
||||||
|
|
||||||
|
if (argc < 2) {
|
||||||
|
usage(prog);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -a: dump main DB and all subDBs
|
||||||
|
* -s: dump only the named subDB
|
||||||
|
* -n: use NOSUBDIR flag on env_open
|
||||||
|
* -p: use printable characters
|
||||||
|
* -f: write to file instead of stdout
|
||||||
|
* -V: print version and exit
|
||||||
|
* (default) dump only the main DB
|
||||||
|
*/
|
||||||
|
while ((i = getopt(argc, argv, "af:lnps:V")) != EOF) {
|
||||||
|
switch(i) {
|
||||||
|
case 'V':
|
||||||
|
printf("%s\n", MDB_VERSION_STRING);
|
||||||
|
exit(0);
|
||||||
|
break;
|
||||||
|
case 'l':
|
||||||
|
list = 1;
|
||||||
|
/*FALLTHROUGH*/;
|
||||||
|
case 'a':
|
||||||
|
if (subname)
|
||||||
|
usage(prog);
|
||||||
|
alldbs++;
|
||||||
|
break;
|
||||||
|
case 'f':
|
||||||
|
if (freopen(optarg, "w", stdout) == NULL) {
|
||||||
|
fprintf(stderr, "%s: %s: reopen: %s\n",
|
||||||
|
prog, optarg, strerror(errno));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case 'n':
|
||||||
|
envflags |= MDB_NOSUBDIR;
|
||||||
|
break;
|
||||||
|
case 'p':
|
||||||
|
mode |= PRINT;
|
||||||
|
break;
|
||||||
|
case 's':
|
||||||
|
if (alldbs)
|
||||||
|
usage(prog);
|
||||||
|
subname = optarg;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
usage(prog);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (optind != argc - 1)
|
||||||
|
usage(prog);
|
||||||
|
|
||||||
|
#ifdef SIGPIPE
|
||||||
|
signal(SIGPIPE, dumpsig);
|
||||||
|
#endif
|
||||||
|
#ifdef SIGHUP
|
||||||
|
signal(SIGHUP, dumpsig);
|
||||||
|
#endif
|
||||||
|
signal(SIGINT, dumpsig);
|
||||||
|
signal(SIGTERM, dumpsig);
|
||||||
|
|
||||||
|
envname = argv[optind];
|
||||||
|
rc = mdb_env_create(&env);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_create failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
return EXIT_FAILURE;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (alldbs || subname) {
|
||||||
|
mdb_env_set_maxdbs(env, 2);
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_env_open(env, envname, envflags | MDB_RDONLY, 0664);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_txn_begin(env, NULL, MDB_RDONLY, &txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_txn_begin failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_open(txn, subname, 0, &dbi);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (alldbs) {
|
||||||
|
MDB_cursor *cursor;
|
||||||
|
MDB_val key;
|
||||||
|
int count = 0;
|
||||||
|
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &cursor);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_cursor_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
while ((rc = mdb_cursor_get(cursor, &key, NULL, MDB_NEXT_NODUP)) == 0) {
|
||||||
|
char *str;
|
||||||
|
MDB_dbi db2;
|
||||||
|
if (memchr(key.mv_data, '\0', key.mv_size))
|
||||||
|
continue;
|
||||||
|
count++;
|
||||||
|
str = malloc(key.mv_size+1);
|
||||||
|
memcpy(str, key.mv_data, key.mv_size);
|
||||||
|
str[key.mv_size] = '\0';
|
||||||
|
rc = mdb_open(txn, str, 0, &db2);
|
||||||
|
if (rc == MDB_SUCCESS) {
|
||||||
|
if (list) {
|
||||||
|
printf("%s\n", str);
|
||||||
|
list++;
|
||||||
|
} else {
|
||||||
|
rc = dumpit(txn, db2, str);
|
||||||
|
if (rc)
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
mdb_close(env, db2);
|
||||||
|
}
|
||||||
|
free(str);
|
||||||
|
if (rc) continue;
|
||||||
|
}
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
if (!count) {
|
||||||
|
fprintf(stderr, "%s: %s does not contain multiple databases\n", prog, envname);
|
||||||
|
rc = MDB_NOTFOUND;
|
||||||
|
} else if (rc == MDB_NOTFOUND) {
|
||||||
|
rc = MDB_SUCCESS;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
rc = dumpit(txn, dbi, subname);
|
||||||
|
}
|
||||||
|
if (rc && rc != MDB_NOTFOUND)
|
||||||
|
fprintf(stderr, "%s: %s: %s\n", prog, envname, mdb_strerror(rc));
|
||||||
|
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
txn_abort:
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
env_close:
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return rc ? EXIT_FAILURE : EXIT_SUCCESS;
|
||||||
|
}
|
77
mdb_load.1
Normal file
77
mdb_load.1
Normal file
@ -0,0 +1,77 @@
|
|||||||
|
.TH MDB_LOAD 1 "2014/06/20" "LMDB 0.9.14"
|
||||||
|
.\" Copyright 2014 Howard Chu, Symas Corp. All Rights Reserved.
|
||||||
|
.\" Copying restrictions apply. See COPYRIGHT/LICENSE.
|
||||||
|
.SH NAME
|
||||||
|
mdb_load \- LMDB environment import tool
|
||||||
|
.SH SYNOPSIS
|
||||||
|
.B mdb_load
|
||||||
|
.BR \ envpath
|
||||||
|
[\c
|
||||||
|
.BR \-V ]
|
||||||
|
[\c
|
||||||
|
.BI \-f \ file\fR]
|
||||||
|
[\c
|
||||||
|
.BR \-n ]
|
||||||
|
[\c
|
||||||
|
.BI \-s \ subdb\fR]
|
||||||
|
[\c
|
||||||
|
.BR \-N ]
|
||||||
|
[\c
|
||||||
|
.BR \-T ]
|
||||||
|
.SH DESCRIPTION
|
||||||
|
The
|
||||||
|
.B mdb_load
|
||||||
|
utility reads from the standard input and loads it into the
|
||||||
|
LMDB environment
|
||||||
|
.BR envpath .
|
||||||
|
|
||||||
|
The input to
|
||||||
|
.B mdb_load
|
||||||
|
must be in the output format specified by the
|
||||||
|
.BR mdb_dump (1)
|
||||||
|
utility or as specified by the
|
||||||
|
.B -T
|
||||||
|
option below.
|
||||||
|
.SH OPTIONS
|
||||||
|
.TP
|
||||||
|
.BR \-V
|
||||||
|
Write the library version number to the standard output, and exit.
|
||||||
|
.TP
|
||||||
|
.BR \-f \ file
|
||||||
|
Read from the specified file instead of from the standard input.
|
||||||
|
.TP
|
||||||
|
.BR \-n
|
||||||
|
Load an LMDB database which does not use subdirectories.
|
||||||
|
.TP
|
||||||
|
.BR \-s \ subdb
|
||||||
|
Load a specific subdatabase. If no database is specified, data is loaded into the main database.
|
||||||
|
.TP
|
||||||
|
.BR \-N
|
||||||
|
Don't overwrite existing records when loading into an already existing database; just skip them.
|
||||||
|
.TP
|
||||||
|
.BR \-T
|
||||||
|
Load data from simple text files. The input must be paired lines of text, where the first
|
||||||
|
line of the pair is the key item, and the second line of the pair is its corresponding
|
||||||
|
data item.
|
||||||
|
|
||||||
|
A simple escape mechanism, where newline and backslash (\\) characters are special, is
|
||||||
|
applied to the text input. Newline characters are interpreted as record separators.
|
||||||
|
Backslash characters in the text will be interpreted in one of two ways: If the backslash
|
||||||
|
character precedes another backslash character, the pair will be interpreted as a literal
|
||||||
|
backslash. If the backslash character precedes any other character, the two characters
|
||||||
|
following the backslash will be interpreted as a hexadecimal specification of a single
|
||||||
|
character; for example, \\0a is a newline character in the ASCII character set.
|
||||||
|
|
||||||
|
For this reason, any backslash or newline characters that naturally occur in the text
|
||||||
|
input must be escaped to avoid misinterpretation by
|
||||||
|
.BR mdb_load .
|
||||||
|
|
||||||
|
.SH DIAGNOSTICS
|
||||||
|
Exit status is zero if no errors occur.
|
||||||
|
Errors result in a non-zero exit status and
|
||||||
|
a diagnostic message being written to standard error.
|
||||||
|
|
||||||
|
.SH "SEE ALSO"
|
||||||
|
.BR mdb_dump (1)
|
||||||
|
.SH AUTHOR
|
||||||
|
Howard Chu of Symas Corporation <http://www.symas.com>
|
452
mdb_load.c
Normal file
452
mdb_load.c
Normal file
@ -0,0 +1,452 @@
|
|||||||
|
/* mdb_load.c - memory-mapped database load tool */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <ctype.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define PRINT 1
|
||||||
|
#define NOHDR 2
|
||||||
|
static int mode;
|
||||||
|
|
||||||
|
static char *subname = NULL;
|
||||||
|
|
||||||
|
static size_t lineno;
|
||||||
|
static int version;
|
||||||
|
|
||||||
|
static int flags;
|
||||||
|
|
||||||
|
static char *prog;
|
||||||
|
|
||||||
|
static int Eof;
|
||||||
|
|
||||||
|
static MDB_envinfo info;
|
||||||
|
|
||||||
|
static MDB_val kbuf, dbuf;
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
#define Z "I"
|
||||||
|
#else
|
||||||
|
#define Z "z"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#define STRLENOF(s) (sizeof(s)-1)
|
||||||
|
|
||||||
|
typedef struct flagbit {
|
||||||
|
int bit;
|
||||||
|
char *name;
|
||||||
|
int len;
|
||||||
|
} flagbit;
|
||||||
|
|
||||||
|
#define S(s) s, STRLENOF(s)
|
||||||
|
|
||||||
|
flagbit dbflags[] = {
|
||||||
|
{ MDB_REVERSEKEY, S("reversekey") },
|
||||||
|
{ MDB_DUPSORT, S("dupsort") },
|
||||||
|
{ MDB_INTEGERKEY, S("integerkey") },
|
||||||
|
{ MDB_DUPFIXED, S("dupfixed") },
|
||||||
|
{ MDB_INTEGERDUP, S("integerdup") },
|
||||||
|
{ MDB_REVERSEDUP, S("reversedup") },
|
||||||
|
{ 0, NULL, 0 }
|
||||||
|
};
|
||||||
|
|
||||||
|
static void readhdr(void)
|
||||||
|
{
|
||||||
|
char *ptr;
|
||||||
|
|
||||||
|
while (fgets(dbuf.mv_data, dbuf.mv_size, stdin) != NULL) {
|
||||||
|
lineno++;
|
||||||
|
if (!strncmp(dbuf.mv_data, "VERSION=", STRLENOF("VERSION="))) {
|
||||||
|
version=atoi((char *)dbuf.mv_data+STRLENOF("VERSION="));
|
||||||
|
if (version > 3) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unsupported VERSION %d\n",
|
||||||
|
prog, lineno, version);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "HEADER=END", STRLENOF("HEADER=END"))) {
|
||||||
|
break;
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "format=", STRLENOF("format="))) {
|
||||||
|
if (!strncmp((char *)dbuf.mv_data+STRLENOF("FORMAT="), "print", STRLENOF("print")))
|
||||||
|
mode |= PRINT;
|
||||||
|
else if (strncmp((char *)dbuf.mv_data+STRLENOF("FORMAT="), "bytevalue", STRLENOF("bytevalue"))) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unsupported FORMAT %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data+STRLENOF("FORMAT="));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "database=", STRLENOF("database="))) {
|
||||||
|
ptr = memchr(dbuf.mv_data, '\n', dbuf.mv_size);
|
||||||
|
if (ptr) *ptr = '\0';
|
||||||
|
if (subname) free(subname);
|
||||||
|
subname = strdup((char *)dbuf.mv_data+STRLENOF("database="));
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "type=", STRLENOF("type="))) {
|
||||||
|
if (strncmp((char *)dbuf.mv_data+STRLENOF("type="), "btree", STRLENOF("btree"))) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unsupported type %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data+STRLENOF("type="));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "mapaddr=", STRLENOF("mapaddr="))) {
|
||||||
|
int i;
|
||||||
|
ptr = memchr(dbuf.mv_data, '\n', dbuf.mv_size);
|
||||||
|
if (ptr) *ptr = '\0';
|
||||||
|
i = sscanf((char *)dbuf.mv_data+STRLENOF("mapaddr="), "%p", &info.me_mapaddr);
|
||||||
|
if (i != 1) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: invalid mapaddr %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data+STRLENOF("mapaddr="));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "mapsize=", STRLENOF("mapsize="))) {
|
||||||
|
int i;
|
||||||
|
ptr = memchr(dbuf.mv_data, '\n', dbuf.mv_size);
|
||||||
|
if (ptr) *ptr = '\0';
|
||||||
|
i = sscanf((char *)dbuf.mv_data+STRLENOF("mapsize="), "%" Z "u", &info.me_mapsize);
|
||||||
|
if (i != 1) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: invalid mapsize %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data+STRLENOF("mapsize="));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else if (!strncmp(dbuf.mv_data, "maxreaders=", STRLENOF("maxreaders="))) {
|
||||||
|
int i;
|
||||||
|
ptr = memchr(dbuf.mv_data, '\n', dbuf.mv_size);
|
||||||
|
if (ptr) *ptr = '\0';
|
||||||
|
i = sscanf((char *)dbuf.mv_data+STRLENOF("maxreaders="), "%u", &info.me_maxreaders);
|
||||||
|
if (i != 1) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: invalid maxreaders %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data+STRLENOF("maxreaders="));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
int i;
|
||||||
|
for (i=0; dbflags[i].bit; i++) {
|
||||||
|
if (!strncmp(dbuf.mv_data, dbflags[i].name, dbflags[i].len) &&
|
||||||
|
((char *)dbuf.mv_data)[dbflags[i].len] == '=') {
|
||||||
|
flags |= dbflags[i].bit;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (!dbflags[i].bit) {
|
||||||
|
ptr = memchr(dbuf.mv_data, '=', dbuf.mv_size);
|
||||||
|
if (!ptr) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unexpected format\n",
|
||||||
|
prog, lineno);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
} else {
|
||||||
|
*ptr = '\0';
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unrecognized keyword ignored: %s\n",
|
||||||
|
prog, lineno, (char *)dbuf.mv_data);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
static void badend(void)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: unexpected end of input\n",
|
||||||
|
prog, lineno);
|
||||||
|
}
|
||||||
|
|
||||||
|
static int unhex(unsigned char *c2)
|
||||||
|
{
|
||||||
|
int x, c;
|
||||||
|
x = *c2++ & 0x4f;
|
||||||
|
if (x & 0x40)
|
||||||
|
x -= 55;
|
||||||
|
c = x << 4;
|
||||||
|
x = *c2 & 0x4f;
|
||||||
|
if (x & 0x40)
|
||||||
|
x -= 55;
|
||||||
|
c |= x;
|
||||||
|
return c;
|
||||||
|
}
|
||||||
|
|
||||||
|
static int readline(MDB_val *out, MDB_val *buf)
|
||||||
|
{
|
||||||
|
unsigned char *c1, *c2, *end;
|
||||||
|
size_t len;
|
||||||
|
int c;
|
||||||
|
|
||||||
|
if (!(mode & NOHDR)) {
|
||||||
|
c = fgetc(stdin);
|
||||||
|
if (c == EOF) {
|
||||||
|
Eof = 1;
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
if (c != ' ') {
|
||||||
|
lineno++;
|
||||||
|
if (fgets(buf->mv_data, buf->mv_size, stdin) == NULL) {
|
||||||
|
badend:
|
||||||
|
Eof = 1;
|
||||||
|
badend();
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
if (c == 'D' && !strncmp(buf->mv_data, "ATA=END", STRLENOF("ATA=END")))
|
||||||
|
return EOF;
|
||||||
|
goto badend;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (fgets(buf->mv_data, buf->mv_size, stdin) == NULL) {
|
||||||
|
Eof = 1;
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
lineno++;
|
||||||
|
|
||||||
|
c1 = buf->mv_data;
|
||||||
|
len = strlen((char *)c1);
|
||||||
|
|
||||||
|
/* Is buffer too short? */
|
||||||
|
while (c1[len-1] != '\n') {
|
||||||
|
buf->mv_data = realloc(buf->mv_data, buf->mv_size*2);
|
||||||
|
if (!buf->mv_data) {
|
||||||
|
Eof = 1;
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: out of memory, line too long\n",
|
||||||
|
prog, lineno);
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
c1 = buf->mv_data;
|
||||||
|
c1 += buf->mv_size;
|
||||||
|
if (fgets((char *)c1, buf->mv_size, stdin) == NULL) {
|
||||||
|
Eof = 1;
|
||||||
|
badend();
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
buf->mv_size *= 2;
|
||||||
|
len = strlen((char *)c1);
|
||||||
|
}
|
||||||
|
c1 = c2 = buf->mv_data;
|
||||||
|
len = strlen((char *)c1);
|
||||||
|
c1[--len] = '\0';
|
||||||
|
end = c1 + len;
|
||||||
|
|
||||||
|
if (mode & PRINT) {
|
||||||
|
while (c2 < end) {
|
||||||
|
if (*c2 == '\\') {
|
||||||
|
if (c2[1] == '\\') {
|
||||||
|
c1++; c2 += 2;
|
||||||
|
} else {
|
||||||
|
if (c2+3 > end || !isxdigit(c2[1]) || !isxdigit(c2[2])) {
|
||||||
|
Eof = 1;
|
||||||
|
badend();
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
*c1++ = unhex(++c2);
|
||||||
|
c2 += 2;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
c1++; c2++;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
/* odd length not allowed */
|
||||||
|
if (len & 1) {
|
||||||
|
Eof = 1;
|
||||||
|
badend();
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
while (c2 < end) {
|
||||||
|
if (!isxdigit(*c2) || !isxdigit(c2[1])) {
|
||||||
|
Eof = 1;
|
||||||
|
badend();
|
||||||
|
return EOF;
|
||||||
|
}
|
||||||
|
*c1++ = unhex(c2);
|
||||||
|
c2 += 2;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
c2 = out->mv_data = buf->mv_data;
|
||||||
|
out->mv_size = c1 - c2;
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void usage(void)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "usage: %s dbpath [-V] [-f input] [-n] [-s name] [-N] [-T]\n", prog);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
|
||||||
|
int main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
int i, rc;
|
||||||
|
MDB_env *env;
|
||||||
|
MDB_txn *txn;
|
||||||
|
MDB_cursor *mc;
|
||||||
|
MDB_dbi dbi;
|
||||||
|
char *envname;
|
||||||
|
int envflags = 0, putflags = 0;
|
||||||
|
int dohdr = 0;
|
||||||
|
|
||||||
|
prog = argv[0];
|
||||||
|
|
||||||
|
if (argc < 2) {
|
||||||
|
usage();
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -f: load file instead of stdin
|
||||||
|
* -n: use NOSUBDIR flag on env_open
|
||||||
|
* -s: load into named subDB
|
||||||
|
* -N: use NOOVERWRITE on puts
|
||||||
|
* -T: read plaintext
|
||||||
|
* -V: print version and exit
|
||||||
|
*/
|
||||||
|
while ((i = getopt(argc, argv, "f:ns:NTV")) != EOF) {
|
||||||
|
switch(i) {
|
||||||
|
case 'V':
|
||||||
|
printf("%s\n", MDB_VERSION_STRING);
|
||||||
|
exit(0);
|
||||||
|
break;
|
||||||
|
case 'f':
|
||||||
|
if (freopen(optarg, "r", stdin) == NULL) {
|
||||||
|
fprintf(stderr, "%s: %s: reopen: %s\n",
|
||||||
|
prog, optarg, strerror(errno));
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case 'n':
|
||||||
|
envflags |= MDB_NOSUBDIR;
|
||||||
|
break;
|
||||||
|
case 's':
|
||||||
|
subname = strdup(optarg);
|
||||||
|
break;
|
||||||
|
case 'N':
|
||||||
|
putflags = MDB_NOOVERWRITE|MDB_NODUPDATA;
|
||||||
|
break;
|
||||||
|
case 'T':
|
||||||
|
mode |= NOHDR;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
usage();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (optind != argc - 1)
|
||||||
|
usage();
|
||||||
|
|
||||||
|
dbuf.mv_size = 4096;
|
||||||
|
dbuf.mv_data = malloc(dbuf.mv_size);
|
||||||
|
|
||||||
|
if (!(mode & NOHDR))
|
||||||
|
readhdr();
|
||||||
|
|
||||||
|
envname = argv[optind];
|
||||||
|
rc = mdb_env_create(&env);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_create failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
return EXIT_FAILURE;
|
||||||
|
}
|
||||||
|
|
||||||
|
mdb_env_set_maxdbs(env, 2);
|
||||||
|
|
||||||
|
if (info.me_maxreaders)
|
||||||
|
mdb_env_set_maxreaders(env, info.me_maxreaders);
|
||||||
|
|
||||||
|
if (info.me_mapsize)
|
||||||
|
mdb_env_set_mapsize(env, info.me_mapsize);
|
||||||
|
|
||||||
|
if (info.me_mapaddr)
|
||||||
|
envflags |= MDB_FIXEDMAP;
|
||||||
|
|
||||||
|
rc = mdb_env_open(env, envname, envflags, 0664);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
kbuf.mv_size = mdb_env_get_maxkeysize(env) * 2 + 2;
|
||||||
|
kbuf.mv_data = malloc(kbuf.mv_size);
|
||||||
|
|
||||||
|
while(!Eof) {
|
||||||
|
MDB_val key, data;
|
||||||
|
int batch = 0;
|
||||||
|
flags = 0;
|
||||||
|
|
||||||
|
if (!dohdr) {
|
||||||
|
dohdr = 1;
|
||||||
|
} else if (!(mode & NOHDR))
|
||||||
|
readhdr();
|
||||||
|
|
||||||
|
rc = mdb_txn_begin(env, NULL, 0, &txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_txn_begin failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_open(txn, subname, flags|MDB_CREATE, &dbi);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &mc);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_cursor_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
|
||||||
|
while(1) {
|
||||||
|
rc = readline(&key, &kbuf);
|
||||||
|
if (rc == EOF)
|
||||||
|
break;
|
||||||
|
if (rc)
|
||||||
|
goto txn_abort;
|
||||||
|
|
||||||
|
rc = readline(&data, &dbuf);
|
||||||
|
if (rc)
|
||||||
|
goto txn_abort;
|
||||||
|
|
||||||
|
rc = mdb_cursor_put(mc, &key, &data, putflags);
|
||||||
|
if (rc == MDB_KEYEXIST && putflags)
|
||||||
|
continue;
|
||||||
|
if (rc)
|
||||||
|
goto txn_abort;
|
||||||
|
batch++;
|
||||||
|
if (batch == 100) {
|
||||||
|
rc = mdb_txn_commit(txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: txn_commit: %s\n",
|
||||||
|
prog, lineno, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
rc = mdb_txn_begin(env, NULL, 0, &txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_txn_begin failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &mc);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_cursor_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
batch = 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
rc = mdb_txn_commit(txn);
|
||||||
|
txn = NULL;
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "%s: line %" Z "d: txn_commit: %s\n",
|
||||||
|
prog, lineno, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
mdb_dbi_close(env, dbi);
|
||||||
|
}
|
||||||
|
|
||||||
|
txn_abort:
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
env_close:
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return rc ? EXIT_FAILURE : EXIT_SUCCESS;
|
||||||
|
}
|
64
mdb_stat.1
Normal file
64
mdb_stat.1
Normal file
@ -0,0 +1,64 @@
|
|||||||
|
.TH MDB_STAT 1 "2014/06/20" "LMDB 0.9.14"
|
||||||
|
.\" Copyright 2012-2014 Howard Chu, Symas Corp. All Rights Reserved.
|
||||||
|
.\" Copying restrictions apply. See COPYRIGHT/LICENSE.
|
||||||
|
.SH NAME
|
||||||
|
mdb_stat \- LMDB environment status tool
|
||||||
|
.SH SYNOPSIS
|
||||||
|
.B mdb_stat
|
||||||
|
.BR \ envpath
|
||||||
|
[\c
|
||||||
|
.BR \-V ]
|
||||||
|
[\c
|
||||||
|
.BR \-e ]
|
||||||
|
[\c
|
||||||
|
.BR \-f [ f [ f ]]]
|
||||||
|
[\c
|
||||||
|
.BR \-n ]
|
||||||
|
[\c
|
||||||
|
.BR \-r [ r ]]
|
||||||
|
[\c
|
||||||
|
.BR \-a \ |
|
||||||
|
.BI \-s \ subdb\fR]
|
||||||
|
.SH DESCRIPTION
|
||||||
|
The
|
||||||
|
.B mdb_stat
|
||||||
|
utility displays the status of an LMDB environment.
|
||||||
|
.SH OPTIONS
|
||||||
|
.TP
|
||||||
|
.BR \-V
|
||||||
|
Write the library version number to the standard output, and exit.
|
||||||
|
.TP
|
||||||
|
.BR \-e
|
||||||
|
Display information about the database environment.
|
||||||
|
.TP
|
||||||
|
.BR \-f
|
||||||
|
Display information about the environment freelist.
|
||||||
|
If \fB\-ff\fP is given, summarize each freelist entry.
|
||||||
|
If \fB\-fff\fP is given, display the full list of page IDs in the freelist.
|
||||||
|
.TP
|
||||||
|
.BR \-n
|
||||||
|
Display the status of an LMDB database which does not use subdirectories.
|
||||||
|
.TP
|
||||||
|
.BR \-r
|
||||||
|
Display information about the environment reader table.
|
||||||
|
Shows the process ID, thread ID, and transaction ID for each active
|
||||||
|
reader slot. The process ID and transaction ID are in decimal, the
|
||||||
|
thread ID is in hexadecimal. The transaction ID is displayed as "-"
|
||||||
|
if the reader does not currently have a read transaction open.
|
||||||
|
If \fB\-rr\fP is given, check for stale entries in the reader
|
||||||
|
table and clear them. The reader table will be printed again
|
||||||
|
after the check is performed.
|
||||||
|
.TP
|
||||||
|
.BR \-a
|
||||||
|
Display the status of all of the subdatabases in the environment.
|
||||||
|
.TP
|
||||||
|
.BR \-s \ subdb
|
||||||
|
Display the status of a specific subdatabase.
|
||||||
|
.SH DIAGNOSTICS
|
||||||
|
Exit status is zero if no errors occur.
|
||||||
|
Errors result in a non-zero exit status and
|
||||||
|
a diagnostic message being written to standard error.
|
||||||
|
.SH "SEE ALSO"
|
||||||
|
.BR mdb_copy (1)
|
||||||
|
.SH AUTHOR
|
||||||
|
Howard Chu of Symas Corporation <http://www.symas.com>
|
263
mdb_stat.c
Normal file
263
mdb_stat.c
Normal file
@ -0,0 +1,263 @@
|
|||||||
|
/* mdb_stat.c - memory-mapped database status tool */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2013 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
#define Z "I"
|
||||||
|
#else
|
||||||
|
#define Z "z"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
static void prstat(MDB_stat *ms)
|
||||||
|
{
|
||||||
|
#if 0
|
||||||
|
printf(" Page size: %u\n", ms->ms_psize);
|
||||||
|
#endif
|
||||||
|
printf(" Tree depth: %u\n", ms->ms_depth);
|
||||||
|
printf(" Branch pages: %"Z"u\n", ms->ms_branch_pages);
|
||||||
|
printf(" Leaf pages: %"Z"u\n", ms->ms_leaf_pages);
|
||||||
|
printf(" Overflow pages: %"Z"u\n", ms->ms_overflow_pages);
|
||||||
|
printf(" Entries: %"Z"u\n", ms->ms_entries);
|
||||||
|
}
|
||||||
|
|
||||||
|
static void usage(char *prog)
|
||||||
|
{
|
||||||
|
fprintf(stderr, "usage: %s dbpath [-V] [-n] [-e] [-r[r]] [-f[f[f]]] [-a|-s subdb]\n", prog);
|
||||||
|
exit(EXIT_FAILURE);
|
||||||
|
}
|
||||||
|
|
||||||
|
int main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
int i, rc;
|
||||||
|
MDB_env *env;
|
||||||
|
MDB_txn *txn;
|
||||||
|
MDB_dbi dbi;
|
||||||
|
MDB_stat mst;
|
||||||
|
MDB_envinfo mei;
|
||||||
|
char *prog = argv[0];
|
||||||
|
char *envname;
|
||||||
|
char *subname = NULL;
|
||||||
|
int alldbs = 0, envinfo = 0, envflags = 0, freinfo = 0, rdrinfo = 0;
|
||||||
|
|
||||||
|
if (argc < 2) {
|
||||||
|
usage(prog);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -a: print stat of main DB and all subDBs
|
||||||
|
* -s: print stat of only the named subDB
|
||||||
|
* -e: print env info
|
||||||
|
* -f: print freelist info
|
||||||
|
* -r: print reader info
|
||||||
|
* -n: use NOSUBDIR flag on env_open
|
||||||
|
* -V: print version and exit
|
||||||
|
* (default) print stat of only the main DB
|
||||||
|
*/
|
||||||
|
while ((i = getopt(argc, argv, "Vaefnrs:")) != EOF) {
|
||||||
|
switch(i) {
|
||||||
|
case 'V':
|
||||||
|
printf("%s\n", MDB_VERSION_STRING);
|
||||||
|
exit(0);
|
||||||
|
break;
|
||||||
|
case 'a':
|
||||||
|
if (subname)
|
||||||
|
usage(prog);
|
||||||
|
alldbs++;
|
||||||
|
break;
|
||||||
|
case 'e':
|
||||||
|
envinfo++;
|
||||||
|
break;
|
||||||
|
case 'f':
|
||||||
|
freinfo++;
|
||||||
|
break;
|
||||||
|
case 'n':
|
||||||
|
envflags |= MDB_NOSUBDIR;
|
||||||
|
break;
|
||||||
|
case 'r':
|
||||||
|
rdrinfo++;
|
||||||
|
break;
|
||||||
|
case 's':
|
||||||
|
if (alldbs)
|
||||||
|
usage(prog);
|
||||||
|
subname = optarg;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
usage(prog);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (optind != argc - 1)
|
||||||
|
usage(prog);
|
||||||
|
|
||||||
|
envname = argv[optind];
|
||||||
|
rc = mdb_env_create(&env);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_create failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
return EXIT_FAILURE;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (alldbs || subname) {
|
||||||
|
mdb_env_set_maxdbs(env, 4);
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_env_open(env, envname, envflags | MDB_RDONLY, 0664);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_env_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (envinfo) {
|
||||||
|
(void)mdb_env_stat(env, &mst);
|
||||||
|
(void)mdb_env_info(env, &mei);
|
||||||
|
printf("Environment Info\n");
|
||||||
|
printf(" Map address: %p\n", mei.me_mapaddr);
|
||||||
|
printf(" Map size: %"Z"u\n", mei.me_mapsize);
|
||||||
|
printf(" Page size: %u\n", mst.ms_psize);
|
||||||
|
printf(" Max pages: %"Z"u\n", mei.me_mapsize / mst.ms_psize);
|
||||||
|
printf(" Number of pages used: %"Z"u\n", mei.me_last_pgno+1);
|
||||||
|
printf(" Last transaction ID: %"Z"u\n", mei.me_last_txnid);
|
||||||
|
printf(" Max readers: %u\n", mei.me_maxreaders);
|
||||||
|
printf(" Number of readers used: %u\n", mei.me_numreaders);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (rdrinfo) {
|
||||||
|
printf("Reader Table Status\n");
|
||||||
|
rc = mdb_reader_list(env, (MDB_msg_func *)fputs, stdout);
|
||||||
|
if (rdrinfo > 1) {
|
||||||
|
int dead;
|
||||||
|
mdb_reader_check(env, &dead);
|
||||||
|
printf(" %d stale readers cleared.\n", dead);
|
||||||
|
rc = mdb_reader_list(env, (MDB_msg_func *)fputs, stdout);
|
||||||
|
}
|
||||||
|
if (!(subname || alldbs || freinfo))
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_txn_begin(env, NULL, MDB_RDONLY, &txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_txn_begin failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto env_close;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (freinfo) {
|
||||||
|
MDB_cursor *cursor;
|
||||||
|
MDB_val key, data;
|
||||||
|
size_t pages = 0, *iptr;
|
||||||
|
|
||||||
|
printf("Freelist Status\n");
|
||||||
|
dbi = 0;
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &cursor);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_cursor_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
rc = mdb_stat(txn, dbi, &mst);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_stat failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
prstat(&mst);
|
||||||
|
while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0) {
|
||||||
|
iptr = data.mv_data;
|
||||||
|
pages += *iptr;
|
||||||
|
if (freinfo > 1) {
|
||||||
|
char *bad = "";
|
||||||
|
size_t pg, prev;
|
||||||
|
ssize_t i, j, span = 0;
|
||||||
|
j = *iptr++;
|
||||||
|
for (i = j, prev = 1; --i >= 0; ) {
|
||||||
|
pg = iptr[i];
|
||||||
|
if (pg <= prev)
|
||||||
|
bad = " [bad sequence]";
|
||||||
|
prev = pg;
|
||||||
|
pg += span;
|
||||||
|
for (; i >= span && iptr[i-span] == pg; span++, pg++) ;
|
||||||
|
}
|
||||||
|
printf(" Transaction %"Z"u, %"Z"d pages, maxspan %"Z"d%s\n",
|
||||||
|
*(size_t *)key.mv_data, j, span, bad);
|
||||||
|
if (freinfo > 2) {
|
||||||
|
for (--j; j >= 0; ) {
|
||||||
|
pg = iptr[j];
|
||||||
|
for (span=1; --j >= 0 && iptr[j] == pg+span; span++) ;
|
||||||
|
printf(span>1 ? " %9"Z"u[%"Z"d]\n" : " %9"Z"u\n",
|
||||||
|
pg, span);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
printf(" Free pages: %"Z"u\n", pages);
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_open(txn, subname, 0, &dbi);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
|
||||||
|
rc = mdb_stat(txn, dbi, &mst);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_stat failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
printf("Status of %s\n", subname ? subname : "Main DB");
|
||||||
|
prstat(&mst);
|
||||||
|
|
||||||
|
if (alldbs) {
|
||||||
|
MDB_cursor *cursor;
|
||||||
|
MDB_val key;
|
||||||
|
|
||||||
|
rc = mdb_cursor_open(txn, dbi, &cursor);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_cursor_open failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
while ((rc = mdb_cursor_get(cursor, &key, NULL, MDB_NEXT_NODUP)) == 0) {
|
||||||
|
char *str;
|
||||||
|
MDB_dbi db2;
|
||||||
|
if (memchr(key.mv_data, '\0', key.mv_size))
|
||||||
|
continue;
|
||||||
|
str = malloc(key.mv_size+1);
|
||||||
|
memcpy(str, key.mv_data, key.mv_size);
|
||||||
|
str[key.mv_size] = '\0';
|
||||||
|
rc = mdb_open(txn, str, 0, &db2);
|
||||||
|
if (rc == MDB_SUCCESS)
|
||||||
|
printf("Status of %s\n", str);
|
||||||
|
free(str);
|
||||||
|
if (rc) continue;
|
||||||
|
rc = mdb_stat(txn, db2, &mst);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_stat failed, error %d %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto txn_abort;
|
||||||
|
}
|
||||||
|
prstat(&mst);
|
||||||
|
mdb_close(env, db2);
|
||||||
|
}
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (rc == MDB_NOTFOUND)
|
||||||
|
rc = MDB_SUCCESS;
|
||||||
|
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
txn_abort:
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
env_close:
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return rc ? EXIT_FAILURE : EXIT_SUCCESS;
|
||||||
|
}
|
360
midl.c
Normal file
360
midl.c
Normal file
@ -0,0 +1,360 @@
|
|||||||
|
/** @file midl.c
|
||||||
|
* @brief ldap bdb back-end ID List functions */
|
||||||
|
/* $OpenLDAP$ */
|
||||||
|
/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
|
||||||
|
*
|
||||||
|
* Copyright 2000-2014 The OpenLDAP Foundation.
|
||||||
|
* 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>.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <limits.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <sys/types.h>
|
||||||
|
#include "midl.h"
|
||||||
|
|
||||||
|
/** @defgroup internal LMDB Internals
|
||||||
|
* @{
|
||||||
|
*/
|
||||||
|
/** @defgroup idls ID List Management
|
||||||
|
* @{
|
||||||
|
*/
|
||||||
|
#define CMP(x,y) ( (x) < (y) ? -1 : (x) > (y) )
|
||||||
|
|
||||||
|
unsigned mdb_midl_search( MDB_IDL ids, MDB_ID id )
|
||||||
|
{
|
||||||
|
/*
|
||||||
|
* binary search of id in ids
|
||||||
|
* if found, returns position of id
|
||||||
|
* if not found, returns first position greater than id
|
||||||
|
*/
|
||||||
|
unsigned base = 0;
|
||||||
|
unsigned cursor = 1;
|
||||||
|
int val = 0;
|
||||||
|
unsigned n = ids[0];
|
||||||
|
|
||||||
|
while( 0 < n ) {
|
||||||
|
unsigned pivot = n >> 1;
|
||||||
|
cursor = base + pivot + 1;
|
||||||
|
val = CMP( ids[cursor], id );
|
||||||
|
|
||||||
|
if( val < 0 ) {
|
||||||
|
n = pivot;
|
||||||
|
|
||||||
|
} else if ( val > 0 ) {
|
||||||
|
base = cursor;
|
||||||
|
n -= pivot + 1;
|
||||||
|
|
||||||
|
} else {
|
||||||
|
return cursor;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if( val > 0 ) {
|
||||||
|
++cursor;
|
||||||
|
}
|
||||||
|
return cursor;
|
||||||
|
}
|
||||||
|
|
||||||
|
#if 0 /* superseded by append/sort */
|
||||||
|
int mdb_midl_insert( MDB_IDL ids, MDB_ID id )
|
||||||
|
{
|
||||||
|
unsigned x, i;
|
||||||
|
|
||||||
|
x = mdb_midl_search( ids, id );
|
||||||
|
assert( x > 0 );
|
||||||
|
|
||||||
|
if( x < 1 ) {
|
||||||
|
/* internal error */
|
||||||
|
return -2;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( x <= ids[0] && ids[x] == id ) {
|
||||||
|
/* duplicate */
|
||||||
|
assert(0);
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( ++ids[0] >= MDB_IDL_DB_MAX ) {
|
||||||
|
/* no room */
|
||||||
|
--ids[0];
|
||||||
|
return -2;
|
||||||
|
|
||||||
|
} else {
|
||||||
|
/* insert id */
|
||||||
|
for (i=ids[0]; i>x; i--)
|
||||||
|
ids[i] = ids[i-1];
|
||||||
|
ids[x] = id;
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
|
MDB_IDL mdb_midl_alloc(int num)
|
||||||
|
{
|
||||||
|
MDB_IDL ids = malloc((num+2) * sizeof(MDB_ID));
|
||||||
|
if (ids) {
|
||||||
|
*ids++ = num;
|
||||||
|
*ids = 0;
|
||||||
|
}
|
||||||
|
return ids;
|
||||||
|
}
|
||||||
|
|
||||||
|
void mdb_midl_free(MDB_IDL ids)
|
||||||
|
{
|
||||||
|
if (ids)
|
||||||
|
free(ids-1);
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_midl_shrink( MDB_IDL *idp )
|
||||||
|
{
|
||||||
|
MDB_IDL ids = *idp;
|
||||||
|
if (*(--ids) > MDB_IDL_UM_MAX &&
|
||||||
|
(ids = realloc(ids, (MDB_IDL_UM_MAX+1) * sizeof(MDB_ID))))
|
||||||
|
{
|
||||||
|
*ids++ = MDB_IDL_UM_MAX;
|
||||||
|
*idp = ids;
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
static int mdb_midl_grow( MDB_IDL *idp, int num )
|
||||||
|
{
|
||||||
|
MDB_IDL idn = *idp-1;
|
||||||
|
/* grow it */
|
||||||
|
idn = realloc(idn, (*idn + num + 2) * sizeof(MDB_ID));
|
||||||
|
if (!idn)
|
||||||
|
return ENOMEM;
|
||||||
|
*idn++ += num;
|
||||||
|
*idp = idn;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_midl_need( MDB_IDL *idp, unsigned num )
|
||||||
|
{
|
||||||
|
MDB_IDL ids = *idp;
|
||||||
|
num += ids[0];
|
||||||
|
if (num > ids[-1]) {
|
||||||
|
num = (num + num/4 + (256 + 2)) & -256;
|
||||||
|
if (!(ids = realloc(ids-1, num * sizeof(MDB_ID))))
|
||||||
|
return ENOMEM;
|
||||||
|
*ids++ = num - 2;
|
||||||
|
*idp = ids;
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_midl_append( MDB_IDL *idp, MDB_ID id )
|
||||||
|
{
|
||||||
|
MDB_IDL ids = *idp;
|
||||||
|
/* Too big? */
|
||||||
|
if (ids[0] >= ids[-1]) {
|
||||||
|
if (mdb_midl_grow(idp, MDB_IDL_UM_MAX))
|
||||||
|
return ENOMEM;
|
||||||
|
ids = *idp;
|
||||||
|
}
|
||||||
|
ids[0]++;
|
||||||
|
ids[ids[0]] = id;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_midl_append_list( MDB_IDL *idp, MDB_IDL app )
|
||||||
|
{
|
||||||
|
MDB_IDL ids = *idp;
|
||||||
|
/* Too big? */
|
||||||
|
if (ids[0] + app[0] >= ids[-1]) {
|
||||||
|
if (mdb_midl_grow(idp, app[0]))
|
||||||
|
return ENOMEM;
|
||||||
|
ids = *idp;
|
||||||
|
}
|
||||||
|
memcpy(&ids[ids[0]+1], &app[1], app[0] * sizeof(MDB_ID));
|
||||||
|
ids[0] += app[0];
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_midl_append_range( MDB_IDL *idp, MDB_ID id, unsigned n )
|
||||||
|
{
|
||||||
|
MDB_ID *ids = *idp, len = ids[0];
|
||||||
|
/* Too big? */
|
||||||
|
if (len + n > ids[-1]) {
|
||||||
|
if (mdb_midl_grow(idp, n | MDB_IDL_UM_MAX))
|
||||||
|
return ENOMEM;
|
||||||
|
ids = *idp;
|
||||||
|
}
|
||||||
|
ids[0] = len + n;
|
||||||
|
ids += len;
|
||||||
|
while (n)
|
||||||
|
ids[n--] = id++;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
void mdb_midl_xmerge( MDB_IDL idl, MDB_IDL merge )
|
||||||
|
{
|
||||||
|
MDB_ID old_id, merge_id, i = merge[0], j = idl[0], k = i+j, total = k;
|
||||||
|
idl[0] = (MDB_ID)-1; /* delimiter for idl scan below */
|
||||||
|
old_id = idl[j];
|
||||||
|
while (i) {
|
||||||
|
merge_id = merge[i--];
|
||||||
|
for (; old_id < merge_id; old_id = idl[--j])
|
||||||
|
idl[k--] = old_id;
|
||||||
|
idl[k--] = merge_id;
|
||||||
|
}
|
||||||
|
idl[0] = total;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Quicksort + Insertion sort for small arrays */
|
||||||
|
|
||||||
|
#define SMALL 8
|
||||||
|
#define MIDL_SWAP(a,b) { itmp=(a); (a)=(b); (b)=itmp; }
|
||||||
|
|
||||||
|
void
|
||||||
|
mdb_midl_sort( MDB_IDL ids )
|
||||||
|
{
|
||||||
|
/* Max possible depth of int-indexed tree * 2 items/level */
|
||||||
|
int istack[sizeof(int)*CHAR_BIT * 2];
|
||||||
|
int i,j,k,l,ir,jstack;
|
||||||
|
MDB_ID a, itmp;
|
||||||
|
|
||||||
|
ir = (int)ids[0];
|
||||||
|
l = 1;
|
||||||
|
jstack = 0;
|
||||||
|
for(;;) {
|
||||||
|
if (ir - l < SMALL) { /* Insertion sort */
|
||||||
|
for (j=l+1;j<=ir;j++) {
|
||||||
|
a = ids[j];
|
||||||
|
for (i=j-1;i>=1;i--) {
|
||||||
|
if (ids[i] >= a) break;
|
||||||
|
ids[i+1] = ids[i];
|
||||||
|
}
|
||||||
|
ids[i+1] = a;
|
||||||
|
}
|
||||||
|
if (jstack == 0) break;
|
||||||
|
ir = istack[jstack--];
|
||||||
|
l = istack[jstack--];
|
||||||
|
} else {
|
||||||
|
k = (l + ir) >> 1; /* Choose median of left, center, right */
|
||||||
|
MIDL_SWAP(ids[k], ids[l+1]);
|
||||||
|
if (ids[l] < ids[ir]) {
|
||||||
|
MIDL_SWAP(ids[l], ids[ir]);
|
||||||
|
}
|
||||||
|
if (ids[l+1] < ids[ir]) {
|
||||||
|
MIDL_SWAP(ids[l+1], ids[ir]);
|
||||||
|
}
|
||||||
|
if (ids[l] < ids[l+1]) {
|
||||||
|
MIDL_SWAP(ids[l], ids[l+1]);
|
||||||
|
}
|
||||||
|
i = l+1;
|
||||||
|
j = ir;
|
||||||
|
a = ids[l+1];
|
||||||
|
for(;;) {
|
||||||
|
do i++; while(ids[i] > a);
|
||||||
|
do j--; while(ids[j] < a);
|
||||||
|
if (j < i) break;
|
||||||
|
MIDL_SWAP(ids[i],ids[j]);
|
||||||
|
}
|
||||||
|
ids[l+1] = ids[j];
|
||||||
|
ids[j] = a;
|
||||||
|
jstack += 2;
|
||||||
|
if (ir-i+1 >= j-l) {
|
||||||
|
istack[jstack] = ir;
|
||||||
|
istack[jstack-1] = i;
|
||||||
|
ir = j-1;
|
||||||
|
} else {
|
||||||
|
istack[jstack] = j-1;
|
||||||
|
istack[jstack-1] = l;
|
||||||
|
l = i;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
unsigned mdb_mid2l_search( MDB_ID2L ids, MDB_ID id )
|
||||||
|
{
|
||||||
|
/*
|
||||||
|
* binary search of id in ids
|
||||||
|
* if found, returns position of id
|
||||||
|
* if not found, returns first position greater than id
|
||||||
|
*/
|
||||||
|
unsigned base = 0;
|
||||||
|
unsigned cursor = 1;
|
||||||
|
int val = 0;
|
||||||
|
unsigned n = (unsigned)ids[0].mid;
|
||||||
|
|
||||||
|
while( 0 < n ) {
|
||||||
|
unsigned pivot = n >> 1;
|
||||||
|
cursor = base + pivot + 1;
|
||||||
|
val = CMP( id, ids[cursor].mid );
|
||||||
|
|
||||||
|
if( val < 0 ) {
|
||||||
|
n = pivot;
|
||||||
|
|
||||||
|
} else if ( val > 0 ) {
|
||||||
|
base = cursor;
|
||||||
|
n -= pivot + 1;
|
||||||
|
|
||||||
|
} else {
|
||||||
|
return cursor;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if( val > 0 ) {
|
||||||
|
++cursor;
|
||||||
|
}
|
||||||
|
return cursor;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_mid2l_insert( MDB_ID2L ids, MDB_ID2 *id )
|
||||||
|
{
|
||||||
|
unsigned x, i;
|
||||||
|
|
||||||
|
x = mdb_mid2l_search( ids, id->mid );
|
||||||
|
|
||||||
|
if( x < 1 ) {
|
||||||
|
/* internal error */
|
||||||
|
return -2;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( x <= ids[0].mid && ids[x].mid == id->mid ) {
|
||||||
|
/* duplicate */
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
if ( ids[0].mid >= MDB_IDL_UM_MAX ) {
|
||||||
|
/* too big */
|
||||||
|
return -2;
|
||||||
|
|
||||||
|
} else {
|
||||||
|
/* insert id */
|
||||||
|
ids[0].mid++;
|
||||||
|
for (i=(unsigned)ids[0].mid; i>x; i--)
|
||||||
|
ids[i] = ids[i-1];
|
||||||
|
ids[x] = *id;
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
int mdb_mid2l_append( MDB_ID2L ids, MDB_ID2 *id )
|
||||||
|
{
|
||||||
|
/* Too big? */
|
||||||
|
if (ids[0].mid >= MDB_IDL_UM_MAX) {
|
||||||
|
return -2;
|
||||||
|
}
|
||||||
|
ids[0].mid++;
|
||||||
|
ids[ids[0].mid] = *id;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
/** @} */
|
||||||
|
/** @} */
|
186
midl.h
Normal file
186
midl.h
Normal file
@ -0,0 +1,186 @@
|
|||||||
|
/** @file midl.h
|
||||||
|
* @brief LMDB ID List header file.
|
||||||
|
*
|
||||||
|
* This file was originally part of back-bdb but has been
|
||||||
|
* modified for use in libmdb. Most of the macros defined
|
||||||
|
* in this file are unused, just left over from the original.
|
||||||
|
*
|
||||||
|
* This file is only used internally in libmdb and its definitions
|
||||||
|
* are not exposed publicly.
|
||||||
|
*/
|
||||||
|
/* $OpenLDAP$ */
|
||||||
|
/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
|
||||||
|
*
|
||||||
|
* Copyright 2000-2014 The OpenLDAP Foundation.
|
||||||
|
* 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>.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef _MDB_MIDL_H_
|
||||||
|
#define _MDB_MIDL_H_
|
||||||
|
|
||||||
|
#include <stddef.h>
|
||||||
|
|
||||||
|
#ifdef __cplusplus
|
||||||
|
extern "C" {
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/** @defgroup internal LMDB Internals
|
||||||
|
* @{
|
||||||
|
*/
|
||||||
|
|
||||||
|
/** @defgroup idls ID List Management
|
||||||
|
* @{
|
||||||
|
*/
|
||||||
|
/** A generic unsigned ID number. These were entryIDs in back-bdb.
|
||||||
|
* Preferably it should have the same size as a pointer.
|
||||||
|
*/
|
||||||
|
typedef size_t MDB_ID;
|
||||||
|
|
||||||
|
/** An IDL is an ID List, a sorted array of IDs. The first
|
||||||
|
* element of the array is a counter for how many actual
|
||||||
|
* IDs are in the list. In the original back-bdb code, IDLs are
|
||||||
|
* sorted in ascending order. For libmdb IDLs are sorted in
|
||||||
|
* descending order.
|
||||||
|
*/
|
||||||
|
typedef MDB_ID *MDB_IDL;
|
||||||
|
|
||||||
|
/* IDL sizes - likely should be even bigger
|
||||||
|
* limiting factors: sizeof(ID), thread stack size
|
||||||
|
*/
|
||||||
|
#define MDB_IDL_LOGN 16 /* DB_SIZE is 2^16, UM_SIZE is 2^17 */
|
||||||
|
#define MDB_IDL_DB_SIZE (1<<MDB_IDL_LOGN)
|
||||||
|
#define MDB_IDL_UM_SIZE (1<<(MDB_IDL_LOGN+1))
|
||||||
|
|
||||||
|
#define MDB_IDL_DB_MAX (MDB_IDL_DB_SIZE-1)
|
||||||
|
#define MDB_IDL_UM_MAX (MDB_IDL_UM_SIZE-1)
|
||||||
|
|
||||||
|
#define MDB_IDL_SIZEOF(ids) (((ids)[0]+1) * sizeof(MDB_ID))
|
||||||
|
#define MDB_IDL_IS_ZERO(ids) ( (ids)[0] == 0 )
|
||||||
|
#define MDB_IDL_CPY( dst, src ) (memcpy( dst, src, MDB_IDL_SIZEOF( src ) ))
|
||||||
|
#define MDB_IDL_FIRST( ids ) ( (ids)[1] )
|
||||||
|
#define MDB_IDL_LAST( ids ) ( (ids)[(ids)[0]] )
|
||||||
|
|
||||||
|
/** Current max length of an #mdb_midl_alloc()ed IDL */
|
||||||
|
#define MDB_IDL_ALLOCLEN( ids ) ( (ids)[-1] )
|
||||||
|
|
||||||
|
/** Append ID to IDL. The IDL must be big enough. */
|
||||||
|
#define mdb_midl_xappend(idl, id) do { \
|
||||||
|
MDB_ID *xidl = (idl), xlen = ++(xidl[0]); \
|
||||||
|
xidl[xlen] = (id); \
|
||||||
|
} while (0)
|
||||||
|
|
||||||
|
/** Search for an ID in an IDL.
|
||||||
|
* @param[in] ids The IDL to search.
|
||||||
|
* @param[in] id The ID to search for.
|
||||||
|
* @return The index of the first ID greater than or equal to \b id.
|
||||||
|
*/
|
||||||
|
unsigned mdb_midl_search( MDB_IDL ids, MDB_ID id );
|
||||||
|
|
||||||
|
/** Allocate an IDL.
|
||||||
|
* Allocates memory for an IDL of the given size.
|
||||||
|
* @return IDL on success, NULL on failure.
|
||||||
|
*/
|
||||||
|
MDB_IDL mdb_midl_alloc(int num);
|
||||||
|
|
||||||
|
/** Free an IDL.
|
||||||
|
* @param[in] ids The IDL to free.
|
||||||
|
*/
|
||||||
|
void mdb_midl_free(MDB_IDL ids);
|
||||||
|
|
||||||
|
/** Shrink an IDL.
|
||||||
|
* Return the IDL to the default size if it has grown larger.
|
||||||
|
* @param[in,out] idp Address of the IDL to shrink.
|
||||||
|
* @return 0 on no change, non-zero if shrunk.
|
||||||
|
*/
|
||||||
|
int mdb_midl_shrink(MDB_IDL *idp);
|
||||||
|
|
||||||
|
/** Make room for num additional elements in an IDL.
|
||||||
|
* @param[in,out] idp Address of the IDL.
|
||||||
|
* @param[in] num Number of elements to make room for.
|
||||||
|
* @return 0 on success, ENOMEM on failure.
|
||||||
|
*/
|
||||||
|
int mdb_midl_need(MDB_IDL *idp, unsigned num);
|
||||||
|
|
||||||
|
/** Append an ID onto an IDL.
|
||||||
|
* @param[in,out] idp Address of the IDL to append to.
|
||||||
|
* @param[in] id The ID to append.
|
||||||
|
* @return 0 on success, ENOMEM if the IDL is too large.
|
||||||
|
*/
|
||||||
|
int mdb_midl_append( MDB_IDL *idp, MDB_ID id );
|
||||||
|
|
||||||
|
/** Append an IDL onto an IDL.
|
||||||
|
* @param[in,out] idp Address of the IDL to append to.
|
||||||
|
* @param[in] app The IDL to append.
|
||||||
|
* @return 0 on success, ENOMEM if the IDL is too large.
|
||||||
|
*/
|
||||||
|
int mdb_midl_append_list( MDB_IDL *idp, MDB_IDL app );
|
||||||
|
|
||||||
|
/** Append an ID range onto an IDL.
|
||||||
|
* @param[in,out] idp Address of the IDL to append to.
|
||||||
|
* @param[in] id The lowest ID to append.
|
||||||
|
* @param[in] n Number of IDs to append.
|
||||||
|
* @return 0 on success, ENOMEM if the IDL is too large.
|
||||||
|
*/
|
||||||
|
int mdb_midl_append_range( MDB_IDL *idp, MDB_ID id, unsigned n );
|
||||||
|
|
||||||
|
/** Merge an IDL onto an IDL. The destination IDL must be big enough.
|
||||||
|
* @param[in] idl The IDL to merge into.
|
||||||
|
* @param[in] merge The IDL to merge.
|
||||||
|
*/
|
||||||
|
void mdb_midl_xmerge( MDB_IDL idl, MDB_IDL merge );
|
||||||
|
|
||||||
|
/** Sort an IDL.
|
||||||
|
* @param[in,out] ids The IDL to sort.
|
||||||
|
*/
|
||||||
|
void mdb_midl_sort( MDB_IDL ids );
|
||||||
|
|
||||||
|
/** An ID2 is an ID/pointer pair.
|
||||||
|
*/
|
||||||
|
typedef struct MDB_ID2 {
|
||||||
|
MDB_ID mid; /**< The ID */
|
||||||
|
void *mptr; /**< The pointer */
|
||||||
|
} MDB_ID2;
|
||||||
|
|
||||||
|
/** An ID2L is an ID2 List, a sorted array of ID2s.
|
||||||
|
* The first element's \b mid member is a count of how many actual
|
||||||
|
* elements are in the array. The \b mptr member of the first element is unused.
|
||||||
|
* The array is sorted in ascending order by \b mid.
|
||||||
|
*/
|
||||||
|
typedef MDB_ID2 *MDB_ID2L;
|
||||||
|
|
||||||
|
/** Search for an ID in an ID2L.
|
||||||
|
* @param[in] ids The ID2L to search.
|
||||||
|
* @param[in] id The ID to search for.
|
||||||
|
* @return The index of the first ID2 whose \b mid member is greater than or equal to \b id.
|
||||||
|
*/
|
||||||
|
unsigned mdb_mid2l_search( MDB_ID2L ids, MDB_ID id );
|
||||||
|
|
||||||
|
|
||||||
|
/** Insert an ID2 into a ID2L.
|
||||||
|
* @param[in,out] ids The ID2L to insert into.
|
||||||
|
* @param[in] id The ID2 to insert.
|
||||||
|
* @return 0 on success, -1 if the ID was already present in the ID2L.
|
||||||
|
*/
|
||||||
|
int mdb_mid2l_insert( MDB_ID2L ids, MDB_ID2 *id );
|
||||||
|
|
||||||
|
/** Append an ID2 into a ID2L.
|
||||||
|
* @param[in,out] ids The ID2L to append into.
|
||||||
|
* @param[in] id The ID2 to append.
|
||||||
|
* @return 0 on success, -2 if the ID2L is too big.
|
||||||
|
*/
|
||||||
|
int mdb_mid2l_append( MDB_ID2L ids, MDB_ID2 *id );
|
||||||
|
|
||||||
|
/** @} */
|
||||||
|
/** @} */
|
||||||
|
#ifdef __cplusplus
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
#endif /* _MDB_MIDL_H_ */
|
173
mtest.c
Normal file
173
mtest.c
Normal file
@ -0,0 +1,173 @@
|
|||||||
|
/* mtest.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
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, *cur2;
|
||||||
|
MDB_cursor_op op;
|
||||||
|
int count;
|
||||||
|
int *values;
|
||||||
|
char sval[32] = "";
|
||||||
|
|
||||||
|
srand(time(NULL));
|
||||||
|
|
||||||
|
count = (rand()%384) + 64;
|
||||||
|
values = (int *)malloc(count*sizeof(int));
|
||||||
|
|
||||||
|
for(i = 0;i<count;i++) {
|
||||||
|
values[i] = rand()%1024;
|
||||||
|
}
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP /*|MDB_NOSYNC*/, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, NULL, 0, &dbi));
|
||||||
|
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = sval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
|
||||||
|
printf("Adding %d values\n", count);
|
||||||
|
for (i=0;i<count;i++) {
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
if (RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NOOVERWRITE))) {
|
||||||
|
j++;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (j) printf("%d duplicates skipped\n", j);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
j=0;
|
||||||
|
key.mv_data = sval;
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%5)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(sval, "%03x ", values[i]);
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, NULL))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
printf("Cursor last\n");
|
||||||
|
E(mdb_cursor_get(cursor, &key, &data, MDB_LAST));
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
printf("Cursor last/prev\n");
|
||||||
|
E(mdb_cursor_get(cursor, &key, &data, MDB_LAST));
|
||||||
|
printf("key: %.*s, data: %.*s\n",
|
||||||
|
(int) key.mv_size, (char *) key.mv_data,
|
||||||
|
(int) data.mv_size, (char *) data.mv_data);
|
||||||
|
E(mdb_cursor_get(cursor, &key, &data, MDB_PREV));
|
||||||
|
printf("key: %.*s, data: %.*s\n",
|
||||||
|
(int) key.mv_size, (char *) key.mv_data,
|
||||||
|
(int) data.mv_size, (char *) data.mv_data);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
printf("Deleting with cursor\n");
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_cursor_open(txn, dbi, &cur2));
|
||||||
|
for (i=0; i<50; i++) {
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_cursor_get(cur2, &key, &data, MDB_NEXT)))
|
||||||
|
break;
|
||||||
|
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);
|
||||||
|
E(mdb_del(txn, dbi, &key, NULL));
|
||||||
|
}
|
||||||
|
|
||||||
|
printf("Restarting cursor in txn\n");
|
||||||
|
for (op=MDB_FIRST, i=0; i<=32; op=MDB_NEXT, i++) {
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_cursor_get(cur2, &key, &data, op)))
|
||||||
|
break;
|
||||||
|
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(cur2);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
|
||||||
|
printf("Restarting cursor outside txn\n");
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_cursor_open(txn, dbi, &cursor));
|
||||||
|
for (op=MDB_FIRST, i=0; i<=32; op=MDB_NEXT, i++) {
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_cursor_get(cursor, &key, &data, op)))
|
||||||
|
break;
|
||||||
|
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_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
123
mtest2.c
Normal file
123
mtest2.c
Normal file
@ -0,0 +1,123 @@
|
|||||||
|
/* mtest2.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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>.
|
||||||
|
*/
|
||||||
|
|
||||||
|
/* Just like mtest.c, but using a subDB instead of the main DB */
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
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[32] = "";
|
||||||
|
|
||||||
|
srand(time(NULL));
|
||||||
|
|
||||||
|
count = (rand()%384) + 64;
|
||||||
|
values = (int *)malloc(count*sizeof(int));
|
||||||
|
|
||||||
|
for(i = 0;i<count;i++) {
|
||||||
|
values[i] = rand()%1024;
|
||||||
|
}
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_set_maxdbs(env, 4));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, "id1", MDB_CREATE, &dbi));
|
||||||
|
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = sval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
|
||||||
|
printf("Adding %d values\n", count);
|
||||||
|
for (i=0;i<count;i++) {
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
if (RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NOOVERWRITE)))
|
||||||
|
j++;
|
||||||
|
}
|
||||||
|
if (j) printf("%d duplicates skipped\n", j);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
j=0;
|
||||||
|
key.mv_data = sval;
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%5)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(sval, "%03x ", values[i]);
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, NULL))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
133
mtest3.c
Normal file
133
mtest3.c
Normal file
@ -0,0 +1,133 @@
|
|||||||
|
/* mtest3.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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 */
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
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[32];
|
||||||
|
char kval[sizeof(int)];
|
||||||
|
|
||||||
|
srand(time(NULL));
|
||||||
|
|
||||||
|
memset(sval, 0, sizeof(sval));
|
||||||
|
|
||||||
|
count = (rand()%384) + 64;
|
||||||
|
values = (int *)malloc(count*sizeof(int));
|
||||||
|
|
||||||
|
for(i = 0;i<count;i++) {
|
||||||
|
values[i] = rand()%1024;
|
||||||
|
}
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_set_maxdbs(env, 4));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, "id2", MDB_CREATE|MDB_DUPSORT, &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);
|
||||||
|
for (i=0;i<count;i++) {
|
||||||
|
if (!(i & 0x0f))
|
||||||
|
sprintf(kval, "%03x", values[i]);
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
if (RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA)))
|
||||||
|
j++;
|
||||||
|
}
|
||||||
|
if (j) printf("%d duplicates skipped\n", j);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
j=0;
|
||||||
|
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%5)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(kval, "%03x", values[i & ~0x0f]);
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = kval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, &data))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
168
mtest4.c
Normal file
168
mtest4.c
Normal file
@ -0,0 +1,168 @@
|
|||||||
|
/* mtest4.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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 */
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
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;
|
||||||
|
}
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_set_maxdbs(env, 4));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, "id4", 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]);
|
||||||
|
if (RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA)))
|
||||||
|
j++;
|
||||||
|
}
|
||||||
|
if (j) printf("%d duplicates skipped\n", j);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
|
||||||
|
/* there should be one full page of dups now.
|
||||||
|
*/
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA));
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
sprintf(sval, "%07x", values[255]+1);
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA));
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
sprintf(sval, "%07x", values[500]+1);
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA));
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
|
||||||
|
/* Try MDB_NEXT_MULTIPLE */
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
j=0;
|
||||||
|
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%3)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(sval, "%07x", values[i]);
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = kval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, &data))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
135
mtest5.c
Normal file
135
mtest5.c
Normal file
@ -0,0 +1,135 @@
|
|||||||
|
/* mtest5.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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 using cursor_put */
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
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[32];
|
||||||
|
char kval[sizeof(int)];
|
||||||
|
|
||||||
|
srand(time(NULL));
|
||||||
|
|
||||||
|
memset(sval, 0, sizeof(sval));
|
||||||
|
|
||||||
|
count = (rand()%384) + 64;
|
||||||
|
values = (int *)malloc(count*sizeof(int));
|
||||||
|
|
||||||
|
for(i = 0;i<count;i++) {
|
||||||
|
values[i] = rand()%1024;
|
||||||
|
}
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_set_maxdbs(env, 4));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, "id2", MDB_CREATE|MDB_DUPSORT, &dbi));
|
||||||
|
E(mdb_cursor_open(txn, dbi, &cursor));
|
||||||
|
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = kval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
|
||||||
|
printf("Adding %d values\n", count);
|
||||||
|
for (i=0;i<count;i++) {
|
||||||
|
if (!(i & 0x0f))
|
||||||
|
sprintf(kval, "%03x", values[i]);
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
if (RES(MDB_KEYEXIST, mdb_cursor_put(cursor, &key, &data, MDB_NODUPDATA)))
|
||||||
|
j++;
|
||||||
|
}
|
||||||
|
if (j) printf("%d duplicates skipped\n", j);
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
|
||||||
|
j=0;
|
||||||
|
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%5)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(kval, "%03x", values[i & ~0x0f]);
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = kval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, &data))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
137
mtest6.c
Normal file
137
mtest6.c
Normal file
@ -0,0 +1,137 @@
|
|||||||
|
/* mtest6.c - memory-mapped database tester/toy */
|
||||||
|
/*
|
||||||
|
* Copyright 2011-2014 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 DB splits and merges */
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
#define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
|
||||||
|
#define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
|
||||||
|
#define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
|
||||||
|
"%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
|
||||||
|
|
||||||
|
char dkbuf[1024];
|
||||||
|
|
||||||
|
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;
|
||||||
|
long kval;
|
||||||
|
char *sval;
|
||||||
|
|
||||||
|
srand(time(NULL));
|
||||||
|
|
||||||
|
E(mdb_env_create(&env));
|
||||||
|
E(mdb_env_set_mapsize(env, 10485760));
|
||||||
|
E(mdb_env_set_maxdbs(env, 4));
|
||||||
|
E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
E(mdb_open(txn, "id6", MDB_CREATE|MDB_INTEGERKEY, &dbi));
|
||||||
|
E(mdb_cursor_open(txn, dbi, &cursor));
|
||||||
|
E(mdb_stat(txn, dbi, &mst));
|
||||||
|
|
||||||
|
sval = calloc(1, mst.ms_psize / 4);
|
||||||
|
key.mv_size = sizeof(long);
|
||||||
|
key.mv_data = &kval;
|
||||||
|
data.mv_size = mst.ms_psize / 4 - 30;
|
||||||
|
data.mv_data = sval;
|
||||||
|
|
||||||
|
printf("Adding 12 values, should yield 3 splits\n");
|
||||||
|
for (i=0;i<12;i++) {
|
||||||
|
kval = i*5;
|
||||||
|
sprintf(sval, "%08x", kval);
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_cursor_put(cursor, &key, &data, MDB_NOOVERWRITE));
|
||||||
|
}
|
||||||
|
printf("Adding 12 more values, should yield 3 splits\n");
|
||||||
|
for (i=0;i<12;i++) {
|
||||||
|
kval = i*5+4;
|
||||||
|
sprintf(sval, "%08x", kval);
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_cursor_put(cursor, &key, &data, MDB_NOOVERWRITE));
|
||||||
|
}
|
||||||
|
printf("Adding 12 more values, should yield 3 splits\n");
|
||||||
|
for (i=0;i<12;i++) {
|
||||||
|
kval = i*5+1;
|
||||||
|
sprintf(sval, "%08x", kval);
|
||||||
|
(void)RES(MDB_KEYEXIST, mdb_cursor_put(cursor, &key, &data, MDB_NOOVERWRITE));
|
||||||
|
}
|
||||||
|
E(mdb_cursor_get(cursor, &key, &data, MDB_FIRST));
|
||||||
|
|
||||||
|
do {
|
||||||
|
printf("key: %p %s, data: %p %.*s\n",
|
||||||
|
key.mv_data, mdb_dkey(&key, dkbuf),
|
||||||
|
data.mv_data, (int) data.mv_size, (char *) data.mv_data);
|
||||||
|
} while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0);
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_txn_commit(txn);
|
||||||
|
|
||||||
|
#if 0
|
||||||
|
j=0;
|
||||||
|
|
||||||
|
for (i= count - 1; i > -1; i-= (rand()%5)) {
|
||||||
|
j++;
|
||||||
|
txn=NULL;
|
||||||
|
E(mdb_txn_begin(env, NULL, 0, &txn));
|
||||||
|
sprintf(kval, "%03x", values[i & ~0x0f]);
|
||||||
|
sprintf(sval, "%03x %d foo bar", values[i], values[i]);
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = kval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, &data))) {
|
||||||
|
j--;
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
} else {
|
||||||
|
E(mdb_txn_commit(txn));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
free(values);
|
||||||
|
printf("Deleted %d values\n", j);
|
||||||
|
|
||||||
|
E(mdb_env_stat(env, &mst));
|
||||||
|
E(mdb_txn_begin(env, NULL, 1, &txn));
|
||||||
|
E(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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
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);
|
||||||
|
}
|
||||||
|
CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
|
||||||
|
mdb_cursor_close(cursor);
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
|
||||||
|
mdb_txn_abort(txn);
|
||||||
|
#endif
|
||||||
|
mdb_env_close(env);
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
73
sample-bdb.txt
Normal file
73
sample-bdb.txt
Normal file
@ -0,0 +1,73 @@
|
|||||||
|
/* sample-bdb.txt - BerkeleyDB toy/sample
|
||||||
|
*
|
||||||
|
* Do a line-by-line comparison of this and sample-mdb.txt
|
||||||
|
*/
|
||||||
|
/*
|
||||||
|
* Copyright 2012 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <db.h>
|
||||||
|
|
||||||
|
int main(int argc,char * argv[])
|
||||||
|
{
|
||||||
|
int rc;
|
||||||
|
DB_ENV *env;
|
||||||
|
DB *dbi;
|
||||||
|
DBT key, data;
|
||||||
|
DB_TXN *txn;
|
||||||
|
DBC *cursor;
|
||||||
|
char sval[32], kval[32];
|
||||||
|
|
||||||
|
/* Note: Most error checking omitted for simplicity */
|
||||||
|
|
||||||
|
#define FLAGS (DB_INIT_LOCK|DB_INIT_LOG|DB_INIT_TXN|DB_INIT_MPOOL|DB_CREATE|DB_THREAD)
|
||||||
|
rc = db_env_create(&env, 0);
|
||||||
|
rc = env->open(env, "./testdb", FLAGS, 0664);
|
||||||
|
rc = db_create(&dbi, env, 0);
|
||||||
|
rc = env->txn_begin(env, NULL, &txn, 0);
|
||||||
|
rc = dbi->open(dbi, txn, "test.bdb", NULL, DB_BTREE, DB_CREATE, 0664);
|
||||||
|
|
||||||
|
memset(&key, 0, sizeof(DBT));
|
||||||
|
memset(&data, 0, sizeof(DBT));
|
||||||
|
key.size = sizeof(int);
|
||||||
|
key.data = sval;
|
||||||
|
data.size = sizeof(sval);
|
||||||
|
data.data = sval;
|
||||||
|
|
||||||
|
sprintf(sval, "%03x %d foo bar", 32, 3141592);
|
||||||
|
rc = dbi->put(dbi, txn, &key, &data, 0);
|
||||||
|
rc = txn->commit(txn, 0);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "txn->commit: (%d) %s\n", rc, db_strerror(rc));
|
||||||
|
goto leave;
|
||||||
|
}
|
||||||
|
rc = env->txn_begin(env, NULL, &txn, 0);
|
||||||
|
rc = dbi->cursor(dbi, txn, &cursor, 0);
|
||||||
|
key.flags = DB_DBT_USERMEM;
|
||||||
|
key.data = kval;
|
||||||
|
key.ulen = sizeof(kval);
|
||||||
|
data.flags = DB_DBT_USERMEM;
|
||||||
|
data.data = sval;
|
||||||
|
data.ulen = sizeof(sval);
|
||||||
|
while ((rc = cursor->c_get(cursor, &key, &data, DB_NEXT)) == 0) {
|
||||||
|
printf("key: %p %.*s, data: %p %.*s\n",
|
||||||
|
key.data, (int) key.size, (char *) key.data,
|
||||||
|
data.data, (int) data.size, (char *) data.data);
|
||||||
|
}
|
||||||
|
rc = cursor->c_close(cursor);
|
||||||
|
rc = txn->abort(txn);
|
||||||
|
leave:
|
||||||
|
rc = dbi->close(dbi, 0);
|
||||||
|
rc = env->close(env, 0);
|
||||||
|
return rc;
|
||||||
|
}
|
62
sample-mdb.txt
Normal file
62
sample-mdb.txt
Normal file
@ -0,0 +1,62 @@
|
|||||||
|
/* sample-mdb.txt - MDB toy/sample
|
||||||
|
*
|
||||||
|
* Do a line-by-line comparison of this and sample-bdb.txt
|
||||||
|
*/
|
||||||
|
/*
|
||||||
|
* Copyright 2012 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>.
|
||||||
|
*/
|
||||||
|
#include <stdio.h>
|
||||||
|
#include "lmdb.h"
|
||||||
|
|
||||||
|
int main(int argc,char * argv[])
|
||||||
|
{
|
||||||
|
int rc;
|
||||||
|
MDB_env *env;
|
||||||
|
MDB_dbi dbi;
|
||||||
|
MDB_val key, data;
|
||||||
|
MDB_txn *txn;
|
||||||
|
MDB_cursor *cursor;
|
||||||
|
char sval[32];
|
||||||
|
|
||||||
|
/* Note: Most error checking omitted for simplicity */
|
||||||
|
|
||||||
|
rc = mdb_env_create(&env);
|
||||||
|
rc = mdb_env_open(env, "./testdb", 0, 0664);
|
||||||
|
rc = mdb_txn_begin(env, NULL, 0, &txn);
|
||||||
|
rc = mdb_open(txn, NULL, 0, &dbi);
|
||||||
|
|
||||||
|
key.mv_size = sizeof(int);
|
||||||
|
key.mv_data = sval;
|
||||||
|
data.mv_size = sizeof(sval);
|
||||||
|
data.mv_data = sval;
|
||||||
|
|
||||||
|
sprintf(sval, "%03x %d foo bar", 32, 3141592);
|
||||||
|
rc = mdb_put(txn, dbi, &key, &data, 0);
|
||||||
|
rc = mdb_txn_commit(txn);
|
||||||
|
if (rc) {
|
||||||
|
fprintf(stderr, "mdb_txn_commit: (%d) %s\n", rc, mdb_strerror(rc));
|
||||||
|
goto leave;
|
||||||
|
}
|
||||||
|
rc = mdb_txn_begin(env, NULL, MDB_RDONLY, &txn);
|
||||||
|
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);
|
||||||
|
leave:
|
||||||
|
mdb_close(env, dbi);
|
||||||
|
mdb_env_close(env);
|
||||||
|
return 0;
|
||||||
|
}
|
22
tooltag
Normal file
22
tooltag
Normal file
@ -0,0 +1,22 @@
|
|||||||
|
<tagfile>
|
||||||
|
<compound kind="page">
|
||||||
|
<name>mdb_copy_1</name>
|
||||||
|
<title>mdb_copy - environment copy tool</title>
|
||||||
|
<filename>mdb_copy.1</filename>
|
||||||
|
</compound>
|
||||||
|
<compound kind="page">
|
||||||
|
<name>mdb_dump_1</name>
|
||||||
|
<title>mdb_dump - environment export tool</title>
|
||||||
|
<filename>mdb_dump.1</filename>
|
||||||
|
</compound>
|
||||||
|
<compound kind="page">
|
||||||
|
<name>mdb_load_1</name>
|
||||||
|
<title>mdb_load - environment import tool</title>
|
||||||
|
<filename>mdb_load.1</filename>
|
||||||
|
</compound>
|
||||||
|
<compound kind="page">
|
||||||
|
<name>mdb_stat_1</name>
|
||||||
|
<title>mdb_stat - environment status tool</title>
|
||||||
|
<filename>mdb_stat.1</filename>
|
||||||
|
</compound>
|
||||||
|
</tagfile>
|
Loading…
x
Reference in New Issue
Block a user