equal
deleted
inserted
replaced
13 # |
13 # |
14 # Description: |
14 # Description: |
15 # This script converts certificate constraint extensions specified in an INI |
15 # This script converts certificate constraint extensions specified in an INI |
16 # format into a hex representation of the DER encoding that OpenSSL can |
16 # format into a hex representation of the DER encoding that OpenSSL can |
17 # add to a certificate. |
17 # add to a certificate. |
18 # This script allows corrupt certificate extensions to be generated for unit |
|
19 # testing and therefore using this script to create production certificates is |
|
20 # NOT supported. |
|
21 # |
|
22 #!/bin/perl -w |
|
23 |
|
24 use strict; |
18 use strict; |
25 use Getopt::Long; |
19 use Getopt::Long; |
26 |
20 |
27 my $OID_DEVICE_ID_LIST="1.2.826.0.1.1796587.1.1.1.1"; |
21 my $OID_DEVICE_ID_LIST="1.2.826.0.1.1796587.1.1.1.1"; |
28 my $OID_SID_LIST="1.2.826.0.1.1796587.1.1.1.4"; |
22 my $OID_SID_LIST="1.2.826.0.1.1796587.1.1.1.4"; |