// Copyright (c) 1998-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 "TTYPES.H"

#define UNUSED_VAR(a) a = a

TestPalette::TestPalette(CTTypes* aTest):
	iPalette(NULL), iPalette2(NULL),
	iTest(aTest)
	{}

TestPalette::~TestPalette()
	{
	}

/** 
	TestPalette::Test
	
	Method to test the functionality within the CPalette class
	Called from the TTypes test script
*/
void TestPalette::Test()
	{
	_LIT(general,"General");
	iTest->INFO_PRINTF1(general);
	TestGeneral();
	_LIT(defaults,"Defaults");
	iTest->INFO_PRINTF1(defaults);
	//TestDefaults();
	_LIT(getData,"Get Data");
	iTest->INFO_PRINTF1(getData);
	//TestGetPtr();
	}

/** 
	TestPalette::TestGeneral
	
	Spawn a new CPalette object & test basic calls to retrieve number of entries, add colours, etc
*/
void TestPalette::TestGeneral()
	{
	const TInt numcolors=50;
	TRAPD(ret,iPalette=CPalette::NewL(numcolors));
    UNUSED_VAR(ret);
	iTest->TEST(iPalette->Entries()==numcolors);
	for(TInt colcount=0;colcount<numcolors;colcount++)
		{
		TRgb color(colcount,0,0);
		iPalette->SetEntry(colcount,color);
		iTest->TEST(iPalette->GetEntry(colcount)==color);
		}
	for(TInt checkcount=0;checkcount<numcolors;checkcount++)
		{
		TRgb color(checkcount,0,0);
		iTest->TEST(iPalette->GetEntry(checkcount)==color);
		}
	iPalette->Clear();
	TRgb black(0,0,0);
	for(TInt clearcount=0;clearcount<numcolors;clearcount++)
		iTest->TEST(iPalette->GetEntry(clearcount)==black);
	for(TInt nearcount=0;nearcount<5;nearcount++)
		{
		TRgb color(nearcount*60,0,0);
		iPalette->SetEntry(nearcount,color);
		iTest->TEST(iPalette->GetEntry(nearcount)==color);
		}
	for(TInt approxcount=0;approxcount<5;approxcount++)
		{
		TRgb color(approxcount*60,0,0);
		TRgb approxl(approxcount*59,0,0);
		TRgb approxh(approxcount*61,0,0);
		TRgb nearest=iPalette->NearestEntry(approxl);
		iTest->TEST(nearest==color);
		nearest=iPalette->NearestEntry(approxh);
		iTest->TEST(nearest==color);
		}
	delete iPalette;
	iPalette = NULL;
	}

/** 
	TestPalette::TestDefaults
	
	Test creation of default colour palettes for supported/un-supported display modes
	Called from the TTypes test script
*/
void TestPalette::TestDefaults()
	{
	TRAPD(ret,iPalette=CPalette::NewDefaultL(ENone));
	iTest->TEST2(ret, KErrNotSupported);
	TRAP(ret,iPalette=CPalette::NewDefaultL(EColor16M));
	iTest->TEST2(ret, KErrNotSupported);
	TRAP(ret,iPalette=CPalette::NewDefaultL(EColor16MU));
	iTest->TEST2(ret, KErrNotSupported);
	TRAP(ret,iPalette=CPalette::NewDefaultL(ERgb));
	iTest->TEST2(ret, KErrNotSupported);
	TRAP(ret,iPalette=CPalette::NewDefaultL(EGray2));
	iTest->TEST(iPalette->GetEntry(0)==TRgb::Gray2(0));
	iTest->TEST(iPalette->GetEntry(1)==TRgb::Gray2(1));
	iTest->TEST(iPalette->Entries()==2);
	delete iPalette;
	TRAP(ret,iPalette=CPalette::NewDefaultL(EGray4));
	for(TInt g4=0;g4<4;g4++)
		iTest->TEST(iPalette->GetEntry(g4)==TRgb::Gray4(g4));
	iTest->TEST(iPalette->Entries()==4);
	delete iPalette;
	TRAP(ret,iPalette=CPalette::NewDefaultL(EGray16));
	for(TInt g16=0;g16<16;g16++)
		iTest->TEST(iPalette->GetEntry(g16)==TRgb::Gray16(g16));
	iTest->TEST(iPalette->Entries()==16);
	delete iPalette;
	TRAP(ret,iPalette=CPalette::NewDefaultL(EGray256));
	for(TInt g256=0;g256<256;g256++)
		iTest->TEST(iPalette->GetEntry(g256)==TRgb::Gray256(g256));
	iTest->TEST(iPalette->Entries()==256);
	delete iPalette;
	TRAP(ret,iPalette=CPalette::NewDefaultL(EColor16));
	for (TInt c16 = 0; c16 < 16; c16++)
		iTest->TEST(iPalette->GetEntry(c16)==TRgb::Color16(c16));
	iTest->TEST(iPalette->Entries()==16);
	delete iPalette;
	TRAP(ret,iPalette=CPalette::NewDefaultL(EColor256));
	for (TInt c256 = 0; c256 < 256; c256++)
		iTest->TEST(iPalette->GetEntry(c256)==TRgb::Color256(c256));
	iTest->TEST(iPalette->Entries()==256);
	delete iPalette;
	iPalette = NULL;
	}

/** 
	TestPalette::TestGetPtr
	
	Test the GetDataPtr() method in CPalette, to retrieve palette entries for a specified colour
	
	Called from the TTypes test script
*/
void TestPalette::TestGetPtr()
	{
	TRAPD(ret,iPalette2=CTestPalette::NewL());
    UNUSED_VAR(ret);
	iTest->TEST(iPalette2->TestGetPtr());
	TInt colorNum;
	for(colorNum=0;colorNum<CTestPalette::eNumColors;++colorNum)
		{
		TRgb color(colorNum,colorNum,colorNum);
		iPalette2->SetEntry(colorNum,color);
		}
	TPtr8 ptr(NULL,0);
	iPalette2->GetDataPtr(0,CTestPalette::eNumColors,ptr);
	const TUint8 maxValue=CTestPalette::eNumColors-1;
	TInt ii;
	for(ii=0;ii<4*CTestPalette::eNumColors;++ii)
		{
		TUint8 value=ptr[ii];
		if (value!=0 && ((ii + 1) % 4)) //skip alpha channel
			ptr[ii]=STATIC_CAST(TUint8,maxValue-value);
		}	
	for(colorNum=1;colorNum<maxValue;++colorNum)
		iTest->TEST(iPalette2->GetEntry(colorNum)==TRgb::Gray256(maxValue-colorNum));
	delete iPalette2;
	iPalette2 = NULL;
	}

/** 
	CTestPalette::TestGetPtr
	
	Part of TestPalette::TestGetPtr, retrieves a descriptor from CPalette containing entries for a given colour 
	& checks parameters are legal
	Returns boolean indiciating whether the GetDataPtr was successful or not
*/
TBool CTestPalette::TestGetPtr()
	{
	TPtr8 ptr(NULL,0);
	TUint32* data=REINTERPRET_CAST(TUint32*,iArray);
	TInt start;
	TInt length;
	for(start=0;start<eNumColors;++start)
		{
		for(length=1;length<eNumColors-start;++length)
			{
			TInt len=sizeof(TRgb)*length;
			GetDataPtr(start,length,ptr);
			if (&ptr[0]!=REINTERPRET_CAST(TUint8*,data+start) || ptr.Length()!=len || ptr.MaxLength()!=len)
				return EFalse;
			}
		}
	return ETrue;
	}