Artifact
d0e873f0170c970562c3412f725f4610979f1b34c42a8e3bfba4eeae1cd69ba3:
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 41 45 53 2d 31 32 38 2d 45 from "AES-128-E
0020: 43 42 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 20 CB.txt".lappend
0030: 61 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c 65 20 auto_path [file
0040: 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 dirname [file di
0050: 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e rname [file dirn
0060: 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d ame [file dirnam
0070: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 e [file join [pw
0080: 64 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d d] [info script]
0090: 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 72 65 ]]]]].package re
00a0: 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 quire tls.packag
00b0: 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 e require tcltes
00c0: 74 0a 0a 63 61 74 63 68 20 7b 74 6c 73 3a 3a 70 t..catch {tls::p
00d0: 72 6f 76 69 64 65 72 20 6c 65 67 61 63 79 7d 0a rovider legacy}.
00e0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f 6e tcltest::testCon
00f0: 73 74 72 61 69 6e 74 20 41 45 53 5f 31 32 38 5f straint AES_128_
0100: 45 43 42 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 ECB [expr {[lsea
0110: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 rch -nocase [tls
0120: 3a 3a 63 69 70 68 65 72 73 5d 20 41 45 53 2d 31 ::ciphers] AES-1
0130: 32 38 2d 45 43 42 5d 20 3e 20 2d 31 7d 5d 0a 0a 28-ECB] > -1}]..
0140: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 42 6c tcltest::test Bl
0150: 6f 63 6b 5f 41 45 53 2d 31 32 38 2d 45 43 42 2d ock_AES-128-ECB-
0160: 31 2e 31 20 7b 45 6e 63 72 79 70 74 20 41 45 53 1.1 {Encrypt AES
0170: 2d 31 32 38 2d 45 43 42 7d 20 5c 0a 09 2d 63 6f -128-ECB} \..-co
0180: 6e 73 74 72 61 69 6e 74 73 20 41 45 53 5f 31 32 nstraints AES_12
0190: 38 5f 45 43 42 20 5c 0a 09 2d 62 6f 64 79 20 7b 8_ECB \..-body {
01a0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
01b0: 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 20 x [tls::encrypt
01c0: 2d 63 69 70 68 65 72 20 41 45 53 2d 31 32 38 2d -cipher AES-128-
01d0: 45 43 42 20 2d 70 61 64 64 69 6e 67 20 30 20 5c ECB -padding 0 \
01e0: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
01f0: 20 64 65 63 6f 64 65 20 68 65 78 20 32 62 37 65 decode hex 2b7e
0200: 31 35 31 36 32 38 61 65 64 32 61 36 61 62 66 37 151628aed2a6abf7
0210: 31 35 38 38 30 39 63 66 34 66 33 63 5d 20 5c 0a 158809cf4f3c] \.
0220: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
0230: 20 64 65 63 6f 64 65 20 68 65 78 20 36 62 63 31 decode hex 6bc1
0240: 62 65 65 32 32 65 34 30 39 66 39 36 65 39 33 64 bee22e409f96e93d
0250: 37 65 31 31 37 33 39 33 31 37 32 61 61 65 32 64 7e117393172aae2d
0260: 38 61 35 37 31 65 30 33 61 63 39 63 39 65 62 37 8a571e03ac9c9eb7
0270: 36 66 61 63 34 35 61 66 38 65 35 31 33 30 63 38 6fac45af8e5130c8
0280: 31 63 34 36 61 33 35 63 65 34 31 31 65 35 66 62 1c46a35ce411e5fb
0290: 63 31 31 39 31 61 30 61 35 32 65 66 66 36 39 66 c1191a0a52eff69f
02a0: 32 34 34 35 64 66 34 66 39 62 31 37 61 64 32 62 2445df4f9b17ad2b
02b0: 34 31 37 62 65 36 36 63 33 37 31 30 5d 5d 7d 20 417be66c3710]]}
02c0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
02d0: 2d 72 65 73 75 6c 74 20 33 61 64 37 37 62 62 34 -result 3ad77bb4
02e0: 30 64 37 61 33 36 36 30 61 38 39 65 63 61 66 33 0d7a3660a89ecaf3
02f0: 32 34 36 36 65 66 39 37 66 35 64 33 64 35 38 35 2466ef97f5d3d585
0300: 30 33 62 39 36 39 39 64 65 37 38 35 38 39 35 61 03b9699de785895a
0310: 39 36 66 64 62 61 61 66 34 33 62 31 63 64 37 66 96fdbaaf43b1cd7f
0320: 35 39 38 65 63 65 32 33 38 38 31 62 30 30 65 33 598ece23881b00e3
0330: 65 64 30 33 30 36 38 38 37 62 30 63 37 38 35 65 ed0306887b0c785e
0340: 32 37 65 38 61 64 33 66 38 32 32 33 32 30 37 31 27e8ad3f82232071
0350: 30 34 37 32 35 64 64 34 0a 0a 74 63 6c 74 65 73 04725dd4..tcltes
0360: 74 3a 3a 74 65 73 74 20 42 6c 6f 63 6b 5f 41 45 t::test Block_AE
0370: 53 2d 31 32 38 2d 45 43 42 2d 31 2e 32 20 7b 44 S-128-ECB-1.2 {D
0380: 65 63 72 79 70 74 20 41 45 53 2d 31 32 38 2d 45 ecrypt AES-128-E
0390: 43 42 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 CB} \..-constrai
03a0: 6e 74 73 20 41 45 53 5f 31 32 38 5f 45 43 42 20 nts AES_128_ECB
03b0: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
03c0: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
03d0: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
03e0: 72 20 41 45 53 2d 31 32 38 2d 45 43 42 20 2d 70 r AES-128-ECB -p
03f0: 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b adding 0 \... -k
0400: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
0410: 65 20 68 65 78 20 32 62 37 65 31 35 31 36 32 38 e hex 2b7e151628
0420: 61 65 64 32 61 36 61 62 66 37 31 35 38 38 30 39 aed2a6abf7158809
0430: 63 66 34 66 33 63 5d 20 5c 0a 09 09 20 2d 64 61 cf4f3c] \... -da
0440: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0450: 65 20 68 65 78 20 33 61 64 37 37 62 62 34 30 64 e hex 3ad77bb40d
0460: 37 61 33 36 36 30 61 38 39 65 63 61 66 33 32 34 7a3660a89ecaf324
0470: 36 36 65 66 39 37 66 35 64 33 64 35 38 35 30 33 66ef97f5d3d58503
0480: 62 39 36 39 39 64 65 37 38 35 38 39 35 61 39 36 b9699de785895a96
0490: 66 64 62 61 61 66 34 33 62 31 63 64 37 66 35 39 fdbaaf43b1cd7f59
04a0: 38 65 63 65 32 33 38 38 31 62 30 30 65 33 65 64 8ece23881b00e3ed
04b0: 30 33 30 36 38 38 37 62 30 63 37 38 35 65 32 37 0306887b0c785e27
04c0: 65 38 61 64 33 66 38 32 32 33 32 30 37 31 30 34 e8ad3f8223207104
04d0: 37 32 35 64 64 34 5d 5d 7d 20 5c 0a 09 2d 6d 61 725dd4]]} \..-ma
04e0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
04f0: 74 20 36 62 63 31 62 65 65 32 32 65 34 30 39 66 t 6bc1bee22e409f
0500: 39 36 65 39 33 64 37 65 31 31 37 33 39 33 31 37 96e93d7e11739317
0510: 32 61 61 65 32 64 38 61 35 37 31 65 30 33 61 63 2aae2d8a571e03ac
0520: 39 63 39 65 62 37 36 66 61 63 34 35 61 66 38 65 9c9eb76fac45af8e
0530: 35 31 33 30 63 38 31 63 34 36 61 33 35 63 65 34 5130c81c46a35ce4
0540: 31 31 65 35 66 62 63 31 31 39 31 61 30 61 35 32 11e5fbc1191a0a52
0550: 65 66 66 36 39 66 32 34 34 35 64 66 34 66 39 62 eff69f2445df4f9b
0560: 31 37 61 64 32 62 34 31 37 62 65 36 36 63 33 37 17ad2b417be66c37
0570: 31 30 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 10..# Cleanup.::
0580: 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 tcltest::cleanup
0590: 54 65 73 74 73 0a 72 65 74 75 72 6e 0a Tests.return.