/*

* Copyright (c) 2005-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 <e32test.h>

#include <bitdev.h>

#include <graphics/shapeimpl.h>

#include <badesca.h>

#include "testData.h"

#include <ecom/ecom.h>

#include <ecom/implementationproxy.h>

#include <e32math.h>

#include <graphics/openfontrasterizer.h>

#include <graphics/openfontconstants.h>

//add filenames for any test data here

const TText16* KTestFilenames[] =

	{

	//created from original iculayoutengine test data

	(const TText16*) L"z:\\test\\data\\tnr_dev_otshaperdata1.dat",

	//created from input data provided by licensee

	(const TText16*) L"z:\\test\\data\\tnr_dev_otshaperdata2.dat",

	//created from input data provided by licensee

	(const TText16*) L"z:\\test\\data\\tnr_dev_otshaperdata3.dat",

	//created from input data provided by licensee

	(const TText16*) L"z:\\test\\data\\tnr_dev_otshaperdata4.dat",

	// Data to test defect fix DEF078032

	(const TText16*) L"z:\\test\\data\\tnr_dev_otshaperdata5.dat",

	//created from input data provided by licensee

	(const TText16*) L"z:\\test\\data\\shaperkannadadata1.dat",

	// created from Kannada sample text

	(const TText16*) L"z:\\test\\data\\shaperkannadadata2.dat",

	// created from Kannada sample text

	(const TText16*) L"z:\\test\\data\\shaperkannadadata3.dat",

	// created from Gujarati sample text taken from the web

	(const TText16*) L"z:\\test\\data\\shapergujaratidata1.dat",

	// created from Gujarati sample text taken from the web

	(const TText16*) L"z:\\test\\data\\shapergujaratidata2.dat",

	// created from Gujarati sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapergujaratidata3.dat",

	// created from Bengali sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shaperbengalidata1.dat",

	// created from Bengali sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shaperbengalidata2.dat",

	// created from Bengali sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shaperbengalidata3.dat",

	// created from Tamil sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertamildata1.dat",

	// created from Tamil sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertamildata2.dat",

	// created from Tamil sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertamildata3.dat",

	// created from Telugu sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertelugudata1.dat",

	// created from Telugu sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertelugudata2.dat",

	// created from Telugu sample text given by the licensee

	(const TText16*) L"z:\\test\\data\\shapertelugudata3.dat",

	//	Test for Gurmukhi digit

	(const TText16*) L"z:\\test\\data\\shapergurmukhi1.dat",

	(const TText16*) L"z:\\test\\data\\shapergurmukhi2.dat",

	(const TText16*) L"z:\\test\\data\\shapergurmukhi3.dat",

	(const TText16*) L"z:\\test\\data\\shapergurmukhi4.dat",

	(const TText16*) L"z:\\test\\data\\shapergurmukhi5.dat",

	//	Test for Malayalam digit

	(const TText16*) L"z:\\test\\data\\shapermalayalam1.dat",

	(const TText16*) L"z:\\test\\data\\shapermalayalam2.dat",

	(const TText16*) L"z:\\test\\data\\shapermalayalam3.dat",

	(const TText16*) L"z:\\test\\data\\shapermalayalam4.dat",

	(const TText16*) L"z:\\test\\data\\shapermalayalam5.dat"

	};

/**

Number of test data files of each of the scripts/languages bein tests.

Must change these if KTestFilnames[] above is changed

*/

const TInt KHindiTestDataIndex = 0;

const TInt KNumberOfHindiTestDataFiles = 5;

const TInt KKannadaTestDataIndex = 5;

const TInt KNumberOfKannadaTestDataFiles = 3;

const TInt KGujaratiTestDataIndex = 8;

const TInt KNumberOfGujaratiTestDataFiles = 3;

const TInt KBengaliTestDataIndex = 11;

const TInt KNumberOfBengaliTestDataFiles = 3;

const TInt KTamilTestDataIndex = 14;

