Hex Artifact Content

Artifact c5391b4e14f4ea3679eac5423477db7ab316f63516e5c4a2a34c95d3d6b2777c:


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 31 32 38 2e 74   from "rc4-128.t
0020: 78 74 22 0a 6c 61 70 70 65 6e 64 20 61 75 74 6f  xt".lappend auto
0030: 5f 70 61 74 68 20 5b 66 69 6c 65 20 64 69 72 6e  _path [file dirn
0040: 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d  ame [file dirnam
0050: 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20  e [file dirname 
0060: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66  [file dirname [f
0070: 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 64 5d 20 5b  ile join [pwd] [
0080: 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d 5d 5d 5d  info script]]]]]
0090: 5d 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 72  ].package requir
00a0: 65 20 74 6c 73 0a 70 61 63 6b 61 67 65 20 72 65  e tls.package re
00b0: 71 75 69 72 65 20 74 63 6c 74 65 73 74 0a 0a 63  quire tcltest..c
00c0: 61 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 69  atch {tls::provi
00d0: 64 65 72 20 6c 65 67 61 63 79 7d 0a 74 63 6c 74  der legacy}.tclt
00e0: 65 73 74 3a 3a 74 65 73 74 43 6f 6e 73 74 72 61  est::testConstra
00f0: 69 6e 74 20 72 63 34 20 5b 65 78 70 72 20 7b 5b  int rc4 [expr {[
0100: 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20  lsearch -nocase 
0110: 5b 74 6c 73 3a 3a 63 69 70 68 65 72 73 5d 20 72  [tls::ciphers] r
0120: 63 34 5d 20 3e 20 2d 31 7d 5d 0a 0a 0a 74 63 6c  c4] > -1}]...tcl
0130: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
0140: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
0150: 2e 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  .1 {Encrypt rc4 
0160: 6f 66 66 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f  offset 0} \..-co
0170: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
0180: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
0190: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
01a0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
01b0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
01c0: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
01d0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
01e0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30   hex 01020304050
01f0: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
0200: 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61  e0f10] \...-data
0210: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
0220: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
0230: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0240: 30 30 30 30 5d 5d 20 30 20 31 35 5d 7d 20 5c 0a  0000]] 0 15]} \.
0250: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0260: 65 73 75 6c 74 20 39 61 63 37 63 63 39 61 36 30  esult 9ac7cc9a60
0270: 39 64 31 65 66 37 62 32 39 33 32 38 39 39 63 64  9d1ef7b2932899cd
0280: 65 34 31 62 39 37 0a 0a 0a 74 63 6c 74 65 73 74  e41b97...tcltest
0290: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
02a0: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 32 20 7b  Stream_rc4-1.2 {
02b0: 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Decrypt rc4 offs
02c0: 65 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  et 0} \..-constr
02d0: 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f  aints rc4 \..-bo
02e0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
02f0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
0300: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
0310: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
0320: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
0330: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0340: 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30   010203040506070
0350: 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31  8090a0b0c0d0e0f1
0360: 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  0] \...-data [tl
0370: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
0380: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
0390: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
03a0: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
03b0: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62  0405060708090a0b
03c0: 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09  0c0d0e0f10] \...
03d0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
03e0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
03f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0400: 30 30 30 30 30 30 30 30 30 5d 5d 5d 20 30 20 31  000000000]]] 0 1
0410: 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  5]} \..-match ex
0420: 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30  act -result 0000
0430: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0440: 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74  000000000000...t
0450: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
0460: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
0470: 2d 31 2e 33 20 7b 45 6e 63 72 79 70 74 20 72 63  -1.3 {Encrypt rc
0480: 34 20 6f 66 66 73 65 74 20 31 36 7d 20 5c 0a 09  4 offset 16} \..
0490: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
04a0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
04b0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
04c0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
04d0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
04e0: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
04f0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
0500: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
0510: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
0520: 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64  0d0e0f10] \...-d
0530: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
0540: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
0550: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
0560: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0570: 30 30 30 30 30 30 5d 20 32 5d 5d 20 31 36 20 33  000000] 2]] 16 3
0580: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
0590: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 32 34 38  act -result 5248
05a0: 63 34 39 35 39 30 31 34 31 32 36 61 36 65 38 61  c4959014126a6e8a
05b0: 38 34 66 31 31 64 31 61 39 65 31 63 0a 0a 0a 74  84f11d1a9e1c...t
05c0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
05d0: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
05e0: 2d 31 2e 34 20 7b 44 65 63 72 79 70 74 20 72 63  -1.4 {Decrypt rc
05f0: 34 20 6f 66 66 73 65 74 20 31 36 7d 20 5c 0a 09  4 offset 16} \..
0600: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
0610: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
0620: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
0630: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
0640: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
0650: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
0660: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
0670: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
0680: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
0690: 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64  0d0e0f10] \...-d
06a0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
06b0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
06c0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
06d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
06e0: 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30   010203040506070
06f0: 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31  8090a0b0c0d0e0f1
0700: 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  0] \...-data [st
0710: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
0720: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
0730: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0740: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
0750: 20 32 5d 5d 5d 20 31 36 20 33 31 5d 7d 20 5c 0a   2]]] 16 31]} \.
0760: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0770: 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30  esult 0000000000
0780: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0790: 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74  000000...tcltest
07a0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
07b0: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 35 20 7b  Stream_rc4-1.5 {
07c0: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
07d0: 65 74 20 32 34 30 7d 20 5c 0a 09 2d 63 6f 6e 73  et 240} \..-cons
07e0: 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d  traints rc4 \..-
07f0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
0800: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
0810: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
0820: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20  ypt -cipher rc4 
0830: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
0840: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0850: 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30  ex 0102030405060
0860: 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30  708090a0b0c0d0e0
0870: 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  f10] \...-data [
0880: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
0890: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
08a0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
08b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
08c0: 30 5d 20 31 36 5d 5d 20 32 34 30 20 32 35 35 5d  0] 16]] 240 255]
08d0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
08e0: 74 20 2d 72 65 73 75 6c 74 20 30 36 35 39 30 32  t -result 065902
08f0: 65 34 62 36 32 30 66 36 63 63 33 36 63 38 35 38  e4b620f6cc36c858
0900: 39 66 36 36 34 33 32 66 32 62 0a 0a 0a 74 63 6c  9f66432f2b...tcl
0910: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
0920: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
0930: 2e 36 20 7b 44 65 63 72 79 70 74 20 72 63 34 20  .6 {Decrypt rc4 
0940: 6f 66 66 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d  offset 240} \..-
0950: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20  constraints rc4 
0960: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
0970: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
0980: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
0990: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  decrypt -cipher 
09a0: 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  rc4 -padding 0 -
09b0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
09c0: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
09d0: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30  5060708090a0b0c0
09e0: 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61  d0e0f10] \...-da
09f0: 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ta [tls::encrypt
0a00: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
0a10: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
0a20: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
0a30: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
0a40: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
0a50: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
0a60: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
0a70: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0a80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0a90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
0aa0: 31 36 5d 5d 5d 20 32 34 30 20 32 35 35 5d 7d 20  16]]] 240 255]} 
0ab0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
0ac0: 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30  -result 00000000
0ad0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0ae0: 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65  00000000...tclte
0af0: 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69  st::test Symetri
0b00: 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 37  c_Stream_rc4-1.7
0b10: 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66   {Encrypt rc4 of
0b20: 66 73 65 74 20 32 35 36 7d 20 5c 0a 09 2d 63 6f  fset 256} \..-co
0b30: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
0b40: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
0b50: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
0b60: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
0b70: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
0b80: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
0b90: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
0ba0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30   hex 01020304050
0bb0: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
0bc0: 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61  e0f10] \...-data
0bd0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
0be0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0bf0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
0c00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0c10: 30 30 30 5d 20 31 37 5d 5d 20 32 35 36 20 32 37  000] 17]] 256 27
0c20: 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  1]} \..-match ex
0c30: 61 63 74 20 2d 72 65 73 75 6c 74 20 64 33 39 64  act -result d39d
0c40: 35 36 36 62 63 36 62 63 65 33 30 31 30 37 36 38  566bc6bce3010768
0c50: 31 35 31 35 34 39 66 33 38 37 33 66 0a 0a 0a 74  151549f3873f...t
0c60: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
0c70: 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34  etric_Stream_rc4
0c80: 2d 31 2e 38 20 7b 44 65 63 72 79 70 74 20 72 63  -1.8 {Decrypt rc
0c90: 34 20 6f 66 66 73 65 74 20 32 35 36 7d 20 5c 0a  4 offset 256} \.
0ca0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
0cb0: 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  4 \..-body {bina
0cc0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
0cd0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
0ce0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
0cf0: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
0d00: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
0d10: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
0d20: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30  405060708090a0b0
0d30: 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d  c0d0e0f10] \...-
0d40: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
0d50: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
0d60: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
0d70: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
0d80: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37  x 01020304050607
0d90: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66  08090a0b0c0d0e0f
0da0: 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  10] \...-data [s
0db0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
0dc0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
0dd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0de0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0df0: 5d 20 31 37 5d 5d 5d 20 32 35 36 20 32 37 31 5d  ] 17]]] 256 271]
0e00: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0e10: 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30  t -result 000000
0e20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0e30: 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c  0000000000...tcl
0e40: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
0e50: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
0e60: 2e 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  .9 {Encrypt rc4 
0e70: 6f 66 66 73 65 74 20 34 39 36 7d 20 5c 0a 09 2d  offset 496} \..-
0e80: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20  constraints rc4 
0e90: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
0ea0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
0eb0: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
0ec0: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
0ed0: 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  rc4 -padding 0 -
0ee0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
0ef0: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
0f00: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30  5060708090a0b0c0
0f10: 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61  d0e0f10] \...-da
0f20: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
0f30: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
0f40: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
0f50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
0f60: 30 30 30 30 30 5d 20 33 32 5d 5d 20 34 39 36 20  00000] 32]] 496 
0f70: 35 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  511]} \..-match 
0f80: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 36  exact -result b6
0f90: 64 31 65 36 63 34 61 35 65 34 37 37 31 63 61 64  d1e6c4a5e4771cad
0fa0: 37 39 35 33 38 64 66 32 39 35 66 62 31 31 0a 0a  79538df295fb11..
0fb0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
0fc0: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
0fd0: 63 34 2d 31 2e 31 30 20 7b 44 65 63 72 79 70 74  c4-1.10 {Decrypt
0fe0: 20 72 63 34 20 6f 66 66 73 65 74 20 34 39 36 7d   rc4 offset 496}
0ff0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
1000: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
1010: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
1020: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
1030: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
1040: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
1050: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
1060: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
1070: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61  030405060708090a
1080: 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a  0b0c0d0e0f10] \.
1090: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
10a0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
10b0: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
10c0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
10d0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30   hex 01020304050
10e0: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
10f0: 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61  e0f10] \...-data
1100: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
1110: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
1120: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
1130: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1140: 30 30 30 5d 20 33 32 5d 5d 5d 20 34 39 36 20 35  000] 32]]] 496 5
1150: 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  11]} \..-match e
1160: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
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 0a 0a 0a  0000000000000...
1190: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
11a0: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
11b0: 34 2d 31 2e 31 31 20 7b 45 6e 63 72 79 70 74 20  4-1.11 {Encrypt 
11c0: 72 63 34 20 6f 66 66 73 65 74 20 35 31 32 7d 20  rc4 offset 512} 
11d0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
11e0: 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  rc4 \..-body {bi
11f0: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
1200: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
1210: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
1220: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
1230: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
1240: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30  decode hex 01020
1250: 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30  30405060708090a0
1260: 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09  b0c0d0e0f10] \..
1270: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
1280: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
1290: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
12a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
12b0: 30 30 30 30 30 30 30 30 30 5d 20 33 33 5d 5d 20  000000000] 33]] 
12c0: 35 31 32 20 35 32 37 5d 7d 20 5c 0a 09 2d 6d 61  512 527]} \..-ma
12d0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
12e0: 74 20 63 36 38 63 31 64 35 63 35 35 39 61 39 37  t c68c1d5c559a97
12f0: 34 31 32 33 64 66 31 64 62 63 35 32 61 34 33 62  4123df1dbc52a43b
1300: 38 39 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  89...tcltest::te
1310: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
1320: 61 6d 5f 72 63 34 2d 31 2e 31 32 20 7b 44 65 63  am_rc4-1.12 {Dec
1330: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
1340: 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  512} \..-constra
1350: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
1360: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
1370: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
1380: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
1390: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
13a0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
13b0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
13c0: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
13d0: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
13e0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
13f0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
1400: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
1410: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1420: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
1430: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30  405060708090a0b0
1440: 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d  c0d0e0f10] \...-
1450: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
1460: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
1470: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
1480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1490: 30 30 30 30 30 30 30 5d 20 33 33 5d 5d 5d 20 35  0000000] 33]]] 5
14a0: 31 32 20 35 32 37 5d 7d 20 5c 0a 09 2d 6d 61 74  12 527]} \..-mat
14b0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
14c0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
14d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
14e0: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
14f0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
1500: 6d 5f 72 63 34 2d 31 2e 31 33 20 7b 45 6e 63 72  m_rc4-1.13 {Encr
1510: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 37  ypt rc4 offset 7
1520: 35 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  52} \..-constrai
1530: 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79  nts rc4 \..-body
1540: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
1550: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
1560: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
1570: 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64  -cipher rc4 -pad
1580: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
1590: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
15a0: 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30  1020304050607080
15b0: 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 5d  90a0b0c0d0e0f10]
15c0: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
15d0: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
15e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
15f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1600: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 34  0000000000000] 4
1610: 38 5d 5d 20 37 35 32 20 37 36 37 5d 7d 20 5c 0a  8]] 752 767]} \.
1620: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
1630: 65 73 75 6c 74 20 63 35 65 63 66 38 38 64 65 38  esult c5ecf88de8
1640: 39 37 66 64 35 37 66 65 64 33 30 31 37 30 31 62  97fd57fed301701b
1650: 38 32 61 32 35 39 0a 0a 0a 74 63 6c 74 65 73 74  82a259...tcltest
1660: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
1670: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 31 34 20  Stream_rc4-1.14 
1680: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
1690: 73 65 74 20 37 35 32 7d 20 5c 0a 09 2d 63 6f 6e  set 752} \..-con
16a0: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
16b0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
16c0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
16d0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
16e0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
16f0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
1700: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1710: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36  hex 010203040506
1720: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65  0708090a0b0c0d0e
1730: 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0f10] \...-data 
1740: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
1750: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
1760: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
1770: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
1780: 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30  2030405060708090
1790: 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c  a0b0c0d0e0f10] \
17a0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
17b0: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
17c0: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
17d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
17e0: 30 30 30 30 30 30 30 30 30 30 30 5d 20 34 38 5d  00000000000] 48]
17f0: 5d 5d 20 37 35 32 20 37 36 37 5d 7d 20 5c 0a 09  ]] 752 767]} \..
1800: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
1810: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
1820: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1830: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
1840: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
1850: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 31 35 20 7b  tream_rc4-1.15 {
1860: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
1870: 65 74 20 37 36 38 7d 20 5c 0a 09 2d 63 6f 6e 73  et 768} \..-cons
1880: 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d  traints rc4 \..-
1890: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
18a0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
18b0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
18c0: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20  ypt -cipher rc4 
18d0: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
18e0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
18f0: 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30  ex 0102030405060
1900: 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30  708090a0b0c0d0e0
1910: 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  f10] \...-data [
1920: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
1930: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1940: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
1950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1960: 30 5d 20 34 39 5d 5d 20 37 36 38 20 37 38 33 5d  0] 49]] 768 783]
1970: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1980: 74 20 2d 72 65 73 75 6c 74 20 65 63 63 62 65 31  t -result eccbe1
1990: 33 64 65 31 66 63 63 39 31 63 31 31 61 30 62 32  3de1fcc91c11a0b2
19a0: 36 63 30 62 63 38 66 61 34 64 0a 0a 0a 74 63 6c  6c0bc8fa4d...tcl
19b0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
19c0: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
19d0: 2e 31 36 20 7b 44 65 63 72 79 70 74 20 72 63 34  .16 {Decrypt rc4
19e0: 20 6f 66 66 73 65 74 20 37 36 38 7d 20 5c 0a 09   offset 768} \..
19f0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
1a00: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
1a10: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
1a20: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
1a30: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
1a40: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
1a50: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
1a60: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
1a70: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
1a80: 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64  0d0e0f10] \...-d
1a90: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
1aa0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
1ab0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
1ac0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
1ad0: 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30   010203040506070
1ae0: 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31  8090a0b0c0d0e0f1
1af0: 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  0] \...-data [st
1b00: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
1b10: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
1b20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1b30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
1b40: 20 34 39 5d 5d 5d 20 37 36 38 20 37 38 33 5d 7d   49]]] 768 783]}
1b50: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
1b60: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
1b70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1b80: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
1b90: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
1ba0: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
1bb0: 31 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  17 {Encrypt rc4 
1bc0: 6f 66 66 73 65 74 20 31 30 30 38 7d 20 5c 0a 09  offset 1008} \..
1bd0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
1be0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
1bf0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
1c00: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
1c10: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
1c20: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
1c30: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
1c40: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
1c50: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
1c60: 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64  0d0e0f10] \...-d
1c70: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
1c80: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
1c90: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
1ca0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1cb0: 30 30 30 30 30 30 5d 20 36 34 5d 5d 20 31 30 30  000000] 64]] 100
1cc0: 38 20 31 30 32 33 5d 7d 20 5c 0a 09 2d 6d 61 74  8 1023]} \..-mat
1cd0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
1ce0: 20 65 37 61 37 32 35 37 34 66 38 37 38 32 61 65   e7a72574f8782ae
1cf0: 32 36 61 61 62 63 66 39 65 62 63 64 36 36 30 36  26aabcf9ebcd6606
1d00: 35 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  5...tcltest::tes
1d10: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
1d20: 6d 5f 72 63 34 2d 31 2e 31 38 20 7b 44 65 63 72  m_rc4-1.18 {Decr
1d30: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 31  ypt rc4 offset 1
1d40: 30 30 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  008} \..-constra
1d50: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
1d60: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
1d70: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
1d80: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
1d90: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
1da0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
1db0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
1dc0: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
1dd0: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
1de0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
1df0: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
1e00: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
1e10: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1e20: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
1e30: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30  405060708090a0b0
1e40: 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d  c0d0e0f10] \...-
1e50: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
1e60: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
1e70: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
1e80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1e90: 30 30 30 30 30 30 30 5d 20 36 34 5d 5d 5d 20 31  0000000] 64]]] 1
1ea0: 30 30 38 20 31 30 32 33 5d 7d 20 5c 0a 09 2d 6d  008 1023]} \..-m
1eb0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
1ec0: 6c 74 20 30 30 30 30 30 30 30 30 30 30 30 30 30  lt 0000000000000
1ed0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
1ee0: 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  000...tcltest::t
1ef0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
1f00: 65 61 6d 5f 72 63 34 2d 31 2e 31 39 20 7b 45 6e  eam_rc4-1.19 {En
1f10: 63 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74  crypt rc4 offset
1f20: 20 31 30 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74   1024} \..-const
1f30: 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62  raints rc4 \..-b
1f40: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
1f50: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
1f60: 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  ange [tls::encry
1f70: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
1f80: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
1f90: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
1fa0: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37  x 01020304050607
1fb0: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66  08090a0b0c0d0e0f
1fc0: 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  10] \...-data [s
1fd0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
1fe0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
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 30 30 30 30 30 30 30 30  0000000000000000
2010: 5d 20 36 35 5d 5d 20 31 30 32 34 20 31 30 33 39  ] 65]] 1024 1039
2020: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
2030: 63 74 20 2d 72 65 73 75 6c 74 20 62 64 66 30 33  ct -result bdf03
2040: 32 34 65 36 30 38 33 64 63 63 36 64 33 63 65 64  24e6083dcc6d3ced
2050: 64 33 63 61 38 63 35 33 63 31 36 0a 0a 0a 74 63  d3ca8c53c16...tc
2060: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
2070: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d  tric_Stream_rc4-
2080: 31 2e 32 30 20 7b 44 65 63 72 79 70 74 20 72 63  1.20 {Decrypt rc
2090: 34 20 6f 66 66 73 65 74 20 31 30 32 34 7d 20 5c  4 offset 1024} \
20a0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
20b0: 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  c4 \..-body {bin
20c0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
20d0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
20e0: 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68  s::decrypt -ciph
20f0: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
2100: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
2110: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
2120: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62  0405060708090a0b
2130: 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09  0c0d0e0f10] \...
2140: 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72  -data [tls::encr
2150: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20  ypt -cipher rc4 
2160: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
2170: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
2180: 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30  ex 0102030405060
2190: 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30  708090a0b0c0d0e0
21a0: 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  f10] \...-data [
21b0: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
21c0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
21d0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
21e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
21f0: 30 5d 20 36 35 5d 5d 5d 20 31 30 32 34 20 31 30  0] 65]]] 1024 10
2200: 33 39 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  39]} \..-match e
2210: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
2220: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2230: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
2240: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
2250: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
2260: 34 2d 31 2e 32 31 20 7b 45 6e 63 72 79 70 74 20  4-1.21 {Encrypt 
2270: 72 63 34 20 6f 66 66 73 65 74 20 31 35 32 30 7d  rc4 offset 1520}
2280: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
2290: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
22a0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
22b0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
22c0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
22d0: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
22e0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
22f0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
2300: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61  030405060708090a
2310: 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a  0b0c0d0e0f10] \.
2320: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
2330: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
2340: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
2350: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2360: 30 30 30 30 30 30 30 30 30 30 5d 20 39 36 5d 5d  0000000000] 96]]
2370: 20 31 35 32 30 20 31 35 33 35 5d 7d 20 5c 0a 09   1520 1535]} \..
2380: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
2390: 73 75 6c 74 20 62 34 30 31 31 30 63 34 31 39 30  sult b40110c4190
23a0: 62 35 36 32 32 61 39 36 31 31 36 62 30 30 31 37  b5622a96116b0017
23b0: 65 64 32 39 37 0a 0a 0a 74 63 6c 74 65 73 74 3a  ed297...tcltest:
23c0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
23d0: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 32 32 20 7b  tream_rc4-1.22 {
23e0: 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Decrypt rc4 offs
23f0: 65 74 20 31 35 32 30 7d 20 5c 0a 09 2d 63 6f 6e  et 1520} \..-con
2400: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
2410: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
2420: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
2430: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
2440: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
2450: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
2460: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
2470: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36  hex 010203040506
2480: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65  0708090a0b0c0d0e
2490: 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0f10] \...-data 
24a0: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
24b0: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
24c0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
24d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
24e0: 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30  2030405060708090
24f0: 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c  a0b0c0d0e0f10] \
2500: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
2510: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
2520: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
2530: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2540: 30 30 30 30 30 30 30 30 30 30 30 5d 20 39 36 5d  00000000000] 96]
2550: 5d 5d 20 31 35 32 30 20 31 35 33 35 5d 7d 20 5c  ]] 1520 1535]} \
2560: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
2570: 72 65 73 75 6c 74 20 30 30 30 30 30 30 30 30 30  result 000000000
2580: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2590: 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73  0000000...tcltes
25a0: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
25b0: 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 32 33  _Stream_rc4-1.23
25c0: 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66   {Encrypt rc4 of
25d0: 66 73 65 74 20 31 35 33 36 7d 20 5c 0a 09 2d 63  fset 1536} \..-c
25e0: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c  onstraints rc4 \
25f0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
2600: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
2610: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65  ng range [tls::e
2620: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
2630: 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  c4 -padding 0 -k
2640: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
2650: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
2660: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64  060708090a0b0c0d
2670: 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74  0e0f10] \...-dat
2680: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
2690: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
26a0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
26b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
26c0: 30 30 30 30 5d 20 39 37 5d 5d 20 31 35 33 36 20  0000] 97]] 1536 
26d0: 31 35 35 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  1551]} \..-match
26e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66   exact -result f
26f0: 66 61 30 62 35 31 34 36 34 37 65 63 30 34 66 36  fa0b514647ec04f6
2700: 33 30 36 62 38 39 32 61 65 36 36 31 31 38 31 0a  306b892ae661181.
2710: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
2720: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
2730: 72 63 34 2d 31 2e 32 34 20 7b 44 65 63 72 79 70  rc4-1.24 {Decryp
2740: 74 20 72 63 34 20 6f 66 66 73 65 74 20 31 35 33  t rc4 offset 153
2750: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
2760: 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20  ts rc4 \..-body 
2770: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
2780: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
2790: 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d   [tls::decrypt -
27a0: 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64  cipher rc4 -padd
27b0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
27c0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
27d0: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39  0203040506070809
27e0: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20  0a0b0c0d0e0f10] 
27f0: 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a  \...-data [tls::
2800: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
2810: 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  rc4 -padding 0 -
2820: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
2830: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
2840: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30  5060708090a0b0c0
2850: 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61  d0e0f10] \...-da
2860: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
2870: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
2880: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
2890: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
28a0: 30 30 30 30 30 5d 20 39 37 5d 5d 5d 20 31 35 33  00000] 97]]] 153
28b0: 36 20 31 35 35 31 5d 7d 20 5c 0a 09 2d 6d 61 74  6 1551]} \..-mat
28c0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
28d0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
28e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
28f0: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
2900: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
2910: 6d 5f 72 63 34 2d 31 2e 32 35 20 7b 45 6e 63 72  m_rc4-1.25 {Encr
2920: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 32  ypt rc4 offset 2
2930: 30 33 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  032} \..-constra
2940: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
2950: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
2960: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
2970: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
2980: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
2990: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
29a0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
29b0: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
29c0: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
29d0: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
29e0: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
29f0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
2a00: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2a10: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
2a20: 31 32 38 5d 5d 20 32 30 33 32 20 32 30 34 37 5d  128]] 2032 2047]
2a30: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2a40: 74 20 2d 72 65 73 75 6c 74 20 64 30 33 64 31 62  t -result d03d1b
2a50: 63 30 33 63 64 33 33 64 37 30 64 66 66 39 66 61  c03cd33d70dff9fa
2a60: 35 64 37 31 39 36 33 65 62 64 0a 0a 0a 74 63 6c  5d71963ebd...tcl
2a70: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
2a80: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
2a90: 2e 32 36 20 7b 44 65 63 72 79 70 74 20 72 63 34  .26 {Decrypt rc4
2aa0: 20 6f 66 66 73 65 74 20 32 30 33 32 7d 20 5c 0a   offset 2032} \.
2ab0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
2ac0: 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  4 \..-body {bina
2ad0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
2ae0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
2af0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
2b00: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
2b10: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
2b20: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
2b30: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30  405060708090a0b0
2b40: 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d  c0d0e0f10] \...-
2b50: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
2b60: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
2b70: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
2b80: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
2b90: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37  x 01020304050607
2ba0: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66  08090a0b0c0d0e0f
2bb0: 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  10] \...-data [s
2bc0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
2bd0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
2be0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2bf0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2c00: 5d 20 31 32 38 5d 5d 5d 20 32 30 33 32 20 32 30  ] 128]]] 2032 20
2c10: 34 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  47]} \..-match e
2c20: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
2c30: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2c40: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
2c50: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
2c60: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
2c70: 34 2d 31 2e 32 37 20 7b 45 6e 63 72 79 70 74 20  4-1.27 {Encrypt 
2c80: 72 63 34 20 6f 66 66 73 65 74 20 32 30 34 38 7d  rc4 offset 2048}
2c90: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
2ca0: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
2cb0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
2cc0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
2cd0: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
2ce0: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
2cf0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
2d00: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
2d10: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61  030405060708090a
2d20: 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a  0b0c0d0e0f10] \.
2d30: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
2d40: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
2d50: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
2d60: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2d70: 30 30 30 30 30 30 30 30 30 30 5d 20 31 32 39 5d  0000000000] 129]
2d80: 5d 20 32 30 34 38 20 32 30 36 33 5d 7d 20 5c 0a  ] 2048 2063]} \.
2d90: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
2da0: 65 73 75 6c 74 20 38 61 34 34 31 32 36 34 31 31  esult 8a44126411
2db0: 65 61 61 37 38 62 64 35 31 65 38 64 38 37 61 38  eaa78bd51e8d87a8
2dc0: 38 37 39 62 66 35 0a 0a 0a 74 63 6c 74 65 73 74  879bf5...tcltest
2dd0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
2de0: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 32 38 20  Stream_rc4-1.28 
2df0: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
2e00: 73 65 74 20 32 30 34 38 7d 20 5c 0a 09 2d 63 6f  set 2048} \..-co
2e10: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
2e20: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
2e30: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
2e40: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
2e50: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
2e60: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
2e70: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
2e80: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30   hex 01020304050
2e90: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
2ea0: 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61  e0f10] \...-data
2eb0: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
2ec0: 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64  cipher rc4 -padd
2ed0: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
2ee0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
2ef0: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39  0203040506070809
2f00: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20  0a0b0c0d0e0f10] 
2f10: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
2f20: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
2f30: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
2f40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2f50: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 31 32  000000000000] 12
2f60: 39 5d 5d 5d 20 32 30 34 38 20 32 30 36 33 5d 7d  9]]] 2048 2063]}
2f70: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
2f80: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
2f90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
2fa0: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
2fb0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
2fc0: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
2fd0: 32 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  29 {Encrypt rc4 
2fe0: 6f 66 66 73 65 74 20 33 30 35 36 7d 20 5c 0a 09  offset 3056} \..
2ff0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
3000: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
3010: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
3020: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
3030: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
3040: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
3050: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
3060: 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34  ode hex 01020304
3070: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
3080: 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64  0d0e0f10] \...-d
3090: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
30a0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
30b0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
30c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
30d0: 30 30 30 30 30 30 5d 20 31 39 32 5d 5d 20 33 30  000000] 192]] 30
30e0: 35 36 20 33 30 37 31 5d 7d 20 5c 0a 09 2d 6d 61  56 3071]} \..-ma
30f0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
3100: 74 20 66 61 62 65 62 37 36 30 32 38 61 64 65 32  t fabeb76028ade2
3110: 64 30 65 34 38 37 32 32 65 34 36 63 34 36 31 35  d0e48722e46c4615
3120: 61 33 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  a3...tcltest::te
3130: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
3140: 61 6d 5f 72 63 34 2d 31 2e 33 30 20 7b 44 65 63  am_rc4-1.30 {Dec
3150: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
3160: 33 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  3056} \..-constr
3170: 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f  aints rc4 \..-bo
3180: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
3190: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
31a0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
31b0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
31c0: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
31d0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
31e0: 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30   010203040506070
31f0: 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31  8090a0b0c0d0e0f1
3200: 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  0] \...-data [tl
3210: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
3220: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
3230: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
3240: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
3250: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62  0405060708090a0b
3260: 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09  0c0d0e0f10] \...
3270: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
3280: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
3290: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
32a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
32b0: 30 30 30 30 30 30 30 30 5d 20 31 39 32 5d 5d 5d  00000000] 192]]]
32c0: 20 33 30 35 36 20 33 30 37 31 5d 7d 20 5c 0a 09   3056 3071]} \..
32d0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
32e0: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
32f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3300: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
3310: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
3320: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 33 31 20 7b  tream_rc4-1.31 {
3330: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
3340: 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63 6f 6e  et 3072} \..-con
3350: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
3360: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
3370: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
3380: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
3390: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
33a0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
33b0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
33c0: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36  hex 010203040506
33d0: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65  0708090a0b0c0d0e
33e0: 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20  0f10] \...-data 
33f0: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
3400: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
3410: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
3420: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3430: 30 30 5d 20 31 39 33 5d 5d 20 33 30 37 32 20 33  00] 193]] 3072 3
3440: 30 38 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  087]} \..-match 
3450: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 30  exact -result c0
3460: 35 64 38 38 61 62 64 35 30 33 35 37 66 39 33 35  5d88abd50357f935
3470: 61 36 33 63 35 39 65 65 35 33 37 36 32 33 0a 0a  a63c59ee537623..
3480: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
3490: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
34a0: 63 34 2d 31 2e 33 32 20 7b 44 65 63 72 79 70 74  c4-1.32 {Decrypt
34b0: 20 72 63 34 20 6f 66 66 73 65 74 20 33 30 37 32   rc4 offset 3072
34c0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
34d0: 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b  s rc4 \..-body {
34e0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
34f0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
3500: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
3510: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
3520: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
3530: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30  y decode hex 010
3540: 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30  2030405060708090
3550: 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c  a0b0c0d0e0f10] \
3560: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
3570: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
3580: 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  c4 -padding 0 -k
3590: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
35a0: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35  e hex 0102030405
35b0: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64  060708090a0b0c0d
35c0: 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74  0e0f10] \...-dat
35d0: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
35e0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
35f0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
3600: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3610: 30 30 30 30 5d 20 31 39 33 5d 5d 5d 20 33 30 37  0000] 193]]] 307
3620: 32 20 33 30 38 37 5d 7d 20 5c 0a 09 2d 6d 61 74  2 3087]} \..-mat
3630: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
3640: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
3650: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3660: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
3670: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
3680: 6d 5f 72 63 34 2d 31 2e 33 33 20 7b 45 6e 63 72  m_rc4-1.33 {Encr
3690: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 34  ypt rc4 offset 4
36a0: 30 38 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  080} \..-constra
36b0: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
36c0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
36d0: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
36e0: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
36f0: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
3700: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
3710: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
3720: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
3730: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
3740: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
3750: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
3760: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
3770: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3780: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
3790: 32 35 36 5d 5d 20 34 30 38 30 20 34 30 39 35 5d  256]] 4080 4095]
37a0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
37b0: 74 20 2d 72 65 73 75 6c 74 20 66 66 33 38 32 36  t -result ff3826
37c0: 35 63 31 36 34 32 63 31 61 62 65 38 64 33 63 32  5c1642c1abe8d3c2
37d0: 66 65 35 65 35 37 32 62 66 38 0a 0a 0a 74 63 6c  fe5e572bf8...tcl
37e0: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
37f0: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
3800: 2e 33 34 20 7b 44 65 63 72 79 70 74 20 72 63 34  .34 {Decrypt rc4
3810: 20 6f 66 66 73 65 74 20 34 30 38 30 7d 20 5c 0a   offset 4080} \.
3820: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
3830: 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  4 \..-body {bina
3840: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
3850: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
3860: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
3870: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
3880: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
3890: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30  code hex 0102030
38a0: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30  405060708090a0b0
38b0: 63 30 64 30 65 30 66 31 30 5d 20 5c 0a 09 09 2d  c0d0e0f10] \...-
38c0: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
38d0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
38e0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
38f0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
3900: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37  x 01020304050607
3910: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66  08090a0b0c0d0e0f
3920: 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  10] \...-data [s
3930: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
3940: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
3950: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3970: 5d 20 32 35 36 5d 5d 5d 20 34 30 38 30 20 34 30  ] 256]]] 4080 40
3980: 39 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  95]} \..-match e
3990: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
39a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
39b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
39c0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
39d0: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
39e0: 34 2d 31 2e 33 35 20 7b 45 6e 63 72 79 70 74 20  4-1.35 {Encrypt 
39f0: 72 63 34 20 6f 66 66 73 65 74 20 34 30 39 36 7d  rc4 offset 4096}
3a00: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
3a10: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
3a20: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
3a30: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
3a40: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
3a50: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
3a60: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
3a70: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32   decode hex 0102
3a80: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61  030405060708090a
3a90: 30 62 30 63 30 64 30 65 30 66 31 30 5d 20 5c 0a  0b0c0d0e0f10] \.
3aa0: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
3ab0: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
3ac0: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
3ad0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3ae0: 30 30 30 30 30 30 30 30 30 30 5d 20 32 35 37 5d  0000000000] 257]
3af0: 5d 20 34 30 39 36 20 34 31 31 31 5d 7d 20 5c 0a  ] 4096 4111]} \.
3b00: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3b10: 65 73 75 6c 74 20 61 33 36 61 34 63 33 30 31 61  esult a36a4c301a
3b20: 65 38 61 63 31 33 36 31 30 63 63 62 63 31 32 32  e8ac13610ccbc122
3b30: 35 36 63 61 63 63 0a 0a 0a 74 63 6c 74 65 73 74  56cacc...tcltest
3b40: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
3b50: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 33 36 20  Stream_rc4-1.36 
3b60: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
3b70: 73 65 74 20 34 30 39 36 7d 20 5c 0a 09 2d 63 6f  set 4096} \..-co
3b80: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
3b90: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
3ba0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
3bb0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
3bc0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
3bd0: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
3be0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3bf0: 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30   hex 01020304050
3c00: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
3c10: 65 30 66 31 30 5d 20 5c 0a 09 09 2d 64 61 74 61  e0f10] \...-data
3c20: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
3c30: 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64  cipher rc4 -padd
3c40: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
3c50: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
3c60: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39  0203040506070809
3c70: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 5d 20  0a0b0c0d0e0f10] 
3c80: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
3c90: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
3ca0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
3cb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3cc0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 32 35  000000000000] 25
3cd0: 37 5d 5d 5d 20 34 30 39 36 20 34 31 31 31 5d 7d  7]]] 4096 4111]}
3ce0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
3cf0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
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 0a 0a 0a 74 63 6c 74  000000000...tclt
3d20: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
3d30: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
3d40: 33 37 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  37 {Encrypt rc4 
3d50: 6f 66 66 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f  offset 0} \..-co
3d60: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
3d70: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
3d80: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
3d90: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e  g range [tls::en
3da0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
3db0: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
3dc0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
3dd0: 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63   hex ebb46227c6c
3de0: 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32  c8b3764191083322
3df0: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
3e00: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3e10: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
3e20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3e30: 30 30 30 30 5d 5d 20 30 20 31 35 5d 7d 20 5c 0a  0000]] 0 15]} \.
3e40: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3e50: 65 73 75 6c 74 20 37 32 30 63 39 34 62 36 33 65  esult 720c94b63e
3e60: 64 66 34 34 65 31 33 31 64 39 35 30 63 61 32 31  df44e131d950ca21
3e70: 31 61 35 61 33 30 0a 0a 0a 74 63 6c 74 65 73 74  1a5a30...tcltest
3e80: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
3e90: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 33 38 20  Stream_rc4-1.38 
3ea0: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
3eb0: 73 65 74 20 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74  set 0} \..-const
3ec0: 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62  raints rc4 \..-b
3ed0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
3ee0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
3ef0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
3f00: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
3f10: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
3f20: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
3f30: 78 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62  x ebb46227c6cc8b
3f40: 33 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37  3764191083322277
3f50: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  2a] \...-data [t
3f60: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
3f70: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
3f80: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
3f90: 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36  decode hex ebb46
3fa0: 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31  227c6cc8b3764191
3fb0: 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09  0833222772a] \..
3fc0: 09 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  .-data [binary d
3fd0: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
3fe0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
3ff0: 30 30 30 30 30 30 30 30 30 30 5d 5d 5d 20 30 20  0000000000]]] 0 
4000: 31 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  15]} \..-match e
4010: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
4020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4030: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
4040: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
4050: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
4060: 34 2d 31 2e 33 39 20 7b 45 6e 63 72 79 70 74 20  4-1.39 {Encrypt 
4070: 72 63 34 20 6f 66 66 73 65 74 20 31 36 7d 20 5c  rc4 offset 16} \
4080: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
4090: 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  c4 \..-body {bin
40a0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
40b0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
40c0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
40d0: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
40e0: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
40f0: 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32  ecode hex ebb462
4100: 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30  27c6cc8b37641910
4110: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
4120: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
4130: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
4140: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
4150: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4160: 30 30 30 30 30 30 30 30 5d 20 32 5d 5d 20 31 36  00000000] 2]] 16
4170: 20 33 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20   31]} \..-match 
4180: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 33  exact -result c3
4190: 36 36 66 64 65 61 63 66 39 63 61 38 30 34 33 36  66fdeacf9ca80436
41a0: 62 65 37 63 33 35 38 34 32 34 64 32 30 62 0a 0a  be7c358424d20b..
41b0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
41c0: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
41d0: 63 34 2d 31 2e 34 30 20 7b 44 65 63 72 79 70 74  c4-1.40 {Decrypt
41e0: 20 72 63 34 20 6f 66 66 73 65 74 20 31 36 7d 20   rc4 offset 16} 
41f0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
4200: 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  rc4 \..-body {bi
4210: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
4220: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
4230: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70  ls::decrypt -cip
4240: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
4250: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
4260: 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36  decode hex ebb46
4270: 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31  227c6cc8b3764191
4280: 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09  0833222772a] \..
4290: 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63  .-data [tls::enc
42a0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
42b0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
42c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
42d0: 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63  hex ebb46227c6cc
42e0: 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32  8b37641910833222
42f0: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
4300: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
4310: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
4320: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
4330: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4340: 30 30 5d 20 32 5d 5d 5d 20 31 36 20 33 31 5d 7d  00] 2]]] 16 31]}
4350: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
4360: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
4370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4380: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
4390: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
43a0: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
43b0: 34 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  41 {Encrypt rc4 
43c0: 6f 66 66 73 65 74 20 32 34 30 7d 20 5c 0a 09 2d  offset 240} \..-
43d0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20  constraints rc4 
43e0: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
43f0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
4400: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
4410: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
4420: 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  rc4 -padding 0 -
4430: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
4440: 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37 63  de hex ebb46227c
4450: 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33 33  6cc8b37641910833
4460: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
4470: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
4480: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
4490: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
44a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
44b0: 30 30 30 30 30 5d 20 31 36 5d 5d 20 32 34 30 20  00000] 16]] 240 
44c0: 32 35 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  255]} \..-match 
44d0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 33  exact -result b3
44e0: 33 39 34 61 34 30 61 61 62 66 37 35 63 62 61 34  394a40aabf75cba4
44f0: 32 32 38 32 65 66 32 35 61 30 30 35 39 66 0a 0a  2282ef25a0059f..
4500: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
4510: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
4520: 63 34 2d 31 2e 34 32 20 7b 44 65 63 72 79 70 74  c4-1.42 {Decrypt
4530: 20 72 63 34 20 6f 66 66 73 65 74 20 32 34 30 7d   rc4 offset 240}
4540: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
4550: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
4560: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
4570: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
4580: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
4590: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
45a0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
45b0: 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34   decode hex ebb4
45c0: 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39  6227c6cc8b376419
45d0: 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  10833222772a] \.
45e0: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
45f0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
4600: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
4610: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
4620: 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63   hex ebb46227c6c
4630: 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32  c8b3764191083322
4640: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
4650: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
4660: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4670: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
4680: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4690: 30 30 30 5d 20 31 36 5d 5d 5d 20 32 34 30 20 32  000] 16]]] 240 2
46a0: 35 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  55]} \..-match e
46b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
46c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
46d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
46e0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
46f0: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
4700: 34 2d 31 2e 34 33 20 7b 45 6e 63 72 79 70 74 20  4-1.43 {Encrypt 
4710: 72 63 34 20 6f 66 66 73 65 74 20 32 35 36 7d 20  rc4 offset 256} 
4720: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
4730: 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  rc4 \..-body {bi
4740: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
4750: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
4760: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
4770: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
4780: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
4790: 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36  decode hex ebb46
47a0: 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31  227c6cc8b3764191
47b0: 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09  0833222772a] \..
47c0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
47d0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
47e0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
47f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4800: 30 30 30 30 30 30 30 30 30 5d 20 31 37 5d 5d 20  000000000] 17]] 
4810: 32 35 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d 61  256 271]} \..-ma
4820: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
4830: 74 20 34 38 34 37 64 38 31 64 61 34 39 34 32 64  t 4847d81da4942d
4840: 62 63 32 34 39 64 65 66 63 34 38 63 39 32 32 62  bc249defc48c922b
4850: 39 66 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  9f...tcltest::te
4860: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
4870: 61 6d 5f 72 63 34 2d 31 2e 34 34 20 7b 44 65 63  am_rc4-1.44 {Dec
4880: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
4890: 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  256} \..-constra
48a0: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
48b0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
48c0: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
48d0: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
48e0: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
48f0: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
4900: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
4910: 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37  ebb46227c6cc8b37
4920: 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61  641910833222772a
4930: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
4940: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
4950: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
4960: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
4970: 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32  code hex ebb4622
4980: 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38  7c6cc8b376419108
4990: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
49a0: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
49b0: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
49c0: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
49d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
49e0: 30 30 30 30 30 30 30 5d 20 31 37 5d 5d 5d 20 32  0000000] 17]]] 2
49f0: 35 36 20 32 37 31 5d 7d 20 5c 0a 09 2d 6d 61 74  56 271]} \..-mat
4a00: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
4a10: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
4a20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4a30: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
4a40: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
4a50: 6d 5f 72 63 34 2d 31 2e 34 35 20 7b 45 6e 63 72  m_rc4-1.45 {Encr
4a60: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 34  ypt rc4 offset 4
4a70: 39 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  96} \..-constrai
4a80: 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79  nts rc4 \..-body
4a90: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   {binary encode 
4aa0: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67  hex [string rang
4ab0: 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  e [tls::encrypt 
4ac0: 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64  -cipher rc4 -pad
4ad0: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
4ae0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 65  ary decode hex e
4af0: 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37 36  bb46227c6cc8b376
4b00: 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61 5d  41910833222772a]
4b10: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
4b20: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
4b30: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
4b40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4b50: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 33  0000000000000] 3
4b60: 32 5d 5d 20 34 39 36 20 35 31 31 5d 7d 20 5c 0a  2]] 496 511]} \.
4b70: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4b80: 65 73 75 6c 74 20 30 38 31 32 38 63 34 36 39 66  esult 08128c469f
4b90: 32 37 35 33 34 32 61 64 64 61 32 30 32 62 32 62  275342adda202b2b
4ba0: 35 38 64 61 39 35 0a 0a 0a 74 63 6c 74 65 73 74  58da95...tcltest
4bb0: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
4bc0: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 34 36 20  Stream_rc4-1.46 
4bd0: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
4be0: 73 65 74 20 34 39 36 7d 20 5c 0a 09 2d 63 6f 6e  set 496} \..-con
4bf0: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
4c00: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
4c10: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
4c20: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63   range [tls::dec
4c30: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
4c40: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
4c50: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4c60: 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63  hex ebb46227c6cc
4c70: 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32  8b37641910833222
4c80: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
4c90: 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63  [tls::encrypt -c
4ca0: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
4cb0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
4cc0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62  y decode hex ebb
4cd0: 34 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31  46227c6cc8b37641
4ce0: 39 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c  910833222772a] \
4cf0: 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67  ...-data [string
4d00: 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20   repeat [binary 
4d10: 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30  decode hex 00000
4d20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4d30: 30 30 30 30 30 30 30 30 30 30 30 5d 20 33 32 5d  00000000000] 32]
4d40: 5d 5d 20 34 39 36 20 35 31 31 5d 7d 20 5c 0a 09  ]] 496 511]} \..
4d50: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
4d60: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
4d70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4d80: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
4d90: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
4da0: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 34 37 20 7b  tream_rc4-1.47 {
4db0: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
4dc0: 65 74 20 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73  et 512} \..-cons
4dd0: 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d  traints rc4 \..-
4de0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63  body {binary enc
4df0: 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20  ode hex [string 
4e00: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72  range [tls::encr
4e10: 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20  ypt -cipher rc4 
4e20: 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20  -padding 0 -key 
4e30: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
4e40: 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63 38  ex ebb46227c6cc8
4e50: 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32 37  b376419108332227
4e60: 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b  72a] \...-data [
4e70: 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62  string repeat [b
4e80: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
4e90: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
4ea0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
4eb0: 30 5d 20 33 33 5d 5d 20 35 31 32 20 35 32 37 5d  0] 33]] 512 527]
4ec0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
4ed0: 74 20 2d 72 65 73 75 6c 74 20 39 37 30 64 61 63  t -result 970dac
4ee0: 65 66 34 30 61 64 39 38 37 32 33 62 61 63 35 64  ef40ad98723bac5d
4ef0: 36 39 35 35 62 38 31 37 36 31 0a 0a 0a 74 63 6c  6955b81761...tcl
4f00: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
4f10: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
4f20: 2e 34 38 20 7b 44 65 63 72 79 70 74 20 72 63 34  .48 {Decrypt rc4
4f30: 20 6f 66 66 73 65 74 20 35 31 32 7d 20 5c 0a 09   offset 512} \..
4f40: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
4f50: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
4f60: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
4f70: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
4f80: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
4f90: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
4fa0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
4fb0: 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37  ode hex ebb46227
4fc0: 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33  c6cc8b3764191083
4fd0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
4fe0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
4ff0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
5000: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
5010: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
5020: 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33   ebb46227c6cc8b3
5030: 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32  7641910833222772
5040: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
5050: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
5060: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
5070: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5080: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
5090: 20 33 33 5d 5d 5d 20 35 31 32 20 35 32 37 5d 7d   33]]] 512 527]}
50a0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
50b0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
50c0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
50d0: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
50e0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
50f0: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
5100: 34 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  49 {Encrypt rc4 
5110: 6f 66 66 73 65 74 20 37 35 32 7d 20 5c 0a 09 2d  offset 752} \..-
5120: 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20  constraints rc4 
5130: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
5140: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72   encode hex [str
5150: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
5160: 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20  encrypt -cipher 
5170: 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d  rc4 -padding 0 -
5180: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
5190: 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37 63  de hex ebb46227c
51a0: 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33 33  6cc8b37641910833
51b0: 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61  222772a] \...-da
51c0: 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61  ta [string repea
51d0: 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  t [binary decode
51e0: 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30   hex 00000000000
51f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5200: 30 30 30 30 30 5d 20 34 38 5d 5d 20 37 35 32 20  00000] 48]] 752 
5210: 37 36 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  767]} \..-match 
5220: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 63  exact -result 3c
5230: 62 38 39 39 39 33 62 30 37 62 30 63 65 64 39 33  b89993b07b0ced93
5240: 64 65 31 33 64 32 61 31 31 30 31 33 61 63 0a 0a  de13d2a11013ac..
5250: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
5260: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
5270: 63 34 2d 31 2e 35 30 20 7b 44 65 63 72 79 70 74  c4-1.50 {Decrypt
5280: 20 72 63 34 20 6f 66 66 73 65 74 20 37 35 32 7d   rc4 offset 752}
5290: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
52a0: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
52b0: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
52c0: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
52d0: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
52e0: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
52f0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
5300: 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34   decode hex ebb4
5310: 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39  6227c6cc8b376419
5320: 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  10833222772a] \.
5330: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
5340: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
5350: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
5360: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
5370: 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63   hex ebb46227c6c
5380: 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32  c8b3764191083322
5390: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
53a0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
53b0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
53c0: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
53d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
53e0: 30 30 30 5d 20 34 38 5d 5d 5d 20 37 35 32 20 37  000] 48]]] 752 7
53f0: 36 37 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  67]} \..-match e
5400: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
5410: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5420: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
5430: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
5440: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
5450: 34 2d 31 2e 35 31 20 7b 45 6e 63 72 79 70 74 20  4-1.51 {Encrypt 
5460: 72 63 34 20 6f 66 66 73 65 74 20 37 36 38 7d 20  rc4 offset 768} 
5470: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
5480: 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  rc4 \..-body {bi
5490: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
54a0: 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74  [string range [t
54b0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
54c0: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
54d0: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
54e0: 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36  decode hex ebb46
54f0: 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31  227c6cc8b3764191
5500: 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09  0833222772a] \..
5510: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
5520: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
5530: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
5540: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5550: 30 30 30 30 30 30 30 30 30 5d 20 34 39 5d 5d 20  000000000] 49]] 
5560: 37 36 38 20 37 38 33 5d 7d 20 5c 0a 09 2d 6d 61  768 783]} \..-ma
5570: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
5580: 74 20 65 66 32 64 36 37 36 66 31 35 34 35 63 32  t ef2d676f1545c2
5590: 63 31 33 64 63 36 38 30 61 30 32 66 34 61 64 62  c13dc680a02f4adb
55a0: 66 65 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  fe...tcltest::te
55b0: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
55c0: 61 6d 5f 72 63 34 2d 31 2e 35 32 20 7b 44 65 63  am_rc4-1.52 {Dec
55d0: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
55e0: 37 36 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  768} \..-constra
55f0: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
5600: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
5610: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
5620: 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74  ge [tls::decrypt
5630: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
5640: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
5650: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
5660: 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37  ebb46227c6cc8b37
5670: 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61  641910833222772a
5680: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73  ] \...-data [tls
5690: 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65  ::encrypt -ciphe
56a0: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
56b0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
56c0: 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32  code hex ebb4622
56d0: 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38  7c6cc8b376419108
56e0: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
56f0: 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70  data [string rep
5700: 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  eat [binary deco
5710: 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30  de hex 000000000
5720: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5730: 30 30 30 30 30 30 30 5d 20 34 39 5d 5d 5d 20 37  0000000] 49]]] 7
5740: 36 38 20 37 38 33 5d 7d 20 5c 0a 09 2d 6d 61 74  68 783]} \..-mat
5750: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
5760: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
5770: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5780: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
5790: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
57a0: 6d 5f 72 63 34 2d 31 2e 35 33 20 7b 45 6e 63 72  m_rc4-1.53 {Encr
57b0: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 31  ypt rc4 offset 1
57c0: 30 30 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  008} \..-constra
57d0: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
57e0: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
57f0: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
5800: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
5810: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
5820: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
5830: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
5840: 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37  ebb46227c6cc8b37
5850: 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61  641910833222772a
5860: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
5870: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
5880: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
5890: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
58a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
58b0: 36 34 5d 5d 20 31 30 30 38 20 31 30 32 33 5d 7d  64]] 1008 1023]}
58c0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
58d0: 20 2d 72 65 73 75 6c 74 20 62 36 30 35 39 35 35   -result b605955
58e0: 31 34 66 32 34 62 63 39 66 65 35 32 32 61 36 63  14f24bc9fe522a6c
58f0: 61 64 37 33 39 33 36 34 34 0a 0a 0a 74 63 6c 74  ad7393644...tclt
5900: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
5910: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
5920: 35 34 20 7b 44 65 63 72 79 70 74 20 72 63 34 20  54 {Decrypt rc4 
5930: 6f 66 66 73 65 74 20 31 30 30 38 7d 20 5c 0a 09  offset 1008} \..
5940: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
5950: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
5960: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
5970: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
5980: 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72  :decrypt -cipher
5990: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
59a0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
59b0: 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37  ode hex ebb46227
59c0: 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33  c6cc8b3764191083
59d0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
59e0: 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70  ata [tls::encryp
59f0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
5a00: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
5a10: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
5a20: 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33   ebb46227c6cc8b3
5a30: 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32  7641910833222772
5a40: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74  a] \...-data [st
5a50: 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e  ring repeat [bin
5a60: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30  ary decode hex 0
5a70: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5a80: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d  000000000000000]
5a90: 20 36 34 5d 5d 5d 20 31 30 30 38 20 31 30 32 33   64]]] 1008 1023
5aa0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
5ab0: 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30  ct -result 00000
5ac0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5ad0: 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63  00000000000...tc
5ae0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65  ltest::test Syme
5af0: 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d  tric_Stream_rc4-
5b00: 31 2e 35 35 20 7b 45 6e 63 72 79 70 74 20 72 63  1.55 {Encrypt rc
5b10: 34 20 6f 66 66 73 65 74 20 31 30 32 34 7d 20 5c  4 offset 1024} \
5b20: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72  ..-constraints r
5b30: 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e  c4 \..-body {bin
5b40: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b  ary encode hex [
5b50: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c  string range [tl
5b60: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
5b70: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
5b80: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
5b90: 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32  ecode hex ebb462
5ba0: 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30  27c6cc8b37641910
5bb0: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
5bc0: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
5bd0: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
5be0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
5bf0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5c00: 30 30 30 30 30 30 30 30 5d 20 36 35 5d 5d 20 31  00000000] 65]] 1
5c10: 30 32 34 20 31 30 33 39 5d 7d 20 5c 0a 09 2d 6d  024 1039]} \..-m
5c20: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
5c30: 6c 74 20 62 35 31 35 61 38 63 35 30 31 31 37 35  lt b515a8c501175
5c40: 34 66 35 39 30 30 33 30 35 38 62 64 62 38 31 35  4f59003058bdb815
5c50: 31 34 65 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  14e...tcltest::t
5c60: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72  est Symetric_Str
5c70: 65 61 6d 5f 72 63 34 2d 31 2e 35 36 20 7b 44 65  eam_rc4-1.56 {De
5c80: 63 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74  crypt rc4 offset
5c90: 20 31 30 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74   1024} \..-const
5ca0: 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62  raints rc4 \..-b
5cb0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
5cc0: 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72  de hex [string r
5cd0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79  ange [tls::decry
5ce0: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
5cf0: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
5d00: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5d10: 78 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62  x ebb46227c6cc8b
5d20: 33 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37  3764191083322277
5d30: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74  2a] \...-data [t
5d40: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70  ls::encrypt -cip
5d50: 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67  her rc4 -padding
5d60: 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20   0 -key [binary 
5d70: 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36  decode hex ebb46
5d80: 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31  227c6cc8b3764191
5d90: 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09  0833222772a] \..
5da0: 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72  .-data [string r
5db0: 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65  epeat [binary de
5dc0: 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30  code hex 0000000
5dd0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5de0: 30 30 30 30 30 30 30 30 30 5d 20 36 35 5d 5d 5d  000000000] 65]]]
5df0: 20 31 30 32 34 20 31 30 33 39 5d 7d 20 5c 0a 09   1024 1039]} \..
5e00: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
5e10: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
5e20: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5e30: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
5e40: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
5e50: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 35 37 20 7b  tream_rc4-1.57 {
5e60: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
5e70: 65 74 20 31 35 32 30 7d 20 5c 0a 09 2d 63 6f 6e  et 1520} \..-con
5e80: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
5e90: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
5ea0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
5eb0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
5ec0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
5ed0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
5ee0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5ef0: 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63  hex ebb46227c6cc
5f00: 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32  8b37641910833222
5f10: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
5f20: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
5f30: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
5f40: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
5f50: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
5f60: 30 30 5d 20 39 36 5d 5d 20 31 35 32 30 20 31 35  00] 96]] 1520 15
5f70: 33 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  35]} \..-match e
5f80: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 63 37  xact -result 3c7
5f90: 30 30 34 37 65 38 63 62 63 30 33 38 65 33 62 39  0047e8cbc038e3b9
5fa0: 38 32 30 64 62 36 30 31 64 61 34 39 35 0a 0a 0a  820db601da495...
5fb0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
5fc0: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
5fd0: 34 2d 31 2e 35 38 20 7b 44 65 63 72 79 70 74 20  4-1.58 {Decrypt 
5fe0: 72 63 34 20 6f 66 66 73 65 74 20 31 35 32 30 7d  rc4 offset 1520}
5ff0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
6000: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
6010: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
6020: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
6030: 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69  tls::decrypt -ci
6040: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
6050: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
6060: 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34   decode hex ebb4
6070: 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39  6227c6cc8b376419
6080: 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  10833222772a] \.
6090: 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e  ..-data [tls::en
60a0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
60b0: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
60c0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
60d0: 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63   hex ebb46227c6c
60e0: 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32  c8b3764191083322
60f0: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
6100: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20   [string repeat 
6110: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
6120: 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30  ex 0000000000000
6130: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6140: 30 30 30 5d 20 39 36 5d 5d 5d 20 31 35 32 30 20  000] 96]]] 1520 
6150: 31 35 33 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  1535]} \..-match
6160: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30   exact -result 0
6170: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6180: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 0a  000000000000000.
6190: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
61a0: 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f  Symetric_Stream_
61b0: 72 63 34 2d 31 2e 35 39 20 7b 45 6e 63 72 79 70  rc4-1.59 {Encryp
61c0: 74 20 72 63 34 20 6f 66 66 73 65 74 20 31 35 33  t rc4 offset 153
61d0: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
61e0: 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20  ts rc4 \..-body 
61f0: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  {binary encode h
6200: 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65  ex [string range
6210: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
6220: 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64  cipher rc4 -padd
6230: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
6240: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 62  ry decode hex eb
6250: 62 34 36 32 32 37 63 36 63 63 38 62 33 37 36 34  b46227c6cc8b3764
6260: 31 39 31 30 38 33 33 32 32 32 37 37 32 61 5d 20  1910833222772a] 
6270: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
6280: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
6290: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
62a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
62b0: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 39 37  000000000000] 97
62c0: 5d 5d 20 31 35 33 36 20 31 35 35 31 5d 7d 20 5c  ]] 1536 1551]} \
62d0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
62e0: 72 65 73 75 6c 74 20 31 31 37 35 64 61 36 65 65  result 1175da6ee
62f0: 37 35 36 64 65 34 36 61 35 33 65 32 62 30 37 35  756de46a53e2b075
6300: 36 36 30 62 37 37 30 0a 0a 0a 74 63 6c 74 65 73  660b770...tcltes
6310: 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63  t::test Symetric
6320: 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 36 30  _Stream_rc4-1.60
6330: 20 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66   {Decrypt rc4 of
6340: 66 73 65 74 20 31 35 33 36 7d 20 5c 0a 09 2d 63  fset 1536} \..-c
6350: 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c  onstraints rc4 \
6360: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20  ..-body {binary 
6370: 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69  encode hex [stri
6380: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64  ng range [tls::d
6390: 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ecrypt -cipher r
63a0: 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  c4 -padding 0 -k
63b0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
63c0: 65 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36  e hex ebb46227c6
63d0: 63 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32  cc8b376419108332
63e0: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
63f0: 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20  a [tls::encrypt 
6400: 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64  -cipher rc4 -pad
6410: 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e  ding 0 -key [bin
6420: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 65  ary decode hex e
6430: 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37 36  bb46227c6cc8b376
6440: 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61 5d  41910833222772a]
6450: 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69   \...-data [stri
6460: 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72  ng repeat [binar
6470: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30  y decode hex 000
6480: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6490: 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 39  0000000000000] 9
64a0: 37 5d 5d 5d 20 31 35 33 36 20 31 35 35 31 5d 7d  7]]] 1536 1551]}
64b0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
64c0: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
64d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
64e0: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
64f0: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
6500: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
6510: 36 31 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  61 {Encrypt rc4 
6520: 6f 66 66 73 65 74 20 32 30 33 32 7d 20 5c 0a 09  offset 2032} \..
6530: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
6540: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
6550: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
6560: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
6570: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
6580: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
6590: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
65a0: 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37  ode hex ebb46227
65b0: 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33  c6cc8b3764191083
65c0: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
65d0: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
65e0: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
65f0: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
6600: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6610: 30 30 30 30 30 30 5d 20 31 32 38 5d 5d 20 32 30  000000] 128]] 20
6620: 33 32 20 32 30 34 37 5d 7d 20 5c 0a 09 2d 6d 61  32 2047]} \..-ma
6630: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
6640: 74 20 30 30 61 35 34 32 62 62 61 30 32 31 31 31  t 00a542bba02111
6650: 63 63 32 63 36 35 62 33 38 65 62 64 62 61 35 38  cc2c65b38ebdba58
6660: 37 65 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  7e...tcltest::te
6670: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
6680: 61 6d 5f 72 63 34 2d 31 2e 36 32 20 7b 44 65 63  am_rc4-1.62 {Dec
6690: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
66a0: 32 30 33 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  2032} \..-constr
66b0: 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f  aints rc4 \..-bo
66c0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
66d0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
66e0: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
66f0: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
6700: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
6710: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
6720: 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33   ebb46227c6cc8b3
6730: 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32  7641910833222772
6740: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  a] \...-data [tl
6750: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
6760: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
6770: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
6780: 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32  ecode hex ebb462
6790: 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30  27c6cc8b37641910
67a0: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
67b0: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
67c0: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
67d0: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
67e0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
67f0: 30 30 30 30 30 30 30 30 5d 20 31 32 38 5d 5d 5d  00000000] 128]]]
6800: 20 32 30 33 32 20 32 30 34 37 5d 7d 20 5c 0a 09   2032 2047]} \..
6810: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
6820: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
6830: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6840: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
6850: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
6860: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 36 33 20 7b  tream_rc4-1.63 {
6870: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
6880: 65 74 20 32 30 34 38 7d 20 5c 0a 09 2d 63 6f 6e  et 2048} \..-con
6890: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
68a0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
68b0: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
68c0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
68d0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
68e0: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
68f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6900: 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63  hex ebb46227c6cc
6910: 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32  8b37641910833222
6920: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
6930: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
6940: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
6950: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
6960: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6970: 30 30 5d 20 31 32 39 5d 5d 20 32 30 34 38 20 32  00] 129]] 2048 2
6980: 30 36 33 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  063]} \..-match 
6990: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 38  exact -result 58
69a0: 36 35 66 64 62 62 35 62 34 38 30 36 34 31 30 34  65fdbb5b48064104
69b0: 65 38 33 30 62 33 38 30 66 32 61 65 64 65 0a 0a  e830b380f2aede..
69c0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
69d0: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
69e0: 63 34 2d 31 2e 36 34 20 7b 44 65 63 72 79 70 74  c4-1.64 {Decrypt
69f0: 20 72 63 34 20 6f 66 66 73 65 74 20 32 30 34 38   rc4 offset 2048
6a00: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
6a10: 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b  s rc4 \..-body {
6a20: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
6a30: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
6a40: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
6a50: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
6a60: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
6a70: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62  y decode hex ebb
6a80: 34 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31  46227c6cc8b37641
6a90: 39 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c  910833222772a] \
6aa0: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
6ab0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
6ac0: 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  c4 -padding 0 -k
6ad0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
6ae0: 65 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36  e hex ebb46227c6
6af0: 63 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32  cc8b376419108332
6b00: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
6b10: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
6b20: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6b30: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
6b40: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6b50: 30 30 30 30 5d 20 31 32 39 5d 5d 5d 20 32 30 34  0000] 129]]] 204
6b60: 38 20 32 30 36 33 5d 7d 20 5c 0a 09 2d 6d 61 74  8 2063]} \..-mat
6b70: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
6b80: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
6b90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6ba0: 30 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  0...tcltest::tes
6bb0: 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65 61  t Symetric_Strea
6bc0: 6d 5f 72 63 34 2d 31 2e 36 35 20 7b 45 6e 63 72  m_rc4-1.65 {Encr
6bd0: 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20 33  ypt rc4 offset 3
6be0: 30 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  056} \..-constra
6bf0: 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64  ints rc4 \..-bod
6c00: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65  y {binary encode
6c10: 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61 6e   hex [string ran
6c20: 67 65 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74  ge [tls::encrypt
6c30: 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70 61   -cipher rc4 -pa
6c40: 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69  dding 0 -key [bi
6c50: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
6c60: 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33 37  ebb46227c6cc8b37
6c70: 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32 61  641910833222772a
6c80: 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72  ] \...-data [str
6c90: 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61  ing repeat [bina
6ca0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
6cb0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6cc0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 5d 20  00000000000000] 
6cd0: 31 39 32 5d 5d 20 33 30 35 36 20 33 30 37 31 5d  192]] 3056 3071]
6ce0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
6cf0: 74 20 2d 72 65 73 75 6c 74 20 33 34 62 32 31 61  t -result 34b21a
6d00: 64 32 61 64 34 34 65 39 39 39 64 62 32 64 37 66  d2ad44e999db2d7f
6d10: 30 38 36 33 66 30 64 39 62 36 0a 0a 0a 74 63 6c  0863f0d9b6...tcl
6d20: 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74  test::test Symet
6d30: 72 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31  ric_Stream_rc4-1
6d40: 2e 36 36 20 7b 44 65 63 72 79 70 74 20 72 63 34  .66 {Decrypt rc4
6d50: 20 6f 66 66 73 65 74 20 33 30 35 36 7d 20 5c 0a   offset 3056} \.
6d60: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63  .-constraints rc
6d70: 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  4 \..-body {bina
6d80: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73  ry encode hex [s
6d90: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
6da0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65  ::decrypt -ciphe
6db0: 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30  r rc4 -padding 0
6dc0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
6dd0: 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32  code hex ebb4622
6de0: 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38  7c6cc8b376419108
6df0: 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d  33222772a] \...-
6e00: 64 61 74 61 20 5b 74 6c 73 3a 3a 65 6e 63 72 79  data [tls::encry
6e10: 70 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d  pt -cipher rc4 -
6e20: 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b  padding 0 -key [
6e30: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
6e40: 78 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62  x ebb46227c6cc8b
6e50: 33 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37  3764191083322277
6e60: 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 73  2a] \...-data [s
6e70: 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b 62 69  tring repeat [bi
6e80: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
6e90: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6ea0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6eb0: 5d 20 31 39 32 5d 5d 5d 20 33 30 35 36 20 33 30  ] 192]]] 3056 30
6ec0: 37 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  71]} \..-match e
6ed0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 30 30  xact -result 000
6ee0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
6ef0: 30 30 30 30 30 30 30 30 30 30 30 30 30 0a 0a 0a  0000000000000...
6f00: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79  tcltest::test Sy
6f10: 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72 63  metric_Stream_rc
6f20: 34 2d 31 2e 36 37 20 7b 45 6e 63 72 79 70 74 20  4-1.67 {Encrypt 
6f30: 72 63 34 20 6f 66 66 73 65 74 20 33 30 37 32 7d  rc4 offset 3072}
6f40: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
6f50: 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b 62   rc4 \..-body {b
6f60: 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78  inary encode hex
6f70: 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   [string range [
6f80: 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69  tls::encrypt -ci
6f90: 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e  pher rc4 -paddin
6fa0: 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  g 0 -key [binary
6fb0: 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62 34   decode hex ebb4
6fc0: 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31 39  6227c6cc8b376419
6fd0: 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a  10833222772a] \.
6fe0: 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20  ..-data [string 
6ff0: 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64  repeat [binary d
7000: 65 63 6f 64 65 20 68 65 78 20 30 30 30 30 30 30  ecode hex 000000
7010: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7020: 30 30 30 30 30 30 30 30 30 30 5d 20 31 39 33 5d  0000000000] 193]
7030: 5d 20 33 30 37 32 20 33 30 38 37 5d 7d 20 5c 0a  ] 3072 3087]} \.
7040: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
7050: 65 73 75 6c 74 20 38 34 61 39 32 31 38 66 63 33  esult 84a9218fc3
7060: 36 65 38 61 35 66 32 63 63 66 62 65 61 65 35 33  6e8a5f2ccfbeae53
7070: 61 32 37 64 32 35 0a 0a 0a 74 63 6c 74 65 73 74  a27d25...tcltest
7080: 3a 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f  ::test Symetric_
7090: 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e 36 38 20  Stream_rc4-1.68 
70a0: 7b 44 65 63 72 79 70 74 20 72 63 34 20 6f 66 66  {Decrypt rc4 off
70b0: 73 65 74 20 33 30 37 32 7d 20 5c 0a 09 2d 63 6f  set 3072} \..-co
70c0: 6e 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a  nstraints rc4 \.
70d0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65  .-body {binary e
70e0: 6e 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e  ncode hex [strin
70f0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 64 65  g range [tls::de
7100: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63  crypt -cipher rc
7110: 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65  4 -padding 0 -ke
7120: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
7130: 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63   hex ebb46227c6c
7140: 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32  c8b3764191083322
7150: 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61  2772a] \...-data
7160: 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d   [tls::encrypt -
7170: 63 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64  cipher rc4 -padd
7180: 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61  ing 0 -key [bina
7190: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 62  ry decode hex eb
71a0: 62 34 36 32 32 37 63 36 63 63 38 62 33 37 36 34  b46227c6cc8b3764
71b0: 31 39 31 30 38 33 33 32 32 32 37 37 32 61 5d 20  1910833222772a] 
71c0: 5c 0a 09 09 2d 64 61 74 61 20 5b 73 74 72 69 6e  \...-data [strin
71d0: 67 20 72 65 70 65 61 74 20 5b 62 69 6e 61 72 79  g repeat [binary
71e0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 30   decode hex 0000
71f0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7200: 30 30 30 30 30 30 30 30 30 30 30 30 5d 20 31 39  000000000000] 19
7210: 33 5d 5d 5d 20 33 30 37 32 20 33 30 38 37 5d 7d  3]]] 3072 3087]}
7220: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
7230: 20 2d 72 65 73 75 6c 74 20 30 30 30 30 30 30 30   -result 0000000
7240: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7250: 30 30 30 30 30 30 30 30 30 0a 0a 0a 74 63 6c 74  000000000...tclt
7260: 65 73 74 3a 3a 74 65 73 74 20 53 79 6d 65 74 72  est::test Symetr
7270: 69 63 5f 53 74 72 65 61 6d 5f 72 63 34 2d 31 2e  ic_Stream_rc4-1.
7280: 36 39 20 7b 45 6e 63 72 79 70 74 20 72 63 34 20  69 {Encrypt rc4 
7290: 6f 66 66 73 65 74 20 34 30 38 30 7d 20 5c 0a 09  offset 4080} \..
72a0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 72 63 34  -constraints rc4
72b0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
72c0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 73 74  y encode hex [st
72d0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
72e0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72  :encrypt -cipher
72f0: 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20   rc4 -padding 0 
7300: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
7310: 6f 64 65 20 68 65 78 20 65 62 62 34 36 32 32 37  ode hex ebb46227
7320: 63 36 63 63 38 62 33 37 36 34 31 39 31 30 38 33  c6cc8b3764191083
7330: 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64  3222772a] \...-d
7340: 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65  ata [string repe
7350: 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  at [binary decod
7360: 65 20 68 65 78 20 30 30 30 30 30 30 30 30 30 30  e hex 0000000000
7370: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7380: 30 30 30 30 30 30 5d 20 32 35 36 5d 5d 20 34 30  000000] 256]] 40
7390: 38 30 20 34 30 39 35 5d 7d 20 5c 0a 09 2d 6d 61  80 4095]} \..-ma
73a0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
73b0: 74 20 61 32 32 32 31 61 31 31 62 38 33 33 63 63  t a2221a11b833cc
73c0: 62 34 39 38 61 35 39 35 34 30 66 30 35 34 35 66  b498a59540f0545f
73d0: 34 61 0a 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  4a...tcltest::te
73e0: 73 74 20 53 79 6d 65 74 72 69 63 5f 53 74 72 65  st Symetric_Stre
73f0: 61 6d 5f 72 63 34 2d 31 2e 37 30 20 7b 44 65 63  am_rc4-1.70 {Dec
7400: 72 79 70 74 20 72 63 34 20 6f 66 66 73 65 74 20  rypt rc4 offset 
7410: 34 30 38 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  4080} \..-constr
7420: 61 69 6e 74 73 20 72 63 34 20 5c 0a 09 2d 62 6f  aints rc4 \..-bo
7430: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64  dy {binary encod
7440: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 61  e hex [string ra
7450: 6e 67 65 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70  nge [tls::decryp
7460: 74 20 2d 63 69 70 68 65 72 20 72 63 34 20 2d 70  t -cipher rc4 -p
7470: 61 64 64 69 6e 67 20 30 20 2d 6b 65 79 20 5b 62  adding 0 -key [b
7480: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
7490: 20 65 62 62 34 36 32 32 37 63 36 63 63 38 62 33   ebb46227c6cc8b3
74a0: 37 36 34 31 39 31 30 38 33 33 32 32 32 37 37 32  7641910833222772
74b0: 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20 5b 74 6c  a] \...-data [tl
74c0: 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68  s::encrypt -ciph
74d0: 65 72 20 72 63 34 20 2d 70 61 64 64 69 6e 67 20  er rc4 -padding 
74e0: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  0 -key [binary d
74f0: 65 63 6f 64 65 20 68 65 78 20 65 62 62 34 36 32  ecode hex ebb462
7500: 32 37 63 36 63 63 38 62 33 37 36 34 31 39 31 30  27c6cc8b37641910
7510: 38 33 33 32 32 32 37 37 32 61 5d 20 5c 0a 09 09  833222772a] \...
7520: 2d 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65  -data [string re
7530: 70 65 61 74 20 5b 62 69 6e 61 72 79 20 64 65 63  peat [binary dec
7540: 6f 64 65 20 68 65 78 20 30 30 30 30 30 30 30 30  ode hex 00000000
7550: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7560: 30 30 30 30 30 30 30 30 5d 20 32 35 36 5d 5d 5d  00000000] 256]]]
7570: 20 34 30 38 30 20 34 30 39 35 5d 7d 20 5c 0a 09   4080 4095]} \..
7580: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
7590: 73 75 6c 74 20 30 30 30 30 30 30 30 30 30 30 30  sult 00000000000
75a0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
75b0: 30 30 30 30 30 0a 0a 0a 74 63 6c 74 65 73 74 3a  00000...tcltest:
75c0: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 53  :test Symetric_S
75d0: 74 72 65 61 6d 5f 72 63 34 2d 31 2e 37 31 20 7b  tream_rc4-1.71 {
75e0: 45 6e 63 72 79 70 74 20 72 63 34 20 6f 66 66 73  Encrypt rc4 offs
75f0: 65 74 20 34 30 39 36 7d 20 5c 0a 09 2d 63 6f 6e  et 4096} \..-con
7600: 73 74 72 61 69 6e 74 73 20 72 63 34 20 5c 0a 09  straints rc4 \..
7610: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
7620: 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e 67  code hex [string
7630: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 65 6e 63   range [tls::enc
7640: 72 79 70 74 20 2d 63 69 70 68 65 72 20 72 63 34  rypt -cipher rc4
7650: 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b 65 79   -padding 0 -key
7660: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
7670: 68 65 78 20 65 62 62 34 36 32 32 37 63 36 63 63  hex ebb46227c6cc
7680: 38 62 33 37 36 34 31 39 31 30 38 33 33 32 32 32  8b37641910833222
7690: 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74 61 20  772a] \...-data 
76a0: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 5b  [string repeat [
76b0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
76c0: 78 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30  x 00000000000000
76d0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
76e0: 30 30 5d 20 32 35 37 5d 5d 20 34 30 39 36 20 34  00] 257]] 4096 4
76f0: 31 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  111]} \..-match 
7700: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 62  exact -result 5b
7710: 62 65 62 34 37 38 37 64 35 39 65 35 33 37 33 66  beb4787d59e5373f
7720: 64 62 65 61 36 63 36 66 37 35 63 32 39 62 0a 0a  dbea6c6f75c29b..
7730: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
7740: 79 6d 65 74 72 69 63 5f 53 74 72 65 61 6d 5f 72  ymetric_Stream_r
7750: 63 34 2d 31 2e 37 32 20 7b 44 65 63 72 79 70 74  c4-1.72 {Decrypt
7760: 20 72 63 34 20 6f 66 66 73 65 74 20 34 30 39 36   rc4 offset 4096
7770: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
7780: 73 20 72 63 34 20 5c 0a 09 2d 62 6f 64 79 20 7b  s rc4 \..-body {
7790: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
77a0: 78 20 5b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  x [string range 
77b0: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
77c0: 69 70 68 65 72 20 72 63 34 20 2d 70 61 64 64 69  ipher rc4 -paddi
77d0: 6e 67 20 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72  ng 0 -key [binar
77e0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 62 62  y decode hex ebb
77f0: 34 36 32 32 37 63 36 63 63 38 62 33 37 36 34 31  46227c6cc8b37641
7800: 39 31 30 38 33 33 32 32 32 37 37 32 61 5d 20 5c  910833222772a] \
7810: 0a 09 09 2d 64 61 74 61 20 5b 74 6c 73 3a 3a 65  ...-data [tls::e
7820: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 72  ncrypt -cipher r
7830: 63 34 20 2d 70 61 64 64 69 6e 67 20 30 20 2d 6b  c4 -padding 0 -k
7840: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
7850: 65 20 68 65 78 20 65 62 62 34 36 32 32 37 63 36  e hex ebb46227c6
7860: 63 63 38 62 33 37 36 34 31 39 31 30 38 33 33 32  cc8b376419108332
7870: 32 32 37 37 32 61 5d 20 5c 0a 09 09 2d 64 61 74  22772a] \...-dat
7880: 61 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74  a [string repeat
7890: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
78a0: 68 65 78 20 30 30 30 30 30 30 30 30 30 30 30 30  hex 000000000000
78b0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
78c0: 30 30 30 30 5d 20 32 35 37 5d 5d 5d 20 34 30 39  0000] 257]]] 409
78d0: 36 20 34 31 31 31 5d 7d 20 5c 0a 09 2d 6d 61 74  6 4111]} \..-mat
78e0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
78f0: 20 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30   000000000000000
7900: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30  0000000000000000
7910: 30 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74  0..# Cleanup.::t
7920: 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54  cltest::cleanupT
7930: 65 73 74 73 0a 72 65 74 75 72 6e 0a              ests.return.