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

// This file implements all GPRS and Context test cases. The test cases are built

// for using against a Motorola GPRS and Ericsson T39/520 phones.

// All test cases that are in tgprsinter are also in this file.

// 

//

/**

 @file

*/

#include <e32base.h>

#include <e32test.h>

#include <c32comm.h>

#include "f32file.h"

#include <etel.h>

#include <es_sock.h>

#include <in_sock.h>

#include <etelqos.h>

#include <pcktcs.h>

#include "Te_Gprs.h"

CInitGlobals::CInitGlobals()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("InitGlobals"));

	}

enum TVerdict CInitGlobals::doTestStepL()

//LOCAL_C void InitGlobals()

/**

 * Initialise global variables.

 */

    {

#ifdef __WINS__

    User::After(5*KOneSecond);      // allow emulator time to start up

#endif

	const TPtrC phoneBrand = iTestConfigParam->FindAlphaVar(KTestCfgPhoneMake,KNullDesC);

	if(phoneBrand != KTestCfgPhoneMotorola && phoneBrand != KTestCfgPhoneEricsson)

		{

		INFO_PRINTF1(_L("There is no phone specified in ini file or the phone is not supported"));

		User::Panic(_L("There is no phone specified in ini file or the phone is not supported."), KErrNotSupported);

		}

	return TestStepResult();

	}

CTestGprsDefaultContextParams::CTestGprsDefaultContextParams()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsDefaultContextParams"));

	}

enum TVerdict CTestGprsDefaultContextParams::doTestStepL()

//LOCAL_C void  GprsDefaultContextParamsTest()

/**

 * This tests the default context params

 */

    {

    RPacketContext::TContextConfigGPRS     setDefaultParams;

    RPacketContext::TContextConfigGPRS     getDefaultParams;

	// Some default params to set, does not matter what it is.

    _LIT8(KAccesspoint, "www.Symbian.com");  

    _LIT8(KPpdpaddress, "192.168.111.100");

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    setDefaultParams.iPdpType = RPacketContext::EPdpTypeIPv4;

    setDefaultParams.iAccessPointName = KAccesspoint;

    setDefaultParams.iPdpAddress = KPpdpaddress;

    setDefaultParams.iPdpCompression = 1;

    TPckg<RPacketContext::TContextConfigGPRS>    setcontextConfigPckg(setDefaultParams);

    TPckg<RPacketContext::TContextConfigGPRS>    getcontextConfigPckg(getDefaultParams);

    TEST(iPacketService.SetDefaultContextParams(setcontextConfigPckg) == KErrNone);

    TEST(iPacketService.GetDefaultContextParams(getcontextConfigPckg) == KErrNone);

    TestConfigParams(setDefaultParams, getDefaultParams);

    CleanupStack::PopAndDestroy(&iPacketService);

    User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsUnSupported::CTestGprsUnSupported()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsUnSupported"));

	}

enum TVerdict CTestGprsUnSupported::doTestStepL()

//LOCAL_C void  GprsUnSupportedTest()

/**

 * Tests all unsupported GPRS API calls to the TSY.

 */

    {

    TRequestStatus status;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    iPacketService.RejectActivationRequest(status);

	User::WaitForRequest(status);

	TEST(status.Int()== KErrNotSupported);

    iPacketService.RejectActivationRequest(status);

    iPacketService.CancelAsyncRequest(EPacketRejectActivationRequest);

    User::WaitForRequest(status);

    TEST(status.Int() == KErrNotSupported);

    RPacketService::TMSClass msClass;

    iPacketService.NotifyMSClassChange(status, msClass);

    User::WaitForRequest(status);

    TEST(status.Int() == KErrNotSupported);

    RPacketService::TDynamicCapsFlags dynCaps;

    TEST(iPacketService.GetDynamicCaps(dynCaps) == KErrNotSupported);

    iPacketService.NotifyDynamicCapsChange(status, dynCaps);

    User::WaitForRequest(status);

    TEST(status.Int() == KErrNotSupported);

    RPacketService::TAttachMode attachMode = RPacketService::EAttachWhenPossible;

    TEST(iPacketService.SetAttachMode(attachMode) == KErrNotSupported);

    TEST(iPacketService.GetAttachMode(attachMode) == KErrNotSupported);

    RPacketService::TRegistrationStatus registrationStatus = RPacketService::ERegisteredRoaming;

    iPacketService.GetNtwkRegStatus(status, registrationStatus);

	User::WaitForRequest(status);

	TEST(status.Int() == KErrNone || status.Int() == KErrNotSupported);

    CleanupStack::PopAndDestroy(&iPacketService);

    User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsContextAttach::CTestGprsContextAttach()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsContextAttach"));

	}

enum TVerdict CTestGprsContextAttach::doTestStepL()

