// Copyright (c) 2008-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

*/

#include <e32std.h>

#include <e32math.h>

#include <w32std.h>

#include <w32debug.h>

#include "teflogextensions.h"

#include "t_wsdynamicreswinbase.h"

#include "globalsettings.h"

#include <bitdraw.h>

#include <bitdrawinterfaceid.h>

#include <u32hal.h>

#include <dispchannel.h>

#include <graphics/displaycontrol.h>

#if (!defined(K_DISPLAY_CH_MAJOR_VERSION_NUMBER) && !defined(K_DISPLAY_CH_MINOR_VERSION_NUMBER))

#define MODE_CHANGE_BASE_FUNCTIONALITY_NOT_PRESENT_IN_HEADER

#endif

_LIT(KMonospaceTestFontTypefaceName,"Arial");

const TInt KMaxFontSize = 150;

TBool	CWsDynamicResWinBase::iTransparencyEnabled=EFalse;

CWsDynamicResWinBase::CWsDynamicResWinBase():

	iDoTearDown(EFalse),

	iSession(TGlobalSettings::Instance().iScreen)

{

}

void CWsDynamicResWinBase::SetupL()

	{

	SetupL(EFalse);

	}

CActiveScheduler	CWsDynamicResWinBase::iScheduler;

void CWsDynamicResWinBase::SetupL(TBool aUseOtherScreenForInfo)

	{	

	if (CActiveScheduler::Current()!=&iScheduler)

		{

		new (&iScheduler) CActiveScheduler;

		CActiveScheduler::Install(&iScheduler);

		}

	iDoTearDown=ETrue;

	iRed.SetInternal(0xFFFF0000);

	iGreen.SetInternal(0xFF00FF00);

	iBlue.SetInternal(0xFF0000FF);

	iCyan.SetInternal(0xFF00FFFF);

	iMagenta.SetInternal(0xFFFF00FF);

	iYellow.SetInternal(0xFFFFFF00);

	iWhite.SetInternal(0xFFFFFFFF);

	iLastGceHoleColor.SetInternal(0);

	TITLE_BACKGROUND=iCyan;

	COMPARE_BACKGROUND=iBlue;

	ASSERT_EQUALS_X(iSession.Connect(), KErrNone);

		{//Stolen from TAuto CloseAllPanicWindows()

		TInt idFocus = iSession.GetFocusWindowGroup();

		TWsEvent event;

		event.SetType(EEventKey); //EEventKeyDown

		TKeyEvent *keyEvent = event.Key();

		keyEvent->iCode = EKeyEscape;

		keyEvent->iScanCode = EStdKeyEscape;

		keyEvent->iModifiers = 0;

		TInt theLimit = 50;

		while(idFocus != NULL && (theLimit-- > 0))

			{

			iSession.SendEventToAllWindowGroups(event);

			TInt idNewFocus = iSession.GetFocusWindowGroup();

			if (idNewFocus!=idFocus)

				{

				INFO_PRINTF1(_L("A window was closed [probably a panic box from the previous test]."));

				}

			idFocus=idNewFocus;

			}

		}

	TInt err = KErrNone;

	TRAP(err, iScreenDevice = new (ELeave) CWsScreenDevice(iSession));

	PRINT_ON_ERROR2_L(err, _L("Failed to create screen device: %d"), err);

	ASSERT_EQUALS_X(iScreenDevice->Construct(TGlobalSettings::Instance().iScreen), KErrNone);

	iDisplayMode = iScreenDevice->DisplayMode();	// Get default display mode

	CheckAndConnectScreen();

	TRAP(err, iGc = new (ELeave) CWindowGc(iScreenDevice));

	PRINT_ON_ERROR2_L(err, _L("Failed to create graphics context: %d"), err);

	ASSERT_EQUALS_X(iGc->Construct(), KErrNone);

	iGroup = RWindowGroup(iSession);

	ASSERT_EQUALS_X(iGroup.Construct(++iWindowHandle,iScreenDevice), KErrNone);

	iGroup.SetOrdinalPositionErr(0, KPasswordWindowGroupPriority - 1); // Added code ---- Fastpath

	iSession.Flush();

	if (aUseOtherScreenForInfo)

		{

		if (iSession.NumberOfScreens()>1)

			{	//Create server objects for info windows to appear on alternate screen

			TInt alternateScreenNum=iSession.NumberOfScreens()-1;

			if (TGlobalSettings::Instance().iScreen==alternateScreenNum)

				{	//Alternate screen is last screen, or first screen if that is being tested. 

				alternateScreenNum=0;

				}

			TRAP(err, iInfoScreenDevice = new (ELeave) CWsScreenDevice(iSession));

			PRINT_ON_ERROR2_L(err, _L("Failed to create second screen device: %d"), err);

			ASSERT_EQUALS_X(iInfoScreenDevice->Construct(alternateScreenNum), KErrNone);

			TRAP(err, iInfoGc = new (ELeave) CWindowGc(iInfoScreenDevice));

			PRINT_ON_ERROR2_L(err, _L("Failed to create second graphics context: %d"), err);

			ASSERT_EQUALS_X(iInfoGc->Construct(), KErrNone);

			iInfoGroupInstance = RWindowGroup(iSession);

			ASSERT_EQUALS_X(iInfoGroupInstance.Construct(++iWindowHandle,iInfoScreenDevice), KErrNone);

			iInfoGroup=&iInfoGroupInstance;

			}

		else

			{	//If alternate screen is not available then no text or compare windows should be created!

			iInfoScreenDevice=iScreenDevice;	//it is "convenient" for the device to still be good.

			iInfoGc=NULL;

			iInfoGroup=NULL;

			}

		}

	else

		{	//

		iInfoScreenDevice=iScreenDevice;

		iInfoGc=iGc;

		iInfoGroup=&iGroup;

		}

	if (iInfoGroup && iInfoGc)

		{

		// Add a plain background window to obscure anything else that

		// happens to be behind the test. Setting this window's display mode is also

		// used to set the screen device display mode, and hence the composition

		// mode: alpha or chroma key.

		iBackground = RBlankWindow(iSession);

		ASSERT_EQUALS_X(iBackground.Construct(*iInfoGroup, ++iWindowHandle), KErrNone);

		iBackground.SetOrdinalPosition(100);	// Behind anything else in this group.

		iBackground.SetColor(TRgb(iWhite));

		//iBackground.SetExtent(TPoint(-1000,-1000),TSize(3000,3000));

		iBackground.Activate();

		iBackground.SetVisible(ETrue);

		}

	iSession.Flush();

	RWindow testTrans(iSession);

	ASSERT_EQUALS_X(testTrans.Construct(iGroup, ++iWindowHandle), KErrNone);

	iTransparencyEnabled=(testTrans.SetTransparencyFactor(iWhite)==KErrNone);

	if (iTransparencyEnabled)

		{

		TTestName testName;

		testName.Format(_L("Screen %i, depth %i: Found Trans Man"),

				TGlobalSettings::Instance().iScreen

			);

		UpdateTitleWindowL(testName,KMaxInfoLines-1);

		}

	else

		{

		TTestName testName;

		testName.Format(_L("Screen %i, depth %i: No Trans Man"),

				TGlobalSettings::Instance().iScreen

			);

		UpdateTitleWindowL(testName,KMaxInfoLines-1);

		}

	testTrans.Close();

	}

