use new features from pve-common

This commit is contained in:
Dietmar Maurer 2018-07-11 10:36:16 +02:00
parent 874acd772a
commit 59d3653b91
5 changed files with 28 additions and 62 deletions

View File

@ -9,6 +9,7 @@ use PVE::APIClient::JSONSchema qw(get_standard_option);
use PVE::APIClient::Tools qw(extract_param);
use PVE::APIClient::Config;
use PVE::APIClient::CLIFormatter;
use PVE::APIClient::CLIHandler;
use base qw(PVE::APIClient::CLIHandler);
@ -23,6 +24,7 @@ __PACKAGE__->register_method ({
description => "Dump default configuration.",
parameters => {
additionalProperties => 0,
properties => {},
},
returns => {
type => 'object',
@ -90,7 +92,13 @@ __PACKAGE__->register_method ({
our $cmddef = {
set => [ __PACKAGE__, 'set',],
list => [__PACKAGE__, 'list', undef, undef, sub { PVE::APIClient::Helpers::print_result(@_);}],
list => [__PACKAGE__, 'list', undef, undef,
sub {
my ($data, $schema, $options) = @_;
PVE::APIClient::CLIFormatter::print_api_result($data, $schema, undef, $options);
}
],
};
1;

View File

@ -30,7 +30,6 @@ __PACKAGE__->register_method ({
additionalProperties => 0,
properties => {
remote => get_standard_option('pveclient-remote-name'),
'format' => get_standard_option('pve-output-format'),
},
},
returns => {
@ -43,9 +42,6 @@ __PACKAGE__->register_method ({
code => sub {
my ($param) = @_;
my $format = PVE::APIClient::Tools::extract_param($param, 'format');
PVE::APIClient::Helpers::set_output_format($format);
my $config = PVE::APIClient::Config->load();
my $conn = PVE::APIClient::Config->remote_conn($config, $param->{remote});
@ -54,7 +50,8 @@ __PACKAGE__->register_method ({
our $cmddef = [ __PACKAGE__, 'list', ['remote'], {}, sub {
PVE::APIClient::Helpers::print_ordered_result($list_returns_properties, @_);
my ($data, $schema, $options) = @_;
PVE::APIClient::Helpers::print_ordered_result($list_returns_properties, $data, $schema, $options);
}];
1;

View File

@ -35,9 +35,7 @@ __PACKAGE__->register_method ({
description => "List remotes from your config file.",
parameters => {
additionalProperties => 0,
properties => {
'format' => get_standard_option('pve-output-format'),
},
properties => {},
},
returns => {
type => 'array',
@ -49,9 +47,6 @@ __PACKAGE__->register_method ({
code => sub {
my ($param) = @_;
my $format = PVE::APIClient::Tools::extract_param($param, 'format');
PVE::APIClient::Helpers::set_output_format($format);
my $config = PVE::APIClient::Config->load();
my $res = [];
@ -212,7 +207,8 @@ our $cmddef = {
set => [ __PACKAGE__, 'remote_set', ['name']],
delete => [ __PACKAGE__, 'remote_delete', ['name']],
list => [__PACKAGE__, 'remote_list', undef, {}, sub {
PVE::APIClient::Helpers::print_ordered_result($remote_list_returns_properties, @_);
my ($data, $schema, $options) = @_;
PVE::APIClient::Helpers::print_ordered_result($remote_list_returns_properties, $data, $schema, $options);
}],
};

View File

@ -27,23 +27,6 @@ our $method_map = {
delete => 'DELETE',
};
my $default_output_format = 'text';
my $client_output_format = $default_output_format;
sub set_output_format {
my ($format) = @_;
if (!defined($format)) {
$client_output_format = $default_output_format;
} else {
$client_output_format = $format;
}
}
sub get_output_format {
return $client_output_format;
}
my $__real_remove_formats; $__real_remove_formats = sub {
my ($properties) = @_;
@ -405,23 +388,12 @@ sub extract_even_elements {
return [ grep { ($ind++ % 2) == 0 } @$list ];
}
sub print_result {
my ($data, $result_schema, $param_order) = @_;
my $options = {};
PVE::APIClient::CLIFormatter::query_terminal_options($options);
my $format = get_output_format();
PVE::APIClient::CLIFormatter::print_api_result(
$format, $data, $result_schema, $param_order, $options);
}
sub print_ordered_result {
my ($property_list, $data, $result_schema) = @_;
my ($property_list, $data, $result_schema, $options) = @_;
my $param_order = extract_even_elements($property_list);
print_result($data, $result_schema, $param_order);
PVE::APIClient::CLIFormatter::print_api_result($data, $result_schema, $param_order, $options);
}
1;

View File

@ -24,7 +24,7 @@ use PVE::APIClient::Commands::GuestStatus;
use JSON;
sub call_api_method {
my ($method, $param) = @_;
my ($method, $param, $options) = @_;
my $path = PVE::APIClient::Tools::extract_param($param, 'api_path');
die "missing API path\n" if !defined($path);
@ -32,9 +32,6 @@ sub call_api_method {
my $remote = PVE::APIClient::Tools::extract_param($param, 'remote');
die "missing remote\n" if !defined($remote);
my $format = PVE::APIClient::Tools::extract_param($param, 'format');
PVE::APIClient::Helpers::set_output_format($format);
my $config = PVE::APIClient::Config->load();
my $uri_param = {};
@ -103,18 +100,14 @@ if (my $info = PVE::APIClient::Helpers::extract_path_info($uri_param)) {
$path_returns = $info->{returns};
}
$path_properties->{format} = get_standard_option('pve-output-format'),
$path_properties->{remote} = get_standard_option('pveclient-remote-name');
$path_properties->{api_path} = $api_path_property;
my $format_result = sub {
my ($data) = @_;
my ($data, $schema, $options) = @_;
my $format = PVE::APIClient::Helpers::get_output_format();
my $options = PVE::APIClient::CLIFormatter::query_terminal_options({});
PVE::APIClient::CLIFormatter::print_api_result($format, $data, $path_returns, undef, $options);
# NOTE; we need to use $path_returns instead of $schema
PVE::APIClient::CLIFormatter::print_api_result($data, $path_returns, undef, $options);
};
__PACKAGE__->register_method ({
@ -128,9 +121,9 @@ __PACKAGE__->register_method ({
},
returns => $path_returns,
code => sub {
my ($param) = @_;
my ($param, $options) = @_;
return call_api_method('GET', $param);
return call_api_method('GET', $param, $options);
}});
__PACKAGE__->register_method ({
@ -144,9 +137,9 @@ __PACKAGE__->register_method ({
},
returns => $path_returns,
code => sub {
my ($param) = @_;
my ($param, $options) = @_;
return call_api_method('PUT', $param);
return call_api_method('PUT', $param, $options);
}});
__PACKAGE__->register_method ({
@ -160,9 +153,9 @@ __PACKAGE__->register_method ({
},
returns => $path_returns,
code => sub {
my ($param) = @_;
my ($param, $options) = @_;
return call_api_method('PUSH', $param);
return call_api_method('PUSH', $param, $options);
}});
__PACKAGE__->register_method ({
@ -176,9 +169,9 @@ __PACKAGE__->register_method ({
},
returns => $path_returns,
code => sub {
my ($param) = @_;
my ($param, $options) = @_;
return call_api_method('DELETE', $param);
return call_api_method('DELETE', $param, $options);
}});
__PACKAGE__->register_method ({