mirror of
https://github.com/monitoring-plugins/monitoring-plugins.git
synced 2026-05-28 04:35:40 -04:00
new plugins
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@73 f882894a-f735-0410-b71e-b25c423dba1c
This commit is contained in:
Subhendu Ghosh
parent
9e3002c652
commit
005a4281f4
2 changed files with 169 additions and 0 deletions
80
contrib/check_linux_raid.pl
Normal file
80
contrib/check_linux_raid.pl
Normal file
|
|
@ -0,0 +1,80 @@
|
|||
#!/usr/bin/perl -w
|
||||
|
||||
# Copyright (c) 2002 ISOMEDIA, Inc.
|
||||
# Written by Steve Milton
|
||||
# Released under the GNU Public License
|
||||
#
|
||||
# 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
|
||||
# (at your option) 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
#
|
||||
# Usage: check_raid <raid-name>
|
||||
# Example: check_raid md0
|
||||
# WARNING md0 status=[UUU_U], recovery=46.4%, finish=123.0min
|
||||
|
||||
use strict;
|
||||
|
||||
my %ERRORS=('DEPENDENT'=>4,'UNKNOWN'=>3,'OK'=>0,'WARNING'=>1,'CRITICAL'=>2);
|
||||
|
||||
open (MDSTAT, "</proc/mdstat") or die "Failed to open /proc/mdstat";
|
||||
my $found = 0;
|
||||
my $status = "";
|
||||
my $recovery = "";
|
||||
my $finish = "";
|
||||
my $active = "";
|
||||
while(<MDSTAT>) {
|
||||
if ($found) {
|
||||
if (/(\[[_U]+\])/) {
|
||||
$status = $1;
|
||||
} elsif (/recovery = (.*?)\s/) {
|
||||
$recovery = $1;
|
||||
($finish) = /finish=(.*?min)/;
|
||||
}
|
||||
} else {
|
||||
if (/$ARGV[0]/) {
|
||||
$found = 1;
|
||||
if (/active/) {
|
||||
$active = 1;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
my $msg = "FAILURE";
|
||||
my $code = "UNKNOWN";
|
||||
if ($status =~ /_/) {
|
||||
if ($recovery) {
|
||||
$msg = sprintf "%s status=%s, recovery=%s, finish=%s\n",
|
||||
$ARGV[0], $status, $recovery, $finish;
|
||||
$code = "WARNING";
|
||||
} else {
|
||||
$msg = sprintf "%s status=%s\n", $ARGV[0], $status;
|
||||
$code = "CRITICAL";
|
||||
}
|
||||
} elsif ($status =~ /U+/) {
|
||||
$msg = sprintf "%s status=%s\n", $ARGV[0], $status;
|
||||
$code = "OK";
|
||||
} else {
|
||||
if ($active) {
|
||||
$msg = sprintf "%s active with no status information.\n",
|
||||
$ARGV[0];
|
||||
$code = "OK";
|
||||
} else {
|
||||
$msg = sprintf "%s does not exist.\n", $ARGV[0];
|
||||
$code = "CRITICAL";
|
||||
}
|
||||
}
|
||||
|
||||
print $code, " ", $msg;
|
||||
exit ($ERRORS{$code});
|
||||
|
||||
89
contrib/check_nagios_db.pl
Normal file
89
contrib/check_nagios_db.pl
Normal file
|
|
@ -0,0 +1,89 @@
|
|||
#!/usr/local/bin/perl -w
|
||||
|
||||
use strict;
|
||||
$|++;
|
||||
|
||||
use vars qw/$opt_e $opt_c/;
|
||||
|
||||
$ENV{"PATH"} = "/usr/bin:/usr/sbin:/bin";
|
||||
|
||||
use Getopt::Std;
|
||||
use DBI;
|
||||
|
||||
my $driver = "mysql";
|
||||
|
||||
my $CFG_DEF = "/opt/nagios/etc/cgi.cfg";
|
||||
my $QUERY = "select *, UNIX_TIMESTAMP(last_update) as ut from programstatus;";
|
||||
my $EXPIRE_DEF = 5; ## expressed in minutes
|
||||
my $PROCCNT = 0;
|
||||
|
||||
use constant OK => 1;
|
||||
use constant WARN => 2;
|
||||
|
||||
my $STAT = WARN;
|
||||
|
||||
sub usage {
|
||||
print STDERR "\n";
|
||||
print STDERR "$0 -F -e <expire time in minutes> -C <process string>\n";
|
||||
print STDERR "\n";
|
||||
exit -1;
|
||||
}
|
||||
|
||||
getopt("e:c:");
|
||||
|
||||
my $EXPIRE = $opt_e || $EXPIRE_DEF;
|
||||
my $CFG = $opt_c || $CFG_DEF;
|
||||
|
||||
( -f $CFG ) or die "Can't open config file '$CFG': $!\n";
|
||||
|
||||
my ($dbhost, $dbport, $dbuser, $dbpass, $dbname);
|
||||
|
||||
open(F, "< $CFG");
|
||||
while ( <F> ) {
|
||||
if (/^xsddb_host=(.+)/) { $dbhost = $1; next; };
|
||||
if (/^xsddb_port=(.+)/) { $dbport = $1; next; };
|
||||
if (/^xsddb_database=(.+)/) { $dbname = $1; next; };
|
||||
if (/^xsddb_username=(.+)/) { $dbuser = $1; next; };
|
||||
if (/^xsddb_password=(.+)/) { $dbpass = $1; next; };
|
||||
}
|
||||
close(F);
|
||||
|
||||
# print "($dbhost, $dbport, $dbuser, $dbpass, $dbname)\n";
|
||||
|
||||
my $dsn = "DBI:$driver:database=$dbname;host=$dbhost;port=$dbport";
|
||||
my $dbh = DBI->connect($dsn, $dbuser, $dbpass, {'RaiseError' => 1});
|
||||
|
||||
my $sth = $dbh->prepare($QUERY);
|
||||
if (!$sth) { die "Error:" . $dbh->errstr . "\n"; }
|
||||
$sth->execute;
|
||||
if (!$sth->execute) { die "Error:" . $sth->errstr . "\n"; }
|
||||
|
||||
my %status = ();
|
||||
|
||||
my $names = $sth->{'NAME'};
|
||||
my $numFields = $sth->{'NUM_OF_FIELDS'};
|
||||
my $ref = $sth->fetchrow_arrayref;
|
||||
for (my $i = 0; $i < $numFields; $i++) {
|
||||
$status{"$$names[$i]"} = $$ref[$i];
|
||||
}
|
||||
|
||||
#foreach (keys(%status)) {
|
||||
# print "$_: $status{$_}\n";
|
||||
#}
|
||||
|
||||
my $lastupdated = time() - $status{"ut"};
|
||||
if ( $lastupdated < ($EXPIRE*60) ) { ## convert $EXPIRE to seconds
|
||||
$STAT = OK;
|
||||
}
|
||||
|
||||
open(PS, "ps -eaf | grep $status{nagios_pid} | grep -v grep | ");
|
||||
$PROCCNT = 0;
|
||||
while(<PS>) {
|
||||
$PROCCNT++;
|
||||
}
|
||||
close(PS);
|
||||
|
||||
if ( $STAT == OK ) {
|
||||
print "Nagios OK: located $PROCCNT processes, program status updated $lastupdated seconds ago\n";
|
||||
}
|
||||
|
||||
Loading…
Reference in a new issue