(plugin) apps::protocols::dns - option --nameservers can use coma (#4362)

This commit is contained in:
qgarnier 2023-04-18 13:58:31 +02:00 committed by GitHub
parent c2a22ae09e
commit 43e63fb4ac
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 11 additions and 2 deletions

View File

@ -77,11 +77,20 @@ sub connect {
my %dns_options = (); my %dns_options = ();
if (defined($self->{option_results}->{nameservers})) { if (defined($self->{option_results}->{nameservers})) {
$dns_options{nameservers} = [@{$self->{option_results}->{nameservers}}]; foreach my $ns (@{$self->{option_results}->{nameservers}}) {
my @entries = split(/,/, $ns);
foreach my $name (@entries) {
next if ($name eq '');
$dns_options{nameservers} = [] if (!defined($dns_options{nameservers}));
push @{$dns_options{nameservers}}, $name;
}
}
} }
if (defined($self->{option_results}->{searchlist})) { if (defined($self->{option_results}->{searchlist})) {
$dns_options{searchlist} = [@{$self->{option_results}->{searchlist}}]; $dns_options{searchlist} = [@{$self->{option_results}->{searchlist}}];
} }
foreach my $option (@{$self->{option_results}->{dns_options}}) { foreach my $option (@{$self->{option_results}->{dns_options}}) {
next if ($option !~ /^(.+?)=(.+)$/); next if ($option !~ /^(.+?)=(.+)$/);
$dns_options{$1} = $2; $dns_options{$1} = $2;

View File

@ -163,7 +163,7 @@ perl centreon_plugins.pl --plugin=apps::protocols::dns::plugin --mode=request --
=item B<--nameservers> =item B<--nameservers>
Set nameserver to query (can be multiple). Set nameserver to query (can use option multiple times or separated values by coma).
The system configuration is used by default. The system configuration is used by default.
=item B<--searchlist> =item B<--searchlist>