Artifact
a79db16564a622f5cc470ce53d3e3d441ddbfb71bfa4b229b01862360aa0e11e:
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 48 4d 41 43 5f 52 49 50 45 from "HMAC_RIPE
0020: 4d 44 31 36 30 2e 74 78 74 22 0a 70 61 63 6b 61 MD160.txt".packa
0030: 67 65 20 72 65 71 75 69 72 65 20 74 6c 73 0a 70 ge require tls.p
0040: 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 74 ackage require t
0050: 63 6c 74 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a cltest..tcltest:
0060: 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 :testConstraint
0070: 48 4d 41 43 20 5b 65 78 70 72 20 7b 5b 6c 73 65 HMAC [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 6d 61 63 73 5d 20 48 4d 41 43 5d 20 3e s::macs] HMAC] >
00a0: 20 2d 31 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a 74 -1}].tcltest::t
00b0: 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 52 49 estConstraint RI
00c0: 50 45 4d 44 31 36 30 20 5b 65 78 70 72 20 7b 5b PEMD160 [expr {[
00d0: 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 65 20 lsearch -nocase
00e0: 5b 74 6c 73 3a 3a 64 69 67 65 73 74 73 5d 20 52 [tls::digests] R
00f0: 49 50 45 4d 44 31 36 30 5d 20 3e 20 2d 31 7d 5d IPEMD160] > -1}]
0100: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
0110: 4d 41 43 5f 48 4d 41 43 2d 52 49 50 45 4d 44 31 MAC_HMAC-RIPEMD1
0120: 36 30 2d 31 2e 31 20 7b 48 4d 41 43 5f 52 49 50 60-1.1 {HMAC_RIP
0130: 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 EMD160} \..-cons
0140: 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 52 49 traints {HMAC RI
0150: 50 45 4d 44 31 36 30 20 7d 20 5c 0a 09 2d 73 65 PEMD160 } \..-se
0160: 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 tup {} \..-body
0170: 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 5b 74 {string range [t
0180: 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 2d 64 ls::hmac -hex -d
0190: 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 30 20 igest RIPEMD160
01a0: 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 63 -key [binary dec
01b0: 6f 64 65 20 68 65 78 20 30 62 30 62 30 62 30 62 ode hex 0b0b0b0b
01c0: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
01d0: 30 62 30 62 30 62 30 62 30 62 30 62 30 62 30 62 0b0b0b0b0b0b0b0b
01e0: 5d 20 2d 64 61 74 61 20 22 48 69 20 54 68 65 72 ] -data "Hi Ther
01f0: 65 22 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 e"] 0 39} \..-ma
0200: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
0210: 74 20 32 34 63 62 34 62 64 36 37 64 32 30 66 63 t 24cb4bd67d20fc
0220: 31 61 35 64 32 65 64 37 37 33 32 64 63 63 33 39 1a5d2ed7732dcc39
0230: 33 37 37 66 30 61 35 36 36 38 0a 0a 74 63 6c 74 377f0a5668..tclt
0240: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d est::test MAC_HM
0250: 41 43 2d 52 49 50 45 4d 44 31 36 30 2d 31 2e 32 AC-RIPEMD160-1.2
0260: 20 7b 48 4d 41 43 5f 52 49 50 45 4d 44 31 36 30 {HMAC_RIPEMD160
0270: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0280: 73 20 7b 48 4d 41 43 20 52 49 50 45 4d 44 31 36 s {HMAC RIPEMD16
0290: 30 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 0 } \..-setup {}
02a0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
02b0: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
02c0: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
02d0: 52 49 50 45 4d 44 31 36 30 20 2d 6b 65 79 20 22 RIPEMD160 -key "
02e0: 4a 65 66 65 22 20 2d 64 61 74 61 20 22 77 68 61 Jefe" -data "wha
02f0: 74 20 64 6f 20 79 61 20 77 61 6e 74 20 66 6f 72 t do ya want for
0300: 20 6e 6f 74 68 69 6e 67 3f 22 5d 20 30 20 33 39 nothing?"] 0 39
0310: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
0320: 74 20 2d 72 65 73 75 6c 74 20 64 64 61 36 63 30 t -result dda6c0
0330: 32 31 33 61 34 38 35 61 39 65 32 34 66 34 37 34 213a485a9e24f474
0340: 32 30 36 34 61 37 66 30 33 33 62 34 33 63 34 30 2064a7f033b43c40
0350: 36 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 69..tcltest::tes
0360: 74 20 4d 41 43 5f 48 4d 41 43 2d 52 49 50 45 4d t MAC_HMAC-RIPEM
0370: 44 31 36 30 2d 31 2e 33 20 7b 48 4d 41 43 5f 52 D160-1.3 {HMAC_R
0380: 49 50 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f IPEMD160} \..-co
0390: 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 nstraints {HMAC
03a0: 52 49 50 45 4d 44 31 36 30 20 7d 20 5c 0a 09 2d RIPEMD160 } \..-
03b0: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
03c0: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
03d0: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
03e0: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 -digest RIPEMD16
03f0: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 0 -key [binary d
0400: 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 ecode hex aaaaaa
0410: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0420: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0430: 61 61 5d 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 aa] -data [binar
0440: 79 20 64 65 63 6f 64 65 20 68 65 78 20 64 64 64 y decode hex ddd
0450: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0460: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0470: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0480: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
0490: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
04a0: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 dddddddddddddddd
04b0: 64 5d 5d 20 30 20 33 39 7d 20 5c 0a 09 2d 6d 61 d]] 0 39} \..-ma
04c0: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c tch exact -resul
04d0: 74 20 62 30 62 31 30 35 33 36 30 64 65 37 35 39 t b0b105360de759
04e0: 39 36 30 61 62 34 66 33 35 32 39 38 65 31 31 36 960ab4f35298e116
04f0: 65 32 39 35 64 38 65 37 63 31 0a 0a 74 63 6c 74 e295d8e7c1..tclt
0500: 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f 48 4d est::test MAC_HM
0510: 41 43 2d 52 49 50 45 4d 44 31 36 30 2d 31 2e 34 AC-RIPEMD160-1.4
0520: 20 7b 48 4d 41 43 5f 52 49 50 45 4d 44 31 36 30 {HMAC_RIPEMD160
0530: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
0540: 73 20 7b 48 4d 41 43 20 52 49 50 45 4d 44 31 36 s {HMAC RIPEMD16
0550: 30 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 0 } \..-setup {}
0560: 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 69 6e \..-body {strin
0570: 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a 68 6d g range [tls::hm
0580: 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 74 20 ac -hex -digest
0590: 52 49 50 45 4d 44 31 36 30 20 2d 6b 65 79 20 5b RIPEMD160 -key [
05a0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 binary decode he
05b0: 78 20 30 31 30 32 30 33 30 34 30 35 30 36 30 37 x 01020304050607
05c0: 30 38 30 39 30 61 30 62 30 63 30 64 30 65 30 66 08090a0b0c0d0e0f
05d0: 31 30 31 31 31 32 31 33 31 34 31 35 31 36 31 37 1011121314151617
05e0: 31 38 31 39 5d 20 2d 64 61 74 61 20 5b 62 69 6e 1819] -data [bin
05f0: 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 63 ary decode hex c
0600: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0610: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0620: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0630: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0640: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0650: 64 63 64 63 64 63 64 63 64 63 64 63 64 63 64 63 dcdcdcdcdcdcdcdc
0660: 64 63 64 5d 5d 20 30 20 33 39 7d 20 5c 0a 09 2d dcd]] 0 39} \..-
0670: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0680: 75 6c 74 20 64 35 63 61 38 36 32 66 34 64 32 31 ult d5ca862f4d21
0690: 64 35 65 36 31 30 65 31 38 62 34 63 66 31 62 65 d5e610e18b4cf1be
06a0: 62 39 37 61 34 33 36 35 65 63 66 34 0a 0a 74 63 b97a4365ecf4..tc
06b0: 6c 74 65 73 74 3a 3a 74 65 73 74 20 4d 41 43 5f ltest::test MAC_
06c0: 48 4d 41 43 2d 52 49 50 45 4d 44 31 36 30 2d 31 HMAC-RIPEMD160-1
06d0: 2e 35 20 7b 48 4d 41 43 5f 52 49 50 45 4d 44 31 .5 {HMAC_RIPEMD1
06e0: 36 30 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 60} \..-constrai
06f0: 6e 74 73 20 7b 48 4d 41 43 20 52 49 50 45 4d 44 nts {HMAC RIPEMD
0700: 31 36 30 20 7d 20 5c 0a 09 2d 73 65 74 75 70 20 160 } \..-setup
0710: 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 73 74 72 {} \..-body {str
0720: 69 6e 67 20 72 61 6e 67 65 20 5b 74 6c 73 3a 3a ing range [tls::
0730: 68 6d 61 63 20 2d 68 65 78 20 2d 64 69 67 65 73 hmac -hex -diges
0740: 74 20 52 49 50 45 4d 44 31 36 30 20 2d 6b 65 79 t RIPEMD160 -key
0750: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 [binary decode
0760: 68 65 78 20 30 63 30 63 30 63 30 63 30 63 30 63 hex 0c0c0c0c0c0c
0770: 30 63 30 63 30 63 30 63 30 63 30 63 30 63 30 63 0c0c0c0c0c0c0c0c
0780: 30 63 30 63 30 63 30 63 30 63 30 63 5d 20 2d 64 0c0c0c0c0c0c] -d
0790: 61 74 61 20 22 54 65 73 74 20 57 69 74 68 20 54 ata "Test With T
07a0: 72 75 6e 63 61 74 69 6f 6e 22 5d 20 30 20 32 33 runcation"] 0 23
07b0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
07c0: 74 20 2d 72 65 73 75 6c 74 20 37 36 31 39 36 39 t -result 761969
07d0: 33 39 37 38 66 39 31 64 39 30 35 33 39 61 65 37 3978f91d90539ae7
07e0: 38 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 86..tcltest::tes
07f0: 74 20 4d 41 43 5f 48 4d 41 43 2d 52 49 50 45 4d t MAC_HMAC-RIPEM
0800: 44 31 36 30 2d 31 2e 36 20 7b 48 4d 41 43 5f 52 D160-1.6 {HMAC_R
0810: 49 50 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f IPEMD160} \..-co
0820: 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 nstraints {HMAC
0830: 52 49 50 45 4d 44 31 36 30 20 7d 20 5c 0a 09 2d RIPEMD160 } \..-
0840: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
0850: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
0860: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
0870: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 -digest RIPEMD16
0880: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 0 -key [binary d
0890: 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 ecode hex aaaaaa
08a0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
08b0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
08c0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
08d0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
08e0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
08f0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0900: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0910: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0920: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0930: 61 61 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 aaaaaaaaaa] -dat
0940: 61 20 22 54 65 73 74 20 55 73 69 6e 67 20 4c 61 a "Test Using La
0950: 72 67 65 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d rger Than Block-
0960: 53 69 7a 65 20 4b 65 79 20 2d 20 48 61 73 68 20 Size Key - Hash
0970: 4b 65 79 20 46 69 72 73 74 22 5d 20 30 20 33 39 Key First"] 0 39
0980: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 } \..-match exac
0990: 74 20 2d 72 65 73 75 6c 74 20 36 34 36 36 63 61 t -result 6466ca
09a0: 30 37 61 63 35 65 61 63 32 39 65 31 62 64 35 32 07ac5eac29e1bd52
09b0: 33 65 35 61 64 61 37 36 30 35 62 37 39 31 66 64 3e5ada7605b791fd
09c0: 38 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 8b..tcltest::tes
09d0: 74 20 4d 41 43 5f 48 4d 41 43 2d 52 49 50 45 4d t MAC_HMAC-RIPEM
09e0: 44 31 36 30 2d 31 2e 37 20 7b 48 4d 41 43 5f 52 D160-1.7 {HMAC_R
09f0: 49 50 45 4d 44 31 36 30 7d 20 5c 0a 09 2d 63 6f IPEMD160} \..-co
0a00: 6e 73 74 72 61 69 6e 74 73 20 7b 48 4d 41 43 20 nstraints {HMAC
0a10: 52 49 50 45 4d 44 31 36 30 20 7d 20 5c 0a 09 2d RIPEMD160 } \..-
0a20: 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 setup {} \..-bod
0a30: 79 20 7b 73 74 72 69 6e 67 20 72 61 6e 67 65 20 y {string range
0a40: 5b 74 6c 73 3a 3a 68 6d 61 63 20 2d 68 65 78 20 [tls::hmac -hex
0a50: 2d 64 69 67 65 73 74 20 52 49 50 45 4d 44 31 36 -digest RIPEMD16
0a60: 30 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 0 -key [binary d
0a70: 65 63 6f 64 65 20 68 65 78 20 61 61 61 61 61 61 ecode hex aaaaaa
0a80: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0a90: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0aa0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ab0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ac0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ad0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0ae0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0af0: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0b00: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa
0b10: 61 61 61 61 61 61 61 61 61 61 5d 20 2d 64 61 74 aaaaaaaaaa] -dat
0b20: 61 20 22 54 65 73 74 20 55 73 69 6e 67 20 4c 61 a "Test Using La
0b30: 72 67 65 72 20 54 68 61 6e 20 42 6c 6f 63 6b 2d rger Than Block-
0b40: 53 69 7a 65 20 4b 65 79 20 61 6e 64 20 4c 61 72 Size Key and Lar
0b50: 67 65 72 20 54 68 61 6e 20 4f 6e 65 20 42 6c 6f ger Than One Blo
0b60: 63 6b 2d 53 69 7a 65 20 44 61 74 61 22 5d 20 30 ck-Size Data"] 0
0b70: 20 33 39 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 39} \..-match e
0b80: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 39 65 xact -result 69e
0b90: 61 36 30 37 39 38 64 37 31 36 31 36 63 63 65 35 a60798d71616cce5
0ba0: 66 64 30 38 37 31 65 32 33 37 35 34 63 64 37 35 fd0871e23754cd75
0bb0: 64 35 61 30 61 0a 0a 23 20 43 6c 65 61 6e 75 70 d5a0a..# Cleanup
0bc0: 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 61 .::tcltest::clea
0bd0: 6e 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e 0a nupTests.return.