ipfw/unapply.cgi

   1 #!/usr/local/bin/perl
   2 # unapply.cgi
   3 # Copy the active firewall configuration to the save file
   4
   5 require './ipfw-lib.pl';
   6 &lock_file($ipfw_file);
   7 &system_logged("$config{'ipfw'} list > $ipfw_file");
   8 &unlock_file($ipfw_file);
   9 &webmin_log("unapply");
  10 &redirect("");
  11