}});
-sub print_simple_asciidoc_synopsys {
+sub print_simple_asciidoc_synopsis {
my ($class, $name, $arg_param, $uri_param) = @_;
die "not initialized" if !$cli_handler_class;
return $synopsis;
}
-sub print_asciidoc_synopsys {
+sub print_asciidoc_synopsis {
die "not initialized" if !($cmddef && $exename && $cli_handler_class);
sub generate_asciidoc_synopsys {
my ($class) = @_;
+ $class->generate_asciidoc_synopsis();
+};
+
+sub generate_asciidoc_synopsis {
+ my ($class) = @_;
$cli_handler_class = $class;
my $def = ${"${class}::cmddef"};
if (ref($def) eq 'ARRAY') {
- print_simple_asciidoc_synopsys(@$def);
+ print_simple_asciidoc_synopsis(@$def);
} else {
$cmddef = $def;
$cmddef->{help} = [ __PACKAGE__, 'help', ['cmd'] ];
- print_asciidoc_synopsys();
+ print_asciidoc_synopsis();
}
}
+# overwrite this if you want to run/setup things early
+sub setup_environment {
+ my ($class) = @_;
+
+ # do nothing by default
+}
+
my $handle_cmd = sub {
my ($def, $cmdname, $cmd, $args, $pwcallback, $preparefunc, $stringfilemap) = @_;
$cmddef->{help} = [ __PACKAGE__, 'help', ['cmd'] ];
- if (!$cmd) {
+ # call verifyapi before setup_environment(), because we do not want to
+ # execute any real code in this case
+
+ if (!$cmd) {
print_usage_short (\*STDERR, "no command specified");
exit (-1);
} elsif ($cmd eq 'verifyapi') {
PVE::RESTHandler::validate_method_schemas();
return;
- } elsif ($cmd eq 'bashcomplete') {
+ }
+
+ $cli_handler_class->setup_environment();
+
+ if ($cmd eq 'bashcomplete') {
&$print_bash_completion($cmddef, 0, @$args);
return;
}
$str .= $class->usage_str($name, $name, $arg_param, $uri_param, 'long', $pwcallback, $stringfilemap);
print STDERR "$str\n\n";
return;
- } elsif ($args->[0] eq 'bashcomplete') {
- shift @$args;
- &$print_bash_completion({ $name => $def }, $name, @$args);
- return;
} elsif ($args->[0] eq 'verifyapi') {
PVE::RESTHandler::validate_method_schemas();
return;
}
}
+ $cli_handler_class->setup_environment();
+
+ if (scalar(@$args) >= 1) {
+ if ($args->[0] eq 'bashcomplete') {
+ shift @$args;
+ &$print_bash_completion({ $name => $def }, $name, @$args);
+ return;
+ }
+ }
+
&$preparefunc() if $preparefunc;
my $res = $class->cli_handler($name, $name, \@ARGV, $arg_param, $uri_param, $pwcallback, $stringfilemap);
foreach my $key (keys %params) {
next if $key eq 'prepare';
- next if $key eq 'no_init'; # used by lxc hooks
- next if $key eq 'no_rpcenv';
+ next if $key eq 'no_init'; # not used anymore
+ next if $key eq 'no_rpcenv'; # not used anymore
die "unknown parameter '$key'";
}
my $preparefunc = $params{prepare};
- my $no_init = $params{no_init};
- my $no_rpcenv = $params{no_rpcenv};
my $pwcallback = $class->can('read_password');
my $stringfilemap = $class->can('string_param_file_mapping');
initlog($exename);
- if ($class !~ m/^PVE::Service::/) {
- die "please run as root\n" if $> != 0;
-
- PVE::INotify::inotify_init() if !$no_init;
-
- if (!$no_rpcenv) {
- my $rpcenv = PVE::RPCEnvironment->init('cli');
- $rpcenv->init_request() if !$no_init;
- $rpcenv->set_language($ENV{LANG});
- $rpcenv->set_user('root@pam');
- }
- }
-
no strict 'refs';
my $def = ${"${class}::cmddef"};