diff options
author | Rob Austein <sra@hactrn.net> | 2006-08-22 22:29:40 +0000 |
---|---|---|
committer | Rob Austein <sra@hactrn.net> | 2006-08-22 22:29:40 +0000 |
commit | 07a34d268251758d0b2ea3ac7a61354182a7f26e (patch) | |
tree | 31cbbbe7e087e8947a09c7e50b9b77bb17d187ce /scripts/make-hashes.pl | |
parent | be77fd772f0c179bccee81da94cd5fe8fc3483f4 (diff) |
# on 2006/08/12 03:43:03, sra did:
CRLs get a "r" stuck into the suffix.
svn path=/scripts/make-hashes.pl; revision=206
Diffstat (limited to 'scripts/make-hashes.pl')
-rw-r--r-- | scripts/make-hashes.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/scripts/make-hashes.pl b/scripts/make-hashes.pl index 07de9142..c5fb44fa 100644 --- a/scripts/make-hashes.pl +++ b/scripts/make-hashes.pl @@ -16,9 +16,11 @@ chomp(@files); print("test -d $dir || mkdir $dir\n"); for my $f (@files) { - my $prog = ($f =~ /\.cer$/) ? "x509" : "crl"; - my $h = `$openssl $prog -inform DER -in $f -noout -hash`; + my $type = ($f =~ /\.cer$/) ? "x509" : "crl"; + my $h = `$openssl $type -inform DER -in $f -noout -hash`; chomp($h); + $h .= "."; + $h .= "r" if ($type eq "crl"); my $n = 0 + $count{$h}++; - print("$openssl $prog -inform DER -outform PEM -out $dir/$h.$n -in $f\n"); + print("$openssl $type -inform DER -outform PEM -out $dir/$h$n -in $f\n"); } |