import to mercurial default tip
authorChristian Arnold <arnold@schlittermann.de>
Fri, 04 Mar 2011 16:43:47 +0100
changeset 0 57a003cf847f
import to mercurial
.hgignore
.perltitdy
Makefile
check_aptkeys.pl
debian/changelog
debian/compat
debian/control
debian/copyright
debian/dirs
debian/docs
debian/rules
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/.hgignore	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,8 @@
+syntax: glob
+*.swp
+debian/files
+check_aptkeys
+
+syntax: regexp
+(build|configure)-stamp$
+debian/nagios-plugin-aptkeys[./]
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/.perltitdy	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,2 @@
+--paren-tightness=2
+--square-bracket-tightness=2
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Makefile	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,22 @@
+SCRIPTS = check_aptkeys
+CLEANFILES = ${SCRIPTS}
+DESTDIR =
+prefix = /usr
+
+plugindir = ${prefix}/lib/nagios/plugins/ius
+
+.PHONY:	all clean install
+
+all:	${SCRIPTS}
+
+clean:
+	-rm -f ${CLEANFILES}
+
+install:	all
+	install -d -m 0755 ${DESTDIR}/${plugindir}
+	install -m 0755 $(SCRIPTS) ${DESTDIR}/${plugindir}/
+
+%:	%.pl
+	@perl -c $<
+	@cp -f $< $@
+	@chmod +x $@
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/check_aptkeys.pl	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,204 @@
+#!/usr/bin/perl -w
+
+#    Copyright (C) 2011  Christian Arnold
+#
+#    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 3 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, see <http://www.gnu.org/licenses/>.
+#
+#    Christian Arnold <arnold@schlittermann.de>
+
+use strict;
+use warnings;
+use File::Basename;
+use Getopt::Long;
+use Date::Manip;
+use Pod::Usage;
+use if $ENV{DEBUG} => "Smart::Comments";
+
+my %ERRORS = (
+    OK        => 0,
+    WARNING   => 1,
+    CRITICAL  => 2,
+    UNKNOWN   => 3,
+    DEPENDENT => 4
+);
+
+sub get_status();
+sub report($$);
+sub version($$);
+
+my $ME      = basename $0;
+my $VERSION = "2.0";
+
+my %opt = (
+    binary   => "/usr/bin/apt-key",
+    warning  => "1month",
+    critical => "1week",
+);
+
+MAIN: {
+    Getopt::Long::Configure('bundling');
+    GetOptions(
+        "b|binary=s"   => \$opt{binary},
+        "w|warning=s"  => \$opt{warning},
+        "c|critical=s" => \$opt{critical},
+        "h|help" => sub { pod2usage( -verbose => 1, -exitval => $ERRORS{OK} ) },
+        "m|man" => sub { pod2usage( -verbose => 2, -exitval => $ERRORS{OK} ) },
+        "V|version" => sub { version( $ME, $VERSION ); exit $ERRORS{OK}; }
+    ) or pod2usage( -verbose => 1, -exitval => $ERRORS{CRITICAL} );
+
+    unless ( -x $opt{binary} ) {
+        print "APTKEYS CRITICAL: $opt{binary} - not found or not executable\n";
+        exit $ERRORS{CRITICAL};
+    }
+
+    my ( $warning, $critical ) = get_status();
+    report( $warning, $critical );
+}
+
+sub get_status() {
+    my $w_time = DateCalc( "today", "+ $opt{warning}" );
+    my $c_time = DateCalc( "today", "+ $opt{critical}" );
+
+    my @command = ( "$opt{binary}", "list" );
+    open( OUTPUT, "-|" ) or do {
+        open( STDERR, ">&STDOUT" );
+        exec(@command);
+    };
+
+    my %keys = ();
+    while (<OUTPUT>) {
+        $/ = "";
+        my ( $keyid, $date ) =
+          (m#^pub[^/]+/([^\s]+)\s+[^\s]+[^0-9-]+([0-9-]+)]$#m)
+          or next;
+        my ($description) = (m#^uid\s+(.*)$#m) or next;
+
+        my $parsedate = ParseDate($date);
+        &Date_Cmp( $parsedate, $w_time ) > 0
+          and push( @{ $keys{"$keyid, $description, $date"} }, "OK" )
+          and next;
+        &Date_Cmp( $parsedate, $c_time ) > 0
+          and push( @{ $keys{"$keyid, $description, $date"} }, "WARNING" )
+          and next;
+        push( @{ $keys{"$keyid, $description, $date"} }, "CRITICAL" );
+    }
+
+    my ( @warning, @critical ) = ();
+    foreach ( sort keys %keys ) {
+        if ( @{ $keys{$_} }[0] eq "WARNING" ) {
+            push( @warning, $_ );
+        }
+        elsif ( @{ $keys{$_} }[0] eq "CRITICAL" ) {
+            push( @critical, $_ );
+        }
+    }
+
+    return ( \@warning, \@critical );
+}
+
+sub report($$) {
+    my ( $warning, $critical ) = @_;
+
+    if (@$critical) {
+        print "APTKEYS CRITICAL: @$critical\n";
+        exit $ERRORS{CRITICAL};
+    }
+    elsif (@$warning) {
+        print "APTKEYS WARNING: @$warning\n";
+        exit $ERRORS{WARNING};
+    }
+    else {
+        print "APTKEYS OK: all aptkeys in limit\n";
+        exit $ERRORS{OK};
+    }
+}
+
+sub version($$) {
+    my $progname = shift;
+    my $version  = shift;
+
+    print <<_VERSION;
+$progname version $version
+Copyright (C) 2011 by Christian Arnold and Schlittermann internet & unix support.
+
+$ME comes with ABSOLUTELY NO WARRANTY. This is free software,
+and you are welcome to redistribute it under certain conditions.
+See the GNU General Public Licence for details.
+_VERSION
+}
+
+__END__
+
+=head1 NAME
+
+check_aptkeys - nagios plugin to check the expire date for aptkeys
+
+=head1 SYNOPSIS
+
+check_aptkeys [-b|--binary path]
+              [-w|--warning string]
+              [-c|--critical string]
+              [-h|--help]
+              [-m|--man]
+              [-v|--version]
+
+=head1 OPTIONS
+
+=over
+
+=item B<-b>|B<--binary> I<path>
+
+apt-keys binary (default: /usr/bin/apt-key)
+
+=item B<-w>|B<--warning> I<string>
+
+Time before change to warning status. (default: I<1month>)
+
+=item B<-c>|B<--critical> I<string>
+
+Time before change to critical status. (default: I<1week>)
+
+=item B<-h>|B<--help>
+
+Print detailed help screen.
+
+=item B<-m>|B<--man>
+
+Print manual page.
+
+=item B<-V>|B<--version>
+
+Print version information.
+
+=back
+
+=head1 DESCRIPTION
+
+This plugin check the expire date for aptkeys.  This plugin must be run as root.
+
+=head1 VERSION
+
+This man page is current for version 2.0 of check_aptkeys.
+
+=head1 AUTHOR
+
+Written by Christian Arnold L<arnold@schlittermann.de>
+
+=head1 COPYRIGHT
+
+Copyright (C) 2011 by Christian Arnold and Schlittermann internet & unix support.
+This is free software, and you are welcome to redistribute it under certain conditions.
+See the GNU General Public Licence for details.
+
+=cut
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/changelog	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,12 @@
+nagios-plugin-aptkeys (2.0) stable; urgency=low
+
+  * now in new code style
+
+ -- Christian Arnold <arnold@schlittermann.de>  Fri, 04 Mar 2011 16:40:56 +0100
+
+nagios-plugin-aptkeys (1.0-1) stable; urgency=low
+
+  * Initial release
+
+ -- Christian Arnold <arnold@schlittermann.de>  Tue, 10 Feb 2009 13:52:29 +0100
+
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/compat	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,1 @@
+7
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/control	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,13 @@
+Source: nagios-plugin-aptkeys
+Section: net
+Priority: extra
+Maintainer: Christian Arnold <arnold@schlittermann.de>
+Build-Depends: debhelper (>= 7)
+Standards-Version: 3.7.3
+
+Package: nagios-plugin-aptkeys
+Architecture: all
+Depends: perl-base, perl-doc, libdate-manip-perl
+Suggests: libsmart-comments-perl
+Description: nagios plugin to check expire date for aptkeys
+ This is a nagios plugin to checks the expire date for aptkeys.
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/copyright	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,31 @@
+It was downloaded from https://keller.schlittermann.de/hg/ius/nagios/nagios-plugin-aptkeys/
+
+Upstream Author(s):
+
+    Christian Arnold <arnold@schlittermann.de>
+
+Copyright:
+
+    <Copyright (C) 2011 Schlittermann internet & unix support>
+
+License:
+
+    This package 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 package 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 package; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
+
+On Debian systems, the complete text of the GNU General
+Public License can be found in `/usr/share/common-licenses/GPL'.
+
+The Debian packaging is (C) 2011, Christian Arnold <arnold@schlittermann.de> and
+is licensed under the GPL, see above.
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/dirs	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,2 @@
+usr/bin
+usr/sbin
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/debian/rules	Fri Mar 04 16:43:47 2011 +0100
@@ -0,0 +1,92 @@
+#!/usr/bin/make -f
+# -*- makefile -*-
+# Sample debian/rules that uses debhelper.
+# This file was originally written by Joey Hess and Craig Small.
+# As a special exception, when this file is copied by dh-make into a
+# dh-make output file, you may use that output file without restriction.
+# This special exception was added by Craig Small in version 0.37 of dh-make.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+
+
+
+
+
+configure: configure-stamp
+configure-stamp:
+	dh_testdir
+	# Add here commands to configure the package.
+
+	touch configure-stamp
+
+
+build: build-stamp
+
+build-stamp: configure-stamp  
+	dh_testdir
+
+	# Add here commands to compile the package.
+	$(MAKE)
+	#docbook-to-man debian/nagios-plugin-aptkeys.sgml > nagios-plugin-aptkeys.1
+
+	touch $@
+
+clean: 
+	dh_testdir
+	dh_testroot
+	rm -f build-stamp configure-stamp
+
+	# Add here commands to clean up after the build process.
+	$(MAKE) clean
+
+	dh_clean 
+
+install: build
+	dh_testdir
+	dh_testroot
+	dh_clean -k 
+	dh_installdirs
+
+	# Add here commands to install the package into debian/nagios-plugin-aptkeys.
+	$(MAKE) DESTDIR=$(CURDIR)/debian/nagios-plugin-aptkeys install
+
+
+# Build architecture-independent files here.
+binary-indep: build install
+# We have nothing to do by default.
+
+# Build architecture-dependent files here.
+binary-arch: build install
+	dh_testdir
+	dh_testroot
+	dh_installchangelogs 
+	dh_installdocs
+	dh_installexamples
+#	dh_install
+#	dh_installmenu
+#	dh_installdebconf	
+#	dh_installlogrotate
+#	dh_installemacsen
+#	dh_installpam
+#	dh_installmime
+#	dh_python
+#	dh_installinit
+#	dh_installcron
+#	dh_installinfo
+	dh_installman
+	dh_link
+	dh_strip
+	dh_compress
+	dh_fixperms
+#	dh_perl
+#	dh_makeshlibs
+	dh_installdeb
+	dh_shlibdeps
+	dh_gencontrol
+	dh_md5sums
+	dh_builddeb
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary install configure
+