Mercurial > flash_v2
annotate packages/kernel/current/tests/kflag1.c @ 161:ac086aa3217e
Merge from eCos master repository on 2001-06-08-21:11:51-BST
| author | jlarmour |
|---|---|
| date | Sun, 10 Jun 2001 19:35:23 +0000 |
| parents | 02ea4320376c |
| children | e0c0827131d1 |
| rev | line source |
|---|---|
| 0 | 1 /*========================================================================== |
| 2 // | |
| 3 // kflag1.cxx | |
| 4 // | |
| 5 // Kernel C API Flag test 1 | |
| 6 // | |
| 7 //========================================================================== | |
| 8 //####COPYRIGHTBEGIN#### | |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
9 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
10 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
11 // The contents of this file are subject to the Red Hat eCos Public License |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
12 // Version 1.1 (the "License"); you may not use this file except in |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
13 // compliance with the License. You may obtain a copy of the License at |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
14 // http://www.redhat.com/ |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
15 // |
|
66
bf00f99aec69
Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents:
64
diff
changeset
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
64
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
18 // License for the specific language governing rights and limitations under |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
19 // the License. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
20 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
21 // The Original Code is eCos - Embedded Configurable Operating System, |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
22 // released September 30, 1998. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
23 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
24 // The Initial Developer of the Original Code is Red Hat. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
25 // Portions created by Red Hat are |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
27 // All Rights Reserved. |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
28 // ------------------------------------------- |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
29 // |
| 0 | 30 //####COPYRIGHTEND#### |
| 31 //========================================================================== | |
| 32 //#####DESCRIPTIONBEGIN#### | |
| 33 // | |
| 34 // Author: dsm | |
| 35 // Contributors: hmt | |
| 36 // Date: 1998-10-19 | |
| 37 // Description: Tests basic flag functionality. | |
| 38 //####DESCRIPTIONEND#### | |
| 39 */ | |
| 40 | |
| 2 | 41 #include <cyg/hal/hal_arch.h> // CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 42 | |
| 0 | 43 #include <cyg/kernel/kapi.h> |
| 44 | |
| 45 #include <cyg/infra/testcase.h> | |
| 46 | |
| 47 #ifdef CYGFUN_KERNEL_API_C | |
| 48 | |
| 49 #include "testaux.h" | |
| 50 | |
| 51 | |
| 52 #define NTHREADS 3 | |
| 2 | 53 #define STACKSIZE CYGNUM_HAL_STACK_SIZE_TYPICAL |
| 0 | 54 |
| 55 static cyg_handle_t thread[NTHREADS]; | |
| 56 | |
| 57 static cyg_thread thread_obj[NTHREADS]; | |
| 58 static char stack[NTHREADS][STACKSIZE]; | |
| 59 | |
| 60 static cyg_flag_t f0, f1; | |
| 61 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 62 static cyg_flag_t f2; | |
| 63 #endif | |
| 64 | |
| 65 static volatile cyg_ucount8 q = 0; | |
|
112
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
66 #define FIRST_THREAD_WAIT_TIME 5 |
|
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
67 #define SECOND_THREAD_WAIT_TIME 10 |
|
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
68 #define THIRD_THREAD_WAIT_TIME 20 |
| 0 | 69 |
| 70 static void entry0( cyg_addrword_t data ) | |
| 71 { | |
| 72 CYG_TEST_INFO("Testing cyg_flag_setbits() and cyg_flag_maskbits()"); | |
| 73 CYG_TEST_CHECK(0==cyg_flag_peek( &f0 ), "flag not initialized properly"); | |
| 74 cyg_flag_setbits( &f0, 0x1); | |
| 75 CYG_TEST_CHECK(1==cyg_flag_peek( &f0 ), "setbits"); | |
| 76 cyg_flag_setbits( &f0, 0x3); | |
| 77 CYG_TEST_CHECK(3==cyg_flag_peek( &f0 ), "setbits"); | |
| 78 cyg_flag_maskbits( &f0, ~0x5); | |
| 79 CYG_TEST_CHECK(2==cyg_flag_peek( &f0 ), "maskbits"); | |
| 80 cyg_flag_setbits( &f0, ~0 ); | |
| 81 CYG_TEST_CHECK(~0u==cyg_flag_peek( &f0 ), "setbits all set"); | |
| 82 cyg_flag_maskbits( &f0, 0 ); | |
| 83 CYG_TEST_CHECK(0==cyg_flag_peek( &f0 ), "maskbits all clear"); | |
| 84 CYG_TEST_CHECK(0==q++, "bad synchronization"); | |
| 85 | |
| 86 CYG_TEST_INFO("Testing cyg_flag_wait()"); | |
| 87 cyg_flag_setbits( &f1, 0x4); | |
| 88 CYG_TEST_CHECK(0x4==cyg_flag_peek( &f1 ), "setbits"); | |
| 89 CYG_TEST_CHECK(1==q++, "bad synchronization"); | |
| 90 cyg_flag_setbits( &f1, 0x18); // wake t1 | |
| 91 cyg_flag_wait( &f1, 0x11, CYG_FLAG_WAITMODE_AND | CYG_FLAG_WAITMODE_CLR); | |
| 92 CYG_TEST_CHECK(0==cyg_flag_peek( &f1 ), "flag value wrong"); | |
| 93 CYG_TEST_CHECK(3==q++, "bad synchronization"); | |
| 94 cyg_flag_setbits( &f0, 0x2); // wake t1 | |
| 95 cyg_flag_wait( &f1, 0x10, CYG_FLAG_WAITMODE_AND ); | |
| 96 cyg_flag_setbits( &f0, 0x1); // wake t1 | |
| 97 | |
| 98 cyg_flag_wait( &f1, 0x11, CYG_FLAG_WAITMODE_AND | CYG_FLAG_WAITMODE_CLR); | |
| 99 | |
| 100 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 101 cyg_flag_wait( &f2, 0x2, CYG_FLAG_WAITMODE_OR); | |
| 102 CYG_TEST_CHECK(20==q,"bad synchronization"); | |
| 103 cyg_flag_timed_wait( &f2, 0x10, CYG_FLAG_WAITMODE_AND, | |
|
112
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
104 cyg_current_time()+THIRD_THREAD_WAIT_TIME); |
| 0 | 105 CYG_TEST_CHECK(21==q++,"bad synchronization"); |
| 106 #endif | |
| 107 cyg_flag_wait( &f0, 1, CYG_FLAG_WAITMODE_OR); | |
| 108 | |
| 109 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 110 } | |
| 111 | |
| 112 static void entry1( cyg_addrword_t data ) | |
| 113 { | |
| 114 cyg_flag_wait( &f1, 0xc, CYG_FLAG_WAITMODE_AND); | |
| 115 CYG_TEST_CHECK(2==q++, "bad synchronization"); | |
| 116 CYG_TEST_CHECK(0x1c==cyg_flag_peek( &f1 ), "flag value wrong"); | |
| 117 cyg_flag_setbits( &f1, 0x1); // wake t0 | |
| 118 cyg_flag_wait( &f0, 0x3, CYG_FLAG_WAITMODE_OR); | |
| 119 CYG_TEST_CHECK(4==q++, "bad synchronization"); | |
| 120 CYG_TEST_CHECK(2==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 121 | |
| 122 cyg_flag_setbits( &f1, 0xf0); // wake t0,t2 | |
| 123 cyg_flag_wait( &f0, 0x5, CYG_FLAG_WAITMODE_AND | CYG_FLAG_WAITMODE_CLR); | |
| 124 CYG_TEST_CHECK(0==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 125 CYG_TEST_CHECK(0xf0==cyg_flag_peek( &f1 ), "flag value wrong"); | |
| 126 CYG_TEST_CHECK(5==q++, "bad synchronization"); | |
| 127 cyg_flag_maskbits( &f1, 0 ); | |
| 128 CYG_TEST_CHECK(0==cyg_flag_peek( &f1 ), "flag value wrong"); | |
| 129 | |
| 130 CYG_TEST_INFO("Testing cyg_flag_poll()"); | |
| 131 cyg_flag_setbits( &f0, 0x55); | |
| 132 CYG_TEST_CHECK(0x55==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 133 CYG_TEST_CHECK(0x55==cyg_flag_poll( &f0, 0x3, CYG_FLAG_WAITMODE_OR),"bad poll() return"); | |
| 134 CYG_TEST_CHECK(0==cyg_flag_poll( &f0, 0xf, CYG_FLAG_WAITMODE_AND),"poll()"); | |
| 135 CYG_TEST_CHECK(0==cyg_flag_poll( &f0, 0xa, CYG_FLAG_WAITMODE_OR),"poll()"); | |
| 136 CYG_TEST_CHECK(0x55==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 137 CYG_TEST_CHECK(0x55==cyg_flag_poll( &f0, 0xf, CYG_FLAG_WAITMODE_OR | CYG_FLAG_WAITMODE_CLR),"poll"); | |
| 138 CYG_TEST_CHECK(0x0==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 139 cyg_flag_setbits( &f0, 0x50); | |
| 140 CYG_TEST_CHECK(0x50==cyg_flag_poll( &f0, 0x10, CYG_FLAG_WAITMODE_AND | CYG_FLAG_WAITMODE_CLR),"poll"); | |
| 141 CYG_TEST_CHECK(0x0==cyg_flag_peek( &f0 ), "flag value wrong"); | |
| 142 | |
| 143 CYG_TEST_INFO("Testing cyg_flag_waiting()"); | |
| 144 cyg_flag_maskbits( &f0, 0 ); | |
| 145 CYG_TEST_CHECK(!cyg_flag_waiting( &f0 ), "waiting()"); | |
| 146 | |
| 147 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 148 cyg_thread_delay( 10 ); // allow other threads to reach wait on f1 | |
| 149 CYG_TEST_CHECK(cyg_flag_waiting( &f1 ), "waiting() not true"); | |
| 150 cyg_flag_setbits( &f1, ~0 ); // wake one of t0,t2 | |
| 151 CYG_TEST_CHECK(cyg_flag_waiting( &f1 ),"waiting() not true"); | |
| 152 #else | |
| 153 cyg_flag_setbits( &f1, 0x11); // wake one of t0,t2 | |
| 154 #endif | |
| 155 cyg_flag_setbits( &f1, 0x11); // wake other of t0,t2 | |
| 156 CYG_TEST_CHECK(!cyg_flag_waiting( &f1 ),"waiting not false"); | |
| 157 CYG_TEST_CHECK(0x0==cyg_flag_peek( &f1 ), "flag value wrong"); | |
| 158 | |
| 159 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 160 CYG_TEST_INFO("Testing cyg_flag_timed_wait()"); | |
| 161 q=20; | |
| 162 cyg_flag_setbits( &f2, 0x2); // synchronize with t0,t2 | |
| 163 CYG_TEST_CHECK(20==q,"bad synchronization"); | |
| 164 cyg_flag_timed_wait( &f2, 0x20, CYG_FLAG_WAITMODE_AND, | |
|
112
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
165 cyg_current_time()+SECOND_THREAD_WAIT_TIME); |
| 0 | 166 CYG_TEST_CHECK(22==q++,"bad synchronization"); |
| 167 #endif | |
| 168 | |
| 169 CYG_TEST_PASS_FINISH("Kernel C API Flag 1 OK"); | |
| 170 } | |
| 171 | |
| 172 static void entry2( cyg_addrword_t data ) | |
| 173 { | |
| 174 cyg_flag_wait( &f1, 0x60, CYG_FLAG_WAITMODE_OR); | |
| 175 cyg_flag_setbits( &f0, 0x4); | |
| 176 | |
| 177 cyg_flag_wait( &f1, 0x11, CYG_FLAG_WAITMODE_AND | CYG_FLAG_WAITMODE_CLR); | |
| 178 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 179 cyg_flag_wait( &f2, 0x2, CYG_FLAG_WAITMODE_OR); | |
| 180 CYG_TEST_CHECK(20==q,"bad synchronization"); | |
| 181 CYG_TEST_CHECK(0==cyg_flag_timed_wait( &f2, 0x40, CYG_FLAG_WAITMODE_AND, | |
|
112
02ea4320376c
Merge from eCos master repository on 2000-07-21-21:01:39-BST
jlarmour
parents:
66
diff
changeset
|
182 cyg_current_time()+FIRST_THREAD_WAIT_TIME), |
| 0 | 183 "timed wait() wrong"); |
| 184 CYG_TEST_CHECK(20==q++,"bad synchronization"); | |
| 185 // Now wake t0 before it times out | |
| 186 cyg_flag_setbits( &f2, 0x10); | |
| 187 #endif | |
| 188 cyg_flag_wait( &f0, 1, CYG_FLAG_WAITMODE_OR); | |
| 189 | |
| 190 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 191 } | |
| 192 | |
| 193 void kflag1_main( void ) | |
| 194 { | |
| 195 CYG_TEST_INIT(); | |
| 196 | |
| 197 cyg_flag_init( &f0 ); | |
| 198 cyg_flag_init( &f1 ); | |
| 199 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 200 cyg_flag_init( &f2 ); | |
| 201 #endif | |
| 202 | |
| 203 cyg_thread_create( 1, entry0 , (cyg_addrword_t)0, "kflag1-0", | |
| 2 | 204 (void *)stack[0], STACKSIZE, &thread[0], &thread_obj[0]); |
| 0 | 205 cyg_thread_resume(thread[0]); |
| 206 | |
| 207 cyg_thread_create( 1, entry1 , (cyg_addrword_t)1, "kflag1-1", | |
| 2 | 208 (void *)stack[1], STACKSIZE, &thread[1], &thread_obj[1]); |
| 0 | 209 cyg_thread_resume(thread[1]); |
| 210 | |
| 211 cyg_thread_create( 1, entry2 , (cyg_addrword_t)2, "kflag1-2", | |
| 2 | 212 (void *)stack[2], STACKSIZE, &thread[2], &thread_obj[2]); |
| 0 | 213 cyg_thread_resume(thread[2]); |
| 214 | |
| 215 cyg_scheduler_start(); | |
| 216 | |
| 217 CYG_TEST_FAIL_FINISH("Not reached"); | |
| 218 } | |
| 219 | |
| 220 externC void | |
| 221 cyg_start( void ) | |
| 222 { | |
| 223 kflag1_main(); | |
| 224 } | |
| 225 | |
| 226 #else /* def CYGFUN_KERNEL_API_C */ | |
| 227 externC void | |
| 228 cyg_start( void ) | |
| 229 { | |
| 230 CYG_TEST_INIT(); | |
| 2 | 231 CYG_TEST_NA("Kernel C API layer disabled"); |
| 0 | 232 } |
| 233 #endif /* def CYGFUN_KERNEL_API_C */ | |
| 234 | |
| 235 // EOF flag1.cxx |