Genezzo::Contrib::Clustered::GLock::GLock - Generic locking for Genezzo
$curLock = new GLock(lock => $lockName, block => 1); $curLock->lock(shared => 0); $curLock->promote(); $curLock->unlock();
Basic locking for Genezzo. Available implementations include NONE and OpenDLM.
- new (lock => NAME, block => BLOCKING)
Creates new lock with name NAME. Blocking if BLOCKING=1 (default). Depending on implementation, new or following lock() may be blocking.
Locks lock. Shared if SHARED=1, otherwise Exclusive (default). Returns undef for failure.
Promotes lock from Shared to Exclusive. Returns undef for failure.
Edit $IMPL to choose implementation. This will eventually be configured from somewhere else.
Eric Rollins, email@example.com
Copyright (c) 2005 Eric Rollins. All rights reserved.
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
Address bug reports and comments to firstname.lastname@example.org
For more information, please visit the Genezzo homepage at http://www.genezzo.com