Files
webmin/ldap-server/bootup.cgi
2007-12-15 00:37:55 +00:00

25 lines
673 B
Perl

#!/usr/local/bin/perl
# Enable or disable the LDAP server at boot
require './ldap-server-lib.pl';
&error_setup($text{'bootup_err'});
&local_ldap_server() == 1 || &error($text{'slapd_elocal'});
$access{'start'} || &error($text{'bootup_ecannot'});
&ReadParse();
&foreign_require("init", "init-lib.pl");
$iname = $config{'init_name'} || $module_name;
if ($in{'boot'}) {
$conf = &get_config();
$pidfile = &find_value("pidfile", $conf);
&init::enable_at_boot($iname, "Start OpenLDAP server",
"$config{'slapd'} 2>&1 </dev/null",
"kill `cat $pidfile`");
}
else {
&init::disable_at_boot($iname);
}
&webmin_log("boot", undef, $in{'boot'});
&redirect("");