tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

+ Fix perfdatas raising from exchange 2010 mode get-queue

This commit is contained in:
garnier-quentin 2016-01-20 15:24:34 +01:00
parent bc82837251
commit 077307de9c
1 changed files with 14 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
centreon/common/powershell/exchange/2010/queues.pm
View File

@ -63,6 +63,8 @@ sub check {
my $checked = 0;
$self->{output}->output_add(long_msg => $options{stdout});
$self->{perfdatas_queues} = {};
while ($options{stdout} =~ /\[identity=(.*?)\]\[deliverytype=(.*?)\]\[status=(.*?)\]\[isvalid=(.*?)\]\[messagecount=(.*?)\]\[\[error=(.*?)\]\]/msg) {
$self->{data} = {};
($self->{data}->{identity}, $self->{data}->{deliverytype}, $self->{data}->{status}, $self->{data}->{isvalid}, $self->{data}->{messagecount}, $self->{data}->{error}) =
@ -94,12 +96,21 @@ sub check {
}
if ($self->{data}->{messagecount} =~ /^(\d+)/) {
$self->{output}->perfdata_add(label => 'queue_length_' . $self->{data}->{identity},
value => $1,
min => 0);
my $num = $1;
my $identity = $self->{data}->{identity};
$identity = $1 if ($self->{data}->{identity} =~ /^(.*\\)[0-9]+$/);
$self->{perfdatas_queues}->{$identity} = 0 if (!defined($self->{perfdatas_queues}->{$identity}));
$self->{perfdatas_queues}->{$identity} += $num;
}
}
foreach (keys %{$self->{perfdatas_queues}}) {
$self->{output}->perfdata_add(label => 'queue_length_' . $_,
value => $self->{perfdatas_queues}->{$_},
min => 0);
}
if ($checked == 0) {
$self->{output}->output_add(severity => 'UNKNOWN',
short_msg => 'Cannot find informations');