cacert/cacert-webdb
9
0
Fork 0
Code Issues Pull requests 3 Projects Releases 4 Wiki Activity

Searching for Exponents

Browse source
This commit is contained in:
root 2008-01-13 13:55:32 +00:00
parent a5894917d7
commit 550cea3d47
1 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
scripts/findexp3.pl Normal file
View file

@ -0,0 +1,14 @@
#!/usr/bin/perl -w
foreach (<../crt/*>)
{
my $res=`openssl x509 -in $_ -text -noout`;
if($res=~m/Exponent: 65537 /)
{
print "Alert: $_ is affected!\n";
}
else
{
#print "$_ not affected\n";
}
}