git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/id2entry.c

   1 /* id2entry.c - routines to deal with the id2entry index */
   2 /*
   3  * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6
   7 #include "portable.h"
   8
   9 #include <stdio.h>
  10
  11 #include <ac/socket.h>
  12
  13 #include "slap.h"
  14 #include "back-ldbm.h"
  15
  16 /*
  17  * This routine adds (or updates) an entry on disk.
  18  * The cache should already be updated.
  19  */
  20
  21 int
  22 id2entry_add( Backend *be, Entry *e )
  23 {
  24         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
  25         DBCache *db;
  26         Datum           key, data;
  27         int             len, rc, flags;
  28
  29         ldbm_datum_init( key );
  30         ldbm_datum_init( data );
  31
  32         Debug( LDAP_DEBUG_TRACE, "=> id2entry_add( %ld, \"%s\" )\n", e->e_id,
  33             e->e_dn, 0 );
  34
  35         if ( (db = ldbm_cache_open( be, "id2entry", LDBM_SUFFIX, LDBM_WRCREAT ))
  36             == NULL ) {
  37                 Debug( LDAP_DEBUG_ANY, "Could not open/create id2entry%s\n",
  38                     LDBM_SUFFIX, 0, 0 );
  39                 return( -1 );
  40         }
  41
  42         key.dptr = (char *) &e->e_id;
  43         key.dsize = sizeof(ID);
  44
  45         ldap_pvt_thread_mutex_lock( &entry2str_mutex );
  46         data.dptr = entry2str( e, &len );
  47         data.dsize = len + 1;
  48
  49         /* store it */
  50         flags = LDBM_REPLACE;
  51         if ( li->li_dbcachewsync ) flags |= LDBM_SYNC;
  52         rc = ldbm_cache_store( db, key, data, flags );
  53
  54         ldap_pvt_thread_mutex_unlock( &entry2str_mutex );
  55
  56         ldbm_cache_close( be, db );
  57
  58         Debug( LDAP_DEBUG_TRACE, "<= id2entry_add %d\n", rc, 0, 0 );
  59
  60         return( rc );
  61 }
  62
  63 int
  64 id2entry_delete( Backend *be, Entry *e )
  65 {
  66         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
  67         DBCache *db;
  68         Datum           key;
  69         int             rc;
  70
  71         Debug(LDAP_DEBUG_TRACE, "=> id2entry_delete( %ld, \"%s\" )\n", e->e_id,
  72             e->e_dn, 0 );
  73
  74 #ifdef notdef
  75 #ifdef LDAP_DEBUG
  76         /* check for writer lock */
  77         assert(ldap_pvt_thread_rdwr_writers(&e->e_rdwr) == 1);
  78 #endif
  79 #endif
  80
  81         ldbm_datum_init( key );
  82
  83         if ( (db = ldbm_cache_open( be, "id2entry", LDBM_SUFFIX, LDBM_WRCREAT ))
  84                 == NULL ) {
  85                 Debug( LDAP_DEBUG_ANY, "Could not open/create id2entry%s\n",
  86                     LDBM_SUFFIX, 0, 0 );
  87                 return( -1 );
  88         }
  89
  90         if ( cache_delete_entry( &li->li_cache, e ) != 0 ) {
  91                 Debug(LDAP_DEBUG_ANY, "could not delete %ld (%s) from cache\n",
  92                     e->e_id, e->e_dn, 0 );
  93         }
  94
  95         key.dptr = (char *) &e->e_id;
  96         key.dsize = sizeof(ID);
  97
  98         rc = ldbm_cache_delete( db, key );
  99
 100         ldbm_cache_close( be, db );
 101
 102         Debug( LDAP_DEBUG_TRACE, "<= id2entry_delete %d\n", rc, 0, 0 );
 103         return( rc );
 104 }
 105
 106 /* returns entry with reader/writer lock */
 107 Entry *
 108 id2entry_rw( Backend *be, ID id, int rw )
 109 {
 110         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
 111         DBCache *db;
 112         Datum           key, data;
 113         Entry           *e;
 114
 115         ldbm_datum_init( key );
 116         ldbm_datum_init( data );
 117
 118         Debug( LDAP_DEBUG_TRACE, "=> id2entry_%s( %ld )\n",
 119                 rw ? "w" : "r", id, 0 );
 120
 121         if ( (e = cache_find_entry_id( &li->li_cache, id, rw )) != NULL ) {
 122                 Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) 0x%lx (cache)\n",
 123                         rw ? "w" : "r", id, (unsigned long) e );
 124                 return( e );
 125         }
 126
 127         if ( (db = ldbm_cache_open( be, "id2entry", LDBM_SUFFIX, LDBM_WRCREAT ))
 128                 == NULL ) {
 129                 Debug( LDAP_DEBUG_ANY, "Could not open id2entry%s\n",
 130                     LDBM_SUFFIX, 0, 0 );
 131                 return( NULL );
 132         }
 133
 134         key.dptr = (char *) &id;
 135         key.dsize = sizeof(ID);
 136
 137         data = ldbm_cache_fetch( db, key );
 138
 139         if ( data.dptr == NULL ) {
 140                 Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) not found\n",
 141                         rw ? "w" : "r", id, 0 );
 142                 ldbm_cache_close( be, db );
 143                 return( NULL );
 144         }
 145
 146         e = str2entry( data.dptr );
 147         ldbm_datum_free( db->dbc_db, data );
 148         ldbm_cache_close( be, db );
 149
 150         if ( e == NULL ) {
 151                 Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) (failed)\n",
 152                         rw ? "w" : "r", id, 0 );
 153                 return( NULL );
 154         }
 155
 156         e->e_id = id;
 157
 158         if( cache_add_entry_rw( &li->li_cache, e, rw ) != 0 ) {
 159                 entry_free( e );
 160
 161                 /* XXX this is a kludge.
 162                  * maybe the entry got added underneath us
 163                  * There are many underlying race condtions in the cache/disk code.
 164                  */
 165                 if ( (e = cache_find_entry_id( &li->li_cache, id, rw )) != NULL ) {
 166                         Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) 0x%lx (cache)\n",
 167                                 rw ? "w" : "r", id, (unsigned long) e );
 168                         return( e );
 169                 }
 170
 171                 Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) (cache add failed)\n",
 172                         rw ? "w" : "r", id, 0 );
 173                 return NULL;
 174         }
 175
 176         Debug( LDAP_DEBUG_TRACE, "<= id2entry_%s( %ld ) 0x%lx (disk)\n",
 177                 rw ? "w" : "r", id, (unsigned long) e );
 178
 179         return( e );
 180 }