/*
  Copyright (C) 2000-2005 SKYRIX Software AG

  This file is part of OpenGroupware.org.

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

  OGo 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 Lesser General Public
  License for more details.

  You should have received a copy of the GNU Lesser General Public
  License along with OGo; see the file COPYING.  If not, write to the
  Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  02111-1307, USA.
*/

#include <LSFoundation/LSDBObjectSetCommand.h>

@interface LSChangeLoginStatusCommand : LSDBObjectSetCommand
{
  BOOL loginStatus;
}

@end

#include <GDLAccess/EOEntity+Factory.h>
#include "common.h"

@implementation LSChangeLoginStatusCommand

- (id)_produceEmptyEOWithPrimaryKey:(NSDictionary *)_pkey
  entity:(EOEntity *)_entity 
{
  id obj;

  obj = [_entity produceNewObjectWithPrimaryKey:_pkey];
  [_entity setAttributesOfObjectToEONull:obj];

  return obj;
}

/* create new Primary Key */

- (NSDictionary *)_newPrimaryKeyDictForContext:(id)_ctx
  keyName:(NSString *)_name{
  id                     key   = nil;
  id<NSObject,LSCommand> nkCmd = LSLookupCommand(@"system", @"newkey");

  [nkCmd takeValue:[self entity] forKey:@"entity"];
  key = [nkCmd runInContext:_ctx];
  [self assert:(key != nil) reason:@"Could not get valid new primary key!\n"];
  return [NSDictionary dictionaryWithObject:key forKey:_name];
}

- (void)_newStaffInContext:(LSCommandContext *)_context {
  BOOL         isOk;
  id           account;
  NSNumber     *pkey;
  EOEntity     *staffEntity;
  id           staff;
  NSDictionary *pk;

  account     = [self object];
  pkey        = [account valueForKey:[self primaryKeyName]];
  staffEntity = [[self databaseModel] entityNamed:@"Staff"];
  
  pk    = [self _newPrimaryKeyDictForContext:_context keyName:@"staffId"];
  staff = [self _produceEmptyEOWithPrimaryKey:pk entity:staffEntity];
  
  [staff takeValue:[pk valueForKey:@"staffId"]          forKey:@"staffId"];
  [staff takeValue:pkey                                 forKey:@"companyId"];
  [staff takeValue:[account valueForKey:@"login"]       forKey:@"login"];
  [staff takeValue:[NSNumber numberWithBool:YES]        forKey:@"isAccount"];
  [staff takeValue:[NSNumber numberWithBool:NO]         forKey:@"isTeam"];
  [staff takeValue:@"inserted"                          forKey:@"dbStatus"];
  [staff takeValue:[account valueForKey:@"description"] forKey:@"description"];

  isOk = [[self databaseChannel] insertObject:staff];

  [LSDBObjectCommandException raiseOnFail:isOk object:self
                              reason:[dbMessages description]];
}

- (void)_setStaffInContext:(LSCommandContext *)_context {
  id staff;
  id account;
  
  account = [self object];
  [self assert:(account != nil) reason:@"no account object for staff update"];

  if ((staff = [[account valueForKey:@"toStaff"] lastObject]) == nil) {
    [self _newStaffInContext:_context];
  } 
  else {
    [staff takeValue:[account valueForKey:@"login"]       forKey:@"login"];
    [staff takeValue:[account valueForKey:@"password"]    forKey:@"password"];
    [staff takeValue:[account valueForKey:@"description"]
           forKey:@"description"];
    [staff takeValue:[NSNumber numberWithBool:YES]        forKey:@"isAccount"];
    [staff takeValue:[NSNumber numberWithBool:NO]         forKey:@"isTeam"];
    [staff takeValue:@"updated"                           forKey:@"dbStatus"];

    [self assert:[[self databaseChannel] updateObject:staff]];
  }
}

- (BOOL)isRootId:(NSNumber *)_pkey inContext:(LSCommandContext *)_ctx {
  return [_pkey intValue] == 10000 ? YES : NO; // ROOT
}

- (void)_prepareForExecutionInContext:(id)_context {
  NSString *prefix;
  id obj;
  id user;
  
  obj  = [self object];
  user = [_context valueForKey:LSAccountKey];

  [self assert:
          [self isRootId:[user valueForKey:@"companyId"] inContext:_context]
        reason: @"Only root can change login status!"];
  
  prefix = [NSString stringWithFormat:@"OGo%@",[obj valueForKey:@"companyId"]];
  
  if (self->loginStatus) {
    NSString *login;
    
    login = [obj valueForKey:@"login"];
    if ([login hasPrefix:prefix] && [login length] > [prefix length]) {
      [obj takeValue:[login substringFromIndex:[prefix length]]
           forKey:@"login"];
    }
    [obj takeValue:[NSNumber numberWithBool:YES] forKey:@"isIntraAccount"];
    [obj takeValue:[NSNumber numberWithBool:NO]  forKey:@"isExtraAccount"];
    [obj takeValue:[NSNumber numberWithBool:NO]  forKey:@"isLocked"];
    [obj takeValue:[NSNumber numberWithBool:YES] forKey:@"isAccount"];
  }
  else {
    NSString *s;
    
    s = [obj valueForKey:@"login"];
    if (![s hasPrefix:prefix]) {
      s = [NSString stringWithFormat:@"%@%@", prefix, s];
      [obj takeValue:s forKey:@"login"];
    }
    [obj takeValue:[NSNumber numberWithBool:NO]  forKey:@"isIntraAccount"];
    [obj takeValue:[NSNumber numberWithBool:NO]  forKey:@"isExtraAccount"];
    [obj takeValue:[NSNumber numberWithBool:NO]  forKey:@"isAccount"];
    [obj takeValue:[NSNumber numberWithBool:YES] forKey:@"isLocked"];
  }

  [super _prepareForExecutionInContext:_context];
}

- (void)_executeInContext:(id)_context {
  [super _executeInContext:_context];
  
  [self _setStaffInContext:_context];
  
  if (self->loginStatus) {
    LSRunCommandV(_context, @"account", @"setgroups",
                  @"member", [self object],
                  @"groups", [NSArray array], nil);
  }
}

/* record initializer */

- (NSString *)entityName {
  return @"Person";
}

/* accessors */

- (void)setLoginStatus:(BOOL)_status {
  self->loginStatus = _status;
}
- (BOOL)loginStatus {
  return self->loginStatus;
}

/* key/value coding */

- (void)takeValue:(id)_value forKey:(NSString *)_key {
  if ([_key isEqualToString:@"loginStatus"]) {
    [self setLoginStatus:[_value boolValue]];
    return;
  }
  
  [super takeValue:_value forKey:_key];
}

- (id)valueForKey:(NSString *)_key {
  if ([_key isEqualToString:@"loginStatus"])
    return [NSNumber numberWithBool:[self loginStatus]];

  return [super valueForKey:_key];
}

@end /* LSChangeLoginStatusCommand */