fix correct call to 'usage_str'

[pve-manager.git] / bin / pvesubscription

diff --git a/bin/pvesubscription b/bin/pvesubscription
index e54bc52063cdf0d7e1ff564904e8115f9eb095cf..971f5a4228cb32ff762080224c73be15d8783d79 100755 (executable)
--- a/bin/pvesubscription
+++ b/bin/pvesubscription
@@ -3,64 +3,6 @@
 use strict;
 use warnings;
 
-use PVE::Tools;
-use PVE::SafeSyslog;
-use PVE::INotify;
-use PVE::RPCEnvironment;
-use PVE::CLIHandler;
-use PVE::API2::Subscription;
+use PVE::CLI::pvesubscription;
 
-
-use base qw(PVE::CLIHandler);
-
-$ENV{'PATH'} = '/sbin:/bin:/usr/sbin:/usr/bin';
-
-initlog('pvesubscription');
-
-die "please run as root\n" if $> != 0;
-
-PVE::INotify::inotify_init();
-
-my $rpcenv = PVE::RPCEnvironment->init('cli');
-
-$rpcenv->init_request();
-$rpcenv->set_language($ENV{LANG});
-$rpcenv->set_user('root@pam'); 
-
-my $nodename = PVE::INotify::nodename();
-
-
-
-my $cmddef = {
-    update => [ 'PVE::API2::Subscription', 'update', undef, { node => $nodename } ],
-    get => [ 'PVE::API2::Subscription', 'get', undef, { node => $nodename }, 
-            sub {
-                my $info = shift;
-                foreach my $k (sort keys %$info) {
-                    print "$k: $info->{$k}\n";
-                }
-            }],
-    set => [ 'PVE::API2::Subscription', 'set', ['key'], { node => $nodename } ],
-};
-
-my $cmd = shift;
-
-PVE::CLIHandler::handle_cmd($cmddef, "pvesubscription", $cmd, \@ARGV, undef, $0);
-
-exit 0;
-
-__END__
-
-=head1 NAME
-
-pvesubscription - Proxmox VE subscription mamager
-
-=head1 SYNOPSIS
-
-=include synopsis
-
-=head1 DESCRIPTION
-
-This tool is used to handle pve subscriptions.
-
-=include pve_copyright
+PVE::CLI::pvesubscription->run_cli_handler();