/* Implementation for GNU Objective-C version of NSDistributedLock
   Copyright (C) 1997 Free Software Foundation, Inc.

   Written by:  Richard Frith-Macdonald <richard@brainstorm.co.uk>
   Created: November 1997

   This file is part of the GNUstep Base Library.

   This library is free software; you can redistribute it and/or
   modify it under the terms of the GNU Library General Public
   License as published by the Free Software Foundation; either
   version 2 of the License, or (at your option) any later version.

   This library is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   Library General Public License for more details.

   You should have received a copy of the GNU Library General Public
   License along with this library; if not, write to the Free
   Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
   */

#include <config.h>
#include <string.h>
#include <Foundation/NSDistributedLock.h>
#include <Foundation/NSFileManager.h>
#include <Foundation/NSException.h>
#include <Foundation/NSValue.h>
#include <Foundation/NSDebug.h>

#include <fcntl.h>

@implementation NSDistributedLock

+ (NSDistributedLock*)lockWithPath: (NSString*)aPath
{
    return [[[self alloc] initWithPath: aPath] autorelease];
}

- (void)breakLock
{
  NSFileManager	*fileManager;

  fileManager = [NSFileManager defaultManager];
  if ([fileManager removeFileAtPath: lockPath handler: nil] == NO)
    [NSException raise: NSGenericException 
		format: @"Failed to remove lock directory '%@' - %s",
		lockPath, strerror(errno)];
  [lockTime release];
  lockTime = nil;
}

- (void)dealloc
{
  [lockPath release];
  [lockTime release];
  [super dealloc];
}

- (NSDistributedLock*)initWithPath: (NSString*)aPath
{
  NSFileManager	*fileManager;
  NSString	*lockDir;
  BOOL		isDirectory;

  lockPath = [aPath copy];
  lockTime = nil;

  fileManager = [NSFileManager defaultManager];
  lockDir = [lockPath stringByDeletingLastPathComponent];
  if ([fileManager fileExistsAtPath: lockDir isDirectory: &isDirectory] == NO)
    {
      NSLog(@"part of the path to the lock file '%@' is missing\n", lockPath);
      [self dealloc];
      return nil;
    }
  if (isDirectory == NO)
    {
      NSLog(@"part of the path to the lock file '%@' is not a directory\n",
		lockPath);
      [self dealloc];
      return nil;
    }
  if ([fileManager isWritableFileAtPath: lockDir] == NO)
    {
      NSLog(@"parent directory of lock file '%@' is not writable\n", lockPath);
      [self dealloc];
      return nil;
    }
  if ([fileManager isExecutableFileAtPath: lockDir] == NO)
    {
      NSLog(@"parent directory of lock file '%@' is not accessible\n",
		lockPath);
      [self dealloc];
      return nil;
    }
  return self;
}

- (NSDate*)lockDate
{
  NSFileManager	*fileManager;
  NSDictionary	*attributes;

  fileManager = [NSFileManager defaultManager];
  attributes = [fileManager fileAttributesAtPath: lockPath traverseLink: YES];
  return [attributes objectForKey: NSFileModificationDate];
}

- (BOOL)tryLock
{
  NSFileManager		*fileManager;
  NSMutableDictionary	*attributes;

  fileManager = [NSFileManager defaultManager];
  attributes = [NSMutableDictionary dictionaryWithCapacity: 1];
  [attributes setObject: [NSNumber numberWithUnsignedInt: 0755]
		 forKey: NSFilePosixPermissions];
	
  if ([fileManager createDirectoryAtPath: lockPath
			      attributes: attributes] == NO)
    {
      BOOL	dir;

      if ([fileManager fileExistsAtPath: lockPath isDirectory: &dir] == NO)
        [NSException raise: NSGenericException 
		    format: @"Failed to create lock directory '%@' - %s",
		    lockPath, strerror(errno)];
      [lockTime release];
      lockTime = nil;
      return NO;
    }
  else
    {
      NSFileManager	*fileManager;
      NSDictionary	*attributes;

      fileManager = [NSFileManager defaultManager];
      attributes = [fileManager fileAttributesAtPath: lockPath
					traverseLink: YES];
      [lockTime release];
      lockTime = [[attributes objectForKey: NSFileModificationDate] retain];
      return YES;
    }
}

- (void)unlock
{
  NSFileManager	*fileManager;
  NSDictionary	*attributes;

  if (lockTime == nil)
    [NSException raise: NSGenericException format: @"not locked by us"];

  /*
   *	Don't remove the lock if it has already been broken by someone
   *	else and re-created.  Unfortunately, there is a window between
   *	testing and removing, but we do the bset we can.
   */
  fileManager = [NSFileManager defaultManager];
  attributes = [fileManager fileAttributesAtPath: lockPath traverseLink: YES];
  if ([lockTime isEqual: [attributes objectForKey: NSFileModificationDate]])
    {
      if ([fileManager removeFileAtPath: lockPath handler: nil] == NO)
        [NSException raise: NSGenericException
		    format: @"Failed to remove lock directory '%@' - %s",
			lockPath, strerror(errno)];
    }
  else
    NSLog(@"lock '%@' already broken and in use again\n", lockPath);

  [lockTime release];
  lockTime = nil;
}

@end