]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/back-mdb/tools.c
ITS#7920 fix for slapacl
[openldap] / servers / slapd / back-mdb / tools.c
index 47691baf2b045d790ac8882b06515d73403a5418..eef1a2aa68f7b51c847eff1bd92f6f6c19b0dbb8 100644 (file)
@@ -2,7 +2,7 @@
 /* $OpenLDAP$ */
 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
  *
- * Copyright 2011-2013 The OpenLDAP Foundation.
+ * Copyright 2011-2014 The OpenLDAP Foundation.
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
@@ -50,7 +50,9 @@ typedef struct mdb_tool_idl_cache {
 #define MDB_TOOL_IDL_FLUSH(be, txn)
 #endif /* MDB_TOOL_IDL_CACHING */
 
-static MDB_txn *txn = NULL, *txi = NULL;
+MDB_txn *mdb_tool_txn = NULL;
+
+static MDB_txn *txi = NULL;
 static MDB_cursor *cursor = NULL, *idcursor = NULL;
 static MDB_cursor *mcp = NULL, *mcd = NULL;
 static MDB_val key, data;
@@ -84,16 +86,24 @@ static void * mdb_tool_index_task( void *ctx, void *ptr );
 
 static int     mdb_writes, mdb_writes_per_commit;
 
+/* Number of ops per commit in Quick mode.
+ * Batching speeds writes overall, but too large a
+ * batch will fail with MDB_TXN_FULL.
+ */
+#ifndef MDB_WRITES_PER_COMMIT
+#define MDB_WRITES_PER_COMMIT  500
+#endif
+
 static int
 mdb_tool_entry_get_int( BackendDB *be, ID id, Entry **ep );
 
 int mdb_tool_entry_open(
        BackendDB *be, int mode )
 {
-       /* In Quick mode, commit once per 1000 entries */
+       /* In Quick mode, commit once per 500 entries */
        mdb_writes = 0;
        if ( slapMode & SLAP_TOOL_QUICK )
-               mdb_writes_per_commit = 1000;
+               mdb_writes_per_commit = MDB_WRITES_PER_COMMIT;
        else
                mdb_writes_per_commit = 1;
 
@@ -164,17 +174,17 @@ int mdb_tool_entry_close(
                mdb_cursor_close( cursor );
                cursor = NULL;
        }
-       if( txn ) {
+       if( mdb_tool_txn ) {
                int rc;
-               MDB_TOOL_IDL_FLUSH( be, txn );
-               if (( rc = mdb_txn_commit( txn ))) {
+               MDB_TOOL_IDL_FLUSH( be, mdb_tool_txn );
+               if (( rc = mdb_txn_commit( mdb_tool_txn ))) {
                        Debug( LDAP_DEBUG_ANY,
                                LDAP_XSTRING(mdb_tool_entry_close) ": database %s: "
                                "txn_commit failed: %s (%d)\n",
                                be->be_suffix[0].bv_val, mdb_strerror(rc), rc );
                        return -1;
                }
-               txn = NULL;
+               mdb_tool_txn = NULL;
        }
 
        if( nholes ) {
@@ -218,13 +228,13 @@ ID mdb_tool_entry_next(
        mdb = (struct mdb_info *) be->be_private;
        assert( mdb != NULL );
 
-       if ( !txn ) {
-               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, MDB_RDONLY, &txn );
+       if ( !mdb_tool_txn ) {
+               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, MDB_RDONLY, &mdb_tool_txn );
                if ( rc )
                        return NOID;
-               rc = mdb_cursor_open( txn, mdb->mi_id2entry, &cursor );
+               rc = mdb_cursor_open( mdb_tool_txn, mdb->mi_id2entry, &cursor );
                if ( rc ) {
-                       mdb_txn_abort( txn );
+                       mdb_txn_abort( mdb_tool_txn );
                        return NOID;
                }
        }
@@ -290,9 +300,9 @@ ID mdb_tool_dn2id_get(
 
        mdb = (struct mdb_info *) be->be_private;
 
-       if ( !txn ) {
+       if ( !mdb_tool_txn ) {
                rc = mdb_txn_begin( mdb->mi_dbenv, NULL, (slapMode & SLAP_TOOL_READONLY) != 0 ?
-                       MDB_RDONLY : 0, &txn );
+                       MDB_RDONLY : 0, &mdb_tool_txn );
                if ( rc )
                        return NOID;
        }
@@ -302,7 +312,7 @@ ID mdb_tool_dn2id_get(
        op.o_tmpmemctx = NULL;
        op.o_tmpmfuncs = &ch_mfuncs;
 
-       rc = mdb_dn2id( &op, txn, NULL, dn, &id, NULL, NULL, NULL );
+       rc = mdb_dn2id( &op, mdb_tool_txn, NULL, dn, &id, NULL, NULL, NULL );
        if ( rc == MDB_NOTFOUND )
                return NOID;
 
@@ -347,7 +357,7 @@ mdb_tool_entry_get_int( BackendDB *be, ID id, Entry **ep )
        op.o_tmpmemctx = NULL;
        op.o_tmpmfuncs = &ch_mfuncs;
        if ( slapMode & SLAP_TOOL_READONLY ) {
-               rc = mdb_id2name( &op, txn, &idcursor, id, &dn, &ndn );
+               rc = mdb_id2name( &op, mdb_tool_txn, &idcursor, id, &dn, &ndn );
                if ( rc  ) {
                        rc = LDAP_OTHER;
                        if ( e ) {
@@ -365,7 +375,7 @@ mdb_tool_entry_get_int( BackendDB *be, ID id, Entry **ep )
                        }
                }
        }
-       rc = mdb_entry_decode( &op, &data, &e );
+       rc = mdb_entry_decode( &op, mdb_tool_txn, &data, &e );
        e->e_id = id;
        if ( !BER_BVISNULL( &dn )) {
                e->e_name = dn;
@@ -389,19 +399,19 @@ mdb_tool_entry_get( BackendDB *be, ID id )
        Entry *e = NULL;
        int rc;
 
-       if ( !txn ) {
+       if ( !mdb_tool_txn ) {
                struct mdb_info *mdb = (struct mdb_info *) be->be_private;
                rc = mdb_txn_begin( mdb->mi_dbenv, NULL,
-                       (slapMode & SLAP_TOOL_READONLY) ? MDB_RDONLY : 0, &txn );
+                       (slapMode & SLAP_TOOL_READONLY) ? MDB_RDONLY : 0, &mdb_tool_txn );
                if ( rc )
                        return NULL;
        }
        if ( !cursor ) {
                struct mdb_info *mdb = (struct mdb_info *) be->be_private;
-               rc = mdb_cursor_open( txn, mdb->mi_id2entry, &cursor );
+               rc = mdb_cursor_open( mdb_tool_txn, mdb->mi_id2entry, &cursor );
                if ( rc ) {
-                       mdb_txn_abort( txn );
-                       txn = NULL;
+                       mdb_txn_abort( mdb_tool_txn );
+                       mdb_tool_txn = NULL;
                        return NULL;
                }
        }
@@ -463,7 +473,7 @@ static int mdb_tool_next_id(
                        "=> mdb_tool_next_id: %s\n", text->bv_val, 0, 0 );
                        return rc;
                }
-               rc = mdb_dn2id_add( op, mcp, mcd, pid, 1, e );
+               rc = mdb_dn2id_add( op, mcp, mcd, pid, 1, 1, e );
                if ( rc ) {
                        snprintf( text->bv_val, text->bv_len,
                                "dn2id_add failed: %s (%d)",
@@ -614,8 +624,8 @@ ID mdb_tool_entry_put(
 
        mdb = (struct mdb_info *) be->be_private;
 
-       if ( !txn ) {
-               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, 0, &txn );
+       if ( !mdb_tool_txn ) {
+               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, 0, &mdb_tool_txn );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                "txn_begin failed: %s (%d)",
@@ -625,7 +635,7 @@ ID mdb_tool_entry_put(
                                 text->bv_val, 0, 0 );
                        return NOID;
                }
-               rc = mdb_cursor_open( txn, mdb->mi_id2entry, &idcursor );
+               rc = mdb_cursor_open( mdb_tool_txn, mdb->mi_id2entry, &idcursor );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                "cursor_open failed: %s (%d)",
@@ -639,7 +649,7 @@ ID mdb_tool_entry_put(
                        ID dummy;
                        mdb_next_id( be, idcursor, &dummy );
                }
-               rc = mdb_cursor_open( txn, mdb->mi_dn2id, &mcp );
+               rc = mdb_cursor_open( mdb_tool_txn, mdb->mi_dn2id, &mcp );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                "cursor_open failed: %s (%d)",
@@ -649,7 +659,7 @@ ID mdb_tool_entry_put(
                                 text->bv_val, 0, 0 );
                        return NOID;
                }
-               rc = mdb_cursor_open( txn, mdb->mi_dn2id, &mcd );
+               rc = mdb_cursor_open( mdb_tool_txn, mdb->mi_dn2id, &mcd );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                "cursor_open failed: %s (%d)",
@@ -667,12 +677,12 @@ ID mdb_tool_entry_put(
        op.o_tmpmfuncs = &ch_mfuncs;
 
        /* add dn2id indices */
-       rc = mdb_tool_next_id( &op, txn, e, text, 0 );
+       rc = mdb_tool_next_id( &op, mdb_tool_txn, e, text, 0 );
        if( rc != 0 ) {
                goto done;
        }
 
-       rc = mdb_tool_index_add( &op, txn, e );
+       rc = mdb_tool_index_add( &op, mdb_tool_txn, e );
        if( rc != 0 ) {
                snprintf( text->bv_val, text->bv_len,
                                "index_entry_add failed: err=%d", rc );
@@ -684,7 +694,7 @@ ID mdb_tool_entry_put(
 
 
        /* id2entry index */
-       rc = mdb_id2entry_add( &op, txn, idcursor, e );
+       rc = mdb_id2entry_add( &op, mdb_tool_txn, idcursor, e );
        if( rc != 0 ) {
                snprintf( text->bv_val, text->bv_len,
                                "id2entry_add failed: err=%d", rc );
@@ -699,12 +709,12 @@ done:
                mdb_writes++;
                if ( mdb_writes >= mdb_writes_per_commit ) {
                        unsigned i;
-                       MDB_TOOL_IDL_FLUSH( be, txn );
-                       rc = mdb_txn_commit( txn );
+                       MDB_TOOL_IDL_FLUSH( be, mdb_tool_txn );
+                       rc = mdb_txn_commit( mdb_tool_txn );
                        for ( i=0; i<mdb->mi_nattrs; i++ )
                                mdb->mi_attrs[i]->ai_cursor = NULL;
                        mdb_writes = 0;
-                       txn = NULL;
+                       mdb_tool_txn = NULL;
                        idcursor = NULL;
                        if( rc != 0 ) {
                                snprintf( text->bv_val, text->bv_len,
@@ -719,8 +729,8 @@ done:
 
        } else {
                unsigned i;
-               mdb_txn_abort( txn );
-               txn = NULL;
+               mdb_txn_abort( mdb_tool_txn );
+               mdb_tool_txn = NULL;
                idcursor = NULL;
                for ( i=0; i<mdb->mi_nattrs; i++ )
                        mdb->mi_attrs[i]->ai_cursor = NULL;
@@ -886,10 +896,10 @@ done:
                        mdb_cursor_close( cursor );
                        txi = NULL;
                        /* Must close the read txn to allow old pages to be reclaimed. */
-                       mdb_txn_abort( txn );
+                       mdb_txn_abort( mdb_tool_txn );
                        /* and then reopen it so that tool_entry_next still works. */
-                       mdb_txn_begin( mi->mi_dbenv, NULL, MDB_RDONLY, &txn );
-                       mdb_cursor_open( txn, mi->mi_id2entry, &cursor );
+                       mdb_txn_begin( mi->mi_dbenv, NULL, MDB_RDONLY, &mdb_tool_txn );
+                       mdb_cursor_open( mdb_tool_txn, mi->mi_id2entry, &cursor );
                        key.mv_data = &id;
                        key.mv_size = sizeof(ID);
                        mdb_cursor_get( cursor, &key, NULL, MDB_SET );
@@ -944,8 +954,8 @@ ID mdb_tool_entry_modify(
                mdb_cursor_close( cursor );
                cursor = NULL;
        }
-       if ( !txn ) {
-               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, 0, &txn );
+       if ( !mdb_tool_txn ) {
+               rc = mdb_txn_begin( mdb->mi_dbenv, NULL, 0, &mdb_tool_txn );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                "txn_begin failed: %s (%d)",
@@ -963,7 +973,7 @@ ID mdb_tool_entry_modify(
        op.o_tmpmfuncs = &ch_mfuncs;
 
        /* id2entry index */
-       rc = mdb_id2entry_update( &op, txn, NULL, e );
+       rc = mdb_id2entry_update( &op, mdb_tool_txn, NULL, e );
        if( rc != 0 ) {
                snprintf( text->bv_val, text->bv_len,
                                "id2entry_update failed: err=%d", rc );
@@ -975,7 +985,7 @@ ID mdb_tool_entry_modify(
 
 done:
        if( rc == 0 ) {
-               rc = mdb_txn_commit( txn );
+               rc = mdb_txn_commit( mdb_tool_txn );
                if( rc != 0 ) {
                        snprintf( text->bv_val, text->bv_len,
                                        "txn_commit failed: %s (%d)",
@@ -987,7 +997,7 @@ done:
                }
 
        } else {
-               mdb_txn_abort( txn );
+               mdb_txn_abort( mdb_tool_txn );
                snprintf( text->bv_val, text->bv_len,
                        "txn_aborted! %s (%d)",
                        mdb_strerror(rc), rc );
@@ -996,7 +1006,7 @@ done:
                        text->bv_val, 0, 0 );
                e->e_id = NOID;
        }
-       txn = NULL;
+       mdb_tool_txn = NULL;
        idcursor = NULL;
 
        return e->e_id;
@@ -1301,11 +1311,11 @@ static int
 mdb_dn2id_upgrade( BackendDB *be ) {
        struct mdb_info *mi = (struct mdb_info *) be->be_private;
        MDB_txn *mt;
-       MDB_cursor *mc;
+       MDB_cursor *mc = NULL;
        MDB_val key, data;
        char *ptr;
        int rc, writes=0, depth=0;
-       int i, enable_meter = 0;
+       int enable_meter = 0;
        ID id = 0, *num, count = 0;
        rec *stack;
        lutil_meter_t meter;
@@ -1335,7 +1345,17 @@ mdb_dn2id_upgrade( BackendDB *be ) {
        stack = (rec *)(num + STACKSIZ);
 
        rc = mdb_txn_begin(mi->mi_dbenv, NULL, 0, &mt);
+       if (rc) {
+               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_txn_begin failed, %s (%d)\n",
+                       mdb_strerror(rc), rc, 0 );
+               goto leave;
+       }
        rc = mdb_cursor_open(mt, mi->mi_dbis[MDB_DN2ID], &mc);
+       if (rc) {
+               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_open failed, %s (%d)\n",
+                       mdb_strerror(rc), rc, 0 );
+               goto leave;
+       }
 
        key.mv_size = sizeof(ID);
        /* post-order depth-first update */
@@ -1347,17 +1367,23 @@ mdb_dn2id_upgrade( BackendDB *be ) {
                key.mv_data = &id;
                stack[depth].id = id;
                rc = mdb_cursor_get(mc, &key, &data, MDB_SET);
+               if (rc) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_get failed, %s (%d)\n",
+                               mdb_strerror(rc), rc, 0 );
+                       goto leave;
+               }
                num[depth] = 1;
 
-               /* update superior counts */
-               for (i=depth-1; i>=0; i--)
-                       num[i] += num[depth];
-
                rc = mdb_cursor_count(mc, &dkids);
+               if (rc) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_count failed, %s (%d)\n",
+                               mdb_strerror(rc), rc, 0 );
+                       goto leave;
+               }
                if (dkids > 1) {
                        rc = mdb_cursor_get(mc, &key, &data, MDB_NEXT_DUP);
 down:
-                       ptr = data.mv_data + data.mv_size - sizeof(ID);
+                       ptr = (unsigned char *)data.mv_data + data.mv_size - sizeof(ID);
                        memcpy(&id, ptr, sizeof(ID));
                        depth++;
                        memcpy(stack[depth].rdn, data.mv_data, data.mv_size);
@@ -1368,21 +1394,41 @@ down:
 
                /* pop: write updated count, advance to next node */
 pop:
+               /* update superior counts */
+               if (depth)
+                       num[depth-1] += num[depth];
+
                key.mv_data = &id;
                id = stack[depth-1].id;
                data.mv_data = stack[depth].rdn;
                data.mv_size = stack[depth].len;
                rc = mdb_cursor_get(mc, &key, &data, MDB_GET_BOTH);
+               if (rc) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_get(BOTH) failed, %s (%d)\n",
+                               mdb_strerror(rc), rc, 0 );
+                       goto leave;
+               }
                data.mv_data = stack[depth].rdn;
-               ptr = data.mv_data + data.mv_size;
+               ptr = (unsigned char *)data.mv_data + data.mv_size;
                memcpy(ptr, &num[depth], sizeof(ID));
                data.mv_size += sizeof(ID);
                rc = mdb_cursor_del(mc, 0);
+               if (rc) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_del failed, %s (%d)\n",
+                               mdb_strerror(rc), rc, 0 );
+                       goto leave;
+               }
                rc = mdb_cursor_put(mc, &key, &data, 0);
+               if (rc) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_put failed, %s (%d)\n",
+                               mdb_strerror(rc), rc, 0 );
+                       goto leave;
+               }
                count++;
+#if 1
                if (enable_meter)
                        lutil_meter_update(&meter, count, 0);
-#if 0
+#else
                {
                        int len;
                        ptr = data.mv_data;
@@ -1394,21 +1440,54 @@ pop:
                if (writes == 1000) {
                        mdb_cursor_close(mc);
                        rc = mdb_txn_commit(mt);
+                       if (rc) {
+                               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_txn_commit failed, %s (%d)\n",
+                                       mdb_strerror(rc), rc, 0 );
+                               goto leave;
+                       }
                        rc = mdb_txn_begin(mi->mi_dbenv, NULL, 0, &mt);
+                       if (rc) {
+                               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_txn_begin(2) failed, %s (%d)\n",
+                                       mdb_strerror(rc), rc, 0 );
+                               goto leave;
+                       }
                        rc = mdb_cursor_open(mt, mi->mi_dbis[MDB_DN2ID], &mc);
+                       if (rc) {
+                               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_open(2) failed, %s (%d)\n",
+                                       mdb_strerror(rc), rc, 0 );
+                               goto leave;
+                       }
                        rc = mdb_cursor_get(mc, &key, &data, MDB_GET_BOTH);
+                       if (rc) {
+                               Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_cursor_get(2) failed, %s (%d)\n",
+                                       mdb_strerror(rc), rc, 0 );
+                               goto leave;
+                       }
                        writes = 0;
                }
                depth--;
-               if (!depth)
-                       break;
 
                rc = mdb_cursor_get(mc, &key, &data, MDB_NEXT_DUP);
                if (rc == 0)
                        goto down;
-               goto pop;
+               rc = 0;
+               if (depth)
+                       goto pop;
+               else
+                       break;
+       }
+leave:
+       mdb_cursor_close(mc);
+       if (mt) {
+               int r2;
+               r2 = mdb_txn_commit(mt);
+               if (r2) {
+                       Debug(LDAP_DEBUG_ANY, "mdb_dn2id_upgrade: mdb_txn_commit(2) failed, %s (%d)\n",
+                               mdb_strerror(r2), r2, 0 );
+                       if (!rc)
+                               rc = r2;
+               }
        }
-       rc = mdb_txn_commit(mt);
        ch_free(num);
        if (enable_meter) {
                lutil_meter_update(&meter, count, 1);