zone: add vnet_update_hook

[pve-network.git] / test / statuscheck.pl

diff --git a/test/statuscheck.pl b/test/statuscheck.pl
index 619a957751c4c7ca7587f1da5e7548fb92bc8946..e43003ba8774e5725e194dcc1aa577ed87a0bd71 100644 (file)
--- a/test/statuscheck.pl
+++ b/test/statuscheck.pl
@@ -1,44 +1,9 @@
 use strict;
 use warnings;
-use File::Copy;
-use PVE::Cluster qw(cfs_read_file);
-
 use PVE::Network::SDN;
 use Data::Dumper;
-use PVE::Network::SDN::Plugin;
-use PVE::Network::SDN::VnetPlugin;
-use PVE::Network::SDN::VlanPlugin;
-use PVE::Network::SDN::VxlanMulticastPlugin;
-
-
-my $status = PVE::Network::SDN::status();
-
-my $network_cfg = PVE::Cluster::cfs_read_file('networks.cfg');
-my $vnet_cfg = undef;
-my $transport_cfg = undef;
-
-my $vnet_status = {};
-my $transport_status = {};
-
-foreach my $id (keys %{$network_cfg->{ids}}) {
-    if ($network_cfg->{ids}->{$id}->{type} eq 'vnet') {
-       my $transportzone = $network_cfg->{ids}->{$id}->{transportzone};
-       $transport_status->{$transportzone}->{status} = 1 if !defined($transport_status->{$transportzone}->{status});
-
-       if ($status->{$id}->{status} && $status->{$id}->{status} eq 'pass') {
-           $vnet_status->{$id}->{status} = 1;
-           my $bridgeport = $status->{$id}->{config}->{'bridge-ports'};
 
-           if ($status->{$bridgeport}->{status} && $status->{$bridgeport}->{status} ne 'pass') {
-               $vnet_status->{$id}->{status} = 0;
-               $transport_status->{$transportzone}->{status} = 0;
-           }
-       } else {
-           $vnet_status->{$id}->{status} = 0;
-           $transport_status->{$transportzone}->{status} = 0;
-       }
-    }
-}
+my ($transport_status, $vnet_status) = PVE::Network::SDN::status();
 
 print Dumper($vnet_status);
 print Dumper($transport_status);