X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fback-bdb%2Fidl.c;h=ec193efeece06c9cc48c22d26d2b7e4364785819;hb=b7f0983efafb6139d45814978ec376f87c228c37;hp=efc1a61a5497d46eabd445a4d3f4db1638afc722;hpb=a61d2b914dafe2326a0336c87c530b93333e5eef;p=openldap diff --git a/servers/slapd/back-bdb/idl.c b/servers/slapd/back-bdb/idl.c index efc1a61a54..ec193efeec 100644 --- a/servers/slapd/back-bdb/idl.c +++ b/servers/slapd/back-bdb/idl.c @@ -251,7 +251,7 @@ bdb_idl_fetch_key( #ifdef BDB_IDL_MULTI { DBC *cursor; - ID buf[BDB_IDL_DB_SIZE]; + ID buf[BDB_PAGESIZE*4]; ID *i; void *ptr; size_t len; @@ -299,7 +299,7 @@ bdb_idl_fetch_key( LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "=> bdb_idl_fetch_key: range size mismatch: expected %ld, got %ld\n", BDB_IDL_RANGE_SIZE, ids[0] )); #else Debug( LDAP_DEBUG_ANY, "=> bdb_idl_fetch_key: " - "range size mismatch: expected %ld, got %ld\n", + "range size mismatch: expected %d, got %ld\n", BDB_IDL_RANGE_SIZE, ids[0], 0 ); #endif cursor->c_close( cursor ); @@ -315,7 +315,7 @@ bdb_idl_fetch_key( LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_fetch_key: close failed: %s (%d)\n", db_strerror(rc2), rc2 )); #else Debug( LDAP_DEBUG_ANY, "=> bdb_idl_fetch_key: " - "close failed: %s (%d)\n", db_strerror(rc2), rc2, 0 ) + "close failed: %s (%d)\n", db_strerror(rc2), rc2, 0 ); #endif return rc2; } @@ -398,123 +398,137 @@ bdb_idl_insert_key( DBTzero( &data ); #ifdef BDB_IDL_MULTI { - ID buf[BDB_IDL_DB_SIZE]; DBC *cursor; - ID lo, hi; + ID lo, hi, tmp; char *err; data.size = sizeof( ID ); data.ulen = data.size; data.flags = DB_DBT_USERMEM; - rc = bdb_idl_fetch_key( be, db, tid, key, buf ); - if ( rc && rc != DB_NOTFOUND ) - return rc; - - /* If it never existed, or there's room in the current key, - * just store it. - */ - if ( rc == DB_NOTFOUND || ( !BDB_IDL_IS_RANGE(buf) && - BDB_IDL_N(buf) < BDB_IDL_DB_MAX ) ) { - data.data = &id; - rc = db->put( db, tid, key, &data, DB_NODUPDATA ); - } else if ( BDB_IDL_IS_RANGE(buf) ) { - /* If it's a range and we're outside the boundaries, - * rewrite the range boundaries. - */ - if ( id < BDB_IDL_RANGE_FIRST(buf) || - id > BDB_IDL_RANGE_LAST(buf) ) { - rc = db->cursor( db, tid, &cursor, bdb->bi_db_opflags ); - if ( rc != 0 ) { + rc = db->cursor( db, tid, &cursor, bdb->bi_db_opflags ); + if ( rc != 0 ) { #ifdef NEW_LOGGING - LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_insert_key: cursor failed: %s (%d)\n", db_strerror(rc), rc )); + LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_insert_key: cursor failed: %s (%d)\n", db_strerror(rc), rc )); #else - Debug( LDAP_DEBUG_ANY, "=> bdb_idl_insert_key: " - "cursor failed: %s (%d)\n", db_strerror(rc), rc, 0 ); + Debug( LDAP_DEBUG_ANY, "=> bdb_idl_insert_key: " + "cursor failed: %s (%d)\n", db_strerror(rc), rc, 0 ); #endif - return rc; + return rc; + } + data.data = &tmp; + /* Fetch the first data item for this key, to see if it + * exists and if it's a range. + */ + rc = cursor->c_get( cursor, key, &data, DB_SET | DB_RMW ); + err = "c_get"; + if ( rc == 0 ) { + if ( tmp != 0 ) { + /* not a range, count the number of items */ + db_recno_t count; + rc = cursor->c_count( cursor, &count, 0 ); + if ( rc != 0 ) { + err = "c_count"; + goto fail; } - if ( id < BDB_IDL_RANGE_FIRST(buf) ) { - data.data = buf+1; + if ( count >= BDB_IDL_DB_SIZE ) { + /* No room, convert to a range */ + lo = tmp; + data.data = &hi; + rc = cursor->c_get( cursor, key, &data, DB_LAST ); + if ( rc != 0 ) { + err = "c_get last"; + goto fail; + } + if ( id < lo ) + lo = id; + else if ( id > hi ) + hi = id; + rc = db->del( db, tid, key, 0 ); + if ( rc != 0 ) { + err = "del"; + goto fail; + } + data.data = &id; + id = 0; + rc = cursor->c_put( cursor, key, &data, DB_KEYFIRST ); + if ( rc != 0 ) { + err = "c_put 0"; + goto fail; + } + id = lo; + rc = cursor->c_put( cursor, key, &data, DB_KEYLAST ); + if ( rc != 0 ) { + err = "c_put lo"; + goto fail; + } + id = hi; + rc = cursor->c_put( cursor, key, &data, DB_KEYLAST ); + if ( rc != 0 ) { + err = "c_put hi"; + goto fail; + } } else { - data.data = buf+2; - } - rc = cursor->c_get( cursor, key, &data, DB_GET_BOTH | DB_RMW ); - if ( rc != 0 ) { - err = "c_get"; -fail: -#ifdef NEW_LOGGING - LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_insert_key: %s failed: %s (%d)\n", err, db_strerror(rc), rc )); -#else - Debug( LDAP_DEBUG_ANY, "=> bdb_idl_insert_key: " - "%s failed: %s (%d)\n", err, db_strerror(rc), rc ); -#endif - if ( cursor ) cursor->c_close( cursor ); - return rc; + /* There's room, just store it */ + goto put1; } - data.data = &id; - /* We should have been able to just overwrite the old - * value with the new, but apparently we have to delete - * it first. + } else { + /* It's a range, see if we need to rewrite + * the boundaries */ - rc = cursor->c_del( cursor, 0 ); - if ( rc ) { - err = "c_del"; + hi = id; + data.data = &lo; + rc = cursor->c_get( cursor, key, &data, DB_NEXT_DUP ); + if ( rc != 0 ) { + err = "c_get lo"; goto fail; } - rc = cursor->c_put( cursor, key, &data, DB_KEYFIRST ); - if ( rc ) { - err = "c_put"; - goto fail; + if ( id > lo ) { + data.data = &hi; + rc = cursor->c_get( cursor, key, &data, DB_NEXT_DUP ); + if ( rc != 0 ) { + err = "c_get hi"; + goto fail; + } } - rc = cursor->c_close( cursor ); - if ( rc ) { - cursor = NULL; - err = "c_close"; - goto fail; + if ( id < lo || id > hi ) { + /* Delete the current lo/hi */ + rc = cursor->c_del( cursor, 0 ); + if ( rc != 0 ) { + err = "c_del"; + goto fail; + } + data.data = &id; + rc = cursor->c_put( cursor, key, &data, DB_KEYFIRST ); + if ( rc != 0 ) { + err = "c_put lo/hi"; + goto fail; + } } } - } else { /* convert to a range */ - lo = BDB_IDL_FIRST(buf); - hi = BDB_IDL_LAST(buf); - - if (id < lo) - lo = id; - else if (id > hi) - hi = id; - - cursor = NULL; - - /* Delete all of the old IDL so we can replace with a range */ - rc = db->del( db, tid, key, 0 ); - if ( rc ) { - err = "del"; - goto fail; - } - - /* Write the range */ - data.data = &id; - id = 0; - rc = db->put( db, tid, key, &data, 0 ); - if ( rc ) { - err = "put #1"; - goto fail; - } - id = lo; - rc = db->put( db, tid, key, &data, 0 ); - if ( rc ) { - err = "put #2"; - goto fail; - } - id = hi; - rc = db->put( db, tid, key, &data, 0 ); - if ( rc ) { - err = "put #3"; + } else if ( rc == DB_NOTFOUND ) { +put1: data.data = &id; + rc = cursor->c_put( cursor, key, &data, DB_KEYFIRST ); + /* Don't worry if it's already there */ + if ( rc != 0 && rc != DB_KEYEXIST ) { + err = "c_put id"; goto fail; } + } else { + /* initial c_get failed, nothing was done */ +fail: +#ifdef NEW_LOGGING + LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_insert_key: %s failed: %s (%d)\n", err, db_strerror(rc), rc )); +#else + Debug( LDAP_DEBUG_ANY, "=> bdb_idl_insert_key: " + "%s failed: %s (%d)\n", err, db_strerror(rc), rc ); +#endif + cursor->c_close( cursor ); + return rc; } + rc = cursor->c_close( cursor ); } -#else +#else /* !BDB_IDL_MULTI */ data.data = ids; data.ulen = sizeof ids; data.flags = DB_DBT_USERMEM; @@ -644,17 +658,105 @@ bdb_idl_delete_key( #ifdef BDB_IDL_MULTI { DBC *cursor; + ID lo, hi, tmp; + char *err; - data.data = &id; + data.data = &tmp; data.size = sizeof( id ); data.ulen = data.size; data.flags = DB_DBT_USERMEM; rc = db->cursor( db, tid, &cursor, bdb->bi_db_opflags ); - rc = cursor->c_get( cursor, key, &data, bdb->bi_db_opflags | - DB_GET_BOTH | DB_RMW ); - if (rc == 0) - rc = cursor->c_del( cursor, 0 ); + if ( rc != 0 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_delete_key: cursor failed: %s (%d)\n", db_strerror(rc), rc )); +#else + Debug( LDAP_DEBUG_ANY, "=> bdb_idl_delete_key: " + "cursor failed: %s (%d)\n", db_strerror(rc), rc, 0 ); +#endif + return rc; + } + /* Fetch the first data item for this key, to see if it + * exists and if it's a range. + */ + rc = cursor->c_get( cursor, key, &data, DB_SET | DB_RMW ); + err = "c_get"; + if ( rc == 0 ) { + if ( tmp != 0 ) { + /* Not a range, just delete it */ + data.data = &id; + rc = cursor->c_get( cursor, key, &data, + DB_GET_BOTH | DB_RMW ); + if ( rc == 0 ) { + rc = cursor->c_del( cursor, 0 ); + if ( rc != 0 ) { + err = "c_del id"; + goto fail; + } + } + } else { + /* It's a range, see if we need to rewrite + * the boundaries + */ + hi = 0; + data.data = &lo; + rc = cursor->c_get( cursor, key, &data, DB_NEXT_DUP ); + if ( rc != 0 ) { + err = "c_get lo"; + goto fail; + } + if ( id > lo ) { + data.data = &hi; + rc = cursor->c_get( cursor, key, &data, DB_NEXT_DUP ); + if ( rc != 0 ) { + err = "c_get hi"; + goto fail; + } + } + if ( id == lo || id == hi ) { + if ( id == lo ) { + id++; + lo = id; + } else if ( id == hi ) { + id--; + hi = id; + } + if ( lo >= hi ) { + /* The range has collapsed... */ + rc = db->del( db, tid, key, 0 ); + if ( rc != 0 ) { + err = "del"; + goto fail; + } + } else { + rc = cursor->c_del( cursor, 0 ); + if ( rc != 0 ) { + err = "c_del"; + goto fail; + } + } + if ( lo <= hi ) { + data.data = &id; + rc = cursor->c_put( cursor, key, &data, DB_KEYFIRST ); + if ( rc != 0 ) { + err = "c_put lo/hi"; + goto fail; + } + } + } + } + } else { + /* initial c_get failed, nothing was done */ +fail: +#ifdef NEW_LOGGING + LDAP_LOG(( "idl", LDAP_LEVEL_ERR, "bdb_idl_delete_key: %s failed: %s (%d)\n", err, db_strerror(rc), rc )); +#else + Debug( LDAP_DEBUG_ANY, "=> bdb_idl_delete_key: " + "%s failed: %s (%d)\n", err, db_strerror(rc), rc ); +#endif + cursor->c_close( cursor ); + return rc; + } rc = cursor->c_close( cursor ); } #else