proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-08-04 16:38:16 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

qemuserver : vm_status : add extended stats (disks, nics, memory) V3

Browse Source 
Add extended stats results for each nics,disks and memory on full stats mode only.

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
Alexandre Derumier 2015-06-16 12:44:49 +02:00 committed by Dietmar Maurer
parent 7a0f138cc6
commit 604ea64464
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
PVE/QemuServer.pm
View File

@ -2347,6 +2347,12 @@ sub vmstatus {
$d->{netout} += $netdev->{$dev}->{receive}; $d->{netout} += $netdev->{$dev}->{receive};
$d->{netin} += $netdev->{$dev}->{transmit}; $d->{netin} += $netdev->{$dev}->{transmit};
if ($full) {
$d->{nics}->{$dev}->{netout} = $netdev->{$dev}->{receive};
$d->{nics}->{$dev}->{netin} = $netdev->{$dev}->{transmit};
}
} }
my $ctime = gettimeofday; my $ctime = gettimeofday;
@ -2415,6 +2421,7 @@ sub vmstatus {
$d->{freemem} = $info->{free_mem}; $d->{freemem} = $info->{free_mem};
} }
$d->{ballooninfo} = $info;
}; };
my $blockstatscb = sub { my $blockstatscb = sub {
@ -2422,9 +2429,13 @@ sub vmstatus {
my $data = $resp->{'return'} || []; my $data = $resp->{'return'} || [];
my $totalrdbytes = 0; my $totalrdbytes = 0;
my $totalwrbytes = 0; my $totalwrbytes = 0;
for my $blockstat (@$data) { for my $blockstat (@$data) {
$totalrdbytes = $totalrdbytes + $blockstat->{stats}->{rd_bytes}; $totalrdbytes = $totalrdbytes + $blockstat->{stats}->{rd_bytes};
$totalwrbytes = $totalwrbytes + $blockstat->{stats}->{wr_bytes}; $totalwrbytes = $totalwrbytes + $blockstat->{stats}->{wr_bytes};
$blockstat->{device} =~ s/drive-//;
$res->{$vmid}->{blockstat}->{$blockstat->{device}} = $blockstat->{stats};
} }
$res->{$vmid}->{diskread} = $totalrdbytes; $res->{$vmid}->{diskread} = $totalrdbytes;
$res->{$vmid}->{diskwrite} = $totalwrbytes; $res->{$vmid}->{diskwrite} = $totalwrbytes;