Artifact
d14d6c41f8fdae6c7f199379af0aa95180ba292e54d755d000bbf9a790b145b0:
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 43 4d 41 43 2d 41 45 53 2d from "CMAC-AES-
0020: 31 32 38 2d 43 42 43 2e 74 78 74 22 0a 6c 61 70 128-CBC.txt".lap
0030: 70 65 6e 64 20 61 75 74 6f 5f 70 61 74 68 20 5b pend auto_path [
0040: 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 file dirname [fi
0050: 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 le dirname [file
0060: 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 dirname [file d
0070: 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 6a 6f 69 irname [file joi
0080: 6e 20 5b 70 77 64 5d 20 5b 69 6e 66 6f 20 73 63 n [pwd] [info sc
0090: 72 69 70 74 5d 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 ript]]]]]].packa
00a0: 67 65 20 72 65 71 75 69 72 65 20 74 6c 73 0a 70 ge require tls.p
00b0: 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 74 ackage require t
00c0: 63 6c 74 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a cltest..tcltest:
00d0: 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 :testConstraint
00e0: 43 4d 41 43 20 5b 65 78 70 72 20 7b 5b 6c 73 65 CMAC [expr {[lse
00f0: 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c arch -nocase [tl
0100: 73 3a 3a 6d 61 63 73 5d 20 43 4d 41 43 5d 20 3e s::macs] CMAC] >
0110: 20 2d 31 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a 74 -1}].tcltest::t
0120: 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 41 45 estConstraint AE
0130: 53 5f 31 32 38 5f 43 42 43 20 5b 65 78 70 72 20 S_128_CBC [expr
0140: 7b 5b 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 {[lsearch -nocas
0150: 65 20 5b 74 6c 73 3a 3a 63 69 70 68 65 72 73 5d e [tls::ciphers]
0160: 20 41 45 53 2d 31 32 38 2d 43 42 43 5d 20 3e 20 AES-128-CBC] >
0170: 2d 31 7d 5d 0a 63 61 74 63 68 20 7b 74 6c 73 3a -1}].catch {tls:
0180: 3a 70 72 6f 76 69 64 65 72 20 6c 65 67 61 63 79 :provider legacy
0190: 7d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 }..tcltest::test
01a0: 20 4d 41 43 5f 43 4d 41 43 2d 41 45 53 2d 31 32 MAC_CMAC-AES-12
01b0: 38 2d 43 42 43 2d 31 2e 31 20 7b 43 4d 41 43 2d 8-CBC-1.1 {CMAC-
01c0: 41 45 53 2d 31 32 38 2d 43 42 43 7d 20 5c 0a 09 AES-128-CBC} \..
01d0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 43 4d -constraints {CM
01e0: 41 43 20 20 41 45 53 5f 31 32 38 5f 43 42 43 7d AC AES_128_CBC}
01f0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
0200: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
0210: 61 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 63 20 ange [tls::cmac
0220: 2d 68 65 78 20 2d 63 69 70 68 65 72 20 41 45 53 -hex -cipher AES
0230: 2d 31 32 38 2d 43 42 43 20 2d 6b 65 79 20 5b 62 -128-CBC -key [b
0240: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0250: 20 32 62 37 65 31 35 31 36 32 38 61 65 64 32 61 2b7e151628aed2a
0260: 36 61 62 66 37 31 35 38 38 30 39 63 66 34 66 33 6abf7158809cf4f3
0270: 63 5d 20 2d 64 61 74 61 20 22 22 5d 20 30 20 33 c] -data ""] 0 3
0280: 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 1} \..-match exa
0290: 63 74 20 2d 72 65 73 75 6c 74 20 62 62 31 64 36 ct -result bb1d6
02a0: 39 32 39 65 39 35 39 33 37 32 38 37 66 61 33 37 929e95937287fa37
02b0: 64 31 32 39 62 37 35 36 37 34 36 0a 0a 74 63 6c d129b756746..tcl
02c0: 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 43 test::test MAC_C
02d0: 4d 41 43 2d 41 45 53 2d 31 32 38 2d 43 42 43 2d MAC-AES-128-CBC-
02e0: 31 2e 32 20 7b 43 4d 41 43 2d 41 45 53 2d 31 32 1.2 {CMAC-AES-12
02f0: 38 2d 43 42 43 7d 20 5c 0a 09 2d 63 6f 6e 73 74 8-CBC} \..-const
0300: 72 61 69 6e 74 73 20 7b 43 4d 41 43 20 20 41 45 raints {CMAC AE
0310: 53 5f 31 32 38 5f 43 42 43 7d 20 5c 0a 09 2d 73 S_128_CBC} \..-s
0320: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
0330: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
0340: 74 6c 73 3a 3a 63 6d 61 63 20 2d 68 65 78 20 2d tls::cmac -hex -
0350: 63 69 70 68 65 72 20 41 45 53 2d 31 32 38 2d 43 cipher AES-128-C
0360: 42 43 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 BC -key [binary
0370: 64 65 63 6f 64 65 20 68 65 78 20 32 62 37 65 31 decode hex 2b7e1
0380: 35 31 36 32 38 61 65 64 32 61 36 61 62 66 37 31 51628aed2a6abf71
0390: 35 38 38 30 39 63 66 34 66 33 63 5d 20 2d 64 61 58809cf4f3c] -da
03a0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
03b0: 65 20 68 65 78 20 36 62 63 31 62 65 65 32 32 65 e hex 6bc1bee22e
03c0: 34 30 39 66 39 36 65 39 33 64 37 65 31 31 37 33 409f96e93d7e1173
03d0: 39 33 31 37 32 61 5d 5d 20 30 20 33 31 7d 20 5c 93172a]] 0 31} \
03e0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
03f0: 72 65 73 75 6c 74 20 30 37 30 61 31 36 62 34 36 result 070a16b46
0400: 62 34 64 34 31 34 34 66 37 39 62 64 64 39 64 64 b4d4144f79bdd9dd
0410: 30 34 61 32 38 37 63 0a 0a 74 63 6c 74 65 73 74 04a287c..tcltest
0420: 3a 3a 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d ::test MAC_CMAC-
0430: 41 45 53 2d 31 32 38 2d 43 42 43 2d 31 2e 33 20 AES-128-CBC-1.3
0440: 7b 43 4d 41 43 2d 41 45 53 2d 31 32 38 2d 43 42 {CMAC-AES-128-CB
0450: 43 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e C} \..-constrain
0460: 74 73 20 7b 43 4d 41 43 20 20 41 45 53 5f 31 32 ts {CMAC AES_12
0470: 38 5f 43 42 43 7d 20 5c 0a 09 2d 73 65 74 75 70 8_CBC} \..-setup
0480: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
0490: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
04a0: 3a 63 6d 61 63 20 2d 68 65 78 20 2d 63 69 70 68 :cmac -hex -ciph
04b0: 65 72 20 41 45 53 2d 31 32 38 2d 43 42 43 20 2d er AES-128-CBC -
04c0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
04d0: 64 65 20 68 65 78 20 32 62 37 65 31 35 31 36 32 de hex 2b7e15162
04e0: 38 61 65 64 32 61 36 61 62 66 37 31 35 38 38 30 8aed2a6abf715880
04f0: 39 63 66 34 66 33 63 5d 20 2d 64 61 74 61 20 5b 9cf4f3c] -data [
0500: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0510: 78 20 36 62 63 31 62 65 65 32 32 65 34 30 39 66 x 6bc1bee22e409f
0520: 39 36 65 39 33 64 37 65 31 31 37 33 39 33 31 37 96e93d7e11739317
0530: 32 61 61 65 32 64 38 61 35 37 31 65 30 33 61 63 2aae2d8a571e03ac
0540: 39 63 39 65 62 37 36 66 61 63 34 35 61 66 38 65 9c9eb76fac45af8e
0550: 35 31 33 30 63 38 31 63 34 36 61 33 35 63 65 34 5130c81c46a35ce4
0560: 31 31 5d 5d 20 30 20 33 31 7d 20 5c 0a 09 2d 6d 11]] 0 31} \..-m
0570: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
0580: 6c 74 20 64 66 61 36 36 37 34 37 64 65 39 61 65 lt dfa66747de9ae
0590: 36 33 30 33 30 63 61 33 32 36 31 31 34 39 37 63 63030ca32611497c
05a0: 38 32 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 827..tcltest::te
05b0: 73 74 20 4d 41 43 5f 43 4d 41 43 2d 41 45 53 2d st MAC_CMAC-AES-
05c0: 31 32 38 2d 43 42 43 2d 31 2e 34 20 7b 43 4d 41 128-CBC-1.4 {CMA
05d0: 43 2d 41 45 53 2d 31 32 38 2d 43 42 43 7d 20 5c C-AES-128-CBC} \
05e0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
05f0: 43 4d 41 43 20 20 41 45 53 5f 31 32 38 5f 43 42 CMAC AES_128_CB
0600: 43 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 C} \..-setup {}
0610: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 \..-body {string
0620: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 range [tls::cma
0630: 63 20 2d 68 65 78 20 2d 63 69 70 68 65 72 20 41 c -hex -cipher A
0640: 45 53 2d 31 32 38 2d 43 42 43 20 2d 6b 65 79 20 ES-128-CBC -key
0650: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
0660: 65 78 20 32 62 37 65 31 35 31 36 32 38 61 65 64 ex 2b7e151628aed
0670: 32 61 36 61 62 66 37 31 35 38 38 30 39 63 66 34 2a6abf7158809cf4
0680: 66 33 63 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61 f3c] -data [bina
0690: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 62 ry decode hex 6b
06a0: 63 31 62 65 65 32 32 65 34 30 39 66 39 36 65 39 c1bee22e409f96e9
06b0: 33 64 37 65 31 31 37 33 39 33 31 37 32 61 61 65 3d7e117393172aae
06c0: 32 64 38 61 35 37 31 65 30 33 61 63 39 63 39 65 2d8a571e03ac9c9e
06d0: 62 37 36 66 61 63 34 35 61 66 38 65 35 31 33 30 b76fac45af8e5130
06e0: 63 38 31 63 34 36 61 33 35 63 65 34 31 31 65 35 c81c46a35ce411e5
06f0: 66 62 63 31 31 39 31 61 30 61 35 32 65 66 66 36 fbc1191a0a52eff6
0700: 39 66 32 34 34 35 64 66 34 66 39 62 31 37 61 64 9f2445df4f9b17ad
0710: 32 62 34 31 37 62 65 36 36 63 33 37 31 30 5d 5d 2b417be66c3710]]
0720: 20 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 0 31} \..-match
0730: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 exact -result 5
0740: 31 66 30 62 65 62 66 37 65 33 62 39 64 39 32 66 1f0bebf7e3b9d92f
0750: 63 34 39 37 34 31 37 37 39 33 36 33 63 66 65 0a c49741779363cfe.
0760: 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c .# Cleanup.::tcl
0770: 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 test::cleanupTes
0780: 74 73 0a 72 65 74 75 72 6e 0a ts.return.