explaining comments and small change-around

This commit is contained in:
Klas Lindfors
2014-02-10 08:56:25 +01:00
parent 95625a5c1c
commit c6d2747f53
+8 -2
View File
@@ -26,6 +26,12 @@
# non-source form of such a combination shall include the source code # non-source form of such a combination shall include the source code
# for the parts of OpenSSL used as well as that of the covered work. # for the parts of OpenSSL used as well as that of the covered work.
# This little perl program takes an input like:
# S9999F9999F999999F0F1F0000000000300001E
# and outputs that in hex, encoded in the 5-bit form described in
# "Technical Implementation Guidance: Smart Card Enabled Physical Access
# Control Systems"
use strict; use strict;
use Bit::Vector; use Bit::Vector;
@@ -40,8 +46,8 @@ my %encoding = (
7 => "01110", 7 => "01110",
8 => "10000", 8 => "10000",
9 => "10011", 9 => "10011",
S => "10110", S => "11010", # the examples and definitions of S and F differ
F => "11010", F => "10110", # but we'll go with the examples here..
E => "11111", E => "11111",
); );