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

// ctlbsptamolrpartialearlycomplete..cpp

// This is the class implementation for the MO-LR - Accurate GPS Result scenario Tests

// 

//

// LBS includes. 

#include <lbs/test/lbsnetprotocolproxy.h>

#include <lbs/lbsnetprotocolbase.h>

#include <lbs/lbsassistancedatabuilderset.h>

// LBS test includes.

#include "ctlbsptamolrpartialearlycomplete.h"

#include <lbs/test/tlbsutils.h>

#include "argutils.h"

#include <lbs/test/activeyield.h>

/**

Static Constructor

*/

CT_LbsPTAMOLRPartialEarlyComplete* CT_LbsPTAMOLRPartialEarlyComplete::New(CT_LbsHybridMOLRServer& aParent)

	{

	// Note that we do not use ELeave.

	// This means that having insufficient memory will return NULL;

	CT_LbsPTAMOLRPartialEarlyComplete* testStep = new CT_LbsPTAMOLRPartialEarlyComplete(aParent);

	if (testStep)

		{

		TInt err = KErrNone;

		TRAP(err, testStep->ConstructL());

		if (err)

			{

			delete testStep;

			testStep = NULL;

			}

		}

	return testStep;

	}

/**

 * Constructor

 */

CT_LbsPTAMOLRPartialEarlyComplete::CT_LbsPTAMOLRPartialEarlyComplete(CT_LbsHybridMOLRServer& aParent) : CT_LbsHybridMOLRStep(aParent)

	{

	SetTestStepName(KLbsPTAMOLRPartialEarlyComplete);

	iSessionId.SetSessionOwner(KRequestUid);

	iSessionId.SetSessionNum(0x0005);

	}

void CT_LbsPTAMOLRPartialEarlyComplete::ConstructL()

	{

	// Create the base class objects.

	CT_LbsHybridMOLRStep::ConstructL();

	}

/**

 * Destructor

 */

CT_LbsPTAMOLRPartialEarlyComplete::~CT_LbsPTAMOLRPartialEarlyComplete()

	{

	}

