Файловый менеджер - Редактировать - /usr/share/webmin/usermin/change_ssl.cgi
Назад
#!/usr/bin/perl # change_ssl.cgi # Enable or disable SSL support require './usermin-lib.pl'; &ReadParse(); &error_setup($text{'ssl_err'}); &lock_file($usermin_miniserv_config); &get_usermin_miniserv_config(\%miniserv); $sslcurr = $miniserv{'ssl'}; $miniserv{'ssl'} = $in{'ssl'}; $miniserv{'ssl_hsts'} = ($in{'ssl'} && $in{'ssl_hsts'}) ? 1 : 0; &webmin::validate_key_cert($in{'key'}, $in{'cert_def'} ? undef : $in{'cert'}); $miniserv{'keyfile'} = $in{'key'}; $miniserv{'certfile'} = $in{'cert_def'} ? undef : $in{'cert'}; $miniserv{'ssl_redirect'} = $in{'ssl_redirect'}; $miniserv{'no_sslcompression'} = !$in{'ssl_compression'}; $miniserv{'ssl_honorcipherorder'} = $in{'ssl_honorcipherorder'}; if ($in{'version_def'}) { delete($miniserv{'ssl_version'}); } else { $in{'version'} =~ /^\d+$/ || &error($text{'ssl_eversion'}); $miniserv{'ssl_version'} = $in{'version'}; } $miniserv{'no_ssl2'} = $in{'no_ssl2'}; $miniserv{'no_ssl3'} = $in{'no_ssl3'}; $miniserv{'no_tls1'} = $in{'no_tls1'}; $miniserv{'no_tls1_1'} = $in{'no_tls1_1'}; $miniserv{'no_tls1_2'} = $in{'no_tls1_2'}; if ($in{'cipher_list_def'} == 1) { delete($miniserv{'ssl_cipher_list'}); } elsif ($in{'cipher_list_def'} == 2) { $miniserv{'ssl_cipher_list'} = $webmin::strong_ssl_ciphers; } elsif ($in{'cipher_list_def'} == 3) { # Check for PFS support eval "use Net::SSLeay"; $Net::SSLeay::VERSION >= 1.57 || &error(&text('ssl_epfsversion', $Net::SSLeay::VERSION, 1.57)); $miniserv{'ssl_cipher_list'} = $webmin::pfs_ssl_ciphers; $miniserv{'dhparams_file'} ||= "$config{'usermin_dir'}/dhparams.pem"; if (!-r $miniserv{'dhparams_file'}) { # Generate file needed for PFS my $out = &backquote_command( "openssl dhparam -out ". quotemeta($miniserv{'dhparams_file'})." 2048 2>&1"); if ($?) { &error(&text('ssl_edhparams', "<pre>".&html_escape($out)."</pre>")); } &set_ownership_permissions( undef, undef, 700, $miniserv{'dhparams_file'}); } } else { $in{'cipher_list'} =~ /^\S+$/ || &error($text{'ssl_ecipher_list'}); $miniserv{'ssl_cipher_list'} = $in{'cipher_list'}; } foreach $ec (split(/[\r\n]+/, $in{'extracas'})) { -r $ec && !-d $ec || &error(&text('ssl_eextraca', $ec)); push(@extracas, $ec); } $miniserv{'extracas'} = join("\t", @extracas); &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("ssl", undef, undef, \%in); &redirect("");
| ver. 1.4 |
Github
|
.
| PHP 7.4.3-4ubuntu2.28 | Генерация страницы: 0.01 |
proxy
|
phpinfo
|
Настройка