// 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:

//

/**

 @file

 @test

 @internalComponent - Internal Symbian test code

*/

#include <sysmonclisess.h>

#include <startupproperties.h>

#include <ssm/ssmstartupproperties.h>

#include "testapps.h"

#include "tsysmon_stepprocmoninit.h"

CStepProcMonInit::CStepProcMonInit()

	{

	SetTestStepName(KCTestCaseProcMonInit);

	}

TVerdict CStepProcMonInit::doTestStepL()

	{

	DoTestProcL();

	DoTestAppL();

	DoTestErrArgumentL();

	return TestStepResult();

	}

/**

Old Test CaseID 		APPFWK-SYSMON-0001

New Test CaseID 		DEVSRVS-SHMA-SYSMON-0001

*/

void CStepProcMonInit::DoTestProcL()

	{

	INFO_PRINTF1(_L("TEST APPFWK-SYSMON-0001A"));

	INFO_PRINTF1(_L("Going to set a process running"));

	RProcess process;

	CleanupClosePushL(process);

	User::LeaveIfError(process.Create(KTestProcGood, KNullDesC));

	ResumeL(process);

	INFO_PRINTF1(_L("Going to request process monitoring using startupproperties"));

	DoTestMonitorL(process, KTestProcGood, 0); // The test using startupproperties

	process.Kill(KErrNone);

	CleanupStack::Pop(&process);

	CleanupClosePushL(process);

	User::LeaveIfError(process.Create(KTestProcGood, KNullDesC));

	ResumeL(process);

	INFO_PRINTF1(_L("Going to request process monitoring using ssmstartupproperties"));

	DoTestMonitorL(process, KTestProcGood, 1); // The test using ssmstartupproperties

	process.Kill(KErrNone);

	CleanupStack::PopAndDestroy(&process);

	}

/**

Bonus-test APPFWK-SYSMON-0001b using an application instead of a process

*/	

void CStepProcMonInit::DoTestAppL()

	{

	INFO_PRINTF1(_L("TEST APPFWK-SYSMON-0001B"));

	// Launch native application using an unconnected RApaLsSession

	INFO_PRINTF1(_L("Going to set a native application running"));

	TThreadId threadId;

	TRequestStatus requestStatus;

	StartViewlessBgApplicationL(KTestAppGood, threadId, requestStatus);

	// Test that the application was created, then wait for it to resume	

	RThread thread;

	RProcess process;

	CleanupClosePushL(thread);

	CleanupClosePushL(process);

	TEST(KErrNone == thread.Open(threadId));

	TEST(KErrNone == thread.Process(process)); 

	User::WaitForRequest(requestStatus);

	INFO_PRINTF1(_L("Going to request process monitoring using startupproperties"));

	// Do the actual testing

	DoTestMonitorL(process, KTestAppGood, 0); // test using startupproperties

	// Cleanup

	process.Kill(KErrNone);

	StartViewlessBgApplicationL(KTestAppGood, threadId, requestStatus);

	CleanupStack::Pop(&process);

	CleanupStack::Pop(&thread);

	CleanupClosePushL(thread);

	CleanupClosePushL(process);

	TEST(KErrNone == thread.Open(threadId));

	TEST(KErrNone == thread.Process(process)); 

	User::WaitForRequest(requestStatus);

	INFO_PRINTF1(_L("Going to request process monitoring using ssmstartupproperties"));

	// Do the actual testing

	DoTestMonitorL(process, KTestAppGood, 1); // test using ssmstartupproperties

	// Cleanup

	process.Kill(KErrNone);

	CleanupStack::PopAndDestroy(&process);

	CleanupStack::PopAndDestroy(&thread);

	}	

/**

 * Calls RSysMonSession::MonitorL twice. the first call is expected to succeed and the second call

 * returns KErrNone in release builds, whereas panics in debug builds

 */	

void CStepProcMonInit::DoTestMonitorL(const RProcess& aProcess, const TDesC& aFilename, const TInt aStartUpPropType)

	{

	RSysMonSession sess;

	sess.OpenL();

	CleanupClosePushL(sess);

	if (aStartUpPropType)

		{

		CSsmStartupProperties* prop = CSsmStartupProperties::NewLC(aFilename, KNullDesC);

		// Testing consistency assertion of aStartupProperties in RSysMonSession::MonitorL

		TRAPD(err, sess.MonitorL(*prop, aProcess)); 

		TESTE(err == KErrArgument, err);

		if(err == KErrArgument)

			{

			INFO_PRINTF1(_L("Monitor request with invalid args was refused properly by RSysMonSession::MonitorL using ssmstartupproperties"));

			}

		prop->SetExecutionBehaviour(ESsmWaitForSignal);

		TSsmMonitorInfo monitorInfo;

		monitorInfo.iRestartPolicy = ESsmIgnoreOnFailure;

		monitorInfo.iRestartMode = 0;

		monitorInfo.iTimeout = 0;

		monitorInfo.iRetries = 0;

		prop->SetMonitorInfoL(monitorInfo); // SysMon will not do any restart attempts

		// monitoring first time should succeed

		TRAP(err, sess.MonitorL(*prop, aProcess)); 

		TESTEL(err == KErrNone, err);

		INFO_PRINTF1(_L("First monitor request succeeded"));

		TRAP(err, sess.MonitorL(*prop, aProcess)); 

		TESTE(err == KErrAlreadyExists, err);

		if(err == KErrAlreadyExists)

			{

			INFO_PRINTF1(_L("Second monitor request returned KErrAlreadyExists as expected"));

			}

		CleanupStack::PopAndDestroy(prop);

		}

	else

		{

		CStartupProperties* prop = CStartupProperties::NewLC(aFilename, KNullDesC);

		// Testing consistency assertion of aStartupProperties in RSysMonSession::MonitorL

		TRAPD(err, sess.MonitorL(*prop, aProcess)); 

		TESTE(err == KErrArgument, err);

		if(err == KErrArgument)

			{

			INFO_PRINTF1(_L("Monitor request with invalid args was refused properly by RSysMonSession::MonitorL using startupproperties"));

			}

		prop->SetMonitored(ETrue);

		prop->SetNoOfRetries(0); // SysMon will not do any restart attempts

		// monitoring first time should succeed

		TRAP(err, sess.MonitorL(*prop, aProcess)); 

		TESTEL(err == KErrNone, err);

		INFO_PRINTF1(_L("First monitor request succeeded"));

		TRAP(err, sess.MonitorL(*prop, aProcess)); 

		TESTE(err == KErrAlreadyExists, err);

		if(err == KErrAlreadyExists)

			{

			INFO_PRINTF1(_L("Second monitor request returned KErrAlreadyExists as expected"));

			}

		CleanupStack::PopAndDestroy(prop);

		}

	CleanupStack::PopAndDestroy(&sess);

	}

