// 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:

//

/**

 @file

 @test

 @internalComponent

*/

#include <libc/limits.h> //UINT_MAX

#include "t_fpsappeng.h"

#include "t_pseudoapputils.h"

const TInt KSurfaceWidth = 640;

const TInt KSurfaceHeight = 240;

const TUidPixelFormat KSurfaceFormat = EUidPixelFormatXRGB_8888;

const TInt KBytesPerPixel = 4;	// Four bytes per pixel for the format above.

CFpsAppEng::CFpsAppEng(RWsSession& aClient, CWsScreenDevice& aScreenDevice, RWindow& aWindow)

: CTimer(CActive::EPriorityStandard),

	iClient(aClient),

	iWindow(aWindow),

	iScreenDevice(aScreenDevice)

	{

	}

CFpsAppEng* CFpsAppEng::NewL(RWsSession& aClient, CWsScreenDevice& aScreenDevice, RWindow& aWindow)

    {

    CFpsAppEng* self = new (ELeave) CFpsAppEng(aClient, aScreenDevice, aWindow);

    CleanupStack::PushL(self);

    self->ConstructL();

    CleanupStack::Pop(); // self;

    return self;

    }

CFpsAppEng::~CFpsAppEng()

	{

    if(IsActive())

    	{

	    Cancel();

    	}

	User::Free(iBufPtr1);

	DestroySurface();

	//Pause to allow the test step to kill the app

	User::After(1000000);

	}

void CFpsAppEng::ConstructL()

	{

	CTimer::ConstructL();

	iNoOfPixels = KSurfaceHeight*KSurfaceWidth;

	iNoOfBytes = iNoOfPixels*KBytesPerPixel;

	// Allocate a memory block

	iBufPtr1 = reinterpret_cast<TUint32*>(User::AllocL(iNoOfBytes));

	RDebug::Print(_L("Creating Surface manager..."));

	CreateSurfaceManager();

	RDebug::Print(_L("Creating Surface..."));

	CreateSurface(iSurfaceId);

	RDebug::Print(_L("Create Surface update session..."));

	CreateSurfaceUpdateSessionL();

	CActiveScheduler::Add(this);

	}

void CFpsAppEng::StartDrawing()

	{	

	//A value of 0 will provoke a E32User-Cbase 46 panic

	After(TTimeIntervalMicroSeconds32(100000));

	}

void CFpsAppEng::CreateSurfaceManager()

	{

	TInt ret = iSurfaceManager.Open();

	if(ret==KErrNone)

		{

		RDebug::Print(_L("Creating surface manager OK"));

		}

	}

void CFpsAppEng::CreateSurface(TSurfaceId& aSurfaceId)

	{

	RSurfaceManager::TSurfaceCreationAttributesBuf attribs;

	RSurfaceManager::TSurfaceCreationAttributes& surfaceCreationAtribs=attribs();

	surfaceCreationAtribs.iSize.iWidth = KSurfaceWidth;

	surfaceCreationAtribs.iSize.iHeight = KSurfaceHeight;

	surfaceCreationAtribs.iBuffers = 2;

	surfaceCreationAtribs.iPixelFormat = KSurfaceFormat;

	surfaceCreationAtribs.iStride = KBytesPerPixel*KSurfaceWidth;

	surfaceCreationAtribs.iOffsetToFirstBuffer = 0;

	surfaceCreationAtribs.iAlignment = 4;

	surfaceCreationAtribs.iContiguous = EFalse;

	surfaceCreationAtribs.iMappable = ETrue;

	TInt err = iSurfaceManager.CreateSurface(attribs, aSurfaceId);

	if (err == KErrNone)

		{

		err = iSurfaceManager.MapSurface(aSurfaceId, iChunk);

		}		

	if (err == KErrNone)

		{

		RDebug::Print(_L("Surface created: OK"));

		}

	iSurfacePtr = reinterpret_cast<TUint32*>(iChunk.Base());		

	err=iWindow.SetBackgroundSurface(aSurfaceId);

	if ( err!=KErrNone)

		{

		RDebug::Print(_L("ERROR: %d - Setting window background to the surface failed!"), err);

		User::Panic(_L("Fps panic"), err);

		}

	}

void CFpsAppEng::CreateSurfaceUpdateSessionL()

	{

	TInt ret = iSurfaceUpdateSession.Connect();

	if (ret==KErrAlreadyExists)

		{

		RDebug::Print(_L("Device driver already loaded"));

		}

	else if (ret==KErrNone)

		{

		RDebug::Print(_L("Connected to surface update server"));

		}

	else

		{

		RDebug::Print(_L("Fatal error connecting to surface update server"));

		User::LeaveIfError(ret);

		}

	}

void CFpsAppEng::DestroySurface()

	{

	RDebug::Print(_L("Destroy Surface update session"));

	iSurfaceUpdateSession.Close();

	RDebug::Print(_L("Closing chunk"));

	iChunk.Close();

	RDebug::Print(_L("Closing surface"));

	TInt ret = iSurfaceManager.CloseSurface(iSurfaceId);

	if(ret!=KErrNone)

		{

		RDebug::Print(_L("Surface manager failed to close"));

		}

	RDebug::Print(_L("Close Surface Manager"));

	iSurfaceManager.Close();

	}

// Timer's RunL()

void CFpsAppEng::RunL()

	{

	TInt j;

	if (iCol1)

		{

		for (j=0; j<iNoOfPixels; j++)

			{		

			iBufPtr1[j]=0xFF00FF00;

			}		

		iCol1=EFalse;

		iCol2=ETrue;		

		}

	else

		{

		for (j=0; j<iNoOfPixels; j++)

			{		

			iBufPtr1[j]=0xFF0000FF;

			}		

		iCol2=EFalse;

		iCol1=ETrue;		

		}

	Mem::Move(iSurfacePtr, iBufPtr1, iNoOfBytes);

	__ASSERT_ALWAYS( KErrNone==iSurfaceUpdateSession.SubmitUpdate(KAllScreens, iSurfaceId, 0, NULL),User::Panic(_L("Fps App"), -1));

	iClient.Flush();

//	After(TTimeIntervalMicroSeconds32(10000));	// 0.002sec, 100fps	

//	After(TTimeIntervalMicroSeconds32(20000));	// 0.02sec,  50fps

//	After(TTimeIntervalMicroSeconds32(25000));	// 0.025sec, 40fps

	After(TTimeIntervalMicroSeconds32(33333));	// 0.033sec, 30fps	

//	After(TTimeIntervalMicroSeconds32(50000));  // 0.050sec, 20fps

//	After(TTimeIntervalMicroSeconds32(100000));  //0.01sec,  10fps

	}

// Timer's DoCancel()

void CFpsAppEng::DoCancel()

	{

	// Cancel timer

	CTimer::DoCancel();

	}