--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/commonappservices/alarmserver/Test/talarmrobustness.cpp	Tue Feb 02 10:12:00 2010 +0200
@@ -0,0 +1,839 @@
+// Copyright (c) 1999-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:
+//
+
+// System includes
+#include <e32base.h>
+#include <e32test.h>
+#include <f32file.h>
+#include <s32mem.h>
+
+// User includes
+#include <asshdalarm.h>
+#include <asclisession.h>
+#include <consolealarmalertservermain.h>
+#include "testserver.h"
+#include "ASTstAlarmTest.h"
+
+// Type definitions
+typedef void (*ThreadTestL)(void);
+
+// Constants
+const TUid KServerUid2={0x1000008D};
+const TUid KServerUid3={0x101F502A};
+const TUidType serverUid(KNullUid,KServerUid2,KServerUid3);
+
+// Literal constants
+_LIT(KTestTitle, "TAlarmRobustness");
+_LIT(KRobustTestCreateServer, "Creating alarm server");
+
+#ifdef _DEBUG
+#ifdef __WINS__
+_LIT(KRobustTestCloseServer, "Close alarm server");
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+#ifdef _DEBUG
+#ifdef __WINS__
+_LIT(KTestIniFile, "c:\\private\\101f5027\\AlarmServer.ini");
+_LIT(KAlarmIniFileDir, "c:\\private\\101f5027\\");
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+// Globals
+//static RTest TheAlarmTest(KTestTitle);
+static RASCliSession TheAlarmServerSession;
+
+const TInt KAlarmObjectBuffer = 512;
+
+#ifdef _DEBUG
+#ifdef __WINS__
+
+const TInt KAlarmTestWaitForFileWrite = 2000000;
+
+
+static void TestClearStoreL()
+	{
+	// Delete all alarms
+	RArray<TAlarmCategory> categories;
+	TheAlarmServerSession.GetAvailableCategoryListL(categories);
+	const TInt KAlarmCategoriesCount = categories.Count();
+	for(TInt i=0; i<KAlarmCategoriesCount; i++)
+		{
+		const TAlarmCategory category = categories[i];
+		TheAlarmTest(TheAlarmServerSession.AlarmDeleteAllByCategory(category, EFalse) == KErrNone, __LINE__);
+		}
+	categories.Close();
+	}
+
+static void DeleteIniFileL()
+	{
+   	RPIMTestServer serv;
+    User::LeaveIfError(serv.Connect());
+    CleanupClosePushL(serv);
+    serv.DeleteFileL(KTestIniFile);
+	CleanupStack::PopAndDestroy(&serv);
+	}
+
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+//*************************************************************************************
+void InitializeAlarm(TASShdAlarm& theAlarm)
+	{
+	theAlarm.Category() = KASCliCategoryClock;
+	theAlarm.RepeatDefinition() = EAlarmRepeatDefintionRepeatDaily;
+	_LIT(KAlarmTestInit, "This is an alarm message - alarm 1");
+	theAlarm.Message() = KAlarmTestInit;
+	theAlarm.NextDueTime().HomeTime();
+	theAlarm.NextDueTime() += TTimeIntervalMinutes(1);
+	_LIT(KAlarmTestSoundName, "Arf Arf Woop");
+	theAlarm.SoundName() = KAlarmTestSoundName;
+	}
+
+
+#ifdef _DEBUG
+#ifdef __WINS__
+static void CreateSingleTestAlarmL(TAlarmId& testID)
+	{
+	_LIT(KAlarmTestAddDisabled, "Adding disabled alarm");
+	TheAlarmTest.Next(KAlarmTestAddDisabled);
+	//
+	TASShdAlarm alarm;
+	InitializeAlarm(alarm);
+
+	//
+	TheAlarmTest(TheAlarmServerSession.AlarmAdd(alarm) == KErrNone, __LINE__);
+	const TAlarmId id = alarm.Id();
+	testID = id;
+	TheAlarmTest(id != KNullAlarmId, __LINE__);
+
+	//
+	_LIT(KAlarmTestGetDetails, "Get alarm details");
+	TheAlarmTest.Next(KAlarmTestGetDetails);
+	TheAlarmTest(TheAlarmServerSession.GetAlarmDetails(id, alarm) == KErrNone, __LINE__);
+
+	//
+	_LIT(KAlarmTestEnableAlarm, "Enabling a disabled alarm");
+	TheAlarmTest.Next(KAlarmTestEnableAlarm);
+	TheAlarmTest(TheAlarmServerSession.SetAlarmStatus(id, EAlarmStatusEnabled) == KErrNone, __LINE__);
+	}
+
+
+static void RunNoConfigFileTestL()
+	{
+	_LIT(KRobustTestNoConfig, "Run No Config File Test");
+	TheAlarmTest.Next(KRobustTestNoConfig);
+
+	// 1) Delete AlarmServer.ini file
+	DeleteIniFileL();
+
+	// 2) Connect to the alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 3) Add alarm.
+	TAlarmId testID = KNullAlarmId;
+	CleanupClosePushL(TheAlarmServerSession);
+	CreateSingleTestAlarmL(testID);
+
+	// 4) Shutdown alarm server.
+	TheAlarmTest.Next(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 5) Restart alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 6) Check alarm has persisted.
+	TASShdAlarm testAlarm;
+	TInt error = TheAlarmServerSession.GetAlarmDetails(testID, testAlarm);
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+
+
+static void RunZeroLengthConfigFileTestL()
+	{
+	_LIT(KRobustTestZeroLengthConfigFile, "Run Zero Length Config File Test");
+	TheAlarmTest.Next(KRobustTestZeroLengthConfigFile);
+
+	// 1) Create an alarm to make sure there is a config file.
+	TAlarmId testID = KNullAlarmId;
+	CreateSingleTestAlarmL(testID);
+	User::After(KAlarmTestWaitForFileWrite);
+
+	// 2) Zero length the AlarmServer.ini file
+   	TestClearStoreL();
+
+	// 3) Connect to the alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 4) Add alarm.
+	CleanupClosePushL(TheAlarmServerSession);
+	CreateSingleTestAlarmL(testID);
+
+	// 5) Shutdown alarm server.
+	TheAlarmTest.Next(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 6) Restart alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 7) Check alarm has persisted.
+	TASShdAlarm testAlarm;
+	TInt error = TheAlarmServerSession.GetAlarmDetails(testID, testAlarm);
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+
+
+static void CorruptErrorConditionTestL()
+	{
+	_LIT(KRobustTestCorruptErrorCondition, "Corrupt Error Condition Test");
+	TheAlarmTest.Next(KRobustTestCorruptErrorCondition);
+
+	// 1) Create file session to call SetErrorCondition.
+	TAlarmId testID = KNullAlarmId;
+ 	TInt error  = KErrCorrupt;
+	RFs testFile;
+	User::LeaveIfError(testFile.Connect());
+	CleanupClosePushL(testFile);
+
+	// 2) Create a few alarms to make sure we have populated config file.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+	CleanupClosePushL(TheAlarmServerSession);
+	const TInt KNumberOfTestAlarms = 3;
+	for( TInt i=0;i<KNumberOfTestAlarms;i++)
+		{
+		CreateSingleTestAlarmL(testID);
+		}
+	User::After(KAlarmTestWaitForFileWrite);
+
+	// 3) Shut down server so we can re-connect and do internalization.
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 4) Test loop - This will cycle through file session internalization
+	//	process, checking to see that it leaves each time, instead of panicking.
+	for (TInt failureCounter = 1 ; error == KErrCorrupt ; ++failureCounter)
+		{
+		testFile.SetErrorCondition(KErrCorrupt , failureCounter );
+		error = TheAlarmServerSession.Connect();
+		testFile.SetErrorCondition(KErrNone );
+		}
+
+	// 5) Close file session.
+	CleanupStack::PopAndDestroy(&testFile);
+
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+
+static void ServerStartUpWithNoIniFileL()
+	{
+	_LIT(KRobustTestNoConfigDir, "Server Startup With No Config File Test");
+	_LIT(KRobustTestDeleteIniFileDir, "Delete INI file and Dir");
+	_LIT(KRobustTestDeleteIniFile, "Delete INI file");
+	TheAlarmTest.Next(KRobustTestNoConfigDir);
+	RPIMTestServer serv;
+	User::LeaveIfError(serv.Connect());
+	CleanupClosePushL(serv);
+
+	// 1) Close Alarm Server
+	TheAlarmTest.Start(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+
+	// 2) Delete AlarmServer.ini file and it's dir
+	TheAlarmTest.Next(KRobustTestDeleteIniFileDir);
+	serv.DeleteFileL(KTestIniFile);
+	serv.DeleteDirL(KAlarmIniFileDir);
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrPathNotFound);	//Check directory deleted
+
+	// 3) Connect to the alarm server and check it created INI file directory
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrNotFound);	//Check directory created but file still absent
+
+	// 4) Add alarm and check INI file created
+	TAlarmId testID = KNullAlarmId;
+	TRequestStatus serverIniStatus;
+	const TTimeIntervalMicroSeconds32 KTimeOutPeriod(1000000);
+	RTimer timeoutTimer;
+	CleanupClosePushL(timeoutTimer);
+	TRequestStatus timerStatus;
+	User::LeaveIfError(timeoutTimer.CreateLocal());
+	timeoutTimer.After(timerStatus, KTimeOutPeriod);
+	serv.FileServerNotifyChange(ENotifyFile, serverIniStatus, KTestIniFile);
+
+	CreateSingleTestAlarmL(testID);
+	User::WaitForRequest(timerStatus, serverIniStatus);
+
+	if (timerStatus.Int() != KRequestPending)
+		{
+		// The file creation did not time out
+		// so cancel the time out timer
+		timeoutTimer.Cancel();
+		User::WaitForRequest(timerStatus);
+		}
+	else
+		{
+		// The file creation timed out
+		// so cancel the FileServerNotifyChange
+		serv.FileServerNotifyChangeCancel();
+		User::WaitForRequest(serverIniStatus);
+		}
+
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrNone);	//Check file present
+
+	// 6) Close Alarm Server Again
+	TheAlarmTest.Next(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+
+	// 7) Delete AlarmServer.ini file only
+	TheAlarmTest.Next(KRobustTestDeleteIniFile);
+	serv.DeleteFileL(KTestIniFile);
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrNotFound);	//Check file deleted but directory still there
+
+	// 8) Connect to the alarm server
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrNotFound);	//Check directory there but file still absent
+
+	// 9) Add alarm and check INI file created
+	testID = KNullAlarmId;
+	serv.FileServerNotifyChange(ENotifyFile, serverIniStatus, KTestIniFile);
+	timeoutTimer.After(timerStatus, KTimeOutPeriod);
+
+	CreateSingleTestAlarmL(testID);
+	User::WaitForRequest(timerStatus, serverIniStatus);
+
+	if (timerStatus.Int() != KRequestPending)
+		{
+		// The file creation did not time out
+		// so cancel the time out timer
+		timeoutTimer.Cancel();
+		User::WaitForRequest(timerStatus);
+		}
+	else
+		{
+		// The file creation timed out
+		// so cancel the FileServerNotifyChange
+		serv.FileServerNotifyChangeCancel();
+		User::WaitForRequest(serverIniStatus);
+		}
+
+	AlarmTest(serv.CheckForFile(KTestIniFile)==KErrNone);	//Check file present
+
+	TheAlarmTest.UpLevel();
+	CleanupStack::PopAndDestroy(&timeoutTimer);
+	CleanupStack::PopAndDestroy(&serv);
+	serv.Close();
+	}
+
+
+#endif // #ifdef _DEBUG
+#endif // #ifdef __WINS__
+
+
+static void AlarmInternalizationTestL()
+	{
+	_LIT(KRobustTestAlarmInternalization, "Alarm Internalization Test");
+	TheAlarmTest.Next(KRobustTestAlarmInternalization);
+
+	// 1) Create an alarm object.
+	TASShdAlarm alarm;
+	TASShdAlarm alarm2;
+	InitializeAlarm(alarm);
+
+	// 2) Create a memory buffer to store alarm object created above.
+	CBufFlat* buffer = CBufFlat::NewL(KAlarmObjectBuffer); // approximation
+	CleanupStack::PushL(buffer);
+	RBufWriteStream stream(*buffer);
+
+	// 3) Externalize alarm object into memory buffer.
+	alarm.ExternalizeL(stream);
+	stream.CommitL();
+
+	// 4) Create second memor`y buffer to manipulate the one above.
+	CBufFlat* buffer2 = CBufFlat::NewL(KAlarmObjectBuffer);
+	CleanupStack::PushL(buffer2);
+
+	// 5) Test loop - Copy the contents of buffer to buffer2, starting at
+	// 				the end of buffer.
+	//    We just want to test that our methods leave normally under
+	//    the error condition and not induce a panic. So we don't need
+	//    to handle the Trap in this test loop.
+	TInt err = KErrCorrupt;
+	for(TInt i = buffer->Size()-1; i>-1; i--)
+		{
+		TPtr8 ptr=buffer->Ptr(i);
+		buffer2->Reset();
+		buffer2->InsertL(0, ptr);
+
+		RBufReadStream rStream(*buffer2);
+		TRAP(err, alarm2.InternalizeL(rStream))
+
+		}
+
+	TheAlarmTest.Test().Printf(_L("AlarmInternalizationTestL error = %d\n"), err);
+
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+	CleanupStack::PopAndDestroy(buffer2);
+	CleanupStack::PopAndDestroy(buffer);
+	}
+
+
+static void AlarmFormatInternalizationTestL()
+	{
+	_LIT(KRobustTestAlarmFormatInternalization, "Alarm Format Internalization Test");
+	TheAlarmTest.Next(KRobustTestAlarmFormatInternalization);
+
+	// 1) Create an alarm object.
+	TASShdAlarm alarm;
+	TASShdAlarm alarm2;
+	InitializeAlarm(alarm);
+
+	// 2) Create a memory buffer to store alarm object created above.
+	CBufFlat* buffer = CBufFlat::NewL(KAlarmObjectBuffer); // approximation
+	CleanupStack::PushL(buffer);
+	RBufWriteStream stream(*buffer);
+
+	// 3) Externalize alarm object into memory buffer.
+	alarm.ExternalizeL(stream);
+	stream.CommitL();
+
+	// 4) Create second memory buffer to manipulate the one above.
+	TPtr8 initPtr = buffer->Ptr(0); // Ptr to beginning of buffer.
+	CBufFlat* buffer2 = CBufFlat::NewL(KAlarmObjectBuffer);
+	CleanupStack::PushL(buffer2);
+
+	// 5) Test loop - Write a character to every position of the
+	//					alarm object.
+	//    We just want to test that our methods leave normally under
+	//    the error condition and not induce a panic. So we don't need
+	//    to handle the Trap in this test loop.
+	TInt err = KErrCorrupt;
+	_LIT(KRobustTestCharactter, "a");
+	const TInt KBufferSize = buffer->Size()-1;
+	for(TInt i = 0; i<KBufferSize; i++)
+		{
+		alarm2.Reset();
+		alarm2 = alarm;
+		buffer2->Reset();
+		buffer2->InsertL(0, initPtr);
+
+		TPtr8 ptr = buffer2->Ptr(i);
+		ptr.Copy(KRobustTestCharactter);
+
+		RBufReadStream rStream(*buffer2);
+		TRAP(err, alarm2.InternalizeL(rStream))
+
+		}
+
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+	CleanupStack::PopAndDestroy(buffer2);
+	CleanupStack::PopAndDestroy(buffer);
+	}
+
+//*************************************************************************************
+void InitializeUtcAlarm(TASShdAlarm& theAlarm)
+	{
+	theAlarm.Category()=KASCliCategoryClock;
+	theAlarm.RepeatDefinition()=EAlarmRepeatDefintionRepeatDaily;
+	_LIT(KAlarmTestInit, "This is a UTC alarm message - alarm 1");
+	TBuf<KMaxAlarmMessageLength> buf(KAlarmTestInit);
+	theAlarm.Message()=buf;
+	TTime time;
+	time.UniversalTime();
+	time += TTimeIntervalMinutes(1);
+	theAlarm.SetUtcNextDueTime(time);
+	_LIT(KAlarmTestSoundName, "Arf Arf Woop");
+	buf = KAlarmTestSoundName;
+	theAlarm.SoundName()=buf;
+	}
+
+
+#ifdef _DEBUG
+#ifdef __WINS__
+static void CreateSingleTestUtcAlarmL(TAlarmId& testID)
+	{
+	_LIT(KAlarmTestAddDisabled, "Adding disabled UTC alarm");
+	TheAlarmTest.Next(KAlarmTestAddDisabled);
+	//
+	TASShdAlarm alarm;
+	InitializeUtcAlarm(alarm);
+
+	//
+	TheAlarmTest(TheAlarmServerSession.AlarmAdd(alarm) == KErrNone, __LINE__);
+	const TAlarmId id = alarm.Id();
+	testID = id;
+	TheAlarmTest(id != KNullAlarmId, __LINE__);
+
+	//
+	_LIT(KAlarmTestGetDetails, "Get UTC alarm details");
+	TheAlarmTest.Next(KAlarmTestGetDetails);
+	TheAlarmTest(TheAlarmServerSession.GetAlarmDetails(id, alarm) == KErrNone, __LINE__);
+
+	//
+	_LIT(KAlarmTestEnableAlarm, "Enabling a disabled UTC alarm");
+	TheAlarmTest.Next(KAlarmTestEnableAlarm);
+	TheAlarmTest(TheAlarmServerSession.SetAlarmStatus(id, EAlarmStatusEnabled) == KErrNone, __LINE__);
+	}
+
+
+static void RunNoConfigFileTestUtcL()
+	{
+	_LIT(KRobustTestNoConfig, "Run No Config File Test");
+	TheAlarmTest.Next(KRobustTestNoConfig);
+
+	// 1) Delete AlarmServer.ini file
+   	DeleteIniFileL();
+
+	// 2) Connect to the alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 3) Add alarm.
+	TAlarmId testID = KNullAlarmId;
+	CleanupClosePushL(TheAlarmServerSession);
+	CreateSingleTestUtcAlarmL(testID);
+
+	// 4) Shutdown alarm server.
+	TheAlarmTest.Next(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 5) Restart alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 6) Check alarm has persisted.
+	TASShdAlarm testAlarm;
+	TInt error = TheAlarmServerSession.GetAlarmDetails(testID, testAlarm);
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+
+
+static void RunZeroLengthConfigFileTestUtcL()
+	{
+	_LIT(KRobustTestZeroLengthConfigFile, "Run Zero Length Config File Test");
+	TheAlarmTest.Next(KRobustTestZeroLengthConfigFile);
+
+	// 1) Create an alarm to make sure there is a config file.
+	TAlarmId testID = KNullAlarmId;
+	CreateSingleTestUtcAlarmL(testID);
+	User::After(KAlarmTestWaitForFileWrite);
+
+	// 2) Zero length the AlarmServer.ini file
+   	TestClearStoreL();
+
+	// 3) Connect to the alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 4) Add alarm.
+	CleanupClosePushL(TheAlarmServerSession);
+	CreateSingleTestUtcAlarmL(testID);
+
+	// 5) Shutdown alarm server.
+	TheAlarmTest.Next(KRobustTestCloseServer);
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 6) Restart alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+	// 7) Check alarm has persisted.
+	TASShdAlarm testAlarm;
+	TInt error = TheAlarmServerSession.GetAlarmDetails(testID, testAlarm);
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+
+
+static void CorruptErrorConditionTestUtcL()
+	{
+	_LIT(KRobustTestCorruptErrorCondition, "Corrupt Error Condition Test");
+	TheAlarmTest.Next(KRobustTestCorruptErrorCondition);
+
+	// 1) Create file session to call SetErrorCondition.
+	TAlarmId testID = KNullAlarmId;
+ 	TInt error  = KErrCorrupt;
+	RFs testFile;
+	CleanupClosePushL(testFile);
+	testFile.Connect();
+
+	// 2) Create a few alarms to make sure we have populated config file.
+	CleanupClosePushL(TheAlarmServerSession);
+	const TInt KNumberOfTestAlarms = 3;
+	for( TInt i=0;i<KNumberOfTestAlarms;i++)
+		{
+		CreateSingleTestUtcAlarmL(testID);
+		}
+	User::After(KAlarmTestWaitForFileWrite);
+
+
+	// 3) Shut down server so we can re-connect and do internalization.
+	TheAlarmServerSession.__DbgShutDownServer();
+	CleanupStack::PopAndDestroy(&TheAlarmServerSession);
+
+	// 4) Test loop - This will cycle through file session internalization
+	//	process, checking to see that it leaves each time, instead of panicking.
+	for (TInt failureCounter = 1 ; error == KErrCorrupt ; ++failureCounter)
+		{
+		testFile.SetErrorCondition(KErrCorrupt , failureCounter );
+		error = TheAlarmServerSession.Connect();
+		testFile.SetErrorCondition(KErrNone );
+		TheAlarmServerSession.Close();
+		}
+
+	// 5) Close file session.
+	CleanupStack::PopAndDestroy(&testFile);
+	testFile.Close();
+	TheAlarmTest(error == KErrNone, __LINE__);
+	}
+#endif // #ifdef _DEBUG
+#endif // #ifdef __WINS__
+
+
+static void UtcAlarmInternalizationTestL()
+	{
+	_LIT(KRobustTestAlarmInternalization, "UTC Alarm Internalization Test");
+	TheAlarmTest.Next(KRobustTestAlarmInternalization);
+
+	// 1) Create an alarm object.
+	TASShdAlarm alarm;
+	TASShdAlarm alarm2;
+	InitializeUtcAlarm(alarm);
+
+	// 2) Create a memory buffer to store alarm object created above.
+	CBufFlat* buffer = CBufFlat::NewL(KAlarmObjectBuffer); // approximation
+	CleanupStack::PushL(buffer);
+	RBufWriteStream stream(*buffer);
+
+	// 3) Externalize alarm object into memory buffer.
+	alarm.ExternalizeL(stream);
+	stream.CommitL();
+
+	// 4) Create second memor`y buffer to manipulate the one above.
+	CBufFlat* buffer2 = CBufFlat::NewL(KAlarmObjectBuffer);
+	CleanupStack::PushL(buffer2);
+
+	// 5) Test loop - Copy the contents of buffer to buffer2, starting at
+	// 				the end of buffer.
+	//    We just want to test that our methods leave normally under
+	//    the error condition and not induce a panic. So we don't need
+	//    to handle the Trap in this test loop.
+	TInt err = KErrCorrupt;
+	for(TInt i = buffer->Size()-1; i>-1; i--)
+		{
+		TPtr8 ptr=buffer->Ptr(i);
+		buffer2->Reset();
+		buffer2->InsertL(0, ptr);
+
+		RBufReadStream rStream(*buffer2);
+		TRAP(err, alarm2.InternalizeL(rStream))
+
+		}
+
+	TheAlarmTest.Test().Printf(_L("UtcAlarmInternalizationTestL error = %d\n"), err);
+
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+	CleanupStack::PopAndDestroy(buffer2);
+	CleanupStack::PopAndDestroy(buffer);
+	}
+
+
+static void UtcAlarmFormatInternalizationTestL()
+	{
+	_LIT(KRobustTestAlarmFormatInternalization, "UTC Alarm Format Internalization Test");
+	TheAlarmTest.Next(KRobustTestAlarmFormatInternalization);
+
+	// 1) Create an alarm object.
+	TASShdAlarm alarm;
+	TASShdAlarm alarm2;
+	InitializeUtcAlarm(alarm);
+
+	// 2) Create a memory buffer to store alarm object created above.
+	CBufFlat* buffer = CBufFlat::NewL(KAlarmObjectBuffer); // approximation
+	CleanupStack::PushL(buffer);
+	RBufWriteStream stream(*buffer);
+
+	// 3) Externalize alarm object into memory buffer.
+	alarm.ExternalizeL(stream);
+	stream.CommitL();
+
+	// 4) Create second memory buffer to manipulate the one above.
+	TPtr8 initPtr = buffer->Ptr(0); // Ptr to beginning of buffer.
+	CBufFlat* buffer2 = CBufFlat::NewL(KAlarmObjectBuffer);
+	CleanupStack::PushL(buffer2);
+
+	// 5) Test loop - Write a character to every position of the
+	//					alarm object.
+	//    We just want to test that our methods leave normally under
+	//    the error condition and not induce a panic. So we don't need
+	//    to handle the Trap in this test loop.
+	TInt err = KErrCorrupt;
+	_LIT(KRobustTestCharactter, "a");
+	const TInt KBufferSize = buffer->Size()-1;
+	for(TInt i = 0; i<KBufferSize; i++)
+		{
+		alarm2.Reset();
+		alarm2 = alarm;
+		buffer2->Reset();
+		buffer2->InsertL(0, initPtr);
+
+		TPtr8 ptr = buffer2->Ptr(i);
+		ptr.Copy(KRobustTestCharactter);
+
+		RBufReadStream rStream(*buffer2);
+		TRAP(err, alarm2.InternalizeL(rStream))
+
+		}
+
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+	CleanupStack::PopAndDestroy(buffer2);
+	CleanupStack::PopAndDestroy(buffer);
+	}
+
+
+//*************************************************************************************
+static void RunTestsL()
+	{
+
+	// Have to start the alarm alert server otherwise the alarm
+	// server cannot start.
+	_LIT(KRobustTestCreateAlarmAlert, "Creating alarm alert server");
+	TheAlarmTest.Next(KRobustTestCreateAlarmAlert);
+	const TInt KGmtOffset = 3600;
+	_LIT(KTime, "20040730:050000.000000"); //Summertime
+	TInt err = User::SetUTCTimeAndOffset(TTime(KTime), KGmtOffset);
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+#ifdef __WINS__
+	_LIT(KConsoleAlarmAlertServerImg,"ConsoleAlarmAlertServer");
+    TBuf<256> cmdline;
+	cmdline.Append('p');
+	cmdline.Append('p');
+	cmdline.Append(EKeyEscape);
+	RProcess server;
+	server.Create(KConsoleAlarmAlertServerImg, cmdline, serverUid);
+	TRequestStatus stat;
+	server.Rendezvous(stat);
+	if (stat != KRequestPending)
+		{
+		server.Kill(0);		// abort startup
+		}
+	else
+		{
+		server.Resume();	// logon OK - start the server
+		}
+		
+	User::WaitForRequest(stat);
+	TInt result = stat.Int();
+	if(result != KErrNone && result != KErrAlreadyExists)
+		{
+		User::LeaveIfError(result);	
+		}		
+#endif //  __WINS__
+
+ 	// Connect() checks if the server is already running before connecting.
+ 	// Here, we call connect to make sure it is running so the tests below can be
+ 	// executed in any order.
+
+	// Connect to the alarm server.
+	TheAlarmTest.Next(KRobustTestCreateServer);
+	User::LeaveIfError(TheAlarmServerSession.Connect());
+
+#ifdef _DEBUG
+#ifdef __WINS__
+	TestClearStoreL();
+	DeleteIniFileL();
+	User::After(KAlarmTestWaitForFileWrite);
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+	// Call Test functions.
+	_LIT(KRobustTestCallTests, "Calling Test functions");
+	TheAlarmTest.Next(KRobustTestCallTests);
+
+	TheAlarmTest.Test().Printf(_L("Start local alarm tests.\n"));
+
+#ifdef _DEBUG
+#ifdef __WINS__
+	RunNoConfigFileTestL();
+	RunZeroLengthConfigFileTestL();
+	CorruptErrorConditionTestL();
+	ServerStartUpWithNoIniFileL();
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+	AlarmInternalizationTestL();
+	AlarmFormatInternalizationTestL();
+
+	TheAlarmTest.Test().Printf(_L("Start UTC alarm tests.\n"));
+
+#ifdef _DEBUG
+#ifdef __WINS__
+	RunNoConfigFileTestUtcL();
+	RunZeroLengthConfigFileTestUtcL();
+	CorruptErrorConditionTestUtcL();
+#endif // #ifdef __WINS__
+#endif // #ifdef _DEBUG
+
+	UtcAlarmInternalizationTestL();
+	UtcAlarmFormatInternalizationTestL();
+
+	}
+
+
+
+
+//
+// -----> Global Exports
+//
+
+//*************************************************************************************
+TInt E32Main()
+	{
+	__UHEAP_MARK;
+	TInt ret = KErrNone;
+	//
+	CTrapCleanup* cleanup = CTrapCleanup::New();
+	if	(!cleanup)
+		return KErrNoMemory;
+	//
+	TheAlarmTest.Title();
+	TheAlarmTest.Start(KTestTitle);
+	// @SYMTestCaseID PIM-TALARMROBUSTNESS-0001
+    TheAlarmTest.Next(_L(" @SYMTestCaseID PIM-TALARMROBUSTNESS-0001 "));
+	//
+	TRAPD(err, RunTestsL());
+	TheAlarmTest(err == KErrNone, __LINE__);
+
+	delete cleanup;
+    TRAP(ret,TheAlarmTest.EndL());
+	TheAlarmTest.Test().Close();
+	ASTstAlarmTest::Close();
+
+	__UHEAP_MARKEND;
+	return ret;
+	}