frox/save_ftp.cgi

   1 #!/usr/local/bin/perl
   2 # Save FTP protocol options
   3
   4 require './frox-lib.pl';
   5 &ReadParse();
   6 &error_setup($text{'ftp_err'});
   7 $conf = &get_config();
   8
   9 &save_yesno($conf, "APConv");
  10 &save_yesno($conf, "PAConv");
  11 !$in{'APConv'} || !$in{'PAConv'} || &error($text{'ftp_econv'});
  12 &save_yesno($conf, "BounceDefend");
  13 &save_yesno($conf, "SameAddress");
  14 &save_yesno($conf, "AllowNonASCII");
  15 &save_yesno($conf, "TransparentData");
  16 &save_opt_range($conf, "ControlPorts");
  17 &save_opt_range($conf, "PassivePorts");
  18 &save_opt_range($conf, "ActivePorts");
  19
  20 &lock_file($config{'frox_conf'});
  21 &flush_file_lines();
  22 &unlock_file($config{'frox_conf'});
  23 &webmin_log("ftp");
  24 &redirect("");
  25