Wrap these calls in an eval to prevent it from dying if its a container instead of a qemu vm. Fixes #28

This commit is contained in:
Mark Schouten
2016-07-11 17:06:14 +02:00
parent db44c10709
commit 6d27c7edb3
+8 -2
View File
@@ -52,6 +52,12 @@ print "$clustername\n";
foreach my $vm (@{$conn->get("/api2/json/nodes/$hostname/netstat")->{'data'}}) {
my $vmid = $vm->{'vmid'};
my $vmname = $conn->get("/api2/json/nodes/$hostname/qemu/$vmid/config")->{'data'}->{'name'};
print "$vmid/$vm->{'dev'}/$vm->{'in'}/$vm->{'out'}/$vmname\n";
eval {
my $vmname = $conn->get("/api2/json/nodes/$hostname/qemu/$vmid/config")->{'data'}->{'name'};
print "$vmid/$vm->{'dev'}/$vm->{'in'}/$vm->{'out'}/$vmname\n";
};
eval {
my $vmname = $conn->get("/api2/json/nodes/$hostname/lxc/$vmid/config")->{'data'}->{'name'};
print "$vmid/$vm->{'dev'}/$vm->{'in'}/$vm->{'out'}/$vmname\n";
};
};