// Copyright (c) 2005-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:

//

#include "SCHTIME.H"

#include <e32base.h>

#include <e32test.h>

#include <f32file.h>

#include <s32file.h>

#include <e32std.h>

#include <tz.h>

#include "Thelpers.h"

_LIT(KTestName,	"TTsTime Tests");

RTest	TheTest(KTestName);

RTz		TheTzServer;

static RFs			TheFsSession;

_LIT(KFileName,"_:\\ttstime.dat");

static TBuf<32> fileName;

//

//

//Test macros and functions

static void Check(TInt aValue, TInt aLine)

	{

	if(!aValue)

		{

		(void)TheFsSession.Delete(fileName);

		TheTest(EFalse, aLine);

		}

	}

static  void Check(TInt aValue, TInt aExpected, TInt aLine)

	{

	if(aValue != aExpected)

		{

		RDebug::Print(_L("*** Expected error: %d, got: %d\r\n"), aExpected, aValue);

		(void)TheFsSession.Delete(fileName);

		TheTest(EFalse, aLine);

		}

	}

#define TEST(arg) ::Check((arg), __LINE__)

#define TEST2(aValue, aExpected) ::Check(aValue, aExpected, __LINE__)

/**

@file

@SYMTestCaseID				SYSLIB-SCHSVR-CT-0204

@SYMTestCaseDesc 			Check that the default constructor works properly

@SYMTestPriority 			low

@SYMTestActions  			Creates an instance of TTsTime and check its data

@SYMTestExpectedResults		The test must not fail.

@SYMPREQ					PREQ234

*/

static void TestsWithDefaultContructorL()

	{

	//	Tests with default constructor:

	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-SCHSVR-CT-0204 TTsTime() default constructor, TTsTime is UTC time by default "));

	TTsTime tsTime; //defalut constructor, TTsTime is UTC	

	TheTest.Printf(_L("Timezone set to Europe, London, DST on"));	

	//set the current utc time to 8.55am, 15 May 2005 -Daylight savings apply on this date

	TDateTime date(2005, EMay, 15, 8, 55, 0, 0);

	TTime time(date);	

	TInt err = SchSvrHelpers::SetUTCTimeL(time); 	

	TEST(err == 0);

	// check that member data are set properly using GetUtcTime() and GetLocalTime()

	TTime utcTime = TTime(tsTime.GetUtcTime());

	TTime localTime = TTime(tsTime.GetLocalTime());

	TDateTime testDate(0, EJanuary, 0, 1, 0, 0, 0);

	TTime testTime(testDate);

	TEST (localTime == testTime);	

	// check the offset

	// because we set the current time zone to Europe/London and 

	// ProcessOffsetEvent has been called in GetUtcTime, and since TTsTime is UTC by defalu then 

	// TTsTime::iOffset remains the same

	TTimeIntervalSeconds tsTimeOffset = tsTime.GetOffset(); 

	TEST(tsTimeOffset == TTimeIntervalSeconds(0));

	}

/**

@file

@SYMTestCaseID				SYSLIB-SCHSVR-CT-0205

@SYMTestCaseDesc 			Checks that the second constructor works properly

@SYMTestPriority 			low

@SYMTestActions  			Creates an instance of TTsTime and check its data

@SYMTestExpectedResults		The test must not fail.

@SYMPREQ					PREQ234

*/	

static void TestWithSecondConstructorAndUtcL()

	{

	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-SCHSVR-CT-0205 TTsTime - test for 2nd constructor "));

	TheTest.Printf(_L("Timezone set to Europe, London, DST on"));	

	//set the current utc time to 8.55am, 15 May 2005 -Daylight savings apply on this date

	TDateTime date(2005, EMay, 15, 8, 55, 0, 0);

	TTime time(date);

	TInt err = SchSvrHelpers::SetUTCTimeL(time); 

	TEST(err == 0);

	//	Tests with overloaded constructor 

	TheTest.Next(_L("Test TTsTime with overloaded operator and TTsTime is UTC"));

	TTsTime tsTime(time, ETrue); //Sets time to UTC time as boolean is ETrue

	TTime utcTime = tsTime.GetUtcTime(); 

	TTimeIntervalSeconds tsTimeOffset = tsTime.GetOffset();

	TBool isUtc = tsTime.IsUtc();

	TEST(utcTime == time);

	TEST(tsTimeOffset == TTimeIntervalSeconds(0)); //because tsTime is UTC so its offset is zero

	TEST(isUtc); 

	}