void CWsDynamicResWinBase::CheckAndConnectScreen()

	{

	if (TGlobalSettings::Instance().iDisconnected) //set from script file to match wsini keyword SIMULATE_STARTUP_DISCONNECTED

		{

		//Verify that the display really is disconnected

		ASSERT_TRUE_X(iScreenDevice != NULL);

		MDisplayControl* interface = static_cast<MDisplayControl*>(iScreenDevice->GetInterface(MDisplayControl::ETypeId));

		ASSERT_TRUE_X(interface != NULL);

		RArray<MDisplayControl::TResolution> resolutions;

		const TInt err = interface->GetResolutions(resolutions);

		ASSERT_EQUALS_X(err, KErrDisconnected);

		resolutions.Close();

		}

#ifndef MODE_CHANGE_BASE_FUNCTIONALITY_NOT_PRESENT_IN_HEADER

	//make sure display is attached to screen (only if I/F is available at compile time...)

	TInt displayState = ENormalResolution;

	UserSvr::HalFunction(EHalGroupDisplay | (TGlobalSettings::Instance().iScreen<<16), EDisplayHalSetDisplayState, &displayState, NULL);

	Pause(200);

#endif	

	if (TGlobalSettings::Instance().iDisconnected)

		{

		//Verify that the display now is connected

		MDisplayControl* interface = static_cast<MDisplayControl*>(iScreenDevice->GetInterface(MDisplayControl::ETypeId));

		RArray<MDisplayControl::TResolution> resolutions;

		const TInt err = interface->GetResolutions(resolutions);

		ASSERT_EQUALS_X(err, KErrNone);

		const_cast<TGlobalSettings&>(TGlobalSettings::Instance()).iDisconnected = EFalse;

		resolutions.Close();

		}

	}

