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

// Tests CEikStatusPane APIs.\n

// 

//

/**

 @file

 @internalComponent - Internal Symbian test code

*/

#include <e32keys.h>

#include <coemain.h>

#include <eikenv.h>

#include <eikdef.h>

#include <tspane.rsg>

#include "tspane.hrh"

#include "tspane.h"

#include <techview/eikmenup.h>

#include <techview/eiklabel.h>

#include <techview/eikclock.h>

#include <barsread.h>

#include <techview/eikmenub.h>

#include <ecom/ecom.h>

#include <test/testexecutelog.h>

#include <test/testexecutelogext.h>

#include <uikon/eikdefmacros.h>

_LIT(KTSpaneResourceFilePath, "z:\\system\\test\\uiktest\\tspane.rsc");

void Panic(TInt aPanic)

	{

	User::Panic(_L("Tspane App"),aPanic);

	}

CControlStackedGlobalTextEditor::~CControlStackedGlobalTextEditor()

/**

   Destructor

 */

	{

	CCoeAppUi* const appUi=iEikonEnv->EikAppUi();

	if (appUi!=NULL)

		{

		appUi->RemoveFromStack(this);

		}

	}

// Class CTspaneContainer

/**

   Auxiliary function for all Test Cases

   This method creates the status pane control on which all tests are

   carried out & a window to hold the control.

 */

void CTspaneContainer::ConstructL(const TRect& aRect)

    {

	CreateWindowL();

	CreateStatusPaneL();

	TRect rect(aRect);

	iStatusPane->ReduceRect(rect);

	SetRect(rect);

	ActivateL();

    }

CTspaneContainer::~CTspaneContainer()

/**

   Destructor

 */

    {

	delete iStatusPane;

    }

/**

   Auxiliary function for Container

   The method is an override from CCoeControl. The method is called by

   the windows server or the application itself to redraw the status pane.

 */

void CTspaneContainer::Draw(const TRect& /*aRect*/) const

	{

	CWindowGc& gc = SystemGc();

	gc.SetPenColor(KRgbWhite);

	gc.SetPenSize(TSize(2,2));

	gc.SetPenStyle(CGraphicsContext::ESolidPen);

	gc.SetBrushColor(KRgbGray);

	gc.SetBrushStyle(CGraphicsContext::ESolidBrush);

	gc.DrawRect(Rect());

	}

/**

   Auxiliary function for Container

   The method is an override from MEikStatusPaneObserver. The method is

   invoked on a change in the position or size of the screen area

   occupied by the status pane.

 */

