/*
* Copyright (c) 2006-2009 Nokia Corporation and/or its subsidiary(-ies).
* All rights reserved.
* This component and the accompanying materials are made available
* under the terms of the License "Eclipse Public License v1.0"
* which accompanies this distribution, and is available
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
*
* Initial Contributors:
* Nokia Corporation - initial contribution.
*
* Contributors:
*
* Description: 
*
*/


#include "tintegrityservicesserver.h"
#include "tintegrityservicesclientserver.h"
#include "integrityservices.h"
#include "log.h"
#include <e32debug.h>


_LIT(KJournalPath, "\\IntegrityServices\\");

using Swi::Test::CIntegrityServicesServer;
using Swi::Test::CIntegrityServicesSession;
using Swi::Test::CShutdownTimer;

static void PanicClient(const RMessagePtr2& aMessage, 
						Swi::Test::TIntegrityServicesServerPanic aPanic)
	{
	aMessage.Panic(Swi::Test::KIntegrityServicesServerName, aPanic);
	}

/////
///// CIntegrityServicesServer
/////

CIntegrityServicesServer* CIntegrityServicesServer::NewLC()
	{
	CIntegrityServicesServer* self = new(ELeave) CIntegrityServicesServer();
	CleanupStack::PushL(self);
	self->ConstructL();
	return self;
	}
	
void CIntegrityServicesServer::AddSession()
	{
	++iSessionCount;
	iShutdown->Cancel();
	}
	
void CIntegrityServicesServer::DropSession()
	{
	if (--iSessionCount==0)
		{
		iShutdown->Start();
		RDebug::Print(_L("Server shutting down"));
		}
	}

CIntegrityServicesServer::~CIntegrityServicesServer()
	{
	delete iShutdown;
	RDebug::Print(_L("Server destructor"));
	}

CIntegrityServicesServer::CIntegrityServicesServer() : CServer2(EPriorityNormal, ESharableSessions)
	{
	}

void CIntegrityServicesServer::ConstructL()
	{
	StartL(Swi::Test::KIntegrityServicesServerName);
	
	iShutdown = CShutdownTimer::NewL();
	
	// Ensure that the server still exits even if the 1st client fails to
	// connect
	iShutdown->Start();
	}

CSession2* CIntegrityServicesServer::NewSessionL(const TVersion& /*aVersion*/, 
						 const RMessage2& /*aMessage*/) const
	{
	  return CIntegrityServicesSession::NewL();
	}

CIntegrityServicesSession* CIntegrityServicesSession::NewL()
	{
	CIntegrityServicesSession* self = CIntegrityServicesSession::NewLC();
	CleanupStack::Pop(self);
	return self;
	}
	
	
CIntegrityServicesSession* CIntegrityServicesSession::NewLC()
	{
	CIntegrityServicesSession* self = new(ELeave) CIntegrityServicesSession();
	CleanupStack::PushL(self);
	self->ConstructL();
	return self;
	}

CIntegrityServicesSession::CIntegrityServicesSession() : CSession2()
	{
	}
	
void CIntegrityServicesSession::ConstructL()
	{
	iIntegrityServices = CDummyIntegrityServices::NewL(0, KJournalPath);
	}
	
void CIntegrityServicesSession::CreateL()
	{
	RDebug::Print(_L("Session CreateL"));
	Server().AddSession();
	}



CIntegrityServicesSession::~CIntegrityServicesSession()
	{
	delete iIntegrityServices;
	Server().DropSession();
	}

CIntegrityServicesServer& CIntegrityServicesSession::Server()
	{
	return *static_cast<CIntegrityServicesServer*>(
		const_cast<CServer2*>(CSession2::Server()));
	}

/////
///// CIntegrityServicesSession		
/////
	
