// Copyright (c) 2005-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:

// Example CTestStep derived implementation

// 

//

/**

 @file commsdatSnapTests.cpp

*/

#include "commsdatSnapTests.h"

#include "Te_commsdatSuiteDefs.h"

#include <e32test.h>

#include <commsdattypesv1_1_partner.h>

#include <commsdattypeinfov1_1_internal.h>

#ifdef SYMBIAN_NON_SEAMLESS_NETWORK_BEARER_MOBILITY

namespace

	{

TInt GetAPNumberL(const TInt aTierValaue, CommsDat::CMDBSession* aCDSession_vLatest)

	{

	CMDBRecordSet<CCDAccessPointRecord>* ipprotoAPs = new(ELeave)CMDBRecordSet<CCDAccessPointRecord>(KCDTIdAccessPointRecord);

	CleanupStack::PushL(ipprotoAPs);

	CCDAccessPointRecord* primedIPProtoAP = static_cast<CCDAccessPointRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdAccessPointRecord));

	CleanupStack::PushL(primedIPProtoAP);

	primedIPProtoAP->iTier = aTierValaue;

	ipprotoAPs->iRecords.AppendL(primedIPProtoAP);

	//the ownership of the primed record is now at the recordset

	CleanupStack::Pop(primedIPProtoAP);

	ipprotoAPs->FindL(*aCDSession_vLatest);

	TInt apNum = ipprotoAPs->iRecords.Count();

	CleanupStack::PopAndDestroy(ipprotoAPs);

	return apNum;

	}

	}

#endif // SYMBIAN_NON_SEAMLESS_NETWORK_BEARER_MOBILITY

//----------------------------------------------------------------------------------------------------------------

//Below workaround to load the linked record which should be resolved with DEF58321

CCDRecordBase* GetConnectedRecordL(CMDBSession& aSession, TMDBElementId aElementId)

    {

   	CCDRecordBase *record = static_cast<CCDRecordBase*>(CCDRecordBase::RecordFactoryL(aElementId));

    CleanupStack::PushL(record);

    record->LoadL(aSession);

    CleanupStack::Pop(record);

    return record;

    }

CCommsdat190Step::~CCommsdat190Step()

/**

 * Destructor

 */

	{

	delete iCDSession;

	}

CCommsdat190Step::CCommsdat190Step()

/**

 * Constructor

 */

	{

	SetTestStepName(KCommsdat190Step);                                                                                           

	}

