Perl自定义开发Nagios检测磁盘所有分区使用率插件（NRPE端使用）

功能说明：

脚本已经用在实践环境中，放到nrpe远程被监控端，用来实时监控远程主机所有分区，动态增加的分区也会自动加到监控范围。

当多个分区同时出现Critical和Warning状态时，将在Nagios中优先显示Critical状态，同时输出所有分区使用情况报告。

监控内容包括：

分区总size；

可用分区size；

已经使用的使用率%；

开发语言：perl

使用说明：

在nrpe.cfg文件中添加下面一行

command[check_disk]=/opt/nrpe/libexec/lionel_disk.pl -w 90 -c 95

保存，重启nrpe使服务生效。

-w参数表示warning的阀值，90表示分区使用率达到90%时警告；-c参数表示critical的阀值，95表示使用率达到95%时报警。举例如下：

# ./lionel_disk.pl -w 90 -c 95

/dev/sda2 WARNING: Total is 9.7G MB, FreeDisk is 5.5G, UseDisk% is 42%
/dev/sda5 WARNING: Total is 8.7G MB, FreeDisk is 8.1G, UseDisk% is 2%
/dev/sda1 WARNING: Total is 99M MB, FreeDisk is 82M, UseDisk% is 13%
/dev/sdb1 CRITICAL: Total is 89G MB, FreeDisk is 33G, UseDisk% is 62%

其他细节：本脚本提供检测参数的功能，参数给出错误会提示Usage，warning的参数值一定要比 critical的值小，因为已用的使用率越多报警级别越高。

脚本内容如下，供大家参考：

脚本名称是【lionel_disk.pl 】

#!/usr/bin/perl
# author:shenxiaoran
# date:2014-1-14

use strict;

use lib "/opt/nrpe/libexec";
use utils qw(%ERRORS &print_revision &support &usage);

my ($opt_w,$opt_c) = ($ARGV[1],$ARGV[3]);
my $name_partation;
my $total_disk;
my $use_disk;
my $free_disk;
my $rate_use_disk;
my $status = 'OK';
my $flag = 0;

if ( !defined $ARGV[1] or !defined $ARGV[3] ) {
        print "Usage: $0 -w num -c num \n";
        print "Example: lionel_disk.pl -w 90 -c 95 \n";
}
else {
        check_disk();

}

sub check_disk() {
if ( $opt_w > $opt_c ) {
        print "Error: -w num > -c num \n";
        print "-w: means already use 90% \n";
        print "-c: means already use 95% \n";
        print "Usage: $0 -w num -c num \n";
        print "Example: lionel_disk.pl -w 90 -c 95 \n";
        exit;
}
else {
        my @data ;
        system "df -h > /tmp/df.tmp";
        open (FILE,"</tmp/df.tmp") || die ("Can't open /tmp/df.tmp $!");
        my $i = 0;
        while (<FILE>) {
                if (/^\/dev\/*./) {
                        $data[$i] = $_;
                        $i++;
                }
        }
        close FILE;
        foreach (@data) {
                my @partation = split(/\s+/,$_);
                $name_partation = $partation[0];
                $total_disk = $partation[1];
                $use_disk = $partation[2];
                $free_disk = $partation[3];
                $rate_use_disk = abs($partation[4]);

                if ( $rate_use_disk >= $opt_c ) {
                        $status = 'CRITICAL';
                }
                elsif (( $opt_w <= $rate_use_disk ) and ( $rate_use_disk < $opt_c )) {
                        $status = 'WARNING';
                }
                print "$name_partation $status: Total is $total_disk MB, FreeDisk is $free_disk, UseDisk% is $rate_use_disk%\n";
                if ($status =~ 'CRITICAL') {
                        $flag = 1
                }
        }
        if ( $flag == 1 ) {
                exit "$ERRORS{CRITICAL}"
        }
        else {
                exit "$ERRORS{$status}";
        }
}
}
脚本结束