git.sur5r.net Git - openldap/blob - servers/slapd/repl.c

   1 /* repl.c - log modifications for replication purposes */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2000 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
  12 #include <ac/string.h>
  13 #include <ac/ctype.h>
  14 #include <ac/socket.h>
  15
  16 #ifdef HAVE_SYS_FILE_H
  17 #include <sys/file.h>
  18 #endif
  19
  20 #include "slap.h"
  21 #include "ldif.h"
  22
  23 int
  24 add_replica_info(
  25     Backend     *be,
  26     const char  *host
  27 )
  28 {
  29         int i = 0;
  30
  31         assert( be );
  32         assert( host );
  33
  34         if ( be->be_replica != NULL ) {
  35                 for ( ; be->be_replica[ i ] != NULL; i++ );
  36         }
  37
  38         be->be_replica = ch_realloc( be->be_replica,
  39                 sizeof( struct slap_replica_info * )*( i + 2 ) );
  40
  41         be->be_replica[ i ]
  42                 = ch_calloc( sizeof( struct slap_replica_info ), 1 );
  43         be->be_replica[ i ]->ri_host = ch_strdup( host );
  44         be->be_replica[ i + 1 ] = NULL;
  45
  46         return( i );
  47 }
  48
  49 int
  50 add_replica_suffix(
  51     Backend     *be,
  52     int         nr,
  53     const char  *suffix
  54 )
  55 {
  56         struct berval dn, *ndn = NULL;
  57         int rc;
  58
  59         dn.bv_val = (char *) suffix;
  60         dn.bv_len = strlen( dn.bv_val );
  61
  62         rc = dnNormalize( NULL, &dn, &ndn );
  63         if( rc != LDAP_SUCCESS ) {
  64                 return 2;
  65         }
  66
  67         if ( select_backend( ndn, 0, 0 ) != be ) {
  68                 ber_bvfree( ndn );
  69                 return 1;
  70         }
  71
  72         ber_bvecadd( &be->be_replica[nr]->ri_nsuffix, ndn );
  73         return 0;
  74 }
  75
  76 void
  77 replog(
  78     Backend     *be,
  79     Operation *op,
  80     char        *dn,
  81     char        *ndn,
  82     void        *change
  83 )
  84 {
  85         Modifications   *ml;
  86         Entry   *e;
  87         struct slap_replog_moddn *moddn;
  88         char *tmp;
  89         FILE    *fp, *lfp;
  90         int     len, i;
  91 /* undef NO_LOG_WHEN_NO_REPLICAS */
  92 #ifdef NO_LOG_WHEN_NO_REPLICAS
  93         int     count = 0;
  94 #endif
  95
  96         if ( be->be_replogfile == NULL && replogfile == NULL ) {
  97                 return;
  98         }
  99
 100         ldap_pvt_thread_mutex_lock( &replog_mutex );
 101         if ( (fp = lock_fopen( be->be_replogfile ? be->be_replogfile :
 102             replogfile, "a", &lfp )) == NULL ) {
 103                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 104                 return;
 105         }
 106
 107         for ( i = 0; be->be_replica != NULL && be->be_replica[i] != NULL;
 108             i++ ) {
 109                 /* check if dn's suffix matches legal suffixes, if any */
 110                 if ( be->be_replica[i]->ri_nsuffix != NULL ) {
 111                         int j;
 112
 113                         for ( j = 0; be->be_replica[i]->ri_nsuffix[j]; j++ ) {
 114                                 if ( dn_issuffix( ndn, be->be_replica[i]->ri_nsuffix[j]->bv_val ) ) {
 115                                         break;
 116                                 }
 117                         }
 118
 119                         if ( !be->be_replica[i]->ri_nsuffix[j] ) {
 120                                 /* do not add "replica:" line */
 121                                 continue;
 122                         }
 123                 }
 124
 125                 fprintf( fp, "replica: %s\n", be->be_replica[i]->ri_host );
 126 #ifdef NO_LOG_WHEN_NO_REPLICAS
 127                 ++count;
 128 #endif
 129         }
 130
 131 #ifdef NO_LOG_WHEN_NO_REPLICAS
 132         if ( count == 0 ) {
 133                 /* if no replicas matched, drop the log
 134                  * (should we log it anyway?) */
 135                 lock_fclose( fp, lfp );
 136                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 137
 138                 return;
 139         }
 140 #endif
 141
 142         fprintf( fp, "time: %ld\n", (long) slap_get_time() );
 143         fprintf( fp, "dn: %s\n", dn );
 144
 145         switch ( op->o_tag ) {
 146         case LDAP_REQ_EXTENDED:
 147                 /* quick hack for extended operations */
 148                 /* assume change parameter is a Modfications* */
 149                 /* fall thru */
 150
 151         case LDAP_REQ_MODIFY:
 152                 fprintf( fp, "changetype: modify\n" );
 153                 ml = change;
 154                 for ( ; ml != NULL; ml = ml->sml_next ) {
 155                         char *type;
 156                         type = ml->sml_desc->ad_cname.bv_val;
 157                         switch ( ml->sml_op ) {
 158                         case LDAP_MOD_ADD:
 159                                 fprintf( fp, "add: %s\n", type );
 160                                 break;
 161
 162                         case LDAP_MOD_DELETE:
 163                                 fprintf( fp, "delete: %s\n", type );
 164                                 break;
 165
 166                         case LDAP_MOD_REPLACE:
 167                                 fprintf( fp, "replace: %s\n", type );
 168                                 break;
 169                         }
 170
 171                         for ( i = 0; ml->sml_bvalues != NULL &&
 172                             ml->sml_bvalues[i] != NULL; i++ ) {
 173                                 char    *buf, *bufp;
 174
 175                                 len = ml->sml_desc->ad_cname.bv_len;
 176                                 len = LDIF_SIZE_NEEDED( len,
 177                                     ml->sml_bvalues[i]->bv_len ) + 1;
 178                                 buf = (char *) ch_malloc( len );
 179
 180                                 bufp = buf;
 181                                 ldif_sput( &bufp, LDIF_PUT_VALUE,
 182                                         type,
 183                                     ml->sml_bvalues[i]->bv_val,
 184                                     ml->sml_bvalues[i]->bv_len );
 185                                 *bufp = '\0';
 186
 187                                 fputs( buf, fp );
 188
 189                                 free( buf );
 190                         }
 191                         fprintf( fp, "-\n" );
 192                 }
 193                 break;
 194
 195         case LDAP_REQ_ADD:
 196                 e = change;
 197                 fprintf( fp, "changetype: add\n" );
 198                 ldap_pvt_thread_mutex_lock( &entry2str_mutex );
 199                 tmp = entry2str( e, &len );
 200                 while ( (tmp = strchr( tmp, '\n' )) != NULL ) {
 201                         tmp++;
 202                         if ( ! isspace( (unsigned char) *tmp ) )
 203                                 break;
 204                 }
 205                 fprintf( fp, "%s", tmp );
 206                 ldap_pvt_thread_mutex_unlock( &entry2str_mutex );
 207                 break;
 208
 209         case LDAP_REQ_DELETE:
 210                 fprintf( fp, "changetype: delete\n" );
 211                 break;
 212
 213         case LDAP_REQ_MODRDN:
 214                 moddn = change;
 215                 fprintf( fp, "changetype: modrdn\n" );
 216                 fprintf( fp, "newrdn: %s\n", moddn->newrdn );
 217                 fprintf( fp, "deleteoldrdn: %d\n", moddn->deloldrdn ? 1 : 0 );
 218                 if( moddn->newsup != NULL ) {
 219                         fprintf( fp, "newsuperior: %s\n", moddn->newsup->bv_val );
 220                 }
 221         }
 222         fprintf( fp, "\n" );
 223
 224         lock_fclose( fp, lfp );
 225         ldap_pvt_thread_mutex_unlock( &replog_mutex );
 226 }