void CTspaneContainer::HandleStatusPaneSizeChange()

	{

	TRect rect = iEikonEnv->EikAppUi()->ClientRect();

	iStatusPane->ReduceRect(rect);

	SetRect(rect);

	DrawNow();

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestL

   @SYMPREQ

   @SYMTestCaseDesc Performs automated tests

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method initiates the following tests:\n

   (1) Out of Memory Tests.\n

   (2) Tests status pane observer provided by MEikStatusPaneObserver.\n

   (3) API testing for the following:\n

   (a) CEikStatusPane::NewL()\n

   (b) CEikStatusPaneBase::ReduceRect()\n

   (c) CEikStatusPaneBase::SwitchLayoutL()\n

   (d) CEikStatusPaneBase::PaneCapabilities()\n

   (e) CEikStatusPaneBase::PaneRectL()\n

   (f) CEikStatusPaneBase::ControlL()\n

   (g) CEikStatusPaneBase::ContainerControlL()\n

   @SYMTestExpectedResults All automated tests should complete.

 */

void CTspaneContainer::AutoTestL(TAutoTest aTestId)

	{

	switch (aTestId)

		{

		case ETotal:

			ASSERT(CEikStatusPaneBase::Current()!=NULL);

			AutoTestL(EAllNormal);

			AutoTestL(EOOM);

			break;

		case EOOM:

			AutoTestOom();

			if (CEikStatusPaneBase::Current()==NULL)

				{

				CreateStatusPaneL();

				}

			ASSERT(CEikStatusPaneBase::Current()!=NULL);

			break;

		case EAllNormal:

			{

			CreateStatusPaneL();

			for (TInt i=0; i<ENumNormalTests; i++)

				AutoTestL(TAutoTest(i));

			if (CEikStatusPaneBase::Current()==NULL)

				{

				CreateStatusPaneL();

				}

			ASSERT(CEikStatusPaneBase::Current()!=NULL);

			break;

			}

		case EObserver:

			AutoTestObserverL();

			break;

		case ENew:

			AutoTestNewL();

			break;

		case EReduceRect:

			AutoTestReduceL();

			break;

		case ESwitchLayout:

			AutoTestSwitchL();

			break;

		case ECaps:

			AutoTestCapsL();

			break;

		case ERect:

			AutoTestRectL();

			break;

		case EControl:

			AutoTestControlL();

			break;

		case ESwap:

			AutoTestSwapL();

			break;

		case EContainer:

			AutoTestContainerL();

			break;

		case EBackground:

			AutoTestBackgroundL();

			break;

		default:

			Panic(0);

			break;

		}

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestOom

   @SYMPREQ

   @SYMTestCaseDesc Perform Out of Memory tests

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method runs all auto tests under a simulated OOM situation.

   @SYMTestExpectedResults All tests should pass under the simulated OOM situation.

 */

void CTspaneContainer::AutoTestOom()

	{

	TInt i = 0;

	TInt err = KErrNoMemory;

	while (err != KErrNone)

		{

		User::__DbgSetAllocFail(RHeap::EUser, RHeap::EFailNext, i);

		TRAP(err, 

			{

			AutoTestL(EAllNormal);

			});

		i++;

		TBuf<32> buf;

		buf.Format(_L("OOM %d"), i);

		iEikonEnv->InfoMsg(buf);

		}

	User::__DbgSetAllocFail(RHeap::EUser, RHeap::ENone, i);

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestObserverL

   @SYMPREQ

   @SYMTestCaseDesc Tests status pane observer.

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The test resets two status pane observers and allocates

   one of them to be the observer for the test status pane.

   The method then changes the layout and checks whether the observer

   set for the test status pane receives notification of the change. The

   same test is carried out when no observer is set for the status pane.

   @SYMTestExpectedResults Only the observer to which the test status pane

   is set should receive the position change notification. The other

   observers should not receive any notifications.

 */

void CTspaneContainer::AutoTestObserverL()

	{

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_TOP);

	iObs1.Reset();

	iObs2.Reset();

	iStatusPane->SetObserver(&iObs1);

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_BOTTOM);

	if (!iObs1.Test() || iObs2.Test())

		Panic(0);

	iObs1.Reset();

	iStatusPane->SetObserver(&iObs2);

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_TOP);

	if (iObs1.Test() || !iObs2.Test())

		Panic(0);

	iObs2.Reset();

	iStatusPane->SetObserver(NULL);

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_BOTTOM);

	if (iObs1.Test() || iObs2.Test())

		Panic(0);

	iStatusPane->SetObserver(this);

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_COMPLEX);

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestReduceL

   @SYMPREQ

   @SYMTestCaseDesc Test CEikStatusPaneBase::ReduceRect() API.

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method tests CEikStatusPaneBase::ReduceRect() API

   under the following situations:

   (1)When status pane does not extend beyond the screen size.

   (2)When status pane extends beyond the screen size.

   @SYMTestExpectedResults Test checks results against expected values.

 */

void CTspaneContainer::AutoTestReduceL()

	{

	const TRect spRect(TPoint(0,0), TSize(iEikonEnv->ScreenDevice()->SizeInPixels().iWidth, ETspaneTopHeight));

	TRect test;

	// Normal edge of rectangle reduces, top, left, bottom & right.

	test = spRect;

	test.iBr.iY += 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == 0 && test.iTl.iY == spRect.iBr.iY && 

		 test.iBr.iX == spRect.iBr.iX && test.Height() == 10))

		Panic(0);

	test = spRect;

	test.iBr.iX += 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == spRect.iBr.iX && test.iTl.iY == 0 && 

		  test.Width() == 10 && test.iBr.iY == spRect.iBr.iY))

		Panic(0);

	test = spRect;

	test.iTl.iY -= 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == 0 && test.iTl.iY == -10 && 

		  test.iBr.iX == spRect.iBr.iX && test.Height() == 10))

		Panic(0);

	test = spRect;

	test.iTl.iX -= 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == -10 && test.iTl.iY == 0 && 

		  test.Width() == 10 && test.iBr.iY == spRect.iBr.iY))

		Panic(0);

	// reductions where status pane extends beyond edge of rect.

	test = spRect;

	test.Shrink(2,2);

	test.iBr.iY += 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == 2 && test.iTl.iY == spRect.iBr.iY && 

		  test.iBr.iX == spRect.iBr.iX-2 && test.Height() == 8))

		Panic(0);

	test = spRect;

	test.Shrink(2,2);

	test.iBr.iX += 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == spRect.iBr.iX && test.iTl.iY == 2 && 

		  test.Width() == 8 && test.iBr.iY == spRect.iBr.iY-2))

		Panic(0);

	test = spRect;

	test.Shrink(2,2);

	test.iTl.iY -= 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == 2 && test.iTl.iY == -8 && 

		  test.iBr.iX == spRect.iBr.iX-2 && test.Height() == 8))

		Panic(0);

	test = spRect;

	test.Shrink(2,2);

	test.iTl.iX -= 10;

	iStatusPane->ReduceRect(test);

	if (!(test.iTl.iX == -8 && test.iTl.iY == 2 && 

		  test.Width() == 8 && test.iBr.iY == spRect.iBr.iY-2))

		Panic(0);

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestSwitchL

   @SYMPREQ

   @SYMTestCaseDesc Test CEikStatusPaneBase::SwitchLayoutL() API.

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method tests switching of layouts with valid &

   invalid layouts. The leave error code is observed on each attempt to

   verify success or failure of layout switch. It also tests whether an

   observer is notified on change in layout.

   @SYMTestExpectedResults For all valid layouts CEikStatusPaneBase::SwitchLayoutL()

   should change to the specified layout and should return KErrNone. Otherwise

   the method should return KErrNotFound

 */

