Artifact
1ebfc3935e48f79ba0297b1131d20ab5638f407ab73bb3ec2f29445e1f1c329c:
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 53 48 41 32 35 36 2e 74 78 from "SHA256.tx
0020: 74 22 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 t".package requi
0030: 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 65 20 72 re tls.package r
0040: 65 71 75 69 72 65 20 74 63 6c 74 65 73 74 0a 0a equire tcltest..
0050: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f 6e tcltest::testCon
0060: 73 74 72 61 69 6e 74 20 53 48 41 32 35 36 20 5b straint SHA256 [
0070: 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 68 20 2d expr {[lsearch -
0080: 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a 64 69 67 nocase [tls::dig
0090: 65 73 74 73 5d 20 53 48 41 32 35 36 5d 20 3e 20 ests] SHA256] >
00a0: 2d 31 7d 5d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 -1}]..tcltest::t
00b0: 65 73 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d est Hash_SHA256-
00c0: 31 2e 31 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 1.1 {SHA256} \..
00d0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 -constraints SHA
00e0: 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 256 \..-setup {s
00f0: 65 74 20 64 61 74 61 20 22 22 7d 20 5c 0a 09 2d et data ""} \..-
0100: 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 body {tls::diges
0110: 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 t -digest SHA256
0120: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a -data $data} \.
0130: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0140: 65 73 75 6c 74 20 65 33 62 30 63 34 34 32 39 38 esult e3b0c44298
0150: 66 63 31 63 31 34 39 61 66 62 66 34 63 38 39 39 fc1c149afbf4c899
0160: 36 66 62 39 32 34 32 37 61 65 34 31 65 34 36 34 6fb92427ae41e464
0170: 39 62 39 33 34 63 61 34 39 35 39 39 31 62 37 38 9b934ca495991b78
0180: 35 32 62 38 35 35 0a 0a 74 63 6c 74 65 73 74 3a 52b855..tcltest:
0190: 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 35 :test Hash_SHA25
01a0: 36 2d 31 2e 32 20 7b 53 48 41 32 35 36 7d 20 5c 6-1.2 {SHA256} \
01b0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 ..-constraints S
01c0: 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 HA256 \..-setup
01d0: 7b 73 65 74 20 64 61 74 61 20 22 61 62 63 22 7d {set data "abc"}
01e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a \..-body {tls::
01f0: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 digest -digest S
0200: 48 41 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 HA256 -data $dat
0210: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 a} \..-match exa
0220: 63 74 20 2d 72 65 73 75 6c 74 20 62 61 37 38 31 ct -result ba781
0230: 36 62 66 38 66 30 31 63 66 65 61 34 31 34 31 34 6bf8f01cfea41414
0240: 30 64 65 35 64 61 65 32 32 32 33 62 30 30 33 36 0de5dae2223b0036
0250: 31 61 33 39 36 31 37 37 61 39 63 62 34 31 30 66 1a396177a9cb410f
0260: 66 36 31 66 32 30 30 31 35 61 64 0a 0a 74 63 6c f61f20015ad..tcl
0270: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f test::test Hash_
0280: 53 48 41 32 35 36 2d 31 2e 33 20 7b 53 48 41 32 SHA256-1.3 {SHA2
0290: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 56} \..-constrai
02a0: 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 nts SHA256 \..-s
02b0: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 22 etup {set data "
02c0: 61 62 63 64 62 63 64 65 63 64 65 66 64 65 66 67 abcdbcdecdefdefg
02d0: 65 66 67 68 66 67 68 69 67 68 69 6a 68 69 6a 6b efghfghighijhijk
02e0: 69 6a 6b 6c 6a 6b 6c 6d 6b 6c 6d 6e 6c 6d 6e 6f ijkljklmklmnlmno
02f0: 6d 6e 6f 70 6e 6f 70 71 22 7d 20 5c 0a 09 2d 62 mnopnopq"} \..-b
0300: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 ody {tls::digest
0310: 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 20 -digest SHA256
0320: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 -data $data} \..
0330: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0340: 73 75 6c 74 20 32 34 38 64 36 61 36 31 64 32 30 sult 248d6a61d20
0350: 36 33 38 62 38 65 35 63 30 32 36 39 33 30 63 33 638b8e5c026930c3
0360: 65 36 30 33 39 61 33 33 63 65 34 35 39 36 34 66 e6039a33ce45964f
0370: 66 32 31 36 37 66 36 65 63 65 64 64 34 31 39 64 f2167f6ecedd419d
0380: 62 30 36 63 31 0a 0a 74 63 6c 74 65 73 74 3a 3a b06c1..tcltest::
0390: 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 35 36 test Hash_SHA256
03a0: 2d 31 2e 34 20 7b 53 48 41 32 35 36 7d 20 5c 0a -1.4 {SHA256} \.
03b0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 .-constraints SH
03c0: 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b A256 \..-setup {
03d0: 73 65 74 20 64 61 74 61 20 22 61 62 63 64 65 66 set data "abcdef
03e0: 67 68 62 63 64 65 66 67 68 69 63 64 65 66 67 68 ghbcdefghicdefgh
03f0: 69 6a 64 65 66 67 68 69 6a 6b 65 66 67 68 69 6a ijdefghijkefghij
0400: 6b 6c 66 67 68 69 6a 6b 6c 6d 67 68 69 6a 6b 6c klfghijklmghijkl
0410: 6d 6e 68 69 6a 6b 6c 6d 6e 6f 69 6a 6b 6c 6d 6e mnhijklmnoijklmn
0420: 6f 70 6a 6b 6c 6d 6e 6f 70 71 6b 6c 6d 6e 6f 70 opjklmnopqklmnop
0430: 71 72 6c 6d 6e 6f 70 71 72 73 6d 6e 6f 70 71 72 qrlmnopqrsmnopqr
0440: 73 74 6e 6f 70 71 72 73 74 75 22 7d 20 5c 0a 09 stnopqrstu"} \..
0450: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 -body {tls::dige
0460: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 st -digest SHA25
0470: 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 6 -data $data} \
0480: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
0490: 72 65 73 75 6c 74 20 63 66 35 62 31 36 61 37 37 result cf5b16a77
04a0: 38 61 66 38 33 38 30 30 33 36 63 65 35 39 65 37 8af8380036ce59e7
04b0: 62 30 34 39 32 33 37 30 62 32 34 39 62 31 31 65 b0492370b249b11e
04c0: 38 66 30 37 61 35 31 61 66 61 63 34 35 30 33 37 8f07a51afac45037
04d0: 61 66 65 65 39 64 31 0a 0a 74 63 6c 74 65 73 74 afee9d1..tcltest
04e0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 ::test Hash_SHA2
04f0: 35 36 2d 31 2e 35 20 7b 53 48 41 32 35 36 7d 20 56-1.5 {SHA256}
0500: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
0510: 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 SHA256 \..-setup
0520: 20 7b 73 65 74 20 64 61 74 61 20 5b 73 74 72 69 {set data [stri
0530: 6e 67 20 72 65 70 65 61 74 20 22 61 22 20 31 30 ng repeat "a" 10
0540: 30 30 30 30 30 5d 7d 20 5c 0a 09 2d 62 6f 64 79 00000]} \..-body
0550: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 {tls::digest -d
0560: 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 61 igest SHA256 -da
0570: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
0580: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0590: 74 20 63 64 63 37 36 65 35 63 39 39 31 34 66 62 t cdc76e5c9914fb
05a0: 39 32 38 31 61 31 63 37 65 32 38 34 64 37 33 65 9281a1c7e284d73e
05b0: 36 37 66 31 38 30 39 61 34 38 61 34 39 37 32 30 67f1809a48a49720
05c0: 30 65 30 34 36 64 33 39 63 63 63 37 31 31 32 63 0e046d39ccc7112c
05d0: 64 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 d0..tcltest::tes
05e0: 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d 31 2e t Hash_SHA256-1.
05f0: 36 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6 {SHA256} \..-c
0600: 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 32 35 onstraints SHA25
0610: 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 6 \..-setup {set
0620: 20 64 61 74 61 20 5b 73 74 72 69 6e 67 20 72 65 data [string re
0630: 70 65 61 74 20 22 61 62 63 64 65 66 67 68 62 63 peat "abcdefghbc
0640: 64 65 66 67 68 69 63 64 65 66 67 68 69 6a 64 65 defghicdefghijde
0650: 66 67 68 69 6a 6b 65 66 67 68 69 6a 6b 6c 66 67 fghijkefghijklfg
0660: 68 69 6a 6b 6c 6d 67 68 69 6a 6b 6c 6d 6e 68 69 hijklmghijklmnhi
0670: 6a 6b 6c 6d 6e 6f 22 20 31 36 37 37 37 32 31 36 jklmno" 16777216
0680: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 ]} \..-body {tls
0690: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 ::digest -digest
06a0: 20 53 48 41 32 35 36 20 2d 64 61 74 61 20 24 64 SHA256 -data $d
06b0: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 ata} \..-match e
06c0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 30 65 xact -result 50e
06d0: 37 32 61 30 65 32 36 34 34 32 66 65 32 35 35 32 72a0e26442fe2552
06e0: 64 63 33 39 33 38 61 63 35 38 36 35 38 32 32 38 dc3938ac58658228
06f0: 63 30 63 62 66 62 31 64 32 63 61 38 37 32 61 65 c0cbfb1d2ca872ae
0700: 34 33 35 32 36 36 66 63 64 30 35 35 65 0a 0a 74 435266fcd055e..t
0710: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 cltest::test Has
0720: 68 5f 53 48 41 32 35 36 2d 31 2e 37 20 7b 53 48 h_SHA256-1.7 {SH
0730: 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 A256} \..-constr
0740: 61 69 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 aints SHA256 \..
0750: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 -setup {set data
0760: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0770: 68 65 78 20 62 64 5d 7d 20 5c 0a 09 2d 62 6f 64 hex bd]} \..-bod
0780: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d y {tls::digest -
0790: 64 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 digest SHA256 -d
07a0: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d ata $data} \..-m
07b0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
07c0: 6c 74 20 36 38 33 32 35 37 32 30 61 61 62 64 37 lt 68325720aabd7
07d0: 63 38 32 66 33 30 66 35 35 34 62 33 31 33 64 30 c82f30f554b313d0
07e0: 35 37 30 63 39 35 61 63 63 62 62 37 64 63 34 62 570c95accbb7dc4b
07f0: 35 61 61 65 31 31 32 30 34 63 30 38 66 66 65 37 5aae11204c08ffe7
0800: 33 32 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 32b..tcltest::te
0810: 73 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d 31 st Hash_SHA256-1
0820: 2e 38 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 2d .8 {SHA256} \..-
0830: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 32 constraints SHA2
0840: 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 56 \..-setup {se
0850: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 t data [binary d
0860: 65 63 6f 64 65 20 68 65 78 20 63 39 38 63 38 65 ecode hex c98c8e
0870: 35 35 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 55]} \..-body {t
0880: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 ls::digest -dige
0890: 73 74 20 53 48 41 32 35 36 20 2d 64 61 74 61 20 st SHA256 -data
08a0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 $data} \..-match
08b0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37 exact -result 7
08c0: 61 62 63 32 32 63 30 61 65 35 61 66 32 36 63 65 abc22c0ae5af26ce
08d0: 39 33 64 62 62 39 34 34 33 33 61 30 65 30 62 32 93dbb94433a0e0b2
08e0: 65 31 31 39 64 30 31 34 66 38 65 37 66 36 35 62 e119d014f8e7f65b
08f0: 64 35 36 63 36 31 63 63 63 63 64 39 35 30 34 0a d56c61ccccd9504.
0900: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 .tcltest::test H
0910: 61 73 68 5f 53 48 41 32 35 36 2d 31 2e 39 20 7b ash_SHA256-1.9 {
0920: 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 SHA256} \..-cons
0930: 74 72 61 69 6e 74 73 20 53 48 41 32 35 36 20 5c traints SHA256 \
0940: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 ..-setup {set da
0950: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0960: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 65 e hex [string re
0970: 70 65 61 74 20 30 30 20 35 35 5d 5d 7d 20 5c 0a peat 00 55]]} \.
0980: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 .-body {tls::dig
0990: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 est -digest SHA2
09a0: 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 56 -data $data}
09b0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
09c0: 2d 72 65 73 75 6c 74 20 30 32 37 37 39 34 36 36 -result 02779466
09d0: 63 64 65 63 31 36 33 38 31 31 64 30 37 38 38 31 cdec163811d07881
09e0: 35 63 36 33 33 66 32 31 39 30 31 34 31 33 30 38 5c633f2190141308
09f0: 31 34 34 39 30 30 32 66 32 34 61 61 33 65 38 30 1449002f24aa3e80
0a00: 66 30 62 38 38 65 66 37 0a 0a 74 63 6c 74 65 73 f0b88ef7..tcltes
0a10: 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 t::test Hash_SHA
0a20: 32 35 36 2d 31 2e 31 30 20 7b 53 48 41 32 35 36 256-1.10 {SHA256
0a30: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0a40: 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 s SHA256 \..-set
0a50: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 up {set data [bi
0a60: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 nary decode hex
0a70: 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 30 [string repeat 0
0a80: 30 20 35 36 5d 5d 7d 20 5c 0a 09 2d 62 6f 64 79 0 56]]} \..-body
0a90: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 {tls::digest -d
0aa0: 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 61 igest SHA256 -da
0ab0: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
0ac0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0ad0: 74 20 64 34 38 31 37 61 61 35 34 39 37 36 32 38 t d4817aa5497628
0ae0: 65 37 63 37 37 65 36 62 36 30 36 31 30 37 30 34 e7c77e6b60610704
0af0: 32 62 62 62 61 33 31 33 30 38 38 38 63 35 66 34 2bbba3130888c5f4
0b00: 37 61 33 37 35 65 36 31 37 39 62 65 37 38 39 66 7a375e6179be789f
0b10: 62 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 bb..tcltest::tes
0b20: 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d 31 2e t Hash_SHA256-1.
0b30: 31 31 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 2d 11 {SHA256} \..-
0b40: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 32 constraints SHA2
0b50: 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 56 \..-setup {se
0b60: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 t data [binary d
0b70: 65 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e ecode hex [strin
0b80: 67 20 72 65 70 65 61 74 20 30 30 20 35 37 5d 5d g repeat 00 57]]
0b90: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a } \..-body {tls:
0ba0: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 :digest -digest
0bb0: 53 48 41 32 35 36 20 2d 64 61 74 61 20 24 64 61 SHA256 -data $da
0bc0: 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 ta} \..-match ex
0bd0: 61 63 74 20 2d 72 65 73 75 6c 74 20 36 35 61 31 act -result 65a1
0be0: 36 63 62 37 38 36 31 33 33 35 64 35 61 63 65 33 6cb7861335d5ace3
0bf0: 63 36 30 37 31 38 62 35 30 35 32 65 34 34 36 36 c60718b5052e4466
0c00: 30 37 32 36 64 61 34 63 64 31 33 62 62 37 34 35 0726da4cd13bb745
0c10: 33 38 31 62 32 33 35 61 31 37 38 35 0a 0a 74 63 381b235a1785..tc
0c20: 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 ltest::test Hash
0c30: 5f 53 48 41 32 35 36 2d 31 2e 31 32 20 7b 53 48 _SHA256-1.12 {SH
0c40: 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 A256} \..-constr
0c50: 61 69 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 aints SHA256 \..
0c60: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 -setup {set data
0c70: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0c80: 68 65 78 20 5b 73 74 72 69 6e 67 20 72 65 70 65 hex [string repe
0c90: 61 74 20 30 30 20 36 34 5d 5d 7d 20 5c 0a 09 2d at 00 64]]} \..-
0ca0: 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 body {tls::diges
0cb0: 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 t -digest SHA256
0cc0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a -data $data} \.
0cd0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0ce0: 65 73 75 6c 74 20 66 35 61 35 66 64 34 32 64 31 esult f5a5fd42d1
0cf0: 36 61 32 30 33 30 32 37 39 38 65 66 36 65 64 33 6a20302798ef6ed3
0d00: 30 39 39 37 39 62 34 33 30 30 33 64 32 33 32 30 09979b43003d2320
0d10: 64 39 66 30 65 38 65 61 39 38 33 31 61 39 32 37 d9f0e8ea9831a927
0d20: 35 39 66 62 34 62 0a 0a 74 63 6c 74 65 73 74 3a 59fb4b..tcltest:
0d30: 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 35 :test Hash_SHA25
0d40: 36 2d 31 2e 31 33 20 7b 53 48 41 32 35 36 7d 20 6-1.13 {SHA256}
0d50: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
0d60: 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 SHA256 \..-setup
0d70: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 {set data [bina
0d80: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 5b 73 ry decode hex [s
0d90: 74 72 69 6e 67 20 72 65 70 65 61 74 20 30 30 20 tring repeat 00
0da0: 31 30 30 30 5d 5d 7d 20 5c 0a 09 2d 62 6f 64 79 1000]]} \..-body
0db0: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 {tls::digest -d
0dc0: 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 61 igest SHA256 -da
0dd0: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
0de0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0df0: 74 20 35 34 31 62 33 65 39 64 61 61 30 39 62 32 t 541b3e9daa09b2
0e00: 30 62 66 38 35 66 61 32 37 33 65 35 63 62 64 33 0bf85fa273e5cbd3
0e10: 65 38 30 31 38 35 61 61 34 65 63 32 39 38 65 37 e80185aa4ec298e7
0e20: 36 35 64 62 38 37 37 34 32 62 37 30 31 33 38 61 65db87742b70138a
0e30: 35 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 53..tcltest::tes
0e40: 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d 31 2e t Hash_SHA256-1.
0e50: 31 34 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 2d 14 {SHA256} \..-
0e60: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 32 constraints SHA2
0e70: 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 56 \..-setup {se
0e80: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 t data [binary d
0e90: 65 63 6f 64 65 20 68 65 78 20 5b 73 74 72 69 6e ecode hex [strin
0ea0: 67 20 72 65 70 65 61 74 20 34 31 20 31 30 30 30 g repeat 41 1000
0eb0: 5d 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c ]]} \..-body {tl
0ec0: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 s::digest -diges
0ed0: 74 20 53 48 41 32 35 36 20 2d 64 61 74 61 20 24 t SHA256 -data $
0ee0: 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 data} \..-match
0ef0: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63 32 exact -result c2
0f00: 65 36 38 36 38 32 33 34 38 39 63 65 64 32 30 31 e686823489ced201
0f10: 37 66 36 30 35 39 62 38 62 32 33 39 33 31 38 62 7f6059b8b239318b
0f20: 36 33 36 34 66 36 64 63 64 38 33 35 64 30 61 35 6364f6dcd835d0a5
0f30: 31 39 31 30 35 61 31 65 61 64 64 36 65 34 0a 0a 19105a1eadd6e4..
0f40: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 tcltest::test Ha
0f50: 73 68 5f 53 48 41 32 35 36 2d 31 2e 31 35 20 7b sh_SHA256-1.15 {
0f60: 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 SHA256} \..-cons
0f70: 74 72 61 69 6e 74 73 20 53 48 41 32 35 36 20 5c traints SHA256 \
0f80: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 ..-setup {set da
0f90: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 ta [binary decod
0fa0: 65 20 68 65 78 20 5b 73 74 72 69 6e 67 20 72 65 e hex [string re
0fb0: 70 65 61 74 20 35 35 20 31 30 30 35 5d 5d 7d 20 peat 55 1005]]}
0fc0: 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 \..-body {tls::d
0fd0: 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 igest -digest SH
0fe0: 41 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 A256 -data $data
0ff0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
1000: 74 20 2d 72 65 73 75 6c 74 20 66 34 64 36 32 64 t -result f4d62d
1010: 64 65 63 30 66 33 64 64 39 30 65 61 31 33 38 30 dec0f3dd90ea1380
1020: 66 61 31 36 61 35 66 66 38 64 63 34 63 35 34 62 fa16a5ff8dc4c54b
1030: 32 31 37 34 30 36 35 30 66 32 34 61 66 63 34 31 21740650f24afc41
1040: 32 30 39 30 33 35 35 32 62 30 0a 0a 74 63 6c 74 20903552b0..tclt
1050: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 est::test Hash_S
1060: 48 41 32 35 36 2d 31 2e 31 36 20 7b 53 48 41 32 HA256-1.16 {SHA2
1070: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 56} \..-constrai
1080: 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 nts SHA256 \..-s
1090: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b etup {set data [
10a0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
10b0: 78 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 x [string repeat
10c0: 20 30 30 20 31 30 30 30 30 30 30 5d 5d 7d 20 5c 00 1000000]]} \
10d0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 ..-body {tls::di
10e0: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 gest -digest SHA
10f0: 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 256 -data $data}
1100: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1110: 20 2d 72 65 73 75 6c 74 20 64 32 39 37 35 31 66 -result d29751f
1120: 32 36 34 39 62 33 32 66 66 35 37 32 62 35 65 30 2649b32ff572b5e0
1130: 61 39 66 35 34 31 65 61 36 36 30 61 35 30 66 39 a9f541ea660a50f9
1140: 34 66 66 30 62 65 65 64 66 62 30 62 36 39 32 62 4ff0beedfb0b692b
1150: 39 32 34 63 63 38 30 32 35 0a 0a 74 63 6c 74 65 924cc8025..tclte
1160: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 st::test Hash_SH
1170: 41 32 35 36 2d 31 2e 31 37 20 7b 53 48 41 32 35 A256-1.17 {SHA25
1180: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 6} \..-constrain
1190: 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 ts SHA256 \..-se
11a0: 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 tup {set data [b
11b0: 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 inary decode hex
11c0: 20 5b 73 74 72 69 6e 67 20 72 65 70 65 61 74 20 [string repeat
11d0: 35 61 20 35 33 36 38 37 30 39 31 32 5d 5d 7d 20 5a 536870912]]}
11e0: 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 \..-body {tls::d
11f0: 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 igest -digest SH
1200: 41 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 A256 -data $data
1210: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
1220: 74 20 2d 72 65 73 75 6c 74 20 31 35 61 31 38 36 t -result 15a186
1230: 38 63 31 32 63 63 35 33 39 35 31 65 31 38 32 33 8c12cc53951e1823
1240: 34 34 32 37 37 34 34 37 63 64 30 39 37 39 35 33 44277447cd097953
1250: 36 62 61 64 63 63 35 31 32 61 64 32 34 63 36 37 6badcc512ad24c67
1260: 65 39 62 32 64 34 66 33 64 64 0a 0a 74 63 6c 74 e9b2d4f3dd..tclt
1270: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 est::test Hash_S
1280: 48 41 32 35 36 2d 31 2e 31 38 20 7b 53 48 41 32 HA256-1.18 {SHA2
1290: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 56} \..-constrai
12a0: 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 nts SHA256 \..-s
12b0: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 22 etup {set data "
12c0: 54 68 65 20 71 75 69 63 6b 20 62 72 6f 77 6e 20 The quick brown
12d0: 66 6f 78 20 6a 75 6d 70 73 20 6f 76 65 72 20 74 fox jumps over t
12e0: 68 65 20 6c 61 7a 79 20 64 6f 67 22 7d 20 5c 0a he lazy dog"} \.
12f0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 .-body {tls::dig
1300: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 est -digest SHA2
1310: 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 56 -data $data}
1320: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
1330: 2d 72 65 73 75 6c 74 20 64 37 61 38 66 62 62 33 -result d7a8fbb3
1340: 30 37 64 37 38 30 39 34 36 39 63 61 39 61 62 63 07d7809469ca9abc
1350: 62 30 30 38 32 65 34 66 38 64 35 36 35 31 65 34 b0082e4f8d5651e4
1360: 36 64 33 63 64 62 37 36 32 64 30 32 64 30 62 66 6d3cdb762d02d0bf
1370: 33 37 63 39 65 35 39 32 0a 0a 74 63 6c 74 65 73 37c9e592..tcltes
1380: 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 t::test Hash_SHA
1390: 32 35 36 2d 31 2e 31 39 20 7b 53 48 41 32 35 36 256-1.19 {SHA256
13a0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
13b0: 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 s SHA256 \..-set
13c0: 75 70 20 7b 73 65 74 20 64 61 74 61 20 22 61 62 up {set data "ab
13d0: 63 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c c"} \..-body {tl
13e0: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 s::digest -diges
13f0: 74 20 53 48 41 32 35 36 20 2d 64 61 74 61 20 24 t SHA256 -data $
1400: 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 data} \..-match
1410: 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62 61 exact -result ba
1420: 37 38 31 36 62 66 38 66 30 31 63 66 65 61 34 31 7816bf8f01cfea41
1430: 34 31 34 30 64 65 35 64 61 65 32 32 32 33 62 30 4140de5dae2223b0
1440: 30 33 36 31 61 33 39 36 31 37 37 61 39 63 62 34 0361a396177a9cb4
1450: 31 30 66 66 36 31 66 32 30 30 31 35 61 64 0a 0a 10ff61f20015ad..
1460: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 tcltest::test Ha
1470: 73 68 5f 53 48 41 32 35 36 2d 31 2e 32 30 20 7b sh_SHA256-1.20 {
1480: 53 48 41 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 SHA256} \..-cons
1490: 74 72 61 69 6e 74 73 20 53 48 41 32 35 36 20 5c traints SHA256 \
14a0: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 ..-setup {set da
14b0: 74 61 20 22 61 62 63 64 62 63 64 65 63 64 65 66 ta "abcdbcdecdef
14c0: 64 65 66 67 65 66 67 68 66 67 68 69 67 68 69 6a defgefghfghighij
14d0: 68 69 6a 6b 69 6a 6b 6c 6a 6b 6c 6d 6b 6c 6d 6e hijkijkljklmklmn
14e0: 6c 6d 6e 6f 6d 6e 6f 70 6e 6f 70 71 22 7d 20 5c lmnomnopnopq"} \
14f0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 ..-body {tls::di
1500: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 gest -digest SHA
1510: 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 256 -data $data}
1520: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 \..-match exact
1530: 20 2d 72 65 73 75 6c 74 20 32 34 38 64 36 61 36 -result 248d6a6
1540: 31 64 32 30 36 33 38 62 38 65 35 63 30 32 36 39 1d20638b8e5c0269
1550: 33 30 63 33 65 36 30 33 39 61 33 33 63 65 34 35 30c3e6039a33ce45
1560: 39 36 34 66 66 32 31 36 37 66 36 65 63 65 64 64 964ff2167f6ecedd
1570: 34 31 39 64 62 30 36 63 31 0a 0a 74 63 6c 74 65 419db06c1..tclte
1580: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 st::test Hash_SH
1590: 41 32 35 36 2d 31 2e 32 31 20 7b 53 48 41 32 35 A256-1.21 {SHA25
15a0: 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 6} \..-constrain
15b0: 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 ts SHA256 \..-se
15c0: 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 73 tup {set data [s
15d0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 22 61 22 tring repeat "a"
15e0: 20 31 30 30 30 30 30 30 5d 7d 20 5c 0a 09 2d 62 1000000]} \..-b
15f0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 ody {tls::digest
1600: 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 36 20 -digest SHA256
1610: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 -data $data} \..
1620: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
1630: 73 75 6c 74 20 63 64 63 37 36 65 35 63 39 39 31 sult cdc76e5c991
1640: 34 66 62 39 32 38 31 61 31 63 37 65 32 38 34 64 4fb9281a1c7e284d
1650: 37 33 65 36 37 66 31 38 30 39 61 34 38 61 34 39 73e67f1809a48a49
1660: 37 32 30 30 65 30 34 36 64 33 39 63 63 63 37 31 7200e046d39ccc71
1670: 31 32 63 64 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 12cd0..tcltest::
1680: 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 35 36 test Hash_SHA256
1690: 2d 31 2e 32 32 20 7b 53 48 41 32 35 36 7d 20 5c -1.22 {SHA256} \
16a0: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 ..-constraints S
16b0: 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 HA256 \..-setup
16c0: 7b 73 65 74 20 64 61 74 61 20 5b 73 74 72 69 6e {set data [strin
16d0: 67 20 72 65 70 65 61 74 20 22 30 31 32 33 34 35 g repeat "012345
16e0: 36 37 30 31 32 33 34 35 36 37 30 31 32 33 34 35 6701234567012345
16f0: 36 37 30 31 32 33 34 35 36 37 30 31 32 33 34 35 6701234567012345
1700: 36 37 30 31 32 33 34 35 36 37 30 31 32 33 34 35 6701234567012345
1710: 36 37 30 31 32 33 34 35 36 37 22 20 31 30 5d 7d 6701234567" 10]}
1720: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a \..-body {tls::
1730: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 digest -digest S
1740: 48 41 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 HA256 -data $dat
1750: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 a} \..-match exa
1760: 63 74 20 2d 72 65 73 75 6c 74 20 35 39 34 38 34 ct -result 59484
1770: 37 33 32 38 34 35 31 62 64 66 61 38 35 30 35 36 7328451bdfa85056
1780: 32 32 35 34 36 32 63 63 31 64 38 36 37 64 38 37 225462cc1d867d87
1790: 37 66 62 33 38 38 64 66 30 63 65 33 35 66 32 35 7fb388df0ce35f25
17a0: 61 62 35 35 36 32 62 66 62 62 35 0a 0a 74 63 6c ab5562bfbb5..tcl
17b0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f test::test Hash_
17c0: 53 48 41 32 35 36 2d 31 2e 32 33 20 7b 53 48 41 SHA256-1.23 {SHA
17d0: 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 256} \..-constra
17e0: 69 6e 74 73 20 53 48 41 32 35 36 20 5c 0a 09 2d ints SHA256 \..-
17f0: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 setup {set data
1800: 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 [binary decode h
1810: 65 78 20 31 39 5d 7d 20 5c 0a 09 2d 62 6f 64 79 ex 19]} \..-body
1820: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 {tls::digest -d
1830: 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 61 igest SHA256 -da
1840: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
1850: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
1860: 74 20 36 38 61 61 32 65 32 65 65 35 64 66 66 39 t 68aa2e2ee5dff9
1870: 36 65 33 33 35 35 65 36 63 37 65 65 33 37 33 65 6e3355e6c7ee373e
1880: 33 64 36 61 34 65 31 37 66 37 35 66 39 35 31 38 3d6a4e17f75f9518
1890: 64 38 34 33 37 30 39 63 30 63 39 62 63 33 65 33 d843709c0c9bc3e3
18a0: 64 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 d4..tcltest::tes
18b0: 74 20 48 61 73 68 5f 53 48 41 32 35 36 2d 31 2e t Hash_SHA256-1.
18c0: 32 34 20 7b 53 48 41 32 35 36 7d 20 5c 0a 09 2d 24 {SHA256} \..-
18d0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 32 constraints SHA2
18e0: 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 56 \..-setup {se
18f0: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 t data [binary d
1900: 65 63 6f 64 65 20 68 65 78 20 65 33 64 37 32 35 ecode hex e3d725
1910: 37 30 64 63 64 64 37 38 37 63 65 33 38 38 37 61 70dcdd787ce3887a
1920: 62 32 63 64 36 38 34 36 35 32 5d 7d 20 5c 0a 09 b2cd684652]} \..
1930: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 -body {tls::dige
1940: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 32 35 st -digest SHA25
1950: 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 6 -data $data} \
1960: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
1970: 72 65 73 75 6c 74 20 31 37 35 65 65 36 39 62 30 result 175ee69b0
1980: 32 62 61 39 62 35 38 65 32 62 30 61 35 66 64 31 2ba9b58e2b0a5fd1
1990: 33 38 31 39 63 65 61 35 37 33 66 33 39 34 30 61 3819cea573f3940a
19a0: 39 34 66 38 32 35 31 32 38 63 66 34 32 30 39 62 94f825128cf4209b
19b0: 65 61 62 62 34 65 38 0a 0a 74 63 6c 74 65 73 74 eabb4e8..tcltest
19c0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 32 ::test Hash_SHA2
19d0: 35 36 2d 31 2e 32 35 20 7b 53 48 41 32 35 36 7d 56-1.25 {SHA256}
19e0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
19f0: 20 53 48 41 32 35 36 20 5c 0a 09 2d 73 65 74 75 SHA256 \..-setu
1a00: 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e p {set data [bin
1a10: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 ary decode hex 8
1a20: 33 32 36 37 35 34 65 32 32 37 37 33 37 32 66 34 326754e2277372f4
1a30: 66 63 31 32 62 32 30 35 32 37 61 66 65 66 30 34 fc12b20527afef04
1a40: 64 38 61 30 35 36 39 37 31 62 31 31 61 64 35 37 d8a056971b11ad57
1a50: 31 32 33 61 37 63 31 33 37 37 36 30 30 30 30 64 123a7c137760000d
1a60: 37 62 65 66 36 66 33 63 31 66 37 61 39 30 38 33 7bef6f3c1f7a9083
1a70: 61 61 33 39 64 38 31 30 64 62 33 31 30 37 37 37 aa39d810db310777
1a80: 64 61 62 38 62 31 65 37 66 30 32 62 38 34 61 32 dab8b1e7f02b84a2
1a90: 36 63 37 37 33 33 32 35 66 38 62 32 33 37 34 64 6c773325f8b2374d
1aa0: 65 37 61 34 62 35 61 35 38 63 62 35 63 35 63 66 e7a4b5a58cb5c5cf
1ab0: 33 35 62 63 65 65 36 66 62 39 34 36 65 35 62 64 35bcee6fb946e5bd
1ac0: 36 39 34 66 61 35 39 33 61 38 62 65 62 33 66 39 694fa593a8beb3f9
1ad0: 64 36 35 39 32 65 63 65 64 61 61 36 36 63 61 38 d6592ecedaa66ca8
1ae0: 32 61 32 39 64 30 63 35 31 62 63 66 39 33 33 36 2a29d0c51bcf9336
1af0: 32 33 30 65 35 64 37 38 34 65 34 63 30 61 34 33 230e5d784e4c0a43
1b00: 66 38 64 37 39 61 33 30 61 31 36 35 63 62 61 62 f8d79a30a165cbab
1b10: 65 34 35 32 62 37 37 34 62 39 63 37 31 30 39 61 e452b774b9c7109a
1b20: 39 37 64 31 33 38 66 31 32 39 32 32 38 39 36 36 97d138f129228966
1b30: 66 36 63 30 61 64 63 31 30 36 61 61 64 35 61 39 f6c0adc106aad5a9
1b40: 66 64 64 33 30 38 32 35 37 36 39 62 32 63 36 37 fdd30825769b2c67
1b50: 31 61 66 36 37 35 39 64 66 32 38 65 62 33 39 33 1af6759df28eb393
1b60: 64 35 34 64 36 5d 7d 20 5c 0a 09 2d 62 6f 64 79 d54d6]} \..-body
1b70: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 {tls::digest -d
1b80: 69 67 65 73 74 20 53 48 41 32 35 36 20 2d 64 61 igest SHA256 -da
1b90: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
1ba0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
1bb0: 74 20 39 37 64 62 63 61 37 64 66 34 36 64 36 32 t 97dbca7df46d62
1bc0: 63 38 61 34 32 32 63 39 34 31 64 64 37 65 38 33 c8a422c941dd7e83
1bd0: 35 62 38 61 64 33 33 36 31 37 36 33 66 37 65 39 5b8ad3361763f7e9
1be0: 62 32 64 39 35 66 34 66 30 64 61 36 65 31 63 63 b2d95f4f0da6e1cc
1bf0: 62 63 0a 0a bc..