Artifact
812022114e83a3757d69de1b865b0763ecaf9a03e25d4f17ef2c7f0d2b5660ac:
0000: 23 20 41 75 74 6f 20 67 65 6e 65 72 61 74 65 64  # Auto generated
0010: 20 66 72 6f 6d 20 22 44 45 53 2d 45 44 45 33 2d   from "DES-EDE3-
0020: 43 46 42 38 2e 74 78 74 22 0a 6c 61 70 70 65 6e  CFB8.txt".lappen
0030: 64 20 61 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c  d auto_path [fil
0040: 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20  e dirname [file 
0050: 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69  dirname [file di
0060: 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e  rname [file dirn
0070: 61 6d 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b  ame [file join [
0080: 70 77 64 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70  pwd] [info scrip
0090: 74 5d 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20  t]]]]]].package 
00a0: 72 65 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b  require tls.pack
00b0: 61 67 65 20 72 65 71 75 69 72 65 20 74 63 6c 74  age require tclt
00c0: 65 73 74 0a 0a 63 61 74 63 68 20 7b 74 6c 73 3a  est..catch {tls:
00d0: 3a 70 72 6f 76 69 64 65 72 20 6c 65 67 61 63 79  :provider legacy
00e0: 7d 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43  }.tcltest::testC
00f0: 6f 6e 73 74 72 61 69 6e 74 20 44 45 53 5f 45 44  onstraint DES_ED
0100: 45 33 5f 43 46 42 38 20 5b 65 78 70 72 20 7b 5b  E3_CFB8 [expr {[
0110: 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20  lsearch -nocase 
0120: 5b 74 6c 73 3a 3a 63 69 70 68 65 72 73 5d 20 44  [tls::ciphers] D
0130: 45 53 2d 45 44 45 33 2d 43 46 42 38 5d 20 3e 20  ES-EDE3-CFB8] > 
0140: 2d 31 7d 5d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  -1}]..tcltest::t
0150: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f  est Symetric_Blo
0160: 63 6b 5f 44 45 53 2d 45 44 45 33 2d 43 46 42 38  ck_DES-EDE3-CFB8
0170: 2d 31 2e 31 20 7b 45 6e 63 72 79 70 74 20 44 45  -1.1 {Encrypt DE
0180: 53 2d 45 44 45 33 2d 43 46 42 38 7d 20 5c 0a 09  S-EDE3-CFB8} \..
0190: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44 45 53  -constraints DES
01a0: 5f 45 44 45 33 5f 43 46 42 38 20 5c 0a 09 2d 62  _EDE3_CFB8 \..-b
01b0: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f  ody {binary enco
01c0: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63  de hex [tls::enc
01d0: 72 79 70 74 20 2d 63 69 70 68 65 72 20 44 45 53  rypt -cipher DES
01e0: 2d 45 44 45 33 2d 43 46 42 38 20 2d 70 61 64 64  -EDE3-CFB8 -padd
01f0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20  ing 0 \... -key 
0200: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0210: 65 78 20 30 31 32 33 34 35 36 37 38 39 61 62 63  ex 0123456789abc
0220: 64 65 66 32 33 34 35 36 37 38 39 61 62 63 64 65  def23456789abcde
0230: 66 30 31 34 35 36 37 38 39 61 62 63 64 65 66 30  f01456789abcdef0
0240: 31 32 33 5d 20 5c 0a 09 09 20 2d 69 76 20 5b 62  123] \... -iv [b
0250: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0260: 20 66 36 39 66 32 34 34 35 64 66 34 66 39 62 31   f69f2445df4f9b1
0270: 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62  7] \... -data [b
0280: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
0290: 20 36 62 63 31 62 65 65 32 32 65 34 30 39 66 39   6bc1bee22e409f9
02a0: 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  6]]} \..-match e
02b0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 37 39  xact -result 079
02c0: 35 31 62 37 32 39 64 63 32 33 61 62 34 0a 0a 74  51b729dc23ab4..t
02d0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53 79 6d  cltest::test Sym
02e0: 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45 53 2d  etric_Block_DES-
02f0: 45 44 45 33 2d 43 46 42 38 2d 31 2e 32 20 7b 44  EDE3-CFB8-1.2 {D
0300: 65 63 72 79 70 74 20 44 45 53 2d 45 44 45 33 2d  ecrypt DES-EDE3-
0310: 43 46 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  CFB8} \..-constr
0320: 61 69 6e 74 73 20 44 45 53 5f 45 44 45 33 5f 43  aints DES_EDE3_C
0330: 46 42 38 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69  FB8 \..-body {bi
0340: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
0350: 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63  [tls::decrypt -c
0360: 69 70 68 65 72 20 44 45 53 2d 45 44 45 33 2d 43  ipher DES-EDE3-C
0370: 46 42 38 20 2d 70 61 64 64 69 6e 67 20 30 20 5c  FB8 -padding 0 \
0380: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  ... -key [binary
0390: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 32 33   decode hex 0123
03a0: 34 35 36 37 38 39 61 62 63 64 65 66 32 33 34 35  456789abcdef2345
03b0: 36 37 38 39 61 62 63 64 65 66 30 31 34 35 36 37  6789abcdef014567
03c0: 38 39 61 62 63 64 65 66 30 31 32 33 5d 20 5c 0a  89abcdef0123] \.
03d0: 09 09 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64  .. -iv [binary d
03e0: 65 63 6f 64 65 20 68 65 78 20 66 36 39 66 32 34  ecode hex f69f24
03f0: 34 35 64 66 34 66 39 62 31 37 5d 20 5c 0a 09 09  45df4f9b17] \...
0400: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64   -data [binary d
0410: 65 63 6f 64 65 20 68 65 78 20 30 37 39 35 31 62  ecode hex 07951b
0420: 37 32 39 64 63 32 33 61 62 34 5d 5d 7d 20 5c 0a  729dc23ab4]]} \.
0430: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0440: 65 73 75 6c 74 20 36 62 63 31 62 65 65 32 32 65  esult 6bc1bee22e
0450: 34 30 39 66 39 36 0a 0a 74 63 6c 74 65 73 74 3a  409f96..tcltest:
0460: 3a 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42  :test Symetric_B
0470: 6c 6f 63 6b 5f 44 45 53 2d 45 44 45 33 2d 43 46  lock_DES-EDE3-CF
0480: 42 38 2d 31 2e 33 20 7b 45 6e 63 72 79 70 74 20  B8-1.3 {Encrypt 
0490: 44 45 53 2d 45 44 45 33 2d 43 46 42 38 7d 20 5c  DES-EDE3-CFB8} \
04a0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 44  ..-constraints D
04b0: 45 53 5f 45 44 45 33 5f 43 46 42 38 20 5c 0a 09  ES_EDE3_CFB8 \..
04c0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e  -body {binary en
04d0: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65  code hex [tls::e
04e0: 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 44  ncrypt -cipher D
04f0: 45 53 2d 45 44 45 33 2d 43 46 42 38 20 2d 70 61  ES-EDE3-CFB8 -pa
0500: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65  dding 0 \... -ke
0510: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  y [binary decode
0520: 20 68 65 78 20 30 31 32 33 34 35 36 37 38 39 61   hex 0123456789a
0530: 62 63 64 65 66 32 33 34 35 36 37 38 39 61 62 63  bcdef23456789abc
0540: 64 65 66 30 31 30 31 32 33 34 35 36 37 38 39 61  def010123456789a
0550: 62 63 64 65 66 5d 20 5c 0a 09 09 20 2d 69 76 20  bcdef] \... -iv 
0560: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0570: 65 78 20 66 36 39 66 32 34 34 35 64 66 34 66 39  ex f69f2445df4f9
0580: 62 31 37 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20  b17] \... -data 
0590: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
05a0: 65 78 20 36 62 63 31 62 65 65 32 32 65 34 30 39  ex 6bc1bee22e409
05b0: 66 39 36 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68  f96]]} \..-match
05c0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
05d0: 31 64 38 36 64 39 61 65 65 39 36 39 33 66 64 0a  1d86d9aee9693fd.
05e0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 53  .tcltest::test S
05f0: 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 44 45  ymetric_Block_DE
0600: 53 2d 45 44 45 33 2d 43 46 42 38 2d 31 2e 34 20  S-EDE3-CFB8-1.4 
0610: 7b 44 65 63 72 79 70 74 20 44 45 53 2d 45 44 45  {Decrypt DES-EDE
0620: 33 2d 43 46 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73  3-CFB8} \..-cons
0630: 74 72 61 69 6e 74 73 20 44 45 53 5f 45 44 45 33  traints DES_EDE3
0640: 5f 43 46 42 38 20 5c 0a 09 2d 62 6f 64 79 20 7b  _CFB8 \..-body {
0650: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
0660: 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 74 20  x [tls::decrypt 
0670: 2d 63 69 70 68 65 72 20 44 45 53 2d 45 44 45 33  -cipher DES-EDE3
0680: 2d 43 46 42 38 20 2d 70 61 64 64 69 6e 67 20 30  -CFB8 -padding 0
0690: 20 5c 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61   \... -key [bina
06a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31  ry decode hex 01
06b0: 32 33 34 35 36 37 38 39 61 62 63 64 65 66 32 33  23456789abcdef23
06c0: 34 35 36 37 38 39 61 62 63 64 65 66 30 31 30 31  456789abcdef0101
06d0: 32 33 34 35 36 37 38 39 61 62 63 64 65 66 5d 20  23456789abcdef] 
06e0: 5c 0a 09 09 20 2d 69 76 20 5b 62 69 6e 61 72 79  \... -iv [binary
06f0: 20 64 65 63 6f 64 65 20 68 65 78 20 66 36 39 66   decode hex f69f
0700: 32 34 34 35 64 66 34 66 39 62 31 37 5d 20 5c 0a  2445df4f9b17] \.
0710: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79  .. -data [binary
0720: 20 64 65 63 6f 64 65 20 68 65 78 20 36 31 64 38   decode hex 61d8
0730: 36 64 39 61 65 65 39 36 39 33 66 64 5d 5d 7d 20  6d9aee9693fd]]} 
0740: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
0750: 2d 72 65 73 75 6c 74 20 36 62 63 31 62 65 65 32  -result 6bc1bee2
0760: 32 65 34 30 39 66 39 36 0a 0a 23 20 43 6c 65 61  2e409f96..# Clea
0770: 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63  nup.::tcltest::c
0780: 6c 65 61 6e 75 70 54 65 73 74 73 0a 72 65 74 75  leanupTests.retu
0790: 72 6e 0a                                         rn.