/**

@file

@SYMTestCaseID				SYSLIB-SCHSVR-CT-0206

@SYMTestCaseDesc 			Check TTsTime::SetHomeTime works properly

@SYMTestPriority 			low

@SYMTestActions  			Creates an instance of TTsTime, sets its values to home time and verifies them 

@SYMTestExpectedResults		The test must not fail.

@SYMPREQ					PREQ234

*/

static void TestSetHomeTimeL()

	{

	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-SCHSVR-CT-0206 TTsTime::SetHomeTime test "));	

	TheTest.Printf(_L("Timezone set to Europe, London, DST on"));	

	// set the date and time of the device

	TheTest.Next(_L("Test TTsTime is Local Time"));

	TDateTime date(2005, EMay, 15, 8, 55, 0, 0);

	TTime time(date);

	TInt err = SchSvrHelpers::SetUTCTimeL(time);

	TEST(err == 0);

	//set date and time of TTsTime to home time

	date =  TDateTime(2005, EMay, 15, 9, 55, 0, 0);

	time = date;

	TTsTime tsTime;

	tsTime.SetLocalTime(time);

	TTime localTime = tsTime.GetLocalTime(); 

	TTimeIntervalSeconds tsTimeOffset = tsTime.GetOffset();

	TBool isUtc = tsTime.IsUtc();

	// check that the returned local time is the same as the one we set earlier

	TEST(localTime == time );

	// check now that the stored utc time in TTsTime is correct

	TTime utcTime = tsTime.GetUtcTime();

	date =  TDateTime(2005, EMay, 15, 8, 55, 0, 0); 	

	time = TTime(date);

	TEST(utcTime == time );

	// check offset - 3600 seconds (1 hour) because time of device is in BST

	TEST(tsTimeOffset == TTimeIntervalSeconds(3600));

	TEST(!isUtc); 	//This TTsTime is not UTC.

	}

/**

@file

@SYMTestCaseID				SYSLIB-SCHSVR-CT-0207

@SYMTestCaseDesc 			Checks ProcessOffsetEvent 

@SYMTestPriority 			low

@SYMTestActions  			Creates an instance of TTsTime, changes timezone, and checks that the TTsTime object is updated correctly.

@SYMTestExpectedResults		The test must not fail.

@SYMPREQ					PREQ234

*/

static void TestProcessOffsetEventL()

	{

	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-SCHSVR-CT-0207 ProcessOffsetEvent Test "));

	TheTest.Printf(_L("Timezone set to Europe, London, DST on"));	

	//set the current home time to 8.55am, 15 May 2005

	//Daylight savings do apply on this date

	//so utc time should be 7.55

	TDateTime date(2005, EMay, 15, 8, 55, 0, 0);

	TTime time(date);	

	TInt err = SchSvrHelpers::SetHomeTimeL(time);

	TEST(err == KErrNone);

	//Check the ProcessOffsetEvent () method and print iUtcTime, iOffset

	//create hometime based ttstime object

	//should have 9.55 in iUtcTime

	date = TDateTime(2005, EMay, 15, 10, 55, 0, 0);

	time = date;

	TTsTime tsTime(time, EFalse);

	// remember current offset

	TTimeIntervalSeconds savedOffset = User::UTCOffset();

	// Increase offset by 1Hr by moving to Paris

	TheTest.Printf(_L("Move timezone to Paris, Europe. Check TTsTime updated accordingly"));

	CTzId* tzParisId = CTzId::NewL(2656);

	CleanupStack::PushL(tzParisId);

	TheTzServer.SetTimeZoneL(*tzParisId);

	//get new UTC offset

	TTimeIntervalSeconds newOffset = User::UTCOffset();

	// call ProcessOffsetEvent, should put 8:55 in iUtcTime 

	tsTime.ProcessOffsetEvent();

	// check the updated iUtcTime

	TTime utcTime = tsTime.GetUtcTime();

	TDateTime a = utcTime.DateTime();

	date = TDateTime(2005, EMay, 15, 8, 55, 0, 0);

	time = date;

	TEST(utcTime == time);

	// check the updated offset

	TTimeIntervalSeconds tsTimeOffset = tsTime.GetOffset();

	TEST(tsTimeOffset == newOffset);

	CleanupStack::PopAndDestroy(tzParisId);

	//return Timezone to London, Europe for other tests

	CTzId* tzLondonId = CTzId::NewL(2592); 

	CleanupStack::PushL(tzLondonId);

	TheTzServer.SetTimeZoneL(*tzLondonId);

	CleanupStack::PopAndDestroy(tzLondonId);

	}