void CTspaneContainer::AutoTestSwitchL()

	{

	iLayoutNum = 0;

	for (TInt ii=0; ii<7; ii++)

		{

		TRAPD(err, SwitchLayoutL());

		if (err != KErrNone && err != KErrNotFound)

			User::Leave(err);

		if ((ii!=5 && err!=KErrNone) || (ii==5 && err!=KErrNotFound))

			Panic(0);

		}

	iStatusPane->SetObserver(&iObs1);

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_DIFSIZE);

	iObs1.Reset();

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_TOP);

	if (!iObs1.Test())

		Panic(0);

	iObs1.Reset();

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_COMPLEX);

	if (iObs1.Test())

		Panic(0);

	iObs1.Reset();

	iStatusPane->SetObserver(this);

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestCapsL

   @SYMPREQ

   @SYMTestCaseDesc Test CEikStatusPaneBase::PaneCapabilities() API

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method tests whether CEikStatusPanBase::PaneCapabilities()

   sets flags to indicate that the subpane specified is present and part of the

   current status pane layout owned by an application. The test is carried out

   on subpanes that are defined and undefined.

   @SYMTestExpectedResults For a defined subpane 

   CEikStatusPanBase::PaneCapabilities() should set flags to represent that

   the subpane is present & owned by the application. For an undefined subpane

   specified the method should not set any flag.

 */

void CTspaneContainer::AutoTestCapsL()

	{

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_TOP);

	TInt ii;

	for (ii = ETSpanePaneUid1; ii <= ETSpanePaneUid7; ii++)

		{

		CEikStatusPaneBase::TPaneCapabilities caps = iStatusPane->PaneCapabilities(TUid::Uid(ii));

		if (!caps.IsPresent() || !caps.IsAppOwned())

			Panic(0);

		}

	iStatusPane->SwitchLayoutL(R_TSPANE_LAYOUT_COMPLEX);

	for (ii = ETSpanePaneUid1; ii <= ETSpanePaneUid7; ii++)

		{

		CEikStatusPaneBase::TPaneCapabilities caps = iStatusPane->PaneCapabilities(TUid::Uid(ii));

		if (!caps.IsPresent() || !caps.IsAppOwned())

			Panic(0);

		}

	CEikStatusPaneBase::TPaneCapabilities caps = iStatusPane->PaneCapabilities(TUid::Uid(0x12345678));

	if (caps.IsPresent() || caps.IsAppOwned())

		Panic(0);	

	}

/**

   @SYMTestCaseID UIF-tspane-AutoTestRectL

   @SYMPREQ

   @SYMTestCaseDesc Test CEikStatusPaneBase::PaneRectL() API

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions The method tests CEikStatusPaneBase::PaneRectL() retrieves the

   size of subpanes present in the current status pane. The tests is carried

   by specifying defined & undefined subpane uids.

   @SYMTestExpectedResults For each defined sub-pane 

   CEikStatusPaneBase::PaneRectL() should return it's size.For undefined

   subpane the method should return leave error code KErrNotFound.

 */

void CTspaneContainer::AutoTestRectL()

	{

	const TRect spRect(TPoint(0,0), TSize(iEikonEnv->ScreenDevice()->SizeInPixels().iWidth, ETspaneTopHeight));

	const TInt w = spRect.Width()/4;

	const TInt h = spRect.Height()/2;

	const TRect rects[7] = 

		{

			TRect(TPoint(0,0), TSize(w, h)),

			TRect(TPoint(0,h), TSize(w, h)),

			TRect(TPoint(w,0), TSize(w, 2*h)),

			TRect(TPoint(2*w,0), TSize(w, h)),

			TRect(TPoint(2*w,h), TSize(w/2, h)),

			TRect(TPoint(2*w+w/2,h), TSize(w/2, h)),

			TRect(TPoint(3*w,0), TSize(w, 2*h))

		};