// 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 "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:

//

/**

 @file

 @publishedAll

 @released

*/

#include <test/testexecutelog.h>

#include <cntfldst.h>

#include <e32panic.h>

#include <e32cmn.h>

#include "ClientServer.h"

#include "ContactViewTest.h"

#include "ViewObserver.h"

_LIT(KRun1,"EmptyAll");

_LIT(KRun2,"FullContacts");

_LIT(KRun3,"FullView");

_LIT(KRun4,"FullAll");

_LIT(KRun5,"EmptyFieldset");

_LIT(KRun6,"EmptyFieldsetView");

_LIT(KRun7,"MissingFields");

_LIT(KRun8,"Performance");

_LIT(KRun9,"CompressRecover");

_LIT(KRun10,"ConcurrentCNR");

_LIT(KTest1,"Testing Empty contacts and empty view");

_LIT(KTest2,"Testing Full contacts and empty view");

_LIT(KTest3,"Testing Empty contacts and Full view");

_LIT(KTest4,"Testing Full contacts and Full view");

_LIT(KTest5,"Testing Contacts with empty fieldsets and Full view");

_LIT(KTest6,"Testing Contacts with empty fieldsets and empty view");

_LIT(KTest7,"Testing Contacts with 1 or more empty fields and empty view");

_LIT(KTest8,"***Testing Empty Contacts Views performance***");

_LIT(KTest81,"***Testing Medium Contacts Views performance***");

_LIT(KTest82,"***Testing Full Contacts Views performance***");

_LIT(KTest9,"Compress and recovery test");

_LIT(KTest10,"Concurrent Compress and recovery test");

static const TInt KManyPerfIters = 1;

_LIT(KUfield,"field");

_LIT(KMissingFields, "MissingFields");

_LIT(KPLView, "PLView");

_LIT(KRecover, "Recover_" );

#ifndef __SYMBIAN_CNTMODEL_USE_SQLITE__

_LIT(KContactsDB,"c:\\private\\10003A73\\Contacts.cdb");

#else

_LIT(KContactsDB,"C:\\private\\10003A73\\SQLite__Contacts.cdb");

#endif

_LIT(KPersistenceDB,"c:\\private\\10273EFB\\Contacts.cdb");

#define ALLPRINT( x )	INFO_PRINTF1( x );\

						RDebug::Print( x );

#define ALLPRINT2( x, y )	INFO_PRINTF2( x, y );\

							RDebug::Print( x, y );

#ifdef _WINS

#define KMaxTimeAllowed	500 //seconds, minimum performance

#else

#define KMaxTimeAllowed	10000 //hardware is slower

#endif

_LIT(KStars,"***************");

_LIT(KStartRecover,"StartRecover");

_LIT(KEndRecover,"EndRecover");

_LIT(KStartCompress,"StartCompress");

_LIT(KEndCompress,"EndCompress");

//Number of contacts

CContactViewTest::CContactViewTest(CCntPerfServer &aParent):CCntBaseStep(10,aParent),

															iFullness(EBlank),

															iPerformanceContacts( EFew )

	{

	// Call base class method to set up the human readable name for logging

	SetTestStepName(SharedConstants::KContactViewTest);

	}

void CContactViewTest::PreTestL()

	{

	iSemaphore.CreateLocal( 0 );

	iSemaphore2.CreateLocal( 0 );

	const TDesC &KSection = ConfigSection();

	iPLView = ( KSection.Find( KPLView ) == 0 ); // section has to start with plview

	iRecoverFlag = ( KSection.Find( KRecover ) == 0 );

	}

TVerdict CContactViewTest::doTestStepPostambleL()

	{

	iSemaphore.Close();

	EndRecoverL();

	EndCompressL();

	return CCntBaseStep::doTestStepPostambleL();

	}