/**

@file

@SYMTestCaseID				SYSLIB-SCHSVR-CT-0208

@SYMTestCaseDesc 			Checks ExternalizeL and InternalizeL

@SYMTestPriority 			low

@SYMTestActions  			Creates an instance of TTsTime, Externalizes 

							it and internaziles and checks that teh data is the same

@SYMTestExpectedResults		The test must not fail.

@SYMPREQ					PREQ234

*/	

static void TestExternalizeInternalizeL()

	{

	// time is UTC

	TTsTime time(TTime(5), ETrue);

	//	Test externalise 

	TheTest.Next(_L(" @SYMTestCaseID:SYSLIB-SCHSVR-CT-0208 Test TTsTime::ExternalizeL "));

	RFile file;

	TFileName testFileName(fileName);

	TEST2(file.Replace(TheFsSession,testFileName,EFileWrite|EFileRead), KErrNone);

	RFileBuf buf;

	CleanupClosePushL(buf);

	buf.Attach(file);

	RWriteStream stream(&buf);

	//Externalize the time

	stream << time;

	buf.SynchL();

	CleanupStack::PopAndDestroy(&buf);

	//	Test internalise 

	TheTest.Next(_L("Test TTsTime::InternalizeL"));

	TTsTime newTime;

	TInt err = file.Open(TheFsSession,testFileName,EFileRead);

	TEST2(err, KErrNone);

	RFileBuf buf2;

	CleanupClosePushL(buf2);

	buf2.Attach(file);

	RReadStream stream2(&buf2);

	//Internalize the time

	stream2 >> newTime; //the externelized time is UTC time, same as the externalized time

	TTime utcTime = newTime.GetUtcTime();

	TTimeIntervalSeconds offset = newTime.GetOffset();

	TBool isUtc = newTime.IsUtc();

	TEST(utcTime == TTime(5));

	TEST(offset == TTimeIntervalSeconds(0));

	TEST(isUtc);

	CleanupStack::PopAndDestroy(&buf2);	

	}

static void RunTestsL()

	{

	//All tests assume timezone is London, Europe.

	TheTzServer.Connect();

	CTzId* tzLondonId = CTzId::NewL(2592); 

	CleanupStack::PushL(tzLondonId);

	TheTzServer.SetTimeZoneL(*tzLondonId);

	TestsWithDefaultContructorL();

	TestWithSecondConstructorAndUtcL();

	TestSetHomeTimeL();

	TestProcessOffsetEventL();

	TestExternalizeInternalizeL();

	CleanupStack::PopAndDestroy(tzLondonId);

	TheTzServer.Close();

	}

GLDEF_C TInt E32Main()

 {

	CTrapCleanup* tc = CTrapCleanup::New();

	TEST(tc != NULL);

	__UHEAP_MARK;

	fileName.Copy(KFileName);

	fileName[0] = RFs::GetSystemDriveChar();

	TInt err = TheFsSession.Connect();

	TEST2(err, KErrNone);

	TheTest.Title();

	TheTest.Start(_L("Task Scheduler TTsTime unit tests"));

	TRAP(err, ::RunTestsL())

	TEST2(err, KErrNone);

	(void)TheFsSession.Delete(fileName);

	TheFsSession.Close();

	TheTest.End();

	TheTest.Close();

	__UHEAP_MARKEND;

	delete tc;

	return(KErrNone);

	}