Artifact
b00e1522a7010648e65ee2590117f59188d8f50f441d25b62c41a2b101f39a03:
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: 32 34 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 20 24.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 32 34 20 nstraint SHA224
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 32 34 5d 20 3e gests] SHA224] >
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 32 t MAC_HMAC-SHA22
01a0: 34 2d 31 2e 31 20 7b 48 4d 41 43 5f 53 48 41 32 4-1.1 {HMAC_SHA2
01b0: 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 24} \..-constrai
01c0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 32 34 nts {HMAC SHA224
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 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 HA224 -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 35 35 =blocklen"] 0 55
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 63 37 34 30 35 65 t -result c7405e
0300: 33 61 65 30 35 38 65 38 63 64 33 30 62 30 38 62 3ae058e8cd30b08b
0310: 34 31 34 30 32 34 38 35 38 31 65 64 31 37 34 63 4140248581ed174c
0320: 62 33 34 65 31 32 32 34 62 63 63 31 65 66 63 38 b34e1224bcc1efc8
0330: 31 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 1b..tcltest::tes
0340: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 32 t MAC_HMAC-SHA22
0350: 34 2d 31 2e 32 20 7b 48 4d 41 43 5f 53 48 41 32 4-1.2 {HMAC_SHA2
0360: 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 24} \..-constrai
0370: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 32 34 nts {HMAC SHA224
0380: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 } \..-setup {}
0390: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 \..-body {string
03a0: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 range [tls::hma
03b0: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 c -hex -digest S
03c0: 48 41 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 HA224 -key [bina
03d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 ry decode hex 00
03e0: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 0102030405060708
03f0: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 090a0b0c0d0e0f10
0400: 31 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38 1112131415161718
0410: 31 39 31 61 31 62 5d 20 2d 64 61 74 61 20 22 53 191a1b] -data "S
0420: 61 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f ample message fo
0430: 72 20 6b 65 79 6c 65 6e 3c 62 6c 6f 63 6b 6c 65 r keylen<blockle
0440: 6e 22 5d 20 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 n"] 0 55} \..-ma
0450: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0460: 74 20 65 33 64 32 34 39 61 38 63 66 62 36 37 65 t e3d249a8cfb67e
0470: 66 38 62 37 61 31 36 39 65 39 61 30 61 35 39 39 f8b7a169e9a0a599
0480: 37 31 34 61 32 63 65 63 62 61 36 35 39 39 39 61 714a2cecba65999a
0490: 35 31 62 65 62 38 66 62 62 65 0a 0a 74 63 6c 74 51beb8fbbe..tclt
04a0: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d est::test MAC_HM
04b0: 41 43 2d 53 48 41 32 32 34 2d 31 2e 33 20 7b 48 AC-SHA224-1.3 {H
04c0: 4d 41 43 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d MAC_SHA224} \..-
04d0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
04e0: 43 20 53 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 C SHA224 } \..-s
04f0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
0500: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
0510: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d tls::hmac -hex -
0520: 64 69 67 65 73 74 20 53 48 41 32 32 34 20 2d 6b digest SHA224 -k
0530: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
0540: 65 20 68 65 78 20 30 30 30 31 30 32 30 33 30 34 e hex 0001020304
0550: 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 05060708090a0b0c
0560: 30 64 30 65 30 66 31 30 31 31 31 32 31 33 31 34 0d0e0f1011121314
0570: 31 35 31 36 31 37 31 38 31 39 31 61 31 62 31 63 15161718191a1b1c
0580: 31 64 31 65 31 66 32 30 32 31 32 32 32 33 32 34 1d1e1f2021222324
0590: 32 35 32 36 32 37 32 38 32 39 32 61 32 62 32 63 25262728292a2b2c
05a0: 32 64 32 65 32 66 33 30 33 31 33 32 33 33 33 34 2d2e2f3031323334
05b0: 33 35 33 36 33 37 33 38 33 39 33 61 33 62 33 63 35363738393a3b3c
05c0: 33 64 33 65 33 66 34 30 34 31 34 32 34 33 34 34 3d3e3f4041424344
05d0: 34 35 34 36 34 37 34 38 34 39 34 61 34 62 34 63 45464748494a4b4c
05e0: 34 64 34 65 34 66 35 30 35 31 35 32 35 33 35 34 4d4e4f5051525354
05f0: 35 35 35 36 35 37 35 38 35 39 35 61 35 62 35 63 55565758595a5b5c
0600: 35 64 35 65 35 66 36 30 36 31 36 32 36 33 5d 20 5d5e5f60616263]
0610: 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 -data "Sample me
0620: 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e ssage for keylen
0630: 3d 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 35 35 =blocklen"] 0 55
0640: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
0650: 74 20 2d 72 65 73 75 6c 74 20 39 31 63 35 32 35 t -result 91c525
0660: 30 39 65 35 61 66 38 35 33 31 36 30 31 61 65 36 09e5af8531601ae6
0670: 32 33 30 30 39 39 64 39 30 62 65 66 38 38 61 61 230099d90bef88aa
0680: 65 66 62 39 36 31 66 34 30 38 30 61 62 63 30 31 efb961f4080abc01
0690: 34 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 4d..tcltest::tes
06a0: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 32 t MAC_HMAC-SHA22
06b0: 34 2d 31 2e 34 20 7b 48 4d 41 43 5f 53 48 41 32 4-1.4 {HMAC_SHA2
06c0: 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 24} \..-constrai
06d0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 32 34 nts {HMAC SHA224
06e0: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 } \..-setup {}
06f0: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 \..-body {string
0700: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 range [tls::hma
0710: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 c -hex -digest S
0720: 48 41 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 HA224 -key [bina
0730: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 ry decode hex 00
0740: 30 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 0102030405060708
0750: 30 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 090a0b0c0d0e0f10
0760: 31 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38 1112131415161718
0770: 31 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30 191a1b1c1d1e1f20
0780: 32 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38 2122232425262728
0790: 32 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30 292a2b2c2d2e2f30
07a0: 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 ] -data "Sample
07b0: 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c message for keyl
07c0: 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 2c 20 77 69 74 en<blocklen, wit
07d0: 68 20 74 72 75 6e 63 61 74 65 64 20 74 61 67 22 h truncated tag"
07e0: 5d 20 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 ] 0 31} \..-matc
07f0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
0800: 64 35 32 32 66 31 64 66 35 39 36 63 61 34 62 34 d522f1df596ca4b4
0810: 62 31 63 32 33 64 32 37 62 64 65 30 36 37 64 36 b1c23d27bde067d6
0820: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
0830: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 32 34 2d MAC_HMAC-SHA224-
0840: 31 2e 35 20 7b 48 4d 41 43 5f 53 48 41 32 32 34 1.5 {HMAC_SHA224
0850: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0860: 73 20 7b 48 4d 41 43 20 53 48 41 32 32 34 20 7d s {HMAC SHA224 }
0870: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
0880: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
0890: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
08a0: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
08b0: 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 224 -key [binary
08c0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 62 30 62 decode hex 0b0b
08d0: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
08e0: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
08f0: 30 62 30 62 5d 20 2d 64 61 74 61 20 22 48 69 20 0b0b] -data "Hi
0900: 54 68 65 72 65 22 5d 20 30 20 35 35 7d 20 5c 0a There"] 0 55} \.
0910: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0920: 65 73 75 6c 74 20 38 39 36 66 62 31 31 32 38 61 esult 896fb1128a
0930: 62 62 64 66 31 39 36 38 33 32 31 30 37 63 64 34 bbdf196832107cd4
0940: 39 64 66 33 33 66 34 37 62 34 62 31 31 36 39 39 9df33f47b4b11699
0950: 31 32 62 61 34 66 35 33 36 38 34 62 32 32 0a 0a 12ba4f53684b22..
0960: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 tcltest::test MA
0970: 43 5f 48 4d 41 43 2d 53 48 41 32 32 34 2d 31 2e C_HMAC-SHA224-1.
0980: 36 20 7b 48 4d 41 43 5f 53 48 41 32 32 34 7d 20 6 {HMAC_SHA224}
0990: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
09a0: 7b 48 4d 41 43 20 53 48 41 32 32 34 20 7d 20 5c {HMAC SHA224 } \
09b0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
09c0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
09d0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
09e0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 32 32 ex -digest SHA22
09f0: 34 20 2d 6b 65 79 20 22 4a 65 66 65 22 20 2d 64 4 -key "Jefe" -d
0a00: 61 74 61 20 22 77 68 61 74 20 64 6f 20 79 61 20 ata "what do ya
0a10: 77 61 6e 74 20 66 6f 72 20 6e 6f 74 68 69 6e 67 want for nothing
0a20: 3f 22 5d 20 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 ?"] 0 55} \..-ma
0a30: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0a40: 74 20 61 33 30 65 30 31 30 39 38 62 63 36 64 62 t a30e01098bc6db
0a50: 62 66 34 35 36 39 30 66 33 61 37 65 39 65 36 64 bf45690f3a7e9e6d
0a60: 30 66 38 62 62 65 61 32 61 33 39 65 36 31 34 38 0f8bbea2a39e6148
0a70: 30 30 38 66 64 30 35 65 34 34 0a 0a 74 63 6c 74 008fd05e44..tclt
0a80: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d est::test MAC_HM
0a90: 41 43 2d 53 48 41 32 32 34 2d 31 2e 37 20 7b 48 AC-SHA224-1.7 {H
0aa0: 4d 41 43 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d MAC_SHA224} \..-
0ab0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
0ac0: 43 20 53 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 C SHA224 } \..-s
0ad0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
0ae0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
0af0: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d tls::hmac -hex -
0b00: 64 69 67 65 73 74 20 53 48 41 32 32 34 20 2d 6b digest SHA224 -k
0b10: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
0b20: 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 e hex aaaaaaaaaa
0b30: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0b40: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 5d 20 aaaaaaaaaaaaaa]
0b50: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0b60: 63 6f 64 65 20 68 65 78 20 64 64 64 64 64 64 64 code hex ddddddd
0b70: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0b80: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0b90: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
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 5d 5d 20 ddddddddddddd]]
0bd0: 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0 55} \..-match
0be0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 66 exact -result 7f
0bf0: 62 33 63 62 33 35 38 38 63 36 63 31 66 36 66 66 b3cb3588c6c1f6ff
0c00: 61 39 36 39 34 64 37 64 36 61 64 32 36 34 39 33 a9694d7d6ad26493
0c10: 36 35 62 30 63 31 66 36 35 64 36 39 64 31 65 63 65b0c1f65d69d1ec
0c20: 38 33 33 33 65 61 0a 0a 74 63 6c 74 65 73 74 3a 8333ea..tcltest:
0c30: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 :test MAC_HMAC-S
0c40: 48 41 32 32 34 2d 31 2e 38 20 7b 48 4d 41 43 5f HA224-1.8 {HMAC_
0c50: 53 48 41 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 SHA224} \..-cons
0c60: 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 traints {HMAC SH
0c70: 41 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 A224 } \..-setup
0c80: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
0c90: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
0ca0: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
0cb0: 73 74 20 53 48 41 32 32 34 20 2d 6b 65 79 20 5b st SHA224 -key [
0cc0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0cd0: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 x 01020304050607
0ce0: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 08090a0b0c0d0e0f
0cf0: 31 30 31 31 31 32 31 33 31 34 31 35 31 36 31 37 1011121314151617
0d00: 31 38 31 39 5d 20 2d 64 61 74 61 20 5b 62 69 6e 1819] -data [bin
0d10: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 63 ary decode hex c
0d20: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0d30: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0d40: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0d50: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
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 5d 5d 20 30 20 35 35 7d 20 5c 0a 09 2d dcd]] 0 55} \..-
0d90: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0da0: 75 6c 74 20 36 63 31 31 35 30 36 38 37 34 30 31 ult 6c1150687401
0db0: 33 63 61 63 36 61 32 61 62 63 31 62 62 33 38 32 3cac6a2abc1bb382
0dc0: 36 32 37 63 65 63 36 61 39 30 64 38 36 65 66 63 627cec6a90d86efc
0dd0: 30 31 32 64 65 37 61 66 65 63 35 61 0a 0a 74 63 012de7afec5a..tc
0de0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
0df0: 48 4d 41 43 2d 53 48 41 32 32 34 2d 31 2e 39 20 HMAC-SHA224-1.9
0e00: 7b 48 4d 41 43 5f 53 48 41 32 32 34 7d 20 5c 0a {HMAC_SHA224} \.
0e10: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
0e20: 4d 41 43 20 53 48 41 32 32 34 20 7d 20 5c 0a 09 MAC SHA224 } \..
0e30: 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f -setup {} \..-bo
0e40: 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 dy {string range
0e50: 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 [tls::hmac -hex
0e60: 20 2d 64 69 67 65 73 74 20 53 48 41 32 32 34 20 -digest SHA224
0e70: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
0e80: 6f 64 65 20 68 65 78 20 30 63 30 63 30 63 30 63 ode hex 0c0c0c0c
0e90: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
0ea0: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
0eb0: 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 57 69 ] -data "Test Wi
0ec0: 74 68 20 54 72 75 6e 63 61 74 69 6f 6e 22 5d 20 th Truncation"]
0ed0: 30 20 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0 31} \..-match
0ee0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 65 exact -result 0e
0ef0: 32 61 65 61 36 38 61 39 30 63 38 64 33 37 63 39 2aea68a90c8d37c9
0f00: 38 38 62 63 64 62 39 66 63 61 36 66 61 38 0a 0a 88bcdb9fca6fa8..
0f10: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 tcltest::test MA
0f20: 43 5f 48 4d 41 43 2d 53 48 41 32 32 34 2d 31 2e C_HMAC-SHA224-1.
0f30: 31 30 20 7b 48 4d 41 43 5f 53 48 41 32 32 34 7d 10 {HMAC_SHA224}
0f40: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0f50: 20 7b 48 4d 41 43 20 53 48 41 32 32 34 20 7d 20 {HMAC SHA224 }
0f60: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 \..-setup {} \..
0f70: 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 -body {string ra
0f80: 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d nge [tls::hmac -
0f90: 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 32 hex -digest SHA2
0fa0: 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 24 -key [binary
0fb0: 64 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 decode hex aaaaa
0fc0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0fd0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0fe0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ff0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
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 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 55 a] -data "Test U
10d0: 73 69 6e 67 20 4c 61 72 67 65 72 20 54 68 61 6e sing Larger Than
10e0: 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 4b 65 79 20 Block-Size Key
10f0: 2d 20 48 61 73 68 20 4b 65 79 20 46 69 72 73 74 - Hash Key First
1100: 22 5d 20 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 "] 0 55} \..-mat
1110: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
1120: 20 39 35 65 39 61 30 64 62 39 36 32 30 39 35 61 95e9a0db962095a
1130: 64 61 65 62 65 39 62 32 64 36 66 30 64 62 63 65 daebe9b2d6f0dbce
1140: 32 64 34 39 39 66 31 31 32 66 32 64 32 62 37 32 2d499f112f2d2b72
1150: 37 33 66 61 36 38 37 30 65 0a 0a 74 63 6c 74 65 73fa6870e..tclte
1160: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 st::test MAC_HMA
1170: 43 2d 53 48 41 32 32 34 2d 31 2e 31 31 20 7b 48 C-SHA224-1.11 {H
1180: 4d 41 43 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d MAC_SHA224} \..-
1190: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
11a0: 43 20 53 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 C SHA224 } \..-s
11b0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
11c0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
11d0: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d tls::hmac -hex -
11e0: 64 69 67 65 73 74 20 53 48 41 32 32 34 20 2d 6b digest SHA224 -k
11f0: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
1200: 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 e hex aaaaaaaaaa
1210: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1220: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1230: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1240: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
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 5d 20 2d 64 aaaaaaaaaaaa] -d
1310: 61 74 61 20 22 54 68 69 73 20 69 73 20 61 20 74 ata "This is a t
1320: 65 73 74 20 75 73 69 6e 67 20 61 20 6c 61 72 67 est using a larg
1330: 65 72 20 74 68 61 6e 20 62 6c 6f 63 6b 2d 73 69 er than block-si
1340: 7a 65 20 6b 65 79 20 61 6e 64 20 61 20 6c 61 72 ze key and a lar
1350: 67 65 72 20 74 68 61 6e 20 62 6c 6f 63 6b 2d 73 ger than block-s
1360: 69 7a 65 20 64 61 74 61 2e 20 54 68 65 20 6b 65 ize data. The ke
1370: 79 20 6e 65 65 64 73 20 74 6f 20 62 65 20 68 61 y needs to be ha
1380: 73 68 65 64 20 62 65 66 6f 72 65 20 62 65 69 6e shed before bein
1390: 67 20 75 73 65 64 20 62 79 20 74 68 65 20 48 4d g used by the HM
13a0: 41 43 20 61 6c 67 6f 72 69 74 68 6d 2e 22 5d 20 AC algorithm."]
13b0: 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0 55} \..-match
13c0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 61 exact -result 3a
13d0: 38 35 34 31 36 36 61 63 35 64 39 66 30 32 33 66 854166ac5d9f023f
13e0: 35 34 64 35 31 37 64 30 62 33 39 64 62 64 39 34 54d517d0b39dbd94
13f0: 36 37 37 30 64 62 39 63 32 62 39 35 63 39 66 36 6770db9c2b95c9f6
1400: 66 35 36 35 64 31 0a 0a 74 63 6c 74 65 73 74 3a f565d1..tcltest:
1410: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 :test MAC_HMAC-S
1420: 48 41 32 32 34 2d 31 2e 31 32 20 7b 48 4d 41 43 HA224-1.12 {HMAC
1430: 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e _SHA224} \..-con
1440: 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 straints {HMAC S
1450: 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 HA224 } \..-setu
1460: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
1470: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
1480: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 ::hmac -hex -dig
1490: 65 73 74 20 53 48 41 32 32 34 20 2d 6b 65 79 20 est SHA224 -key
14a0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
14b0: 65 78 20 30 62 30 62 30 62 30 62 30 62 30 62 30 ex 0b0b0b0b0b0b0
14c0: 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 b0b0b0b0b0b0b0b0
14d0: 62 30 62 30 62 30 62 30 62 30 62 5d 20 2d 64 61 b0b0b0b0b0b] -da
14e0: 74 61 20 22 48 69 20 54 68 65 72 65 22 5d 20 30 ta "Hi There"] 0
14f0: 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 55} \..-match e
1500: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 39 36 xact -result 896
1510: 66 62 31 31 32 38 61 62 62 64 66 31 39 36 38 33 fb1128abbdf19683
1520: 32 31 30 37 63 64 34 39 64 66 33 33 66 34 37 62 2107cd49df33f47b
1530: 34 62 31 31 36 39 39 31 32 62 61 34 66 35 33 36 4b1169912ba4f536
1540: 38 34 62 32 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 84b22..tcltest::
1550: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
1560: 41 32 32 34 2d 31 2e 31 33 20 7b 48 4d 41 43 5f A224-1.13 {HMAC_
1570: 53 48 41 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 SHA224} \..-cons
1580: 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 traints {HMAC SH
1590: 41 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 A224 } \..-setup
15a0: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
15b0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
15c0: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
15d0: 73 74 20 53 48 41 32 32 34 20 2d 6b 65 79 20 22 st SHA224 -key "
15e0: 4a 65 66 65 22 20 2d 64 61 74 61 20 22 77 68 61 Jefe" -data "wha
15f0: 74 20 64 6f 20 79 61 20 77 61 6e 74 20 66 6f 72 t do ya want for
1600: 20 6e 6f 74 68 69 6e 67 3f 22 5d 20 30 20 35 35 nothing?"] 0 55
1610: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
1620: 74 20 2d 72 65 73 75 6c 74 20 61 33 30 65 30 31 t -result a30e01
1630: 30 39 38 62 63 36 64 62 62 66 34 35 36 39 30 66 098bc6dbbf45690f
1640: 33 61 37 65 39 65 36 64 30 66 38 62 62 65 61 32 3a7e9e6d0f8bbea2
1650: 61 33 39 65 36 31 34 38 30 30 38 66 64 30 35 65 a39e6148008fd05e
1660: 34 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 44..tcltest::tes
1670: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 32 32 t MAC_HMAC-SHA22
1680: 34 2d 31 2e 31 34 20 7b 48 4d 41 43 5f 53 48 41 4-1.14 {HMAC_SHA
1690: 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 224} \..-constra
16a0: 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 32 32 ints {HMAC SHA22
16b0: 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 4 } \..-setup {}
16c0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
16d0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
16e0: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
16f0: 53 48 41 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e SHA224 -key [bin
1700: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 ary decode hex a
1710: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1720: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1730: 61 61 61 61 61 61 61 5d 20 2d 64 61 74 61 20 5b aaaaaaa] -data [
1740: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
1750: 78 20 64 64 64 64 64 64 64 64 64 64 64 64 64 64 x dddddddddddddd
1760: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1770: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1780: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1790: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
17a0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
17b0: 64 64 64 64 64 64 5d 5d 20 30 20 35 35 7d 20 5c dddddd]] 0 55} \
17c0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
17d0: 72 65 73 75 6c 74 20 37 66 62 33 63 62 33 35 38 result 7fb3cb358
17e0: 38 63 36 63 31 66 36 66 66 61 39 36 39 34 64 37 8c6c1f6ffa9694d7
17f0: 64 36 61 64 32 36 34 39 33 36 35 62 30 63 31 66 d6ad2649365b0c1f
1800: 36 35 64 36 39 64 31 65 63 38 33 33 33 65 61 0a 65d69d1ec8333ea.
1810: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d .tcltest::test M
1820: 41 43 5f 48 4d 41 43 2d 53 48 41 32 32 34 2d 31 AC_HMAC-SHA224-1
1830: 2e 31 35 20 7b 48 4d 41 43 5f 53 48 41 32 32 34 .15 {HMAC_SHA224
1840: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
1850: 73 20 7b 48 4d 41 43 20 53 48 41 32 32 34 20 7d s {HMAC SHA224 }
1860: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
1870: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
1880: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
1890: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
18a0: 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 224 -key [binary
18b0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 decode hex 0102
18c0: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61 030405060708090a
18d0: 30 62 30 63 30 64 30 65 30 66 31 30 31 31 31 32 0b0c0d0e0f101112
18e0: 31 33 31 34 31 35 31 36 31 37 31 38 31 39 5d 20 13141516171819]
18f0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
1900: 63 6f 64 65 20 68 65 78 20 63 64 63 64 63 64 63 code hex cdcdcdc
1910: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1920: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1930: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1940: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1950: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1960: 64 63 64 63 64 63 64 63 64 63 64 63 64 5d 5d 20 dcdcdcdcdcdcd]]
1970: 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0 55} \..-match
1980: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 63 exact -result 6c
1990: 31 31 35 30 36 38 37 34 30 31 33 63 61 63 36 61 11506874013cac6a
19a0: 32 61 62 63 31 62 62 33 38 32 36 32 37 63 65 63 2abc1bb382627cec
19b0: 36 61 39 30 64 38 36 65 66 63 30 31 32 64 65 37 6a90d86efc012de7
19c0: 61 66 65 63 35 61 0a 0a 74 63 6c 74 65 73 74 3a afec5a..tcltest:
19d0: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 :test MAC_HMAC-S
19e0: 48 41 32 32 34 2d 31 2e 31 36 20 7b 48 4d 41 43 HA224-1.16 {HMAC
19f0: 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e _SHA224} \..-con
1a00: 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 straints {HMAC S
1a10: 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 HA224 } \..-setu
1a20: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
1a30: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
1a40: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 ::hmac -hex -dig
1a50: 65 73 74 20 53 48 41 32 32 34 20 2d 6b 65 79 20 est SHA224 -key
1a60: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
1a70: 65 78 20 30 63 30 63 30 63 30 63 30 63 30 63 30 ex 0c0c0c0c0c0c0
1a80: 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 c0c0c0c0c0c0c0c0
1a90: 63 30 63 30 63 30 63 30 63 30 63 5d 20 2d 64 61 c0c0c0c0c0c] -da
1aa0: 74 61 20 22 54 65 73 74 20 57 69 74 68 20 54 72 ta "Test With Tr
1ab0: 75 6e 63 61 74 69 6f 6e 22 5d 20 30 20 33 31 7d uncation"] 0 31}
1ac0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1ad0: 20 2d 72 65 73 75 6c 74 20 30 65 32 61 65 61 36 -result 0e2aea6
1ae0: 38 61 39 30 63 38 64 33 37 63 39 38 38 62 63 64 8a90c8d37c988bcd
1af0: 62 39 66 63 61 36 66 61 38 0a 0a 74 63 6c 74 65 b9fca6fa8..tclte
1b00: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 st::test MAC_HMA
1b10: 43 2d 53 48 41 32 32 34 2d 31 2e 31 37 20 7b 48 C-SHA224-1.17 {H
1b20: 4d 41 43 5f 53 48 41 32 32 34 7d 20 5c 0a 09 2d MAC_SHA224} \..-
1b30: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
1b40: 43 20 53 48 41 32 32 34 20 7d 20 5c 0a 09 2d 73 C SHA224 } \..-s
1b50: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
1b60: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
1b70: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d tls::hmac -hex -
1b80: 64 69 67 65 73 74 20 53 48 41 32 32 34 20 2d 6b digest SHA224 -k
1b90: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
1ba0: 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 e hex aaaaaaaaaa
1bb0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1bc0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1bd0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1be0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1bf0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c10: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c20: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c30: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c40: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1c90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ca0: 61 61 61 61 61 61 61 61 61 61 61 61 5d 20 2d 64 aaaaaaaaaaaa] -d
1cb0: 61 74 61 20 22 54 65 73 74 20 55 73 69 6e 67 20 ata "Test Using
1cc0: 4c 61 72 67 65 72 20 54 68 61 6e 20 42 6c 6f 63 Larger Than Bloc
1cd0: 6b 2d 53 69 7a 65 20 4b 65 79 20 2d 20 48 61 73 k-Size Key - Has
1ce0: 68 20 4b 65 79 20 46 69 72 73 74 22 5d 20 30 20 h Key First"] 0
1cf0: 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 55} \..-match ex
1d00: 61 63 74 20 2d 72 65 73 75 6c 74 20 39 35 65 39 act -result 95e9
1d10: 61 30 64 62 39 36 32 30 39 35 61 64 61 65 62 65 a0db962095adaebe
1d20: 39 62 32 64 36 66 30 64 62 63 65 32 64 34 39 39 9b2d6f0dbce2d499
1d30: 66 31 31 32 66 32 64 32 62 37 32 37 33 66 61 36 f112f2d2b7273fa6
1d40: 38 37 30 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 870e..tcltest::t
1d50: 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 est MAC_HMAC-SHA
1d60: 32 32 34 2d 31 2e 31 38 20 7b 48 4d 41 43 5f 53 224-1.18 {HMAC_S
1d70: 48 41 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 HA224} \..-const
1d80: 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 raints {HMAC SHA
1d90: 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 224 } \..-setup
1da0: 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 {} \..-body {str
1db0: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a ing range [tls::
1dc0: 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 hmac -hex -diges
1dd0: 74 20 53 48 41 32 32 34 20 2d 6b 65 79 20 5b 62 t SHA224 -key [b
1de0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
1df0: 20 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaa
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 61 aaaaaaaaaaaaaaaa
1e50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1e60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1e70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1e80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1e90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ea0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1eb0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ec0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ed0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ee0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ef0: 61 61 61 61 61 61 61 5d 20 2d 64 61 74 61 20 22 aaaaaaa] -data "
1f00: 54 68 69 73 20 69 73 20 61 20 74 65 73 74 20 75 This is a test u
1f10: 73 69 6e 67 20 61 20 6c 61 72 67 65 72 20 74 68 sing a larger th
1f20: 61 6e 20 62 6c 6f 63 6b 2d 73 69 7a 65 20 6b 65 an block-size ke
1f30: 79 20 61 6e 64 20 61 20 6c 61 72 67 65 72 20 74 y and a larger t
1f40: 68 61 6e 20 62 6c 6f 63 6b 2d 73 69 7a 65 20 64 han block-size d
1f50: 61 74 61 2e 20 54 68 65 20 6b 65 79 20 6e 65 65 ata. The key nee
1f60: 64 73 20 74 6f 20 62 65 20 68 61 73 68 65 64 20 ds to be hashed
1f70: 62 65 66 6f 72 65 20 62 65 69 6e 67 20 75 73 65 before being use
1f80: 64 20 62 79 20 74 68 65 20 48 4d 41 43 20 61 6c d by the HMAC al
1f90: 67 6f 72 69 74 68 6d 2e 22 5d 20 30 20 35 35 7d gorithm."] 0 55}
1fa0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1fb0: 20 2d 72 65 73 75 6c 74 20 33 61 38 35 34 31 36 -result 3a85416
1fc0: 36 61 63 35 64 39 66 30 32 33 66 35 34 64 35 31 6ac5d9f023f54d51
1fd0: 37 64 30 62 33 39 64 62 64 39 34 36 37 37 30 64 7d0b39dbd946770d
1fe0: 62 39 63 32 62 39 35 63 39 66 36 66 35 36 35 64 b9c2b95c9f6f565d
1ff0: 31 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 1..# Cleanup.::t
2000: 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 cltest::cleanupT
2010: 65 73 74 73 0a 72 65 74 75 72 6e 0a ests.return.