Add check_tftp

check_tftp/Makefile

@@ -0,0 +1,3 @@
+#/usr/bin/make -f
+
+include ../common.mk

check_tftp/check_tftp

@@ -0,0 +1,110 @@
+#!/usr/bin/perl
+#
+# ============================== SUMMARY =====================================
+#
+# Program : check_tftp.pl
+# Version : 0.11
+# Date    : Nov 24 2006 
+#           (added all the top comments you see, no code changes since 2005?)
+# Author  : William Leibzon - william@leibzon.org
+# Summary : This is a nagios plugin that verifies TFTP server is working
+# Licence : GPL - summary below, full text at http://www.fsf.org/licenses/gpl.txt
+#
+# =========================== PROGRAM 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., 675 Mass Ave, Cambridge, MA 02139, USA.
+#
+# ===================== INFORMATION ABOUT THIS PLUGIN =========================
+#
+# This is a very simple nagios plugin that checks if TFTP server is up
+# It is using Net::TFTP perl module for protocol support
+# There are two required parameters/arguments:
+#   $1 - HOSTNAME to check
+#   $2 - file to retrieve for this check
+# An example of how to use this is as follows:
+#
+#define command{
+#        command_name    check_tftp
+#        command_line    $USER1$/check_tftp.pl $HOSTADDRESS$ X86PC/UNDI/linux-install
+#        }
+#
+#define service{
+#       use                             generic-service
+#       hostgroup_name                  dhcpserv
+#       service_description             TFTP
+#       check_command                   check_tftp
+#       }
+# =================================== TODO ===================================
+#
+#  1. Using GetOpt::Long for specifying parameters including timeout &
+#     number of retries
+#  2. Check to make sure file is writable rather then just read-only check
+#
+#  Note: I'm unlikely to work on this plugin unless somebody writes me they
+#        actually want "tftp write" or similar feature.
+#
+# ========================== START OF PROGRAM CODE ===========================
+
+use strict;
+use Net::TFTP;
+use FileHandle;
+
+# Nagios specific
+# use lib "/usr/local/nagios/libexec";
+# use utils qw(%ERRORS $TIMEOUT);
+my $TIMEOUT = 20;
+my %ERRORS=('OK'=>0,'WARNING'=>1,'CRITICAL'=>2,'UNKNOWN'=>3,'DEPENDENT'=>4);
+
+sub print_usage {
+   print "TFTP Monitor for Nagios by william(at)leibzon.org\n\n";
+   print "Usage:  check_tftp.pl hostname filename\n";
+}
+
+# Get the alarm signal (just in case)
+$SIG{'ALRM'} = sub {
+     print ("ERROR: Alarm signal (Nagios time-out)\n");
+     exit $ERRORS{"CRITICAL"};
+};
+
+if (!defined($ARGV[0]) || !defined($ARGV[1])) {
+  print_usage();
+  exit $ERRORS{"UNKNOWN"};
+}
+
+my $HOSTNAME = $ARGV[0];
+my $FILENAME = $ARGV[1];
+
+alarm($TIMEOUT);
+
+my $tftp = Net::TFTP->new($HOSTNAME, Port => 69, Retries => 2);
+my $err=$tftp->error();
+my $fh=$tftp->get($FILENAME);
+
+if (!$fh || $err) {
+  print "CRITICAL ERROR - could not retrieve $FILENAME from $HOSTNAME using tftp - $err\n";
+  exit $ERRORS{"CRITICAL"};
+}
+else {
+  my $data = $fh->getline;
+  $err = $tftp->error();
+  if (defined($data) && !$err) {
+    print "TFTP OK - file $FILENAME present on server $HOSTNAME\n";
+    exit $ERRORS{"OK"};
+  }
+  else {
+    print "CRITICAL ERROR - could not retrieve $FILENAME from $HOSTNAME using tftp - $err\n";
+    exit $ERRORS{"CRITICAL"};
+  }
+}

check_tftp/check_tftp.cfg

@@ -0,0 +1,5 @@
+# 'check_tftp' command definition
+define command{
+        command_name    check_tftp
+        command_line    /usr/lib/monitoring-plugins/check_tftp $HOSTADDRESS$ $ARG1$
+        }

check_tftp/control

@@ -0,0 +1,6 @@
+Homepage: http://william.leibzon.org/nagios/
+Watch: http://william.leibzon.org/nagios/plugins/check_tftp.pl Version : ([0-9.]+)
+Uploaders: Jan Wagner <waja@cyconet.org>
+Description: plugin that verifies TFTP server is working.
+Recommends: libnet-tftp-perl
+Version: 0.11

check_tftp/copyright

@@ -0,0 +1,7 @@
+Copyright (c) 2006 William Leibzon <william@leibzon.org>
+
+License: GPL v2
+
+  On Debian systems, the complete text of the GNU General
+  Public License version 2 can be found in "/usr/share/common-licenses/GPL-2".
+