]> git.sur5r.net Git - openldap/blob - servers/slurpd/ri.c
Shouldn't need to restall signal handler outside of handler.
[openldap] / servers / slurpd / ri.c
1 /*
2  * Copyright (c) 1996 Regents of the University of Michigan.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms are permitted
6  * provided that this notice is preserved and that due credit is given
7  * to the University of Michigan at Ann Arbor. The name of the University
8  * may not be used to endorse or promote products derived from this
9  * software without specific prior written permission. This software
10  * is provided ``as is'' without express or implied warranty.
11  */
12
13 /*
14  * ri.c - routines used to manipulate Ri structures.  An Ri (Replica
15  * information) struct contains all information about one replica
16  * instance.  The Ri struct is defined in slurp.h
17  */
18
19
20 #include "portable.h"
21
22 #include <stdio.h>
23
24 #include <ac/stdlib.h>
25 #include <ac/signal.h>
26
27 #include "slurp.h"
28 #include "globals.h"
29
30
31 /* Forward references */
32 static int ismine LDAP_P(( Ri  *, Re  * ));
33 static int isnew LDAP_P(( Ri  *, Re  * ));
34
35
36 /*
37  * Process any unhandled replication entries in the queue.
38  */
39 static int
40 Ri_process(
41     Ri *ri
42 )
43 {
44     Rq          *rq = sglob->rq;
45     Re          *re, *new_re;
46     int         rc ;
47     char        *errmsg;
48
49     (void) SIGNAL( LDAP_SIGUSR1, do_nothing );
50     (void) SIGNAL( SIGPIPE, SIG_IGN );
51     if ( ri == NULL ) {
52         Debug( LDAP_DEBUG_ANY, "Error: Ri_process: ri == NULL!\n", 0, 0, 0 );
53         return -1;
54     }
55
56     /*
57      * Startup code.  See if there's any work to do.  If not, wait on the
58      * rq->rq_more condition variable.
59      */
60     rq->rq_lock( rq );
61     while ( !sglob->slurpd_shutdown &&
62             (( re = rq->rq_gethead( rq )) == NULL )) {
63         /* No work - wait on condition variable */
64         ldap_pvt_thread_cond_wait( &rq->rq_more, &rq->rq_mutex );
65     }
66
67     /*
68      * When we get here, there's work in the queue, and we have the
69      * queue locked.  re should be pointing to the head of the queue.
70      */
71     rq->rq_unlock( rq );
72     while ( !sglob->slurpd_shutdown ) {
73         if ( re != NULL ) {
74             if ( !ismine( ri, re )) {
75                 /* The Re doesn't list my host:port */
76                 Debug( LDAP_DEBUG_TRACE,
77                         "Replica %s:%d, skip repl record for %s (not mine)\n",
78                         ri->ri_hostname, ri->ri_port, re->re_dn );
79             } else if ( !isnew( ri, re )) {
80                 /* This Re is older than my saved status information */
81                 Debug( LDAP_DEBUG_TRACE,
82                         "Replica %s:%d, skip repl record for %s (old)\n",
83                         ri->ri_hostname, ri->ri_port, re->re_dn );
84             } else {
85                 rc = do_ldap( ri, re, &errmsg );
86                 switch ( rc ) {
87                 case DO_LDAP_ERR_RETRYABLE:
88                     ldap_pvt_thread_sleep( RETRY_SLEEP_TIME );
89                     Debug( LDAP_DEBUG_ANY,
90                             "Retrying operation for DN %s on replica %s:%d\n",
91                             re->re_dn, ri->ri_hostname, ri->ri_port );
92                     continue;
93                     break;
94                 case DO_LDAP_ERR_FATAL: {
95                     /* Non-retryable error.  Write rejection log. */
96                         int ld_errno = 0;
97                         ldap_get_option(ri->ri_ldp, LDAP_OPT_ERROR_NUMBER, &ld_errno);
98                     write_reject( ri, re, ld_errno, errmsg );
99                     /* Update status ... */
100                     (void) sglob->st->st_update( sglob->st, ri->ri_stel, re );
101                     /* ... and write to disk */
102                     (void) sglob->st->st_write( sglob->st );
103                     } break;
104                 default:
105                     /* LDAP op completed ok - update status... */
106                     (void) sglob->st->st_update( sglob->st, ri->ri_stel, re );
107                     /* ... and write to disk */
108                     (void) sglob->st->st_write( sglob->st );
109                     break;
110                 }
111             }
112         } else {
113             Debug( LDAP_DEBUG_ANY, "Error: re is null in Ri_process\n",
114                     0, 0, 0 );
115         }
116         rq->rq_lock( rq );
117         while ( !sglob->slurpd_shutdown &&
118                 ((new_re = re->re_getnext( re )) == NULL )) {
119             if ( sglob->one_shot_mode ) {
120                 rq->rq_unlock( rq );
121                 return 0;
122             }
123             /* No work - wait on condition variable */
124             ldap_pvt_thread_cond_wait( &rq->rq_more, &rq->rq_mutex );
125         }
126         re->re_decrefcnt( re );
127         re = new_re;
128         rq->rq_unlock( rq );
129         if ( sglob->slurpd_shutdown ) {
130             return 0;
131         }
132     }
133     return 0;
134 }
135
136
137 /*
138  * Wake a replication thread which may be sleeping.
139  * Send it a LDAP_SIGUSR1.
140  */
141 static void
142 Ri_wake(
143     Ri *ri
144
145 {
146     if ( ri == NULL ) {
147         return;
148     }
149     ldap_pvt_thread_kill( ri->ri_tid, LDAP_SIGUSR1 );
150 }
151
152
153
154 /* 
155  * Allocate and initialize an Ri struct.
156  */
157 int
158 Ri_init(
159     Ri  **ri
160 )
161 {
162     (*ri) = ( Ri * ) malloc( sizeof( Ri ));
163     if ( *ri == NULL ) {
164         return -1;
165     }
166
167     /* Initialize member functions */
168     (*ri)->ri_process = Ri_process;
169     (*ri)->ri_wake = Ri_wake;
170
171     /* Initialize private data */
172     (*ri)->ri_hostname = NULL;
173     (*ri)->ri_port = 0;
174     (*ri)->ri_ldp = NULL;
175     (*ri)->ri_bind_method = 0;
176     (*ri)->ri_bind_dn = NULL;
177     (*ri)->ri_password = NULL;
178     (*ri)->ri_principal = NULL;
179     (*ri)->ri_srvtab = NULL;
180     (*ri)->ri_curr = NULL;
181
182     return 0;
183 }
184
185
186
187
188 /*
189  * Return 1 if the hostname and port in re match the hostname and port
190  * in ri, otherwise return zero.
191  */
192 static int
193 ismine(
194     Ri  *ri,
195     Re  *re
196 )
197 {
198     Rh  *rh;
199     int i;
200
201     if ( ri == NULL || re == NULL || ri->ri_hostname == NULL ||
202             re->re_replicas == NULL ) {
203         return 0;
204     }
205     rh = re->re_replicas;
206     for ( i = 0; rh[ i ].rh_hostname != NULL; i++ ) {
207         if ( !strcmp( rh[ i ].rh_hostname, ri->ri_hostname) &&
208                 rh[ i ].rh_port == ri->ri_port ) {
209             return 1;
210         }
211     }
212     return 0;
213 }
214
215
216
217
218 /*
219  * Return 1 if the Re's timestamp/seq combination are greater than the
220  * timestamp and seq in the Ri's ri_stel member.  In other words, if we
221  * find replication entries in the log which we've already processed,
222  * don't process them.  If the re is "old," return 0.
223  * No check for NULL pointers is done.
224  */
225 static int
226 isnew(
227     Ri  *ri,
228     Re  *re
229 )
230 {
231     int x;
232     int ret;
233
234     /* Lock the St struct to avoid a race */
235     sglob->st->st_lock( sglob->st );
236     x = strcmp( re->re_timestamp, ri->ri_stel->last );
237     if ( x > 0 ) {
238         /* re timestamp is newer */
239         ret = 1;
240     } else if ( x < 0 ) {
241         ret = 0;
242     } else {
243         /* timestamps were equal */
244         if ( re->re_seq > ri->ri_stel->seq ) {
245             /* re seq is newer */
246             ret = 1;
247         } else {
248             ret = 0;
249         }
250     }
251     sglob->st->st_unlock( sglob->st );
252     return ret;
253 }