const TInt KNumberOfTamilTestDataFiles = 3;

const TInt KTeluguTestDataIndex = 17;

const TInt KNumberOfTeluguTestDataFiles = 3;

const TInt KGurmukhiTestDataIndex = 20;

const TInt KNumberOfGurmukhiTestDataFiles = 5;

const TInt KMalayalamTestDataIndex = 25;

const TInt KNumberOfMalayalamTestDataFiles = 5;

const TUint32 KDevanagariScriptCode = 0x64657661;

const TUint32 KKannadaScriptCode = 0x6B6E6461;

const TUint32 KHindiLanguageCode = 0x48494E20;

const TUint32 KKannadaLanguageCode = 0x4B414E20;

const TUint32 KGujaratiScriptCode = 0x67756A72;

const TUint32 KGujaratiLanguageCode = 0x47554A20;

const TUint32 KBengaliScriptCode = 0x62656E67;

const TUint32 KBengaliLanguageCode = 0x42454E20;

const TUint32 KTamilScriptCode = 0x74616D6C;

const TUint32 KTamilLanguageCode = 0x54414D20;

const TUint32 KTeluguScriptCode = 0x74656C75;

const TUint32 KTeluguLanguageCode = 0x54454C20;

const TUint32 KGurmukhiScriptCode = 0x67757275;

const TUint32 KGurmukhiLanguageCode = 0;

const TUint32 KMalayalamScriptCode = 0x6d6c796d;

const TUint32 KMalayalamLanguageCode = 0x4d4c5220;

// For RTest

//**************************************************************************************

static RTest TheTest(_L("TC_SHAP_shapeText"));

static void Check(TInt aValue, TInt aLine)

	{

	if(!aValue)

		{

		TheTest(EFalse, aLine);

		}

	}

static  void Check(TInt aValue, TInt aExpected, TInt aLine)

	{

	if(aValue != aExpected)

		{

		RDebug::Print(_L("*** Expected error: %d, got: %d\r\n"), aExpected, aValue);

		TheTest(EFalse, aLine);

		}

	}

#define TEST2(aValue, aExpected) ::Check(aValue, aExpected, __LINE__)	

#define TEST(arg) ::Check((arg), __LINE__)

// Convenience methods

//**************************************************************************************

/* 

Used for cleanup of RImplInfoArray implementationArray below 

This method is stolen from FbsTop.cpp

*/

LOCAL_C void ResetAndDestroyRImplInfoPtrArray(TAny* aPtr)

	{

	RImplInfoPtrArray* array = reinterpret_cast <RImplInfoPtrArray*> (aPtr);

	array->ResetAndDestroy();

	}

/*

Load all ECOM implemented rasterizer DLLs. 

This method is stolen from CFbTop::LoadOpenFontLibraries()

*/

LOCAL_C void LoadOpenFontLibraries(CFontStore* aFontStore)

	{

	RImplInfoPtrArray implementationArray;

	TCleanupItem cleanup(ResetAndDestroyRImplInfoPtrArray, &implementationArray);

	CleanupStack::PushL(cleanup);

	TInt error;

	TInt ecomerror;

	TInt ecomnotready;

	TUid uid = {KUidOpenFontRasterizerPlunginInterface};

	// Making sure that no race situation arises

	// If ECom is not ready, give it another chance and try again. if it still doesn't work 

	// after the third try, then it just carries on quietly and fails... 

	for (ecomnotready =0; ecomnotready <3; ecomnotready++)

		{

		TRAP(ecomerror,REComSession::ListImplementationsL(uid,implementationArray));

		if (!ecomerror)

			{

			break;

			}

		else

			{

			ecomerror = 0; 	

			User::After(0);

			}

		}

	const TInt availCount = implementationArray.Count();

	for (TInt count=0;count<availCount;++count)

		{

		const CImplementationInformation* info = implementationArray[count];

		TUid rasterizerUid = info->ImplementationUid();

 		// Create a rasterizer

 		COpenFontRasterizer* rasterizer=0;

 		TRAP(error,rasterizer = COpenFontRasterizer::NewL(rasterizerUid));

 		if (!error)

   			{

   			// Install it in the font store.

   			TRAP(error,aFontStore->InstallRasterizerL(rasterizer));

   			if (error)

   				delete rasterizer;

   			}

		}

	CleanupStack::PopAndDestroy(&implementationArray); 	

	}

