ldap-server/perms.cgi

   1 #!/usr/local/bin/perl
   2 # Fix file ownership, and then restart if running
   3
   4 require './ldap-server-lib.pl';
   5 &ReadParse();
   6 &error_setup($text{'perms_err'});
   7 $access{'slapd'} || &error($text{'slapd_ecannot'});
   8
   9 &system_logged("chown -R $config{'ldap_user'} ".quotemeta($config{'data_dir'}));
  10 if (&is_ldap_server_running()) {
  11         &stop_ldap_server();
  12         $err = &start_ldap_server();
  13         &error($err) if ($err);
  14         }
  15 &webmin_log("perms");
  16 &redirect("");
  17