Artifact
9f30df548654dd55c94adbb773bf616522607857b1db6f2b874b42e4cf36a9ea:
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 52 49 50 45 4d 44 31 36 30 from "RIPEMD160
0020: 2e 74 78 74 22 0a 70 61 63 6b 61 67 65 20 72 65 .txt".package re
0030: 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 quire tls.packag
0040: 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 e require tcltes
0050: 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 t..tcltest::test
0060: 43 6f 6e 73 74 72 61 69 6e 74 20 52 49 50 45 4d Constraint RIPEM
0070: 44 31 36 30 20 5b 65 78 70 72 20 7b 5b 6c 73 65 D160 [expr {[lse
0080: 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c arch -nocase [tl
0090: 73 3a 3a 64 69 67 65 73 74 73 5d 20 52 49 50 45 s::digests] RIPE
00a0: 4d 44 31 36 30 5d 20 3e 20 2d 31 7d 5d 0a 0a 74 MD160] > -1}]..t
00b0: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 cltest::test Has
00c0: 68 5f 52 49 50 45 4d 44 31 36 30 2d 31 2e 31 20 h_RIPEMD160-1.1
00d0: 7b 52 49 50 45 4d 44 31 36 30 7d 20 5c 0a 09 2d {RIPEMD160} \..-
00e0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 constraints RIPE
00f0: 4d 44 31 36 30 20 5c 0a 09 2d 73 65 74 75 70 20 MD160 \..-setup
0100: 7b 73 65 74 20 64 61 74 61 20 22 22 7d 20 5c 0a {set data ""} \.
0110: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 .-body {tls::dig
0120: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45 est -digest RIPE
0130: 4d 44 31 36 30 20 2d 64 61 74 61 20 24 64 61 74 MD160 -data $dat
0140: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 a} \..-match exa
0150: 63 74 20 2d 72 65 73 75 6c 74 20 39 63 31 31 38 ct -result 9c118
0160: 35 61 35 63 35 65 39 66 63 35 34 36 31 32 38 30 5a5c5e9fc5461280
0170: 38 39 37 37 65 65 38 66 35 34 38 62 32 32 35 38 8977ee8f548b2258
0180: 64 33 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 d31..tcltest::te
0190: 73 74 20 48 61 73 68 5f 52 49 50 45 4d 44 31 36 st Hash_RIPEMD16
01a0: 30 2d 31 2e 32 20 7b 52 49 50 45 4d 44 31 36 30 0-1.2 {RIPEMD160
01b0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
01c0: 73 20 52 49 50 45 4d 44 31 36 30 20 5c 0a 09 2d s RIPEMD160 \..-
01d0: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 setup {set data
01e0: 22 61 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 "a"} \..-body {t
01f0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 ls::digest -dige
0200: 73 74 20 52 49 50 45 4d 44 31 36 30 20 2d 64 61 st RIPEMD160 -da
0210: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 ta $data} \..-ma
0220: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0230: 74 20 30 62 64 63 39 64 32 64 32 35 36 62 33 65 t 0bdc9d2d256b3e
0240: 65 39 64 61 61 65 33 34 37 62 65 36 66 34 64 63 e9daae347be6f4dc
0250: 38 33 35 61 34 36 37 66 66 65 0a 0a 74 63 6c 74 835a467ffe..tclt
0260: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 est::test Hash_R
0270: 49 50 45 4d 44 31 36 30 2d 31 2e 33 20 7b 52 49 IPEMD160-1.3 {RI
0280: 50 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f 6e PEMD160} \..-con
0290: 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44 31 straints RIPEMD1
02a0: 36 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 60 \..-setup {se
02b0: 74 20 64 61 74 61 20 22 61 62 63 22 7d 20 5c 0a t data "abc"} \.
02c0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 .-body {tls::dig
02d0: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45 est -digest RIPE
02e0: 4d 44 31 36 30 20 2d 64 61 74 61 20 24 64 61 74 MD160 -data $dat
02f0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 a} \..-match exa
0300: 63 74 20 2d 72 65 73 75 6c 74 20 38 65 62 32 30 ct -result 8eb20
0310: 38 66 37 65 30 35 64 39 38 37 61 39 62 30 34 34 8f7e05d987a9b044
0320: 61 38 65 39 38 63 36 62 30 38 37 66 31 35 61 30 a8e98c6b087f15a0
0330: 62 66 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 bfc..tcltest::te
0340: 73 74 20 48 61 73 68 5f 52 49 50 45 4d 44 31 36 st Hash_RIPEMD16
0350: 30 2d 31 2e 34 20 7b 52 49 50 45 4d 44 31 36 30 0-1.4 {RIPEMD160
0360: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0370: 73 20 52 49 50 45 4d 44 31 36 30 20 5c 0a 09 2d s RIPEMD160 \..-
0380: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 setup {set data
0390: 22 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 22 "message digest"
03a0: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a } \..-body {tls:
03b0: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 :digest -digest
03c0: 52 49 50 45 4d 44 31 36 30 20 2d 64 61 74 61 20 RIPEMD160 -data
03d0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 $data} \..-match
03e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35 exact -result 5
03f0: 64 30 36 38 39 65 66 34 39 64 32 66 61 65 35 37 d0689ef49d2fae57
0400: 32 62 38 38 31 62 31 32 33 61 38 35 66 66 61 32 2b881b123a85ffa2
0410: 31 35 39 35 66 33 36 0a 0a 74 63 6c 74 65 73 74 1595f36..tcltest
0420: 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 49 50 45 ::test Hash_RIPE
0430: 4d 44 31 36 30 2d 31 2e 35 20 7b 52 49 50 45 4d MD160-1.5 {RIPEM
0440: 44 31 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 D160} \..-constr
0450: 61 69 6e 74 73 20 52 49 50 45 4d 44 31 36 30 20 aints RIPEMD160
0460: 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 \..-setup {set d
0470: 61 74 61 20 22 61 62 63 64 65 66 67 68 69 6a 6b ata "abcdefghijk
0480: 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22 lmnopqrstuvwxyz"
0490: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a } \..-body {tls:
04a0: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 :digest -digest
04b0: 52 49 50 45 4d 44 31 36 30 20 2d 64 61 74 61 20 RIPEMD160 -data
04c0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 $data} \..-match
04d0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66 exact -result f
04e0: 37 31 63 32 37 31 30 39 63 36 39 32 63 31 62 35 71c27109c692c1b5
04f0: 36 62 62 64 63 65 62 35 62 39 64 32 38 36 35 62 6bbdceb5b9d2865b
0500: 33 37 30 38 64 62 63 0a 0a 74 63 6c 74 65 73 74 3708dbc..tcltest
0510: 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 49 50 45 ::test Hash_RIPE
0520: 4d 44 31 36 30 2d 31 2e 36 20 7b 52 49 50 45 4d MD160-1.6 {RIPEM
0530: 44 31 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 D160} \..-constr
0540: 61 69 6e 74 73 20 52 49 50 45 4d 44 31 36 30 20 aints RIPEMD160
0550: 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 \..-setup {set d
0560: 61 74 61 20 22 61 62 63 64 62 63 64 65 63 64 65 ata "abcdbcdecde
0570: 66 64 65 66 67 65 66 67 68 66 67 68 69 67 68 69 fdefgefghfghighi
0580: 6a 68 69 6a 6b 69 6a 6b 6c 6a 6b 6c 6d 6b 6c 6d jhijkijkljklmklm
0590: 6e 6c 6d 6e 6f 6d 6e 6f 70 6e 6f 70 71 22 7d 20 nlmnomnopnopq"}
05a0: 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 \..-body {tls::d
05b0: 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 igest -digest RI
05c0: 50 45 4d 44 31 36 30 20 2d 64 61 74 61 20 24 64 PEMD160 -data $d
05d0: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 ata} \..-match e
05e0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31 32 61 xact -result 12a
05f0: 30 35 33 33 38 34 61 39 63 30 63 38 38 65 34 30 053384a9c0c88e40
0600: 35 61 30 36 63 32 37 64 63 66 34 39 61 64 61 36 5a06c27dcf49ada6
0610: 32 65 62 32 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 2eb2b..tcltest::
0620: 74 65 73 74 20 48 61 73 68 5f 52 49 50 45 4d 44 test Hash_RIPEMD
0630: 31 36 30 2d 31 2e 37 20 7b 52 49 50 45 4d 44 31 160-1.7 {RIPEMD1
0640: 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 60} \..-constrai
0650: 6e 74 73 20 52 49 50 45 4d 44 31 36 30 20 5c 0a nts RIPEMD160 \.
0660: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 .-setup {set dat
0670: 61 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d a "ABCDEFGHIJKLM
0680: 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 61 62 63 NOPQRSTUVWXYZabc
0690: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 defghijklmnopqrs
06a0: 74 75 76 77 78 79 7a 30 31 32 33 34 35 36 37 38 tuvwxyz012345678
06b0: 39 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 9"} \..-body {tl
06c0: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 s::digest -diges
06d0: 74 20 52 49 50 45 4d 44 31 36 30 20 2d 64 61 74 t RIPEMD160 -dat
06e0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 a $data} \..-mat
06f0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 ch exact -result
0700: 20 62 30 65 32 30 62 36 65 33 31 31 36 36 34 30 b0e20b6e3116640
0710: 32 38 36 65 64 33 61 38 37 61 35 37 31 33 30 37 286ed3a87a571307
0720: 39 62 32 31 66 35 31 38 39 0a 0a 74 63 6c 74 65 9b21f5189..tclte
0730: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 49 st::test Hash_RI
0740: 50 45 4d 44 31 36 30 2d 31 2e 38 20 7b 52 49 50 PEMD160-1.8 {RIP
0750: 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 EMD160} \..-cons
0760: 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44 31 36 traints RIPEMD16
0770: 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 0 \..-setup {set
0780: 20 64 61 74 61 20 22 31 32 33 34 35 36 37 38 39 data "123456789
0790: 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 0123456789012345
07a0: 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 6789012345678901
07b0: 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 2345678901234567
07c0: 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 8901234567890123
07d0: 34 35 36 37 38 39 30 22 7d 20 5c 0a 09 2d 62 6f 4567890"} \..-bo
07e0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 dy {tls::digest
07f0: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 -digest RIPEMD16
0800: 30 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0 -data $data} \
0810: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
0820: 72 65 73 75 6c 74 20 39 62 37 35 32 65 34 35 35 result 9b752e455
0830: 37 33 64 34 62 33 39 66 34 64 62 64 33 33 32 33 73d4b39f4dbd3323
0840: 63 61 62 38 32 62 66 36 33 33 32 36 62 66 62 0a cab82bf63326bfb.
0850: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 .tcltest::test H
0860: 61 73 68 5f 52 49 50 45 4d 44 31 36 30 2d 31 2e ash_RIPEMD160-1.
0870: 39 20 7b 52 49 50 45 4d 44 31 36 30 7d 20 5c 0a 9 {RIPEMD160} \.
0880: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49 .-constraints RI
0890: 50 45 4d 44 31 36 30 20 5c 0a 09 2d 73 65 74 75 PEMD160 \..-setu
08a0: 70 20 7b 73 65 74 20 64 61 74 61 20 5b 73 74 72 p {set data [str
08b0: 69 6e 67 20 72 65 70 65 61 74 20 22 61 22 20 31 ing repeat "a" 1
08c0: 30 30 30 30 30 30 5d 7d 20 5c 0a 09 2d 62 6f 64 000000]} \..-bod
08d0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d y {tls::digest -
08e0: 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 30 digest RIPEMD160
08f0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a -data $data} \.
0900: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0910: 65 73 75 6c 74 20 35 32 37 38 33 32 34 33 63 31 esult 52783243c1
0920: 36 39 37 62 64 62 65 31 36 64 33 37 66 39 37 66 697bdbe16d37f97f
0930: 36 38 66 30 38 33 32 35 64 63 31 35 32 38 0a 0a 68f08325dc1528..
0940: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 tcltest::test Ha
0950: 73 68 5f 52 49 50 45 4d 44 31 36 30 2d 31 2e 31 sh_RIPEMD160-1.1
0960: 30 20 7b 52 49 50 45 4d 44 31 36 30 7d 20 5c 0a 0 {RIPEMD160} \.
0970: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49 .-constraints RI
0980: 50 45 4d 44 31 36 30 20 5c 0a 09 2d 73 65 74 75 PEMD160 \..-setu
0990: 70 20 7b 73 65 74 20 64 61 74 61 20 22 54 68 65 p {set data "The
09a0: 20 71 75 69 63 6b 20 62 72 6f 77 6e 20 66 6f 78 quick brown fox
09b0: 20 6a 75 6d 70 73 20 6f 76 65 72 20 74 68 65 20 jumps over the
09c0: 6c 61 7a 79 20 64 6f 67 22 7d 20 5c 0a 09 2d 62 lazy dog"} \..-b
09d0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 ody {tls::digest
09e0: 20 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 -digest RIPEMD1
09f0: 36 30 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 60 -data $data}
0a00: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0a10: 2d 72 65 73 75 6c 74 20 33 37 66 33 33 32 66 36 -result 37f332f6
0a20: 38 64 62 37 37 62 64 39 64 37 65 64 64 34 39 36 8db77bd9d7edd496
0a30: 39 35 37 31 61 64 36 37 31 63 66 39 64 64 33 62 9571ad671cf9dd3b
0a40: 0a 0a ..