Mercurial > flash_v2
annotate packages/io/wallclock/current/tests/wallclock2.cxx @ 130:eb9fd8c04db3 ecos-sw-2000-10-23
Merge from eCos master repository on 2000-10-23-17:01:37-BST
| author | jlarmour |
|---|---|
| date | Mon, 23 Oct 2000 17:10:57 +0000 |
| parents | 6ed91473a1cd |
| children | a9ac27ec7abc |
| rev | line source |
|---|---|
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
1 //========================================================================== |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
2 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
3 // wallclock2.cxx |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
4 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
5 // WallClock battery backed up test |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
6 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
7 //========================================================================== |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
8 //####COPYRIGHTBEGIN#### |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
9 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
10 // ------------------------------------------- |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
12 // Version 1.1 (the "License"); you may not use this file except in |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
14 // http://www.redhat.com/ |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
15 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
19 // the License. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
20 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
22 // released September 30, 1998. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
23 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
25 // Portions created by Red Hat are |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
27 // All Rights Reserved. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
28 // ------------------------------------------- |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
29 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
30 //####COPYRIGHTEND#### |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
31 //========================================================================== |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
32 //#####DESCRIPTIONBEGIN#### |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
33 // |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
34 // Author(s): jskov |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
35 // Contributors: jskov |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
36 // Date: 2000-03-29 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
37 // Description: Tests the WallClock device. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
38 // Prints wallclock setting (for human verification that time |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
39 // matches the expected value). Then tries to set/restore |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
40 // clock value, and verifies that the WallClock epoch matches |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
41 // that of the libc. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
42 //####DESCRIPTIONEND#### |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
43 // ------------------------------------------------------------------------- |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
44 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
45 #include <pkgconf/system.h> |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
46 #include <cyg/infra/testcase.h> |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
47 #include <cyg/infra/diag.h> |
|
115
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
94
diff
changeset
|
48 #ifdef CYGPKG_LIBC_TIME |
|
6ed91473a1cd
Merge from eCos master repository on 2000-08-21-22:40:54-BST
jlarmour
parents:
94
diff
changeset
|
49 #include <pkgconf/libc_time.h> |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
50 #endif |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
51 #ifdef CYGPKG_LIBC_STARTUP |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
52 #include <pkgconf/libc_startup.h> |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
53 #endif |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
54 |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
55 #if !defined(CYGSEM_LIBC_TIME_CLOCK_WORKING) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
56 # define NA_MSG "Requires libc time functions" |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
57 #elif !defined(CYGPKG_LIBC_STARTUP) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
58 # define NA_MSG "Requires libc startup package" |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
59 #elif !defined(CYGINT_LIBC_STARTUP_CONTEXT) |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
60 # define NA_MSG "Requires main to be invoked" |
|
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
61 #endif |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
62 |
|
130
eb9fd8c04db3
Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents:
115
diff
changeset
|
63 #ifndef NA_MSG |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
64 #include <time.h> |
|
94
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
65 #include <cyg/io/wallclock.hxx> // The WallClock API |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
66 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
67 // ------------------------------------------------------------------------- |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
68 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
69 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
70 externC int |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
71 main (void ) |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
72 { |
|
94
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
73 time_t now, test, test2; |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
74 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
75 CYG_TEST_INIT(); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
76 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
77 // make this predictable - independent of the user option |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
78 cyg_libc_time_setzoneoffsets(0, 3600); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
79 cyg_libc_time_setdst( CYG_LIBC_TIME_DSTOFF ); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
80 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
81 // Print out current setting so a human can verify that clock state |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
82 // was valid. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
83 now = (time_t) Cyg_WallClock::wallclock->get_current_time(); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
84 diag_printf("WallClock is set to: %s", ctime(&now)); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
85 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
86 // Check that set/get works |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
87 Cyg_WallClock::wallclock->set_current_time( 0 ); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
88 test = (time_t) Cyg_WallClock::wallclock->get_current_time(); |
|
94
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
89 // 2000.03.01 00:00:00 UTC |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
90 Cyg_WallClock::wallclock->set_current_time( 951868800 ); |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
91 test2 = (time_t) Cyg_WallClock::wallclock->get_current_time(); |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
92 // Should test 2100 and 2400 leap year calculations as well, but |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
93 // these would overflow with today's time_t. |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
94 Cyg_WallClock::wallclock->set_current_time( now ); |
|
94
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
95 CYG_TEST_PASS_FAIL(2 >= test, // each operation can take one second |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
96 "Can set WallClock to epoch"); |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
97 CYG_TEST_PASS_FAIL(951868800+2 > test2 && |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
98 951868800 <= test2, |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
99 "WallClock date conversion Y2K safe"); |
|
4642a6d35749
Merge from eCos master repository on 2000-06-02-07:47:04-BST
jlarmour
parents:
80
diff
changeset
|
100 |
|
80
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
101 // Test that the wallclock and libc use same epoch. |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
102 test = (time_t) 0; |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
103 CYG_TEST_PASS_FAIL(!strcmp(ctime(&test), "Thu Jan 01 00:00:00 1970\n"), |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
104 "WallClock epoch matches libc epoch"); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
105 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
106 CYG_TEST_FINISH("Finished wallclock battery test"); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
107 } |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
108 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
109 #else |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
110 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
111 externC void |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
112 cyg_start( void ) |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
113 { |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
114 CYG_TEST_INIT(); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
115 CYG_TEST_PASS_FINISH(NA_MSG); |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
116 } |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
117 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
118 #endif // NA_MSG |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
119 |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
120 // ------------------------------------------------------------------------- |
|
2085233a121a
Merge from eCos master repository on 2000-04-07-07:52:29-BST
jlarmour
parents:
diff
changeset
|
121 // EOF wallclock2.cxx |