TVerdict CT_LbsPTAMOLRPartialEarlyComplete::doTestStepL()

	{

	INFO_PRINTF1(_L("CT_LbsPTAMOLRPartialEarlyComplete::doTestStepL()"));	

	// Stop the test if the preable failed

	TESTL(TestStepResult() == EPass);

	const TInt KTimeOut = 60*1000*1000;

	// Create Network Protocol Proxy

	CNetProtocolProxy* proxy = CNetProtocolProxy::NewL();

	CleanupStack::PushL(proxy);

	// >> AdviceSystemStatus(0) - GetCurrentCapabilitiesResponse

	TESTL(proxy->WaitForResponse(KTimeOut) == ENetMsgGetCurrentCapabilitiesResponse);

	CLbsNetworkProtocolBase::TLbsSystemStatus status;

	TInt cleanupCnt;

	cleanupCnt = proxy->GetArgsLC(ENetMsgGetCurrentCapabilitiesResponse, &status);

	TESTL(status == CLbsNetworkProtocolBase::ESystemStatusNone);

	CleanupStack::PopAndDestroy(cleanupCnt);

	// Start Actual Test Step

	RPositionServer server;

	TESTL(KErrNone == server.Connect());

	CleanupClosePushL(server);	

	RPositioner pos;

	TESTL(KErrNone == pos.Open(server));

	CleanupClosePushL(pos);

	// Set the max fix time for the client request to ensure the location server does not complete the request too soon during the test.

	TPositionUpdateOptions posOpts(TTimeIntervalMicroSeconds(0), TTimeIntervalMicroSeconds(KMOLRFixTime), 0 , ETrue);

	pos.SetUpdateOptions(posOpts);

	CPosServerWatcher *pWatch = CPosServerWatcher::NewLC(pos, *this);

	// Client Send: Request a self-locate MoLr.

	pWatch->IssueNotifyPositionUpdate();

	//Recv: RequestSelfLocation()

	TESTL(proxy->WaitForResponse(KTimeOut) == ENetMsgRequestSelfLocation);

	// Process the response.

	TLbsNetSessionId* 					sessionId = NULL;

	TLbsNetPosRequestOptionsAssistance*	opts = NULL;

	cleanupCnt = proxy->GetArgsLC(ENetMsgRequestSelfLocation, &sessionId, &opts);

	TBool qualitycheck = ArgUtils::CompareQuality(	opts, 

													ETrue, 

													KMinHorizontalAcc, 	/* as read from quality profile on z: */

													KMinVerticalAcc, 

													KMOLRFixTime,

													0, 

													EAssistanceDataReferenceTime, 

													(TPositionModuleInfo::ETechnologyNetwork 

													| TPositionModuleInfo::ETechnologyAssisted)

												);					

	TESTL(qualitycheck);

	iSessionId.SetSessionNum(sessionId->SessionNum());

	iSessionId.SetSessionOwner(sessionId->SessionOwner());

	CleanupStack::PopAndDestroy(cleanupCnt);

	//Send: ProcessStatusUpdate(EServiceSelfLocation)

	MLbsNetworkProtocolObserver::TLbsNetProtocolServiceMask activeServiceMask = MLbsNetworkProtocolObserver::EServiceSelfLocation;

	proxy->CallL(ENetMsgProcessStatusUpdate, &activeServiceMask);

	// Client Recv: (KPositionPartialUpdate, GPS Info)

//	in  TAP mode dont get any AGPS psotions! CheckForObserverEventTestsL(KTimeOut, *this);

//	TESTL(iState == EGpsPartialInitReceived);

//Client Send: Notify Position Update

//	pWatch->IssueNotifyPositionUpdate();

	//Recv: RequestAssistanceData(Mask=0) - as result of the second client noitfy update request.

	TLbsAsistanceDataGroup dataMask;

	TESTL(proxy->WaitForResponse(KTimeOut) == ENetMsgRequestAssistanceData); 

	cleanupCnt = proxy->GetArgsLC(ENetMsgRequestAssistanceData, &dataMask);

	TESTL(dataMask == EAssistanceDataNone);

	CleanupStack::PopAndDestroy(cleanupCnt);

	//Client Send: CompleteRequest

	TESTL(pos.CompleteRequest(EPositionerNotifyPositionUpdate) == KErrNone);

	// Client Recv: Second Partial update position - This should return with KPositionEarlyComplete

	CheckForObserverEventTestsL(KTimeOut, *this);

	TESTL(iState == EGpsPartialEarlyReceived);

	//Send: ProcessLocationUpdate(SessionId, RefPosition)

	TPositionInfo refPosInfo = ArgUtils::MolrReferencePositionInfo();

	proxy->CallL(ENetMsgProcessLocationUpdate, &iSessionId, &refPosInfo);

	//Send: ProcessAssistanceData()

	dataMask = EAssistanceDataReferenceTime;

	RLbsAssistanceDataBuilderSet assistanceData;

	ArgUtils::PopulateLC(assistanceData);

	TInt reason = KErrNone;

	proxy->CallL(ENetMsgProcessAssistanceData, &dataMask, &assistanceData, &reason);

	CleanupStack::PopAndDestroy();

	//Send: ProcessLocationRequest(SessionId, HybridMode, alpha2)

	TBool emergency = EFalse;

	MLbsNetworkProtocolObserver::TLbsNetProtocolService service = MLbsNetworkProtocolObserver::EServiceSelfLocation;

	TLbsNetPosRequestQuality quality = ArgUtils::Quality(); 

	quality.SetMaxFixTime(ArgUtils::Alpha2());

	TLbsNetPosRequestMethod method   = ArgUtils::RequestHybridMethod();

	proxy->CallL(ENetMsgProcessLocationRequest, &iSessionId, &emergency, &service, &quality, &method);

	//Recv: RequestAssistanceData(Mask=0)

	TESTL(proxy->WaitForResponse(KTimeOut) == ENetMsgRequestAssistanceData); 

	cleanupCnt = proxy->GetArgsLC(ENetMsgRequestAssistanceData, &dataMask);

	TESTL(dataMask == EAssistanceDataNone);

	CleanupStack::PopAndDestroy(cleanupCnt);

	//Recv: Wait for and process the response (SessionId=1, KErrNone, GpsPos2)

	TESTL(proxy->WaitForResponse(KTimeOut) == ENetMsgRespondLocationRequest);

	TPositionInfo* positionInfo = NULL;

	sessionId = NULL;

	cleanupCnt = proxy->GetArgsLC(ENetMsgRespondLocationRequest, &sessionId, &reason, &positionInfo);

	TESTL(positionInfo->PositionClassType() == (EPositionInfoClass|EPositionCourseInfoClass|EPositionSatelliteInfoClass));

	TESTL(sessionId->SessionNum() == iSessionId.SessionNum());

	TESTL(reason == KErrNone);

	CleanupStack::PopAndDestroy(cleanupCnt);

	//Send: ProcessLocationUpdate(SessionId, FinalNetworkPosition)

	TPositionInfo networkPosInfo = ArgUtils::MolrNetworkPositionInfo();

	proxy->CallL(ENetMsgProcessLocationUpdate, &iSessionId, &networkPosInfo);

	//Send: ProcessSessionComplete(SessionId, KErrNone)	

	reason = KErrNone;

	proxy->CallL(ENetMsgProcessSessionComplete, &iSessionId, &reason);

	//Send: ENetMsgProcessStatusUpdate()

	MLbsNetworkProtocolObserver::TLbsNetProtocolServiceMask serviceMask = MLbsNetworkProtocolObserver::EServiceNone;

	proxy->CallL(ENetMsgProcessStatusUpdate, &serviceMask);

	// Wait for 10 seconds to ensure no additional responses turn up.

	TInt delta = 10 * 1000 * 1000;

	TNetProtocolResponseType mType = proxy->WaitForResponse(delta);

	TESTL(mType == ENetMsgTimeoutExpired);

	//Done. Now cleanup...

	CleanupStack::PopAndDestroy(pWatch);

	CleanupStack::PopAndDestroy(); // pos

	CleanupStack::PopAndDestroy(); // server	

	CleanupStack::PopAndDestroy(proxy);

	return TestStepResult();

	}

