use POSIX qw(ECONNREFUSED);
use Socket qw(NI_NUMERICHOST NI_NUMERICSERV);
-my $have_sdn;
-eval {
- require PVE::Network::SDN::Zones;
- $have_sdn = 1;
-};
-
# host network related utility functions
our $PHYSICAL_NIC_RE = qr/(?:eth\d+|en[^:.]+|ib\d+)/;
sub tap_create {
my ($iface, $bridge) = @_;
- if ($have_sdn) {
- my ($bridgesdn, undef) = PVE::Network::SDN::Zones::get_bridge_vlan($bridge);
- $bridge = $bridgesdn if $bridgesdn;
- }
-
die "unable to get bridge setting\n" if !$bridge;
my $bridgemtu = &$read_bridge_mtu($bridge);
sub veth_create {
my ($veth, $vethpeer, $bridge, $mac) = @_;
- if ($have_sdn) {
- my ($bridgesdn, undef) = PVE::Network::SDN::Zones::get_bridge_vlan($bridge);
- $bridge = $bridgesdn if $bridgesdn;
- }
-
die "unable to get bridge setting\n" if !$bridge;
my $bridgemtu = &$read_bridge_mtu($bridge);
sub tap_plug {
my ($iface, $bridge, $tag, $firewall, $trunks, $rate) = @_;
- if ($have_sdn) {
- my ($bridgesdn, $tag) = PVE::Network::SDN::Zones::get_bridge_vlan($bridge);
- $bridge = $bridgesdn if $bridgesdn;
- $trunks = undef;
- }
-
#cleanup old port config from any openvswitch bridge
eval {run_command("/usr/bin/ovs-vsctl del-port $iface", outfunc => sub {}, errfunc => sub {}) };