// 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 06 for SplitL method

// 

//

// 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 "Test06SplitL.h"

#include <comms-infras/commsbufpond.h>

// constructor

CTest06Split::CTest06Split()

	{

	SetTestStepName(_L("MBufMgrTest06"));// Store the name of this test case

	}

// destructor

CTest06Split::~CTest06Split()	

	{

	}

// 

enum TVerdict CTest06Split::doTestStepL(void)

	{

	SetTestStepResult(EFail);

	//-------------- substep 0 -------------------- 

	INFO_PRINTF1(_L("  00 Read parameters from the script:"));

	TInt aOffset;// Will contain the position in chain where split action will be done

	TInt aLength;// Will contain the length of desc & chains in the test

	TInt bRet = GetIntFromConfig(_L("MBufMgrTest06"), _L("Length"), aLength);

	if (!bRet) 

		{

        SetTestStepResult(EFail);

		return TestStepResult();

		}

	bRet = GetIntFromConfig(_L("MBufMgrTest06"), _L("Offset"), aOffset);

	if (!bRet) 

		{

        SetTestStepResult(EFail);

		return TestStepResult();

		}

	TBool forceSmallBuf = EFalse;

    bRet = GetIntFromConfig(_L("MBufMgrTest06"), _L("ForceSmallBuf"), forceSmallBuf);

 	INFO_PRINTF2(_L("     ------- Chain & Desc LENGTH   = %d --"), aLength);

 	INFO_PRINTF2(_L("     ------- OFFSET where to Split = %d --"), aOffset);

	if ( (aLength > 1000)    ||(aLength <0) ||

		 (aOffset > aLength) || (aOffset <0)  )

		{

		INFO_PRINTF1(_L("ERROR: Wrong input parameter(s)"));

         SetTestStepResult(EFail);

		return TestStepResult();

		}

	//-------------- substep 1 -------------------- 

	INFO_PRINTF1(_L("  01 Creating CMBufManager and installing active scheduler:"));

    CleanupStack::PushL( iActSch = new(ELeave) CActiveScheduler );

	CActiveScheduler::Install(iActSch);

	enum { KBigBuf = 256, KSmallBuf = 128 };

	if(forceSmallBuf)

	    {

        RArray<TCommsBufPoolCreateInfo> createInfoArray;

        TCommsBufPoolCreateInfo createInfo;

        createInfo.iBufSize = KSmallBuf;

        createInfo.iInitialBufs = 128;

        createInfo.iGrowByBufs = 64;

        createInfo.iMinFreeBufs = 40;

        createInfo.iCeiling = 410; 

        createInfoArray.AppendL(createInfo);

        createInfo.iBufSize = KBigBuf;

        createInfo.iInitialBufs = 3;

        createInfo.iGrowByBufs = 1;

        createInfo.iMinFreeBufs = 1;

        createInfo.iCeiling = 3;

        createInfoArray.AppendL(createInfo);

        CreateInstanceMBufMgrL(createInfoArray);

        createInfoArray.Close();

	    }	

	else

	    {

        CreateInstanceMBufMgrL(KMBufDefaultHeapSize);

	    }

	CleanupClosePushL(iBufPond);

	//-------------- substep 2 -------------------- 

	INFO_PRINTF1(_L("  02 Allocating two descriptors (Des1 & Des2):"));

	TBuf8<1000> *aDes1, *aDes2;

    CleanupStack::PushL( aDes1 = new(ELeave) TBuf8<1000> );

    CleanupStack::PushL( aDes2 = new(ELeave) TBuf8<1000> );

	aDes1->SetLength(aLength);

	aDes2->SetLength(aLength);

	//-------------- substep 3 -------------------- 

	INFO_PRINTF1(_L("  03 Fill in Des1 with a pattern:"));

	StripeDes(*aDes1, 0, aLength, '@', 'Z');

	//-------------- substep 4 -------------------- 

	INFO_PRINTF1(_L("  04 Fill in Des2 with zeros:"));

	StripeDes(*aDes1, 0, aLength, 0, 0);

	//-------------- substep 5 -------------------- 

	INFO_PRINTF1(_L("  05 Allocate Chain1:"));

	RMBufChain aChain1;

	TRAPD(ret,aChain1.AllocL(aLength));

	if (ret != KErrNone)

		{

		INFO_PRINTF1(_L("Error: Couldn't allocate Chain1:"));

		User::Leave(EFail);

		}

	if(forceSmallBuf)

	    {

        for(RMBuf* buf = aChain1.First(); buf; buf = buf->Next())

            {

            if(buf->Size() != KBigBuf)

                {

                INFO_PRINTF3(_L("-- initial chain should be composed of %d buf, found %d buf"), KBigBuf, buf->Size());

                User::Leave(EFail);

                }

            }

	    }

	//-------------- substep 6 -------------------- 

	INFO_PRINTF1(_L("  06 Copy in Des1 into Chain1:"));

	aChain1.CopyIn(*aDes1);

	//-------------- substep 7 -------------------- 

	INFO_PRINTF1(_L("  07 Split Chain1. The 2nd part goes to Chain2:"));

	RMBufChain aChain2;

	TRAP(ret,aChain1.SplitL(aOffset, aChain2));

	if (ret != KErrNone)

		{

		INFO_PRINTF1(_L("Error: Couldn't Split"));

		aChain1.Free();

		aChain2.Free();

		User::Leave(EFail);

		}

	//-------------- substep 8 -------------------- 

	INFO_PRINTF1(_L("  08 Check the length of the chains. They should be OFFSET and (LENGTH - OFFSET):"));

	TInt temp;

	if ( (temp = aChain1.Length()) != aOffset)

		{

		INFO_PRINTF3(_L("Error: Chain1 length is %d instead of %d"), temp, aOffset);

		aChain1.Free();

		aChain2.Free();

		User::Leave(EFail);

		}

	if ( (temp = aChain2.Length()) != aLength - aOffset)

		{

		INFO_PRINTF3(_L("Error: Chain2 length is %d instead of %d"), temp, aLength - aOffset);

		aChain1.Free();

		aChain2.Free();

		User::Leave(EFail);

		}

    if(forceSmallBuf)

        {

        if(!aChain2.First() || aChain2.First()->Size() != KSmallBuf ||

           !aChain2.First()->Next() || aChain2.First()->Next()->Size() != KSmallBuf)

            {

            INFO_PRINTF2(_L("-- split chain should start with two %d buf"), KSmallBuf);

            User::Leave(EFail);

            }

        }

	//-------------- substep 9 -------------------- 

	INFO_PRINTF1(_L("  09 Copy out Chain1 into Des2:"));

	aChain1.CopyOut(*aDes2);

	//-------------- substep 10 -------------------- 

	INFO_PRINTF1(_L("  10 Check the length of Des2. It should be OFFSET "));

	if ( (temp = aDes2->Length()) != aOffset)

		{

		INFO_PRINTF3(_L("Error: Des2 length is %d instead of %d"), temp, aOffset);

		aChain1.Free();

		aChain2.Free();

		User::Leave(EFail);

		}

	//-------------- substep 11 -------------------- 

	INFO_PRINTF1(_L("  11 Set the length of Des2 to LENGTH value"));

	aDes2->SetLength(aLength);

	//-------------- substep 12 -------------------- 

	INFO_PRINTF1(_L("  12 Copy out the whole Chain2 into Des2 at offset = OFFSET"));

	TPtr8 dest((TUint8*)aDes2->Ptr() + aOffset, aLength-aOffset, aLength - aOffset);

	aChain2.CopyOut(dest);

	//-------------- substep 13 -------------------- 

	INFO_PRINTF1(_L("  13 Compare the content of Des1 & Des2:"));

	if(aDes1->Compare(*aDes2))

		{

		aChain1.Free();

		aChain2.Free();

		INFO_PRINTF1(_L("Error: The content is not the same"));

		User::Leave(EFail);

		}

	//-------------- substep 14 -------------------- 

	INFO_PRINTF1(_L("  14 Free the chains. Clean up stack:"));

	aChain1.Free();

	aChain2.Free();

    CleanupStack::PopAndDestroy(aDes2);

    CleanupStack::PopAndDestroy(aDes1);

    CleanupStack::PopAndDestroy(); // iBufPond

	CActiveScheduler::Install(NULL);

	CleanupStack::PopAndDestroy(iActSch);

        SetTestStepResult(EPass);

	return TestStepResult();

	}