Symaptic: os/kernelhwsrv/kerneltest/e32test/y2k/t

     1 // Copyright (c) 1998-2009 Nokia Corporation and/or its subsidiary(-ies).

     2 // All rights reserved.

     3 // This component and the accompanying materials are made available

     4 // under the terms of the License "Eclipse Public License v1.0"

     5 // which accompanies this distribution, and is available

     6 // at the URL "http://www.eclipse.org/legal/epl-v10.html".

     7 //

     8 // Initial Contributors:

     9 // Nokia Corporation - initial contribution.

    10 //

    11 // Contributors:

    12 //

    13 // Description:

    14 // e32test\y2k\t_y2k.cpp

    15 // Overview:

    16 // Year 2000 compliance tests for E32

    17 // API Information:

    18 // TTime, TDateTime, RTimer

    19 // Details:

    20 // - Test the T_Time & TDateTime classes in accordance with the test spec for Y2K

    21 // Section 4.1.1.1. Set a variety of date and time values, calculate using different

    22 // TTimeInterval methods, verify results are as expected.

    23 // - Test the input of valid and invalid dates to TDateTime and TTime. Verify results.

    24 // - Test operators <=, >=, >, <, +, - on TDateTime and TTime objects. Verify results.

    25 // - Test days of the week, verify results are as expected.

    26 // - Test various timer alarms, verify results are as expected.

    27 // Platforms/Drives/Compatibility:

    28 // All.

    29 // Assumptions/Requirement/Pre-requisites:

    30 // Failures and causes:

    31 // Base Port information:

    32 //

    33 //

    35 #include <e32test.h>

    37 // Use this to test all the elements, and still give useful line numbers

    38 #define dttest(q,x,y,z,a,b,c,d) test(q.Year()==x), test(q.Month()==(y)-1), \

    39  test(q.Day()==(z)-1), test(q.Hour()==a), test(q.Minute()==b), test(q.Second()==c),\

    40  test(q.MicroSecond()==d)

    42 LOCAL_D RTest test(_L("T_Y2K"));

    44 #define __TRACE_LINE	test.Printf(_L("line %d\n"),__LINE__)

    46 // test fields in TDateTime, using sensible dates (ie 1/1/1999 not 0/0/1999)

    48 class TestY2K

    49 	{

    50 public:

    51 	void Test1();  // test TTime for Y2K compliance

    52 	void Test2();

    53 	void Test3();

    54 	void Test4();

    55 	void Test5();

    56 	};

    58 void PrintTime(const TDesC& aName, const TTime& aTime)

    59 	{

    60 	TDateTime dt(aTime.DateTime());

    61 	test.Printf(_L("%S = %02d:%02d:%02d:%06d\n"),&aName,dt.Hour(),dt.Minute(),dt.Second(),dt.MicroSecond());

    62 	}

    64 void TestY2K::Test1()

    65 	{

    66 	// Test the T_Time & TDateTime classes in accordance with the test spec for Y2K

    67 	// Section 4.1.1.1

    69 	// 31/12/1998 and 1/1/1999

    70 	test.Next(_L("Testing existing functionality"));

    71 	TTime t1;

    72 	TTime t2;

    73 	TDateTime dt;

    75 	test(t1.Set(_L("19981130:235959.999999"))==KErrNone);

    76 	test(t2.Set(_L("19990000:000000."))==KErrNone);

    78 	dt=t1.DateTime();

    80 	test(dt.Year()==1998);

    81 	test(dt.Month()==EDecember);

    82 	test(dt.Day()==30);

    84 	t1+=TTimeIntervalMicroSeconds(1);

    85 	dt=t1.DateTime();

    87 	dttest(dt,1999,1,1,0,0,0,0);

    88 	test(t1==t2);

    90 	test(t1.Set(_L("19981130:235900.000000"))==KErrNone);

    91 	test(t2.Set(_L("19990000:000001.000000"))==KErrNone);

    94 	t1+=TTimeIntervalSeconds(61);

    95 	dt=t1.DateTime();

    97 	dttest(dt,1999,1,1,0,0,1,0);

    98 	test(t1==t2);

   100 	t1.Set(_L("19981130:234500.000100"));

   101 	t2.Set(_L("19990000:000100.000100"));

   102 	t1+=TTimeIntervalMinutes(16);

   103 	dt=t1.DateTime();

   105 	dttest(dt,1999,1,1,0,1,0,100);

   106 	test(t1==t2);

   108 	t1.Set(_L("19981130:230000.000001"));

   109 	t2.Set(_L("19990000:000000.000001"));

   110 	t1+=TTimeIntervalHours(1);

   111 	dt=t1.DateTime();

   113 	dttest(dt,1999,1,1,0,0,0,1);

   114 	test(t1==t2);

   116 	t1.Set(_L("19990000:164523.101000"));

   117 	t2.Set(_L("19981130:164523.101000"));

   118 	t1-=TTimeIntervalDays(1);

   119 	dt=t1.DateTime();

   121 	dttest(dt,1998,12,31,16,45,23,101000);

   122 	test(t1==t2);

   124 	t1.Set(_L("19990030:164523.999999"));

   125 	t2.Set(_L("19981130:164523.999999"));

   126 	t1-=TTimeIntervalMonths(1);

   127 	dt=t1.DateTime();

   129 	dttest(dt,1998,12,31,16,45,23,999999);

   130 	test(t1==t2);

   132 	t1.Set(_L("19990000:235959.999999"));

   133 	t2.Set(_L("19980000:235959.999999"));

   134 	t1-=TTimeIntervalYears(1);

   135 	dt=t1.DateTime();

   137 	dttest(dt,1998,1,1,23,59,59,999999);

   138 	test(t1==t2);

   140 	// Direct setting

   141 	t1.Set(_L("19981130:235959.999999"));

   142 	test(dt.SetYear(1998)==KErrNone);

   143 	test(dt.SetMonth(EDecember)==KErrNone);

   144 	test(dt.SetDay(30)==KErrNone);

   145 	test(dt.SetHour(23)==KErrNone);

   146 	test(dt.SetMinute(59)==KErrNone);

   147 	test(dt.SetSecond(59)==KErrNone);

   148 	test(dt.SetMicroSecond(999999)==KErrNone);

   149 	test(t1==dt);

   151 	t1.Set(_L("19990000:101010.101000"));

   152 	test(dt.SetYear(1999)==KErrNone);

   153 	test(dt.SetMonth(EJanuary)==KErrNone);

   154 	test(dt.SetDay(0)==KErrNone);

   155 	test(dt.SetHour(10)==KErrNone);

   156 	test(dt.SetMinute(10)==KErrNone);

   157 	test(dt.SetSecond(10)==KErrNone);

   158 	test(dt.SetMicroSecond(101000)==KErrNone);

   159 	test(t1==dt);

   162 	// 27/2/1998 & 28/2/1998

   164 	t1.Set(_L("19980126:144559.101000"));

   165 	t2.Set(_L("19980127:144559.101000"));

   167 	dt=t1.DateTime();

   168 	dttest(dt,1998,2,27,14,45,59,101000);

   170 	t1+=TTimeIntervalDays(1);

   171 	test(t1==t2);

   172 	dt=t2.DateTime();

   174 	dttest(dt,1998,2,28,14,45,59,101000);

   176 	// 28/2/1998 & 1/3/1998

   178 	t1.Set(_L("19980127:"));

   179 	t2.Set(_L("19980200:"));

   180 	dt=t1.DateTime();

   182 	dttest(dt,1998,2,28,0,0,0,0);

   184 	t1+=TTimeIntervalDays(1);

   185 	test(t1==t2);

   186 	dt=t2.DateTime();

   188 	dttest(dt,1998,3,1,0,0,0,0);

   190 	// 31/8/1999 & 1/9/1999

   192 	t1.Set(_L("19990730:235959.121200"));

   193 	t2.Set(_L("19990800:000000.121200"));

   194 	dt=t1.DateTime();

   196 	dttest(dt,1999,8,31,23,59,59,121200);

   198 	t1+=TTimeIntervalSeconds(1);

   199 	test(t1==t2);

   200 	dt=t2.DateTime();

   202 	dttest(dt,1999,9,1,0,0,0,121200);

   204 	// 8/9/1999 & 9/9/1999

   206 	t1.Set(_L("19990807:233434."));

   207 	t2.Set(_L("19990808:003434."));

   208 	dt=t1.DateTime();

   210 	dttest(dt,1999,9,8,23,34,34,0);

   212 	t1+=TTimeIntervalHours(1);

   213 	test(t1==t2);

   214 	dt=t2.DateTime();

   216 	dttest(dt,1999,9,9,0,34,34,0);

   218 	// 9/9/1999 & 10/9/1999

   220 	t1.Set(_L("19990808:235934."));

   221 	t2.Set(_L("19990809:000034."));

   222    	dt=t1.DateTime();

   224 	dttest(dt,1999,9,9,23,59,34,0);

   226 	t1+=TTimeIntervalMinutes(1);

   227 	test(t1==t2);

   228 	dt=t2.DateTime();

   230 	dttest(dt,1999,9,10,0,0,34,0);

   232 	// 31/12/1999 & 1/1/2000

   234 	test(t1.Set(_L("19991130:"))==KErrNone);

   235 	test(t2.Set(_L("20000000:"))==KErrNone);

   236 	dt=t1.DateTime();

   238 	dttest(dt,1999,12,31,0,0,0,0);

   240 	t1+=TTimeIntervalDays(1);

   241 	test(t1==t2);

   242 	dt=t2.DateTime();

   244 	dttest(dt,2000,1,1,0,0,0,0);

   246 	test(dt.SetYear(2000)==KErrNone);

   247 	test(dt.SetMonth(EJanuary)==KErrNone);

   248 	test(dt.SetDay(0)==KErrNone);

   249 	test(dt.SetHour(0)==KErrNone);

   250 	test(dt.SetMinute(0)==KErrNone);

   251 	test(dt.SetSecond(0)==KErrNone);

   252 	test(dt.SetMicroSecond(0)==KErrNone);

   254 	test(t1==dt);

   255 	test(t1.DayNoInYear()==1);

   256 	test(t1.WeekNoInYear(EFirstWeek)==1);

   257 	test(t2.DaysInMonth()==31);

   259 	// 27/2/2000 to 28/2/2000

   261 	test(t1.Set(_L("20000126:235958.999999"))==KErrNone);

   262 	test(t2.Set(_L("20000127:"))==KErrNone);

   263 	dt=t1.DateTime();

   265 	dttest(dt,2000,2,27,23,59,58,999999);

   267 	t1+=TTimeIntervalSeconds(1);

   268 	t1+=TTimeIntervalMicroSeconds(1);

   269 	test(t1==t2);

   270 	test(t1.DaysInMonth()==29);

   271 	dt=t2.DateTime();

   273 	dttest(dt,2000,2,28,0,0,0,0);

   275 	// 28/2/2000 & 29/2/2000

   277     test(t2.Set(_L("20000128:"))==KErrNone);

   278 	test(dt.Set(2000,EFebruary,28,0,0,0,0)==KErrNone);

   280 	t1+=TTimeIntervalDays(1);

   281 	test(t1==t2);

   282 	test(t1==dt);

   283 	test(Time::IsLeapYear(t2.DateTime().Year()));

   284 	test(t1.DayNoInMonth()==28);

   285 	test(t1.DaysFrom(t2)==TTimeIntervalDays(0));

   286 	t2.Set(_L("20000200:"));

   287 	test(t1.DaysFrom(t2)==TTimeIntervalDays(-1));

   288 	test(t2.DaysFrom(t1)==TTimeIntervalDays(1));

   290 	// 29/2/2000 to 1/3/2000

   292 	t1.Set(_L("20000128:"));

   293 	t2.Set(_L("20000200:"));

   295 	dt=t1.DateTime();

   296 	dttest(dt,2000,2,29,0,0,0,0);

   297 	t1+=TTimeIntervalHours(24);

   298 	test(t1==t2);

   299 	dt=t1.DateTime();

   300 	dttest(dt,2000,3,1,0,0,0,0);

   302 	// 31/12/2000 & 1/1/2001

   304 	t1.Set(_L("20001130:"));

   305 	t2.Set(_L("20010000:235945."));

   306 	dt=t1.DateTime();

   307 	dttest(dt,2000,12,31,0,0,0,0);

   308 	test(t1!=t2);

   309 	t1+=TTimeIntervalHours(24);

   310 	t1+=TTimeIntervalMinutes(60*23);

   311 	t1+=TTimeIntervalSeconds(59*60+45);

   312 	test(t1==t2);

   314 	dt=t1.DateTime();

   315 	dttest(dt,2001,1,1,23,59,45,0);

   317 	// 28/2/2001 & 1/3/2001

   318 	test(t1.Set(_L("20010127:"))==KErrNone);

   319 	test(t2.Set(_L("20010200:"))==KErrNone);

   320 	test(t2.DaysFrom(t1)==TTimeIntervalDays(1));

   321 	test(t2.MonthsFrom(t1)==TTimeIntervalMonths(0));

   322 	dt=t1.DateTime();

   323 	dttest(dt,2001,2,28,0,0,0,0);

   324 	t1+=TTimeIntervalDays(1);

   325 	test(t1==t2);

   327 	dt=t1.DateTime();

   328 	dttest(dt,2001,3,1,0,0,0,0);

   330 	// 28/2/2004 29/2/2004

   331 	t1.Set(_L("20040127:"));

   332 	test(t2.Set(_L("20040128:"))==KErrNone);

   333 	test(Time::IsLeapYear(t1.DateTime().Year()));

   334 	test(t2.DaysFrom(t1)==TTimeIntervalDays(1));

   335 	dt=t1.DateTime();

   336 	dttest(dt,2004,2,28,0,0,0,0);

   337 	t1+=TTimeIntervalMinutes(60*24);

   338 	test(t1==t2);

   339 	dt=t2.DateTime();

   340 	dttest(dt,2004,2,29,0,0,0,0);

   342 	// 29/2/2004 & 1/3/2004

   343 	test(t1.Set(_L("20040128:"))==KErrNone);

   344 	test(t2.Set(_L("20040200:"))==KErrNone);

   345 	test(Time::IsLeapYear(t2.DateTime().Year()));

   346 	dt=t1.DateTime();

   347 	dttest(dt,2004,2,29,0,0,0,0);

   348 	t1+=TTimeIntervalSeconds(60*60*24);

   349 	test(t1==t2);

   350 	dt=t1.DateTime();

   351 	dttest(dt,2004,3,1,0,0,0,0);

   353 	}

   355 void TestY2K::Test2()

   356 	{

   357 	// Test the input of valid and invalid dates to TDateTime and TTime

   358 	// Section 4.2

   360 	TTime t1,t2;

   361 	TDateTime dt;

   362 	// 31/12/1998

   363 	test(dt.Set(1998,EDecember,30,0,0,0,0)==KErrNone);

   364 	test(t1.Set(_L("19981130:"))==KErrNone);

   365 	dttest(dt,1998,12,31,0,0,0,0);

   367 	// 1/3/1999

   368 	test(dt.Set(1999,EMarch,0,0,0,0,0)==KErrNone);

   369 	test(t1.Set(_L("19990200:"))==KErrNone);

   370 	dttest(dt,1999,3,1,0,0,0,0);

   372 	// 27/2/2000

   373 	test(dt.Set(2000,EFebruary,26,0,0,0,0)==KErrNone);

   374 	test(t1.Set(_L("20000126:"))==KErrNone);

   375 	dttest(dt,2000,2,27,0,0,0,0);

   377 	// 31/12/2000

   378 	test(dt.Set(2000,EDecember,30,0,0,0,0)==KErrNone);

   379 	test(t1.Set(_L("20001130:225645."))==KErrNone);

   380 	dttest(dt,2000,12,31,0,0,0,0);

   382 	// 28/2/2004

   383 	test(dt.Set(2004,EFebruary,27,1,2,3,4)==KErrNone);

   384 	test(t1.Set(_L("20040127:"))==KErrNone);

   385 	dttest(dt,2004,2,28,1,2,3,4);

   387 	// 1/1/1999

   388 	test(dt.Set(1999,EJanuary,0,0,0,0,0)==KErrNone);

   389 	test(t1.Set(_L("19990000:"))==KErrNone);

   390 	dttest(dt,1999,1,1,0,0,0,0);

   392 	// 9/9/1999

   393 	test(dt.Set(1999,ESeptember,8,0,0,0,0)==KErrNone);

   394 	test(t1.Set(_L("19990808:"))==KErrNone);

   395 	dttest(dt,1999,9,9,0,0,0,0);

   397 	// 28/2/2000

   398 	test(dt.Set(2000,EFebruary,27,0,0,0,0)==KErrNone);

   399 	test(t1.Set(_L("20000127:"))==KErrNone);

   400 	dttest(dt,2000,2,28,0,0,0,0);

   402 	// 1/1/2001

   403 	test(dt.Set(2001,EJanuary,0,0,0,0,0)==KErrNone);

   404 	test(t1.Set(_L("20010000:"))==KErrNone);

   405 	dttest(dt,2001,1,1,0,0,0,0);

   407 	// 29/2/2004

   408 	test(dt.Set(2004,EFebruary,28,2,3,4,5)==KErrNone);

   409 	test(t1.Set(_L("20040128:"))==KErrNone);

   410 	dttest(dt,2004,2,29,2,3,4,5);

   412 	// 27/2/1999

   413 	test(dt.Set(1999,EFebruary,26,0,0,0,0)==KErrNone);

   414 	test(t1.Set(_L("19990126:"))==KErrNone);

   415 	dttest(dt,1999,2,27,0,0,0,0);

   417 	// 31/12/1999

   418 	test(dt.Set(1999,EDecember,30,0,0,0,0)==KErrNone);

   419 	test(t1.Set(_L("19991130:"))==KErrNone);

   420 	dttest(dt,1999,12,31,0,0,0,0);

   422 	// 29/2/2000

   423 	test(dt.Set(2000,EFebruary,28,0,0,0,0)==KErrNone);

   424 	test(t1.Set(_L("20000128:"))==KErrNone);

   425 	dttest(dt,2000,2,29,0,0,0,0);

   427 	// 28/2/2001

   428 	test(dt.Set(2001,EFebruary,27,0,0,0,0)==KErrNone);

   429 	test(t1.Set(_L("20010127:"))==KErrNone);

   430 	dttest(dt,2001,2,28,0,0,0,0);

   432 	// 1/3/2004

   433 	test(dt.Set(2004,EMarch,0,0,0,0,0)==KErrNone);

   434 	test(t1.Set(_L("20040200:"))==KErrNone);

   435 	dttest(dt,2004,3,1,0,0,0,0);

   437 	// 28/2/1999

   438 	test(dt.Set(1999,EFebruary,27,0,0,0,0)==KErrNone);

   439 	test(t1.Set(_L("19990127:"))==KErrNone);

   440 	dttest(dt,1999,2,28,0,0,0,0);

   442 	// 1/1/2000

   443 	test(dt.Set(2000,EJanuary,0,0,0,0,0)==KErrNone);

   444 	test(t1.Set(_L("20000000:"))==KErrNone);

   445 	dttest(dt,2000,1,1,0,0,0,0);

   447 	// 1/3/2000

   448 	test(dt.Set(2000,EMarch,0,0,0,0,0)==KErrNone);

   449 	test(t1.Set(_L("20000200:"))==KErrNone);

   450 	dttest(dt,2000,3,1,0,0,0,0);

   452 	// 1/3/2001

   453 	test(dt.Set(2001,EMarch,0,0,0,0,0)==KErrNone);

   454 	test(t1.Set(_L("20010200:"))==KErrNone);

   455 	dttest(dt,2001,3,1,0,0,0,0);

   457 	// Invalid dates

   458 	// 31/4/1998

   459 	test(dt.Set(1998,EApril,30,0,0,0,0)!=KErrNone);

   460 	test(t1.Set(_L("19980330:"))!=KErrNone);

   461 	dt=t1.DateTime();

   462 	dttest(dt,2001,3,1,0,0,0,0);

   464 	// 30/2/2000

   465 	test(dt.Set(2000,EFebruary,29,0,0,0,0)!=KErrNone);

   466 	test(t1.Set(_L("20000129:"))!=KErrNone);

   467 	dt=t1.DateTime();

   468 	dttest(dt,2001,3,1,0,0,0,0);

   470 	// 29/2/2001

   471 	test(dt.Set(2001,EFebruary,28,0,0,0,0)!=KErrNone);

   472 	test(t1.Set(_L("20010128:"))!=KErrNone);

   473 	dt=t1.DateTime();

   474 	dttest(dt,2001,3,1,0,0,0,0);

   476 	// 29/2/1999

   477 	test(dt.Set(1999,EFebruary,28,0,0,0,0)!=KErrNone);

   478 	test(t1.Set(_L("19990128:"))!=KErrNone);

   479 	dt=t1.DateTime();

   480 	dttest(dt,2001,3,1,0,0,0,0);

   482 	// 30/2/2004

   483 	test(dt.Set(2004,EFebruary,29,0,0,0,0)!=KErrNone);

   484 	test(t1.Set(_L("20040129:"))!=KErrNone);

   485 	dt=t1.DateTime();

   486 	dttest(dt,2001,3,1,0,0,0,0);

   488 	// test of TTime::Parse

   489 	// Set UniversalTime to C19 first

   490 	TTime oldtime;

   491 	oldtime.UniversalTime();

   492 	t1.Set(_L("19990303:"));

   493 	test(User::SetUTCTime(t1)==KErrNone);

   495 	test(t1.Parse(_L("1/1/00"))>=0);

   496 	dt=t1.DateTime();

   497 	dttest(dt,1900,1,1,0,0,0,0);

   498 	test(t1.Parse(_L("1/1/00"),1)>=0);

   499 	dt=t1.DateTime();

   500 	dttest(dt,2000,1,1,0,0,0,0);

   502 	test(t1.Parse(_L("2/3/2000"),20)>=0);

   503 	dt=t1.DateTime();

   504 	dttest(dt,2000,3,2,0,0,0,0);

   506 	test(t1.Parse(_L("31/12/99"),50)>=0);

   507 	dt=t1.DateTime();

   508 	dttest(dt,1999,12,31,0,0,0,0);

   510 	test(t1.Parse(_L("1/1/99"))>=0);

   511 	dt=t1.DateTime();

   512 	dttest(dt,1999,1,1,0,0,0,0);

   514 	test(t1.Parse(_L("1/1/99"),98)>=0);

   515 	dt=t1.DateTime();

   516 	TBuf<100> str;

   517 	t1.FormatL(str,_L("%F %D %M %Y %H:%T:%S.%C"));

   518 	test.Printf(str);

   519 	test.Printf(_L("\n"));

   520 	dttest(dt,1999,1,1,0,0,0,0);

   522 	// Reset UniversalTime

   523 	test(User::SetUTCTime(oldtime) == KErrNone);

   525 	// Year lengths

   526 	t1.Set(_L("20000000:"));

   527 	t2.Set(_L("20001130:"));

   528 	test(t2.DaysFrom(t1)==TTimeIntervalDays(365));

   529 	test(Time::IsLeapYear(t1.DateTime().Year()));

   530 	test(Time::IsLeapYear(t2.DateTime().Year()));

   531 	t1.Set(_L("20000100:"));

   532 	test(t1.DaysInMonth()==29);

   534 	t1.Set(_L("19990000:"));

   535 	t2.Set(_L("19991130:"));

   536 	test(t2.DaysFrom(t1)==TTimeIntervalDays(364));

   537 	test(Time::IsLeapYear(t1.DateTime().Year())==EFalse);

   538 	test(Time::IsLeapYear(t2.DateTime().Year())==EFalse);

   539 	t1.Set(_L("19990100:"));

   540 	test(t1.DaysInMonth()==28);

   542 	t1.Set(_L("20040000:"));

   543 	t2.Set(_L("20041130:"));

   544 	test(t2.DaysFrom(t1)==TTimeIntervalDays(365));

   545 	test(Time::IsLeapYear(t2.DateTime().Year()));

   546 	test(Time::IsLeapYear(t1.DateTime().Year()));

   547 	t1.Set(_L("20040100:"));

   548 	test(t1.DaysInMonth()==29);

   550 	}

   553 void TestY2K::Test3()

   554 	{

   555 	TTime t1,t2;

   556 	TDateTime dt;

   558 	// Test operator <=, >=, >, <, +, -

   560 	// mid 1999 to 31/12/1999

   561 	t1.Set(_L("19990620:145459."));

   562 	t2.Set(_L("19991130:"));

   563 	test(!(t1>t2));

   564 	test(t1<t2);

   565 	test(t1<=t2);

   566 	test(!(t1>=t2));

   567 	test(!(t1==t2));

   569 	t1-=TTimeIntervalSeconds(59);

   570 	t1-=TTimeIntervalMinutes(54);

   571 	t1-=TTimeIntervalHours(14);

   572 	t1=t1+TTimeIntervalDays(10);

   573 	t1+=TTimeIntervalMonths(5);

   574 	test(t1==t2);

   575 	t2.Set(_L("19990730:"));

   576 	t1-=TTimeIntervalMonths(4);

   577 	test(t1==t2);

   579 	// Mid 1999 to 1/1/2000

   580 	t1.Set(_L("19990500:"));

   581 	t2.Set(_L("20000000:"));

   582 	test(t2>t1);

   583 	test(t2>=t1);

   584 	test(!(t2<t1));

   585 	test(!(t2<=t1));

   586 	t1+=TTimeIntervalMonths(7);

   587 	test(t1==t2);

   588 	t2.Set(_L("19990707:020202.2"));

   589 	t1+=TTimeIntervalMicroSeconds(2);

   590 	t1=t1+TTimeIntervalSeconds(2)+TTimeIntervalMinutes(2)+TTimeIntervalHours(2);

   591 	t1-=TTimeIntervalDays(24);

   592 	t1-=TTimeIntervalMonths(4);

   593 	dt=t1.DateTime();

   594 	test(t1==t2);

   596 	// Mid 1999 to 20/2/2000

   597 	t1.Set(_L("19990819:"));

   598 	t2.Set(_L("20000119:"));

   599 	test(t1<t2);

   600 	test(t1<=t2);

   601 	test(!(t1>t2));

   602 	test(!(t1>=t2));

   603 	test(!(t1==t2));

   604 	t1+=TTimeIntervalMonths(5);

   605 	test(t1==t2);

   606 	t2.Set(_L("19990600:"));

   607 	t1-=TTimeIntervalMonths(7);

   608 	t1-=TTimeIntervalDays(19);

   609 	test(t1==t2);

   611 	// Mid 1999 to 1/3/2000

   612 	t1.Set(_L("19990700:122345."));

   613 	t2.Set(_L("20000200:122345."));

   614 	test(t1<t2);

   615 	test(t1<=t2);

   616 	test(!(t1>t2));

   617 	test(!(t1>=t2));

   618 	test(!(t1==t2));

   619 	t1+=TTimeIntervalMonths(7);

   620 	test(t1==t2);

   621 	t2.Set(_L("19990800:"));

   622 	t1-=TTimeIntervalMonths(6);

   623 	t1=t1-TTimeIntervalHours(12)-TTimeIntervalMinutes(23)-TTimeIntervalSeconds(45);

   624 	test(t1==t2);

   626 	// mid 1999 to 1/4/2000

   627 	t1.Set(_L("19990500:"));

   628 	t2.Set(_L("20000300:"));

   629 	test(t1<t2);

   630 	test(t1<=t2);

   631 	test(!(t1>t2));

   632 	test(!(t1>=t2));

   633 	test(!(t1==t2));

   634 	t1+=TTimeIntervalMonths(10);

   635 	test(t1==t2);

   636 	t2.Set(_L("19990600:"));

   637 	t1-=TTimeIntervalMonths(9);

   638 	test(t1==t2);

   640 	// Mid 1999 to Mid 2001

   641 	t1.Set(_L("19990620:"));

   642 	t2.Set(_L("20010620:"));

   643 	test(t1<t2);

   644 	test(t1<=t2);

   645 	test(!(t1>t2));

   646 	test(!(t1>=t2));

   647 	test(!(t1==t2));

   648 	t1+=TTimeIntervalMonths(24);

   649 	test(t1==t2);

   650 	t2.Set(_L("19990720:"));

   651 	t1-=TTimeIntervalMonths(23);

   652 	test(t1==t2);

   654 	// Mid 2000 to Mid 2001

   655 	t1.Set(_L("20000620:"));

   656 	t2.Set(_L("20010620:"));

   657 	test(t1<t2);

   658 	test(t1<=t2);

   659 	test(!(t1>t2));

   660 	test(!(t1>=t2));

   661 	test(!(t1==t2));

   662 	t1+=TTimeIntervalMonths(12);

   663 	test(t1==t2);

   664 	t2.Set(_L("20000720:"));

   665 	t1-=TTimeIntervalMonths(11);

   666 	test(t1==t2);

   668 	}

   671 void TestY2K::Test4()

   672 	{

   673 	TTime t1;

   674 	TLocale loc;

   676 	loc.SetStartOfWeek(EMonday);

   678 	// 1/1/1900 was Mon

   679 	t1.Set(_L("19000000:"));

   680 	test(t1.DayNoInWeek()==EMonday);

   682 	// 28/2/1900 was Wed

   683 	t1.Set(_L("19000127:"));

   684 	test(t1.DayNoInWeek()==EWednesday);

   686 	// 1/3/1900 was Thur

   687 	t1.Set(_L("19000200:"));

   688 	test(t1.DayNoInWeek()==EThursday);

   690 	// 28/2/1999 is sun

   691 	t1.Set(_L("19990127:"));

   692 	test(t1.DayNoInWeek()==ESunday);

   694 	// 1/3/1999 is mon

   695 	t1.Set(_L("19990200:"));

   696 	test(t1.DayNoInWeek()==EMonday);

   698 	// 31/12/1999

   699 	t1.Set(_L("19991130:"));

   700 	test(t1.DayNoInWeek()==EFriday);

   702 	// 1/1/2000

   703 	t1.Set(_L("20000000:"));

   704 	test(t1.DayNoInWeek()==ESaturday);

   706 	// 28/2/2000

   707 	t1.Set(_L("20000127:"));

   708 	test(t1.DayNoInWeek()==EMonday);

   710 	// 29/2/2000

   711 	t1.Set(_L("20000128:"));

   712 	test(t1.DayNoInWeek()==ETuesday);

   714 	// 1/3/2000

   715 	t1.Set(_L("20000200:"));

   716 	test(t1.DayNoInWeek()==EWednesday);

   718 	// 1/1/2001

   719 	t1.Set(_L("20010000:"));

   720 	test(t1.DayNoInWeek()==EMonday);

   722 	// 28/2/2004

   723 	t1.Set(_L("20040127:"));

   724 	test(t1.DayNoInWeek()==ESaturday);

   726 	// 29/2/2004

   727 	t1.Set(_L("20040128:"));

   728 	test(t1.DayNoInWeek()==ESunday);

   730 	// 1/3/2004

   731 	t1.Set(_L("20040200:"));

   732 	test(t1.DayNoInWeek()==EMonday);

   734 	}

   736 void TestY2K::Test5()

   737 	{

   738 	// Test various timer alarms -

   739 	// User::At, User::After, RTimer::At, RTimer::After

   740 	TTime t1,t2, oldtime;

   741 	TRequestStatus stat;

   742 	RTimer timer;

   743 	timer.CreateLocal();

   744 	const TInt sec=1000000;

   745 	oldtime.UniversalTime();

   747 	// Check that timers across the boundary work

   748 	// 31/12/1998 to 1/1/1999

   749 	t1.Set(_L("19981130:235959."));

   750 	t2.Set(_L("19990000:000001."));

   751 	test(User::SetUTCTime(t1)==KErrNone);

   752 	timer.At(stat,t2);

   753 	__TRACE_LINE;

   754 	User::WaitForRequest(stat);

   755 	t1.UniversalTime();

   756 	PrintTime(_L("t1"),t1);

   757 	PrintTime(_L("t2"),t2);

   758 	test(t1 >= t2);

   759 	test(stat==KErrNone);

   760 	timer.At(stat,t1);

   761 	__TRACE_LINE;

   762 	User::WaitForRequest(stat);

   763 	test(stat==KErrUnderflow);

   764 	t1.Set(_L("19981130:235959."));

   765 	t2.Set(_L("19990000:000001."));

   766 	test(User::SetUTCTime(t1)==KErrNone);

   767 	test(User::At(t2)==KErrNone);

   768 	t1.UniversalTime();

   769 	test(t1 >= t2);

   770 	test(User::At(t1) == KErrUnderflow);

   772 	// 31/12/1999 1/1/2000

   773 	t1.Set(_L("19991130:235959."));

   774 	t2.Set(_L("20000000:000000.0"));

   775 	test(User::SetUTCTime(t1)==KErrNone);

   776 	timer.At(stat,t2);

   777 	__TRACE_LINE;

   778 	User::WaitForRequest(stat);

   779 	test(stat==KErrNone);

   780 	t1.UniversalTime();

   781 	TBuf<100> str;

   782 	t1.FormatL(str,_L("%F %D %M %Y %H:%T:%S.%C"));

   783 	test.Printf(str);

   784 	test.Printf(_L("\n"));

   785 	test(t1>=t2);

   786 	timer.At(stat,t1);

   787 	__TRACE_LINE;

   788 	User::WaitForRequest(stat);

   789 	test(stat==KErrUnderflow);

   790 	t1.Set(_L("19991130:235959."));

   791 	t2.Set(_L("20000000:000000.00000"));

   792 	test(User::SetUTCTime(t1)==KErrNone);

   793 	test(User::At(t2)==KErrNone);

   794 	t1.UniversalTime();

   795 	test(t1>=t2);

   797 	// 31/12/2000 to 1/1/2001

   798 	t1.Set(_L("20001130:235958."));

   799 	t2.Set(_L("20010000:"));

   800 	test(User::SetUTCTime(t1)==KErrNone);

   801 	timer.At(stat,t2);

   802 	__TRACE_LINE;

   803 	User::WaitForRequest(stat);

   804 	test(stat==KErrNone);

   805 	t1.UniversalTime();

   806 	test(t1>=t2);

   807 	timer.At(stat,t1);

   808 	__TRACE_LINE;

   809 	User::WaitForRequest(stat);

   810 	test(stat==KErrUnderflow);

   811 	t1.Set(_L("20001130:235958."));

   812 	t2.Set(_L("20010000:"));

   813 	test(User::SetUTCTime(t1)==KErrNone);

   814 	test(User::At(t2)==KErrNone);

   815 	t1.UniversalTime();

   816 	test(t1>=t2);

   818 	// Check that tick timers across the C work

   820 	// 31/12/1998 & 1/1/1999

   821 	t1.Set(_L("19981130:235959."));

   822 	t2.Set(_L("19990000:"));

   823 	test(User::SetUTCTime(t1)==KErrNone);

   824 	timer.After(stat,sec*2);

   825 	__TRACE_LINE;

   826 	User::WaitForRequest(stat);

   827 	test(stat==KErrNone);

   828 	t1.UniversalTime();

   829 	test(t1>=t2);

   830 	t1.Set(_L("19981130:235959."));

   831 	t2.Set(_L("19990000:"));

   832 	test(User::SetUTCTime(t1)==KErrNone);

   833 	User::After(sec*2);

   834 	t1.UniversalTime();

   835 	test(t1>=t2);

   836 	t1.Set(_L("19981130:235959."));

   837 	t2.Set(_L("19990000:"));

   838 	test(User::SetUTCTime(t1)==KErrNone);

   839 	test(User::At(t2)==KErrNone);

   840 	t1.UniversalTime();

   841 	test(t1>=t2);

   843 	// 31/12/1999 & 1/1/2000

   844 	t1.Set(_L("19991130:235959."));

   845 	t2.Set(_L("20000000:"));

   846 	test(User::SetUTCTime(t1)==KErrNone);

   847 	timer.After(stat,sec*2);

   848 	__TRACE_LINE;

   849 	User::WaitForRequest(stat);

   850 	test(stat==KErrNone);

   851 	t1.UniversalTime();

   852 	test(t1>=t2);

   853 	t1.Set(_L("19991130:235959."));

   854 	t2.Set(_L("20000000:"));

   855 	test(User::SetUTCTime(t1)==KErrNone);

   856 	User::After(sec*2);

   857 	t1.UniversalTime();

   858 	test(t1>=t2);

   859 	t1.Set(_L("19991130:235959."));

   860 	t2.Set(_L("20000000:"));

   861 	test(User::SetUTCTime(t1)==KErrNone);

   862 	test(User::At(t2)==KErrNone);

   863 	t1.UniversalTime();

   864 	test(t1>=t2);

   866 	//31/12/2000 and 1/1/2001

   867 	t1.Set(_L("20001130:235959."));

   868 	t2.Set(_L("20010000:"));

   869 	test(User::SetUTCTime(t1)==KErrNone);

   870 	timer.After(stat, sec*5);

   871 	__TRACE_LINE;

   872 	User::WaitForRequest(stat);

   873 	test(stat==KErrNone);

   874 	t1.UniversalTime();

   875 	test(t1>=t2);

   876 	t1.Set(_L("20001130:235959."));

   877 	t2.Set(_L("20010000:"));

   878 	test(User::SetUTCTime(t1)==KErrNone);

   879 	User::After(sec*5);

   880 	t1.UniversalTime();

   881 	test(t1>=t2);

   882 	t1.Set(_L("20001130:235959."));

   883 	t2.Set(_L("20010000:"));

   884 	test(User::SetUTCTime(t1)==KErrNone);

   885 	test(User::At(t2)==KErrNone);

   886 	t1.UniversalTime();

   887 	test(t1>=t2);

   889 	// check that timers abort across the C, with timer b4 and after

   890 	// date changed to.

   891 	TTime times[4];

   892 	RTimer timers[3];

   893 	TRequestStatus stats[3];

   894 	TInt i;

   896 	for(i=0;i<3;i++)

   897 		timers[i].CreateLocal();

   899 	// 31/12/1998 & 1/1/1999

   900 	times[0].Set(_L("19981129:"));

   901 	times[1].Set(_L("19981130:235959.999999"));

   902 	times[2].Set(_L("19990203:234500."));

   903 	times[3].Set(_L("19990506:"));

   905 	test(User::SetUTCTime(times[0])==KErrNone);

   906 	for(i=1;i<4;i++)

   907 		timers[i-1].At(stats[i-1], times[i]);

   908 	User::SetUTCTime(times[2]);

   909 	// Should all abort

   910 	for(i=0;i<3;i++)

   911 		{

   912 		__TRACE_LINE;

   913 		User::WaitForRequest(stats[i]);

   914 		test(stats[1]==KErrAbort);

   915 		}

   917 	// 31/12/1999 & 1/1/2000

   918 	times[0].Set(_L("19991029:"));

   919 	times[1].Set(_L("19991130:235959.999999"));

   920 	times[2].Set(_L("20000203:234500."));

   921 	times[3].Set(_L("20000506:"));

   923 	test(User::SetUTCTime(times[0])==KErrNone);

   924 	for(i=1;i<4;i++)

   925 		timers[i-1].At(stats[i-1], times[i]);

   926 	User::SetUTCTime(times[2]);

   927 	// Should all abort

   928 	for(i=0;i<3;i++)

   929 		{

   930 		__TRACE_LINE;

   931 		User::WaitForRequest(stats[i]);

   932 		test(stats[1]==KErrAbort);

   933 		}

   935 	// 31/12/2000 and 1/1/2001

   936 	times[0].Set(_L("20001129:"));

   937 	times[1].Set(_L("20001130:235959.999999"));

   938 	times[2].Set(_L("20010203:234500."));

   939 	times[3].Set(_L("20010506:"));

   941 	test(User::SetUTCTime(times[0])==KErrNone);

   942 	for(i=1;i<4;i++)

   943 		timers[i-1].At(stats[i-1], times[i]);

   944 	User::SetUTCTime(times[2]);

   945 	// Should all abort

   946 	for(i=0;i<3;i++)

   947 		{

   948 		__TRACE_LINE;

   949 		User::WaitForRequest(stats[i]);

   950 		test(stats[1]==KErrAbort);

   951 		}

   953 	// Check that overflow works

   954 	t1.Set(_L("99991130:"));

   955 	test(User::At(t1)==KErrOverflow);

   956 	test(User::SetUTCTime(oldtime)==KErrNone);

   957 	}

   959 GLDEF_C TInt E32Main()

   960 	{

   962 	TTime oldtime;

   963 	oldtime.UniversalTime();

   964 	test.Title();

   965 	test.Start(_L("Testing Y2K behaviour"));

   966 	TestY2K T;

   967 	TLocale currentLocale;

   969 	TLocale b;

   970 	b.SetDateSeparator('\0',0);

   971 	b.SetDateSeparator('/',1);

   972 	b.SetDateSeparator('/',2);

   973 	b.SetDateSeparator('\0',3);

   974 	b.SetDateFormat(EDateEuropean);

   975 	b.SetTimeFormat(ETime12);

   976 	b.SetTimeSeparator('\0',0);

   977 	b.SetTimeSeparator(':',1);

   978 	b.SetTimeSeparator(':',2);

   979 	b.SetTimeSeparator('\0',3);

   980 	b.SetAmPmSpaceBetween(ETrue);

   981 	b.SetAmPmSymbolPosition(ELocaleAfter);

   982 	b.SetWorkDays(0x1F);

   983 	b.SetStartOfWeek(EMonday);

   984 	b.Set();

   986 	TTimeIntervalSeconds oldOffset = User::UTCOffset();

   987 	User::SetUTCOffset(0);

   989 	test.Next(_L("Testing TTime & TDateTime class (section 4.1.1.1)"));

   990 	T.Test1();

   991 	test.Next(_L("Testing TDateTime & TTime with valid and invalid dates (Section 4.2)"));

   992 	T.Test2();

   993 	test.Next(_L("Testing TDateTime & TTime with sorts/calculations (Section 4.2.5)"));

   994 	T.Test3();

   995 	test.Next(_L("Testing week days (Section 4.2.6)"));

   996 	T.Test4();

   997 	test.Next(_L("Testing timers"));

   998 	T.Test5();

   999 	test.Next(_L("Checking we can set to 31/12/1999 and 29/2/2000"));

  1000 	TTime t1;

  1001 	t1.Set(_L("19991130:"));

  1002 	User::SetUTCTime(t1);

  1003 	t1.UniversalTime();

  1004 	TBuf<100> str;

  1005 	t1.FormatL(str,_L("%F %D %M %Y %H:%T:%S.%C"));

  1006 	test.Printf(str);

  1007 	test.Printf(_L("\n"));

  1008 	t1.Set(_L("20000128:"));

  1009 	User::SetUTCTime(t1);

  1010 	t1.UniversalTime();

  1011 	t1.FormatL(str,_L("%F %D %M %Y %H:%T:%S.%C"));

  1012 	test.Printf(str);

  1013 	test.Printf(_L("\n"));

  1014 	//test.Printf(_L("Press a key"));

  1015 	//test.Getch();

  1016 	User::SetUTCTime(oldtime);

  1017 	currentLocale.Set();

  1018 	User::SetUTCOffset(oldOffset);

  1019 	test.End();

  1020 	return (0);

  1021 	}

author	sl
	Tue, 10 Jun 2014 14:32:02 +0200
changeset 1	260cb5ec6c19
permissions	-rw-r--r--