Hex Artifact Content

Artifact cb978a5d931ad9ff0400017532ca4289b1f9347182a69a416bcdde0bc9d2d057:


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 48 4d 41 43 5f 53 48 41 32   from "HMAC_SHA2
0020: 35 36 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 20  56.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 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  t..tcltest::test
00d0: 43 6f 6e 73 74 72 61 69 6e 74 20 48 4d 41 43 20  Constraint HMAC 
00e0: 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20  [expr {[lsearch 
00f0: 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 6d 61  -nocase [tls::ma
0100: 63 73 5d 20 48 4d 41 43 5d 20 3e 20 2d 31 7d 5d  cs] HMAC] > -1}]
0110: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f  .tcltest::testCo
0120: 6e 73 74 72 61 69 6e 74 20 53 48 41 32 35 36 20  nstraint SHA256 
0130: 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20  [expr {[lsearch 
0140: 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 64 69  -nocase [tls::di
0150: 67 65 73 74 73 5d 20 53 48 41 32 35 36 5d 20 3e  gests] SHA256] >
0160: 20 2d 31 7d 5d 0a 63 61 74 63 68 20 7b 74 6c 73   -1}].catch {tls
0170: 3a 3a 70 72 6f 76 69 64 65 72 20 6c 65 67 61 63  ::provider legac
0180: 79 7d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  y}..tcltest::tes
0190: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35  t MAC_HMAC-SHA25
01a0: 36 2d 31 2e 31 20 7b 48 4d 41 43 5f 53 48 41 32  6-1.1 {HMAC_SHA2
01b0: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  56} \..-constrai
01c0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36  nts {HMAC SHA256
01d0: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20   } \..-setup {} 
01e0: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67  \..-body {string
01f0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61   range [tls::hma
0200: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53  c -hex -digest S
0210: 48 41 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61  HA256 -key [bina
0220: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0230: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
0240: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
0250: 31 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38  1112131415161718
0260: 31 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30  191a1b1c1d1e1f20
0270: 32 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38  2122232425262728
0280: 32 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30  292a2b2c2d2e2f30
0290: 33 31 33 32 33 33 33 34 33 35 33 36 33 37 33 38  3132333435363738
02a0: 33 39 33 61 33 62 33 63 33 64 33 65 33 66 5d 20  393a3b3c3d3e3f] 
02b0: 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65  -data "Sample me
02c0: 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e  ssage for keylen
02d0: 3d 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 36 33  =blocklen"] 0 63
02e0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
02f0: 74 20 2d 72 65 73 75 6c 74 20 38 62 62 39 61 31  t -result 8bb9a1
0300: 64 62 39 38 30 36 66 32 30 64 66 37 66 37 37 62  db9806f20df7f77b
0310: 38 32 31 33 38 63 37 39 31 34 64 31 37 34 64 35  82138c7914d174d5
0320: 39 65 31 33 64 63 34 64 30 31 36 39 63 39 30 35  9e13dc4d0169c905
0330: 37 62 31 33 33 65 31 64 36 32 0a 0a 74 63 6c 74  7b133e1d62..tclt
0340: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d  est::test MAC_HM
0350: 41 43 2d 53 48 41 32 35 36 2d 31 2e 32 20 7b 48  AC-SHA256-1.2 {H
0360: 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a 09 2d  MAC_SHA256} \..-
0370: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41  constraints {HMA
0380: 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09 2d 73  C SHA256 } \..-s
0390: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79  etup {} \..-body
03a0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   {string range [
03b0: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d  tls::hmac -hex -
03c0: 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 6b  digest SHA256 -k
03d0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
03e0: 65 20 68 65 78 20 30 30 30 31 30 32 30 33 30 34  e hex 0001020304
03f0: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63  05060708090a0b0c
0400: 30 64 30 65 30 66 31 30 31 31 31 32 31 33 31 34  0d0e0f1011121314
0410: 31 35 31 36 31 37 31 38 31 39 31 61 31 62 31 63  15161718191a1b1c
0420: 31 64 31 65 31 66 5d 20 2d 64 61 74 61 20 22 53  1d1e1f] -data "S
0430: 61 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f  ample message fo
0440: 72 20 6b 65 79 6c 65 6e 3c 62 6c 6f 63 6b 6c 65  r keylen<blockle
0450: 6e 22 5d 20 30 20 36 33 7d 20 5c 0a 09 2d 6d 61  n"] 0 63} \..-ma
0460: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0470: 74 20 61 32 38 63 66 34 33 31 33 30 65 65 36 39  t a28cf43130ee69
0480: 36 61 39 38 66 31 34 61 33 37 36 37 38 62 35 36  6a98f14a37678b56
0490: 62 63 66 63 62 64 64 39 65 35 63 66 36 39 37 31  bcfcbdd9e5cf6971
04a0: 37 66 65 63 66 35 34 38 30 66 30 65 62 64 66 37  7fecf5480f0ebdf7
04b0: 39 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  90..tcltest::tes
04c0: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35  t MAC_HMAC-SHA25
04d0: 36 2d 31 2e 33 20 7b 48 4d 41 43 5f 53 48 41 32  6-1.3 {HMAC_SHA2
04e0: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  56} \..-constrai
04f0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36  nts {HMAC SHA256
0500: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20   } \..-setup {} 
0510: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67  \..-body {string
0520: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61   range [tls::hma
0530: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53  c -hex -digest S
0540: 48 41 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61  HA256 -key [bina
0550: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0560: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
0570: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
0580: 31 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38  1112131415161718
0590: 31 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30  191a1b1c1d1e1f20
05a0: 32 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38  2122232425262728
05b0: 32 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30  292a2b2c2d2e2f30
05c0: 33 31 33 32 33 33 33 34 33 35 33 36 33 37 33 38  3132333435363738
05d0: 33 39 33 61 33 62 33 63 33 64 33 65 33 66 34 30  393a3b3c3d3e3f40
05e0: 34 31 34 32 34 33 34 34 34 35 34 36 34 37 34 38  4142434445464748
05f0: 34 39 34 61 34 62 34 63 34 64 34 65 34 66 35 30  494a4b4c4d4e4f50
0600: 35 31 35 32 35 33 35 34 35 35 35 36 35 37 35 38  5152535455565758
0610: 35 39 35 61 35 62 35 63 35 64 35 65 35 66 36 30  595a5b5c5d5e5f60
0620: 36 31 36 32 36 33 5d 20 2d 64 61 74 61 20 22 53  616263] -data "S
0630: 61 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f  ample message fo
0640: 72 20 6b 65 79 6c 65 6e 3d 62 6c 6f 63 6b 6c 65  r keylen=blockle
0650: 6e 22 5d 20 30 20 36 33 7d 20 5c 0a 09 2d 6d 61  n"] 0 63} \..-ma
0660: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0670: 74 20 62 64 63 63 62 36 63 37 32 64 64 65 61 64  t bdccb6c72ddead
0680: 62 35 30 30 61 65 37 36 38 33 38 36 63 62 33 38  b500ae768386cb38
0690: 63 63 34 31 63 36 33 64 62 62 30 38 37 38 64 64  cc41c63dbb0878dd
06a0: 62 39 63 37 61 33 38 61 34 33 31 62 37 38 33 37  b9c7a38a431b7837
06b0: 38 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  8d..tcltest::tes
06c0: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35  t MAC_HMAC-SHA25
06d0: 36 2d 31 2e 34 20 7b 48 4d 41 43 5f 53 48 41 32  6-1.4 {HMAC_SHA2
06e0: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  56} \..-constrai
06f0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36  nts {HMAC SHA256
0700: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20   } \..-setup {} 
0710: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67  \..-body {string
0720: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61   range [tls::hma
0730: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53  c -hex -digest S
0740: 48 41 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61  HA256 -key [bina
0750: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30  ry decode hex 00
0760: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38  0102030405060708
0770: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30  090a0b0c0d0e0f10
0780: 31 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38  1112131415161718
0790: 31 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30  191a1b1c1d1e1f20
07a0: 32 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38  2122232425262728
07b0: 32 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30  292a2b2c2d2e2f30
07c0: 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20  ] -data "Sample 
07d0: 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c  message for keyl
07e0: 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 2c 20 77 69 74  en<blocklen, wit
07f0: 68 20 74 72 75 6e 63 61 74 65 64 20 74 61 67 22  h truncated tag"
0800: 5d 20 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63  ] 0 31} \..-matc
0810: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
0820: 32 37 61 38 62 31 35 37 38 33 39 65 66 65 61 63  27a8b157839efeac
0830: 39 38 64 66 30 37 30 62 33 33 31 64 35 39 33 36  98df070b331d5936
0840: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
0850: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35 36 2d  MAC_HMAC-SHA256-
0860: 31 2e 35 20 7b 48 4d 41 43 5f 53 48 41 32 35 36  1.5 {HMAC_SHA256
0870: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
0880: 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36 20 7d  s {HMAC SHA256 }
0890: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a   \..-setup {} \.
08a0: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72  .-body {string r
08b0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20  ange [tls::hmac 
08c0: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41  -hex -digest SHA
08d0: 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  256 -key [binary
08e0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 62 30 62   decode hex 0b0b
08f0: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62  0b0b0b0b0b0b0b0b
0900: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62  0b0b0b0b0b0b0b0b
0910: 30 62 30 62 5d 20 2d 64 61 74 61 20 22 48 69 20  0b0b] -data "Hi 
0920: 54 68 65 72 65 22 5d 20 30 20 36 33 7d 20 5c 0a  There"] 0 63} \.
0930: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0940: 65 73 75 6c 74 20 62 30 33 34 34 63 36 31 64 38  esult b0344c61d8
0950: 64 62 33 38 35 33 35 63 61 38 61 66 63 65 61 66  db38535ca8afceaf
0960: 30 62 66 31 32 62 38 38 31 64 63 32 30 30 63 39  0bf12b881dc200c9
0970: 38 33 33 64 61 37 32 36 65 39 33 37 36 63 32 65  833da726e9376c2e
0980: 33 32 63 66 66 37 0a 0a 74 63 6c 74 65 73 74 3a  32cff7..tcltest:
0990: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53  :test MAC_HMAC-S
09a0: 48 41 32 35 36 2d 31 2e 36 20 7b 48 4d 41 43 5f  HA256-1.6 {HMAC_
09b0: 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73  SHA256} \..-cons
09c0: 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48  traints {HMAC SH
09d0: 41 32 35 36 20 7d 20 5c 0a 09 2d 73 65 74 75 70  A256 } \..-setup
09e0: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74   {} \..-body {st
09f0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
0a00: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65  :hmac -hex -dige
0a10: 73 74 20 53 48 41 32 35 36 20 2d 6b 65 79 20 22  st SHA256 -key "
0a20: 4a 65 66 65 22 20 2d 64 61 74 61 20 22 77 68 61  Jefe" -data "wha
0a30: 74 20 64 6f 20 79 61 20 77 61 6e 74 20 66 6f 72  t do ya want for
0a40: 20 6e 6f 74 68 69 6e 67 3f 22 5d 20 30 20 36 33   nothing?"] 0 63
0a50: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0a60: 74 20 2d 72 65 73 75 6c 74 20 35 62 64 63 63 31  t -result 5bdcc1
0a70: 34 36 62 66 36 30 37 35 34 65 36 61 30 34 32 34  46bf60754e6a0424
0a80: 32 36 30 38 39 35 37 35 63 37 35 61 30 30 33 66  26089575c75a003f
0a90: 30 38 39 64 32 37 33 39 38 33 39 64 65 63 35 38  089d2739839dec58
0aa0: 62 39 36 34 65 63 33 38 34 33 0a 0a 74 63 6c 74  b964ec3843..tclt
0ab0: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d  est::test MAC_HM
0ac0: 41 43 2d 53 48 41 32 35 36 2d 31 2e 37 20 7b 48  AC-SHA256-1.7 {H
0ad0: 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a 09 2d  MAC_SHA256} \..-
0ae0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41  constraints {HMA
0af0: 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09 2d 73  C SHA256 } \..-s
0b00: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79  etup {} \..-body
0b10: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   {string range [
0b20: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d  tls::hmac -hex -
0b30: 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 6b  digest SHA256 -k
0b40: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
0b50: 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61  e hex aaaaaaaaaa
0b60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
0b70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 5d 20  aaaaaaaaaaaaaa] 
0b80: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65  -data [binary de
0b90: 63 6f 64 65 20 68 65 78 20 64 64 64 64 64 64 64  code hex ddddddd
0ba0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
0bb0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
0bc0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
0bd0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
0be0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
0bf0: 64 64 64 64 64 64 64 64 64 64 64 64 64 5d 5d 20  ddddddddddddd]] 
0c00: 30 20 36 33 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  0 63} \..-match 
0c10: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 37  exact -result 77
0c20: 33 65 61 39 31 65 33 36 38 30 30 65 34 36 38 35  3ea91e36800e4685
0c30: 34 64 62 38 65 62 64 30 39 31 38 31 61 37 32 39  4db8ebd09181a729
0c40: 35 39 30 39 38 62 33 65 66 38 63 31 32 32 64 39  59098b3ef8c122d9
0c50: 36 33 35 35 31 34 63 65 64 35 36 35 66 65 0a 0a  635514ced565fe..
0c60: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41  tcltest::test MA
0c70: 43 5f 48 4d 41 43 2d 53 48 41 32 35 36 2d 31 2e  C_HMAC-SHA256-1.
0c80: 38 20 7b 48 4d 41 43 5f 53 48 41 32 35 36 7d 20  8 {HMAC_SHA256} 
0c90: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
0ca0: 7b 48 4d 41 43 20 53 48 41 32 35 36 20 7d 20 5c  {HMAC SHA256 } \
0cb0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d  ..-setup {} \..-
0cc0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e  body {string ran
0cd0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68  ge [tls::hmac -h
0ce0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 32 35  ex -digest SHA25
0cf0: 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64  6 -key [binary d
0d00: 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33  ecode hex 010203
0d10: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62  0405060708090a0b
0d20: 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 33  0c0d0e0f10111213
0d30: 31 34 31 35 31 36 31 37 31 38 31 39 5d 20 2d 64  141516171819] -d
0d40: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  ata [binary deco
0d50: 64 65 20 68 65 78 20 63 64 63 64 63 64 63 64 63  de hex cdcdcdcdc
0d60: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63  dcdcdcdcdcdcdcdc
0d70: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63  dcdcdcdcdcdcdcdc
0d80: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63  dcdcdcdcdcdcdcdc
0d90: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63  dcdcdcdcdcdcdcdc
0da0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63  dcdcdcdcdcdcdcdc
0db0: 64 63 64 63 64 63 64 63 64 63 64 5d 5d 20 30 20  dcdcdcdcdcd]] 0 
0dc0: 36 33 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  63} \..-match ex
0dd0: 61 63 74 20 2d 72 65 73 75 6c 74 20 38 32 35 35  act -result 8255
0de0: 38 61 33 38 39 61 34 34 33 63 30 65 61 34 63 63  8a389a443c0ea4cc
0df0: 38 31 39 38 39 39 66 32 30 38 33 61 38 35 66 30  819899f2083a85f0
0e00: 66 61 61 33 65 35 37 38 66 38 30 37 37 61 32 65  faa3e578f8077a2e
0e10: 33 66 66 34 36 37 32 39 36 36 35 62 0a 0a 74 63  3ff46729665b..tc
0e20: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f  ltest::test MAC_
0e30: 48 4d 41 43 2d 53 48 41 32 35 36 2d 31 2e 39 20  HMAC-SHA256-1.9 
0e40: 7b 48 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a  {HMAC_SHA256} \.
0e50: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48  .-constraints {H
0e60: 4d 41 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09  MAC SHA256 } \..
0e70: 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f  -setup {} \..-bo
0e80: 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65  dy {string range
0e90: 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78   [tls::hmac -hex
0ea0: 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 20   -digest SHA256 
0eb0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63  -key [binary dec
0ec0: 6f 64 65 20 68 65 78 20 30 63 30 63 30 63 30 63  ode hex 0c0c0c0c
0ed0: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63  0c0c0c0c0c0c0c0c
0ee0: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63  0c0c0c0c0c0c0c0c
0ef0: 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 57 69  ] -data "Test Wi
0f00: 74 68 20 54 72 75 6e 63 61 74 69 6f 6e 22 5d 20  th Truncation"] 
0f10: 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20  0 31} \..-match 
0f20: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61 33  exact -result a3
0f30: 62 36 31 36 37 34 37 33 31 30 30 65 65 30 36 65  b6167473100ee06e
0f40: 30 63 37 39 36 63 32 39 35 35 35 35 32 62 0a 0a  0c796c2955552b..
0f50: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41  tcltest::test MA
0f60: 43 5f 48 4d 41 43 2d 53 48 41 32 35 36 2d 31 2e  C_HMAC-SHA256-1.
0f70: 31 30 20 7b 48 4d 41 43 5f 53 48 41 32 35 36 7d  10 {HMAC_SHA256}
0f80: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
0f90: 20 7b 48 4d 41 43 20 53 48 41 32 35 36 20 7d 20   {HMAC SHA256 } 
0fa0: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09  \..-setup {} \..
0fb0: 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61  -body {string ra
0fc0: 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d  nge [tls::hmac -
0fd0: 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 32  hex -digest SHA2
0fe0: 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20  56 -key [binary 
0ff0: 64 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61  decode hex aaaaa
1000: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1010: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1020: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1030: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1040: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1050: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1060: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1070: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1080: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1090: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10a0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10b0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10c0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10d0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10e0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
10f0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1100: 61 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 55  a] -data "Test U
1110: 73 69 6e 67 20 4c 61 72 67 65 72 20 54 68 61 6e  sing Larger Than
1120: 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 4b 65 79 20   Block-Size Key 
1130: 2d 20 48 61 73 68 20 4b 65 79 20 46 69 72 73 74  - Hash Key First
1140: 22 5d 20 30 20 36 33 7d 20 5c 0a 09 2d 6d 61 74  "] 0 63} \..-mat
1150: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
1160: 20 36 30 65 34 33 31 35 39 31 65 65 30 62 36 37   60e431591ee0b67
1170: 66 30 64 38 61 32 36 61 61 63 62 66 35 62 37 37  f0d8a26aacbf5b77
1180: 66 38 65 30 62 63 36 32 31 33 37 32 38 63 35 31  f8e0bc6213728c51
1190: 34 30 35 34 36 30 34 30 66 30 65 65 33 37 66 35  40546040f0ee37f5
11a0: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  4..tcltest::test
11b0: 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35 36   MAC_HMAC-SHA256
11c0: 2d 31 2e 31 31 20 7b 48 4d 41 43 5f 53 48 41 32  -1.11 {HMAC_SHA2
11d0: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  56} \..-constrai
11e0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36  nts {HMAC SHA256
11f0: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20   } \..-setup {} 
1200: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67  \..-body {string
1210: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61   range [tls::hma
1220: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53  c -hex -digest S
1230: 48 41 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61  HA256 -key [bina
1240: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 61  ry decode hex aa
1250: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1260: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1270: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1280: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1290: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12a0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12b0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12c0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12d0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12e0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
12f0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1300: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1310: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1320: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1330: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1340: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1350: 61 61 61 61 5d 20 2d 64 61 74 61 20 22 54 68 69  aaaa] -data "Thi
1360: 73 20 69 73 20 61 20 74 65 73 74 20 75 73 69 6e  s is a test usin
1370: 67 20 61 20 6c 61 72 67 65 72 20 74 68 61 6e 20  g a larger than 
1380: 62 6c 6f 63 6b 2d 73 69 7a 65 20 6b 65 79 20 61  block-size key a
1390: 6e 64 20 61 20 6c 61 72 67 65 72 20 74 68 61 6e  nd a larger than
13a0: 20 62 6c 6f 63 6b 2d 73 69 7a 65 20 64 61 74 61   block-size data
13b0: 2e 20 54 68 65 20 6b 65 79 20 6e 65 65 64 73 20  . The key needs 
13c0: 74 6f 20 62 65 20 68 61 73 68 65 64 20 62 65 66  to be hashed bef
13d0: 6f 72 65 20 62 65 69 6e 67 20 75 73 65 64 20 62  ore being used b
13e0: 79 20 74 68 65 20 48 4d 41 43 20 61 6c 67 6f 72  y the HMAC algor
13f0: 69 74 68 6d 2e 22 5d 20 30 20 36 33 7d 20 5c 0a  ithm."] 0 63} \.
1400: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
1410: 65 73 75 6c 74 20 39 62 30 39 66 66 61 37 31 62  esult 9b09ffa71b
1420: 39 34 32 66 63 62 32 37 36 33 35 66 62 63 64 35  942fcb27635fbcd5
1430: 62 30 65 39 34 34 62 66 64 63 36 33 36 34 34 66  b0e944bfdc63644f
1440: 30 37 31 33 39 33 38 61 37 66 35 31 35 33 35 63  0713938a7f51535c
1450: 33 61 33 35 65 32 0a 0a 74 63 6c 74 65 73 74 3a  3a35e2..tcltest:
1460: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53  :test MAC_HMAC-S
1470: 48 41 32 35 36 2d 31 2e 31 32 20 7b 48 4d 41 43  HA256-1.12 {HMAC
1480: 5f 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e  _SHA256} \..-con
1490: 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53  straints {HMAC S
14a0: 48 41 32 35 36 20 7d 20 5c 0a 09 2d 73 65 74 75  HA256 } \..-setu
14b0: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73  p {} \..-body {s
14c0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73  tring range [tls
14d0: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67  ::hmac -hex -dig
14e0: 65 73 74 20 53 48 41 32 35 36 20 2d 6b 65 79 20  est SHA256 -key 
14f0: 22 6b 65 79 22 20 2d 64 61 74 61 20 22 54 68 65  "key" -data "The
1500: 20 71 75 69 63 6b 20 62 72 6f 77 6e 20 66 6f 78   quick brown fox
1510: 20 6a 75 6d 70 73 20 6f 76 65 72 20 74 68 65 20   jumps over the 
1520: 6c 61 7a 79 20 64 6f 67 22 5d 20 30 20 36 33 7d  lazy dog"] 0 63}
1530: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
1540: 20 2d 72 65 73 75 6c 74 20 66 37 62 63 38 33 66   -result f7bc83f
1550: 34 33 30 35 33 38 34 32 34 62 31 33 32 39 38 65  430538424b13298e
1560: 36 61 61 36 66 62 31 34 33 65 66 34 64 35 39 61  6aa6fb143ef4d59a
1570: 31 34 39 34 36 31 37 35 39 39 37 34 37 39 64 62  14946175997479db
1580: 63 32 64 31 61 33 63 64 38 0a 0a 74 63 6c 74 65  c2d1a3cd8..tclte
1590: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41  st::test MAC_HMA
15a0: 43 2d 53 48 41 32 35 36 2d 31 2e 31 33 20 7b 48  C-SHA256-1.13 {H
15b0: 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a 09 2d  MAC_SHA256} \..-
15c0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41  constraints {HMA
15d0: 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09 2d 73  C SHA256 } \..-s
15e0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79  etup {} \..-body
15f0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   {string range [
1600: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d  tls::hmac -hex -
1610: 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 6b  digest SHA256 -k
1620: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
1630: 65 20 68 65 78 20 30 62 30 62 30 62 30 62 30 62  e hex 0b0b0b0b0b
1640: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62  0b0b0b0b0b0b0b0b
1650: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 5d 20  0b0b0b0b0b0b0b] 
1660: 2d 64 61 74 61 20 22 48 69 20 54 68 65 72 65 22  -data "Hi There"
1670: 5d 20 30 20 36 33 7d 20 5c 0a 09 2d 6d 61 74 63  ] 0 63} \..-matc
1680: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
1690: 62 30 33 34 34 63 36 31 64 38 64 62 33 38 35 33  b0344c61d8db3853
16a0: 35 63 61 38 61 66 63 65 61 66 30 62 66 31 32 62  5ca8afceaf0bf12b
16b0: 38 38 31 64 63 32 30 30 63 39 38 33 33 64 61 37  881dc200c9833da7
16c0: 32 36 65 39 33 37 36 63 32 65 33 32 63 66 66 37  26e9376c2e32cff7
16d0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
16e0: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 35 36 2d  MAC_HMAC-SHA256-
16f0: 31 2e 31 34 20 7b 48 4d 41 43 5f 53 48 41 32 35  1.14 {HMAC_SHA25
1700: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  6} \..-constrain
1710: 74 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36 20  ts {HMAC SHA256 
1720: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c  } \..-setup {} \
1730: 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20  ..-body {string 
1740: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63  range [tls::hmac
1750: 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48   -hex -digest SH
1760: 41 32 35 36 20 2d 6b 65 79 20 22 4a 65 66 65 22  A256 -key "Jefe"
1770: 20 2d 64 61 74 61 20 22 77 68 61 74 20 64 6f 20   -data "what do 
1780: 79 61 20 77 61 6e 74 20 66 6f 72 20 6e 6f 74 68  ya want for noth
1790: 69 6e 67 3f 22 5d 20 30 20 36 33 7d 20 5c 0a 09  ing?"] 0 63} \..
17a0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
17b0: 73 75 6c 74 20 35 62 64 63 63 31 34 36 62 66 36  sult 5bdcc146bf6
17c0: 30 37 35 34 65 36 61 30 34 32 34 32 36 30 38 39  0754e6a042426089
17d0: 35 37 35 63 37 35 61 30 30 33 66 30 38 39 64 32  575c75a003f089d2
17e0: 37 33 39 38 33 39 64 65 63 35 38 62 39 36 34 65  739839dec58b964e
17f0: 63 33 38 34 33 0a 0a 74 63 6c 74 65 73 74 3a 3a  c3843..tcltest::
1800: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48  test MAC_HMAC-SH
1810: 41 32 35 36 2d 31 2e 31 35 20 7b 48 4d 41 43 5f  A256-1.15 {HMAC_
1820: 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73  SHA256} \..-cons
1830: 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48  traints {HMAC SH
1840: 41 32 35 36 20 7d 20 5c 0a 09 2d 73 65 74 75 70  A256 } \..-setup
1850: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74   {} \..-body {st
1860: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
1870: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65  :hmac -hex -dige
1880: 73 74 20 53 48 41 32 35 36 20 2d 6b 65 79 20 5b  st SHA256 -key [
1890: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
18a0: 78 20 61 61 61 61 61 61 61 61 61 61 61 61 61 61  x aaaaaaaaaaaaaa
18b0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
18c0: 61 61 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74  aaaaaaaaaa] -dat
18d0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
18e0: 20 68 65 78 20 64 64 64 64 64 64 64 64 64 64 64   hex ddddddddddd
18f0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
1900: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
1910: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
1920: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
1930: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64  dddddddddddddddd
1940: 64 64 64 64 64 64 64 64 64 5d 5d 20 30 20 36 33  ddddddddd]] 0 63
1950: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1960: 74 20 2d 72 65 73 75 6c 74 20 37 37 33 65 61 39  t -result 773ea9
1970: 31 65 33 36 38 30 30 65 34 36 38 35 34 64 62 38  1e36800e46854db8
1980: 65 62 64 30 39 31 38 31 61 37 32 39 35 39 30 39  ebd09181a7295909
1990: 38 62 33 65 66 38 63 31 32 32 64 39 36 33 35 35  8b3ef8c122d96355
19a0: 31 34 63 65 64 35 36 35 66 65 0a 0a 74 63 6c 74  14ced565fe..tclt
19b0: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d  est::test MAC_HM
19c0: 41 43 2d 53 48 41 32 35 36 2d 31 2e 31 36 20 7b  AC-SHA256-1.16 {
19d0: 48 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a 09  HMAC_SHA256} \..
19e0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d  -constraints {HM
19f0: 41 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09 2d  AC SHA256 } \..-
1a00: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64  setup {} \..-bod
1a10: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20  y {string range 
1a20: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20  [tls::hmac -hex 
1a30: 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d  -digest SHA256 -
1a40: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f  key [binary deco
1a50: 64 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30  de hex 010203040
1a60: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30  5060708090a0b0c0
1a70: 64 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31  d0e0f10111213141
1a80: 35 31 36 31 37 31 38 31 39 5d 20 2d 64 61 74 61  516171819] -data
1a90: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1aa0: 68 65 78 20 63 64 63 64 63 64 63 64 63 64 63 64  hex cdcdcdcdcdcd
1ab0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64  cdcdcdcdcdcdcdcd
1ac0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64  cdcdcdcdcdcdcdcd
1ad0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64  cdcdcdcdcdcdcdcd
1ae0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64  cdcdcdcdcdcdcdcd
1af0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64  cdcdcdcdcdcdcdcd
1b00: 63 64 63 64 63 64 63 64 5d 5d 20 30 20 36 33 7d  cdcdcdcd]] 0 63}
1b10: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
1b20: 20 2d 72 65 73 75 6c 74 20 38 32 35 35 38 61 33   -result 82558a3
1b30: 38 39 61 34 34 33 63 30 65 61 34 63 63 38 31 39  89a443c0ea4cc819
1b40: 38 39 39 66 32 30 38 33 61 38 35 66 30 66 61 61  899f2083a85f0faa
1b50: 33 65 35 37 38 66 38 30 37 37 61 32 65 33 66 66  3e578f8077a2e3ff
1b60: 34 36 37 32 39 36 36 35 62 0a 0a 74 63 6c 74 65  46729665b..tclte
1b70: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41  st::test MAC_HMA
1b80: 43 2d 53 48 41 32 35 36 2d 31 2e 31 37 20 7b 48  C-SHA256-1.17 {H
1b90: 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c 0a 09 2d  MAC_SHA256} \..-
1ba0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41  constraints {HMA
1bb0: 43 20 53 48 41 32 35 36 20 7d 20 5c 0a 09 2d 73  C SHA256 } \..-s
1bc0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79  etup {} \..-body
1bd0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b   {string range [
1be0: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d  tls::hmac -hex -
1bf0: 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 6b  digest SHA256 -k
1c00: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ey [binary decod
1c10: 65 20 68 65 78 20 30 63 30 63 30 63 30 63 30 63  e hex 0c0c0c0c0c
1c20: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63  0c0c0c0c0c0c0c0c
1c30: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 5d 20  0c0c0c0c0c0c0c] 
1c40: 2d 64 61 74 61 20 22 54 65 73 74 20 57 69 74 68  -data "Test With
1c50: 20 54 72 75 6e 63 61 74 69 6f 6e 22 5d 20 30 20   Truncation"] 0 
1c60: 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  31} \..-match ex
1c70: 61 63 74 20 2d 72 65 73 75 6c 74 20 61 33 62 36  act -result a3b6
1c80: 31 36 37 34 37 33 31 30 30 65 65 30 36 65 30 63  167473100ee06e0c
1c90: 37 39 36 63 32 39 35 35 35 35 32 62 0a 0a 74 63  796c2955552b..tc
1ca0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f  ltest::test MAC_
1cb0: 48 4d 41 43 2d 53 48 41 32 35 36 2d 31 2e 31 38  HMAC-SHA256-1.18
1cc0: 20 7b 48 4d 41 43 5f 53 48 41 32 35 36 7d 20 5c   {HMAC_SHA256} \
1cd0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b  ..-constraints {
1ce0: 48 4d 41 43 20 53 48 41 32 35 36 20 7d 20 5c 0a  HMAC SHA256 } \.
1cf0: 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62  .-setup {} \..-b
1d00: 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67  ody {string rang
1d10: 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65  e [tls::hmac -he
1d20: 78 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36  x -digest SHA256
1d30: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65   -key [binary de
1d40: 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 61  code hex aaaaaaa
1d50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1d60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1d70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1d80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1d90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1da0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1db0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1dc0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1dd0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1de0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1df0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1e00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1e10: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1e20: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1e30: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1e40: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 5d  aaaaaaaaaaaaaaa]
1e50: 20 2d 64 61 74 61 20 22 54 65 73 74 20 55 73 69   -data "Test Usi
1e60: 6e 67 20 4c 61 72 67 65 72 20 54 68 61 6e 20 42  ng Larger Than B
1e70: 6c 6f 63 6b 2d 53 69 7a 65 20 4b 65 79 20 2d 20  lock-Size Key - 
1e80: 48 61 73 68 20 4b 65 79 20 46 69 72 73 74 22 5d  Hash Key First"]
1e90: 20 30 20 36 33 7d 20 5c 0a 09 2d 6d 61 74 63 68   0 63} \..-match
1ea0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
1eb0: 30 65 34 33 31 35 39 31 65 65 30 62 36 37 66 30  0e431591ee0b67f0
1ec0: 64 38 61 32 36 61 61 63 62 66 35 62 37 37 66 38  d8a26aacbf5b77f8
1ed0: 65 30 62 63 36 32 31 33 37 32 38 63 35 31 34 30  e0bc6213728c5140
1ee0: 35 34 36 30 34 30 66 30 65 65 33 37 66 35 34 0a  546040f0ee37f54.
1ef0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d  .tcltest::test M
1f00: 41 43 5f 48 4d 41 43 2d 53 48 41 32 35 36 2d 31  AC_HMAC-SHA256-1
1f10: 2e 31 39 20 7b 48 4d 41 43 5f 53 48 41 32 35 36  .19 {HMAC_SHA256
1f20: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
1f30: 73 20 7b 48 4d 41 43 20 53 48 41 32 35 36 20 7d  s {HMAC SHA256 }
1f40: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a   \..-setup {} \.
1f50: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72  .-body {string r
1f60: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20  ange [tls::hmac 
1f70: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41  -hex -digest SHA
1f80: 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79  256 -key [binary
1f90: 20 64 65 63 6f 64 65 20 68 65 78 20 61 61 61 61   decode hex aaaa
1fa0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1fb0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1fc0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1fd0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1fe0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
1ff0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2000: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2010: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2020: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2030: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2040: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2050: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2060: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2070: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2080: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
2090: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61  aaaaaaaaaaaaaaaa
20a0: 61 61 5d 20 2d 64 61 74 61 20 22 54 68 69 73 20  aa] -data "This 
20b0: 69 73 20 61 20 74 65 73 74 20 75 73 69 6e 67 20  is a test using 
20c0: 61 20 6c 61 72 67 65 72 20 74 68 61 6e 20 62 6c  a larger than bl
20d0: 6f 63 6b 2d 73 69 7a 65 20 6b 65 79 20 61 6e 64  ock-size key and
20e0: 20 61 20 6c 61 72 67 65 72 20 74 68 61 6e 20 62   a larger than b
20f0: 6c 6f 63 6b 2d 73 69 7a 65 20 64 61 74 61 2e 20  lock-size data. 
2100: 54 68 65 20 6b 65 79 20 6e 65 65 64 73 20 74 6f  The key needs to
2110: 20 62 65 20 68 61 73 68 65 64 20 62 65 66 6f 72   be hashed befor
2120: 65 20 62 65 69 6e 67 20 75 73 65 64 20 62 79 20  e being used by 
2130: 74 68 65 20 48 4d 41 43 20 61 6c 67 6f 72 69 74  the HMAC algorit
2140: 68 6d 2e 22 5d 20 30 20 36 33 7d 20 5c 0a 09 2d  hm."] 0 63} \..-
2150: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
2160: 75 6c 74 20 39 62 30 39 66 66 61 37 31 62 39 34  ult 9b09ffa71b94
2170: 32 66 63 62 32 37 36 33 35 66 62 63 64 35 62 30  2fcb27635fbcd5b0
2180: 65 39 34 34 62 66 64 63 36 33 36 34 34 66 30 37  e944bfdc63644f07
2190: 31 33 39 33 38 61 37 66 35 31 35 33 35 63 33 61  13938a7f51535c3a
21a0: 33 35 65 32 0a 0a 23 20 43 6c 65 61 6e 75 70 0a  35e2..# Cleanup.
21b0: 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e  ::tcltest::clean
21c0: 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a     upTests.return.