Lines Matching refs:fname
123 FILE: foreach $fname (grep {/\.(pem)|(crt)|(cer)|(crl)$/} @flist) {
125 my ($cert, $crl) = check_file($fname);
127 print STDERR "WARNING: $fname does not contain a certificate or CRL: skipping\n";
130 link_hash_cert($fname) if ($cert);
131 link_hash_crl($fname) if ($crl);
137 my $fname = $_[0];
138 open IN, $fname;
163 my $fname = $_[0];
164 $fname =~ s/\"/\\\"/g;
165 my ($hash, $fprint) = `"$openssl" x509 $x509hash -fingerprint -noout -in "$fname"`;
175 print STDERR "WARNING: Skipping duplicate certificate $fname\n";
182 print "link $fname -> $hash\n" if $verbose;
183 symlink $fname, $hash || warn "Can't symlink, $!";
216 print STDERR "WARNING: Skipping duplicate CRL $fname\n";
223 print "link $fname -> $hash\n" if $verbose;
224 symlink $fname, $hash || warn "Can't symlink, $!";
226 print "cp $fname -> $hash\n" if $verbose;
227 system ("cp", $fname, $hash);