use PVE::RESTHandler;
use PVE::INotify;
+use PMG::RESTEnvironment;
use PMG::UserConfig;
use base qw(PVE::RESTHandler);
description => "List users.",
proxyto => 'master',
protected => 1,
- permissions => { check => [ 'admin' ] },
+ permissions => { check => [ 'admin', 'qmanager', 'audit' ] },
parameters => {
additionalProperties => 0,
properties => {},
my $cfg = PMG::UserConfig->new();
+ my $rpcenv = PMG::RESTEnvironment->get();
+ my $authuser = $rpcenv->get_user();
+ my $role = $rpcenv->get_role();
+
my $res = [];
foreach my $userid (sort keys %$cfg) {
+ next if $role eq 'qmanager' && $authuser ne $userid;
push @$res, $extract_userdata->($cfg->{$userid});
}