sl@0: // Copyright (c) 2008-2009 Nokia Corporation and/or its subsidiary(-ies).
sl@0: // All rights reserved.
sl@0: // This component and the accompanying materials are made available
sl@0: // under the terms of "Eclipse Public License v1.0"
sl@0: // which accompanies this distribution, and is available
sl@0: // at the URL "http://www.eclipse.org/legal/epl-v10.html".
sl@0: //
sl@0: // Initial Contributors:
sl@0: // Nokia Corporation - initial contribution.
sl@0: //
sl@0: // Contributors:
sl@0: //
sl@0: // Description:
sl@0: //
sl@0: 
sl@0: /**
sl@0:  @file
sl@0:  @test
sl@0:  @internalComponent
sl@0: */
sl@0: 
sl@0: #include "t_wservratelimiterteststep.h"
sl@0: #include <test/tefunit.h>
sl@0: #include <e32const.h>
sl@0: #include <gdi.h>
sl@0: #include <stdlib.h>
sl@0: #include "constants.h"
sl@0: 
sl@0: const TPoint KWinPos(0,0);
sl@0: const TSize KWinSize(640,240);
sl@0: const TRect KWinRect(KWinPos,KWinSize);
sl@0: const TRect KEllipseRect(TPoint(10,10), TSize(50,50));
sl@0: 
sl@0: //Name of the test step
sl@0: _LIT(KT_WServRateLimiterTestStep,"T_WServRateLimiterTestStep");
sl@0: 
sl@0: 
sl@0: /**
sl@0:   The test code manager, provides functions to set active object 
sl@0:   with lowest priority for running tests in auto mode.
sl@0:  */
sl@0: class CTestManager : public CActive
sl@0: 	{
sl@0: friend class CT_WServRateLimiterTestStep;
sl@0: protected:
sl@0: 	static CTestManager* NewL(MTestCases* aAutoTestApp);
sl@0: 	~CTestManager();
sl@0: 	void FinishAllTestCases();
sl@0: 	void StartTest(); //initialize an active object and set it status as active
sl@0: private: 
sl@0: 	CTestManager(MTestCases* aAutoTestApp);
sl@0: 	// from CActive
sl@0: 	void RunL();
sl@0: 	void DoCancel();
sl@0: private:
sl@0: 	MTestCases* iTestCase;
sl@0: 	TInt iCurTestCaseNumber; //a current test case, every time when function RunTestCaseL is called this member inc by one
sl@0: 	TBool iTestCompleted;
sl@0: 	};
sl@0: 
sl@0: /** Construct an active object with the lowest priority */
sl@0: CTestManager::CTestManager(MTestCases* aTestCases) :
sl@0: 			CActive(EPriorityIdle), 
sl@0: 			iTestCase(aTestCases)
sl@0: 	{
sl@0: 	}
sl@0: 
sl@0: CTestManager::~CTestManager()
sl@0: 	{
sl@0: 	Cancel();
sl@0: 	}
sl@0: 
sl@0: CTestManager* CTestManager::NewL(MTestCases* aTestCases)
sl@0: 	{
sl@0:      CTestManager *theTestManager=new (ELeave) CTestManager(aTestCases);
sl@0:      CActiveScheduler::Add(theTestManager);
sl@0: 	 return theTestManager;
sl@0: 	}
sl@0: 
sl@0: void CTestManager::RunL()
sl@0: 	{
sl@0: 	if(	iTestCompleted)
sl@0: 		{
sl@0: 		return;
sl@0: 		}
sl@0: 	
sl@0: 	// debug statement to indicate progress of test suite by
sl@0: 	// printing the sub-test that is currently active
sl@0: 	TTime timeStamp;
sl@0: 	timeStamp.HomeTime();
sl@0: 	TBuf<50> dateStr;
sl@0: 	_LIT(KDateString3,"%-B%:0%J%:1%T%:2%S%:3 %Cms");
sl@0: 	timeStamp.FormatL(dateStr, KDateString3);
sl@0: 	RDebug::Print(_L("%S - Test Case Number: %d"), &dateStr, ++iCurTestCaseNumber);
sl@0: 	
sl@0: 	iTestCase -> RunTestCaseL(iCurTestCaseNumber);
sl@0: 	if(!iTestCompleted)
sl@0: 		{
sl@0: 		StartTest();
sl@0: 		}
sl@0: 	}
sl@0: 
sl@0: void CTestManager::DoCancel()
sl@0: 	{
sl@0: 	iTestCompleted = ETrue;
sl@0: 	}
sl@0: 
sl@0: /**
sl@0:  	Initialize an active object and set it as active
sl@0:  */
sl@0: void CTestManager::StartTest()
sl@0: 	{
sl@0: 	TRequestStatus *pS= (&iStatus);
sl@0: 	User::RequestComplete(pS, 0);
sl@0: 	SetActive();
sl@0: 	}
sl@0: 
sl@0: 
sl@0: /**
sl@0:  Stop active scheduler, and quit a test step	
sl@0:  */
sl@0: void CTestManager::FinishAllTestCases()
sl@0: 	{
sl@0: 	iTestCompleted = ETrue;
sl@0: 	CActiveScheduler::Stop();
sl@0: 	}
sl@0: 
sl@0: 
sl@0: //
sl@0: // Wait till redraws finished //
sl@0: //
sl@0: 
sl@0: enum TTRateLimiterActivePriorities
sl@0: 	{
sl@0: 	ETRateLimiterRedrawActivePriority=-10,
sl@0: 	};
sl@0: 
sl@0: class CStopTheScheduler : public CAsyncOneShot
sl@0: 	{
sl@0: public:
sl@0: 	CStopTheScheduler(TInt aPriority);
sl@0: 	static CStopTheScheduler* NewL(TInt aPriority);
sl@0: 	void RunL();
sl@0: 	};
sl@0: 
sl@0: CStopTheScheduler* CStopTheScheduler::NewL(TInt aPriority)
sl@0: 	{
sl@0: 	return new(ELeave)CStopTheScheduler(aPriority);
sl@0: 	}
sl@0: 
sl@0: CStopTheScheduler::CStopTheScheduler(TInt aPriority)
sl@0: 	:CAsyncOneShot(aPriority)
sl@0: 	{
sl@0: 	}
sl@0: 
sl@0: void CStopTheScheduler::RunL()
sl@0: 	{
sl@0: 	CActiveScheduler::Stop();
sl@0: 	}
sl@0: 
sl@0: void WaitForRedrawsToFinish()
sl@0: 	{
sl@0: 	CStopTheScheduler* ps=new CStopTheScheduler(ETRateLimiterRedrawActivePriority);
sl@0: 	if(ps)
sl@0: 		{
sl@0: 		ps->Call();
sl@0: 		CActiveScheduler::Start();
sl@0: 		delete ps;
sl@0: 		}
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: Constructor of CT_WServRateLimiterTestStep
sl@0: */
sl@0: CT_WServRateLimiterTestStep::CT_WServRateLimiterTestStep():
sl@0: 		iTwoScreens(EFalse)
sl@0: 	{
sl@0: 	SetTestStepName(KT_WServRateLimiterTestStep);
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: Destructor of CT_WServRateLimiterTestStep
sl@0: */
sl@0: CT_WServRateLimiterTestStep::~CT_WServRateLimiterTestStep()
sl@0: 	{
sl@0: 	delete iGc;
sl@0: 	delete iGc2;
sl@0: 	delete iScreen;
sl@0: 	delete iScreen1;
sl@0: 	iWinGroup.Close();
sl@0: 	iWinGroup1.Close();
sl@0: 	iWsSession.Flush();
sl@0: 	iWsSession.Close();
sl@0: 	if(iTestManager)
sl@0: 		{
sl@0: 		iTestManager -> Cancel();
sl@0: 		}
sl@0: 	delete iTestManager;
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: Starts test step
sl@0: @return TVerdict pass / fail
sl@0: */
sl@0: enum TVerdict CT_WServRateLimiterTestStep::doTestStepL()
sl@0: 	{
sl@0: 	iDisplayMode = EColor64K;
sl@0: 	User::LeaveIfError(iWsSession.Connect());
sl@0: 
sl@0: 	// Screen 1 setup
sl@0: 	iScreen = new (ELeave) CWsScreenDevice(iWsSession);
sl@0: 	User::LeaveIfError(iScreen->Construct());
sl@0: 	iWinGroup = RWindowGroup(iWsSession);
sl@0: 	User::LeaveIfError(iWinGroup.Construct(KNullWsHandle, iScreen));
sl@0: 	iWinGroup.AutoForeground(ETrue);
sl@0: 	
sl@0: 	// Gc setup
sl@0: 	iGc = new (ELeave) CWindowGc(iScreen);
sl@0: 	User::LeaveIfError(iGc->Construct());
sl@0: 
sl@0: 	// Screen 2 setup
sl@0: 	iScreen1 = new (ELeave) CWsScreenDevice(iWsSession);
sl@0: 	if (iWsSession.NumberOfScreens() > 1)
sl@0: 		{
sl@0: 		iTwoScreens = ETrue;
sl@0: 		}
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		User::LeaveIfError(iScreen1->Construct(1));
sl@0: 		iWinGroup1 = RWindowGroup(iWsSession);
sl@0: 		User::LeaveIfError(iWinGroup1.Construct(KNullWsHandle, iScreen1) );
sl@0: 		iWinGroup1.AutoForeground(ETrue);
sl@0: 		
sl@0: 		// Gc setup
sl@0: 		iGc2 = new (ELeave) CWindowGc(iScreen1);
sl@0: 		User::LeaveIfError(iGc2->Construct());
sl@0: 		}
sl@0: 	
sl@0: 	iWsSession.Finish();
sl@0: 		
sl@0: 	CActiveScheduler* theAs = new (ELeave) CActiveScheduler;
sl@0: 	CleanupStack::PushL(theAs);
sl@0: 	CActiveScheduler::Install(theAs);
sl@0: 	
sl@0: 	iTestManager = CTestManager::NewL(this);
sl@0: 	iTestManager -> StartTest();
sl@0: 	CActiveScheduler::Start();
sl@0: 	
sl@0: 	CleanupStack::PopAndDestroy(theAs);
sl@0: 	
sl@0: 	return TestStepResult();
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: Creates a RWindow
sl@0: @param aWinGroup The window group object
sl@0: @param aWin	The window object
sl@0: @param aPos	The Position of the window
sl@0: @param aBkgdColor The background color of the window
sl@0: @param aSize The size of the window
sl@0: @param aHandle The handle of the window
sl@0: */
sl@0: void CT_WServRateLimiterTestStep::CreateRWindowL(const RWindowGroup& aWinGroup, 
sl@0: 												   RWindow& aWin, 
sl@0: 												   const TPoint& aPos, 
sl@0: 												   const TRgb& aBkgdColor, 
sl@0: 												   const TSize& aWinSize,
sl@0: 												   const TUint32 aHandle)
sl@0: 	{
sl@0: 	aWin = RWindow( iWsSession );
sl@0: 	CleanupClosePushL( aWin );
sl@0: 	User::LeaveIfError( aWin.Construct( aWinGroup, aHandle ) );
sl@0: 	CleanupStack::Pop(&aWin);
sl@0: 	aWin.SetExtent(aPos, aWinSize);
sl@0: 	aWin.SetBackgroundColor( aBkgdColor );
sl@0: 	aWin.Activate();
sl@0: 	aWin.SetVisible( ETrue );
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: Draw the actual animation
sl@0: @param aWin The window object
sl@0: @param aGraphic The graphic to draw
sl@0: @param aGc The gc do draw with
sl@0: */
sl@0: void CT_WServRateLimiterTestStep::DrawGraphic(RWindow& aWin, CWsGraphic* aGraphic, CWindowGc* aGc)
sl@0: 	{
sl@0: 	aGc->Activate(aWin);
sl@0: 	TBuf8<1> animData; 
sl@0: 	animData.Append(0);
sl@0: 	aGc->DrawWsGraphic(aGraphic->Id(),TRect(KWinPos, KWinSize),animData);
sl@0: 	aGc->Deactivate();
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: @param aActualFrameRate The actual frame rate of the animation
sl@0: @param aExpectedFrameRate The expected frame rate of the animation
sl@0: @param aErrorThreshhold The error allowed between the actual and expected frame rate
sl@0: */
sl@0: TBool CT_WServRateLimiterTestStep::IsRunningAtExpectedFrameRate(TReal aActualFrameRate, TReal aExpectedFrameRate, TReal aErrorThreshHold)
sl@0: 	{
sl@0: 	TReal diff=aActualFrameRate-aExpectedFrameRate;
sl@0: 	return (-diff<=aErrorThreshHold && diff<=aErrorThreshHold);
sl@0: 	}
sl@0: 
sl@0: /**
sl@0: @SYMTestCaseID			GRAPHICS-WSERV-2095-0014
sl@0: @SYMPREQ				2095
sl@0: @SYMTestCaseDesc		Running a CRP animation on one screen at a limited rate or both screens both at different rates			
sl@0: @SYMTestActions			Run CRP animation on one or 2 screens if 2 are available 
sl@0: @SYMTestStatus			Implemented
sl@0: @SYMTestPriority		2
sl@0: @SYMTestExpectedResults	If 1 screen available:
sl@0: 						CRP animation occurs at ratelimited rate
sl@0: 						If 2 screens available:
sl@0: 						CRP animation occur at different rates on both screens.
sl@0: 						CRP animation occur at expected rates on both screens.
sl@0: @SYMTestType			CT
sl@0: */	
sl@0: void CT_WServRateLimiterTestStep::TestRateLimitedAnimationL()
sl@0: 	{
sl@0: 	CWsRateLimitGraphic* rateLimitGraphic1 = CWsRateLimitGraphic::NewL();
sl@0: 	CleanupStack::PushL(rateLimitGraphic1);
sl@0: 	
sl@0: 	CWsRateLimitGraphic* rateLimitGraphic2 = NULL;
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		rateLimitGraphic2 = CWsRateLimitGraphic::NewL();
sl@0: 		CleanupStack::PushL(rateLimitGraphic2);
sl@0: 		}
sl@0: 	
sl@0: 	RWindow win1;
sl@0: 	CleanupClosePushL(win1);
sl@0: 	CreateRWindowL(iWinGroup, win1, KWinPos, KRgbBlue, KWinSize);
sl@0: 	win1.BeginRedraw();
sl@0: 	DrawGraphic(win1, rateLimitGraphic1, iGc); // running at a limited rate
sl@0: 	win1.EndRedraw();
sl@0: 	
sl@0: 	RWindow win2;
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		CleanupClosePushL(win2);
sl@0: 		CreateRWindowL(iWinGroup1, win2, KWinPos, KRgbBlue, KWinSize);
sl@0: 		win2.BeginRedraw();
sl@0: 		DrawGraphic(win2, rateLimitGraphic2, iGc2); // running flat out
sl@0: 		win2.EndRedraw();
sl@0: 		}
sl@0: 	
sl@0: 	iWsSession.Finish();
sl@0: 	
sl@0: 	User::After(KAnimLength + 2000000); // Animation length + 2 secs
sl@0: 
sl@0: 	//Stores data obtained from server side of CRP
sl@0: 	TAnimData animData;
sl@0: 	
sl@0: 	//Invoke the plug-in and get the frame rate values
sl@0: 	Mem::FillZ(&animData, sizeof(TAnimData));
sl@0: 	
sl@0: 	// Retrieve anim data from first crp
sl@0: 	rateLimitGraphic1->QueryPluginForFrameRate(animData);
sl@0: 	iWsSession.Finish();
sl@0: 	WaitForRedrawsToFinish();
sl@0: 	TReal frameRate1 = animData.iFrameRate; 
sl@0: 	
sl@0: 	TReal frameRate2 = 0.0;
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		// Retrieve anim data from second crp
sl@0: 		rateLimitGraphic2->QueryPluginForFrameRate(animData);
sl@0: 		iWsSession.Finish();
sl@0: 		WaitForRedrawsToFinish();
sl@0: 		frameRate2 = animData.iFrameRate; 
sl@0: 		}
sl@0: 	
sl@0: 	/* Test, screen0(first screen) is running at approximately the correct rate */ 
sl@0: 	TReal rateLimtedExpectedFrameRate = KOneSecondInMicroSecs / KFrameRateDelay;
sl@0: 	INFO_PRINTF2(_L("Test if screen0 is running at approximately the correct rate of %f"), rateLimtedExpectedFrameRate);
sl@0: 	INFO_PRINTF2(_L("Screen0 Actual Frame Rate = %f"), frameRate1);
sl@0: 	TBool isCorrectRate1 = IsRunningAtExpectedFrameRate(frameRate1,rateLimtedExpectedFrameRate, KStdErrorThreshHold);
sl@0: 	TEST(isCorrectRate1);
sl@0: 	
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		/* Test, screen1(second screen) is running at approximately the correct rate */ 
sl@0: 		INFO_PRINTF2(_L("Test if screen1 is running at faster than %f fps"), KStdMinimumFrameRate);
sl@0: 		INFO_PRINTF2(_L("Screen1 Actual Frame Rate = %f"), frameRate2);
sl@0: 		TBool isCorrectRate2 = frameRate2 > KStdMinimumFrameRate;
sl@0: 		TEST(isCorrectRate2);
sl@0: 		}
sl@0: 	
sl@0: 	if (iTwoScreens)
sl@0: 		{
sl@0: 		CleanupStack::PopAndDestroy(4, rateLimitGraphic1);
sl@0: 		}
sl@0: 	else
sl@0: 		{
sl@0: 		CleanupStack::PopAndDestroy(2,rateLimitGraphic1);
sl@0: 		}
sl@0: 
sl@0: 	}
sl@0: 
sl@0: void CT_WServRateLimiterTestStep::RunTestCaseL(TInt /*aCurTestCase*/)
sl@0: 	{
sl@0: 	switch( iTestId )
sl@0: 		{
sl@0: 		case 0:
sl@0: 			if (iTwoScreens)
sl@0: 				{
sl@0: 				INFO_PRINTF1(_L("Testing both screens running animation at different frame rates"));
sl@0: 				}
sl@0: 			else
sl@0: 				{
sl@0: 				INFO_PRINTF1(_L("Testing one screen running animation at ratelimited frame rate"));
sl@0: 				}
sl@0: 			
sl@0: 			TestRateLimitedAnimationL();
sl@0: 			break;
sl@0: 		default:
sl@0: 			iTestManager->FinishAllTestCases();
sl@0: 			break;	
sl@0: 		}
sl@0: 	iTestId++;
sl@0: 	}