Lines Matching refs:hash
5 # and add symbolic links to their hash values.
111 # Link a certificate to its subject name hash value, each hash is of
112 # the form <hash>.<n> where n is an integer. If the hash value already exists
120 my ($hash, $fprint) = `"$openssl" x509 -hash -fingerprint -noout -in "$fname"`;
121 chomp $hash;
126 # Search for an unused hash filename
127 while(exists $hashlist{"$hash.$suffix"}) {
129 if($hashlist{"$hash.$suffix"} eq $fprint) {
135 $hash .= ".$suffix";
136 print "$fname => $hash\n";
139 symlink $fname, $hash;
142 open OUT,">$hash" or die "can't open $hash for write";
147 $hashlist{$hash} = $fprint;
150 # Same as above except for a CRL. CRL links are of the form <hash>.r<n>
155 my ($hash, $fprint) = `"$openssl" crl -hash -fingerprint -noout -in '$fname'`;
156 chomp $hash;
161 # Search for an unused hash filename
162 while(exists $hashlist{"$hash.r$suffix"}) {
164 if($hashlist{"$hash.r$suffix"} eq $fprint) {
170 $hash .= ".r$suffix";
171 print "$fname => $hash\n";
174 symlink $fname, $hash;
176 system ("cp", $fname, $hash);
178 $hashlist{$hash} = $fprint;