summaryrefslogtreecommitdiff
path: root/scripts/findexp3.pl
diff options
context:
space:
mode:
authorMarkus Warg <mw@it-sls.de>2010-03-29 09:54:06 +0200
committerMarkus Warg <mw@it-sls.de>2010-03-29 09:54:06 +0200
commit9dceece06fbdc98add6f76f0b1aec05891a394c4 (patch)
treef7227c28ca5f79f30c2ec81ba1a09a4fe3972436 /scripts/findexp3.pl
parent5b68967def224a00f54eb54946ff17301bbd3cdb (diff)
downloadcacert-devel-9dceece06fbdc98add6f76f0b1aec05891a394c4.tar.gz
cacert-devel-9dceece06fbdc98add6f76f0b1aec05891a394c4.tar.xz
cacert-devel-9dceece06fbdc98add6f76f0b1aec05891a394c4.zip
remove cacert/ prefix
Diffstat (limited to 'scripts/findexp3.pl')
-rw-r--r--scripts/findexp3.pl14
1 files changed, 14 insertions, 0 deletions
diff --git a/scripts/findexp3.pl b/scripts/findexp3.pl
new file mode 100644
index 0000000..9fcb60d
--- /dev/null
+++ b/scripts/findexp3.pl
@@ -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";
+ }
+}