/**

Common tear down code for all tests.

Windows, group and session created are closed. Screen device is destroyed.

Surfaces, manager and update session are closed.

*/

void CWsDynamicResWinBase::TearDownL()

	{

	iDoTearDown=EFalse;

	if (iInfoGc!=iGc)

		delete iInfoGc;

	delete iGc;

	if (iInfoScreenDevice!=iScreenDevice)

		delete iInfoScreenDevice;

	delete iScreenDevice;

	iGroup.Close();

	if (iInfoGroupInstance.WsHandle())

		iInfoGroupInstance.Close();

	iSession.Flush();

	iSession.Close();

	}

/**

 * Note that this is not the ideal mechanism.

 * A derived class may thinks its TearDown is safe to do from delete, but in the class it is derived from it may not be safe

 **/

void CWsDynamicResWinBase::TearDownFromDeleteL()	

	{

	CWsDynamicResWinBase::TearDownL();	//Explicitly call the non-derived implementation.

	}

CWsDynamicResWinBase::~CWsDynamicResWinBase()

{

	if (iDoTearDown)

		TearDownFromDeleteL();	//This mechanism is not entirely clean to use.

}

/**

Pause for the given number of milliseconds.

@param aMilliseconds	Time to wait in milliseconds.

*/

void CWsDynamicResWinBase::Pause(TInt aMilliseconds)

	{

	User::After(TTimeIntervalMicroSeconds32(aMilliseconds * 1000));

	}

// This handles any non-member uses of the extended ASSERT_XXX macros

void TefUnitFailLeaveL()

	{

	User::Leave(KErrTEFUnitFail);

	}

/**

 * side-effect: log the state info just before I leave!

 * Note that this only logs intentional assertion failures.

 * Fails due to panics or throws won't log this info.

 **/

void CWsDynamicResWinBase::TefUnitFailLeaveL()

	{

	for (TInt line=0;line<KMaxInfoLines;line++)

		if (iTestInfo[line].Length())

			Logger().LogExtra((TText8*)"Test state at fail - line",line, ESevrAll, iTestInfo[line]);

	User::Leave(KErrTEFUnitFail);

	}

/**	Creates the LHS info window, annd a middle window to display a representation of the expected result.

 *  Also sets up a rectangle representing the space on the right to be used for the test

 * 	@param	aTitle	The title to display on the info window

 *  @param	aDetail	Optional text to display on the first line under the title

**/

