// Copyright (c) 1998-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_proc3a.cpp
// 
//

#include <e32std.h>
#include <e32std_private.h>
#include "u32std.h"
#include "../misc/prbs.h"

TUint Seed[2];

#define PANIC(r) Panic(__LINE__,r)
void Panic(TInt aLine, TInt aCode)
	{
	_LIT(KLitTPROC3A,"T_PROC3A-");
	TBuf<16> b=KLitTPROC3A();
	b.AppendNum(aLine);
	RProcess().Panic(b,aCode);
	}

void StartThread(TInt);

TInt ThreadFunction(TAny* aParam)
	{
	TInt p=(TInt)aParam;
	FOREVER
		{
		TProcessPriority pp=(p&1)?EPriorityForeground:EPriorityBackground;
		RProcess().SetPriority(pp);
		++p;
		StartThread(p);
		User::AfterHighRes(1);
		}
	}

void StartThread(TInt aParam)
	{
	RThread t;
	TInt r=t.Create(KNullDesC(),ThreadFunction,0x1000,NULL,(TAny*)aParam);
	if (r!=KErrNone)
		PANIC(r);
	t.Resume();
	t.Close();
	}

GLDEF_C TInt E32Main()
	{
	TBuf<256> cmd;
	User::CommandLine(cmd);
	TLex lex(cmd);
	TUint param1;
	TInt r=lex.Val(param1,EHex);
	if (r!=KErrNone)
		PANIC(r);
	Seed[0]=param1;
	Seed[1]=0;
	StartThread(0);
	TUint x=Random(Seed);
	x&=63;
	x+=2;
	User::AfterHighRes(x);
	RProcess().Kill(param1);
	return 0;
	}