From 802781b019d771a07b218195abf552fce305812f Mon Sep 17 00:00:00 2001 From: qgarnier Date: Fri, 11 Mar 2022 11:36:10 +0100 Subject: [PATCH] (core) add debug snmp (#3541) --- centreon-plugins/centreon/plugins/snmp.pm | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) diff --git a/centreon-plugins/centreon/plugins/snmp.pm b/centreon-plugins/centreon/plugins/snmp.pm index 5d794c58a..7cc85fefb 100644 --- a/centreon-plugins/centreon/plugins/snmp.pm +++ b/centreon-plugins/centreon/plugins/snmp.pm @@ -372,6 +372,8 @@ sub get_leef { $self->{output}->option_exit(exit_litteral => $self->{snmp_errors_exit}); } + $self->debug(results => $results) if ($self->{output}->is_debug()); + return $results; } @@ -548,6 +550,8 @@ sub get_multiple_table { } } + $self->debug(results => $results) if ($self->{output}->is_debug()); + return $results; } @@ -662,6 +666,8 @@ sub get_table { $self->{output}->option_exit(exit_litteral => $self->{snmp_errors_exit}); } + $self->debug(results => $results) if ($self->{output}->is_debug()); + return $results; } @@ -924,6 +930,20 @@ sub map_instance { return $results; } +sub debug { + my ($self, %options) = @_; + + foreach my $oid1 ($self->oid_lex_sort(keys %{$options{results}})) { + if (ref($options{results}->{$oid1}) eq 'HASH') { + foreach my $oid2 ($self->oid_lex_sort(keys %{$options{results}->{$oid1}})) { + $self->{output}->output_add(long_msg => $oid2 . ' = ' . (defined($options{results}->{$oid1}->{$oid2}) ? $options{results}->{$oid1}->{$oid2} : 'undef'), debug => 1); + } + } else { + $self->{output}->output_add(long_msg => $oid1 . ' = ' . (defined($options{results}->{$oid1}) ? $options{results}->{$oid1} : 'undef'), debug => 1); + } + } +} + sub oid_lex_sort { my $self = shift;