/**

 * This tests the context attach and detach

 */

    {

    TRequestStatus                      stat1;

    TRequestStatus						stat2;

	TBuf<30>                            contextName;

    RPacketContext::TContextStatus        contextStatus;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    TESTL(iPacketContext[0].OpenNewContext(iPacketService, contextName) == KErrNone);

    CleanupClosePushL(iPacketContext[0]);

    iPacketContext[0].NotifyStatusChange(stat1, contextStatus);

    iPacketContext[0].CancelAsyncRequest(EPacketContextNotifyStatusChange);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrCancel);

    iPacketContext[0].NotifyStatusChange(stat1, contextStatus);

	iPacketContext[0].Activate(stat2);

	User::WaitForRequest(stat2);

	TEST_CHECKL(stat2.Int(), KErrNone, 

		_L("***Failed to activate context. Check that you are using correct SIM!***"));

	User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNone);

    TEST(contextStatus == RPacketContext::EStatusActivating);

    iPacketContext[0].NotifyStatusChange(stat1, contextStatus);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNone);

    TEST(contextStatus == RPacketContext::EStatusActive);

    iPacketContext[0].NotifyStatusChange(stat1, contextStatus);

	iPacketContext[0].Deactivate(stat2);

	User::WaitForRequest(stat2);

	TEST(stat2.Int() == KErrNone);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNone);

    TEST(contextStatus == RPacketContext::EStatusDeactivating);

    iPacketContext[0].NotifyStatusChange(stat1, contextStatus);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNone);

    TEST(contextStatus == RPacketContext::EStatusInactive);

    CleanupStack::PopAndDestroy(&iPacketContext[0]);

    CleanupStack::PopAndDestroy(&iPacketService);

    User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsContextDelete::CTestGprsContextDelete()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsContextDelete"));

	}

enum TVerdict CTestGprsContextDelete::doTestStepL()

//LOCAL_C void  GprsContextDeleteTest()

/**

 *  This tests the context delete.

 */

    {

    TRequestStatus						stat1;

	TBuf<30>                            contextName;

    RPacketContext::TContextStatus		contextStatus;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    TESTL(iPacketContext[0].OpenNewContext(iPacketService, contextName) == KErrNone);

    CleanupClosePushL(iPacketContext[0]);

	iPacketContext[0].Delete(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNone);

	iPacketContext[0].Activate(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrAccessDenied);

    TEST(iPacketContext[0].GetStatus(contextStatus) == KErrNone);

    TEST(contextStatus == RPacketContext::EStatusDeleted);

    CleanupStack::PopAndDestroy(&iPacketContext[0]);

    CleanupStack::PopAndDestroy(&iPacketService);

	User::After(KFiveSeconds);

	return TestStepResult();

    }   

CTestGprsContextLoanComport::CTestGprsContextLoanComport()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsContextLoanComport"));

	}

enum TVerdict CTestGprsContextLoanComport::doTestStepL()

//LOCAL_C void  GprsContextLoanComport()

/**

 * This tests the comport loan.

 */

    {

	TRequestStatus						stat1;

    TBuf<30>                            contextName;

	RCall::TCommPort dataPort;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    TESTL(iPacketContext[0].OpenNewContext(iPacketService, contextName) == KErrNone);

    CleanupClosePushL(iPacketContext[0]);

    iPacketContext[0].RecoverCommPort(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrEtelPortNotLoanedToClient);

    iPacketContext[0].LoanCommPort(stat1, dataPort);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNotReady);

    iPacketContext[0].Activate(stat1);

	User::WaitForRequest(stat1);

	TESTL(stat1.Int() == KErrNone);

    iPacketContext[0].LoanCommPort(stat1, dataPort);

	User::WaitForRequest(stat1); 

	TEST(stat1.Int() == KErrNone);

    iPacketContext[0].Activate(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrInUse);

    iPacketContext[0].RecoverCommPort(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNone);

    iPacketContext[0].Deactivate(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNone);

    CleanupStack::PopAndDestroy(&iPacketContext[0]);

    CleanupStack::PopAndDestroy(&iPacketService);

	User::After(KFiveSeconds);

	return TestStepResult();

    }   

CTestGprsContextUnSupported::CTestGprsContextUnSupported()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsContextUnSupported"));

	}

enum TVerdict CTestGprsContextUnSupported::doTestStepL()

//LOCAL_C void  GprsContextUnSupportedTest()

/**

 *  This tests all GPRS context API calls.

 */

    {

    TRequestStatus            stat1;

    TBuf<30>                  contextName;

    TInt                      err = 0;

	RPacketContext::TDataVolume volume;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    TESTL(iPacketContext[0].OpenNewContext(iPacketService, contextName) == KErrNone);

    CleanupClosePushL(iPacketContext[0]);

    TEST(iPacketContext[0].GetDataVolumeTransferred(volume) == KErrNotSupported);

    iPacketContext[0].NotifyDataTransferred(stat1, volume);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNotSupported);

    TEST(iPacketContext[0].GetLastErrorCause(err) == KErrNotSupported);

    CleanupStack::PopAndDestroy(&iPacketContext[0]);

    CleanupStack::PopAndDestroy(&iPacketService);

    User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsAttach::CTestGprsAttach()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsAttach"));

	}

