Artifact bb98f446052cf8be45eef9b198844d5a9fdc43d8565529677f1864d27756534b:

• File tests/test_vectors/Symetric_Block/DES.test — part of check-in [ed45bb9820] at 2024-04-08 04:21:53 on branch crypto — Added more DES test vectors (user: bohagan, size: 64493) [annotate] [blame] [check-ins using]

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 43 43 30  y decode hex CC0
0cc0: 38 33 46 31 45 36 44 39 45 38 35 46 36 5d 5d 7d  83F1E6D9E85F6]]}
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 30 30 30 30 30 30   -result 0000000
0cf0: 30 30 30 30 30 30 30 30 38 0a 0a 74 63 6c 74 65  000000008..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 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
0de0: 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  8]]} \..-match e
0df0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 63 30  xact -result cc0
0e00: 38 33 66 31 65 36 64 39 65 38 35 66 36 0a 0a 74  83f1e6d9e85f6..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 44 32 46 44 38 38 36 37 44 35 30   hex D2FD8867D50
0ef0: 44 32 44 46 45 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  D2DFE]]} \..-mat
0f00: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0f10: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
0f20: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  4..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 30 30 30 30 30 30  code hex 0000000
1000: 30 30 30 30 30 30 30 30 34 5d 5d 7d 20 5c 0a 09  000000004]]} \..
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 64 32 66 64 38 38 36 37 64 35 30  sult d2fd8867d50
1030: 64 32 64 66 65 0a 0a 74 63 6c 74 65 73 74 3a 3a  d2dfe..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 30 36 45  y decode hex 06E
1110: 37 45 41 32 32 43 45 39 32 37 30 38 46 5d 5d 7d  7EA22CE92708F]]}
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 30 30 30 30 30 30   -result 0000000
1140: 30 30 30 30 30 30 30 30 32 0a 0a 74 63 6c 74 65  000000002..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 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
1230: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
1240: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 36 65  xact -result 06e
1250: 37 65 61 32 32 63 65 39 32 37 30 38 66 0a 0a 74  7ea22ce92708f..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 31 36 36 42 34 30 42 34 34 41 42   hex 166B40B44AB
1340: 41 34 42 44 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  A4BD6]]} \..-mat
1350: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
1360: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
1370: 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  1..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 30 30 30 30 30 30  code hex 0000000
1450: 30 30 30 30 30 30 30 30 31 5d 5d 7d 20 5c 0a 09  000000001]]} \..
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 31 36 36 62 34 30 62 34 34 61 62  sult 166b40b44ab
1480: 61 34 62 64 36 0a 0a 74 63 6c 74 65 73 74 3a 3a  a4bd6..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 38 30 30  y decode hex 800
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 30 30 30  y decode hex 000
1560: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 39 35 61 38 64 37 32   -result 95a8d72
1590: 38 31 33 64 61 61 39 34 64 0a 0a 74 63 6c 74 65  813daa94d..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 38 30 30 31 30 31 30 31 30 31 30 31 30 31 30   800101010101010
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 39 35 41 38 44 37 32 38 31 33 44 41 41 39 34   95A8D72813DAA94
1680: 44 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  D]]} \..-match e
1690: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
16a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30 30 31 30 31 30 31 30 31 30   hex 40010101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
1790: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
17a0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
17b0: 20 30 65 65 63 31 34 38 37 64 64 38 63 32 36 64   0eec1487dd8c26d
17c0: 35 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  5..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 34 30 30 31 30 31 30  code hex 4001010
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 45 45 43 31 34 38  code hex 0EEC148
18a0: 37 44 44 38 43 32 36 44 35 5d 5d 7d 20 5c 0a 09  7DD8C26D5]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
18d0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30 30  y decode hex 200
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 30 30 30  y decode hex 000
19b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 37 61 64 31 36 66 66   -result 7ad16ff
19e0: 62 37 39 63 34 35 39 32 36 0a 0a 74 63 6c 74 65  b79c45926..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 32 30 30 31 30 31 30 31 30 31 30 31 30 31 30   200101010101010
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 37 41 44 31 36 46 46 42 37 39 43 34 35 39 32   7AD16FFB79C4592
1ad0: 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  6]]} \..-match e
1ae0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
1af0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 31 30 30 31 30 31 30 31 30 31 30   hex 10010101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
1be0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
1bf0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
1c00: 20 64 33 37 34 36 32 39 34 63 61 36 61 36 63 66   d3746294ca6a6cf
1c10: 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  3..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 31 30 30 31 30 31 30  code hex 1001010
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 44 33 37 34 36 32 39  code hex D374629
1cf0: 34 43 41 36 41 36 43 46 33 5d 5d 7d 20 5c 0a 09  4CA6A6CF3]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
1d20: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 38 30  y decode hex 080
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 30 30 30  y decode hex 000
1e00: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 38 30 39 66 35 66 38   -result 809f5f8
1e30: 37 33 63 31 66 64 37 36 31 0a 0a 74 63 6c 74 65  73c1fd761..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 38 30 31 30 31 30 31 30 31 30 31 30 31 30   080101010101010
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 38 30 39 46 35 46 38 37 33 43 31 46 44 37 36   809F5F873C1FD76
1f20: 31 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  1]]} \..-match e
1f30: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
1f40: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30 31 30 31 30 31 30 31 30   hex 04010101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
2030: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
2040: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
2050: 20 63 30 32 66 61 66 66 65 63 39 38 39 64 31 66   c02faffec989d1f
2060: 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  c..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 34 30 31 30 31 30  code hex 0401010
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 43 30 32 46 41 46 46  code hex C02FAFF
2140: 45 43 39 38 39 44 31 46 43 5d 5d 7d 20 5c 0a 09  EC989D1FC]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
2170: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30  y decode hex 020
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 30 30 30  y decode hex 000
2250: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 34 36 31 35 61 61 31   -result 4615aa1
2280: 64 33 33 65 37 32 66 31 30 0a 0a 74 63 6c 74 65  d33e72f10..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 32 30 31 30 31 30 31 30 31 30 31 30 31 30   020101010101010
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 34 36 31 35 41 41 31 44 33 33 45 37 32 46 31   4615AA1D33E72F1
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 30 30 30  xact -result 000
2390: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 38 30 30 31 30 31 30 31 30   hex 01800101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
2480: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
2490: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
24a0: 20 32 30 35 35 31 32 33 33 35 30 63 30 30 38 35   2055123350c0085
24b0: 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  8..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 38 30 30 31 30  code hex 0180010
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 32 30 35 35 31 32 33  code hex 2055123
2590: 33 35 30 43 30 30 38 35 38 5d 5d 7d 20 5c 0a 09  350C00858]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
25c0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 34  y decode hex 014
2670: 30 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c  0010101010101] \
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 30 30 30  y decode hex 000
26a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 64 66 33 62 39 39 64   -result df3b99d
26d0: 36 35 37 37 33 39 37 63 38 0a 0a 74 63 6c 74 65  6577397c8..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 34 30 30 31 30 31 30 31 30 31 30 31 30   014001010101010
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 44 46 33 42 39 39 44 36 35 37 37 33 39 37 43   DF3B99D6577397C
27c0: 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  8]]} \..-match e
27d0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
27e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 32 30 30 31 30 31 30 31 30   hex 01200101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
28d0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
28e0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
28f0: 20 33 31 66 65 31 37 33 36 39 62 35 32 38 38 63   31fe17369b5288c
2900: 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  9..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 32 30 30 31 30  code hex 0120010
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 33 31 46 45 31 37 33  code hex 31FE173
29e0: 36 39 42 35 32 38 38 43 39 5d 5d 7d 20 5c 0a 09  69B5288C9]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
2a10: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 31  y decode hex 011
2ac0: 30 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c  0010101010101] \
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 30 30 30  y decode hex 000
2af0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 64 66 64 64 33 63 63   -result dfdd3cc
2b20: 36 34 64 61 65 31 36 34 32 0a 0a 74 63 6c 74 65  64dae1642..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 31 30 30 31 30 31 30 31 30 31 30 31 30   011001010101010
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 44 46 44 44 33 43 43 36 34 44 41 45 31 36 34   DFDD3CC64DAE164
2c10: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
2c20: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
2c30: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 38 30 31 30 31 30 31 30   hex 01080101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
2d20: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
2d30: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
2d40: 20 31 37 38 63 38 33 63 65 32 62 33 39 39 64 39   178c83ce2b399d9
2d50: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  4..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 38 30 31 30  code hex 0108010
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 31 37 38 43 38 33 43  code hex 178C83C
2e30: 45 32 42 33 39 39 44 39 34 5d 5d 7d 20 5c 0a 09  E2B399D94]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
2e60: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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: 34 30 31 30 31 30 31 30 31 30 31 30 31 5d 20 5c  4010101010101] \
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 30 30 30  y decode hex 000
2f40: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 35 30 66 36 33 36 33   -result 50f6363
2f70: 32 34 61 39 62 37 66 38 30 0a 0a 74 63 6c 74 65  24a9b7f80..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 34 30 31 30 31 30 31 30 31 30 31 30   010401010101010
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 35 30 46 36 33 36 33 32 34 41 39 42 37 46 38   50F636324A9B7F8
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 30 30 30  xact -result 000
3080: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 32 30 31 30 31 30 31 30   hex 01020101010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
3170: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
3180: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
3190: 20 61 38 34 36 38 65 65 33 62 63 31 38 66 30 36   a8468ee3bc18f06
31a0: 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  d..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 32 30 31 30  code hex 0102010
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 41 38 34 36 38 45 45  code hex A8468EE
3280: 33 42 43 31 38 46 30 36 44 5d 5d 7d 20 5c 0a 09  3BC18F06D]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
32b0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 38 30 30 31 30 31 30 31 30 31 30 31 5d 20 5c  1800101010101] \
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 30 30 30  y decode hex 000
3390: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 61 32 64 63 39 65 39   -result a2dc9e9
33c0: 32 66 64 33 63 64 65 39 32 0a 0a 74 63 6c 74 65  2fd3cde92..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 38 30 30 31 30 31 30 31 30 31 30   010180010101010
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 41 32 44 43 39 45 39 32 46 44 33 43 44 45 39   A2DC9E92FD3CDE9
34b0: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
34c0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
34d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30 30 31 30 31 30   hex 01014001010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
35c0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
35d0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
35e0: 20 63 61 63 30 39 66 37 39 37 64 30 33 31 32 38   cac09f797d03128
35f0: 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  7..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 34 30 30  code hex 0101400
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 43 41 43 30 39 46 37  code hex CAC09F7
36d0: 39 37 44 30 33 31 32 38 37 5d 5d 7d 20 5c 0a 09  97D031287]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
3700: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30 30 31 30 31 30 31 30 31 30 31 5d 20 5c  1200101010101] \
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 30 30 30  y decode hex 000
37e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 39 30 62 61 36 38 30   -result 90ba680
3810: 62 32 32 61 65 62 35 32 35 0a 0a 74 63 6c 74 65  b22aeb525..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 32 30 30 31 30 31 30 31 30 31 30   010120010101010
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 39 30 42 41 36 38 30 42 32 32 41 45 42 35 32   90BA680B22AEB52
3900: 35 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  5]]} \..-match e
3910: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
3920: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 31 30 30 31 30 31 30   hex 01011001010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
3a10: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
3a20: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
3a30: 20 63 65 37 61 32 34 66 33 35 30 65 32 38 30 62   ce7a24f350e280b
3a40: 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  6..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 31 30 30  code hex 0101100
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 43 45 37 41 32 34 46  code hex CE7A24F
3b20: 33 35 30 45 32 38 30 42 36 5d 5d 7d 20 5c 0a 09  350E280B6]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
3b50: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 38 30 31 30 31 30 31 30 31 30 31 5d 20 5c  1080101010101] \
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 30 30 30  y decode hex 000
3c30: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 38 38 32 62 66 66 30   -result 882bff0
3c60: 61 61 30 31 61 30 62 38 37 0a 0a 74 63 6c 74 65  aa01a0b87..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 38 30 31 30 31 30 31 30 31 30   010108010101010
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 38 38 32 42 46 46 30 41 41 30 31 41 30 42 38   882BFF0AA01A0B8
3d50: 37 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  7]]} \..-match e
3d60: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
3d70: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30 31 30 31 30   hex 01010401010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
3e60: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
3e70: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
3e80: 20 32 35 36 31 30 32 38 38 39 32 34 35 31 31 63   25610288924511c
3e90: 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  2..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 34 30  code hex 0101040
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 32 35 36 31 30 32 38  code hex 2561028
3f70: 38 39 32 34 35 31 31 43 32 5d 5d 7d 20 5c 0a 09  8924511C2]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
3fa0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30 31 30 31 30 31 30 31 30 31 5d 20 5c  1020101010101] \
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 30 30 30  y decode hex 000
4080: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 63 37 31 35 31 36 63   -result c71516c
40b0: 32 39 63 37 35 64 31 37 30 0a 0a 74 63 6c 74 65  29c75d170..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 32 30 31 30 31 30 31 30 31 30   010102010101010
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 43 37 31 35 31 36 43 32 39 43 37 35 44 31 37   C71516C29C75D17
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 30 30 30  xact -result 000
41c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 38 30 30 31 30   hex 01010180010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
42b0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
42c0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
42d0: 20 35 31 39 39 63 32 39 61 35 32 63 39 66 30 35   5199c29a52c9f05
42e0: 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  9..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 38  code hex 0101018
4390: 30 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  001010101] \... 
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 35 31 39 39 43 32 39  code hex 5199C29
43c0: 41 35 32 43 39 46 30 35 39 5d 5d 7d 20 5c 0a 09  A52C9F059]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
43f0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 34 30 30 31 30 31 30 31 30 31 5d 20 5c  1014001010101] \
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 30 30 30  y decode hex 000
44d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 63 32 32 66 30 61 32   -result c22f0a2
4500: 39 34 61 37 31 66 32 39 66 0a 0a 74 63 6c 74 65  94a71f29f..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 34 30 30 31 30 31 30 31 30   010101400101010
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 43 32 32 46 30 41 32 39 34 41 37 31 46 32 39   C22F0A294A71F29
45f0: 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  F]]} \..-match e
4600: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
4610: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 32 30 30 31 30   hex 01010120010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
4700: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
4710: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
4720: 20 65 65 33 37 31 34 38 33 37 31 34 63 30 32 65   ee371483714c02e
4730: 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  a..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 32  code hex 0101012
47e0: 30 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  001010101] \... 
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 45 45 33 37 31 34 38  code hex EE37148
4810: 33 37 31 34 43 30 32 45 41 5d 5d 7d 20 5c 0a 09  3714C02EA]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
4840: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 31 30 30 31 30 31 30 31 30 31 5d 20 5c  1011001010101] \
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 30 30 30  y decode hex 000
4920: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 61 38 31 66 62 64 34   -result a81fbd4
4950: 34 38 66 39 65 35 32 32 66 0a 0a 74 63 6c 74 65  48f9e522f..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 31 30 30 31 30 31 30 31 30   010101100101010
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 41 38 31 46 42 44 34 34 38 46 39 45 35 32 32   A81FBD448F9E522
4a40: 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  F]]} \..-match e
4a50: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
4a60: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 38 30 31 30   hex 01010108010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
4b50: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
4b60: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
4b70: 20 34 66 36 34 34 63 39 32 65 31 39 32 64 66 65   4f644c92e192dfe
4b80: 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  d..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: 38 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  801010101] \... 
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 34 46 36 34 34 43 39  code hex 4F644C9
4c60: 32 45 31 39 32 44 46 45 44 5d 5d 7d 20 5c 0a 09  2E192DFED]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
4c90: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 34 30 31 30 31 30 31 30 31 5d 20 5c  1010401010101] \
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 30 30 30  y decode hex 000
4d70: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 31 61 66 61 39 61 36   -result 1afa9a6
4da0: 36 61 36 64 66 39 32 61 65 0a 0a 74 63 6c 74 65  6a6df92ae..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 34 30 31 30 31 30 31 30   010101040101010
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 31 41 46 41 39 41 36 36 41 36 44 46 39 32 41   1AFA9A66A6DF92A
4e90: 45 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  E]]} \..-match e
4ea0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
4eb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 32 30 31 30   hex 01010102010
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
4fa0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
4fb0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
4fc0: 20 62 33 63 31 63 63 37 31 35 63 62 38 37 39 64   b3c1cc715cb879d
4fd0: 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  8..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: 32 30 31 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  201010101] \... 
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 42 33 43 31 43 43 37  code hex B3C1CC7
50b0: 31 35 43 42 38 37 39 44 38 5d 5d 7d 20 5c 0a 09  15CB879D8]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
50e0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 38 30 30 31 30 31 30 31 5d 20 5c  1010180010101] \
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 30 30 30  y decode hex 000
51c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 31 39 64 30 33 32 65   -result 19d032e
51f0: 36 34 61 62 30 62 64 38 62 0a 0a 74 63 6c 74 65  64ab0bd8b..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 38 30 30 31 30 31 30   010101018001010
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 31 39 44 30 33 32 45 36 34 41 42 30 42 44 38   19D032E64AB0BD8
52e0: 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  B]]} \..-match e
52f0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
5300: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30 30   hex 01010101400
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
53f0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
5400: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5410: 20 33 63 66 61 61 37 61 37 64 63 38 37 32 30 64   3cfaa7a7dc8720d
5420: 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  c..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 34 30 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  140010101] \... 
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 33 43 46 41 41 37 41  code hex 3CFAA7A
5500: 37 44 43 38 37 32 30 44 43 5d 5d 7d 20 5c 0a 09  7DC8720DC]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
5530: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30 30 31 30 31 30 31 5d 20 5c  1010120010101] \
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 30 30 30  y decode hex 000
5610: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 62 37 32 36 35 66 37   -result b7265f7
5640: 66 34 34 37 61 63 36 66 33 0a 0a 74 63 6c 74 65  f447ac6f3..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 32 30 30 31 30 31 30   010101012001010
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 42 37 32 36 35 46 37 46 34 34 37 41 43 36 46   B7265F7F447AC6F
5730: 33 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  3]]} \..-match e
5740: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
5750: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 31 30 30   hex 01010101100
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
5840: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
5850: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5860: 20 39 64 62 37 33 62 33 63 30 64 31 36 33 66 35   9db73b3c0d163f5
5870: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  4..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 31 30 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  110010101] \... 
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 39 44 42 37 33 42 33  code hex 9DB73B3
5950: 43 30 44 31 36 33 46 35 34 5d 5d 7d 20 5c 0a 09  C0D163F54]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
5980: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 38 30 31 30 31 30 31 5d 20 5c  1010108010101] \
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 30 30 30  y decode hex 000
5a60: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 38 31 38 31 62 36 35   -result 8181b65
5a90: 62 61 62 66 34 61 39 37 35 0a 0a 74 63 6c 74 65  babf4a975..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 38 30 31 30 31 30   010101010801010
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 38 31 38 31 42 36 35 42 41 42 46 34 41 39 37   8181B65BABF4A97
5b80: 35 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  5]]} \..-match e
5b90: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
5ba0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 34 30   hex 01010101040
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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
5c90: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
5ca0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5cb0: 20 39 33 63 39 62 36 34 30 34 32 65 61 61 32 34   93c9b64042eaa24
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 34 30 31 30 31 30 31 5d 20 5c 0a 09 09 20  104010101] \... 
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 39 33 43 39 42 36 34  code hex 93C9B64
5da0: 30 34 32 45 41 41 32 34 30 5d 5d 7d 20 5c 0a 09  042EAA240]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
5dd0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 32 30 31 30 31 30 31 5d 20 5c  1010102010101] \
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 30 30 30  y decode hex 000
5eb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 35 35 37 30 35 33 30   -result 5570530
5ee0: 38 32 39 37 30 35 35 39 32 0a 0a 74 63 6c 74 65  829705592..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 32 30 31 30 31 30   010101010201010
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 35 35 37 30 35 33 30 38 32 39 37 30 35 35 39   557053082970559
5fd0: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
5fe0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
5ff0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 38   hex 01010101018
60b0: 30 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  00101] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
60e0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
60f0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
6100: 20 38 36 33 38 38 30 39 65 38 37 38 37 38 37 61   8638809e878787a
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 38 30 30 31 30 31 5d 20 5c 0a 09 09 20  101800101] \... 
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 38 36 33 38 38 30 39  code hex 8638809
61f0: 45 38 37 38 37 38 37 41 30 5d 5d 7d 20 5c 0a 09  E878787A0]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
6220: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 34 30 30 31 30 31 5d 20 5c  1010101400101] \
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 30 30 30  y decode hex 000
6300: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 34 31 62 39 61 37 39   -result 41b9a79
6330: 61 66 37 39 61 63 32 30 38 0a 0a 74 63 6c 74 65  af79ac208..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 34 30 30 31 30   010101010140010
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 34 31 42 39 41 37 39 41 46 37 39 41 43 32 30   41B9A79AF79AC20
6420: 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  8]]} \..-match e
6430: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
6440: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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 32   hex 01010101012
6500: 30 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  00101] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
6530: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
6540: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
6550: 20 37 61 39 62 65 34 32 66 32 30 30 39 61 38 39   7a9be42f2009a89
6560: 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  2..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 32 30 30 31 30 31 5d 20 5c 0a 09 09 20  101200101] \... 
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 37 41 39 42 45 34 32  code hex 7A9BE42
6640: 46 32 30 30 39 41 38 39 32 5d 5d 7d 20 5c 0a 09  F2009A892]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
6670: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 31 30 30 31 30 31 5d 20 5c  1010101100101] \
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 30 30 30  y decode hex 000
6750: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 32 39 30 33 38 64 35   -result 29038d5
6780: 36 62 61 36 64 32 37 34 35 0a 0a 74 63 6c 74 65  6ba6d2745..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 31 30 30 31 30   010101010110010
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 32 39 30 33 38 44 35 36 42 41 36 44 32 37 34   29038D56BA6D274
6870: 35 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  5]]} \..-match e
6880: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
6890: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74  0000000000000..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: 38 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  80101] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
6980: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
6990: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
69a0: 20 35 34 39 35 63 36 61 62 66 31 65 35 64 66 35   5495c6abf1e5df5
69b0: 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  1..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 38 30 31 30 31 5d 20 5c 0a 09 09 20  101080101] \... 
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 35 34 39 35 43 36 41  code hex 5495C6A
6a90: 42 46 31 45 35 44 46 35 31 5d 5d 7d 20 5c 0a 09  BF1E5DF51]]} \..
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 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
6ac0: 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  00000..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 34 30 31 30 31 5d 20 5c  1010101040101] \
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 30 30 30  y decode hex 000
6ba0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 61 65 31 33 64 62 64   -result ae13dbd
6bd0: 35 36 31 34 38 38 39 33 33 0a 0a 74 63 6c 74 65  561488933..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 34 30 31  x 01010101010401
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 41 45 31 33 44 42 44 35 36 31 34 38 38 39  x AE13DBD5614889
6cc0: 33 33 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  33]]} \..-match 
6cd0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
6ce0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
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 32 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64  1020101] \... -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 30 30 30 30 30 30 30 30 30  de hex 000000000
6dd0: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-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 32 34 64 31 66 66 61 38 39 30 34 65  lt 024d1ffa8904e
6e00: 33 38 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  389..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 32 30 31 30 31 5d 20 5c 0a  010101020101] \.
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 32 34 44   decode hex 024D
6ee0: 31 46 46 41 38 39 30 34 45 33 38 39 5d 5d 7d 20  1FFA8904E389]]} 
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 30 30 30 30 30 30 30 30  -result 00000000
6f10: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..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 38 30 30   010101010101800
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 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
7000: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
7010: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 31 33  xact -result d13
7020: 39 39 37 31 32 66 39 39 62 66 30 32 65 0a 0a 74  99712f99bf02e..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 38 30 30 31 5d 20 5c 0a 09 09 20 2d 64 61  018001] \... -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 44 31 33 39 39 37 31 32 46 39  e hex D1399712F9
7110: 39 42 46 30 32 45 5d 5d 7d 20 5c 0a 09 2d 6d 61  9BF02E]]} \..-ma
7120: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
7130: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
7140: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..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 34 30 30 31 5d 20 5c 0a 09  10101014001] \..
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 30 30 30 30 30  decode hex 00000
7220: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c  00000000000]]} \
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 31 34 63 31 64 37 63 31 63  result 14c1d7c1c
7250: 66 66 65 63 37 39 65 0a 0a 74 63 6c 74 65 73 74  ffec79e..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 34 30 30 31  0101010101014001
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: 31 34 43 31 44 37 43 31 43 46 46 45 43 37 39 45  14C1D7C1CFFEC79E
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 30 30 30 30  act -result 0000
7360: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63  000000000000..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 32 30 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  12001] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
7450: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
7460: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
7470: 20 31 64 65 35 32 37 39 64 61 65 33 62 65 64 36   1de5279dae3bed6
7480: 66 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  f..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 32 30 30 31 5d 20 5c 0a 09 09  0101012001] \...
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 31 44 45 35 32 37  ecode hex 1DE527
7560: 39 44 41 45 33 42 45 44 36 46 5d 5d 7d 20 5c 0a  9DAE3BED6F]]} \.
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 30 30 30 30 30 30 30 30 30 30  esult 0000000000
7590: 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a  000000..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 31 30 30 31 5d  101010101011001]
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 30  ary decode hex 0
7670: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
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 65 39 34 31 61  ct -result e941a
76a0: 33 33 66 38 35 35 30 31 33 30 33 0a 0a 74 63 6c  33f85501303..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: 31 30 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61  1001] \... -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 45 39 34 31 41 33 33 46 38 35 35 30  hex E941A33F8550
7790: 31 33 30 33 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  1303]]} \..-matc
77a0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
77b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
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 38 30 31 5d 20 5c 0a 09 09 20  101010801] \... 
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 30 30 30 30 30 30 30  code hex 0000000
78a0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
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 64 61 39 39 64 62 62 63 39 61 30  sult da99dbbc9a0
78d0: 33 66 33 37 39 0a 0a 74 63 6c 74 65 73 74 3a 3a  3f379..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 38 30 31 5d 20  01010101010801] 
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 44 41  ry decode hex DA
79b0: 39 39 44 42 42 43 39 41 30 33 46 33 37 39 5d 5d  99DBBC9A03F379]]
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 30 30 30 30 30 30  t -result 000000
79e0: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..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: 34 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  401] \... -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 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
7ad0: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
7ae0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62   exact -result b
7af0: 37 66 63 39 32 66 39 31 64 38 65 39 32 65 39 0a  7fc92f91d8e92e9.
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 34 30 31 5d 20 5c 0a 09 09 20 2d  01010401] \... -
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 42 37 46 43 39 32 46 39  ode hex B7FC92F9
7be0: 31 44 38 45 39 32 45 39 5d 5d 7d 20 5c 0a 09 2d  1D8E92E9]]} \..-
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 30 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
7c10: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..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 32 30 31 5d 20 5c  1010101010201] \
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 30 30 30  y decode hex 000
7cf0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 61 65 38 65 35 63 61   -result ae8e5ca
7d20: 61 33 63 61 30 34 65 38 35 0a 0a 74 63 6c 74 65  a3ca04e85..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 32  x 01010101010102
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 41 45 38 45 35 43 41 41 33 43 41 30 34 45  x AE8E5CAA3CA04E
7e10: 38 35 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  85]]} \..-match 
7e20: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
7e30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
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 38 30 5d 20 5c 0a 09 09 20 2d 64  1010180] \... -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 30 30 30 30 30 30 30 30 30  de hex 000000000
7f20: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-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 39 63 63 36 32 64 66 34 33 62 36 65 65  lt 9cc62df43b6ee
7f50: 64 37 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  d74..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 38 30 5d 20 5c 0a  010101010180] \.
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 39 43 43 36   decode hex 9CC6
8030: 32 44 46 34 33 42 36 45 45 44 37 34 5d 5d 7d 20  2DF43B6EED74]]} 
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 30 30 30 30 30 30 30 30  -result 00000000
8060: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..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 34   010101010101014
8120: 30 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  0] \... -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 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
8150: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
8160: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 38 36  xact -result d86
8170: 33 64 62 62 35 63 35 39 61 39 31 61 30 0a 0a 74  3dbb5c59a91a0..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 34 30 5d 20 5c 0a 09 09 20 2d 64 61  010140] \... -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 44 38 36 33 44 42 42 35 43 35  e hex D863DBB5C5
8260: 39 41 39 31 41 30 5d 5d 7d 20 5c 0a 09 2d 6d 61  9A91A0]]} \..-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 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
8290: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..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 32 30 5d 20 5c 0a 09  10101010120] \..
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 30 30 30 30 30  decode hex 00000
8370: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c  00000000000]]} \
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 61 31 61 62 32 31 39 30 35  result a1ab21905
83a0: 34 35 62 39 31 64 37 0a 0a 74 63 6c 74 65 73 74  45b91d7..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 32 30  0101010101010120
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: 41 31 41 42 32 31 39 30 35 34 35 42 39 31 44 37  A1AB2190545B91D7
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 30 30 30 30  act -result 0000
84b0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63  000000000000..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 31 30 5d 20 5c 0a 09 09 20 2d 64 61 74  10110] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
85a0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
85b0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
85c0: 20 30 38 37 35 30 34 31 65 36 34 63 35 37 30 66   0875041e64c570f
85d0: 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  7..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 31 30 5d 20 5c 0a 09 09  0101010110] \...
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 38 37 35 30 34  ecode hex 087504
86b0: 31 45 36 34 43 35 37 30 46 37 5d 5d 7d 20 5c 0a  1E64C570F7]]} \.
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 30 30 30 30 30 30 30 30 30 30  esult 0000000000
86e0: 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a  000000..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 38 5d  101010101010108]
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 30  ary decode hex 0
87c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
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 35 61 35 39 34  ct -result 5a594
87f0: 35 32 38 62 65 62 65 66 31 63 63 0a 0a 74 63 6c  528bebef1cc..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 38 5d 20 5c 0a 09 09 20 2d 64 61 74 61  0108] \... -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 35 41 35 39 34 35 32 38 42 45 42 45  hex 5A594528BEBE
88e0: 46 31 43 43 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  F1CC]]} \..-matc
88f0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
8900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
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 34 5d 20 5c 0a 09 09 20  101010104] \... 
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 30 30 30 30 30 30  code hex 0000000
89f0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
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 66 63 64 62 33 32 39 31 64 65 32  sult fcdb3291de2
8a20: 31 66 30 63 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  1f0c0..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 34 5d 20  01010101010104] 
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 46 43  ry decode hex FC
8b00: 44 42 33 32 39 31 44 45 32 31 46 30 43 30 5d 5d  DB3291DE21F0C0]]
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 30 30 30 30 30  t -result 000000
8b30: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..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 32 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  102] \... -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 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
8c20: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
8c30: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38   exact -result 8
8c40: 36 39 65 66 64 37 66 39 66 32 36 35 61 30 39 0a  69efd7f9f265a09.
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 32 5d 20 5c 0a 09 09 20 2d  01010102] \... -
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 38 36 39 45 46 44 37 46  ode hex 869EFD7F
8d30: 39 46 32 36 35 41 30 39 5d 5d 7d 20 5c 0a 09 2d  9F265A09]]} \..-
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 30 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
8d60: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..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 31 30 34  y decode hex 104
8e10: 36 39 31 33 34 38 39 39 38 30 31 33 31 5d 20 5c  6913489980131] \
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 30 30  y decode hex 000
8e40: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 38 38 64 35 35 65 35   -result 88d55e5
8e70: 34 66 35 34 63 39 37 62 34 0a 0a 74 63 6c 74 65  4f54c97b4..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 31 30 34 36 39 31 33 34 38 39 39 38 30 31  x 10469134899801
8f30: 33 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  31] \... -data [
8f40: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
8f50: 78 20 38 38 44 35 35 45 35 34 46 35 34 43 39 37  x 88D55E54F54C97
8f60: 42 34 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  B4]]} \..-match 
8f70: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
8f80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
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 31 30 30 37 31 30 33 34 38  de hex 100710348
9040: 39 39 38 38 30 32 30 5d 20 5c 0a 09 09 20 2d 64  9988020] \... -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 30 30 30 30 30 30 30 30 30  de hex 000000000
9070: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-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 30 63 30 63 63 30 30 63 38 33 65 61 34  lt 0c0cc00c83ea4
90a0: 38 66 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  8fd..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 31 30 30 37   decode hex 1007
9150: 31 30 33 34 38 39 39 38 38 30 32 30 5d 20 5c 0a  103489988020] \.
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 30 43 30 43   decode hex 0C0C
9180: 43 30 30 43 38 33 45 41 34 38 46 44 5d 5d 7d 20  C00C83EA48FD]]} 
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 30 30 30 30 30 30 30 30  -result 00000000
91b0: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..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 31 30 30 37 31 30 33 34 43 38 39 38 30 31 32   10071034C898012
9270: 30 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  0] \... -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 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
92a0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
92b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 33 62  xact -result 83b
92c0: 63 38 65 66 33 61 36 35 37 30 31 38 33 0a 0a 74  c8ef3a6570183..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 31 30 30 37 31 30 33 34 43 38  e hex 10071034C8
9380: 39 38 30 31 32 30 5d 20 5c 0a 09 09 20 2d 64 61  980120] \... -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 33 42 43 38 45 46 33 41 36  e hex 83BC8EF3A6
93b0: 35 37 30 31 38 33 5d 5d 7d 20 5c 0a 09 2d 6d 61  570183]]} \..-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 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
93e0: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..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 31 30 34 36 31  decode hex 10461
9490: 30 33 34 38 39 39 38 38 30 32 30 5d 20 5c 0a 09  03489988020] \..
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 30 30 30 30 30  decode hex 00000
94c0: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c  00000000000]]} \
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 64 66 37 32 35 64 63 61 64  result df725dcad
94f0: 39 34 65 61 32 65 39 0a 0a 74 63 6c 74 65 73 74  94ea2e9..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: 31 30 34 36 31 30 33 34 38 39 39 38 38 30 32 30  1046103489988020
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: 44 46 37 32 35 44 43 41 44 39 34 45 41 32 45 39  DF725DCAD94EA2E9
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 30 30 30 30  act -result 0000
9600: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63  000000000000..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 31 30 38 36 39 31 31 35 31 39 31   hex 10869115191
96c0: 39 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  90101] \... -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 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
96f0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
9700: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
9710: 20 65 36 35 32 62 35 33 62 35 35 30 62 65 38 62   e652b53b550be8b
9720: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  0..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 31 30 38 36 39 31  ecode hex 108691
97d0: 31 35 31 39 31 39 30 31 30 31 5d 20 5c 0a 09 09  1519190101] \...
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 45 36 35 32 42 35  ecode hex E652B5
9800: 33 42 35 35 30 42 45 38 42 30 5d 5d 7d 20 5c 0a  3B550BE8B0]]} \.
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 30 30 30 30 30 30 30 30 30 30  esult 0000000000
9830: 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a  000000..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 31  ary decode hex 1
98e0: 30 38 36 39 31 31 35 31 39 35 38 30 31 30 31 5d  086911519580101]
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: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
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 61 66 35 32 37  ct -result af527
9940: 31 32 30 63 34 38 35 63 62 62 30 0a 0a 74 63 6c  120c485cbb0..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 31 30 38 36 39 31 31 35 31 39 35 38  hex 108691151958
9a00: 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61  0101] \... -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 41 46 35 32 37 31 32 30 43 34 38 35  hex AF527120C485
9a30: 43 42 42 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  CBB0]]} \..-matc
9a40: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
9a50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
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 35 31 30 37 42 30 31  code hex 5107B01
9b10: 35 31 39 35 38 30 31 30 31 5d 20 5c 0a 09 09 20  519580101] \... 
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 30 30 30 30 30 30  code hex 0000000
9b40: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
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 66 30 34 63 65 33 39 33 64 62  sult 0f04ce393db
9b70: 39 32 36 64 35 0a 0a 74 63 6c 74 65 73 74 3a 3a  926d5..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 35 31  ry decode hex 51
9c20: 30 37 42 30 31 35 31 39 35 38 30 31 30 31 5d 20  07B01519580101] 
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 46  ry decode hex 0F
9c50: 30 34 43 45 33 39 33 44 42 39 32 36 44 35 5d 5d  04CE393DB926D5]]
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 30 30 30 30 30  t -result 000000
9c80: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..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 31 30 30 37 42 30 31 35 31 39 31 39 30  ex 1007B01519190
9d40: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  101] \... -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 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
9d70: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
9d80: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63   exact -result c
9d90: 39 66 30 30 66 66 63 37 34 30 37 39 30 36 37 0a  9f00ffc74079067.
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 31 30 30 37 42 30 31 35  ode hex 1007B015
9e50: 31 39 31 39 30 31 30 31 5d 20 5c 0a 09 09 20 2d  19190101] \... -
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 43 39 46 30 30 46 46 43  ode hex C9F00FFC
9e80: 37 34 30 37 39 30 36 37 5d 5d 7d 20 5c 0a 09 2d  74079067]]} \..-
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 30 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
9eb0: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..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 33 31 30  y decode hex 310
9f60: 37 39 31 35 34 39 38 30 38 30 31 30 31 5d 20 5c  7915498080101] \
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 30 30 30  y decode hex 000
9f90: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 37 63 66 64 38 32 61   -result 7cfd82a
9fc0: 35 39 33 32 35 32 62 34 65 0a 0a 74 63 6c 74 65  593252b4e..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 33 31 30 37 39 31 35 34 39 38 30 38 30 31  x 31079154980801
a080: 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  01] \... -data [
a090: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
a0a0: 78 20 37 43 46 44 38 32 41 35 39 33 32 35 32 42  x 7CFD82A593252B
a0b0: 34 45 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  4E]]} \..-match 
a0c0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
a0d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
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 33 31 30 37 39 31 39 34 39  de hex 310791949
a190: 38 30 38 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64  8080101] \... -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 30 30 30 30 30 30 30 30 30  de hex 000000000
a1c0: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-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 63 62 34 39 61 32 66 39 65 39 31 33 36  lt cb49a2f9e9136
a1f0: 33 65 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  3e3..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 33 31 30 37   decode hex 3107
a2a0: 39 31 39 34 39 38 30 38 30 31 30 31 5d 20 5c 0a  919498080101] \.
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 43 42 34 39   decode hex CB49
a2d0: 41 32 46 39 45 39 31 33 36 33 45 33 5d 5d 7d 20  A2F9E91363E3]]} 
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 30 30 30 30 30 30 30 30  -result 00000000
a300: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..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 31 30 30 37 39 31 31 35 42 39 30 38 30 31 34   10079115B908014
a3c0: 30 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  0] \... -data [b
a3d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
a3e0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
a3f0: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
a400: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 62  xact -result 00b
a410: 35 38 38 62 65 37 30 64 32 33 66 35 36 0a 0a 74  588be70d23f56..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 31 30 30 37 39 31 31 35 42 39  e hex 10079115B9
a4d0: 30 38 30 31 34 30 5d 20 5c 0a 09 09 20 2d 64 61  080140] \... -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 30 42 35 38 38 42 45 37 30  e hex 00B588BE70
a500: 44 32 33 46 35 36 5d 5d 7d 20 5c 0a 09 2d 6d 61  D23F56]]} \..-ma
a510: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
a520: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
a530: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..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 33 31 30 37 39  decode hex 31079
a5e0: 31 31 35 39 38 30 38 30 31 34 30 5d 20 5c 0a 09  11598080140] \..
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 30 30 30 30 30  decode hex 00000
a610: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c  00000000000]]} \
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 34 30 36 61 39 61 36 61 62  result 406a9a6ab
a640: 34 33 33 39 39 61 65 0a 0a 74 63 6c 74 65 73 74  43399ae..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: 33 31 30 37 39 31 31 35 39 38 30 38 30 31 34 30  3107911598080140
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: 34 30 36 41 39 41 36 41 42 34 33 33 39 39 41 45  406A9A6AB43399AE
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 30 30 30 30  act -result 0000
a750: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63  000000000000..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 31 30 30 37 44 30 31 35 38 39 39   hex 1007D015899
a810: 38 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  80101] \... -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 30 30 30 30 30 30 30 30 30   hex 00000000000
a840: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
a850: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
a860: 20 36 63 62 37 37 33 36 31 31 64 63 61 39 61 64   6cb773611dca9ad
a870: 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  a..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 31 30 30 37 44 30  ecode hex 1007D0
a920: 31 35 38 39 39 38 30 31 30 31 5d 20 5c 0a 09 09  1589980101] \...
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 36 43 42 37 37 33  ecode hex 6CB773
a950: 36 31 31 44 43 41 39 41 44 41 5d 5d 7d 20 5c 0a  611DCA9ADA]]} \.
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 30 30 30 30 30 30 30 30  esult 0000000000
a980: 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a  000000..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 39  ary decode hex 9
aa30: 31 30 37 39 31 31 35 38 39 39 38 30 31 30 31 5d  107911589980101]
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 30  ary decode hex 0
aa60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
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 36 37 66 64 32  ct -result 67fd2
aa90: 31 63 31 37 64 62 62 35 64 37 30 0a 0a 74 63 6c  1c17dbb5d70..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 39 31 30 37 39 31 31 35 38 39 39 38  hex 910791158998
ab50: 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61  0101] \... -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 36 37 46 44 32 31 43 31 37 44 42 42  hex 67FD21C17DBB
ab80: 35 44 37 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  5D70]]} \..-matc
ab90: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
aba0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
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 39 31 30 37 44 30 31  code hex 9107D01
ac60: 35 38 39 31 39 30 31 30 31 5d 20 5c 0a 09 09 20  589190101] \... 
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 30 30 30 30 30 30 30  code hex 0000000
ac90: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
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 39 35 39 32 63 62 34 31 31 30 34  sult 9592cb41104
acc0: 33 30 37 38 37 0a 0a 74 63 6c 74 65 73 74 3a 3a  30787..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 39 31  ry decode hex 91
ad70: 30 37 44 30 31 35 38 39 31 39 30 31 30 31 5d 20  07D01589190101] 
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 39 35  ry decode hex 95
ada0: 39 32 43 42 34 31 31 30 34 33 30 37 38 37 5d 5d  92CB4110430787]]
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 30 30 30 30 30 30  t -result 000000
add0: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..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 31 30 30 37 44 30 31 35 39 38 39 38 30  ex 1007D01598980
ae90: 31 32 30 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  120] \... -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 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
aec0: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
aed0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61   exact -result a
aee0: 36 62 37 66 66 36 38 61 33 31 38 64 64 64 33 0a  6b7ff68a318ddd3.
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 31 30 30 37 44 30 31 35  ode hex 1007D015
afa0: 39 38 39 38 30 31 32 30 5d 20 5c 0a 09 09 20 2d  98980120] \... -
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 41 36 42 37 46 46 36 38  ode hex A6B7FF68
afd0: 41 33 31 38 44 44 44 33 5d 5d 7d 20 5c 0a 09 2d  A318DDD3]]} \..-
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 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
b000: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..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 31 30 30  y decode hex 100
b0b0: 37 39 34 30 34 39 38 31 39 30 31 30 31 5d 20 5c  7940498190101] \
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 30 30  y decode hex 000
b0e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
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 34 64 31 30 32 31 39   -result 4d10219
b110: 36 63 39 31 34 63 61 31 36 0a 0a 74 63 6c 74 65  6c914ca16..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 31 30 30 37 39 34 30 34 39 38 31 39 30 31  x 10079404981901
b1d0: 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  01] \... -data [
b1e0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
b1f0: 78 20 34 44 31 30 32 31 39 36 43 39 31 34 43 41  x 4D102196C914CA
b200: 31 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  16]]} \..-match 
b210: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
b220: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
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 30 37 39 31 30 34 39  de hex 010791049
b2e0: 31 31 39 30 34 30 31 5d 20 5c 0a 09 09 20 2d 64  1190401] \... -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 30 30 30 30 30 30 30 30 30  de hex 000000000
b310: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-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 32 64 66 61 39 66 34 35 37 33 35 39 34  lt 2dfa9f4573594
b340: 39 36 35 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  965..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 30 37   decode hex 0107
b3f0: 39 31 30 34 39 31 31 39 30 34 30 31 5d 20 5c 0a  910491190401] \.
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 32 44 46 41   decode hex 2DFA
b420: 39 46 34 35 37 33 35 39 34 39 36 35 5d 5d 7d 20  9F4573594965]]} 
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 30 30 30 30 30 30 30 30  -result 00000000
b450: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..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 30 31 30 37 39 31 30 34 39 31 31 39 30 31 30   010791049119010
b510: 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  1] \... -data [b
b520: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
b530: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
b540: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
b550: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 34 36  xact -result b46
b560: 36 30 34 38 31 36 63 30 65 30 37 37 34 0a 0a 74  604816c0e0774..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 30 31 30 37 39 31 30 34 39 31  e hex 0107910491
b620: 31 39 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61  190101] \... -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 42 34 36 36 30 34 38 31 36 43  e hex B46604816C
b650: 30 45 30 37 37 34 5d 5d 7d 20 5c 0a 09 2d 6d 61  0E0774]]} \..-ma
b660: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
b670: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
b680: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..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 30 31 30 37 39  decode hex 01079
b730: 34 30 34 39 31 31 39 30 34 30 31 5d 20 5c 0a 09  40491190401] \..
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 36 65 37 65 36 32 32 31 61  result 6e7e6221a
b790: 34 66 33 34 65 38 37 0a 0a 74 63 6c 74 65 73 74  4f34e87..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: 30 31 30 37 39 34 30 34 39 31 31 39 30 34 30 31  0107940491190401
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: 36 45 37 45 36 32 32 31 41 34 46 33 34 45 38 37  6E7E6221A4F34E87
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 31 39 30 37 39 32 31 30 39 38 31   hex 19079210981
b960: 41 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74  A0101] \... -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 61 61 38 35 65 37 34 36 34 33 32 33 33 31 39   aa85e7464323319
b9c0: 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  9..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 31 39 30 37 39 32  ecode hex 190792
ba70: 31 30 39 38 31 41 30 31 30 31 5d 20 5c 0a 09 09  10981A0101] \...
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 41 41 38 35 45 37  ecode hex AA85E7
baa0: 34 36 34 33 32 33 33 31 39 39 5d 5d 7d 20 5c 0a  4643233199]]} \.
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 74 63 6c 74 65 73 74 3a  000000..tcltest:
bae0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42  :test Symetric_B
baf0: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 37 33 20 7b  lock_DES-1.173 {
bb00: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09  Encrypt DES} \..
bb10: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53  -constraints DES
bb20: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
bb30: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
bb40: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
bb50: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20  er DES -padding 
bb60: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e  0 \... -key [bin
bb70: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 31  ary decode hex 1
bb80: 30 30 37 39 31 31 39 39 38 31 39 30 38 30 31 5d  007911998190801]
bb90: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e   \... -data [bin
bba0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
bbb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
bbc0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
bbd0: 63 74 20 2d 72 65 73 75 6c 74 20 32 65 35 61 31  ct -result 2e5a1
bbe0: 39 64 62 34 64 31 39 36 32 64 36 0a 0a 74 63 6c  9db4d1962d6..tcl
bbf0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
bc00: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e  ric_Block_DES-1.
bc10: 31 37 34 20 7b 44 65 63 72 79 70 74 20 44 45 53  174 {Decrypt DES
bc20: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
bc30: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b  s DES \..-body {
bc40: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
bc50: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  x [tls::decrypt 
bc60: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64  -cipher DES -pad
bc70: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79  ding 0 \... -key
bc80: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
bc90: 68 65 78 20 31 30 30 37 39 31 31 39 39 38 31 39  hex 100791199819
bca0: 30 38 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61  0801] \... -data
bcb0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
bcc0: 68 65 78 20 32 45 35 41 31 39 44 42 34 44 31 39  hex 2E5A19DB4D19
bcd0: 36 32 44 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  62D6]]} \..-matc
bce0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
bcf0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
bd00: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
bd10: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44  Symetric_Block_D
bd20: 45 53 2d 31 2e 31 37 35 20 7b 45 6e 63 72 79 70  ES-1.175 {Encryp
bd30: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t DES} \..-const
bd40: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62  raints DES \..-b
bd50: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
bd60: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63  de hex [tls::enc
bd70: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53  rypt -cipher DES
bd80: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09   -padding 0 \...
bd90: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
bda0: 63 6f 64 65 20 68 65 78 20 31 30 30 37 39 31 31  code hex 1007911
bdb0: 39 39 38 31 41 30 38 30 31 5d 20 5c 0a 09 09 20  9981A0801] \... 
bdc0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
bdd0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
bde0: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
bdf0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
be00: 73 75 6c 74 20 32 33 61 38 36 36 61 38 30 39 64  sult 23a866a809d
be10: 33 30 38 39 34 0a 0a 74 63 6c 74 65 73 74 3a 3a  30894..tcltest::
be20: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c  test Symetric_Bl
be30: 6f 63 6b 5f 44 45 53 2d 31 2e 31 37 36 20 7b 44  ock_DES-1.176 {D
be40: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d  ecrypt DES} \..-
be50: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20  constraints DES 
be60: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
be70: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73   encode hex [tls
be80: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
be90: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30  r DES -padding 0
bea0: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61   \... -key [bina
beb0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 30  ry decode hex 10
bec0: 30 37 39 31 31 39 39 38 31 41 30 38 30 31 5d 20  079119981A0801] 
bed0: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61  \... -data [bina
bee0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 33  ry decode hex 23
bef0: 41 38 36 36 41 38 30 39 44 33 30 38 39 34 5d 5d  A866A809D30894]]
bf00: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
bf10: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
bf20: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..tclt
bf30: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
bf40: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31  ic_Block_DES-1.1
bf50: 37 37 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d  77 {Encrypt DES}
bf60: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
bf70: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   DES \..-body {b
bf80: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
bf90: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
bfa0: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64  cipher DES -padd
bfb0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20  ing 0 \... -key 
bfc0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
bfd0: 65 78 20 31 30 30 37 39 32 31 30 39 38 31 39 30  ex 1007921098190
bfe0: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  101] \... -data 
bff0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
c000: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
c010: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
c020: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
c030: 38 31 32 64 39 36 31 66 30 31 37 64 33 32 30 0a  812d961f017d320.
c040: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
c050: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45  ymetric_Block_DE
c060: 53 2d 31 2e 31 37 38 20 7b 44 65 63 72 79 70 74  S-1.178 {Decrypt
c070: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   DES} \..-constr
c080: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f  aints DES \..-bo
c090: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
c0a0: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72  e hex [tls::decr
c0b0: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20  ypt -cipher DES 
c0c0: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20  -padding 0 \... 
c0d0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
c0e0: 6f 64 65 20 68 65 78 20 31 30 30 37 39 32 31 30  ode hex 10079210
c0f0: 39 38 31 39 30 31 30 31 5d 20 5c 0a 09 09 20 2d  98190101] \... -
c100: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
c110: 6f 64 65 20 68 65 78 20 44 38 31 32 44 39 36 31  ode hex D812D961
c120: 46 30 31 37 44 33 32 30 5d 5d 7d 20 5c 0a 09 2d  F017D320]]} \..-
c130: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
c140: 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
c150: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..tcltest::t
c160: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f  est Symetric_Blo
c170: 63 6b 5f 44 45 53 2d 31 2e 31 37 39 20 7b 45 6e  ck_DES-1.179 {En
c180: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63  crypt DES} \..-c
c190: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c  onstraints DES \
c1a0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
c1b0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a  encode hex [tls:
c1c0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
c1d0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20   DES -padding 0 
c1e0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72  \... -key [binar
c1f0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 30 30  y decode hex 100
c200: 37 39 31 31 35 39 38 31 39 30 31 30 42 5d 20 5c  791159819010B] \
c210: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72  ... -data [binar
c220: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
c230: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d  0000000000000]]}
c240: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
c250: 20 2d 72 65 73 75 6c 74 20 30 35 35 36 30 35 38   -result 0556058
c260: 31 36 65 35 38 36 30 38 66 0a 0a 74 63 6c 74 65  16e58608f..tclte
c270: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
c280: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 38  c_Block_DES-1.18
c290: 30 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20  0 {Decrypt DES} 
c2a0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
c2b0: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  DES \..-body {bi
c2c0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
c2d0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
c2e0: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69  ipher DES -paddi
c2f0: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b  ng 0 \... -key [
c300: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
c310: 78 20 31 30 30 37 39 31 31 35 39 38 31 39 30 31  x 10079115981901
c320: 30 42 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  0B] \... -data [
c330: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
c340: 78 20 30 35 35 36 30 35 38 31 36 45 35 38 36 30  x 055605816E5860
c350: 38 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  8F]]} \..-match 
c360: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
c370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
c380: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
c390: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53  metric_Block_DES
c3a0: 2d 31 2e 31 38 31 20 7b 45 6e 63 72 79 70 74 20  -1.181 {Encrypt 
c3b0: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  DES} \..-constra
c3c0: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64  ints DES \..-bod
c3d0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
c3e0: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79   hex [tls::encry
c3f0: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d  pt -cipher DES -
c400: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d  padding 0 \... -
c410: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
c420: 64 65 20 68 65 78 20 31 30 30 34 38 30 31 35 39  de hex 100480159
c430: 38 31 39 30 31 30 31 5d 20 5c 0a 09 09 20 2d 64  8190101] \... -d
c440: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
c450: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
c460: 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d  0000000]]} \..-m
c470: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
c480: 6c 74 20 61 62 64 38 38 65 38 62 31 62 37 37 31  lt abd88e8b1b771
c490: 36 66 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  6f1..tcltest::te
c4a0: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63  st Symetric_Bloc
c4b0: 6b 5f 44 45 53 2d 31 2e 31 38 32 20 7b 44 65 63  k_DES-1.182 {Dec
c4c0: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f  rypt DES} \..-co
c4d0: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a  nstraints DES \.
c4e0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
c4f0: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a  ncode hex [tls::
c500: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
c510: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c  DES -padding 0 \
c520: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  ... -key [binary
c530: 20 64 65 63 6f 64 65 20 68 65 78 20 31 30 30 34   decode hex 1004
c540: 38 30 31 35 39 38 31 39 30 31 30 31 5d 20 5c 0a  801598190101] \.
c550: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79  .. -data [binary
c560: 20 64 65 63 6f 64 65 20 68 65 78 20 41 42 44 38   decode hex ABD8
c570: 38 45 38 42 31 42 37 37 31 36 46 31 5d 5d 7d 20  8E8B1B7716F1]]} 
c580: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
c590: 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30  -result 00000000
c5a0: 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73  00000000..tcltes
c5b0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
c5c0: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 38 33  _Block_DES-1.183
c5d0: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c   {Encrypt DES} \
c5e0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44  ..-constraints D
c5f0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  ES \..-body {bin
c600: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
c610: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
c620: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e  pher DES -paddin
c630: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62  g 0 \... -key [b
c640: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
c650: 20 31 30 30 34 38 30 31 35 39 38 31 39 30 31 30   100480159819010
c660: 32 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  2] \... -data [b
c670: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
c680: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
c690: 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  0]]} \..-match e
c6a0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 33 37  xact -result 537
c6b0: 61 63 39 35 62 65 36 39 64 61 31 65 31 0a 0a 74  ac95be69da1e1..t
c6c0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
c6d0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d  etric_Block_DES-
c6e0: 31 2e 31 38 34 20 7b 44 65 63 72 79 70 74 20 44  1.184 {Decrypt D
c6f0: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  ES} \..-constrai
c700: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79  nts DES \..-body
c710: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
c720: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  hex [tls::decryp
c730: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70  t -cipher DES -p
c740: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b  adding 0 \... -k
c750: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
c760: 65 20 68 65 78 20 31 30 30 34 38 30 31 35 39 38  e hex 1004801598
c770: 31 39 30 31 30 32 5d 20 5c 0a 09 09 20 2d 64 61  190102] \... -da
c780: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
c790: 65 20 68 65 78 20 35 33 37 41 43 39 35 42 45 36  e hex 537AC95BE6
c7a0: 39 44 41 31 45 31 5d 5d 7d 20 5c 0a 09 2d 6d 61  9DA1E1]]} \..-ma
c7b0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
c7c0: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
c7d0: 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  00..tcltest::tes
c7e0: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b  t Symetric_Block
c7f0: 5f 44 45 53 2d 31 2e 31 38 35 20 7b 45 6e 63 72  _DES-1.185 {Encr
c800: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e  ypt DES} \..-con
c810: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09  straints DES \..
c820: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
c830: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65  code hex [tls::e
c840: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44  ncrypt -cipher D
c850: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a  ES -padding 0 \.
c860: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20  .. -key [binary 
c870: 64 65 63 6f 64 65 20 68 65 78 20 31 30 30 34 38  decode hex 10048
c880: 30 31 35 39 38 31 39 30 31 30 38 5d 20 5c 0a 09  01598190108] \..
c890: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20  . -data [binary 
c8a0: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
c8b0: 30 30 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c  00000000000]]} \
c8c0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
c8d0: 72 65 73 75 6c 74 20 61 65 64 30 66 36 61 65 33  result aed0f6ae3
c8e0: 63 32 35 63 64 64 38 0a 0a 74 63 6c 74 65 73 74  c25cdd8..tcltest
c8f0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
c900: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 38 36 20  Block_DES-1.186 
c910: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a  {Decrypt DES} \.
c920: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45  .-constraints DE
c930: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  S \..-body {bina
c940: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74  ry encode hex [t
c950: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
c960: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67  her DES -padding
c970: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69   0 \... -key [bi
c980: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
c990: 31 30 30 34 38 30 31 35 39 38 31 39 30 31 30 38  1004801598190108
c9a0: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69  ] \... -data [bi
c9b0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
c9c0: 41 45 44 30 46 36 41 45 33 43 32 35 43 44 44 38  AED0F6AE3C25CDD8
c9d0: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  ]]} \..-match ex
c9e0: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
c9f0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63  000000000000..tc
ca00: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
ca10: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31  tric_Block_DES-1
ca20: 2e 31 38 37 20 7b 45 6e 63 72 79 70 74 20 44 45  .187 {Encrypt DE
ca30: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  S} \..-constrain
ca40: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20  ts DES \..-body 
ca50: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
ca60: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ex [tls::encrypt
ca70: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61   -cipher DES -pa
ca80: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65  dding 0 \... -ke
ca90: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
caa0: 20 68 65 78 20 31 30 30 32 39 31 31 35 39 38 31   hex 10029115981
cab0: 30 30 31 30 34 5d 20 5c 0a 09 09 20 2d 64 61 74  00104] \... -dat
cac0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
cad0: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
cae0: 30 30 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  00000]]} \..-mat
caf0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
cb00: 20 62 33 65 33 35 61 35 65 65 35 33 65 37 62 38   b3e35a5ee53e7b8
cb10: 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  d..tcltest::test
cb20: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f   Symetric_Block_
cb30: 44 45 53 2d 31 2e 31 38 38 20 7b 44 65 63 72 79  DES-1.188 {Decry
cb40: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73  pt DES} \..-cons
cb50: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d  traints DES \..-
cb60: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
cb70: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65  ode hex [tls::de
cb80: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45  crypt -cipher DE
cb90: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09  S -padding 0 \..
cba0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  . -key [binary d
cbb0: 65 63 6f 64 65 20 68 65 78 20 31 30 30 32 39 31  ecode hex 100291
cbc0: 31 35 39 38 31 30 30 31 30 34 5d 20 5c 0a 09 09  1598100104] \...
cbd0: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64   -data [binary d
cbe0: 65 63 6f 64 65 20 68 65 78 20 42 33 45 33 35 41  ecode hex B3E35A
cbf0: 35 45 45 35 33 45 37 42 38 44 5d 5d 7d 20 5c 0a  5EE53E7B8D]]} \.
cc00: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
cc10: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
cc20: 30 30 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a  000000..tcltest:
cc30: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42  :test Symetric_B
cc40: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 38 39 20 7b  lock_DES-1.189 {
cc50: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09  Encrypt DES} \..
cc60: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53  -constraints DES
cc70: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
cc80: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
cc90: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
cca0: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20  er DES -padding 
ccb0: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e  0 \... -key [bin
ccc0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 31  ary decode hex 1
ccd0: 30 30 32 39 31 31 35 39 38 31 39 30 31 30 34 5d  002911598190104]
cce0: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e   \... -data [bin
ccf0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
cd00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
cd10: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
cd20: 63 74 20 2d 72 65 73 75 6c 74 20 36 31 63 37 39  ct -result 61c79
cd30: 63 37 31 39 32 31 61 32 65 66 38 0a 0a 74 63 6c  c71921a2ef8..tcl
cd40: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
cd50: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e  ric_Block_DES-1.
cd60: 31 39 30 20 7b 44 65 63 72 79 70 74 20 44 45 53  190 {Decrypt DES
cd70: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
cd80: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b  s DES \..-body {
cd90: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
cda0: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  x [tls::decrypt 
cdb0: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64  -cipher DES -pad
cdc0: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79  ding 0 \... -key
cdd0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
cde0: 68 65 78 20 31 30 30 32 39 31 31 35 39 38 31 39  hex 100291159819
cdf0: 30 31 30 34 5d 20 5c 0a 09 09 20 2d 64 61 74 61  0104] \... -data
ce00: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
ce10: 68 65 78 20 36 31 43 37 39 43 37 31 39 32 31 41  hex 61C79C71921A
ce20: 32 45 46 38 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  2EF8]]} \..-matc
ce30: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
ce40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
ce50: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
ce60: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44  Symetric_Block_D
ce70: 45 53 2d 31 2e 31 39 31 20 7b 45 6e 63 72 79 70  ES-1.191 {Encryp
ce80: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t DES} \..-const
ce90: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62  raints DES \..-b
cea0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
ceb0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63  de hex [tls::enc
cec0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53  rypt -cipher DES
ced0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09   -padding 0 \...
cee0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
cef0: 63 6f 64 65 20 68 65 78 20 31 30 30 32 39 31 31  code hex 1002911
cf00: 35 39 38 31 30 30 32 30 31 5d 20 5c 0a 09 09 20  598100201] \... 
cf10: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
cf20: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
cf30: 30 30 30 30 30 30 30 30 30 5d 5d 7d 20 5c 0a 09  000000000]]} \..
cf40: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
cf50: 73 75 6c 74 20 65 32 66 35 37 32 38 66 30 39 39  sult e2f5728f099
cf60: 35 30 31 33 63 0a 0a 74 63 6c 74 65 73 74 3a 3a  5013c..tcltest::
cf70: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c  test Symetric_Bl
cf80: 6f 63 6b 5f 44 45 53 2d 31 2e 31 39 32 20 7b 44  ock_DES-1.192 {D
cf90: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d  ecrypt DES} \..-
cfa0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20  constraints DES 
cfb0: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
cfc0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73   encode hex [tls
cfd0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
cfe0: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30  r DES -padding 0
cff0: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61   \... -key [bina
d000: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 30  ry decode hex 10
d010: 30 32 39 31 31 35 39 38 31 30 30 32 30 31 5d 20  02911598100201] 
d020: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61  \... -data [bina
d030: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 45 32  ry decode hex E2
d040: 46 35 37 32 38 46 30 39 39 35 30 31 33 43 5d 5d  F5728F0995013C]]
d050: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
d060: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
d070: 30 30 30 30 30 30 30 30 30 30 0a 0a 74 63 6c 74  0000000000..tclt
d080: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
d090: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31  ic_Block_DES-1.1
d0a0: 39 33 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d  93 {Encrypt DES}
d0b0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
d0c0: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   DES \..-body {b
d0d0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
d0e0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
d0f0: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64  cipher DES -padd
d100: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20  ing 0 \... -key 
d110: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
d120: 65 78 20 31 30 30 32 39 31 31 36 39 38 31 30 30  ex 1002911698100
d130: 31 30 31 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  101] \... -data 
d140: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
d150: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
d160: 30 30 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  000]]} \..-match
d170: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31   exact -result 1
d180: 61 65 61 63 33 39 61 36 31 66 30 61 34 36 34 0a  aeac39a61f0a464.
d190: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
d1a0: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45  ymetric_Block_DE
d1b0: 53 2d 31 2e 31 39 34 20 7b 44 65 63 72 79 70 74  S-1.194 {Decrypt
d1c0: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   DES} \..-constr
d1d0: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f  aints DES \..-bo
d1e0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
d1f0: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72  e hex [tls::decr
d200: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20  ypt -cipher DES 
d210: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20  -padding 0 \... 
d220: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
d230: 6f 64 65 20 68 65 78 20 31 30 30 32 39 31 31 36  ode hex 10029116
d240: 39 38 31 30 30 31 30 31 5d 20 5c 0a 09 09 20 2d  98100101] \... -
d250: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
d260: 6f 64 65 20 68 65 78 20 31 41 45 41 43 33 39 41  ode hex 1AEAC39A
d270: 36 31 46 30 41 34 36 34 5d 5d 7d 20 5c 0a 09 2d  61F0A464]]} \..-
d280: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
d290: 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30  ult 000000000000
d2a0: 30 30 30 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  0000..tcltest::t
d2b0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f  est Symetric_Blo
d2c0: 63 6b 5f 44 45 53 2d 31 2e 31 39 35 20 7b 45 6e  ck_DES-1.195 {En
d2d0: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63  crypt DES} \..-c
d2e0: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c  onstraints DES \
d2f0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
d300: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a  encode hex [tls:
d310: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
d320: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20   DES -padding 0 
d330: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72  \... -key [binar
d340: 79 20 64 65 63 6f 64 65 20 68 65 78 20 37 43 41  y decode hex 7CA
d350: 31 31 30 34 35 34 41 31 41 36 45 35 37 5d 20 5c  110454A1A6E57] \
d360: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72  ... -data [binar
d370: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 41  y decode hex 01A
d380: 31 44 36 44 30 33 39 37 37 36 37 34 32 5d 5d 7d  1D6D039776742]]}
d390: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
d3a0: 20 2d 72 65 73 75 6c 74 20 36 39 30 66 35 62 30   -result 690f5b0
d3b0: 64 39 61 32 36 39 33 39 62 0a 0a 74 63 6c 74 65  d9a26939b..tclte
d3c0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
d3d0: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 39  c_Block_DES-1.19
d3e0: 36 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20  6 {Decrypt DES} 
d3f0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
d400: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  DES \..-body {bi
d410: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
d420: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
d430: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69  ipher DES -paddi
d440: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b  ng 0 \... -key [
d450: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
d460: 78 20 37 43 41 31 31 30 34 35 34 41 31 41 36 45  x 7CA110454A1A6E
d470: 35 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  57] \... -data [
d480: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
d490: 78 20 36 39 30 46 35 42 30 44 39 41 32 36 39 33  x 690F5B0D9A2693
d4a0: 39 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  9B]]} \..-match 
d4b0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 31  exact -result 01
d4c0: 61 31 64 36 64 30 33 39 37 37 36 37 34 32 0a 0a  a1d6d039776742..
d4d0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
d4e0: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53  metric_Block_DES
d4f0: 2d 31 2e 31 39 37 20 7b 45 6e 63 72 79 70 74 20  -1.197 {Encrypt 
d500: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  DES} \..-constra
d510: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64  ints DES \..-bod
d520: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
d530: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79   hex [tls::encry
d540: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d  pt -cipher DES -
d550: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d  padding 0 \... -
d560: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
d570: 64 65 20 68 65 78 20 30 31 33 31 44 39 36 31 39  de hex 0131D9619
d580: 44 43 31 33 37 36 45 5d 20 5c 0a 09 09 20 2d 64  DC1376E] \... -d
d590: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
d5a0: 64 65 20 68 65 78 20 35 43 44 35 34 43 41 38 33  de hex 5CD54CA83
d5b0: 44 45 46 35 37 44 41 5d 5d 7d 20 5c 0a 09 2d 6d  DEF57DA]]} \..-m
d5c0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
d5d0: 6c 74 20 37 61 33 38 39 64 31 30 33 35 34 62 64  lt 7a389d10354bd
d5e0: 32 37 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  271..tcltest::te
d5f0: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63  st Symetric_Bloc
d600: 6b 5f 44 45 53 2d 31 2e 31 39 38 20 7b 44 65 63  k_DES-1.198 {Dec
d610: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f  rypt DES} \..-co
d620: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a  nstraints DES \.
d630: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
d640: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a  ncode hex [tls::
d650: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
d660: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c  DES -padding 0 \
d670: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  ... -key [binary
d680: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 33 31   decode hex 0131
d690: 44 39 36 31 39 44 43 31 33 37 36 45 5d 20 5c 0a  D9619DC1376E] \.
d6a0: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79  .. -data [binary
d6b0: 20 64 65 63 6f 64 65 20 68 65 78 20 37 41 33 38   decode hex 7A38
d6c0: 39 44 31 30 33 35 34 42 44 32 37 31 5d 5d 7d 20  9D10354BD271]]} 
d6d0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
d6e0: 2d 72 65 73 75 6c 74 20 35 63 64 35 34 63 61 38  -result 5cd54ca8
d6f0: 33 64 65 66 35 37 64 61 0a 0a 74 63 6c 74 65 73  3def57da..tcltes
d700: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
d710: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 31 39 39  _Block_DES-1.199
d720: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c   {Encrypt DES} \
d730: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44  ..-constraints D
d740: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  ES \..-body {bin
d750: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
d760: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
d770: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e  pher DES -paddin
d780: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62  g 0 \... -key [b
d790: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
d7a0: 20 30 37 41 31 31 33 33 45 34 41 30 42 32 36 38   07A1133E4A0B268
d7b0: 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  6] \... -data [b
d7c0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
d7d0: 20 30 32 34 38 44 34 33 38 30 36 46 36 37 31 37   0248D43806F6717
d7e0: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
d7f0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 36 38  xact -result 868
d800: 65 62 62 35 31 63 61 62 34 35 39 39 61 0a 0a 74  ebb51cab4599a..t
d810: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
d820: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d  etric_Block_DES-
d830: 31 2e 32 30 30 20 7b 44 65 63 72 79 70 74 20 44  1.200 {Decrypt D
d840: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  ES} \..-constrai
d850: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79  nts DES \..-body
d860: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
d870: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  hex [tls::decryp
d880: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70  t -cipher DES -p
d890: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b  adding 0 \... -k
d8a0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
d8b0: 65 20 68 65 78 20 30 37 41 31 31 33 33 45 34 41  e hex 07A1133E4A
d8c0: 30 42 32 36 38 36 5d 20 5c 0a 09 09 20 2d 64 61  0B2686] \... -da
d8d0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
d8e0: 65 20 68 65 78 20 38 36 38 45 42 42 35 31 43 41  e hex 868EBB51CA
d8f0: 42 34 35 39 39 41 5d 5d 7d 20 5c 0a 09 2d 6d 61  B4599A]]} \..-ma
d900: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
d910: 74 20 30 32 34 38 64 34 33 38 30 36 66 36 37 31  t 0248d43806f671
d920: 37 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  72..tcltest::tes
d930: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b  t Symetric_Block
d940: 5f 44 45 53 2d 31 2e 32 30 31 20 7b 45 6e 63 72  _DES-1.201 {Encr
d950: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e  ypt DES} \..-con
d960: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09  straints DES \..
d970: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
d980: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65  code hex [tls::e
d990: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44  ncrypt -cipher D
d9a0: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a  ES -padding 0 \.
d9b0: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20  .. -key [binary 
d9c0: 64 65 63 6f 64 65 20 68 65 78 20 33 38 34 39 36  decode hex 38496
d9d0: 37 34 43 32 36 30 32 33 31 39 45 5d 20 5c 0a 09  74C2602319E] \..
d9e0: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20  . -data [binary 
d9f0: 64 65 63 6f 64 65 20 68 65 78 20 35 31 34 35 34  decode hex 51454
da00: 42 35 38 32 44 44 46 34 34 30 41 5d 5d 7d 20 5c  B582DDF440A]]} \
da10: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
da20: 72 65 73 75 6c 74 20 37 31 37 38 38 37 36 65 30  result 7178876e0
da30: 31 66 31 39 62 32 61 0a 0a 74 63 6c 74 65 73 74  1f19b2a..tcltest
da40: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
da50: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 30 32 20  Block_DES-1.202 
da60: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a  {Decrypt DES} \.
da70: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45  .-constraints DE
da80: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  S \..-body {bina
da90: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74  ry encode hex [t
daa0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
dab0: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67  her DES -padding
dac0: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69   0 \... -key [bi
dad0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
dae0: 33 38 34 39 36 37 34 43 32 36 30 32 33 31 39 45  3849674C2602319E
daf0: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69  ] \... -data [bi
db00: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
db10: 37 31 37 38 38 37 36 45 30 31 46 31 39 42 32 41  7178876E01F19B2A
db20: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  ]]} \..-match ex
db30: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 31 34 35  act -result 5145
db40: 34 62 35 38 32 64 64 66 34 34 30 61 0a 0a 74 63  4b582ddf440a..tc
db50: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
db60: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31  tric_Block_DES-1
db70: 2e 32 30 33 20 7b 45 6e 63 72 79 70 74 20 44 45  .203 {Encrypt DE
db80: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  S} \..-constrain
db90: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20  ts DES \..-body 
dba0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
dbb0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ex [tls::encrypt
dbc0: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61   -cipher DES -pa
dbd0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65  dding 0 \... -ke
dbe0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
dbf0: 20 68 65 78 20 30 34 42 39 31 35 42 41 34 33 46   hex 04B915BA43F
dc00: 45 42 35 42 36 5d 20 5c 0a 09 09 20 2d 64 61 74  EB5B6] \... -dat
dc10: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
dc20: 20 68 65 78 20 34 32 46 44 34 34 33 30 35 39 35   hex 42FD4430595
dc30: 37 37 46 41 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  77FA2]]} \..-mat
dc40: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
dc50: 20 61 66 33 37 66 62 34 32 31 66 38 63 34 30 39   af37fb421f8c409
dc60: 35 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  5..tcltest::test
dc70: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f   Symetric_Block_
dc80: 44 45 53 2d 31 2e 32 30 34 20 7b 44 65 63 72 79  DES-1.204 {Decry
dc90: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73  pt DES} \..-cons
dca0: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d  traints DES \..-
dcb0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
dcc0: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65  ode hex [tls::de
dcd0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45  crypt -cipher DE
dce0: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09  S -padding 0 \..
dcf0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  . -key [binary d
dd00: 65 63 6f 64 65 20 68 65 78 20 30 34 42 39 31 35  ecode hex 04B915
dd10: 42 41 34 33 46 45 42 35 42 36 5d 20 5c 0a 09 09  BA43FEB5B6] \...
dd20: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64   -data [binary d
dd30: 65 63 6f 64 65 20 68 65 78 20 41 46 33 37 46 42  ecode hex AF37FB
dd40: 34 32 31 46 38 43 34 30 39 35 5d 5d 7d 20 5c 0a  421F8C4095]]} \.
dd50: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
dd60: 65 73 75 6c 74 20 34 32 66 64 34 34 33 30 35 39  esult 42fd443059
dd70: 35 37 37 66 61 32 0a 0a 74 63 6c 74 65 73 74 3a  577fa2..tcltest:
dd80: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42  :test Symetric_B
dd90: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 30 35 20 7b  lock_DES-1.205 {
dda0: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09  Encrypt DES} \..
ddb0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53  -constraints DES
ddc0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
ddd0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
dde0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
ddf0: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20  er DES -padding 
de00: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e  0 \... -key [bin
de10: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
de20: 31 31 33 42 39 37 30 46 44 33 34 46 32 43 45 5d  113B970FD34F2CE]
de30: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e   \... -data [bin
de40: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
de50: 35 39 42 35 45 30 38 35 31 43 46 31 34 33 41 5d  59B5E0851CF143A]
de60: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
de70: 63 74 20 2d 72 65 73 75 6c 74 20 38 36 61 35 36  ct -result 86a56
de80: 30 66 31 30 65 63 36 64 38 35 62 0a 0a 74 63 6c  0f10ec6d85b..tcl
de90: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
dea0: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e  ric_Block_DES-1.
deb0: 32 30 36 20 7b 44 65 63 72 79 70 74 20 44 45 53  206 {Decrypt DES
dec0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
ded0: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b  s DES \..-body {
dee0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
def0: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  x [tls::decrypt 
df00: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64  -cipher DES -pad
df10: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79  ding 0 \... -key
df20: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
df30: 68 65 78 20 30 31 31 33 42 39 37 30 46 44 33 34  hex 0113B970FD34
df40: 46 32 43 45 5d 20 5c 0a 09 09 20 2d 64 61 74 61  F2CE] \... -data
df50: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
df60: 68 65 78 20 38 36 41 35 36 30 46 31 30 45 43 36  hex 86A560F10EC6
df70: 44 38 35 42 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  D85B]]} \..-matc
df80: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
df90: 30 35 39 62 35 65 30 38 35 31 63 66 31 34 33 61  059b5e0851cf143a
dfa0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
dfb0: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44  Symetric_Block_D
dfc0: 45 53 2d 31 2e 32 30 37 20 7b 45 6e 63 72 79 70  ES-1.207 {Encryp
dfd0: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t DES} \..-const
dfe0: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62  raints DES \..-b
dff0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
e000: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63  de hex [tls::enc
e010: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53  rypt -cipher DES
e020: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09   -padding 0 \...
e030: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
e040: 63 6f 64 65 20 68 65 78 20 30 31 37 30 46 31 37  code hex 0170F17
e050: 35 34 36 38 46 42 35 45 36 5d 20 5c 0a 09 09 20  5468FB5E6] \... 
e060: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
e070: 63 6f 64 65 20 68 65 78 20 30 37 35 36 44 38 45  code hex 0756D8E
e080: 30 37 37 34 37 36 31 44 32 5d 5d 7d 20 5c 0a 09  0774761D2]]} \..
e090: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
e0a0: 73 75 6c 74 20 30 63 64 33 64 61 30 32 30 30 32  sult 0cd3da02002
e0b0: 31 64 63 30 39 0a 0a 74 63 6c 74 65 73 74 3a 3a  1dc09..tcltest::
e0c0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c  test Symetric_Bl
e0d0: 6f 63 6b 5f 44 45 53 2d 31 2e 32 30 38 20 7b 44  ock_DES-1.208 {D
e0e0: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d  ecrypt DES} \..-
e0f0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20  constraints DES 
e100: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
e110: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73   encode hex [tls
e120: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
e130: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30  r DES -padding 0
e140: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61   \... -key [bina
e150: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
e160: 37 30 46 31 37 35 34 36 38 46 42 35 45 36 5d 20  70F175468FB5E6] 
e170: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61  \... -data [bina
e180: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 43  ry decode hex 0C
e190: 44 33 44 41 30 32 30 30 32 31 44 43 30 39 5d 5d  D3DA020021DC09]]
e1a0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
e1b0: 74 20 2d 72 65 73 75 6c 74 20 30 37 35 36 64 38  t -result 0756d8
e1c0: 65 30 37 37 34 37 36 31 64 32 0a 0a 74 63 6c 74  e0774761d2..tclt
e1d0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
e1e0: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32  ic_Block_DES-1.2
e1f0: 30 39 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d  09 {Encrypt DES}
e200: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
e210: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   DES \..-body {b
e220: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
e230: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
e240: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64  cipher DES -padd
e250: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20  ing 0 \... -key 
e260: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
e270: 65 78 20 34 33 32 39 37 46 41 44 33 38 45 33 37  ex 43297FAD38E37
e280: 33 46 45 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  3FE] \... -data 
e290: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
e2a0: 65 78 20 37 36 32 35 31 34 42 38 32 39 42 46 34  ex 762514B829BF4
e2b0: 38 36 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  86A]]} \..-match
e2c0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65   exact -result e
e2d0: 61 36 37 36 62 32 63 62 37 64 62 32 62 37 61 0a  a676b2cb7db2b7a.
e2e0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
e2f0: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45  ymetric_Block_DE
e300: 53 2d 31 2e 32 31 30 20 7b 44 65 63 72 79 70 74  S-1.210 {Decrypt
e310: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   DES} \..-constr
e320: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f  aints DES \..-bo
e330: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
e340: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72  e hex [tls::decr
e350: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20  ypt -cipher DES 
e360: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20  -padding 0 \... 
e370: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
e380: 6f 64 65 20 68 65 78 20 34 33 32 39 37 46 41 44  ode hex 43297FAD
e390: 33 38 45 33 37 33 46 45 5d 20 5c 0a 09 09 20 2d  38E373FE] \... -
e3a0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
e3b0: 6f 64 65 20 68 65 78 20 45 41 36 37 36 42 32 43  ode hex EA676B2C
e3c0: 42 37 44 42 32 42 37 41 5d 5d 7d 20 5c 0a 09 2d  B7DB2B7A]]} \..-
e3d0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
e3e0: 75 6c 74 20 37 36 32 35 31 34 62 38 32 39 62 66  ult 762514b829bf
e3f0: 34 38 36 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  486a..tcltest::t
e400: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f  est Symetric_Blo
e410: 63 6b 5f 44 45 53 2d 31 2e 32 31 31 20 7b 45 6e  ck_DES-1.211 {En
e420: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63  crypt DES} \..-c
e430: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c  onstraints DES \
e440: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
e450: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a  encode hex [tls:
e460: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
e470: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20   DES -padding 0 
e480: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72  \... -key [binar
e490: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 37 41  y decode hex 07A
e4a0: 37 31 33 37 30 34 35 44 41 32 41 31 36 5d 20 5c  7137045DA2A16] \
e4b0: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72  ... -data [binar
e4c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 33 42 44  y decode hex 3BD
e4d0: 44 31 31 39 30 34 39 33 37 32 38 30 32 5d 5d 7d  D119049372802]]}
e4e0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
e4f0: 20 2d 72 65 73 75 6c 74 20 64 66 64 36 34 61 38   -result dfd64a8
e500: 31 35 63 61 66 31 61 30 66 0a 0a 74 63 6c 74 65  15caf1a0f..tclte
e510: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
e520: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 31  c_Block_DES-1.21
e530: 32 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20  2 {Decrypt DES} 
e540: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
e550: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  DES \..-body {bi
e560: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
e570: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
e580: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69  ipher DES -paddi
e590: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b  ng 0 \... -key [
e5a0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
e5b0: 78 20 30 37 41 37 31 33 37 30 34 35 44 41 32 41  x 07A7137045DA2A
e5c0: 31 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  16] \... -data [
e5d0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
e5e0: 78 20 44 46 44 36 34 41 38 31 35 43 41 46 31 41  x DFD64A815CAF1A
e5f0: 30 46 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  0F]]} \..-match 
e600: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 62  exact -result 3b
e610: 64 64 31 31 39 30 34 39 33 37 32 38 30 32 0a 0a  dd119049372802..
e620: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
e630: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53  metric_Block_DES
e640: 2d 31 2e 32 31 33 20 7b 45 6e 63 72 79 70 74 20  -1.213 {Encrypt 
e650: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  DES} \..-constra
e660: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64  ints DES \..-bod
e670: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
e680: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79   hex [tls::encry
e690: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d  pt -cipher DES -
e6a0: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d  padding 0 \... -
e6b0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
e6c0: 64 65 20 68 65 78 20 30 34 36 38 39 31 30 34 43  de hex 04689104C
e6d0: 32 46 44 33 42 32 46 5d 20 5c 0a 09 09 20 2d 64  2FD3B2F] \... -d
e6e0: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
e6f0: 64 65 20 68 65 78 20 32 36 39 35 35 46 36 38 33  de hex 26955F683
e700: 35 41 46 36 30 39 41 5d 5d 7d 20 5c 0a 09 2d 6d  5AF609A]]} \..-m
e710: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
e720: 6c 74 20 35 63 35 31 33 63 39 63 34 38 38 36 63  lt 5c513c9c4886c
e730: 30 38 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  088..tcltest::te
e740: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63  st Symetric_Bloc
e750: 6b 5f 44 45 53 2d 31 2e 32 31 34 20 7b 44 65 63  k_DES-1.214 {Dec
e760: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f  rypt DES} \..-co
e770: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a  nstraints DES \.
e780: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
e790: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a  ncode hex [tls::
e7a0: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
e7b0: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c  DES -padding 0 \
e7c0: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  ... -key [binary
e7d0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 34 36 38   decode hex 0468
e7e0: 39 31 30 34 43 32 46 44 33 42 32 46 5d 20 5c 0a  9104C2FD3B2F] \.
e7f0: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79  .. -data [binary
e800: 20 64 65 63 6f 64 65 20 68 65 78 20 35 43 35 31   decode hex 5C51
e810: 33 43 39 43 34 38 38 36 43 30 38 38 5d 5d 7d 20  3C9C4886C088]]} 
e820: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
e830: 2d 72 65 73 75 6c 74 20 32 36 39 35 35 66 36 38  -result 26955f68
e840: 33 35 61 66 36 30 39 61 0a 0a 74 63 6c 74 65 73  35af609a..tcltes
e850: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
e860: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 31 35  _Block_DES-1.215
e870: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c   {Encrypt DES} \
e880: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44  ..-constraints D
e890: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  ES \..-body {bin
e8a0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
e8b0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
e8c0: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e  pher DES -paddin
e8d0: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62  g 0 \... -key [b
e8e0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
e8f0: 20 33 37 44 30 36 42 42 35 31 36 43 42 37 35 34   37D06BB516CB754
e900: 36 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  6] \... -data [b
e910: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
e920: 20 31 36 34 44 35 45 34 30 34 46 32 37 35 32 33   164D5E404F27523
e930: 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  2]]} \..-match e
e940: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 61 32  xact -result 0a2
e950: 61 65 65 61 65 33 66 66 34 61 62 37 37 0a 0a 74  aeeae3ff4ab77..t
e960: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
e970: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d  etric_Block_DES-
e980: 31 2e 32 31 36 20 7b 44 65 63 72 79 70 74 20 44  1.216 {Decrypt D
e990: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  ES} \..-constrai
e9a0: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79  nts DES \..-body
e9b0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
e9c0: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  hex [tls::decryp
e9d0: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70  t -cipher DES -p
e9e0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b  adding 0 \... -k
e9f0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
ea00: 65 20 68 65 78 20 33 37 44 30 36 42 42 35 31 36  e hex 37D06BB516
ea10: 43 42 37 35 34 36 5d 20 5c 0a 09 09 20 2d 64 61  CB7546] \... -da
ea20: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
ea30: 65 20 68 65 78 20 30 41 32 41 45 45 41 45 33 46  e hex 0A2AEEAE3F
ea40: 46 34 41 42 37 37 5d 5d 7d 20 5c 0a 09 2d 6d 61  F4AB77]]} \..-ma
ea50: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
ea60: 74 20 31 36 34 64 35 65 34 30 34 66 32 37 35 32  t 164d5e404f2752
ea70: 33 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  32..tcltest::tes
ea80: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b  t Symetric_Block
ea90: 5f 44 45 53 2d 31 2e 32 31 37 20 7b 45 6e 63 72  _DES-1.217 {Encr
eaa0: 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e  ypt DES} \..-con
eab0: 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09  straints DES \..
eac0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
ead0: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65  code hex [tls::e
eae0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44  ncrypt -cipher D
eaf0: 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a  ES -padding 0 \.
eb00: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20  .. -key [binary 
eb10: 64 65 63 6f 64 65 20 68 65 78 20 31 46 30 38 32  decode hex 1F082
eb20: 36 30 44 31 41 43 32 34 36 35 45 5d 20 5c 0a 09  60D1AC2465E] \..
eb30: 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20  . -data [binary 
eb40: 64 65 63 6f 64 65 20 68 65 78 20 36 42 30 35 36  decode hex 6B056
eb50: 45 31 38 37 35 39 46 35 43 43 41 5d 5d 7d 20 5c  E18759F5CCA]]} \
eb60: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
eb70: 72 65 73 75 6c 74 20 65 66 31 62 66 30 33 65 35  result ef1bf03e5
eb80: 64 66 61 35 37 35 61 0a 0a 74 63 6c 74 65 73 74  dfa575a..tcltest
eb90: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
eba0: 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 31 38 20  Block_DES-1.218 
ebb0: 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a  {Decrypt DES} \.
ebc0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45  .-constraints DE
ebd0: 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  S \..-body {bina
ebe0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74  ry encode hex [t
ebf0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
ec00: 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67  her DES -padding
ec10: 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69   0 \... -key [bi
ec20: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
ec30: 31 46 30 38 32 36 30 44 31 41 43 32 34 36 35 45  1F08260D1AC2465E
ec40: 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69  ] \... -data [bi
ec50: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
ec60: 45 46 31 42 46 30 33 45 35 44 46 41 35 37 35 41  EF1BF03E5DFA575A
ec70: 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  ]]} \..-match ex
ec80: 61 63 74 20 2d 72 65 73 75 6c 74 20 36 62 30 35  act -result 6b05
ec90: 36 65 31 38 37 35 39 66 35 63 63 61 0a 0a 74 63  6e18759f5cca..tc
eca0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
ecb0: 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31  tric_Block_DES-1
ecc0: 2e 32 31 39 20 7b 45 6e 63 72 79 70 74 20 44 45  .219 {Encrypt DE
ecd0: 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  S} \..-constrain
ece0: 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20  ts DES \..-body 
ecf0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
ed00: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ex [tls::encrypt
ed10: 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61   -cipher DES -pa
ed20: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65  dding 0 \... -ke
ed30: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
ed40: 20 68 65 78 20 35 38 34 30 32 33 36 34 31 41 42   hex 584023641AB
ed50: 41 36 31 37 36 5d 20 5c 0a 09 09 20 2d 64 61 74  A6176] \... -dat
ed60: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
ed70: 20 68 65 78 20 30 30 34 42 44 36 45 46 30 39 31   hex 004BD6EF091
ed80: 37 36 30 36 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74  76062]]} \..-mat
ed90: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
eda0: 20 38 38 62 66 30 64 62 36 64 37 30 64 65 65 35   88bf0db6d70dee5
edb0: 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  6..tcltest::test
edc0: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f   Symetric_Block_
edd0: 44 45 53 2d 31 2e 32 32 30 20 7b 44 65 63 72 79  DES-1.220 {Decry
ede0: 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73  pt DES} \..-cons
edf0: 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d  traints DES \..-
ee00: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
ee10: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65  ode hex [tls::de
ee20: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45  crypt -cipher DE
ee30: 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09  S -padding 0 \..
ee40: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  . -key [binary d
ee50: 65 63 6f 64 65 20 68 65 78 20 35 38 34 30 32 33  ecode hex 584023
ee60: 36 34 31 41 42 41 36 31 37 36 5d 20 5c 0a 09 09  641ABA6176] \...
ee70: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64   -data [binary d
ee80: 65 63 6f 64 65 20 68 65 78 20 38 38 42 46 30 44  ecode hex 88BF0D
ee90: 42 36 44 37 30 44 45 45 35 36 5d 5d 7d 20 5c 0a  B6D70DEE56]]} \.
eea0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
eeb0: 65 73 75 6c 74 20 30 30 34 62 64 36 65 66 30 39  esult 004bd6ef09
eec0: 31 37 36 30 36 32 0a 0a 74 63 6c 74 65 73 74 3a  176062..tcltest:
eed0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42  :test Symetric_B
eee0: 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 32 31 20 7b  lock_DES-1.221 {
eef0: 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09  Encrypt DES} \..
ef00: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53  -constraints DES
ef10: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
ef20: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
ef30: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
ef40: 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20  er DES -padding 
ef50: 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e  0 \... -key [bin
ef60: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
ef70: 32 35 38 31 36 31 36 34 36 32 39 42 30 30 37 5d  25816164629B007]
ef80: 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e   \... -data [bin
ef90: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 34  ary decode hex 4
efa0: 38 30 44 33 39 30 30 36 45 45 37 36 32 46 32 5d  80D39006EE762F2]
efb0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
efc0: 63 74 20 2d 72 65 73 75 6c 74 20 61 31 66 39 39  ct -result a1f99
efd0: 31 35 35 34 31 30 32 30 62 35 36 0a 0a 74 63 6c  15541020b56..tcl
efe0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
eff0: 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e  ric_Block_DES-1.
f000: 32 32 32 20 7b 44 65 63 72 79 70 74 20 44 45 53  222 {Decrypt DES
f010: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
f020: 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b  s DES \..-body {
f030: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
f040: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  x [tls::decrypt 
f050: 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64  -cipher DES -pad
f060: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79  ding 0 \... -key
f070: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
f080: 68 65 78 20 30 32 35 38 31 36 31 36 34 36 32 39  hex 025816164629
f090: 42 30 30 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61  B007] \... -data
f0a0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
f0b0: 68 65 78 20 41 31 46 39 39 31 35 35 34 31 30 32  hex A1F991554102
f0c0: 30 42 35 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63  0B56]]} \..-matc
f0d0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
f0e0: 34 38 30 64 33 39 30 30 36 65 65 37 36 32 66 32  480d39006ee762f2
f0f0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
f100: 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44  Symetric_Block_D
f110: 45 53 2d 31 2e 32 32 33 20 7b 45 6e 63 72 79 70  ES-1.223 {Encryp
f120: 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t DES} \..-const
f130: 72 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62  raints DES \..-b
f140: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
f150: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63  de hex [tls::enc
f160: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53  rypt -cipher DES
f170: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09   -padding 0 \...
f180: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
f190: 63 6f 64 65 20 68 65 78 20 34 39 37 39 33 45 42  code hex 49793EB
f1a0: 43 37 39 42 33 32 35 38 46 5d 20 5c 0a 09 09 20  C79B3258F] \... 
f1b0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
f1c0: 63 6f 64 65 20 68 65 78 20 34 33 37 35 34 30 43  code hex 437540C
f1d0: 38 36 39 38 46 33 43 46 41 5d 5d 7d 20 5c 0a 09  8698F3CFA]]} \..
f1e0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
f1f0: 73 75 6c 74 20 36 66 62 66 31 63 61 66 63 66 66  sult 6fbf1cafcff
f200: 64 30 35 35 36 0a 0a 74 63 6c 74 65 73 74 3a 3a  d0556..tcltest::
f210: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c  test Symetric_Bl
f220: 6f 63 6b 5f 44 45 53 2d 31 2e 32 32 34 20 7b 44  ock_DES-1.224 {D
f230: 65 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d  ecrypt DES} \..-
f240: 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20  constraints DES 
f250: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
f260: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73   encode hex [tls
f270: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
f280: 72 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30  r DES -padding 0
f290: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61   \... -key [bina
f2a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 34 39  ry decode hex 49
f2b0: 37 39 33 45 42 43 37 39 42 33 32 35 38 46 5d 20  793EBC79B3258F] 
f2c0: 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61  \... -data [bina
f2d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 46  ry decode hex 6F
f2e0: 42 46 31 43 41 46 43 46 46 44 30 35 35 36 5d 5d  BF1CAFCFFD0556]]
f2f0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
f300: 74 20 2d 72 65 73 75 6c 74 20 34 33 37 35 34 30  t -result 437540
f310: 63 38 36 39 38 66 33 63 66 61 0a 0a 74 63 6c 74  c8698f3cfa..tclt
f320: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
f330: 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32  ic_Block_DES-1.2
f340: 32 35 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d  25 {Encrypt DES}
f350: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
f360: 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   DES \..-body {b
f370: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
f380: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
f390: 63 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64  cipher DES -padd
f3a0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20  ing 0 \... -key 
f3b0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
f3c0: 65 78 20 34 46 42 30 35 45 31 35 31 35 41 42 37  ex 4FB05E1515AB7
f3d0: 33 41 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  3A7] \... -data 
f3e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
f3f0: 65 78 20 30 37 32 44 34 33 41 30 37 37 30 37 35  ex 072D43A077075
f400: 32 39 32 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  292]]} \..-match
f410: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32   exact -result 2
f420: 66 32 32 65 34 39 62 61 62 37 63 61 31 61 63 0a  f22e49bab7ca1ac.
f430: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
f440: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45  ymetric_Block_DE
f450: 53 2d 31 2e 32 32 36 20 7b 44 65 63 72 79 70 74  S-1.226 {Decrypt
f460: 20 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   DES} \..-constr
f470: 61 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f  aints DES \..-bo
f480: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
f490: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72  e hex [tls::decr
f4a0: 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20  ypt -cipher DES 
f4b0: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20  -padding 0 \... 
f4c0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
f4d0: 6f 64 65 20 68 65 78 20 34 46 42 30 35 45 31 35  ode hex 4FB05E15
f4e0: 31 35 41 42 37 33 41 37 5d 20 5c 0a 09 09 20 2d  15AB73A7] \... -
f4f0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
f500: 6f 64 65 20 68 65 78 20 32 46 32 32 45 34 39 42  ode hex 2F22E49B
f510: 41 42 37 43 41 31 41 43 5d 5d 7d 20 5c 0a 09 2d  AB7CA1AC]]} \..-
f520: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
f530: 75 6c 74 20 30 37 32 64 34 33 61 30 37 37 30 37  ult 072d43a07707
f540: 35 32 39 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  5292..tcltest::t
f550: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f  est Symetric_Blo
f560: 63 6b 5f 44 45 53 2d 31 2e 32 32 37 20 7b 45 6e  ck_DES-1.227 {En
f570: 63 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63  crypt DES} \..-c
f580: 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c  onstraints DES \
f590: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
f5a0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a  encode hex [tls:
f5b0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
f5c0: 20 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20   DES -padding 0 
f5d0: 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72  \... -key [binar
f5e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 34 39 45  y decode hex 49E
f5f0: 39 35 44 36 44 34 43 41 32 32 39 42 46 5d 20 5c  95D6D4CA229BF] \
f600: 0a 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72  ... -data [binar
f610: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 32 46  y decode hex 02F
f620: 45 35 35 37 37 38 31 31 37 46 31 32 41 5d 5d 7d  E55778117F12A]]}
f630: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
f640: 20 2d 72 65 73 75 6c 74 20 35 61 36 62 36 31 32   -result 5a6b612
f650: 63 63 32 36 63 63 65 34 61 0a 0a 74 63 6c 74 65  cc26cce4a..tclte
f660: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
f670: 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 32  c_Block_DES-1.22
f680: 38 20 7b 44 65 63 72 79 70 74 20 44 45 53 7d 20  8 {Decrypt DES} 
f690: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
f6a0: 44 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  DES \..-body {bi
f6b0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
f6c0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
f6d0: 69 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69  ipher DES -paddi
f6e0: 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b  ng 0 \... -key [
f6f0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
f700: 78 20 34 39 45 39 35 44 36 44 34 43 41 32 32 39  x 49E95D6D4CA229
f710: 42 46 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b  BF] \... -data [
f720: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
f730: 78 20 35 41 36 42 36 31 32 43 43 32 36 43 43 45  x 5A6B612CC26CCE
f740: 34 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  4A]]} \..-match 
f750: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 32  exact -result 02
f760: 66 65 35 35 37 37 38 31 31 37 66 31 32 61 0a 0a  fe55778117f12a..
f770: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
f780: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53  metric_Block_DES
f790: 2d 31 2e 32 32 39 20 7b 45 6e 63 72 79 70 74 20  -1.229 {Encrypt 
f7a0: 44 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  DES} \..-constra
f7b0: 69 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64  ints DES \..-bod
f7c0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
f7d0: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79   hex [tls::encry
f7e0: 70 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d  pt -cipher DES -
f7f0: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d  padding 0 \... -
f800: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
f810: 64 65 20 68 65 78 20 30 31 38 33 31 30 44 43 34  de hex 018310DC4
f820: 30 39 42 32 36 44 36 5d 20 5c 0a 09 09 20 2d 64  09B26D6] \... -d
f830: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
f840: 64 65 20 68 65 78 20 31 44 39 44 35 43 35 30 31  de hex 1D9D5C501
f850: 38 46 37 32 38 43 32 5d 5d 7d 20 5c 0a 09 2d 6d  8F728C2]]} \..-m
f860: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
f870: 6c 74 20 35 66 34 63 30 33 38 65 64 31 32 62 32  lt 5f4c038ed12b2
f880: 65 34 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  e41..tcltest::te
f890: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63  st Symetric_Bloc
f8a0: 6b 5f 44 45 53 2d 31 2e 32 33 30 20 7b 44 65 63  k_DES-1.230 {Dec
f8b0: 72 79 70 74 20 44 45 53 7d 20 5c 0a 09 2d 63 6f  rypt DES} \..-co
f8c0: 6e 73 74 72 61 69 6e 74 73 20 44 45 53 20 5c 0a  nstraints DES \.
f8d0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
f8e0: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a  ncode hex [tls::
f8f0: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
f900: 44 45 53 20 2d 70 61 64 64 69 6e 67 20 30 20 5c  DES -padding 0 \
f910: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  ... -key [binary
f920: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 38 33   decode hex 0183
f930: 31 30 44 43 34 30 39 42 32 36 44 36 5d 20 5c 0a  10DC409B26D6] \.
f940: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79  .. -data [binary
f950: 20 64 65 63 6f 64 65 20 68 65 78 20 35 46 34 43   decode hex 5F4C
f960: 30 33 38 45 44 31 32 42 32 45 34 31 5d 5d 7d 20  038ED12B2E41]]} 
f970: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
f980: 2d 72 65 73 75 6c 74 20 31 64 39 64 35 63 35 30  -result 1d9d5c50
f990: 31 38 66 37 32 38 63 32 0a 0a 74 63 6c 74 65 73  18f728c2..tcltes
f9a0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
f9b0: 5f 42 6c 6f 63 6b 5f 44 45 53 2d 31 2e 32 33 31  _Block_DES-1.231
f9c0: 20 7b 45 6e 63 72 79 70 74 20 44 45 53 7d 20 5c   {Encrypt DES} \
f9d0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44  ..-constraints D
f9e0: 45 53 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  ES \..-body {bin
f9f0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
fa00: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
fa10: 70 68 65 72 20 44 45 53 20 2d 70 61 64 64 69 6e  pher DES -paddin
fa20: 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62  g 0 \... -key [b
fa30: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
fa40: 20 31 43 35 38 37 46 31 43 31 33 39 32 34 46 45   1C587F1C13924FE
fa50: 46 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  F] \... -data [b
fa60: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
fa70: 20 33 30 35 35 33 32 32 38 36 44 36 46 32 39 35   305532286D6F295
fa80: 41 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  A]]} \..-match e
fa90: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 33 66  xact -result 63f
faa0: 61 63 30 64 30 33 34 64 39 66 37 39 33 0a 0a 74  ac0d034d9f793..t
fab0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
fac0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d  etric_Block_DES-
fad0: 31 2e 32 33 32 20 7b 44 65 63 72 79 70 74 20 44  1.232 {Decrypt D
fae0: 45 53 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  ES} \..-constrai
faf0: 6e 74 73 20 44 45 53 20 5c 0a 09 2d 62 6f 64 79  nts DES \..-body
fb00: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
fb10: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  hex [tls::decryp
fb20: 74 20 2d 63 69 70 68 65 72 20 44 45 53 20 2d 70  t -cipher DES -p
fb30: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b  adding 0 \... -k
fb40: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
fb50: 65 20 68 65 78 20 31 43 35 38 37 46 31 43 31 33  e hex 1C587F1C13
fb60: 39 32 34 46 45 46 5d 20 5c 0a 09 09 20 2d 64 61  924FEF] \... -da
fb70: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
fb80: 65 20 68 65 78 20 36 33 46 41 43 30 44 30 33 34  e hex 63FAC0D034
fb90: 44 39 46 37 39 33 5d 5d 7d 20 5c 0a 09 2d 6d 61  D9F793]]} \..-ma
fba0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
fbb0: 74 20 33 30 35 35 33 32 32 38 36 64 36 66 32 39  t 305532286d6f29
fbc0: 35 61 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a  5a..# Cleanup.::
fbd0: 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70  tcltest::cleanup
fbe0: 54 65 73 74 73 0a 72 65 74 75 72 6e 0a           Tests.return.