Artifact
93592f1dcc93973c12874cd3d7918bd6834319a0923ddf21a296135f7a3d1e70:
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 35 36 2e 74 78 74 22 0a 6c 61 70 70 65 6e -256.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 35 36 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 256 [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 35 36 5d 20 3e 20 2d 31 7d 5d 0a 63 61 74 63 256] > -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 35 36 2d 31 2e 31 20 7b 48 -SHA3-256-1.1 {H
01b0: 4d 41 43 5f 53 48 41 33 2d 32 35 36 7d 20 5c 0a MAC_SHA3-256} \.
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 35 36 20 7d 20 5c MAC SHA3_256 } \
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 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 256 -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 31 63 31 64 31 65 31 66 5d 20 2d 64 1a1b1c1d1e1f] -d
0280: 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 ata "Sample mess
0290: 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3c 62 age for keylen<b
02a0: 6c 6f 63 6b 6c 65 6e 22 5d 20 30 20 36 33 7d 20 locklen"] 0 63}
02b0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
02c0: 2d 72 65 73 75 6c 74 20 34 66 65 38 65 32 30 32 -result 4fe8e202
02d0: 63 34 66 30 35 38 65 38 64 64 64 63 32 33 64 38 c4f058e8dddc23d8
02e0: 63 33 34 65 34 36 37 33 34 33 65 32 33 35 35 35 c34e467343e23555
02f0: 65 32 34 66 63 32 66 30 32 35 64 35 39 38 66 35 e24fc2f025d598f5
0300: 35 38 66 36 37 32 30 35 0a 0a 74 63 6c 74 65 73 58f67205..tcltes
0310: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
0320: 2d 53 48 41 33 2d 32 35 36 2d 31 2e 32 20 7b 48 -SHA3-256-1.2 {H
0330: 4d 41 43 5f 53 48 41 33 2d 32 35 36 7d 20 5c 0a MAC_SHA3-256} \.
0340: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
0350: 4d 41 43 20 53 48 41 33 5f 32 35 36 20 7d 20 5c MAC SHA3_256 } \
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 33 2d ex -digest SHA3-
03a0: 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 256 -key [binary
03b0: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
03c0: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
03d0: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
03e0: 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 39 1213141516171819
03f0: 31 61 31 62 31 63 31 64 31 65 31 66 32 30 32 31 1a1b1c1d1e1f2021
0400: 32 32 32 33 32 34 32 35 32 36 32 37 32 38 32 39 2223242526272829
0410: 32 61 32 62 32 63 32 64 32 65 32 66 33 30 33 31 2a2b2c2d2e2f3031
0420: 33 32 33 33 33 34 33 35 33 36 33 37 33 38 33 39 3233343536373839
0430: 33 61 33 62 33 63 33 64 33 65 33 66 34 30 34 31 3a3b3c3d3e3f4041
0440: 34 32 34 33 34 34 34 35 34 36 34 37 34 38 34 39 4243444546474849
0450: 34 61 34 62 34 63 34 64 34 65 34 66 35 30 35 31 4a4b4c4d4e4f5051
0460: 35 32 35 33 35 34 35 35 35 36 35 37 35 38 35 39 5253545556575859
0470: 35 61 35 62 35 63 35 64 35 65 35 66 36 30 36 31 5a5b5c5d5e5f6061
0480: 36 32 36 33 36 34 36 35 36 36 36 37 36 38 36 39 6263646566676869
0490: 36 61 36 62 36 63 36 64 36 65 36 66 37 30 37 31 6a6b6c6d6e6f7071
04a0: 37 32 37 33 37 34 37 35 37 36 37 37 37 38 37 39 7273747576777879
04b0: 37 61 37 62 37 63 37 64 37 65 37 66 38 30 38 31 7a7b7c7d7e7f8081
04c0: 38 32 38 33 38 34 38 35 38 36 38 37 5d 20 2d 64 828384858687] -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 36 33 7d 20 locklen"] 0 63}
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 36 38 62 39 34 65 32 65 -result 68b94e2e
0520: 35 33 38 61 39 62 65 34 31 30 33 62 65 62 62 35 538a9be4103bebb5
0530: 61 61 30 31 36 64 34 37 39 36 31 64 34 64 31 61 aa016d47961d4d1a
0540: 61 39 30 36 30 36 31 33 31 33 62 35 35 37 66 38 a906061313b557f8
0550: 61 66 32 63 33 66 61 61 0a 0a 74 63 6c 74 65 73 af2c3faa..tcltes
0560: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
0570: 2d 53 48 41 33 2d 32 35 36 2d 31 2e 33 20 7b 48 -SHA3-256-1.3 {H
0580: 4d 41 43 5f 53 48 41 33 2d 32 35 36 7d 20 5c 0a MAC_SHA3-256} \.
0590: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
05a0: 4d 41 43 20 53 48 41 33 5f 32 35 36 20 7d 20 5c MAC SHA3_256 } \
05b0: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
05c0: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
05d0: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
05e0: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d ex -digest SHA3-
05f0: 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 256 -key [binary
0600: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
0610: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
0620: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
0630: 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 39 1213141516171819
0640: 31 61 31 62 31 63 31 64 31 65 31 66 32 30 32 31 1a1b1c1d1e1f2021
0650: 32 32 32 33 32 34 32 35 32 36 32 37 32 38 32 39 2223242526272829
0660: 32 61 32 62 32 63 32 64 32 65 32 66 33 30 33 31 2a2b2c2d2e2f3031
0670: 33 32 33 33 33 34 33 35 33 36 33 37 33 38 33 39 3233343536373839
0680: 33 61 33 62 33 63 33 64 33 65 33 66 34 30 34 31 3a3b3c3d3e3f4041
0690: 34 32 34 33 34 34 34 35 34 36 34 37 34 38 34 39 4243444546474849
06a0: 34 61 34 62 34 63 34 64 34 65 34 66 35 30 35 31 4a4b4c4d4e4f5051
06b0: 35 32 35 33 35 34 35 35 35 36 35 37 35 38 35 39 5253545556575859
06c0: 35 61 35 62 35 63 35 64 35 65 35 66 36 30 36 31 5a5b5c5d5e5f6061
06d0: 36 32 36 33 36 34 36 35 36 36 36 37 36 38 36 39 6263646566676869
06e0: 36 61 36 62 36 63 36 64 36 65 36 66 37 30 37 31 6a6b6c6d6e6f7071
06f0: 37 32 37 33 37 34 37 35 37 36 37 37 37 38 37 39 7273747576777879
0700: 37 61 37 62 37 63 37 64 37 65 37 66 38 30 38 31 7a7b7c7d7e7f8081
0710: 38 32 38 33 38 34 38 35 38 36 38 37 38 38 38 39 8283848586878889
0720: 38 61 38 62 38 63 38 64 38 65 38 66 39 30 39 31 8a8b8c8d8e8f9091
0730: 39 32 39 33 39 34 39 35 39 36 39 37 39 38 39 39 9293949596979899
0740: 39 61 39 62 39 63 39 64 39 65 39 66 61 30 61 31 9a9b9c9d9e9fa0a1
0750: 61 32 61 33 61 34 61 35 61 36 61 37 5d 20 2d 64 a2a3a4a5a6a7] -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 36 33 7d 20 locklen"] 0 63}
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 39 62 63 66 32 63 32 33 -result 9bcf2c23
07b0: 38 65 32 33 35 63 33 63 65 38 38 34 30 34 65 38 8e235c3ce88404e8
07c0: 31 33 62 64 32 66 33 61 39 37 31 38 35 61 63 36 13bd2f3a97185ac6
07d0: 66 32 33 38 63 36 33 64 36 32 32 39 61 30 30 62 f238c63d6229a00b
07e0: 30 37 39 37 34 32 35 38 0a 0a 74 63 6c 74 65 73 07974258..tcltes
07f0: 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d 41 43 t::test MAC_HMAC
0800: 2d 53 48 41 33 2d 32 35 36 2d 31 2e 34 20 7b 48 -SHA3-256-1.4 {H
0810: 4d 41 43 5f 53 48 41 33 2d 32 35 36 7d 20 5c 0a MAC_SHA3-256} \.
0820: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 7b 48 .-constraints {H
0830: 4d 41 43 20 53 48 41 33 5f 32 35 36 20 7d 20 5c MAC SHA3_256 } \
0840: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0850: 62 6f 64 79 20 7b 73 74 72 69 6e 67 20 72 61 6e body {string ran
0860: 67 65 20 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 ge [tls::hmac -h
0870: 65 78 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d ex -digest SHA3-
0880: 32 35 36 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 256 -key [binary
0890: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
08a0: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
08b0: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
08c0: 31 32 31 33 31 34 31 35 31 36 31 37 31 38 31 39 1213141516171819
08d0: 31 61 31 62 31 63 31 64 31 65 31 66 5d 20 2d 64 1a1b1c1d1e1f] -d
08e0: 61 74 61 20 22 53 61 6d 70 6c 65 20 6d 65 73 73 ata "Sample mess
08f0: 61 67 65 20 66 6f 72 20 6b 65 79 6c 65 6e 3c 62 age for keylen<b
0900: 6c 6f 63 6b 6c 65 6e 2c 20 77 69 74 68 20 74 72 locklen, with tr
0910: 75 6e 63 61 74 65 64 20 74 61 67 22 5d 20 30 20 uncated tag"] 0
0920: 33 31 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 31} \..-match ex
0930: 61 63 74 20 2d 72 65 73 75 6c 74 20 63 38 64 63 act -result c8dc
0940: 37 31 34 38 64 38 63 31 34 32 33 61 61 35 34 39 7148d8c1423aa549
0950: 31 30 35 64 61 66 64 66 39 63 61 64 0a 0a 23 20 105dafdf9cad..#
0960: 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 Cleanup.::tcltes
0970: 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 0a t::cleanupTests.
0980: 72 65 74 75 72 6e 0a return.