/*

 * Copyright (c) 2003-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: 

 *

 */

 #include <bitdev.h>

 #include <fntstore.h>

 #include <fbs.h>

 #include <graphics/fbsdefs.h>

 #include "T_GlyphTreeDel.h"

 const TDisplayMode testDisplayModes[] =	

 	{

 	EGray2,

 	EGray4,

 	EGray16,

 	EGray256,

 	EColor16,

 	EColor256,

 	EColor64K,

 	EColor16M,

 	EColor4K,

 	EColor16MU,

 	EColor16MA,

 	EColor16MAP,

 	};

 // This test is based on code from the TTAGMA test in form

 CTGlyphTreeDel::CTGlyphTreeDel(CTestStep* aStep):

 	iStep(aStep)

 	{

 	}

 CTGlyphTreeDel::~CTGlyphTreeDel()

 	{

 	delete iGc;

 	delete iDev;

 	RFbsSession::Disconnect();

 	}

 CTGlyphTreeDel* CTGlyphTreeDel::NewL(CTestStep* aStep)

 	{

 	CTGlyphTreeDel *theTest = new (ELeave) CTGlyphTreeDel(aStep);

 	CleanupStack::PushL(theTest);

 	theTest->ConstructL();

 	CleanupStack::Pop();

 	return theTest;

 	}

 void CTGlyphTreeDel::ConstructL()

 	{

 	iStep -> INFO_PRINTF1(_L("DEF047283"));

 	RFbsSession::Connect();

 	iFbs = RFbsSession::GetSession();

 	if (iFbs == NULL)

 		User::Leave(KErrGeneral);

 	User::LeaveIfError(CreateScreenDevice());

 	iDev->ChangeScreenDevice(NULL);

 	iDev->SetAutoUpdate(ETrue);

 	iDev->CreateContext(iGc);

 	}

 TInt CTGlyphTreeDel::CreateScreenDevice()

 	{

 	TInt err = KErrNone;

 	TInt sizeOfDisplayMode = sizeof (testDisplayModes) / sizeof(testDisplayModes[0]);

 	for(TInt theScreenModeIndex = sizeOfDisplayMode - 1; theScreenModeIndex ; theScreenModeIndex--)

 		{

 		TDisplayMode disp = testDisplayModes[theScreenModeIndex];

 		TRAP(err, iDev = CFbsScreenDevice::NewL(_L(""), disp)); //scdv

 		if(err == KErrNone)

 			{

 			iStep->INFO_PRINTF2(_L("Device %d has been created"), disp);

 			return KErrNone;

 			}

 		}

 	return err;	

 	}

 // Get System free Ram

 TInt CTGlyphTreeDel::GetRam()

 	{

 	TMemoryInfoV1Buf memory;

 	UserHal::MemoryInfo(memory);

 	return(TInt)(memory().iFreeRamInBytes);	

 	}

 void CTGlyphTreeDel::CheckRam( TInt beforeFreeRam)

 	{

 	TInt freeRam=GetRam();

 	if( beforeFreeRam < freeRam)

 		{

 		iStep -> INFO_PRINTF2( _L("Freed  %08d bytes of RAM\n"), freeRam-beforeFreeRam);

 		}

 	else if( beforeFreeRam > freeRam)

 		{

 		iStep -> INFO_PRINTF2( _L("Leaked %08d bytes of RAM\n"), beforeFreeRam-freeRam);

 		}

 	}

 /**

 	@SYMTestCaseID

 	GRAPHICS-FNTSTORE-0034

 	@SYMTestCaseDesc

 	Tests glyph cache. 

 	@SYMTestActions

 	1. Sets pen style to null pen.

 	2. Sets brush color to gray.

 	3. Sets brush style to solid.

 	4. Retrieves number of typefaces.

 	5. Retrieves the details of the typeface family.

 	6. Gets the font which is the nearest to the given font specification.

 	7. Sets the retrieved font to be used into the graphic context.

 	8. Draws a string to the display.

 	9. Releases the font.

 	10. Discards the font.

 	11. Glyph cache is filled by looping. The glyph cache heap should be large enough

 		for all subsequent loops, if the glyph tree is successfully deleted after the font is

 		discarded. 

 	12. Waits three seconds after the loops complete for the first time. Then records the free RAM. 

 	    No extra RAM should be required to be allocated after this point.

 	13. Check if there is any RAM loss.

 	@SYMTestExpectedResults

 	Test should pass

 */

 void CTGlyphTreeDel::TestGlyphTreeDeleteL()

 	{

     iGc->SetPenStyle(CGraphicsContext::ENullPen);

     iGc->SetBrushColor(KRgbGray);

     iGc->SetBrushStyle(CGraphicsContext::ESolidBrush);

 	TInt typefaces = iDev->NumTypefaces();

 	TTypefaceSupport info;	

 	TInt fontSize = 24;

 	TInt beforeFreeRam = GetRam(); 		// Initialise here because of WINS warning

 	for(TInt loop=0;loop<100;++loop)

 		{		

 		if (loop&1) //if it is odd

 			fontSize+=12;

 		else

 			fontSize-=12;

 		TInt count=0;

 		TInt forLoop = 0;

 		for (count=0;count < typefaces; count++)

 			{

 			iDev->TypefaceSupport(info, count); 

 			TFontSpec fs;

 			fs.iTypeface = info.iTypeface;

 			fs.iHeight = fontSize;

 			CFbsFont* font = NULL;

 			TInt err = iDev->GetNearestFontToDesignHeightInPixels((CFont*&)font, fs);

 			if( font == NULL)

 				{

 				iStep -> INFO_PRINTF6(_L("[Couldn't get font Loop  % 2d, Iteration % 2d Font \"%S\", Size %d, err %d]\n"), forLoop, count, &fs.iTypeface.iName, fontSize, err);

 				continue;

 				}

 			iGc->UseFont(font);			

 			iGc->DrawText(_L("ABCDEFG123456789\n"), TPoint(10+loop, 200-(fontSize*2)+count));

 			iDev->ReleaseFont(font);

 			iGc->DiscardFont();	

 			}

 		forLoop=1;

 		for (count=typefaces-1;count>=0;--count)

 			{

 			iDev->TypefaceSupport(info, count); 

 			TFontSpec fs;

 			fs.iTypeface = info.iTypeface;

 			fs.iHeight = fontSize;

 			CFbsFont* font = NULL;

 			TInt err = iDev->GetNearestFontToDesignHeightInPixels((CFont*&)font, fs);

 			if( font == NULL)

 				{

 				iStep -> INFO_PRINTF6(_L("[Couldn't get font Loop  % 2d, Iteration % 2d Font \"%S\", Size %d, err %d]\n"), forLoop, count, &fs.iTypeface.iName, fontSize, err);

 				continue;

 				}

 			iGc->UseFont(font);

 			iGc->DrawText(_L("ABCDEFG123456789\n"), TPoint(10+loop, 200-(fontSize*2)+count));

 			iDev->ReleaseFont(font);

 			iGc->DiscardFont();

 			}

 		// When the 2 loops above have completed once, the glyph cache heap should be large enough

 		// for all subsequent loops, if the glyph tree is successfully deleted after the font is

 		// discarded. So we wait 3 seconds after the 2 loops complete for the 1st time and then

 		// record the free RAM. No extra RAM should be required to be allocated after this point.			

 		if( loop==0)

 			{

 			// Wait to ensure font memory grabs are complete

 			User::After(3000000);	

 			// save initial free RAM figure

 			beforeFreeRam = GetRam();

 			}

 		}

 		// Wait for all requests to complete

 		User::After(2000000);

 		// If there is any RAM loss print it out before call to iTest 

 		CheckRam(beforeFreeRam);		

 		TInt afterFreeRam = GetRam();

 		// Add a safety buffer to accouunt for miscellaneous system changes

 		// affect the total ram. The defect this was set to catch was leaking

 		// of the order of a megabyte so this will still catch that.

 		afterFreeRam += 65536;

 		// Any extra RAM grabbed for the glyph trees should be released by 

 		// the calls to DiscardFont

 		iStep-> testBooleanTrue((afterFreeRam>=beforeFreeRam), (TText8*)__FILE__, __LINE__);

 	}

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

 CTGlyphTreeDelStep::CTGlyphTreeDelStep()

 	{

 	SetTestStepName(KTGlyphTreeDelStep);

 	}

 TVerdict CTGlyphTreeDelStep::doTestStepL()

 	{

 #if defined(__SUPPORT_CPP_EXCEPTIONS__)

 	SetTestStepID(_L("GRAPHICS-FNTSTORE-0034"));

 	FbsStartup();

 	CTrapCleanup* TrapCleanup = CTrapCleanup::New();

 	TInt error = KErrNone;

 	try	{

 		TTrapHandler* trapHandler = User::MarkCleanupStack();

 		__UHEAP_MARK;

 		User::After(10000000);	

 		CTGlyphTreeDel* test_harness = CTGlyphTreeDel::NewL(this);

 		test_harness->TestGlyphTreeDeleteL();

 		delete test_harness;

 		__UHEAP_MARKEND;

 		User::UnMarkCleanupStack(trapHandler);

 		}

 	catch (XLeaveException& leave)

 		{

 		error = leave.GetReason();

 		}

 	catch (...)

 		{

 		User::Invariant();

 		}

 	delete TrapCleanup;

 	if (error)

 		{

 		SetTestStepResult(EFail);

 		}

 	RecordTestResultL();

 #endif	//__SUPPORT_CPP_EXCEPTIONS__

 	return TestStepResult();

 	}