TVerdict CCommsdat190Step::doTestStepPreambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

    SetTestStepResult(EFail);

	iCDSession = CMDBSession::NewL(KCDVersion1_1);

	iCDSession->OpenTransactionL();

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat190Step::doTestStepL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 * Our implementation only gets called if the base class doTestStepPreambleL() did

 * not leave. That being the case, the current test result value will be EPass.

 */

	{

	SetTestStepResult(EFail);

	//Store several IAPs and Selection Policies for later testing

	_LIT(KIAPName1, "SelectionTestIAP1");

	_LIT(KIAPName2, "SelectionTestIAP2");

	_LIT(KIAPName3, "SelectionTestIAP3");

	_LIT(KSelName1, "SelectionPolicy1");

	_LIT(KModemBearerType, "ModemBearer");

	_LIT(KLANServiceType, "LANService");

	CCDIAPRecord* newIapRecord = static_cast<CCDIAPRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdIAPRecord));

	CleanupStack::PushL(newIapRecord);

    CCDIAPPrioritySelectionPolicyRecord *selPolRecord = (CCDIAPPrioritySelectionPolicyRecord *)CCDRecordBase::RecordFactoryL(KCDTIdIapPrioritySelectionPolicyRecord);

	CleanupStack::PushL(selPolRecord);

    selPolRecord->SetRecordId(KCDNewRecordRequest);

    selPolRecord->iRecordName.SetMaxLengthL(KSelName1().Length());

    selPolRecord->iRecordName = KSelName1;

  	// create a new request

	newIapRecord->SetRecordId(KCDNewRecordRequest);

    newIapRecord->iRecordName.SetMaxLengthL(KIAPName1().Length());

    newIapRecord->iRecordName = KIAPName1;

  	newIapRecord->iNetworkWeighting = 14;    // dummy value

  	newIapRecord->iBearer = 1;

  	newIapRecord->iBearerType.SetMaxLengthL(KModemBearerType().Length());

  	newIapRecord->iBearerType = KModemBearerType;

  	newIapRecord->iService = 1;

  	newIapRecord->iServiceType.SetMaxLengthL(KLANServiceType().Length());

  	newIapRecord->iServiceType = KLANServiceType;    

	newIapRecord->StoreL(*iCDSession);

    INFO_PRINTF2(_L("newIapRecord stored. Element id is %08x"), newIapRecord->ElementId());

	selPolRecord->iIap1 = newIapRecord->ElementId();

	newIapRecord->SetRecordId(KCDNewRecordRequest);

    newIapRecord->iRecordName.SetMaxLengthL(KIAPName2().Length());

    newIapRecord->iRecordName = KIAPName2;

    newIapRecord->iNetworkWeighting = 14;    // dummy value

  	newIapRecord->iBearer = 1;

  	newIapRecord->iBearerType.SetMaxLengthL(KModemBearerType().Length());

  	newIapRecord->iBearerType = KModemBearerType;

  	newIapRecord->iService = 1;

  	newIapRecord->iServiceType.SetMaxLengthL(KLANServiceType().Length());

  	newIapRecord->iServiceType = KLANServiceType; 

	newIapRecord->StoreL(*iCDSession);

    INFO_PRINTF2(_L("newIapRecord stored. Element id is %08x"), newIapRecord->ElementId());

    selPolRecord->iIap2 = newIapRecord->ElementId();

	newIapRecord->SetRecordId(KCDNewRecordRequest);

    newIapRecord->iRecordName.SetMaxLengthL(KIAPName3().Length());

    newIapRecord->iRecordName = KIAPName3;

    newIapRecord->iNetworkWeighting = 14;    // dummy value

  	newIapRecord->iBearer = 1;

  	newIapRecord->iBearerType.SetMaxLengthL(KModemBearerType().Length());

  	newIapRecord->iBearerType = KModemBearerType;

  	newIapRecord->iService = 1;

  	newIapRecord->iServiceType.SetMaxLengthL(KLANServiceType().Length());

  	newIapRecord->iServiceType = KLANServiceType; 

	newIapRecord->StoreL(*iCDSession);

    INFO_PRINTF2(_L("newIapRecord stored. Element id is %08x"), newIapRecord->ElementId());

    selPolRecord->iIap3 = newIapRecord->ElementId();

    selPolRecord->StoreL(*iCDSession);

    INFO_PRINTF2(_L("selPolRecord stored. Element id is %08x"), selPolRecord->ElementId());

	CleanupStack::PopAndDestroy(selPolRecord);

	CleanupStack::PopAndDestroy(newIapRecord);

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat190Step::doTestStepPostambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

	iCDSession->CommitTransactionL();

	return TestStepResult();

	}

//----------------------------------------------------------------------------------------------------------------

CCommsdat191Step::~CCommsdat191Step()

/**

 * Destructor

 */

	{

	delete iCDSession;

	}

CCommsdat191Step::CCommsdat191Step()

/**

 * Constructor

 */

	{

	SetTestStepName(KCommsdat191Step);                                                                                           

	}

TVerdict CCommsdat191Step::doTestStepPreambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

    SetTestStepResult(EFail);

	iCDSession = CMDBSession::NewL(KCDVersion1_1);

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat191Step::doTestStepL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 * Our implementation only gets called if the base class doTestStepPreambleL() did

 * not leave. That being the case, the current test result value will be EPass.

 */

	{

	SetTestStepResult(EFail);

	_LIT(KIAPName1, "SelectionTestIAP1"); //Same as used by CCommsdat100Step

	_LIT(KSelName1, "SelectionPolicy1");

	CCDIAPPrioritySelectionPolicyRecord* selPolRecord = static_cast<CCDIAPPrioritySelectionPolicyRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdIapPrioritySelectionPolicyRecord));

	CleanupStack::PushL(selPolRecord);

    //Find a particular IAP Priority Selection Policy record

    selPolRecord->iRecordName.SetMaxLengthL(KSelName1().Length());

    selPolRecord->iRecordName = KSelName1;

	TInt found = selPolRecord->FindL(*iCDSession); //This record has been stored by CCommsdat100Step

	if(found)

	    {

    	//Load corresponding IAP record

   	    //This record has been stored by CCommsdat100Step

   	    // Link records work now

        CCDIAPRecord* iapRecord = static_cast<CCDIAPRecord*>(GetConnectedRecordL(*iCDSession, selPolRecord->iIap1));

	    CleanupStack::PushL(iapRecord);

        /*selPolRecord->iIap1.LoadL(*iCDSession);

        CCDIAPRecord* iapRecord = static_cast<CCDIAPRecord*>(selPolRecord->iIap1);   

*/

	    TPtrC iapRecordName(iapRecord->iRecordName);

	    if (iapRecordName == KIAPName1)

	        {

	        INFO_PRINTF2(_L("Iap record (%S) successfuly loaded"), &iapRecordName);

	        SetTestStepResult(EPass);

	        }

	    else

	        {

	        INFO_PRINTF3(_L("Iap record (%S) does not match the expected one (%S)"), &iapRecordName, &KIAPName1());

	        }

        CleanupStack::PopAndDestroy(iapRecord); // not necessary - link records work now.

	    }

    CleanupStack::PopAndDestroy(selPolRecord);

	return TestStepResult();

	}

