3 * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
4 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
7 * Copyright (c) 1996 Regents of the University of Michigan.
10 * Redistribution and use in source and binary forms are permitted
11 * provided that this notice is preserved and that due credit is given
12 * to the University of Michigan at Ann Arbor. The name of the University
13 * may not be used to endorse or promote products derived from this
14 * software without specific prior written permission. This software
15 * is provided ``as is'' without express or implied warranty.
19 * rq.c - routines used to manage the queue of replication entries.
20 * An Rq (Replication queue) struct contains a linked list of Re
21 * (Replication entry) structures.
23 * Routines wishing to access the replication queue should do so through
24 * the Rq struct's member functions, e.g. rq->rq_gethead() and friends.
25 * For example, Re structs should be added to the queue by calling
26 * the rq_add() member function.
28 * Access to the queue is serialized by a mutex. Member functions which do
29 * not do their own locking should only be called after locking the queue
30 * using the rq_lock() member function. The queue should be unlocked with
31 * the rq_unlock() member function.
33 * Note that some member functions handle their own locking internally.
34 * Callers should not lock the queue before calling these functions.
35 * See the comment block for each function below.
44 #include <ac/stdlib.h>
45 #include <ac/string.h>
46 #include <ac/unistd.h> /* get ftruncate() */
48 #ifdef HAVE_SYS_TYPES_H
49 #include <sys/types.h>
59 * Lock the replication queue.
66 return( ldap_pvt_thread_mutex_lock( &rq->rq_mutex ));
71 * Unlock the replication queue.
78 return( ldap_pvt_thread_mutex_unlock( &rq->rq_mutex ));
84 * Return the head of the queue. Callers should lock the queue before
85 * calling this routine.
92 return( rq == NULL ? NULL : rq->rq_head );
97 * Return the next item in the queue. Callers should lock the queue before
98 * calling this routine.
108 return( re->re_getnext( re ));
114 * Delete the item at the head of the list. The queue should be locked
115 * by the caller before calling this routine.
129 savedhead = rq->rq_head;
130 if ( savedhead == NULL ) {
134 if ( savedhead->re_getrefcnt( savedhead ) != 0 ) {
136 LDAP_LOG ( SLURPD, WARNING, "Rq_delhead: "
137 "Warning: attempt to delete when refcnt != 0\n", 0, 0, 0 );
139 Debug( LDAP_DEBUG_ANY, "Warning: attempt to delete when refcnt != 0\n",
145 rq->rq_head = rq->rq_head->re_getnext( rq->rq_head );
146 rc = savedhead->re_free( savedhead );
147 rq->rq_nre--; /* decrement count of Re's in queue */
153 * Add an entry to the tail of the replication queue. Locking is handled
154 * internally. When items are added to the queue, this routine wakes
155 * up any threads which are waiting for more work by signaling on the
156 * rq->rq_more condition variable.
170 /* Create a new Re */
171 if ( Re_init( &re ) < 0 ) {
176 /* parse buf and fill in the re struct */
177 if ( re->re_parse( re, buf ) < 0 ) {
183 /* Insert into queue */
184 if ( rq->rq_head == NULL ) {
189 rq->rq_tail->re_next = re;
192 /* set the sequence number */
194 if ( !wasempty && ( rq->rq_tail->re_timestamp == re->re_timestamp )) {
196 * Our new re has the same timestamp as the tail's timestamp.
197 * Increment the seq number in the tail and use it as our seq number.
199 re->re_seq = rq->rq_tail->re_seq + 1;
203 /* Increment count of items in queue */
205 /* wake up any threads waiting for more work */
206 ldap_pvt_thread_cond_broadcast( &rq->rq_more );
208 /* ... and unlock the queue */
216 * Garbage-collect the replication queue. Locking is handled internally.
225 LDAP_LOG ( SLURPD, DETAIL1, "Rq_gc: rq is NULL!\n", 0, 0, 0 );
227 Debug( LDAP_DEBUG_ANY, "Rq_gc: rq is NULL!\n", 0, 0, 0 );
232 while (( rq->rq_head != NULL ) &&
233 ( rq->rq_head->re_getrefcnt( rq->rq_head ) == 0 )) {
234 rq->rq_delhead( rq );
235 rq->rq_ndel++; /* increment count of deleted entries */
243 * For debugging: dump the contents of the replication queue to a file.
244 * Locking is handled internally.
257 LDAP_LOG ( SLURPD, ARGS, "Rq_dump: rq is NULL!\n", 0, 0, 0 );
259 Debug( LDAP_DEBUG_ANY, "Rq_dump: rq is NULL!\n", 0, 0, 0 );
264 if (unlink(SLURPD_DUMPFILE) == -1 && errno != ENOENT) {
266 LDAP_LOG ( SLURPD, ERR, "Rq_dump: "
267 "\"%s\" exists, cannot unlink\n", SLURPD_DUMPFILE, 0, 0 );
269 Debug( LDAP_DEBUG_ANY, "Rq_dump: \"%s\" exists, and cannot unlink\n",
270 SLURPD_DUMPFILE, 0, 0 );
274 if (( tmpfd = open(SLURPD_DUMPFILE, O_CREAT|O_RDWR|O_EXCL, 0600)) == -1) {
276 LDAP_LOG ( SLURPD, ERR, "Rq_dump: "
277 "cannot open \"%s\" for write\n", SLURPD_DUMPFILE, 0, 0 );
279 Debug( LDAP_DEBUG_ANY, "Rq_dump: cannot open \"%s\" for write\n",
280 SLURPD_DUMPFILE, 0, 0 );
284 if (( fp = fdopen( tmpfd, "w" )) == NULL ) {
286 LDAP_LOG ( SLURPD, ERR, "Rq_dump: "
287 "cannot fdopen \"%s\" for write\n", SLURPD_DUMPFILE, 0, 0 );
289 Debug( LDAP_DEBUG_ANY, "Rq_dump: cannot fdopen \"%s\" for write\n",
290 SLURPD_DUMPFILE, 0, 0 );
296 for ( re = rq->rq_gethead( rq ); re != NULL; re = rq->rq_getnext( re )) {
297 re->re_dump( re, fp );
306 * Write the contents of a replication queue to a file. Returns zero if
307 * successful, -1 if not. Handles queue locking internally. Callers should
308 * provide an open file pointer, which should refer to a locked file.
324 LDAP_LOG ( SLURPD, ENTRY, "Rq_write: "
325 "re-write on-disk replication log\n", 0, 0, 0 );
327 Debug( LDAP_DEBUG_ARGS, "re-write on-disk replication log\n",
333 fseek( fp, 0L, SEEK_SET ); /* Go to beginning of file */
336 for ( re = rq->rq_gethead( rq ); re != NULL; re = rq->rq_getnext( re )) {
337 if ( re->re_write( NULL, re, fp ) < 0 ) {
344 sglob->srpos = ftell( fp ); /* update replog file position */
345 /* and truncate to correct len */
346 if ( ftruncate( fileno( fp ), sglob->srpos ) < 0 ) {
348 LDAP_LOG ( SLURPD, ERR, "Rq_write: "
349 "Error truncating replication log: %s\n", sys_errlist[ errno ], 0, 0 );
351 Debug( LDAP_DEBUG_ANY, "Error truncating replication log: %s\n",
352 sys_errlist[ errno ], 0, 0 );
355 rq->rq_ndel = 0; /* reset count of deleted re's */
357 rq->rq_lasttrim = now; /* reset last trim time */
364 * Check to see if the private slurpd replication log needs trimming.
365 * The current criteria are:
366 * - The last trim was more than 5 minutes ago, *and*
367 * - We've finished with at least 50 replication log entries since the
368 * last time we re-wrote the replication log.
370 * Return 1 if replogfile should be trimmed, 0 if not.
371 * Any different policy should be implemented by replacing this function.
389 if ( now > ( rq->rq_lasttrim + TRIMCHECK_INTERVAL )) {
390 rc = ( rq->rq_ndel >= 50 );
400 * Return counts of Re structs in the queue.
416 if ( type == RQ_COUNT_ALL ) {
419 for ( re = rq->rq_gethead( rq ); re != NULL;
420 re = rq->rq_getnext( re )) {
421 if ( type == RQ_COUNT_NZRC ) {
422 if ( re->re_getrefcnt( re ) > 0 ) {
434 * Allocate and initialize an Rq object.
441 /* Instantiate the struct */
442 (*rq) = (Rq *) malloc( sizeof( Rq ));
447 /* Fill in all the function pointers */
448 (*rq)->rq_gethead = Rq_gethead;
449 (*rq)->rq_getnext = Rq_getnext;
450 (*rq)->rq_delhead = Rq_delhead;
451 (*rq)->rq_add = Rq_add;
452 (*rq)->rq_gc = Rq_gc;
453 (*rq)->rq_lock = Rq_lock;
454 (*rq)->rq_unlock = Rq_unlock;
455 (*rq)->rq_dump = Rq_dump;
456 (*rq)->rq_needtrim = Rq_needtrim;
457 (*rq)->rq_write = Rq_write;
458 (*rq)->rq_getcount = Rq_getcount;
460 /* Initialize private data */
461 ldap_pvt_thread_mutex_init( &((*rq)->rq_mutex) );
462 ldap_pvt_thread_cond_init( &((*rq)->rq_more) );
463 (*rq)->rq_head = NULL;
464 (*rq)->rq_tail = NULL;
467 (*rq)->rq_lasttrim = (time_t) 0L;