From b463fd599d3230f3cc844e524fb355b44eb5b828 Mon Sep 17 00:00:00 2001 From: qgarnier Date: Wed, 26 May 2021 14:57:42 +0200 Subject: [PATCH] add(plugin): tplink snmp (#2831) --- network/tplink/snmp/mode/cpu.pm | 181 +++++++++++++++++++++++++++++ network/tplink/snmp/mode/memory.pm | 102 ++++++++++++++++ network/tplink/snmp/plugin.pm | 52 +++++++++ 3 files changed, 335 insertions(+) create mode 100644 network/tplink/snmp/mode/cpu.pm create mode 100644 network/tplink/snmp/mode/memory.pm create mode 100644 network/tplink/snmp/plugin.pm diff --git a/network/tplink/snmp/mode/cpu.pm b/network/tplink/snmp/mode/cpu.pm new file mode 100644 index 000000000..b5c63875a --- /dev/null +++ b/network/tplink/snmp/mode/cpu.pm @@ -0,0 +1,181 @@ +# +# Copyright 2021 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 network::tplink::snmp::mode::cpu; + +use base qw(centreon::plugins::templates::counter); + +use strict; +use warnings; + +sub prefix_cpu_avg_output { + my ($self, %options) = @_; + + return $self->{cpu_avg}->{count} . " CPU(s) average usage is "; +} + +sub prefix_cpu_core_output { + my ($self, %options) = @_; + + return "CPU '" . $options{instance_value}->{core_id} . "' usage "; +} + +sub set_counters { + my ($self, %options) = @_; + + $self->{maps_counters_type} = [ + { name => 'cpu_avg', type => 0, cb_prefix_output => 'prefix_cpu_avg_output', message_separator => ' ', skipped_code => { -10 => 1 } }, + { name => 'cpu_core', type => 1, cb_prefix_output => 'prefix_cpu_core_output', message_separator => ' ', message_multiple => 'All core cpu are ok', skipped_code => { -10 => 1 } } + ]; + + $self->{maps_counters}->{cpu_avg} = [ + { label => 'average-5s', nlabel => 'cpu.utilization.5s.percentage', set => { + key_values => [ { name => 'average_5s' } ], + output_template => '%.2f %% (5s)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%' } + ] + } + }, + { label => 'average-1m', nlabel => 'cpu.utilization.1m.percentage', set => { + key_values => [ { name => 'average_1m' } ], + output_template => '%.2f %% (1m)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%' } + ] + } + }, + { label => 'average-5m', nlabel => 'cpu.utilization.5m.percentage', set => { + key_values => [ { name => 'average_5m' } ], + output_template => '%.2f %% (5m)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%' } + ] + } + } + ]; + + $self->{maps_counters}->{cpu_core} = [ + { label => 'core-5s', nlabel => 'core.cpu.utilization.5s.percentage', set => { + key_values => [ { name => 'cpu_5s' } ], + output_template => '%.2f %% (5s)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%', label_extra_instance => 1 } + ] + } + }, + { label => 'core-1m', nlabel => 'core.cpu.utilization.1m.percentage', set => { + key_values => [ { name => 'cpu_1m' } ], + output_template => '%.2f %% (1m)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%', label_extra_instance => 1 } + ] + } + }, + { label => 'core-5m', nlabel => 'core.cpu.utilization.5m.percentage', set => { + key_values => [ { name => 'cpu_5m' } ], + output_template => '%.2f %% (5m)', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%', label_extra_instance => 1 } + ] + } + } + ]; +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options, force_new_perfdata => 1); + bless $self, $class; + + $options{options}->add_options(arguments => { + }); + + return $self; +} + +sub check_cpu_average { + my ($self, %options) = @_; + + my $count = scalar(keys %{$self->{cpu_core}}); + my ($avg_5s, $avg_1m, $avg_5m); + foreach (values %{$self->{cpu_core}}) { + $avg_5s = defined($avg_5s) ? $avg_5s + $_->{cpu_5s} : $_->{cpu_5s} + if (defined($_->{cpu_5s})); + $avg_1m = defined($avg_1m) ? $avg_1m + $_->{cpu_1m} : $_->{cpu_1m} + if (defined($_->{cpu_1m})); + $avg_5m = defined($avg_5m) ? $avg_5m + $_->{cpu_5m} : $_->{cpu_5m} + if (defined($_->{cpu_5m})); + } + + $self->{cpu_avg} = { + average_5s => defined($avg_5s) ? $avg_5s / $count : undef, + average_1m => defined($avg_1m) ? $avg_1m / $count : undef, + average_5m => defined($avg_5m) ? $avg_5m / $count : undef, + count => $count + }; +} + +my $mapping = { + cpu_5s => { oid => '.1.3.6.1.4.1.11863.6.4.1.1.1.1.2' }, # tpSysMonitorCpu5Seconds + cpu_1m => { oid => '.1.3.6.1.4.1.11863.6.4.1.1.1.1.3' }, # tpSysMonitorCpu1Minute + cpu_5m => { oid => '.1.3.6.1.4.1.11863.6.4.1.1.1.1.4' } # tpSysMonitorCpu5Minutes +}; +my $oid_cpu_table = '.1.3.6.1.4.1.11863.6.4.1.1.1'; # tpSysMonitorCpuTable + +sub manage_selection { + my ($self, %options) = @_; + + my $snmp_result = $options{snmp}->get_table( + oid => $oid_cpu_table, + nothing_quit => 1 + ); + + $self->{cpu_avg} = {}; + $self->{cpu_core} = {}; + foreach my $oid (keys %$snmp_result) { + next if ($oid !~ /^$mapping->{cpu_5m}->{oid}\.(.*)$/); + my $instance = $1; + my $result = $options{snmp}->map_instance(mapping => $mapping, results => $snmp_result, instance => $instance); + + $self->{cpu_core}->{$instance} = { core_id => $instance, %$result }; + } + + $self->check_cpu_average(); +} + +1; + +__END__ + +=head1 MODE + +Check cpu usage. + +=over 8 + +=item B<--warning-*> B<--critical-*> + +Thresholds. +Can be: 'core-5s', 'core-1m', 'core-5m', 'average-5s', 'average-1m', 'average-5m'. + +=back + +=cut diff --git a/network/tplink/snmp/mode/memory.pm b/network/tplink/snmp/mode/memory.pm new file mode 100644 index 000000000..bfcdd66d3 --- /dev/null +++ b/network/tplink/snmp/mode/memory.pm @@ -0,0 +1,102 @@ +# +# Copyright 2021 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 network::tplink::snmp::mode::::memory; + +use base qw(centreon::plugins::templates::counter); + +use strict; +use warnings; + +sub prefix_message_output { + my ($self, %options) = @_; + + return "Memory unit '" . $options{instance_value}->{unit_number} . "' "; +} + +sub set_counters { + my ($self, %options) = @_; + + $self->{maps_counters_type} = [ + { name => 'memory', type => 1, cb_prefix_output => 'prefix_message_output', message_multiple => 'All memory units are ok' }, + ]; + + $self->{maps_counters}->{memory} = [ + { label => 'usage-prct', nlabel => 'memory.usage.percentage', set => { + key_values => [ { name => 'prct_used' } ], + output_template => 'used: %.2f %%', + perfdatas => [ + { template => '%.2f', min => 0, max => 100, unit => '%', label_extra_instance => 1 } + ] + } + } + ]; +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options, force_new_perfdata => 1); + bless $self, $class; + + $options{options}->add_options(arguments => { + }); + + return $self; +} + +sub manage_selection { + my ($self, %options) = @_; + + my $oid_memory_used = '.1.3.6.1.4.1.11863.6.4.1.2.1.1.2'; # tpSysMonitorMemoryUtilization + my $snmp_result = $options{snmp}->get_table( + oid => $oid_memory_used, + nothing_quit => 1 + ); + + $self->{memory} = {}; + foreach (keys %$snmp_result) { + /^$oid_memory_used\.(.*)$/; + my $unit_number = $1; + + $self->{memory}->{$unit_number} = { + unit_number => $unit_number, + prct_used => $snmp_result->{$_} + }; + } +} + +1; + +__END__ + +=head1 MODE + +Check memory usage. + +=over 8 + +=item B<--warning-*> B<--critical-*> + +Thresholds. +Can be: 'usage-prct' (%). + +=back + +=cut diff --git a/network/tplink/snmp/plugin.pm b/network/tplink/snmp/plugin.pm new file mode 100644 index 000000000..0cdc19472 --- /dev/null +++ b/network/tplink/snmp/plugin.pm @@ -0,0 +1,52 @@ +# +# Copyright 2021 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 network::tplink::snmp::plugin; + +use strict; +use warnings; +use base qw(centreon::plugins::script_snmp); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $self->{modes} = { + 'cpu' => 'network::tplink::snmp::mode::cpu', + 'interfaces' => 'snmp_standard::mode::interfaces', + 'list-interfaces' => 'snmp_standard::mode::listinterfaces', + 'memory' => 'network::tplink::snmp::mode::::memory', + 'uptime' => 'snmp_standard::mode::uptime' + }; + + return $self; +} + +1; + +__END__ + +=head1 PLUGIN DESCRIPTION + +Check TP-Link in SNMP. + +=cut