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