Artifact
a32082671941f45715bc467de1d954b64f036199bf243578cc355983a462d555:
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 33 from "HMAC_SHA3
0020: 2d 32 32 34 2e 74 78 74 22 0a 6c 61 70 70 65 6e -224.txt".lappen
0030: 64 20 61 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c d auto_path [fil
0040: 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 e dirname [file
0050: 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 dirname [file di
0060: 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e rname [file dirn
0070: 61 6d 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b ame [file join [
0080: 70 77 64 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70 pwd] [info scrip
0090: 74 5d 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 t]]]]]].package
00a0: 72 65 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b require tls.pack
00b0: 61 67 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 age require tclt
00c0: 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 est..tcltest::te
00d0: 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 48 4d 41 stConstraint HMA
00e0: 43 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 C [expr {[lsearc
00f0: 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a h -nocase [tls::
0100: 6d 61 63 73 5d 20 48 4d 41 43 5d 20 3e 20 2d 31 macs] HMAC] > -1
0110: 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 }].tcltest::test
0120: 43 6f 6e 73 74 72 61 69 6e 74 20 53 48 41 33 5f Constraint SHA3_
0130: 32 32 34 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 224 [expr {[lsea
0140: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 rch -nocase [tls
0150: 3a 3a 64 69 67 65 73 74 73 5d 20 53 48 41 33 2d ::digests] SHA3-
0160: 32 32 34 5d 20 3e 20 2d 31 7d 5d 0a 63 61 74 63 224] > -1}].catc
0170: 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 69 64 65 72 h {tls::provider
0180: 20 6c 65 67 61 63 79 7d 0a 0a 74 63 6c 74 65 73 legacy}..tcltes
0190: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
01a0: 2d 53 48 41 33 2d 32 32 34 2d 31 2e 31 20 7b 48 -SHA3-224-1.1 {H
01b0: 4d 41 43 5f 53 48 41 33 2d 32 32 34 7d 20 5c 0a MAC_SHA3-224} \.
01c0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
01d0: 4d 41 43 20 53 48 41 33 5f 32 32 34 20 7d 20 5c MAC SHA3_224 } \
01e0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
01f0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
0200: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
0210: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d ex -digest SHA3-
0220: 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 224 -key [binary
0230: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
0240: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
0250: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
0260: 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 39 1213141516171819
0270: 31 61 31 62 5d 20 2d 64 61 74 61 20 22 53 61 6d 1a1b] -data "Sam
0280: 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 20 ple message for
0290: 6b 65 79 6c 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 22 keylen<blocklen"
02a0: 5d 20 30 20 35 35 7d 20 5c 0a 09 2d 6d 61 74 63 ] 0 55} \..-matc
02b0: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
02c0: 33 33 32 63 66 64 35 39 33 34 37 66 64 62 38 65 332cfd59347fdb8e
02d0: 35 37 36 65 37 37 32 36 30 62 65 34 61 62 61 32 576e77260be4aba2
02e0: 64 36 64 63 35 33 31 31 37 62 33 62 66 62 35 32 d6dc53117b3bfb52
02f0: 63 36 64 31 38 63 30 34 0a 0a 74 63 6c 74 65 73 c6d18c04..tcltes
0300: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
0310: 2d 53 48 41 33 2d 32 32 34 2d 31 2e 32 20 7b 48 -SHA3-224-1.2 {H
0320: 4d 41 43 5f 53 48 41 33 2d 32 32 34 7d 20 5c 0a MAC_SHA3-224} \.
0330: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
0340: 4d 41 43 20 53 48 41 33 5f 32 32 34 20 7d 20 5c MAC SHA3_224 } \
0350: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0360: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
0370: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
0380: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d ex -digest SHA3-
0390: 32 32 34 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 224 -key [binary
03a0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
03b0: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
03c0: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
03d0: 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 39 1213141516171819
03e0: 31 61 31 62 31 63 31 64 31 65 31 66 32 30 32 31 1a1b1c1d1e1f2021
03f0: 32 32 32 33 32 34 32 35 32 36 32 37 32 38 32 39 2223242526272829
0400: 32 61 32 62 32 63 32 64 32 65 32 66 33 30 33 31 2a2b2c2d2e2f3031
0410: 33 32 33 33 33 34 33 35 33 36 33 37 33 38 33 39 3233343536373839
0420: 33 61 33 62 33 63 33 64 33 65 33 66 34 30 34 31 3a3b3c3d3e3f4041
0430: 34 32 34 33 34 34 34 35 34 36 34 37 34 38 34 39 4243444546474849
0440: 34 61 34 62 34 63 34 64 34 65 34 66 35 30 35 31 4a4b4c4d4e4f5051
0450: 35 32 35 33 35 34 35 35 35 36 35 37 35 38 35 39 5253545556575859
0460: 35 61 35 62 35 63 35 64 35 65 35 66 36 30 36 31 5a5b5c5d5e5f6061
0470: 36 32 36 33 36 34 36 35 36 36 36 37 36 38 36 39 6263646566676869
0480: 36 61 36 62 36 63 36 64 36 65 36 66 37 30 37 31 6a6b6c6d6e6f7071
0490: 37 32 37 33 37 34 37 35 37 36 37 37 37 38 37 39 7273747576777879
04a0: 37 61 37 62 37 63 37 64 37 65 37 66 38 30 38 31 7a7b7c7d7e7f8081
04b0: 38 32 38 33 38 34 38 35 38 36 38 37 38 38 38 39 8283848586878889
04c0: 38 61 38 62 38 63 38 64 38 65 38 66 5d 20 2d 64 8a8b8c8d8e8f] -d
04d0: 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 ata "Sample mess
04e0: 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3d 62 age for keylen=b
04f0: 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 35 35 7d 20 locklen"] 0 55}
0500: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0510: 2d 72 65 73 75 6c 74 20 64 38 62 37 33 33 62 63 -result d8b733bc
0520: 66 36 36 63 36 34 34 61 31 32 33 32 33 64 35 36 f66c644a12323d56
0530: 34 65 32 34 64 63 66 33 66 63 37 35 66 32 33 31 4e24dcf3fc75f231
0540: 66 33 62 36 37 39 36 38 33 35 39 31 30 30 63 37 f3b67968359100c7
0550: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
0560: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 33 2d 32 32 MAC_HMAC-SHA3-22
0570: 34 2d 31 2e 33 20 7b 48 4d 41 43 5f 53 48 41 33 4-1.3 {HMAC_SHA3
0580: 2d 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 -224} \..-constr
0590: 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 33 aints {HMAC SHA3
05a0: 5f 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 _224 } \..-setup
05b0: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
05c0: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
05d0: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
05e0: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 6b 65 79 st SHA3-224 -key
05f0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0600: 68 65 78 20 30 30 30 31 30 32 30 33 30 34 30 35 hex 000102030405
0610: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 060708090a0b0c0d
0620: 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31 35 0e0f101112131415
0630: 31 36 31 37 31 38 31 39 31 61 31 62 31 63 31 64 161718191a1b1c1d
0640: 31 65 31 66 32 30 32 31 32 32 32 33 32 34 32 35 1e1f202122232425
0650: 32 36 32 37 32 38 32 39 32 61 32 62 32 63 32 64 262728292a2b2c2d
0660: 32 65 32 66 33 30 33 31 33 32 33 33 33 34 33 35 2e2f303132333435
0670: 33 36 33 37 33 38 33 39 33 61 33 62 33 63 33 64 363738393a3b3c3d
0680: 33 65 33 66 34 30 34 31 34 32 34 33 34 34 34 35 3e3f404142434445
0690: 34 36 34 37 34 38 34 39 34 61 34 62 34 63 34 64 464748494a4b4c4d
06a0: 34 65 34 66 35 30 35 31 35 32 35 33 35 34 35 35 4e4f505152535455
06b0: 35 36 35 37 35 38 35 39 35 61 35 62 35 63 35 64 565758595a5b5c5d
06c0: 35 65 35 66 36 30 36 31 36 32 36 33 36 34 36 35 5e5f606162636465
06d0: 36 36 36 37 36 38 36 39 36 61 36 62 36 63 36 64 666768696a6b6c6d
06e0: 36 65 36 66 37 30 37 31 37 32 37 33 37 34 37 35 6e6f707172737475
06f0: 37 36 37 37 37 38 37 39 37 61 37 62 37 63 37 64 767778797a7b7c7d
0700: 37 65 37 66 38 30 38 31 38 32 38 33 38 34 38 35 7e7f808182838485
0710: 38 36 38 37 38 38 38 39 38 61 38 62 38 63 38 64 868788898a8b8c8d
0720: 38 65 38 66 39 30 39 31 39 32 39 33 39 34 39 35 8e8f909192939495
0730: 39 36 39 37 39 38 39 39 39 61 39 62 39 63 39 64 969798999a9b9c9d
0740: 39 65 39 66 61 30 61 31 61 32 61 33 61 34 61 35 9e9fa0a1a2a3a4a5
0750: 61 36 61 37 61 38 61 39 61 61 61 62 5d 20 2d 64 a6a7a8a9aaab] -d
0760: 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 ata "Sample mess
0770: 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3e 62 age for keylen>b
0780: 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 35 35 7d 20 locklen"] 0 55}
0790: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
07a0: 2d 72 65 73 75 6c 74 20 30 37 38 36 39 35 65 65 -result 078695ee
07b0: 63 63 32 32 37 63 36 33 36 61 64 33 31 64 30 36 cc227c636ad31d06
07c0: 33 61 31 35 64 64 30 35 61 37 65 38 31 39 61 36 3a15dd05a7e819a6
07d0: 36 65 63 36 64 38 64 65 31 65 31 39 33 65 35 39 6ec6d8de1e193e59
07e0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
07f0: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 33 2d 32 32 MAC_HMAC-SHA3-22
0800: 34 2d 31 2e 34 20 7b 48 4d 41 43 5f 53 48 41 33 4-1.4 {HMAC_SHA3
0810: 2d 32 32 34 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 -224} \..-constr
0820: 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 33 aints {HMAC SHA3
0830: 5f 32 32 34 20 7d 20 5c 0a 09 2d 73 65 74 75 70 _224 } \..-setup
0840: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 {} \..-body {st
0850: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a ring range [tls:
0860: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 :hmac -hex -dige
0870: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 6b 65 79 st SHA3-224 -key
0880: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0890: 68 65 78 20 30 30 30 31 30 32 30 33 30 34 30 35 hex 000102030405
08a0: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 060708090a0b0c0d
08b0: 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31 35 0e0f101112131415
08c0: 31 36 31 37 31 38 31 39 31 61 31 62 5d 20 2d 64 161718191a1b] -d
08d0: 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 ata "Sample mess
08e0: 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3c 62 age for keylen<b
08f0: 6c 6f 63 6b 6c 65 6e 2c 20 77 69 74 68 20 74 72 locklen, with tr
0900: 75 6e 63 61 74 65 64 20 74 61 67 22 5d 20 30 20 uncated tag"] 0
0910: 32 37 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 27} \..-match ex
0920: 61 63 74 20 2d 72 65 73 75 6c 74 20 38 35 36 39 act -result 8569
0930: 63 35 34 63 62 62 30 30 61 39 62 37 38 66 66 31 c54cbb00a9b78ff1
0940: 62 33 39 31 62 30 65 35 0a 0a 23 20 43 6c 65 61 b391b0e5..# Clea
0950: 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 nup.::tcltest::c
0960: 6c 65 61 6e 75 70 54 65 73 74 73 0a 72 65 74 75 leanupTests.retu
0970: 72 6e 0a rn.