Artifact
3eee92fdc9a205e3789c9869433235bb8f214045396b4432baac4655ca979d5e:
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 31 from "HMAC_SHA1
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 48 4d 41 43 20 Constraint HMAC
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 48 4d 41 43 5d 20 3e 20 2d 31 7d 5d cs] HMAC] > -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 53 48 41 31 20 5b 65 nstraint SHA1 [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 64 69 67 65 ocase [tls::dige
00e0: 73 74 73 5d 20 53 48 41 31 5d 20 3e 20 2d 31 7d sts] SHA1] > -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 48 4d 41 43 2d 53 48 41 31 2d 31 MAC_HMAC-SHA1-1
0110: 2e 31 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c .1 {HMAC_SHA1} \
0120: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
0130: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
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 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
0170: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -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 30 30 30 31 30 32 30 33 30 34 30 hex 00010203040
01a0: 35 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 5060708090a0b0c0
01b0: 64 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31 d0e0f10111213141
01c0: 35 31 36 31 37 31 38 31 39 31 61 31 62 31 63 31 5161718191a1b1c1
01d0: 64 31 65 31 66 32 30 32 31 32 32 32 33 32 34 32 d1e1f20212223242
01e0: 35 32 36 32 37 32 38 32 39 32 61 32 62 32 63 32 5262728292a2b2c2
01f0: 64 32 65 32 66 33 30 33 31 33 32 33 33 33 34 33 d2e2f30313233343
0200: 35 33 36 33 37 33 38 33 39 33 61 33 62 33 63 33 5363738393a3b3c3
0210: 64 33 65 33 66 5d 20 2d 64 61 74 61 20 22 53 61 d3e3f] -data "Sa
0220: 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 mple message for
0230: 20 6b 65 79 6c 65 6e 3d 62 6c 6f 63 6b 6c 65 6e keylen=blocklen
0240: 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 "] 0 39} \..-mat
0250: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0260: 20 35 66 64 35 39 36 65 65 37 38 64 35 35 35 33 5fd596ee78d5553
0270: 63 38 66 66 34 65 37 32 64 32 36 36 64 66 64 31 c8ff4e72d266dfd1
0280: 39 32 33 36 36 64 61 32 39 0a 0a 74 63 6c 74 65 92366da29..tclte
0290: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 st::test MAC_HMA
02a0: 43 2d 53 48 41 31 2d 31 2e 32 20 7b 48 4d 41 43 C-SHA1-1.2 {HMAC
02b0: 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 _SHA1} \..-const
02c0: 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 raints {HMAC SHA
02d0: 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 1 } \..-setup {}
02e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
02f0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
0300: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
0310: 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 SHA1 -key [binar
0320: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 y decode hex 000
0330: 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 1020304050607080
0340: 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 90a0b0c0d0e0f101
0350: 31 31 32 31 33 5d 20 2d 64 61 74 61 20 22 53 61 11213] -data "Sa
0360: 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 mple message for
0370: 20 6b 65 79 6c 65 6e 3c 62 6c 6f 63 6b 6c 65 6e keylen<blocklen
0380: 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 "] 0 39} \..-mat
0390: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
03a0: 20 34 63 39 39 66 66 30 63 62 31 62 33 31 62 64 4c99ff0cb1b31bd
03b0: 33 33 66 38 34 33 31 64 62 61 66 34 64 31 37 66 33f8431dbaf4d17f
03c0: 63 64 33 35 36 61 38 30 37 0a 0a 74 63 6c 74 65 cd356a807..tclte
03d0: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 st::test MAC_HMA
03e0: 43 2d 53 48 41 31 2d 31 2e 33 20 7b 48 4d 41 43 C-SHA1-1.3 {HMAC
03f0: 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 _SHA1} \..-const
0400: 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 raints {HMAC SHA
0410: 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 1 } \..-setup {}
0420: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
0430: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
0440: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
0450: 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 SHA1 -key [binar
0460: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 y decode hex 000
0470: 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 1020304050607080
0480: 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 90a0b0c0d0e0f101
0490: 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 1121314151617181
04a0: 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30 32 91a1b1c1d1e1f202
04b0: 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38 32 1222324252627282
04c0: 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30 33 92a2b2c2d2e2f303
04d0: 31 33 32 33 33 33 34 33 35 33 36 33 37 33 38 33 1323334353637383
04e0: 39 33 61 33 62 33 63 33 64 33 65 33 66 34 30 34 93a3b3c3d3e3f404
04f0: 31 34 32 34 33 34 34 34 35 34 36 34 37 34 38 34 1424344454647484
0500: 39 34 61 34 62 34 63 34 64 34 65 34 66 35 30 35 94a4b4c4d4e4f505
0510: 31 35 32 35 33 35 34 35 35 35 36 35 37 35 38 35 1525354555657585
0520: 39 35 61 35 62 35 63 35 64 35 65 35 66 36 30 36 95a5b5c5d5e5f606
0530: 31 36 32 36 33 5d 20 2d 64 61 74 61 20 22 53 61 16263] -data "Sa
0540: 6d 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 mple message for
0550: 20 6b 65 79 6c 65 6e 3d 62 6c 6f 63 6b 6c 65 6e keylen=blocklen
0560: 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 "] 0 39} \..-mat
0570: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0580: 20 32 64 35 31 62 32 66 37 37 35 30 65 34 31 30 2d51b2f7750e410
0590: 35 38 34 36 36 32 65 33 38 66 31 33 33 34 33 35 584662e38f133435
05a0: 66 34 63 34 66 64 34 32 61 0a 0a 74 63 6c 74 65 f4c4fd42a..tclte
05b0: 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 st::test MAC_HMA
05c0: 43 2d 53 48 41 31 2d 31 2e 34 20 7b 48 4d 41 43 C-SHA1-1.4 {HMAC
05d0: 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 _SHA1} \..-const
05e0: 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 raints {HMAC SHA
05f0: 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 1 } \..-setup {}
0600: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
0610: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
0620: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
0630: 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 SHA1 -key [binar
0640: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 y decode hex 000
0650: 31 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 1020304050607080
0660: 39 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 90a0b0c0d0e0f101
0670: 31 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 1121314151617181
0680: 39 31 61 31 62 31 63 31 64 31 65 31 66 32 30 32 91a1b1c1d1e1f202
0690: 31 32 32 32 33 32 34 32 35 32 36 32 37 32 38 32 1222324252627282
06a0: 39 32 61 32 62 32 63 32 64 32 65 32 66 33 30 5d 92a2b2c2d2e2f30]
06b0: 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 6d -data "Sample m
06c0: 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 essage for keyle
06d0: 6e 3c 62 6c 6f 63 6b 6c 65 6e 2c 20 77 69 74 68 n<blocklen, with
06e0: 20 74 72 75 6e 63 61 74 65 64 20 74 61 67 22 5d truncated tag"]
06f0: 20 30 20 32 33 7d 20 5c 0a 09 2d 6d 61 74 63 68 0 23} \..-match
0700: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66 exact -result f
0710: 65 33 35 32 39 35 36 35 63 64 38 65 32 38 63 35 e3529565cd8e28c5
0720: 66 61 37 39 65 61 63 0a 0a 74 63 6c 74 65 73 74 fa79eac..tcltest
0730: 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d ::test MAC_HMAC-
0740: 53 48 41 31 2d 31 2e 35 20 7b 48 4d 41 43 5f 53 SHA1-1.5 {HMAC_S
0750: 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 HA1} \..-constra
0760: 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 ints {HMAC SHA1
0770: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c } \..-setup {} \
0780: 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 ..-body {string
0790: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 range [tls::hmac
07a0: 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 -hex -digest SH
07b0: 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 A1 -key [binary
07c0: 64 65 63 6f 64 65 20 68 65 78 20 30 62 30 62 30 decode hex 0b0b0
07d0: 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 b0b0b0b0b0b0b0b0
07e0: 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 b0b0b0b0b0b0b0b0
07f0: 62 30 62 5d 20 2d 64 61 74 61 20 22 48 69 20 54 b0b] -data "Hi T
0800: 68 65 72 65 22 5d 20 30 20 33 39 7d 20 5c 0a 09 here"] 0 39} \..
0810: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0820: 73 75 6c 74 20 62 36 31 37 33 31 38 36 35 35 30 sult b6173186550
0830: 35 37 32 36 34 65 32 38 62 63 30 62 36 66 62 33 57264e28bc0b6fb3
0840: 37 38 63 38 65 66 31 34 36 62 65 30 30 0a 0a 74 78c8ef146be00..t
0850: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 cltest::test MAC
0860: 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e 36 20 7b _HMAC-SHA1-1.6 {
0870: 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 HMAC_SHA1} \..-c
0880: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 onstraints {HMAC
0890: 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 75 SHA1 } \..-setu
08a0: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
08b0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
08c0: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 ::hmac -hex -dig
08d0: 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 22 4a est SHA1 -key "J
08e0: 65 66 65 22 20 2d 64 61 74 61 20 22 77 68 61 74 efe" -data "what
08f0: 20 64 6f 20 79 61 20 77 61 6e 74 20 66 6f 72 20 do ya want for
0900: 6e 6f 74 68 69 6e 67 3f 22 5d 20 30 20 33 39 7d nothing?"] 0 39}
0910: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
0920: 20 2d 72 65 73 75 6c 74 20 65 66 66 63 64 66 36 -result effcdf6
0930: 61 65 35 65 62 32 66 61 32 64 32 37 34 31 36 64 ae5eb2fa2d27416d
0940: 35 66 31 38 34 64 66 39 63 32 35 39 61 37 63 37 5f184df9c259a7c7
0950: 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 9..tcltest::test
0960: 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 MAC_HMAC-SHA1-1
0970: 2e 37 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c .7 {HMAC_SHA1} \
0980: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
0990: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
09a0: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
09b0: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
09c0: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
09d0: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -ke
09e0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
09f0: 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 61 hex aaaaaaaaaaa
0a00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0a10: 61 61 61 61 61 61 61 61 61 61 61 61 61 5d 20 2d aaaaaaaaaaaaa] -
0a20: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0a30: 6f 64 65 20 68 65 78 20 64 64 64 64 64 64 64 64 ode hex dddddddd
0a40: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0a50: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0a60: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0a70: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0a80: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0a90: 64 64 64 64 64 64 64 64 64 64 64 64 5d 5d 20 30 dddddddddddd]] 0
0aa0: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
0ab0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31 32 35 xact -result 125
0ac0: 64 37 33 34 32 62 39 61 63 31 31 63 64 39 31 61 d7342b9ac11cd91a
0ad0: 33 39 61 66 34 38 61 61 31 37 62 34 66 36 33 66 39af48aa17b4f63f
0ae0: 31 37 35 64 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 175d3..tcltest::
0af0: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
0b00: 41 31 2d 31 2e 38 20 7b 48 4d 41 43 5f 53 48 41 A1-1.8 {HMAC_SHA
0b10: 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 1} \..-constrain
0b20: 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 ts {HMAC SHA1 }
0b30: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 \..-setup {} \..
0b40: 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 -body {string ra
0b50: 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d nge [tls::hmac -
0b60: 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 hex -digest SHA1
0b70: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
0b80: 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 33 30 code hex 0102030
0b90: 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 30 405060708090a0b0
0ba0: 63 30 64 30 65 30 66 31 30 31 31 31 32 31 33 31 c0d0e0f101112131
0bb0: 34 31 35 31 36 31 37 31 38 31 39 5d 20 2d 64 61 41516171819] -da
0bc0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0bd0: 65 20 68 65 78 20 63 64 63 64 63 64 63 64 63 64 e hex cdcdcdcdcd
0be0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
0bf0: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
0c00: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
0c10: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
0c20: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
0c30: 63 64 63 64 63 64 63 64 63 64 5d 5d 20 30 20 33 cdcdcdcdcd]] 0 3
0c40: 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 9} \..-match exa
0c50: 63 74 20 2d 72 65 73 75 6c 74 20 34 63 39 30 30 ct -result 4c900
0c60: 37 66 34 30 32 36 32 35 30 63 36 62 63 38 34 31 7f4026250c6bc841
0c70: 34 66 39 62 66 35 30 63 38 36 63 32 64 37 32 33 4f9bf50c86c2d723
0c80: 35 64 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 5da..tcltest::te
0c90: 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 st MAC_HMAC-SHA1
0ca0: 2d 31 2e 39 20 7b 48 4d 41 43 5f 53 48 41 31 7d -1.9 {HMAC_SHA1}
0cb0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0cc0: 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a {HMAC SHA1 } \.
0cd0: 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 .-setup {} \..-b
0ce0: 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 ody {string rang
0cf0: 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 e [tls::hmac -he
0d00: 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d x -digest SHA1 -
0d10: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
0d20: 64 65 20 68 65 78 20 30 63 30 63 30 63 30 63 30 de hex 0c0c0c0c0
0d30: 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 c0c0c0c0c0c0c0c0
0d40: 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 5d c0c0c0c0c0c0c0c]
0d50: 20 2d 64 61 74 61 20 22 54 65 73 74 20 57 69 74 -data "Test Wit
0d60: 68 20 54 72 75 6e 63 61 74 69 6f 6e 22 5d 20 30 h Truncation"] 0
0d70: 20 32 33 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 23} \..-match e
0d80: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34 63 31 xact -result 4c1
0d90: 61 30 33 34 32 34 62 35 35 65 30 37 66 65 37 66 a03424b55e07fe7f
0da0: 32 37 62 65 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 27be1..tcltest::
0db0: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
0dc0: 41 31 2d 31 2e 31 30 20 7b 48 4d 41 43 5f 53 48 A1-1.10 {HMAC_SH
0dd0: 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 A1} \..-constrai
0de0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d nts {HMAC SHA1 }
0df0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
0e00: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
0e10: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
0e20: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
0e30: 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 1 -key [binary d
0e40: 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 ecode hex aaaaaa
0e50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0e60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0e70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0e80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0e90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ea0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0eb0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ec0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ed0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ee0: 61 61 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 aaaaaaaaaa] -dat
0ef0: 61 20 22 54 65 73 74 20 55 73 69 6e 67 20 4c 61 a "Test Using La
0f00: 72 67 65 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d rger Than Block-
0f10: 53 69 7a 65 20 4b 65 79 20 2d 20 48 61 73 68 20 Size Key - Hash
0f20: 4b 65 79 20 46 69 72 73 74 22 5d 20 30 20 33 39 Key First"] 0 39
0f30: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
0f40: 74 20 2d 72 65 73 75 6c 74 20 61 61 34 61 65 35 t -result aa4ae5
0f50: 65 31 35 32 37 32 64 30 30 65 39 35 37 30 35 36 e15272d00e957056
0f60: 33 37 63 65 38 61 33 62 35 35 65 64 34 30 32 31 37ce8a3b55ed4021
0f70: 31 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 12..tcltest::tes
0f80: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d t MAC_HMAC-SHA1-
0f90: 31 2e 31 31 20 7b 48 4d 41 43 5f 53 48 41 31 7d 1.11 {HMAC_SHA1}
0fa0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0fb0: 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a {HMAC SHA1 } \.
0fc0: 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 .-setup {} \..-b
0fd0: 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 ody {string rang
0fe0: 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 e [tls::hmac -he
0ff0: 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d x -digest SHA1 -
1000: 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f key [binary deco
1010: 64 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 de hex aaaaaaaaa
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 5d 20 2d 64 61 74 61 20 22 aaaaaaa] -data "
10c0: 54 65 73 74 20 55 73 69 6e 67 20 4c 61 72 67 65 Test Using Large
10d0: 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d 53 69 7a r Than Block-Siz
10e0: 65 20 4b 65 79 20 61 6e 64 20 4c 61 72 67 65 72 e Key and Larger
10f0: 20 54 68 61 6e 20 4f 6e 65 20 42 6c 6f 63 6b 2d Than One Block-
1100: 53 69 7a 65 20 44 61 74 61 22 5d 20 30 20 33 39 Size Data"] 0 39
1110: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
1120: 74 20 2d 72 65 73 75 6c 74 20 65 38 65 39 39 64 t -result e8e99d
1130: 30 66 34 35 32 33 37 64 37 38 36 64 36 62 62 61 0f45237d786d6bba
1140: 61 37 39 36 35 63 37 38 30 38 62 62 66 66 31 61 a7965c7808bbff1a
1150: 39 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 91..tcltest::tes
1160: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d t MAC_HMAC-SHA1-
1170: 31 2e 31 32 20 7b 48 4d 41 43 5f 53 48 41 31 7d 1.12 {HMAC_SHA1}
1180: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
1190: 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a {HMAC SHA1 } \.
11a0: 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 .-setup {} \..-b
11b0: 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 ody {string rang
11c0: 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 e [tls::hmac -he
11d0: 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d x -digest SHA1 -
11e0: 6b 65 79 20 22 6b 65 79 22 20 2d 64 61 74 61 20 key "key" -data
11f0: 22 54 68 65 20 71 75 69 63 6b 20 62 72 6f 77 6e "The quick brown
1200: 20 66 6f 78 20 6a 75 6d 70 73 20 6f 76 65 72 20 fox jumps over
1210: 74 68 65 20 6c 61 7a 79 20 64 6f 67 22 5d 20 30 the lazy dog"] 0
1220: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
1230: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64 65 37 xact -result de7
1240: 63 39 62 38 35 62 38 62 37 38 61 61 36 62 63 38 c9b85b8b78aa6bc8
1250: 61 37 61 33 36 66 37 30 61 39 30 37 30 31 63 39 a7a36f70a90701c9
1260: 64 62 34 64 39 0a 0a 74 63 6c 74 65 73 74 3a 3a db4d9..tcltest::
1270: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
1280: 41 31 2d 31 2e 31 33 20 7b 48 4d 41 43 5f 53 48 A1-1.13 {HMAC_SH
1290: 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 A1} \..-constrai
12a0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d nts {HMAC SHA1 }
12b0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
12c0: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
12d0: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
12e0: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
12f0: 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 1 -key [binary d
1300: 65 63 6f 64 65 20 68 65 78 20 30 62 30 62 30 62 ecode hex 0b0b0b
1310: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
1320: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
1330: 30 62 5d 20 2d 64 61 74 61 20 22 48 69 20 54 68 0b] -data "Hi Th
1340: 65 72 65 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d ere"] 0 39} \..-
1350: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
1360: 75 6c 74 20 62 36 31 37 33 31 38 36 35 35 30 35 ult b61731865505
1370: 37 32 36 34 65 32 38 62 63 30 62 36 66 62 33 37 7264e28bc0b6fb37
1380: 38 63 38 65 66 31 34 36 62 65 30 30 0a 0a 74 63 8c8ef146be00..tc
1390: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
13a0: 48 4d 41 43 2d 53 48 41 31 2d 31 2e 31 34 20 7b HMAC-SHA1-1.14 {
13b0: 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 HMAC_SHA1} \..-c
13c0: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 onstraints {HMAC
13d0: 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 75 SHA1 } \..-setu
13e0: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
13f0: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
1400: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 ::hmac -hex -dig
1410: 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 22 4a est SHA1 -key "J
1420: 65 66 65 22 20 2d 64 61 74 61 20 22 77 68 61 74 efe" -data "what
1430: 20 64 6f 20 79 61 20 77 61 6e 74 20 66 6f 72 20 do ya want for
1440: 6e 6f 74 68 69 6e 67 3f 22 5d 20 30 20 33 39 7d nothing?"] 0 39}
1450: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1460: 20 2d 72 65 73 75 6c 74 20 65 66 66 63 64 66 36 -result effcdf6
1470: 61 65 35 65 62 32 66 61 32 64 32 37 34 31 36 64 ae5eb2fa2d27416d
1480: 35 66 31 38 34 64 66 39 63 32 35 39 61 37 63 37 5f184df9c259a7c7
1490: 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 9..tcltest::test
14a0: 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 MAC_HMAC-SHA1-1
14b0: 2e 31 35 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 .15 {HMAC_SHA1}
14c0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
14d0: 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 {HMAC SHA1 } \..
14e0: 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f -setup {} \..-bo
14f0: 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 dy {string range
1500: 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 [tls::hmac -hex
1510: 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b -digest SHA1 -k
1520: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
1530: 65 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 e hex aaaaaaaaaa
1540: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1550: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 5d 20 aaaaaaaaaaaaaa]
1560: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
1570: 63 6f 64 65 20 68 65 78 20 64 64 64 64 64 64 64 code hex ddddddd
1580: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1590: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
15a0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
15b0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
15c0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
15d0: 64 64 64 64 64 64 64 64 64 64 64 64 64 5d 5d 20 ddddddddddddd]]
15e0: 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 0 39} \..-match
15f0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31 32 exact -result 12
1600: 35 64 37 33 34 32 62 39 61 63 31 31 63 64 39 31 5d7342b9ac11cd91
1610: 61 33 39 61 66 34 38 61 61 31 37 62 34 66 36 33 a39af48aa17b4f63
1620: 66 31 37 35 64 33 0a 0a 74 63 6c 74 65 73 74 3a f175d3..tcltest:
1630: 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 :test MAC_HMAC-S
1640: 48 41 31 2d 31 2e 31 36 20 7b 48 4d 41 43 5f 53 HA1-1.16 {HMAC_S
1650: 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 HA1} \..-constra
1660: 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 ints {HMAC SHA1
1670: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c } \..-setup {} \
1680: 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 ..-body {string
1690: 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 range [tls::hmac
16a0: 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 -hex -digest SH
16b0: 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 A1 -key [binary
16c0: 64 65 63 6f 64 65 20 68 65 78 20 30 31 30 32 30 decode hex 01020
16d0: 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 30405060708090a0
16e0: 62 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 b0c0d0e0f1011121
16f0: 33 31 34 31 35 31 36 31 37 31 38 31 39 5d 20 2d 3141516171819] -
1700: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
1710: 6f 64 65 20 68 65 78 20 63 64 63 64 63 64 63 64 ode hex cdcdcdcd
1720: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
1730: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
1740: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
1750: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
1760: 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 cdcdcdcdcdcdcdcd
1770: 63 64 63 64 63 64 63 64 63 64 63 64 5d 5d 20 30 cdcdcdcdcdcd]] 0
1780: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
1790: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34 63 39 xact -result 4c9
17a0: 30 30 37 66 34 30 32 36 32 35 30 63 36 62 63 38 007f4026250c6bc8
17b0: 34 31 34 66 39 62 66 35 30 63 38 36 63 32 64 37 414f9bf50c86c2d7
17c0: 32 33 35 64 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 235da..tcltest::
17d0: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
17e0: 41 31 2d 31 2e 31 37 20 7b 48 4d 41 43 5f 53 48 A1-1.17 {HMAC_SH
17f0: 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 A1} \..-constrai
1800: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d nts {HMAC SHA1 }
1810: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
1820: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
1830: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
1840: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
1850: 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 1 -key [binary d
1860: 65 63 6f 64 65 20 68 65 78 20 30 63 30 63 30 63 ecode hex 0c0c0c
1870: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
1880: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
1890: 30 63 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 0c] -data "Test
18a0: 57 69 74 68 20 54 72 75 6e 63 61 74 69 6f 6e 22 With Truncation"
18b0: 5d 20 30 20 32 33 7d 20 5c 0a 09 2d 6d 61 74 63 ] 0 23} \..-matc
18c0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
18d0: 34 63 31 61 30 33 34 32 34 62 35 35 65 30 37 66 4c1a03424b55e07f
18e0: 65 37 66 32 37 62 65 31 0a 0a 74 63 6c 74 65 73 e7f27be1..tcltes
18f0: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
1900: 2d 53 48 41 31 2d 31 2e 31 38 20 7b 48 4d 41 43 -SHA1-1.18 {HMAC
1910: 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 _SHA1} \..-const
1920: 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 raints {HMAC SHA
1930: 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 1 } \..-setup {}
1940: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
1950: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
1960: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
1970: 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 SHA1 -key [binar
1980: 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 61 61 y decode hex aaa
1990: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19a0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19b0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19c0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19d0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19e0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
19f0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a10: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a20: 61 61 61 61 61 61 61 61 61 61 61 61 61 5d 20 2d aaaaaaaaaaaaa] -
1a30: 64 61 74 61 20 22 54 65 73 74 20 55 73 69 6e 67 data "Test Using
1a40: 20 4c 61 72 67 65 72 20 54 68 61 6e 20 42 6c 6f Larger Than Blo
1a50: 63 6b 2d 53 69 7a 65 20 4b 65 79 20 2d 20 48 61 ck-Size Key - Ha
1a60: 73 68 20 4b 65 79 20 46 69 72 73 74 22 5d 20 30 sh Key First"] 0
1a70: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
1a80: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61 61 34 xact -result aa4
1a90: 61 65 35 65 31 35 32 37 32 64 30 30 65 39 35 37 ae5e15272d00e957
1aa0: 30 35 36 33 37 63 65 38 61 33 62 35 35 65 64 34 05637ce8a3b55ed4
1ab0: 30 32 31 31 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 02112..tcltest::
1ac0: 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 test MAC_HMAC-SH
1ad0: 41 31 2d 31 2e 31 39 20 7b 48 4d 41 43 5f 53 48 A1-1.19 {HMAC_SH
1ae0: 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 A1} \..-constrai
1af0: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d nts {HMAC SHA1 }
1b00: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a \..-setup {} \.
1b10: 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 .-body {string r
1b20: 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 ange [tls::hmac
1b30: 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 -hex -digest SHA
1b40: 31 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 1 -key [binary d
1b50: 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 ecode hex aaaaaa
1b60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1b70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1b80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1b90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ba0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
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 5d 20 2d 64 61 74 aaaaaaaaaa] -dat
1c00: 61 20 22 54 65 73 74 20 55 73 69 6e 67 20 4c 61 a "Test Using La
1c10: 72 67 65 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d rger Than Block-
1c20: 53 69 7a 65 20 4b 65 79 20 61 6e 64 20 4c 61 72 Size Key and Lar
1c30: 67 65 72 20 54 68 61 6e 20 4f 6e 65 20 42 6c 6f ger Than One Blo
1c40: 63 6b 2d 53 69 7a 65 20 44 61 74 61 22 5d 20 30 ck-Size Data"] 0
1c50: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
1c60: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65 38 65 xact -result e8e
1c70: 39 39 64 30 66 34 35 32 33 37 64 37 38 36 64 36 99d0f45237d786d6
1c80: 62 62 61 61 37 39 36 35 63 37 38 30 38 62 62 66 bbaa7965c7808bbf
1c90: 66 31 61 39 31 0a 0a 23 20 43 6c 65 61 6e 75 70 f1a91..# Cleanup
1ca0: 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 .::tcltest::clea
1cb0: 6e 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a nupTests.return.