tyler.durden
/
centreon-plugins
mirror of https://github.com/centreon/centreon-plugins.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #2423 from centreon/enh-commvault-disco 

enh commvault discovery modes
This commit is contained in:
qgarnier 2020-12-10 17:18:21 +01:00 committed by GitHub
parent d2052530fe f6ddca7431
commit e7080cf6dd
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 32 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
apps/backup/commvault/commserve/restapi/mode/listmediaagents.pm
View File

@ -31,6 +31,7 @@ sub new {
bless $self, $class;
$options{options}->add_options(arguments => {
'filter-media-agent-name:s' => { name => 'filter_media_agent_name' }
});
return $self;
@ -44,16 +45,24 @@ sub check_options {
sub manage_selection {
my ($self, %options) = @_;
return $options{custom}->request(
my $agents = $options{custom}->request(
endpoint => '/v2/MediaAgents'
);
my $results = [];
foreach (@{$agents->{mediaAgentList}}) {
next if (defined($self->{option_results}->{filter_media_agent_name}) && $self->{option_results}->{filter_media_agent_name} ne '' &&
$_->{mediaAgent}->{mediaAgentName} !~ /$self->{option_results}->{filter_media_agent_name}/);
push @$results, $_;
}
return $results;
}
sub run {
my ($self, %options) = @_;
my $results = $self->manage_selection(%options);
foreach (@{$results->{mediaAgentList}}) {
foreach (@$results) {
$self->{output}->output_add(
long_msg => sprintf(
'[id = %s][name = %s]',
@ -81,7 +90,7 @@ sub disco_show {
my ($self, %options) = @_;
my $results = $self->manage_selection(%options);
foreach (@{$results->{mediaAgentList}}) {
foreach (@$results) {
$self->{output}->add_disco_entry(
id => $_->{mediaAgent}->{mediaAgentId},
name => $_->{mediaAgent}->{mediaAgentName}
@ -99,6 +108,10 @@ List media agents.
=over 8
=item B<--filter-media-agent-name>
Filter media agents by name (Can be a regexp).
=back
=cut

19
apps/backup/commvault/commserve/restapi/mode/liststoragepolicies.pm
View File

@ -31,6 +31,7 @@ sub new {
bless $self, $class;
$options{options}->add_options(arguments => {
'filter-policy-name:s' => { name => 'filter_policy_name' }
});
return $self;
@ -44,16 +45,24 @@ sub check_options {
sub manage_selection {
my ($self, %options) = @_;
return $options{custom}->request(
my $policies = $options{custom}->request(
endpoint => '/V2/StoragePolicy'
);
my $results = [];
foreach (@{$policies->{policies}}) {
next if (defined($self->{option_results}->{filter_policy_name}) && $self->{option_results}->{filter_policy_name} ne '' &&
$_->{storagePolicy}->{storagePolicyName} !~ /$self->{option_results}->{filter_policy_name}/);
push @$results, $_;
}
return $results;
}
sub run {
my ($self, %options) = @_;
my $results = $self->manage_selection(%options);
foreach (@{$results->{policies}}) {
foreach (@$results) {
$self->{output}->output_add(
long_msg => sprintf(
'[id = %s][name = %s]',
@ -81,7 +90,7 @@ sub disco_show {
my ($self, %options) = @_;
my $results = $self->manage_selection(%options);
foreach (@{$results->{policies}}) {
foreach (@$results) {
$self->{output}->add_disco_entry(
id => $_->{storagePolicy}->{storagePolicyId},
name => $_->{storagePolicy}->{storagePolicyName}
@ -99,6 +108,10 @@ List storage policies.
=over 8
=item B<--filter-policy-name>
Filter policies by name (can be a regexp).
=back
=cut