1 files changed, 127 insertions, 0 deletions

diff --git a/contrib/check_inodes-freebsd.pl b/contrib/check_inodes-freebsd.pl
new file mode 100644
index 00000000..6dc83754
--- /dev/null
+++ b/contrib/check_inodes-freebsd.pl
@@ -0,0 +1,127 @@
+#!/usr/bin/perl
+
+# check_inodes.pl for FreeBSD
+# Designed on FreeBSD 4.6 (although this should not matter)
+# parses df output, splits, and then takes variables
+# df.pl -f mountpoint -w warningnumber -c critical number
+# USE NUMBERS AND NOT PERCENTS FOR wanring and critical values
+# -h is help
+# -v is version
+# Mountpoints:
+# like / or /usr or /var (whatever you mount drives NOT the device names)
+# Andrew Ryder - 20020804 - atr@mrcoffee.org
+
+
+use strict;
+use Getopt::Long;
+use vars qw($opt_V $opt_h $opt_w $opt_c $opt_f $verbose $PROGNAME);
+use lib "/usr/local/libexec/nagios" ;
+use utils qw($TIMEOUT %ERRORS &print_revision &support);
+
+my $df = "/bin/df";
+my $grep = "/usr/bin/grep";
+
+$PROGNAME="df.pl";
+
+sub print_help ();
+sub print_usage ();
+
+
+$ENV{'PATH'}='';
+$ENV{'BASH_ENV'}='';
+$ENV{'ENV'}='';
+
+Getopt::Long::Configure('bundling');
+GetOptions
+        ("V"   => \$opt_V, "version"    => \$opt_V,
+         "h"   => \$opt_h, "help"       => \$opt_h,
+         "w=s" => \$opt_w, "warning=s"  => \$opt_w, 
+         "c=s" => \$opt_c, "critical=s" => \$opt_c,
+         "f=s" => \$opt_f, "filesystem=s" => \$opt_f);
+        
+
+if ($opt_V) {
+        print_revision($PROGNAME,'$Revision$ ');
+        exit $ERRORS{'OK'};
+}
+
+if ($opt_h) {
+        print_help();
+        exit $ERRORS{'OK'};
+}
+
+($opt_w) || ($opt_w = shift) || ($opt_w = 50);
+my $warning = $1 if ($opt_w =~ /([0-9]+)/);
+
+($opt_c) || ($opt_c = shift) || ($opt_c = 75);
+my $critical = $1 if ($opt_c =~ /([0-9]+)/);
+
+if ($opt_c < $opt_w) {
+        print "Critical offset should be larger than warning offset\n";
+        print_usage();
+        exit $ERRORS{"UNKNOWN"};
+}
+
+($opt_f) || ($opt_f = "/");
+
+
+unless (-e $df) {
+        print "UNKNOWN: $df is not where df is\n";
+        exit $ERRORS{'UNKNOWN'};
+        }
+
+unless (-e $grep) {
+        print "UNKNOWN: $grep is not where grep is\n";
+        exit $ERRORS{'UNKNOWN'};
+        }
+
+unless (-d $opt_f) {
+        print "UNKNOWN: $opt_f is not a mount point\n"; 
+        exit $ERRORS{'UNKNOWN'};
+        }
+
+
+my $state = $ERRORS{'UNKNOWN'};
+my $answer;
+
+open(DF, "$df -i $opt_f| $grep -v Filesystem |");
+
+while (<DF>) {
+        
+                my ($fs,$onek,$used,$avail,$capacity,$iused,$ifree,$ipercent,$mounted) = split;
+                $ipercent =~ s/%//s;
+
+                        if ($ipercent > $opt_w) {
+                                $state = $ERRORS{'WARNING'};
+                                $answer =  "WARNING: $ipercent percent inodes free on $opt_f\n";
+                        } elsif ($ipercent > $opt_w) {
+                                $state = $ERRORS{'CRITCAL'};
+                                $answer =  "CRITICAL: $ipercent percent inodes free on $opt_f\n";
+                        } elsif ($ipercent < $opt_w) {
+                                $state = $ERRORS{'OK'};
+                                $answer = "OK: $ipercent percent inodes free on $opt_f\n";
+                        }
+}
+
+close(DF);
+
+print "$answer";
+exit $state;
+
+sub print_usage () {
+        print "Usage: $PROGNAME <filesystem> [-w <warn>] [-c <crit>]\n";
+        print "Example: $PROGNAME /dev/ad0s1a -w 50 -c 75\n";
+}
+                
+sub print_help () {
+        print_revision($PROGNAME,'$Revision$');
+        print "Copyright (c) 2002 Andrew Ryder\n";
+        print "\n";
+        print_usage();
+        print "\n";
+        print "<warn> = Inode Percent at which a warning message is returned. Defaults to 50.\n";
+        print "<crit> = Inode Percent at which a critical message is returned..\n        Defaults to 75.\n\n";
+        support();
+}
+ 
+