void CContactViewTest::CleanupL()

	{

	if( iObserver )

		{

		iObserver->CleanView();

		CLEAR( iObserver );

		}

    CLEAR( iContactsDatabase );

	CLEAR( iContactsDatabase2 );

	if( iPLView )

		{

		CLEAR(iPersistence);

		if( iPimServ )

			{

			iPimServ->DeleteFileL(KPersistenceDB);

			iPimServ->Close();

			CLEAR(iPimServ);

			}

		}

	if( iSortOrder )

		{

		iSortOrder->Close();

		CLEAR(iSortOrder);

		}

	CCntBaseStep::Cleanup();

	}

void CContactViewTest::InitializeL()

	{

	CCntBaseStep::InitializeL();

	if( iPLView )

		{

		iPimServ = new(ELeave) RPIMTestServer();

		User::LeaveIfError(iPimServ->Connect());

		User::LeaveIfError( iParent->Fs().Connect() );

		}

	OpenPersistanceL();//opens iContactsDatabase2

	iSortOrder = new(ELeave) RContactViewSortOrder();

	iObserver = CViewObserver::NewLC( *this, &CContactViewTest::AllEmptyTestL );// first test to run

	CleanupStack::Pop( iObserver );

	this->Logger().HtmlLogger().ShareAuto();

	iObserver->Activate();

	}

