diff options
Diffstat (limited to 'secure/lib/libdes/PC1')
-rw-r--r-- | secure/lib/libdes/PC1 | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/secure/lib/libdes/PC1 b/secure/lib/libdes/PC1 deleted file mode 100644 index efb8348b72d7..000000000000 --- a/secure/lib/libdes/PC1 +++ /dev/null @@ -1,28 +0,0 @@ -#!/usr/local/bin/perl - -@PC1=( 57,49,41,33,25,17, 9, - 1,58,50,42,34,26,18, - 10, 2,59,51,43,35,27, - 19,11, 3,60,52,44,36, - "-","-","-","-", - 63,55,47,39,31,23,15, - 7,62,54,46,38,30,22, - 14, 6,61,53,45,37,29, - 21,13, 5,28,20,12, 4, - "-","-","-","-", - ); - -foreach (@PC1) - { - if ($_ ne "-") - { - $_--; - $_=int($_/8)*8+7-($_%8); - printf "%2d ",$_; - } - else - { print "-- "; } - print "\n" if (((++$i) % 8) == 0); - print "\n" if ((($i) % 32) == 0); - } - |