+ &$activate_interface($veth);
+ &$activate_interface($vethpeer);
+}
+
+sub veth_delete {
+ my ($veth) = @_;
+
+ if (-d "/sys/class/net/$veth") {
+ run_command("/sbin/ip link delete dev $veth", outfunc => sub {}, errfunc => sub {});
+ }
+
+}
+
+my $create_firewall_bridge_linux = sub {
+ my ($iface, $bridge, $tag) = @_;
+
+ my ($vmid, $devid) = &$parse_tap_device_name($iface);
+ my ($fwbr, $vethfw, $vethfwpeer) = &$compute_fwbr_names($vmid, $devid);
+
+ &$cond_create_bridge($fwbr);
+ &$activate_interface($fwbr);
+
+ copy_bridge_config($bridge, $fwbr);
+ veth_create($vethfw, $vethfwpeer, $bridge);