Hex Artifact Content

Artifact e51ad010d41c2372f4d47fb413198d908d9b3164e68f6c49c3832e407b021bd3:


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 42 4c 41 4b 45 32 62 35 31   from "BLAKE2b51
0020: 32 2e 74 78 74 22 0a 70 61 63 6b 61 67 65 20 72  2.txt".package r
0030: 65 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61  equire tls.packa
0040: 67 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65  ge require tclte
0050: 73 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  st..tcltest::tes
0060: 74 43 6f 6e 73 74 72 61 69 6e 74 20 42 4c 41 4b  tConstraint BLAK
0070: 45 32 62 35 31 32 20 5b 65 78 70 72 20 7b 5b 6c  E2b512 [expr {[l
0080: 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b  search -nocase [
0090: 74 6c 73 3a 3a 64 69 67 65 73 74 73 5d 20 42 4c  tls::digests] BL
00a0: 41 4b 45 32 62 35 31 32 5d 20 3e 20 2d 31 7d 5d  AKE2b512] > -1}]
00b0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20  ..tcltest::test 
00c0: 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 31 32 2d  Hash_BLAKE2b512-
00d0: 31 2e 31 20 7b 42 4c 41 4b 45 32 62 35 31 32 7d  1.1 {BLAKE2b512}
00e0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73   \..-constraints
00f0: 20 42 4c 41 4b 45 32 62 35 31 32 20 5c 0a 09 2d   BLAKE2b512 \..-
0100: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20  setup {set data 
0110: 22 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c  ""} \..-body {tl
0120: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73  s::digest -diges
0130: 74 20 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 61  t BLAKE2b512 -da
0140: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61  ta $data} \..-ma
0150: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0160: 74 20 37 38 36 61 30 32 66 37 34 32 30 31 35 39  t 786a02f7420159
0170: 30 33 63 36 63 36 66 64 38 35 32 35 35 32 64 32  03c6c6fd852552d2
0180: 37 32 39 31 32 66 34 37 34 30 65 31 35 38 34 37  72912f4740e15847
0190: 36 31 38 61 38 36 65 32 31 37 66 37 31 66 35 34  618a86e217f71f54
01a0: 31 39 64 32 35 65 31 30 33 31 61 66 65 65 35 38  19d25e1031afee58
01b0: 35 33 31 33 38 39 36 34 34 34 39 33 34 65 62 30  5313896444934eb0
01c0: 34 62 39 30 33 61 36 38 35 62 31 34 34 38 62 37  4b903a685b1448b7
01d0: 35 35 64 35 36 66 37 30 31 61 66 65 39 62 65 32  55d56f701afe9be2
01e0: 63 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  ce..tcltest::tes
01f0: 74 20 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 31  t Hash_BLAKE2b51
0200: 32 2d 31 2e 32 20 7b 42 4c 41 4b 45 32 62 35 31  2-1.2 {BLAKE2b51
0210: 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e  2} \..-constrain
0220: 74 73 20 42 4c 41 4b 45 32 62 35 31 32 20 5c 0a  ts BLAKE2b512 \.
0230: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
0240: 61 20 22 61 22 7d 20 5c 0a 09 2d 62 6f 64 79 20  a "a"} \..-body 
0250: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
0260: 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32 20  gest BLAKE2b512 
0270: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
0280: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
0290: 73 75 6c 74 20 33 33 33 66 63 62 34 65 65 31 61  sult 333fcb4ee1a
02a0: 61 37 63 31 31 35 33 35 35 65 63 36 36 63 65 61  a7c115355ec66cea
02b0: 63 39 31 37 63 38 62 66 64 38 31 35 62 66 37 35  c917c8bfd815bf75
02c0: 38 37 64 33 32 35 61 65 63 31 38 36 34 65 64 64  87d325aec1864edd
02d0: 32 34 65 33 34 64 35 61 62 65 32 63 36 62 31 62  24e34d5abe2c6b1b
02e0: 35 65 65 33 66 61 63 65 36 32 66 65 64 37 38 64  5ee3face62fed78d
02f0: 62 65 66 38 30 32 66 32 61 38 35 63 62 39 31 64  bef802f2a85cb91d
0300: 34 35 35 61 38 66 35 32 34 39 64 33 33 30 38 35  455a8f5249d33085
0310: 33 63 62 33 63 0a 0a 74 63 6c 74 65 73 74 3a 3a  3cb3c..tcltest::
0320: 74 65 73 74 20 48 61 73 68 5f 42 4c 41 4b 45 32  test Hash_BLAKE2
0330: 62 35 31 32 2d 31 2e 33 20 7b 42 4c 41 4b 45 32  b512-1.3 {BLAKE2
0340: 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  b512} \..-constr
0350: 61 69 6e 74 73 20 42 4c 41 4b 45 32 62 35 31 32  aints BLAKE2b512
0360: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
0370: 64 61 74 61 20 22 61 62 63 22 7d 20 5c 0a 09 2d  data "abc"} \..-
0380: 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73  body {tls::diges
0390: 74 20 2d 64 69 67 65 73 74 20 42 4c 41 4b 45 32  t -digest BLAKE2
03a0: 62 35 31 32 20 2d 64 61 74 61 20 24 64 61 74 61  b512 -data $data
03b0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
03c0: 74 20 2d 72 65 73 75 6c 74 20 62 61 38 30 61 35  t -result ba80a5
03d0: 33 66 39 38 31 63 34 64 30 64 36 61 32 37 39 37  3f981c4d0d6a2797
03e0: 62 36 39 66 31 32 66 36 65 39 34 63 32 31 32 66  b69f12f6e94c212f
03f0: 31 34 36 38 35 61 63 34 62 37 34 62 31 32 62 62  14685ac4b74b12bb
0400: 36 66 64 62 66 66 61 32 64 31 37 64 38 37 63 35  6fdbffa2d17d87c5
0410: 33 39 32 61 61 62 37 39 32 64 63 32 35 32 64 35  392aab792dc252d5
0420: 64 65 34 35 33 33 63 63 39 35 31 38 64 33 38 61  de4533cc9518d38a
0430: 61 38 64 62 66 31 39 32 35 61 62 39 32 33 38 36  a8dbf1925ab92386
0440: 65 64 64 34 30 30 39 39 32 33 0a 0a 74 63 6c 74  edd4009923..tclt
0450: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 42  est::test Hash_B
0460: 4c 41 4b 45 32 62 35 31 32 2d 31 2e 34 20 7b 42  LAKE2b512-1.4 {B
0470: 4c 41 4b 45 32 62 35 31 32 7d 20 5c 0a 09 2d 63  LAKE2b512} \..-c
0480: 6f 6e 73 74 72 61 69 6e 74 73 20 42 4c 41 4b 45  onstraints BLAKE
0490: 32 62 35 31 32 20 5c 0a 09 2d 73 65 74 75 70 20  2b512 \..-setup 
04a0: 7b 73 65 74 20 64 61 74 61 20 22 6d 65 73 73 61  {set data "messa
04b0: 67 65 20 64 69 67 65 73 74 22 7d 20 5c 0a 09 2d  ge digest"} \..-
04c0: 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73  body {tls::diges
04d0: 74 20 2d 64 69 67 65 73 74 20 42 4c 41 4b 45 32  t -digest BLAKE2
04e0: 62 35 31 32 20 2d 64 61 74 61 20 24 64 61 74 61  b512 -data $data
04f0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0500: 74 20 2d 72 65 73 75 6c 74 20 33 63 32 36 63 65  t -result 3c26ce
0510: 34 38 37 62 31 63 30 66 30 36 32 33 36 33 61 66  487b1c0f062363af
0520: 61 33 63 36 37 35 65 62 64 62 66 35 66 34 65 66  a3c675ebdbf5f4ef
0530: 39 62 64 63 30 32 32 63 66 62 65 66 39 31 65 33  9bdc022cfbef91e3
0540: 31 31 31 63 64 63 32 38 33 38 34 30 64 38 33 33  111cdc283840d833
0550: 31 66 63 33 30 61 38 61 30 39 30 36 63 66 66 34  1fc30a8a0906cff4
0560: 62 63 64 62 63 64 32 33 30 63 36 31 61 61 65 63  bcdbcd230c61aaec
0570: 36 30 66 64 66 61 64 34 35 37 65 64 39 36 62 37  60fdfad457ed96b7
0580: 30 39 61 33 38 32 33 35 39 61 0a 0a 74 63 6c 74  09a382359a..tclt
0590: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 42  est::test Hash_B
05a0: 4c 41 4b 45 32 62 35 31 32 2d 31 2e 35 20 7b 42  LAKE2b512-1.5 {B
05b0: 4c 41 4b 45 32 62 35 31 32 7d 20 5c 0a 09 2d 63  LAKE2b512} \..-c
05c0: 6f 6e 73 74 72 61 69 6e 74 73 20 42 4c 41 4b 45  onstraints BLAKE
05d0: 32 62 35 31 32 20 5c 0a 09 2d 73 65 74 75 70 20  2b512 \..-setup 
05e0: 7b 73 65 74 20 64 61 74 61 20 22 61 62 63 64 65  {set data "abcde
05f0: 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75  fghijklmnopqrstu
0600: 76 77 78 79 7a 22 7d 20 5c 0a 09 2d 62 6f 64 79  vwxyz"} \..-body
0610: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64   {tls::digest -d
0620: 69 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32  igest BLAKE2b512
0630: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
0640: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0650: 65 73 75 6c 74 20 63 36 38 65 64 65 31 34 33 65  esult c68ede143e
0660: 34 31 36 65 62 37 62 34 61 61 61 65 30 64 38 65  416eb7b4aaae0d8e
0670: 34 38 65 35 35 64 64 35 32 39 65 61 66 65 64 31  48e55dd529eafed1
0680: 30 62 31 64 66 31 61 36 31 34 31 36 39 35 33 61  0b1df1a61416953a
0690: 32 62 30 61 35 36 36 36 63 37 36 31 65 37 64 34  2b0a5666c761e7d4
06a0: 31 32 65 36 37 30 39 65 33 31 66 66 65 32 32 31  12e6709e31ffe221
06b0: 62 37 61 37 61 37 33 39 30 38 63 62 39 35 61 34  b7a7a73908cb95a4
06c0: 64 31 32 30 62 38 62 30 39 30 61 38 37 64 31 66  d120b8b090a87d1f
06d0: 62 65 64 62 34 63 0a 0a 74 63 6c 74 65 73 74 3a  bedb4c..tcltest:
06e0: 3a 74 65 73 74 20 48 61 73 68 5f 42 4c 41 4b 45  :test Hash_BLAKE
06f0: 32 62 35 31 32 2d 31 2e 36 20 7b 42 4c 41 4b 45  2b512-1.6 {BLAKE
0700: 32 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74  2b512} \..-const
0710: 72 61 69 6e 74 73 20 42 4c 41 4b 45 32 62 35 31  raints BLAKE2b51
0720: 32 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74  2 \..-setup {set
0730: 20 64 61 74 61 20 22 41 42 43 44 45 46 47 48 49   data "ABCDEFGHI
0740: 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55 56 57 58 59  JKLMNOPQRSTUVWXY
0750: 5a 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f  Zabcdefghijklmno
0760: 70 71 72 73 74 75 76 77 78 79 7a 30 31 32 33 34  pqrstuvwxyz01234
0770: 35 36 37 38 39 22 7d 20 5c 0a 09 2d 62 6f 64 79  56789"} \..-body
0780: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64   {tls::digest -d
0790: 69 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32  igest BLAKE2b512
07a0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
07b0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
07c0: 65 73 75 6c 74 20 39 39 39 36 34 38 30 32 65 35  esult 99964802e5
07d0: 63 32 35 65 37 30 33 37 32 32 39 30 35 64 33 66  c25e703722905d3f
07e0: 62 38 30 30 34 36 62 36 62 63 61 36 39 38 63 61  b80046b6bca698ca
07f0: 39 65 32 63 63 37 65 34 39 62 34 66 65 31 66 61  9e2cc7e49b4fe1fa
0800: 30 38 37 63 32 65 64 66 30 33 31 32 64 66 62 62  087c2edf0312dfbb
0810: 32 37 35 63 66 32 35 30 61 31 65 35 34 32 66 64  275cf250a1e542fd
0820: 35 64 63 32 65 64 64 33 31 33 66 39 63 34 39 31  5dc2edd313f9c491
0830: 31 32 37 63 32 65 38 63 30 63 39 62 32 34 31 36  127c2e8c0c9b2416
0840: 38 65 32 64 35 30 0a 0a 74 63 6c 74 65 73 74 3a  8e2d50..tcltest:
0850: 3a 74 65 73 74 20 48 61 73 68 5f 42 4c 41 4b 45  :test Hash_BLAKE
0860: 32 62 35 31 32 2d 31 2e 37 20 7b 42 4c 41 4b 45  2b512-1.7 {BLAKE
0870: 32 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74  2b512} \..-const
0880: 72 61 69 6e 74 73 20 42 4c 41 4b 45 32 62 35 31  raints BLAKE2b51
0890: 32 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74  2 \..-setup {set
08a0: 20 64 61 74 61 20 22 31 32 33 34 35 36 37 38 39   data "123456789
08b0: 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35  0123456789012345
08c0: 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31  6789012345678901
08d0: 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37  2345678901234567
08e0: 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33  8901234567890123
08f0: 34 35 36 37 38 39 30 22 7d 20 5c 0a 09 2d 62 6f  4567890"} \..-bo
0900: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
0910: 2d 64 69 67 65 73 74 20 42 4c 41 4b 45 32 62 35  -digest BLAKE2b5
0920: 31 32 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20  12 -data $data} 
0930: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20  \..-match exact 
0940: 2d 72 65 73 75 6c 74 20 36 38 36 66 34 31 65 63  -result 686f41ec
0950: 35 61 66 66 66 36 65 38 37 65 31 66 30 37 36 66  5afff6e87e1f076f
0960: 35 34 32 61 61 34 36 36 34 36 36 66 66 35 66 62  542aa466466ff5fb
0970: 64 65 31 36 32 63 34 38 34 38 31 62 61 34 38 61  de162c48481ba48a
0980: 37 34 38 64 38 34 32 37 39 39 66 35 62 33 30 66  748d842799f5b30f
0990: 35 62 36 37 66 63 36 38 34 37 37 31 62 33 33 62  5b67fc684771b33b
09a0: 39 39 34 32 30 36 64 30 35 63 63 33 31 30 66 33  994206d05cc310f3
09b0: 31 39 31 34 65 64 64 37 62 39 37 65 34 31 38 36  1914edd7b97e4186
09c0: 30 64 37 37 64 32 38 32 0a 0a 74 63 6c 74 65 73  0d77d282..tcltes
09d0: 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 42 4c 41  t::test Hash_BLA
09e0: 4b 45 32 62 35 31 32 2d 31 2e 38 20 7b 42 4c 41  KE2b512-1.8 {BLA
09f0: 4b 45 32 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e  KE2b512} \..-con
0a00: 73 74 72 61 69 6e 74 73 20 42 4c 41 4b 45 32 62  straints BLAKE2b
0a10: 35 31 32 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  512 \..-setup {s
0a20: 65 74 20 64 61 74 61 20 22 54 68 65 20 71 75 69  et data "The qui
0a30: 63 6b 20 62 72 6f 77 6e 20 66 6f 78 20 6a 75 6d  ck brown fox jum
0a40: 70 73 20 6f 76 65 72 20 74 68 65 20 6c 61 7a 79  ps over the lazy
0a50: 20 64 6f 67 22 7d 20 5c 0a 09 2d 62 6f 64 79 20   dog"} \..-body 
0a60: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
0a70: 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32 20  gest BLAKE2b512 
0a80: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
0a90: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
0aa0: 73 75 6c 74 20 61 38 61 64 64 34 62 64 64 64 66  sult a8add4bdddf
0ab0: 64 39 33 65 34 38 37 37 64 32 37 34 36 65 36 32  d93e4877d2746e62
0ac0: 38 31 37 62 31 31 36 33 36 34 61 31 66 61 37 62  817b116364a1fa7b
0ad0: 63 31 34 38 64 39 35 30 39 30 62 63 37 33 33 33  c148d95090bc7333
0ae0: 62 33 36 37 33 66 38 32 34 30 31 63 66 37 61 61  b3673f82401cf7aa
0af0: 32 65 34 63 62 31 65 63 64 39 30 32 39 36 65 33  2e4cb1ecd90296e3
0b00: 66 31 34 63 62 35 34 31 33 66 38 65 64 37 37 62  f14cb5413f8ed77b
0b10: 65 37 33 30 34 35 62 31 33 39 31 34 63 64 63 64  e73045b13914cdcd
0b20: 36 61 39 31 38 0a 0a                             6a918..