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

 // Simple STDLIB tests.

 // 

 //

 #include <e32test.h>

 #include <e32svr.h>

 #include <sys/time.h>

 #include <time.h>

 #include <sys/reent.h>

 #include <tz.h>

 //CPP file is used for C tests, because by default any console opened from a C file

 //expects a key to be pressed when it is about to be closed. That makes impossible

 //the creation of automated C tests.

 //

 // Globals

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

 _LIT16(priorUnixTime,"19700000:000000.000000"); //0 AD to the start of Unix Time

 //

 // Tests

 /**

 @file

 @SYMTestCaseID		SYSLIB-STDLIB-CT-0143

 @SYMTestCaseDesc 	Check that gettimeofday() returns universaltime, rather than the local time. 

 @SYMTestPriority 	low

 @SYMTestActions  	retrieve return value of gettimeofday() and compare with preset universaltime

 @SYMTestExpectedResults The test must not fail.

 @SYMPREQ PREQ234

 */

 void Testgettimeofday()

 	{

 	test.Next(_L(" @SYMTestCaseID:SYSLIB-STDLIB-CT-0143 "));

 	test.Printf(_L("\ntesting gettimeofday()...\n"));

 	RTz tz;

 	TInt error=tz.Connect();

 	test(error==KErrNone);

 	CTzId* tzId = CTzId::NewL(2592); //set the timezone to Europe/London

 	CleanupStack::PushL(tzId);

 	tz.SetTimeZoneL(*tzId);

 	struct timeval tv;

 	struct timezone tzone;

 	TTime t,unix;

 	unix.Set(priorUnixTime);

 	test.Printf(_L("tests during summertime (dst on)...\t"));	

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

 	TInt err=User::SetUTCTime(TTime(TDateTime(2005, EMay, 15, 8, 55, 0, 0))); 

 	test(err==0);

 	t.UniversalTime();

 	err = gettimeofday(&tv, &tzone);

 	test(err==0);

 	TTimeIntervalSeconds s = (User::UTCOffset().Int())/60;

 	test(tzone.tz_minuteswest==s.Int());

 	test(tzone.tz_dsttime == 0);

 	// Conversion needed as TTime returns micro seconds from 0AD to now, and gettimeofday() returns 

 	// seconds from 1970 to now,

 	TInt64 sec = tv.tv_sec;

 	TUint64 microSec = (sec*1000000) + tv.tv_usec + unix.Int64();

     test.Printf(_L("Expected Time: %ld\tReceived Time: %ld\n"),t.Int64(),microSec);

 	test((microSec-t.Int64())<1000000);//allowing a 1 sec delay in time

 	test.Printf(_L("-OK\n"));

 	test.Printf(_L("tests during wintertime (dst off)...\t"));	

 	//set the utc time to 8.55am, 15 January 2005 -Daylight savings DON'T apply on this date

 	err=User::SetUTCTime(TTime(TDateTime(2005, EJanuary, 15, 8, 55, 0, 0))); 

 	test(err==0);

 	t.UniversalTime();

 	err = gettimeofday(&tv, &tzone);

 	test(err==0);

 	// Conversion needed as TTime returns micro seconds from 0AD to now, and gettimeofday() returns 

 	// seconds from 1970 to now,

 	sec = tv.tv_sec;

 	microSec = (sec*1000000) + tv.tv_usec + unix.Int64();

 	test((microSec-t.Int64())<1000000);//allowing a 1 sec delay in time

 	test.Printf(_L("-OK\n"));

 	//

 	CleanupStack::PopAndDestroy(tzId);

 	tz.Close();

 	}

 /**

 @file

 @SYMTestCaseID		SYSLIB-STDLIB-CT-0144

 @SYMTestCaseDesc 	Check that time() returns universaltime, rather than the local time. 

 @SYMTestPriority 	low

 @SYMTestActions  	retrieve return value of time() and compare with preset universaltime

 @SYMTestExpectedResults The test must not fail.

 @SYMPREQ PREQ234

 */

 void Testtime()

 	{

 	test.Next(_L(" @SYMTestCaseID:SYSLIB-STDLIB-CT-0144 \ntesting time()...\n "));

 	TInt r = KErrNone;

     RTz tz;

     r = tz.Connect();

     if (r != KErrNone)

         {

             User::Leave(r);

         }

 	CTzId* tzId = CTzId::NewL(2592); //set the timezone to Europe/London

 	CleanupStack::PushL(tzId);

 	tz.SetTimeZoneL(*tzId);

 	TTime t,unix;

 	unix.Set(priorUnixTime);

 	test.Printf(_L("tests during summertime (dst on)...\t"));

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

 	TInt err=User::SetUTCTime(TTime(TDateTime(2005, EMay, 15, 8, 55, 0, 0)));

 	test(err==0);

 	t.UniversalTime(); 	

 	time_t res = time(0) * 1000000; // current time

 	// As TTime returns micro seconds from 0AD to now, and time() returns seconds from 1970 to now,

 	// the start date of t needs to be changed to 1 Jan 1970 midnight and converted into seconds

 	TInt64 sec = t.Int64() - unix.Int64(); 

 	test((res-sec)<1000000);//allowing 1 sec delay in time

 	test.Printf(_L("- OK!\n"));

 	test.Printf(_L("tests during wintertime (dst off)...\t"));

 	//set the utc time to 8.55am, 15 January 2005 -Daylight savings DON'T apply on this date

 	err=User::SetUTCTime(TTime(TDateTime(2005, EJanuary, 15, 8, 55, 0, 0)));

 	test(err==0);

 	t.UniversalTime(); 	

 	res = time(0) * 1000000; // current time

 	// As TTime returns micro seconds from 0AD to now, and time() returns seconds from 1970 to now,

 	// the start date of t needs to be changed to 1 Jan 1970 midnight and converted into seconds

 	sec = t.Int64() - unix.Int64(); 

 	test((res-sec)<1000000);//allowing 1 sec delay in time

 	test.Printf(_L("- OK!\n"));

 	//

 	CleanupStack::PopAndDestroy(tzId);

 	tz.Close();	

 	}

 /**

 @file

 @SYMTestCaseID		SYSLIB-STDLIB-CT-0145

 @SYMTestCaseDesc 	Check that toLocal() converts into correct localtime

 @SYMTestPriority 	low

 @SYMTestActions  	With the Timezone set to Europe/London, a universaltime is passed to 

 the function localtime (as toLocal cannot be accessed directly) which is expected to return a hometime, with DST on

 @SYMTestExpectedResults The test must not fail.

 @SYMPREQ PREQ234

 */

 void TesttoLocal()

 	{

 	test.Next(_L(" @SYMTestCaseID:SYSLIB-STDLIB-CT-0145  \ntesting toLocal()...\n "));

 	//test when dst is on...

 	test.Printf(_L("tests during summertime (dst on)...\t"));

 	TInt rt = KErrNone;

 	TInt rz = KErrNone;

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

 	TInt err=User::SetUTCTime(TTime(TDateTime(2005, EMay, 15, 8, 55, 0, 0)));

 	test(err==0);

 	RTz tz;

     rt = tz.Connect();

     if (rt != KErrNone)

         {

             User::Leave(rt);

         }

 	CTzId* tzId = CTzId::NewL(2592); //set the timezone to Europe/London

 	CleanupStack::PushL(tzId);

 	tz.SetTimeZoneL(*tzId);

 	CleanupStack::PopAndDestroy(tzId);

 	tz.Close();

 	struct tm *ptr, *ptr2;

 	struct tm setup;

 	time_t seconds;

 	setup.tm_hour = 8; //8 o'clock utc time

 	setup.tm_min = 55; 

 	setup.tm_sec = 0; 

 	setup.tm_mday = 1;

 	setup.tm_mon = 3;

 	setup.tm_year = 105;

 	seconds = mktime(&setup);

 	ptr2 = gmtime(&seconds); //for a quick routine test

 	test(ptr2->tm_hour == 8);//

 	ptr = localtime(&seconds);	

 	test(ptr->tm_hour == 9); //test against hometime hour: 9;

 	test(ptr->tm_min == 55);

 	test(ptr->tm_sec == 0);

 	test(ptr->tm_mday == 1);

 	test(ptr->tm_mon == 3);

 	test(ptr->tm_year == 105);

 	test.Printf(_L("Time:9:55 -correct!\n"));

 	//test when DST is off

 	test.Printf(_L("tests during wintertime (dst off)...\t"));

 	err=User::SetUTCTime(TTime(TDateTime(2005, EJanuary, 15, 8, 55, 0, 0)));

 	test(err==0);

     rz = tz.Connect();

     if (rz != KErrNone)

         {

             User::Leave(rz);

         }

 	CTzId* tzId2 = CTzId::NewL(2592); //set the timezone to Europe/London

 	CleanupStack::PushL(tzId2);

 	tz.SetTimeZoneL(*tzId2);

 	CleanupStack::PopAndDestroy(tzId2);

 	tz.Close();

 	ptr2 = gmtime(&seconds); //for a quick routine test

 	test(ptr2->tm_hour == 8);//

 	ptr = localtime(&seconds);	

 	test(ptr->tm_hour == 8); //test against hometime hour: 8;

 	test(ptr->tm_min == 55);

 	test(ptr->tm_sec == 0);

 	test(ptr->tm_mday == 1);

 	test(ptr->tm_mon == 3);

 	test(ptr->tm_year == 105);

 	test.Printf(_L("Time:8:55 -correct!\n"));

 	//

 	CloseSTDLIB();	

 	}

 //

 //

 LOCAL_C void DoTestsL()

 	{

 	TRAPD(err,Testgettimeofday());

 	test(err==KErrNone);

 	TRAP(err,Testtime());

 	test(err==KErrNone);

 	TRAP(err,TesttoLocal());

 	test(err==KErrNone);

 	}

 GLDEF_C TInt E32Main()

 	{

 	__UHEAP_MARK;

 	test.Title();

 	test.Start(_L("Time & Date Tests..."));

 	CTrapCleanup* trapCleanup=CTrapCleanup::New();

 	TRAPD(error, DoTestsL());

 	test(error==KErrNone);

 	delete trapCleanup;

 	test.End();

 	test.Close();

 	__UHEAP_MARKEND;

 	return error;

 	}