version 1.4, 2019/07/18 00:28:04
|
version 1.5, 2023/05/14 18:44:57
|
Line 176 END
|
Line 176 END
|
} else { |
} else { |
print "A lonca directory is required, but no directory exists\n"; |
print "A lonca directory is required, but no directory exists\n"; |
exit; |
exit; |
} |
} |
if (-e "$dir/lonca/opensslca.conf") { |
if (-e "$dir/lonca/opensslca.conf") { |
# retrieve existing config file and verify that if contains the required fields. |
# retrieve existing config file and verify that if contains the required fields. |
%data = &parse_config("$dir/lonca/opensslca.conf"); |
%data = &parse_config("$dir/lonca/opensslca.conf"); |
Line 196 END
|
Line 196 END
|
|
|
A configuration file: $dir/lonca/opensslca.conf will be created. |
A configuration file: $dir/lonca/opensslca.conf will be created. |
|
|
The following information will be included: |
The following information will be included: |
Country, State/Province, City, Cluster Name, Organizational Name, E-mail address, Default certificate lifetime (days), CRL re-creation interval (days) |
Country, State/Province, City, Cluster Name, Organizational Name, E-mail address, Default certificate lifetime (days), CRL re-creation interval (days) |
|
|
END |
END |
Line 347 END
|
Line 347 END
|
} else { |
} else { |
exit; |
exit; |
} |
} |
} |
} |
} else { |
} else { |
$sslkeypass = &get_new_sslkeypass(); |
$sslkeypass = &get_new_sslkeypass(); |
# generate SSL key |
# generate SSL key |
Line 441 END
|
Line 441 END
|
chmod $mode, "$dir/lonca/index.txt"; |
chmod $mode, "$dir/lonca/index.txt"; |
} else { |
} else { |
print "lonca/index.txt file is missing\n"; |
print "lonca/index.txt file is missing\n"; |
exit; |
exit; |
} |
} |
|
|
my $defcrlsel = 1; |
my $defcrlsel = 1; |
if (!-e "$dir/lonca/crl/loncapaCAcrl.pem") { |
if (!-e "$dir/lonca/crl/loncapaCAcrl.pem") { |