add method in snmp class

This commit is contained in:
garnier-quentin 2019-02-20 17:42:56 +01:00
parent 994255967d
commit c38907be54
1 changed files with 37 additions and 21 deletions

View File

@ -43,8 +43,8 @@ sub new {
$options{output}->option_exit(); $options{output}->option_exit();
} }
$options{options}->add_options(arguments => $options{options}->add_options(arguments => {
{ "hostname|host:s" => { name => 'host' }, "hostname|host:s" => { name => 'host' },
"snmp-community:s" => { name => 'snmp_community', default => 'public' }, "snmp-community:s" => { name => 'snmp_community', default => 'public' },
"snmp-version:s" => { name => 'snmp_version', default => 1 }, "snmp-version:s" => { name => 'snmp_version', default => 1 },
"snmp-port:s" => { name => 'snmp_port', default => 161 }, "snmp-port:s" => { name => 'snmp_port', default => 161 },
@ -828,6 +828,22 @@ sub check_options {
} }
} }
sub set_snmp_connect_params {
my ($self, %options) = @_;
foreach (keys %options) {
$self->{snmp_params}->{$_} = $options{$_};
}
}
sub set_snmp_params {
my ($self, %options) = @_;
foreach (keys %options) {
$self->{$_} = $options{$_};
}
}
sub set_error { sub set_error {
my ($self, %options) = @_; my ($self, %options) = @_;
# $options{error_msg} = string error # $options{error_msg} = string error