X-Git-Url: https://git.proxmox.com/?p=pve-client.git;a=blobdiff_plain;f=pveclient;h=46d902daca0952866eba0360d6d96e7ad9b14758;hp=03cb8ed944636725029cfbc2ab01809a1f257d67;hb=8958596f3be4d2d6447dbd0af3e2a012a75ba054;hpb=f5fcd8264784c07aa977f2c1cb6763855f642f54 diff --git a/pveclient b/pveclient index 03cb8ed..46d902d 100755 --- a/pveclient +++ b/pveclient @@ -14,23 +14,10 @@ use PVE::APIClient::LWP; use PVE::APIClient::Helpers; use PVE::APIClient::Commands::remote; use PVE::APIClient::Commands::lxc; +use PVE::APIClient::Commands::help; use JSON; -sub print_usage { - - my $text = "pveclient usage:\n\n"; - - $text .= "pveclient remote {options}\n\n"; - - $text .= "pveclient lxc {options}\n\n"; - - $text .= "pveclient {options}\n\n"; - - print STDERR $text; - -} - sub call_method { my ($path, $method, $args) = @_; @@ -43,30 +30,17 @@ sub call_method { die "implement me"; } -# NOTE: This binary is just a placeholer - nothing implemented so far! - -#my $hostname = 'localhost'; -#my $username = 'root@pam'; -# -#my $conn = PVE::APIClient::LWP->new( -# username => $username, -# #password => 'yourpassword', -# #ticket => $ticket, -# #csrftoken => $csrftoken, -# host => $hostname, -# # allow manual fingerprint verification -# manual_verification => 1, -# ); - -#my $res = $conn->get("/", {}); -#print to_json($res, { pretty => 1, canonical => 1}); - my $cli_class_handlers = { lxc => 'PVE::APIClient::Commands::lxc', remote => 'PVE::APIClient::Commands::remote', + help => 'PVE::APIClient::Commands::help', }; -my $cmd = shift || (print_usage() && exit(-1)); +my $cmd = shift; +if (!defined($cmd)) { + PVE::APIClient::Commands::help->help({}); + exit(-1); +} if ($cmd eq 'get') { my $method = 'GET'; @@ -133,7 +107,7 @@ if ($cmd eq 'get') { } print join("\n", sort(keys %$packages)) . "\n"; } else { - print_usage(); + PVE::APIClient::Commands::help->help({}); } exit(0);