Hex Artifact Content

Artifact fe9e7cfcb54bf051674ed9d583ada0b1e67714756f8c6e22cd316d9fc56d255c:


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 33 32 30   from "RIPEMD320
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 33 32 30 20 5b 65 78 70 72 20 7b 5b 6c 73 65  D320 [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 33 32 30 5d 20 3e 20 2d 31 7d 5d 0a 0a 74  MD320] > -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 33 32 30 2d 31 2e 31 20  h_RIPEMD320-1.1 
00d0: 7b 52 49 50 45 4d 44 33 32 30 7d 20 5c 0a 09 2d  {RIPEMD320} \..-
00e0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45  constraints RIPE
00f0: 4d 44 33 32 30 20 5c 0a 09 2d 73 65 74 75 70 20  MD320 \..-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 33 32 30 20 2d 64 61 74 61 20 24 64 61 74  MD320 -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 32 32 64 36 35  ct -result 22d65
0160: 64 35 36 36 31 35 33 36 63 64 63 37 35 63 31 66  d5661536cdc75c1f
0170: 64 66 35 63 36 64 65 37 62 34 31 62 39 66 32 37  df5c6de7b41b9f27
0180: 33 32 35 65 62 63 36 31 65 38 35 35 37 31 37 37  325ebc61e8557177
0190: 64 37 30 35 61 30 65 63 38 38 30 31 35 31 63 33  d705a0ec880151c3
01a0: 61 33 32 61 30 30 38 39 39 62 38 0a 0a 74 63 6c  a32a00899b8..tcl
01b0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
01c0: 52 49 50 45 4d 44 33 32 30 2d 31 2e 32 20 7b 52  RIPEMD320-1.2 {R
01d0: 49 50 45 4d 44 33 32 30 7d 20 5c 0a 09 2d 63 6f  IPEMD320} \..-co
01e0: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
01f0: 33 32 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  320 \..-setup {s
0200: 65 74 20 64 61 74 61 20 22 61 22 7d 20 5c 0a 09  et data "a"} \..
0210: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
0220: 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45 4d  st -digest RIPEM
0230: 44 33 32 30 20 2d 64 61 74 61 20 24 64 61 74 61  D320 -data $data
0240: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0250: 74 20 2d 72 65 73 75 6c 74 20 63 65 37 38 38 35  t -result ce7885
0260: 30 36 33 38 66 39 32 36 35 38 61 35 61 35 38 35  0638f92658a5a585
0270: 30 39 37 35 37 39 39 32 36 64 64 61 36 36 37 61  097579926dda667a
0280: 35 37 31 36 35 36 32 63 66 63 66 36 66 62 65 37  5716562cfcf6fbe7
0290: 37 66 36 33 35 34 32 66 39 39 62 30 34 37 30 35  7f63542f99b04705
02a0: 64 36 39 37 30 64 66 66 35 64 0a 0a 74 63 6c 74  d6970dff5d..tclt
02b0: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 52  est::test Hash_R
02c0: 49 50 45 4d 44 33 32 30 2d 31 2e 33 20 7b 52 49  IPEMD320-1.3 {RI
02d0: 50 45 4d 44 33 32 30 7d 20 5c 0a 09 2d 63 6f 6e  PEMD320} \..-con
02e0: 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44 33  straints RIPEMD3
02f0: 32 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  20 \..-setup {se
0300: 74 20 64 61 74 61 20 22 61 62 63 22 7d 20 5c 0a  t data "abc"} \.
0310: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
0320: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45  est -digest RIPE
0330: 4d 44 33 32 30 20 2d 64 61 74 61 20 24 64 61 74  MD320 -data $dat
0340: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
0350: 63 74 20 2d 72 65 73 75 6c 74 20 64 65 34 63 30  ct -result de4c0
0360: 31 62 33 30 35 34 66 38 39 33 30 61 37 39 64 30  1b3054f8930a79d0
0370: 39 61 65 37 33 38 65 39 32 33 30 31 65 35 61 31  9ae738e92301e5a1
0380: 37 30 38 35 62 65 66 66 64 63 31 62 38 64 31 31  7085beffdc1b8d11
0390: 36 37 31 33 65 37 34 66 38 32 66 61 39 34 32 64  6713e74f82fa942d
03a0: 36 34 63 64 62 63 34 36 38 32 64 0a 0a 74 63 6c  64cdbc4682d..tcl
03b0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
03c0: 52 49 50 45 4d 44 33 32 30 2d 31 2e 34 20 7b 52  RIPEMD320-1.4 {R
03d0: 49 50 45 4d 44 33 32 30 7d 20 5c 0a 09 2d 63 6f  IPEMD320} \..-co
03e0: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
03f0: 33 32 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  320 \..-setup {s
0400: 65 74 20 64 61 74 61 20 22 6d 65 73 73 61 67 65  et data "message
0410: 20 64 69 67 65 73 74 22 7d 20 5c 0a 09 2d 62 6f   digest"} \..-bo
0420: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
0430: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 33 32  -digest RIPEMD32
0440: 30 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  0 -data $data} \
0450: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0460: 72 65 73 75 6c 74 20 33 61 38 65 32 38 35 30 32  result 3a8e28502
0470: 65 64 34 35 64 34 32 32 66 36 38 38 34 34 66 39  ed45d422f68844f9
0480: 64 64 33 31 36 65 37 62 39 38 35 33 33 66 61 33  dd316e7b98533fa3
0490: 66 32 61 39 31 64 32 39 66 38 34 64 34 32 35 63  f2a91d29f84d425c
04a0: 38 38 64 36 62 34 65 66 66 37 32 37 64 66 36 36  88d6b4eff727df66
04b0: 61 37 63 30 31 39 37 0a 0a 74 63 6c 74 65 73 74  a7c0197..tcltest
04c0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 49 50 45  ::test Hash_RIPE
04d0: 4d 44 33 32 30 2d 31 2e 35 20 7b 52 49 50 45 4d  MD320-1.5 {RIPEM
04e0: 44 33 32 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  D320} \..-constr
04f0: 61 69 6e 74 73 20 52 49 50 45 4d 44 33 32 30 20  aints RIPEMD320 
0500: 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64  \..-setup {set d
0510: 61 74 61 20 22 61 62 63 64 65 66 67 68 69 6a 6b  ata "abcdefghijk
0520: 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22  lmnopqrstuvwxyz"
0530: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a  } \..-body {tls:
0540: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20  :digest -digest 
0550: 52 49 50 45 4d 44 33 32 30 20 2d 64 61 74 61 20  RIPEMD320 -data 
0560: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
0570: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63   exact -result c
0580: 61 62 64 62 31 38 31 30 62 39 32 34 37 30 61 32  abdb1810b92470a2
0590: 30 39 33 61 61 36 62 63 65 30 35 39 35 32 63 32  093aa6bce05952c2
05a0: 38 33 34 38 63 66 34 33 66 66 36 30 38 34 31 39  8348cf43ff608419
05b0: 37 35 31 36 36 62 62 34 30 65 64 32 33 34 30 30  75166bb40ed23400
05c0: 34 62 38 38 32 34 34 36 33 65 36 62 30 30 39 0a  4b8824463e6b009.
05d0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
05e0: 61 73 68 5f 52 49 50 45 4d 44 33 32 30 2d 31 2e  ash_RIPEMD320-1.
05f0: 36 20 7b 52 49 50 45 4d 44 33 32 30 7d 20 5c 0a  6 {RIPEMD320} \.
0600: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49  .-constraints RI
0610: 50 45 4d 44 33 32 30 20 5c 0a 09 2d 73 65 74 75  PEMD320 \..-setu
0620: 70 20 7b 73 65 74 20 64 61 74 61 20 22 61 62 63  p {set data "abc
0630: 64 62 63 64 65 63 64 65 66 64 65 66 67 65 66 67  dbcdecdefdefgefg
0640: 68 66 67 68 69 67 68 69 6a 68 69 6a 6b 69 6a 6b  hfghighijhijkijk
0650: 6c 6a 6b 6c 6d 6b 6c 6d 6e 6c 6d 6e 6f 6d 6e 6f  ljklmklmnlmnomno
0660: 70 6e 6f 70 71 22 7d 20 5c 0a 09 2d 62 6f 64 79  pnopq"} \..-body
0670: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64   {tls::digest -d
0680: 69 67 65 73 74 20 52 49 50 45 4d 44 33 32 30 20  igest RIPEMD320 
0690: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
06a0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
06b0: 73 75 6c 74 20 64 30 33 34 61 37 39 35 30 63 66  sult d034a7950cf
06c0: 37 32 32 30 32 31 62 61 34 62 38 34 64 66 37 36  722021ba4b84df76
06d0: 39 61 35 64 65 32 30 36 30 65 32 35 39 64 66 34  9a5de2060e259df4
06e0: 63 39 62 62 34 61 34 32 36 38 63 30 65 39 33 35  c9bb4a4268c0e935
06f0: 62 62 63 37 34 37 30 61 39 36 39 63 39 64 30 37  bbc7470a969c9d07
0700: 32 61 31 61 63 0a 0a 74 63 6c 74 65 73 74 3a 3a  2a1ac..tcltest::
0710: 74 65 73 74 20 48 61 73 68 5f 52 49 50 45 4d 44  test Hash_RIPEMD
0720: 33 32 30 2d 31 2e 37 20 7b 52 49 50 45 4d 44 33  320-1.7 {RIPEMD3
0730: 32 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  20} \..-constrai
0740: 6e 74 73 20 52 49 50 45 4d 44 33 32 30 20 5c 0a  nts RIPEMD320 \.
0750: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
0760: 61 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d  a "ABCDEFGHIJKLM
0770: 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 61 62 63  NOPQRSTUVWXYZabc
0780: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
0790: 74 75 76 77 78 79 7a 30 31 32 33 34 35 36 37 38  tuvwxyz012345678
07a0: 39 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c  9"} \..-body {tl
07b0: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73  s::digest -diges
07c0: 74 20 52 49 50 45 4d 44 33 32 30 20 2d 64 61 74  t RIPEMD320 -dat
07d0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
07e0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
07f0: 20 65 64 35 34 34 39 34 30 63 38 36 64 36 37 66   ed544940c86d67f
0800: 32 35 30 64 32 33 32 63 33 30 62 37 62 33 65 35  250d232c30b7b3e5
0810: 37 37 30 65 30 63 36 30 63 38 63 62 39 61 34 63  770e0c60c8cb9a4c
0820: 61 66 65 33 62 31 31 33 38 38 61 66 39 39 32 30  afe3b11388af9920
0830: 65 31 62 39 39 32 33 30 62 38 34 33 63 38 36 61  e1b99230b843c86a
0840: 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  4..tcltest::test
0850: 20 48 61 73 68 5f 52 49 50 45 4d 44 33 32 30 2d   Hash_RIPEMD320-
0860: 31 2e 38 20 7b 52 49 50 45 4d 44 33 32 30 7d 20  1.8 {RIPEMD320} 
0870: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
0880: 52 49 50 45 4d 44 33 32 30 20 5c 0a 09 2d 73 65  RIPEMD320 \..-se
0890: 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 73  tup {set data [s
08a0: 74 72 69 6e 67 20 72 65 70 65 61 74 20 22 31 32  tring repeat "12
08b0: 33 34 35 36 37 38 39 30 22 20 38 5d 7d 20 5c 0a  34567890" 8]} \.
08c0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
08d0: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45  est -digest RIPE
08e0: 4d 44 33 32 30 20 2d 64 61 74 61 20 24 64 61 74  MD320 -data $dat
08f0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
0900: 63 74 20 2d 72 65 73 75 6c 74 20 35 35 37 38 38  ct -result 55788
0910: 38 61 66 35 66 36 64 38 65 64 36 32 61 62 36 36  8af5f6d8ed62ab66
0920: 39 34 35 63 36 64 32 61 30 61 34 37 65 63 64 35  945c6d2a0a47ecd5
0930: 33 34 31 65 39 31 35 65 62 38 66 65 61 31 64 30  341e915eb8fea1d0
0940: 35 32 34 39 35 35 66 38 32 35 64 63 37 31 37 65  524955f825dc717e
0950: 34 61 30 30 38 61 62 32 64 34 32 0a 0a 74 63 6c  4a008ab2d42..tcl
0960: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
0970: 52 49 50 45 4d 44 33 32 30 2d 31 2e 39 20 7b 52  RIPEMD320-1.9 {R
0980: 49 50 45 4d 44 33 32 30 7d 20 5c 0a 09 2d 63 6f  IPEMD320} \..-co
0990: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
09a0: 33 32 30 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  320 \..-setup {s
09b0: 65 74 20 64 61 74 61 20 5b 73 74 72 69 6e 67 20  et data [string 
09c0: 72 65 70 65 61 74 20 22 61 22 20 31 30 30 30 30  repeat "a" 10000
09d0: 30 30 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  00]} \..-body {t
09e0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
09f0: 73 74 20 52 49 50 45 4d 44 33 32 30 20 2d 64 61  st RIPEMD320 -da
0a00: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61  ta $data} \..-ma
0a10: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0a20: 74 20 62 64 65 65 33 37 66 34 33 37 31 65 32 30  t bdee37f4371e20
0a30: 36 34 36 62 38 62 30 64 38 36 32 64 64 61 31 36  646b8b0d862dda16
0a40: 32 39 32 61 65 33 36 66 34 30 39 36 35 65 38 63  292ae36f40965e8c
0a50: 38 35 30 39 65 36 33 64 31 64 62 64 64 65 63 63  8509e63d1dbddecc
0a60: 35 30 33 65 32 62 36 33 65 62 39 32 34 35 62 62  503e2b63eb9245bb
0a70: 36 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  66..tcltest::tes
0a80: 74 20 48 61 73 68 5f 52 49 50 45 4d 44 33 32 30  t Hash_RIPEMD320
0a90: 2d 31 2e 31 30 20 7b 52 49 50 45 4d 44 33 32 30  -1.10 {RIPEMD320
0aa0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
0ab0: 73 20 52 49 50 45 4d 44 33 32 30 20 5c 0a 09 2d  s RIPEMD320 \..-
0ac0: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20  setup {set data 
0ad0: 22 54 68 65 20 71 75 69 63 6b 20 62 72 6f 77 6e  "The quick brown
0ae0: 20 66 6f 78 20 6a 75 6d 70 73 20 6f 76 65 72 20   fox jumps over 
0af0: 74 68 65 20 6c 61 7a 79 20 64 6f 67 22 7d 20 5c  the lazy dog"} \
0b00: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
0b10: 67 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50  gest -digest RIP
0b20: 45 4d 44 33 32 30 20 2d 64 61 74 61 20 24 64 61  EMD320 -data $da
0b30: 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  ta} \..-match ex
0b40: 61 63 74 20 2d 72 65 73 75 6c 74 20 65 37 36 36  act -result e766
0b50: 30 65 36 37 35 34 39 34 33 35 63 36 32 31 34 31  0e67549435c62141
0b60: 65 35 31 63 39 61 62 31 64 63 63 33 62 31 65 65  e51c9ab1dcc3b1ee
0b70: 39 66 36 35 63 30 62 33 65 35 36 31 61 65 38 66  9f65c0b3e561ae8f
0b80: 35 38 63 35 64 62 61 33 64 32 31 39 39 37 37 38  58c5dba3d2199778
0b90: 31 63 64 31 63 63 36 66 62 63 33 34 0a 0a 23 20  1cd1cc6fbc34..# 
0ba0: 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73  Cleanup.::tcltes
0bb0: 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 0a  t::cleanupTests.
0bc0: 72 65 74 75 72 6e 0a                             return.