// Copyright (c) 1994-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\prime\t_kern.cpp

// 

//

#include <e32test.h>

LOCAL_D RTest test(_L("T_KERN"));

LOCAL_D TFindProcess fProc;

LOCAL_D TFindThread fThread;

LOCAL_D TFindSemaphore fSem;

LOCAL_D TFindMutex fMutex;

LOCAL_D TFindChunk fChunk;

LOCAL_D TFindLogicalDevice fLdd;

LOCAL_D TFindPhysicalDevice fPdd;

LOCAL_D TFindServer fServ;

LOCAL_D TFindLibrary fLib;

LOCAL_C void testFindHandles()

//

// Test the various find handles.

//

	{

	test.Start(_L("Processes"));

	TFullName n;

	while (fProc.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fProc.Handle());

	test.Next(_L("Threads"));

	while (fThread.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fThread.Handle());

	test.Next(_L("Semaphores"));

	while (fSem.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fSem.Handle());

	test.Next(_L("Mutexes"));

	while (fMutex.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fMutex.Handle());

	test.Next(_L("Chunks"));

	while (fChunk.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fChunk.Handle());

	test.Next(_L("LogicalDevice"));

	while (fLdd.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fLdd.Handle());

	test.Next(_L("PhysicalDevice"));

	while (fPdd.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fPdd.Handle());

	test.Next(_L("Server"));

	while (fServ.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fServ.Handle());

	test.Next(_L("Library"));

	while (fLib.Next(n)==KErrNone)

		test.Printf(_L("  %- 50s %d\n"),n.PtrZ(),fLib.Handle());

	test.End();

	}

LOCAL_C void testCurrentProcessAndThread()

//

// Test the handles for the current process and thread.

//

	{

	test.Start(_L("Process"));

	RProcess p;

	TFullName pFullName = p.FullName();

	test.Printf(_L("  %S\n"),&pFullName);

	TName pName = p.Name();

	test.Printf(_L("  %S\n"),&pName);

//

	test.Next(_L("Thread"));

	RThread t;

	TFullName tFullName = t.FullName();

	test.Printf(_L("  %S\n"),&tFullName);

	TName tName = t.Name();

	test.Printf(_L("  %S\n"),&tName);

//

	test.End();

	}

LOCAL_C TInt ThreadBeepFunction(TAny*)

//

// Thread which beeps and stops before the beep completes

//

	{

	User::Beep(440,1000000);

	return KErrNone;

	}

LOCAL_C void testBeep()

//

// Test the beep function.

//

	{

	test.Start(_L("220Hz dur=10"));

	User::Beep(220,1000000);

	User::After(2000000);

	test.Next(_L("330Hz dur=10"));

	User::Beep(330,1000000);

	User::After(2000000);

	test.Next(_L("440Hz dur=10"));

	User::Beep(440,1000000);

	User::After(2000000);

	test.Next(_L("880Hz dur=10"));

	User::Beep(880,1000000);

	User::After(2000000);

	test.Next(_L("1760Hz dur=10"));

	User::Beep(1760,1000000);

	User::After(2000000);

	test.Next(_L("Listen to check that the first beep is interrupted after 2 secs"));

	User::Beep(330,10000000);

	User::After(2000000);

	User::Beep(660,1000000);

	User::After(1000000);

	test.Next(_L("Listen to check that a negative value does not interrupt"));

	User::Beep(330,5000000);

	User::After(2000000);

	TInt r=User::Beep(660,-1000000);

	test.Next(_L("Check the 2nd beep returned KErrGeneral"));

	test(r==KErrGeneral);

	User::After(3000000);

	test.Next(_L("Beep survives when thread terminates"));

	RThread thread;

	thread.Create(_L("Beep Test Thread"),ThreadBeepFunction,0x1000,0x1000,0x1000,NULL);

	TRequestStatus stat;

	thread.Logon(stat);

	thread.Resume();

	User::WaitForRequest(stat);

	RTimer timer;

	timer.CreateLocal();

	thread.Close();

	timer.After(stat,TTimeIntervalMicroSeconds32(2000000)); //2secs

	User::WaitForRequest(stat);

	CLOSE_AND_WAIT(thread);

	test.End();

	}

GLDEF_C TInt E32Main()

//

// Test the various kernel types.

//

    {

	test.Title();

//

	test.Start(_L("TFindHandles"));

	testFindHandles();

//

	test.Next(_L("Current process and thread"));

	testCurrentProcessAndThread();

//

	test.Next(_L("Test beeper"));

	testBeep();

//

	test.End();

	return(KErrNone);

    }