openldap/servers/slurpd/replog.c
Hallvard Furuseth f0688d71a1 Locks were not always released, in particular if something went wrong.
Fixed in slurpd and the slapd main dir.  Slapd clients were not examined.
It also "felt right" to swap the order of closing dfp and rfp in slurpd
copy_replog(), so the last acquired lock is unlocked first.
1998-11-11 19:17:25 +00:00

168 lines
3.7 KiB
C

/*
* Copyright (c) 1996 Regents of the University of Michigan.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that this notice is preserved and that due credit is given
* to the University of Michigan at Ann Arbor. The name of the University
* may not be used to endorse or promote products derived from this
* software without specific prior written permission. This software
* is provided ``as is'' without express or implied warranty.
*/
/*
* replog.c - routines which read and write replication log files.
*/
#include "portable.h"
#include <stdio.h>
#include <ac/errno.h>
#include <ac/string.h>
#include <ac/syslog.h>
#include <ac/time.h>
#include <ac/unistd.h>
#include <sys/stat.h>
#include <sys/param.h>
#include <fcntl.h>
#include "slurp.h"
#include "globals.h"
/*
* Externs
*/
extern FILE *lock_fopen LDAP_P(( char *, char *, FILE ** ));
extern char *ch_malloc LDAP_P(( unsigned long ));
/*
* Forward declarations
*/
int file_nonempty LDAP_P(( char * ));
/*
* Forward declarations
*/
static int duplicate_replog( char *, char * );
/*
* Copy the replication log. Returns 0 on success, 1 if a temporary
* error occurs, and -1 if a fatal error occurs.
*/
int
copy_replog(
char *src,
char *dst
)
{
int rc = 0;
FILE *rfp; /* replog fp */
FILE *lfp; /* replog lockfile fp */
FILE *dfp; /* duplicate replog fp */
FILE *dlfp; /* duplicate replog lockfile fp */
static char buf[ MAXPATHLEN ];
static char rbuf[ 1024 ];
char *p;
Debug( LDAP_DEBUG_ARGS,
"copy replog \"%s\" to \"%s\"\n",
src, dst, 0 );
/*
* Make sure the destination directory is writable. If not, exit
* with a fatal error.
*/
strcpy( buf, src );
if (( p = strrchr( buf, '/' )) == NULL ) {
strcpy( buf, "." );
} else {
*p = '\0';
}
if ( access( buf, W_OK ) < 0 ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog (%d): Directory %s is not writable\n",
getpid(), buf, 0 );
return( -1 );
}
strcpy( buf, dst );
if (( p = strrchr( buf, '/' )) == NULL ) {
strcpy( buf, "." );
} else {
*p = '\0';
}
if ( access( buf, W_OK ) < 0 ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog (%d): Directory %s is not writable\n",
getpid(), buf, 0 );
return( -1 );
}
/* lock src */
rfp = lock_fopen( src, "r", &lfp );
if ( rfp == NULL ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog: Can't lock replog \"%s\" for read: %s\n",
src, sys_errlist[ errno ], 0 );
return( 1 );
}
/* lock dst */
dfp = lock_fopen( dst, "a", &dlfp );
if ( dfp == NULL ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog: Can't lock replog \"%s\" for write: %s\n",
src, sys_errlist[ errno ], 0 );
lock_fclose( rfp, lfp );
return( 1 );
}
/*
* Make our own private copy of the replication log.
*/
while (( p = fgets( rbuf, sizeof( buf ), rfp )) != NULL ) {
fputs( rbuf, dfp );
}
/* Only truncate the source file if we're not in one-shot mode */
if ( !sglob->one_shot_mode ) {
/* truncate replication log */
truncate( src, (off_t) 0 );
}
if ( lock_fclose( dfp, dlfp ) == EOF ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog: Error closing \"%s\"\n",
src, 0, 0 );
}
if ( lock_fclose( rfp, lfp ) == EOF ) {
Debug( LDAP_DEBUG_ANY,
"Error: copy_replog: Error closing \"%s\"\n",
src, 0, 0 );
}
return( rc );
}
/*
* Return 1 if the given file exists and has a nonzero size,
* 0 if it is empty or nonexistent.
*/
int
file_nonempty(
char *filename
)
{
static struct stat stbuf;
if ( stat( filename, &stbuf ) < 0 ) {
return( 0 );
} else {
return( stbuf.st_size > (off_t ) 0 );
}
}