git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/dn2id.c

   1 /* dn2id.c - routines to deal with the dn2id index */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
   5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   6  */
   7
   8 #include "portable.h"
   9
  10 #include <stdio.h>
  11 #include <ac/string.h>
  12
  13 #include "back-bdb.h"
  14 #include "idl.h"
  15 #include "lutil.h"
  16
  17 #ifndef BDB_HIER
  18 int
  19 bdb_dn2id_add(
  20         BackendDB       *be,
  21         DB_TXN *txn,
  22         EntryInfo *eip,
  23         Entry           *e,
  24         void *ctx )
  25 {
  26         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
  27         DB *db = bdb->bi_dn2id->bdi_db;
  28         int             rc;
  29         DBT             key, data;
  30         char            *buf;
  31         struct berval   ptr, pdn;
  32
  33 #ifdef NEW_LOGGING
  34         LDAP_LOG ( INDEX, ARGS, "bdb_dn2id_add( \"%s\", 0x%08lx )\n",
  35                 e->e_ndn, (long) e->e_id, 0 );
  36 #else
  37         Debug( LDAP_DEBUG_TRACE, "=> bdb_dn2id_add( \"%s\", 0x%08lx )\n",
  38                 e->e_ndn, (long) e->e_id, 0 );
  39 #endif
  40         assert( e->e_id != NOID );
  41
  42         DBTzero( &key );
  43         key.size = e->e_nname.bv_len + 2;
  44         key.ulen = key.size;
  45         key.flags = DB_DBT_USERMEM;
  46         buf = sl_malloc( key.size, ctx );
  47         key.data = buf;
  48         buf[0] = DN_BASE_PREFIX;
  49         ptr.bv_val = buf + 1;
  50         ptr.bv_len = e->e_nname.bv_len;
  51         AC_MEMCPY( ptr.bv_val, e->e_nname.bv_val, e->e_nname.bv_len );
  52         ptr.bv_val[ptr.bv_len] = '\0';
  53
  54         DBTzero( &data );
  55         data.data = (char *) &e->e_id;
  56         data.size = sizeof( e->e_id );
  57
  58         /* store it -- don't override */
  59         rc = db->put( db, txn, &key, &data, DB_NOOVERWRITE );
  60         if( rc != 0 ) {
  61 #ifdef NEW_LOGGING
  62                 LDAP_LOG ( INDEX, ERR, "bdb_dn2id_add: put failed: %s %d\n",
  63                         db_strerror(rc), rc, 0 );
  64 #else
  65                 Debug( LDAP_DEBUG_ANY, "=> bdb_dn2id_add: put failed: %s %d\n",
  66                         db_strerror(rc), rc, 0 );
  67 #endif
  68                 goto done;
  69         }
  70
  71 #ifndef BDB_MULTIPLE_SUFFIXES
  72         if( !be_issuffix( be, &ptr )) {
  73 #endif
  74                 buf[0] = DN_SUBTREE_PREFIX;
  75                 rc = db->put( db, txn, &key, &data, DB_NOOVERWRITE );
  76                 if( rc != 0 ) {
  77 #ifdef NEW_LOGGING
  78                         LDAP_LOG ( INDEX, ERR,
  79                                 "=> bdb_dn2id_add: subtree (%s) put failed: %d\n",
  80                                 ptr.bv_val, rc, 0 );
  81 #else
  82                         Debug( LDAP_DEBUG_ANY,
  83                         "=> bdb_dn2id_add: subtree (%s) put failed: %d\n",
  84                         ptr.bv_val, rc, 0 );
  85 #endif
  86                         goto done;
  87                 }
  88
  89 #ifdef BDB_MULTIPLE_SUFFIXES
  90         if( !be_issuffix( be, &ptr )) {
  91 #endif
  92                 dnParent( &ptr, &pdn );
  93
  94                 key.size = pdn.bv_len + 2;
  95                 key.ulen = key.size;
  96                 pdn.bv_val[-1] = DN_ONE_PREFIX;
  97                 key.data = pdn.bv_val-1;
  98                 ptr = pdn;
  99
 100                 rc = bdb_idl_insert_key( be, db, txn, &key, e->e_id );
 101
 102                 if( rc != 0 ) {
 103 #ifdef NEW_LOGGING
 104                         LDAP_LOG ( INDEX, ERR,
 105                                 "=> bdb_dn2id_add: parent (%s) insert failed: %d\n",
 106                                 ptr.bv_val, rc, 0 );
 107 #else
 108                         Debug( LDAP_DEBUG_ANY,
 109                                 "=> bdb_dn2id_add: parent (%s) insert failed: %d\n",
 110                                         ptr.bv_val, rc, 0 );
 111 #endif
 112                         goto done;
 113                 }
 114 #ifndef BDB_MULTIPLE_SUFFIXES
 115         }
 116
 117         while( !be_issuffix( be, &ptr )) {
 118 #else
 119         for (;;) {
 120 #endif
 121                 ptr.bv_val[-1] = DN_SUBTREE_PREFIX;
 122
 123                 rc = bdb_idl_insert_key( be, db, txn, &key, e->e_id );
 124
 125                 if( rc != 0 ) {
 126 #ifdef NEW_LOGGING
 127                         LDAP_LOG ( INDEX, ERR,
 128                                 "=> bdb_dn2id_add: subtree (%s) insert failed: %d\n",
 129                                 ptr.bv_val, rc, 0 );
 130 #else
 131                         Debug( LDAP_DEBUG_ANY,
 132                                 "=> bdb_dn2id_add: subtree (%s) insert failed: %d\n",
 133                                         ptr.bv_val, rc, 0 );
 134 #endif
 135                         break;
 136                 }
 137 #ifdef BDB_MULTIPLE_SUFFIXES
 138                 if( be_issuffix( be, &ptr )) break;
 139 #endif
 140                 dnParent( &ptr, &pdn );
 141
 142                 key.size = pdn.bv_len + 2;
 143                 key.ulen = key.size;
 144                 key.data = pdn.bv_val - 1;
 145                 ptr = pdn;
 146         }
 147 #ifdef BDB_MULTIPLE_SUFFIXES
 148         }
 149 #endif
 150
 151 done:
 152         sl_free( buf, ctx );
 153 #ifdef NEW_LOGGING
 154         LDAP_LOG ( INDEX, RESULTS, "<= bdb_dn2id_add: %d\n", rc, 0, 0 );
 155 #else
 156         Debug( LDAP_DEBUG_TRACE, "<= bdb_dn2id_add: %d\n", rc, 0, 0 );
 157 #endif
 158         return rc;
 159 }
 160
 161 int
 162 bdb_dn2id_delete(
 163         BackendDB       *be,
 164         DB_TXN *txn,
 165         EntryInfo       *eip,
 166         Entry           *e,
 167         void *ctx )
 168 {
 169         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 170         DB *db = bdb->bi_dn2id->bdi_db;
 171         int             rc;
 172         DBT             key;
 173         char            *buf;
 174         struct berval   pdn, ptr;
 175
 176 #ifdef NEW_LOGGING
 177         LDAP_LOG ( INDEX, ARGS,
 178                 "=> bdb_dn2id_delete ( \"%s\", 0x%08lx )\n", e->e_ndn, e->e_id, 0);
 179 #else
 180         Debug( LDAP_DEBUG_TRACE, "=> bdb_dn2id_delete( \"%s\", 0x%08lx )\n",
 181                 e->e_ndn, e->e_id, 0 );
 182 #endif
 183
 184         DBTzero( &key );
 185         key.size = e->e_nname.bv_len + 2;
 186         buf = sl_malloc( key.size, ctx );
 187         key.data = buf;
 188         key.flags = DB_DBT_USERMEM;
 189         buf[0] = DN_BASE_PREFIX;
 190         ptr.bv_val = buf+1;
 191         ptr.bv_len = e->e_nname.bv_len;
 192         AC_MEMCPY( ptr.bv_val, e->e_nname.bv_val, e->e_nname.bv_len );
 193         ptr.bv_val[ptr.bv_len] = '\0';
 194
 195         /* delete it */
 196         rc = db->del( db, txn, &key, 0 );
 197         if( rc != 0 ) {
 198 #ifdef NEW_LOGGING
 199                 LDAP_LOG ( INDEX, ERR,
 200                         "=> bdb_dn2id_delete: delete failed: %s %d\n",
 201                         db_strerror(rc), rc, 0 );
 202 #else
 203                 Debug( LDAP_DEBUG_ANY, "=> bdb_dn2id_delete: delete failed: %s %d\n",
 204                         db_strerror(rc), rc, 0 );
 205 #endif
 206                 goto done;
 207         }
 208
 209 #ifndef BDB_MULTIPLE_SUFFIXES
 210         if( !be_issuffix( be, &ptr )) {
 211 #endif
 212                 buf[0] = DN_SUBTREE_PREFIX;
 213                 rc = db->del( db, txn, &key, 0 );
 214                 if( rc != 0 ) {
 215 #ifdef NEW_LOGGING
 216                         LDAP_LOG ( INDEX, ERR,
 217                                 "=> bdb_dn2id_delete: subtree (%s) delete failed: %d\n",
 218                                 ptr.bv_val, rc, 0 );
 219 #else
 220                         Debug( LDAP_DEBUG_ANY,
 221                         "=> bdb_dn2id_delete: subtree (%s) delete failed: %d\n",
 222                         ptr.bv_val, rc, 0 );
 223 #endif
 224                         goto done;
 225                 }
 226
 227 #ifdef BDB_MULTIPLE_SUFFIXES
 228         if( !be_issuffix( be, &ptr )) {
 229 #endif
 230                 dnParent( &ptr, &pdn );
 231
 232                 key.size = pdn.bv_len + 2;
 233                 key.ulen = key.size;
 234                 pdn.bv_val[-1] = DN_ONE_PREFIX;
 235                 key.data = pdn.bv_val - 1;
 236                 ptr = pdn;
 237
 238                 rc = bdb_idl_delete_key( be, db, txn, &key, e->e_id );
 239
 240                 if( rc != 0 ) {
 241 #ifdef NEW_LOGGING
 242                         LDAP_LOG ( INDEX, ERR,
 243                                 "=> bdb_dn2id_delete: parent (%s) delete failed: %d\n",
 244                                 ptr.bv_val, rc, 0 );
 245 #else
 246                         Debug( LDAP_DEBUG_ANY,
 247                                 "=> bdb_dn2id_delete: parent (%s) delete failed: %d\n",
 248                                 ptr.bv_val, rc, 0 );
 249 #endif
 250                         goto done;
 251                 }
 252 #ifndef BDB_MULTIPLE_SUFFIXES
 253         }
 254
 255         while( !be_issuffix( be, &ptr )) {
 256 #else
 257         for (;;) {
 258 #endif
 259                 ptr.bv_val[-1] = DN_SUBTREE_PREFIX;
 260
 261                 rc = bdb_idl_delete_key( be, db, txn, &key, e->e_id );
 262                 if( rc != 0 ) {
 263 #ifdef NEW_LOGGING
 264                         LDAP_LOG ( INDEX, ERR,
 265                                 "=> bdb_dn2id_delete: subtree (%s) delete failed: %d\n",
 266                                 ptr.bv_val, rc, 0 );
 267 #else
 268                         Debug( LDAP_DEBUG_ANY,
 269                                 "=> bdb_dn2id_delete: subtree (%s) delete failed: %d\n",
 270                                 ptr.bv_val, rc, 0 );
 271 #endif
 272                         goto done;
 273                 }
 274 #ifdef BDB_MULTIPLE_SUFFIXES
 275                 if( be_issuffix( be, &ptr )) break;
 276 #endif
 277                 dnParent( &ptr, &pdn );
 278
 279                 key.size = pdn.bv_len + 2;
 280                 key.ulen = key.size;
 281                 key.data = pdn.bv_val - 1;
 282                 ptr = pdn;
 283         }
 284 #ifdef BDB_MULTIPLE_SUFFIXES
 285         }
 286 #endif
 287
 288 done:
 289         sl_free( buf, ctx );
 290 #ifdef NEW_LOGGING
 291         LDAP_LOG ( INDEX, RESULTS, "<= bdb_dn2id_delete %d\n", rc, 0, 0 );
 292 #else
 293         Debug( LDAP_DEBUG_TRACE, "<= bdb_dn2id_delete %d\n", rc, 0, 0 );
 294 #endif
 295         return rc;
 296 }
 297
 298 int
 299 bdb_dn2id(
 300         BackendDB       *be,
 301         DB_TXN *txn,
 302         struct berval   *dn,
 303         EntryInfo *ei,
 304         void *ctx )
 305 {
 306         int             rc;
 307         DBT             key, data;
 308         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 309         DB *db = bdb->bi_dn2id->bdi_db;
 310
 311 #ifdef NEW_LOGGING
 312         LDAP_LOG ( INDEX, ARGS, "=> bdb_dn2id( \"%s\" )\n", dn->bv_val, 0, 0 );
 313 #else
 314         Debug( LDAP_DEBUG_TRACE, "=> bdb_dn2id( \"%s\" )\n", dn->bv_val, 0, 0 );
 315 #endif
 316
 317         DBTzero( &key );
 318         key.size = dn->bv_len + 2;
 319         key.data = sl_malloc( key.size, ctx );
 320         ((char *)key.data)[0] = DN_BASE_PREFIX;
 321         AC_MEMCPY( &((char *)key.data)[1], dn->bv_val, key.size - 1 );
 322
 323         /* store the ID */
 324         DBTzero( &data );
 325         data.data = &ei->bei_id;
 326         data.ulen = sizeof(ID);
 327         data.flags = DB_DBT_USERMEM;
 328
 329         /* fetch it */
 330         rc = db->get( db, txn, &key, &data, bdb->bi_db_opflags );
 331
 332         if( rc != 0 ) {
 333 #ifdef NEW_LOGGING
 334                 LDAP_LOG ( INDEX, ERR, "<= bdb_dn2id: get failed %s (%d)\n",
 335                         db_strerror(rc), rc, 0 );
 336 #else
 337                 Debug( LDAP_DEBUG_TRACE, "<= bdb_dn2id: get failed: %s (%d)\n",
 338                         db_strerror( rc ), rc, 0 );
 339 #endif
 340         } else {
 341 #ifdef NEW_LOGGING
 342                 LDAP_LOG ( INDEX, RESULTS,
 343                         "<= bdb_dn2id: got id=0x%08lx\n", ei->bei_id, 0, 0 );
 344 #else
 345                 Debug( LDAP_DEBUG_TRACE, "<= bdb_dn2id: got id=0x%08lx\n",
 346                         ei->bei_id, 0, 0 );
 347 #endif
 348         }
 349
 350         sl_free( key.data, ctx );
 351         return rc;
 352 }
 353
 354 int
 355 bdb_dn2id_children(
 356         Operation *op,
 357         DB_TXN *txn,
 358         Entry *e )
 359 {
 360         DBT             key, data;
 361         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
 362         DB *db = bdb->bi_dn2id->bdi_db;
 363         ID              id;
 364         int             rc;
 365
 366 #ifdef NEW_LOGGING
 367         LDAP_LOG ( INDEX, ARGS,
 368                 "=> bdb_dn2id_children( %s )\n", e->e_nname.bv_val, 0, 0 );
 369 #else
 370         Debug( LDAP_DEBUG_TRACE, "=> bdb_dn2id_children( %s )\n",
 371                 e->e_nname.bv_val, 0, 0 );
 372 #endif
 373         DBTzero( &key );
 374         key.size = e->e_nname.bv_len + 2;
 375         key.data = sl_malloc( key.size, op->o_tmpmemctx );
 376         ((char *)key.data)[0] = DN_ONE_PREFIX;
 377         AC_MEMCPY( &((char *)key.data)[1], e->e_nname.bv_val, key.size - 1 );
 378
 379 #ifdef SLAP_IDL_CACHE
 380         if ( bdb->bi_idl_cache_size ) {
 381                 rc = bdb_idl_cache_get( bdb, db, &key, NULL );
 382                 if ( rc != LDAP_NO_SUCH_OBJECT ) {
 383                         sl_free( key.data, op->o_tmpmemctx );
 384                         return rc;
 385                 }
 386         }
 387 #endif
 388         /* we actually could do a empty get... */
 389         DBTzero( &data );
 390         data.data = &id;
 391         data.ulen = sizeof(id);
 392         data.flags = DB_DBT_USERMEM;
 393         data.doff = 0;
 394         data.dlen = sizeof(id);
 395
 396         rc = db->get( db, txn, &key, &data, bdb->bi_db_opflags );
 397         sl_free( key.data, op->o_tmpmemctx );
 398
 399 #ifdef NEW_LOGGING
 400         LDAP_LOG ( INDEX, DETAIL1,
 401                 "<= bdb_dn2id_children( %s ): %s (%d)\n",
 402                 e->e_nname.bv_val, rc == 0 ? "" : ( rc == DB_NOTFOUND ? "no " :
 403                 db_strerror(rc)), rc );
 404 #else
 405         Debug( LDAP_DEBUG_TRACE, "<= bdb_dn2id_children( %s ): %s (%d)\n",
 406                 e->e_nname.bv_val,
 407                 rc == 0 ? "" : ( rc == DB_NOTFOUND ? "no " :
 408                         db_strerror(rc) ), rc );
 409 #endif
 410
 411         return rc;
 412 }
 413
 414 int
 415 bdb_dn2idl(
 416         BackendDB       *be,
 417         struct berval   *dn,
 418         int prefix,
 419         ID *ids,
 420         void *ctx )
 421 {
 422         int             rc;
 423         DBT             key;
 424         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 425         DB *db = bdb->bi_dn2id->bdi_db;
 426
 427 #ifdef NEW_LOGGING
 428         LDAP_LOG ( INDEX, ARGS,
 429                 "=> bdb_dn2ididl( \"%s\" )\n", dn->bv_val, 0, 0 );
 430 #else
 431         Debug( LDAP_DEBUG_TRACE, "=> bdb_dn2idl( \"%s\" )\n", dn->bv_val, 0, 0 );
 432 #endif
 433
 434 #ifndef BDB_MULTIPLE_SUFFIXES
 435         if (prefix == DN_SUBTREE_PREFIX && be_issuffix(be, dn))
 436         {
 437                 BDB_IDL_ALL(bdb, ids);
 438                 return 0;
 439         }
 440 #endif
 441
 442         DBTzero( &key );
 443         key.size = dn->bv_len + 2;
 444         key.ulen = key.size;
 445         key.flags = DB_DBT_USERMEM;
 446         key.data = sl_malloc( key.size, ctx );
 447         ((char *)key.data)[0] = prefix;
 448         AC_MEMCPY( &((char *)key.data)[1], dn->bv_val, key.size - 1 );
 449
 450         rc = bdb_idl_fetch_key( be, db, NULL, &key, ids );
 451
 452         if( rc != 0 ) {
 453 #ifdef NEW_LOGGING
 454                 LDAP_LOG ( INDEX, ERR,
 455                         "<= bdb_dn2ididl: get failed: %s (%d)\n", db_strerror(rc), rc, 0 );
 456 #else
 457                 Debug( LDAP_DEBUG_TRACE,
 458                         "<= bdb_dn2idl: get failed: %s (%d)\n",
 459                         db_strerror( rc ), rc, 0 );
 460 #endif
 461
 462         } else {
 463 #ifdef NEW_LOGGING
 464                 LDAP_LOG ( INDEX, RESULTS,
 465                         "<= bdb_dn2ididl: id=%ld first=%ld last=%ld\n",
 466                         (long) ids[0], (long) BDB_IDL_FIRST( ids ),
 467                         (long) BDB_IDL_LAST( ids ) );
 468 #else
 469                 Debug( LDAP_DEBUG_TRACE,
 470                         "<= bdb_dn2idl: id=%ld first=%ld last=%ld\n",
 471                         (long) ids[0],
 472                         (long) BDB_IDL_FIRST( ids ), (long) BDB_IDL_LAST( ids ) );
 473 #endif
 474         }
 475
 476         sl_free( key.data, ctx );
 477         return rc;
 478 }
 479 #else   /* BDB_HIER */
 480
 481 /* Experimental management routines for a hierarchically structured database.
 482  *
 483  * Unsupported! Use at your own risk!
 484  * -- Howard Chu, Symas Corp. 2003.
 485  *
 486  * Instead of a ldbm-style dn2id database, we use a hierarchical one. Each
 487  * entry in this database is a struct diskNode, keyed by entryID and with
 488  * the data containing the RDN and entryID of the node's children. We use
 489  * a B-Tree with sorted duplicates to store all the children of a node under
 490  * the same key. Also, the first item under the key contains an empty rdn
 491  * and the ID of the node's parent, to allow bottom-up tree traversal as
 492  * well as top-down.
 493  *
 494  * The diskNode is a variable length structure. This definition is not
 495  * directly usable for in-memory manipulation.
 496  */
 497 typedef struct diskNode {
 498         ID entryID;
 499         short nrdnlen;
 500         char nrdn[1];
 501         char rdn[1];
 502 } diskNode;
 503
 504 /* Sort function for the sorted duplicate data items of a dn2id key.
 505  * Sorts based on normalized RDN, in lexical order.
 506  */
 507 int
 508 bdb_hdb_compare(
 509         DB *db,
 510         const DBT *usrkey,
 511         const DBT *curkey
 512 )
 513 {
 514         diskNode *usr = usrkey->data;
 515         diskNode *cur = curkey->data;
 516         short curlen;
 517         char *ptr = (char *)&cur->nrdnlen;
 518         int rc;
 519
 520         curlen = ptr[0] << 8 | ptr[1];
 521
 522         rc = strncmp( usr->nrdn, cur->nrdn, usr->nrdnlen );
 523         if ( rc == 0 ) rc = usrlen - curlen;
 524         return rc;
 525 }
 526
 527 /* This function constructs a full DN for a given entry.
 528  */
 529 int bdb_fix_dn(
 530         BackendDB *be,
 531         Entry *e
 532 )
 533 {
 534         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 535         EntryInfo *ei;
 536         int rlen = 0, nrlen = 0;
 537         char *ptr, *nptr;
 538
 539         for ( ei = BEI(e); ei; ei=ei->bei_parent ) {
 540                 rlen += ei->bei_rdn.bv_len + 1;
 541                 nrlen += ei->bei_nrdn.bv_len + 1;
 542         }
 543         e->e_name.bv_len = rlen - 1;
 544         e->e_nname.bv_len = nrlen - 1;
 545         e->e_name.bv_val = ch_malloc(rlen + nrlen);
 546         e->e_nname.bv_val = e->e_name.bv_val + rlen;
 547         ptr = e->e_name.bv_val;
 548         nptr = e->e_nname.bv_val;
 549         for ( ei = BEI(e); ei; ei=ei->bei_parent ) {
 550                 ptr = lutil_strcopy(ptr, ei->bei_rdn.bv_val);
 551                 nptr = lutil_strcopy(nptr, ei->bei_nrdn.bv_val);
 552                 if ( ei->bei_parent ) {
 553                         *ptr++ = ',';
 554                         *nptr++ = ',';
 555                 }
 556         }
 557         *ptr = '\0';
 558         *nptr = '\0';
 559
 560         return 0;
 561 }
 562
 563 /* We add two elements to the DN2ID database - a data item under the parent's
 564  * entryID containing the child's RDN and entryID, and an item under the
 565  * child's entryID containing the parent's entryID.
 566  */
 567 int
 568 bdb_dn2id_add(
 569         BackendDB       *be,
 570         DB_TXN *txn,
 571         EntryInfo       *eip,
 572         Entry           *e,
 573         void *ctx )
 574 {
 575         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 576         DB *db = bdb->bi_dn2id->bdi_db;
 577         DBT             key, data;
 578         int             rc, rlen, nrlen;
 579         diskNode *d;
 580         char *ptr;
 581
 582         nrlen = dn_rdnlen( be, &e->e_nname );
 583         if (nrlen) {
 584                 rlen = dn_rdnlen( be, &e->e_name );
 585         } else {
 586                 nrlen = e->e_nname.bv_len;
 587                 rlen = e->e_name.bv_len;
 588         }
 589
 590         d = sl_malloc(sizeof(diskNode) + rlen + nrlen, ctx);
 591         d->entryID = e->e_id;
 592         d->nrdnlen = nrlen;
 593         ptr = lutil_strncopy( d->nrdn, e->e_nname.bv_val, nrlen );
 594         *ptr++ = '\0';
 595         ptr = lutil_strncopy( ptr, e->e_name.bv_val, rlen );
 596         *ptr = '\0';
 597
 598         DBTzero(&key);
 599         DBTzero(&data);
 600         key.data = &eip->bei_id;
 601         key.size = sizeof(ID);
 602         key.flags = DB_DBT_USERMEM;
 603
 604 #ifdef SLAP_IDL_CACHE
 605         if ( bdb->bi_idl_cache_size ) {
 606                 bdb_idl_cache_del( bdb, db, &key );
 607         }
 608 #endif
 609         data.data = d;
 610         data.size = sizeof(diskNode) + rlen + nrlen + 2;
 611         data.flags = DB_DBT_USERMEM;
 612
 613         rc = db->put( db, txn, &key, &data, DB_NOOVERWRITE );
 614
 615         if (rc == 0) {
 616                 key.data = &e->e_id;
 617                 d->entryID = eip->bei_id;
 618                 d->nrdnlen = 0;
 619                 d->nrdn[0] = '\0';
 620                 d->rdn[0] = '\0';
 621                 data.size = sizeof(diskNode);
 622
 623                 rc = db->put( db, txn, &key, &data, DB_NOOVERWRITE );
 624         }
 625
 626         sl_free( d, ctx );
 627
 628         return rc;
 629 }
 630
 631 int
 632 bdb_dn2id_delete(
 633         BackendDB       *be,
 634         DB_TXN *txn,
 635         EntryInfo       *eip,
 636         Entry   *e,
 637         void    *ctx )
 638 {
 639         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 640         DB *db = bdb->bi_dn2id->bdi_db;
 641         DBT             key, data;
 642         DBC     *cursor;
 643         diskNode *d;
 644         int rc, nrlen;
 645
 646         DBTzero(&key);
 647         key.size = sizeof(ID);
 648         key.ulen = key.size;
 649         key.data = &eip->bei_id;
 650         key.flags = DB_DBT_USERMEM;
 651
 652         DBTzero(&data);
 653         data.size = sizeof(diskNode) + BEI(e)->nrdn.bv_len;
 654         d = sl_malloc( data.size, ctx );
 655         d->entryID = e->e_id;
 656         d->nrdnlen = BEI(e)->nrdn.bv_len;
 657         strcpy( d->nrdn, BEI(e)->nrdn.bv_val );
 658         data.data = d;
 659         data.ulen = data.size;
 660         data.dlen = data.size;
 661         data.flags = DB_DBT_USERMEM | DB_DBT_PARTIAL;
 662
 663 #ifdef SLAP_IDL_CACHE
 664         if ( bdb->bi_idl_cache_size ) {
 665                 bdb_idl_cache_del( bdb, db, &key );
 666         }
 667 #endif
 668         rc = db->cursor( db, txn, &cursor, bdb->bi_db_opflags );
 669         if ( rc ) return rc;
 670
 671         rc = cursor->c_get( cursor, &key, &data, DB_GET_BOTH | DB_RMW );
 672         if ( rc == 0 )
 673                 rc = cursor->c_del( cursor, 0 );
 674         cursor->c_close( cursor );
 675
 676         key.data = &e->e_id;
 677         rc = db->del( db, txn, &key, 0);
 678         sl_free( d, ctx );
 679
 680         return rc;
 681 }
 682
 683 int
 684 bdb_dn2id(
 685         BackendDB       *be,
 686         DB_TXN *txn,
 687         struct berval   *in,
 688         EntryInfo       *ei,
 689         void *ctx )
 690 {
 691         struct bdb_info *bdb = (struct bdb_info *) be->be_private;
 692         DB *db = bdb->bi_dn2id->bdi_db;
 693         DBT             key, data;
 694         DBC     *cursor;
 695         int             rc = 0, nrlen;
 696         char    *ptr;
 697
 698         nrlen = dn_rdnlen( be, &in );
 699         if (!nrlen) nrlen = in->bv_len;
 700
 701         DBTzero(&key);
 702         key.size = sizeof(ID);
 703         key.data = &eip->bei_id;
 704         key.flags = DB_DBT_USERMEM;
 705
 706         DBTzero(&data);
 707         data.size = sizeof(diskNode) + nrlen;
 708         d = sl_malloc( data.size * 3, ctx );
 709         d->nrdnlen = nrlen;
 710         ptr = lutil_strncopy( d->nrdn, BEI(e)->nrdn.bv_val, nrlen );
 711         *ptr = '\0';
 712         data.data = d;
 713         data.ulen = data.size * 3;
 714         data.flags = DB_DBT_USERMEM;
 715
 716         rc = db->cursor( db, txn, &cursor, bdb->bi_db_opflags );
 717         if ( rc ) return rc;
 718
 719         rc = cursor->c_get( cursor, &key, &data, DB_GET_BOTH );
 720         cursor->c_close( cursor );
 721         if ( rc ) return rc;
 722
 723         AC_MEMCPY( &ei->bei_id, &d->entryID, sizeof(ID) );
 724         ei->rdn.bv_len = data.size - sizeof(diskNode) - nrlen;
 725         ptr = d->nrdn + nrlen + 1;
 726         strcpy( ei->rdn.bv_val, ptr );
 727
 728         return rc;
 729 }
 730
 731 int
 732 bdb_dn2id_children(
 733         Operation *op,
 734         DB_TXN *txn,
 735         Entry *e )
 736 {
 737         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
 738         DB *db = bdb->bi_dn2id->bdi_db;
 739         DBT             key, data;
 740         DBC             *cursor;
 741         int             rc;
 742         ID              id;
 743         diskNode d;
 744
 745         DBTzero(&key);
 746         key.size = sizeof(ID);
 747         key.data = &e->e_id;
 748         key.flags = DB_DBT_USERMEM;
 749
 750 #ifdef SLAP_IDL_CACHE
 751         if ( bdb->bi_idl_cache_size ) {
 752                 rc = bdb_idl_cache_get( bdb, db, &key, NULL );
 753                 if ( rc != LDAP_NO_SUCH_OBJECT ) {
 754                         sl_free( key.data, o->o_tmpmemctx );
 755                         return rc;
 756                 }
 757         }
 758 #endif
 759         DBTzero(&data);
 760         data.ulen = sizeof(d);
 761         data.flags = DB_DBT_USERMEM | DB_DBT_PARTIAL;
 762         data.dlen = sizeof(d);
 763
 764         rc = db->cursor( db, txn, &cursor, bdb->bi_db_opflags );
 765         if ( rc ) return rc;
 766
 767         rc = cursor->c_get( cursor, &key, &data, DB_FIRST );
 768         if ( rc == 0 ) {
 769                 rc = cursor->c_get( cursor, &key, &data, DB_NEXT_DUP );
 770         }
 771         cursor->c_close( cursor );
 772         return rc;
 773 }
 774
 775 struct dn2id_cookie {
 776         struct bdb_info *bdb;
 777         DB *db;
 778         int prefix;
 779         int rc;
 780         ID id;
 781         ID dbuf;
 782         ID *ids;
 783         ID tmp[BDB_IDL_DB_SIZE];
 784         ID buf[BDB_IDL_UM_SIZE];
 785         DBT key;
 786         DBT data;
 787         DBC dbc;
 788         void *ptr;
 789         void *ctx;
 790 };
 791
 792 /* We can't just use bdb_idl_fetch_key because
 793  * 1 - our data items are longer than just an entry ID
 794  * 2 - our data items are sorted alphabetically by nrdn, not by ID.
 795  */
 796 int
 797 bdb_dn2idl_internal(
 798         struct dn2id_cookie *cx
 799 )
 800 {
 801         ID *save, *i;
 802
 803 #ifdef SLAP_IDL_CACHE
 804         if ( cx->bdb->bi_idl_cache_size ) {
 805                 cx->rc = bdb_idl_cache_get(cx->bdb, cx->db, &cx->key, cx->tmp);
 806                 if ( cx->rc == DB_NOTFOUND ) {
 807                         return cx->rc;
 808                 }
 809                 if ( cx->rc == LDAP_SUCCESS ) {
 810                         readit = 0;
 811                 }
 812         }
 813 #endif
 814
 815         cx->data.data = &cx->dbuf;
 816         cx->data.ulen = sizeof(ID);
 817         cx->data.dlen = sizeof(ID);
 818         cx->data.flags = DB_DBT_USERMEM | DB_DBT_PARTIAL;
 819
 820         cx->rc = db->cursor( cx->db, NULL, &cx->dbc, cx->bdb->bi_db_opflags );
 821         if ( cx->rc ) return cx->rc;
 822         BDB_IDL_ZERO( cx->tmp );
 823
 824         cx->rc = dbc->c_get( dbc, &cx->key, &cx->data, DB_FIRST );
 825         cx->data.data = &cx->buf;
 826         cx->data.ulen = sizeof(cx->buf);
 827         while ( cx->rc == 0 ) {
 828                 u_int8_t *j;
 829                 size_t len;
 830                 cx->rc = dbc->c_get( dbc, &cx->key, &cx->data, DB_MULTIPLE |
 831                         DB_NEXT_DUP );
 832                 DB_MULTIPLE_INIT( cx->ptr, &cx->data );
 833                 while (cx->ptr) {
 834                         DB_MULTIPLE_NEXT( cx->ptr, &cx->data, j, len );
 835                         if (j) {
 836                                 AC_MEMCPY( &cx->dbuf, j, sizeof(ID) );
 837                                 bdb_idl_insert( cx->tmp, cx->dbuf );
 838                         }
 839                 }
 840         }
 841         dbc->c_close( dbc );
 842
 843 }
 844
 845 int
 846 bdb_dn2idl(
 847         BackendDB       *be,
 848         struct berval   *dn,
 849         int prefix,
 850         ID *ids,
 851         void *ctx )
 852 {
 853         struct dn2id_cookie cx;
 854
 855         cx.id = *(ID *)dn;
 856
 857         cx.bdb = (struct bdb_info *)be->be_private;
 858         cx.db = cx.bdb->bi_dn2id->bdi_db;
 859         cx.prefix = prefix;
 860         cx.ids = ids;
 861         cx.ctx = ctx;
 862
 863         DBTzero(&cx.key);
 864         cx.key.data = &cx.id;
 865         cx.key.size = sizeof(ID);
 866         cx.key.flags = DB_DBT_USERMEM;
 867         DBTzero(&cx.data);
 868
 869         return bdb_dn2idl_internal(&cx);
 870 }
 871 #endif  /* BDB_HIER */