//----------------------------------------------------------------------------------------------------------------

CCommsdat192Step::~CCommsdat192Step()

/**

 * Destructor

 */

	{

	delete iCDSession;

	}

CCommsdat192Step::CCommsdat192Step()

/**

 * Constructor

 */

	{

	SetTestStepName(KCommsdat192Step);                                                                                           

	}

TVerdict CCommsdat192Step::doTestStepPreambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

    SetTestStepResult(EFail);

	iCDSession = CMDBSession::NewL(KCDVersion1_1);

	iCDSession->OpenTransactionL();

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat192Step::doTestStepL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 * Our implementation only gets called if the base class doTestStepPreambleL() did

 * not leave. That being the case, the current test result value will be EPass.

 */

	{

	SetTestStepResult(EFail);

	//Store an IAP priority based AP record for later testing

	_LIT(KApName1, "CorporateLAN"); //Same as used by CCommsdat101Step

	_LIT(KSelName1, "SelectionPolicy1");

	const TInt GIDValue = 1;

    CCDIAPPrioritySelectionPolicyRecord* selPolRecord = static_cast<CCDIAPPrioritySelectionPolicyRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdIapPrioritySelectionPolicyRecord));

	CleanupStack::PushL(selPolRecord);

    //Find a particular IAP Priority Selection Policy record

    selPolRecord->iRecordName.SetMaxLengthL(KSelName1().Length());

    selPolRecord->iRecordName = KSelName1;

	TInt found = selPolRecord->FindL(*iCDSession); //This record has been stored by CCommsdat100Step

	if (found)

	    {

	    CCDAccessPointRecord* apRecord = static_cast<CCDAccessPointRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdAccessPointRecord));

	    CleanupStack::PushL(apRecord);

	    apRecord->SetRecordId(KCDNewRecordRequest);

        apRecord->iRecordName.SetMaxLengthL(KApName1().Length());

        apRecord->iRecordName = KApName1;

        apRecord->iSelectionPolicy = selPolRecord->ElementId();

        apRecord->iAccessPointGID = GIDValue;

   	    apRecord->StoreL(*iCDSession);

        INFO_PRINTF2(_L("apRecord stored. Element id is %08x"), apRecord->ElementId());

	    CleanupStack::PopAndDestroy(apRecord);

	    SetTestStepResult(EPass);

	    }

    CleanupStack::PopAndDestroy(selPolRecord);

	return TestStepResult();

	}

TVerdict CCommsdat192Step::doTestStepPostambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

	iCDSession->CommitTransactionL();

	return TestStepResult();

	}

//----------------------------------------------------------------------------------------------------------------

CCommsdat193Step::~CCommsdat193Step()

/**

 * Destructor

 */

	{

	delete iCDSession;

	}

CCommsdat193Step::CCommsdat193Step()

/**

 * Constructor

 */

	{

	SetTestStepName(KCommsdat193Step);                                                                                           

	}