LOCAL_C RPointerArray<CTestData> SetupTestData(CDesC16ArrayFlat* aFilenames)	

	{

	RPointerArray<CTestData> testDataArr(1);// = new(ELeave) CArrayFixFlat<CTestData>(1);

	for (TInt i = 0; i<aFilenames->Count(); i++)

		{

		CTestData* temp = new(ELeave) CTestData;

		temp->Internalize((*aFilenames)[i]);

		testDataArr.AppendL(temp);	

		}

	return testDataArr;

	}

// test methods

//**************************************************************************************

/**

@file

@SYMTestCaseID				GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1479

@SYMTestCaseDesc 			Simple test of the shaper

@SYMTestPriority 			High

@SYMTestActions  			Simple test to shape some text using the shaper, and test that the output is as expected. Does not perform any OOM testing.

@SYMTestExpectedResults		The test must exit cleanly and there should not be any User:84 errors, KERN-EXEC's or any memory leaks.

@SYMPREQ					PREQ18

*/

void doShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, 

				const TUint32 aLang, TBool aCheckOutput = EFalse)

	{

	TheTest.Next(_L("GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1479 "));

	TInt err;

	//set up the shaper

	CShaper* theShaper = NULL;

	CShaperFactory* shaperFactory = NULL;

	RImplInfoPtrArray implementationArray;

	TCleanupItem cleanup(ResetAndDestroyRImplInfoPtrArray, &implementationArray);

	CleanupStack::PushL(cleanup);

	TInt error;

	TInt ecomerror;

	TInt ecomnotready;

	TUid uid = {KUidShaperFactoryPlunginInterface};

	// Making sure that no race situation arises between FBserv and Ecom

	// If ECom is not ready, give it another chance and try again. if it still doesn't work 

	// after the third try, then it just carries on quietly and fails... 

	for (ecomnotready =0; ecomnotready <3; ecomnotready++)

		{

       		TRAP(ecomerror,REComSession::ListImplementationsL(uid,implementationArray));

		if (!ecomerror)

			{

			break;

			}

		else

			{

			ecomerror = 0; 	

			User::After(0);

			}

		}

	const TInt availCount = implementationArray.Count();

	for (TInt count=0;count<availCount;++count)

		{

		const CImplementationInformation* info = implementationArray[count];

		TUid shaperFactoryUid = info->ImplementationUid();

 		// Create a shaper factory

 		TRAP(error,shaperFactory = CShaperFactory::NewL(shaperFactoryUid));

   		TEST2(error, KErrNone);

   		// Create a shaper

   		TRAPD(err, theShaper = shaperFactory->NewShaperL(font, aScript, aLang, &User::Heap()));

   		TEST2(err, KErrNone);

    	}

	CleanupStack::PopAndDestroy(&implementationArray); 	

	CleanupStack::PushL(shaperFactory);

	CleanupStack::PushL(theShaper);

	// create the data to be shaped

  	// this uses hindiTestData, defined in testData.h

  	CShaper::TInput input;

	input.iText = aTestData.iTextInput;

	input.iStart = aTestData.iStart;

	input.iEnd = aTestData.iEnd;

	TInt textLength = input.iText->Length();

	//create shape header, and shape the text

	TShapeHeader* output = NULL;

	err = theShaper->ShapeText(output, input, &User::Heap());

	TEST2(err,KErrNone);

	CleanupStack::PopAndDestroy(theShaper);

	CleanupStack::PopAndDestroy(shaperFactory);

	REComSession::FinalClose();

	CleanupStack::PushL(output);	

	if (aCheckOutput)

		{

		// check the contents of output

		TEST(output->iGlyphCount == aTestData.iGlyphCount);

		TEST(output->iCharacterCount == aTestData.iCharacterCount);

		// First iGlyphCount * 4 bytes of the output buffer contain the glyph codes as 2byte values

		// Compare against expected.

		TInt i=0;

		TUint32* shapePtr32 = (reinterpret_cast<TUint32*>(&output->iBuffer[0]));

		for (i=0; i < output->iGlyphCount; i++)

			{

			TEST2(*shapePtr32, (*aTestData.iGlyphs)[i]);

			shapePtr32++;

			}

		// next iGlyphCount * 4 bytes contain the postions in which the glyphs should be drawn, x and y axes.

		// Compare against expected

		TUint16* shapePtr16 = (reinterpret_cast<TUint16*>(shapePtr32));

		for (i=0; i < output->iGlyphCount*2; i++)

			{

			//check X or Y position

			TEST2(*shapePtr16,(*aTestData.iPositions)[i]);

			shapePtr16++;

			}

		// check advance

		TEST(*shapePtr16 == aTestData.iAdvance.iX);

		shapePtr16++;

		TEST(*shapePtr16 == aTestData.iAdvance.iY);

		shapePtr16++;

		// next iGlyphCount * 2 bytes contain the coresponding indices of this character in the original string.

		// Compare against expected

		for (i=0; i < output->iGlyphCount; i++)

			{

			TEST2(*shapePtr16, (*aTestData.iIndices)[i]);

			shapePtr16++;

			}

		}

	CleanupStack::PopAndDestroy(output);

	}

void shapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, 

				const TUint32 aLang, TBool aCheckOutput = EFalse)

	{

	__UHEAP_MARK;

	TInt heapSizeAtStart = 0;

 	User::Heap().AllocSize(heapSizeAtStart);

 	RDebug::Print(_L("Heap memory utilized is now %d\n"), heapSizeAtStart);

	doShapeText(font, aTestData, aScript, aLang, aCheckOutput);

 	// check the heap used by the shaper

 	RHeap* heap = &User::Heap();

 	heap->Check();

	TInt heapSizeAtEnd = 0;

	TInt heapCellsUsed = heap->AllocSize(heapSizeAtEnd);

 	if (heapCellsUsed)

 		{

 		TheTest.Printf(_L("This test leaked %d\n"), heapSizeAtEnd - heapSizeAtStart);

		}

	__UHEAP_MARKEND;	

	}

void doOomShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang);

/**

@file

@SYMTestCaseID				GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1480

@SYMTestCaseDesc 			Simple OOM test of shaper

@SYMTestPriority 			High

@SYMTestActions  			OOM testing for the shaper. Also ensures no leaks.

@SYMTestExpectedResults		The test must exit cleanly and there should not be any User:84 errors, KERN-EXEC's or any memory leaks.

@SYMPREQ					PREQ18

*/

void oomShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang)

	{

	__UHEAP_MARK;

	TheTest.Next(_L("GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1480 "));

	doOomShapeText(font,aTestData, aScript, aLang);		

	__UHEAP_MARKEND;

	}

void doOomShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang)

	{

	TInt count = 0;

	TInt err = KErrNone;

	TInt heapCellsUsed, heapSizeAtEnd, heapSizeAtStart;

	CShaper* theShaper = NULL;	

	CShaperFactory* shaperFactory = NULL;

	TShapeHeader* output = NULL;

	User::Heap().AllocSize(heapSizeAtStart);

	// create the data to be shaped

	CShaper::TInput input;

	input.iText = aTestData.iTextInput;

	input.iStart = aTestData.iStart;

	input.iEnd = aTestData.iEnd;

	//set up shaper, shape, delete shaper in oom loop

	RImplInfoPtrArray implementationArray;

	TCleanupItem cleanup(ResetAndDestroyRImplInfoPtrArray, &implementationArray);

	CleanupStack::PushL(cleanup);

	TInt error;

	TInt ecomerror;

	TInt ecomnotready;

	TUid uid = {KUidShaperFactoryPlunginInterface};

	// Making sure that no race situation arises between FBserv and Ecom

	// If ECom is not ready, give it another chance and try again. if it still doesn't work 

	// after the third try, then it just carries on quietly and fails... 

	for (ecomnotready =0; ecomnotready <3; ecomnotready++)

		{

       		TRAP(ecomerror,REComSession::ListImplementationsL(uid,implementationArray));

		if (!ecomerror)

			{

			break;

			}

		else

			{

			ecomerror = 0; 	

			User::After(0);

			}

		}

	const TInt availCount = implementationArray.Count();

	for (TInt count=0;count<availCount;++count)

		{

		const CImplementationInformation* info = implementationArray[count];

		TUid shaperFactoryUid = info->ImplementationUid();

 		// Create a shaper factory

 		//CShaperFactory* shaperFactory = 0;

 		TRAP(error,shaperFactory = CShaperFactory::NewL(shaperFactoryUid));

   		TEST2(error, KErrNone);

   		//CleanupStack::PushL(shaperFactory);

		}

	CleanupStack::PopAndDestroy(&implementationArray); 	

	do

		{

		count += 1;

		__UHEAP_FAILNEXT(count);

		// Create a shaper

   		TRAPD(err, theShaper = shaperFactory->NewShaperL(font, aScript, aLang, &User::Heap()));

		//shape text

		if (theShaper)

			{

			err = theShaper->ShapeText(output, input, &User::Heap());

			TEST2(err,KErrNone);

			}

		//free output; to be done by the caller of ShapeText

		delete output;

		output = NULL;		

		//does not check the output for now

		delete theShaper;

		delete shaperFactory;

		REComSession::FinalClose();

		}while ((err==KErrNoMemory)||(err==KErrGeneral));

	__UHEAP_RESET;

 	// check the heap used by the shaper

 	RHeap* heap = &User::Heap();

 	heap->Check();

 	heapCellsUsed = heap->AllocSize(heapSizeAtEnd);

 	if (heapCellsUsed)

 		{

 		TheTest.Printf(_L("This test leaked %d.\n"), heapSizeAtEnd - heapSizeAtStart);

		}

	}

void doRepeatShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang);

/**

@file

@SYMTestCaseID				GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1481

@SYMTestCaseDesc 			Tests that the shaper can handle multiple calls to ShapeText

@SYMTestPriority 			High

@SYMTestActions  			Makes multiple calls to CShaper::ShapeText with small amounts of text to be shaped

@SYMTestExpectedResults		The test must exit cleanly and there should not be any User:84 errors, KERN-EXEC's or any memory leaks.

@SYMPREQ					PREQ18

*/

void repeatShapeText(CBitmapFont* aFont, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang)

	{

	__UHEAP_MARK;

	TheTest.Next(_L("GRAPHICS-SYSLIB-ICULAYOUTENGINE-CT-1481 "));

	doRepeatShapeText(aFont, aTestData, aScript, aLang);

	__UHEAP_MARKEND;

	}

void doRepeatShapeText(CBitmapFont* font, CTestData& aTestData, const TUint32 aScript, const TUint32 aLang)

	{

	TInt err;

	//set up the shaper

	CShaper* theShaper = NULL;

	CShaperFactory* shaperFactory = NULL;

	RImplInfoPtrArray implementationArray;

	TCleanupItem cleanup(ResetAndDestroyRImplInfoPtrArray, &implementationArray);

	CleanupStack::PushL(cleanup);

	TInt error;

	TInt ecomerror;

	TInt ecomnotready;

	TUid uid = {KUidShaperFactoryPlunginInterface};

	// Making sure that no race situation arises between FBserv and Ecom

	// If ECom is not ready, give it another chance and try again. if it still doesn't work 

	// after the third try, then it just carries on quietly and fails...