summaryrefslogtreecommitdiff
path: root/cacert/scripts/findnull.pl
diff options
context:
space:
mode:
authorMarkus Warg <mw@it-sls.de>2010-03-11 15:20:31 +0100
committerMarkus Warg <mw@it-sls.de>2010-03-11 15:20:31 +0100
commit725d28c39fafd8719a43525930d7861141e9a53e (patch)
treea7440e9368aba13a64c771a45a9e159408b8f81e /cacert/scripts/findnull.pl
parentdf92c83b625715f223070d5d9c9e3f5b814560ec (diff)
downloadcacert-devel-725d28c39fafd8719a43525930d7861141e9a53e.tar.gz
cacert-devel-725d28c39fafd8719a43525930d7861141e9a53e.tar.xz
cacert-devel-725d28c39fafd8719a43525930d7861141e9a53e.zip
source code taken from cacert-20100204.tar.bz2 part 2
Diffstat (limited to 'cacert/scripts/findnull.pl')
-rw-r--r--cacert/scripts/findnull.pl14
1 files changed, 14 insertions, 0 deletions
diff --git a/cacert/scripts/findnull.pl b/cacert/scripts/findnull.pl
new file mode 100644
index 0000000..02df02f
--- /dev/null
+++ b/cacert/scripts/findnull.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl -w
+
+foreach (<../crt/*>)
+{
+ my $res=`openssl x509 -in $_ -text -noout -inform der`;
+ if($res=~m/\\x00/)
+ {
+ print "Alert: $_ is affected!\n";
+ }
+ else
+ {
+ #print "$_ not affected\n";
+ }
+}