acl/save_sync.cgi

   1 #!/usr/local/bin/perl
   2 # save_sync.cgi
   3 # Save unix/webmin user synchronization
   4
   5 require './acl-lib.pl';
   6 &ReadParse();
   7 $access{'sync'} && $access{'create'} && $access{'delete'} ||
   8         &error($text{'sync_ecannot'});
   9 &lock_file("$module_config_directory/config");
  10 $config{'sync_create'} = $in{'create'};
  11 $config{'sync_delete'} = $in{'delete'};
  12 $config{'sync_unix'} = $in{'unix'};
  13 $config{'sync_group'} = $in{'group'};
  14 &write_file("$module_config_directory/config", \%config);
  15 &unlock_file("$module_config_directory/config");
  16 &webmin_log("sync");
  17 &redirect("");
  18