Artifact
faab284429db0610456e7a7d260b6fb04fcc6fd4d7d6b03887e9974fdf729e17:
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 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
0150: 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34  1 {Encrypt rc4-4
0160: 30 20 6f 66 66 73 65 74 20 30 7d 20 5c 0a 09 2d  0 offset 0} \..-
0170: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
0180: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
0190: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
01a0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
01b0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
01c0: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
01d0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
01e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
01f0: 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61  2030405] \...-da
0200: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
0210: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
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 5d 5d 20 30 20 31 35 5d 7d 20  000000]] 0 15]} 
0240: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
0250: 2d 72 65 73 75 6c 74 20 62 32 33 39 36 33 30 35  -result b2396305
0260: 66 30 33 64 63 30 32 37 63 63 63 33 35 32 34 61  f03dc027ccc3524a
0270: 30 61 31 31 31 38 61 38 0a 0a 0a 74 63 6c 74 65  0a1118a8...tclte
0280: 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f  st::test Stream_
0290: 72 63 34 5f 34 30 2d 31 2e 32 20 7b 44 65 63 72  rc4_40-1.2 {Decr
02a0: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
02b0: 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  t 0} \..-constra
02c0: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
02d0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
02e0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
02f0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72  range [tls::decr
0300: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
0310: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
0320: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
0330: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
0340: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
0350: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
0360: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
0370: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
0380: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
0390: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
03a0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
03b0: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
03c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
03d0: 30 30 30 30 30 5d 5d 5d 20 30 20 31 35 5d 7d 20  00000]]] 0 15]} 
03e0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
03f0: 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30  -result 00000000
0400: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0410: 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65  00000000...tclte
0420: 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f  st::test Stream_
0430: 72 63 34 5f 34 30 2d 31 2e 33 20 7b 45 6e 63 72  rc4_40-1.3 {Encr
0440: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
0450: 74 20 31 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  t 16} \..-constr
0460: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
0470: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
0480: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
0490: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
04a0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
04b0: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
04c0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
04d0: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
04e0: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
04f0: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
0500: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
0510: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0520: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
0530: 20 32 5d 5d 20 31 36 20 33 31 5d 7d 20 5c 0a 09   2]] 16 31]} \..
0540: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
0550: 73 75 6c 74 20 36 39 38 32 39 34 34 66 31 38 66  sult 6982944f18f
0560: 63 38 32 64 35 38 39 63 34 30 33 61 34 37 61 30  c82d589c403a47a0
0570: 64 30 39 31 39 0a 0a 0a 74 63 6c 74 65 73 74 3a  d0919...tcltest:
0580: 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34  :test Stream_rc4
0590: 5f 34 30 2d 31 2e 34 20 7b 44 65 63 72 79 70 74  _40-1.4 {Decrypt
05a0: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31   rc4-40 offset 1
05b0: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
05c0: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
05d0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
05e0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
05f0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
0600: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
0610: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
0620: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
0630: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
0640: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
0650: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
0660: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
0670: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
0680: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
0690: 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0405] \...-data 
06a0: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
06b0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
06c0: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
06d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
06e0: 30 30 5d 20 32 5d 5d 5d 20 31 36 20 33 31 5d 7d  00] 2]]] 16 31]}
06f0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
0700: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
0710: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0720: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
0730: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
0740: 5f 72 63 34 5f 34 30 2d 31 2e 35 20 7b 45 6e 63  _rc4_40-1.5 {Enc
0750: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
0760: 65 74 20 32 34 30 7d 20 5c 0a 09 2d 63 6f 6e 73  et 240} \..-cons
0770: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
0780: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
0790: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
07a0: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65  ng range [tls::e
07b0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
07c0: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
07d0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
07e0: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
07f0: 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  405] \...-data [
0800: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
0810: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0820: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
0830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0840: 30 5d 20 31 36 5d 5d 20 32 34 30 20 32 35 35 5d  0] 16]] 240 255]
0850: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0860: 74 20 2d 72 65 73 75 6c 74 20 32 38 63 62 31 31  t -result 28cb11
0870: 33 32 63 39 36 63 65 32 38 36 34 32 31 64 63 61  32c96ce286421dca
0880: 61 64 62 38 62 36 39 65 61 65 0a 0a 0a 74 63 6c  adb8b69eae...tcl
0890: 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61  test::test Strea
08a0: 6d 5f 72 63 34 5f 34 30 2d 31 2e 36 20 7b 44 65  m_rc4_40-1.6 {De
08b0: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
08c0: 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d 63 6f 6e  set 240} \..-con
08d0: 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20  straints rc4_40 
08e0: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
08f0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
0900: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
0910: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
0920: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
0930: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
0940: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
0950: 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0405] \...-data 
0960: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
0970: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
0980: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
0990: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
09a0: 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09  0102030405] \...
09b0: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
09c0: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
09d0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
09e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
09f0: 30 30 30 30 30 30 30 30 5d 20 31 36 5d 5d 5d 20  00000000] 16]]] 
0a00: 32 34 30 20 32 35 35 5d 7d 20 5c 0a 09 2d 6d 61  240 255]} \..-ma
0a10: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0a20: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
0a30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0a40: 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  00...tcltest::te
0a50: 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  st Stream_rc4_40
0a60: 2d 31 2e 37 20 7b 45 6e 63 72 79 70 74 20 72 63  -1.7 {Encrypt rc
0a70: 34 2d 34 30 20 6f 66 66 73 65 74 20 32 35 36 7d  4-40 offset 256}
0a80: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
0a90: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
0aa0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
0ab0: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
0ac0: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
0ad0: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
0ae0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
0af0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
0b00: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
0b10: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
0b20: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
0b30: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
0b40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0b50: 30 30 30 30 30 30 30 30 30 30 5d 20 31 37 5d 5d  0000000000] 17]]
0b60: 20 32 35 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d   256 271]} \..-m
0b70: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
0b80: 6c 74 20 31 63 66 63 66 36 32 62 30 33 65 64 64  lt 1cfcf62b03edd
0b90: 62 36 34 31 64 37 37 64 66 63 66 37 66 38 64 38  b641d77dfcf7f8d8
0ba0: 63 39 33 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  c93...tcltest::t
0bb0: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
0bc0: 30 2d 31 2e 38 20 7b 44 65 63 72 79 70 74 20 72  0-1.8 {Decrypt r
0bd0: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 32 35 36  c4-40 offset 256
0be0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
0bf0: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
0c00: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
0c10: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
0c20: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
0c30: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
0c40: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
0c50: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0c60: 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c  ex 0102030405] \
0c70: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
0c80: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
0c90: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
0ca0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
0cb0: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
0cc0: 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  405] \...-data [
0cd0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
0ce0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0cf0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
0d00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0d10: 30 5d 20 31 37 5d 5d 5d 20 32 35 36 20 32 37 31  0] 17]]] 256 271
0d20: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
0d30: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
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 30 30 0a 0a 0a 74 63  00000000000...tc
0d60: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65  ltest::test Stre
0d70: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 39 20 7b 45  am_rc4_40-1.9 {E
0d80: 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ncrypt rc4-40 of
0d90: 66 73 65 74 20 34 39 36 7d 20 5c 0a 09 2d 63 6f  fset 496} \..-co
0da0: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
0db0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
0dc0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
0dd0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
0de0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
0df0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
0e00: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
0e10: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
0e20: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
0e30: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
0e40: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0e50: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
0e60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0e70: 30 30 30 5d 20 33 32 5d 5d 20 34 39 36 20 35 31  000] 32]] 496 51
0e80: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
0e90: 61 63 74 20 2d 72 65 73 75 6c 74 20 34 32 62 37  act -result 42b7
0ea0: 64 30 63 64 64 39 31 38 61 38 61 33 33 64 64 35  d0cdd918a8a33dd5
0eb0: 31 37 38 31 63 38 31 66 34 30 34 31 0a 0a 0a 74  1781c81f4041...t
0ec0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
0ed0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 30 20  eam_rc4_40-1.10 
0ee0: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
0ef0: 6f 66 66 73 65 74 20 34 39 36 7d 20 5c 0a 09 2d  offset 496} \..-
0f00: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
0f10: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
0f20: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
0f30: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
0f40: 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68  s::decrypt -ciph
0f50: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
0f60: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
0f70: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
0f80: 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61  2030405] \...-da
0f90: 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ta [tls::encrypt
0fa0: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
0fb0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
0fc0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0fd0: 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c  ex 0102030405] \
0fe0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
0ff0: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
1000: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
1010: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1020: 30 30 30 30 30 30 30 30 30 30 30 5d 20 33 32 5d  00000000000] 32]
1030: 5d 5d 20 34 39 36 20 35 31 31 5d 7d 20 5c 0a 09  ]] 496 511]} \..
1040: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
1050: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
1060: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1070: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
1080: 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34  :test Stream_rc4
1090: 5f 34 30 2d 31 2e 31 31 20 7b 45 6e 63 72 79 70  _40-1.11 {Encryp
10a0: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
10b0: 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  512} \..-constra
10c0: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
10d0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
10e0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
10f0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
1100: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
1110: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
1120: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
1130: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
1140: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
1150: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
1160: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
1170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1180: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
1190: 33 33 5d 5d 20 35 31 32 20 35 32 37 5d 7d 20 5c  33]] 512 527]} \
11a0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
11b0: 72 65 73 75 6c 74 20 36 34 35 39 38 34 34 34 33  result 645984443
11c0: 32 61 37 64 61 39 32 33 63 66 62 33 65 62 34 39  2a7da923cfb3eb49
11d0: 38 30 36 36 31 66 36 0a 0a 0a 74 63 6c 74 65 73  80661f6...tcltes
11e0: 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72  t::test Stream_r
11f0: 63 34 5f 34 30 2d 31 2e 31 32 20 7b 44 65 63 72  c4_40-1.12 {Decr
1200: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
1210: 74 20 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t 512} \..-const
1220: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
1230: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
1240: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
1250: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
1260: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
1270: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
1280: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
1290: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
12a0: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  05] \...-data [t
12b0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
12c0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
12d0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
12e0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
12f0: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
1300: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
1310: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
1320: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
1330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1340: 30 30 30 30 30 30 5d 20 33 33 5d 5d 5d 20 35 31  000000] 33]]] 51
1350: 32 20 35 32 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63  2 527]} \..-matc
1360: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
1370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1380: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1390: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
13a0: 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31   Stream_rc4_40-1
13b0: 2e 31 33 20 7b 45 6e 63 72 79 70 74 20 72 63 34  .13 {Encrypt rc4
13c0: 2d 34 30 20 6f 66 66 73 65 74 20 37 35 32 7d 20  -40 offset 752} 
13d0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
13e0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
13f0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
1400: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
1410: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
1420: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
1430: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
1440: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1450: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
1460: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
1470: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
1480: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
1490: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
14a0: 30 30 30 30 30 30 30 30 30 5d 20 34 38 5d 5d 20  000000000] 48]] 
14b0: 37 35 32 20 37 36 37 5d 7d 20 5c 0a 09 2d 6d 61  752 767]} \..-ma
14c0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
14d0: 74 20 65 63 31 30 33 32 37 62 64 65 32 62 65 65  t ec10327bde2bee
14e0: 66 64 31 38 66 39 32 37 37 36 38 30 34 35 37 65  fd18f9277680457e
14f0: 32 32 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  22...tcltest::te
1500: 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  st Stream_rc4_40
1510: 2d 31 2e 31 34 20 7b 44 65 63 72 79 70 74 20 72  -1.14 {Decrypt r
1520: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 37 35 32  c4-40 offset 752
1530: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
1540: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
1550: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
1560: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
1570: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
1580: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
1590: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
15a0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
15b0: 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c  ex 0102030405] \
15c0: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
15d0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
15e0: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
15f0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1600: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
1610: 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  405] \...-data [
1620: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
1630: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1640: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
1650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1660: 30 5d 20 34 38 5d 5d 5d 20 37 35 32 20 37 36 37  0] 48]]] 752 767
1670: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
1680: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
1690: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
16a0: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63  00000000000...tc
16b0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65  ltest::test Stre
16c0: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 35 20 7b  am_rc4_40-1.15 {
16d0: 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Encrypt rc4-40 o
16e0: 66 66 73 65 74 20 37 36 38 7d 20 5c 0a 09 2d 63  ffset 768} \..-c
16f0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
1700: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
1710: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
1720: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
1730: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
1740: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
1750: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
1760: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
1770: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
1780: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
1790: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
17a0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
17b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
17c0: 30 30 30 30 5d 20 34 39 5d 5d 20 37 36 38 20 37  0000] 49]] 768 7
17d0: 38 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  83]} \..-match e
17e0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 62 36  xact -result eb6
17f0: 32 36 33 38 64 34 66 30 62 61 31 66 65 39 66 63  2638d4f0ba1fe9fc
1800: 61 32 30 65 30 35 62 66 38 66 66 32 62 0a 0a 0a  a20e05bf8ff2b...
1810: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74  tcltest::test St
1820: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 36  ream_rc4_40-1.16
1830: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
1840: 20 6f 66 66 73 65 74 20 37 36 38 7d 20 5c 0a 09   offset 768} \..
1850: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
1860: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
1870: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
1880: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
1890: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
18a0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
18b0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
18c0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
18d0: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
18e0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
18f0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
1900: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
1910: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1920: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
1930: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
1940: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
1950: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
1960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1970: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 34 39  000000000000] 49
1980: 5d 5d 5d 20 37 36 38 20 37 38 33 5d 7d 20 5c 0a  ]]] 768 783]} \.
1990: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
19a0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
19b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
19c0: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
19d0: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
19e0: 34 5f 34 30 2d 31 2e 31 37 20 7b 45 6e 63 72 79  4_40-1.17 {Encry
19f0: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
1a00: 20 31 30 30 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74   1008} \..-const
1a10: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
1a20: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
1a30: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
1a40: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
1a50: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
1a60: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
1a70: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
1a80: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
1a90: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  05] \...-data [s
1aa0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
1ab0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
1ac0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1ad0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1ae0: 5d 20 36 34 5d 5d 20 31 30 30 38 20 31 30 32 33  ] 64]] 1008 1023
1af0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
1b00: 63 74 20 2d 72 65 73 75 6c 74 20 34 35 31 32 39  ct -result 45129
1b10: 30 34 38 65 36 61 30 65 64 30 62 35 36 62 34 39  048e6a0ed0b56b49
1b20: 30 33 33 38 66 30 37 38 64 61 35 0a 0a 0a 74 63  0338f078da5...tc
1b30: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65  ltest::test Stre
1b40: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 31 38 20 7b  am_rc4_40-1.18 {
1b50: 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Decrypt rc4-40 o
1b60: 66 66 73 65 74 20 31 30 30 38 7d 20 5c 0a 09 2d  ffset 1008} \..-
1b70: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
1b80: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
1b90: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
1ba0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
1bb0: 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68  s::decrypt -ciph
1bc0: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
1bd0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
1be0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
1bf0: 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61  2030405] \...-da
1c00: 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ta [tls::encrypt
1c10: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
1c20: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
1c30: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
1c40: 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c  ex 0102030405] \
1c50: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
1c60: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
1c70: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
1c80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1c90: 30 30 30 30 30 30 30 30 30 30 30 5d 20 36 34 5d  00000000000] 64]
1ca0: 5d 5d 20 31 30 30 38 20 31 30 32 33 5d 7d 20 5c  ]] 1008 1023]} \
1cb0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1cc0: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30  result 000000000
1cd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1ce0: 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73  0000000...tcltes
1cf0: 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72  t::test Stream_r
1d00: 63 34 5f 34 30 2d 31 2e 31 39 20 7b 45 6e 63 72  c4_40-1.19 {Encr
1d10: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
1d20: 74 20 31 30 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73  t 1024} \..-cons
1d30: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
1d40: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
1d50: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
1d60: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65  ng range [tls::e
1d70: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
1d80: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
1d90: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1da0: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
1db0: 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  405] \...-data [
1dc0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
1dd0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1de0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
1df0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1e00: 30 5d 20 36 35 5d 5d 20 31 30 32 34 20 31 30 33  0] 65]] 1024 103
1e10: 39 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  9]} \..-match ex
1e20: 61 63 74 20 2d 72 65 73 75 6c 74 20 33 30 61 62  act -result 30ab
1e30: 62 63 63 37 63 32 30 62 30 31 36 30 39 66 32 33  bcc7c20b01609f23
1e40: 65 65 32 64 35 66 36 62 62 37 64 66 0a 0a 0a 74  ee2d5f6bb7df...t
1e50: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
1e60: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 30 20  eam_rc4_40-1.20 
1e70: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
1e80: 6f 66 66 73 65 74 20 31 30 32 34 7d 20 5c 0a 09  offset 1024} \..
1e90: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
1ea0: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
1eb0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
1ec0: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
1ed0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
1ee0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
1ef0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
1f00: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
1f10: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
1f20: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
1f30: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
1f40: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
1f50: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1f60: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
1f70: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
1f80: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
1f90: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
1fa0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1fb0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 36 35  000000000000] 65
1fc0: 5d 5d 5d 20 31 30 32 34 20 31 30 33 39 5d 7d 20  ]]] 1024 1039]} 
1fd0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
1fe0: 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30  -result 00000000
1ff0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2000: 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65  00000000...tclte
2010: 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f  st::test Stream_
2020: 72 63 34 5f 34 30 2d 31 2e 32 31 20 7b 45 6e 63  rc4_40-1.21 {Enc
2030: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
2040: 65 74 20 31 35 32 30 7d 20 5c 0a 09 2d 63 6f 6e  et 1520} \..-con
2050: 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20  straints rc4_40 
2060: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
2070: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
2080: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
2090: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
20a0: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
20b0: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
20c0: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
20d0: 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0405] \...-data 
20e0: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
20f0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
2100: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
2110: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2120: 30 30 5d 20 39 36 5d 5d 20 31 35 32 30 20 31 35  00] 96]] 1520 15
2130: 33 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  35]} \..-match e
2140: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 32 39  xact -result 329
2150: 34 66 37 34 34 64 38 66 39 37 39 30 35 30 37 65  4f744d8f9790507e
2160: 37 30 66 36 32 65 35 62 62 63 65 65 61 0a 0a 0a  70f62e5bbceea...
2170: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74  tcltest::test St
2180: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 32  ream_rc4_40-1.22
2190: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
21a0: 20 6f 66 66 73 65 74 20 31 35 32 30 7d 20 5c 0a   offset 1520} \.
21b0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
21c0: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
21d0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
21e0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
21f0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
2200: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
2210: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
2220: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
2230: 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d  102030405] \...-
2240: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
2250: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
2260: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
2270: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
2280: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
2290: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
22a0: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
22b0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
22c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
22d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 39  0000000000000] 9
22e0: 36 5d 5d 5d 20 31 35 32 30 20 31 35 33 35 5d 7d  6]]] 1520 1535]}
22f0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
2300: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
2310: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2320: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
2330: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
2340: 5f 72 63 34 5f 34 30 2d 31 2e 32 33 20 7b 45 6e  _rc4_40-1.23 {En
2350: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
2360: 73 65 74 20 31 35 33 36 7d 20 5c 0a 09 2d 63 6f  set 1536} \..-co
2370: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
2380: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
2390: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
23a0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
23b0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
23c0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
23d0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
23e0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
23f0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
2400: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
2410: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
2420: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
2430: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2440: 30 30 30 5d 20 39 37 5d 5d 20 31 35 33 36 20 31  000] 97]] 1536 1
2450: 35 35 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  551]} \..-match 
2460: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 38  exact -result d8
2470: 37 32 39 64 62 34 31 38 38 32 32 35 39 62 65 65  729db41882259bee
2480: 34 66 38 32 35 33 32 35 66 35 61 31 33 30 0a 0a  4f825325f5a130..
2490: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
24a0: 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 32  tream_rc4_40-1.2
24b0: 34 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34  4 {Decrypt rc4-4
24c0: 30 20 6f 66 66 73 65 74 20 31 35 33 36 7d 20 5c  0 offset 1536} \
24d0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
24e0: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
24f0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
2500: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
2510: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
2520: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
2530: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
2540: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
2550: 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09  0102030405] \...
2560: 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72  -data [tls::encr
2570: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
2580: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
2590: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
25a0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
25b0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
25c0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
25d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
25e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
25f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
2600: 39 37 5d 5d 5d 20 31 35 33 36 20 31 35 35 31 5d  97]]] 1536 1551]
2610: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2620: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
2630: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2640: 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c  0000000000...tcl
2650: 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61  test::test Strea
2660: 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 35 20 7b 45  m_rc4_40-1.25 {E
2670: 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ncrypt rc4-40 of
2680: 66 73 65 74 20 32 30 33 32 7d 20 5c 0a 09 2d 63  fset 2032} \..-c
2690: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
26a0: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
26b0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
26c0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
26d0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
26e0: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
26f0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
2700: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
2710: 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74  030405] \...-dat
2720: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
2730: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
2740: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
2750: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2760: 30 30 30 30 5d 20 31 32 38 5d 5d 20 32 30 33 32  0000] 128]] 2032
2770: 20 32 30 34 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63   2047]} \..-matc
2780: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
2790: 31 65 62 31 34 61 30 63 31 33 62 33 62 66 34 37  1eb14a0c13b3bf47
27a0: 66 61 32 61 30 62 61 39 33 61 64 34 35 62 38 62  fa2a0ba93ad45b8b
27b0: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
27c0: 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31   Stream_rc4_40-1
27d0: 2e 32 36 20 7b 44 65 63 72 79 70 74 20 72 63 34  .26 {Decrypt rc4
27e0: 2d 34 30 20 6f 66 66 73 65 74 20 32 30 33 32 7d  -40 offset 2032}
27f0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
2800: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
2810: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
2820: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
2830: 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  e [tls::decrypt 
2840: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
2850: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
2860: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
2870: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
2880: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
2890: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
28a0: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
28b0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
28c0: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
28d0: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  05] \...-data [s
28e0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
28f0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
2900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2910: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2920: 5d 20 31 32 38 5d 5d 5d 20 32 30 33 32 20 32 30  ] 128]]] 2032 20
2930: 34 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  47]} \..-match e
2940: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
2950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2960: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
2970: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74  tcltest::test St
2980: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 32 37  ream_rc4_40-1.27
2990: 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30   {Encrypt rc4-40
29a0: 20 6f 66 66 73 65 74 20 32 30 34 38 7d 20 5c 0a   offset 2048} \.
29b0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
29c0: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
29d0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
29e0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
29f0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
2a00: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
2a10: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
2a20: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
2a30: 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d  102030405] \...-
2a40: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
2a50: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
2a60: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
2a70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2a80: 30 30 30 30 30 30 30 5d 20 31 32 39 5d 5d 20 32  0000000] 129]] 2
2a90: 30 34 38 20 32 30 36 33 5d 7d 20 5c 0a 09 2d 6d  048 2063]} \..-m
2aa0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
2ab0: 6c 74 20 63 63 35 38 32 66 38 62 61 39 66 32 36  lt cc582f8ba9f26
2ac0: 35 65 32 62 31 62 65 39 31 31 32 65 39 37 35 64  5e2b1be9112e975d
2ad0: 32 64 37 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  2d7...tcltest::t
2ae0: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
2af0: 30 2d 31 2e 32 38 20 7b 44 65 63 72 79 70 74 20  0-1.28 {Decrypt 
2b00: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 32 30  rc4-40 offset 20
2b10: 34 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  48} \..-constrai
2b20: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
2b30: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
2b40: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
2b50: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
2b60: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
2b70: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
2b80: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
2b90: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
2ba0: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
2bb0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
2bc0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
2bd0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
2be0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
2bf0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
2c00: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
2c10: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
2c20: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
2c30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2c40: 30 30 30 5d 20 31 32 39 5d 5d 5d 20 32 30 34 38  000] 129]]] 2048
2c50: 20 32 30 36 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63   2063]} \..-matc
2c60: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
2c70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2c80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2c90: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
2ca0: 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31   Stream_rc4_40-1
2cb0: 2e 32 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34  .29 {Encrypt rc4
2cc0: 2d 34 30 20 6f 66 66 73 65 74 20 33 30 35 36 7d  -40 offset 3056}
2cd0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
2ce0: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
2cf0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
2d00: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
2d10: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
2d20: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
2d30: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
2d40: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
2d50: 78 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a  x 0102030405] \.
2d60: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
2d70: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
2d80: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
2d90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2da0: 30 30 30 30 30 30 30 30 30 30 5d 20 31 39 32 5d  0000000000] 192]
2db0: 5d 20 33 30 35 36 20 33 30 37 31 5d 7d 20 5c 0a  ] 3056 3071]} \.
2dc0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
2dd0: 65 73 75 6c 74 20 66 32 65 33 30 66 39 62 64 31  esult f2e30f9bd1
2de0: 30 32 65 63 62 66 37 35 61 61 61 64 65 39 62 63  02ecbf75aaade9bc
2df0: 33 35 63 34 33 63 0a 0a 0a 74 63 6c 74 65 73 74  35c43c...tcltest
2e00: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
2e10: 34 5f 34 30 2d 31 2e 33 30 20 7b 44 65 63 72 79  4_40-1.30 {Decry
2e20: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
2e30: 20 33 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74   3056} \..-const
2e40: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
2e50: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
2e60: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
2e70: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
2e80: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
2e90: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
2ea0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
2eb0: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
2ec0: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  05] \...-data [t
2ed0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
2ee0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
2ef0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
2f00: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
2f10: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
2f20: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
2f30: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
2f40: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
2f50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2f60: 30 30 30 30 30 30 5d 20 31 39 32 5d 5d 5d 20 33  000000] 192]]] 3
2f70: 30 35 36 20 33 30 37 31 5d 7d 20 5c 0a 09 2d 6d  056 3071]} \..-m
2f80: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
2f90: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
2fa0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2fb0: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
2fc0: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
2fd0: 30 2d 31 2e 33 31 20 7b 45 6e 63 72 79 70 74 20  0-1.31 {Encrypt 
2fe0: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 33 30  rc4-40 offset 30
2ff0: 37 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  72} \..-constrai
3000: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
3010: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
3020: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
3030: 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  ange [tls::encry
3040: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
3050: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
3060: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3070: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d   hex 0102030405]
3080: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
3090: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
30a0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
30b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
30c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 31  0000000000000] 1
30d0: 39 33 5d 5d 20 33 30 37 32 20 33 30 38 37 5d 7d  93]] 3072 3087]}
30e0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
30f0: 20 2d 72 65 73 75 6c 74 20 65 63 30 65 31 31 63   -result ec0e11c
3100: 34 37 39 64 63 33 32 39 64 63 38 64 61 37 39 36  479dc329dc8da796
3110: 38 66 65 39 36 35 36 38 31 0a 0a 0a 74 63 6c 74  8fe965681...tclt
3120: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
3130: 5f 72 63 34 5f 34 30 2d 31 2e 33 32 20 7b 44 65  _rc4_40-1.32 {De
3140: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
3150: 73 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63 6f  set 3072} \..-co
3160: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3170: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3180: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3190: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
31a0: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
31b0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
31c0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
31d0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
31e0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
31f0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
3200: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
3210: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
3220: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
3230: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
3240: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
3250: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
3260: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
3270: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3280: 30 30 30 30 30 30 30 30 30 5d 20 31 39 33 5d 5d  000000000] 193]]
3290: 5d 20 33 30 37 32 20 33 30 38 37 5d 7d 20 5c 0a  ] 3072 3087]} \.
32a0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
32b0: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
32c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
32d0: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
32e0: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
32f0: 34 5f 34 30 2d 31 2e 33 33 20 7b 45 6e 63 72 79  4_40-1.33 {Encry
3300: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
3310: 20 34 30 38 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74   4080} \..-const
3320: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
3330: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
3340: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
3350: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
3360: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
3370: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
3380: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
3390: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
33a0: 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  05] \...-data [s
33b0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
33c0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
33d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
33e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
33f0: 5d 20 32 35 36 5d 5d 20 34 30 38 30 20 34 30 39  ] 256]] 4080 409
3400: 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  5]} \..-match ex
3410: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 36 38 33  act -result 0683
3420: 32 36 61 32 31 31 38 34 31 36 64 32 31 66 39 64  26a2118416d21f9d
3430: 30 34 62 32 63 64 31 63 61 30 35 30 0a 0a 0a 74  04b2cd1ca050...t
3440: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
3450: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 33 34 20  eam_rc4_40-1.34 
3460: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
3470: 6f 66 66 73 65 74 20 34 30 38 30 7d 20 5c 0a 09  offset 4080} \..
3480: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
3490: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
34a0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
34b0: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
34c0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
34d0: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
34e0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
34f0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
3500: 30 32 30 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64  02030405] \...-d
3510: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
3520: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
3530: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
3540: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3550: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 5d 20  hex 0102030405] 
3560: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
3570: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
3580: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
3590: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
35a0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 32 35  000000000000] 25
35b0: 36 5d 5d 5d 20 34 30 38 30 20 34 30 39 35 5d 7d  6]]] 4080 4095]}
35c0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
35d0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
35e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
35f0: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
3600: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
3610: 5f 72 63 34 5f 34 30 2d 31 2e 33 35 20 7b 45 6e  _rc4_40-1.35 {En
3620: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
3630: 73 65 74 20 34 30 39 36 7d 20 5c 0a 09 2d 63 6f  set 4096} \..-co
3640: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3650: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3660: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3670: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
3680: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3690: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
36a0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
36b0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
36c0: 33 30 34 30 35 5d 20 5c 0a 09 09 2d 64 61 74 61  30405] \...-data
36d0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
36e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
36f0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
3700: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3710: 30 30 30 5d 20 32 35 37 5d 5d 20 34 30 39 36 20  000] 257]] 4096 
3720: 34 31 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  4111]} \..-match
3730: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66   exact -result f
3740: 66 32 35 62 35 38 39 39 35 39 39 36 37 30 37 65  f25b58995996707e
3750: 35 31 66 62 64 66 30 38 62 33 34 64 38 37 35 0a  51fbdf08b34d875.
3760: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
3770: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
3780: 33 36 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d  36 {Decrypt rc4-
3790: 34 30 20 6f 66 66 73 65 74 20 34 30 39 36 7d 20  40 offset 4096} 
37a0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
37b0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
37c0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
37d0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
37e0: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
37f0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
3800: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
3810: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
3820: 20 30 31 30 32 30 33 30 34 30 35 5d 20 5c 0a 09   0102030405] \..
3830: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
3840: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
3850: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
3860: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
3870: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
3880: 35 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  5] \...-data [st
3890: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
38a0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
38b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
38c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
38d0: 20 32 35 37 5d 5d 5d 20 34 30 39 36 20 34 31 31   257]]] 4096 411
38e0: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
38f0: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
3900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3910: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
3920: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
3930: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 33 37 20  eam_rc4_40-1.37 
3940: 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Encrypt rc4-40 
3950: 6f 66 66 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f  offset 0} \..-co
3960: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3970: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3980: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3990: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
39a0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
39b0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
39c0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
39d0: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
39e0: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
39f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3a00: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
3a10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3a20: 30 30 30 30 5d 5d 20 30 20 31 35 5d 7d 20 5c 0a  0000]] 0 15]} \.
3a30: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3a40: 65 73 75 6c 74 20 38 30 61 64 39 37 62 64 63 39  esult 80ad97bdc9
3a50: 37 33 64 66 38 61 32 65 38 37 39 65 39 32 61 34  73df8a2e879e92a4
3a60: 39 37 65 66 64 61 0a 0a 0a 74 63 6c 74 65 73 74  97efda...tcltest
3a70: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
3a80: 34 5f 34 30 2d 31 2e 33 38 20 7b 44 65 63 72 79  4_40-1.38 {Decry
3a90: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
3aa0: 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69   0} \..-constrai
3ab0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
3ac0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
3ad0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
3ae0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
3af0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
3b00: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
3b10: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3b20: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
3b30: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
3b40: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3b50: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
3b60: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
3b70: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
3b80: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
3b90: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3ba0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
3bb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3bc0: 30 30 30 30 5d 5d 5d 20 30 20 31 35 5d 7d 20 5c  0000]]] 0 15]} \
3bd0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
3be0: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30  result 000000000
3bf0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3c00: 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73  0000000...tcltes
3c10: 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72  t::test Stream_r
3c20: 63 34 5f 34 30 2d 31 2e 33 39 20 7b 45 6e 63 72  c4_40-1.39 {Encr
3c30: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
3c40: 74 20 31 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  t 16} \..-constr
3c50: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
3c60: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
3c70: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
3c80: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
3c90: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
3ca0: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
3cb0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
3cc0: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
3cd0: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
3ce0: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
3cf0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
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 30 30 30 30 30 5d  000000000000000]
3d20: 20 32 5d 5d 20 31 36 20 33 31 5d 7d 20 5c 0a 09   2]] 16 31]} \..
3d30: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
3d40: 73 75 6c 74 20 32 30 66 30 36 30 63 32 66 32 65  sult 20f060c2f2e
3d50: 35 31 32 36 35 30 31 64 33 64 34 66 65 61 31 30  5126501d3d4fea10
3d60: 64 35 66 63 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  d5fc0...tcltest:
3d70: 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34  :test Stream_rc4
3d80: 5f 34 30 2d 31 2e 34 30 20 7b 44 65 63 72 79 70  _40-1.40 {Decryp
3d90: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
3da0: 31 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  16} \..-constrai
3db0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
3dc0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
3dd0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
3de0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
3df0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
3e00: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
3e10: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3e20: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
3e30: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
3e40: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3e50: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
3e60: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
3e70: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
3e80: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
3e90: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
3ea0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
3eb0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
3ec0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3ed0: 30 30 30 5d 20 32 5d 5d 5d 20 31 36 20 33 31 5d  000] 2]]] 16 31]
3ee0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
3ef0: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
3f00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3f10: 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c  0000000000...tcl
3f20: 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61  test::test Strea
3f30: 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 31 20 7b 45  m_rc4_40-1.41 {E
3f40: 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66  ncrypt rc4-40 of
3f50: 66 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d 63 6f  fset 240} \..-co
3f60: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
3f70: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3f80: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3f90: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
3fa0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3fb0: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
3fc0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
3fd0: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
3fe0: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
3ff0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
4000: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4010: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
4020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4030: 30 30 30 5d 20 31 36 5d 5d 20 32 34 30 20 32 35  000] 16]] 240 25
4040: 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  5]} \..-match ex
4050: 61 63 74 20 2d 72 65 73 75 6c 74 20 66 61 61 31  act -result faa1
4060: 34 38 65 39 39 30 34 36 31 38 31 66 65 63 36 62  48e99046181fec6b
4070: 32 30 38 35 66 33 62 32 30 65 64 39 0a 0a 0a 74  2085f3b20ed9...t
4080: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
4090: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 32 20  eam_rc4_40-1.42 
40a0: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
40b0: 6f 66 66 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d  offset 240} \..-
40c0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f  constraints rc4_
40d0: 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  40 \..-body {bin
40e0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
40f0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
4100: 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68  s::decrypt -ciph
4110: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
4120: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
4130: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33  y decode hex 833
4140: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
4150: 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ta [tls::encrypt
4160: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
4170: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
4180: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4190: 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c  ex 833222772a] \
41a0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
41b0: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
41c0: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
41d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
41e0: 30 30 30 30 30 30 30 30 30 30 30 5d 20 31 36 5d  00000000000] 16]
41f0: 5d 5d 20 32 34 30 20 32 35 35 5d 7d 20 5c 0a 09  ]] 240 255]} \..
4200: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
4210: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
4220: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4230: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
4240: 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34  :test Stream_rc4
4250: 5f 34 30 2d 31 2e 34 33 20 7b 45 6e 63 72 79 70  _40-1.43 {Encryp
4260: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
4270: 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  256} \..-constra
4280: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
4290: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
42a0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
42b0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
42c0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
42d0: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
42e0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
42f0: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
4300: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
4310: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
4320: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
4330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4340: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
4350: 31 37 5d 5d 20 32 35 36 20 32 37 31 5d 7d 20 5c  17]] 256 271]} \
4360: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
4370: 72 65 73 75 6c 74 20 66 30 64 61 66 35 62 61 62  result f0daf5bab
4380: 33 64 35 39 36 38 33 39 38 35 37 38 34 36 66 37  3d596839857846f7
4390: 33 66 62 66 65 35 61 0a 0a 0a 74 63 6c 74 65 73  3fbfe5a...tcltes
43a0: 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72  t::test Stream_r
43b0: 63 34 5f 34 30 2d 31 2e 34 34 20 7b 44 65 63 72  c4_40-1.44 {Decr
43c0: 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65  ypt rc4-40 offse
43d0: 74 20 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74  t 256} \..-const
43e0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
43f0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
4400: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
4410: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
4420: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
4430: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
4440: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
4450: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
4460: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  2a] \...-data [t
4470: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
4480: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
4490: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
44a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
44b0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
44c0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
44d0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
44e0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
44f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4500: 30 30 30 30 30 30 5d 20 31 37 5d 5d 5d 20 32 35  000000] 17]]] 25
4510: 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63  6 271]} \..-matc
4520: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
4530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4540: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4550: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
4560: 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31   Stream_rc4_40-1
4570: 2e 34 35 20 7b 45 6e 63 72 79 70 74 20 72 63 34  .45 {Encrypt rc4
4580: 2d 34 30 20 6f 66 66 73 65 74 20 34 39 36 7d 20  -40 offset 496} 
4590: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
45a0: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
45b0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
45c0: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
45d0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
45e0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
45f0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
4600: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
4610: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
4620: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
4630: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
4640: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
4650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4660: 30 30 30 30 30 30 30 30 30 5d 20 33 32 5d 5d 20  000000000] 32]] 
4670: 34 39 36 20 35 31 31 5d 7d 20 5c 0a 09 2d 6d 61  496 511]} \..-ma
4680: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
4690: 74 20 31 63 37 65 32 66 63 34 36 33 39 32 33 32  t 1c7e2fc4639232
46a0: 66 65 32 39 37 35 38 34 62 32 39 36 39 39 36 62  fe297584b296996b
46b0: 63 38 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  c8...tcltest::te
46c0: 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  st Stream_rc4_40
46d0: 2d 31 2e 34 36 20 7b 44 65 63 72 79 70 74 20 72  -1.46 {Decrypt r
46e0: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 34 39 36  c4-40 offset 496
46f0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
4700: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
4710: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
4720: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
4730: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
4740: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
4750: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
4760: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4770: 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c  ex 833222772a] \
4780: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
4790: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
47a0: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
47b0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
47c0: 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37  code hex 8332227
47d0: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
47e0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
47f0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
4800: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
4810: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4820: 30 5d 20 33 32 5d 5d 5d 20 34 39 36 20 35 31 31  0] 32]]] 496 511
4830: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
4840: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
4850: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4860: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63  00000000000...tc
4870: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65  ltest::test Stre
4880: 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 37 20 7b  am_rc4_40-1.47 {
4890: 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f  Encrypt rc4-40 o
48a0: 66 66 73 65 74 20 35 31 32 7d 20 5c 0a 09 2d 63  ffset 512} \..-c
48b0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34  onstraints rc4_4
48c0: 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  0 \..-body {bina
48d0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
48e0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
48f0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
4900: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
4910: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
4920: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
4930: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
4940: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
4950: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4960: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
4970: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4980: 30 30 30 30 5d 20 33 33 5d 5d 20 35 31 32 20 35  0000] 33]] 512 5
4990: 32 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  27]} \..-match e
49a0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 64 62  xact -result 3db
49b0: 39 62 32 34 39 34 30 36 63 63 38 65 64 66 66 61  9b249406cc8edffa
49c0: 63 35 35 63 63 64 33 32 32 62 61 31 32 0a 0a 0a  c55ccd322ba12...
49d0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74  tcltest::test St
49e0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 34 38  ream_rc4_40-1.48
49f0: 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30   {Decrypt rc4-40
4a00: 20 6f 66 66 73 65 74 20 35 31 32 7d 20 5c 0a 09   offset 512} \..
4a10: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
4a20: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
4a30: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
4a40: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
4a50: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
4a60: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
4a70: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
4a80: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
4a90: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
4aa0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
4ab0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
4ac0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
4ad0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4ae0: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
4af0: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
4b00: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
4b10: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
4b20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4b30: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 33 33  000000000000] 33
4b40: 5d 5d 5d 20 35 31 32 20 35 32 37 5d 7d 20 5c 0a  ]]] 512 527]} \.
4b50: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4b60: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
4b70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4b80: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
4b90: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
4ba0: 34 5f 34 30 2d 31 2e 34 39 20 7b 45 6e 63 72 79  4_40-1.49 {Encry
4bb0: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
4bc0: 20 37 35 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72   752} \..-constr
4bd0: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
4be0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
4bf0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
4c00: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
4c10: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
4c20: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
4c30: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
4c40: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
4c50: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
4c60: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
4c70: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
4c80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4c90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
4ca0: 20 34 38 5d 5d 20 37 35 32 20 37 36 37 5d 7d 20   48]] 752 767]} 
4cb0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
4cc0: 2d 72 65 73 75 6c 74 20 65 34 66 39 66 37 65 30  -result e4f9f7e0
4cd0: 30 36 36 31 35 34 62 62 64 31 32 35 62 37 34 35  066154bbd125b745
4ce0: 35 36 39 62 63 38 39 37 0a 0a 0a 74 63 6c 74 65  569bc897...tclte
4cf0: 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f  st::test Stream_
4d00: 72 63 34 5f 34 30 2d 31 2e 35 30 20 7b 44 65 63  rc4_40-1.50 {Dec
4d10: 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73  rypt rc4-40 offs
4d20: 65 74 20 37 35 32 7d 20 5c 0a 09 2d 63 6f 6e 73  et 752} \..-cons
4d30: 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c  traints rc4_40 \
4d40: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
4d50: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
4d60: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64  ng range [tls::d
4d70: 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ecrypt -cipher r
4d80: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
4d90: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
4da0: 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37  code hex 8332227
4db0: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
4dc0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
4dd0: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
4de0: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
4df0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38  ary decode hex 8
4e00: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
4e10: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
4e20: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
4e30: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
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 5d 20 34 38 5d 5d 5d 20 37  0000000] 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 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
4e90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4ea0: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
4eb0: 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d  t Stream_rc4_40-
4ec0: 31 2e 35 31 20 7b 45 6e 63 72 79 70 74 20 72 63  1.51 {Encrypt rc
4ed0: 34 2d 34 30 20 6f 66 66 73 65 74 20 37 36 38 7d  4-40 offset 768}
4ee0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
4ef0: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
4f00: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
4f10: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
4f20: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
4f30: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
4f40: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
4f50: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
4f60: 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  x 833222772a] \.
4f70: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
4f80: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
4f90: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
4fa0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4fb0: 30 30 30 30 30 30 30 30 30 30 5d 20 34 39 5d 5d  0000000000] 49]]
4fc0: 20 37 36 38 20 37 38 33 5d 7d 20 5c 0a 09 2d 6d   768 783]} \..-m
4fd0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
4fe0: 6c 74 20 37 35 64 35 65 66 32 36 32 62 34 34 63  lt 75d5ef262b44c
4ff0: 34 31 61 39 63 66 36 33 61 65 31 34 35 36 38 65  41a9cf63ae14568e
5000: 31 62 39 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  1b9...tcltest::t
5010: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
5020: 30 2d 31 2e 35 32 20 7b 44 65 63 72 79 70 74 20  0-1.52 {Decrypt 
5030: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 37 36  rc4-40 offset 76
5040: 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  8} \..-constrain
5050: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
5060: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
5070: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
5080: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
5090: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
50a0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
50b0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
50c0: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
50d0: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
50e0: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
50f0: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
5100: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
5110: 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32  ecode hex 833222
5120: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
5130: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
5140: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5150: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
5160: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5170: 30 30 5d 20 34 39 5d 5d 5d 20 37 36 38 20 37 38  00] 49]]] 768 78
5180: 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  3]} \..-match ex
5190: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
51a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
51b0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
51c0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
51d0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 33 20  eam_rc4_40-1.53 
51e0: 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Encrypt rc4-40 
51f0: 6f 66 66 73 65 74 20 31 30 30 38 7d 20 5c 0a 09  offset 1008} \..
5200: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
5210: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
5220: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
5230: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
5240: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
5250: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
5260: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
5270: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
5280: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
5290: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
52a0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
52b0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
52c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
52d0: 30 30 30 30 30 30 5d 20 36 34 5d 5d 20 31 30 30  000000] 64]] 100
52e0: 38 20 31 30 32 33 5d 7d 20 5c 0a 09 2d 6d 61 74  8 1023]} \..-mat
52f0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5300: 20 36 64 61 34 35 33 64 62 66 38 31 65 38 32 33   6da453dbf81e823
5310: 33 34 61 33 64 38 38 36 36 63 62 35 30 61 31 65  34a3d8866cb50a1e
5320: 33 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  3...tcltest::tes
5330: 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d  t Stream_rc4_40-
5340: 31 2e 35 34 20 7b 44 65 63 72 79 70 74 20 72 63  1.54 {Decrypt rc
5350: 34 2d 34 30 20 6f 66 66 73 65 74 20 31 30 30 38  4-40 offset 1008
5360: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
5370: 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64  s rc4_40 \..-bod
5380: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
5390: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
53a0: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
53b0: 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20   -cipher rc4-40 
53c0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
53d0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
53e0: 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c  ex 833222772a] \
53f0: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
5400: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
5410: 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30  c4-40 -padding 0
5420: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
5430: 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37  code hex 8332227
5440: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
5450: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
5460: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
5470: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
5480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5490: 30 5d 20 36 34 5d 5d 5d 20 31 30 30 38 20 31 30  0] 64]]] 1008 10
54a0: 32 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  23]} \..-match e
54b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
54c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
54d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
54e0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74  tcltest::test St
54f0: 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35 35  ream_rc4_40-1.55
5500: 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30   {Encrypt rc4-40
5510: 20 6f 66 66 73 65 74 20 31 30 32 34 7d 20 5c 0a   offset 1024} \.
5520: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
5530: 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62  4_40 \..-body {b
5540: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
5550: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
5560: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
5570: 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64  pher rc4-40 -pad
5580: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
5590: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38  ary decode hex 8
55a0: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
55b0: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
55c0: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
55d0: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
55e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
55f0: 30 30 30 30 30 30 30 5d 20 36 35 5d 5d 20 31 30  0000000] 65]] 10
5600: 32 34 20 31 30 33 39 5d 7d 20 5c 0a 09 2d 6d 61  24 1039]} \..-ma
5610: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
5620: 74 20 37 38 32 38 64 30 37 34 31 31 39 63 61 62  t 7828d074119cab
5630: 35 63 32 32 62 32 39 34 64 37 61 39 62 66 61 30  5c22b294d7a9bfa0
5640: 62 62 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  bb...tcltest::te
5650: 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  st Stream_rc4_40
5660: 2d 31 2e 35 36 20 7b 44 65 63 72 79 70 74 20 72  -1.56 {Decrypt r
5670: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 30 32  c4-40 offset 102
5680: 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  4} \..-constrain
5690: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
56a0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
56b0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
56c0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
56d0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
56e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
56f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5700: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
5710: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
5720: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
5730: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
5740: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
5750: 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32  ecode hex 833222
5760: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
5770: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
5780: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5790: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
57a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
57b0: 30 30 5d 20 36 35 5d 5d 5d 20 31 30 32 34 20 31  00] 65]]] 1024 1
57c0: 30 33 39 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  039]} \..-match 
57d0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30  exact -result 00
57e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
57f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a  00000000000000..
5800: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
5810: 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 35  tream_rc4_40-1.5
5820: 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34  7 {Encrypt rc4-4
5830: 30 20 6f 66 66 73 65 74 20 31 35 32 30 7d 20 5c  0 offset 1520} \
5840: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
5850: 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b  c4_40 \..-body {
5860: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
5870: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
5880: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
5890: 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61  ipher rc4-40 -pa
58a0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
58b0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
58c0: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
58d0: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
58e0: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
58f0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
5900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5910: 30 30 30 30 30 30 30 30 5d 20 39 36 5d 5d 20 31  00000000] 96]] 1
5920: 35 32 30 20 31 35 33 35 5d 7d 20 5c 0a 09 2d 6d  520 1535]} \..-m
5930: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
5940: 6c 74 20 61 64 62 38 39 63 65 61 39 61 31 35 66  lt adb89cea9a15f
5950: 62 65 36 31 37 32 39 35 62 64 30 34 62 38 63 61  be617295bd04b8ca
5960: 30 35 63 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  05c...tcltest::t
5970: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
5980: 30 2d 31 2e 35 38 20 7b 44 65 63 72 79 70 74 20  0-1.58 {Decrypt 
5990: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31 35  rc4-40 offset 15
59a0: 32 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  20} \..-constrai
59b0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
59c0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
59d0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
59e0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
59f0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
5a00: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
5a10: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
5a20: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
5a30: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a   \...-data [tls:
5a40: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
5a50: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
5a60: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
5a70: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
5a80: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
5a90: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
5aa0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
5ab0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
5ac0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5ad0: 30 30 30 5d 20 39 36 5d 5d 5d 20 31 35 32 30 20  000] 96]]] 1520 
5ae0: 31 35 33 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  1535]} \..-match
5af0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
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 30 30 30 30 30 30 0a  000000000000000.
5b20: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
5b30: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
5b40: 35 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  59 {Encrypt rc4-
5b50: 34 30 20 6f 66 66 73 65 74 20 31 35 33 36 7d 20  40 offset 1536} 
5b60: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
5b70: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
5b80: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
5b90: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
5ba0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
5bb0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
5bc0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
5bd0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
5be0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
5bf0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
5c00: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
5c10: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
5c20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5c30: 30 30 30 30 30 30 30 30 30 5d 20 39 37 5d 5d 20  000000000] 97]] 
5c40: 31 35 33 36 20 31 35 35 31 5d 7d 20 5c 0a 09 2d  1536 1551]} \..-
5c50: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
5c60: 75 6c 74 20 36 32 35 31 64 38 37 66 64 34 61 61  ult 6251d87fd4aa
5c70: 61 65 39 61 37 65 34 61 64 35 63 32 31 37 64 33  ae9a7e4ad5c217d3
5c80: 66 33 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a  f300...tcltest::
5c90: 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f  test Stream_rc4_
5ca0: 34 30 2d 31 2e 36 30 20 7b 44 65 63 72 79 70 74  40-1.60 {Decrypt
5cb0: 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 31   rc4-40 offset 1
5cc0: 35 33 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  536} \..-constra
5cd0: 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d  ints rc4_40 \..-
5ce0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
5cf0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
5d00: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72  range [tls::decr
5d10: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d  ypt -cipher rc4-
5d20: 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  40 -padding 0 -k
5d30: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
5d40: 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61  e hex 833222772a
5d50: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
5d60: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
5d70: 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e  r rc4-40 -paddin
5d80: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
5d90: 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32   decode hex 8332
5da0: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
5db0: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
5dc0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5dd0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
5de0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5df0: 30 30 30 30 5d 20 39 37 5d 5d 5d 20 31 35 33 36  0000] 97]]] 1536
5e00: 20 31 35 35 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63   1551]} \..-matc
5e10: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
5e20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5e30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5e40: 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  ...tcltest::test
5e50: 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31   Stream_rc4_40-1
5e60: 2e 36 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34  .61 {Encrypt rc4
5e70: 2d 34 30 20 6f 66 66 73 65 74 20 32 30 33 32 7d  -40 offset 2032}
5e80: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
5e90: 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79   rc4_40 \..-body
5ea0: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
5eb0: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
5ec0: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
5ed0: 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d  -cipher rc4-40 -
5ee0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
5ef0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5f00: 78 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  x 833222772a] \.
5f10: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
5f20: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
5f30: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
5f40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5f50: 30 30 30 30 30 30 30 30 30 30 5d 20 31 32 38 5d  0000000000] 128]
5f60: 5d 20 32 30 33 32 20 32 30 34 37 5d 7d 20 5c 0a  ] 2032 2047]} \.
5f70: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
5f80: 65 73 75 6c 74 20 65 37 31 31 39 62 64 36 64 64  esult e7119bd6dd
5f90: 39 62 32 32 61 66 65 38 66 38 39 35 38 35 34 33  9b22afe8f8958543
5fa0: 32 38 38 31 65 32 0a 0a 0a 74 63 6c 74 65 73 74  2881e2...tcltest
5fb0: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
5fc0: 34 5f 34 30 2d 31 2e 36 32 20 7b 44 65 63 72 79  4_40-1.62 {Decry
5fd0: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
5fe0: 20 32 30 33 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74   2032} \..-const
5ff0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
6000: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
6010: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
6020: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
6030: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
6040: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
6050: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
6060: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
6070: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  2a] \...-data [t
6080: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
6090: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
60a0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
60b0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
60c0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
60d0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
60e0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
60f0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
6100: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6110: 30 30 30 30 30 30 5d 20 31 32 38 5d 5d 5d 20 32  000000] 128]]] 2
6120: 30 33 32 20 32 30 34 37 5d 7d 20 5c 0a 09 2d 6d  032 2047]} \..-m
6130: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
6140: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
6150: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6160: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
6170: 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34  est Stream_rc4_4
6180: 30 2d 31 2e 36 33 20 7b 45 6e 63 72 79 70 74 20  0-1.63 {Encrypt 
6190: 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20 32 30  rc4-40 offset 20
61a0: 34 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  48} \..-constrai
61b0: 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62  nts rc4_40 \..-b
61c0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
61d0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
61e0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  ange [tls::encry
61f0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34  pt -cipher rc4-4
6200: 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  0 -padding 0 -ke
6210: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
6220: 20 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d   hex 833222772a]
6230: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
6240: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
6250: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
6260: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6270: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 31  0000000000000] 1
6280: 32 39 5d 5d 20 32 30 34 38 20 32 30 36 33 5d 7d  29]] 2048 2063]}
6290: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
62a0: 20 2d 72 65 73 75 6c 74 20 37 38 35 62 36 30 66   -result 785b60f
62b0: 64 37 65 63 34 65 39 66 63 62 36 35 34 35 66 33  d7ec4e9fcb6545f3
62c0: 35 30 64 36 36 30 66 61 62 0a 0a 0a 74 63 6c 74  50d660fab...tclt
62d0: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
62e0: 5f 72 63 34 5f 34 30 2d 31 2e 36 34 20 7b 44 65  _rc4_40-1.64 {De
62f0: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
6300: 73 65 74 20 32 30 34 38 7d 20 5c 0a 09 2d 63 6f  set 2048} \..-co
6310: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
6320: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
6330: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
6340: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
6350: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
6360: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
6370: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
6380: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
6390: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
63a0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
63b0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
63c0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
63d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
63e0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
63f0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
6400: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
6410: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
6420: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6430: 30 30 30 30 30 30 30 30 30 5d 20 31 32 39 5d 5d  000000000] 129]]
6440: 5d 20 32 30 34 38 20 32 30 36 33 5d 7d 20 5c 0a  ] 2048 2063]} \.
6450: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
6460: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
6470: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6480: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
6490: 3a 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63  ::test Stream_rc
64a0: 34 5f 34 30 2d 31 2e 36 35 20 7b 45 6e 63 72 79  4_40-1.65 {Encry
64b0: 70 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74  pt rc4-40 offset
64c0: 20 33 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74   3056} \..-const
64d0: 72 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a  raints rc4_40 \.
64e0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
64f0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
6500: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
6510: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
6520: 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20  4-40 -padding 0 
6530: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
6540: 6f 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37  ode hex 83322277
6550: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  2a] \...-data [s
6560: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
6570: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
6580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6590: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
65a0: 5d 20 31 39 32 5d 5d 20 33 30 35 36 20 33 30 37  ] 192]] 3056 307
65b0: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
65c0: 61 63 74 20 2d 72 65 73 75 6c 74 20 61 66 65 63  act -result afec
65d0: 63 30 33 37 66 64 62 37 62 30 38 33 38 65 62 33  c037fdb7b0838eb3
65e0: 64 37 30 62 63 64 32 36 38 33 38 32 0a 0a 0a 74  d70bcd268382...t
65f0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
6600: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 36 36 20  eam_rc4_40-1.66 
6610: 7b 44 65 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Decrypt rc4-40 
6620: 6f 66 66 73 65 74 20 33 30 35 36 7d 20 5c 0a 09  offset 3056} \..
6630: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
6640: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
6650: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
6660: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
6670: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
6680: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
6690: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
66a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
66b0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
66c0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
66d0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
66e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
66f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6700: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
6710: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
6720: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
6730: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
6740: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6750: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 31 39  000000000000] 19
6760: 32 5d 5d 5d 20 33 30 35 36 20 33 30 37 31 5d 7d  2]]] 3056 3071]}
6770: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
6780: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
6790: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
67a0: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
67b0: 65 73 74 3a 3a 74 65 73 74 20 53 74 72 65 61 6d  est::test Stream
67c0: 5f 72 63 34 5f 34 30 2d 31 2e 36 37 20 7b 45 6e  _rc4_40-1.67 {En
67d0: 63 72 79 70 74 20 72 63 34 2d 34 30 20 6f 66 66  crypt rc4-40 off
67e0: 73 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63 6f  set 3072} \..-co
67f0: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 5f 34 30  nstraints rc4_40
6800: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
6810: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
6820: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
6830: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
6840: 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67   rc4-40 -padding
6850: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
6860: 64 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32  decode hex 83322
6870: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
6880: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
6890: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
68a0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
68b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
68c0: 30 30 30 5d 20 31 39 33 5d 5d 20 33 30 37 32 20  000] 193]] 3072 
68d0: 33 30 38 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  3087]} \..-match
68e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
68f0: 62 63 31 61 37 62 34 39 64 35 37 33 35 38 63 63  bc1a7b49d57358cc
6900: 39 66 61 36 64 36 31 64 37 33 62 37 63 66 30 0a  9fa6d61d73b7cf0.
6910: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
6920: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
6930: 36 38 20 7b 44 65 63 72 79 70 74 20 72 63 34 2d  68 {Decrypt rc4-
6940: 34 30 20 6f 66 66 73 65 74 20 33 30 37 32 7d 20  40 offset 3072} 
6950: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
6960: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
6970: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
6980: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
6990: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
69a0: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
69b0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
69c0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
69d0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
69e0: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
69f0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
6a00: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
6a10: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
6a20: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
6a30: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
6a40: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
6a50: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
6a60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6a70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
6a80: 20 31 39 33 5d 5d 5d 20 33 30 37 32 20 33 30 38   193]]] 3072 308
6a90: 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  7]} \..-match ex
6aa0: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
6ab0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6ac0: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
6ad0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 74 72  cltest::test Str
6ae0: 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e 36 39 20  eam_rc4_40-1.69 
6af0: 7b 45 6e 63 72 79 70 74 20 72 63 34 2d 34 30 20  {Encrypt rc4-40 
6b00: 6f 66 66 73 65 74 20 34 30 38 30 7d 20 5c 0a 09  offset 4080} \..
6b10: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
6b20: 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  _40 \..-body {bi
6b30: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
6b40: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
6b50: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
6b60: 68 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64  her rc4-40 -padd
6b70: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
6b80: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33  ry decode hex 83
6b90: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
6ba0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
6bb0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
6bc0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
6bd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6be0: 30 30 30 30 30 30 5d 20 32 35 36 5d 5d 20 34 30  000000] 256]] 40
6bf0: 38 30 20 34 30 39 35 5d 7d 20 5c 0a 09 2d 6d 61  80 4095]} \..-ma
6c00: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
6c10: 74 20 36 33 34 39 64 31 32 36 61 33 37 61 66 63  t 6349d126a37afc
6c20: 62 61 38 39 37 39 34 66 39 38 30 34 39 31 34 66  ba89794f9804914f
6c30: 64 63 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  dc...tcltest::te
6c40: 73 74 20 53 74 72 65 61 6d 5f 72 63 34 5f 34 30  st Stream_rc4_40
6c50: 2d 31 2e 37 30 20 7b 44 65 63 72 79 70 74 20 72  -1.70 {Decrypt r
6c60: 63 34 2d 34 30 20 6f 66 66 73 65 74 20 34 30 38  c4-40 offset 408
6c70: 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  0} \..-constrain
6c80: 74 73 20 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f  ts rc4_40 \..-bo
6c90: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
6ca0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
6cb0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
6cc0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 2d 34 30  t -cipher rc4-40
6cd0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
6ce0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6cf0: 68 65 78 20 38 33 33 32 32 32 37 37 32 61 5d 20  hex 833222772a] 
6d00: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
6d10: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
6d20: 72 63 34 2d 34 30 20 2d 70 61 64 64 69 6e 67 20  rc4-40 -padding 
6d30: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
6d40: 65 63 6f 64 65 20 68 65 78 20 38 33 33 32 32 32  ecode hex 833222
6d50: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
6d60: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
6d70: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
6d80: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
6d90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6da0: 30 30 5d 20 32 35 36 5d 5d 5d 20 34 30 38 30 20  00] 256]]] 4080 
6db0: 34 30 39 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  4095]} \..-match
6dc0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
6dd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6de0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a  000000000000000.
6df0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
6e00: 53 74 72 65 61 6d 5f 72 63 34 5f 34 30 2d 31 2e  Stream_rc4_40-1.
6e10: 37 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 2d  71 {Encrypt rc4-
6e20: 34 30 20 6f 66 66 73 65 74 20 34 30 39 36 7d 20  40 offset 4096} 
6e30: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
6e40: 72 63 34 5f 34 30 20 5c 0a 09 2d 62 6f 64 79 20  rc4_40 \..-body 
6e50: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
6e60: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
6e70: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
6e80: 63 69 70 68 65 72 20 72 63 34 2d 34 30 20 2d 70  cipher rc4-40 -p
6e90: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
6ea0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
6eb0: 20 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09   833222772a] \..
6ec0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
6ed0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
6ee0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
6ef0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6f00: 30 30 30 30 30 30 30 30 30 5d 20 32 35 37 5d 5d  000000000] 257]]
6f10: 20 34 30 39 36 20 34 31 31 31 5d 7d 20 5c 0a 09   4096 4111]} \..
6f20: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
6f30: 73 75 6c 74 20 62 66 34 32 63 33 30 31 38 63 32  sult bf42c3018c2
6f40: 66 37 63 36 36 62 66 64 65 35 32 34 39 37 35 37  f7c66bfde5249757
6f50: 36 38 31 31 35 0a 0a 0a 74 63 6c 74 65 73 74 3a  68115...tcltest:
6f60: 3a 74 65 73 74 20 53 74 72 65 61 6d 5f 72 63 34  :test Stream_rc4
6f70: 5f 34 30 2d 31 2e 37 32 20 7b 44 65 63 72 79 70  _40-1.72 {Decryp
6f80: 74 20 72 63 34 2d 34 30 20 6f 66 66 73 65 74 20  t rc4-40 offset 
6f90: 34 30 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  4096} \..-constr
6fa0: 61 69 6e 74 73 20 72 63 34 5f 34 30 20 5c 0a 09  aints rc4_40 \..
6fb0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
6fc0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
6fd0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
6fe0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
6ff0: 2d 34 30 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  -40 -padding 0 -
7000: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
7010: 64 65 20 68 65 78 20 38 33 33 32 32 32 37 37 32  de hex 833222772
7020: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  a] \...-data [tl
7030: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
7040: 65 72 20 72 63 34 2d 34 30 20 2d 70 61 64 64 69  er rc4-40 -paddi
7050: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
7060: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 33  y decode hex 833
7070: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
7080: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
7090: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
70a0: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
70b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
70c0: 30 30 30 30 30 5d 20 32 35 37 5d 5d 5d 20 34 30  00000] 257]]] 40
70d0: 39 36 20 34 31 31 31 5d 7d 20 5c 0a 09 2d 6d 61  96 4111]} \..-ma
70e0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
70f0: 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  t 00000000000000
7100: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7110: 30 30 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a  00..# Cleanup.::
7120: 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70  tcltest::cleanup
7130: 54 65 73 74 73 0a 72 65 74 75 72 6e 0a           Tests.return.