void CWsDynamicResWinBase::MakeTitleAndCompareWindowsL(TRefByValue<const TDesC16> aTitle,TRefByValue<const TDesC16> aDetail)

	{	

	iTestName=aTitle;

	iTestInfo[0]=aDetail;

	TRect screenSize(iInfoScreenDevice->SizeInPixels());

	TPoint oneThird(screenSize.iBr.iX/3,screenSize.iBr.iY/3);

	TRect winSize(0,0,oneThird.iX,oneThird.iY);

	if (oneThird.iX>oneThird.iY)

		{

		oneThird.iY=0;

		winSize.iBr.iY=screenSize.iBr.iY;

		}

	else

		{

		oneThird.iX=0;

		winSize.iBr.iX=screenSize.iBr.iX;

		}

	winSize.Shrink(5,5);

	if (iInfoGc)

		{

		iTitle=RWindow(iSession);

		ASSERT_EQUALS_X(iTitle.Construct(*iInfoGroup, ++iWindowHandle), KErrNone);

		iTitle.SetBackgroundColor(iCyan);

		iTitle.SetExtent(winSize.iTl,winSize.Size());

		iTitle.Activate();

		RepaintTitleWindowL();

		iTitle.SetVisible(ETrue);

		winSize.Move(oneThird);

		iCompare=RWindow(iSession);

		ASSERT_EQUALS_X(iCompare.Construct(*iInfoGroup, ++iWindowHandle), KErrNone);

		iCompare.SetBackgroundColor(COMPARE_BACKGROUND);

		iCompare.SetExtent(winSize.iTl,winSize.Size());

		iCompare.Activate();

		iCompare.BeginRedraw();

		ActivateWithWipe(iInfoGc,iCompare,COMPARE_BACKGROUND);

		TFontSpec fspec(KMonospaceTestFontTypefaceName,KMaxFontSize);

		CFont *font=NULL;

		ASSERT_EQUALS(iScreenDevice->GetNearestFontToDesignHeightInTwips(font,fspec),KErrNone);

		iInfoGc->UseFont(font);

		iInfoGc->DrawText(_L("Simulation"),winSize.Size(),winSize.Size().iHeight-5,iGc->ECenter);

		iInfoGc->Deactivate();

		iCompare.EndRedraw();

		iCompare.SetVisible(ETrue);

		if (iScreenDevice!=iInfoScreenDevice)

			{

			winSize.Move(-oneThird);

			}

		else

			{

			winSize.Move(oneThird);

			}

		}

	else

		{

		winSize=iScreenDevice->SizeInPixels();

		}

	iTestPos=winSize;

	iTestPointCentre=winSize.Center();

	iCenteredFrontWinRect=winSize;

	iCenteredFrontWinRect.Shrink(winSize.Size().iWidth/3,winSize.Size().iHeight/3);

	}

/**	Makes the compare window larger by covering the test window area as well.

 * 	Copes with vertically aligned screens, but will be naughty if called multiple times!!!

 *  @param aGoLarger	If set false, resets the size back.

 **/

void CWsDynamicResWinBase::LargerCompareWindow(TBool aGoLarger)

	{

	TPoint currPos=iCompare.AbsPosition();

	TSize currSize=iCompare.Size();

	if (currPos.iX<currPos.iY)

		{

		if (aGoLarger)

			currSize.iHeight<<=1;

		else

			currSize.iHeight>>=1;

		}

	else

		{

		if (aGoLarger)

			currSize.iWidth<<=1;

		else

			currSize.iWidth>>=1;

		}

	iCompare.SetSize(currSize);

	}

/**	Puts a line of text on the LHS window.

 *  Repaints the window. The line of text will also be shown in the log if the test fails.

 *	@param	aDetail	The text to display

 * 	@param	aIndex	The row number to display at

 **/

void CWsDynamicResWinBase::UpdateTitleWindowL(TRefByValue<const TDesC16> aDetail,TInt aIndex)

	{

	ASSERT(aIndex>=0 && aIndex<KMaxInfoLines);

	iTestInfo[aIndex]=aDetail;

	RepaintTitleWindowL();

	}

/**	Activate the GC onto the Window.

 *  In non-transparent mode it also performs a wipe background as the WServ system does not necessarily do this.

 * 	@param	aGc		The GC to associate

 * 	@param	aWin	The window to associate

 * 	@param	aColor	The color to use as the wipe. Default is transparent, which means no wipe.

 **/

TBool	CWsDynamicResWinBase::ActivateWithWipe(CWindowGc* aGc,RWindow& aWin,TRgb aColor)

	{

	aGc->Activate(aWin);

	aGc->SetBrushColor(aColor);

	aGc->SetBrushStyle(CGraphicsContext::ESolidBrush);

	if (aColor!=TRgb(0,0) && !iTransparencyEnabled)	//presume that all redraw-stored windows will draw background

		{

		aGc->Clear();

		return ETrue;	//window was cleared

		}

	return EFalse;	

	}

CWindowGc*	CWsDynamicResWinBase::GcForWindow(RWindow& aWin)

	{

	if (aWin.WsHandle()==NULL)

		return NULL;	//can't activate uninitialised window.

	CWindowGc* gc=iGc;

	if (iGc!=iInfoGc)

		if (&aWin==&iCompare || &aWin==&iTitle)

			gc=iInfoGc;

		else if (iInfoGroup && aWin.WindowGroupId()==iInfoGroup->WindowGroupId())

			gc=iInfoGc;

	return gc;

	}