enum TVerdict CTestGprsAttach::doTestStepL()

//LOCAL_C void  GprsAttachTestL()

/**

 *  This tests the attach and detach.

 */

    {

    TRequestStatus stat1;

    RPacketService::TStatus status;

    User::LeaveIfError(iPacketService.Open(iPhone));

    CleanupClosePushL(iPacketService);

	iPacketService.Attach(stat1);

    User::WaitForRequest(stat1);

    TEST_CHECKL(stat1.Int(), KErrNone, 

		_L("***Failed to attach to packet service. Check that you are using correct SIM!***"));

	iPacketService.GetStatus(status);

	TEST_CHECKL(status,RPacketService::EStatusAttached,_L("Expected RPacketService::EStatusAttached"));

    iPacketService.Detach(stat1);

    User::WaitForRequest(stat1);

    User::LeaveIfError(stat1.Int());

    iPacketService.GetStatus(status);

	TEST_CHECKL(status,RPacketService::EStatusUnattached,_L("Expected RPacketService::EStatusUnattached"));

    CleanupStack::PopAndDestroy(&iPacketService);

    User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsNotification::CTestGprsNotification()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsNotification"));

	}

enum TVerdict CTestGprsNotification::doTestStepL()

//LOCAL_C void  GprsNotificationTest()

/**

 * Tests Notify Context added, Tests Notify status

 */

    {

    TRequestStatus stat1,stat2,stat3;

    TBuf<20> context= _L("");

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    TBuf<40> contextId;

    iPacketService.NotifyContextAdded(stat1, contextId);

    iPacketService.CancelAsyncRequest(EPacketNotifyContextAdded);

	User::WaitForRequest(stat1);

    TEST(stat1.Int()== KErrCancel);

    iPacketService.NotifyContextAdded(stat1, contextId);

    TESTL(iPacketContext[0].OpenNewContext(iPacketService, context) == KErrNone);

    CleanupClosePushL(iPacketContext[0]);

    User::WaitForRequest(stat1);

    TEST(stat1.Int() == KErrNone);

    RPacketService::TStatus gprsStatus;

    iPacketService.NotifyStatusChange(stat2, gprsStatus);

    iPacketService.CancelAsyncRequest(EPacketNotifyStatusChange);

    User::WaitForRequest(stat2);

    TEST(stat2.Int() == KErrCancel);

    iPacketService.NotifyStatusChange(stat2, gprsStatus);

    iPacketService.Attach(stat1);

	User::WaitForRequest(stat1);

	TEST_CHECKL(stat1.Int(), KErrNone, 

		_L("***Failed to attach to packet service. Check that you are using correct SIM!***"));

    User::WaitForRequest(stat2);

    TEST(stat2.Int() == KErrNone);

    TEST(gprsStatus == RPacketService::EStatusAttached);

	User::After(1000000);	// Delay to allow phone to settle

    iPacketService.NotifyStatusChange(stat3, gprsStatus);

    iPacketService.Detach(stat1);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNone);

    User::WaitForRequest(stat3);

    TEST(stat3.Int() == KErrNone);

    TEST(gprsStatus == RPacketService::EStatusUnattached);

    CleanupStack::PopAndDestroy(&iPacketContext[0]);

    CleanupStack::PopAndDestroy(&iPacketService);

	User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsMsClass::CTestGprsMsClass()

/** Each test step initialises it's own name

*/

	{

	// store the name of this test case

	// this is the name that is used by the script file

	SetTestStepName(_L("TestGprsMsClass"));

	}

enum TVerdict CTestGprsMsClass::doTestStepL()

//LOCAL_C void  GprsMsClassTest()

/**

 * This tests the MS Class.

 */

    {

    TRequestStatus stat1;

    TESTL(iPacketService.Open(iPhone) == KErrNone);

    CleanupClosePushL(iPacketService);

    RPacketService::TMSClass     currentClass;

    RPacketService::TMSClass     maxClass;

    iPacketService.GetMSClass(stat1, currentClass, maxClass);

	User::WaitForRequest(stat1);

	TEST(stat1.Int() == KErrNone);

	const TPtrC phoneBrand = iTestConfigParam->FindAlphaVar(KTestCfgPhoneMake,KNullDesC);

	if(phoneBrand == KTestCfgPhoneMotorola)

		{

		iPacketService.SetMSClass(stat1, currentClass);

		User::WaitForRequest(stat1);

		TEST(stat1.Int() == KErrNone);

	    TEST(currentClass == RPacketService::EMSClassSuspensionRequired);

		TEST(maxClass == RPacketService::EMSClassSuspensionRequired);

		}

    CleanupStack::PopAndDestroy(&iPacketService);

	User::After(KFiveSeconds);

	return TestStepResult();

    }

CTestGprsContextConfig::CTestGprsContextConfig()