Artifact 98f00825f94c917e1fce9cba942be11b793f9a98b707c26b1dad560b0a8f473f:

• File tests/test_vectors/Symetric_Stream/rc4-40.test — part of check-in [45c6b53f90] at 2024-04-08 03:30:13 on branch crypto — Make test case files from test vectors script updates to optimize logic (user: bohagan, size: 29637) [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 72 63 34 2d 34 30 2e 74 78   from "rc4-40.tx
0020: 74 22 0a 6c 61 70 70 65 6e 64 20 61 75 74 6f 5f  t".lappend auto_
0030: 70 61 74 68 20 5b 66 69 6c 65 20 64 69 72 6e 61  path [file dirna
0040: 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65  me [file dirname
0050: 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b   [file dirname [
0060: 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69  file dirname [fi
0070: 6c 65 20 6a 6f 69 6e 20 5b 70 77 64 5d 20 5b 69  le join [pwd] [i
0080: 6e 66 6f 20 73 63 72 69 70 74 5d 5d 5d 5d 5d 5d  nfo script]]]]]]
0090: 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 65  .package require
00a0: 20 74 6c 73 0a 70 61 63 6b 61 67 65 20 72 65 71   tls.package req
00b0: 75 69 72 65 20 74 63 6c 74 65 73 74 0a 0a 63 61  uire tcltest..ca
00c0: 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 69 64  tch {tls::provid
00d0: 65 72 20 6c 65 67 61 63 79 7d 0a 74 63 6c 74 65  er legacy}.tclte
00e0: 73 74 3a 3a 74 65 73 74 43 6f 6e 73 74 72 61 69  st::testConstrai
00f0: 6e 74 20 72 63 34 5f 34 30 20 5b 65 78 70 72 20  nt rc4_40 [expr 
0100: 7b 5b 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73  {[lsearch -nocas
0110: 65 20 5b 74 6c 73 3a 3a 63 69 70 68 65 72 73 5d  e [tls::ciphers]
0120: 20 72 63 34 2d 34 30 5d 20 3e 20 2d 31 7d 5d 0a   rc4-40] > -1}].
0130: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
0140: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
0150: 72 63 34 5f 34 30 2d 31 2e 31 20 7b 45 6e 63 72  rc4_40-1.1 {Encr
0160: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
0170: 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  t 0} \..-constra
0180: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
0190: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
01a0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
01b0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
01c0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
01d0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
01e0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
01f0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
0200: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 62 69 6e  ] \...-data [bin
0210: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
0220: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0230: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
0240: 5d 20 30 20 31 35 5d 7d 20 5c 0a 09 2d 6d 61 74  ] 0 15]} \..-mat
0250: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0260: 20 62 32 33 39 36 33 30 35 66 30 33 64 63 30 32   b2396305f03dc02
0270: 37 63 63 63 33 35 32 34 61 30 61 31 31 31 38 61  7ccc3524a0a1118a
0280: 38 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  8...tcltest::tes
0290: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
02a0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 20 7b 44 65  m_rc4_40-1.2 {De
02b0: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
02c0: 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74  set 0} \..-const
02d0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
02e0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
02f0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
0300: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
0310: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
0320: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
0330: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
0340: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
0350: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  05] \...-data [t
0360: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
0370: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
0380: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
0390: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
03a0: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
03b0: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
03c0: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
03d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
03e0: 30 30 30 30 30 30 30 5d 5d 5d 20 30 20 31 35 5d  0000000]]] 0 15]
03f0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0400: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
0410: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0420: 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c  0000000000...tcl
0430: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
0440: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
0450: 30 2d 31 2e 33 20 7b 45 6e 63 72 79 70 74 20 72  0-1.3 {Encrypt r
0460: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 36 7d  c4-40 offset 16}
0470: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
0480: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
0490: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
04a0: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
04b0: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
04c0: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
04d0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
04e0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
04f0: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
0500: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
0510: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
0520: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
0530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0540: 30 30 30 30 30 30 30 30 30 30 5d 20 32 5d 5d 20  0000000000] 2]] 
0550: 31 36 20 33 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63  16 31]} \..-matc
0560: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
0570: 36 39 38 32 39 34 34 66 31 38 66 63 38 32 64 35  6982944f18fc82d5
0580: 38 39 63 34 30 33 61 34 37 61 30 64 30 39 31 39  89c403a47a0d0919
0590: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
05a0: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
05b0: 5f 72 63 34 5f 34 30 2d 31 2e 34 20 7b 44 65 63  _rc4_40-1.4 {Dec
05c0: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
05d0: 65 74 20 31 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74  et 16} \..-const
05e0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
05f0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
0600: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
0610: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
0620: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
0630: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
0640: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
0650: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
0660: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  05] \...-data [t
0670: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
0680: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
0690: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
06a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
06b0: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
06c0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
06d0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
06e0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
06f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0700: 30 30 30 30 30 30 5d 20 32 5d 5d 5d 20 31 36 20  000000] 2]]] 16 
0710: 33 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  31]} \..-match e
0720: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
0730: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0740: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
0750: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
0760: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
0770: 34 5f 34 30 2d 31 2e 35 20 7b 45 6e 63 72 79 70  4_40-1.5 {Encryp
0780: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
0790: 32 34 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  240} \..-constra
07a0: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
07b0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
07c0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
07d0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
07e0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
07f0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
0800: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
0810: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
0820: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
0830: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
0840: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0850: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0860: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
0870: 31 36 5d 5d 20 32 34 30 20 32 35 35 5d 7d 20 5c  16]] 240 255]} \
0880: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0890: 72 65 73 75 6c 74 20 32 38 63 62 31 31 33 32 63  result 28cb1132c
08a0: 39 36 63 65 32 38 36 34 32 31 64 63 61 61 64 62  96ce286421dcaadb
08b0: 38 62 36 39 65 61 65 0a 0a 0a 74 63 6c 74 65 73  8b69eae...tcltes
08c0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
08d0: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
08e0: 2e 36 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d  .6 {Decrypt rc4-
08f0: 34 30 20 6f 66 66 73 65 74 20 32 34 30 7d 20 5c  40 offset 240} \
0900: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
0910: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
0920: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
0930: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
0940: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
0950: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
0960: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
0970: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
0980: 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09  0102030405] \...
0990: 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72  -data [tls::encr
09a0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
09b0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
09c0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
09d0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
09e0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
09f0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
0a00: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0a10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0a20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
0a30: 31 36 5d 5d 5d 20 32 34 30 20 32 35 35 5d 7d 20  16]]] 240 255]} 
0a40: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
0a50: 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30  -result 00000000
0a60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0a70: 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65  00000000...tclte
0a80: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
0a90: 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d  c_Stream_rc4_40-
0aa0: 31 2e 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34  1.7 {Encrypt rc4
0ab0: 2d 34 30 20 6f 66 66 73 65 74 20 32 35 36 7d 20  -40 offset 256} 
0ac0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
0ad0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
0ae0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
0af0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
0b00: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
0b10: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
0b20: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
0b30: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0b40: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
0b50: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
0b60: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
0b70: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
0b80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0b90: 30 30 30 30 30 30 30 30 30 5d 20 31 37 5d 5d 20  000000000] 17]] 
0ba0: 32 35 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d 61  256 271]} \..-ma
0bb0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0bc0: 74 20 31 63 66 63 66 36 32 62 30 33 65 64 64 62  t 1cfcf62b03eddb
0bd0: 36 34 31 64 37 37 64 66 63 66 37 66 38 64 38 63  641d77dfcf7f8d8c
0be0: 39 33 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  93...tcltest::te
0bf0: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
0c00: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 38 20 7b 44  am_rc4_40-1.8 {D
0c10: 65 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ecrypt rc4-40 of
0c20: 66 73 65 74 20 32 35 36 7d 20 5c 0a 09 2d 63 6f  fset 256} \..-co
0c30: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
0c40: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
0c50: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
0c60: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
0c70: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
0c80: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
0c90: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
0ca0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
0cb0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
0cc0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
0cd0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
0ce0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
0cf0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0d00: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
0d10: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
0d20: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
0d30: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
0d40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0d50: 30 30 30 30 30 30 30 30 30 5d 20 31 37 5d 5d 5d  000000000] 17]]]
0d60: 20 32 35 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d   256 271]} \..-m
0d70: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
0d80: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
0d90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0da0: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
0db0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
0dc0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 39 20 7b  eam_rc4_40-1.9 {
0dd0: 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Encrypt rc4-40 o
0de0: 66 66 73 65 74 20 34 39 36 7d 20 5c 0a 09 2d 63  ffset 496} \..-c
0df0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
0e00: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
0e10: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
0e20: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
0e30: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
0e40: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
0e50: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
0e60: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
0e70: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
0e80: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
0e90: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
0ea0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
0eb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0ec0: 30 30 30 30 5d 20 33 32 5d 5d 20 34 39 36 20 35  0000] 32]] 496 5
0ed0: 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  11]} \..-match e
0ee0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34 32 62  xact -result 42b
0ef0: 37 64 30 63 64 64 39 31 38 61 38 61 33 33 64 64  7d0cdd918a8a33dd
0f00: 35 31 37 38 31 63 38 31 66 34 30 34 31 0a 0a 0a  51781c81f4041...
0f10: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
0f20: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
0f30: 34 5f 34 30 2d 31 2e 31 30 20 7b 44 65 63 72 79  4_40-1.10 {Decry
0f40: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
0f50: 20 34 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   496} \..-constr
0f60: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
0f70: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
0f80: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
0f90: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
0fa0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
0fb0: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
0fc0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
0fd0: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
0fe0: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  5] \...-data [tl
0ff0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
1000: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
1010: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
1020: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
1030: 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61  2030405] \...-da
1040: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
1050: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
1060: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
1070: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1080: 30 30 30 30 30 5d 20 33 32 5d 5d 5d 20 34 39 36  00000] 32]]] 496
1090: 20 35 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68   511]} \..-match
10a0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
10b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
10c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a  000000000000000.
10d0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
10e0: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
10f0: 72 63 34 5f 34 30 2d 31 2e 31 31 20 7b 45 6e 63  rc4_40-1.11 {Enc
1100: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
1110: 65 74 20 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73  et 512} \..-cons
1120: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
1130: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
1140: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
1150: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65  ng range [tls::e
1160: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
1170: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
1180: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1190: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
11a0: 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  405] \...-data [
11b0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
11c0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
11d0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
11e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
11f0: 30 5d 20 33 33 5d 5d 20 35 31 32 20 35 32 37 5d  0] 33]] 512 527]
1200: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1210: 74 20 2d 72 65 73 75 6c 74 20 36 34 35 39 38 34  t -result 645984
1220: 34 34 33 32 61 37 64 61 39 32 33 63 66 62 33 65  4432a7da923cfb3e
1230: 62 34 39 38 30 36 36 31 66 36 0a 0a 0a 74 63 6c  b4980661f6...tcl
1240: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
1250: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
1260: 30 2d 31 2e 31 32 20 7b 44 65 63 72 79 70 74 20  0-1.12 {Decrypt 
1270: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 35 31  rc4-40 offset 51
1280: 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  2} \..-constrain
1290: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
12a0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
12b0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
12c0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
12d0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
12e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
12f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1300: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
1310: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
1320: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
1330: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
1340: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
1350: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
1360: 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0405] \...-data 
1370: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
1380: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
1390: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
13a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
13b0: 30 30 5d 20 33 33 5d 5d 5d 20 35 31 32 20 35 32  00] 33]]] 512 52
13c0: 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  7]} \..-match ex
13d0: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
13e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
13f0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
1400: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
1410: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
1420: 5f 34 30 2d 31 2e 31 33 20 7b 45 6e 63 72 79 70  _40-1.13 {Encryp
1430: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
1440: 37 35 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  752} \..-constra
1450: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
1460: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
1470: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
1480: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
1490: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
14a0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
14b0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
14c0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
14d0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
14e0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
14f0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
1500: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
1520: 34 38 5d 5d 20 37 35 32 20 37 36 37 5d 7d 20 5c  48]] 752 767]} \
1530: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1540: 72 65 73 75 6c 74 20 65 63 31 30 33 32 37 62 64  result ec10327bd
1550: 65 32 62 65 65 66 64 31 38 66 39 32 37 37 36 38  e2beefd18f927768
1560: 30 34 35 37 65 32 32 0a 0a 0a 74 63 6c 74 65 73  0457e22...tcltes
1570: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
1580: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
1590: 2e 31 34 20 7b 44 65 63 72 79 70 74 20 72 63 34  .14 {Decrypt rc4
15a0: 2d 34 30 20 6f 66 66 73 65 74 20 37 35 32 7d 20  -40 offset 752} 
15b0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
15c0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
15d0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
15e0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
15f0: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
1600: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
1610: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
1620: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1630: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
1640: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
1650: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
1660: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
1670: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
1680: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
1690: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
16a0: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
16b0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
16c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
16d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
16e0: 20 34 38 5d 5d 5d 20 37 35 32 20 37 36 37 5d 7d   48]]] 752 767]}
16f0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
1700: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
1710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1720: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
1730: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
1740: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  ic_Stream_rc4_40
1750: 2d 31 2e 31 35 20 7b 45 6e 63 72 79 70 74 20 72  -1.15 {Encrypt r
1760: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 37 36 38  c4-40 offset 768
1770: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
1780: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
1790: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
17a0: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
17b0: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
17c0: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
17d0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
17e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
17f0: 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c  ex 0102030405] \
1800: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
1810: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
1820: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
1830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1840: 30 30 30 30 30 30 30 30 30 30 30 5d 20 34 39 5d  00000000000] 49]
1850: 5d 20 37 36 38 20 37 38 33 5d 7d 20 5c 0a 09 2d  ] 768 783]} \..-
1860: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
1870: 75 6c 74 20 65 62 36 32 36 33 38 64 34 66 30 62  ult eb62638d4f0b
1880: 61 31 66 65 39 66 63 61 32 30 65 30 35 62 66 38  a1fe9fca20e05bf8
1890: 66 66 32 62 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  ff2b...tcltest::
18a0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
18b0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 36  ream_rc4_40-1.16
18c0: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
18d0: 20 6f 66 66 73 65 74 20 37 36 38 7d 20 5c 0a 09   offset 768} \..
18e0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
18f0: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
1900: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
1910: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
1920: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
1930: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
1940: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
1950: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
1960: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
1970: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
1980: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
1990: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
19a0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
19b0: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
19c0: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
19d0: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
19e0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
19f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1a00: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 34 39  000000000000] 49
1a10: 5d 5d 5d 20 37 36 38 20 37 38 33 5d 7d 20 5c 0a  ]]] 768 783]} \.
1a20: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
1a30: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
1a40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1a50: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
1a60: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
1a70: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
1a80: 31 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  17 {Encrypt rc4-
1a90: 34 30 20 6f 66 66 73 65 74 20 31 30 30 38 7d 20  40 offset 1008} 
1aa0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
1ab0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
1ac0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
1ad0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
1ae0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
1af0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
1b00: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
1b10: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1b20: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
1b30: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
1b40: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
1b50: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
1b60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1b70: 30 30 30 30 30 30 30 30 30 5d 20 36 34 5d 5d 20  000000000] 64]] 
1b80: 31 30 30 38 20 31 30 32 33 5d 7d 20 5c 0a 09 2d  1008 1023]} \..-
1b90: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
1ba0: 75 6c 74 20 34 35 31 32 39 30 34 38 65 36 61 30  ult 45129048e6a0
1bb0: 65 64 30 62 35 36 62 34 39 30 33 33 38 66 30 37  ed0b56b490338f07
1bc0: 38 64 61 35 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  8da5...tcltest::
1bd0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
1be0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 38  ream_rc4_40-1.18
1bf0: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
1c00: 20 6f 66 66 73 65 74 20 31 30 30 38 7d 20 5c 0a   offset 1008} \.
1c10: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
1c20: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
1c30: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
1c40: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
1c50: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
1c60: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
1c70: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
1c80: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
1c90: 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d  102030405] \...-
1ca0: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
1cb0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
1cc0: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
1cd0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
1ce0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
1cf0: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
1d00: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
1d10: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
1d20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1d30: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 36  0000000000000] 6
1d40: 34 5d 5d 5d 20 31 30 30 38 20 31 30 32 33 5d 7d  4]]] 1008 1023]}
1d50: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
1d60: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
1d70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1d80: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
1d90: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
1da0: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  ic_Stream_rc4_40
1db0: 2d 31 2e 31 39 20 7b 45 6e 63 72 79 70 74 20 72  -1.19 {Encrypt r
1dc0: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 30 32  c4-40 offset 102
1dd0: 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  4} \..-constrain
1de0: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
1df0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
1e00: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
1e10: 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  nge [tls::encryp
1e20: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
1e30: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
1e40: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1e50: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
1e60: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
1e70: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
1e80: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
1e90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1ea0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 36 35  000000000000] 65
1eb0: 5d 5d 20 31 30 32 34 20 31 30 33 39 5d 7d 20 5c  ]] 1024 1039]} \
1ec0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1ed0: 72 65 73 75 6c 74 20 33 30 61 62 62 63 63 37 63  result 30abbcc7c
1ee0: 32 30 62 30 31 36 30 39 66 32 33 65 65 32 64 35  20b01609f23ee2d5
1ef0: 66 36 62 62 37 64 66 0a 0a 0a 74 63 6c 74 65 73  f6bb7df...tcltes
1f00: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
1f10: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
1f20: 2e 32 30 20 7b 44 65 63 72 79 70 74 20 72 63 34  .20 {Decrypt rc4
1f30: 2d 34 30 20 6f 66 66 73 65 74 20 31 30 32 34 7d  -40 offset 1024}
1f40: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
1f50: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
1f60: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
1f70: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
1f80: 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  e [tls::decrypt 
1f90: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
1fa0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
1fb0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
1fc0: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
1fd0: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
1fe0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
1ff0: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
2000: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
2010: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
2020: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  05] \...-data [s
2030: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
2040: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
2050: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2060: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2070: 5d 20 36 35 5d 5d 5d 20 31 30 32 34 20 31 30 33  ] 65]]] 1024 103
2080: 39 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  9]} \..-match ex
2090: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
20a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
20b0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
20c0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
20d0: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
20e0: 5f 34 30 2d 31 2e 32 31 20 7b 45 6e 63 72 79 70  _40-1.21 {Encryp
20f0: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
2100: 31 35 32 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  1520} \..-constr
2110: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
2120: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
2130: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
2140: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
2150: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
2160: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
2170: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
2180: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
2190: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
21a0: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
21b0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
21c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
21d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
21e0: 20 39 36 5d 5d 20 31 35 32 30 20 31 35 33 35 5d   96]] 1520 1535]
21f0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2200: 74 20 2d 72 65 73 75 6c 74 20 33 32 39 34 66 37  t -result 3294f7
2210: 34 34 64 38 66 39 37 39 30 35 30 37 65 37 30 66  44d8f9790507e70f
2220: 36 32 65 35 62 62 63 65 65 61 0a 0a 0a 74 63 6c  62e5bbceea...tcl
2230: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
2240: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
2250: 30 2d 31 2e 32 32 20 7b 44 65 63 72 79 70 74 20  0-1.22 {Decrypt 
2260: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 35  rc4-40 offset 15
2270: 32 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  20} \..-constrai
2280: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
2290: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
22a0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
22b0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
22c0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
22d0: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
22e0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
22f0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
2300: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
2310: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
2320: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
2330: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
2340: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
2350: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
2360: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
2370: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
2380: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
2390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
23a0: 30 30 30 5d 20 39 36 5d 5d 5d 20 31 35 32 30 20  000] 96]]] 1520 
23b0: 31 35 33 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  1535]} \..-match
23c0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
23d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
23e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a  000000000000000.
23f0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
2400: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
2410: 72 63 34 5f 34 30 2d 31 2e 32 33 20 7b 45 6e 63  rc4_40-1.23 {Enc
2420: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
2430: 65 74 20 31 35 33 36 7d 20 5c 0a 09 2d 63 6f 6e  et 1536} \..-con
2440: 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20  straints rc4_40 
2450: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
2460: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
2470: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
2480: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
2490: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
24a0: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
24b0: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
24c0: 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0405] \...-data 
24d0: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
24e0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
24f0: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
2500: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2510: 30 30 5d 20 39 37 5d 5d 20 31 35 33 36 20 31 35  00] 97]] 1536 15
2520: 35 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  51]} \..-match e
2530: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 38 37  xact -result d87
2540: 32 39 64 62 34 31 38 38 32 32 35 39 62 65 65 34  29db41882259bee4
2550: 66 38 32 35 33 32 35 66 35 61 31 33 30 0a 0a 0a  f825325f5a130...
2560: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
2570: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
2580: 34 5f 34 30 2d 31 2e 32 34 20 7b 44 65 63 72 79  4_40-1.24 {Decry
2590: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
25a0: 20 31 35 33 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74   1536} \..-const
25b0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
25c0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
25d0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
25e0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
25f0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
2600: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
2610: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
2620: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
2630: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  05] \...-data [t
2640: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
2650: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
2660: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
2670: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
2680: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
2690: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
26a0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
26b0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
26c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
26d0: 30 30 30 30 30 30 5d 20 39 37 5d 5d 5d 20 31 35  000000] 97]]] 15
26e0: 33 36 20 31 35 35 31 5d 7d 20 5c 0a 09 2d 6d 61  36 1551]} \..-ma
26f0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
2700: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
2710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2720: 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  00...tcltest::te
2730: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
2740: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 35 20 7b  am_rc4_40-1.25 {
2750: 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Encrypt rc4-40 o
2760: 66 66 73 65 74 20 32 30 33 32 7d 20 5c 0a 09 2d  ffset 2032} \..-
2770: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
2780: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
2790: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
27a0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
27b0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
27c0: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
27d0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
27e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
27f0: 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61  2030405] \...-da
2800: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
2810: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
2820: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
2830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2840: 30 30 30 30 30 5d 20 31 32 38 5d 5d 20 32 30 33  00000] 128]] 203
2850: 32 20 32 30 34 37 5d 7d 20 5c 0a 09 2d 6d 61 74  2 2047]} \..-mat
2860: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
2870: 20 31 65 62 31 34 61 30 63 31 33 62 33 62 66 34   1eb14a0c13b3bf4
2880: 37 66 61 32 61 30 62 61 39 33 61 64 34 35 62 38  7fa2a0ba93ad45b8
2890: 62 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  b...tcltest::tes
28a0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
28b0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 36 20 7b 44  m_rc4_40-1.26 {D
28c0: 65 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ecrypt rc4-40 of
28d0: 66 73 65 74 20 32 30 33 32 7d 20 5c 0a 09 2d 63  fset 2032} \..-c
28e0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
28f0: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
2900: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
2910: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
2920: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
2930: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
2940: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
2950: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
2960: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
2970: 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  a [tls::encrypt 
2980: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
2990: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
29a0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
29b0: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
29c0: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
29d0: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
29e0: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
29f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2a00: 30 30 30 30 30 30 30 30 30 30 5d 20 31 32 38 5d  0000000000] 128]
2a10: 5d 5d 20 32 30 33 32 20 32 30 34 37 5d 7d 20 5c  ]] 2032 2047]} \
2a20: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
2a30: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30  result 000000000
2a40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2a50: 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73  0000000...tcltes
2a60: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
2a70: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
2a80: 2e 32 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34  .27 {Encrypt rc4
2a90: 2d 34 30 20 6f 66 66 73 65 74 20 32 30 34 38 7d  -40 offset 2048}
2aa0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
2ab0: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
2ac0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
2ad0: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
2ae0: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
2af0: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
2b00: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
2b10: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
2b20: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
2b30: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
2b40: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
2b50: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
2b60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2b70: 30 30 30 30 30 30 30 30 30 30 5d 20 31 32 39 5d  0000000000] 129]
2b80: 5d 20 32 30 34 38 20 32 30 36 33 5d 7d 20 5c 0a  ] 2048 2063]} \.
2b90: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
2ba0: 65 73 75 6c 74 20 63 63 35 38 32 66 38 62 61 39  esult cc582f8ba9
2bb0: 66 32 36 35 65 32 62 31 62 65 39 31 31 32 65 39  f265e2b1be9112e9
2bc0: 37 35 64 32 64 37 0a 0a 0a 74 63 6c 74 65 73 74  75d2d7...tcltest
2bd0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
2be0: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
2bf0: 32 38 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d  28 {Decrypt rc4-
2c00: 34 30 20 6f 66 66 73 65 74 20 32 30 34 38 7d 20  40 offset 2048} 
2c10: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
2c20: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
2c30: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
2c40: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
2c50: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
2c60: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
2c70: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
2c80: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
2c90: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
2ca0: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
2cb0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
2cc0: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
2cd0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
2ce0: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
2cf0: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
2d00: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
2d10: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
2d20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2d30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
2d40: 20 31 32 39 5d 5d 5d 20 32 30 34 38 20 32 30 36   129]]] 2048 206
2d50: 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  3]} \..-match ex
2d60: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
2d70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2d80: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
2d90: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
2da0: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
2db0: 5f 34 30 2d 31 2e 32 39 20 7b 45 6e 63 72 79 70  _40-1.29 {Encryp
2dc0: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
2dd0: 33 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  3056} \..-constr
2de0: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
2df0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
2e00: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
2e10: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
2e20: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
2e30: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
2e40: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
2e50: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
2e60: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
2e70: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
2e80: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
2e90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2ea0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
2eb0: 20 31 39 32 5d 5d 20 33 30 35 36 20 33 30 37 31   192]] 3056 3071
2ec0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
2ed0: 63 74 20 2d 72 65 73 75 6c 74 20 66 32 65 33 30  ct -result f2e30
2ee0: 66 39 62 64 31 30 32 65 63 62 66 37 35 61 61 61  f9bd102ecbf75aaa
2ef0: 64 65 39 62 63 33 35 63 34 33 63 0a 0a 0a 74 63  de9bc35c43c...tc
2f00: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
2f10: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f  tric_Stream_rc4_
2f20: 34 30 2d 31 2e 33 30 20 7b 44 65 63 72 79 70 74  40-1.30 {Decrypt
2f30: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 33   rc4-40 offset 3
2f40: 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  056} \..-constra
2f50: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
2f60: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
2f70: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
2f80: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72  range [tls::decr
2f90: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
2fa0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
2fb0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
2fc0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
2fd0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
2fe0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
2ff0: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
3000: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
3010: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
3020: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
3030: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
3040: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3050: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
3060: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3070: 30 30 30 30 5d 20 31 39 32 5d 5d 5d 20 33 30 35  0000] 192]]] 305
3080: 36 20 33 30 37 31 5d 7d 20 5c 0a 09 2d 6d 61 74  6 3071]} \..-mat
3090: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
30a0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
30b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
30c0: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
30d0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
30e0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 33 31 20 7b 45  m_rc4_40-1.31 {E
30f0: 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ncrypt rc4-40 of
3100: 66 73 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63  fset 3072} \..-c
3110: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
3120: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
3130: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
3140: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
3150: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
3160: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
3170: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
3180: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
3190: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
31a0: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
31b0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
31c0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
31d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
31e0: 30 30 30 30 5d 20 31 39 33 5d 5d 20 33 30 37 32  0000] 193]] 3072
31f0: 20 33 30 38 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63   3087]} \..-matc
3200: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
3210: 65 63 30 65 31 31 63 34 37 39 64 63 33 32 39 64  ec0e11c479dc329d
3220: 63 38 64 61 37 39 36 38 66 65 39 36 35 36 38 31  c8da7968fe965681
3230: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
3240: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
3250: 5f 72 63 34 5f 34 30 2d 31 2e 33 32 20 7b 44 65  _rc4_40-1.32 {De
3260: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
3270: 73 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63 6f  set 3072} \..-co
3280: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3290: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
32a0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
32b0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
32c0: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
32d0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
32e0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
32f0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
3300: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
3310: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
3320: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
3330: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
3340: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
3350: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
3360: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
3370: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
3380: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
3390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
33a0: 30 30 30 30 30 30 30 30 30 5d 20 31 39 33 5d 5d  000000000] 193]]
33b0: 5d 20 33 30 37 32 20 33 30 38 37 5d 7d 20 5c 0a  ] 3072 3087]} \.
33c0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
33d0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
33e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
33f0: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
3400: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
3410: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
3420: 33 33 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  33 {Encrypt rc4-
3430: 34 30 20 6f 66 66 73 65 74 20 34 30 38 30 7d 20  40 offset 4080} 
3440: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
3450: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
3460: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
3470: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
3480: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
3490: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
34a0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
34b0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
34c0: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
34d0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
34e0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
34f0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
3500: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3510: 30 30 30 30 30 30 30 30 30 5d 20 32 35 36 5d 5d  000000000] 256]]
3520: 20 34 30 38 30 20 34 30 39 35 5d 7d 20 5c 0a 09   4080 4095]} \..
3530: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
3540: 73 75 6c 74 20 30 36 38 33 32 36 61 32 31 31 38  sult 068326a2118
3550: 34 31 36 64 32 31 66 39 64 30 34 62 32 63 64 31  416d21f9d04b2cd1
3560: 63 61 30 35 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  ca050...tcltest:
3570: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
3580: 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 33  tream_rc4_40-1.3
3590: 34 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34  4 {Decrypt rc4-4
35a0: 30 20 6f 66 66 73 65 74 20 34 30 38 30 7d 20 5c  0 offset 4080} \
35b0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
35c0: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
35d0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
35e0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
35f0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
3600: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
3610: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
3620: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
3630: 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09  0102030405] \...
3640: 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72  -data [tls::encr
3650: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
3660: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
3670: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
3680: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
3690: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
36a0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
36b0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
36c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
36d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
36e0: 32 35 36 5d 5d 5d 20 34 30 38 30 20 34 30 39 35  256]]] 4080 4095
36f0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
3700: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
3710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3720: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63  00000000000...tc
3730: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
3740: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f  tric_Stream_rc4_
3750: 34 30 2d 31 2e 33 35 20 7b 45 6e 63 72 79 70 74  40-1.35 {Encrypt
3760: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 34   rc4-40 offset 4
3770: 30 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  096} \..-constra
3780: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
3790: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
37a0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
37b0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
37c0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
37d0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
37e0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
37f0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
3800: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
3810: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
3820: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
3830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3840: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
3850: 32 35 37 5d 5d 20 34 30 39 36 20 34 31 31 31 5d  257]] 4096 4111]
3860: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
3870: 74 20 2d 72 65 73 75 6c 74 20 66 66 32 35 62 35  t -result ff25b5
3880: 38 39 39 35 39 39 36 37 30 37 65 35 31 66 62 64  8995996707e51fbd
3890: 66 30 38 62 33 34 64 38 37 35 0a 0a 0a 74 63 6c  f08b34d875...tcl
38a0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
38b0: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
38c0: 30 2d 31 2e 33 36 20 7b 44 65 63 72 79 70 74 20  0-1.36 {Decrypt 
38d0: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 34 30  rc4-40 offset 40
38e0: 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  96} \..-constrai
38f0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
3900: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
3910: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
3920: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
3930: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
3940: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
3950: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3960: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
3970: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
3980: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3990: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
39a0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
39b0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
39c0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
39d0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
39e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
39f0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
3a00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3a10: 30 30 30 5d 20 32 35 37 5d 5d 5d 20 34 30 39 36  000] 257]]] 4096
3a20: 20 34 31 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63   4111]} \..-matc
3a30: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
3a40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3a50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3a60: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
3a70: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
3a80: 5f 72 63 34 5f 34 30 2d 31 2e 33 37 20 7b 45 6e  _rc4_40-1.37 {En
3a90: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
3aa0: 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74  set 0} \..-const
3ab0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
3ac0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
3ad0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
3ae0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
3af0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
3b00: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
3b10: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
3b20: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
3b30: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 62  2a] \...-data [b
3b40: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
3b50: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
3b60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3b70: 30 5d 5d 20 30 20 31 35 5d 7d 20 5c 0a 09 2d 6d  0]] 0 15]} \..-m
3b80: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
3b90: 6c 74 20 38 30 61 64 39 37 62 64 63 39 37 33 64  lt 80ad97bdc973d
3ba0: 66 38 61 32 65 38 37 39 65 39 32 61 34 39 37 65  f8a2e879e92a497e
3bb0: 66 64 61 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  fda...tcltest::t
3bc0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
3bd0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 33 38 20  eam_rc4_40-1.38 
3be0: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
3bf0: 6f 66 66 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f  offset 0} \..-co
3c00: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3c10: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3c20: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3c30: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
3c40: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
3c50: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
3c60: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
3c70: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
3c80: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
3c90: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
3ca0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
3cb0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
3cc0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
3cd0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
3ce0: 09 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  .-data [binary d
3cf0: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
3d00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3d10: 30 30 30 30 30 30 30 30 30 30 5d 5d 5d 20 30 20  0000000000]]] 0 
3d20: 31 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  15]} \..-match e
3d30: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
3d40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3d50: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
3d60: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
3d70: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
3d80: 34 5f 34 30 2d 31 2e 33 39 20 7b 45 6e 63 72 79  4_40-1.39 {Encry
3d90: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
3da0: 20 31 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61   16} \..-constra
3db0: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
3dc0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
3dd0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
3de0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
3df0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
3e00: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
3e10: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
3e20: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
3e30: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
3e40: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
3e50: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
3e60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3e70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
3e80: 32 5d 5d 20 31 36 20 33 31 5d 7d 20 5c 0a 09 2d  2]] 16 31]} \..-
3e90: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
3ea0: 75 6c 74 20 32 30 66 30 36 30 63 32 66 32 65 35  ult 20f060c2f2e5
3eb0: 31 32 36 35 30 31 64 33 64 34 66 65 61 31 30 64  126501d3d4fea10d
3ec0: 35 66 63 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  5fc0...tcltest::
3ed0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
3ee0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 30  ream_rc4_40-1.40
3ef0: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
3f00: 20 6f 66 66 73 65 74 20 31 36 7d 20 5c 0a 09 2d   offset 16} \..-
3f10: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
3f20: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
3f30: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
3f40: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
3f50: 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68  s::decrypt -ciph
3f60: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
3f70: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
3f80: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33  y decode hex 833
3f90: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
3fa0: 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ta [tls::encrypt
3fb0: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
3fc0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
3fd0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
3fe0: 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c  ex 833222772a] \
3ff0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
4000: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
4010: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
4020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4030: 30 30 30 30 30 30 30 30 30 30 30 5d 20 32 5d 5d  00000000000] 2]]
4040: 5d 20 31 36 20 33 31 5d 7d 20 5c 0a 09 2d 6d 61  ] 16 31]} \..-ma
4050: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
4060: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
4070: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4080: 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  00...tcltest::te
4090: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
40a0: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 31 20 7b  am_rc4_40-1.41 {
40b0: 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Encrypt rc4-40 o
40c0: 66 66 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d 63  ffset 240} \..-c
40d0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
40e0: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
40f0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
4100: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
4110: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
4120: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
4130: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
4140: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
4150: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
4160: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
4170: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4180: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
4190: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
41a0: 30 30 30 30 5d 20 31 36 5d 5d 20 32 34 30 20 32  0000] 16]] 240 2
41b0: 35 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  55]} \..-match e
41c0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66 61 61  xact -result faa
41d0: 31 34 38 65 39 39 30 34 36 31 38 31 66 65 63 36  148e99046181fec6
41e0: 62 32 30 38 35 66 33 62 32 30 65 64 39 0a 0a 0a  b2085f3b20ed9...
41f0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
4200: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
4210: 34 5f 34 30 2d 31 2e 34 32 20 7b 44 65 63 72 79  4_40-1.42 {Decry
4220: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
4230: 20 32 34 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   240} \..-constr
4240: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
4250: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
4260: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
4270: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
4280: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
4290: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
42a0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
42b0: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
42c0: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  a] \...-data [tl
42d0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
42e0: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
42f0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
4300: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33  y decode hex 833
4310: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
4320: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
4330: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
4340: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
4350: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4360: 30 30 30 30 30 5d 20 31 36 5d 5d 5d 20 32 34 30  00000] 16]]] 240
4370: 20 32 35 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68   255]} \..-match
4380: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
4390: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
43a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a  000000000000000.
43b0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
43c0: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
43d0: 72 63 34 5f 34 30 2d 31 2e 34 33 20 7b 45 6e 63  rc4_40-1.43 {Enc
43e0: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
43f0: 65 74 20 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73  et 256} \..-cons
4400: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
4410: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
4420: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
4430: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65  ng range [tls::e
4440: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
4450: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
4460: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
4470: 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37  code hex 8332227
4480: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
4490: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
44a0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
44b0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
44c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
44d0: 30 5d 20 31 37 5d 5d 20 32 35 36 20 32 37 31 5d  0] 17]] 256 271]
44e0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
44f0: 74 20 2d 72 65 73 75 6c 74 20 66 30 64 61 66 35  t -result f0daf5
4500: 62 61 62 33 64 35 39 36 38 33 39 38 35 37 38 34  bab3d59683985784
4510: 36 66 37 33 66 62 66 65 35 61 0a 0a 0a 74 63 6c  6f73fbfe5a...tcl
4520: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
4530: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
4540: 30 2d 31 2e 34 34 20 7b 44 65 63 72 79 70 74 20  0-1.44 {Decrypt 
4550: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 32 35  rc4-40 offset 25
4560: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
4570: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
4580: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
4590: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
45a0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
45b0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
45c0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
45d0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
45e0: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
45f0: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
4600: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
4610: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
4620: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
4630: 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32  ecode hex 833222
4640: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
4650: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
4660: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
4670: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
4680: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4690: 30 30 5d 20 31 37 5d 5d 5d 20 32 35 36 20 32 37  00] 17]]] 256 27
46a0: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
46b0: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
46c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
46d0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
46e0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
46f0: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
4700: 5f 34 30 2d 31 2e 34 35 20 7b 45 6e 63 72 79 70  _40-1.45 {Encryp
4710: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
4720: 34 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  496} \..-constra
4730: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
4740: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
4750: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
4760: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
4770: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
4780: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
4790: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
47a0: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
47b0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
47c0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
47d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
47e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
47f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
4800: 33 32 5d 5d 20 34 39 36 20 35 31 31 5d 7d 20 5c  32]] 496 511]} \
4810: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
4820: 72 65 73 75 6c 74 20 31 63 37 65 32 66 63 34 36  result 1c7e2fc46
4830: 33 39 32 33 32 66 65 32 39 37 35 38 34 62 32 39  39232fe297584b29
4840: 36 39 39 36 62 63 38 0a 0a 0a 74 63 6c 74 65 73  6996bc8...tcltes
4850: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
4860: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
4870: 2e 34 36 20 7b 44 65 63 72 79 70 74 20 72 63 34  .46 {Decrypt rc4
4880: 2d 34 30 20 6f 66 66 73 65 74 20 34 39 36 7d 20  -40 offset 496} 
4890: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
48a0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
48b0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
48c0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
48d0: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
48e0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
48f0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
4900: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
4910: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
4920: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
4930: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
4940: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
4950: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
4960: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
4970: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
4980: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
4990: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
49a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
49b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
49c0: 20 33 32 5d 5d 5d 20 34 39 36 20 35 31 31 5d 7d   32]]] 496 511]}
49d0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
49e0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
49f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4a00: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
4a10: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
4a20: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  ic_Stream_rc4_40
4a30: 2d 31 2e 34 37 20 7b 45 6e 63 72 79 70 74 20 72  -1.47 {Encrypt r
4a40: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 35 31 32  c4-40 offset 512
4a50: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
4a60: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
4a70: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
4a80: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
4a90: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
4aa0: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
4ab0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
4ac0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4ad0: 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c  ex 833222772a] \
4ae0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
4af0: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
4b00: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
4b10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4b20: 30 30 30 30 30 30 30 30 30 30 30 5d 20 33 33 5d  00000000000] 33]
4b30: 5d 20 35 31 32 20 35 32 37 5d 7d 20 5c 0a 09 2d  ] 512 527]} \..-
4b40: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
4b50: 75 6c 74 20 33 64 62 39 62 32 34 39 34 30 36 63  ult 3db9b249406c
4b60: 63 38 65 64 66 66 61 63 35 35 63 63 64 33 32 32  c8edffac55ccd322
4b70: 62 61 31 32 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  ba12...tcltest::
4b80: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
4b90: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 38  ream_rc4_40-1.48
4ba0: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
4bb0: 20 6f 66 66 73 65 74 20 35 31 32 7d 20 5c 0a 09   offset 512} \..
4bc0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
4bd0: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
4be0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
4bf0: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
4c00: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
4c10: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
4c20: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
4c30: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
4c40: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
4c50: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
4c60: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
4c70: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
4c80: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4c90: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
4ca0: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
4cb0: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
4cc0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
4cd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4ce0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 33 33  000000000000] 33
4cf0: 5d 5d 5d 20 35 31 32 20 35 32 37 5d 7d 20 5c 0a  ]]] 512 527]} \.
4d00: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4d10: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
4d20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4d30: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
4d40: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
4d50: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
4d60: 34 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  49 {Encrypt rc4-
4d70: 34 30 20 6f 66 66 73 65 74 20 37 35 32 7d 20 5c  40 offset 752} \
4d80: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
4d90: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
4da0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
4db0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
4dc0: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
4dd0: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
4de0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
4df0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
4e00: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
4e10: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
4e20: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
4e30: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
4e40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4e50: 30 30 30 30 30 30 30 30 5d 20 34 38 5d 5d 20 37  00000000] 48]] 7
4e60: 35 32 20 37 36 37 5d 7d 20 5c 0a 09 2d 6d 61 74  52 767]} \..-mat
4e70: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
4e80: 20 65 34 66 39 66 37 65 30 30 36 36 31 35 34 62   e4f9f7e0066154b
4e90: 62 64 31 32 35 62 37 34 35 35 36 39 62 63 38 39  bd125b745569bc89
4ea0: 37 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  7...tcltest::tes
4eb0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
4ec0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 30 20 7b 44  m_rc4_40-1.50 {D
4ed0: 65 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ecrypt rc4-40 of
4ee0: 66 73 65 74 20 37 35 32 7d 20 5c 0a 09 2d 63 6f  fset 752} \..-co
4ef0: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
4f00: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
4f10: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
4f20: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
4f30: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
4f40: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
4f50: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
4f60: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
4f70: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
4f80: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
4f90: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
4fa0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
4fb0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
4fc0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
4fd0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
4fe0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
4ff0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
5000: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5010: 30 30 30 30 30 30 30 30 30 5d 20 34 38 5d 5d 5d  000000000] 48]]]
5020: 20 37 35 32 20 37 36 37 5d 7d 20 5c 0a 09 2d 6d   752 767]} \..-m
5030: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
5040: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
5050: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5060: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
5070: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
5080: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 31 20  eam_rc4_40-1.51 
5090: 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Encrypt rc4-40 
50a0: 6f 66 66 73 65 74 20 37 36 38 7d 20 5c 0a 09 2d  offset 768} \..-
50b0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
50c0: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
50d0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
50e0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
50f0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
5100: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
5110: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
5120: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33  y decode hex 833
5130: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
5140: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
5150: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
5160: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
5170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5180: 30 30 30 30 30 5d 20 34 39 5d 5d 20 37 36 38 20  00000] 49]] 768 
5190: 37 38 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  783]} \..-match 
51a0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 35  exact -result 75
51b0: 64 35 65 66 32 36 32 62 34 34 63 34 31 61 39 63  d5ef262b44c41a9c
51c0: 66 36 33 61 65 31 34 35 36 38 65 31 62 39 0a 0a  f63ae14568e1b9..
51d0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
51e0: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
51f0: 63 34 5f 34 30 2d 31 2e 35 32 20 7b 44 65 63 72  c4_40-1.52 {Decr
5200: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
5210: 74 20 37 36 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t 768} \..-const
5220: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
5230: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
5240: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
5250: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
5260: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
5270: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
5280: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
5290: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
52a0: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  2a] \...-data [t
52b0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
52c0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
52d0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
52e0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
52f0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
5300: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
5310: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
5320: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
5330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5340: 30 30 30 30 30 30 5d 20 34 39 5d 5d 5d 20 37 36  000000] 49]]] 76
5350: 38 20 37 38 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63  8 783]} \..-matc
5360: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
5370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5390: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
53a0: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
53b0: 5f 72 63 34 5f 34 30 2d 31 2e 35 33 20 7b 45 6e  _rc4_40-1.53 {En
53c0: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
53d0: 73 65 74 20 31 30 30 38 7d 20 5c 0a 09 2d 63 6f  set 1008} \..-co
53e0: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
53f0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
5400: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
5410: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
5420: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
5430: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
5440: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
5450: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
5460: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
5470: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
5480: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
5490: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
54a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
54b0: 30 30 30 5d 20 36 34 5d 5d 20 31 30 30 38 20 31  000] 64]] 1008 1
54c0: 30 32 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  023]} \..-match 
54d0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 64  exact -result 6d
54e0: 61 34 35 33 64 62 66 38 31 65 38 32 33 33 34 61  a453dbf81e82334a
54f0: 33 64 38 38 36 36 63 62 35 30 61 31 65 33 0a 0a  3d8866cb50a1e3..
5500: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
5510: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
5520: 63 34 5f 34 30 2d 31 2e 35 34 20 7b 44 65 63 72  c4_40-1.54 {Decr
5530: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
5540: 74 20 31 30 30 38 7d 20 5c 0a 09 2d 63 6f 6e 73  t 1008} \..-cons
5550: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
5560: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
5570: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
5580: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64  ng range [tls::d
5590: 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ecrypt -cipher r
55a0: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
55b0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
55c0: 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37  code hex 8332227
55d0: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
55e0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
55f0: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
5600: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
5610: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38  ary decode hex 8
5620: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
5630: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
5640: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
5650: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
5660: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5670: 30 30 30 30 30 30 30 5d 20 36 34 5d 5d 5d 20 31  0000000] 64]]] 1
5680: 30 30 38 20 31 30 32 33 5d 7d 20 5c 0a 09 2d 6d  008 1023]} \..-m
5690: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
56a0: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
56b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
56c0: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
56d0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
56e0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 35 20  eam_rc4_40-1.55 
56f0: 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Encrypt rc4-40 
5700: 6f 66 66 73 65 74 20 31 30 32 34 7d 20 5c 0a 09  offset 1024} \..
5710: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
5720: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
5730: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
5740: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
5750: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
5760: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
5770: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
5780: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
5790: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
57a0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
57b0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
57c0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
57d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
57e0: 30 30 30 30 30 30 5d 20 36 35 5d 5d 20 31 30 32  000000] 65]] 102
57f0: 34 20 31 30 33 39 5d 7d 20 5c 0a 09 2d 6d 61 74  4 1039]} \..-mat
5800: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5810: 20 37 38 32 38 64 30 37 34 31 31 39 63 61 62 35   7828d074119cab5
5820: 63 32 32 62 32 39 34 64 37 61 39 62 66 61 30 62  c22b294d7a9bfa0b
5830: 62 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  b...tcltest::tes
5840: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
5850: 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 36 20 7b 44  m_rc4_40-1.56 {D
5860: 65 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ecrypt rc4-40 of
5870: 66 73 65 74 20 31 30 32 34 7d 20 5c 0a 09 2d 63  fset 1024} \..-c
5880: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
5890: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
58a0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
58b0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
58c0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
58d0: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
58e0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
58f0: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
5900: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
5910: 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  a [tls::encrypt 
5920: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
5930: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
5940: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5950: 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  x 833222772a] \.
5960: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
5970: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
5980: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
5990: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
59a0: 30 30 30 30 30 30 30 30 30 30 5d 20 36 35 5d 5d  0000000000] 65]]
59b0: 5d 20 31 30 32 34 20 31 30 33 39 5d 7d 20 5c 0a  ] 1024 1039]} \.
59c0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
59d0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
59e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
59f0: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
5a00: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
5a10: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
5a20: 35 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  57 {Encrypt rc4-
5a30: 34 30 20 6f 66 66 73 65 74 20 31 35 32 30 7d 20  40 offset 1520} 
5a40: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
5a50: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
5a60: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
5a70: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
5a80: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
5a90: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
5aa0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
5ab0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
5ac0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
5ad0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
5ae0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
5af0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
5b00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5b10: 30 30 30 30 30 30 30 30 30 5d 20 39 36 5d 5d 20  000000000] 96]] 
5b20: 31 35 32 30 20 31 35 33 35 5d 7d 20 5c 0a 09 2d  1520 1535]} \..-
5b30: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
5b40: 75 6c 74 20 61 64 62 38 39 63 65 61 39 61 31 35  ult adb89cea9a15
5b50: 66 62 65 36 31 37 32 39 35 62 64 30 34 62 38 63  fbe617295bd04b8c
5b60: 61 30 35 63 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  a05c...tcltest::
5b70: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
5b80: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 38  ream_rc4_40-1.58
5b90: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
5ba0: 20 6f 66 66 73 65 74 20 31 35 32 30 7d 20 5c 0a   offset 1520} \.
5bb0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
5bc0: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
5bd0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
5be0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
5bf0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
5c00: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
5c10: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
5c20: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38  ary decode hex 8
5c30: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
5c40: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
5c50: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
5c60: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
5c70: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
5c80: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
5c90: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
5ca0: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
5cb0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
5cc0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5cd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 39  0000000000000] 9
5ce0: 36 5d 5d 5d 20 31 35 32 30 20 31 35 33 35 5d 7d  6]]] 1520 1535]}
5cf0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
5d00: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
5d10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5d20: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
5d30: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
5d40: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  ic_Stream_rc4_40
5d50: 2d 31 2e 35 39 20 7b 45 6e 63 72 79 70 74 20 72  -1.59 {Encrypt r
5d60: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 35 33  c4-40 offset 153
5d70: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
5d80: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
5d90: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
5da0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
5db0: 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  nge [tls::encryp
5dc0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
5dd0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
5de0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5df0: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
5e00: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
5e10: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
5e20: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
5e30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5e40: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 39 37  000000000000] 97
5e50: 5d 5d 20 31 35 33 36 20 31 35 35 31 5d 7d 20 5c  ]] 1536 1551]} \
5e60: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
5e70: 72 65 73 75 6c 74 20 36 32 35 31 64 38 37 66 64  result 6251d87fd
5e80: 34 61 61 61 65 39 61 37 65 34 61 64 35 63 32 31  4aaae9a7e4ad5c21
5e90: 37 64 33 66 33 30 30 0a 0a 0a 74 63 6c 74 65 73  7d3f300...tcltes
5ea0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
5eb0: 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31  _Stream_rc4_40-1
5ec0: 2e 36 30 20 7b 44 65 63 72 79 70 74 20 72 63 34  .60 {Decrypt rc4
5ed0: 2d 34 30 20 6f 66 66 73 65 74 20 31 35 33 36 7d  -40 offset 1536}
5ee0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
5ef0: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
5f00: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
5f10: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
5f20: 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  e [tls::decrypt 
5f30: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
5f40: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
5f50: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5f60: 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  x 833222772a] \.
5f70: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
5f80: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
5f90: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
5fa0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
5fb0: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
5fc0: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  2a] \...-data [s
5fd0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
5fe0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
5ff0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6000: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6010: 5d 20 39 37 5d 5d 5d 20 31 35 33 36 20 31 35 35  ] 97]]] 1536 155
6020: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
6030: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
6040: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6050: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
6060: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
6070: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
6080: 5f 34 30 2d 31 2e 36 31 20 7b 45 6e 63 72 79 70  _40-1.61 {Encryp
6090: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
60a0: 32 30 33 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  2032} \..-constr
60b0: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
60c0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
60d0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
60e0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
60f0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
6100: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
6110: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
6120: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
6130: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
6140: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
6150: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
6160: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
6180: 20 31 32 38 5d 5d 20 32 30 33 32 20 32 30 34 37   128]] 2032 2047
6190: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
61a0: 63 74 20 2d 72 65 73 75 6c 74 20 65 37 31 31 39  ct -result e7119
61b0: 62 64 36 64 64 39 62 32 32 61 66 65 38 66 38 39  bd6dd9b22afe8f89
61c0: 35 38 35 34 33 32 38 38 31 65 32 0a 0a 0a 74 63  585432881e2...tc
61d0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
61e0: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f  tric_Stream_rc4_
61f0: 34 30 2d 31 2e 36 32 20 7b 44 65 63 72 79 70 74  40-1.62 {Decrypt
6200: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 32   rc4-40 offset 2
6210: 30 33 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  032} \..-constra
6220: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
6230: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
6240: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
6250: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72  range [tls::decr
6260: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
6270: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
6280: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
6290: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
62a0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
62b0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
62c0: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
62d0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
62e0: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
62f0: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
6300: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
6310: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6320: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
6330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6340: 30 30 30 30 5d 20 31 32 38 5d 5d 5d 20 32 30 33  0000] 128]]] 203
6350: 32 20 32 30 34 37 5d 7d 20 5c 0a 09 2d 6d 61 74  2 2047]} \..-mat
6360: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
6370: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
6380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6390: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
63a0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
63b0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 36 33 20 7b 45  m_rc4_40-1.63 {E
63c0: 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ncrypt rc4-40 of
63d0: 66 73 65 74 20 32 30 34 38 7d 20 5c 0a 09 2d 63  fset 2048} \..-c
63e0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
63f0: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
6400: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
6410: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
6420: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
6430: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
6440: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
6450: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
6460: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
6470: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
6480: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6490: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
64a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
64b0: 30 30 30 30 5d 20 31 32 39 5d 5d 20 32 30 34 38  0000] 129]] 2048
64c0: 20 32 30 36 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63   2063]} \..-matc
64d0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
64e0: 37 38 35 62 36 30 66 64 37 65 63 34 65 39 66 63  785b60fd7ec4e9fc
64f0: 62 36 35 34 35 66 33 35 30 64 36 36 30 66 61 62  b6545f350d660fab
6500: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
6510: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
6520: 5f 72 63 34 5f 34 30 2d 31 2e 36 34 20 7b 44 65  _rc4_40-1.64 {De
6530: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
6540: 73 65 74 20 32 30 34 38 7d 20 5c 0a 09 2d 63 6f  set 2048} \..-co
6550: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
6560: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
6570: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
6580: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
6590: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
65a0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
65b0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
65c0: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
65d0: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
65e0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
65f0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
6600: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
6610: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
6620: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
6630: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
6640: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
6650: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
6660: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6670: 30 30 30 30 30 30 30 30 30 5d 20 31 32 39 5d 5d  000000000] 129]]
6680: 5d 20 32 30 34 38 20 32 30 36 33 5d 7d 20 5c 0a  ] 2048 2063]} \.
6690: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
66a0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
66b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
66c0: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
66d0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
66e0: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
66f0: 36 35 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  65 {Encrypt rc4-
6700: 34 30 20 6f 66 66 73 65 74 20 33 30 35 36 7d 20  40 offset 3056} 
6710: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
6720: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
6730: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
6740: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
6750: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
6760: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
6770: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
6780: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
6790: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
67a0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
67b0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
67c0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
67d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
67e0: 30 30 30 30 30 30 30 30 30 5d 20 31 39 32 5d 5d  000000000] 192]]
67f0: 20 33 30 35 36 20 33 30 37 31 5d 7d 20 5c 0a 09   3056 3071]} \..
6800: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
6810: 73 75 6c 74 20 61 66 65 63 63 30 33 37 66 64 62  sult afecc037fdb
6820: 37 62 30 38 33 38 65 62 33 64 37 30 62 63 64 32  7b0838eb3d70bcd2
6830: 36 38 33 38 32 0a 0a 0a 74 63 6c 74 65 73 74 3a  68382...tcltest:
6840: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
6850: 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 36  tream_rc4_40-1.6
6860: 36 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34  6 {Decrypt rc4-4
6870: 30 20 6f 66 66 73 65 74 20 33 30 35 36 7d 20 5c  0 offset 3056} \
6880: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
6890: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
68a0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
68b0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
68c0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
68d0: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
68e0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
68f0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
6900: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
6910: 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72  -data [tls::encr
6920: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
6930: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
6940: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
6950: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
6960: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
6970: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
6980: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
6990: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
69a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
69b0: 31 39 32 5d 5d 5d 20 33 30 35 36 20 33 30 37 31  192]]] 3056 3071
69c0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
69d0: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
69e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
69f0: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63  00000000000...tc
6a00: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
6a10: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f  tric_Stream_rc4_
6a20: 34 30 2d 31 2e 36 37 20 7b 45 6e 63 72 79 70 74  40-1.67 {Encrypt
6a30: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 33   rc4-40 offset 3
6a40: 30 37 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  072} \..-constra
6a50: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
6a60: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
6a70: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
6a80: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
6a90: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
6aa0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
6ab0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
6ac0: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
6ad0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
6ae0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
6af0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
6b00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6b10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
6b20: 31 39 33 5d 5d 20 33 30 37 32 20 33 30 38 37 5d  193]] 3072 3087]
6b30: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
6b40: 74 20 2d 72 65 73 75 6c 74 20 64 62 63 31 61 37  t -result dbc1a7
6b50: 62 34 39 64 35 37 33 35 38 63 63 39 66 61 36 64  b49d57358cc9fa6d
6b60: 36 31 64 37 33 62 37 63 66 30 0a 0a 0a 74 63 6c  61d73b7cf0...tcl
6b70: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
6b80: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 5f 34  ric_Stream_rc4_4
6b90: 30 2d 31 2e 36 38 20 7b 44 65 63 72 79 70 74 20  0-1.68 {Decrypt 
6ba0: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 33 30  rc4-40 offset 30
6bb0: 37 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  72} \..-constrai
6bc0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
6bd0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
6be0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
6bf0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
6c00: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
6c10: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
6c20: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
6c30: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
6c40: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
6c50: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
6c60: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
6c70: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
6c80: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
6c90: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
6ca0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
6cb0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
6cc0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
6cd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6ce0: 30 30 30 5d 20 31 39 33 5d 5d 5d 20 33 30 37 32  000] 193]]] 3072
6cf0: 20 33 30 38 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63   3087]} \..-matc
6d00: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
6d10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6d20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6d30: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
6d40: 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d   Symetric_Stream
6d50: 5f 72 63 34 5f 34 30 2d 31 2e 36 39 20 7b 45 6e  _rc4_40-1.69 {En
6d60: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
6d70: 73 65 74 20 34 30 38 30 7d 20 5c 0a 09 2d 63 6f  set 4080} \..-co
6d80: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
6d90: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
6da0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
6db0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
6dc0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
6dd0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
6de0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
6df0: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
6e00: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
6e10: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
6e20: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
6e30: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
6e40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6e50: 30 30 30 5d 20 32 35 36 5d 5d 20 34 30 38 30 20  000] 256]] 4080 
6e60: 34 30 39 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  4095]} \..-match
6e70: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
6e80: 33 34 39 64 31 32 36 61 33 37 61 66 63 62 61 38  349d126a37afcba8
6e90: 39 37 39 34 66 39 38 30 34 39 31 34 66 64 63 0a  9794f9804914fdc.
6ea0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
6eb0: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
6ec0: 72 63 34 5f 34 30 2d 31 2e 37 30 20 7b 44 65 63  rc4_40-1.70 {Dec
6ed0: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
6ee0: 65 74 20 34 30 38 30 7d 20 5c 0a 09 2d 63 6f 6e  et 4080} \..-con
6ef0: 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20  straints rc4_40 
6f00: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
6f10: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
6f20: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
6f30: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
6f40: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
6f50: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
6f60: 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32  ecode hex 833222
6f70: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
6f80: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
6f90: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
6fa0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
6fb0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
6fc0: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
6fd0: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
6fe0: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
6ff0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
7000: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7010: 30 30 30 30 30 30 30 30 5d 20 32 35 36 5d 5d 5d  00000000] 256]]]
7020: 20 34 30 38 30 20 34 30 39 35 5d 7d 20 5c 0a 09   4080 4095]} \..
7030: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
7040: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
7050: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7060: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
7070: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
7080: 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 37  tream_rc4_40-1.7
7090: 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34  1 {Encrypt rc4-4
70a0: 30 20 6f 66 66 73 65 74 20 34 30 39 36 7d 20 5c  0 offset 4096} \
70b0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
70c0: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
70d0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
70e0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
70f0: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
7100: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
7110: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
7120: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
7130: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
7140: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
7150: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
7160: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
7170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7180: 30 30 30 30 30 30 30 30 5d 20 32 35 37 5d 5d 20  00000000] 257]] 
7190: 34 30 39 36 20 34 31 31 31 5d 7d 20 5c 0a 09 2d  4096 4111]} \..-
71a0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
71b0: 75 6c 74 20 62 66 34 32 63 33 30 31 38 63 32 66  ult bf42c3018c2f
71c0: 37 63 36 36 62 66 64 65 35 32 34 39 37 35 37 36  7c66bfde52497576
71d0: 38 31 31 35 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  8115...tcltest::
71e0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74  test Symetric_St
71f0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 37 32  ream_rc4_40-1.72
7200: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
7210: 20 6f 66 66 73 65 74 20 34 30 39 36 7d 20 5c 0a   offset 4096} \.
7220: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
7230: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
7240: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
7250: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
7260: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
7270: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
7280: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
7290: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38  ary decode hex 8
72a0: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
72b0: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
72c0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
72d0: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
72e0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
72f0: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
7300: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
7310: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
7320: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
7330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7340: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 32  0000000000000] 2
7350: 35 37 5d 5d 5d 20 34 30 39 36 20 34 31 31 31 5d  57]]] 4096 4111]
7360: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
7370: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
7380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7390: 30 30 30 30 30 30 30 30 30 30 0a 0a 23 20 43 6c  0000000000..# Cl
73a0: 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 74 3a  eanup.::tcltest:
73b0: 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 0a 72 65  :cleanupTests.re
73c0: 74 75 72 6e 0a                                   turn.