zabbix-agent-addons/scripts/disco_filesystems
Daniel Berteaud 532775e403 Enhance filesystem discovery:
- add {#FSDEVICE} with the block device backing the filesystem
- add {#FSWARNTHRES} and {#FSCRITTHRES} (which default to 85% and 95%). You can overwrite
  the threshold like this:
  * echo 90 > /home/.zbx_warning
  * echo 98 > /home/.zbx_critical
2013-04-13 17:25:30 +02:00

55 lines
1.2 KiB
Perl

#!/usr/bin/perl
$first = 1;
print "{\n";
print "\t\"data\":[\n\n";
my $cmd;
my $re;
# On Linux, parse /proc/mounts
if (-e "/proc/mounts"){
$cmd = 'cat /proc/mounts';
$re = qr/(\S+) (\S+) (\S+)/;
}
# On BSD (at least pfsense), there's no /proc/mounts
# parse the mount output
else{
$cmd = '/sbin/mount';
$re = qr/(\S+) on (\S+) \((\S+), /;
}
for (`$cmd`){
($block, $fsname, $fstype) = m/$re/;
# Default warning and critical level (%)
my $warning = 85;
my $critical = 95;
my $t;
if (open WARN, "$fsname/.zbx_warning"){
$t = join "", <WARN>;
close WARN;
chomp($t);
$warning = $t if ($t =~ m/^\d+$/);
}
if (open CRIT, "$fsname/.zbx_critical"){
$t = join "", <CRIT>;
close CRIT;
chomp($t);
$critical = $t if ($t =~ m/^\d+$/);
}
$fsname =~ s!/!\\/!g;
print "\t,\n" if not $first;
$first = 0;
print "\t{\n";
print "\t\t\"{#FSNAME}\":\"$fsname\",\n";
print "\t\t\"{#FSTYPE}\":\"$fstype\"\n";
print "\t\t\"{#FSDEVICE}\":\"$block\"\n";
print "\t\t\"{#FSWARNTHRES}\":\"$warning\"\n";
print "\t\t\"{#FSCRITTHRES}\":\"$critical\"\n";
print "\t}\n";
}
print "\n\t]\n";
print "}\n";