Artifact
65c5b321f90922007d2912484ab7fafe17d3514ebea214cdf1f1b39ec881630a:
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 43 from "AES-128-C
0020: 42 43 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 20 BC.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: 43 42 43 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 CBC [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 43 42 43 5d 20 3e 20 2d 31 7d 5d 0a 0a 28-CBC] > -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 43 42 43 2d ock_AES-128-CBC-
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 43 42 43 7d 20 5c 0a 09 2d 63 6f -128-CBC} \..-co
0180: 6e 73 74 72 61 69 6e 74 73 20 41 45 53 5f 31 32 nstraints AES_12
0190: 38 5f 43 42 43 20 5c 0a 09 2d 62 6f 64 79 20 7b 8_CBC \..-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: 43 42 43 20 2d 70 61 64 64 69 6e 67 20 30 20 5c CBC -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 69 76 20 5b 62 69 6e 61 72 79 20 64 .. -iv [binary d
0230: 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 ecode hex 000102
0240: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61 030405060708090a
0250: 30 62 30 63 30 64 30 65 30 66 5d 20 5c 0a 09 09 0b0c0d0e0f] \...
0260: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
0270: 65 63 6f 64 65 20 68 65 78 20 36 62 63 31 62 65 ecode hex 6bc1be
0280: 65 32 32 65 34 30 39 66 39 36 65 39 33 64 37 65 e22e409f96e93d7e
0290: 31 31 37 33 39 33 31 37 32 61 61 65 32 64 38 61 117393172aae2d8a
02a0: 35 37 31 65 30 33 61 63 39 63 39 65 62 37 36 66 571e03ac9c9eb76f
02b0: 61 63 34 35 61 66 38 65 35 31 33 30 63 38 31 63 ac45af8e5130c81c
02c0: 34 36 61 33 35 63 65 34 31 31 65 35 66 62 63 31 46a35ce411e5fbc1
02d0: 31 39 31 61 30 61 35 32 65 66 66 36 39 66 32 34 191a0a52eff69f24
02e0: 34 35 64 66 34 66 39 62 31 37 61 64 32 62 34 31 45df4f9b17ad2b41
02f0: 37 62 65 36 36 63 33 37 31 30 5d 5d 7d 20 5c 0a 7be66c3710]]} \.
0300: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0310: 65 73 75 6c 74 20 37 36 34 39 61 62 61 63 38 31 esult 7649abac81
0320: 31 39 62 32 34 36 63 65 65 39 38 65 39 62 31 32 19b246cee98e9b12
0330: 65 39 31 39 37 64 35 30 38 36 63 62 39 62 35 30 e9197d5086cb9b50
0340: 37 32 31 39 65 65 39 35 64 62 31 31 33 61 39 31 7219ee95db113a91
0350: 37 36 37 38 62 32 37 33 62 65 64 36 62 38 65 33 7678b273bed6b8e3
0360: 63 31 37 34 33 62 37 31 31 36 65 36 39 65 32 32 c1743b7116e69e22
0370: 32 32 39 35 31 36 33 66 66 31 63 61 61 31 36 38 2295163ff1caa168
0380: 31 66 61 63 30 39 31 32 30 65 63 61 33 30 37 35 1fac09120eca3075
0390: 38 36 65 31 61 37 0a 0a 74 63 6c 74 65 73 74 3a 86e1a7..tcltest:
03a0: 3a 74 65 73 74 20 42 6c 6f 63 6b 5f 41 45 53 2d :test Block_AES-
03b0: 31 32 38 2d 43 42 43 2d 31 2e 32 20 7b 44 65 63 128-CBC-1.2 {Dec
03c0: 72 79 70 74 20 41 45 53 2d 31 32 38 2d 43 42 43 rypt AES-128-CBC
03d0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
03e0: 73 20 41 45 53 5f 31 32 38 5f 43 42 43 20 5c 0a s AES_128_CBC \.
03f0: 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 .-body {binary e
0400: 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a ncode hex [tls::
0410: 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 decrypt -cipher
0420: 41 45 53 2d 31 32 38 2d 43 42 43 20 2d 70 61 64 AES-128-CBC -pad
0430: 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 ding 0 \... -key
0440: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0450: 68 65 78 20 32 62 37 65 31 35 31 36 32 38 61 65 hex 2b7e151628ae
0460: 64 32 61 36 61 62 66 37 31 35 38 38 30 39 63 66 d2a6abf7158809cf
0470: 34 66 33 63 5d 20 5c 0a 09 09 20 2d 69 76 20 5b 4f3c] \... -iv [
0480: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0490: 78 20 30 30 30 31 30 32 30 33 30 34 30 35 30 36 x 00010203040506
04a0: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 0708090a0b0c0d0e
04b0: 30 66 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 0f] \... -data [
04c0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
04d0: 78 20 37 36 34 39 61 62 61 63 38 31 31 39 62 32 x 7649abac8119b2
04e0: 34 36 63 65 65 39 38 65 39 62 31 32 65 39 31 39 46cee98e9b12e919
04f0: 37 64 35 30 38 36 63 62 39 62 35 30 37 32 31 39 7d5086cb9b507219
0500: 65 65 39 35 64 62 31 31 33 61 39 31 37 36 37 38 ee95db113a917678
0510: 62 32 37 33 62 65 64 36 62 38 65 33 63 31 37 34 b273bed6b8e3c174
0520: 33 62 37 31 31 36 65 36 39 65 32 32 32 32 39 35 3b7116e69e222295
0530: 31 36 33 66 66 31 63 61 61 31 36 38 31 66 61 63 163ff1caa1681fac
0540: 30 39 31 32 30 65 63 61 33 30 37 35 38 36 65 31 09120eca307586e1
0550: 61 37 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 a7]]} \..-match
0560: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 62 exact -result 6b
0570: 63 31 62 65 65 32 32 65 34 30 39 66 39 36 65 39 c1bee22e409f96e9
0580: 33 64 37 65 31 31 37 33 39 33 31 37 32 61 61 65 3d7e117393172aae
0590: 32 64 38 61 35 37 31 65 30 33 61 63 39 63 39 65 2d8a571e03ac9c9e
05a0: 62 37 36 66 61 63 34 35 61 66 38 65 35 31 33 30 b76fac45af8e5130
05b0: 63 38 31 63 34 36 61 33 35 63 65 34 31 31 65 35 c81c46a35ce411e5
05c0: 66 62 63 31 31 39 31 61 30 61 35 32 65 66 66 36 fbc1191a0a52eff6
05d0: 39 66 32 34 34 35 64 66 34 66 39 62 31 37 61 64 9f2445df4f9b17ad
05e0: 32 62 34 31 37 62 65 36 36 63 33 37 31 30 0a 0a 2b417be66c3710..
05f0: 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 # Cleanup.::tclt
0600: 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 est::cleanupTest
0610: 73 0a 72 65 74 75 72 6e 0a s.return.