From 1e2387474a449452b78520b9ad96a8b4b5e99722 Mon Sep 17 00:00:00 2001
From: Harald Pfeiffer <coding@lirion.de>
Date: Wed, 17 Apr 2019 19:07:19 +0200
Subject: initial commit of source fetch

---
 .../debian/patches/check_cups/ParseDateDelta       | 11 ++++++
 .../debian/patches/check_cups/epn                  |  8 ++++
 .../debian/patches/check_cups/monitoring-plugin    | 46 ++++++++++++++++++++++
 3 files changed, 65 insertions(+)
 create mode 100644 nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/ParseDateDelta
 create mode 100644 nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/epn
 create mode 100644 nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/monitoring-plugin

(limited to 'nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups')

diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/ParseDateDelta b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/ParseDateDelta
new file mode 100644
index 0000000..2383896
--- /dev/null
+++ b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/ParseDateDelta
@@ -0,0 +1,11 @@
+--- a/check_cups/check_cups
++++ b/check_cups/check_cups
+@@ -395,7 +395,7 @@
+ 
+         my( $age, $jobs ) = ( $warning{$queue}->{age}, $warning{$queue}->{jobs} );
+ 
+-        my( $prettyage ) = prettyDelta( parseDateDelta( "$age minutes" ) );
++        my( $prettyage ) = prettyDelta( ParseDateDelta( "$age minutes" ) );
+ 
+         my( @messages );
+ 
diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/epn b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/epn
new file mode 100644
index 0000000..cd836f4
--- /dev/null
+++ b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/epn
@@ -0,0 +1,8 @@
+--- a/check_cups/check_cups
++++ b/check_cups/check_cups
+@@ -1,4 +1,5 @@
+ #!/usr/bin/perl
++# nagios: -epn
+ 
+ =head1 NAME
+ 
diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/monitoring-plugin b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/monitoring-plugin
new file mode 100644
index 0000000..ec3439e
--- /dev/null
+++ b/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_cups/monitoring-plugin
@@ -0,0 +1,46 @@
+--- a/check_cups/check_cups
++++ b/check_cups/check_cups
+@@ -39,13 +39,33 @@
+ # http://search.cpan.org/~rgarcia/perl-5.6.2/pod/perllexwarn.pod
+ no warnings qw( redefine prototype );
+ 
++sub load_module {
++    my @names = @_;
++    my $module;
++    for my $name (@names) {
++        my $file = $name;
++        # requires need either a bare word or a file name
++        $file =~ s{::}{/}gsxm;
++        $file .= '.pm';
++        eval {
++            require $file;
++            $name->import();
++            $module = $name;
++		};
++		last if $module;
++    }
++    return $module;
++}
++
++my $plugin_module;
++
+ BEGIN {
+ 
+     # use Opsview libs
+     use lib '/usr/local/nagios/perl/lib';
+     use lib '/usr/local/nagios/lib';
+ 
+-    use Nagios::Plugin;
++    $plugin_module = load_module( 'Monitoring::Plugin', 'Nagios::Plugin' );
+ 
+     use Data::Dumper;
+ 
+@@ -95,7 +115,7 @@
+ This plugin was written at The Harvard-MIT Data Center
+ (http://www.hmdc.harvard.edu) by Steve Huff (<shuff\@hmdc.harvard.edu>).
+ LICENSE
+-my( $plugin ) = Nagios::Plugin->new( 
++my( $plugin ) = $plugin_module->new(
+                                     shortname   => 'check_cups',
+                                     usage       => $usagemsg,
+                                     version     => '0.2',
-- 
cgit v1.2.3