Hex Artifact Content

Artifact 3e50a3d7da79055e014df7461899d558d9859208174db80023165dfd9918891a:


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 35 31 32 2e 74 78 74 22 0a 70 61 63 6b 61 67  -512.txt".packag
0030: 65 20 72 65 71 75 69 72 65 20 74 6c 73 0a 70 61  e require tls.pa
0040: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 74 63  ckage require tc
0050: 6c 74 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a 3a  ltest..tcltest::
0060: 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 48  testConstraint H
0070: 4d 41 43 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61  MAC [expr {[lsea
0080: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73  rch -nocase [tls
0090: 3a 3a 6d 61 63 73 5d 20 48 4d 41 43 5d 20 3e 20  ::macs] HMAC] > 
00a0: 2d 31 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a 74 65  -1}].tcltest::te
00b0: 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 53 48 41  stConstraint SHA
00c0: 33 5f 35 31 32 20 5b 65 78 70 72 20 7b 5b 6c 73  3_512 [expr {[ls
00d0: 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74  earch -nocase [t
00e0: 6c 73 3a 3a 64 69 67 65 73 74 73 5d 20 53 48 41  ls::digests] SHA
00f0: 33 2d 35 31 32 5d 20 3e 20 2d 31 7d 5d 0a 0a 74  3-512] > -1}]..t
0100: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43  cltest::test MAC
0110: 5f 48 4d 41 43 2d 53 48 41 33 2d 35 31 32 2d 31  _HMAC-SHA3-512-1
0120: 2e 31 20 7b 48 4d 41 43 5f 53 48 41 33 2d 35 31  .1 {HMAC_SHA3-51
0130: 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  2} \..-constrain
0140: 74 73 20 7b 48 4d 41 43 20 53 48 41 33 5f 35 31  ts {HMAC SHA3_51
0150: 32 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d  2 } \..-setup {}
0160: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e   \..-body {strin
0170: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d  g range [tls::hm
0180: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20  ac -hex -digest 
0190: 53 48 41 33 2d 35 31 32 20 2d 6b 65 79 20 5b 62  SHA3-512 -key [b
01a0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78  inary decode hex
01b0: 20 30 30 30 31 30 32 30 33 30 34 30 35 30 36 30   000102030405060
01c0: 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30  708090a0b0c0d0e0
01d0: 66 31 30 31 31 31 32 31 33 31 34 31 35 31 36 31  f101112131415161
01e0: 37 31 38 31 39 31 61 31 62 31 63 31 64 31 65 31  718191a1b1c1d1e1
01f0: 66 32 30 32 31 32 32 32 33 32 34 32 35 32 36 32  f202122232425262
0200: 37 32 38 32 39 32 61 32 62 32 63 32 64 32 65 32  728292a2b2c2d2e2
0210: 66 33 30 33 31 33 32 33 33 33 34 33 35 33 36 33  f303132333435363
0220: 37 33 38 33 39 33 61 33 62 33 63 33 64 33 65 33  738393a3b3c3d3e3
0230: 66 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c 65  f] -data "Sample
0240: 20 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65 79   message for key
0250: 6c 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 22 5d 20 30  len<blocklen"] 0
0260: 20 31 32 37 7d 20 5c 0a 09 2d 6d 61 74 63 68 20   127} \..-match 
0270: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34 65  exact -result 4e
0280: 66 64 36 32 39 64 36 63 37 31 62 66 38 36 31 36  fd629d6c71bf8616
0290: 32 36 35 38 66 32 39 39 34 33 62 31 63 33 30 38  2658f29943b1c308
02a0: 63 65 32 37 63 64 66 61 36 64 62 30 64 39 63 33  ce27cdfa6db0d9c3
02b0: 63 65 38 31 37 36 33 66 39 63 62 63 65 35 66 37  ce81763f9cbce5f7
02c0: 65 62 65 39 38 36 38 30 33 31 64 62 31 61 38 66  ebe9868031db1a8f
02d0: 38 65 62 37 62 36 62 39 35 65 35 63 35 65 33 66  8eb7b6b95e5c5e3f
02e0: 36 35 37 61 38 39 39 36 63 38 36 61 32 66 36 35  657a8996c86a2f65
02f0: 32 37 65 33 30 37 66 30 32 31 33 31 39 36 0a 0a  27e307f0213196..
0300: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41  tcltest::test MA
0310: 43 5f 48 4d 41 43 2d 53 48 41 33 2d 35 31 32 2d  C_HMAC-SHA3-512-
0320: 31 2e 32 20 7b 48 4d 41 43 5f 53 48 41 33 2d 35  1.2 {HMAC_SHA3-5
0330: 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  12} \..-constrai
0340: 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 33 5f 35  nts {HMAC SHA3_5
0350: 31 32 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b  12 } \..-setup {
0360: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69  } \..-body {stri
0370: 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68  ng range [tls::h
0380: 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74  mac -hex -digest
0390: 20 53 48 41 33 2d 35 31 32 20 2d 6b 65 79 20 5b   SHA3-512 -key [
03a0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
03b0: 78 20 30 30 30 31 30 32 30 33 30 34 30 35 30 36  x 00010203040506
03c0: 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30 65  0708090a0b0c0d0e
03d0: 30 66 31 30 31 31 31 32 31 33 31 34 31 35 31 36  0f10111213141516
03e0: 31 37 31 38 31 39 31 61 31 62 31 63 31 64 31 65  1718191a1b1c1d1e
03f0: 31 66 32 30 32 31 32 32 32 33 32 34 32 35 32 36  1f20212223242526
0400: 32 37 32 38 32 39 32 61 32 62 32 63 32 64 32 65  2728292a2b2c2d2e
0410: 32 66 33 30 33 31 33 32 33 33 33 34 33 35 33 36  2f30313233343536
0420: 33 37 33 38 33 39 33 61 33 62 33 63 33 64 33 65  3738393a3b3c3d3e
0430: 33 66 34 30 34 31 34 32 34 33 34 34 34 35 34 36  3f40414243444546
0440: 34 37 5d 20 2d 64 61 74 61 20 22 53 61 6d 70 6c  47] -data "Sampl
0450: 65 20 6d 65 73 73 61 67 65 20 66 6f 72 20 6b 65  e message for ke
0460: 79 6c 65 6e 3d 62 6c 6f 63 6b 6c 65 6e 22 5d 20  ylen=blocklen"] 
0470: 30 20 31 32 37 7d 20 5c 0a 09 2d 6d 61 74 63 68  0 127} \..-match
0480: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35   exact -result 5
0490: 34 34 65 32 35 37 65 61 32 61 33 65 35 65 61 31  44e257ea2a3e5ea1
04a0: 39 61 35 39 30 65 36 61 32 34 62 37 32 34 63 65  9a590e6a24b724ce
04b0: 36 33 32 37 37 35 37 37 32 33 66 65 32 37 35 31  6327757723fe2751
04c0: 62 37 35 62 66 30 30 37 64 38 30 66 36 62 33 36  b75bf007d80f6b36
04d0: 30 37 34 34 62 66 31 62 37 61 38 38 65 61 35 38  0744bf1b7a88ea58
04e0: 35 66 39 37 36 35 62 34 37 39 31 31 39 37 36 64  5f9765b47911976d
04f0: 33 31 39 31 63 66 38 33 63 30 33 39 66 35 66 66  3191cf83c039f5ff
0500: 61 62 30 64 32 39 63 63 39 64 39 62 36 64 61 0a  ab0d29cc9d9b6da.
0510: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d  .tcltest::test M
0520: 41 43 5f 48 4d 41 43 2d 53 48 41 33 2d 35 31 32  AC_HMAC-SHA3-512
0530: 2d 31 2e 33 20 7b 48 4d 41 43 5f 53 48 41 33 2d  -1.3 {HMAC_SHA3-
0540: 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  512} \..-constra
0550: 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 33 5f  ints {HMAC SHA3_
0560: 35 31 32 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20  512 } \..-setup 
0570: 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72  {} \..-body {str
0580: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a  ing range [tls::
0590: 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73  hmac -hex -diges
05a0: 74 20 53 48 41 33 2d 35 31 32 20 2d 6b 65 79 20  t SHA3-512 -key 
05b0: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68  [binary decode h
05c0: 65 78 20 30 30 30 31 30 32 30 33 30 34 30 35 30  ex 0001020304050
05d0: 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64 30  60708090a0b0c0d0
05e0: 65 30 66 31 30 31 31 31 32 31 33 31 34 31 35 31  e0f1011121314151
05f0: 36 31 37 31 38 31 39 31 61 31 62 31 63 31 64 31  61718191a1b1c1d1
0600: 65 31 66 32 30 32 31 32 32 32 33 32 34 32 35 32  e1f2021222324252
0610: 36 32 37 32 38 32 39 32 61 32 62 32 63 32 64 32  62728292a2b2c2d2
0620: 65 32 66 33 30 33 31 33 32 33 33 33 34 33 35 33  e2f3031323334353
0630: 36 33 37 33 38 33 39 33 61 33 62 33 63 33 64 33  63738393a3b3c3d3
0640: 65 33 66 34 30 34 31 34 32 34 33 34 34 34 35 34  e3f4041424344454
0650: 36 34 37 34 38 34 39 34 61 34 62 34 63 34 64 34  64748494a4b4c4d4
0660: 65 34 66 35 30 35 31 35 32 35 33 35 34 35 35 35  e4f5051525354555
0670: 36 35 37 35 38 35 39 35 61 35 62 35 63 35 64 35  65758595a5b5c5d5
0680: 65 35 66 36 30 36 31 36 32 36 33 36 34 36 35 36  e5f6061626364656
0690: 36 36 37 36 38 36 39 36 61 36 62 36 63 36 64 36  66768696a6b6c6d6
06a0: 65 36 66 37 30 37 31 37 32 37 33 37 34 37 35 37  e6f7071727374757
06b0: 36 37 37 37 38 37 39 37 61 37 62 37 63 37 64 37  67778797a7b7c7d7
06c0: 65 37 66 38 30 38 31 38 32 38 33 38 34 38 35 38  e7f8081828384858
06d0: 36 38 37 5d 20 2d 64 61 74 61 20 22 53 61 6d 70  687] -data "Samp
06e0: 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 20 6b  le message for k
06f0: 65 79 6c 65 6e 3e 62 6c 6f 63 6b 6c 65 6e 22 5d  eylen>blocklen"]
0700: 20 30 20 31 32 37 7d 20 5c 0a 09 2d 6d 61 74 63   0 127} \..-matc
0710: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20  h exact -result 
0720: 35 66 34 36 34 66 35 65 35 62 37 38 34 38 65 33  5f464f5e5b7848e3
0730: 38 38 35 65 34 39 62 32 63 33 38 35 66 30 36 39  885e49b2c385f069
0740: 34 39 38 35 64 30 65 33 38 39 36 36 32 34 32 64  4985d0e38966242d
0750: 63 34 61 35 66 65 33 66 65 61 34 62 33 37 64 34  c4a5fe3fea4b37d4
0760: 36 62 36 35 63 65 63 65 64 35 64 63 66 35 39 34  6b65ceced5dcf594
0770: 33 38 64 64 38 34 30 62 61 62 32 32 32 36 39 66  38dd840bab22269f
0780: 30 62 61 37 66 65 62 64 62 39 66 63 66 37 34 36  0ba7febdb9fcf746
0790: 30 32 61 33 35 36 36 36 62 32 61 33 32 39 31 35  02a35666b2a32915
07a0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
07b0: 4d 41 43 5f 48 4d 41 43 2d 53 48 41 33 2d 35 31  MAC_HMAC-SHA3-51
07c0: 32 2d 31 2e 34 20 7b 48 4d 41 43 5f 53 48 41 33  2-1.4 {HMAC_SHA3
07d0: 2d 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  -512} \..-constr
07e0: 61 69 6e 74 73 20 7b 48 4d 41 43 20 53 48 41 33  aints {HMAC SHA3
07f0: 5f 35 31 32 20 7d 20 5c 0a 09 2d 73 65 74 75 70  _512 } \..-setup
0800: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74   {} \..-body {st
0810: 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a  ring range [tls:
0820: 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65  :hmac -hex -dige
0830: 73 74 20 53 48 41 33 2d 35 31 32 20 2d 6b 65 79  st SHA3-512 -key
0840: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
0850: 68 65 78 20 30 30 30 31 30 32 30 33 30 34 30 35  hex 000102030405
0860: 30 36 30 37 30 38 30 39 30 61 30 62 30 63 30 64  060708090a0b0c0d
0870: 30 65 30 66 31 30 31 31 31 32 31 33 31 34 31 35  0e0f101112131415
0880: 31 36 31 37 31 38 31 39 31 61 31 62 31 63 31 64  161718191a1b1c1d
0890: 31 65 31 66 32 30 32 31 32 32 32 33 32 34 32 35  1e1f202122232425
08a0: 32 36 32 37 32 38 32 39 32 61 32 62 32 63 32 64  262728292a2b2c2d
08b0: 32 65 32 66 33 30 33 31 33 32 33 33 33 34 33 35  2e2f303132333435
08c0: 33 36 33 37 33 38 33 39 33 61 33 62 33 63 33 64  363738393a3b3c3d
08d0: 33 65 33 66 5d 20 2d 64 61 74 61 20 22 53 61 6d  3e3f] -data "Sam
08e0: 70 6c 65 20 6d 65 73 73 61 67 65 20 66 6f 72 20  ple message for 
08f0: 6b 65 79 6c 65 6e 3c 62 6c 6f 63 6b 6c 65 6e 2c  keylen<blocklen,
0900: 20 77 69 74 68 20 74 72 75 6e 63 61 74 65 64 20   with truncated 
0910: 74 61 67 22 5d 20 30 20 36 33 7d 20 5c 0a 09 2d  tag"] 0 63} \..-
0920: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73  match exact -res
0930: 75 6c 74 20 37 62 62 30 36 64 38 35 39 32 35 37  ult 7bb06d859257
0940: 62 32 35 63 65 37 33 63 61 37 30 30 64 66 33 34  b25ce73ca700df34
0950: 63 35 63 62 65 66 35 63 38 39 38 62 61 63 39 31  c5cbef5c898bac91
0960: 30 32 39 65 30 62 32 37 39 37 35 64 34 65 35 32  029e0b27975d4e52
0970: 36 61 30 38 0a 0a 23 20 43 6c 65 61 6e 75 70 0a  6a08..# Cleanup.
0980: 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e  ::tcltest::clean
0990: 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a     upTests.return.