https://github.com/silug/run1

Run a program once at a time
https://github.com/silug/run1

flock perl perl-script

Last synced: 5 days ago
JSON representation

Run a program once at a time

• Host: GitHub
• URL: https://github.com/silug/run1
• Owner: silug
• Created: 2010-03-02T21:20:25.000Z (over 14 years ago)
• Default Branch: master
• Last Pushed: 2024-07-31T14:30:14.000Z (2 months ago)
• Last Synced: 2024-09-25T19:51:20.123Z (8 days ago)
• Topics: flock, perl, perl-script
• Language: Perl
• Homepage:
• Size: 10.7 KB
• Stars: 1
• Watchers: 2
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README.pod

Awesome Lists containing this project

README

        
=head1 NAME

run1 - Run a program once at a time

=head1 SYNOPSIS

B [ C<-d> I ] [ C<-l> I ] [ C<-w> I ] [ C<-k> I ]

     I [ I ]

=head1 DESCRIPTION

This program is useful for keeping multiple copies of a program from

running concurrently.

=head1 OPTIONS

=over 9

=item C<-d> I

Save lock/pid files in I instead of the default (~/.locks).

=item C<-l> I

Use I as the lock/pid file name.  The default is the name of the

program being executed.

=item C<-w> I

Print a warning to stderr if the process with the lock has been running

for more than I seconds.  The default is 86400 seconds, or one day.

Specifying 0 seconds disables warning messages.

=item C<-k> I

Kill the process with the lock if it has been running for more than I

seconds.  The default is 0, which disables this feature.

=item C<-s>

Try to get a shared lock on the lock file.  This is useful for nesting

calls to run1.  Say you have two scripts that can operate independently,

and another script that does the equivalent of the first two, in addition

to whatever other work it might do.  For example, a script that mirrors a

linux distribution ftp site.  One syncs only updates, the second syncs only

the distribution, and a third syncs the whole tree.  You might invoke them

like this:

    run1 -s -l mirror run1 mirror-updates

    run1 -s -l mirror run1 mirror-dist

    run1 -l mirror mirror-all

Since mirror-updates and mirror-dist get a shared lock on "mirror", they'll

keep mirror-all from running, but they'll run just fine individually.

While mirror-all is running, neither mirror-updates or mirror-dist will

run.

Note that currently -w and -k are ignored when using shared locks.  (This

may or may not change at some point in the future.)

=item C<-b>

Block (indefinitely) on the lock request.

=back

=head1 NOTES

Please note that this script will only work reliably when the lock

directory is on a filesystem (and operating system) where you can rely on

L with C and L working properly.  In other

words, don't point the lock directory to a network filesystem (especially

NFS).  Use C<-d> I.

=head1 SEE ALSO

L

=head1 BUGS

The limitations of the locking system (see L above) could be

construed as bugs.

=head1 AUTHOR

Steven Pritchard EFE