--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/sysstatemgmt/systemstatemgr/test/testapps/src/ssmcletestproc.cpp	Tue Feb 02 00:53:00 2010 +0200
@@ -0,0 +1,127 @@
+// Copyright (c) 2007-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:
+// usage: ssmtestprocwritetime.exe <output filename> [<timeout (seconds)> [<succeed on run number>]]    *
+// 
+//
+
+/**
+ @file
+ @test
+ @internalComponent - Internal Symbian test code
+*/
+
+#include <e32base.h>
+#include <f32file.h>
+#include <s32file.h>
+#include "ssmcletestapp.h"
+#include "ssmtestapps.h"
+#include "ssmdebug.h"
+
+
+static void RunL()
+	{
+	TSsmCleTestAppArgs args;
+	XSsmCleTestApp::GetCommandLineArgsL(args);
+	RFs fs;
+	User::LeaveIfError(fs.Connect());
+	CleanupClosePushL(fs);
+
+	
+	TInt count = XSsmCleTestApp::GetRunCountL(fs, args.iLogPrefix);
+	if (0 == count)
+		{
+		XSsmCleTestApp::WriteStartTimeL(fs, args.iLogPrefix);
+						
+		}
+	TInt newCount = XSsmCleTestApp::IncrementRunCountL(fs, args.iLogPrefix);
+		
+
+	if ((args.iSucceedOnRun == 0)  && (args.iWaitTime > 0))
+		{
+		User::After(args.iWaitTime * 1000); 
+						
+		}
+	
+	if ((args.iSucceedOnRun != 0) && (args.iSucceedOnRun > count) && (args.iWaitTime > 0))
+		{
+		User::After(args.iWaitTime * 1000); 
+		}
+
+	XSsmCleTestApp::WriteResultL(fs, args.iLogPrefix,args.iFailHow);
+
+	switch (args.iFailHow) //Other failure modes don't require special action
+		{
+		case EDontFail:
+			{
+			if ((args.iSucceedOnRun == 0) || ((args.iSucceedOnRun > 0) && (count >= args.iSucceedOnRun)))
+				{
+				RProcess::Rendezvous(KErrNone);
+				}
+			else
+				{
+				RProcess::Rendezvous(KErrBadRendezvousTest);
+				}
+			break;
+			}
+		case EPanic:
+			{
+			User::Panic(_L("SSMTEST"), KSsmCleTestPanic);
+			break;
+			}
+		case EBadRendezvous:
+			{
+			TBuf<KTestCommandLineMaxLength> prefix = KTestAppLogFileLoc();
+			XSsmCleTestApp::WriteResultL(fs, prefix, args.iFailHow);
+			RProcess::Rendezvous(KErrBadRendezvousTest);
+			break;
+			}
+		case ENoRendezvous:
+		case EMultipleTimeout:
+			{
+			User::After(10000000); // 10 seconds
+			break;
+			}
+		}
+	//Signalling the start of the application
+	RSemaphore sem;
+	TInt err = sem.OpenGlobal(KStartProcSignalSemaphore);
+	RDebug::Print(_L("KStartProcSignalSemaphore Opened with %d"), err);
+		
+	if(err == KErrNone)
+		{
+		sem.Signal();
+		sem.Close();
+		}
+	CleanupStack::PopAndDestroy(&fs);
+	}
+
+TInt E32Main()
+	{
+	__UHEAP_MARK;
+	CTrapCleanup* cleanup=CTrapCleanup::New();
+	TInt r=KErrNoMemory;
+	if (cleanup)
+		{
+		TRAP(r,RunL());
+		delete cleanup;
+		}
+
+	__UHEAP_MARKEND;
+
+	//This process will return to the user and thus be terminated without cleaning up properly
+	//To avoid this we give a wait for request so that we can explicitly clean it up
+	TRequestStatus status = KRequestPending;
+	User::WaitForRequest(status);
+	return r;
+	}