TVerdict CContactViewTest::doTestStepL()

	{

	void (CContactViewTest::*mainFunc)() = NULL;

	const TDesC &run = ConfigSection();

	if( run.Find( KRun1 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::AllEmptyTestL;

		}

	else if( run.Find( KRun2 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::ViewEmptyTestL;

		}

	else if( run.Find( KRun3 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::ContactEmptyTestL;

		}

	else if( run.Find( KRun4 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::AllFullTestL;

		}

	else if( run.Find( KRun5 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::EmptyFieldsetTestL;

		}

	else if( run.Find( KRun6 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::EmptyFieldsetSortTestL;

		}

	else if( run.Find( KRun7 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::MissingFieldTestL;

		}

	else if( run.Find( KRun8 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::PerformanceTestL;

		}

	else if( run.Find( KRun9 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::RecoverCompressTestL; // this test does not apply to the SQLite version of contacts

		}

	else if( run.Find( KRun10 ) > KErrNotFound )

		{

		mainFunc = &CContactViewTest::ConcurrentRecoverCompressTestL; // this test does not apply to the SQLite version of contacts

		}

	else

		{

		MissngTestPanic();

		}

	__UHEAP_MARK;

	iRemote = EFalse;

	ALLPRINT(KStars);

	if( iPLView )

		{

		_LIT(KPersistance,"Initialising LocalView on Persistence Layers tests");

		ALLPRINT(KPersistance);

		}

	else

		{

		_LIT(KLocalViewCS,"Initialising LocalView on Client/Server tests");

		ALLPRINT(KLocalViewCS);

		}

	ALLPRINT(KStars);

	InitializeL();

	iObserver->iMainFunc = mainFunc;

	CActiveScheduler::Start();

	if( !iPLView )

		{

		ALLPRINT(KStars);

		_LIT(KRemoteViewCS,"Initialising RemoteView on Client/Server tests");

		ALLPRINT(KRemoteViewCS);

		ALLPRINT(KStars);

		iRemote = ETrue;

        // Ensure that the recover is deleted before another one is created.

        EndRecoverL();

		ResetDatabaseL(10);

		iObserver->iMainFunc = mainFunc;// test to run

		iObserver->iDoFunc = NULL;

		iObserver->CleanView();

		iObserver->Activate();

		CActiveScheduler::Start();

		}

	if( !iPLView )

		{

		ALLPRINT(KStars);

		_LIT(KRemoteViewCS,"Initialising RemoteView on Client/Server tests");

		ALLPRINT(KRemoteViewCS);

		ALLPRINT(KStars);

		iRemote = ETrue;

		ResetDatabaseL(10);

		iObserver->iMainFunc = mainFunc;// test to run

		iObserver->iDoFunc = NULL;

		iObserver->CleanView();

		iObserver->Activate();

		CActiveScheduler::Start();

		}

		CleanupL();

		__UHEAP_MARKEND;

	return TestStepResult();

	}

/**

create local view with empty sortorder,

database is contains ten empty contacts

*/

void CContactViewTest::AllEmptyTestL()

	{

	ALLPRINT(KTest1);

	ResetSortL();

	iObserver->SetView( CreateViewL() );

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = &CContactViewTest::doAllEmptyTestL;

	}

/**

check that local view contains 10 contacts, each containing 1 empty field

*/

void CContactViewTest::doAllEmptyTestL(const CContactViewBase &aLView)

	{

	ClosePersistanceL(ETrue);

	TInt length = aLView.CountL();

	TInt manyfields = 0;

	TInt i;

	INTCOMPARE( length , ==,  iContacts, 0, 0 );

	for(i = 0; i < length; ++i)

		{

		manyfields = aLView.ContactAtL(i).FieldCount();

		INTCOMPARE( manyfields , ==,  1,  i, 0 );

		SINGLECOMPARE(  CheckViewContact( aLView.ContactAtL(i), KNullDesC ),  i ,  0 );

		}

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = NULL;

	iObserver->CleanView();

	}

/**

create local view with empty sortorder,

database contains 10 contacts with all fields set to preset values

*/

void CContactViewTest::ViewEmptyTestL()

	{

	ALLPRINT(KTest2);

	ClosePersistanceL(EFalse);

	ResetDatabaseL();

	for(TInt i = 0; i < iContacts; ++i)

		{

		const TContactItemId cid = iIterate->NextL();

		OpenL(cid, *iViewAll);

		SetContactL();

		CommitL();

		}

	ResetSortL();

	OpenPersistanceL();

	iObserver->SetView( CreateViewL() );

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = &CContactViewTest::doViewEmptyTestL;

	}

/**

check that local view contains 10 contacts, each containing 1 empty field

*/

void CContactViewTest::doViewEmptyTestL(const CContactViewBase &aLView)

	{

	TInt length = aLView.CountL();

	TInt manyfields = 0;

	TInt i;

	INTCOMPARE( length , ==,  iContacts, 0, 0 );

	iIterate->Reset();

	for(i = 0; i < length; ++i)

		{

		const CViewContact &vcontact = aLView.ContactAtL(i);

		manyfields = vcontact.FieldCount();

		INTCOMPARE( manyfields , ==,  1,  i, 0 );

		SINGLECOMPARE(  CheckViewContact( vcontact, GetFieldL(1) ),  i,  0 );

		}

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = NULL;

	iObserver->CleanView();

	}

/**

create local view with sortorder containing all (existing) uids,

database contains 10 empty contacts

*/

void CContactViewTest::ContactEmptyTestL()

	{

	ALLPRINT(KTest3);

	ClosePersistanceL(EFalse);

	ResetDatabaseL();

	ResetSortL();

	TInt length = iExistingUidsArray->Count();

	TInt i = 0;

	for( ; i < length ; ++i)

		{

		iSortOrder->AppendL( TUid::Uid( (*iExistingUidsArray)[i] ) );

		}

	OpenPersistanceL();

	iObserver->SetView( CreateViewL() );

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = &CContactViewTest::doContactEmptyTestL;

	}

void CContactViewTest::doContactEmptyTestL(const CContactViewBase &aLView)

	{

	TInt length = aLView.CountL();

	TInt arrayLength = iExistingUidsArray->Count();

	TInt manyfields = 0;

	TInt i;

	INTCOMPARE( length , ==,  iContacts, 0, 0 );

	for(i = 0; i < length; ++i)

		{

		const CViewContact &vcontact = aLView.ContactAtL(i);

		manyfields = vcontact.FieldCount();

		INTCOMPARE( manyfields , ==,  arrayLength,  i, 0 );

		SINGLECOMPARE(  CheckViewContact( vcontact, KNullDesC ),  i ,  0 );

		}

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = NULL;

	iObserver->CleanView();

	}

void CContactViewTest::ResetDatabaseL(const TInt aMany)

	{

	iIterate->Reset();

	for(TInt i = 0; i < iContacts; ++i)

		{

		const TContactItemId cid = iIterate->NextL();

		iIterate->RemoveL(cid);

		}

	if( aMany > 0 )

		{

		iContacts = aMany;

		}

	CLEAR( iContactsDatabase );

	CLEAR( iContactsDatabase2 );

	iContactsDatabase = CContactDatabase::ReplaceL();

	iContactsDatabase2 = CContactDatabase::OpenL( CContactDatabase::EMultiThread );

	AddEmptyContactsL(iContacts);

	iIterate->Reset();

	}

TBool CContactViewTest::CheckViewContact(const CViewContact &aVContact, const TDesC &aVal)

	{

	TBool SingleCheckResult = EFalse;

	TBool OverallCheckResult = ETrue;

	TInt length = aVContact.FieldCount();

	TInt i = 0;

	for(; i < length; ++i)

		{

		SingleCheckResult = STRINGCOMPARE( aVContact.Field(i), ==, aVal, i, 0);

		OverallCheckResult = OverallCheckResult && SingleCheckResult;

		}

	return ( OverallCheckResult && length > 0 );

	}

/**

create local view with sortorder containing all (existing) uids,

database contains 10 contacts with all fields set to preset values

*/

void CContactViewTest::AllFullTestL()

	{

	ALLPRINT(KTest4);

	ClosePersistanceL(EFalse);

	ResetDatabaseL();

	TInt i;

	for(i = 0; i < iContacts; ++i)

		{

		const TContactItemId cid = iIterate->NextL();

		OpenL(cid, *iViewAll);

		SetContactL();

		CommitL();

		}

	TInt length = iExistingUidsArray->Count();

	ResetSortL();

	for(i = 0 ; i < length ; ++i)

		{

		iSortOrder->AppendL( TUid::Uid( (*iExistingUidsArray)[i] ) );

		}

	OpenPersistanceL();

	iObserver->SetView( CreateViewL() );

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = &CContactViewTest::doAllFullTestL;

	}

/**

check that local view contains 10 contacts, each containing as many fields

as there are uids (114), all field that have a corresponding uid should be

non-empty

*/

void CContactViewTest::doAllFullTestL(const CContactViewBase &aLView)

	{

	ClosePersistanceL(ETrue);

	TInt length = aLView.CountL();

	TInt arrayLength = iExistingUidsArray->Count();

	TInt manyfields = 0;

	TInt i;

	INTCOMPARE( length , ==,  iContacts, 0, 0 );

	for(i = 0; i < length; ++i)

		{

		const CViewContact &vcontact = aLView.ContactAtL(i);

		manyfields = vcontact.FieldCount();

		INTCOMPARE( manyfields , ==,  arrayLength,  i, 0 );

		SINGLECOMPARE(  CheckViewContactL( vcontact ),  i ,  0 );

		}

	iObserver->iMainFunc = NULL;

	iObserver->iDoFunc = NULL;

	iObserver->CleanView();

	}

void CContactViewTest::SetContactL()

	{

	TInt length = iFields->Count();

	TInt i;

	for( i = 0; i < length; ++i)

		{

		SetFieldL(*iFields, i, (*iFields)[i].Label());

		}

	}

/**

Check that contents of all fields in view contact equal corresponding fields in contact item

*/

TBool CContactViewTest::CheckViewContactL(const CViewContact &aVContact)

	{

	TBool OverallCheckResult = EFalse;

	//retrieve contact item id of view contact

	TContactItemId cid = aVContact.Id();

	//open contact item

	ReadL(cid, *iViewAll);

	TInt length = aVContact.FieldCount();

	TInt i = 0;

	for(; i < length; ++i)

		{

		OverallCheckResult = EFalse;

		//find first field in contact item that equals uid (of view contact field) stored in sort order

		TInt pos = iFields->Find((*iSortOrder)[i]);

		TDesC *ContactField = NULL;

		if(pos < 0)

			{

			ContactField = const_cast<TDesC *>(&KNullDesC);

			}

		else

			{

			//converts contents of field - matching the view contact uid - to a string

			ContactField = FieldStringLC( (*iFields)[pos] );

			}

		//check that conents of contact item field equal conents of corresponing view contact field

		OverallCheckResult = STRINGCOMPARE( aVContact.Field(i), ==, *ContactField, i, 0 );

		if(pos > -1)

			{