void CIntegrityServicesSession::ServiceL(const RMessage2& aMessage)
	{
	switch (aMessage.Function())
		{
		case EAdd:
			{
			RDebug::Print(_L("ServiceL EAdd"));
			HBufC16* fileName = HBufC16::NewLC(aMessage.GetDesLength(0));
		  	TPtr16 ptr(fileName->Des());
		  	aMessage.Read(0, ptr);

		  	TRAPD(err, iIntegrityServices->AddL(*fileName));

			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(fileName);	
			break;
			}
		case ERemove:
			{
			RDebug::Print(_L("ServiceL ERemove"));
			HBufC16* fileName = HBufC16::NewLC(aMessage.GetDesLength(0));
		  	TPtr16 ptr(fileName->Des());
		  	aMessage.Read(0, ptr);

		  	TRAPD(err, iIntegrityServices->RemoveL(*fileName));

			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(fileName);	
			
			break;
			}
		case ETemporary:
			{
			RDebug::Print(_L("ServiceL ETemporary"));
			HBufC16* fileName = HBufC16::NewLC(aMessage.GetDesLength(0));
		  	TPtr16 ptr(fileName->Des());
		  	aMessage.Read(0, ptr);

		  	TRAPD(err, iIntegrityServices->TemporaryL(*fileName));

			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(fileName);	
			break;
			}
		case ECommit:
			{
			RDebug::Print(_L("ServiceL ECommit"));
			TRAPD(err, iIntegrityServices->CommitL());
			aMessage.Complete(err);
			break;
			}
		case ERollBack:
			{
			RDebug::Print(_L("ServiceL ERollBack"));
			TBool all;
			TPckg<TBool> allTransactions(all);
			aMessage.ReadL(0, allTransactions);
			
			TRAPD(err, iIntegrityServices->RollBackL(all));
			
			aMessage.Complete(err);
			
			break;
			}
			
		case ESetSimulatedFailure:
			{
			HBufC16* aFailType = HBufC16::NewLC(256);
			HBufC16* aPosition = HBufC16::NewLC(256);
			HBufC16* aFailFileName = HBufC16::NewLC(256);
			TPtr16 failType(aFailType->Des());
			TPtr16 position(aPosition->Des());
			TPtr16 failFileName(aFailFileName->Des());
			
			aMessage.ReadL(0, failType);
			aMessage.ReadL(1, position);
			aMessage.ReadL(2, failFileName);
			RDebug::Print(_L("ServiceL ESetSimulatedFailure %S %S %S"), &aFailType, &aPosition, &aFailFileName);
			TRAPD(err, iIntegrityServices->SetSimulatedFailure(failType, position, failFileName));
			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(3, aFailType);
			break;
			}
		case ECreateNewTestFile:
			{
			RDebug::Print(_L("ServiceL ECreateNewTestFile"));
			HBufC16* fileName = HBufC16::NewLC(aMessage.GetDesLength(0));
		  	TPtr16 ptr(fileName->Des());
		  	aMessage.Read(0, ptr);

		  	TRAPD(err, iIntegrityServices->CreateNewTestFileL(*fileName));

			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(fileName);	
			break;
			}
		case ECreateTempTestFile:
			{
			RDebug::Print(_L("ServiceL ECreateTempTestFile"));
			HBufC16* fileName = HBufC16::NewLC(aMessage.GetDesLength(0));
		  	TPtr16 ptr(fileName->Des());
		  	aMessage.Read(0, ptr);

		  	TRAPD(err, iIntegrityServices->CreateTempTestFileL(*fileName));

			aMessage.Complete(err);
			CleanupStack::PopAndDestroy(fileName);	
			break;
			}
	default:
		{
		PanicClient(aMessage, Swi::Test::EPanicIntegrityServicesServerIllegalFunction);
		break;
		}
		}
	}

void CIntegrityServicesSession::ServiceError(const RMessage2& aMessage, TInt aError)
	{
	if (aError==KErrBadDescriptor)
		{
		PanicClient(aMessage, Swi::Test::EPanicIntegrityServicesServerIllegalFunction);
		}
	CSession2::ServiceError(aMessage, aError);
	}

/////
///// CShutdownTimer
/////
inline CShutdownTimer::CShutdownTimer() : CTimer(-1)
	{
	CActiveScheduler::Add(this);
	}

inline void CShutdownTimer::ConstructL()
	{
	CTimer::ConstructL();
	}

inline void CShutdownTimer::Start()
	{
	After(KShutdownDelay);
	}

CShutdownTimer* CShutdownTimer::NewL()
	{
	CShutdownTimer* self = new(ELeave) CShutdownTimer();
	CleanupStack::PushL(self);
	self->ConstructL();
	CleanupStack::Pop(self);
	return self;
	}

// Initiate server exit when the timer expires
void CShutdownTimer::RunL()
	{
	CActiveScheduler::Stop();
	}