[PATCH pve-network 1/1] fix #7672: evpn zone: dont generate frr vrfs on excluded nodes

[Stefan Hanreich <s.hanreich@proxmox.com>]

If the main EVPN controller of a EVPN zone is restricted to specific
nodes, then applying the SDN configuration still tries to generate the
FRR configuration for the zone and its vnets on the excluded nodes.
This is because the functions generating the FRR configuration for the
VRF of the zone and the vnets does not check the 'nodes' property of
the EVPN controller. Avoid this situation by checking the setting in
the controller and returning early to avoid generating any
configuration.

Fixes: e388f01fd85469e809982e71c84cc06a781899bb
Signed-off-by: Stefan Hanreich <s.hanreich@proxmox.com>
---
 src/PVE/Network/SDN/Controllers/EvpnPlugin.pm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/src/PVE/Network/SDN/Controllers/EvpnPlugin.pm b/src/PVE/Network/SDN/Controllers/EvpnPlugin.pm
index 4220cb67..d744e882 100644
--- a/src/PVE/Network/SDN/Controllers/EvpnPlugin.pm
+++ b/src/PVE/Network/SDN/Controllers/EvpnPlugin.pm
@@ -324,6 +324,11 @@ sub generate_zone_frr_config {
 
     my $local_node = PVE::INotify::nodename();
 
+    if (defined($controller->{nodes})) {
+        my @nodes = PVE::Tools::split_list($controller->{nodes});
+        return if !grep { $_ eq $local_node } @nodes;
+    }
+
     my $vrf = "vrf_$id";
     my $vrfvxlan = $plugin_config->{'vrf-vxlan'};
     my $exitnodes = $plugin_config->{'exitnodes'};
@@ -586,12 +591,18 @@ sub generate_zone_frr_config {
 sub generate_vnet_frr_config {
     my ($class, $plugin_config, $controller, $zone, $zoneid, $vnetid, $config) = @_;
 
+    my $local_node = PVE::INotify::nodename();
+
+    if (defined($controller->{nodes})) {
+        my @nodes = PVE::Tools::split_list($controller->{nodes});
+        return if !grep { $_ eq $local_node } @nodes;
+    }
+
     my $exitnodes = $zone->{'exitnodes'};
     my $exitnodes_local_routing = $zone->{'exitnodes-local-routing'};
 
     return if !$exitnodes_local_routing;
 
-    my $local_node = PVE::INotify::nodename();
     my $is_gateway = $exitnodes->{$local_node};
 
     return if !$is_gateway;
-- 
2.47.3