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

// Test Direct Screen Access on a screen that supports transparency

// 

//

#include "tdirecta2.h"

const TInt KMainTestOrdinalPriority=65535;

const TInt KOntopOfAllOthersTestOrdinalPriority=65537;

CTDirect2::CTDirect2(CTestStep* aStep):

	CTWsGraphicsBase(aStep)

	{

	}

CTDirect2::~CTDirect2()

	{

	delete iDsa;

	delete iUnderWindow;

	delete iOverWindow;

	delete iScreenDevice;

	delete iWindowGroup;

	delete iTimer;

	// put focus back to current screen as this test changed the focus screen to primary screen

	TheClient->iWs.SetFocusScreen(iTest->iScreenNumber);

	}

void CTDirect2::ConstructL()

	{

	// the following line makes sure that a console object hidden outside of

	// screens range doesn't affect test results being on top of tested objects

	TheClient->iGroup->GroupWin()->SetOrdinalPosition(0, KMainTestOrdinalPriority);

	}

TInt CTDirect2::Timeout(TAny* aDirect2)

	{

	static_cast<CTDirect2*>(aDirect2)->HandleTimeout();

	return KErrNone;

	}

void CTDirect2::HandleTimeout()

	{

	// Send window group to back to avoid possibility of it

	// interfering with other parts of this test

	iWindowGroup->GroupWin()->SetOrdinalPosition(0, -1);

	iTimer->Cancel(); // Don't call back again

	TEST(EFalse); // Fail the test, as we didn't get a DSA abort within timeout period

	iTestCaseComplete = ETrue; // Move to next test case

	}

void CTDirect2::AbortNow(RDirectScreenAccess::TTerminationReasons /*aReason*/)

	{

	iTimer->Cancel(); // As soon as abort is received, we don't need the timer anymore

	}

void CTDirect2::Restart(RDirectScreenAccess::TTerminationReasons /*aReason*/)

	{

	// Send window group to back to avoid possibility of it

	// interfering with other tests

	iWindowGroup->GroupWin()->SetOrdinalPosition(0, -1);

	iTestCaseComplete = ETrue; // Move to next test case

	// Don't bother restarting DSA, we were only interested in making sure the abort was sent by wserv

	}

// Starts DSA on a topmost window, then puts a translucent window ontop of it

// to make sure wserv sends a DSA Abort even though the translucent window

// hasn't changed the visible area of the DSA window

void CTDirect2::StartTranslucentWindowOverDsaL()

	{

	// Use a new window group so we can put windows ontop of all others

	iWindowGroup = new(ELeave) CTWindowGroup(TheClient);

	iWindowGroup->ConstructL();

	// Create new blank window

	iUnderWindow = new(ELeave) CTBlankWindow();

	iUnderWindow->SetUpL(TPoint(10,10), TSize(100,100), iWindowGroup, *TheClient->iGc);

	iUnderWindow->SetColor(TRgb(0,192,0));

	// Make window group visible ontop of all others

	User::LeaveIfError(iWindowGroup->GroupWin()->SetOrdinalPositionErr(0, KOntopOfAllOthersTestOrdinalPriority));

	TheClient->Flush();

	// Call Finish() to wait until under window has been rendered.

	// Once window has been rendered, we can be sure window server has

	// calculated the "top visible" region of the window.

	TheClient->iWs.Finish();

	// Start DSA on under window

	iScreenDevice = new(ELeave) CWsScreenDevice(TheClient->iWs);

	User::LeaveIfError(iScreenDevice->Construct(iTest->iScreenNumber));

	iDsa = CDirectScreenAccess::NewL(TheClient->iWs, *iScreenDevice, *iUnderWindow->BaseWin(), *this);

	iDsa->StartL();

	// Put translucent window ontop so as to reduce the top visible area, but leave the

	// visible area unchanged (as the translucent window doesn't change the visible area

	// of the window underneath it).

	iOverWindow = new(ELeave) CTTitledWindow();

	_LIT(KTranslucentWindowTitle, "Translucent window");

	iOverWindow->SetUpL(TPoint(60,60), TSize(150,100), iWindowGroup, *TheClient->iGc, NULL, ETrue);

	TWindowTitle windowTitle(KTranslucentWindowTitle);

	iOverWindow->SetTitle(windowTitle);

	iOverWindow->SetColor(TRgb(192, 0, 0, 128));

	TheClient->Flush();

	// Start a timer, if the timeout triggers, fail the test, as we should get

	// an abort DSA from wserv within the timeout

	iTimer = CPeriodic::NewL(CActive::EPriorityStandard);

	const TInt KTimeoutPeriod = 5000000; // 5 seconds should give the client plenty of time to respond to the abort

	iTimer->Start(KTimeoutPeriod, 0, TCallBack(CTDirect2::Timeout, this));

	// Do nothing more here, once over win is rendered, wserv should cause CAbortTest::AbortNow

	// to be called

	}

void CTDirect2::RunTestCaseL(TInt aCurTestCase)

	{

	((CTDirect2Step*)iStep)->SetTestStepID(KUnknownSYMTestCaseIDName);

	switch(aCurTestCase)

		{

/**

@SYMTestCaseID		GRAPHICS-WSERV-0176

@SYMDEF             PDEF116863

@SYMTestCaseDesc    Overlapping a translucent window ontop of a DSA window should abort DSA 

@SYMTestPriority    High

@SYMTestStatus      Implemented

@SYMTestActions     Start DSA on a blank window.

					Then place a translucent window so that it partially overlaps the DSA window.

@SYMTestExpectedResults Wserv should send a DSA abort when the translucent window is placed ontop of the DSA window.

*/

	case 1:

		((CTDirect2Step*)iStep)->SetTestStepID(_L("GRAPHICS-WSERV-0176"));

		if (!iOnceOnly)

			{

			_LIT(DSA1,"Translucent window overlaping DSA window");

			INFO_PRINTF1(DSA1);

			StartTranslucentWindowOverDsaL(); // call this only once

			iOnceOnly = ETrue;

			}

		if (!iTestCaseComplete)

			{

			// Keep calling this test case until iTestCaseComplete is true

			ResetCounter(aCurTestCase-1);

			}

		else

			{

			iOnceOnly = EFalse;

			// Move to next test case in sequence

			iTestCaseComplete = EFalse;

			}	

		break;

	default:

		INFO_PRINTF1(_L("Test complete\n"));

		((CTDirect2Step*)iStep)->SetTestStepID(KNotATestSYMTestCaseIDName);

		((CTDirect2Step*)iStep)->CloseTMSGraphicsStep();

		TestComplete();

		break;

		}

	((CTDirect2Step*)iStep)->RecordTestResultL();

	}

__WS_CONSTRUCT_STEP__(Direct2)