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         char    *nsuffix = ch_strdup( suffix );
  57         int     rc = 0;
  58
  59         if ( dn_normalize( nsuffix ) != NULL ) {
  60                 if ( select_backend( nsuffix, 0 ) == be ) {
  61                         charray_add( &be->be_replica[nr]->ri_nsuffix, nsuffix );
  62                 } else {
  63                         rc = 1;
  64                 }
  65         } else {
  66                 rc = 2;
  67         }
  68         free( nsuffix );
  69
  70         return( rc );
  71 }
  72
  73 void
  74 replog(
  75     Backend     *be,
  76     Operation *op,
  77     char        *dn,
  78     void        *change
  79 )
  80 {
  81         Modifications   *ml;
  82         Entry   *e;
  83         struct replog_moddn *moddn;
  84         char *tmp;
  85         FILE    *fp, *lfp;
  86         int     len, i;
  87 /* undef NO_LOG_WHEN_NO_REPLICAS */
  88 #ifdef NO_LOG_WHEN_NO_REPLICAS
  89         int     count = 0;
  90 #endif
  91
  92         if ( be->be_replogfile == NULL && replogfile == NULL ) {
  93                 return;
  94         }
  95
  96         ldap_pvt_thread_mutex_lock( &replog_mutex );
  97         if ( (fp = lock_fopen( be->be_replogfile ? be->be_replogfile :
  98             replogfile, "a", &lfp )) == NULL ) {
  99                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 100                 return;
 101         }
 102
 103         tmp = ch_strdup( dn );
 104         if ( dn_normalize( tmp ) == NULL ) {
 105                 /* something has gone really bad */
 106                 ch_free( tmp );
 107
 108                 lock_fclose( fp, lfp );
 109                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 110                 return;
 111         }
 112
 113         for ( i = 0; be->be_replica != NULL && be->be_replica[i] != NULL;
 114             i++ ) {
 115                 /* check if dn's suffix matches legal suffixes, if any */
 116                 if ( be->be_replica[i]->ri_nsuffix != NULL ) {
 117                         int j;
 118
 119                         for ( j = 0; be->be_replica[i]->ri_nsuffix[j]; j++ ) {
 120                                 if ( dn_issuffix( tmp, be->be_replica[i]->ri_nsuffix[j] ) ) {
 121                                         break;
 122                                 }
 123                         }
 124
 125                         if ( !be->be_replica[i]->ri_nsuffix[j] ) {
 126                                 /* do not add "replica:" line */
 127                                 continue;
 128                         }
 129                 }
 130
 131                 fprintf( fp, "replica: %s\n", be->be_replica[i]->ri_host );
 132 #ifdef NO_LOG_WHEN_NO_REPLICAS
 133                 ++count;
 134 #endif
 135         }
 136
 137         ch_free( tmp );
 138 #ifdef NO_LOG_WHEN_NO_REPLICAS
 139         if ( count == 0 ) {
 140                 /* if no replicas matched, drop the log
 141                  * (should we log it anyway?) */
 142                 lock_fclose( fp, lfp );
 143                 ldap_pvt_thread_mutex_unlock( &replog_mutex );
 144
 145                 return;
 146         }
 147 #endif
 148
 149         fprintf( fp, "time: %ld\n", (long) slap_get_time() );
 150         fprintf( fp, "dn: %s\n", dn );
 151
 152         switch ( op->o_tag ) {
 153         case LDAP_REQ_EXTENDED:
 154                 /* quick hack for extended operations */
 155                 /* assume change parameter is a Modfications* */
 156                 /* fall thru */
 157
 158         case LDAP_REQ_MODIFY:
 159                 fprintf( fp, "changetype: modify\n" );
 160                 ml = change;
 161                 for ( ; ml != NULL; ml = ml->sml_next ) {
 162                         char *type;
 163                         type = ml->sml_desc->ad_cname.bv_val;
 164                         switch ( ml->sml_op ) {
 165                         case LDAP_MOD_ADD:
 166                                 fprintf( fp, "add: %s\n", type );
 167                                 break;
 168
 169                         case LDAP_MOD_DELETE:
 170                                 fprintf( fp, "delete: %s\n", type );
 171                                 break;
 172
 173                         case LDAP_MOD_REPLACE:
 174                                 fprintf( fp, "replace: %s\n", type );
 175                                 break;
 176                         }
 177
 178                         for ( i = 0; ml->sml_bvalues != NULL &&
 179                             ml->sml_bvalues[i] != NULL; i++ ) {
 180                                 char    *buf, *bufp;
 181
 182                                 len = strlen( type );
 183                                 len = LDIF_SIZE_NEEDED( len,
 184                                     ml->sml_bvalues[i]->bv_len ) + 1;
 185                                 buf = (char *) ch_malloc( len );
 186
 187                                 bufp = buf;
 188                                 ldif_sput( &bufp, LDIF_PUT_VALUE,
 189                                         type,
 190                                     ml->sml_bvalues[i]->bv_val,
 191                                     ml->sml_bvalues[i]->bv_len );
 192                                 *bufp = '\0';
 193
 194                                 fputs( buf, fp );
 195
 196                                 free( buf );
 197                         }
 198                         fprintf( fp, "-\n" );
 199                 }
 200                 break;
 201
 202         case LDAP_REQ_ADD:
 203                 e = change;
 204                 fprintf( fp, "changetype: add\n" );
 205                 ldap_pvt_thread_mutex_lock( &entry2str_mutex );
 206                 tmp = entry2str( e, &len );
 207                 while ( (tmp = strchr( tmp, '\n' )) != NULL ) {
 208                         tmp++;
 209                         if ( ! isspace( (unsigned char) *tmp ) )
 210                                 break;
 211                 }
 212                 fprintf( fp, "%s", tmp );
 213                 ldap_pvt_thread_mutex_unlock( &entry2str_mutex );
 214                 break;
 215
 216         case LDAP_REQ_DELETE:
 217                 fprintf( fp, "changetype: delete\n" );
 218                 break;
 219
 220         case LDAP_REQ_MODRDN:
 221                 moddn = change;
 222                 fprintf( fp, "changetype: modrdn\n" );
 223                 fprintf( fp, "newrdn: %s\n", moddn->newrdn );
 224                 fprintf( fp, "deleteoldrdn: %d\n", moddn->deloldrdn ? 1 : 0 );
 225                 if( moddn->newsup != NULL ) {
 226                         fprintf( fp, "newsuperior: %s\n", moddn->newsup );
 227                 }
 228         }
 229         fprintf( fp, "\n" );
 230
 231         lock_fclose( fp, lfp );
 232         ldap_pvt_thread_mutex_unlock( &replog_mutex );
 233 }