Artifact
6dc07bce40f57fb145ea0767a9af2e64f6f23c9acee74f12fe034c99dd32a790:
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: 46 42 38 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 FB8.txt".lappend
0030: 20 61 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c 65 auto_path [file
0040: 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 dirname [file d
0050: 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 irname [file dir
0060: 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 name [file dirna
0070: 6d 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 70 me [file join [p
0080: 77 64 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 wd] [info script
0090: 5d 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 72 ]]]]]].package r
00a0: 65 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 equire tls.packa
00b0: 67 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 ge require tclte
00c0: 73 74 0a 0a 63 61 74 63 68 20 7b 74 6c 73 3a 3a st..catch {tls::
00d0: 70 72 6f 76 69 64 65 72 20 6c 65 67 61 63 79 7d provider legacy}
00e0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f .tcltest::testCo
00f0: 6e 73 74 72 61 69 6e 74 20 41 45 53 5f 31 32 38 nstraint AES_128
0100: 5f 43 46 42 38 20 5b 65 78 70 72 20 7b 5b 6c 73 _CFB8 [expr {[ls
0110: 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 earch -nocase [t
0120: 6c 73 3a 3a 63 69 70 68 65 72 73 5d 20 41 45 53 ls::ciphers] AES
0130: 2d 31 32 38 2d 43 46 42 38 5d 20 3e 20 2d 31 7d -128-CFB8] > -1}
0140: 5d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 ]..tcltest::test
0150: 20 42 6c 6f 63 6b 5f 41 45 53 2d 31 32 38 2d 43 Block_AES-128-C
0160: 46 42 38 2d 31 2e 31 20 7b 45 6e 63 72 79 70 74 FB8-1.1 {Encrypt
0170: 20 41 45 53 2d 31 32 38 2d 43 46 42 38 7d 20 5c AES-128-CFB8} \
0180: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 41 ..-constraints A
0190: 45 53 5f 31 32 38 5f 43 46 42 38 20 5c 0a 09 2d ES_128_CFB8 \..-
01a0: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
01b0: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e ode hex [tls::en
01c0: 63 72 79 70 74 20 2d 63 69 70 68 65 72 20 41 45 crypt -cipher AE
01d0: 53 2d 31 32 38 2d 43 46 42 38 20 2d 70 61 64 64 S-128-CFB8 -padd
01e0: 69 6e 67 20 30 20 5c 0a 09 09 20 2d 6b 65 79 20 ing 0 \... -key
01f0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
0200: 65 78 20 32 62 37 65 31 35 31 36 32 38 61 65 64 ex 2b7e151628aed
0210: 32 61 36 61 62 66 37 31 35 38 38 30 39 63 66 34 2a6abf7158809cf4
0220: 66 33 63 5d 20 5c 0a 09 09 20 2d 69 76 20 5b 62 f3c] \... -iv [b
0230: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0240: 20 30 30 30 31 30 32 30 33 30 34 30 35 30 36 30 000102030405060
0250: 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 708090a0b0c0d0e0
0260: 66 5d 20 5c 0a 09 09 20 2d 64 61 74 61 20 5b 62 f] \... -data [b
0270: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0280: 20 36 62 63 31 62 65 65 32 32 65 34 30 39 66 39 6bc1bee22e409f9
0290: 36 65 39 33 64 37 65 31 31 37 33 39 33 31 37 32 6e93d7e117393172
02a0: 61 61 65 32 64 5d 5d 7d 20 5c 0a 09 2d 6d 61 74 aae2d]]} \..-mat
02b0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
02c0: 20 33 62 37 39 34 32 34 63 39 63 30 64 64 34 33 3b79424c9c0dd43
02d0: 36 62 61 63 65 39 65 30 65 64 34 35 38 36 61 34 6bace9e0ed4586a4
02e0: 66 33 32 62 39 0a 0a 74 63 6c 74 65 73 74 3a 3a f32b9..tcltest::
02f0: 74 65 73 74 20 42 6c 6f 63 6b 5f 41 45 53 2d 31 test Block_AES-1
0300: 32 38 2d 43 46 42 38 2d 31 2e 32 20 7b 44 65 63 28-CFB8-1.2 {Dec
0310: 72 79 70 74 20 41 45 53 2d 31 32 38 2d 43 46 42 rypt AES-128-CFB
0320: 38 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 8} \..-constrain
0330: 74 73 20 41 45 53 5f 31 32 38 5f 43 46 42 38 20 ts AES_128_CFB8
0340: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 \..-body {binary
0350: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 encode hex [tls
0360: 3a 3a 64 65 63 72 79 70 74 20 2d 63 69 70 68 65 ::decrypt -ciphe
0370: 72 20 41 45 53 2d 31 32 38 2d 43 46 42 38 20 2d r AES-128-CFB8 -
0380: 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 20 2d padding 0 \... -
0390: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
03a0: 64 65 20 68 65 78 20 32 62 37 65 31 35 31 36 32 de hex 2b7e15162
03b0: 38 61 65 64 32 61 36 61 62 66 37 31 35 38 38 30 8aed2a6abf715880
03c0: 39 63 66 34 66 33 63 5d 20 5c 0a 09 09 20 2d 69 9cf4f3c] \... -i
03d0: 76 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 v [binary decode
03e0: 20 68 65 78 20 30 30 30 31 30 32 30 33 30 34 30 hex 00010203040
03f0: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 5060708090a0b0c0
0400: 64 30 65 30 66 5d 20 5c 0a 09 09 20 2d 64 61 74 d0e0f] \... -dat
0410: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 a [binary decode
0420: 20 68 65 78 20 33 62 37 39 34 32 34 63 39 63 30 hex 3b79424c9c0
0430: 64 64 34 33 36 62 61 63 65 39 65 30 65 64 34 35 dd436bace9e0ed45
0440: 38 36 61 34 66 33 32 62 39 5d 5d 7d 20 5c 0a 09 86a4f32b9]]} \..
0450: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0460: 73 75 6c 74 20 36 62 63 31 62 65 65 32 32 65 34 sult 6bc1bee22e4
0470: 30 39 66 39 36 65 39 33 64 37 65 31 31 37 33 39 09f96e93d7e11739
0480: 33 31 37 32 61 61 65 32 64 0a 0a 23 20 43 6c 65 3172aae2d..# Cle
0490: 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a anup.::tcltest::
04a0: 63 6c 65 61 6e 75 70 54 65 73 74 73 0a 72 65 74 cleanupTests.ret
04b0: 75 72 6e 0a urn.