ldap-server/bootup.cgi

   1 #!/usr/local/bin/perl
   2 # Enable or disable the LDAP server at boot
   3
   4 require './ldap-server-lib.pl';
   5 &error_setup($text{'bootup_err'});
   6 &local_ldap_server() == 1 || &error($text{'slapd_elocal'});
   7 $access{'start'} || &error($text{'bootup_ecannot'});
   8 &ReadParse();
   9
  10 &foreign_require("init", "init-lib.pl");
  11 $iname = $config{'init_name'} || $module_name;
  12 if ($in{'boot'}) {
  13         $pidfile = &get_ldap_server_pidfile();
  14         &init::enable_at_boot($iname, "Start OpenLDAP server",
  15                               "$config{'slapd'} 2>&1 </dev/null",
  16                               "kill `cat $pidfile`");
  17         }
  18 else {
  19         &init::disable_at_boot($iname);
  20         }
  21 &webmin_log("boot", undef, $in{'boot'});
  22 &redirect("");
  23