postfix/acl_security.pl

   1
   2 require 'postfix-lib.pl';
   3 @acl_pages = ("resource", "address_rewriting", "aliases", "general",
   4               "canonical", "virtual", "transport", "relocated", "header","body",
   5               "bcc", "local_delivery", "smtpd", "sasl", "client", "smtp",
   6               "rate", "debug", "ldap",
   7               "master", "startstop", "mailq", "postfinger", "manual");
   8
   9 # Print the form for security options of postfix module
  10 sub acl_security_form
  11 {
  12 local $o;
  13 foreach $o (@acl_pages) {
  14         print &ui_table_row($text{'acl_'.$o},
  15                             &ui_yesno_radio($o, $_[0]->{$o} ? 1 : 0));
  16         }
  17 print &ui_table_row($text{'acl_dir'},
  18                     &ui_textbox("dir", $_[0]->{'dir'}, 50));
  19 }
  20
  21
  22 # acl_security_save(&options)
  23 # Parse the form for security options for the postfix module
  24 sub acl_security_save
  25 {
  26 local $o;
  27 foreach $o (@acl_pages) {
  28         $_[0]->{$o} = $in{$o};
  29         }
  30 $_[0]->{'dir'} = $in{'dir'};
  31 }
  32
  33