Monitoring/MyMonPlugins
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Nagios::Plugin::JUNOS: Check, if configure() has been called.

Browse source
This commit is contained in:
Sebastian Harl 2012-01-03 08:05:21 +01:00
parent 39111edfe3
commit f4fdf36e4e
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
perl/lib/Nagios/Plugin/JUNOS.pm
View file

@ -33,6 +33,8 @@
package Nagios::Plugin::JUNOS; package Nagios::Plugin::JUNOS;
use Carp;
use POSIX qw( :termios_h ); use POSIX qw( :termios_h );
use Nagios::Plugin; use Nagios::Plugin;
@ -193,6 +195,10 @@ sub set_checks
my $err_str = "ERROR:"; my $err_str = "ERROR:";
if (! defined($self->{'conf'}->{'timeout'})) {
croak "No timeout set -- did you call configure()?";
}
if (scalar(@checks) == 0) { if (scalar(@checks) == 0) {
$self->{'conf'}->{'checks'}[0] = { $self->{'conf'}->{'checks'}[0] = {
name => $default, name => $default,
@ -233,6 +239,10 @@ sub connect
my $host = $self->{'conf'}->{'host'}; my $host = $self->{'conf'}->{'host'};
my $user = $self->{'conf'}->{'user'}; my $user = $self->{'conf'}->{'user'};
if ((! $host) || (! $user)) {
croak "Host and/or user not set -- did you call configure()?";
}
if (! $self->opts->password) { if (! $self->opts->password) {
my $term = POSIX::Termios->new(); my $term = POSIX::Termios->new();
my $lflag; my $lflag;