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

   1 /* repl.c - log modifications for replication purposes */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2002 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     struct berval *dn,
  81     struct berval *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; i++ ) {
 108                 /* check if dn's suffix matches legal suffixes, if any */
 109                 if ( be->be_replica[i]->ri_nsuffix != NULL ) {
 110                         int j;
 111
 112                         for ( j = 0; be->be_replica[i]->ri_nsuffix[j]; j++ ) {
 113                                 if ( dnIsSuffix( ndn, be->be_replica[i]->ri_nsuffix[j] ) ) {
 114                                         break;
 115                                 }
 116                         }
 117
 118                         if ( !be->be_replica[i]->ri_nsuffix[j] ) {
 119                                 /* do not add "replica:" line */
 120                                 continue;
 121                         }
 122                 }
 123
 124                 fprintf( fp, "replica: %s\n", be->be_replica[i]->ri_host );
 125 #ifdef NO_LOG_WHEN_NO_REPLICAS
 126                 ++count;
 127 #endif
 128         }
 129
 130 #ifdef NO_LOG_WHEN_NO_REPLICAS
 131         if ( count == 0 ) {
 132                 /* if no replicas matched, drop the log
 133                  * (should we log it anyway?) */
 134                 lock_fclose( fp, lfp );
 135                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 136
 137                 return;
 138         }
 139 #endif
 140
 141         fprintf( fp, "time: %ld\n", (long) slap_get_time() );
 142         fprintf( fp, "dn: %s\n", dn->bv_val );
 143
 144         switch ( op->o_tag ) {
 145         case LDAP_REQ_EXTENDED:
 146                 /* quick hack for extended operations */
 147                 /* assume change parameter is a Modfications* */
 148                 /* fall thru */
 149
 150         case LDAP_REQ_MODIFY:
 151                 fprintf( fp, "changetype: modify\n" );
 152                 ml = change;
 153                 for ( ; ml != NULL; ml = ml->sml_next ) {
 154                         char *type;
 155                         struct berval *bv;
 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 ( bv = ml->sml_bvalues; bv && bv->bv_val; bv++ )
 172                         {
 173                                 char    *buf, *bufp;
 174
 175                                 len = ml->sml_desc->ad_cname.bv_len;
 176                                 len = LDIF_SIZE_NEEDED( len,
 177                                     bv->bv_len ) + 1;
 178                                 buf = (char *) ch_malloc( len );
 179
 180                                 bufp = buf;
 181                                 ldif_sput( &bufp, LDIF_PUT_VALUE, type,
 182                                     bv->bv_val, bv->bv_len );
 183                                 *bufp = '\0';
 184
 185                                 fputs( buf, fp );
 186
 187                                 free( buf );
 188                         }
 189                         fprintf( fp, "-\n" );
 190                 }
 191                 break;
 192
 193         case LDAP_REQ_ADD:
 194                 e = change;
 195                 fprintf( fp, "changetype: add\n" );
 196                 ldap_pvt_thread_mutex_lock( &entry2str_mutex );
 197                 tmp = entry2str( e, &len );
 198                 while ( (tmp = strchr( tmp, '\n' )) != NULL ) {
 199                         tmp++;
 200                         if ( ! isspace( (unsigned char) *tmp ) )
 201                                 break;
 202                 }
 203                 fprintf( fp, "%s", tmp );
 204                 ldap_pvt_thread_mutex_unlock( &entry2str_mutex );
 205                 break;
 206
 207         case LDAP_REQ_DELETE:
 208                 fprintf( fp, "changetype: delete\n" );
 209                 break;
 210
 211         case LDAP_REQ_MODRDN:
 212                 moddn = change;
 213                 fprintf( fp, "changetype: modrdn\n" );
 214                 fprintf( fp, "newrdn: %s\n", moddn->newrdn->bv_val );
 215                 fprintf( fp, "deleteoldrdn: %d\n", moddn->deloldrdn ? 1 : 0 );
 216                 if( moddn->newsup != NULL ) {
 217                         fprintf( fp, "newsuperior: %s\n", moddn->newsup->bv_val );
 218                 }
 219         }
 220         fprintf( fp, "\n" );
 221
 222         lock_fclose( fp, lfp );
 223         ldap_pvt_thread_mutex_unlock( &replog_mutex );
 224 }