external/bsd/openldap/dist/servers/slapd/ctxcsn.c

   1 /* ctxcsn.c -- Context CSN Management Routines */
   2 /* $OpenLDAP: pkg/ldap/servers/slapd/ctxcsn.c,v 1.40.2.6 2008/02/12 00:44:15 quanah Exp $ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 2003-2008 The OpenLDAP Foundation.
   6  * Portions Copyright 2003 IBM Corporation.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted only as authorized by the OpenLDAP
  11  * Public License.
  12  *
  13  * A copy of this license is available in the file LICENSE in the
  14  * top-level directory of the distribution or, alternatively, at
  15  * <http://www.OpenLDAP.org/license.html>.
  16  */
  17
  18 #include "portable.h"
  19
  20 #include <stdio.h>
  21
  22 #include <ac/string.h>
  23 #include <ac/socket.h>
  24
  25 #include "lutil.h"
  26 #include "slap.h"
  27 #include "lutil_ldap.h"
  28
  29 const struct berval slap_ldapsync_bv = BER_BVC("ldapsync");
  30 const struct berval slap_ldapsync_cn_bv = BER_BVC("cn=ldapsync");
  31 int slap_serverID;
  32
  33 void
  34 slap_get_commit_csn(
  35         Operation *op,
  36         struct berval *maxcsn
  37 )
  38 {
  39         struct slap_csn_entry *csne, *committed_csne = NULL;
  40
  41         if ( maxcsn ) {
  42                 BER_BVZERO( maxcsn );
  43         }
  44
  45         ldap_pvt_thread_mutex_lock( op->o_bd->be_pcl_mutexp );
  46
  47         LDAP_TAILQ_FOREACH( csne, op->o_bd->be_pending_csn_list, ce_csn_link ) {
  48                 if ( csne->ce_opid == op->o_opid && csne->ce_connid == op->o_connid ) {
  49                         csne->ce_state = SLAP_CSN_COMMIT;
  50                         break;
  51                 }
  52         }
  53
  54         LDAP_TAILQ_FOREACH( csne, op->o_bd->be_pending_csn_list, ce_csn_link ) {
  55                 if ( csne->ce_state == SLAP_CSN_COMMIT ) committed_csne = csne;
  56                 if ( csne->ce_state == SLAP_CSN_PENDING ) break;
  57         }
  58
  59         if ( committed_csne && maxcsn ) *maxcsn = committed_csne->ce_csn;
  60         ldap_pvt_thread_mutex_unlock( op->o_bd->be_pcl_mutexp );
  61 }
  62
  63 void
  64 slap_rewind_commit_csn( Operation *op )
  65 {
  66         struct slap_csn_entry *csne;
  67
  68         ldap_pvt_thread_mutex_lock( op->o_bd->be_pcl_mutexp );
  69
  70         LDAP_TAILQ_FOREACH( csne, op->o_bd->be_pending_csn_list, ce_csn_link ) {
  71                 if ( csne->ce_opid == op->o_opid && csne->ce_connid == op->o_connid ) {
  72                         csne->ce_state = SLAP_CSN_PENDING;
  73                         break;
  74                 }
  75         }
  76
  77         ldap_pvt_thread_mutex_unlock( op->o_bd->be_pcl_mutexp );
  78 }
  79
  80 void
  81 slap_graduate_commit_csn( Operation *op )
  82 {
  83         struct slap_csn_entry *csne;
  84
  85         if ( op == NULL ) return;
  86         if ( op->o_bd == NULL ) return;
  87
  88 #if 0
  89         /* it is NULL when we get here from the frontendDB;
  90          * alternate fix: initialize frontendDB like all other backends */
  91         assert( op->o_bd->be_pcl_mutexp != NULL );
  92 #endif
  93
  94         if ( op->o_bd->be_pcl_mutexp == NULL ) return;
  95
  96         ldap_pvt_thread_mutex_lock( op->o_bd->be_pcl_mutexp );
  97
  98         LDAP_TAILQ_FOREACH( csne, op->o_bd->be_pending_csn_list, ce_csn_link ) {
  99                 if ( csne->ce_opid == op->o_opid && csne->ce_connid == op->o_connid ) {
 100                         LDAP_TAILQ_REMOVE( op->o_bd->be_pending_csn_list,
 101                                 csne, ce_csn_link );
 102                         Debug( LDAP_DEBUG_SYNC, "slap_graduate_commit_csn: removing %p %s\n",
 103                                 csne->ce_csn.bv_val, csne->ce_csn.bv_val, 0 );
 104                         if ( op->o_csn.bv_val == csne->ce_csn.bv_val ) {
 105                                 BER_BVZERO( &op->o_csn );
 106                         }
 107                         ch_free( csne->ce_csn.bv_val );
 108                         ch_free( csne );
 109                         break;
 110                 }
 111         }
 112
 113         ldap_pvt_thread_mutex_unlock( op->o_bd->be_pcl_mutexp );
 114
 115         return;
 116 }
 117
 118 static struct berval ocbva[] = {
 119         BER_BVC("top"),
 120         BER_BVC("subentry"),
 121         BER_BVC("syncProviderSubentry"),
 122         BER_BVNULL
 123 };
 124
 125 Entry *
 126 slap_create_context_csn_entry(
 127         Backend *be,
 128         struct berval *context_csn )
 129 {
 130         Entry* e;
 131
 132         struct berval bv;
 133
 134         e = entry_alloc();
 135
 136         attr_merge( e, slap_schema.si_ad_objectClass,
 137                 ocbva, NULL );
 138         attr_merge_one( e, slap_schema.si_ad_structuralObjectClass,
 139                 &ocbva[1], NULL );
 140         attr_merge_one( e, slap_schema.si_ad_cn,
 141                 (struct berval *)&slap_ldapsync_bv, NULL );
 142
 143         if ( context_csn ) {
 144                 attr_merge_one( e, slap_schema.si_ad_contextCSN,
 145                         context_csn, NULL );
 146         }
 147
 148         BER_BVSTR( &bv, "{}" );
 149         attr_merge_one( e, slap_schema.si_ad_subtreeSpecification, &bv, NULL );
 150
 151         build_new_dn( &e->e_name, &be->be_nsuffix[0],
 152                 (struct berval *)&slap_ldapsync_cn_bv, NULL );
 153         ber_dupbv( &e->e_nname, &e->e_name );
 154
 155         return e;
 156 }
 157
 158 void
 159 slap_queue_csn(
 160         Operation *op,
 161         struct berval *csn )
 162 {
 163         struct slap_csn_entry *pending;
 164
 165         pending = (struct slap_csn_entry *) ch_calloc( 1,
 166                         sizeof( struct slap_csn_entry ));
 167
 168         Debug( LDAP_DEBUG_SYNC, "slap_queue_csn: queing %p %s\n", csn->bv_val, csn->bv_val, 0 );
 169
 170         ldap_pvt_thread_mutex_lock( op->o_bd->be_pcl_mutexp );
 171
 172         ber_dupbv( &pending->ce_csn, csn );
 173         ber_bvreplace_x( &op->o_csn, &pending->ce_csn, op->o_tmpmemctx );
 174         pending->ce_connid = op->o_connid;
 175         pending->ce_opid = op->o_opid;
 176         pending->ce_state = SLAP_CSN_PENDING;
 177         LDAP_TAILQ_INSERT_TAIL( op->o_bd->be_pending_csn_list,
 178                 pending, ce_csn_link );
 179         ldap_pvt_thread_mutex_unlock( op->o_bd->be_pcl_mutexp );
 180 }
 181
 182 int
 183 slap_get_csn(
 184         Operation *op,
 185         struct berval *csn,
 186         int manage_ctxcsn )
 187 {
 188         if ( csn == NULL ) return LDAP_OTHER;
 189
 190         /* gmtime doesn't always need a mutex, but lutil_csnstr does */
 191         ldap_pvt_thread_mutex_lock( &gmtime_mutex );
 192         csn->bv_len = lutil_csnstr( csn->bv_val, csn->bv_len, slap_serverID, 0 );
 193         ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
 194
 195         if ( manage_ctxcsn )
 196                 slap_queue_csn( op, csn );
 197
 198         return LDAP_SUCCESS;
 199 }