vmware vcsa: better error handling

This commit is contained in:
garnier-quentin 2019-10-10 10:04:50 +02:00
parent 92182157fc
commit ae17604eb3
1 changed files with 5 additions and 1 deletions

View File

@ -44,7 +44,7 @@ sub new {
}
if (!defined($options{noptions})) {
$options{options}->add_options(arguments => {
$options{options}->add_options(arguments => {
'hostname:s' => { name => 'hostname' },
'port:s' => { name => 'port'},
'proto:s' => { name => 'proto' },
@ -220,6 +220,10 @@ sub request_api {
$self->{output}->add_option_msg(short_msg => "Error while retrieving data (add --debug option for detailed message)");
$self->{output}->option_exit();
}
if ($self->{http}->get_code() != 200) {
$self->{output}->add_option_msg(short_msg => 'api request error: ' . (defined($decoded->{type}) ? $decoded->{type} : 'unknown'));
$self->{output}->option_exit();
}
return $decoded;
}