Mercurial > ecos
annotate packages/kernel/current/src/sync/cnt_sem2.cxx @ 64:c38311975d4f ecos-sw-2000-01-28
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
| author | jlarmour |
|---|---|
| date | Fri, 28 Jan 2000 04:59:39 +0000 |
| parents | 443894e2e912 |
| children | bf00f99aec69 |
| rev | line source |
|---|---|
| 0 | 1 //========================================================================== |
| 2 // | |
| 2 | 3 // sync/cnt_sem2.cxx |
| 0 | 4 // |
| 2 | 5 // Counting semaphore implementation |
| 0 | 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 |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
12 // Version 1.0 (the "License"); you may not use this file except in |
|
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 |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
14 // http://sourceware.cygnus.com/ecos |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
15 // |
|
c38311975d4f
Merge from eCos master repository on 2000-01-28-04:28:11-GMT
jlarmour
parents:
2
diff
changeset
|
16 // Software distributed under the License is distributed on an |
|
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 // | |
| 2 | 34 // Author(s): nickg |
| 35 // Contributors: nickg | |
| 36 // Date: 1997-09-24 | |
| 37 // Purpose: Cyg_Counting_Semaphore implementation | |
| 38 // Description: This file contains the implementations of the counting semaphore | |
| 0 | 39 // class. |
| 40 // | |
| 41 //####DESCRIPTIONEND#### | |
| 42 // | |
| 43 //========================================================================== | |
| 44 | |
| 45 #include <pkgconf/kernel.h> | |
| 46 | |
| 47 #include <cyg/kernel/ktypes.h> // base kernel types | |
| 48 #include <cyg/infra/cyg_trac.h> // tracing macros | |
| 49 #include <cyg/infra/cyg_ass.h> // assertion macros | |
| 50 #include <cyg/kernel/instrmnt.h> // instrumentation | |
| 51 | |
| 52 #include <cyg/kernel/thread.inl> // Cyg_Thread inlines | |
| 53 | |
| 54 #include <cyg/kernel/sema2.hxx> // our header | |
| 55 | |
| 56 #include <cyg/kernel/sched.inl> // scheduler inlines | |
| 57 | |
| 58 // ------------------------------------------------------------------------- | |
| 59 // Constructor | |
| 60 | |
| 61 Cyg_Counting_Semaphore2::Cyg_Counting_Semaphore2( | |
| 62 cyg_count32 init_count // Initial count value | |
| 63 ) | |
| 64 { | |
| 65 count = init_count; | |
| 66 } | |
| 67 | |
| 68 // ------------------------------------------------------------------------- | |
| 69 // Destructor | |
| 70 | |
| 71 Cyg_Counting_Semaphore2::~Cyg_Counting_Semaphore2() | |
| 72 { | |
| 73 CYG_REPORT_FUNCTION(); | |
| 74 #if 0 | |
| 75 CYG_ASSERT( queue.empty(), "Destroying semaphore with waiting threads"); | |
| 76 #endif | |
| 77 // Prevent preemption | |
| 78 Cyg_Scheduler::lock(); | |
| 79 | |
| 80 while ( ! queue.empty() ) { | |
| 81 Cyg_Thread *thread = queue.dequeue(); | |
| 82 thread->set_wake_reason( Cyg_Thread::DESTRUCT ); | |
| 83 thread->wake(); | |
| 84 } | |
| 85 | |
| 86 // Unlock the scheduler and maybe switch threads | |
| 87 Cyg_Scheduler::unlock(); | |
| 88 CYG_REPORT_RETURN(); | |
| 89 } | |
| 90 | |
| 91 // ------------------------------------------------------------------------- | |
| 92 // Wait until the count can be decremented without it becoming | |
| 93 // negative. | |
| 94 | |
| 95 cyg_bool Cyg_Counting_Semaphore2::wait() | |
| 96 { | |
| 97 CYG_REPORT_FUNCTION(); | |
| 98 Cyg_Thread *self = Cyg_Thread::self(); | |
| 99 cyg_bool result = true; | |
| 100 | |
| 101 // Prevent preemption | |
| 102 Cyg_Scheduler::lock(); | |
| 103 | |
| 104 CYG_INSTRUMENT_CNTSEM( CLAIM, this, count ); | |
| 105 | |
| 106 if ( 0 < count ) { | |
| 107 count--; | |
| 108 Cyg_Scheduler::unlock(); | |
| 109 } | |
| 110 else { | |
| 111 self->set_sleep_reason( Cyg_Thread::WAIT ); | |
| 112 self->sleep(); | |
| 113 queue.enqueue( self ); | |
| 114 | |
| 115 CYG_INSTRUMENT_CNTSEM( WAIT, this, 0 ); | |
| 116 | |
| 117 CYG_ASSERT( Cyg_Scheduler::get_sched_lock() == 1, | |
| 118 "Called with non-zero scheduler lock"); | |
| 119 | |
| 120 Cyg_Scheduler::unlock(); | |
| 121 | |
| 122 CYG_INSTRUMENT_CNTSEM( WOKE, this, count ); | |
| 123 | |
| 124 switch( self->get_wake_reason() ) | |
| 125 { | |
| 126 case Cyg_Thread::DESTRUCT: | |
| 127 case Cyg_Thread::BREAK: | |
| 128 result = false; | |
| 129 break; | |
| 130 | |
| 131 case Cyg_Thread::EXIT: | |
| 132 self->exit(); | |
| 133 break; | |
| 134 | |
| 135 default: | |
| 136 break; | |
| 137 } | |
| 138 } | |
| 139 | |
| 140 CYG_REPORT_RETVAL( result ); | |
| 141 return result; | |
| 142 } | |
| 143 | |
| 144 // ------------------------------------------------------------------------- | |
| 145 // Wait until the count can be decremented without it becoming | |
| 146 // negative. | |
| 147 | |
| 148 #ifdef CYGFUN_KERNEL_THREADS_TIMER | |
| 149 | |
| 150 cyg_bool | |
| 151 Cyg_Counting_Semaphore2::wait( cyg_tick_count abs_timeout ) | |
| 152 { | |
| 153 CYG_REPORT_FUNCTION(); | |
| 154 Cyg_Thread *self = Cyg_Thread::self(); | |
| 155 cyg_bool result = true; | |
| 156 | |
| 157 // Prevent preemption | |
| 158 Cyg_Scheduler::lock(); | |
| 159 | |
| 160 CYG_INSTRUMENT_CNTSEM( CLAIM, this, count ); | |
| 161 | |
| 162 if ( 0 < count ) { | |
| 163 count--; | |
| 164 Cyg_Scheduler::unlock(); | |
| 165 } | |
| 166 else { | |
| 167 | |
| 168 // Put thread in sleep state before setting timer since if the | |
| 169 // timeout is in the past, it will be re-awoken | |
| 170 // immediately. If this happens then wake_reason will not be | |
| 171 // NONE. | |
| 172 | |
| 173 self->sleep(); | |
| 174 | |
| 175 self->set_timer( abs_timeout, Cyg_Thread::TIMEOUT ); | |
| 176 | |
| 177 // only enqueue if the timeout did not already happen | |
| 178 if( Cyg_Thread::NONE == self->get_wake_reason() ) | |
| 179 queue.enqueue( self ); | |
| 180 | |
| 181 CYG_INSTRUMENT_CNTSEM( WAIT, this, 0 ); | |
| 182 | |
| 183 CYG_ASSERT( Cyg_Scheduler::get_sched_lock() == 1, | |
| 184 "Called with non-zero scheduler lock"); | |
| 185 | |
| 186 Cyg_Scheduler::unlock(); | |
| 187 | |
| 188 // Clear the timeout. It is irrelevant whether the alarm has | |
| 189 // actually gone off or not. | |
| 190 self->clear_timer(); | |
| 191 | |
| 192 CYG_INSTRUMENT_CNTSEM( WOKE, this, count ); | |
| 193 | |
| 194 switch( self->get_wake_reason() ) | |
| 195 { | |
| 196 case Cyg_Thread::TIMEOUT: | |
| 197 result = false; | |
| 198 CYG_INSTRUMENT_CNTSEM( TIMEOUT, this, count); | |
| 199 break; | |
| 200 | |
| 201 case Cyg_Thread::DESTRUCT: | |
| 202 case Cyg_Thread::BREAK: | |
| 203 result = false; | |
| 204 break; | |
| 205 | |
| 206 case Cyg_Thread::EXIT: | |
| 207 self->exit(); | |
| 208 break; | |
| 209 | |
| 210 default: | |
| 211 break; | |
| 212 } | |
| 213 } | |
| 214 | |
| 215 CYG_REPORT_RETVAL( result ); | |
| 216 return result; | |
| 217 } | |
| 218 | |
| 219 #endif // CYGFUN_KERNEL_THREADS_TIMER | |
| 220 | |
| 221 // ------------------------------------------------------------------------- | |
| 222 // Try to decrement, but fail if not possible | |
| 223 | |
| 224 cyg_bool Cyg_Counting_Semaphore2::trywait() | |
| 225 { | |
| 226 CYG_REPORT_FUNCTION(); | |
| 227 cyg_bool result = true; | |
| 228 | |
| 229 // Prevent preemption | |
| 230 Cyg_Scheduler::lock(); | |
| 231 | |
| 232 if( 0 < count ) count--; | |
| 233 else result = false; | |
| 234 | |
| 235 CYG_INSTRUMENT_CNTSEM( TRY, this, result ); | |
| 236 | |
| 237 // Unlock the scheduler and maybe switch threads | |
| 238 Cyg_Scheduler::unlock(); | |
| 239 | |
| 240 CYG_REPORT_RETVAL( result ); | |
| 241 return result; | |
| 242 } | |
| 243 | |
| 244 // ------------------------------------------------------------------------- | |
| 245 // Increment count | |
| 246 | |
| 247 void Cyg_Counting_Semaphore2::post() | |
| 248 { | |
| 249 CYG_REPORT_FUNCTION(); | |
| 250 // Prevent preemption | |
| 251 Cyg_Scheduler::lock(); | |
| 252 | |
| 253 CYG_INSTRUMENT_CNTSEM( POST, this, 0 ); | |
| 254 | |
| 255 if( queue.empty() ) { | |
| 256 count++; | |
| 257 } | |
| 258 else { | |
| 259 // The queue is non-empty, so grab the next | |
| 260 // thread from it and wake it up. The waiter | |
| 261 // won't decrement the count when he is awakened, | |
| 262 // for we never incremented it in the first place | |
| 263 | |
| 264 Cyg_Thread *thread = queue.dequeue(); | |
| 265 | |
| 266 thread->set_wake_reason( Cyg_Thread::DONE ); | |
| 267 | |
| 268 thread->wake(); | |
| 269 | |
| 270 CYG_INSTRUMENT_CNTSEM( WAKE, this, thread ); | |
| 271 } | |
| 272 | |
| 273 // Unlock the scheduler and maybe switch threads | |
| 274 Cyg_Scheduler::unlock(); | |
| 275 CYG_REPORT_RETURN(); | |
| 276 } | |
| 277 | |
| 278 // ------------------------------------------------------------------------- | |
| 279 // Get current count value | |
| 280 | |
| 281 cyg_count32 Cyg_Counting_Semaphore2::peek() | |
| 282 { | |
| 283 // This is a single read of the value of count. | |
| 284 // This is already atomic, hence there is no need | |
| 285 // to lock the scheduler. | |
| 286 | |
| 287 return count; | |
| 288 } | |
| 289 | |
| 290 // ------------------------------------------------------------------------- | |
| 291 // EOF sync/cnt_sem2.cxx |