Artifact
c76103756c7a1255f568ba1bb3581c9c2595205b3eb2bf29ef0728f4e94797ef:
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 39 32 2d 43 42 43 2e 74 78 74 22 0a 6c 61 70  192-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 39 32 5f 43 42 43 20 5b 65 78 70 72 20  S_192_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 39 32 2d 43 42 43 5d 20 3e 20   AES-192-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 39   MAC_CMAC-AES-19
01b0: 32 2d 43 42 43 2d 31 2e 31 20 7b 43 4d 41 43 2d  2-CBC-1.1 {CMAC-
01c0: 41 45 53 2d 31 39 32 2d 43 42 43 7d 20 5c 0a 09  AES-192-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 39 32 5f 43 42 43 7d  AC  AES_192_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 39 32 2d 43 42 43 20 2d 6b 65 79 20 5b 62  -192-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 38 65 37 33 62 30 66 37 64 61 30 65 36 34 35   8e73b0f7da0e645
0260: 32 63 38 31 30 66 33 32 62 38 30 39 30 37 39 65  2c810f32b809079e
0270: 35 36 32 66 38 65 61 64 32 35 32 32 63 36 62 37  562f8ead2522c6b7
0280: 62 5d 20 2d 64 61 74 61 20 22 22 5d 20 30 20 33  b] -data ""] 0 3
0290: 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  1} \..-match exa
02a0: 63 74 20 2d 72 65 73 75 6c 74 20 64 31 37 64 64  ct -result d17dd
02b0: 66 34 36 61 64 61 61 63 64 65 35 33 31 63 61 63  f46adaacde531cac
02c0: 34 38 33 64 65 37 61 39 33 36 37 0a 0a 74 63 6c  483de7a9367..tcl
02d0: 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 43  test::test MAC_C
02e0: 4d 41 43 2d 41 45 53 2d 31 39 32 2d 43 42 43 2d  MAC-AES-192-CBC-
02f0: 31 2e 32 20 7b 43 4d 41 43 2d 41 45 53 2d 31 39  1.2 {CMAC-AES-19
0300: 32 2d 43 42 43 7d 20 5c 0a 09 2d 63 6f 6e 73 74  2-CBC} \..-const
0310: 72 61 69 6e 74 73 20 7b 43 4d 41 43 20 20 41 45  raints {CMAC  AE
0320: 53 5f 31 39 32 5f 43 42 43 7d 20 5c 0a 09 2d 73  S_192_CBC} \..-s
0330: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79  etup {} \..-body
0340: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   {string range [
0350: 74 6c 73 3a 3a 63 6d 61 63 20 2d 68 65 78 20 2d  tls::cmac -hex -
0360: 63 69 70 68 65 72 20 41 45 53 2d 31 39 32 2d 43  cipher AES-192-C
0370: 42 43 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20  BC -key [binary 
0380: 64 65 63 6f 64 65 20 68 65 78 20 38 65 37 33 62  decode hex 8e73b
0390: 30 66 37 64 61 30 65 36 34 35 32 63 38 31 30 66  0f7da0e6452c810f
03a0: 33 32 62 38 30 39 30 37 39 65 35 36 32 66 38 65  32b809079e562f8e
03b0: 61 64 32 35 32 32 63 36 62 37 62 5d 20 2d 64 61  ad2522c6b7b] -da
03c0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
03d0: 65 20 68 65 78 20 36 62 63 31 62 65 65 32 32 65  e hex 6bc1bee22e
03e0: 34 30 39 66 39 36 65 39 33 64 37 65 31 31 37 33  409f96e93d7e1173
03f0: 39 33 31 37 32 61 5d 5d 20 30 20 33 31 7d 20 5c  93172a]] 0 31} \
0400: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0410: 72 65 73 75 6c 74 20 39 65 39 39 61 37 62 66 33  result 9e99a7bf3
0420: 31 65 37 31 30 39 30 30 36 36 32 66 36 35 65 36  1e710900662f65e6
0430: 31 37 63 35 31 38 34 0a 0a 74 63 6c 74 65 73 74  17c5184..tcltest
0440: 3a 3a 74 65 73 74 20 4d 41 43 5f 43 4d 41 43 2d  ::test MAC_CMAC-
0450: 41 45 53 2d 31 39 32 2d 43 42 43 2d 31 2e 33 20  AES-192-CBC-1.3 
0460: 7b 43 4d 41 43 2d 41 45 53 2d 31 39 32 2d 43 42  {CMAC-AES-192-CB
0470: 43 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  C} \..-constrain
0480: 74 73 20 7b 43 4d 41 43 20 20 41 45 53 5f 31 39  ts {CMAC  AES_19
0490: 32 5f 43 42 43 7d 20 5c 0a 09 2d 73 65 74 75 70  2_CBC} \..-setup
04a0: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74   {} \..-body {st
04b0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
04c0: 3a 63 6d 61 63 20 2d 68 65 78 20 2d 63 69 70 68  :cmac -hex -ciph
04d0: 65 72 20 41 45 53 2d 31 39 32 2d 43 42 43 20 2d  er AES-192-CBC -
04e0: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
04f0: 64 65 20 68 65 78 20 38 65 37 33 62 30 66 37 64  de hex 8e73b0f7d
0500: 61 30 65 36 34 35 32 63 38 31 30 66 33 32 62 38  a0e6452c810f32b8
0510: 30 39 30 37 39 65 35 36 32 66 38 65 61 64 32 35  09079e562f8ead25
0520: 32 32 63 36 62 37 62 5d 20 2d 64 61 74 61 20 5b  22c6b7b] -data [
0530: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
0540: 78 20 36 62 63 31 62 65 65 32 32 65 34 30 39 66  x 6bc1bee22e409f
0550: 39 36 65 39 33 64 37 65 31 31 37 33 39 33 31 37  96e93d7e11739317
0560: 32 61 61 65 32 64 38 61 35 37 31 65 30 33 61 63  2aae2d8a571e03ac
0570: 39 63 39 65 62 37 36 66 61 63 34 35 61 66 38 65  9c9eb76fac45af8e
0580: 35 31 33 30 63 38 31 63 34 36 61 33 35 63 65 34  5130c81c46a35ce4
0590: 31 31 5d 5d 20 30 20 33 31 7d 20 5c 0a 09 2d 6d  11]] 0 31} \..-m
05a0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
05b0: 6c 74 20 38 61 31 64 65 35 62 65 32 65 62 33 31  lt 8a1de5be2eb31
05c0: 61 61 64 30 38 39 61 38 32 65 36 65 65 39 30 38  aad089a82e6ee908
05d0: 62 30 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  b0e..tcltest::te
05e0: 73 74 20 4d 41 43 5f 43 4d 41 43 2d 41 45 53 2d  st MAC_CMAC-AES-
05f0: 31 39 32 2d 43 42 43 2d 31 2e 34 20 7b 43 4d 41  192-CBC-1.4 {CMA
0600: 43 2d 41 45 53 2d 31 39 32 2d 43 42 43 7d 20 5c  C-AES-192-CBC} \
0610: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b  ..-constraints {
0620: 43 4d 41 43 20 20 41 45 53 5f 31 39 32 5f 43 42  CMAC  AES_192_CB
0630: 43 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20  C} \..-setup {} 
0640: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67  \..-body {string
0650: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 63 6d 61   range [tls::cma
0660: 63 20 2d 68 65 78 20 2d 63 69 70 68 65 72 20 41  c -hex -cipher A
0670: 45 53 2d 31 39 32 2d 43 42 43 20 2d 6b 65 79 20  ES-192-CBC -key 
0680: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
0690: 65 78 20 38 65 37 33 62 30 66 37 64 61 30 65 36  ex 8e73b0f7da0e6
06a0: 34 35 32 63 38 31 30 66 33 32 62 38 30 39 30 37  452c810f32b80907
06b0: 39 65 35 36 32 66 38 65 61 64 32 35 32 32 63 36  9e562f8ead2522c6
06c0: 62 37 62 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61  b7b] -data [bina
06d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 62  ry decode hex 6b
06e0: 63 31 62 65 65 32 32 65 34 30 39 66 39 36 65 39  c1bee22e409f96e9
06f0: 33 64 37 65 31 31 37 33 39 33 31 37 32 61 61 65  3d7e117393172aae
0700: 32 64 38 61 35 37 31 65 30 33 61 63 39 63 39 65  2d8a571e03ac9c9e
0710: 62 37 36 66 61 63 34 35 61 66 38 65 35 31 33 30  b76fac45af8e5130
0720: 63 38 31 63 34 36 61 33 35 63 65 34 31 31 65 35  c81c46a35ce411e5
0730: 66 62 63 31 31 39 31 61 30 61 35 32 65 66 66 36  fbc1191a0a52eff6
0740: 39 66 32 34 34 35 64 66 34 66 39 62 31 37 61 64  9f2445df4f9b17ad
0750: 32 62 34 31 37 62 65 36 36 63 33 37 31 30 5d 5d  2b417be66c3710]]
0760: 20 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68   0 31} \..-match
0770: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61   exact -result a
0780: 31 64 35 64 66 30 65 65 64 37 39 30 66 37 39 34  1d5df0eed790f794
0790: 64 37 37 35 38 39 36 35 39 66 33 39 61 31 31 0a  d77589659f39a11.
07a0: 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c  .# Cleanup.::tcl
07b0: 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73  test::cleanupTes
07c0: 74 73 0a 72 65 74 75 72 6e 0a                    ts.return.