Private

Server IP : 195.201.23.43 / Your IP : 13.59.115.106
Web Server : Apache
System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64
User : kdecoratie ( 1041)
PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,
MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON
Directory : /usr/share/webmin/usermin/

Upload File :

[ HOME SHELL ]

Current File : /usr/share/webmin/usermin/copycert.cgi

#!/usr/bin/perl
# Copy Webmin's SSL settings

require './usermin-lib.pl';
&ReadParse();
&error_setup($text{'copycert_err'});

&get_miniserv_config(\%wminiserv);
$wminiserv{'ssl'} || &error($text{'copycert_essl'});
$wminiserv{'keyfile'} || &error($text{'copycert_ekeyfile'});

&lock_file($usermin_miniserv_config);
&get_usermin_miniserv_config(\%miniserv);

# Copy across the key file
$miniserv{'keyfile'} ||= $config{'usermin_dir'}."/miniserv.pem";
if ($miniserv{'keyfile'} ne $wminiserv{'keyfile'}) {
	&lock_file($miniserv{'keyfile'});
	&copy_source_dest($wminiserv{'keyfile'},
			  $miniserv{'keyfile'});
	&unlock_file($miniserv{'keyfile'});
	}
if ($wminiserv{'certfile'}) {
	$miniserv{'certfile'} ||= $config{'usermin_dir'}."/miniserv.cert";
	if ($miniserv{'certfile'} ne $wminiserv{'certfile'}) {
		&lock_file($miniserv{'certfile'});
		&copy_source_dest($wminiserv{'certfile'},
				  $miniserv{'certfile'});
		&unlock_file($miniserv{'certfile'});
		}
	}
else {
	delete($miniserv{'certfile'});
	}

# Copy other settings
$miniserv{'ssl'} = $wminiserv{'ssl'};
$miniserv{'ssl_redirect'} = $wminiserv{'ssl_redirect'};
$miniserv{'ssl_version'} = $wminiserv{'ssl_version'};
$miniserv{'ssl_cipher_list'} = $wminiserv{'ssl_cipher_list'};
$miniserv{'extracas'} = $wminiserv{'extracas'};

# Copy per-IP certs
@ipkeys = &webmin::get_ipkeys(\%wminiserv);
&webmin::save_ipkeys(\%miniserv, \@ipkeys);

&put_usermin_miniserv_config(\%miniserv);
&unlock_file($usermin_miniserv_config);

$SIG{'TERM'} = 'IGNORE';	# stop process from being killed by restart
&restart_usermin_miniserv();
&webmin_log("copycert");

&redirect("");

Private