#include "portable.h"
#include <stdio.h>
#include <ac/param.h>
#include <ac/string.h>
#include <ac/socket.h>
#include <ac/time.h>
#include <ac/unistd.h>
#ifdef HAVE_SYS_FILE_H
#include <sys/file.h>
#endif
#include "slurp.h"
FILE *
lock_fopen(
const char *fname,
const char *type,
FILE **lfp
)
{
FILE *fp;
char buf[MAXPATHLEN];
snprintf( buf, sizeof buf, "%s.lock", fname );
if ( (*lfp = fopen( buf, "w" )) == NULL ) {
#ifdef NEW_LOGGING
LDAP_LOG ( SLURPD, ERR, "lock_fopen: "
"Error: could not open \"%s\"\n", buf, 0, 0 );
#else
Debug( LDAP_DEBUG_ANY,
"Error: could not open \"%s\"\n", buf, 0, 0 );
#endif
return( NULL );
}
ldap_lockf( fileno(*lfp) );
if ( (fp = fopen( fname, type )) == NULL ) {
#ifdef NEW_LOGGING
LDAP_LOG ( SLURPD, ERR, "lock_fopen: "
"Error: could not open \"%s\"\n", fname, 0, 0 );
#else
Debug( LDAP_DEBUG_ANY,
"Error: could not open \"%s\"\n", fname, 0, 0 );
#endif
ldap_unlockf( fileno(*lfp) );
fclose( *lfp );
*lfp = NULL;
return( NULL );
}
return( fp );
}
int
lock_fclose(
FILE *fp,
FILE *lfp
)
{
ldap_unlockf( fileno(lfp) );
fclose( lfp );
return( fclose( fp ) );
}
int
acquire_lock(
const char *file,
FILE **rfp,
FILE **lfp
)
{
if (( *rfp = lock_fopen( file, "r+", lfp )) == NULL ) {
#ifdef NEW_LOGGING
LDAP_LOG ( SLURPD, ERR, "acquire_lock: "
"Error: acquire_lock(%ld): Could not acquire lock on \"%s\"\n",
(long) getpid(), file, 0 );
#else
Debug( LDAP_DEBUG_ANY,
"Error: acquire_lock(%ld): Could not acquire lock on \"%s\"\n",
(long) getpid(), file, 0);
#endif
return( -1 );
}
return( 0 );
}
int
relinquish_lock(
const char *file,
FILE *rfp,
FILE *lfp
)
{
if ( lock_fclose( rfp, lfp ) == EOF ) {
#ifdef NEW_LOGGING
LDAP_LOG ( SLURPD, ERR, "relinguish_lock: "
"Error: relinquish_lock (%ld): Error closing \"%s\"\n",
(long) getpid(), file, 0 );
#else
Debug( LDAP_DEBUG_ANY,
"Error: relinquish_lock (%ld): Error closing \"%s\"\n",
(long) getpid(), file, 0 );
#endif
return( -1 );
}
return( 0 );
}