/usr/lib/xymon/client/ext/ntpq is in hobbit-plugins 20170219.
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 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 | #!/usr/bin/perl
# A Hobbit client-side module to check the local ntpd daemon
# synchronization status. Not to be confused with the built-in "ntp"
# test, which checks the ntpd server remotely.
# Copyright (C) 2008 Peter Eisentraut <petere@debian.org>
#
# Permission is hereby granted, free of charge, to any person
# obtaining a copy of this software and associated documentation
# files (the "Software"), to deal in the Software without
# restriction, including without limitation the rights to use,
# copy, modify, merge, publish, distribute, sublicense, and/or sell
# copies of the Software, and to permit persons to whom the
# Software is furnished to do so, subject to the following
# conditions:
#
# The above copyright notice and this permission notice shall be
# included in all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
# OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
# HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
# WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
# OTHER DEALINGS IN THE SOFTWARE.
use warnings;
use strict;
use Hobbit;
use YAML::Tiny;
if (! -x '/usr/bin/ntpq' and system('ntpq -? >/dev/null 2>&1') != 0) {
exit 0;
}
my $testname = 'ntpq';
my $bb = new Hobbit("$testname");
my $trends = Hobbit::trends;
my $syspeer_stats = {};
my $plugins_config = '/etc/xymon/plugins.yaml';
my $ntpd_pid_file = '/var/run/ntpd.pid';
my $offset_warning = 100;
my $offset_critical = 2000;
if (-e $plugins_config) {
my $config_yaml = YAML::Tiny->read($plugins_config);
my $config = $config_yaml->[0]{"$testname"};
$ntpd_pid_file = $config->{'ntpd_pid_file'} if ( defined($config->{'ntpd_pid_file'}) );
$offset_warning = $config->{'offset_warning'} if ( defined($config->{'offset_warning'}) );
$offset_critical = $config->{'offset_critical'} if ( defined($config->{'offset_critical'}) );
}
$bb->print("NTP peers:\n\n");
my $found_syspeer = 0;
my $recently_started = 0;
my $initializing = 0;
if (-f $ntpd_pid_file) {
$recently_started = (time - (stat($ntpd_pid_file))[9]) < 300;
} else {
$bb->color_line('yellow', "ntpd pid file $ntpd_pid_file not found. Is ntpd running?\n\n");
}
my @output = `ntpq -np 2>&1` or die;
foreach my $line (@output) {
if ($line =~ /^ / or $line =~ /^==/) {
$bb->print(' ' . $line);
} elsif ($line =~ /^\*\S+\s+\S+\s+\d+ \w\s+[\dm-]+\s+[\d-]+\s+[\d-]+\s+([\d\.-]+)\s+([\d\.-]+)\s+([\d\.-]+)/) {
($syspeer_stats->{'delay'}, $syspeer_stats->{'offset'}, $syspeer_stats->{'jitter'}) = ($1, $2, $3);
$bb->color_line('green', $line);
$found_syspeer = 1;
} elsif ($line =~ /^( |x|\.|\-|\+|\#|o)/) {
$bb->color_line('clear', $line);
$initializing = 1 if $line =~ /\.INIT\.|\.STEP\./;
} else {
$bb->color_line('yellow', $line);
}
}
if ($found_syspeer) {
$bb->print( "\n" );
$bb->print( "SyspeerDelay: $syspeer_stats->{'delay'}\n" );
$bb->print( "SyspeerOffset: $syspeer_stats->{'offset'}\n" );
$bb->print( "SyspeerJitter: $syspeer_stats->{'jitter'}\n\n" );
$bb->print( "SyspeerOffset thresholds:\n" );
$bb->print( "Warning: ${offset_warning}ms\n" );
$bb->print( "Critical: ${offset_critical}ms\n" );
if (abs($syspeer_stats->{'offset'}) > $offset_critical) {
$bb->color_line('red', "SyspeerOffset > ${offset_critical}ms\n" );
} elsif (abs($syspeer_stats->{'offset'}) > $offset_warning) {
$bb->color_line('yellow', "SyspeerOffset > ${offset_warning}ms\n" );
}
$trends->print ("[${testname},SyspeerDelay.rrd]\n");
$trends->print ("DS:lambda:GAUGE:600:U:U $syspeer_stats->{'delay'}\n");
$trends->print ("[${testname},SyspeerOffset.rrd]\n");
$trends->print ("DS:lambda:GAUGE:600:U:U $syspeer_stats->{'offset'}\n");
$trends->print ("[${testname},SyspeerJitter.rrd]\n");
$trends->print ("DS:lambda:GAUGE:600:U:U $syspeer_stats->{'jitter'}\n");
} else {
$bb->print("\n");
if ($recently_started and $initializing) {
$bb->color_line('yellow', "No system peer entry (\"*\") found; ntpd was recently started and is initializing.\n");
} else {
$bb->color_line('red', "No system peer entry (\"*\") found\n");
}
}
$trends->send;
$bb->send;
|