Artifact
32ed496a8a6bb7968a6ad19da3dd4b8ae73595232fea6e312a2da16e1dae1a9c:
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 42 6c 6f 63 6b 5f 44 45 53 2d 45 44 est Block_DES-ED
0160: 45 33 2d 43 46 42 38 2d 31 2e 31 20 7b 45 6e 63 E3-CFB8-1.1 {Enc
0170: 72 79 70 74 20 44 45 53 2d 45 44 45 33 2d 43 46 rypt DES-EDE3-CF
0180: 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 B8} \..-constrai
0190: 6e 74 73 20 44 45 53 5f 45 44 45 33 5f 43 46 42 nts DES_EDE3_CFB
01a0: 38 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 8 \..-body {bina
01b0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
01c0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 ls::encrypt -cip
01d0: 68 65 72 20 44 45 53 2d 45 44 45 33 2d 43 46 42 her DES-EDE3-CFB
01e0: 38 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 8 -padding 0 \..
01f0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
0200: 65 63 6f 64 65 20 68 65 78 20 30 31 32 33 34 35 ecode hex 012345
0210: 36 37 38 39 61 62 63 64 65 66 32 33 34 35 36 37 6789abcdef234567
0220: 38 39 61 62 63 64 65 66 30 31 34 35 36 37 38 39 89abcdef01456789
0230: 61 62 63 64 65 66 30 31 32 33 5d 20 5c 0a 09 09 abcdef0123] \...
0240: 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 -iv [binary dec
0250: 6f 64 65 20 68 65 78 20 66 36 39 66 32 34 34 35 ode hex f69f2445
0260: 64 66 34 66 39 62 31 37 5d 20 5c 0a 09 09 20 2d df4f9b17] \... -
0270: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0280: 6f 64 65 20 68 65 78 20 36 62 63 31 62 65 65 32 ode hex 6bc1bee2
0290: 32 65 34 30 39 66 39 36 5d 5d 7d 20 5c 0a 09 2d 2e409f96]]} \..-
02a0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
02b0: 75 6c 74 20 30 37 39 35 31 62 37 32 39 64 63 32 ult 07951b729dc2
02c0: 33 61 62 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 3ab4..tcltest::t
02d0: 65 73 74 20 42 6c 6f 63 6b 5f 44 45 53 2d 45 44 est Block_DES-ED
02e0: 45 33 2d 43 46 42 38 2d 31 2e 32 20 7b 44 65 63 E3-CFB8-1.2 {Dec
02f0: 72 79 70 74 20 44 45 53 2d 45 44 45 33 2d 43 46 rypt DES-EDE3-CF
0300: 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 B8} \..-constrai
0310: 6e 74 73 20 44 45 53 5f 45 44 45 33 5f 43 46 42 nts DES_EDE3_CFB
0320: 38 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 8 \..-body {bina
0330: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
0340: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
0350: 68 65 72 20 44 45 53 2d 45 44 45 33 2d 43 46 42 her DES-EDE3-CFB
0360: 38 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 8 -padding 0 \..
0370: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
0380: 65 63 6f 64 65 20 68 65 78 20 30 31 32 33 34 35 ecode hex 012345
0390: 36 37 38 39 61 62 63 64 65 66 32 33 34 35 36 37 6789abcdef234567
03a0: 38 39 61 62 63 64 65 66 30 31 34 35 36 37 38 39 89abcdef01456789
03b0: 61 62 63 64 65 66 30 31 32 33 5d 20 5c 0a 09 09 abcdef0123] \...
03c0: 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 -iv [binary dec
03d0: 6f 64 65 20 68 65 78 20 66 36 39 66 32 34 34 35 ode hex f69f2445
03e0: 64 66 34 66 39 62 31 37 5d 20 5c 0a 09 09 20 2d df4f9b17] \... -
03f0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0400: 6f 64 65 20 68 65 78 20 30 37 39 35 31 62 37 32 ode hex 07951b72
0410: 39 64 63 32 33 61 62 34 5d 5d 7d 20 5c 0a 09 2d 9dc23ab4]]} \..-
0420: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0430: 75 6c 74 20 36 62 63 31 62 65 65 32 32 65 34 30 ult 6bc1bee22e40
0440: 39 66 39 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 9f96..tcltest::t
0450: 65 73 74 20 42 6c 6f 63 6b 5f 44 45 53 2d 45 44 est Block_DES-ED
0460: 45 33 2d 43 46 42 38 2d 31 2e 33 20 7b 45 6e 63 E3-CFB8-1.3 {Enc
0470: 72 79 70 74 20 44 45 53 2d 45 44 45 33 2d 43 46 rypt DES-EDE3-CF
0480: 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 B8} \..-constrai
0490: 6e 74 73 20 44 45 53 5f 45 44 45 33 5f 43 46 42 nts DES_EDE3_CFB
04a0: 38 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 8 \..-body {bina
04b0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
04c0: 6c 73 3a 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 ls::encrypt -cip
04d0: 68 65 72 20 44 45 53 2d 45 44 45 33 2d 43 46 42 her DES-EDE3-CFB
04e0: 38 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 8 -padding 0 \..
04f0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
0500: 65 63 6f 64 65 20 68 65 78 20 30 31 32 33 34 35 ecode hex 012345
0510: 36 37 38 39 61 62 63 64 65 66 32 33 34 35 36 37 6789abcdef234567
0520: 38 39 61 62 63 64 65 66 30 31 30 31 32 33 34 35 89abcdef01012345
0530: 36 37 38 39 61 62 63 64 65 66 5d 20 5c 0a 09 09 6789abcdef] \...
0540: 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 -iv [binary dec
0550: 6f 64 65 20 68 65 78 20 66 36 39 66 32 34 34 35 ode hex f69f2445
0560: 64 66 34 66 39 62 31 37 5d 20 5c 0a 09 09 20 2d df4f9b17] \... -
0570: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0580: 6f 64 65 20 68 65 78 20 36 62 63 31 62 65 65 32 ode hex 6bc1bee2
0590: 32 65 34 30 39 66 39 36 5d 5d 7d 20 5c 0a 09 2d 2e409f96]]} \..-
05a0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
05b0: 75 6c 74 20 36 31 64 38 36 64 39 61 65 65 39 36 ult 61d86d9aee96
05c0: 39 33 66 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 93fd..tcltest::t
05d0: 65 73 74 20 42 6c 6f 63 6b 5f 44 45 53 2d 45 44 est Block_DES-ED
05e0: 45 33 2d 43 46 42 38 2d 31 2e 34 20 7b 44 65 63 E3-CFB8-1.4 {Dec
05f0: 72 79 70 74 20 44 45 53 2d 45 44 45 33 2d 43 46 rypt DES-EDE3-CF
0600: 42 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 B8} \..-constrai
0610: 6e 74 73 20 44 45 53 5f 45 44 45 33 5f 43 46 42 nts DES_EDE3_CFB
0620: 38 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 8 \..-body {bina
0630: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
0640: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
0650: 68 65 72 20 44 45 53 2d 45 44 45 33 2d 43 46 42 her DES-EDE3-CFB
0660: 38 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 8 -padding 0 \..
0670: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
0680: 65 63 6f 64 65 20 68 65 78 20 30 31 32 33 34 35 ecode hex 012345
0690: 36 37 38 39 61 62 63 64 65 66 32 33 34 35 36 37 6789abcdef234567
06a0: 38 39 61 62 63 64 65 66 30 31 30 31 32 33 34 35 89abcdef01012345
06b0: 36 37 38 39 61 62 63 64 65 66 5d 20 5c 0a 09 09 6789abcdef] \...
06c0: 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 -iv [binary dec
06d0: 6f 64 65 20 68 65 78 20 66 36 39 66 32 34 34 35 ode hex f69f2445
06e0: 64 66 34 66 39 62 31 37 5d 20 5c 0a 09 09 20 2d df4f9b17] \... -
06f0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0700: 6f 64 65 20 68 65 78 20 36 31 64 38 36 64 39 61 ode hex 61d86d9a
0710: 65 65 39 36 39 33 66 64 5d 5d 7d 20 5c 0a 09 2d ee9693fd]]} \..-
0720: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0730: 75 6c 74 20 36 62 63 31 62 65 65 32 32 65 34 30 ult 6bc1bee22e40
0740: 39 66 39 36 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 9f96..# Cleanup.
0750: 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e ::tcltest::clean
0760: 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a upTests.return.