| Server IP : 14.207.165.8 / Your IP : 216.73.216.101 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/thread-self/root/usr/share/webmin/webmin/ |
Upload File : |
require 'webmin-lib.pl';
sub module_install
{
# Update cache of which module's underlying servers are installed
&build_installed_modules();
# Remove the scheduled module update cron, which is now obsolete
&foreign_require("cron");
my @jobs = &cron::list_cron_jobs();
my $job = &find_cron_job(\@jobs);
if ($job) {
&cron::delete_cron_job($job);
&unlink_logged($cron_cmd);
}
# Figure out the preferred cipher mode
&lock_file("$config_directory/miniserv.conf");
my %miniserv;
&get_miniserv_config(\%miniserv);
if (!defined($miniserv{'cipher_list_def'})) {
# No mode set, so guess based on ciphers
my $clist = $miniserv{'ssl_cipher_list'};
my $cmode = !$clist ? 1 :
$clist eq $strong_ssl_ciphers ? 2 :
$clist eq $pfs_ssl_ciphers ? 3 :
0;
$miniserv{'cipher_list_def'} = $cmode;
}
elsif ($miniserv{'cipher_list_def'} == 2 || $miniserv{'cipher_list_def'} == 3) {
# Sync ciphers with Webmin's preferred list
$miniserv{'ssl_cipher_list'} = $miniserv{'cipher_list_def'} == 2 ?
$strong_ssl_ciphers : $pfs_ssl_ciphers;
}
# If this is the first install, enable recording of logins by default
if (!-r $first_install_file || $miniserv{'login_script'} eq $record_login_cmd) {
&foreign_require("cron");
&cron::create_wrapper($record_login_cmd, "", "record-login.pl");
&cron::create_wrapper($record_logout_cmd, "", "record-logout.pl");
&cron::create_wrapper($record_failed_cmd, "", "record-failed.pl");
$miniserv{'login_script'} = $record_login_cmd;
$miniserv{'logout_script'} = $record_logout_cmd;
$miniserv{'failed_script'} = $record_failed_cmd;
}
# Disable trusting SSL certs unless already enabled
if (!$miniserv{'trust_real_ip'} && !defined($miniserv{'no_trust_ssl'})) {
$miniserv{'no_trust_ssl'} = 1;
}
&put_miniserv_config(\%miniserv);
&unlock_file("$config_directory/miniserv.conf");
# Create a link from /usr/sbin/webmin to bin/webmin under the root dir
my $bindir = "/usr/sbin";
my $lnk = $bindir."/webmin";
if (-d $bindir && !-e $lnk) {
&symlink_file($lnk, $root_directory."/bin/webmin");
}
# Record the version of Webmin at first install
if (!-r $first_install_file) {
my %first;
$first{'version'} = &get_webmin_version();
&write_file($first_install_file, \%first);
}
}