summaryrefslogtreecommitdiff
path: root/CommModule/client.pl
diff options
context:
space:
mode:
authorMichael Tänzer <neo@nhng.de>2014-02-04 15:58:59 +0100
committerMichael Tänzer <neo@nhng.de>2014-02-04 15:58:59 +0100
commitaa325469783363f865665ec7e8cfe24e1157059f (patch)
tree4955d6de9ef5893aa5789a3907aeb39ce14b2d28 /CommModule/client.pl
parentf8191d4deddadd7a542007af471157183aa6660e (diff)
downloadcacert-aa325469783363f865665ec7e8cfe24e1157059f.tar.gz
cacert-aa325469783363f865665ec7e8cfe24e1157059f.tar.xz
cacert-aa325469783363f865665ec7e8cfe24e1157059f.zip
Source code taken from cacert-20140115.tar.bz2
Diffstat (limited to 'CommModule/client.pl')
-rwxr-xr-xCommModule/client.pl11
1 files changed, 9 insertions, 2 deletions
diff --git a/CommModule/client.pl b/CommModule/client.pl
index bf92b27..bd3eb02 100755
--- a/CommModule/client.pl
+++ b/CommModule/client.pl
@@ -834,8 +834,15 @@ sub HandleCerts($$)
my $days=$org?($server?(365*2):365):calculateDays($row{"memid"});
-
- $crt=Request($ver,1,1,$row{'rootcert'}-1,$profile,$row{'md'}eq"sha1"?2:0,$days,$row{'keytype'}eq"NS"?1:0,$content,$SAN,$subject);
+ my $md_id = 0;
+ $md_id = 1 if( $row{'md'} eq "md5");
+ $md_id = 2 if( $row{'md'} eq "sha1");
+ $md_id = 3 if( $row{'md'} eq "rmd160");
+ $md_id = 8 if( $row{'md'} eq "sha256");
+ $md_id = 9 if( $row{'md'} eq "sha384");
+ $md_id =10 if( $row{'md'} eq "sha512");
+
+ $crt=Request($ver,1,1,$row{'rootcert'}-1,$profile,$md_id,$days,$row{'keytype'}eq"NS"?1:0,$content,$SAN,$subject);
if(length($crt))
{
if($crt=~m/^-----BEGIN CERTIFICATE-----/)