update cisco cpu standard. can manage order

This commit is contained in:
garnier-quentin 2019-06-04 16:39:19 +02:00
parent b7b6f5ae37
commit 3b9372cd5e
1 changed files with 67 additions and 33 deletions

View File

@ -113,6 +113,7 @@ sub new {
$self->{version} = '1.0'; $self->{version} = '1.0';
$options{options}->add_options(arguments => { $options{options}->add_options(arguments => {
'check-order:s' => { name => 'check_order', default => 'process,old_sys,system_ext' },
}); });
return $self; return $self;
@ -121,38 +122,37 @@ sub new {
sub check_nexus_cpu { sub check_nexus_cpu {
my ($self, %options) = @_; my ($self, %options) = @_;
if (!defined($self->{results}->{$options{oid}}->{$options{oid} . '.0'})) { return if (!defined($options{snmp_result}->{$options{oid} . '.0'}));
return 0;
}
my $instance = 0; my $instance = 0;
$self->{cpu_core}->{$instance} = { $self->{cpu_core}->{$instance} = {
display => $instance, display => $instance,
cpu_5m => $self->{results}->{$options{oid}}->{$options{oid} . '.0'}, cpu_5m => $options{snmp_result}->{$options{oid} . '.0'},
}; };
return 1; $self->{checked_cpu} = 1;
} }
sub check_table_cpu { sub check_table_cpu {
my ($self, %options) = @_; my ($self, %options) = @_;
my $checked = 0; return if ($self->{checked_cpu} == 1);
my $instances = {}; my $instances = {};
foreach my $oid (keys %{$self->{results}->{$options{entry}}}) { foreach my $oid (keys %{$options{snmp_result}}) {
$oid =~ /\.([0-9]+)$/; $oid =~ /\.([0-9]+)$/;
next if (defined($instances->{$1})); next if (defined($instances->{$1}));
$instances->{$1} = 1; $instances->{$1} = 1;
my $instance = $1; my $instance = $1;
my $cpu5sec = defined($self->{results}->{$options{entry}}->{$options{sec5} . '.' . $instance}) ? $self->{results}->{$options{entry}}->{$options{sec5} . '.' . $instance} : undef; my $cpu5sec = defined($options{snmp_result}->{$options{sec5} . '.' . $instance}) ? $options{snmp_result}->{$options{sec5} . '.' . $instance} : undef;
my $cpu1min = defined($self->{results}->{$options{entry}}->{$options{min1} . '.' . $instance}) ? $self->{results}->{$options{entry}}->{$options{min1} . '.' . $instance} : undef; my $cpu1min = defined($options{snmp_result}->{$options{min1} . '.' . $instance}) ? $options{snmp_result}->{$options{min1} . '.' . $instance} : undef;
my $cpu5min = defined($self->{results}->{$options{entry}}->{$options{min5} . '.' . $instance}) ? $self->{results}->{$options{entry}}->{$options{min5} . '.' . $instance} : undef; my $cpu5min = defined($options{snmp_result}->{$options{min5} . '.' . $instance}) ? $options{snmp_result}->{$options{min5} . '.' . $instance} : undef;
# Case that it's maybe other CPU oid in table for datas. # Case that it's maybe other CPU oid in table for datas.
next if (!defined($cpu5sec) && !defined($cpu1min) && !defined($cpu5min)); next if (!defined($cpu5sec) && !defined($cpu1min) && !defined($cpu5min));
$checked = 1; $self->{checked_cpu} = 1;
$self->{cpu_core}->{$instance} = { $self->{cpu_core}->{$instance} = {
display => $instance, display => $instance,
cpu_5s => $cpu5sec, cpu_5s => $cpu5sec,
@ -160,8 +160,6 @@ sub check_table_cpu {
cpu_5m => $cpu5min, cpu_5m => $cpu5min,
}; };
} }
return $checked;
} }
sub check_cpu_average { sub check_cpu_average {
@ -186,11 +184,10 @@ sub check_cpu_average {
}; };
} }
sub manage_selection { sub check_cpu_process {
my ($self, %options) = @_; my ($self, %options) = @_;
$self->{cpu_avg} = {}; return if ($self->{checked_cpu} == 1);
$self->{cpu_core} = {};
# Cisco IOS Software releases later to 12.0(3)T and prior to 12.2(3.5) # Cisco IOS Software releases later to 12.0(3)T and prior to 12.2(3.5)
my $oid_cpmCPUTotalEntry = '.1.3.6.1.4.1.9.9.109.1.1.1.1'; my $oid_cpmCPUTotalEntry = '.1.3.6.1.4.1.9.9.109.1.1.1.1';
@ -201,32 +198,64 @@ sub manage_selection {
my $oid_cpmCPUTotal5minRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.8'; my $oid_cpmCPUTotal5minRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.8';
my $oid_cpmCPUTotal1minRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.7'; my $oid_cpmCPUTotal1minRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.7';
my $oid_cpmCPUTotal5secRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.6'; my $oid_cpmCPUTotal5secRev = '.1.3.6.1.4.1.9.9.109.1.1.1.1.6';
my $snmp_result = $self->{snmp}->get_table(
oid => $oid_cpmCPUTotalEntry, start => $oid_cpmCPUTotal5sec, end => $oid_cpmCPUTotal5minRev
);
$self->check_table_cpu(snmp_result => $snmp_result, sec5 => $oid_cpmCPUTotal5secRev, min1 => $oid_cpmCPUTotal1minRev, min5 => $oid_cpmCPUTotal5minRev);
$self->check_table_cpu(snmp_result => $snmp_result, sec5 => $oid_cpmCPUTotal5sec, min1 => $oid_cpmCPUTotal1min, min5 => $oid_cpmCPUTotal5min);
}
sub check_cpu_old_sys {
my ($self, %options) = @_;
return if ($self->{checked_cpu} == 1);
# Cisco IOS Software releases prior to 12.0(3)T # Cisco IOS Software releases prior to 12.0(3)T
my $oid_lcpu = '.1.3.6.1.4.1.9.2.1'; my $oid_lcpu = '.1.3.6.1.4.1.9.2.1';
my $oid_busyPer = '.1.3.6.1.4.1.9.2.1.56'; # .0 in reality my $oid_busyPer = '.1.3.6.1.4.1.9.2.1.56'; # .0 in reality
my $oid_avgBusy1 = '.1.3.6.1.4.1.9.2.1.57'; # .0 in reality my $oid_avgBusy1 = '.1.3.6.1.4.1.9.2.1.57'; # .0 in reality
my $oid_avgBusy5 = '.1.3.6.1.4.1.9.2.1.58'; # .0 in reality my $oid_avgBusy5 = '.1.3.6.1.4.1.9.2.1.58'; # .0 in reality
my $snmp_result = $self->{snmp}->get_table(
oid => $oid_lcpu, start => $oid_busyPer, end => $oid_avgBusy5
);
$self->check_table_cpu(snmp_result => $snmp_result, sec5 => $oid_busyPer, min1 => $oid_avgBusy1, min5 => $oid_avgBusy5);
}
sub check_cpu_system_ext {
my ($self, %options) = @_;
return if ($self->{checked_cpu} == 1);
# Cisco Nexus # Cisco Nexus
my $oid_cseSysCPUUtilization = '.1.3.6.1.4.1.9.9.305.1.1.1'; # .0 in reality my $oid_cseSysCPUUtilization = '.1.3.6.1.4.1.9.9.305.1.1.1'; # .0 in reality
my $snmp_result = $self->{snmp}->get_table(
$self->{results} = $options{snmp}->get_multiple_table( oid => $oid_cseSysCPUUtilization
oids => [
{ oid => $oid_cpmCPUTotalEntry, start => $oid_cpmCPUTotal5sec, end => $oid_cpmCPUTotal5minRev },
{ oid => $oid_lcpu, start => $oid_busyPer, end => $oid_avgBusy5 },
{ oid => $oid_cseSysCPUUtilization },
],
nothing_quit => 1
); );
if (!$self->check_table_cpu(entry => $oid_cpmCPUTotalEntry, sec5 => $oid_cpmCPUTotal5secRev, min1 => $oid_cpmCPUTotal1minRev, min5 => $oid_cpmCPUTotal5minRev) $self->check_nexus_cpu(snmp_result => $snmp_result, oid => $oid_cseSysCPUUtilization);
&& !$self->check_table_cpu(entry => $oid_cpmCPUTotalEntry, sec5 => $oid_cpmCPUTotal5sec, min1 => $oid_cpmCPUTotal1min, min5 => $oid_cpmCPUTotal5min) }
&& !$self->check_table_cpu(entry => $oid_lcpu, sec5 => $oid_busyPer, min1 => $oid_avgBusy1, min5 => $oid_avgBusy5)
) { sub manage_selection {
if (!$self->check_nexus_cpu(oid => $oid_cseSysCPUUtilization)) { my ($self, %options) = @_;
$self->{snmp} = $options{snmp};
$self->{cpu_avg} = {};
$self->{cpu_core} = {};
$self->{checked_cpu} = 0;
foreach (split /,/, $self->{option_results}->{check_order}) {
my $method = $self->can('check_cpu_' . $_);
if ($method) {
$self->$method();
}
}
if ($self->{checked_cpu} == 0) {
$self->{output}->add_option_msg(short_msg => "Cannot find CPU informations"); $self->{output}->add_option_msg(short_msg => "Cannot find CPU informations");
$self->{output}->option_exit(); $self->{output}->option_exit();
} }
}
$self->check_cpu_average(); $self->check_cpu_average();
} }
@ -241,6 +270,11 @@ Check cpu usage (CISCO-PROCESS-MIB and CISCO-SYSTEM-EXT-MIB).
=over 8 =over 8
=item B<--check-order>
Check cpu in standard cisco mib. If you have some issue (wrong cpu information in a specific mib), you can change the order
(Default: 'process,old_sys,system_ext').
=item B<--warning-*> B<--critical-*> =item B<--warning-*> B<--critical-*>
Thresholds. Thresholds.