// Copyright (c) 1997-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\bench\t_ctxsw.cpp
// Overview:
// Test and benchmark inter-thread context switch.
// API Information:
// RThread, RSemaphore, TRequestStatus.
// Details:
// - Creates a thread with a handle to a Semaphore, check for successful 
// creation and assign priority EPriorityLess.
// - Creates another thread with the handle to the thread already created, 
// check for successful creation and assign priority EPriorityMuchLess.
// - Makes the two threads eligible for execution.
// - First thread counts the number of semaphore requests.
// - Second thread counts the number of times the thread is signalled on 
// completion of request.
// - Terminate the threads, print the count per second.
// Platforms/Drives/Compatibility:
// All.
// Assumptions/Requirement/Pre-requisites:
// Failures and causes:
// Base Port information:
// 
//

#define __E32TEST_EXTENSION__
#include <e32test.h>

RTest test(_L("T_CTXSW"));

volatile TInt Count1;
volatile TInt Count2;

TInt Thread1(TAny* aSemaphore)
	{
	RSemaphore s;
	s.SetHandle((TInt)aSemaphore);
	User::WaitForAnyRequest();
	s.Signal();
	FOREVER
		{
		User::WaitForAnyRequest();
		Count1++;
		}
	}

TInt Thread2(TAny* aThread)
	{
	TRequestStatus s;
	RThread t;
	t.SetHandle((TInt)aThread);
	FOREVER
		{
		Count2++;
		TRequestStatus* ps=&s;
		t.RequestComplete(ps,0);
		}
	}

const TInt KHeapSize=4096;
void Test1()
	{
	test.Start(_L("Test 1"));

	RSemaphore sem;
	TInt r = sem.CreateLocal(0);
	test_KErrNone(r);
	RThread t1,t2;
	RThread* pt1, *pt2;

	pt1 = NULL;
	pt2 = NULL;

	Count1=Count2=0;
	r=t1.Create(_L("Thread1"),Thread1,KDefaultStackSize,KHeapSize,KHeapSize,(TAny*)sem.Handle());
	if (!pt1)
		pt1=&t1;
	else
		test(pt1==&t1);

	test_KErrNone(r);
	t1.SetPriority(EPriorityLess);
	r=t2.Create(_L("Thread2"),Thread2,KDefaultStackSize,KHeapSize,KHeapSize,(TAny*)t1.Handle());
		if (!pt2)
		pt2=&t2;
	else
		test(pt2==&t2);
	test_KErrNone(r);
	t2.SetPriority(EPriorityMuchLess);

	TRequestStatus s1,s2;
	t1.Logon(s1);
	t2.Logon(s2);
	t1.Resume();
	t2.Resume();
	sem.Wait();
	Count1=Count2=0;
	User::After(16000000);
	t2.Kill(0);
	User::WaitForRequest(s2);
	t1.Kill(0);
	User::WaitForRequest(s1);

	t2.Close();
	t1.Close();
	test.Printf(_L("Ran %d times in one second.\n"),(Count1+Count2)/16);  // get the value
	sem.Close();

	test.End();
	}

struct SThread3Info
	{
	TRequestStatus		iStatus;
	TRequestStatus		iLogonStatus;
	RThread				iThread;
	volatile TUint32	iCount;
	SThread3Info*		iOther;
	TUint32				iPadding[9];
	};

void Thread3(TAny* aInfo)
	{
	SThread3Info& me = *(SThread3Info*)aInfo;
	SThread3Info& you = *me.iOther;
	FOREVER
		{
		TRequestStatus* ps = &you.iStatus;
		you.iThread.RequestComplete(ps, 0);
		User::WaitForAnyRequest();
		++me.iCount;
		Count2++;
		}
	}

void Test2()
	{
	test.Start(_L("Test 2"));

	SThread3Info info[2];
	TInt r;
	TInt i;
	for (i=0; i<2; ++i)
		{
		info[i].iCount = 0;
		info[i].iOther = &info[1-i];
		r = info[i].iThread.Create(KNullDesC, (TThreadFunction)&Thread3, 0x1000, 0, &info[i]);
		test_KErrNone(r);
		info[i].iThread.Logon(info[i].iLogonStatus);
		test_Equal(KRequestPending, info[i].iLogonStatus.Int());
		}
	info[0].iThread.SetPriority(EPriorityMuchLess);
	info[1].iThread.SetPriority(EPriorityLess);
	info[0].iThread.Resume();
	info[1].iThread.Resume();
	User::AfterHighRes(100000);
	TUint32 ic0 = info[0].iCount;
	TUint32 ic1 = info[1].iCount;
	User::AfterHighRes(10000000);
	info[0].iThread.Kill(0);
	info[1].iThread.Kill(0);
	User::WaitForRequest(info[0].iLogonStatus);
	User::WaitForRequest(info[1].iLogonStatus);
	test_Equal(EExitKill, info[0].iThread.ExitType());
	test_Equal(0, info[0].iThread.ExitReason());
	test_Equal(EExitKill, info[1].iThread.ExitType());
	test_Equal(0, info[1].iThread.ExitReason());

	TUint32 fc0 = info[0].iCount;
	TUint32 fc1 = info[1].iCount;
	test.Printf(_L("T0: Initial %10u Final %10u Diff %10u PerSec %10u\n"), ic0, fc0, (fc0-ic0), (fc0-ic0)/10);
	test.Printf(_L("T1: Initial %10u Final %10u Diff %10u PerSec %10u\n"), ic1, fc1, (fc1-ic1), (fc1-ic1)/10);

	CLOSE_AND_WAIT(info[0].iThread);
	CLOSE_AND_WAIT(info[1].iThread);

	test.End();
	}

TInt E32Main()
	{
	
	test.Title();
	test.Start(_L("Timing inter-thread context switches..."));

	Test1();
	Test2();

	test.End();
	return 0;
	}