This is the IPC::Locker Perl Package.
This package is Copyright 1999-2010 by Wilson Snyder <wsnyder@wsnyder.org>.
This program is free software; you can redistribute it and/or modify it under the terms of either the GNU Lesser General Public License Version 3 or the Perl Artistic License Version 2.0.
This code is provided with no warranty of any kind, and is used entirely at your own risk.
This package provides a server for locks and a package for clients to access that server. The result is that clients can access named locks on a Internet wide bases, solving critical section problems without the mess of NFS or other file locking techniques.
IPC::Locker is a Perl package which allows cross cluster locking. For example:
my $lock = IPC::Locker->lock(host=>'example.std.com');
... Critical section ...
$lock->unlock();
See `man IPC::Locker' after installation.
lockerd is the daemon that supports IPC::Locker. See `man lockerd' after installation.
IPC::PidStat is a Perl package which answers the question, "is pid X running on host Y?". See `man IPC::PidStat' after installation.
pidstat is a program which answers the question, "is pid X running on host Y?". See `man pidstat' after installation.
pidstat is the daemon that supports IPC::PidStat and pidstat. See `man pidstatd' after installation.
pidwatch is a program which starts other programs, and kill that program when another job exists. See `man pidwatch' after installation.
uriexec is a simple wrapper which allows executing a command which is quoted using URI escapes. This prevents layered shells from interpreting special characters. See `man uriexec' after installation.
check_lockerd and check_pidstatd are Nagios plugins to check lockerd and pidstatd. See the Nagios documentation `http://www.nagios.org' for information on installing plugins.
The latest version is available at `http://www.perl.org/CPAN/'
Download the latest package from that site, and decompress. `gunzip IPC::Locker_version.tar.gz ; tar xvf IPC::Locker_version.tar'
This version of IPC::Locker has been built and tested on:
It should run on any system with perl and TCP/IP socketing.
`cp init.d/lockerd /etc/init.d/lockerd' (On one server only)
`cp init.d/pidstatd /etc/init.d/pidstatd' (On all machines)
Edit paths in above to point to /usr/bin instead of /usr/local/bin, if needed.
`/etc/init.d/lockerd start' (On one server only)
`/etc/init.d/pidstatd start' (On all machines)
`chkconfig lockerd on' (On one server only)
`chkconfig pidstatd on' (On all machines)
If you get "This account is currently not available." you need to change the daemon account from a shell of /sbin/nologin to /sbin/bash.