blob: 040466d3d51ded88ff94ef0f4b452dcbb7255965 (
plain)
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
|
#!/usr/local/bin/perl
#
# check_nfs plugin for nagios
#
# usage:
# check_nfs.pl server
#
# Check if a nfs server is registered and running
# using rpcinfo -T udp <arg1> 100003.
# 100003 is the rpc programmnumber for nfs.
# <arg1> is the server queried.
#
#
# Use these hosts.cfg entries as examples
#
#service[fs0]=NFS;24x7;3;5;5;unix-admin;60;24x7;1;1;1;;check_nfs
#command[check_nfs]=/some/path/libexec/check_nfs.pl $HOSTADDRESS$
#
# initial version: 9-13-99 Ernst-Dieter Martin edmt@infineon.com
# current status: looks like working
#
#
# Copyright Notice: Do as you please, credit me, but don't blame me
#
$server = shift;
open CMD,"/bin/rpcinfo -T udp $server 100003 |";
$response = "nfs version ";
while ( <CMD> ) {
if ( /program 100003 version ([0-9]*) ready and waiting/ ) {
$response = $ response . "$1,";
}
}
if ( $response eq "nfs version " ) {
print "rpcinfo: RPC: Program not registered\n";
exit 2;
}
$response =~ s/,$//;
print "$response\n";
exit 0;
|