// MPosServerObserver

void CT_LbsPTAMOLRPartialEarlyComplete::OnGetLastKnownPosition(TInt32 /*aErr*/, const TPositionInfoBase& /*aPosInfo*/)

	{

	TEST(EFalse); // Shouldn't see this...

	ReturnToTestStep();

	}

void CT_LbsPTAMOLRPartialEarlyComplete::OnNotifyPositionUpdate(TInt32 aErr, const TPositionInfoBase& aPosInfo)

	{

	// Verify position.

	TEST(aPosInfo.PositionClassType() == EPositionInfoClass);

	// Expecting first partial update, NaN position.

	if (iState == EInitializing)

		{

		iState = EGpsPartialInitReceived;

		TEST(aErr == KPositionPartialUpdate);

		TEST(aPosInfo.PositionMode() == (TPositionModuleInfo::ETechnologyTerminal | TPositionModuleInfo::ETechnologyAssisted));

		// check for nan in partial updates

		const TPositionInfo posInfo = static_cast<const TPositionInfo&>(aPosInfo);

		TESTL(ArgUtils::ComparePositionInfoToNan(posInfo));

		}

	// Expecting previous partial update due to CompleteRequest(...)

	else if (iState == EGpsPartialInitReceived)

		{

		iState = EGpsPartialEarlyReceived;

		TEST(aErr == KPositionEarlyComplete);

		TEST(aPosInfo.PositionMode() == (TPositionModuleInfo::ETechnologyTerminal | TPositionModuleInfo::ETechnologyAssisted));

		const TPositionInfo posInfo = static_cast<const TPositionInfo&>(aPosInfo);

		TESTL(ArgUtils::ComparePositionInfoToNan(posInfo));

		}

	// Not expecting anything else.

	else

		{

		TEST(EFalse);

		}

	ReturnToTestStep();

	}