michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-05-04 22:30:33 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Allow setting of per-IP SSL chain

Browse Source
This commit is contained in:
Jamie Cameron
2011-08-02 16:57:46 -07:00
parent 4f24a14212
commit bf7451aa8c
2 changed files with 27 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
usermin/edit_ipkey.cgi
View File

@@ -31,6 +31,19 @@ print &ui_table_row($text{'ssl_cert'},
$text{'ssl_cert_def'})."\n".
&file_chooser_button("cert"));
$mode = $ipkey->{'extracas'} eq "none" ? 2 :
$ipkey->{'extracas'} ? 1 : 0;
print &ui_table_row($text{'ssl_extracas'},
&ui_radio("extracas_mode", $mode,
[ [ 0, $text{'ssl_extracasdef'} ],
[ 2, $text{'ssl_extracasnone'} ],
[ 1, $text{'ssl_extracasbelow'} ] ])."<br>\n".
&ui_textarea("extracas",
$mode == 1 ? join("\n",split(/\s+/, $ipkey->{'extracas'}))
: "",
3, 60)." ".
&file_chooser_button("extracas", 0, undef, undef, 1));
print &ui_table_end();
if ($in{'new'}) {
print &ui_form_end([ [ "create", $text{'create'} ] ]);

14
usermin/save_ipkey.cgi
View File

@@ -29,6 +29,20 @@ else {
&webmin::validate_key_cert($in{'key'}, $in{'cert_def'} ? undef : $in{'cert'});
$ipkey->{'key'} = $in{'key'};
$ipkey->{'cert'} = $in{'cert_def'} ? undef : $in{'cert'};
if ($in{'extracas_mode'} == 0) {
delete($ipkey->{'extracas'});
}
elsif ($in{'extracas_mode'} == 2) {
$ipkey->{'extracas'} = 'none';
}
else {
@files = split(/\s+/, $in{'extracas'});
@files || &error($text{'ipkey_eextracas'});
foreach $f (@files) {
-r $f || &error(&text('ipkey_eextraca', $f));
}
$ipkey->{'extracas'} = join(' ', @files);
}
# Save or add
if ($in{'new'}) {