Artifact
48dc8e00f778778f40f0ad22bd8be055e7bb157bd9dd605b9dc08ec7dd8629eb:
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 6c 61 70 70 65 6e 64 20 61 75 .txt".lappend au
0030: 74 6f 5f 70 61 74 68 20 5b 66 69 6c 65 20 64 69 to_path [file di
0040: 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e rname [file dirn
0050: 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d ame [file dirnam
0060: 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 e [file dirname
0070: 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 64 5d [file join [pwd]
0080: 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d 5d [info script]]]
0090: 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 72 65 71 75 ]]].package requ
00a0: 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 65 20 ire tls.package
00b0: 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 74 0a require tcltest.
00c0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f .tcltest::testCo
00d0: 6e 73 74 72 61 69 6e 74 20 48 4d 41 43 20 5b 65 nstraint HMAC [e
00e0: 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20 2d 6e xpr {[lsearch -n
00f0: 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 6d 61 63 73 ocase [tls::macs
0100: 5d 20 48 4d 41 43 5d 20 3e 20 2d 31 7d 5d 0a 74 ] HMAC] > -1}].t
0110: 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f 6e 73 cltest::testCons
0120: 74 72 61 69 6e 74 20 53 48 41 31 20 5b 65 78 70 traint SHA1 [exp
0130: 72 20 7b 5b 6c 73 65 61 72 63 68 20 2d 6e 6f 63 r {[lsearch -noc
0140: 61 73 65 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 ase [tls::digest
0150: 73 5d 20 53 48 41 31 5d 20 3e 20 2d 31 7d 5d 0a s] SHA1] > -1}].
0160: 63 61 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 catch {tls::prov
0170: 69 64 65 72 20 6c 65 67 61 63 79 7d 0a 0a 74 63 ider legacy}..tc
0180: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
0190: 48 4d 41 43 2d 53 48 41 31 2d 31 2e 31 20 7b 48 HMAC-SHA1-1.1 {H
01a0: 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f MAC_SHA1} \..-co
01b0: 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 nstraints {HMAC
01c0: 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 SHA1 } \..-setup
01d0: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
01e0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
01f0: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
0200: 73 74 20 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 st SHA1 -key [bi
0210: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
0220: 30 30 30 31 30 32 30 33 30 34 30 35 30 36 30 37 0001020304050607
0230: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 08090a0b0c0d0e0f
0240: 31 30 31 31 31 32 31 33 31 34 31 35 31 36 31 37 1011121314151617
0250: 31 38 31 39 31 61 31 62 31 63 31 64 31 65 31 66 18191a1b1c1d1e1f
0260: 32 30 32 31 32 32 32 33 32 34 32 35 32 36 32 37 2021222324252627
0270: 32 38 32 39 32 61 32 62 32 63 32 64 32 65 32 66 28292a2b2c2d2e2f
0280: 33 30 33 31 33 32 33 33 33 34 33 35 33 36 33 37 3031323334353637
0290: 33 38 33 39 33 61 33 62 33 63 33 64 33 65 33 66 38393a3b3c3d3e3f
02a0: 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 ] -data "Sample
02b0: 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c message for keyl
02c0: 65 6e 3d 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 en=blocklen"] 0
02d0: 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 39} \..-match ex
02e0: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 66 64 35 act -result 5fd5
02f0: 39 36 65 65 37 38 64 35 35 35 33 63 38 66 66 34 96ee78d5553c8ff4
0300: 65 37 32 64 32 36 36 64 66 64 31 39 32 33 36 36 e72d266dfd192366
0310: 64 61 32 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 da29..tcltest::t
0320: 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 est MAC_HMAC-SHA
0330: 31 2d 31 2e 32 20 7b 48 4d 41 43 5f 53 48 41 31 1-1.2 {HMAC_SHA1
0340: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0350: 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c s {HMAC SHA1 } \
0360: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0370: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
0380: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
0390: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 ex -digest SHA1
03a0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
03b0: 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 33 ode hex 00010203
03c0: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 0405060708090a0b
03d0: 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 33 0c0d0e0f10111213
03e0: 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 ] -data "Sample
03f0: 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c message for keyl
0400: 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 en<blocklen"] 0
0410: 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 39} \..-match ex
0420: 61 63 74 20 2d 72 65 73 75 6c 74 20 34 63 39 39 act -result 4c99
0430: 66 66 30 63 62 31 62 33 31 62 64 33 33 66 38 34 ff0cb1b31bd33f84
0440: 33 31 64 62 61 66 34 64 31 37 66 63 64 33 35 36 31dbaf4d17fcd356
0450: 61 38 30 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 a807..tcltest::t
0460: 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 est MAC_HMAC-SHA
0470: 31 2d 31 2e 33 20 7b 48 4d 41 43 5f 53 48 41 31 1-1.3 {HMAC_SHA1
0480: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0490: 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c s {HMAC SHA1 } \
04a0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
04b0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
04c0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
04d0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 ex -digest SHA1
04e0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
04f0: 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 33 ode hex 00010203
0500: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 0405060708090a0b
0510: 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 33 0c0d0e0f10111213
0520: 31 34 31 35 31 36 31 37 31 38 31 39 31 61 31 62 1415161718191a1b
0530: 31 63 31 64 31 65 31 66 32 30 32 31 32 32 32 33 1c1d1e1f20212223
0540: 32 34 32 35 32 36 32 37 32 38 32 39 32 61 32 62 2425262728292a2b
0550: 32 63 32 64 32 65 32 66 33 30 33 31 33 32 33 33 2c2d2e2f30313233
0560: 33 34 33 35 33 36 33 37 33 38 33 39 33 61 33 62 3435363738393a3b
0570: 33 63 33 64 33 65 33 66 34 30 34 31 34 32 34 33 3c3d3e3f40414243
0580: 34 34 34 35 34 36 34 37 34 38 34 39 34 61 34 62 4445464748494a4b
0590: 34 63 34 64 34 65 34 66 35 30 35 31 35 32 35 33 4c4d4e4f50515253
05a0: 35 34 35 35 35 36 35 37 35 38 35 39 35 61 35 62 5455565758595a5b
05b0: 35 63 35 64 35 65 35 66 36 30 36 31 36 32 36 33 5c5d5e5f60616263
05c0: 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65 20 ] -data "Sample
05d0: 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79 6c message for keyl
05e0: 65 6e 3d 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 en=blocklen"] 0
05f0: 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 39} \..-match ex
0600: 61 63 74 20 2d 72 65 73 75 6c 74 20 32 64 35 31 act -result 2d51
0610: 62 32 66 37 37 35 30 65 34 31 30 35 38 34 36 36 b2f7750e41058466
0620: 32 65 33 38 66 31 33 33 34 33 35 66 34 63 34 66 2e38f133435f4c4f
0630: 64 34 32 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 d42a..tcltest::t
0640: 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 est MAC_HMAC-SHA
0650: 31 2d 31 2e 34 20 7b 48 4d 41 43 5f 53 48 41 31 1-1.4 {HMAC_SHA1
0660: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0670: 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c s {HMAC SHA1 } \
0680: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0690: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
06a0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
06b0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 ex -digest SHA1
06c0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
06d0: 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 33 ode hex 00010203
06e0: 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 62 0405060708090a0b
06f0: 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 33 0c0d0e0f10111213
0700: 31 34 31 35 31 36 31 37 31 38 31 39 31 61 31 62 1415161718191a1b
0710: 31 63 31 64 31 65 31 66 32 30 32 31 32 32 32 33 1c1d1e1f20212223
0720: 32 34 32 35 32 36 32 37 32 38 32 39 32 61 32 62 2425262728292a2b
0730: 32 63 32 64 32 65 32 66 33 30 5d 20 2d 64 61 74 2c2d2e2f30] -dat
0740: 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 61 67 a "Sample messag
0750: 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3c 62 6c 6f e for keylen<blo
0760: 63 6b 6c 65 6e 2c 20 77 69 74 68 20 74 72 75 6e cklen, with trun
0770: 63 61 74 65 64 20 74 61 67 22 5d 20 30 20 32 33 cated tag"] 0 23
0780: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
0790: 74 20 2d 72 65 73 75 6c 74 20 66 65 33 35 32 39 t -result fe3529
07a0: 35 36 35 63 64 38 65 32 38 63 35 66 61 37 39 65 565cd8e28c5fa79e
07b0: 61 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 ac..tcltest::tes
07c0: 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d t MAC_HMAC-SHA1-
07d0: 31 2e 35 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 1.5 {HMAC_SHA1}
07e0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
07f0: 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 {HMAC SHA1 } \..
0800: 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f -setup {} \..-bo
0810: 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 dy {string range
0820: 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 [tls::hmac -hex
0830: 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b -digest SHA1 -k
0840: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
0850: 65 20 68 65 78 20 30 62 30 62 30 62 30 62 30 62 e hex 0b0b0b0b0b
0860: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
0870: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 5d 20 0b0b0b0b0b0b0b]
0880: 2d 64 61 74 61 20 22 48 69 20 54 68 65 72 65 22 -data "Hi There"
0890: 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 ] 0 39} \..-matc
08a0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
08b0: 62 36 31 37 33 31 38 36 35 35 30 35 37 32 36 34 b617318655057264
08c0: 65 32 38 62 63 30 62 36 66 62 33 37 38 63 38 65 e28bc0b6fb378c8e
08d0: 66 31 34 36 62 65 30 30 0a 0a 74 63 6c 74 65 73 f146be00..tcltes
08e0: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
08f0: 2d 53 48 41 31 2d 31 2e 36 20 7b 48 4d 41 43 5f -SHA1-1.6 {HMAC_
0900: 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 SHA1} \..-constr
0910: 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 aints {HMAC SHA1
0920: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 } \..-setup {}
0930: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 \..-body {string
0940: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 range [tls::hma
0950: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 c -hex -digest S
0960: 48 41 31 20 2d 6b 65 79 20 22 4a 65 66 65 22 20 HA1 -key "Jefe"
0970: 2d 64 61 74 61 20 22 77 68 61 74 20 64 6f 20 79 -data "what do y
0980: 61 20 77 61 6e 74 20 66 6f 72 20 6e 6f 74 68 69 a want for nothi
0990: 6e 67 3f 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d ng?"] 0 39} \..-
09a0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
09b0: 75 6c 74 20 65 66 66 63 64 66 36 61 65 35 65 62 ult effcdf6ae5eb
09c0: 32 66 61 32 64 32 37 34 31 36 64 35 66 31 38 34 2fa2d27416d5f184
09d0: 64 66 39 63 32 35 39 61 37 63 37 39 0a 0a 74 63 df9c259a7c79..tc
09e0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
09f0: 48 4d 41 43 2d 53 48 41 31 2d 31 2e 37 20 7b 48 HMAC-SHA1-1.7 {H
0a00: 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 6f MAC_SHA1} \..-co
0a10: 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 nstraints {HMAC
0a20: 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 75 70 SHA1 } \..-setup
0a30: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
0a40: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
0a50: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
0a60: 73 74 20 53 48 41 31 20 2d 6b 65 79 20 5b 62 69 st SHA1 -key [bi
0a70: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
0a80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0a90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0aa0: 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 61 20 aaaaaaaa] -data
0ab0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
0ac0: 65 78 20 64 64 64 64 64 64 64 64 64 64 64 64 64 ex ddddddddddddd
0ad0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0ae0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0af0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0b00: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0b10: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0b20: 64 64 64 64 64 64 64 5d 5d 20 30 20 33 39 7d 20 ddddddd]] 0 39}
0b30: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0b40: 2d 72 65 73 75 6c 74 20 31 32 35 64 37 33 34 32 -result 125d7342
0b50: 62 39 61 63 31 31 63 64 39 31 61 33 39 61 66 34 b9ac11cd91a39af4
0b60: 38 61 61 31 37 62 34 66 36 33 66 31 37 35 64 33 8aa17b4f63f175d3
0b70: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
0b80: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e MAC_HMAC-SHA1-1.
0b90: 38 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 8 {HMAC_SHA1} \.
0ba0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
0bb0: 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 MAC SHA1 } \..-s
0bc0: 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 etup {} \..-body
0bd0: 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b {string range [
0be0: 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d tls::hmac -hex -
0bf0: 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 79 digest SHA1 -key
0c00: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0c10: 68 65 78 20 30 31 30 32 30 33 30 34 30 35 30 36 hex 010203040506
0c20: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 0708090a0b0c0d0e
0c30: 30 66 31 30 31 31 31 32 31 33 31 34 31 35 31 36 0f10111213141516
0c40: 31 37 31 38 31 39 5d 20 2d 64 61 74 61 20 5b 62 171819] -data [b
0c50: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
0c60: 20 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 cdcdcdcdcdcdcdc
0c70: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0c80: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0c90: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0ca0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0cb0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0cc0: 64 63 64 63 64 5d 5d 20 30 20 33 39 7d 20 5c 0a dcdcd]] 0 39} \.
0cd0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0ce0: 65 73 75 6c 74 20 34 63 39 30 30 37 66 34 30 32 esult 4c9007f402
0cf0: 36 32 35 30 63 36 62 63 38 34 31 34 66 39 62 66 6250c6bc8414f9bf
0d00: 35 30 63 38 36 63 32 64 37 32 33 35 64 61 0a 0a 50c86c2d7235da..
0d10: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 tcltest::test MA
0d20: 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e 39 20 C_HMAC-SHA1-1.9
0d30: 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d {HMAC_SHA1} \..-
0d40: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
0d50: 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 C SHA1 } \..-set
0d60: 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b up {} \..-body {
0d70: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c string range [tl
0d80: 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 s::hmac -hex -di
0d90: 67 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 5b gest SHA1 -key [
0da0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
0db0: 78 20 30 63 30 63 30 63 30 63 30 63 30 63 30 63 x 0c0c0c0c0c0c0c
0dc0: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
0dd0: 30 63 30 63 30 63 30 63 30 63 5d 20 2d 64 61 74 0c0c0c0c0c] -dat
0de0: 61 20 22 54 65 73 74 20 57 69 74 68 20 54 72 75 a "Test With Tru
0df0: 6e 63 61 74 69 6f 6e 22 5d 20 30 20 32 33 7d 20 ncation"] 0 23}
0e00: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0e10: 2d 72 65 73 75 6c 74 20 34 63 31 61 30 33 34 32 -result 4c1a0342
0e20: 34 62 35 35 65 30 37 66 65 37 66 32 37 62 65 31 4b55e07fe7f27be1
0e30: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
0e40: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e MAC_HMAC-SHA1-1.
0e50: 31 30 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 10 {HMAC_SHA1} \
0e60: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
0e70: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
0e80: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
0e90: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
0ea0: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
0eb0: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -ke
0ec0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
0ed0: 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 61 hex aaaaaaaaaaa
0ee0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ef0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f10: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f20: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f30: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f40: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0f70: 61 61 61 61 61 5d 20 2d 64 61 74 61 20 22 54 65 aaaaa] -data "Te
0f80: 73 74 20 55 73 69 6e 67 20 4c 61 72 67 65 72 20 st Using Larger
0f90: 54 68 61 6e 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 Than Block-Size
0fa0: 4b 65 79 20 2d 20 48 61 73 68 20 4b 65 79 20 46 Key - Hash Key F
0fb0: 69 72 73 74 22 5d 20 30 20 33 39 7d 20 5c 0a 09 irst"] 0 39} \..
0fc0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0fd0: 73 75 6c 74 20 61 61 34 61 65 35 65 31 35 32 37 sult aa4ae5e1527
0fe0: 32 64 30 30 65 39 35 37 30 35 36 33 37 63 65 38 2d00e95705637ce8
0ff0: 61 33 62 35 35 65 64 34 30 32 31 31 32 0a 0a 74 a3b55ed402112..t
1000: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 cltest::test MAC
1010: 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e 31 31 20 _HMAC-SHA1-1.11
1020: 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d {HMAC_SHA1} \..-
1030: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
1040: 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 C SHA1 } \..-set
1050: 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b up {} \..-body {
1060: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c string range [tl
1070: 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 s::hmac -hex -di
1080: 67 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 5b gest SHA1 -key [
1090: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
10a0: 78 20 61 61 61 61 61 61 61 61 61 61 61 61 61 61 x aaaaaaaaaaaaaa
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 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1110: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1120: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1130: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1140: 61 61 5d 20 2d 64 61 74 61 20 22 54 65 73 74 20 aa] -data "Test
1150: 55 73 69 6e 67 20 4c 61 72 67 65 72 20 54 68 61 Using Larger Tha
1160: 6e 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 4b 65 79 n Block-Size Key
1170: 20 61 6e 64 20 4c 61 72 67 65 72 20 54 68 61 6e and Larger Than
1180: 20 4f 6e 65 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 One Block-Size
1190: 44 61 74 61 22 5d 20 30 20 33 39 7d 20 5c 0a 09 Data"] 0 39} \..
11a0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
11b0: 73 75 6c 74 20 65 38 65 39 39 64 30 66 34 35 32 sult e8e99d0f452
11c0: 33 37 64 37 38 36 64 36 62 62 61 61 37 39 36 35 37d786d6bbaa7965
11d0: 63 37 38 30 38 62 62 66 66 31 61 39 31 0a 0a 74 c7808bbff1a91..t
11e0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 cltest::test MAC
11f0: 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e 31 32 20 _HMAC-SHA1-1.12
1200: 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d {HMAC_SHA1} \..-
1210: 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 constraints {HMA
1220: 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 C SHA1 } \..-set
1230: 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b up {} \..-body {
1240: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c string range [tl
1250: 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 s::hmac -hex -di
1260: 67 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 22 gest SHA1 -key "
1270: 6b 65 79 22 20 2d 64 61 74 61 20 22 54 68 65 20 key" -data "The
1280: 71 75 69 63 6b 20 62 72 6f 77 6e 20 66 6f 78 20 quick brown fox
1290: 6a 75 6d 70 73 20 6f 76 65 72 20 74 68 65 20 6c jumps over the l
12a0: 61 7a 79 20 64 6f 67 22 5d 20 30 20 33 39 7d 20 azy dog"] 0 39}
12b0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
12c0: 2d 72 65 73 75 6c 74 20 64 65 37 63 39 62 38 35 -result de7c9b85
12d0: 62 38 62 37 38 61 61 36 62 63 38 61 37 61 33 36 b8b78aa6bc8a7a36
12e0: 66 37 30 61 39 30 37 30 31 63 39 64 62 34 64 39 f70a90701c9db4d9
12f0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
1300: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e MAC_HMAC-SHA1-1.
1310: 31 33 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 13 {HMAC_SHA1} \
1320: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
1330: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
1340: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
1350: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
1360: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
1370: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -ke
1380: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1390: 20 68 65 78 20 30 62 30 62 30 62 30 62 30 62 30 hex 0b0b0b0b0b0
13a0: 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 b0b0b0b0b0b0b0b0
13b0: 62 30 62 30 62 30 62 30 62 30 62 30 62 5d 20 2d b0b0b0b0b0b0b] -
13c0: 64 61 74 61 20 22 48 69 20 54 68 65 72 65 22 5d data "Hi There"]
13d0: 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 0 39} \..-match
13e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 exact -result b
13f0: 36 31 37 33 31 38 36 35 35 30 35 37 32 36 34 65 617318655057264e
1400: 32 38 62 63 30 62 36 66 62 33 37 38 63 38 65 66 28bc0b6fb378c8ef
1410: 31 34 36 62 65 30 30 0a 0a 74 63 6c 74 65 73 74 146be00..tcltest
1420: 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 2d ::test MAC_HMAC-
1430: 53 48 41 31 2d 31 2e 31 34 20 7b 48 4d 41 43 5f SHA1-1.14 {HMAC_
1440: 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 SHA1} \..-constr
1450: 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 31 aints {HMAC SHA1
1460: 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 } \..-setup {}
1470: 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e 67 \..-body {string
1480: 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 range [tls::hma
1490: 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 53 c -hex -digest S
14a0: 48 41 31 20 2d 6b 65 79 20 22 4a 65 66 65 22 20 HA1 -key "Jefe"
14b0: 2d 64 61 74 61 20 22 77 68 61 74 20 64 6f 20 79 -data "what do y
14c0: 61 20 77 61 6e 74 20 66 6f 72 20 6e 6f 74 68 69 a want for nothi
14d0: 6e 67 3f 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d ng?"] 0 39} \..-
14e0: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
14f0: 75 6c 74 20 65 66 66 63 64 66 36 61 65 35 65 62 ult effcdf6ae5eb
1500: 32 66 61 32 64 32 37 34 31 36 64 35 66 31 38 34 2fa2d27416d5f184
1510: 64 66 39 63 32 35 39 61 37 63 37 39 0a 0a 74 63 df9c259a7c79..tc
1520: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
1530: 48 4d 41 43 2d 53 48 41 31 2d 31 2e 31 35 20 7b HMAC-SHA1-1.15 {
1540: 48 4d 41 43 5f 53 48 41 31 7d 20 5c 0a 09 2d 63 HMAC_SHA1} \..-c
1550: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 onstraints {HMAC
1560: 20 53 48 41 31 20 7d 20 5c 0a 09 2d 73 65 74 75 SHA1 } \..-setu
1570: 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 p {} \..-body {s
1580: 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 tring range [tls
1590: 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 ::hmac -hex -dig
15a0: 65 73 74 20 53 48 41 31 20 2d 6b 65 79 20 5b 62 est SHA1 -key [b
15b0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
15c0: 20 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaa
15d0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
15e0: 61 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 61 aaaaaaaaa] -data
15f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
1600: 68 65 78 20 64 64 64 64 64 64 64 64 64 64 64 64 hex dddddddddddd
1610: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1620: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1630: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1640: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1650: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
1660: 64 64 64 64 64 64 64 64 5d 5d 20 30 20 33 39 7d dddddddd]] 0 39}
1670: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1680: 20 2d 72 65 73 75 6c 74 20 31 32 35 64 37 33 34 -result 125d734
1690: 32 62 39 61 63 31 31 63 64 39 31 61 33 39 61 66 2b9ac11cd91a39af
16a0: 34 38 61 61 31 37 62 34 66 36 33 66 31 37 35 64 48aa17b4f63f175d
16b0: 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 3..tcltest::test
16c0: 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 MAC_HMAC-SHA1-1
16d0: 2e 31 36 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 .16 {HMAC_SHA1}
16e0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
16f0: 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 {HMAC SHA1 } \..
1700: 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f -setup {} \..-bo
1710: 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 dy {string range
1720: 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 [tls::hmac -hex
1730: 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b -digest SHA1 -k
1740: 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ey [binary decod
1750: 65 20 68 65 78 20 30 31 30 32 30 33 30 34 30 35 e hex 0102030405
1760: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 060708090a0b0c0d
1770: 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31 35 0e0f101112131415
1780: 31 36 31 37 31 38 31 39 5d 20 2d 64 61 74 61 20 16171819] -data
1790: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
17a0: 65 78 20 63 64 63 64 63 64 63 64 63 64 63 64 63 ex cdcdcdcdcdcdc
17b0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
17c0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
17d0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
17e0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
17f0: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
1800: 64 63 64 63 64 63 64 5d 5d 20 30 20 33 39 7d 20 dcdcdcd]] 0 39}
1810: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
1820: 2d 72 65 73 75 6c 74 20 34 63 39 30 30 37 66 34 -result 4c9007f4
1830: 30 32 36 32 35 30 63 36 62 63 38 34 31 34 66 39 026250c6bc8414f9
1840: 62 66 35 30 63 38 36 63 32 64 37 32 33 35 64 61 bf50c86c2d7235da
1850: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
1860: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e MAC_HMAC-SHA1-1.
1870: 31 37 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 17 {HMAC_SHA1} \
1880: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
1890: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
18a0: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
18b0: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
18c0: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
18d0: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -ke
18e0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
18f0: 20 68 65 78 20 30 63 30 63 30 63 30 63 30 63 30 hex 0c0c0c0c0c0
1900: 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 c0c0c0c0c0c0c0c0
1910: 63 30 63 30 63 30 63 30 63 30 63 30 63 5d 20 2d c0c0c0c0c0c0c] -
1920: 64 61 74 61 20 22 54 65 73 74 20 57 69 74 68 20 data "Test With
1930: 54 72 75 6e 63 61 74 69 6f 6e 22 5d 20 30 20 32 Truncation"] 0 2
1940: 33 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 3} \..-match exa
1950: 63 74 20 2d 72 65 73 75 6c 74 20 34 63 31 61 30 ct -result 4c1a0
1960: 33 34 32 34 62 35 35 65 30 37 66 65 37 66 32 37 3424b55e07fe7f27
1970: 62 65 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 be1..tcltest::te
1980: 73 74 20 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 st MAC_HMAC-SHA1
1990: 2d 31 2e 31 38 20 7b 48 4d 41 43 5f 53 48 41 31 -1.18 {HMAC_SHA1
19a0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
19b0: 73 20 7b 48 4d 41 43 20 53 48 41 31 20 7d 20 5c s {HMAC SHA1 } \
19c0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
19d0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
19e0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
19f0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 31 20 ex -digest SHA1
1a00: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
1a10: 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 61 61 ode hex aaaaaaaa
1a20: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a30: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a40: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a50: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a60: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a70: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1a90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1aa0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
1ab0: 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 61 20 aaaaaaaa] -data
1ac0: 22 54 65 73 74 20 55 73 69 6e 67 20 4c 61 72 67 "Test Using Larg
1ad0: 65 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d 53 69 er Than Block-Si
1ae0: 7a 65 20 4b 65 79 20 2d 20 48 61 73 68 20 4b 65 ze Key - Hash Ke
1af0: 79 20 46 69 72 73 74 22 5d 20 30 20 33 39 7d 20 y First"] 0 39}
1b00: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
1b10: 2d 72 65 73 75 6c 74 20 61 61 34 61 65 35 65 31 -result aa4ae5e1
1b20: 35 32 37 32 64 30 30 65 39 35 37 30 35 36 33 37 5272d00e95705637
1b30: 63 65 38 61 33 62 35 35 65 64 34 30 32 31 31 32 ce8a3b55ed402112
1b40: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
1b50: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 31 2d 31 2e MAC_HMAC-SHA1-1.
1b60: 31 39 20 7b 48 4d 41 43 5f 53 48 41 31 7d 20 5c 19 {HMAC_SHA1} \
1b70: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b ..-constraints {
1b80: 48 4d 41 43 20 53 48 41 31 20 7d 20 5c 0a 09 2d HMAC SHA1 } \..-
1b90: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
1ba0: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
1bb0: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
1bc0: 2d 64 69 67 65 73 74 20 53 48 41 31 20 2d 6b 65 -digest SHA1 -ke
1bd0: 79 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 y [binary decode
1be0: 20 68 65 78 20 61 61 61 61 61 61 61 61 61 61 61 hex aaaaaaaaaaa
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 5d 20 2d 64 61 74 61 20 22 54 65 aaaaa] -data "Te
1c90: 73 74 20 55 73 69 6e 67 20 4c 61 72 67 65 72 20 st Using Larger
1ca0: 54 68 61 6e 20 42 6c 6f 63 6b 2d 53 69 7a 65 20 Than Block-Size
1cb0: 4b 65 79 20 61 6e 64 20 4c 61 72 67 65 72 20 54 Key and Larger T
1cc0: 68 61 6e 20 4f 6e 65 20 42 6c 6f 63 6b 2d 53 69 han One Block-Si
1cd0: 7a 65 20 44 61 74 61 22 5d 20 30 20 33 39 7d 20 ze Data"] 0 39}
1ce0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
1cf0: 2d 72 65 73 75 6c 74 20 65 38 65 39 39 64 30 66 -result e8e99d0f
1d00: 34 35 32 33 37 64 37 38 36 64 36 62 62 61 61 37 45237d786d6bbaa7
1d10: 39 36 35 63 37 38 30 38 62 62 66 66 31 61 39 31 965c7808bbff1a91
1d20: 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 ..# Cleanup.::tc
1d30: 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 ltest::cleanupTe
1d40: 73 74 73 0a 72 65 74 75 72 6e 0a sts.return.