warn $@ if $@; # avoid errors - just warn
}
+sub net_tap_plug : prototype($$$$$$;$) {
+ my ($iface, $bridge, $tag, $firewall, $trunks, $rate, $opts) = @_;
+
+ if ($have_sdn) {
+ PVE::Network::SDN::Zones::tap_plug($iface, $bridge, $tag, $firewall, $trunks, $rate);
+ PVE::Network::SDN::Zones::add_bridge_fdb($iface, $opts->{mac}, $bridge, $firewall)
+ if defined($opts->{mac});
+ } else {
+ PVE::Network::tap_plug($iface, $bridge, $tag, $firewall, $trunks, $rate, $opts);
+ }
+}
+
sub update_net {
my ($vmid, $conf, $opt, $newnet, $netid, $rootdir) = @_;
}
my ($bridge, $mac, $firewall, $rate) = $newnet->@{'bridge', 'hwaddr', 'firewall', 'rate'};
- if ($have_sdn) {
- PVE::Network::SDN::Zones::tap_plug(
- $veth, $bridge, $newnet->{tag}, $firewall, $newnet->{trunks}, $rate);
- PVE::Network::SDN::Zones::add_bridge_fdb($veth, $mac, $bridge, $firewall);
- } else {
- PVE::Network::tap_plug(
- $veth, $bridge, $newnet->{tag}, $firewall, $newnet->{trunks}, $rate, { mac => $mac });
- }
+ PVE::LXC::net_tap_plug($veth, $bridge, $newnet->{tag}, $firewall, $newnet->{trunks}, $rate, { mac => $mac });
# This includes the rate:
foreach (qw(bridge tag firewall rate)) {
if ($have_sdn) {
PVE::Network::SDN::Zones::veth_create($veth, $vethpeer, $newnet->{bridge}, $newnet->{hwaddr});
- PVE::Network::SDN::Zones::tap_plug($veth, $newnet->{bridge}, $newnet->{tag}, $newnet->{firewall}, $newnet->{trunks}, $newnet->{rate});
- PVE::Network::SDN::Zones::add_bridge_fdb($veth, $newnet->{hwaddr}, $newnet->{bridge}, $newnet->{firewall});
} else {
PVE::Network::veth_create($veth, $vethpeer, $newnet->{bridge}, $newnet->{hwaddr});
- PVE::Network::tap_plug($veth, $newnet->{bridge}, $newnet->{tag}, $newnet->{firewall}, $newnet->{trunks}, $newnet->{rate});
- PVE::Network::add_bridge_fdb($veth, $newnet->{hwaddr}, $newnet->{firewall}); # early returns if brport has learning on
}
+ PVE::LXC::net_tap_plug(
+ $veth, $newnet->{bridge}, $newnet->{tag}, $newnet->{firewall}, $newnet->{trunks},
+ $newnet->{rate}, { mac => $newnet->{hwaddr} });
# attach peer in container
my $cmd = ['lxc-device', '-n', $vmid, 'add', $vethpeer, "$eth" ];
use PVE::LXC;
use PVE::Tools qw(run_command);
-use PVE::Network;
use PVE::ProcFSTools;
-my $have_sdn;
-eval {
- require PVE::Network::SDN::Zones;
- $have_sdn = 1;
-};
-
die "got unexpected argument count\n" if scalar(@ARGV) != 5;
my ($vmid, $arg2, $arg3, $type, $iface) = @ARGV;
my $bridge = $net->{bridge};
my $trunks = $net->{trunks};
my $rate = $net->{rate};
+my $hwaddr = $net->{hwaddr};
die "missing bridge configuration" if !$bridge;
PVE::Tools::run_command("/sbin/ip link set dev $iface up mtu $bridgemtu");
PVE::Tools::run_command("/sbin/ip addr add 0.0.0.0/0 dev $iface");
- if ($have_sdn) {
- PVE::Network::SDN::Zones::tap_plug($iface, $bridge, $tag, $firewall, $trunks, $rate);
- PVE::Network::SDN::Zones::add_bridge_fdb($iface, $net->{hwaddr}, $bridge, $firewall);
- } else {
- PVE::Network::tap_plug($iface, $bridge, $tag, $firewall, $trunks, $rate, { mac => $net->{hwaddr}});
- }
+ PVE::LXC::net_tap_plug($iface, $bridge, $tag, $firewall, $trunks, $rate, { mac => $hwaddr });
}
exit 0;