]>
Commit | Line | Data |
---|---|---|
ccd6aacd VZ |
1 | /////////////////////////////////////////////////////////////////////////////// |
2 | // Name: tests/datetime/datetime.cpp | |
3 | // Purpose: wxDateTime unit test | |
4 | // Author: Vadim Zeitlin | |
5 | // Created: 2004-06-23 (extracted from samples/console/console.cpp) | |
6 | // RCS-ID: $Id$ | |
7 | // Copyright: (c) 2004 Vadim Zeitlin <vadim@wxwindows.org> | |
8 | /////////////////////////////////////////////////////////////////////////////// | |
9 | ||
10 | // ---------------------------------------------------------------------------- | |
11 | // headers | |
12 | // ---------------------------------------------------------------------------- | |
13 | ||
8899b155 | 14 | #include "testprec.h" |
ccd6aacd VZ |
15 | |
16 | #ifdef __BORLANDC__ | |
17 | #pragma hdrstop | |
18 | #endif | |
19 | ||
20 | #ifndef WX_PRECOMP | |
21 | #endif // WX_PRECOMP | |
22 | ||
23 | #include "wx/datetime.h" | |
24 | ||
a480d0ab VZ |
25 | // to test Today() meaningfully we must be able to change the system date which |
26 | // is not usually the case, but if we're under Win32 we can try it -- define | |
27 | // the macro below to do it | |
28 | //#define CHANGE_SYSTEM_DATE | |
29 | ||
30 | #ifndef __WINDOWS__ | |
31 | #undef CHANGE_SYSTEM_DATE | |
32 | #endif | |
33 | ||
34 | #ifdef CHANGE_SYSTEM_DATE | |
35 | ||
36 | class DateChanger | |
37 | { | |
38 | public: | |
39 | DateChanger(int year, int month, int day, int hour, int min, int sec) | |
40 | { | |
41 | SYSTEMTIME st; | |
42 | st.wDay = day; | |
43 | st.wMonth = month; | |
44 | st.wYear = year; | |
45 | st.wHour = hour; | |
46 | st.wMinute = min; | |
47 | st.wSecond = sec; | |
48 | st.wMilliseconds = 0; | |
49 | ||
50 | ::GetSystemTime(&m_savedTime); | |
51 | ::GetTimeZoneInformation(&m_tzi); | |
52 | ||
53 | m_changed = ::SetSystemTime(&st) != 0; | |
54 | } | |
55 | ||
56 | ~DateChanger() | |
57 | { | |
58 | if ( m_changed ) | |
59 | { | |
60 | ::SetSystemTime(&m_savedTime); | |
61 | ::SetTimeZoneInformation(&m_tzi); | |
62 | } | |
63 | } | |
64 | ||
65 | private: | |
66 | SYSTEMTIME m_savedTime; | |
67 | TIME_ZONE_INFORMATION m_tzi; | |
68 | bool m_changed; | |
69 | }; | |
70 | ||
71 | #endif // CHANGE_SYSTEM_DATE | |
72 | ||
ccd6aacd VZ |
73 | // ---------------------------------------------------------------------------- |
74 | // broken down date representation used for testing | |
75 | // ---------------------------------------------------------------------------- | |
76 | ||
77 | struct Date | |
78 | { | |
79 | wxDateTime::wxDateTime_t day; | |
80 | wxDateTime::Month month; | |
81 | int year; | |
82 | wxDateTime::wxDateTime_t hour, min, sec; | |
83 | double jdn; | |
84 | wxDateTime::WeekDay wday; | |
85 | time_t gmticks, ticks; | |
86 | ||
87 | void Init(const wxDateTime::Tm& tm) | |
88 | { | |
89 | day = tm.mday; | |
90 | month = tm.mon; | |
91 | year = tm.year; | |
92 | hour = tm.hour; | |
93 | min = tm.min; | |
94 | sec = tm.sec; | |
95 | jdn = 0.0; | |
96 | gmticks = ticks = -1; | |
97 | } | |
98 | ||
99 | wxDateTime DT() const | |
100 | { return wxDateTime(day, month, year, hour, min, sec); } | |
101 | ||
102 | bool SameDay(const wxDateTime::Tm& tm) const | |
103 | { | |
104 | return day == tm.mday && month == tm.mon && year == tm.year; | |
105 | } | |
106 | ||
107 | wxString Format() const | |
108 | { | |
109 | wxString s; | |
110 | s.Printf(_T("%02d:%02d:%02d %10s %02d, %4d%s"), | |
111 | hour, min, sec, | |
112 | wxDateTime::GetMonthName(month).c_str(), | |
113 | day, | |
114 | abs(wxDateTime::ConvertYearToBC(year)), | |
115 | year > 0 ? _T("AD") : _T("BC")); | |
116 | return s; | |
117 | } | |
118 | ||
119 | wxString FormatDate() const | |
120 | { | |
121 | wxString s; | |
122 | s.Printf(_T("%02d-%s-%4d%s"), | |
123 | day, | |
124 | wxDateTime::GetMonthName(month, wxDateTime::Name_Abbr).c_str(), | |
125 | abs(wxDateTime::ConvertYearToBC(year)), | |
126 | year > 0 ? _T("AD") : _T("BC")); | |
127 | return s; | |
128 | } | |
129 | }; | |
130 | ||
131 | // ---------------------------------------------------------------------------- | |
132 | // test data | |
133 | // ---------------------------------------------------------------------------- | |
134 | ||
135 | static const Date testDates[] = | |
136 | { | |
137 | { 1, wxDateTime::Jan, 1970, 00, 00, 00, 2440587.5, wxDateTime::Thu, 0, -3600 }, | |
138 | { 7, wxDateTime::Feb, 2036, 00, 00, 00, 2464730.5, wxDateTime::Thu, -1, -1 }, | |
139 | { 8, wxDateTime::Feb, 2036, 00, 00, 00, 2464731.5, wxDateTime::Fri, -1, -1 }, | |
140 | { 1, wxDateTime::Jan, 2037, 00, 00, 00, 2465059.5, wxDateTime::Thu, -1, -1 }, | |
141 | { 1, wxDateTime::Jan, 2038, 00, 00, 00, 2465424.5, wxDateTime::Fri, -1, -1 }, | |
142 | { 21, wxDateTime::Jan, 2222, 00, 00, 00, 2532648.5, wxDateTime::Mon, -1, -1 }, | |
143 | { 29, wxDateTime::May, 1976, 12, 00, 00, 2442928.0, wxDateTime::Sat, 202219200, 202212000 }, | |
144 | { 29, wxDateTime::Feb, 1976, 00, 00, 00, 2442837.5, wxDateTime::Sun, 194400000, 194396400 }, | |
145 | { 1, wxDateTime::Jan, 1900, 12, 00, 00, 2415021.0, wxDateTime::Mon, -1, -1 }, | |
146 | { 1, wxDateTime::Jan, 1900, 00, 00, 00, 2415020.5, wxDateTime::Mon, -1, -1 }, | |
147 | { 15, wxDateTime::Oct, 1582, 00, 00, 00, 2299160.5, wxDateTime::Fri, -1, -1 }, | |
148 | { 4, wxDateTime::Oct, 1582, 00, 00, 00, 2299149.5, wxDateTime::Mon, -1, -1 }, | |
149 | { 1, wxDateTime::Mar, 1, 00, 00, 00, 1721484.5, wxDateTime::Thu, -1, -1 }, | |
150 | { 1, wxDateTime::Jan, 1, 00, 00, 00, 1721425.5, wxDateTime::Mon, -1, -1 }, | |
151 | { 31, wxDateTime::Dec, 0, 00, 00, 00, 1721424.5, wxDateTime::Sun, -1, -1 }, | |
152 | { 1, wxDateTime::Jan, 0, 00, 00, 00, 1721059.5, wxDateTime::Sat, -1, -1 }, | |
153 | { 12, wxDateTime::Aug, -1234, 00, 00, 00, 1270573.5, wxDateTime::Fri, -1, -1 }, | |
154 | { 12, wxDateTime::Aug, -4000, 00, 00, 00, 260313.5, wxDateTime::Sat, -1, -1 }, | |
155 | { 24, wxDateTime::Nov, -4713, 00, 00, 00, -0.5, wxDateTime::Mon, -1, -1 }, | |
156 | }; | |
157 | ||
158 | ||
159 | // ---------------------------------------------------------------------------- | |
160 | // test class | |
161 | // ---------------------------------------------------------------------------- | |
162 | ||
163 | class DateTimeTestCase : public CppUnit::TestCase | |
164 | { | |
165 | public: | |
166 | DateTimeTestCase() { } | |
167 | ||
168 | private: | |
169 | CPPUNIT_TEST_SUITE( DateTimeTestCase ); | |
170 | CPPUNIT_TEST( TestLeapYears ); | |
171 | CPPUNIT_TEST( TestTimeSet ); | |
172 | CPPUNIT_TEST( TestTimeJDN ); | |
173 | CPPUNIT_TEST( TestTimeWNumber ); | |
174 | CPPUNIT_TEST( TestTimeWDays ); | |
175 | CPPUNIT_TEST( TestTimeDST ); | |
176 | CPPUNIT_TEST( TestTimeFormat ); | |
177 | CPPUNIT_TEST( TestTimeTicks ); | |
178 | CPPUNIT_TEST( TestTimeParse ); | |
179 | CPPUNIT_TEST( TestTimeArithmetics ); | |
a480d0ab | 180 | CPPUNIT_TEST( TestDSTBug ); |
ccd6aacd VZ |
181 | CPPUNIT_TEST_SUITE_END(); |
182 | ||
183 | void TestLeapYears(); | |
184 | void TestTimeSet(); | |
185 | void TestTimeJDN(); | |
186 | void TestTimeWNumber(); | |
187 | void TestTimeWDays(); | |
188 | void TestTimeDST(); | |
189 | void TestTimeFormat(); | |
190 | void TestTimeTicks(); | |
191 | void TestTimeParse(); | |
192 | void TestTimeArithmetics(); | |
a480d0ab | 193 | void TestDSTBug(); |
ccd6aacd VZ |
194 | |
195 | DECLARE_NO_COPY_CLASS(DateTimeTestCase) | |
196 | }; | |
197 | ||
198 | // register in the unnamed registry so that these tests are run by default | |
199 | CPPUNIT_TEST_SUITE_REGISTRATION( DateTimeTestCase ); | |
200 | ||
201 | // also include in it's own registry so that these tests can be run alone | |
202 | CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( DateTimeTestCase, "DateTimeTestCase" ); | |
203 | ||
204 | // ============================================================================ | |
205 | // implementation | |
206 | // ============================================================================ | |
207 | ||
208 | // test leap years detection | |
209 | void DateTimeTestCase::TestLeapYears() | |
210 | { | |
211 | static const struct LeapYearTestData | |
212 | { | |
213 | int year; | |
214 | bool isLeap; | |
215 | } years[] = | |
216 | { | |
217 | { 1900, false }, | |
218 | { 1990, false }, | |
219 | { 1976, true }, | |
220 | { 2000, true }, | |
221 | { 2030, false }, | |
222 | { 1984, true }, | |
223 | { 2100, false }, | |
224 | { 2400, true }, | |
225 | }; | |
226 | ||
227 | for ( size_t n = 0; n < WXSIZEOF(years); n++ ) | |
228 | { | |
229 | const LeapYearTestData& y = years[n]; | |
230 | ||
231 | CPPUNIT_ASSERT( wxDateTime::IsLeapYear(y.year) == y.isLeap ); | |
232 | } | |
233 | } | |
234 | ||
235 | // test constructing wxDateTime objects | |
236 | void DateTimeTestCase::TestTimeSet() | |
237 | { | |
238 | for ( size_t n = 0; n < WXSIZEOF(testDates); n++ ) | |
239 | { | |
240 | const Date& d1 = testDates[n]; | |
241 | wxDateTime dt = d1.DT(); | |
242 | ||
243 | Date d2; | |
244 | d2.Init(dt.GetTm()); | |
245 | ||
246 | wxString s1 = d1.Format(), | |
247 | s2 = d2.Format(); | |
248 | ||
249 | CPPUNIT_ASSERT( s1 == s2 ); | |
250 | } | |
251 | } | |
252 | ||
253 | // test conversions to JDN &c | |
254 | void DateTimeTestCase::TestTimeJDN() | |
255 | { | |
256 | for ( size_t n = 0; n < WXSIZEOF(testDates); n++ ) | |
257 | { | |
258 | const Date& d = testDates[n]; | |
259 | wxDateTime dt(d.day, d.month, d.year, d.hour, d.min, d.sec); | |
260 | double jdn = dt.GetJulianDayNumber(); | |
261 | ||
262 | CPPUNIT_ASSERT( jdn == d.jdn ); | |
e3559425 VZ |
263 | |
264 | dt.Set(jdn); | |
265 | CPPUNIT_ASSERT( dt.GetJulianDayNumber() == jdn ); | |
ccd6aacd VZ |
266 | } |
267 | } | |
268 | ||
269 | // test week days computation | |
270 | void DateTimeTestCase::TestTimeWDays() | |
271 | { | |
272 | // test GetWeekDay() | |
273 | size_t n; | |
274 | for ( n = 0; n < WXSIZEOF(testDates); n++ ) | |
275 | { | |
276 | const Date& d = testDates[n]; | |
277 | wxDateTime dt(d.day, d.month, d.year, d.hour, d.min, d.sec); | |
278 | ||
279 | wxDateTime::WeekDay wday = dt.GetWeekDay(); | |
280 | CPPUNIT_ASSERT( wday == d.wday ); | |
281 | } | |
282 | ||
283 | // test SetToWeekDay() | |
284 | struct WeekDateTestData | |
285 | { | |
286 | Date date; // the real date (precomputed) | |
287 | int nWeek; // its week index in the month | |
288 | wxDateTime::WeekDay wday; // the weekday | |
289 | wxDateTime::Month month; // the month | |
290 | int year; // and the year | |
291 | ||
292 | wxString Format() const | |
293 | { | |
294 | wxString s, which; | |
295 | switch ( nWeek < -1 ? -nWeek : nWeek ) | |
296 | { | |
297 | case 1: which = _T("first"); break; | |
298 | case 2: which = _T("second"); break; | |
299 | case 3: which = _T("third"); break; | |
300 | case 4: which = _T("fourth"); break; | |
301 | case 5: which = _T("fifth"); break; | |
302 | ||
303 | case -1: which = _T("last"); break; | |
304 | } | |
305 | ||
306 | if ( nWeek < -1 ) | |
307 | { | |
308 | which += _T(" from end"); | |
309 | } | |
310 | ||
311 | s.Printf(_T("The %s %s of %s in %d"), | |
312 | which.c_str(), | |
313 | wxDateTime::GetWeekDayName(wday).c_str(), | |
314 | wxDateTime::GetMonthName(month).c_str(), | |
315 | year); | |
316 | ||
317 | return s; | |
318 | } | |
319 | }; | |
320 | ||
321 | // the array data was generated by the following python program | |
322 | /* | |
323 | from DateTime import * | |
324 | from whrandom import * | |
325 | from string import * | |
326 | ||
327 | monthNames = [ 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec' ] | |
328 | wdayNames = [ 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun' ] | |
329 | ||
330 | week = DateTimeDelta(7) | |
331 | ||
332 | for n in range(20): | |
333 | year = randint(1900, 2100) | |
334 | month = randint(1, 12) | |
335 | day = randint(1, 28) | |
336 | dt = DateTime(year, month, day) | |
337 | wday = dt.day_of_week | |
338 | ||
339 | countFromEnd = choice([-1, 1]) | |
340 | weekNum = 0; | |
341 | ||
342 | while dt.month is month: | |
343 | dt = dt - countFromEnd * week | |
344 | weekNum = weekNum + countFromEnd | |
345 | ||
346 | data = { 'day': rjust(`day`, 2), 'month': monthNames[month - 1], 'year': year, 'weekNum': rjust(`weekNum`, 2), 'wday': wdayNames[wday] } | |
347 | ||
348 | print "{ { %(day)s, wxDateTime::%(month)s, %(year)d }, %(weekNum)d, "\ | |
349 | "wxDateTime::%(wday)s, wxDateTime::%(month)s, %(year)d }," % data | |
350 | */ | |
351 | ||
352 | static const WeekDateTestData weekDatesTestData[] = | |
353 | { | |
cad3d9c1 WS |
354 | { { 20, wxDateTime::Mar, 2045, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 3, wxDateTime::Mon, wxDateTime::Mar, 2045 }, |
355 | { { 5, wxDateTime::Jun, 1985, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -4, wxDateTime::Wed, wxDateTime::Jun, 1985 }, | |
356 | { { 12, wxDateTime::Nov, 1961, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -3, wxDateTime::Sun, wxDateTime::Nov, 1961 }, | |
357 | { { 27, wxDateTime::Feb, 2093, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -1, wxDateTime::Fri, wxDateTime::Feb, 2093 }, | |
358 | { { 4, wxDateTime::Jul, 2070, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -4, wxDateTime::Fri, wxDateTime::Jul, 2070 }, | |
359 | { { 2, wxDateTime::Apr, 1906, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -5, wxDateTime::Mon, wxDateTime::Apr, 1906 }, | |
360 | { { 19, wxDateTime::Jul, 2023, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -2, wxDateTime::Wed, wxDateTime::Jul, 2023 }, | |
361 | { { 5, wxDateTime::May, 1958, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -4, wxDateTime::Mon, wxDateTime::May, 1958 }, | |
362 | { { 11, wxDateTime::Aug, 1900, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 2, wxDateTime::Sat, wxDateTime::Aug, 1900 }, | |
363 | { { 14, wxDateTime::Feb, 1945, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 2, wxDateTime::Wed, wxDateTime::Feb, 1945 }, | |
364 | { { 25, wxDateTime::Jul, 1967, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -1, wxDateTime::Tue, wxDateTime::Jul, 1967 }, | |
365 | { { 9, wxDateTime::May, 1916, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -4, wxDateTime::Tue, wxDateTime::May, 1916 }, | |
366 | { { 20, wxDateTime::Jun, 1927, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 3, wxDateTime::Mon, wxDateTime::Jun, 1927 }, | |
367 | { { 2, wxDateTime::Aug, 2000, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, wxDateTime::Wed, wxDateTime::Aug, 2000 }, | |
368 | { { 20, wxDateTime::Apr, 2044, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 3, wxDateTime::Wed, wxDateTime::Apr, 2044 }, | |
369 | { { 20, wxDateTime::Feb, 1932, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -2, wxDateTime::Sat, wxDateTime::Feb, 1932 }, | |
370 | { { 25, wxDateTime::Jul, 2069, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 4, wxDateTime::Thu, wxDateTime::Jul, 2069 }, | |
371 | { { 3, wxDateTime::Apr, 1925, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, wxDateTime::Fri, wxDateTime::Apr, 1925 }, | |
372 | { { 21, wxDateTime::Mar, 2093, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 3, wxDateTime::Sat, wxDateTime::Mar, 2093 }, | |
373 | { { 3, wxDateTime::Dec, 2074, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, -5, wxDateTime::Mon, wxDateTime::Dec, 2074 } | |
ccd6aacd VZ |
374 | }; |
375 | ||
ccd6aacd VZ |
376 | wxDateTime dt; |
377 | for ( n = 0; n < WXSIZEOF(weekDatesTestData); n++ ) | |
378 | { | |
379 | const WeekDateTestData& wd = weekDatesTestData[n]; | |
380 | ||
381 | dt.SetToWeekDay(wd.wday, wd.nWeek, wd.month, wd.year); | |
382 | ||
383 | const Date& d = wd.date; | |
384 | CPPUNIT_ASSERT( d.SameDay(dt.GetTm()) ); | |
385 | } | |
386 | } | |
387 | ||
388 | // test the computation of (ISO) week numbers | |
389 | void DateTimeTestCase::TestTimeWNumber() | |
390 | { | |
391 | struct WeekNumberTestData | |
392 | { | |
393 | Date date; // the date | |
394 | wxDateTime::wxDateTime_t week; // the week number in the year | |
395 | wxDateTime::wxDateTime_t wmon; // the week number in the month | |
396 | wxDateTime::wxDateTime_t wmon2; // same but week starts with Sun | |
397 | wxDateTime::wxDateTime_t dnum; // day number in the year | |
398 | }; | |
399 | ||
400 | // data generated with the following python script: | |
401 | /* | |
402 | from DateTime import * | |
403 | from whrandom import * | |
404 | from string import * | |
405 | ||
406 | monthNames = [ 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec' ] | |
407 | wdayNames = [ 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat', 'Sun' ] | |
408 | ||
409 | def GetMonthWeek(dt): | |
410 | weekNumMonth = dt.iso_week[1] - DateTime(dt.year, dt.month, 1).iso_week[1] + 1 | |
411 | if weekNumMonth < 0: | |
412 | weekNumMonth = weekNumMonth + 53 | |
413 | return weekNumMonth | |
414 | ||
415 | def GetLastSundayBefore(dt): | |
416 | if dt.iso_week[2] == 7: | |
417 | return dt | |
418 | else: | |
419 | return dt - DateTimeDelta(dt.iso_week[2]) | |
420 | ||
421 | for n in range(20): | |
422 | year = randint(1900, 2100) | |
423 | month = randint(1, 12) | |
424 | day = randint(1, 28) | |
425 | dt = DateTime(year, month, day) | |
426 | dayNum = dt.day_of_year | |
427 | weekNum = dt.iso_week[1] | |
428 | weekNumMonth = GetMonthWeek(dt) | |
429 | ||
430 | weekNumMonth2 = 0 | |
431 | dtSunday = GetLastSundayBefore(dt) | |
432 | ||
433 | while dtSunday >= GetLastSundayBefore(DateTime(dt.year, dt.month, 1)): | |
434 | weekNumMonth2 = weekNumMonth2 + 1 | |
435 | dtSunday = dtSunday - DateTimeDelta(7) | |
436 | ||
437 | data = { 'day': rjust(`day`, 2), \ | |
438 | 'month': monthNames[month - 1], \ | |
439 | 'year': year, \ | |
440 | 'weekNum': rjust(`weekNum`, 2), \ | |
441 | 'weekNumMonth': weekNumMonth, \ | |
442 | 'weekNumMonth2': weekNumMonth2, \ | |
443 | 'dayNum': rjust(`dayNum`, 3) } | |
444 | ||
445 | print " { { %(day)s, "\ | |
446 | "wxDateTime::%(month)s, "\ | |
447 | "%(year)d }, "\ | |
448 | "%(weekNum)s, "\ | |
449 | "%(weekNumMonth)s, "\ | |
450 | "%(weekNumMonth2)s, "\ | |
451 | "%(dayNum)s }," % data | |
452 | ||
453 | */ | |
454 | static const WeekNumberTestData weekNumberTestDates[] = | |
455 | { | |
cad3d9c1 WS |
456 | { { 27, wxDateTime::Dec, 1966, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 52, 5, 5, 361 }, |
457 | { { 22, wxDateTime::Jul, 1926, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 29, 4, 4, 203 }, | |
458 | { { 22, wxDateTime::Oct, 2076, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 43, 4, 4, 296 }, | |
459 | { { 1, wxDateTime::Jul, 1967, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 26, 1, 1, 182 }, | |
460 | { { 8, wxDateTime::Nov, 2004, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 46, 2, 2, 313 }, | |
461 | { { 21, wxDateTime::Mar, 1920, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 12, 3, 4, 81 }, | |
462 | { { 7, wxDateTime::Jan, 1965, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, 2, 2, 7 }, | |
463 | { { 19, wxDateTime::Oct, 1999, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 42, 4, 4, 292 }, | |
464 | { { 13, wxDateTime::Aug, 1955, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 32, 2, 2, 225 }, | |
465 | { { 18, wxDateTime::Jul, 2087, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 29, 3, 3, 199 }, | |
466 | { { 2, wxDateTime::Sep, 2028, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 35, 1, 1, 246 }, | |
467 | { { 28, wxDateTime::Jul, 1945, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 30, 5, 4, 209 }, | |
468 | { { 15, wxDateTime::Jun, 1901, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 24, 3, 3, 166 }, | |
469 | { { 10, wxDateTime::Oct, 1939, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 41, 3, 2, 283 }, | |
470 | { { 3, wxDateTime::Dec, 1965, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 48, 1, 1, 337 }, | |
471 | { { 23, wxDateTime::Feb, 1940, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 8, 4, 4, 54 }, | |
472 | { { 2, wxDateTime::Jan, 1987, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, 1, 1, 2 }, | |
473 | { { 11, wxDateTime::Aug, 2079, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 32, 2, 2, 223 }, | |
474 | { { 2, wxDateTime::Feb, 2063, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 5, 1, 1, 33 }, | |
475 | { { 16, wxDateTime::Oct, 1942, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 42, 3, 3, 289 }, | |
476 | { { 30, wxDateTime::Dec, 2003, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, 5, 5, 364 }, | |
477 | { { 2, wxDateTime::Jan, 2004, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, 1, 1, 1, 2 }, | |
ccd6aacd VZ |
478 | }; |
479 | ||
480 | for ( size_t n = 0; n < WXSIZEOF(weekNumberTestDates); n++ ) | |
481 | { | |
482 | const WeekNumberTestData& wn = weekNumberTestDates[n]; | |
483 | const Date& d = wn.date; | |
484 | ||
485 | wxDateTime dt = d.DT(); | |
486 | ||
487 | wxDateTime::wxDateTime_t | |
488 | week = dt.GetWeekOfYear(wxDateTime::Monday_First), | |
489 | wmon = dt.GetWeekOfMonth(wxDateTime::Monday_First), | |
490 | wmon2 = dt.GetWeekOfMonth(wxDateTime::Sunday_First), | |
491 | dnum = dt.GetDayOfYear(); | |
492 | ||
493 | CPPUNIT_ASSERT( dnum == wn.dnum ); | |
494 | CPPUNIT_ASSERT( wmon == wn.wmon ); | |
495 | CPPUNIT_ASSERT( wmon2 == wn.wmon2 ); | |
496 | CPPUNIT_ASSERT( week == wn.week ); | |
497 | ||
4c27e2fa VZ |
498 | int year = d.year; |
499 | if ( week == 1 && d.month != wxDateTime::Jan ) | |
500 | { | |
501 | // this means we're in the first week of the next year | |
502 | year++; | |
503 | } | |
504 | ||
505 | wxDateTime | |
506 | dt2 = wxDateTime::SetToWeekOfYear(year, week, dt.GetWeekDay()); | |
ccd6aacd VZ |
507 | CPPUNIT_ASSERT( dt2 == dt ); |
508 | } | |
509 | } | |
510 | ||
511 | // test DST applicability | |
512 | void DateTimeTestCase::TestTimeDST() | |
513 | { | |
514 | // taken from http://www.energy.ca.gov/daylightsaving.html | |
515 | static const Date datesDST[2][2004 - 1900 + 1] = | |
516 | { | |
517 | { | |
cad3d9c1 WS |
518 | { 1, wxDateTime::Apr, 1990, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, |
519 | { 7, wxDateTime::Apr, 1991, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
520 | { 5, wxDateTime::Apr, 1992, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
521 | { 4, wxDateTime::Apr, 1993, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
522 | { 3, wxDateTime::Apr, 1994, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
523 | { 2, wxDateTime::Apr, 1995, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
524 | { 7, wxDateTime::Apr, 1996, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
525 | { 6, wxDateTime::Apr, 1997, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
526 | { 5, wxDateTime::Apr, 1998, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
527 | { 4, wxDateTime::Apr, 1999, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
528 | { 2, wxDateTime::Apr, 2000, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
529 | { 1, wxDateTime::Apr, 2001, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
530 | { 7, wxDateTime::Apr, 2002, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
531 | { 6, wxDateTime::Apr, 2003, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
532 | { 4, wxDateTime::Apr, 2004, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
ccd6aacd VZ |
533 | }, |
534 | { | |
cad3d9c1 WS |
535 | { 28, wxDateTime::Oct, 1990, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, |
536 | { 27, wxDateTime::Oct, 1991, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
537 | { 25, wxDateTime::Oct, 1992, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
538 | { 31, wxDateTime::Oct, 1993, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
539 | { 30, wxDateTime::Oct, 1994, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
540 | { 29, wxDateTime::Oct, 1995, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
541 | { 27, wxDateTime::Oct, 1996, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
542 | { 26, wxDateTime::Oct, 1997, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
543 | { 25, wxDateTime::Oct, 1998, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
544 | { 31, wxDateTime::Oct, 1999, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
545 | { 29, wxDateTime::Oct, 2000, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
546 | { 28, wxDateTime::Oct, 2001, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
547 | { 27, wxDateTime::Oct, 2002, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
548 | { 26, wxDateTime::Oct, 2003, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
549 | { 31, wxDateTime::Oct, 2004, 0, 0, 0, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
ccd6aacd VZ |
550 | } |
551 | }; | |
552 | ||
553 | for ( int year = 1990; year < 2005; year++ ) | |
554 | { | |
555 | wxDateTime dtBegin = wxDateTime::GetBeginDST(year, wxDateTime::USA), | |
556 | dtEnd = wxDateTime::GetEndDST(year, wxDateTime::USA); | |
557 | ||
558 | size_t n = year - 1990; | |
559 | const Date& dBegin = datesDST[0][n]; | |
560 | const Date& dEnd = datesDST[1][n]; | |
561 | ||
562 | CPPUNIT_ASSERT( dBegin.SameDay(dtBegin.GetTm()) ); | |
563 | CPPUNIT_ASSERT( dEnd.SameDay(dtEnd.GetTm()) ); | |
564 | } | |
565 | } | |
566 | ||
567 | // test wxDateTime -> text conversion | |
568 | void DateTimeTestCase::TestTimeFormat() | |
569 | { | |
570 | // some information may be lost during conversion, so store what kind | |
571 | // of info should we recover after a round trip | |
572 | enum CompareKind | |
573 | { | |
574 | CompareNone, // don't try comparing | |
575 | CompareBoth, // dates and times should be identical | |
576 | CompareDate, // dates only | |
577 | CompareTime // time only | |
578 | }; | |
579 | ||
580 | static const struct | |
581 | { | |
582 | CompareKind compareKind; | |
583 | const wxChar *format; | |
584 | } formatTestFormats[] = | |
585 | { | |
586 | { CompareBoth, _T("---> %c") }, | |
587 | { CompareDate, _T("Date is %A, %d of %B, in year %Y") }, | |
588 | { CompareBoth, _T("Date is %x, time is %X") }, | |
589 | { CompareTime, _T("Time is %H:%M:%S or %I:%M:%S %p") }, | |
590 | { CompareNone, _T("The day of year: %j, the week of year: %W") }, | |
591 | { CompareDate, _T("ISO date without separators: %Y%m%d") }, | |
592 | }; | |
593 | ||
594 | static const Date formatTestDates[] = | |
595 | { | |
cad3d9c1 WS |
596 | { 29, wxDateTime::May, 1976, 18, 30, 00, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, |
597 | { 31, wxDateTime::Dec, 1999, 23, 30, 00, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
ccd6aacd VZ |
598 | #if 0 |
599 | // this test can't work for other centuries because it uses two digit | |
600 | // years in formats, so don't even try it | |
cad3d9c1 WS |
601 | { 29, wxDateTime::May, 2076, 18, 30, 00, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, |
602 | { 29, wxDateTime::Feb, 2400, 02, 15, 25, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
603 | { 01, wxDateTime::Jan, -52, 03, 16, 47, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, | |
ccd6aacd VZ |
604 | #endif |
605 | }; | |
606 | ||
607 | for ( size_t d = 0; d < WXSIZEOF(formatTestDates) + 1; d++ ) | |
608 | { | |
609 | wxDateTime dt = d == 0 ? wxDateTime::Now() : formatTestDates[d - 1].DT(); | |
610 | for ( size_t n = 0; n < WXSIZEOF(formatTestFormats); n++ ) | |
611 | { | |
612 | wxString s = dt.Format(formatTestFormats[n].format); | |
613 | ||
614 | // what can we recover? | |
615 | int kind = formatTestFormats[n].compareKind; | |
616 | ||
617 | // convert back | |
618 | wxDateTime dt2; | |
619 | const wxChar *result = dt2.ParseFormat(s, formatTestFormats[n].format); | |
620 | if ( !result ) | |
621 | { | |
622 | // converion failed - should it have? | |
623 | CPPUNIT_ASSERT( kind == CompareNone ); | |
624 | } | |
625 | else // conversion succeeded | |
626 | { | |
627 | // should have parsed the entire string | |
628 | CPPUNIT_ASSERT( !*result ); | |
629 | ||
630 | switch ( kind ) | |
631 | { | |
632 | case CompareBoth: | |
633 | CPPUNIT_ASSERT( dt2 == dt ); | |
634 | break; | |
635 | ||
636 | case CompareDate: | |
637 | CPPUNIT_ASSERT( dt.IsSameDate(dt2) ); | |
638 | break; | |
639 | ||
640 | case CompareTime: | |
641 | CPPUNIT_ASSERT( dt.IsSameTime(dt2) ); | |
642 | break; | |
643 | } | |
644 | } | |
645 | } | |
646 | } | |
647 | } | |
648 | ||
649 | void DateTimeTestCase::TestTimeTicks() | |
650 | { | |
651 | for ( size_t n = 0; n < WXSIZEOF(testDates); n++ ) | |
652 | { | |
653 | const Date& d = testDates[n]; | |
654 | if ( d.ticks == -1 ) | |
655 | continue; | |
656 | ||
657 | wxDateTime dt = d.DT(); | |
aa3698d5 RN |
658 | //RN: Translate according to test's time zone |
659 | //2nd param is to ignore DST - it's already factored | |
660 | //into Vadim's tests | |
661 | dt.MakeTimezone(wxDateTime::WEST, true); | |
ccd6aacd VZ |
662 | long ticks = (dt.GetValue() / 1000).ToLong(); |
663 | CPPUNIT_ASSERT( ticks == d.ticks ); | |
664 | ||
665 | dt = d.DT().ToTimezone(wxDateTime::GMT0); | |
666 | ticks = (dt.GetValue() / 1000).ToLong(); | |
667 | CPPUNIT_ASSERT( ticks == d.gmticks ); | |
668 | } | |
669 | } | |
670 | ||
671 | // test text -> wxDateTime conversion | |
672 | void DateTimeTestCase::TestTimeParse() | |
673 | { | |
674 | static const struct ParseTestData | |
675 | { | |
676 | const wxChar *format; | |
677 | Date date; | |
678 | bool good; | |
679 | } parseTestDates[] = | |
680 | { | |
cad3d9c1 WS |
681 | { _T("Sat, 18 Dec 1999 00:46:40 +0100"), { 18, wxDateTime::Dec, 1999, 00, 46, 40, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, true }, |
682 | { _T("Wed, 1 Dec 1999 05:17:20 +0300"), { 1, wxDateTime::Dec, 1999, 03, 17, 20, 0.0, wxDateTime::Inv_WeekDay, 0, 0 }, true }, | |
ccd6aacd VZ |
683 | }; |
684 | ||
685 | for ( size_t n = 0; n < WXSIZEOF(parseTestDates); n++ ) | |
686 | { | |
687 | const wxChar *format = parseTestDates[n].format; | |
688 | ||
689 | wxDateTime dt; | |
690 | if ( dt.ParseRfc822Date(format) ) | |
691 | { | |
692 | CPPUNIT_ASSERT( parseTestDates[n].good ); | |
693 | ||
694 | wxDateTime dtReal = parseTestDates[n].date.DT(); | |
aa3698d5 RN |
695 | //RN: We need this because the tests are based on |
696 | //a non-GMT time zone | |
697 | dtReal.MakeTimezone(wxDateTime::WEST, true); | |
ccd6aacd VZ |
698 | CPPUNIT_ASSERT( dt == dtReal ); |
699 | } | |
700 | else // failed to parse | |
701 | { | |
702 | CPPUNIT_ASSERT( !parseTestDates[n].good ); | |
703 | } | |
704 | } | |
705 | } | |
706 | ||
707 | void DateTimeTestCase::TestTimeArithmetics() | |
708 | { | |
709 | static const wxDateSpan testArithmData[] = | |
710 | { | |
711 | wxDateSpan::Day(), | |
712 | wxDateSpan::Week(), | |
713 | wxDateSpan::Month(), | |
714 | wxDateSpan::Year(), | |
715 | }; | |
716 | ||
717 | // the test will *not* work with arbitrary date! | |
718 | wxDateTime dt(2, wxDateTime::Dec, 1999), | |
719 | dt1, | |
720 | dt2; | |
721 | ||
722 | for ( size_t n = 0; n < WXSIZEOF(testArithmData); n++ ) | |
723 | { | |
724 | const wxDateSpan& span = testArithmData[n]; | |
725 | dt1 = dt + span; | |
726 | dt2 = dt - span; | |
727 | ||
728 | CPPUNIT_ASSERT( dt1 - span == dt ); | |
729 | CPPUNIT_ASSERT( dt2 + span == dt ); | |
730 | CPPUNIT_ASSERT( dt2 + 2*span == dt1 ); | |
731 | } | |
732 | } | |
733 | ||
a480d0ab VZ |
734 | void DateTimeTestCase::TestDSTBug() |
735 | { | |
736 | ///////////////////////// | |
737 | // Test GetEndDST() | |
738 | wxDateTime dt = wxDateTime::GetEndDST(2004); | |
739 | CPPUNIT_ASSERT_EQUAL(31, (int)dt.GetDay()); | |
740 | CPPUNIT_ASSERT_EQUAL(wxDateTime::Oct, dt.GetMonth()); | |
741 | CPPUNIT_ASSERT_EQUAL(2004, (int)dt.GetYear()); | |
742 | CPPUNIT_ASSERT_EQUAL(2, (int)dt.GetHour()); | |
743 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMinute()); | |
744 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetSecond()); | |
745 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMillisecond()); | |
746 | ||
747 | ///////////////////////// | |
748 | // Test ResetTime() | |
749 | dt.SetHour(5); | |
750 | CPPUNIT_ASSERT_EQUAL(5, (int)dt.GetHour()); | |
751 | dt.ResetTime(); | |
752 | CPPUNIT_ASSERT_EQUAL(31, (int)dt.GetDay()); | |
753 | CPPUNIT_ASSERT_EQUAL(wxDateTime::Oct, dt.GetMonth()); | |
754 | CPPUNIT_ASSERT_EQUAL(2004, (int)dt.GetYear()); | |
755 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetHour()); | |
756 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMinute()); | |
757 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetSecond()); | |
758 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMillisecond()); | |
759 | ||
760 | ///////////////////////// | |
761 | // Test Today() | |
762 | #ifdef CHANGE_SYSTEM_DATE | |
763 | { | |
764 | DateChanger change(2004, 10, 31, 5, 0, 0); | |
765 | dt = wxDateTime::Today(); | |
766 | } | |
767 | ||
768 | CPPUNIT_ASSERT_EQUAL(31, (int)dt.GetDay()); | |
769 | CPPUNIT_ASSERT_EQUAL(wxDateTime::Oct, dt.GetMonth()); | |
770 | CPPUNIT_ASSERT_EQUAL(2004, (int)dt.GetYear()); | |
771 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetHour()); | |
772 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMinute()); | |
773 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetSecond()); | |
774 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMillisecond()); | |
775 | ||
776 | ///////////////////////// | |
777 | // Test Set(hour, minute, second, milli) | |
778 | wxDateTime dt2; | |
779 | { | |
780 | DateChanger change(2004, 10, 31, 5, 0, 0); | |
781 | dt.Set(1, 30, 0, 0); | |
782 | dt2.Set(5, 30, 0, 0); | |
783 | } | |
784 | ||
785 | CPPUNIT_ASSERT_EQUAL(31, (int)dt.GetDay()); | |
786 | CPPUNIT_ASSERT_EQUAL(wxDateTime::Oct, dt.GetMonth()); | |
787 | CPPUNIT_ASSERT_EQUAL(2004, (int)dt.GetYear()); | |
788 | CPPUNIT_ASSERT_EQUAL(1, (int)dt.GetHour()); | |
789 | CPPUNIT_ASSERT_EQUAL(30, (int)dt.GetMinute()); | |
790 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetSecond()); | |
791 | CPPUNIT_ASSERT_EQUAL(0, (int)dt.GetMillisecond()); | |
792 | ||
793 | CPPUNIT_ASSERT_EQUAL(31, (int)dt2.GetDay()); | |
794 | CPPUNIT_ASSERT_EQUAL(wxDateTime::Oct, dt2.GetMonth()); | |
795 | CPPUNIT_ASSERT_EQUAL(2004, (int)dt2.GetYear()); | |
796 | CPPUNIT_ASSERT_EQUAL(5, (int)dt2.GetHour()); | |
797 | CPPUNIT_ASSERT_EQUAL(30, (int)dt2.GetMinute()); | |
798 | CPPUNIT_ASSERT_EQUAL(0, (int)dt2.GetSecond()); | |
799 | CPPUNIT_ASSERT_EQUAL(0, (int)dt2.GetMillisecond()); | |
800 | #endif // CHANGE_SYSTEM_DATE | |
801 | } | |
802 |