/*

Bonus-test APPFWK-SYSMON-0001C 

Testing consistency of assertions in RSysMonSession::MonitorL

*/

void CStepProcMonInit::DoTestErrArgumentL()

	{

	INFO_PRINTF1(_L("TEST APPFWK-SYSMON-0001C -  validade that sysmon refuse invalid requests"));

	RProcess process;

	CleanupClosePushL(process);

	User::LeaveIfError(process.Create(KTestProcGood, KNullDesC));

	ResumeL(process);

	RSysMonSession sess;

	sess.OpenL();

	CleanupClosePushL(sess);

	CStartupProperties* prop = CStartupProperties::NewLC(KTestProcGood, KNullDesC);

	CSsmStartupProperties* ssmProp = CSsmStartupProperties::NewLC(KTestProcGood, KNullDesC);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse monitor with CStartupProperties::Monitor()==EFalse using startupproperties"));

	TRAPD(err, sess.MonitorL(*prop, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse monitor with CStartupProperties::Monitor()==EFalse using ssmstartupproperties"));

	TRAP(err, sess.MonitorL(*ssmProp, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse monitor with CStartupProperties::StartMethod==EDeferredWaitForStart using startupproperties"));

	prop->SetStartMethod(EDeferredWaitForStart);

	prop->SetNoOfRetries(0);

	TRAP(err, sess.MonitorL(*prop, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse monitor with CStartupProperties::StartMethod==ESsmDeferredWaitForSignal using ssmstartupproperties"));

	ssmProp->SetExecutionBehaviour(ESsmDeferredWaitForSignal);	

	TSsmMonitorInfo monitorInfo;

	monitorInfo.iRestartPolicy = ESsmIgnoreOnFailure;

	monitorInfo.iRestartMode = 0;

	monitorInfo.iTimeout = 0;

	monitorInfo.iRetries = 0;

	ssmProp->SetMonitorInfoL(monitorInfo);

	TRAP(err, sess.MonitorL(*ssmProp, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse to restart another exe image than the one it monitors using startupproperties."));

	prop->SetStartMethod(EWaitForStart);

	prop->SetNoOfRetries(1);

	prop->SetFileParamsL(_L("sdkjfhsdk"), KNullDesC);

	TRAP(err, sess.MonitorL(*prop, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse to restart another exe image than the one it monitors using ssmsstartupproperties."));

	ssmProp->SetExecutionBehaviour(ESsmWaitForSignal);	

	monitorInfo.iRestartPolicy = ESsmIgnoreOnFailure;

	monitorInfo.iRestartMode = 0;

	monitorInfo.iTimeout = 0;

	monitorInfo.iRetries = 1;

	ssmProp->SetMonitorInfoL(monitorInfo);

	ssmProp->SetFileParamsL(_L("sdkjfhsdk"), KNullDesC);

	TRAP(err, sess.MonitorL(*ssmProp, process)); 

	TESTE(err == KErrArgument, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse to monitor a dead process using startupproperties."));

	prop->SetFileParamsL(KTestProcGood, KNullDesC);

	prop->SetStartMethod(EWaitForStart);

	prop->SetMonitored(ETrue);

	prop->SetNoOfRetries(1);

	process.Kill(KErrNone);

	TRAP(err, sess.MonitorL(*prop, process)); 

	TESTE(err == KErrDied, err);

	INFO_PRINTF1(_L("Going to check if RSysMonSession::MonitorL correctly refuse to monitor a dead process using ssmstartupproperties."));

	ssmProp->SetFileParamsL(KTestProcGood, KNullDesC);

	TRAP(err, sess.MonitorL(*ssmProp, process)); 

	TESTE(err == KErrDied, err);

	CleanupStack::PopAndDestroy(ssmProp);

	CleanupStack::PopAndDestroy(prop);

	CleanupStack::PopAndDestroy(&sess);

	CleanupStack::PopAndDestroy(&process);

	}