use strict;
use lib qw(.);
use PVE::Firewall;
+use File::Path;
my $vmdata = {
qemu => {
102 => {
zone => 'z1',
net0 => 'rtl8139=0E:9D:ED:CC:AA:ED,bridge=vmbr0',
+ net1 => 'rtl8139=0E:9D:ED:CC:CC:ED,bridge=vmbr1',
},
103 => {
zone => 'z1',
},
};
-PVE::Firewall::compile($vmdata);
+my $testdir = "./testdir";
+rmtree($testdir);
+mkdir $testdir;
+
+PVE::Firewall::compile($testdir, $vmdata);
+
+PVE::Tools::run_command(['shorewall', 'check', $testdir]);
exit(0);