TVerdict CCommsdat193Step::doTestStepPreambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

    SetTestStepResult(EFail);

	iCDSession = CMDBSession::NewL(KCDVersion1_1);

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat193Step::doTestStepL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 * Our implementation only gets called if the base class doTestStepPreambleL() did

 * not leave. That being the case, the current test result value will be EPass.

 */

	{

	SetTestStepResult(EFail);

   	//Load a previously stored IAP priority based AP record

	_LIT(KApName1, "CorporateLAN"); //Same as used by CCommsdat101Step

	_LIT(KSelName1, "SelectionPolicy1");

	_LIT(KIAPName3, "SelectionTestIAP3"); //Same as used by CCommsdat100Step

    CCDAccessPointRecord* apRecord = static_cast<CCDAccessPointRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdAccessPointRecord));

	CleanupStack::PushL(apRecord);

    apRecord->iRecordName.SetL(KApName1);

	TInt found = apRecord->FindL(*iCDSession); //This record has been stored by CCommsdat102Step

	if (found)

	    {

        INFO_PRINTF2(_L("apRecord loaded. Element id is %08x"), apRecord->ElementId());

        //Load the Selection Policy record

        //This record has been stored by CCommsdat100Step

        CCDSelectionPolicyRecordBase* selPolRecord = static_cast<CCDSelectionPolicyRecordBase*>(GetConnectedRecordL(*iCDSession, apRecord->iSelectionPolicy));

    	CleanupStack::PushL(selPolRecord);

        /*apRecord->iSelectionPolicy.LoadL(*iCDSession);

	    CCDSelectionPolicyRecordBase* selPolRecord = static_cast<CCDSelectionPolicyRecordBase*>(apRecord->iSelectionPolicy);

    	*/

	    TESTL(TPtrC(selPolRecord->iRecordName) == KSelName1);

       	//Cast to the already known type

       	CCDIAPPrioritySelectionPolicyRecord* iapSelPolRec = static_cast<CCDIAPPrioritySelectionPolicyRecord*>(selPolRecord);

   	    //This record has been stored by CCommsdat100Step

        CCDIAPRecord* iapRecord = static_cast<CCDIAPRecord*>(GetConnectedRecordL(*iCDSession, iapSelPolRec->iIap3));

        CleanupStack::PushL(iapRecord);

   	    /*iapSelPolRec->iIap3.LoadL(*iCDSession);

	    CCDIAPRecord* iapRecord = static_cast<CCDIAPRecord*>(iapSelPolRec->iIap3);*/

   	    TPtrC iapRecordName(iapRecord->iRecordName);

   	    if(iapRecordName == KIAPName3)

   	        {

   	        INFO_PRINTF2(_L("Iap record (%S) successfuly loaded"), &iapRecordName);

   	        SetTestStepResult(EPass);

   	        }

   	    else

   	        {

   	        INFO_PRINTF3(_L("Iap record (%S) does not match the expected one (%S)"), &iapRecordName, &KIAPName3());

   	        }

        CleanupStack::PopAndDestroy(iapRecord);

	    CleanupStack::PopAndDestroy(selPolRecord);

	    }

	CleanupStack::PopAndDestroy(apRecord);

	return TestStepResult();

	}

//----------------------------------------------------------------------------------------------------------------

CCommsdat194Step::~CCommsdat194Step()

/**

 * Destructor

 */

	{

	delete iCDSession;

	}

CCommsdat194Step::CCommsdat194Step()

/**

 * Constructor

 */

	{

	SetTestStepName(KCommsdat194Step);                                                                                           

	}

TVerdict CCommsdat194Step::doTestStepPreambleL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 */

	{

    SetTestStepResult(EFail);

	iCDSession = CMDBSession::NewL(KCDVersion1_1);

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CCommsdat194Step::doTestStepL()

/**

 * @return - TVerdict code

 * Override of base class pure virtual

 * Our implementation only gets called if the base class doTestStepPreambleL() did

 * not leave. That being the case, the current test result value will be EPass.

 */

	{

	SetTestStepResult(EFail);

   	//Load a previously stored IAP priority based AP record

	_LIT(KApName1, "CorporateLAN"); //Same as used by CCommsdat101Step

	_LIT(KSelName1, "SelectionPolicy1");

    CCDAccessPointRecord* apRecord = static_cast<CCDAccessPointRecord*>(CCDRecordBase::RecordFactoryL(KCDTIdAccessPointRecord));

	CleanupStack::PushL(apRecord);

    apRecord->iRecordName.SetL(KApName1);

	TInt found = apRecord->FindL(*iCDSession); //This record has been stored by CCommsdat102Step

	if (found)

	    {

        INFO_PRINTF2(_L("apRecord loaded. Element id is %08x"), apRecord->ElementId());

        //Load the Selection Policy record

        //This record has been stored by CCommsdat100Step

        CCDSelectionPolicyRecordBase* selPolRecord = static_cast<CCDSelectionPolicyRecordBase*>(GetConnectedRecordL(*iCDSession, apRecord->iSelectionPolicy));

    	CleanupStack::PushL(selPolRecord);

        /*apRecord->iSelectionPolicy.LoadL(*iCDSession);

        CCDSelectionPolicyRecordBase* selPolRecord = static_cast<CCDSelectionPolicyRecordBase*>(apRecord->iSelectionPolicy);

    	*/

    	TESTL(TPtrC(selPolRecord->iRecordName) == KSelName1);

        //Build the list of IDs

        RArray<TInt> iapIDs;

        CleanupClosePushL(iapIDs);

       	const SRecordTypeInfo* recordInfo = selPolRecord->GetRecordInfo();