Hex Artifact Content

Artifact 95937b3173dbcacbdea4b3b8b5ef39d9dd1b38026bef0911a46f491484913ab8:


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 32 35 36   from "RIPEMD256
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 32 35 36 20 5b 65 78 70 72 20 7b 5b 6c 73 65  D256 [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 32 35 36 5d 20 3e 20 2d 31 7d 5d 0a 0a 74  MD256] > -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 32 35 36 2d 31 2e 31 20  h_RIPEMD256-1.1 
00d0: 7b 52 49 50 45 4d 44 32 35 36 7d 20 5c 0a 09 2d  {RIPEMD256} \..-
00e0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45  constraints RIPE
00f0: 4d 44 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20  MD256 \..-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 32 35 36 20 2d 64 61 74 61 20 24 64 61 74  MD256 -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 30 32 62 61 34  ct -result 02ba4
0160: 63 34 65 35 66 38 65 63 64 31 38 37 37 66 63 35  c4e5f8ecd1877fc5
0170: 32 64 36 34 64 33 30 65 33 37 61 32 64 39 37 37  2d64d30e37a2d977
0180: 34 66 62 31 65 35 64 30 32 36 33 38 30 61 65 30  4fb1e5d026380ae0
0190: 31 36 38 65 33 63 35 35 32 32 64 0a 0a 74 63 6c  168e3c5522d..tcl
01a0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
01b0: 52 49 50 45 4d 44 32 35 36 2d 31 2e 32 20 7b 52  RIPEMD256-1.2 {R
01c0: 49 50 45 4d 44 32 35 36 7d 20 5c 0a 09 2d 63 6f  IPEMD256} \..-co
01d0: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
01e0: 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  256 \..-setup {s
01f0: 65 74 20 64 61 74 61 20 22 61 22 7d 20 5c 0a 09  et data "a"} \..
0200: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
0210: 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45 4d  st -digest RIPEM
0220: 44 32 35 36 20 2d 64 61 74 61 20 24 64 61 74 61  D256 -data $data
0230: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0240: 74 20 2d 72 65 73 75 6c 74 20 66 39 33 33 33 65  t -result f9333e
0250: 34 35 64 38 35 37 66 35 64 39 30 61 39 31 62 61  45d857f5d90a91ba
0260: 62 37 30 61 31 65 62 61 30 63 66 62 31 62 65 34  b70a1eba0cfb1be4
0270: 62 30 37 38 33 63 39 61 63 66 63 64 38 38 33 61  b0783c9acfcd883a
0280: 39 31 33 34 36 39 32 39 32 35 0a 0a 74 63 6c 74  9134692925..tclt
0290: 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 52  est::test Hash_R
02a0: 49 50 45 4d 44 32 35 36 2d 31 2e 33 20 7b 52 49  IPEMD256-1.3 {RI
02b0: 50 45 4d 44 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e  PEMD256} \..-con
02c0: 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44 32  straints RIPEMD2
02d0: 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  56 \..-setup {se
02e0: 74 20 64 61 74 61 20 22 61 62 63 22 7d 20 5c 0a  t data "abc"} \.
02f0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
0300: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45  est -digest RIPE
0310: 4d 44 32 35 36 20 2d 64 61 74 61 20 24 64 61 74  MD256 -data $dat
0320: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
0330: 63 74 20 2d 72 65 73 75 6c 74 20 61 66 62 64 36  ct -result afbd6
0340: 65 32 32 38 62 39 64 38 63 62 62 63 65 66 35 63  e228b9d8cbbcef5c
0350: 61 32 64 30 33 65 36 64 62 61 31 30 61 63 30 62  a2d03e6dba10ac0b
0360: 63 37 64 63 62 65 34 36 38 30 65 31 65 34 32 64  c7dcbe4680e1e42d
0370: 32 65 39 37 35 34 35 39 62 36 35 0a 0a 74 63 6c  2e975459b65..tcl
0380: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
0390: 52 49 50 45 4d 44 32 35 36 2d 31 2e 34 20 7b 52  RIPEMD256-1.4 {R
03a0: 49 50 45 4d 44 32 35 36 7d 20 5c 0a 09 2d 63 6f  IPEMD256} \..-co
03b0: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
03c0: 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  256 \..-setup {s
03d0: 65 74 20 64 61 74 61 20 22 6d 65 73 73 61 67 65  et data "message
03e0: 20 64 69 67 65 73 74 22 7d 20 5c 0a 09 2d 62 6f   digest"} \..-bo
03f0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
0400: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 32 35  -digest RIPEMD25
0410: 36 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  6 -data $data} \
0420: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0430: 72 65 73 75 6c 74 20 38 37 65 39 37 31 37 35 39  result 87e971759
0440: 61 31 63 65 34 37 61 35 31 34 64 35 63 39 31 34  a1ce47a514d5c914
0450: 63 33 39 32 63 39 30 31 38 63 37 63 34 36 62 63  c392c9018c7c46bc
0460: 31 34 34 36 35 35 35 34 61 66 63 64 66 35 34 61  14465554afcdf54a
0470: 35 30 37 30 63 30 65 0a 0a 74 63 6c 74 65 73 74  5070c0e..tcltest
0480: 3a 3a 74 65 73 74 20 48 61 73 68 5f 52 49 50 45  ::test Hash_RIPE
0490: 4d 44 32 35 36 2d 31 2e 35 20 7b 52 49 50 45 4d  MD256-1.5 {RIPEM
04a0: 44 32 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  D256} \..-constr
04b0: 61 69 6e 74 73 20 52 49 50 45 4d 44 32 35 36 20  aints RIPEMD256 
04c0: 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64  \..-setup {set d
04d0: 61 74 61 20 22 61 62 63 64 65 66 67 68 69 6a 6b  ata "abcdefghijk
04e0: 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22  lmnopqrstuvwxyz"
04f0: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a  } \..-body {tls:
0500: 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20  :digest -digest 
0510: 52 49 50 45 4d 44 32 35 36 20 2d 64 61 74 61 20  RIPEMD256 -data 
0520: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
0530: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
0540: 34 39 64 33 30 33 34 37 35 31 65 61 32 31 36 37  49d3034751ea2167
0550: 37 36 62 66 39 61 31 38 61 63 63 38 31 62 63 37  76bf9a18acc81bc7
0560: 38 39 36 31 31 38 61 35 31 39 37 39 36 38 37 38  896118a519796878
0570: 32 64 64 31 66 64 39 37 64 38 64 35 31 33 33 0a  2dd1fd97d8d5133.
0580: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
0590: 61 73 68 5f 52 49 50 45 4d 44 32 35 36 2d 31 2e  ash_RIPEMD256-1.
05a0: 36 20 7b 52 49 50 45 4d 44 32 35 36 7d 20 5c 0a  6 {RIPEMD256} \.
05b0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 52 49  .-constraints RI
05c0: 50 45 4d 44 32 35 36 20 5c 0a 09 2d 73 65 74 75  PEMD256 \..-setu
05d0: 70 20 7b 73 65 74 20 64 61 74 61 20 22 61 62 63  p {set data "abc
05e0: 64 62 63 64 65 63 64 65 66 64 65 66 67 65 66 67  dbcdecdefdefgefg
05f0: 68 66 67 68 69 67 68 69 6a 68 69 6a 6b 69 6a 6b  hfghighijhijkijk
0600: 6c 6a 6b 6c 6d 6b 6c 6d 6e 6c 6d 6e 6f 6d 6e 6f  ljklmklmnlmnomno
0610: 70 6e 6f 70 71 22 7d 20 5c 0a 09 2d 62 6f 64 79  pnopq"} \..-body
0620: 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64   {tls::digest -d
0630: 69 67 65 73 74 20 52 49 50 45 4d 44 32 35 36 20  igest RIPEMD256 
0640: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
0650: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
0660: 73 75 6c 74 20 33 38 34 33 30 34 35 35 38 33 61  sult 3843045583a
0670: 61 63 36 63 38 63 38 64 39 31 32 38 35 37 33 65  ac6c8c8d9128573e
0680: 37 61 39 38 30 39 61 66 62 32 61 30 66 33 34 63  7a9809afb2a0f34c
0690: 63 63 33 36 65 61 39 65 37 32 66 31 36 66 36 33  cc36ea9e72f16f63
06a0: 36 38 65 33 66 0a 0a 74 63 6c 74 65 73 74 3a 3a  68e3f..tcltest::
06b0: 74 65 73 74 20 48 61 73 68 5f 52 49 50 45 4d 44  test Hash_RIPEMD
06c0: 32 35 36 2d 31 2e 37 20 7b 52 49 50 45 4d 44 32  256-1.7 {RIPEMD2
06d0: 35 36 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  56} \..-constrai
06e0: 6e 74 73 20 52 49 50 45 4d 44 32 35 36 20 5c 0a  nts RIPEMD256 \.
06f0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
0700: 61 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d  a "ABCDEFGHIJKLM
0710: 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 61 62 63  NOPQRSTUVWXYZabc
0720: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
0730: 74 75 76 77 78 79 7a 30 31 32 33 34 35 36 37 38  tuvwxyz012345678
0740: 39 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c  9"} \..-body {tl
0750: 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73  s::digest -diges
0760: 74 20 52 49 50 45 4d 44 32 35 36 20 2d 64 61 74  t RIPEMD256 -dat
0770: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
0780: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0790: 20 35 37 34 30 61 34 30 38 61 63 31 36 62 37 32   5740a408ac16b72
07a0: 30 62 38 34 34 32 34 61 65 39 33 31 63 62 62 31  0b84424ae931cbb1
07b0: 66 65 33 36 33 64 31 64 30 62 66 34 30 31 37 66  fe363d1d0bf4017f
07c0: 31 61 38 39 66 37 65 61 36 64 65 37 37 61 30 62  1a89f7ea6de77a0b
07d0: 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  8..tcltest::test
07e0: 20 48 61 73 68 5f 52 49 50 45 4d 44 32 35 36 2d   Hash_RIPEMD256-
07f0: 31 2e 38 20 7b 52 49 50 45 4d 44 32 35 36 7d 20  1.8 {RIPEMD256} 
0800: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
0810: 52 49 50 45 4d 44 32 35 36 20 5c 0a 09 2d 73 65  RIPEMD256 \..-se
0820: 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 73  tup {set data [s
0830: 74 72 69 6e 67 20 72 65 70 65 61 74 20 22 31 32  tring repeat "12
0840: 33 34 35 36 37 38 39 30 22 20 38 5d 7d 20 5c 0a  34567890" 8]} \.
0850: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
0860: 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50 45  est -digest RIPE
0870: 4d 44 32 35 36 20 2d 64 61 74 61 20 24 64 61 74  MD256 -data $dat
0880: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
0890: 63 74 20 2d 72 65 73 75 6c 74 20 30 36 66 64 63  ct -result 06fdc
08a0: 63 37 61 34 30 39 35 34 38 61 61 66 39 31 33 36  c7a409548aaf9136
08b0: 38 63 30 36 61 36 32 37 35 62 35 35 33 65 33 66  8c06a6275b553e3f
08c0: 30 39 39 62 66 30 65 61 34 65 64 66 64 36 37 37  099bf0ea4edfd677
08d0: 38 64 66 38 39 61 38 39 30 64 64 0a 0a 74 63 6c  8df89a890dd..tcl
08e0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
08f0: 52 49 50 45 4d 44 32 35 36 2d 31 2e 39 20 7b 52  RIPEMD256-1.9 {R
0900: 49 50 45 4d 44 32 35 36 7d 20 5c 0a 09 2d 63 6f  IPEMD256} \..-co
0910: 6e 73 74 72 61 69 6e 74 73 20 52 49 50 45 4d 44  nstraints RIPEMD
0920: 32 35 36 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73  256 \..-setup {s
0930: 65 74 20 64 61 74 61 20 5b 73 74 72 69 6e 67 20  et data [string 
0940: 72 65 70 65 61 74 20 22 61 22 20 31 30 30 30 30  repeat "a" 10000
0950: 30 30 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  00]} \..-body {t
0960: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
0970: 73 74 20 52 49 50 45 4d 44 32 35 36 20 2d 64 61  st RIPEMD256 -da
0980: 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61  ta $data} \..-ma
0990: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
09a0: 74 20 61 63 39 35 33 37 34 34 65 31 30 65 33 31  t ac953744e10e31
09b0: 35 31 34 63 31 35 30 64 34 64 38 64 37 62 36 37  514c150d4d8d7b67
09c0: 37 33 34 32 65 33 33 33 39 39 37 38 38 32 39 36  7342e33399788296
09d0: 65 34 33 61 65 34 38 35 30 63 65 34 66 39 37 39  e43ae4850ce4f979
09e0: 37 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  78..tcltest::tes
09f0: 74 20 48 61 73 68 5f 52 49 50 45 4d 44 32 35 36  t Hash_RIPEMD256
0a00: 2d 31 2e 31 30 20 7b 52 49 50 45 4d 44 32 35 36  -1.10 {RIPEMD256
0a10: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
0a20: 73 20 52 49 50 45 4d 44 32 35 36 20 5c 0a 09 2d  s RIPEMD256 \..-
0a30: 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20  setup {set data 
0a40: 22 54 68 65 20 71 75 69 63 6b 20 62 72 6f 77 6e  "The quick brown
0a50: 20 66 6f 78 20 6a 75 6d 70 73 20 6f 76 65 72 20   fox jumps over 
0a60: 74 68 65 20 6c 61 7a 79 20 64 6f 67 22 7d 20 5c  the lazy dog"} \
0a70: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
0a80: 67 65 73 74 20 2d 64 69 67 65 73 74 20 52 49 50  gest -digest RIP
0a90: 45 4d 44 32 35 36 20 2d 64 61 74 61 20 24 64 61  EMD256 -data $da
0aa0: 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  ta} \..-match ex
0ab0: 61 63 74 20 2d 72 65 73 75 6c 74 20 63 33 62 30  act -result c3b0
0ac0: 63 32 66 37 36 34 61 63 36 64 35 37 36 61 36 63  c2f764ac6d576a6c
0ad0: 34 33 30 66 62 36 31 61 36 66 32 32 35 35 62 34  430fb61a6f2255b4
0ae0: 66 61 38 33 33 65 30 39 34 62 31 62 61 38 63 31  fa833e094b1ba8c1
0af0: 65 32 39 62 36 33 35 33 30 33 36 66 0a 0a 23 20  e29b6353036f..# 
0b00: 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73  Cleanup.::tcltes
0b10: 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 0a  t::cleanupTests.
0b20: 72 65 74 75 72 6e 0a                             return.