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

	}