/** Activates an appropriate predefined GC on the specified window and wipes the background if necessary. 

 *  @param	aWin	The window to wipe

 * 	@param	aColor	The colour to wipe with (if necessary)

 * 	@return	the GC to use for drawing and deactivate at end. This may be NULL if the window is not "live"

 **/

CWindowGc*	CWsDynamicResWinBase::BeginActivateWithWipe(TBool aInvalidate,RWindow& aWin,TRgb aColor)

	{

	CWindowGc* gc=GcForWindow(aWin);

	iSession.Flush();

	if (gc==NULL)

		return gc;	//can't activate uninitialised window.

	if (aInvalidate)

		aWin.Invalidate();

	iSession.Flush();

	aWin.BeginRedraw();

	iSession.Flush();

	ActivateWithWipe(gc,aWin,aColor);

	return gc;	

	}

/** Activates an appropriate predefined GC on the specified window and wipes the background if necessary. 

 *  @param	aWin	The window to wipe

 * 	@param	aColor	The colour to wipe with (if necessary)

 * 	@return	the GC to use for drawing and deactivate at end. This may be NULL if the window is not "live"

 **/

CWindowGc*	CWsDynamicResWinBase::BeginActivateWithWipe(TBool aInvalidate,TRect aRect,RWindow& aWin,TRgb aColor)

	{

	if (aWin.WsHandle()==NULL)

		return NULL;	//can't activate uninitialised window.

	if (aInvalidate)

		aWin.Invalidate(aRect);

	aWin.BeginRedraw(aRect);

	CWindowGc* gc=iGc;

	if (iGc!=iInfoGc)

		if (&aWin==&iCompare || &aWin==&iTitle)

			gc=iInfoGc;

		else if (aWin.WindowGroupId()==iInfoGroup->WindowGroupId())

			gc=iInfoGc;

	ActivateWithWipe(gc,aWin,aColor);

	return gc;	

	}

TBool		CWsDynamicResWinBase::InvalidateRegion(const TRegion& aRegion,RWindow& aWin)

	{

	if (aWin.WsHandle()==NULL)

		return false;	//can't activate uninitialised window.

	for (TInt ii = 0; ii < aRegion.Count(); ii++)

		{

		aWin.Invalidate(aRegion[ii]);

		}

	return true;

	}

CWindowGc*	CWsDynamicResWinBase::BeginActivateWithWipe(const TRegion& aRegion,RWindow& aWin,TRgb aColor)

	{

	if (!InvalidateRegion(aRegion,aWin))

		return NULL;	//can't activate uninitialised window.

	aWin.BeginRedraw();

	CWindowGc* gc=iGc;

	if (iGc!=iInfoGc)

		if (&aWin==&iCompare || &aWin==&iTitle)

			gc=iInfoGc;

		else if (aWin.WindowGroupId()==iInfoGroup->WindowGroupId())

			gc=iInfoGc;

	ActivateWithWipe(gc,aWin,aColor);

	return gc;	

	}

/**	Paints the LHS window with rows of text.

 * 

 **/

void CWsDynamicResWinBase::RepaintTitleWindowL()

	{

	if (iTitle.WsHandle())

		{

		iTitle.Invalidate();

		iTitle.BeginRedraw();

		ActivateWithWipe(iInfoGc,iTitle,TITLE_BACKGROUND);

		iInfoGc->SetUnderlineStyle(EUnderlineOn);

		TSize winSize=iTitle.Size();

		TRect textRect(winSize);

		textRect.iBr.iY/=4;

		TFontSpec fspec(KMonospaceTestFontTypefaceName,KMaxFontSize);

		CFont *font=NULL;

		ASSERT_EQUALS(iInfoScreenDevice->GetNearestFontToDesignHeightInTwips(font,fspec),KErrNone);

		iInfoGc->UseFont(font);

		iInfoGc->DrawText(iTestName,textRect,textRect.iBr.iY/2,iGc->ECenter);

		iInfoGc->SetUnderlineStyle(EUnderlineOff);

		textRect.iTl.iY=textRect.iBr.iY;

		TInt rowHeight=winSize.iHeight*3/(4*(KMaxInfoLines+1));

		textRect.iBr.iY+=rowHeight;

		for (TInt index=0;index<KMaxInfoLines;index++)

			{

			if (iTestInfo[index].Length())