--- Begin Message ---
Signed-off-by: Tiago Sousa <[email protected]>
---
src/PVE/QemuServer/Blockdev.pm | 15 +++++++++++++++
1 file changed, 15 insertions(+)
diff --git a/src/PVE/QemuServer/Blockdev.pm b/src/PVE/QemuServer/Blockdev.pm
index 38a1408a..78769198 100644
--- a/src/PVE/QemuServer/Blockdev.pm
+++ b/src/PVE/QemuServer/Blockdev.pm
@@ -113,6 +113,21 @@ sub get_block_info {
return $block_info;
}
+sub get_block_stats {
+ my ($vmid) = @_;
+
+ my $block_stats = {};
+
+ my $qmp_block_stats = mon_cmd($vmid, "query-blockstats");
+ for my $info ($qmp_block_stats->@*) {
+ my $qdev_id = $info->{qdev} or next;
+ my $drive_id = qdev_id_to_drive_id($qdev_id);
+ $block_stats->{$drive_id} = $info;
+ }
+
+ return $block_stats;
+}
+
my sub get_node_name {
my ($type, $drive_id, $volid, $options) = @_;
--
2.47.3
--- End Message ---
_______________________________________________
pve-devel mailing list
[email protected]
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel
