diff options
| author | Thomas Guyot-Sionnest <dermoth@aei.ca> | 2014-01-21 07:59:07 -0500 |
|---|---|---|
| committer | Thomas Guyot-Sionnest <dermoth@aei.ca> | 2014-01-21 07:59:07 -0500 |
| commit | 11cf54ca78185d820085a476cdbf7d8f9149c292 (patch) | |
| tree | f91c77af08f3bbe60be2a1a699033ad7eda27ba2 /plugins-scripts/check_ircd.pl | |
| parent | 66544851f7a4f5eeaf86d1cee8b1f54c76f98433 (diff) | |
| parent | 6141cfebf6c42873e0181105d2051143d8c11eb7 (diff) | |
| download | monitoring-plugins-11cf54ca78185d820085a476cdbf7d8f9149c292.tar.gz | |
Merge branch 'rename'
Diffstat (limited to 'plugins-scripts/check_ircd.pl')
| -rwxr-xr-x | plugins-scripts/check_ircd.pl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/plugins-scripts/check_ircd.pl b/plugins-scripts/check_ircd.pl index 42a9bca9..7612a0ef 100755 --- a/plugins-scripts/check_ircd.pl +++ b/plugins-scripts/check_ircd.pl | |||
| @@ -16,8 +16,6 @@ | |||
| 16 | # ----------------------------------------------------------------------------- | 16 | # ----------------------------------------------------------------------------- |
| 17 | # Copyright 1999 (c) Richard Mayhew | 17 | # Copyright 1999 (c) Richard Mayhew |
| 18 | # | 18 | # |
| 19 | # Credits go to Ethan Galstad for coding Nagios | ||
| 20 | # | ||
| 21 | # If any changes are made to this script, please mail me a copy of the | 19 | # If any changes are made to this script, please mail me a copy of the |
| 22 | # changes :) | 20 | # changes :) |
| 23 | # | 21 | # |
| @@ -121,7 +119,7 @@ sub print_help () | |||
| 121 | print_revision($PROGNAME,'@NP_VERSION@'); | 119 | print_revision($PROGNAME,'@NP_VERSION@'); |
| 122 | print "Copyright (c) 2000 Richard Mayhew/Karl DeBisschop | 120 | print "Copyright (c) 2000 Richard Mayhew/Karl DeBisschop |
| 123 | 121 | ||
| 124 | Perl Check IRCD plugin for Nagios | 122 | Perl Check IRCD plugin for monitoring |
| 125 | 123 | ||
| 126 | "; | 124 | "; |
| 127 | print_usage(); | 125 | print_usage(); |
| @@ -205,7 +203,7 @@ MAIN: | |||
| 205 | 203 | ||
| 206 | if ($opt_t && $opt_t =~ /^([0-9]+)$/) { $TIMEOUT = $1; } | 204 | if ($opt_t && $opt_t =~ /^([0-9]+)$/) { $TIMEOUT = $1; } |
| 207 | 205 | ||
| 208 | # Just in case of problems, let's not hang Nagios | 206 | # Just in case of problems, let's not hang the monitoring system |
| 209 | $SIG{'ALRM'} = sub { | 207 | $SIG{'ALRM'} = sub { |
| 210 | print "Somthing is Taking a Long Time, Increase Your TIMEOUT (Currently Set At $TIMEOUT Seconds)\n"; | 208 | print "Somthing is Taking a Long Time, Increase Your TIMEOUT (Currently Set At $TIMEOUT Seconds)\n"; |
| 211 | exit $ERRORS{"UNKNOWN"}; | 209 | exit $ERRORS{"UNKNOWN"}; |
