Artifact
45a26280f71036b82475d9b1e8f84cef4bc103cc3f27b67b867525b29e91d36b:
0000: 23 20 41 75 74 6f 20 67 65 6e 65 72 61 74 65 64 # Auto generated
0010: 20 66 72 6f 6d 20 22 44 45 53 2e 74 78 74 22 0a from "DES.txt".
0020: 6c 61 70 70 65 6e 64 20 61 75 74 6f 5f 70 61 74 lappend auto_pat
0030: 68 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 h [file dirname
0040: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 [file dirname [f
0050: 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c ile dirname [fil
0060: 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 e dirname [file
0070: 6a 6f 69 6e 20 5b 70 77 64 5d 20 5b 69 6e 66 6f join [pwd] [info
0080: 20 73 63 72 69 70 74 5d 5d 5d 5d 5d 5d 0a 70 61 script]]]]]].pa
0090: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 74 6c ckage require tl
00a0: 73 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 s.package requir
00b0: 65 20 74 63 6c 74 65 73 74 0a 0a 63 61 74 63 68 e tcltest..catch
00c0: 20 7b 74 6c 73 3a 3a 70 72 6f 76 69 64 65 72 20 {tls::provider
00d0: 6c 65 67 61 63 79 7d 0a 74 63 6c 74 65 73 74 3a legacy}.tcltest:
00e0: 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 :testConstraint
00f0: 44 45 53 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 DES [expr {[lsea
0100: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 rch -nocase [tls
0110: 3a 3a 63 69 70 68 65 72 73 5d 20 44 45 53 5d 20 ::ciphers] DES]
0120: 3e 20 2d 31 7d 5d 0a 0a 74 63 6c 74 65 73 74 3a > -1}]..tcltest:
0130: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 :test Symetric_B
0140: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 20 7b 45 6e lock_DES-1.1 {En
0150: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
0160: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
0170: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
0180: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
0190: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
01a0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
01b0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
01c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 30 33 y decode hex 103
01d0: 31 36 45 30 32 38 43 38 46 33 42 34 41 5d 20 5c 16E028C8F3B4A] \
01e0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
01f0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 y decode hex 000
0200: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 0000000000000]]}
0210: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
0220: 20 2d 72 65 73 75 6c 74 20 38 32 64 63 62 61 66 -result 82dcbaf
0230: 62 64 65 61 62 36 36 30 32 0a 0a 74 63 6c 74 65 bdeab6602..tclte
0240: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
0250: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 20 c_Block_DES-1.2
0260: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
0270: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
0280: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
0290: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
02a0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
02b0: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
02c0: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
02d0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
02e0: 31 30 33 31 36 45 30 32 38 43 38 46 33 42 34 41 10316E028C8F3B4A
02f0: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
0300: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
0310: 38 32 44 43 42 41 46 42 44 45 41 42 36 36 30 32 82DCBAFBDEAB6602
0320: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
0330: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 act -result 0000
0340: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 000000000000..tc
0350: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
0360: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
0370: 2e 33 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d .3 {Encrypt DES}
0380: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0390: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 DES \..-body {b
03a0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 inary encode hex
03b0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d [tls::encrypt -
03c0: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 cipher DES -padd
03d0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
03e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
03f0: 65 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 ex 0101010101010
0400: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 101] \... -data
0410: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
0420: 65 78 20 39 35 46 38 41 35 45 35 44 44 33 31 44 ex 95F8A5E5DD31D
0430: 39 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 900]]} \..-match
0440: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 exact -result 8
0450: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 000000000000000.
0460: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 .tcltest::test S
0470: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 ymetric_Block_DE
0480: 53 2d 31 2e 34 20 7b 44 65 63 72 79 70 74 20 44 S-1.4 {Decrypt D
0490: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
04a0: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
04b0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
04c0: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
04d0: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
04e0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
04f0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
0500: 65 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 e hex 0101010101
0510: 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 010101] \... -da
0520: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0530: 65 20 68 65 78 20 38 30 30 30 30 30 30 30 30 30 e hex 8000000000
0540: 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 000000]]} \..-ma
0550: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0560: 74 20 39 35 66 38 61 35 65 35 64 64 33 31 64 39 t 95f8a5e5dd31d9
0570: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 00..tcltest::tes
0580: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
0590: 5f 44 45 53 2d 31 2e 35 20 7b 45 6e 63 72 79 70 _DES-1.5 {Encryp
05a0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
05b0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
05c0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
05d0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 de hex [tls::enc
05e0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
05f0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
0600: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
0610: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
0620: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
0630: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0640: 63 6f 64 65 20 68 65 78 20 44 44 37 46 31 32 31 code hex DD7F121
0650: 43 41 35 30 31 35 36 31 39 5d 5d 7d 20 5c 0a 09 CA5015619]]} \..
0660: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0670: 73 75 6c 74 20 34 30 30 30 30 30 30 30 30 30 30 sult 40000000000
0680: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 00000..tcltest::
0690: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
06a0: 6f 63 6b 5f 44 45 53 2d 31 2e 36 20 7b 44 65 63 ock_DES-1.6 {Dec
06b0: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
06c0: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
06d0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
06e0: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
06f0: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
0700: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
0710: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
0720: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 decode hex 0101
0730: 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 010101010101] \.
0740: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
0750: 20 64 65 63 6f 64 65 20 68 65 78 20 34 30 30 30 decode hex 4000
0760: 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 000000000000]]}
0770: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0780: 2d 72 65 73 75 6c 74 20 64 64 37 66 31 32 31 63 -result dd7f121c
0790: 61 35 30 31 35 36 31 39 0a 0a 74 63 6c 74 65 73 a5015619..tcltes
07a0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
07b0: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 37 20 7b _Block_DES-1.7 {
07c0: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 Encrypt DES} \..
07d0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 -constraints DES
07e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
07f0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
0800: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 s::encrypt -ciph
0810: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 er DES -padding
0820: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 0 \... -key [bin
0830: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
0840: 31 30 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 101010101010101]
0850: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e \... -data [bin
0860: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 ary decode hex 2
0870: 45 38 36 35 33 31 30 34 46 33 38 33 34 45 41 5d E8653104F3834EA]
0880: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 ]} \..-match exa
0890: 63 74 20 2d 72 65 73 75 6c 74 20 32 30 30 30 30 ct -result 20000
08a0: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 00000000000..tcl
08b0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 test::test Symet
08c0: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e ric_Block_DES-1.
08d0: 38 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 8 {Decrypt DES}
08e0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
08f0: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
0900: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
0910: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
0920: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
0930: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
0940: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0950: 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 x 01010101010101
0960: 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 01] \... -data [
0970: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0980: 78 20 32 30 30 30 30 30 30 30 30 30 30 30 30 30 x 20000000000000
0990: 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 00]]} \..-match
09a0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 65 exact -result 2e
09b0: 38 36 35 33 31 30 34 66 33 38 33 34 65 61 0a 0a 8653104f3834ea..
09c0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
09d0: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
09e0: 2d 31 2e 39 20 7b 45 6e 63 72 79 70 74 20 44 45 -1.9 {Encrypt DE
09f0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
0a00: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
0a10: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
0a20: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
0a30: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
0a40: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
0a50: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
0a60: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
0a70: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
0a80: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
0a90: 20 68 65 78 20 34 42 44 33 38 38 46 46 36 43 44 hex 4BD388FF6CD
0aa0: 38 31 44 34 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 81D4F]]} \..-mat
0ab0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0ac0: 20 31 30 30 30 30 30 30 30 30 30 30 30 30 30 30 100000000000000
0ad0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
0ae0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
0af0: 44 45 53 2d 31 2e 31 30 20 7b 44 65 63 72 79 70 DES-1.10 {Decryp
0b00: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
0b10: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
0b20: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
0b30: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
0b40: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
0b50: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
0b60: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
0b70: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
0b80: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
0b90: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0ba0: 63 6f 64 65 20 68 65 78 20 31 30 30 30 30 30 30 code hex 1000000
0bb0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
0bc0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0bd0: 73 75 6c 74 20 34 62 64 33 38 38 66 66 36 63 64 sult 4bd388ff6cd
0be0: 38 31 64 34 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 81d4f..tcltest::
0bf0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
0c00: 6f 63 6b 5f 44 45 53 2d 31 2e 31 31 20 7b 45 6e ock_DES-1.11 {En
0c10: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
0c20: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
0c30: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
0c40: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
0c50: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
0c60: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
0c70: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
0c80: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
0c90: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
0ca0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
0cb0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 30 42 y decode hex 20B
0cc0: 39 45 37 36 37 42 32 46 42 31 34 35 36 5d 5d 7d 9E767B2FB1456]]}
0cd0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
0ce0: 20 2d 72 65 73 75 6c 74 20 30 38 30 30 30 30 30 -result 0800000
0cf0: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
0d00: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
0d10: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 32 c_Block_DES-1.12
0d20: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
0d30: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
0d40: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
0d50: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
0d60: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
0d70: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
0d80: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
0d90: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0da0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
0db0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
0dc0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0dd0: 20 30 38 30 30 30 30 30 30 30 30 30 30 30 30 30 080000000000000
0de0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
0df0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 30 62 xact -result 20b
0e00: 39 65 37 36 37 62 32 66 62 31 34 35 36 0a 0a 74 9e767b2fb1456..t
0e10: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
0e20: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
0e30: 31 2e 31 33 20 7b 45 6e 63 72 79 70 74 20 44 45 1.13 {Encrypt DE
0e40: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
0e50: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
0e60: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
0e70: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
0e80: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
0e90: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
0ea0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
0eb0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
0ec0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
0ed0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
0ee0: 20 68 65 78 20 35 35 35 37 39 33 38 30 44 37 37 hex 55579380D77
0ef0: 31 33 38 45 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 138EF]]} \..-mat
0f00: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0f10: 20 30 34 30 30 30 30 30 30 30 30 30 30 30 30 30 040000000000000
0f20: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
0f30: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
0f40: 44 45 53 2d 31 2e 31 34 20 7b 44 65 63 72 79 70 DES-1.14 {Decryp
0f50: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
0f60: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
0f70: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
0f80: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
0f90: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
0fa0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
0fb0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
0fc0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
0fd0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
0fe0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0ff0: 63 6f 64 65 20 68 65 78 20 30 34 30 30 30 30 30 code hex 0400000
1000: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
1010: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
1020: 73 75 6c 74 20 35 35 35 37 39 33 38 30 64 37 37 sult 55579380d77
1030: 31 33 38 65 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 138ef..tcltest::
1040: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
1050: 6f 63 6b 5f 44 45 53 2d 31 2e 31 35 20 7b 45 6e ock_DES-1.15 {En
1060: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
1070: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
1080: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
1090: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
10a0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
10b0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
10c0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
10d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
10e0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
10f0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
1100: 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 43 43 y decode hex 6CC
1110: 35 44 45 46 41 41 46 30 34 35 31 32 46 5d 5d 7d 5DEFAAF04512F]]}
1120: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1130: 20 2d 72 65 73 75 6c 74 20 30 32 30 30 30 30 30 -result 0200000
1140: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
1150: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
1160: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 36 c_Block_DES-1.16
1170: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
1180: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
1190: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
11a0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
11b0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
11c0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
11d0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
11e0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
11f0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
1200: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
1210: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1220: 20 30 32 30 30 30 30 30 30 30 30 30 30 30 30 30 020000000000000
1230: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
1240: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 63 63 xact -result 6cc
1250: 35 64 65 66 61 61 66 30 34 35 31 32 66 0a 0a 74 5defaaf04512f..t
1260: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
1270: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
1280: 31 2e 31 37 20 7b 45 6e 63 72 79 70 74 20 44 45 1.17 {Encrypt DE
1290: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
12a0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
12b0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
12c0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
12d0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
12e0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
12f0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1300: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
1310: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
1320: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
1330: 20 68 65 78 20 30 44 39 46 32 37 39 42 41 35 44 hex 0D9F279BA5D
1340: 38 37 32 36 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 87260]]} \..-mat
1350: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
1360: 20 30 31 30 30 30 30 30 30 30 30 30 30 30 30 30 010000000000000
1370: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
1380: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
1390: 44 45 53 2d 31 2e 31 38 20 7b 44 65 63 72 79 70 DES-1.18 {Decryp
13a0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
13b0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
13c0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
13d0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
13e0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
13f0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
1400: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
1410: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
1420: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
1430: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
1440: 63 6f 64 65 20 68 65 78 20 30 31 30 30 30 30 30 code hex 0100000
1450: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
1460: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
1470: 73 75 6c 74 20 30 64 39 66 32 37 39 62 61 35 64 sult 0d9f279ba5d
1480: 38 37 32 36 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 87260..tcltest::
1490: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
14a0: 6f 63 6b 5f 44 45 53 2d 31 2e 31 39 20 7b 45 6e ock_DES-1.19 {En
14b0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
14c0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
14d0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
14e0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
14f0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
1500: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
1510: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
1520: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
1530: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
1540: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
1550: 79 20 64 65 63 6f 64 65 20 68 65 78 20 44 39 30 y decode hex D90
1560: 33 31 42 30 32 37 31 42 44 35 41 30 41 5d 5d 7d 31B0271BD5A0A]]}
1570: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1580: 20 2d 72 65 73 75 6c 74 20 30 30 38 30 30 30 30 -result 0080000
1590: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
15a0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
15b0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 30 c_Block_DES-1.20
15c0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
15d0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
15e0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
15f0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
1600: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
1610: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
1620: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
1630: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1640: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
1650: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
1660: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1670: 20 30 30 38 30 30 30 30 30 30 30 30 30 30 30 30 008000000000000
1680: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
1690: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 39 30 xact -result d90
16a0: 33 31 62 30 32 37 31 62 64 35 61 30 61 0a 0a 74 31b0271bd5a0a..t
16b0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
16c0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
16d0: 31 2e 32 31 20 7b 45 6e 63 72 79 70 74 20 44 45 1.21 {Encrypt DE
16e0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
16f0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
1700: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
1710: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
1720: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
1730: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
1740: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1750: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
1760: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
1770: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
1780: 20 68 65 78 20 34 32 34 32 35 30 42 33 37 43 33 hex 424250B37C3
1790: 44 44 39 35 31 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 DD951]]} \..-mat
17a0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
17b0: 20 30 30 34 30 30 30 30 30 30 30 30 30 30 30 30 004000000000000
17c0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
17d0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
17e0: 44 45 53 2d 31 2e 32 32 20 7b 44 65 63 72 79 70 DES-1.22 {Decryp
17f0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
1800: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
1810: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
1820: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
1830: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
1840: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
1850: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
1860: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
1870: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
1880: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
1890: 63 6f 64 65 20 68 65 78 20 30 30 34 30 30 30 30 code hex 0040000
18a0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
18b0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
18c0: 73 75 6c 74 20 34 32 34 32 35 30 62 33 37 63 33 sult 424250b37c3
18d0: 64 64 39 35 31 0a 0a 74 63 6c 74 65 73 74 3a 3a dd951..tcltest::
18e0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
18f0: 6f 63 6b 5f 44 45 53 2d 31 2e 32 33 20 7b 45 6e ock_DES-1.23 {En
1900: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
1910: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
1920: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
1930: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
1940: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
1950: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
1960: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
1970: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
1980: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
1990: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
19a0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 42 38 30 y decode hex B80
19b0: 36 31 42 37 45 43 44 39 41 32 31 45 35 5d 5d 7d 61B7ECD9A21E5]]}
19c0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
19d0: 20 2d 72 65 73 75 6c 74 20 30 30 32 30 30 30 30 -result 0020000
19e0: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
19f0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
1a00: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 34 c_Block_DES-1.24
1a10: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
1a20: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
1a30: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
1a40: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
1a50: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
1a60: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
1a70: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
1a80: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1a90: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
1aa0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
1ab0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1ac0: 20 30 30 32 30 30 30 30 30 30 30 30 30 30 30 30 002000000000000
1ad0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
1ae0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 38 30 xact -result b80
1af0: 36 31 62 37 65 63 64 39 61 32 31 65 35 0a 0a 74 61b7ecd9a21e5..t
1b00: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
1b10: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
1b20: 31 2e 32 35 20 7b 45 6e 63 72 79 70 74 20 44 45 1.25 {Encrypt DE
1b30: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
1b40: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
1b50: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
1b60: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
1b70: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
1b80: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
1b90: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1ba0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
1bb0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
1bc0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
1bd0: 20 68 65 78 20 46 31 35 44 30 46 32 38 36 42 36 hex F15D0F286B6
1be0: 35 42 44 32 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 5BD28]]} \..-mat
1bf0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
1c00: 20 30 30 31 30 30 30 30 30 30 30 30 30 30 30 30 001000000000000
1c10: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
1c20: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
1c30: 44 45 53 2d 31 2e 32 36 20 7b 44 65 63 72 79 70 DES-1.26 {Decryp
1c40: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
1c50: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
1c60: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
1c70: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
1c80: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
1c90: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
1ca0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
1cb0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
1cc0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
1cd0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
1ce0: 63 6f 64 65 20 68 65 78 20 30 30 31 30 30 30 30 code hex 0010000
1cf0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
1d00: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
1d10: 73 75 6c 74 20 66 31 35 64 30 66 32 38 36 62 36 sult f15d0f286b6
1d20: 35 62 64 32 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 5bd28..tcltest::
1d30: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
1d40: 6f 63 6b 5f 44 45 53 2d 31 2e 32 37 20 7b 45 6e ock_DES-1.27 {En
1d50: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
1d60: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
1d70: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
1d80: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
1d90: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
1da0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
1db0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
1dc0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
1dd0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
1de0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
1df0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 41 44 44 y decode hex ADD
1e00: 30 43 43 38 44 36 45 35 44 45 42 41 31 5d 5d 7d 0CC8D6E5DEBA1]]}
1e10: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1e20: 20 2d 72 65 73 75 6c 74 20 30 30 30 38 30 30 30 -result 0008000
1e30: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
1e40: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
1e50: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 38 c_Block_DES-1.28
1e60: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
1e70: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
1e80: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
1e90: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
1ea0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
1eb0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
1ec0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
1ed0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1ee0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
1ef0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
1f00: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1f10: 20 30 30 30 38 30 30 30 30 30 30 30 30 30 30 30 000800000000000
1f20: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
1f30: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61 64 64 xact -result add
1f40: 30 63 63 38 64 36 65 35 64 65 62 61 31 0a 0a 74 0cc8d6e5deba1..t
1f50: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
1f60: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
1f70: 31 2e 32 39 20 7b 45 6e 63 72 79 70 74 20 44 45 1.29 {Encrypt DE
1f80: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
1f90: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
1fa0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
1fb0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
1fc0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
1fd0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
1fe0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1ff0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
2000: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
2010: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
2020: 20 68 65 78 20 45 36 44 35 46 38 32 37 35 32 41 hex E6D5F82752A
2030: 44 36 33 44 31 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 D63D1]]} \..-mat
2040: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
2050: 20 30 30 30 34 30 30 30 30 30 30 30 30 30 30 30 000400000000000
2060: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
2070: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
2080: 44 45 53 2d 31 2e 33 30 20 7b 44 65 63 72 79 70 DES-1.30 {Decryp
2090: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
20a0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
20b0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
20c0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
20d0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
20e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
20f0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
2100: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
2110: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
2120: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
2130: 63 6f 64 65 20 68 65 78 20 30 30 30 34 30 30 30 code hex 0004000
2140: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
2150: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
2160: 73 75 6c 74 20 65 36 64 35 66 38 32 37 35 32 61 sult e6d5f82752a
2170: 64 36 33 64 31 0a 0a 74 63 6c 74 65 73 74 3a 3a d63d1..tcltest::
2180: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
2190: 6f 63 6b 5f 44 45 53 2d 31 2e 33 31 20 7b 45 6e ock_DES-1.31 {En
21a0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
21b0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
21c0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
21d0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
21e0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
21f0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
2200: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
2210: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
2220: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
2230: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
2240: 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 43 42 y decode hex ECB
2250: 46 45 33 42 44 33 46 35 39 31 41 35 45 5d 5d 7d FE3BD3F591A5E]]}
2260: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
2270: 20 2d 72 65 73 75 6c 74 20 30 30 30 32 30 30 30 -result 0002000
2280: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
2290: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
22a0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 33 32 c_Block_DES-1.32
22b0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
22c0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
22d0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
22e0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
22f0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
2300: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
2310: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
2320: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
2330: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
2340: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
2350: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
2360: 20 30 30 30 32 30 30 30 30 30 30 30 30 30 30 30 000200000000000
2370: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
2380: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 63 62 xact -result ecb
2390: 66 65 33 62 64 33 66 35 39 31 61 35 65 0a 0a 74 fe3bd3f591a5e..t
23a0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
23b0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
23c0: 31 2e 33 33 20 7b 45 6e 63 72 79 70 74 20 44 45 1.33 {Encrypt DE
23d0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
23e0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
23f0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
2400: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
2410: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
2420: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
2430: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
2440: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
2450: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
2460: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
2470: 20 68 65 78 20 46 33 35 36 38 33 34 33 37 39 44 hex F356834379D
2480: 31 36 35 43 44 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 165CD]]} \..-mat
2490: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
24a0: 20 30 30 30 31 30 30 30 30 30 30 30 30 30 30 30 000100000000000
24b0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
24c0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
24d0: 44 45 53 2d 31 2e 33 34 20 7b 44 65 63 72 79 70 DES-1.34 {Decryp
24e0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
24f0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
2500: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
2510: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
2520: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
2530: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
2540: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
2550: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
2560: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
2570: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
2580: 63 6f 64 65 20 68 65 78 20 30 30 30 31 30 30 30 code hex 0001000
2590: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
25a0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
25b0: 73 75 6c 74 20 66 33 35 36 38 33 34 33 37 39 64 sult f356834379d
25c0: 31 36 35 63 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 165cd..tcltest::
25d0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
25e0: 6f 63 6b 5f 44 45 53 2d 31 2e 33 35 20 7b 45 6e ock_DES-1.35 {En
25f0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
2600: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
2610: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
2620: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
2630: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
2640: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
2650: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
2660: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
2670: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
2680: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
2690: 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 42 39 y decode hex 2B9
26a0: 46 39 38 32 46 32 30 30 33 37 46 41 39 5d 5d 7d F982F20037FA9]]}
26b0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
26c0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 38 30 30 -result 0000800
26d0: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
26e0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
26f0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 33 36 c_Block_DES-1.36
2700: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
2710: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
2720: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
2730: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
2740: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
2750: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
2760: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
2770: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
2780: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
2790: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
27a0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
27b0: 20 30 30 30 30 38 30 30 30 30 30 30 30 30 30 30 000080000000000
27c0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
27d0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 62 39 xact -result 2b9
27e0: 66 39 38 32 66 32 30 30 33 37 66 61 39 0a 0a 74 f982f20037fa9..t
27f0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
2800: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
2810: 31 2e 33 37 20 7b 45 6e 63 72 79 70 74 20 44 45 1.37 {Encrypt DE
2820: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
2830: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
2840: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
2850: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
2860: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
2870: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
2880: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
2890: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
28a0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
28b0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
28c0: 20 68 65 78 20 38 38 39 44 45 30 36 38 41 31 36 hex 889DE068A16
28d0: 46 30 42 45 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 F0BE6]]} \..-mat
28e0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
28f0: 20 30 30 30 30 34 30 30 30 30 30 30 30 30 30 30 000040000000000
2900: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
2910: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
2920: 44 45 53 2d 31 2e 33 38 20 7b 44 65 63 72 79 70 DES-1.38 {Decryp
2930: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
2940: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
2950: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
2960: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
2970: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
2980: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
2990: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
29a0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
29b0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
29c0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
29d0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 34 30 30 code hex 0000400
29e0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
29f0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
2a00: 73 75 6c 74 20 38 38 39 64 65 30 36 38 61 31 36 sult 889de068a16
2a10: 66 30 62 65 36 0a 0a 74 63 6c 74 65 73 74 3a 3a f0be6..tcltest::
2a20: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
2a30: 6f 63 6b 5f 44 45 53 2d 31 2e 33 39 20 7b 45 6e ock_DES-1.39 {En
2a40: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
2a50: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
2a60: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
2a70: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
2a80: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
2a90: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
2aa0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
2ab0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
2ac0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
2ad0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
2ae0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 31 39 y decode hex E19
2af0: 45 32 37 35 44 38 34 36 41 31 32 39 38 5d 5d 7d E275D846A1298]]}
2b00: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
2b10: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 32 30 30 -result 0000200
2b20: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
2b30: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
2b40: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 34 30 c_Block_DES-1.40
2b50: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
2b60: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
2b70: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
2b80: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
2b90: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
2ba0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
2bb0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
2bc0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
2bd0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
2be0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
2bf0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
2c00: 20 30 30 30 30 32 30 30 30 30 30 30 30 30 30 30 000020000000000
2c10: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
2c20: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 31 39 xact -result e19
2c30: 65 32 37 35 64 38 34 36 61 31 32 39 38 0a 0a 74 e275d846a1298..t
2c40: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
2c50: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
2c60: 31 2e 34 31 20 7b 45 6e 63 72 79 70 74 20 44 45 1.41 {Encrypt DE
2c70: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
2c80: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
2c90: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
2ca0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
2cb0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
2cc0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
2cd0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
2ce0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
2cf0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
2d00: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
2d10: 20 68 65 78 20 33 32 39 41 38 45 44 35 32 33 44 hex 329A8ED523D
2d20: 37 31 41 45 43 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 71AEC]]} \..-mat
2d30: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
2d40: 20 30 30 30 30 31 30 30 30 30 30 30 30 30 30 30 000010000000000
2d50: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
2d60: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
2d70: 44 45 53 2d 31 2e 34 32 20 7b 44 65 63 72 79 70 DES-1.42 {Decryp
2d80: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
2d90: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
2da0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
2db0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
2dc0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
2dd0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
2de0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
2df0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
2e00: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
2e10: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
2e20: 63 6f 64 65 20 68 65 78 20 30 30 30 30 31 30 30 code hex 0000100
2e30: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
2e40: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
2e50: 73 75 6c 74 20 33 32 39 61 38 65 64 35 32 33 64 sult 329a8ed523d
2e60: 37 31 61 65 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 71aec..tcltest::
2e70: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
2e80: 6f 63 6b 5f 44 45 53 2d 31 2e 34 33 20 7b 45 6e ock_DES-1.43 {En
2e90: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
2ea0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
2eb0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
2ec0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
2ed0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
2ee0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
2ef0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
2f00: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
2f10: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
2f20: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
2f30: 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 37 46 y decode hex E7F
2f40: 43 45 32 32 35 35 37 44 32 33 43 39 37 5d 5d 7d CE22557D23C97]]}
2f50: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
2f60: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 38 30 -result 0000080
2f70: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
2f80: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
2f90: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 34 34 c_Block_DES-1.44
2fa0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
2fb0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
2fc0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
2fd0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
2fe0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
2ff0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
3000: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
3010: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
3020: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
3030: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
3040: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
3050: 20 30 30 30 30 30 38 30 30 30 30 30 30 30 30 30 000008000000000
3060: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
3070: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 37 66 xact -result e7f
3080: 63 65 32 32 35 35 37 64 32 33 63 39 37 0a 0a 74 ce22557d23c97..t
3090: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
30a0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
30b0: 31 2e 34 35 20 7b 45 6e 63 72 79 70 74 20 44 45 1.45 {Encrypt DE
30c0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
30d0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
30e0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
30f0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
3100: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
3110: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
3120: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
3130: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
3140: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
3150: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
3160: 20 68 65 78 20 31 32 41 39 46 35 38 31 37 46 46 hex 12A9F5817FF
3170: 32 44 36 35 44 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 2D65D]]} \..-mat
3180: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
3190: 20 30 30 30 30 30 34 30 30 30 30 30 30 30 30 30 000004000000000
31a0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
31b0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
31c0: 44 45 53 2d 31 2e 34 36 20 7b 44 65 63 72 79 70 DES-1.46 {Decryp
31d0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
31e0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
31f0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
3200: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
3210: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
3220: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
3230: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
3240: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
3250: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
3260: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
3270: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 34 30 code hex 0000040
3280: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
3290: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
32a0: 73 75 6c 74 20 31 32 61 39 66 35 38 31 37 66 66 sult 12a9f5817ff
32b0: 32 64 36 35 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 2d65d..tcltest::
32c0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
32d0: 6f 63 6b 5f 44 45 53 2d 31 2e 34 37 20 7b 45 6e ock_DES-1.47 {En
32e0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
32f0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
3300: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
3310: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
3320: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
3330: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
3340: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
3350: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
3360: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
3370: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
3380: 79 20 64 65 63 6f 64 65 20 68 65 78 20 41 34 38 y decode hex A48
3390: 34 43 33 41 44 33 38 44 43 39 43 31 39 5d 5d 7d 4C3AD38DC9C19]]}
33a0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
33b0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 32 30 -result 0000020
33c0: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
33d0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
33e0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 34 38 c_Block_DES-1.48
33f0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
3400: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
3410: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
3420: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
3430: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
3440: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
3450: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
3460: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
3470: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
3480: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
3490: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
34a0: 20 30 30 30 30 30 32 30 30 30 30 30 30 30 30 30 000002000000000
34b0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
34c0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61 34 38 xact -result a48
34d0: 34 63 33 61 64 33 38 64 63 39 63 31 39 0a 0a 74 4c3ad38dc9c19..t
34e0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
34f0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
3500: 31 2e 34 39 20 7b 45 6e 63 72 79 70 74 20 44 45 1.49 {Encrypt DE
3510: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
3520: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
3530: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
3540: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
3550: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
3560: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
3570: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
3580: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
3590: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
35a0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
35b0: 20 68 65 78 20 46 42 45 30 30 41 38 41 31 45 46 hex FBE00A8A1EF
35c0: 38 41 44 37 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 8AD72]]} \..-mat
35d0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
35e0: 20 30 30 30 30 30 31 30 30 30 30 30 30 30 30 30 000001000000000
35f0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
3600: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
3610: 44 45 53 2d 31 2e 35 30 20 7b 44 65 63 72 79 70 DES-1.50 {Decryp
3620: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
3630: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
3640: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
3650: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
3660: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
3670: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
3680: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
3690: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
36a0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
36b0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
36c0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 31 30 code hex 0000010
36d0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
36e0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
36f0: 73 75 6c 74 20 66 62 65 30 30 61 38 61 31 65 66 sult fbe00a8a1ef
3700: 38 61 64 37 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 8ad72..tcltest::
3710: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
3720: 6f 63 6b 5f 44 45 53 2d 31 2e 35 31 20 7b 45 6e ock_DES-1.51 {En
3730: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
3740: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
3750: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
3760: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
3770: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
3780: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
3790: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
37a0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
37b0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
37c0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
37d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 37 35 30 y decode hex 750
37e0: 44 30 37 39 34 30 37 35 32 31 33 36 33 5d 5d 7d D079407521363]]}
37f0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
3800: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 38 -result 0000008
3810: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
3820: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
3830: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 35 32 c_Block_DES-1.52
3840: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
3850: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
3860: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
3870: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
3880: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
3890: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
38a0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
38b0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
38c0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
38d0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
38e0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
38f0: 20 30 30 30 30 30 30 38 30 30 30 30 30 30 30 30 000000800000000
3900: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
3910: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 35 30 xact -result 750
3920: 64 30 37 39 34 30 37 35 32 31 33 36 33 0a 0a 74 d079407521363..t
3930: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
3940: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
3950: 31 2e 35 33 20 7b 45 6e 63 72 79 70 74 20 44 45 1.53 {Encrypt DE
3960: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
3970: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
3980: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
3990: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
39a0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
39b0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
39c0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
39d0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
39e0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
39f0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
3a00: 20 68 65 78 20 36 34 46 45 45 44 39 43 37 32 34 hex 64FEED9C724
3a10: 43 32 46 41 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 C2FAF]]} \..-mat
3a20: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
3a30: 20 30 30 30 30 30 30 34 30 30 30 30 30 30 30 30 000000400000000
3a40: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
3a50: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
3a60: 44 45 53 2d 31 2e 35 34 20 7b 44 65 63 72 79 70 DES-1.54 {Decryp
3a70: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
3a80: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
3a90: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
3aa0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
3ab0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
3ac0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
3ad0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
3ae0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
3af0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
3b00: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
3b10: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 34 code hex 0000004
3b20: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
3b30: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
3b40: 73 75 6c 74 20 36 34 66 65 65 64 39 63 37 32 34 sult 64feed9c724
3b50: 63 32 66 61 66 0a 0a 74 63 6c 74 65 73 74 3a 3a c2faf..tcltest::
3b60: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
3b70: 6f 63 6b 5f 44 45 53 2d 31 2e 35 35 20 7b 45 6e ock_DES-1.55 {En
3b80: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
3b90: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
3ba0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
3bb0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
3bc0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
3bd0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
3be0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
3bf0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
3c00: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
3c10: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
3c20: 79 20 64 65 63 6f 64 65 20 68 65 78 20 46 30 32 y decode hex F02
3c30: 42 32 36 33 42 33 32 38 45 32 42 36 30 5d 5d 7d B263B328E2B60]]}
3c40: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
3c50: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 32 -result 0000002
3c60: 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 000000000..tclte
3c70: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
3c80: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 35 36 c_Block_DES-1.56
3c90: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
3ca0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
3cb0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
3cc0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
3cd0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
3ce0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
3cf0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
3d00: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
3d10: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
3d20: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
3d30: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
3d40: 20 30 30 30 30 30 30 32 30 30 30 30 30 30 30 30 000000200000000
3d50: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
3d60: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66 30 32 xact -result f02
3d70: 62 32 36 33 62 33 32 38 65 32 62 36 30 0a 0a 74 b263b328e2b60..t
3d80: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
3d90: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
3da0: 31 2e 35 37 20 7b 45 6e 63 72 79 70 74 20 44 45 1.57 {Encrypt DE
3db0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
3dc0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
3dd0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
3de0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
3df0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
3e00: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
3e10: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
3e20: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
3e30: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
3e40: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
3e50: 20 68 65 78 20 39 44 36 34 35 35 35 41 39 41 31 hex 9D64555A9A1
3e60: 30 42 38 35 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 0B852]]} \..-mat
3e70: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
3e80: 20 30 30 30 30 30 30 31 30 30 30 30 30 30 30 30 000000100000000
3e90: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
3ea0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
3eb0: 44 45 53 2d 31 2e 35 38 20 7b 44 65 63 72 79 70 DES-1.58 {Decryp
3ec0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
3ed0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
3ee0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
3ef0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
3f00: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
3f10: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
3f20: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
3f30: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
3f40: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
3f50: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
3f60: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 31 code hex 0000001
3f70: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000000000]]} \..
3f80: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
3f90: 73 75 6c 74 20 39 64 36 34 35 35 35 61 39 61 31 sult 9d64555a9a1
3fa0: 30 62 38 35 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 0b852..tcltest::
3fb0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
3fc0: 6f 63 6b 5f 44 45 53 2d 31 2e 35 39 20 7b 45 6e ock_DES-1.59 {En
3fd0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
3fe0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
3ff0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
4000: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
4010: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
4020: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
4030: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
4040: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
4050: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
4060: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
4070: 79 20 64 65 63 6f 64 65 20 68 65 78 20 44 31 30 y decode hex D10
4080: 36 46 46 30 42 45 44 35 32 35 35 44 37 5d 5d 7d 6FF0BED5255D7]]}
4090: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
40a0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
40b0: 38 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 800000000..tclte
40c0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
40d0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 36 30 c_Block_DES-1.60
40e0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
40f0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
4100: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
4110: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
4120: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
4130: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
4140: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
4150: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4160: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
4170: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
4180: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4190: 20 30 30 30 30 30 30 30 38 30 30 30 30 30 30 30 000000080000000
41a0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
41b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 31 30 xact -result d10
41c0: 36 66 66 30 62 65 64 35 32 35 35 64 37 0a 0a 74 6ff0bed5255d7..t
41d0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
41e0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
41f0: 31 2e 36 31 20 7b 45 6e 63 72 79 70 74 20 44 45 1.61 {Encrypt DE
4200: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
4210: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
4220: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
4230: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
4240: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
4250: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
4260: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
4270: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
4280: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
4290: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
42a0: 20 68 65 78 20 45 31 36 35 32 43 36 42 31 33 38 hex E1652C6B138
42b0: 43 36 34 41 35 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 C64A5]]} \..-mat
42c0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
42d0: 20 30 30 30 30 30 30 30 34 30 30 30 30 30 30 30 000000040000000
42e0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
42f0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
4300: 44 45 53 2d 31 2e 36 32 20 7b 44 65 63 72 79 70 DES-1.62 {Decryp
4310: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
4320: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
4330: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
4340: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
4350: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
4360: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
4370: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
4380: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
4390: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
43a0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
43b0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
43c0: 34 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 400000000]]} \..
43d0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
43e0: 73 75 6c 74 20 65 31 36 35 32 63 36 62 31 33 38 sult e1652c6b138
43f0: 63 36 34 61 35 0a 0a 74 63 6c 74 65 73 74 3a 3a c64a5..tcltest::
4400: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
4410: 6f 63 6b 5f 44 45 53 2d 31 2e 36 33 20 7b 45 6e ock_DES-1.63 {En
4420: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
4430: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
4440: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
4450: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
4460: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
4470: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
4480: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
4490: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
44a0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
44b0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
44c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 34 32 y decode hex E42
44d0: 38 35 38 31 31 38 36 45 43 38 46 34 36 5d 5d 7d 8581186EC8F46]]}
44e0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
44f0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
4500: 32 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 200000000..tclte
4510: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
4520: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 36 34 c_Block_DES-1.64
4530: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
4540: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
4550: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
4560: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
4570: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
4580: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
4590: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
45a0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
45b0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
45c0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
45d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
45e0: 20 30 30 30 30 30 30 30 32 30 30 30 30 30 30 30 000000020000000
45f0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
4600: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 34 32 xact -result e42
4610: 38 35 38 31 31 38 36 65 63 38 66 34 36 0a 0a 74 8581186ec8f46..t
4620: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
4630: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
4640: 31 2e 36 35 20 7b 45 6e 63 72 79 70 74 20 44 45 1.65 {Encrypt DE
4650: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
4660: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
4670: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
4680: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
4690: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
46a0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
46b0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
46c0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
46d0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
46e0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
46f0: 20 68 65 78 20 41 45 42 35 46 35 45 44 45 32 32 hex AEB5F5EDE22
4700: 44 31 41 33 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 D1A36]]} \..-mat
4710: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
4720: 20 30 30 30 30 30 30 30 31 30 30 30 30 30 30 30 000000010000000
4730: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
4740: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
4750: 44 45 53 2d 31 2e 36 36 20 7b 44 65 63 72 79 70 DES-1.66 {Decryp
4760: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
4770: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
4780: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
4790: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
47a0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
47b0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
47c0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
47d0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
47e0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
47f0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
4800: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
4810: 31 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 100000000]]} \..
4820: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
4830: 73 75 6c 74 20 61 65 62 35 66 35 65 64 65 32 32 sult aeb5f5ede22
4840: 64 31 61 33 36 0a 0a 74 63 6c 74 65 73 74 3a 3a d1a36..tcltest::
4850: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
4860: 6f 63 6b 5f 44 45 53 2d 31 2e 36 37 20 7b 45 6e ock_DES-1.67 {En
4870: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
4880: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
4890: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
48a0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
48b0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
48c0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
48d0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
48e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
48f0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
4900: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
4910: 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 39 34 y decode hex E94
4920: 33 44 37 35 36 38 41 45 43 30 43 35 43 5d 5d 7d 3D7568AEC0C5C]]}
4930: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
4940: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
4950: 30 38 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 080000000..tclte
4960: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
4970: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 36 38 c_Block_DES-1.68
4980: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
4990: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
49a0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
49b0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
49c0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
49d0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
49e0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
49f0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4a00: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
4a10: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
4a20: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4a30: 20 30 30 30 30 30 30 30 30 38 30 30 30 30 30 30 000000008000000
4a40: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
4a50: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 39 34 xact -result e94
4a60: 33 64 37 35 36 38 61 65 63 30 63 35 63 0a 0a 74 3d7568aec0c5c..t
4a70: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
4a80: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
4a90: 31 2e 36 39 20 7b 45 6e 63 72 79 70 74 20 44 45 1.69 {Encrypt DE
4aa0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
4ab0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
4ac0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
4ad0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
4ae0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
4af0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
4b00: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
4b10: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
4b20: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
4b30: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
4b40: 20 68 65 78 20 44 46 39 38 43 38 32 37 36 46 35 hex DF98C8276F5
4b50: 34 42 30 34 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 4B04B]]} \..-mat
4b60: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
4b70: 20 30 30 30 30 30 30 30 30 34 30 30 30 30 30 30 000000004000000
4b80: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
4b90: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
4ba0: 44 45 53 2d 31 2e 37 30 20 7b 44 65 63 72 79 70 DES-1.70 {Decryp
4bb0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
4bc0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
4bd0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
4be0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
4bf0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
4c00: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
4c10: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
4c20: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
4c30: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
4c40: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
4c50: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
4c60: 30 34 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 040000000]]} \..
4c70: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
4c80: 73 75 6c 74 20 64 66 39 38 63 38 32 37 36 66 35 sult df98c8276f5
4c90: 34 62 30 34 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 4b04b..tcltest::
4ca0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
4cb0: 6f 63 6b 5f 44 45 53 2d 31 2e 37 31 20 7b 45 6e ock_DES-1.71 {En
4cc0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
4cd0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
4ce0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
4cf0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
4d00: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
4d10: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
4d20: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
4d30: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
4d40: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
4d50: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
4d60: 79 20 64 65 63 6f 64 65 20 68 65 78 20 42 31 36 y decode hex B16
4d70: 30 45 34 36 38 30 46 36 43 36 39 36 46 5d 5d 7d 0E4680F6C696F]]}
4d80: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
4d90: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
4da0: 30 32 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 020000000..tclte
4db0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
4dc0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 37 32 c_Block_DES-1.72
4dd0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
4de0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
4df0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
4e00: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
4e10: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
4e20: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
4e30: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
4e40: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4e50: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
4e60: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
4e70: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
4e80: 20 30 30 30 30 30 30 30 30 32 30 30 30 30 30 30 000000002000000
4e90: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
4ea0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 31 36 xact -result b16
4eb0: 30 65 34 36 38 30 66 36 63 36 39 36 66 0a 0a 74 0e4680f6c696f..t
4ec0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
4ed0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
4ee0: 31 2e 37 33 20 7b 45 6e 63 72 79 70 74 20 44 45 1.73 {Encrypt DE
4ef0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
4f00: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
4f10: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
4f20: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
4f30: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
4f40: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
4f50: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
4f60: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
4f70: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
4f80: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
4f90: 20 68 65 78 20 46 41 30 37 35 32 42 30 37 44 39 hex FA0752B07D9
4fa0: 43 34 41 42 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 C4AB8]]} \..-mat
4fb0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
4fc0: 20 30 30 30 30 30 30 30 30 31 30 30 30 30 30 30 000000001000000
4fd0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
4fe0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
4ff0: 44 45 53 2d 31 2e 37 34 20 7b 44 65 63 72 79 70 DES-1.74 {Decryp
5000: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
5010: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
5020: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
5030: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
5040: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
5050: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
5060: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
5070: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
5080: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
5090: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
50a0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
50b0: 30 31 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 010000000]]} \..
50c0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
50d0: 73 75 6c 74 20 66 61 30 37 35 32 62 30 37 64 39 sult fa0752b07d9
50e0: 63 34 61 62 38 0a 0a 74 63 6c 74 65 73 74 3a 3a c4ab8..tcltest::
50f0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
5100: 6f 63 6b 5f 44 45 53 2d 31 2e 37 35 20 7b 45 6e ock_DES-1.75 {En
5110: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
5120: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
5130: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
5140: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
5150: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
5160: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
5170: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
5180: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
5190: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
51a0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
51b0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 43 41 33 y decode hex CA3
51c0: 41 32 42 30 33 36 44 42 43 38 35 30 32 5d 5d 7d A2B036DBC8502]]}
51d0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
51e0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
51f0: 30 30 38 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 008000000..tclte
5200: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
5210: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 37 36 c_Block_DES-1.76
5220: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
5230: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
5240: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
5250: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
5260: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
5270: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
5280: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
5290: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
52a0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
52b0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
52c0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
52d0: 20 30 30 30 30 30 30 30 30 30 38 30 30 30 30 30 000000000800000
52e0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
52f0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 61 33 xact -result ca3
5300: 61 32 62 30 33 36 64 62 63 38 35 30 32 0a 0a 74 a2b036dbc8502..t
5310: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
5320: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
5330: 31 2e 37 37 20 7b 45 6e 63 72 79 70 74 20 44 45 1.77 {Encrypt DE
5340: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
5350: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
5360: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
5370: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
5380: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
5390: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
53a0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
53b0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
53c0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
53d0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
53e0: 20 68 65 78 20 35 45 30 39 30 35 35 31 37 42 42 hex 5E0905517BB
53f0: 35 39 42 43 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 59BCF]]} \..-mat
5400: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
5410: 20 30 30 30 30 30 30 30 30 30 34 30 30 30 30 30 000000000400000
5420: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
5430: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
5440: 44 45 53 2d 31 2e 37 38 20 7b 44 65 63 72 79 70 DES-1.78 {Decryp
5450: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
5460: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
5470: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
5480: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
5490: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
54a0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
54b0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
54c0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
54d0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
54e0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
54f0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
5500: 30 30 34 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 004000000]]} \..
5510: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
5520: 73 75 6c 74 20 35 65 30 39 30 35 35 31 37 62 62 sult 5e0905517bb
5530: 35 39 62 63 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 59bcf..tcltest::
5540: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
5550: 6f 63 6b 5f 44 45 53 2d 31 2e 37 39 20 7b 45 6e ock_DES-1.79 {En
5560: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
5570: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
5580: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
5590: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
55a0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
55b0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
55c0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
55d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
55e0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
55f0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
5600: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 31 34 y decode hex 814
5610: 45 45 42 33 42 39 31 44 39 30 37 32 36 5d 5d 7d EEB3B91D90726]]}
5620: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
5630: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
5640: 30 30 32 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 002000000..tclte
5650: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
5660: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 38 30 c_Block_DES-1.80
5670: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
5680: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
5690: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
56a0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
56b0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
56c0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
56d0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
56e0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
56f0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
5700: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
5710: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
5720: 20 30 30 30 30 30 30 30 30 30 32 30 30 30 30 30 000000000200000
5730: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
5740: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 31 34 xact -result 814
5750: 65 65 62 33 62 39 31 64 39 30 37 32 36 0a 0a 74 eeb3b91d90726..t
5760: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
5770: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
5780: 31 2e 38 31 20 7b 45 6e 63 72 79 70 74 20 44 45 1.81 {Encrypt DE
5790: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
57a0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
57b0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
57c0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
57d0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
57e0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
57f0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
5800: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
5810: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
5820: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
5830: 20 68 65 78 20 34 44 34 39 44 42 31 35 33 32 39 hex 4D49DB15329
5840: 31 39 43 39 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 19C9F]]} \..-mat
5850: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
5860: 20 30 30 30 30 30 30 30 30 30 31 30 30 30 30 30 000000000100000
5870: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
5880: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
5890: 44 45 53 2d 31 2e 38 32 20 7b 44 65 63 72 79 70 DES-1.82 {Decryp
58a0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
58b0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
58c0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
58d0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
58e0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
58f0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
5900: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
5910: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
5920: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
5930: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
5940: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
5950: 30 30 31 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 001000000]]} \..
5960: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
5970: 73 75 6c 74 20 34 64 34 39 64 62 31 35 33 32 39 sult 4d49db15329
5980: 31 39 63 39 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 19c9f..tcltest::
5990: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
59a0: 6f 63 6b 5f 44 45 53 2d 31 2e 38 33 20 7b 45 6e ock_DES-1.83 {En
59b0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
59c0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
59d0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
59e0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
59f0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
5a00: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
5a10: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
5a20: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
5a30: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
5a40: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
5a50: 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 35 45 y decode hex 25E
5a60: 42 35 46 43 33 46 38 43 46 30 36 32 31 5d 5d 7d B5FC3F8CF0621]]}
5a70: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
5a80: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
5a90: 30 30 30 38 30 30 30 30 30 0a 0a 74 63 6c 74 65 000800000..tclte
5aa0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
5ab0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 38 34 c_Block_DES-1.84
5ac0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
5ad0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
5ae0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
5af0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
5b00: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
5b10: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
5b20: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
5b30: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
5b40: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
5b50: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
5b60: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
5b70: 20 30 30 30 30 30 30 30 30 30 30 38 30 30 30 30 000000000080000
5b80: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
5b90: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 35 65 xact -result 25e
5ba0: 62 35 66 63 33 66 38 63 66 30 36 32 31 0a 0a 74 b5fc3f8cf0621..t
5bb0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
5bc0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
5bd0: 31 2e 38 35 20 7b 45 6e 63 72 79 70 74 20 44 45 1.85 {Encrypt DE
5be0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
5bf0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
5c00: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
5c10: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
5c20: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
5c30: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
5c40: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
5c50: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
5c60: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
5c70: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
5c80: 20 68 65 78 20 41 42 36 41 32 30 43 30 36 32 30 hex AB6A20C0620
5c90: 44 31 43 36 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 D1C6F]]} \..-mat
5ca0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
5cb0: 20 30 30 30 30 30 30 30 30 30 30 34 30 30 30 30 000000000040000
5cc0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
5cd0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
5ce0: 44 45 53 2d 31 2e 38 36 20 7b 44 65 63 72 79 70 DES-1.86 {Decryp
5cf0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
5d00: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
5d10: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
5d20: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
5d30: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
5d40: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
5d50: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
5d60: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
5d70: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
5d80: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
5d90: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
5da0: 30 30 30 34 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000400000]]} \..
5db0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
5dc0: 73 75 6c 74 20 61 62 36 61 32 30 63 30 36 32 30 sult ab6a20c0620
5dd0: 64 31 63 36 66 0a 0a 74 63 6c 74 65 73 74 3a 3a d1c6f..tcltest::
5de0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
5df0: 6f 63 6b 5f 44 45 53 2d 31 2e 38 37 20 7b 45 6e ock_DES-1.87 {En
5e00: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
5e10: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
5e20: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
5e30: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
5e40: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
5e50: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
5e60: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
5e70: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
5e80: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
5e90: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
5ea0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 37 39 45 y decode hex 79E
5eb0: 39 30 44 42 43 39 38 46 39 32 43 43 41 5d 5d 7d 90DBC98F92CCA]]}
5ec0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
5ed0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
5ee0: 30 30 30 32 30 30 30 30 30 0a 0a 74 63 6c 74 65 000200000..tclte
5ef0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
5f00: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 38 38 c_Block_DES-1.88
5f10: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
5f20: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
5f30: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
5f40: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
5f50: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
5f60: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
5f70: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
5f80: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
5f90: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
5fa0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
5fb0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
5fc0: 20 30 30 30 30 30 30 30 30 30 30 32 30 30 30 30 000000000020000
5fd0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
5fe0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 39 65 xact -result 79e
5ff0: 39 30 64 62 63 39 38 66 39 32 63 63 61 0a 0a 74 90dbc98f92cca..t
6000: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
6010: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
6020: 31 2e 38 39 20 7b 45 6e 63 72 79 70 74 20 44 45 1.89 {Encrypt DE
6030: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
6040: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
6050: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
6060: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
6070: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
6080: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
6090: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
60a0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
60b0: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
60c0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
60d0: 20 68 65 78 20 38 36 36 45 43 45 44 44 38 30 37 hex 866ECEDD807
60e0: 32 42 42 30 45 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 2BB0E]]} \..-mat
60f0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
6100: 20 30 30 30 30 30 30 30 30 30 30 31 30 30 30 30 000000000010000
6110: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
6120: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
6130: 44 45 53 2d 31 2e 39 30 20 7b 44 65 63 72 79 70 DES-1.90 {Decryp
6140: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
6150: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
6160: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
6170: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
6180: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
6190: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
61a0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
61b0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
61c0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
61d0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
61e0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
61f0: 30 30 30 31 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 000100000]]} \..
6200: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
6210: 73 75 6c 74 20 38 36 36 65 63 65 64 64 38 30 37 sult 866ecedd807
6220: 32 62 62 30 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 2bb0e..tcltest::
6230: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
6240: 6f 63 6b 5f 44 45 53 2d 31 2e 39 31 20 7b 45 6e ock_DES-1.91 {En
6250: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
6260: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
6270: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
6280: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
6290: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
62a0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
62b0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
62c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
62d0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
62e0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
62f0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 42 35 y decode hex 8B5
6300: 34 35 33 36 46 32 46 33 45 36 34 41 38 5d 5d 7d 4536F2F3E64A8]]}
6310: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
6320: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
6330: 30 30 30 30 38 30 30 30 30 0a 0a 74 63 6c 74 65 000080000..tclte
6340: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
6350: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 39 32 c_Block_DES-1.92
6360: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
6370: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
6380: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
6390: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
63a0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
63b0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
63c0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
63d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
63e0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
63f0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
6400: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
6410: 20 30 30 30 30 30 30 30 30 30 30 30 38 30 30 30 000000000008000
6420: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
6430: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 62 35 xact -result 8b5
6440: 34 35 33 36 66 32 66 33 65 36 34 61 38 0a 0a 74 4536f2f3e64a8..t
6450: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
6460: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
6470: 31 2e 39 33 20 7b 45 6e 63 72 79 70 74 20 44 45 1.93 {Encrypt DE
6480: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
6490: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
64a0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
64b0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
64c0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
64d0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
64e0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
64f0: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
6500: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
6510: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
6520: 20 68 65 78 20 45 41 35 31 44 33 39 37 35 35 39 hex EA51D397559
6530: 35 42 38 36 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 5B86B]]} \..-mat
6540: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
6550: 20 30 30 30 30 30 30 30 30 30 30 30 34 30 30 30 000000000004000
6560: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
6570: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
6580: 44 45 53 2d 31 2e 39 34 20 7b 44 65 63 72 79 70 DES-1.94 {Decryp
6590: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
65a0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
65b0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
65c0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
65d0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
65e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
65f0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
6600: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
6610: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
6620: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
6630: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
6640: 30 30 30 30 34 30 30 30 30 5d 5d 7d 20 5c 0a 09 000040000]]} \..
6650: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
6660: 73 75 6c 74 20 65 61 35 31 64 33 39 37 35 35 39 sult ea51d397559
6670: 35 62 38 36 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 5b86b..tcltest::
6680: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
6690: 6f 63 6b 5f 44 45 53 2d 31 2e 39 35 20 7b 45 6e ock_DES-1.95 {En
66a0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
66b0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
66c0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
66d0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
66e0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
66f0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
6700: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
6710: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
6720: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
6730: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
6740: 79 20 64 65 63 6f 64 65 20 68 65 78 20 43 41 46 y decode hex CAF
6750: 46 43 36 41 43 34 35 34 32 44 45 33 31 5d 5d 7d FC6AC4542DE31]]}
6760: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
6770: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
6780: 30 30 30 30 32 30 30 30 30 0a 0a 74 63 6c 74 65 000020000..tclte
6790: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
67a0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 39 36 c_Block_DES-1.96
67b0: 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c {Decrypt DES} \
67c0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
67d0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
67e0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
67f0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 tls::decrypt -ci
6800: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
6810: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
6820: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
6830: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
6840: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
6850: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
6860: 20 30 30 30 30 30 30 30 30 30 30 30 32 30 30 30 000000000002000
6870: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 0]]} \..-match e
6880: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 61 66 xact -result caf
6890: 66 63 36 61 63 34 35 34 32 64 65 33 31 0a 0a 74 fc6ac4542de31..t
68a0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
68b0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
68c0: 31 2e 39 37 20 7b 45 6e 63 72 79 70 74 20 44 45 1.97 {Encrypt DE
68d0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
68e0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
68f0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
6900: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
6910: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
6920: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
6930: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
6940: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
6950: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
6960: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
6970: 20 68 65 78 20 38 44 44 34 35 41 32 44 44 46 39 hex 8DD45A2DDF9
6980: 30 37 39 36 43 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 0796C]]} \..-mat
6990: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
69a0: 20 30 30 30 30 30 30 30 30 30 30 30 31 30 30 30 000000000001000
69b0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
69c0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
69d0: 44 45 53 2d 31 2e 39 38 20 7b 44 65 63 72 79 70 DES-1.98 {Decryp
69e0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
69f0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
6a00: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
6a10: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 de hex [tls::dec
6a20: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
6a30: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
6a40: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
6a50: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
6a60: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
6a70: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
6a80: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 code hex 0000000
6a90: 30 30 30 30 31 30 30 30 30 5d 5d 7d 20 5c 0a 09 000010000]]} \..
6aa0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
6ab0: 73 75 6c 74 20 38 64 64 34 35 61 32 64 64 66 39 sult 8dd45a2ddf9
6ac0: 30 37 39 36 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 0796c..tcltest::
6ad0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
6ae0: 6f 63 6b 5f 44 45 53 2d 31 2e 39 39 20 7b 45 6e ock_DES-1.99 {En
6af0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
6b00: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
6b10: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
6b20: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
6b30: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
6b40: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
6b50: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
6b60: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
6b70: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
6b80: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
6b90: 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 30 32 y decode hex 102
6ba0: 39 44 35 35 45 38 38 30 45 43 32 44 30 5d 5d 7d 9D55E880EC2D0]]}
6bb0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
6bc0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
6bd0: 30 30 30 30 30 38 30 30 30 0a 0a 74 63 6c 74 65 000008000..tclte
6be0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
6bf0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 30 c_Block_DES-1.10
6c00: 30 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 0 {Decrypt DES}
6c10: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
6c20: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
6c30: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
6c40: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
6c50: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
6c60: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
6c70: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
6c80: 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 x 01010101010101
6c90: 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 01] \... -data [
6ca0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
6cb0: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 38 30 x 00000000000080
6cc0: 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 00]]} \..-match
6cd0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31 30 exact -result 10
6ce0: 32 39 64 35 35 65 38 38 30 65 63 32 64 30 0a 0a 29d55e880ec2d0..
6cf0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
6d00: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
6d10: 2d 31 2e 31 30 31 20 7b 45 6e 63 72 79 70 74 20 -1.101 {Encrypt
6d20: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 DES} \..-constra
6d30: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 ints DES \..-bod
6d40: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
6d50: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
6d60: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d pt -cipher DES -
6d70: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
6d80: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
6d90: 64 65 20 68 65 78 20 30 31 30 31 30 31 30 31 30 de hex 010101010
6da0: 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 1010101] \... -d
6db0: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
6dc0: 64 65 20 68 65 78 20 35 44 38 36 43 42 32 33 36 de hex 5D86CB236
6dd0: 33 39 44 42 45 41 39 5d 5d 7d 20 5c 0a 09 2d 6d 39DBEA9]]} \..-m
6de0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
6df0: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 34 lt 0000000000004
6e00: 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 000..tcltest::te
6e10: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
6e20: 6b 5f 44 45 53 2d 31 2e 31 30 32 20 7b 44 65 63 k_DES-1.102 {Dec
6e30: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
6e40: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
6e50: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
6e60: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
6e70: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
6e80: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
6e90: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
6ea0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 decode hex 0101
6eb0: 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 010101010101] \.
6ec0: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
6ed0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 decode hex 0000
6ee0: 30 30 30 30 30 30 30 30 34 30 30 30 5d 5d 7d 20 000000004000]]}
6ef0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
6f00: 2d 72 65 73 75 6c 74 20 35 64 38 36 63 62 32 33 -result 5d86cb23
6f10: 36 33 39 64 62 65 61 39 0a 0a 74 63 6c 74 65 73 639dbea9..tcltes
6f20: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
6f30: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 30 33 _Block_DES-1.103
6f40: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c {Encrypt DES} \
6f50: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
6f60: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
6f70: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
6f80: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 tls::encrypt -ci
6f90: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
6fa0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
6fb0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
6fc0: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
6fd0: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
6fe0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
6ff0: 20 31 44 31 43 41 38 35 33 41 45 37 43 30 43 35 1D1CA853AE7C0C5
7000: 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 F]]} \..-match e
7010: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 xact -result 000
7020: 30 30 30 30 30 30 30 30 30 32 30 30 30 0a 0a 74 0000000002000..t
7030: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
7040: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
7050: 31 2e 31 30 34 20 7b 44 65 63 72 79 70 74 20 44 1.104 {Decrypt D
7060: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
7070: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
7080: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
7090: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
70a0: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
70b0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
70c0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
70d0: 65 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 e hex 0101010101
70e0: 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 010101] \... -da
70f0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
7100: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 e hex 0000000000
7110: 30 30 32 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 002000]]} \..-ma
7120: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
7130: 74 20 31 64 31 63 61 38 35 33 61 65 37 63 30 63 t 1d1ca853ae7c0c
7140: 35 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 5f..tcltest::tes
7150: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
7160: 5f 44 45 53 2d 31 2e 31 30 35 20 7b 45 6e 63 72 _DES-1.105 {Encr
7170: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e ypt DES} \..-con
7180: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 straints DES \..
7190: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
71a0: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 code hex [tls::e
71b0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 ncrypt -cipher D
71c0: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a ES -padding 0 \.
71d0: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
71e0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 decode hex 01010
71f0: 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 10101010101] \..
7200: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 . -data [binary
7210: 64 65 63 6f 64 65 20 68 65 78 20 43 45 33 33 32 decode hex CE332
7220: 33 32 39 32 34 38 46 33 32 32 38 5d 5d 7d 20 5c 329248F3228]]} \
7230: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
7240: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 result 000000000
7250: 30 30 30 31 30 30 30 0a 0a 74 63 6c 74 65 73 74 0001000..tcltest
7260: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f ::test Symetric_
7270: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 30 36 20 Block_DES-1.106
7280: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
7290: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
72a0: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
72b0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
72c0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
72d0: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
72e0: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
72f0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
7300: 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 31 0101010101010101
7310: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
7320: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
7330: 30 30 30 30 30 30 30 30 30 30 30 30 31 30 30 30 0000000000001000
7340: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
7350: 61 63 74 20 2d 72 65 73 75 6c 74 20 63 65 33 33 act -result ce33
7360: 32 33 32 39 32 34 38 66 33 32 32 38 0a 0a 74 63 2329248f3228..tc
7370: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
7380: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
7390: 2e 31 30 37 20 7b 45 6e 63 72 79 70 74 20 44 45 .107 {Encrypt DE
73a0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
73b0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
73c0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
73d0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
73e0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
73f0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
7400: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
7410: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
7420: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
7430: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
7440: 20 68 65 78 20 38 34 30 35 44 31 41 42 45 32 34 hex 8405D1ABE24
7450: 46 42 39 34 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 FB942]]} \..-mat
7460: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
7470: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 38 30 000000000000080
7480: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
7490: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
74a0: 44 45 53 2d 31 2e 31 30 38 20 7b 44 65 63 72 79 DES-1.108 {Decry
74b0: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 pt DES} \..-cons
74c0: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d traints DES \..-
74d0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
74e0: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 ode hex [tls::de
74f0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 crypt -cipher DE
7500: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 S -padding 0 \..
7510: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
7520: 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 ecode hex 010101
7530: 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 0101010101] \...
7540: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
7550: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 ecode hex 000000
7560: 30 30 30 30 30 30 30 38 30 30 5d 5d 7d 20 5c 0a 0000000800]]} \.
7570: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
7580: 65 73 75 6c 74 20 38 34 30 35 64 31 61 62 65 32 esult 8405d1abe2
7590: 34 66 62 39 34 32 0a 0a 74 63 6c 74 65 73 74 3a 4fb942..tcltest:
75a0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 :test Symetric_B
75b0: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 30 39 20 7b lock_DES-1.109 {
75c0: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 Encrypt DES} \..
75d0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 -constraints DES
75e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
75f0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
7600: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 s::encrypt -ciph
7610: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 er DES -padding
7620: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 0 \... -key [bin
7630: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
7640: 31 30 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 101010101010101]
7650: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e \... -data [bin
7660: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 ary decode hex E
7670: 36 34 33 44 37 38 30 39 30 43 41 34 32 30 37 5d 643D78090CA4207]
7680: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 ]} \..-match exa
7690: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 ct -result 00000
76a0: 30 30 30 30 30 30 30 30 34 30 30 0a 0a 74 63 6c 00000000400..tcl
76b0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 test::test Symet
76c0: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e ric_Block_DES-1.
76d0: 31 31 30 20 7b 44 65 63 72 79 70 74 20 44 45 53 110 {Decrypt DES
76e0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
76f0: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b s DES \..-body {
7700: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
7710: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 x [tls::decrypt
7720: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 -cipher DES -pad
7730: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 ding 0 \... -key
7740: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
7750: 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 31 hex 010101010101
7760: 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 0101] \... -data
7770: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
7780: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 hex 000000000000
7790: 30 34 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 0400]]} \..-matc
77a0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
77b0: 65 36 34 33 64 37 38 30 39 30 63 61 34 32 30 37 e643d78090ca4207
77c0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
77d0: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 Symetric_Block_D
77e0: 45 53 2d 31 2e 31 31 31 20 7b 45 6e 63 72 79 70 ES-1.111 {Encryp
77f0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
7800: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
7810: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
7820: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 de hex [tls::enc
7830: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
7840: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
7850: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
7860: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
7870: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
7880: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
7890: 63 6f 64 65 20 68 65 78 20 34 38 32 32 31 42 39 code hex 48221B9
78a0: 39 33 37 37 34 38 41 32 33 5d 5d 7d 20 5c 0a 09 937748A23]]} \..
78b0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
78c0: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 sult 00000000000
78d0: 30 30 32 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 00200..tcltest::
78e0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
78f0: 6f 63 6b 5f 44 45 53 2d 31 2e 31 31 32 20 7b 44 ock_DES-1.112 {D
7900: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d ecrypt DES} \..-
7910: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 constraints DES
7920: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
7930: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
7940: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
7950: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 r DES -padding 0
7960: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 \... -key [bina
7970: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 ry decode hex 01
7980: 30 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 01010101010101]
7990: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 \... -data [bina
79a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 ry decode hex 00
79b0: 30 30 30 30 30 30 30 30 30 30 30 32 30 30 5d 5d 00000000000200]]
79c0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
79d0: 74 20 2d 72 65 73 75 6c 74 20 34 38 32 32 31 62 t -result 48221b
79e0: 39 39 33 37 37 34 38 61 32 33 0a 0a 74 63 6c 74 9937748a23..tclt
79f0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 est::test Symetr
7a00: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 ic_Block_DES-1.1
7a10: 31 33 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 13 {Encrypt DES}
7a20: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
7a30: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 DES \..-body {b
7a40: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 inary encode hex
7a50: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d [tls::encrypt -
7a60: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 cipher DES -padd
7a70: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
7a80: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
7a90: 65 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 ex 0101010101010
7aa0: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 101] \... -data
7ab0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
7ac0: 65 78 20 44 44 37 43 30 42 42 44 36 31 46 41 46 ex DD7C0BBD61FAF
7ad0: 44 35 34 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 D54]]} \..-match
7ae0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 exact -result 0
7af0: 30 30 30 30 30 30 30 30 30 30 30 30 31 30 30 0a 000000000000100.
7b00: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 .tcltest::test S
7b10: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 ymetric_Block_DE
7b20: 53 2d 31 2e 31 31 34 20 7b 44 65 63 72 79 70 74 S-1.114 {Decrypt
7b30: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 DES} \..-constr
7b40: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f aints DES \..-bo
7b50: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
7b60: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
7b70: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 ypt -cipher DES
7b80: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 -padding 0 \...
7b90: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
7ba0: 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 31 ode hex 01010101
7bb0: 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 01010101] \... -
7bc0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
7bd0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 ode hex 00000000
7be0: 30 30 30 30 30 31 30 30 5d 5d 7d 20 5c 0a 09 2d 00000100]]} \..-
7bf0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
7c00: 75 6c 74 20 64 64 37 63 30 62 62 64 36 31 66 61 ult dd7c0bbd61fa
7c10: 66 64 35 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 fd54..tcltest::t
7c20: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f est Symetric_Blo
7c30: 63 6b 5f 44 45 53 2d 31 2e 31 31 35 20 7b 45 6e ck_DES-1.115 {En
7c40: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
7c50: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
7c60: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
7c70: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
7c80: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
7c90: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
7ca0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
7cb0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 y decode hex 010
7cc0: 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 1010101010101] \
7cd0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
7ce0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 46 42 y decode hex 2FB
7cf0: 43 32 39 31 41 35 37 30 44 42 35 43 34 5d 5d 7d C291A570DB5C4]]}
7d00: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
7d10: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 -result 0000000
7d20: 30 30 30 30 30 30 30 38 30 0a 0a 74 63 6c 74 65 000000080..tclte
7d30: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
7d40: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 31 c_Block_DES-1.11
7d50: 36 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 6 {Decrypt DES}
7d60: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
7d70: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
7d80: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
7d90: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
7da0: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
7db0: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
7dc0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
7dd0: 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 x 01010101010101
7de0: 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 01] \... -data [
7df0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
7e00: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 x 00000000000000
7e10: 38 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 80]]} \..-match
7e20: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 66 exact -result 2f
7e30: 62 63 32 39 31 61 35 37 30 64 62 35 63 34 0a 0a bc291a570db5c4..
7e40: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
7e50: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
7e60: 2d 31 2e 31 31 37 20 7b 45 6e 63 72 79 70 74 20 -1.117 {Encrypt
7e70: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 DES} \..-constra
7e80: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 ints DES \..-bod
7e90: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
7ea0: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
7eb0: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d pt -cipher DES -
7ec0: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
7ed0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
7ee0: 64 65 20 68 65 78 20 30 31 30 31 30 31 30 31 30 de hex 010101010
7ef0: 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 1010101] \... -d
7f00: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
7f10: 64 65 20 68 65 78 20 45 30 37 43 33 30 44 37 45 de hex E07C30D7E
7f20: 34 45 32 36 45 31 32 5d 5d 7d 20 5c 0a 09 2d 6d 4E26E12]]} \..-m
7f30: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
7f40: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 lt 0000000000000
7f50: 30 34 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 040..tcltest::te
7f60: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
7f70: 6b 5f 44 45 53 2d 31 2e 31 31 38 20 7b 44 65 63 k_DES-1.118 {Dec
7f80: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
7f90: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
7fa0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
7fb0: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
7fc0: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
7fd0: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
7fe0: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
7ff0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 decode hex 0101
8000: 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 010101010101] \.
8010: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
8020: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 decode hex 0000
8030: 30 30 30 30 30 30 30 30 30 30 34 30 5d 5d 7d 20 000000000040]]}
8040: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
8050: 2d 72 65 73 75 6c 74 20 65 30 37 63 33 30 64 37 -result e07c30d7
8060: 65 34 65 32 36 65 31 32 0a 0a 74 63 6c 74 65 73 e4e26e12..tcltes
8070: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
8080: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 31 39 _Block_DES-1.119
8090: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c {Encrypt DES} \
80a0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
80b0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
80c0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
80d0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 tls::encrypt -ci
80e0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
80f0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
8100: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
8110: 20 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 010101010101010
8120: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 1] \... -data [b
8130: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
8140: 20 30 39 35 33 45 32 32 35 38 45 38 45 39 30 41 0953E2258E8E90A
8150: 31 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 1]]} \..-match e
8160: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 xact -result 000
8170: 30 30 30 30 30 30 30 30 30 30 30 32 30 0a 0a 74 0000000000020..t
8180: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
8190: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
81a0: 31 2e 31 32 30 20 7b 44 65 63 72 79 70 74 20 44 1.120 {Decrypt D
81b0: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
81c0: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
81d0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
81e0: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
81f0: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
8200: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
8210: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
8220: 65 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 e hex 0101010101
8230: 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 010101] \... -da
8240: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
8250: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 e hex 0000000000
8260: 30 30 30 30 32 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 000020]]} \..-ma
8270: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
8280: 74 20 30 39 35 33 65 32 32 35 38 65 38 65 39 30 t 0953e2258e8e90
8290: 61 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 a1..tcltest::tes
82a0: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
82b0: 5f 44 45 53 2d 31 2e 31 32 31 20 7b 45 6e 63 72 _DES-1.121 {Encr
82c0: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e ypt DES} \..-con
82d0: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 straints DES \..
82e0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
82f0: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 code hex [tls::e
8300: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 ncrypt -cipher D
8310: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a ES -padding 0 \.
8320: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
8330: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 decode hex 01010
8340: 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 10101010101] \..
8350: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 . -data [binary
8360: 64 65 63 6f 64 65 20 68 65 78 20 35 42 37 31 31 decode hex 5B711
8370: 42 43 34 43 45 45 42 46 32 45 45 5d 5d 7d 20 5c BC4CEEBF2EE]]} \
8380: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
8390: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 result 000000000
83a0: 30 30 30 30 30 31 30 0a 0a 74 63 6c 74 65 73 74 0000010..tcltest
83b0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f ::test Symetric_
83c0: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 32 32 20 Block_DES-1.122
83d0: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
83e0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
83f0: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
8400: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
8410: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
8420: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
8430: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
8440: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
8450: 30 31 30 31 30 31 30 31 30 31 30 31 30 31 30 31 0101010101010101
8460: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
8470: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
8480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 31 30 0000000000000010
8490: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
84a0: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 62 37 31 act -result 5b71
84b0: 31 62 63 34 63 65 65 62 66 32 65 65 0a 0a 74 63 1bc4ceebf2ee..tc
84c0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
84d0: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
84e0: 2e 31 32 33 20 7b 45 6e 63 72 79 70 74 20 44 45 .123 {Encrypt DE
84f0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
8500: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
8510: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
8520: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
8530: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
8540: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
8550: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
8560: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
8570: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
8580: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
8590: 20 68 65 78 20 43 43 30 38 33 46 31 45 36 44 39 hex CC083F1E6D9
85a0: 45 38 35 46 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 E85F6]]} \..-mat
85b0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
85c0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 000000000000000
85d0: 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 8..tcltest::test
85e0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
85f0: 44 45 53 2d 31 2e 31 32 34 20 7b 44 65 63 72 79 DES-1.124 {Decry
8600: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 pt DES} \..-cons
8610: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d traints DES \..-
8620: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
8630: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 ode hex [tls::de
8640: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 crypt -cipher DE
8650: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 S -padding 0 \..
8660: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
8670: 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 ecode hex 010101
8680: 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 0101010101] \...
8690: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
86a0: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 ecode hex 000000
86b0: 30 30 30 30 30 30 30 30 30 38 5d 5d 7d 20 5c 0a 0000000008]]} \.
86c0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
86d0: 65 73 75 6c 74 20 63 63 30 38 33 66 31 65 36 64 esult cc083f1e6d
86e0: 39 65 38 35 66 36 0a 0a 74 63 6c 74 65 73 74 3a 9e85f6..tcltest:
86f0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 :test Symetric_B
8700: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 32 35 20 7b lock_DES-1.125 {
8710: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 Encrypt DES} \..
8720: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 -constraints DES
8730: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
8740: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
8750: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 s::encrypt -ciph
8760: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 er DES -padding
8770: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 0 \... -key [bin
8780: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
8790: 31 30 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 101010101010101]
87a0: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e \... -data [bin
87b0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 44 ary decode hex D
87c0: 32 46 44 38 38 36 37 44 35 30 44 32 44 46 45 5d 2FD8867D50D2DFE]
87d0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 ]} \..-match exa
87e0: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 ct -result 00000
87f0: 30 30 30 30 30 30 30 30 30 30 34 0a 0a 74 63 6c 00000000004..tcl
8800: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 test::test Symet
8810: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e ric_Block_DES-1.
8820: 31 32 36 20 7b 44 65 63 72 79 70 74 20 44 45 53 126 {Decrypt DES
8830: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
8840: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b s DES \..-body {
8850: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
8860: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 x [tls::decrypt
8870: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 -cipher DES -pad
8880: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 ding 0 \... -key
8890: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
88a0: 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 31 hex 010101010101
88b0: 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 0101] \... -data
88c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
88d0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 hex 000000000000
88e0: 30 30 30 34 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 0004]]} \..-matc
88f0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
8900: 64 32 66 64 38 38 36 37 64 35 30 64 32 64 66 65 d2fd8867d50d2dfe
8910: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
8920: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 Symetric_Block_D
8930: 45 53 2d 31 2e 31 32 37 20 7b 45 6e 63 72 79 70 ES-1.127 {Encryp
8940: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
8950: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
8960: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
8970: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 de hex [tls::enc
8980: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
8990: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
89a0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
89b0: 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 code hex 0101010
89c0: 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 101010101] \...
89d0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
89e0: 63 6f 64 65 20 68 65 78 20 30 36 45 37 45 41 32 code hex 06E7EA2
89f0: 32 43 45 39 32 37 30 38 46 5d 5d 7d 20 5c 0a 09 2CE92708F]]} \..
8a00: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
8a10: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 sult 00000000000
8a20: 30 30 30 30 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 00002..tcltest::
8a30: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
8a40: 6f 63 6b 5f 44 45 53 2d 31 2e 31 32 38 20 7b 44 ock_DES-1.128 {D
8a50: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d ecrypt DES} \..-
8a60: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 constraints DES
8a70: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
8a80: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
8a90: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
8aa0: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 r DES -padding 0
8ab0: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 \... -key [bina
8ac0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 ry decode hex 01
8ad0: 30 31 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 01010101010101]
8ae0: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 \... -data [bina
8af0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 ry decode hex 00
8b00: 30 30 30 30 30 30 30 30 30 30 30 30 30 32 5d 5d 00000000000002]]
8b10: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
8b20: 74 20 2d 72 65 73 75 6c 74 20 30 36 65 37 65 61 t -result 06e7ea
8b30: 32 32 63 65 39 32 37 30 38 66 0a 0a 74 63 6c 74 22ce92708f..tclt
8b40: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 est::test Symetr
8b50: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 ic_Block_DES-1.1
8b60: 32 39 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 29 {Encrypt DES}
8b70: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
8b80: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 DES \..-body {b
8b90: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 inary encode hex
8ba0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d [tls::encrypt -
8bb0: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 cipher DES -padd
8bc0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
8bd0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
8be0: 65 78 20 30 31 30 31 30 31 30 31 30 31 30 31 30 ex 0101010101010
8bf0: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 101] \... -data
8c00: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
8c10: 65 78 20 31 36 36 42 34 30 42 34 34 41 42 41 34 ex 166B40B44ABA4
8c20: 42 44 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 BD6]]} \..-match
8c30: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 exact -result 0
8c40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 31 0a 000000000000001.
8c50: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 .tcltest::test S
8c60: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 ymetric_Block_DE
8c70: 53 2d 31 2e 31 33 30 20 7b 44 65 63 72 79 70 74 S-1.130 {Decrypt
8c80: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 DES} \..-constr
8c90: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f aints DES \..-bo
8ca0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
8cb0: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
8cc0: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 ypt -cipher DES
8cd0: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 -padding 0 \...
8ce0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
8cf0: 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 30 31 ode hex 01010101
8d00: 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 01010101] \... -
8d10: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
8d20: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 ode hex 00000000
8d30: 30 30 30 30 30 30 30 31 5d 5d 7d 20 5c 0a 09 2d 00000001]]} \..-
8d40: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
8d50: 75 6c 74 20 31 36 36 62 34 30 62 34 34 61 62 61 ult 166b40b44aba
8d60: 34 62 64 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 4bd6..tcltest::t
8d70: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f est Symetric_Blo
8d80: 63 6b 5f 44 45 53 2d 31 2e 31 33 31 20 7b 45 6e ck_DES-1.131 {En
8d90: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
8da0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
8db0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
8dc0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
8dd0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
8de0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
8df0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
8e00: 79 20 64 65 63 6f 64 65 20 68 65 78 20 37 43 41 y decode hex 7CA
8e10: 31 31 30 34 35 34 41 31 41 36 45 35 37 5d 20 5c 110454A1A6E57] \
8e20: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
8e30: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 41 y decode hex 01A
8e40: 31 44 36 44 30 33 39 37 37 36 37 34 32 5d 5d 7d 1D6D039776742]]}
8e50: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
8e60: 20 2d 72 65 73 75 6c 74 20 36 39 30 66 35 62 30 -result 690f5b0
8e70: 64 39 61 32 36 39 33 39 62 0a 0a 74 63 6c 74 65 d9a26939b..tclte
8e80: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
8e90: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 33 c_Block_DES-1.13
8ea0: 32 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 2 {Decrypt DES}
8eb0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
8ec0: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
8ed0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
8ee0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
8ef0: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
8f00: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
8f10: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
8f20: 78 20 37 43 41 31 31 30 34 35 34 41 31 41 36 45 x 7CA110454A1A6E
8f30: 35 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 57] \... -data [
8f40: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
8f50: 78 20 36 39 30 46 35 42 30 44 39 41 32 36 39 33 x 690F5B0D9A2693
8f60: 39 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 9B]]} \..-match
8f70: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 31 exact -result 01
8f80: 61 31 64 36 64 30 33 39 37 37 36 37 34 32 0a 0a a1d6d039776742..
8f90: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
8fa0: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
8fb0: 2d 31 2e 31 33 33 20 7b 45 6e 63 72 79 70 74 20 -1.133 {Encrypt
8fc0: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 DES} \..-constra
8fd0: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 ints DES \..-bod
8fe0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
8ff0: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
9000: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d pt -cipher DES -
9010: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
9020: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
9030: 64 65 20 68 65 78 20 30 31 33 31 44 39 36 31 39 de hex 0131D9619
9040: 44 43 31 33 37 36 45 5d 20 5c 0a 09 09 20 2d 64 DC1376E] \... -d
9050: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
9060: 64 65 20 68 65 78 20 35 43 44 35 34 43 41 38 33 de hex 5CD54CA83
9070: 44 45 46 35 37 44 41 5d 5d 7d 20 5c 0a 09 2d 6d DEF57DA]]} \..-m
9080: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
9090: 6c 74 20 37 61 33 38 39 64 31 30 33 35 34 62 64 lt 7a389d10354bd
90a0: 32 37 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 271..tcltest::te
90b0: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
90c0: 6b 5f 44 45 53 2d 31 2e 31 33 34 20 7b 44 65 63 k_DES-1.134 {Dec
90d0: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
90e0: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
90f0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
9100: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
9110: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
9120: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
9130: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
9140: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 33 31 decode hex 0131
9150: 44 39 36 31 39 44 43 31 33 37 36 45 5d 20 5c 0a D9619DC1376E] \.
9160: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
9170: 20 64 65 63 6f 64 65 20 68 65 78 20 37 41 33 38 decode hex 7A38
9180: 39 44 31 30 33 35 34 42 44 32 37 31 5d 5d 7d 20 9D10354BD271]]}
9190: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
91a0: 2d 72 65 73 75 6c 74 20 35 63 64 35 34 63 61 38 -result 5cd54ca8
91b0: 33 64 65 66 35 37 64 61 0a 0a 74 63 6c 74 65 73 3def57da..tcltes
91c0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
91d0: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 33 35 _Block_DES-1.135
91e0: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c {Encrypt DES} \
91f0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
9200: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
9210: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
9220: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 tls::encrypt -ci
9230: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
9240: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
9250: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
9260: 20 30 37 41 31 31 33 33 45 34 41 30 42 32 36 38 07A1133E4A0B268
9270: 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 6] \... -data [b
9280: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
9290: 20 30 32 34 38 44 34 33 38 30 36 46 36 37 31 37 0248D43806F6717
92a0: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 2]]} \..-match e
92b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 36 38 xact -result 868
92c0: 65 62 62 35 31 63 61 62 34 35 39 39 61 0a 0a 74 ebb51cab4599a..t
92d0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
92e0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
92f0: 31 2e 31 33 36 20 7b 44 65 63 72 79 70 74 20 44 1.136 {Decrypt D
9300: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
9310: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
9320: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
9330: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
9340: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
9350: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
9360: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
9370: 65 20 68 65 78 20 30 37 41 31 31 33 33 45 34 41 e hex 07A1133E4A
9380: 30 42 32 36 38 36 5d 20 5c 0a 09 09 20 2d 64 61 0B2686] \... -da
9390: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
93a0: 65 20 68 65 78 20 38 36 38 45 42 42 35 31 43 41 e hex 868EBB51CA
93b0: 42 34 35 39 39 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 B4599A]]} \..-ma
93c0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
93d0: 74 20 30 32 34 38 64 34 33 38 30 36 66 36 37 31 t 0248d43806f671
93e0: 37 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 72..tcltest::tes
93f0: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
9400: 5f 44 45 53 2d 31 2e 31 33 37 20 7b 45 6e 63 72 _DES-1.137 {Encr
9410: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e ypt DES} \..-con
9420: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 straints DES \..
9430: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
9440: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 code hex [tls::e
9450: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 ncrypt -cipher D
9460: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a ES -padding 0 \.
9470: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
9480: 64 65 63 6f 64 65 20 68 65 78 20 33 38 34 39 36 decode hex 38496
9490: 37 34 43 32 36 30 32 33 31 39 45 5d 20 5c 0a 09 74C2602319E] \..
94a0: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 . -data [binary
94b0: 64 65 63 6f 64 65 20 68 65 78 20 35 31 34 35 34 decode hex 51454
94c0: 42 35 38 32 44 44 46 34 34 30 41 5d 5d 7d 20 5c B582DDF440A]]} \
94d0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
94e0: 72 65 73 75 6c 74 20 37 31 37 38 38 37 36 65 30 result 7178876e0
94f0: 31 66 31 39 62 32 61 0a 0a 74 63 6c 74 65 73 74 1f19b2a..tcltest
9500: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f ::test Symetric_
9510: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 33 38 20 Block_DES-1.138
9520: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
9530: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
9540: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
9550: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
9560: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
9570: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
9580: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
9590: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
95a0: 33 38 34 39 36 37 34 43 32 36 30 32 33 31 39 45 3849674C2602319E
95b0: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
95c0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
95d0: 37 31 37 38 38 37 36 45 30 31 46 31 39 42 32 41 7178876E01F19B2A
95e0: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
95f0: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 31 34 35 act -result 5145
9600: 34 62 35 38 32 64 64 66 34 34 30 61 0a 0a 74 63 4b582ddf440a..tc
9610: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
9620: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
9630: 2e 31 33 39 20 7b 45 6e 63 72 79 70 74 20 44 45 .139 {Encrypt DE
9640: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
9650: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
9660: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
9670: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
9680: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
9690: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
96a0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
96b0: 20 68 65 78 20 30 34 42 39 31 35 42 41 34 33 46 hex 04B915BA43F
96c0: 45 42 35 42 36 5d 20 5c 0a 09 09 20 2d 64 61 74 EB5B6] \... -dat
96d0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
96e0: 20 68 65 78 20 34 32 46 44 34 34 33 30 35 39 35 hex 42FD4430595
96f0: 37 37 46 41 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 77FA2]]} \..-mat
9700: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
9710: 20 61 66 33 37 66 62 34 32 31 66 38 63 34 30 39 af37fb421f8c409
9720: 35 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 5..tcltest::test
9730: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
9740: 44 45 53 2d 31 2e 31 34 30 20 7b 44 65 63 72 79 DES-1.140 {Decry
9750: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 pt DES} \..-cons
9760: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d traints DES \..-
9770: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
9780: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 ode hex [tls::de
9790: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 crypt -cipher DE
97a0: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 S -padding 0 \..
97b0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
97c0: 65 63 6f 64 65 20 68 65 78 20 30 34 42 39 31 35 ecode hex 04B915
97d0: 42 41 34 33 46 45 42 35 42 36 5d 20 5c 0a 09 09 BA43FEB5B6] \...
97e0: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
97f0: 65 63 6f 64 65 20 68 65 78 20 41 46 33 37 46 42 ecode hex AF37FB
9800: 34 32 31 46 38 43 34 30 39 35 5d 5d 7d 20 5c 0a 421F8C4095]]} \.
9810: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
9820: 65 73 75 6c 74 20 34 32 66 64 34 34 33 30 35 39 esult 42fd443059
9830: 35 37 37 66 61 32 0a 0a 74 63 6c 74 65 73 74 3a 577fa2..tcltest:
9840: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 :test Symetric_B
9850: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 34 31 20 7b lock_DES-1.141 {
9860: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 Encrypt DES} \..
9870: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 -constraints DES
9880: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
9890: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
98a0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 s::encrypt -ciph
98b0: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 er DES -padding
98c0: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 0 \... -key [bin
98d0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
98e0: 31 31 33 42 39 37 30 46 44 33 34 46 32 43 45 5d 113B970FD34F2CE]
98f0: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e \... -data [bin
9900: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
9910: 35 39 42 35 45 30 38 35 31 43 46 31 34 33 41 5d 59B5E0851CF143A]
9920: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 ]} \..-match exa
9930: 63 74 20 2d 72 65 73 75 6c 74 20 38 36 61 35 36 ct -result 86a56
9940: 30 66 31 30 65 63 36 64 38 35 62 0a 0a 74 63 6c 0f10ec6d85b..tcl
9950: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 test::test Symet
9960: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e ric_Block_DES-1.
9970: 31 34 32 20 7b 44 65 63 72 79 70 74 20 44 45 53 142 {Decrypt DES
9980: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
9990: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b s DES \..-body {
99a0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
99b0: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 x [tls::decrypt
99c0: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 -cipher DES -pad
99d0: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 ding 0 \... -key
99e0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
99f0: 68 65 78 20 30 31 31 33 42 39 37 30 46 44 33 34 hex 0113B970FD34
9a00: 46 32 43 45 5d 20 5c 0a 09 09 20 2d 64 61 74 61 F2CE] \... -data
9a10: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
9a20: 68 65 78 20 38 36 41 35 36 30 46 31 30 45 43 36 hex 86A560F10EC6
9a30: 44 38 35 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 D85B]]} \..-matc
9a40: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
9a50: 30 35 39 62 35 65 30 38 35 31 63 66 31 34 33 61 059b5e0851cf143a
9a60: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
9a70: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 Symetric_Block_D
9a80: 45 53 2d 31 2e 31 34 33 20 7b 45 6e 63 72 79 70 ES-1.143 {Encryp
9a90: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
9aa0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
9ab0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
9ac0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 de hex [tls::enc
9ad0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
9ae0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
9af0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
9b00: 63 6f 64 65 20 68 65 78 20 30 31 37 30 46 31 37 code hex 0170F17
9b10: 35 34 36 38 46 42 35 45 36 5d 20 5c 0a 09 09 20 5468FB5E6] \...
9b20: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
9b30: 63 6f 64 65 20 68 65 78 20 30 37 35 36 44 38 45 code hex 0756D8E
9b40: 30 37 37 34 37 36 31 44 32 5d 5d 7d 20 5c 0a 09 0774761D2]]} \..
9b50: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
9b60: 73 75 6c 74 20 30 63 64 33 64 61 30 32 30 30 32 sult 0cd3da02002
9b70: 31 64 63 30 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 1dc09..tcltest::
9b80: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
9b90: 6f 63 6b 5f 44 45 53 2d 31 2e 31 34 34 20 7b 44 ock_DES-1.144 {D
9ba0: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d ecrypt DES} \..-
9bb0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 constraints DES
9bc0: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
9bd0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
9be0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
9bf0: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 r DES -padding 0
9c00: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 \... -key [bina
9c10: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 ry decode hex 01
9c20: 37 30 46 31 37 35 34 36 38 46 42 35 45 36 5d 20 70F175468FB5E6]
9c30: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 \... -data [bina
9c40: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 43 ry decode hex 0C
9c50: 44 33 44 41 30 32 30 30 32 31 44 43 30 39 5d 5d D3DA020021DC09]]
9c60: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
9c70: 74 20 2d 72 65 73 75 6c 74 20 30 37 35 36 64 38 t -result 0756d8
9c80: 65 30 37 37 34 37 36 31 64 32 0a 0a 74 63 6c 74 e0774761d2..tclt
9c90: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 est::test Symetr
9ca0: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 ic_Block_DES-1.1
9cb0: 34 35 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 45 {Encrypt DES}
9cc0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
9cd0: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 DES \..-body {b
9ce0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 inary encode hex
9cf0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d [tls::encrypt -
9d00: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 cipher DES -padd
9d10: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
9d20: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
9d30: 65 78 20 34 33 32 39 37 46 41 44 33 38 45 33 37 ex 43297FAD38E37
9d40: 33 46 45 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 3FE] \... -data
9d50: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
9d60: 65 78 20 37 36 32 35 31 34 42 38 32 39 42 46 34 ex 762514B829BF4
9d70: 38 36 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 86A]]} \..-match
9d80: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 exact -result e
9d90: 61 36 37 36 62 32 63 62 37 64 62 32 62 37 61 0a a676b2cb7db2b7a.
9da0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 .tcltest::test S
9db0: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 ymetric_Block_DE
9dc0: 53 2d 31 2e 31 34 36 20 7b 44 65 63 72 79 70 74 S-1.146 {Decrypt
9dd0: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 DES} \..-constr
9de0: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f aints DES \..-bo
9df0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
9e00: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
9e10: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 ypt -cipher DES
9e20: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 -padding 0 \...
9e30: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
9e40: 6f 64 65 20 68 65 78 20 34 33 32 39 37 46 41 44 ode hex 43297FAD
9e50: 33 38 45 33 37 33 46 45 5d 20 5c 0a 09 09 20 2d 38E373FE] \... -
9e60: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
9e70: 6f 64 65 20 68 65 78 20 45 41 36 37 36 42 32 43 ode hex EA676B2C
9e80: 42 37 44 42 32 42 37 41 5d 5d 7d 20 5c 0a 09 2d B7DB2B7A]]} \..-
9e90: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
9ea0: 75 6c 74 20 37 36 32 35 31 34 62 38 32 39 62 66 ult 762514b829bf
9eb0: 34 38 36 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 486a..tcltest::t
9ec0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f est Symetric_Blo
9ed0: 63 6b 5f 44 45 53 2d 31 2e 31 34 37 20 7b 45 6e ck_DES-1.147 {En
9ee0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
9ef0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
9f00: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
9f10: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
9f20: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
9f30: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
9f40: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
9f50: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 37 41 y decode hex 07A
9f60: 37 31 33 37 30 34 35 44 41 32 41 31 36 5d 20 5c 7137045DA2A16] \
9f70: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
9f80: 79 20 64 65 63 6f 64 65 20 68 65 78 20 33 42 44 y decode hex 3BD
9f90: 44 31 31 39 30 34 39 33 37 32 38 30 32 5d 5d 7d D119049372802]]}
9fa0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
9fb0: 20 2d 72 65 73 75 6c 74 20 64 66 64 36 34 61 38 -result dfd64a8
9fc0: 31 35 63 61 66 31 61 30 66 0a 0a 74 63 6c 74 65 15caf1a0f..tclte
9fd0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
9fe0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 34 c_Block_DES-1.14
9ff0: 38 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 8 {Decrypt DES}
a000: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
a010: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
a020: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
a030: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
a040: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
a050: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
a060: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
a070: 78 20 30 37 41 37 31 33 37 30 34 35 44 41 32 41 x 07A7137045DA2A
a080: 31 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 16] \... -data [
a090: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
a0a0: 78 20 44 46 44 36 34 41 38 31 35 43 41 46 31 41 x DFD64A815CAF1A
a0b0: 30 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0F]]} \..-match
a0c0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 62 exact -result 3b
a0d0: 64 64 31 31 39 30 34 39 33 37 32 38 30 32 0a 0a dd119049372802..
a0e0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
a0f0: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
a100: 2d 31 2e 31 34 39 20 7b 45 6e 63 72 79 70 74 20 -1.149 {Encrypt
a110: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 DES} \..-constra
a120: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 ints DES \..-bod
a130: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
a140: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
a150: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d pt -cipher DES -
a160: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
a170: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
a180: 64 65 20 68 65 78 20 30 34 36 38 39 31 30 34 43 de hex 04689104C
a190: 32 46 44 33 42 32 46 5d 20 5c 0a 09 09 20 2d 64 2FD3B2F] \... -d
a1a0: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
a1b0: 64 65 20 68 65 78 20 32 36 39 35 35 46 36 38 33 de hex 26955F683
a1c0: 35 41 46 36 30 39 41 5d 5d 7d 20 5c 0a 09 2d 6d 5AF609A]]} \..-m
a1d0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
a1e0: 6c 74 20 35 63 35 31 33 63 39 63 34 38 38 36 63 lt 5c513c9c4886c
a1f0: 30 38 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 088..tcltest::te
a200: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
a210: 6b 5f 44 45 53 2d 31 2e 31 35 30 20 7b 44 65 63 k_DES-1.150 {Dec
a220: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
a230: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
a240: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
a250: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
a260: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
a270: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
a280: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
a290: 20 64 65 63 6f 64 65 20 68 65 78 20 30 34 36 38 decode hex 0468
a2a0: 39 31 30 34 43 32 46 44 33 42 32 46 5d 20 5c 0a 9104C2FD3B2F] \.
a2b0: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
a2c0: 20 64 65 63 6f 64 65 20 68 65 78 20 35 43 35 31 decode hex 5C51
a2d0: 33 43 39 43 34 38 38 36 43 30 38 38 5d 5d 7d 20 3C9C4886C088]]}
a2e0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
a2f0: 2d 72 65 73 75 6c 74 20 32 36 39 35 35 66 36 38 -result 26955f68
a300: 33 35 61 66 36 30 39 61 0a 0a 74 63 6c 74 65 73 35af609a..tcltes
a310: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
a320: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 35 31 _Block_DES-1.151
a330: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c {Encrypt DES} \
a340: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
a350: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
a360: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
a370: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 tls::encrypt -ci
a380: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
a390: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
a3a0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
a3b0: 20 33 37 44 30 36 42 42 35 31 36 43 42 37 35 34 37D06BB516CB754
a3c0: 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 6] \... -data [b
a3d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
a3e0: 20 31 36 34 44 35 45 34 30 34 46 32 37 35 32 33 164D5E404F27523
a3f0: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 2]]} \..-match e
a400: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 61 32 xact -result 0a2
a410: 61 65 65 61 65 33 66 66 34 61 62 37 37 0a 0a 74 aeeae3ff4ab77..t
a420: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
a430: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
a440: 31 2e 31 35 32 20 7b 44 65 63 72 79 70 74 20 44 1.152 {Decrypt D
a450: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
a460: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
a470: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
a480: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
a490: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
a4a0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
a4b0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
a4c0: 65 20 68 65 78 20 33 37 44 30 36 42 42 35 31 36 e hex 37D06BB516
a4d0: 43 42 37 35 34 36 5d 20 5c 0a 09 09 20 2d 64 61 CB7546] \... -da
a4e0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
a4f0: 65 20 68 65 78 20 30 41 32 41 45 45 41 45 33 46 e hex 0A2AEEAE3F
a500: 46 34 41 42 37 37 5d 5d 7d 20 5c 0a 09 2d 6d 61 F4AB77]]} \..-ma
a510: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
a520: 74 20 31 36 34 64 35 65 34 30 34 66 32 37 35 32 t 164d5e404f2752
a530: 33 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 32..tcltest::tes
a540: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
a550: 5f 44 45 53 2d 31 2e 31 35 33 20 7b 45 6e 63 72 _DES-1.153 {Encr
a560: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e ypt DES} \..-con
a570: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 straints DES \..
a580: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
a590: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 code hex [tls::e
a5a0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 ncrypt -cipher D
a5b0: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a ES -padding 0 \.
a5c0: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
a5d0: 64 65 63 6f 64 65 20 68 65 78 20 31 46 30 38 32 decode hex 1F082
a5e0: 36 30 44 31 41 43 32 34 36 35 45 5d 20 5c 0a 09 60D1AC2465E] \..
a5f0: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 . -data [binary
a600: 64 65 63 6f 64 65 20 68 65 78 20 36 42 30 35 36 decode hex 6B056
a610: 45 31 38 37 35 39 46 35 43 43 41 5d 5d 7d 20 5c E18759F5CCA]]} \
a620: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
a630: 72 65 73 75 6c 74 20 65 66 31 62 66 30 33 65 35 result ef1bf03e5
a640: 64 66 61 35 37 35 61 0a 0a 74 63 6c 74 65 73 74 dfa575a..tcltest
a650: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f ::test Symetric_
a660: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 35 34 20 Block_DES-1.154
a670: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
a680: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
a690: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
a6a0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
a6b0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
a6c0: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
a6d0: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
a6e0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
a6f0: 31 46 30 38 32 36 30 44 31 41 43 32 34 36 35 45 1F08260D1AC2465E
a700: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
a710: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
a720: 45 46 31 42 46 30 33 45 35 44 46 41 35 37 35 41 EF1BF03E5DFA575A
a730: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
a740: 61 63 74 20 2d 72 65 73 75 6c 74 20 36 62 30 35 act -result 6b05
a750: 36 65 31 38 37 35 39 66 35 63 63 61 0a 0a 74 63 6e18759f5cca..tc
a760: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
a770: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
a780: 2e 31 35 35 20 7b 45 6e 63 72 79 70 74 20 44 45 .155 {Encrypt DE
a790: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
a7a0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
a7b0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
a7c0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
a7d0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
a7e0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
a7f0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
a800: 20 68 65 78 20 35 38 34 30 32 33 36 34 31 41 42 hex 584023641AB
a810: 41 36 31 37 36 5d 20 5c 0a 09 09 20 2d 64 61 74 A6176] \... -dat
a820: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
a830: 20 68 65 78 20 30 30 34 42 44 36 45 46 30 39 31 hex 004BD6EF091
a840: 37 36 30 36 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 76062]]} \..-mat
a850: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
a860: 20 38 38 62 66 30 64 62 36 64 37 30 64 65 65 35 88bf0db6d70dee5
a870: 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 6..tcltest::test
a880: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
a890: 44 45 53 2d 31 2e 31 35 36 20 7b 44 65 63 72 79 DES-1.156 {Decry
a8a0: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 pt DES} \..-cons
a8b0: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d traints DES \..-
a8c0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
a8d0: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 ode hex [tls::de
a8e0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 crypt -cipher DE
a8f0: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 S -padding 0 \..
a900: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
a910: 65 63 6f 64 65 20 68 65 78 20 35 38 34 30 32 33 ecode hex 584023
a920: 36 34 31 41 42 41 36 31 37 36 5d 20 5c 0a 09 09 641ABA6176] \...
a930: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
a940: 65 63 6f 64 65 20 68 65 78 20 38 38 42 46 30 44 ecode hex 88BF0D
a950: 42 36 44 37 30 44 45 45 35 36 5d 5d 7d 20 5c 0a B6D70DEE56]]} \.
a960: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
a970: 65 73 75 6c 74 20 30 30 34 62 64 36 65 66 30 39 esult 004bd6ef09
a980: 31 37 36 30 36 32 0a 0a 74 63 6c 74 65 73 74 3a 176062..tcltest:
a990: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 :test Symetric_B
a9a0: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 35 37 20 7b lock_DES-1.157 {
a9b0: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 Encrypt DES} \..
a9c0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 -constraints DES
a9d0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
a9e0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
a9f0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 s::encrypt -ciph
aa00: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 er DES -padding
aa10: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 0 \... -key [bin
aa20: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 ary decode hex 0
aa30: 32 35 38 31 36 31 36 34 36 32 39 42 30 30 37 5d 25816164629B007]
aa40: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e \... -data [bin
aa50: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 34 ary decode hex 4
aa60: 38 30 44 33 39 30 30 36 45 45 37 36 32 46 32 5d 80D39006EE762F2]
aa70: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 ]} \..-match exa
aa80: 63 74 20 2d 72 65 73 75 6c 74 20 61 31 66 39 39 ct -result a1f99
aa90: 31 35 35 34 31 30 32 30 62 35 36 0a 0a 74 63 6c 15541020b56..tcl
aaa0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 test::test Symet
aab0: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e ric_Block_DES-1.
aac0: 31 35 38 20 7b 44 65 63 72 79 70 74 20 44 45 53 158 {Decrypt DES
aad0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
aae0: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b s DES \..-body {
aaf0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
ab00: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 x [tls::decrypt
ab10: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 -cipher DES -pad
ab20: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 ding 0 \... -key
ab30: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
ab40: 68 65 78 20 30 32 35 38 31 36 31 36 34 36 32 39 hex 025816164629
ab50: 42 30 30 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 B007] \... -data
ab60: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
ab70: 68 65 78 20 41 31 46 39 39 31 35 35 34 31 30 32 hex A1F991554102
ab80: 30 42 35 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 0B56]]} \..-matc
ab90: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
aba0: 34 38 30 64 33 39 30 30 36 65 65 37 36 32 66 32 480d39006ee762f2
abb0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
abc0: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 Symetric_Block_D
abd0: 45 53 2d 31 2e 31 35 39 20 7b 45 6e 63 72 79 70 ES-1.159 {Encryp
abe0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 t DES} \..-const
abf0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 raints DES \..-b
ac00: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
ac10: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 de hex [tls::enc
ac20: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 rypt -cipher DES
ac30: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
ac40: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
ac50: 63 6f 64 65 20 68 65 78 20 34 39 37 39 33 45 42 code hex 49793EB
ac60: 43 37 39 42 33 32 35 38 46 5d 20 5c 0a 09 09 20 C79B3258F] \...
ac70: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
ac80: 63 6f 64 65 20 68 65 78 20 34 33 37 35 34 30 43 code hex 437540C
ac90: 38 36 39 38 46 33 43 46 41 5d 5d 7d 20 5c 0a 09 8698F3CFA]]} \..
aca0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
acb0: 73 75 6c 74 20 36 66 62 66 31 63 61 66 63 66 66 sult 6fbf1cafcff
acc0: 64 30 35 35 36 0a 0a 74 63 6c 74 65 73 74 3a 3a d0556..tcltest::
acd0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
ace0: 6f 63 6b 5f 44 45 53 2d 31 2e 31 36 30 20 7b 44 ock_DES-1.160 {D
acf0: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d ecrypt DES} \..-
ad00: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 constraints DES
ad10: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
ad20: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
ad30: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
ad40: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 r DES -padding 0
ad50: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 \... -key [bina
ad60: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 34 39 ry decode hex 49
ad70: 37 39 33 45 42 43 37 39 42 33 32 35 38 46 5d 20 793EBC79B3258F]
ad80: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 \... -data [bina
ad90: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 46 ry decode hex 6F
ada0: 42 46 31 43 41 46 43 46 46 44 30 35 35 36 5d 5d BF1CAFCFFD0556]]
adb0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
adc0: 74 20 2d 72 65 73 75 6c 74 20 34 33 37 35 34 30 t -result 437540
add0: 63 38 36 39 38 66 33 63 66 61 0a 0a 74 63 6c 74 c8698f3cfa..tclt
ade0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 est::test Symetr
adf0: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 ic_Block_DES-1.1
ae00: 36 31 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 61 {Encrypt DES}
ae10: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
ae20: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 DES \..-body {b
ae30: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 inary encode hex
ae40: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d [tls::encrypt -
ae50: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 cipher DES -padd
ae60: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
ae70: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
ae80: 65 78 20 34 46 42 30 35 45 31 35 31 35 41 42 37 ex 4FB05E1515AB7
ae90: 33 41 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 3A7] \... -data
aea0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
aeb0: 65 78 20 30 37 32 44 34 33 41 30 37 37 30 37 35 ex 072D43A077075
aec0: 32 39 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 292]]} \..-match
aed0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 exact -result 2
aee0: 66 32 32 65 34 39 62 61 62 37 63 61 31 61 63 0a f22e49bab7ca1ac.
aef0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 .tcltest::test S
af00: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 ymetric_Block_DE
af10: 53 2d 31 2e 31 36 32 20 7b 44 65 63 72 79 70 74 S-1.162 {Decrypt
af20: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 DES} \..-constr
af30: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f aints DES \..-bo
af40: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
af50: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
af60: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 ypt -cipher DES
af70: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 -padding 0 \...
af80: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
af90: 6f 64 65 20 68 65 78 20 34 46 42 30 35 45 31 35 ode hex 4FB05E15
afa0: 31 35 41 42 37 33 41 37 5d 20 5c 0a 09 09 20 2d 15AB73A7] \... -
afb0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
afc0: 6f 64 65 20 68 65 78 20 32 46 32 32 45 34 39 42 ode hex 2F22E49B
afd0: 41 42 37 43 41 31 41 43 5d 5d 7d 20 5c 0a 09 2d AB7CA1AC]]} \..-
afe0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
aff0: 75 6c 74 20 30 37 32 64 34 33 61 30 37 37 30 37 ult 072d43a07707
b000: 35 32 39 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 5292..tcltest::t
b010: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f est Symetric_Blo
b020: 63 6b 5f 44 45 53 2d 31 2e 31 36 33 20 7b 45 6e ck_DES-1.163 {En
b030: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 crypt DES} \..-c
b040: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c onstraints DES \
b050: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
b060: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
b070: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
b080: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 DES -padding 0
b090: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 \... -key [binar
b0a0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 34 39 45 y decode hex 49E
b0b0: 39 35 44 36 44 34 43 41 32 32 39 42 46 5d 20 5c 95D6D4CA229BF] \
b0c0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 ... -data [binar
b0d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 32 46 y decode hex 02F
b0e0: 45 35 35 37 37 38 31 31 37 46 31 32 41 5d 5d 7d E55778117F12A]]}
b0f0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
b100: 20 2d 72 65 73 75 6c 74 20 35 61 36 62 36 31 32 -result 5a6b612
b110: 63 63 32 36 63 63 65 34 61 0a 0a 74 63 6c 74 65 cc26cce4a..tclte
b120: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 st::test Symetri
b130: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 36 c_Block_DES-1.16
b140: 34 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 4 {Decrypt DES}
b150: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
b160: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 DES \..-body {bi
b170: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 nary encode hex
b180: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 [tls::decrypt -c
b190: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 ipher DES -paddi
b1a0: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b ng 0 \... -key [
b1b0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
b1c0: 78 20 34 39 45 39 35 44 36 44 34 43 41 32 32 39 x 49E95D6D4CA229
b1d0: 42 46 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b BF] \... -data [
b1e0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
b1f0: 78 20 35 41 36 42 36 31 32 43 43 32 36 43 43 45 x 5A6B612CC26CCE
b200: 34 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 4A]]} \..-match
b210: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 32 exact -result 02
b220: 66 65 35 35 37 37 38 31 31 37 66 31 32 61 0a 0a fe55778117f12a..
b230: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 tcltest::test Sy
b240: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 metric_Block_DES
b250: 2d 31 2e 31 36 35 20 7b 45 6e 63 72 79 70 74 20 -1.165 {Encrypt
b260: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 DES} \..-constra
b270: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 ints DES \..-bod
b280: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
b290: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
b2a0: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d pt -cipher DES -
b2b0: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
b2c0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
b2d0: 64 65 20 68 65 78 20 30 31 38 33 31 30 44 43 34 de hex 018310DC4
b2e0: 30 39 42 32 36 44 36 5d 20 5c 0a 09 09 20 2d 64 09B26D6] \... -d
b2f0: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
b300: 64 65 20 68 65 78 20 31 44 39 44 35 43 35 30 31 de hex 1D9D5C501
b310: 38 46 37 32 38 43 32 5d 5d 7d 20 5c 0a 09 2d 6d 8F728C2]]} \..-m
b320: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
b330: 6c 74 20 35 66 34 63 30 33 38 65 64 31 32 62 32 lt 5f4c038ed12b2
b340: 65 34 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 e41..tcltest::te
b350: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
b360: 6b 5f 44 45 53 2d 31 2e 31 36 36 20 7b 44 65 63 k_DES-1.166 {Dec
b370: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f rypt DES} \..-co
b380: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a nstraints DES \.
b390: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
b3a0: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
b3b0: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
b3c0: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c DES -padding 0 \
b3d0: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
b3e0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 38 33 decode hex 0183
b3f0: 31 30 44 43 34 30 39 42 32 36 44 36 5d 20 5c 0a 10DC409B26D6] \.
b400: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
b410: 20 64 65 63 6f 64 65 20 68 65 78 20 35 46 34 43 decode hex 5F4C
b420: 30 33 38 45 44 31 32 42 32 45 34 31 5d 5d 7d 20 038ED12B2E41]]}
b430: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
b440: 2d 72 65 73 75 6c 74 20 31 64 39 64 35 63 35 30 -result 1d9d5c50
b450: 31 38 66 37 32 38 63 32 0a 0a 74 63 6c 74 65 73 18f728c2..tcltes
b460: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 t::test Symetric
b470: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 36 37 _Block_DES-1.167
b480: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c {Encrypt DES} \
b490: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 ..-constraints D
b4a0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e ES \..-body {bin
b4b0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
b4c0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 tls::encrypt -ci
b4d0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e pher DES -paddin
b4e0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 g 0 \... -key [b
b4f0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
b500: 20 31 43 35 38 37 46 31 43 31 33 39 32 34 46 45 1C587F1C13924FE
b510: 46 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 F] \... -data [b
b520: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
b530: 20 33 30 35 35 33 32 32 38 36 44 36 46 32 39 35 305532286D6F295
b540: 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 A]]} \..-match e
b550: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 33 66 xact -result 63f
b560: 61 63 30 64 30 33 34 64 39 66 37 39 33 0a 0a 74 ac0d034d9f793..t
b570: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d cltest::test Sym
b580: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d etric_Block_DES-
b590: 31 2e 31 36 38 20 7b 44 65 63 72 79 70 74 20 44 1.168 {Decrypt D
b5a0: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 ES} \..-constrai
b5b0: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 nts DES \..-body
b5c0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
b5d0: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
b5e0: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 t -cipher DES -p
b5f0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
b600: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
b610: 65 20 68 65 78 20 31 43 35 38 37 46 31 43 31 33 e hex 1C587F1C13
b620: 39 32 34 46 45 46 5d 20 5c 0a 09 09 20 2d 64 61 924FEF] \... -da
b630: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
b640: 65 20 68 65 78 20 36 33 46 41 43 30 44 30 33 34 e hex 63FAC0D034
b650: 44 39 46 37 39 33 5d 5d 7d 20 5c 0a 09 2d 6d 61 D9F793]]} \..-ma
b660: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
b670: 74 20 33 30 35 35 33 32 32 38 36 64 36 66 32 39 t 305532286d6f29
b680: 35 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 5a..tcltest::tes
b690: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
b6a0: 5f 44 45 53 2d 31 2e 31 36 39 20 7b 45 6e 63 72 _DES-1.169 {Encr
b6b0: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e ypt DES} \..-con
b6c0: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 straints DES \..
b6d0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
b6e0: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 code hex [tls::e
b6f0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 ncrypt -cipher D
b700: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a ES -padding 0 \.
b710: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
b720: 64 65 63 6f 64 65 20 68 65 78 20 31 30 33 31 36 decode hex 10316
b730: 45 30 32 38 43 38 46 33 42 34 41 5d 20 5c 0a 09 E028C8F3B4A] \..
b740: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 . -data [binary
b750: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 decode hex 00000
b760: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 00000000000]]} \
b770: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
b780: 72 65 73 75 6c 74 20 38 32 64 63 62 61 66 62 64 result 82dcbafbd
b790: 65 61 62 36 36 30 32 0a 0a 74 63 6c 74 65 73 74 eab6602..tcltest
b7a0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f ::test Symetric_
b7b0: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 37 30 20 Block_DES-1.170
b7c0: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a {Decrypt DES} \.
b7d0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 .-constraints DE
b7e0: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 S \..-body {bina
b7f0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
b800: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
b810: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 her DES -padding
b820: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 0 \... -key [bi
b830: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
b840: 31 30 33 31 36 45 30 32 38 43 38 46 33 42 34 41 10316E028C8F3B4A
b850: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 ] \... -data [bi
b860: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
b870: 38 32 44 43 42 41 46 42 44 45 41 42 36 36 30 32 82DCBAFBDEAB6602
b880: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ]]} \..-match ex
b890: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 act -result 0000
b8a0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 000000000000..tc
b8b0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 ltest::test Syme
b8c0: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 tric_Block_DES-1
b8d0: 2e 31 37 31 20 7b 45 6e 63 72 79 70 74 20 44 45 .171 {Encrypt DE
b8e0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e S} \..-constrain
b8f0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 ts DES \..-body
b900: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
b910: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
b920: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 -cipher DES -pa
b930: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
b940: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
b950: 20 68 65 78 20 30 31 30 31 30 31 30 31 30 31 30 hex 01010101010
b960: 31 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 10101] \... -dat
b970: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
b980: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 hex 00000000000
b990: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 00000]]} \..-mat
b9a0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
b9b0: 20 38 30 30 30 30 30 30 30 30 30 30 30 30 30 30 800000000000000
b9c0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
b9d0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
b9e0: 44 45 53 2d 31 2e 31 37 32 20 7b 44 65 63 72 79 DES-1.172 {Decry
b9f0: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 pt DES} \..-cons
ba00: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d traints DES \..-
ba10: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
ba20: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 ode hex [tls::de
ba30: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 crypt -cipher DE
ba40: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 S -padding 0 \..
ba50: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
ba60: 65 63 6f 64 65 20 68 65 78 20 30 31 30 31 30 31 ecode hex 010101
ba70: 30 31 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 0101010101] \...
ba80: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
ba90: 65 63 6f 64 65 20 68 65 78 20 38 30 30 30 30 30 ecode hex 800000
baa0: 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 0000000000]]} \.
bab0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
bac0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 esult 0000000000
bad0: 30 30 30 30 30 30 0a 0a 23 20 43 6c 65 61 6e 75 000000..# Cleanu
bae0: 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 p.::tcltest::cle
baf0: 61 6e 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e anupTests.return
bb00: 0a .