kerneltest/e32test/misc/t_alive.cpp
author John Imhofe
Mon, 22 Feb 2010 14:56:39 +0000
changeset 17 c1574200dd96
parent 0 a41df078684a
permissions -rw-r--r--
MINOR_CHANGE: Removing redundant file Obtaining_PSL_Software_Source_Code.txt

// Copyright (c) 1996-2009 Nokia Corporation and/or its subsidiary(-ies).
// All rights reserved.
// This component and the accompanying materials are made available
// under the terms of the License "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:
// e32test\misc\t_alive.cpp
// 
//

#include <e32test.h>
#include <e32base.h>
#include <e32base_private.h>
#include <e32svr.h>

RTest test(_L("T_ALIVE"));

class CTim : public CActive
	{
public:
	static CTim* New();
	CTim() : CActive(EPriorityStandard) {}
	void RunL();
	void DoCancel() {}
public:
	RTimer iTimer;
	};

class CTest : public CActive
	{
public:
	CTest() : CActive(EPriorityUserInput) {}
	static CTest* New();
	void RunL();
	void DoCancel() {}
	void Start();
	};

LOCAL_C void DisplayProcesses()
	{
	TFindProcess fp(_L("*"));
	TFullName fn;
	while(fp.Next(fn)==KErrNone)
		{
		RDebug::Print(_L("%S"),&fn);
		}
	}


CTim* CTim::New()
	{
	CTim* pC=new CTim;
	if (pC)
		{
		TInt r=pC->iTimer.CreateLocal();
		if (r!=KErrNone)
			{
			delete pC;
			pC=NULL;
			}
		}
	return pC;
	}

void CTim::RunL()
	{
	DisplayProcesses();
	iTimer.HighRes(iStatus,2100000);
	SetActive();
	}

CTest* CTest::New()
	{
	return new CTest;
	}

void CTest::Start()
	{
	test.Console()->Read(iStatus);
	SetActive();
	}

void CTest::RunL()
	{
	TKeyCode k=test.Console()->KeyCode();
	TChar c=(TUint)k;
	TBuf<1> b;
	b.SetLength(1);
	b[0]=(TText)c;
	RDebug::Print(_L("%S"),&b);
	if (c!='0')
		Start();
	else
		CActiveScheduler::Stop();
	}

GLDEF_C TInt E32Main()
	{
	test.Title();
	CActiveScheduler* pS=new CActiveScheduler;
	if (!pS)
		User::Panic(_L("SCHED"),0);
	CActiveScheduler::Install(pS);
	CTim* pT2=CTim::New();
	if (!pT2)
		User::Panic(_L("TIM2"),0);
	CActiveScheduler::Add(pT2);
	CTest* pTest=CTest::New();
	if (!pTest)
		User::Panic(_L("TEST"),0);
	CActiveScheduler::Add(pTest);
	pT2->RunL();
	pTest->Start();
	CActiveScheduler::Start();
	return 0;
	}