Artifact
341b1fef8a6b343a793cb003b8c3c0420ad31e4c8ca2afc44c95a6dbdb72b26c:
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 44 45 53 33 from "CMAC-DES3
0020: 2e 74 78 74 22 0a 70 61 63 6b 61 67 65 20 72 65 .txt".package re
0030: 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 quire tls.packag
0040: 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 e require tcltes
0050: 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 t..tcltest::test
0060: 43 6f 6e 73 74 72 61 69 6e 74 20 43 4d 41 43 20 Constraint CMAC
0070: 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20 [expr {[lsearch
0080: 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 6d 61 -nocase [tls::ma
0090: 63 73 5d 20 43 4d 41 43 5d 20 3e 20 2d 31 7d 5d cs] CMAC] > -1}]
00a0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f .tcltest::testCo
00b0: 6e 73 74 72 61 69 6e 74 20 44 45 53 33 20 5b 65 nstraint DES3 [e
00c0: 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20 2d 6e xpr {[lsearch -n
00d0: 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 63 69 70 68 ocase [tls::ciph
00e0: 65 72 73 5d 20 44 45 53 33 5d 20 3e 20 2d 31 7d ers] DES3] > -1}
00f0: 5d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 ]..tcltest::test
0100: 20 4d 41 43 5f 43 4d 41 43 2d 44 45 53 33 2d 31 MAC_CMAC-DES3-1
0110: 2e 31 20 7b 43 4d 41 43 2d 44 45 53 33 7d 20 5c .1 {CMAC-DES3} \
0120: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
0130: 43 4d 41 43 20 20 44 45 53 33 7d 20 5c 0a 09 2d CMAC DES3} \..-
0140: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
0150: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
0160: 5b 74 6c 73 3a 3a 63 6d 61 63 20 2d 68 65 78 20 [tls::cmac -hex
0170: 2d 63 69 70 68 65 72 20 44 45 53 33 20 2d 6b 65 -cipher DES3 -ke
0180: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
0190: 20 68 65 78 20 38 61 61 38 33 62 66 38 63 62 64 hex 8aa83bf8cbd
01a0: 61 31 30 36 32 30 62 63 31 62 66 31 39 66 62 62 a10620bc1bf19fbb
01b0: 36 63 64 35 38 62 63 33 31 33 64 34 61 33 37 31 6cd58bc313d4a371
01c0: 63 61 38 62 35 5d 20 2d 64 61 74 61 20 22 22 5d ca8b5] -data ""]
01d0: 20 30 20 31 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 0 15} \..-match
01e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 exact -result b
01f0: 37 61 36 38 38 65 31 32 32 66 66 61 66 39 35 0a 7a688e122ffaf95.
0200: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d .tcltest::test M
0210: 41 43 5f 43 4d 41 43 2d 44 45 53 33 2d 31 2e 32 AC_CMAC-DES3-1.2
0220: 20 7b 43 4d 41 43 2d 44 45 53 33 7d 20 5c 0a 09 {CMAC-DES3} \..
0230: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 43 4d -constraints {CM
0240: 41 43 20 20 44 45 53 33 7d 20 5c 0a 09 2d 73 65 AC DES3} \..-se
0250: 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 tup {} \..-body
0260: 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 {string range [t
0270: 6c 73 3a 3a 63 6d 61 63 20 2d 68 65 78 20 2d 63 ls::cmac -hex -c
0280: 69 70 68 65 72 20 44 45 53 33 20 2d 6b 65 79 20 ipher DES3 -key
0290: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
02a0: 65 78 20 38 61 61 38 33 62 66 38 63 62 64 61 31 ex 8aa83bf8cbda1
02b0: 30 36 32 30 62 63 31 62 66 31 39 66 62 62 36 63 0620bc1bf19fbb6c
02c0: 64 35 38 62 63 33 31 33 64 34 61 33 37 31 63 61 d58bc313d4a371ca
02d0: 38 62 35 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61 8b5] -data [bina
02e0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 62 ry decode hex 6b
02f0: 63 31 62 65 65 32 32 65 34 30 39 66 39 36 5d 5d c1bee22e409f96]]
0300: 20 30 20 31 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 0 15} \..-match
0310: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 exact -result 8
0320: 65 38 66 32 39 33 31 33 36 32 38 33 37 39 37 0a e8f293136283797.
0330: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d .tcltest::test M
0340: 41 43 5f 43 4d 41 43 2d 44 45 53 33 2d 31 2e 33 AC_CMAC-DES3-1.3
0350: 20 7b 43 4d 41 43 2d 44 45 53 33 7d 20 5c 0a 09 {CMAC-DES3} \..
0360: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 43 4d -constraints {CM
0370: 41 43 20 20 44 45 53 33 7d 20 5c 0a 09 2d 73 65 AC DES3} \..-se
0380: 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 tup {} \..-body
0390: 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 {string range [t
03a0: 6c 73 3a 3a 63 6d 61 63 20 2d 68 65 78 20 2d 63 ls::cmac -hex -c
03b0: 69 70 68 65 72 20 44 45 53 33 20 2d 6b 65 79 20 ipher DES3 -key
03c0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
03d0: 65 78 20 38 61 61 38 33 62 66 38 63 62 64 61 31 ex 8aa83bf8cbda1
03e0: 30 36 32 30 62 63 31 62 66 31 39 66 62 62 36 63 0620bc1bf19fbb6c
03f0: 64 35 38 62 63 33 31 33 64 34 61 33 37 31 63 61 d58bc313d4a371ca
0400: 38 62 35 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61 8b5] -data [bina
0410: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 62 ry decode hex 6b
0420: 63 31 62 65 65 32 32 65 34 30 39 66 39 36 65 39 c1bee22e409f96e9
0430: 33 64 37 65 31 31 37 33 39 33 31 37 32 61 61 65 3d7e117393172aae
0440: 32 64 38 61 35 37 5d 5d 20 30 20 31 35 7d 20 5c 2d8a57]] 0 15} \
0450: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
0460: 72 65 73 75 6c 74 20 37 34 33 64 64 62 65 30 63 result 743ddbe0c
0470: 65 32 64 63 32 65 64 0a 0a 74 63 6c 74 65 73 74 e2dc2ed..tcltest
0480: 3a 3a 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d ::test MAC_CMAC-
0490: 44 45 53 33 2d 31 2e 34 20 7b 43 4d 41 43 2d 44 DES3-1.4 {CMAC-D
04a0: 45 53 33 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 ES3} \..-constra
04b0: 69 6e 74 73 20 7b 43 4d 41 43 20 20 44 45 53 33 ints {CMAC DES3
04c0: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c } \..-setup {} \
04d0: 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 ..-body {string
04e0: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 63 range [tls::cmac
04f0: 20 2d 68 65 78 20 2d 63 69 70 68 65 72 20 44 45 -hex -cipher DE
0500: 53 33 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 S3 -key [binary
0510: 64 65 63 6f 64 65 20 68 65 78 20 38 61 61 38 33 decode hex 8aa83
0520: 62 66 38 63 62 64 61 31 30 36 32 30 62 63 31 62 bf8cbda10620bc1b
0530: 66 31 39 66 62 62 36 63 64 35 38 62 63 33 31 33 f19fbb6cd58bc313
0540: 64 34 61 33 37 31 63 61 38 62 35 5d 20 2d 64 61 d4a371ca8b5] -da
0550: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0560: 65 20 68 65 78 20 36 62 63 31 62 65 65 32 32 65 e hex 6bc1bee22e
0570: 34 30 39 66 39 36 65 39 33 64 37 65 31 31 37 33 409f96e93d7e1173
0580: 39 33 31 37 32 61 61 65 32 64 38 61 35 37 31 65 93172aae2d8a571e
0590: 30 33 61 63 39 63 39 65 62 37 36 66 61 63 34 35 03ac9c9eb76fac45
05a0: 61 66 38 65 35 31 5d 5d 20 30 20 31 35 7d 20 5c af8e51]] 0 15} \
05b0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
05c0: 72 65 73 75 6c 74 20 33 33 65 36 62 31 30 39 32 result 33e6b1092
05d0: 34 30 30 65 61 65 35 0a 0a 74 63 6c 74 65 73 74 400eae5..tcltest
05e0: 3a 3a 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d ::test MAC_CMAC-
05f0: 44 45 53 33 2d 31 2e 35 20 7b 43 4d 41 43 2d 44 DES3-1.5 {CMAC-D
0600: 45 53 33 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 ES3} \..-constra
0610: 69 6e 74 73 20 7b 43 4d 41 43 20 20 44 45 53 33 ints {CMAC DES3
0620: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c } \..-setup {} \
0630: 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 ..-body {string
0640: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 63 range [tls::cmac
0650: 20 2d 68 65 78 20 2d 63 69 70 68 65 72 20 44 45 -hex -cipher DE
0660: 53 33 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 S3 -key [binary
0670: 64 65 63 6f 64 65 20 68 65 78 20 34 63 66 31 35 decode hex 4cf15
0680: 31 33 34 61 32 38 35 30 64 64 35 38 61 33 64 31 134a2850dd58a3d1
0690: 30 62 61 38 30 35 37 30 64 33 38 34 63 66 31 35 0ba80570d384cf15
06a0: 31 33 34 61 32 38 35 30 64 64 35 5d 20 2d 64 61 134a2850dd5] -da
06b0: 74 61 20 22 22 5d 20 30 20 31 35 7d 20 5c 0a 09 ta ""] 0 15} \..
06c0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
06d0: 73 75 6c 74 20 62 64 32 65 62 66 39 61 33 62 61 sult bd2ebf9a3ba
06e0: 30 30 33 36 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 00361..tcltest::
06f0: 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d 44 45 test MAC_CMAC-DE
0700: 53 33 2d 31 2e 36 20 7b 43 4d 41 43 2d 44 45 53 S3-1.6 {CMAC-DES
0710: 33 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 3} \..-constrain
0720: 74 73 20 7b 43 4d 41 43 20 20 44 45 53 33 7d 20 ts {CMAC DES3}
0730: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 \..-setup {} \..
0740: 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 -body {string ra
0750: 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 63 20 2d nge [tls::cmac -
0760: 68 65 78 20 2d 63 69 70 68 65 72 20 44 45 53 33 hex -cipher DES3
0770: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
0780: 63 6f 64 65 20 68 65 78 20 34 63 66 31 35 31 33 code hex 4cf1513
0790: 34 61 32 38 35 30 64 64 35 38 61 33 64 31 30 62 4a2850dd58a3d10b
07a0: 61 38 30 35 37 30 64 33 38 34 63 66 31 35 31 33 a80570d384cf1513
07b0: 34 61 32 38 35 30 64 64 35 5d 20 2d 64 61 74 61 4a2850dd5] -data
07c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
07d0: 68 65 78 20 36 62 63 31 62 65 65 32 32 65 34 30 hex 6bc1bee22e40
07e0: 39 66 39 36 5d 5d 20 30 20 31 35 7d 20 5c 0a 09 9f96]] 0 15} \..
07f0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0800: 73 75 6c 74 20 34 66 66 32 61 62 38 31 33 63 35 sult 4ff2ab813c5
0810: 33 63 65 38 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 3ce83..tcltest::
0820: 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d 44 45 test MAC_CMAC-DE
0830: 53 33 2d 31 2e 37 20 7b 43 4d 41 43 2d 44 45 53 S3-1.7 {CMAC-DES
0840: 33 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 3} \..-constrain
0850: 74 73 20 7b 43 4d 41 43 20 20 44 45 53 33 7d 20 ts {CMAC DES3}
0860: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 \..-setup {} \..
0870: 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 -body {string ra
0880: 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61 63 20 2d nge [tls::cmac -
0890: 68 65 78 20 2d 63 69 70 68 65 72 20 44 45 53 33 hex -cipher DES3
08a0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
08b0: 63 6f 64 65 20 68 65 78 20 34 63 66 31 35 31 33 code hex 4cf1513
08c0: 34 61 32 38 35 30 64 64 35 38 61 33 64 31 30 62 4a2850dd58a3d10b
08d0: 61 38 30 35 37 30 64 33 38 34 63 66 31 35 31 33 a80570d384cf1513
08e0: 34 61 32 38 35 30 64 64 35 5d 20 2d 64 61 74 61 4a2850dd5] -data
08f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0900: 68 65 78 20 36 62 63 31 62 65 65 32 32 65 34 30 hex 6bc1bee22e40
0910: 39 66 39 36 65 39 33 64 37 65 31 31 37 33 39 33 9f96e93d7e117393
0920: 31 37 32 61 61 65 32 64 38 61 35 37 5d 5d 20 30 172aae2d8a57]] 0
0930: 20 31 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 15} \..-match e
0940: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 32 64 xact -result 62d
0950: 64 31 62 34 37 31 39 30 32 62 64 34 65 0a 0a 74 d1b471902bd4e..t
0960: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 cltest::test MAC
0970: 5f 43 4d 41 43 2d 44 45 53 33 2d 31 2e 38 20 7b _CMAC-DES3-1.8 {
0980: 43 4d 41 43 2d 44 45 53 33 7d 20 5c 0a 09 2d 63 CMAC-DES3} \..-c
0990: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 43 4d 41 43 onstraints {CMAC
09a0: 20 20 44 45 53 33 7d 20 5c 0a 09 2d 73 65 74 75 DES3} \..-setu
09b0: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
09c0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
09d0: 3a 3a 63 6d 61 63 20 2d 68 65 78 20 2d 63 69 70 ::cmac -hex -cip
09e0: 68 65 72 20 44 45 53 33 20 2d 6b 65 79 20 5b 62 her DES3 -key [b
09f0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0a00: 20 34 63 66 31 35 31 33 34 61 32 38 35 30 64 64 4cf15134a2850dd
0a10: 35 38 61 33 64 31 30 62 61 38 30 35 37 30 64 33 58a3d10ba80570d3
0a20: 38 34 63 66 31 35 31 33 34 61 32 38 35 30 64 64 84cf15134a2850dd
0a30: 35 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 5] -data [binary
0a40: 20 64 65 63 6f 64 65 20 68 65 78 20 36 62 63 31 decode hex 6bc1
0a50: 62 65 65 32 32 65 34 30 39 66 39 36 65 39 33 64 bee22e409f96e93d
0a60: 37 65 31 31 37 33 39 33 31 37 32 61 61 65 32 64 7e117393172aae2d
0a70: 38 61 35 37 31 65 30 33 61 63 39 63 39 65 62 37 8a571e03ac9c9eb7
0a80: 36 66 61 63 34 35 61 66 38 65 35 31 5d 5d 20 30 6fac45af8e51]] 0
0a90: 20 31 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 15} \..-match e
0aa0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 31 62 xact -result 31b
0ab0: 31 65 34 33 31 64 61 62 63 34 65 62 38 0a 0a 23 1e431dabc4eb8..#
0ac0: 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 Cleanup.::tclte
0ad0: 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 st::cleanupTests
0ae0: 0a 72 65 74 75 72 6e 0a .return.