Artifact
d6a54b5c736f304e4c0de3c3814a27f1e18adcf75212905c31b0325cbe9748d1:
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 53 79 tcltest::test Sy
0150: 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f 41 45 53 metric_Block_AES
0160: 2d 31 32 38 2d 45 43 42 2d 31 2e 31 20 7b 45 6e -128-ECB-1.1 {En
0170: 63 72 79 70 74 20 41 45 53 2d 31 32 38 2d 45 43 crypt AES-128-EC
0180: 42 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e B} \..-constrain
0190: 74 73 20 41 45 53 5f 31 32 38 5f 45 43 42 20 5c ts AES_128_ECB \
01a0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
01b0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
01c0: 3a 65 6e 63 72 79 70 74 20 2d 63 69 70 68 65 72 :encrypt -cipher
01d0: 20 41 45 53 2d 31 32 38 2d 45 43 42 20 2d 70 61 AES-128-ECB -pa
01e0: 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 dding 0 \... -ke
01f0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
0200: 20 68 65 78 20 32 62 37 65 31 35 31 36 32 38 61 hex 2b7e151628a
0210: 65 64 32 61 36 61 62 66 37 31 35 38 38 30 39 63 ed2a6abf7158809c
0220: 66 34 66 33 63 5d 20 5c 0a 09 09 20 2d 64 61 74 f4f3c] \... -dat
0230: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
0240: 20 68 65 78 20 36 62 63 31 62 65 65 32 32 65 34 hex 6bc1bee22e4
0250: 30 39 66 39 36 65 39 33 64 37 65 31 31 37 33 39 09f96e93d7e11739
0260: 33 31 37 32 61 61 65 32 64 38 61 35 37 31 65 30 3172aae2d8a571e0
0270: 33 61 63 39 63 39 65 62 37 36 66 61 63 34 35 61 3ac9c9eb76fac45a
0280: 66 38 65 35 31 33 30 63 38 31 63 34 36 61 33 35 f8e5130c81c46a35
0290: 63 65 34 31 31 65 35 66 62 63 31 31 39 31 61 30 ce411e5fbc1191a0
02a0: 61 35 32 65 66 66 36 39 66 32 34 34 35 64 66 34 a52eff69f2445df4
02b0: 66 39 62 31 37 61 64 32 62 34 31 37 62 65 36 36 f9b17ad2b417be66
02c0: 63 33 37 31 30 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 c3710]]} \..-mat
02d0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
02e0: 20 33 61 64 37 37 62 62 34 30 64 37 61 33 36 36 3ad77bb40d7a366
02f0: 30 61 38 39 65 63 61 66 33 32 34 36 36 65 66 39 0a89ecaf32466ef9
0300: 37 66 35 64 33 64 35 38 35 30 33 62 39 36 39 39 7f5d3d58503b9699
0310: 64 65 37 38 35 38 39 35 61 39 36 66 64 62 61 61 de785895a96fdbaa
0320: 66 34 33 62 31 63 64 37 66 35 39 38 65 63 65 32 f43b1cd7f598ece2
0330: 33 38 38 31 62 30 30 65 33 65 64 30 33 30 36 38 3881b00e3ed03068
0340: 38 37 62 30 63 37 38 35 65 32 37 65 38 61 64 33 87b0c785e27e8ad3
0350: 66 38 32 32 33 32 30 37 31 30 34 37 32 35 64 64 f8223207104725dd
0360: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 4..tcltest::test
0370: 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b 5f Symetric_Block_
0380: 41 45 53 2d 31 32 38 2d 45 43 42 2d 31 2e 32 20 AES-128-ECB-1.2
0390: 7b 44 65 63 72 79 70 74 20 41 45 53 2d 31 32 38 {Decrypt AES-128
03a0: 2d 45 43 42 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 -ECB} \..-constr
03b0: 61 69 6e 74 73 20 41 45 53 5f 31 32 38 5f 45 43 aints AES_128_EC
03c0: 42 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 B \..-body {bina
03d0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 ry encode hex [t
03e0: 6c 73 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 ls::decrypt -cip
03f0: 68 65 72 20 41 45 53 2d 31 32 38 2d 45 43 42 20 her AES-128-ECB
0400: 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 -padding 0 \...
0410: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
0420: 6f 64 65 20 68 65 78 20 32 62 37 65 31 35 31 36 ode hex 2b7e1516
0430: 32 38 61 65 64 32 61 36 61 62 66 37 31 35 38 38 28aed2a6abf71588
0440: 30 39 63 66 34 66 33 63 5d 20 5c 0a 09 09 20 2d 09cf4f3c] \... -
0450: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0460: 6f 64 65 20 68 65 78 20 33 61 64 37 37 62 62 34 ode hex 3ad77bb4
0470: 30 64 37 61 33 36 36 30 61 38 39 65 63 61 66 33 0d7a3660a89ecaf3
0480: 32 34 36 36 65 66 39 37 66 35 64 33 64 35 38 35 2466ef97f5d3d585
0490: 30 33 62 39 36 39 39 64 65 37 38 35 38 39 35 61 03b9699de785895a
04a0: 39 36 66 64 62 61 61 66 34 33 62 31 63 64 37 66 96fdbaaf43b1cd7f
04b0: 35 39 38 65 63 65 32 33 38 38 31 62 30 30 65 33 598ece23881b00e3
04c0: 65 64 30 33 30 36 38 38 37 62 30 63 37 38 35 65 ed0306887b0c785e
04d0: 32 37 65 38 61 64 33 66 38 32 32 33 32 30 37 31 27e8ad3f82232071
04e0: 30 34 37 32 35 64 64 34 5d 5d 7d 20 5c 0a 09 2d 04725dd4]]} \..-
04f0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0500: 75 6c 74 20 36 62 63 31 62 65 65 32 32 65 34 30 ult 6bc1bee22e40
0510: 39 66 39 36 65 39 33 64 37 65 31 31 37 33 39 33 9f96e93d7e117393
0520: 31 37 32 61 61 65 32 64 38 61 35 37 31 65 30 33 172aae2d8a571e03
0530: 61 63 39 63 39 65 62 37 36 66 61 63 34 35 61 66 ac9c9eb76fac45af
0540: 38 65 35 31 33 30 63 38 31 63 34 36 61 33 35 63 8e5130c81c46a35c
0550: 65 34 31 31 65 35 66 62 63 31 31 39 31 61 30 61 e411e5fbc1191a0a
0560: 35 32 65 66 66 36 39 66 32 34 34 35 64 66 34 66 52eff69f2445df4f
0570: 39 62 31 37 61 64 32 62 34 31 37 62 65 36 36 63 9b17ad2b417be66c
0580: 33 37 31 30 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3710..# Cleanup.
0590: 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e ::tcltest::clean
05a0: 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a upTests.return.