diff --git a/apps/hyperv/2012/local/mode/nodeintegrationservice.pm b/apps/hyperv/2012/local/mode/nodeintegrationservice.pm index 14771f6f0..49042c056 100644 --- a/apps/hyperv/2012/local/mode/nodeintegrationservice.pm +++ b/apps/hyperv/2012/local/mode/nodeintegrationservice.pm @@ -38,11 +38,13 @@ sub custom_status_threshold { local $SIG{__WARN__} = sub { $message = $_[0]; }; local $SIG{__DIE__} = sub { $message = $_[0]; }; - if (defined($instance_mode->{option_results}->{critical_status}) && $instance_mode->{option_results}->{critical_status} ne '' && - eval "$instance_mode->{option_results}->{critical_status}") { + my $label = $self->{label}; + $label =~ s/-/_/g; + if (defined($instance_mode->{option_results}->{'critical_' . $label}) && $instance_mode->{option_results}->{'critical_' . $label} ne '' && + eval "$instance_mode->{option_results}->{'critical_' . $label}") { $status = 'critical'; - } elsif (defined($instance_mode->{option_results}->{warning_status}) && $instance_mode->{option_results}->{warning_status} ne '' && - eval "$instance_mode->{option_results}->{warning_status}") { + } elsif (defined($instance_mode->{option_results}->{'warning_' . $label}) && $instance_mode->{option_results}->{'warning_' . $label} ne '' && + eval "$instance_mode->{option_results}->{'warning_' . $label}") { $status = 'warning'; } }; @@ -53,14 +55,14 @@ sub custom_status_threshold { return $status; } -sub custom_status_output { +sub custom_service_status_output { my ($self, %options) = @_; my $msg = 'status : ' . $self->{result_values}->{primary_status} . '/' . $self->{result_values}->{secondary_status}; return $msg; } -sub custom_status_calc { +sub custom_service_status_calc { my ($self, %options) = @_; $self->{result_values}->{primary_status} = $options{new_datas}->{$self->{instance} . '_primary_status'}; @@ -70,20 +72,48 @@ sub custom_status_calc { return 0; } +sub custom_global_status_output { + my ($self, %options) = @_; + my $msg = 'state/version : ' . $self->{result_values}->{integration_service_state} . '/' . $self->{result_values}->{integration_service_version}; + + return $msg; +} + +sub custom_global_status_calc { + my ($self, %options) = @_; + + $self->{result_values}->{integration_service_state} = $options{new_datas}->{$self->{instance} . '_integration_service_state'}; + $self->{result_values}->{integration_service_version} = $options{new_datas}->{$self->{instance} . '_integration_service_version'}; + $self->{result_values}->{vm} = $options{new_datas}->{$self->{instance} . '_vm'}; + $self->{result_values}->{state} = $options{new_datas}->{$self->{instance} . '_state'}; + return 0; +} + sub set_counters { my ($self, %options) = @_; $self->{maps_counters_type} = [ { name => 'vm', type => 2, cb_prefix_output => 'prefix_vm_output', cb_long_output => 'vm_long_output', message_multiple => 'All integration services are ok', - group => [ { name => 'service', cb_prefix_output => 'prefix_service_output' } ] + group => [ { name => 'global', cb_prefix_output => 'prefix_global_output' }, { name => 'service', cb_prefix_output => 'prefix_service_output' } ] } ]; + $self->{maps_counters}->{global} = [ + { label => 'global-status', threshold => 0, set => { + key_values => [ { name => 'integration_service_state' }, { name => 'integration_service_version' }, { name => 'state' }, { name => 'vm' } ], + closure_custom_calc => $self->can('custom_global_status_calc'), + closure_custom_output => $self->can('custom_global_status_output'), + closure_custom_perfdata => sub { return 0; }, + closure_custom_threshold_check => $self->can('custom_status_threshold'), + } + }, + ]; + $self->{maps_counters}->{service} = [ - { label => 'status', threshold => 0, set => { - key_values => [ { name => 'primary_status' }, { name => 'secondary_status' }, { name => 'vm' }, { name => 'service' } ], - closure_custom_calc => $self->can('custom_status_calc'), - closure_custom_output => $self->can('custom_status_output'), + { label => 'service-status', threshold => 0, set => { + key_values => [ { name => 'primary_status' }, { name => 'secondary_status' }, { name => 'enabled' }, { name => 'vm' }, { name => 'service' } ], + closure_custom_calc => $self->can('custom_service_status_calc'), + closure_custom_output => $self->can('custom_service_status_output'), closure_custom_perfdata => sub { return 0; }, closure_custom_threshold_check => $self->can('custom_status_threshold'), } @@ -94,7 +124,7 @@ sub set_counters { sub vm_long_output { my ($self, %options) = @_; - return "checking policy '" . $options{instance_value}->{display} . "'"; + return "checking virtual machine '" . $options{instance_value}->{display} . "'"; } sub prefix_vm_output { @@ -109,6 +139,12 @@ sub prefix_service_output { return "integration service '" . $options{instance_value}->{service} . "' "; } +sub prefix_global_output { + my ($self, %options) = @_; + + return "global virtual machine '" . $options{instance_value}->{vm} . "' integration service "; +} + sub new { my ($class, %options) = @_; my $self = $class->SUPER::new(package => __PACKAGE__, %options); @@ -125,8 +161,10 @@ sub new { "ps-exec-only" => { name => 'ps_exec_only' }, "filter-vm:s" => { name => 'filter_vm' }, "filter-status:s" => { name => 'filter_status', default => 'running' }, - "warning-status:s" => { name => 'warning_status', default => '' }, - "critical-status:s" => { name => 'critical_status', default => '%{primary_status} !~ /Ok/i' }, + "warning-global-status:s" => { name => 'warning_global_status', default => '%{integration_service_state} =~ /Update required/i' }, + "critical-global-status:s" => { name => 'critical_global_status', default => '' }, + "warning-service-status:s" => { name => 'warning_service_status', default => '' }, + "critical-service-status:s" => { name => 'critical_service_status', default => '%{primary_status} !~ /Ok/i' }, }); return $self; } @@ -142,7 +180,7 @@ sub check_options { sub change_macros { my ($self, %options) = @_; - foreach (('warning_status', 'critical_status')) { + foreach (('warning_service_status', 'critical_service_status', 'warning_global_status', 'critical_global_status')) { if (defined($self->{option_results}->{$_})) { $self->{option_results}->{$_} =~ s/%\{(.*?)\}/\$self->{result_values}->{$1}/g; } @@ -167,29 +205,23 @@ sub manage_selection { $self->{output}->exit(); } - #[name= test1 ][state= Running ] - #[service= Time Synchronization ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Heartbeat ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Key-Value Pair Exchange ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Shutdown ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= VSS ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Guest Service Interface ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[service= Time Synchronization ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[service= Heartbeat ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= Ok ] - #[service= Key-Value Pair Exchange ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[service= Shutdown ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[service= VSS ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[service= Guest Service Interface ][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] - #[name= test2 ][state= Running ] - #[service= Time Synchronization ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Heartbeat ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Key-Value Pair Exchange ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] - #[service= Shutdown ][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[name= test1 ][state= Running ][IntegrationServicesState= Update required ][IntegrationServicesVersion= 3.1 ] + #[service= Time Synchronization ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Heartbeat ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Key-Value Pair Exchange ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Shutdown ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= VSS ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Guest Service Interface ][enabled= False][primaryOperationalStatus= Ok ][secondaryOperationalStatus= ] + #[name= test2 ][state= Running ][IntegrationServicesState= ][IntegrationServicesVersion= ] + #[service= Time Synchronization ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Heartbeat ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Key-Value Pair Exchange ][enabled= True][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] + #[service= Shutdown ][enabled= False][primaryOperationalStatus= NoContact ][secondaryOperationalStatus= ] $self->{vm} = {}; my $id = 1; - while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[state=\s*(.*?)\s*\](.*?)(?=\[name=|\z)/msig) { - my ($name, $status, $content) = ($1, $2, $3); + while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[state=\s*(.*?)\s*\]\[IntegrationServicesState=\s*(.*?)\s*\]\[IntegrationServicesVersion=\s*(.*?)\s*\](.*?)(?=\[name=|\z)/msig) { + my ($name, $status, $integration_service_state, $integration_service_version, $content) = ($1, $2, $3, $4, $5); if (defined($self->{option_results}->{filter_vm}) && $self->{option_results}->{filter_vm} ne '' && $name !~ /$self->{option_results}->{filter_vm}/i) { @@ -202,10 +234,13 @@ sub manage_selection { next; } - $self->{vm}->{$id} = { display => $name, service => {} }; + $self->{vm}->{$id} = { display => $name, vm => $name, service => {} }; + $self->{vm}->{$id}->{global} = { + $name => { vm => $name, integration_service_state => $integration_service_state, integration_service_version => $integration_service_version, state => $status } + }; my $id2 = 1; - while ($content =~ /^\[service=\s*(.*?)\s*\]\[primaryOperationalStatus=\s*(.*?)\s*\]\[secondaryOperationalStatus=\s*(.*?)\s*\]/msig) { - $self->{vm}->{$id}->{service}->{$id2} = { vm => $name, service => $1, primary_status => $2, secondary_status => $3 }; + while ($content =~ /^\[service=\s*(.*?)\s*\]\[enabled=\s*(.*?)\s*\]\[primaryOperationalStatus=\s*(.*?)\s*\]\[secondaryOperationalStatus=\s*(.*?)\s*\]/msig) { + $self->{vm}->{$id}->{service}->{$id2} = { vm => $name, service => $1, enabled => $2, primary_status => $3, secondary_status => $4 }; $id2++; } @@ -256,15 +291,27 @@ Filter virtual machine status (can be a regexp) (Default: 'running'). Filter virtual machines (can be a regexp). -=item B<--warning-status> +=item B<--warning-global-status> + +Set warning threshold for status (Default: '%{integration_service_state} =~ /Update required/i'). +Can used special variables like: %{vm}, %{integration_service_state}, +%{integration_service_version}, %{state} + +=item B<--critical-global-status> + +Set critical threshold for status (Default: ''). +Can used special variables like: %{vm}, %{integration_service_state}, +%{integration_service_version}, %{state} + +=item B<--warning-service-status> Set warning threshold for status (Default: ''). -Can used special variables like: %{vm}, %{service}, %{primary_status}, %{secondary_status} +Can used special variables like: %{vm}, %{service}, %{primary_status}, %{secondary_status}, %{enabled} -=item B<--critical-status> +=item B<--critical-service-status> Set critical threshold for status (Default: '%{primary_status} !~ /Ok/i'). -Can used special variables like: %{vm}, %{service}, %{primary_status}, %{secondary_status} +Can used special variables like: %{vm}, %{service}, %{primary_status}, %{secondary_status}, %{enabled} =back diff --git a/apps/hyperv/2012/local/mode/nodereplication.pm b/apps/hyperv/2012/local/mode/nodereplication.pm new file mode 100644 index 000000000..53ebe6f9f --- /dev/null +++ b/apps/hyperv/2012/local/mode/nodereplication.pm @@ -0,0 +1,224 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package apps::hyperv::2012::local::mode::nodereplication; + +use base qw(centreon::plugins::templates::counter); + +use strict; +use warnings; +use centreon::plugins::misc; +use centreon::common::powershell::hyperv::2012::nodereplication; + +my $instance_mode; + +sub custom_status_threshold { + my ($self, %options) = @_; + my $status = 'ok'; + my $message; + + eval { + local $SIG{__WARN__} = sub { $message = $_[0]; }; + local $SIG{__DIE__} = sub { $message = $_[0]; }; + + if (defined($instance_mode->{option_results}->{critical_status}) && $instance_mode->{option_results}->{critical_status} ne '' && + eval "$instance_mode->{option_results}->{critical_status}") { + $status = 'critical'; + } elsif (defined($instance_mode->{option_results}->{warning_status}) && $instance_mode->{option_results}->{warning_status} ne '' && + eval "$instance_mode->{option_results}->{warning_status}") { + $status = 'warning'; + } + }; + if (defined($message)) { + $self->{output}->output_add(long_msg => 'filter status issue: ' . $message); + } + + return $status; +} + +sub custom_status_output { + my ($self, %options) = @_; + + my $msg = 'replication health : ' . $self->{result_values}->{health}; + return $msg; +} + +sub custom_status_calc { + my ($self, %options) = @_; + + $self->{result_values}->{vm} = $options{new_datas}->{$self->{instance} . '_vm'}; + $self->{result_values}->{state} = $options{new_datas}->{$self->{instance} . '_state'}; + $self->{result_values}->{health} = $options{new_datas}->{$self->{instance} . '_health'}; + return 0; +} + +sub set_counters { + my ($self, %options) = @_; + + $self->{maps_counters_type} = [ + { name => 'vm', type => 1, cb_prefix_output => 'prefix_vm_output', message_multiple => 'All virtual machines are ok' }, + ]; + $self->{maps_counters}->{vm} = [ + { label => 'status', threshold => 0, set => { + key_values => [ { name => 'vm' }, { name => 'state' }, { name => 'health' } ], + closure_custom_calc => $self->can('custom_status_calc'), + closure_custom_output => $self->can('custom_status_output'), + closure_custom_perfdata => sub { return 0; }, + closure_custom_threshold_check => $self->can('custom_status_threshold'), + } + }, + ]; +} + +sub prefix_vm_output { + my ($self, %options) = @_; + + return "VM '" . $options{instance_value}->{vm} . "' "; +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "timeout:s" => { name => 'timeout', default => 50 }, + "command:s" => { name => 'command', default => 'powershell.exe' }, + "command-path:s" => { name => 'command_path' }, + "command-options:s" => { name => 'command_options', default => '-InputFormat none -NoLogo -EncodedCommand' }, + "no-ps" => { name => 'no_ps' }, + "ps-exec-only" => { name => 'ps_exec_only' }, + "filter-vm:s" => { name => 'filter_vm' }, + "warning-status:s" => { name => 'warning_status', default => '%{health} =~ /Warning/i' }, + "critical-status:s" => { name => 'critical_status', default => '%{health} =~ /Critical/i' }, + }); + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::check_options(%options); + + $instance_mode = $self; + $self->change_macros(); +} + +sub change_macros { + my ($self, %options) = @_; + + foreach (('warning_status', 'critical_status')) { + if (defined($self->{option_results}->{$_})) { + $self->{option_results}->{$_} =~ s/%\{(.*?)\}/\$self->{result_values}->{$1}/g; + } + } +} + +sub manage_selection { + my ($self, %options) = @_; + + my $ps = centreon::common::powershell::hyperv::2012::nodereplication::get_powershell(no_ps => $self->{option_results}->{no_ps}); + + $self->{option_results}->{command_options} .= " " . $ps; + my ($stdout) = centreon::plugins::misc::execute(output => $self->{output}, + options => $self->{option_results}, + command => $self->{option_results}->{command}, + command_path => $self->{option_results}->{command_path}, + command_options => $self->{option_results}->{command_options}); + if (defined($self->{option_results}->{ps_exec_only})) { + $self->{output}->output_add(severity => 'OK', + short_msg => $stdout); + $self->{output}->display(nolabel => 1, force_ignore_perfdata => 1, force_long_output => 1); + $self->{output}->exit(); + } + + #[name= XXXX1 ][state= Running ][health= Critical ] + #[name= XXXX2 ][state= Running ][health= Normal ] + #[name= XXXX3 ][state= Running ][health= Warning ] + $self->{vm} = {}; + + my $id = 1; + while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[state=\s*(.*?)\s*\]\[health=\s*(.*?)\s*\].*?(?=\[name=|\z)/msig) { + my ($name, $status, $health) = ($1, $2, $3); + + if (defined($self->{option_results}->{filter_vm}) && $self->{option_results}->{filter_vm} ne '' && + $name !~ /$self->{option_results}->{filter_vm}/i) { + $self->{output}->output_add(long_msg => "skipping '" . $name . "': no matching filter.", debug => 1); + next; + } + + $self->{vm}->{$id} = { display => $name, vm => $name, state => $status, health => $health }; + $id++; + } +} + +1; + +__END__ + +=head1 MODE + +Check virtual machine replication on hyper-v node. + +=over 8 + +=item B<--timeout> + +Set timeout time for command execution (Default: 50 sec) + +=item B<--no-ps> + +Don't encode powershell. To be used with --command and 'type' command. + +=item B<--command> + +Command to get information (Default: 'powershell.exe'). +Can be changed if you have output in a file. To be used with --no-ps option!!! + +=item B<--command-path> + +Command path (Default: none). + +=item B<--command-options> + +Command options (Default: '-InputFormat none -NoLogo -EncodedCommand'). + +=item B<--ps-exec-only> + +Print powershell output. + +=item B<--filter-vm> + +Filter virtual machines (can be a regexp). + +=item B<--warning-status> + +Set warning threshold for status (Default: '%{health} =~ /Warning/i'). +Can used special variables like: %{vm}, %{state}, %{health} + +=item B<--critical-status> + +Set critical threshold for status (Default: '%{health} =~ /Critical/i'). +Can used special variables like: %{vm}, %{state}, %{health} + +=back + +=cut \ No newline at end of file diff --git a/apps/hyperv/2012/local/mode/nodevmstatus.pm b/apps/hyperv/2012/local/mode/nodevmstatus.pm new file mode 100644 index 000000000..4749f4cfe --- /dev/null +++ b/apps/hyperv/2012/local/mode/nodevmstatus.pm @@ -0,0 +1,225 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package apps::hyperv::2012::local::mode::nodevmstatus; + +use base qw(centreon::plugins::templates::counter); + +use strict; +use warnings; +use centreon::plugins::misc; +use centreon::common::powershell::hyperv::2012::nodevmstatus; + +my $instance_mode; + +sub custom_status_threshold { + my ($self, %options) = @_; + my $status = 'ok'; + my $message; + + eval { + local $SIG{__WARN__} = sub { $message = $_[0]; }; + local $SIG{__DIE__} = sub { $message = $_[0]; }; + + if (defined($instance_mode->{option_results}->{critical_status}) && $instance_mode->{option_results}->{critical_status} ne '' && + eval "$instance_mode->{option_results}->{critical_status}") { + $status = 'critical'; + } elsif (defined($instance_mode->{option_results}->{warning_status}) && $instance_mode->{option_results}->{warning_status} ne '' && + eval "$instance_mode->{option_results}->{warning_status}") { + $status = 'warning'; + } + }; + if (defined($message)) { + $self->{output}->output_add(long_msg => 'filter status issue: ' . $message); + } + + return $status; +} + +sub custom_status_output { + my ($self, %options) = @_; + + my $msg = 'status : ' . $self->{result_values}->{status} . " (state: " . $self->{result_values}->{state} . ", is clustered: " . $self->{result_values}->{is_clustered} . ")"; + return $msg; +} + +sub custom_status_calc { + my ($self, %options) = @_; + + $self->{result_values}->{vm} = $options{new_datas}->{$self->{instance} . '_vm'}; + $self->{result_values}->{state} = $options{new_datas}->{$self->{instance} . '_state'}; + $self->{result_values}->{status} = $options{new_datas}->{$self->{instance} . '_status'}; + $self->{result_values}->{is_clustered} = $options{new_datas}->{$self->{instance} . '_is_clustered'}; + return 0; +} + +sub set_counters { + my ($self, %options) = @_; + + $self->{maps_counters_type} = [ + { name => 'vm', type => 1, cb_prefix_output => 'prefix_vm_output', message_multiple => 'All virtual machines are ok' }, + ]; + $self->{maps_counters}->{vm} = [ + { label => 'status', threshold => 0, set => { + key_values => [ { name => 'vm' }, { name => 'state' }, { name => 'status' }, { name => 'is_clustered' } ], + closure_custom_calc => $self->can('custom_status_calc'), + closure_custom_output => $self->can('custom_status_output'), + closure_custom_perfdata => sub { return 0; }, + closure_custom_threshold_check => $self->can('custom_status_threshold'), + } + }, + ]; +} + +sub prefix_vm_output { + my ($self, %options) = @_; + + return "VM '" . $options{instance_value}->{vm} . "' "; +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "timeout:s" => { name => 'timeout', default => 50 }, + "command:s" => { name => 'command', default => 'powershell.exe' }, + "command-path:s" => { name => 'command_path' }, + "command-options:s" => { name => 'command_options', default => '-InputFormat none -NoLogo -EncodedCommand' }, + "no-ps" => { name => 'no_ps' }, + "ps-exec-only" => { name => 'ps_exec_only' }, + "filter-vm:s" => { name => 'filter_vm' }, + "warning-status:s" => { name => 'warning_status', default => '' }, + "critical-status:s" => { name => 'critical_status', default => '%{status} !~ /Operating normally/i' }, + }); + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::check_options(%options); + + $instance_mode = $self; + $self->change_macros(); +} + +sub change_macros { + my ($self, %options) = @_; + + foreach (('warning_status', 'critical_status')) { + if (defined($self->{option_results}->{$_})) { + $self->{option_results}->{$_} =~ s/%\{(.*?)\}/\$self->{result_values}->{$1}/g; + } + } +} + +sub manage_selection { + my ($self, %options) = @_; + + my $ps = centreon::common::powershell::hyperv::2012::nodevmstatus::get_powershell(no_ps => $self->{option_results}->{no_ps}); + + $self->{option_results}->{command_options} .= " " . $ps; + my ($stdout) = centreon::plugins::misc::execute(output => $self->{output}, + options => $self->{option_results}, + command => $self->{option_results}->{command}, + command_path => $self->{option_results}->{command_path}, + command_options => $self->{option_results}->{command_options}); + if (defined($self->{option_results}->{ps_exec_only})) { + $self->{output}->output_add(severity => 'OK', + short_msg => $stdout); + $self->{output}->display(nolabel => 1, force_ignore_perfdata => 1, force_long_output => 1); + $self->{output}->exit(); + } + + #[name= XXXX1 ][state= Running ][status= Operating normally ][IsClustered= True ] + #[name= XXXX2 ][state= Running ][status= Operating normally ][IsClustered= False ] + #[name= XXXX3 ][state= Running ][status= Operating normally ][IsClustered= False ] + $self->{vm} = {}; + + my $id = 1; + while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[state=\s*(.*?)\s*\]\[status=\s*(.*?)\s*\]\[IsClustered=\s*(.*?)\s*\].*?(?=\[name=|\z)/msig) { + my ($name, $state, $status, $is_clustered) = ($1, $2, $3, $4); + + if (defined($self->{option_results}->{filter_vm}) && $self->{option_results}->{filter_vm} ne '' && + $name !~ /$self->{option_results}->{filter_vm}/i) { + $self->{output}->output_add(long_msg => "skipping '" . $name . "': no matching filter.", debug => 1); + next; + } + + $self->{vm}->{$id} = { display => $name, vm => $name, status => $status, state => $state, is_clustered => $is_clustered }; + $id++; + } +} + +1; + +__END__ + +=head1 MODE + +Check virtual machine status on hyper-v node. + +=over 8 + +=item B<--timeout> + +Set timeout time for command execution (Default: 50 sec) + +=item B<--no-ps> + +Don't encode powershell. To be used with --command and 'type' command. + +=item B<--command> + +Command to get information (Default: 'powershell.exe'). +Can be changed if you have output in a file. To be used with --no-ps option!!! + +=item B<--command-path> + +Command path (Default: none). + +=item B<--command-options> + +Command options (Default: '-InputFormat none -NoLogo -EncodedCommand'). + +=item B<--ps-exec-only> + +Print powershell output. + +=item B<--filter-vm> + +Filter virtual machines (can be a regexp). + +=item B<--warning-status> + +Set warning threshold for status (Default: ''). +Can used special variables like: %{vm}, %{state}, %{status}, %{is_clustered} + +=item B<--critical-status> + +Set critical threshold for status (Default: '%{status} !~ /Operating normally/i'). +Can used special variables like: %{vm}, %{state}, %{status}, %{is_clustered} + +=back + +=cut \ No newline at end of file diff --git a/apps/hyperv/2012/local/mode/scvmmintegrationservice.pm b/apps/hyperv/2012/local/mode/scvmmintegrationservice.pm index 7528386b6..e7c6a78a5 100644 --- a/apps/hyperv/2012/local/mode/scvmmintegrationservice.pm +++ b/apps/hyperv/2012/local/mode/scvmmintegrationservice.pm @@ -181,6 +181,7 @@ sub manage_selection { while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[description=\s*(.*?)\s*\]\[status=\s*(.*?)\s*\]\[cloud=\s*(.*?)\s*\]\[hostgrouppath=\s*(.*?)\s*\]\[VMAddition=\s*(.*?)\s*\]/msig) { my %values = (vm => $1, description => $2, status => $3, cloud => $4, hostgroup => $5, vmaddition => $6); + $values{hostgroup} =~ s/\\/\//g; foreach (('name', 'description', 'status', 'hostgroup')) { if (defined($self->{option_results}->{'filter_' . $_}) && $self->{option_results}->{'filter_' . $_} ne '' && $values{$_} !~ /$self->{option_results}->{'filter_' . $_}/i) { diff --git a/apps/hyperv/2012/local/mode/scvmmsnapshot.pm b/apps/hyperv/2012/local/mode/scvmmsnapshot.pm index 7e2b7f2bc..16db4947b 100644 --- a/apps/hyperv/2012/local/mode/scvmmsnapshot.pm +++ b/apps/hyperv/2012/local/mode/scvmmsnapshot.pm @@ -92,7 +92,7 @@ sub check_options { $self->{output}->add_option_msg(short_msg => "Need to specify --" . $label_opt . " option."); $self->{output}->option_exit(); } - } + } } sub manage_selection { @@ -131,6 +131,7 @@ sub manage_selection { } next if ($chkpt == -1); + $hg =~ s/\\/\//g; if (defined($self->{option_results}->{filter_vm}) && $self->{option_results}->{filter_vm} ne '' && $name !~ /$self->{option_results}->{filter_vm}/i) { $self->{output}->output_add(long_msg => "skipping '" . $name . "': no matching filter.", debug => 1); diff --git a/apps/hyperv/2012/local/mode/scvmmvmstatus.pm b/apps/hyperv/2012/local/mode/scvmmvmstatus.pm new file mode 100644 index 000000000..bcfa068ec --- /dev/null +++ b/apps/hyperv/2012/local/mode/scvmmvmstatus.pm @@ -0,0 +1,267 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package apps::hyperv::2012::local::mode::scvmmvmstatus; + +use base qw(centreon::plugins::templates::counter); + +use strict; +use warnings; +use centreon::plugins::misc; +use centreon::common::powershell::hyperv::2012::scvmmvmstatus; + +my $instance_mode; + +sub custom_status_threshold { + my ($self, %options) = @_; + my $status = 'ok'; + my $message; + + eval { + local $SIG{__WARN__} = sub { $message = $_[0]; }; + local $SIG{__DIE__} = sub { $message = $_[0]; }; + + if (defined($instance_mode->{option_results}->{critical_status}) && $instance_mode->{option_results}->{critical_status} ne '' && + eval "$instance_mode->{option_results}->{critical_status}") { + $status = 'critical'; + } elsif (defined($instance_mode->{option_results}->{warning_status}) && $instance_mode->{option_results}->{warning_status} ne '' && + eval "$instance_mode->{option_results}->{warning_status}") { + $status = 'warning'; + } + }; + if (defined($message)) { + $self->{output}->output_add(long_msg => 'filter status issue: ' . $message); + } + + return $status; +} + +sub custom_status_output { + my ($self, %options) = @_; + + my $msg = 'status : ' . $self->{result_values}->{status}; + return $msg; +} + +sub custom_status_calc { + my ($self, %options) = @_; + + $self->{result_values}->{vm} = $options{new_datas}->{$self->{instance} . '_vm'}; + $self->{result_values}->{status} = $options{new_datas}->{$self->{instance} . '_status'}; + $self->{result_values}->{hostgroup} = $options{new_datas}->{$self->{instance} . '_hostgroup'}; + return 0; +} + +sub set_counters { + my ($self, %options) = @_; + + $self->{maps_counters_type} = [ + { name => 'vm', type => 1, cb_prefix_output => 'prefix_vm_output', message_multiple => 'All virtual machines are ok' }, + ]; + $self->{maps_counters}->{vm} = [ + { label => 'status', threshold => 0, set => { + key_values => [ { name => 'vm' }, { name => 'hostgroup' }, { name => 'status' } ], + closure_custom_calc => $self->can('custom_status_calc'), + closure_custom_output => $self->can('custom_status_output'), + closure_custom_perfdata => sub { return 0; }, + closure_custom_threshold_check => $self->can('custom_status_threshold'), + } + }, + ]; +} + +sub prefix_vm_output { + my ($self, %options) = @_; + + return "VM '" . $options{instance_value}->{vm} . "' "; +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "scvmm-hostname:s" => { name => 'scvmm_hostname' }, + "scvmm-username:s" => { name => 'scvmm_username' }, + "scvmm-password:s" => { name => 'scvmm_password' }, + "scvmm-port:s" => { name => 'scvmm_port', default => 8100 }, + "timeout:s" => { name => 'timeout', default => 50 }, + "command:s" => { name => 'command', default => 'powershell.exe' }, + "command-path:s" => { name => 'command_path' }, + "command-options:s" => { name => 'command_options', default => '-InputFormat none -NoLogo -EncodedCommand' }, + "no-ps" => { name => 'no_ps' }, + "ps-exec-only" => { name => 'ps_exec_only' }, + "filter-vm:s" => { name => 'filter_vm' }, + "filter-hostgroup:s" => { name => 'filter_hostgroup' }, + "warning-status:s" => { name => 'warning_status', default => '' }, + "critical-status:s" => { name => 'critical_status', default => '%{status} !~ /Running|Stopped/i' }, + }); + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::check_options(%options); + + foreach my $label (('scvmm_hostname', 'scvmm_username', 'scvmm_password', 'scvmm_port')) { + if (!defined($self->{option_results}->{$label}) || $self->{option_results}->{$label} eq '') { + my ($label_opt) = $label; + $label_opt =~ tr/_/-/; + $self->{output}->add_option_msg(short_msg => "Need to specify --" . $label_opt . " option."); + $self->{output}->option_exit(); + } + } + $instance_mode = $self; + $self->change_macros(); +} + +sub change_macros { + my ($self, %options) = @_; + + foreach (('warning_status', 'critical_status')) { + if (defined($self->{option_results}->{$_})) { + $self->{option_results}->{$_} =~ s/%\{(.*?)\}/\$self->{result_values}->{$1}/g; + } + } +} + +sub manage_selection { + my ($self, %options) = @_; + + my $ps = centreon::common::powershell::hyperv::2012::scvmmvmstatus::get_powershell( + scvmm_hostname => $self->{option_results}->{scvmm_hostname}, + scvmm_username => $self->{option_results}->{scvmm_username}, + scvmm_password => $self->{option_results}->{scvmm_password}, + scvmm_port => $self->{option_results}->{scvmm_port}, + no_ps => $self->{option_results}->{no_ps}); + + $self->{option_results}->{command_options} .= " " . $ps; + my ($stdout) = centreon::plugins::misc::execute(output => $self->{output}, + options => $self->{option_results}, + command => $self->{option_results}->{command}, + command_path => $self->{option_results}->{command_path}, + command_options => $self->{option_results}->{command_options}); + if (defined($self->{option_results}->{ps_exec_only})) { + $self->{output}->output_add(severity => 'OK', + short_msg => $stdout); + $self->{output}->display(nolabel => 1, force_ignore_perfdata => 1, force_long_output => 1); + $self->{output}->exit(); + } + + #[name= test-server ][status= Running ][cloud= ][hostgrouppath= All Hosts\CORP\Test\test-server ] + #[name= test-server2 ][status= Running ][cloud= ][hostgrouppath= All Hosts\CORP\Test\test-server2 ] + $self->{vm} = {}; + + my $id = 1; + while ($stdout =~ /^\[name=\s*(.*?)\s*\]\[status=\s*(.*?)\s*\]\[cloud=\s*(.*?)\s*\]\[hostgrouppath=\s*(.*?)\s*\].*?(?=\[name=|\z)/msig) { + my ($name, $status, $cloud, $hg) = ($1, $2, $3, $4); + + $hg =~ s/\\/\//g; + if (defined($self->{option_results}->{filter_vm}) && $self->{option_results}->{filter_vm} ne '' && + $name !~ /$self->{option_results}->{filter_vm}/i) { + $self->{output}->output_add(long_msg => "skipping '" . $name . "': no matching filter.", debug => 1); + next; + } + if (defined($self->{option_results}->{filter_hostgroup}) && $self->{option_results}->{filter_hostgroup} ne '' && + $hg !~ /$self->{option_results}->{filter_hostgroup}/i) { + $self->{output}->output_add(long_msg => "skipping '" . $hg . "': no matching filter.", debug => 1); + next; + } + + $self->{vm}->{$id} = { display => $name, vm => $name, status => $status, hostgroup => $hg }; + $id++; + } +} + +1; + +__END__ + +=head1 MODE + +Check virtual machine status on SCVMM. + +=over 8 + +=item B<--scvmm-hostname> + +SCVMM hostname (Required). + +=item B<--scvmm-username> + +SCVMM username (Required). + +=item B<--scvmm-password> + +SCVMM password (Required). + +=item B<--scvmm-port> + +SCVMM port (Default: 8100). + +=item B<--timeout> + +Set timeout time for command execution (Default: 50 sec) + +=item B<--no-ps> + +Don't encode powershell. To be used with --command and 'type' command. + +=item B<--command> + +Command to get information (Default: 'powershell.exe'). +Can be changed if you have output in a file. To be used with --no-ps option!!! + +=item B<--command-path> + +Command path (Default: none). + +=item B<--command-options> + +Command options (Default: '-InputFormat none -NoLogo -EncodedCommand'). + +=item B<--ps-exec-only> + +Print powershell output. + +=item B<--filter-vm> + +Filter virtual machines (can be a regexp). + +=item B<--filter-hostgroup> + +Filter hostgroup (can be a regexp). + +=item B<--warning-status> + +Set warning threshold for status (Default: ''). +Can used special variables like: %{vm}, %{status}, %{hostgroup} + +=item B<--critical-status> + +Set critical threshold for status (Default: '%{status} !~ /Running|Stopped/i'). +Can used special variables like: %{vm}, %{status}, %{hostgroup} + +=back + +=cut \ No newline at end of file diff --git a/apps/hyperv/2012/local/plugin.pm b/apps/hyperv/2012/local/plugin.pm index be7e389ed..31eb8492c 100644 --- a/apps/hyperv/2012/local/plugin.pm +++ b/apps/hyperv/2012/local/plugin.pm @@ -33,8 +33,11 @@ sub new { %{$self->{modes}} = ( 'scvmm-integration-service' => 'apps::hyperv::2012::local::mode::scvmmintegrationservice', 'scvmm-snapshot' => 'apps::hyperv::2012::local::mode::scvmmsnapshot', + 'scvmm-vm-status' => 'apps::hyperv::2012::local::mode::scvmmvmstatus', 'node-integration-service' => 'apps::hyperv::2012::local::mode::nodeintegrationservice', + 'node-replication' => 'apps::hyperv::2012::local::mode::nodereplication', 'node-snapshot' => 'apps::hyperv::2012::local::mode::nodesnapshot', + 'node-vm-status' => 'apps::hyperv::2012::local::mode::nodevmstatus', ); return $self; diff --git a/centreon/common/powershell/hyperv/2012/nodeintegrationservice.pm b/centreon/common/powershell/hyperv/2012/nodeintegrationservice.pm index 69b15fa05..e6fcaf461 100644 --- a/centreon/common/powershell/hyperv/2012/nodeintegrationservice.pm +++ b/centreon/common/powershell/hyperv/2012/nodeintegrationservice.pm @@ -39,18 +39,10 @@ Try { $ErrorActionPreference = "Stop" $vms = Get-VM - $services = Get-VMIntegrationService -VMName * - Foreach ($vm in $vms) { - $i = 0 - Foreach ($service in $services) { - if ($service.VMName -eq $vm.VMName) { - if ($i -eq 0) { - Write-Host "[name=" $vm.VMName "][state=" $vm.State "]" - } - Write-Host "[service=" $service.Name "][primaryOperationalStatus=" $service.PrimaryOperationalStatus "][secondaryOperationalStatus=" $service.SecondaryOperationalStatus "]" - $i=1 - } + Write-Host "[name=" $vm.VMName "][state=" $vm.State "][IntegrationServicesState=" $vm.IntegrationServicesState "][IntegrationServicesVersion=" $vm.IntegrationServicesVersion "]" + Foreach ($service in $VM.VMIntegrationService) { + Write-Host "[service=" $service.Name "][enabled=" $service.Enabled "][primaryOperationalStatus=" $service.PrimaryOperationalStatus "][secondaryOperationalStatus=" $service.SecondaryOperationalStatus "]" } } } Catch { diff --git a/centreon/common/powershell/hyperv/2012/nodereplication.pm b/centreon/common/powershell/hyperv/2012/nodereplication.pm new file mode 100644 index 000000000..f7e4a068c --- /dev/null +++ b/centreon/common/powershell/hyperv/2012/nodereplication.pm @@ -0,0 +1,64 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package centreon::common::powershell::hyperv::2012::nodereplication; + +use strict; +use warnings; +use centreon::plugins::misc; + +sub get_powershell { + my (%options) = @_; + my $no_ps = (defined($options{no_ps})) ? 1 : 0; + + return '' if ($no_ps == 1); + + my $ps = ' +$culture = new-object "System.Globalization.CultureInfo" "en-us" +[System.Threading.Thread]::CurrentThread.CurrentUICulture = $culture +$ProgressPreference = "SilentlyContinue" + +Try { + $ErrorActionPreference = "Stop" + $vms = Get-VMReplication + + Foreach ($vm in $vms) { + Write-Host "[name=" $vm.Name "][state=" $vm.State "][health=" $vm.Health "]" + } +} Catch { + Write-Host $Error[0].Exception + exit 1 +} + +exit 0 +'; + + return centreon::plugins::misc::powershell_encoded($ps); +} + +1; + +__END__ + +=head1 DESCRIPTION + +Method to get hyper-v informations. + +=cut \ No newline at end of file diff --git a/centreon/common/powershell/hyperv/2012/nodevmstatus.pm b/centreon/common/powershell/hyperv/2012/nodevmstatus.pm new file mode 100644 index 000000000..7c0c39abc --- /dev/null +++ b/centreon/common/powershell/hyperv/2012/nodevmstatus.pm @@ -0,0 +1,64 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package centreon::common::powershell::hyperv::2012::nodevmstatus; + +use strict; +use warnings; +use centreon::plugins::misc; + +sub get_powershell { + my (%options) = @_; + my $no_ps = (defined($options{no_ps})) ? 1 : 0; + + return '' if ($no_ps == 1); + + my $ps = ' +$culture = new-object "System.Globalization.CultureInfo" "en-us" +[System.Threading.Thread]::CurrentThread.CurrentUICulture = $culture +$ProgressPreference = "SilentlyContinue" + +Try { + $ErrorActionPreference = "Stop" + $vms = Get-VM + + Foreach ($vm in $vms) { + Write-Host "[name=" $vm.VMName "][state=" $vm.State "][status=" $vm.Status "][IsClustered=" $vm.IsClustered "]" + } +} Catch { + Write-Host $Error[0].Exception + exit 1 +} + +exit 0 +'; + + return centreon::plugins::misc::powershell_encoded($ps); +} + +1; + +__END__ + +=head1 DESCRIPTION + +Method to get hyper-v informations. + +=cut \ No newline at end of file diff --git a/centreon/common/powershell/hyperv/2012/scvmmvmstatus.pm b/centreon/common/powershell/hyperv/2012/scvmmvmstatus.pm new file mode 100644 index 000000000..be9ec4c6a --- /dev/null +++ b/centreon/common/powershell/hyperv/2012/scvmmvmstatus.pm @@ -0,0 +1,71 @@ +# +# Copyright 2017 Centreon (http://www.centreon.com/) +# +# Centreon is a full-fledged industry-strength solution that meets +# the needs in IT infrastructure and application monitoring for +# service performance. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# + +package centreon::common::powershell::hyperv::2012::scvmmvmstatus; + +use strict; +use warnings; +use centreon::plugins::misc; + +sub get_powershell { + my (%options) = @_; + my $no_ps = (defined($options{no_ps})) ? 1 : 0; + + return '' if ($no_ps == 1); + + my $ps = ' +$culture = new-object "System.Globalization.CultureInfo" "en-us" +[System.Threading.Thread]::CurrentThread.CurrentUICulture = $culture +$ProgressPreference = "SilentlyContinue" + +Try { + $ErrorActionPreference = "Stop" + Import-Module -Name "virtualmachinemanager" + + $username = "' . $options{scvmm_username} . '" + $password = ConvertTo-SecureString "' . $options{scvmm_password} . '" -AsPlainText -Force + $UserCredential = new-object -typename System.Management.Automation.PSCredential -argumentlist $username,$password + + $connection = Get-VMMServer -ComputerName "' . $options{scvmm_hostname} . '" -TCPPort ' . $options{scvmm_port} . ' -Credential $UserCredential + $vms = Get-SCVirtualMachine -VMMServer $connection + + Foreach ($vm in $vms) { + Write-Host "[name=" $vm.Name "][status=" $vm.Status "][cloud=" $vm.Cloud "][hostgrouppath=" $vm.HostGroupPath "]" + } +} Catch { + Write-Host $Error[0].Exception + exit 1 +} + +exit 0 +'; + + return centreon::plugins::misc::powershell_encoded($ps); +} + +1; + +__END__ + +=head1 DESCRIPTION + +Method to get hyper-v informations. + +=cut \ No newline at end of file