Signed-off-by: Hannes Laimer <h.lai...@proxmox.com>
---
This was asked in a forum post, and it does not interfere with
anything else AFAIK.

 PVE/API2/Pool.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/PVE/API2/Pool.pm b/PVE/API2/Pool.pm
index 28c29ab8..b190d134 100644
--- a/PVE/API2/Pool.pm
+++ b/PVE/API2/Pool.pm
@@ -211,6 +211,11 @@ __PACKAGE__->register_method ({
                type => 'string',
                format => 'pve-poolid',
            },
+           type => {
+               type => 'string',
+               enum => [ 'qemu', 'lxc', 'openvz', 'storage' ],
+               optional => 1,
+           },
        },
     },
     returns => {
@@ -271,7 +276,7 @@ __PACKAGE__->register_method ({
            my $vmdata = $idlist->{$vmid};
            next if !$vmdata;
            my $entry = PVE::API2Tools::extract_vm_stats($vmid, $vmdata, $rrd);
-           push @$members, $entry;
+           push @$members, $entry if !defined($param->{type}) or 
$param->{type} eq $entry->{type};
        }
 
        my $nodename = PVE::INotify::nodename();
@@ -289,7 +294,7 @@ __PACKAGE__->register_method ({
            }
 
            my $entry = PVE::API2Tools::extract_storage_stats($storeid, $scfg, 
$storage_node, $rrd);
-           push @$members, $entry;
+           push @$members, $entry if !defined($param->{type}) or 
$param->{type} eq $entry->{type};
        }
 
        my $res = {
-- 
2.30.2



_______________________________________________
pve-devel mailing list
pve-devel@lists.proxmox.com
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to