mirrors
/
Monitorix
mirror of https://github.com/mikaku/Monitorix.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

small fixes in 'libvirt.pm'

This commit is contained in:
Jordi Sanfeliu 2015-12-04 10:20:13 +01:00
parent 601b1b91e9
commit 3084960a6b
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lib/libvirt.pm
View File

@ -176,7 +176,6 @@ sub libvirt_update {
my $vnet = "";
print "$vm = " . scalar(@vda) . "\n";
if($vm && (!scalar(@vda) || !scalar(@vmac))) {
logger("$myself: missing parameters in '$vm' virtual machine.");
$vm = ""; # invalidates this vm
@ -217,7 +216,8 @@ sub libvirt_update {
# summarizes all virtual disks stats for each 'vm'
$t = 0;
foreach (my $vd = trim(split(',', @vda))) {
foreach my $vd (@vda) {
$vd = trim($vd);
if(open(IN, "$libvirt->{cmd} domblkstat $vm $vd |")) {
my $r = 0;
my $w = 0;
@ -242,7 +242,8 @@ sub libvirt_update {
# summarizes all virtual network stats for each 'vm'
$t = 0;
foreach (my $vn = trim(split(',', @vmac))) {
foreach my $vn (@vmac) {
$vn = trim($vn);
if(open(IN, "$libvirt->{cmd} domiflist $vm |")) {
while(<IN>) {
if(/^(\S+)\s+.*?\s+$vn$/) {