#include "portable.h"
#include <stdio.h>
#include <ac/stdlib.h>
#include <ac/string.h>
#include <ac/signal.h>
#include "slurp.h"
#include "globals.h"
static int ismine LDAP_P(( Ri *, Re * ));
static int isnew LDAP_P(( Ri *, Re * ));
static int
Ri_process(
Ri *ri
)
{
Rq *rq = sglob->rq;
Re *re = NULL, *new_re = NULL;
int rc ;
char *errmsg;
int errfree;
(void) SIGNAL( LDAP_SIGUSR1, do_nothing );
#ifdef SIGPIPE
(void) SIGNAL( SIGPIPE, SIG_IGN );
#endif
if ( ri == NULL ) {
Debug( LDAP_DEBUG_ANY, "Error: Ri_process: ri == NULL!\n", 0, 0, 0 );
return -1;
}
rq->rq_lock( rq );
while ( !sglob->slurpd_shutdown &&
(( re = rq->rq_gethead( rq )) == NULL )) {
if ( sglob->one_shot_mode ) {
rq->rq_unlock( rq );
return 0;
}
ldap_pvt_thread_cond_wait( &rq->rq_more, &rq->rq_mutex );
}
rq->rq_unlock( rq );
while ( !sglob->slurpd_shutdown ) {
if ( re != NULL ) {
if ( !ismine( ri, re )) {
Debug( LDAP_DEBUG_TRACE,
"Replica %s:%d, skip repl record for %s (not mine)\n",
ri->ri_hostname, ri->ri_port, re->re_dn );
} else if ( !isnew( ri, re )) {
Debug( LDAP_DEBUG_TRACE,
"Replica %s:%d, skip repl record for %s (old)\n",
ri->ri_hostname, ri->ri_port, re->re_dn );
} else {
rc = do_ldap( ri, re, &errmsg, &errfree );
switch ( rc ) {
case DO_LDAP_ERR_RETRYABLE:
ldap_pvt_thread_sleep( RETRY_SLEEP_TIME );
Debug( LDAP_DEBUG_ANY,
"Retrying operation for DN %s on replica %s:%d\n",
re->re_dn, ri->ri_hostname, ri->ri_port );
continue;
break;
case DO_LDAP_ERR_FATAL: {
int ld_errno = 0;
ldap_get_option(ri->ri_ldp, LDAP_OPT_ERROR_NUMBER, &ld_errno);
write_reject( ri, re, ld_errno, errmsg );
(void) sglob->st->st_update( sglob->st, ri->ri_stel, re );
(void) sglob->st->st_write( sglob->st );
} break;
default:
(void) sglob->st->st_update( sglob->st, ri->ri_stel, re );
(void) sglob->st->st_write( sglob->st );
break;
}
if ( errfree && errmsg ) {
ch_free( errmsg );
}
}
} else {
Debug( LDAP_DEBUG_ANY, "Error: re is null in Ri_process\n",
0, 0, 0 );
}
rq->rq_lock( rq );
while ( !sglob->slurpd_shutdown &&
((new_re = re->re_getnext( re )) == NULL )) {
if ( sglob->one_shot_mode ) {
rq->rq_unlock( rq );
return 0;
}
ldap_pvt_thread_cond_wait( &rq->rq_more, &rq->rq_mutex );
}
re->re_decrefcnt( re );
re = new_re;
rq->rq_unlock( rq );
if ( sglob->slurpd_shutdown ) {
if ( ri->ri_ldp ) {
ldap_unbind_ext( ri->ri_ldp, NULL, NULL );
ri->ri_ldp = NULL;
}
return 0;
}
}
return 0;
}
static void
Ri_wake(
Ri *ri
)
{
if ( ri == NULL ) {
return;
}
ldap_pvt_thread_kill( ri->ri_tid, LDAP_SIGUSR1 );
}
int
Ri_init(
Ri **ri
)
{
(*ri) = ( Ri * ) calloc( 1, sizeof( Ri ));
if ( *ri == NULL ) {
return -1;
}
(*ri)->ri_process = Ri_process;
(*ri)->ri_wake = Ri_wake;
(*ri)->ri_hostname = NULL;
(*ri)->ri_uri = NULL;
(*ri)->ri_ldp = NULL;
(*ri)->ri_bind_dn = NULL;
(*ri)->ri_password = NULL;
(*ri)->ri_authcId = NULL;
(*ri)->ri_srvtab = NULL;
(*ri)->ri_curr = NULL;
return 0;
}
static int
ismine(
Ri *ri,
Re *re
)
{
Rh *rh;
int i;
if ( ri == NULL || re == NULL || ri->ri_hostname == NULL ||
re->re_replicas == NULL ) {
return 0;
}
rh = re->re_replicas;
for ( i = 0; rh[ i ].rh_hostname != NULL; i++ ) {
if ( !strcmp( rh[ i ].rh_hostname, ri->ri_hostname) &&
rh[ i ].rh_port == ri->ri_port ) {
return 1;
}
}
return 0;
}
static int
isnew(
Ri *ri,
Re *re
)
{
long x;
int ret;
sglob->st->st_lock( sglob->st );
x = re->re_timestamp - ri->ri_stel->last;
if ( x > 0 ) {
ret = 1;
} else if ( x < 0 ) {
ret = 0;
} else {
if ( re->re_seq > ri->ri_stel->seq ) {
ret = 1;
} else {
ret = 0;
}
}
sglob->st->st_unlock( sglob->st );
return ret;
}