Artifact
878053b68ed9a6b7fff4e13684f7dfbf7c15090decc3dda78fad0ad4d1cdb838:
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 6c 61 70 70 65 6e 64 20 61 2.txt".lappend a
0030: 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c 65 20 64 uto_path [file d
0040: 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 irname [file dir
0050: 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 name [file dirna
0060: 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 me [file dirname
0070: 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 64 [file join [pwd
0080: 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d ] [info script]]
0090: 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 72 65 71 ]]]].package req
00a0: 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 65 uire tls.package
00b0: 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 74 require tcltest
00c0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 ..tcltest::testC
00d0: 6f 6e 73 74 72 61 69 6e 74 20 42 4c 41 4b 45 32 onstraint BLAKE2
00e0: 62 35 31 32 20 5b 65 78 70 72 20 7b 5b 6c 73 65 b512 [expr {[lse
00f0: 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c arch -nocase [tl
0100: 73 3a 3a 64 69 67 65 73 74 73 5d 20 42 4c 41 4b s::digests] BLAK
0110: 45 32 62 35 31 32 5d 20 3e 20 2d 31 7d 5d 0a 63 E2b512] > -1}].c
0120: 61 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 69 atch {tls::provi
0130: 64 65 72 20 6c 65 67 61 63 79 7d 0a 0a 74 63 6c der legacy}..tcl
0140: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f test::test Hash_
0150: 42 4c 41 4b 45 32 62 35 31 32 2d 31 2e 31 20 7b BLAKE2b512-1.1 {
0160: 42 4c 41 4b 45 32 62 35 31 32 7d 20 5c 0a 09 2d BLAKE2b512} \..-
0170: 63 6f 6e 73 74 72 61 69 6e 74 73 20 42 4c 41 4b constraints BLAK
0180: 45 32 62 35 31 32 20 5c 0a 09 2d 73 65 74 75 70 E2b512 \..-setup
0190: 20 7b 73 65 74 20 64 61 74 61 20 22 22 7d 20 5c {set data ""} \
01a0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 ..-body {tls::di
01b0: 67 65 73 74 20 2d 64 69 67 65 73 74 20 42 4c 41 gest -digest BLA
01c0: 4b 45 32 62 35 31 32 20 2d 64 61 74 61 20 24 64 KE2b512 -data $d
01d0: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 ata} \..-match e
01e0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 38 36 xact -result 786
01f0: 61 30 32 66 37 34 32 30 31 35 39 30 33 63 36 63 a02f742015903c6c
0200: 36 66 64 38 35 32 35 35 32 64 32 37 32 39 31 32 6fd852552d272912
0210: 66 34 37 34 30 65 31 35 38 34 37 36 31 38 61 38 f4740e15847618a8
0220: 36 65 32 31 37 66 37 31 66 35 34 31 39 64 32 35 6e217f71f5419d25
0230: 65 31 30 33 31 61 66 65 65 35 38 35 33 31 33 38 e1031afee5853138
0240: 39 36 34 34 34 39 33 34 65 62 30 34 62 39 30 33 96444934eb04b903
0250: 61 36 38 35 62 31 34 34 38 62 37 35 35 64 35 36 a685b1448b755d56
0260: 66 37 30 31 61 66 65 39 62 65 32 63 65 0a 0a 74 f701afe9be2ce..t
0270: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 cltest::test Has
0280: 68 5f 42 4c 41 4b 45 32 62 35 31 32 2d 31 2e 32 h_BLAKE2b512-1.2
0290: 20 7b 42 4c 41 4b 45 32 62 35 31 32 7d 20 5c 0a {BLAKE2b512} \.
02a0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 42 4c .-constraints BL
02b0: 41 4b 45 32 62 35 31 32 20 5c 0a 09 2d 73 65 74 AKE2b512 \..-set
02c0: 75 70 20 7b 73 65 74 20 64 61 74 61 20 22 61 22 up {set data "a"
02d0: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a } \..-body {tls:
02e0: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 :digest -digest
02f0: 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 61 74 61 BLAKE2b512 -data
0300: 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 $data} \..-matc
0310: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
0320: 33 33 33 66 63 62 34 65 65 31 61 61 37 63 31 31 333fcb4ee1aa7c11
0330: 35 33 35 35 65 63 36 36 63 65 61 63 39 31 37 63 5355ec66ceac917c
0340: 38 62 66 64 38 31 35 62 66 37 35 38 37 64 33 32 8bfd815bf7587d32
0350: 35 61 65 63 31 38 36 34 65 64 64 32 34 65 33 34 5aec1864edd24e34
0360: 64 35 61 62 65 32 63 36 62 31 62 35 65 65 33 66 d5abe2c6b1b5ee3f
0370: 61 63 65 36 32 66 65 64 37 38 64 62 65 66 38 30 ace62fed78dbef80
0380: 32 66 32 61 38 35 63 62 39 31 64 34 35 35 61 38 2f2a85cb91d455a8
0390: 66 35 32 34 39 64 33 33 30 38 35 33 63 62 33 63 f5249d330853cb3c
03a0: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
03b0: 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 31 32 2d Hash_BLAKE2b512-
03c0: 31 2e 33 20 7b 42 4c 41 4b 45 32 62 35 31 32 7d 1.3 {BLAKE2b512}
03d0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
03e0: 20 42 4c 41 4b 45 32 62 35 31 32 20 5c 0a 09 2d BLAKE2b512 \..-
03f0: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 setup {set data
0400: 22 61 62 63 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 "abc"} \..-body
0410: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 {tls::digest -di
0420: 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32 20 gest BLAKE2b512
0430: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 -data $data} \..
0440: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0450: 73 75 6c 74 20 62 61 38 30 61 35 33 66 39 38 31 sult ba80a53f981
0460: 63 34 64 30 64 36 61 32 37 39 37 62 36 39 66 31 c4d0d6a2797b69f1
0470: 32 66 36 65 39 34 63 32 31 32 66 31 34 36 38 35 2f6e94c212f14685
0480: 61 63 34 62 37 34 62 31 32 62 62 36 66 64 62 66 ac4b74b12bb6fdbf
0490: 66 61 32 64 31 37 64 38 37 63 35 33 39 32 61 61 fa2d17d87c5392aa
04a0: 62 37 39 32 64 63 32 35 32 64 35 64 65 34 35 33 b792dc252d5de453
04b0: 33 63 63 39 35 31 38 64 33 38 61 61 38 64 62 66 3cc9518d38aa8dbf
04c0: 31 39 32 35 61 62 39 32 33 38 36 65 64 64 34 30 1925ab92386edd40
04d0: 30 39 39 32 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 09923..tcltest::
04e0: 74 65 73 74 20 48 61 73 68 5f 42 4c 41 4b 45 32 test Hash_BLAKE2
04f0: 62 35 31 32 2d 31 2e 34 20 7b 42 4c 41 4b 45 32 b512-1.4 {BLAKE2
0500: 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 b512} \..-constr
0510: 61 69 6e 74 73 20 42 4c 41 4b 45 32 62 35 31 32 aints BLAKE2b512
0520: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 \..-setup {set
0530: 64 61 74 61 20 22 6d 65 73 73 61 67 65 20 64 69 data "message di
0540: 67 65 73 74 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 gest"} \..-body
0550: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 {tls::digest -di
0560: 67 65 73 74 20 42 4c 41 4b 45 32 62 35 31 32 20 gest BLAKE2b512
0570: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 -data $data} \..
0580: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0590: 73 75 6c 74 20 33 63 32 36 63 65 34 38 37 62 31 sult 3c26ce487b1
05a0: 63 30 66 30 36 32 33 36 33 61 66 61 33 63 36 37 c0f062363afa3c67
05b0: 35 65 62 64 62 66 35 66 34 65 66 39 62 64 63 30 5ebdbf5f4ef9bdc0
05c0: 32 32 63 66 62 65 66 39 31 65 33 31 31 31 63 64 22cfbef91e3111cd
05d0: 63 32 38 33 38 34 30 64 38 33 33 31 66 63 33 30 c283840d8331fc30
05e0: 61 38 61 30 39 30 36 63 66 66 34 62 63 64 62 63 a8a0906cff4bcdbc
05f0: 64 32 33 30 63 36 31 61 61 65 63 36 30 66 64 66 d230c61aaec60fdf
0600: 61 64 34 35 37 65 64 39 36 62 37 30 39 61 33 38 ad457ed96b709a38
0610: 32 33 35 39 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 2359a..tcltest::
0620: 74 65 73 74 20 48 61 73 68 5f 42 4c 41 4b 45 32 test Hash_BLAKE2
0630: 62 35 31 32 2d 31 2e 35 20 7b 42 4c 41 4b 45 32 b512-1.5 {BLAKE2
0640: 62 35 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 b512} \..-constr
0650: 61 69 6e 74 73 20 42 4c 41 4b 45 32 62 35 31 32 aints BLAKE2b512
0660: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 \..-setup {set
0670: 64 61 74 61 20 22 61 62 63 64 65 66 67 68 69 6a data "abcdefghij
0680: 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a klmnopqrstuvwxyz
0690: 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 "} \..-body {tls
06a0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 ::digest -digest
06b0: 20 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 61 74 BLAKE2b512 -dat
06c0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 a $data} \..-mat
06d0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
06e0: 20 63 36 38 65 64 65 31 34 33 65 34 31 36 65 62 c68ede143e416eb
06f0: 37 62 34 61 61 61 65 30 64 38 65 34 38 65 35 35 7b4aaae0d8e48e55
0700: 64 64 35 32 39 65 61 66 65 64 31 30 62 31 64 66 dd529eafed10b1df
0710: 31 61 36 31 34 31 36 39 35 33 61 32 62 30 61 35 1a61416953a2b0a5
0720: 36 36 36 63 37 36 31 65 37 64 34 31 32 65 36 37 666c761e7d412e67
0730: 30 39 65 33 31 66 66 65 32 32 31 62 37 61 37 61 09e31ffe221b7a7a
0740: 37 33 39 30 38 63 62 39 35 61 34 64 31 32 30 62 73908cb95a4d120b
0750: 38 62 30 39 30 61 38 37 64 31 66 62 65 64 62 34 8b090a87d1fbedb4
0760: 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 c..tcltest::test
0770: 20 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 31 32 Hash_BLAKE2b512
0780: 2d 31 2e 36 20 7b 42 4c 41 4b 45 32 62 35 31 32 -1.6 {BLAKE2b512
0790: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
07a0: 73 20 42 4c 41 4b 45 32 62 35 31 32 20 5c 0a 09 s BLAKE2b512 \..
07b0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 -setup {set data
07c0: 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e "ABCDEFGHIJKLMN
07d0: 4f 50 51 52 53 54 55 56 57 58 59 5a 61 62 63 64 OPQRSTUVWXYZabcd
07e0: 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 efghijklmnopqrst
07f0: 75 76 77 78 79 7a 30 31 32 33 34 35 36 37 38 39 uvwxyz0123456789
0800: 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 "} \..-body {tls
0810: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 ::digest -digest
0820: 20 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 61 74 BLAKE2b512 -dat
0830: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 a $data} \..-mat
0840: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0850: 20 39 39 39 36 34 38 30 32 65 35 63 32 35 65 37 99964802e5c25e7
0860: 30 33 37 32 32 39 30 35 64 33 66 62 38 30 30 34 03722905d3fb8004
0870: 36 62 36 62 63 61 36 39 38 63 61 39 65 32 63 63 6b6bca698ca9e2cc
0880: 37 65 34 39 62 34 66 65 31 66 61 30 38 37 63 32 7e49b4fe1fa087c2
0890: 65 64 66 30 33 31 32 64 66 62 62 32 37 35 63 66 edf0312dfbb275cf
08a0: 32 35 30 61 31 65 35 34 32 66 64 35 64 63 32 65 250a1e542fd5dc2e
08b0: 64 64 33 31 33 66 39 63 34 39 31 31 32 37 63 32 dd313f9c491127c2
08c0: 65 38 63 30 63 39 62 32 34 31 36 38 65 32 64 35 e8c0c9b24168e2d5
08d0: 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 0..tcltest::test
08e0: 20 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 31 32 Hash_BLAKE2b512
08f0: 2d 31 2e 37 20 7b 42 4c 41 4b 45 32 62 35 31 32 -1.7 {BLAKE2b512
0900: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0910: 73 20 42 4c 41 4b 45 32 62 35 31 32 20 5c 0a 09 s BLAKE2b512 \..
0920: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 -setup {set data
0930: 20 22 31 32 33 34 35 36 37 38 39 30 31 32 33 34 "12345678901234
0940: 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 5678901234567890
0950: 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 1234567890123456
0960: 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 7890123456789012
0970: 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 3456789012345678
0980: 39 30 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 90"} \..-body {t
0990: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 ls::digest -dige
09a0: 73 74 20 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 st BLAKE2b512 -d
09b0: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d ata $data} \..-m
09c0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
09d0: 6c 74 20 36 38 36 66 34 31 65 63 35 61 66 66 66 lt 686f41ec5afff
09e0: 36 65 38 37 65 31 66 30 37 36 66 35 34 32 61 61 6e87e1f076f542aa
09f0: 34 36 36 34 36 36 66 66 35 66 62 64 65 31 36 32 466466ff5fbde162
0a00: 63 34 38 34 38 31 62 61 34 38 61 37 34 38 64 38 c48481ba48a748d8
0a10: 34 32 37 39 39 66 35 62 33 30 66 35 62 36 37 66 42799f5b30f5b67f
0a20: 63 36 38 34 37 37 31 62 33 33 62 39 39 34 32 30 c684771b33b99420
0a30: 36 64 30 35 63 63 33 31 30 66 33 31 39 31 34 65 6d05cc310f31914e
0a40: 64 64 37 62 39 37 65 34 31 38 36 30 64 37 37 64 dd7b97e41860d77d
0a50: 32 38 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 282..tcltest::te
0a60: 73 74 20 48 61 73 68 5f 42 4c 41 4b 45 32 62 35 st Hash_BLAKE2b5
0a70: 31 32 2d 31 2e 38 20 7b 42 4c 41 4b 45 32 62 35 12-1.8 {BLAKE2b5
0a80: 31 32 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 12} \..-constrai
0a90: 6e 74 73 20 42 4c 41 4b 45 32 62 35 31 32 20 5c nts BLAKE2b512 \
0aa0: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 ..-setup {set da
0ab0: 74 61 20 22 54 68 65 20 71 75 69 63 6b 20 62 72 ta "The quick br
0ac0: 6f 77 6e 20 66 6f 78 20 6a 75 6d 70 73 20 6f 76 own fox jumps ov
0ad0: 65 72 20 74 68 65 20 6c 61 7a 79 20 64 6f 67 22 er the lazy dog"
0ae0: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a } \..-body {tls:
0af0: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 :digest -digest
0b00: 42 4c 41 4b 45 32 62 35 31 32 20 2d 64 61 74 61 BLAKE2b512 -data
0b10: 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 $data} \..-matc
0b20: 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 h exact -result
0b30: 61 38 61 64 64 34 62 64 64 64 66 64 39 33 65 34 a8add4bdddfd93e4
0b40: 38 37 37 64 32 37 34 36 65 36 32 38 31 37 62 31 877d2746e62817b1
0b50: 31 36 33 36 34 61 31 66 61 37 62 63 31 34 38 64 16364a1fa7bc148d
0b60: 39 35 30 39 30 62 63 37 33 33 33 62 33 36 37 33 95090bc7333b3673
0b70: 66 38 32 34 30 31 63 66 37 61 61 32 65 34 63 62 f82401cf7aa2e4cb
0b80: 31 65 63 64 39 30 32 39 36 65 33 66 31 34 63 62 1ecd90296e3f14cb
0b90: 35 34 31 33 66 38 65 64 37 37 62 65 37 33 30 34 5413f8ed77be7304
0ba0: 35 62 31 33 39 31 34 63 64 63 64 36 61 39 31 38 5b13914cdcd6a918
0bb0: 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 ..# Cleanup.::tc
0bc0: 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 ltest::cleanupTe
0bd0: 73 74 73 0a 72 65 74 75 72 6e 0a sts.return.