/usr/share/doc/crossroads/examples/externalchecker is in crossroads 2.81-2.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | #!/usr/bin/env perl
# Example of an external checker
# Alternate its-alive / its-dead every approx 10 sec
my $sec = int((localtime())[0] / 10);
my $out = $sec & 1 ? "1" : "0";
print STDERR (">>>> External checker: ", scalar(localtime()), " @ARGV\n");
if ($ARGV[0] =~'localhost') {
print("$out\n");
} else {
print("0\n");
}
|