| Server IP : 134.236.49.22 / Your IP : 216.73.216.114 Web Server : Apache/2.2.15 (Fedora) System : Linux km10.dyndns.org 2.6.31.5-127.fc12.i686.PAE #1 SMP Sat Nov 7 21:25:57 EST 2009 i686 User : apache ( 48) PHP Version : 5.3.3 Disable Function : NONE MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/libexec/webmin/ldap-server/ |
Upload File : |
#!/usr/bin/perl
# Save included schema files
require './ldap-server-lib.pl';
&error_setup($text{'schema_err'});
$access{'schema'} || &error($text{'schema_ecannot'});
&local_ldap_server() == 1 || &error($text{'slapd_elocal'});
&ReadParse();
# Get non-schema includes
$conf = &get_config();
foreach $i (&find_value("include", $conf)) {
if ($i !~ /^(.*)\/(\S+)$/ || $1 ne $config{'schema_dir'} ||
$2 eq 'core.schema') {
push(@incs, $i);
}
}
# Build new list of includes
push(@incs, split(/\0/, $in{'d'}));
@incs = &unique(@incs);
# Write out
&lock_slapd_files();
&save_directive($conf, "include", @incs);
&flush_file_lines($config{'config_file'});
&unlock_slapd_files();
&webmin_log("schema");
&redirect("");