// Copyright (c) 2002-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:
// Contains MBufMgr Test Step 13 that measures the time spent for alloc/free methods
// 
//

// EPOC includes
#include <e32base.h>

// Test system includes
//#ifdef SYMBIAN_OLD_EXPORT_LOCATION
//#include "networking/log.h"
//#include "networking/teststep.h"
//#else
//#include <networking/log.h>
//#include <networking/teststep.h>
//#endif
#include "TestStepCTMbufmgr.h"

#include "Test13Performance.h"

#include <comms-infras/commsbufpond.h>
// constructor
CTest13Performance::CTest13Performance()
	{
	SetTestStepName(_L("MBufMgrTest13"));// Store the name of this test case
	}

// destructor
CTest13Performance::~CTest13Performance() 
	{
	}


// 
enum TVerdict CTest13Performance::doTestStepL(void)
	{
	SetTestStepResult(EFail);
	TInt aMBufNo; //Taken from the script;
	TInt aLoopNo; //Taken from the script;
	TTime aTimeStart, aTimeStop;
	//-------------- substep 0 -------------------- 
	INFO_PRINTF1(_L("  00 Read parameters from the script:"));
	TInt bRet = GetIntFromConfig(_L("MBufMgrTest13"), _L("MBufNo"), aMBufNo);

	if (!bRet)
		return TestStepResult();

	bRet = GetIntFromConfig(_L("MBufMgrTest13"), _L("LoopNo"), aLoopNo);

	if (!bRet)
		return TestStepResult();


	INFO_PRINTF3(_L("     Info: MBUFNO = %d, LOOPNO= %d"),aMBufNo, aLoopNo);

	//-------------- substep 1 -------------------- 
	INFO_PRINTF1(_L("  01 Create CMBufManager and install active scheduler:"));
    CleanupStack::PushL( iActSch = new(ELeave) CActiveScheduler );
	CActiveScheduler::Install(iActSch);

	CreateInstanceMBufMgrL((TUint)(3*KMBufSmallSize*aMBufNo));
	CleanupClosePushL(iBufPond);

	TInt i,j,k; //Counters
	TInt64 us;
	RMBufQ aBufList1, aBufList2; //Will contain all small buffers;
	RMBuf* aBuf=0;

	for (i = 0; i<aLoopNo; i++)
		{
		INFO_PRINTF2(_L(" Loop #%d"), i + 1);

		//-------------- substep 2 -------------------- 
		INFO_PRINTF1(_L("  02 Allocate Chain that contains RMBUFNO buffers. Free Chain."));
		INFO_PRINTF1(_L("     ...Repeat the same 1000 times.Display the time spent:"));
		RMBufChain aChain;
		aTimeStart.UniversalTime();
		for (j = 0;j < 1000; j++)
		{
			TRAPD(ret,aChain.AllocL(KMBufSmallSize*aMBufNo));
			if (ret != KErrNone)
				{
				INFO_PRINTF1(_L("Error: Couldn't allocate RMBuf:"));
				return TestStepResult();
				}

			aChain.Free();
		}
		aTimeStop.UniversalTime();
		us = aTimeStop.MicroSecondsFrom(aTimeStart).Int64()/1000;
		INFO_PRINTF2(_L("     ...Info: The time spent on 1000 alloc and free is %d mS"),us);

		//-------------- substep 3 -------------------- 
		INFO_PRINTF2(_L("  03 Create %d chains, each containing one RMBuf."), 2 * aMBufNo);
		INFO_PRINTF1(_L("     ...Then, free all even chains:"));

		aTimeStart.UniversalTime();
		TInt attemptCount = 0;
		for (j = 0;j<2*aMBufNo;j++)
			{
			aBuf = static_cast<RMBuf*>(iBufPond.Alloc(KMBufSmallSize, 0, KMaxTInt));
			if (aBuf == NULL)
				{
				++attemptCount;
				if(attemptCount == 3)
				    {
					INFO_PRINTF2(_L("Error: Couldn't allocate RMBuf number %d:"),j);
					User::Leave(EFail);
				    }
				else
				    {
				    User::After(100000);
				    }
				}
			if(aBuf)
			    {
			    aBufList1.Append(aBuf);
			    }
			}

		k=0;
		while (!aBufList1.IsEmpty())
			{
			k++;
			aBuf = aBufList1.Remove();
			if (k%2)
				{
				aBuf->Free();
				}
			else
				{
				aBufList2.Append(aBuf);
				}
			}
		aTimeStop.UniversalTime();
		us = aTimeStop.MicroSecondsFrom(aTimeStart).Int64()/1000;
		INFO_PRINTF2(_L("     ...Info: The time spent is %d mS"), us);


		//-------------- substep 4 -------------------- 
		INFO_PRINTF1(_L("  04 Allocate Chain that contains RMBUFNO buffers. Free Chain."));
		INFO_PRINTF1(_L("     ...Repeat the same 1000 times.Display the time spent:"));
		aTimeStart.UniversalTime();
		for (j = 0;j < 1000; j++)
		{
			TRAPD(ret,aChain.AllocL(KMBufSmallSize*aMBufNo));
			if (ret != KErrNone)
				{
				INFO_PRINTF2(_L("Error: Couldn't allocate RMBuf number %d:"),j);
				User::Leave(EFail);
				}

			aChain.Free();
		} 
		aTimeStop.UniversalTime();
		us = aTimeStop.MicroSecondsFrom(aTimeStart).Int64()/1000;
		INFO_PRINTF2(_L("     ...Info: The time spent on 1000 alloc and free is %d mS"),us);
		
		//-------------- substep 5 -------------------- 
		INFO_PRINTF1(_L("  05 Free all remainig chains:"));
		while (!aBufList2.IsEmpty())
			{
			aBuf = aBufList2.Remove();
			aBuf->Free();
			}
	}


	//-------------- substep 9 -------------------- 
	INFO_PRINTF1(_L("  09 Clean up stack:"));
    CleanupStack::PopAndDestroy();
	CActiveScheduler::Install(NULL);
	CleanupStack::PopAndDestroy(iActSch);

	SetTestStepResult(EPass);
	return TestStepResult();
	}