ldap-server/acl_security.pl

   1
   2 do 'ldap-server-lib.pl';
   3 @acl_functions = ( &get_config_type() == 2 ? 'ldif' : 'slapd',
   4                    'schema', 'acl', 'browser', 'create', 'start', 'apply' );
   5
   6 # acl_security_form(&options)
   7 # Output HTML for editing security options for the acl module
   8 sub acl_security_form
   9 {
  10 foreach my $f (@acl_functions) {
  11         print &ui_table_row($text{'acl_'.$f},
  12                 &ui_yesno_radio($f, $_[0]->{$f}));
  13         }
  14 }
  15
  16 # acl_security_save(&options)
  17 # Parse the form for security options for the acl module
  18 sub acl_security_save
  19 {
  20 foreach my $f (@acl_functions) {
  21         $_[0]->{$f} = $in{$f};
  22         }
  23 }
  24