Coro::Semaphore - non-binary semaphores
use Coro::Semaphore; $sig = new Coro::Semaphore [initial value]; $sig->down; # wait for signal # ... some other "thread" $sig->up;
This module implements counting semaphores. You can initialize a mutex with any level of parallel users, that is, you can intialize a sempahore that can be
downed more than once until it blocks. There is no owner associated with semaphores, so one coroutine can
down it while another can
Counting semaphores are typically used to coordinate access to resources, with the semaphore count initialized to the number of free resources. Coroutines then increment the count when resources are added and decrement the count when resources are removed.
- new [inital count]
Creates a new sempahore object with the given initial lock count. The default lock count is 1, which means it is unlocked by default. Zero (or negative values) are also allowed, in which case the semaphore is locked by default.
Decrement the counter, therefore "locking" the semaphore. This method waits until the semaphore is available if the counter is zero.
- $status = $sem->timed_down($timeout)
down, but returns false if semaphore couldn't be acquired within $timeout seconds, otherwise true.
Unlock the semaphore again.
downthe semaphore. Returns true when this was possible, otherwise return false and leave the semaphore unchanged.
In scalar context, returns the number of coroutines waiting for this semaphore.
- $guard = $sem->guard
This method calls
downand then creates a guard object. When the guard object is destroyed it automatically calls
- $guard = $sem->timed_guard($timeout)
guard, but returns undef if semaphore couldn't be acquired within $timeout seconds, otherwise the guard object.
Marc Lehmann <email@example.com> http://home.schmorp.de/