-# This Makefile contains only a dist rule to generate a distribution
-# tarball, and isn't included in the distribution. The software doesn't
-# need any compilation, so there are no other rules.
+# This Makefile contains only a dist rule to generate a distribution tarball
+# and a check rule for convenience, and isn't included in the distribution.
+# The software doesn't need any compilation, so there are no other rules.
VERSION := $(shell grep '^afs-monitor' NEWS | head -1 | cut -d' ' -f 2)
DATE := $(shell grep '^afs-monitor' NEWS | head -1 | cut -d' ' -f 3)
tar cf afs-monitor-$(VERSION).tar afs-monitor-$(VERSION)
gzip -9 afs-monitor-$(VERSION).tar
rm -r afs-monitor-$(VERSION)
+
+check test:
+ prove t/
#
# Written by Russ Allbery <rra@stanford.edu>
# Based on an earlier script by Neil Crellin <neilc@stanford.edu>
-# Copyright 2003, 2004, 2010
+# Copyright 2003, 2004, 2010, 2013
# The Board of Trustees of the Leland Stanford Junior University
#
# This program is free software; you may redistribute it and/or modify it
# Documentation
##############################################################################
+=for stopwords
+AFS Crellin Nagios afs-monitor bos bosserver -hV salvager util
+
=head1 NAME
check_afs_bos - Monitor AFS bos output for problems in Nagios
runs; it doesn't pay any attention to the last start time, the last error
exit status, the presence of core files, and the like. It mostly just
looks for the "running normally" part of the B<bos> output and makes sure
-the auxilliary status is also "running normally" for a file server
+the auxiliary status is also "running normally" for a file server
process.
=head1 OPTIONS
=head1 COPYRIGHT AND LICENSE
-Copyright 2003, 2004, 2010 The Board of Trustees of the Leland Stanford
-Junior University.
+Copyright 2003, 2004, 2010, 2013 The Board of Trustees of the Leland
+Stanford Junior University
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
# Documentation
##############################################################################
+=for stopwords
+AFS Crellin Nagios Rader afs-monitor -hV util -vv
+
=head1 NAME
check_afs_quotas - Monitor AFS quota usage under Nagios
B<check_afs_quotas> is a Nagios plugin for checking free space in AFS
volumes based on the allocated quota for the volume. It uses either C<vos
examine> or C<vos listvol> to obtain the quota and current usage for
-either a single volume or all volumes on a server or server parittion and
+either a single volume or all volumes on a server or server partition and
will return an alert if the percentage of quota used is over a threshold.
By default, it returns a critical error if the used quota is over 90% and
a warning if it is over 85% (changeable with the B<-c> and B<-w> options).
=head1 COPYRIGHT AND LICENSE
-Copyright 2010 The Board of Trustees of the Leland Stanford Junior
-University.
+Copyright 2010, 2013 The Board of Trustees of the Leland Stanford Junior
+University
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
#
# Written by Quanah Gibson-Mount based on work by Neil Crellin
# Updated by Russ Allbery <rra@stanford.edu>
-# Copyright 2003, 2004, 2005, 2010
+# Copyright 2003, 2004, 2005, 2010, 2013
# The Board of Trustees of the Leland Stanford Junior University
#
# This program is free software; you may redistribute it and/or modify it
# Documentation
##############################################################################
+=for stopwords
+AFS Crellin Nagios Quanah afs-monitor -hV rxdebug util
+
=head1 NAME
check_afs_rxdebug - Check AFS servers for blocked connections in Nagios
=head1 COPYRIGHT AND LICENSE
-Copyright 2003, 2004, 2005, 2010 The Board of Trustees of the Leland
-Stanford Junior University.
+Copyright 2003, 2004, 2005, 2010, 2013 The Board of Trustees of the Leland
+Stanford Junior University
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
#
# Written by Susan Feng <sfeng@stanford.edu>
# Updated by Russ Allbery <rra@stanford.edu>
-# Copyright 2003, 2004, 2010
+# Copyright 2003, 2004, 2010, 2013
# The Board of Trustees of the Leland Stanford Junior University
#
# This program is free software; you may redistribute it and/or modify it
# Documentation
##############################################################################
+=for stopwords
+AFS Feng Nagios Quanah Rader afs-monitor -dhV mon --perfdata util -vv
+
=head1 NAME
check_afs_space - Monitor AFS disk space usage under Nagios
partitions. It uses C<vos partinfo> to obtain the free space on the
partitions on an AFS server and will return an alert if the percentage of
used space exceeds a threshold. By default, it returns a critical error
-if the used space is over 90% and a warning if it is over 85% (changaable
+if the used space is over 90% and a warning if it is over 85% (changeable
with the B<-c> and B<-w> options).
If C<vos partinfo> doesn't return within the timeout, B<check_afs_space>
=head1 COPYRIGHT AND LICENSE
-Copyright 2003, 2004, 2010 The Board of Trustees of the Leland Stanford
-Junior University.
+Copyright 2003, 2004, 2010, 2013 The Board of Trustees of the Leland
+Stanford Junior University
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
# any of the servers don't believe there is a sync site.
#
# Written by Russ Allbery <rra@stanford.edu>
-# Copyright 2004, 2010
+# Copyright 2004, 2010, 2013
# The Board of Trustees of the Leland Stanford Junior University
#
# This program is free software; you may redistribute it and/or modify it
# Documentation
##############################################################################
+=for stopwords
+AFS Nagios Ubik afs-monitor -hV kaserver ptserver udebug util vlserver
+
=head1 NAME
check_afs_udebug - Check AFS servers for blocked connections in Nagios
=head1 COPYRIGHT AND LICENSE
-Copyright 2004, 2010 The Board of Trustees of the Leland Stanford Junior
-University.
+Copyright 2004, 2010, 2013 The Board of Trustees of the Leland Stanford
+Junior University
This program is free software; you may redistribute it and/or modify it
under the same terms as Perl itself.
--- /dev/null
+#!/usr/bin/perl
+#
+# Check for spelling errors in POD documentation.
+#
+# Checks all POD files in a Perl distribution using Test::Spelling. This test
+# is disabled unless RRA_MAINTAINER_TESTS is set, since spelling dictionaries
+# vary too much between environments.
+#
+# Written by Russ Allbery <rra@stanford.edu>
+#
+# The authors hereby relinquish any claim to any copyright that they may have
+# in this work, whether granted under contract or by operation of law or
+# international treaty, and hereby commit to the public, at large, that they
+# shall not, at any time in the future, seek to enforce any copyright in this
+# work against any person or entity, or prevent any person or entity from
+# copying, publishing, distributing or creating derivative works of this work.
+
+use strict;
+use warnings;
+
+use Test::More;
+
+# Skip tests unless we're running the test suite in maintainer mode.
+if (!$ENV{RRA_MAINTAINER_TESTS}) {
+ plan skip_all => 'Spelling tests only run for maintainer';
+}
+
+# Skip tests if Test::Spelling is not installed.
+if (!eval { require Test::Spelling }) {
+ plan skip_all => 'Test::Spelling required to test POD spelling';
+}
+Test::Spelling->import;
+
+# Check all POD in the distribution.
+my @files = glob 'check_afs_*';
+all_pod_files_spelling_ok(@files);
--- /dev/null
+#!/usr/bin/perl
+#
+# Check all POD documents for POD formatting errors.
+#
+# Written by Russ Allbery <rra@stanford.edu>
+#
+# The authors hereby relinquish any claim to any copyright that they may have
+# in this work, whether granted under contract or by operation of law or
+# international treaty, and hereby commit to the public, at large, that they
+# shall not, at any time in the future, seek to enforce any copyright in this
+# work against any person or entity, or prevent any person or entity from
+# copying, publishing, distributing or creating derivative works of this work.
+
+use strict;
+use warnings;
+
+use Test::More;
+
+# Skip tests if Test::Pod is not installed.
+if (!eval { require Test::Pod }) {
+ plan skip_all => 'Test::Pod required to test POD syntax';
+}
+Test::Pod->import;
+
+# Check all POD in the distribution.
+my @files = glob 'check_afs_*';
+all_pod_files_ok(@files);