1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
|
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
+
+
+
|
# Auto generated from "SHA3_512ShortMsg.rsp"
package require tls
package require tcltest
tcltest::testConstraint SHA3-512 [expr {[lsearch -nocase [tls::digests] SHA3-512] > -1}]
tcltest::testConstraint SHA3_512 [expr {[lsearch -nocase [tls::digests] SHA3-512] > -1}]
tcltest::test Hash_SHA3-512-2.1 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data ""} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result a69f73cca23a9ac5c8b567dc185a756e97c982164fe25859e0d1dcc1475c80a615b2123af1f5f94c11e3e9402c3ac558f500199d95b6d3e301758586281dcd26
tcltest::test Hash_SHA3-512-2.2 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex e5]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 150240baf95fb36f8ccb87a19a41767e7aed95125075a2b2dbba6e565e1ce8575f2b042b62e29a04e9440314a821c6224182964d8b557b16a492b3806f4c39c1
tcltest::test Hash_SHA3-512-2.3 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex ef26]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 809b4124d2b174731db14585c253194c8619a68294c8c48947879316fef249b1575da81ab72aad8fae08d24ece75ca1be46d0634143705d79d2f5177856a0437
tcltest::test Hash_SHA3-512-2.4 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 37d518]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 4aa96b1547e6402c0eee781acaa660797efe26ec00b4f2e0aec4a6d10688dd64cbd7f12b3b6c7f802e2096c041208b9289aec380d1a748fdfcd4128553d781e3
tcltest::test Hash_SHA3-512-2.5 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex fc7b8cda]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 58a5422d6b15eb1f223ebe4f4a5281bc6824d1599d979f4c6fe45695ca89014260b859a2d46ebf75f51ff204927932c79270dd7aef975657bb48fe09d8ea008e
tcltest::test Hash_SHA3-512-2.6 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 4775c86b1c]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result ce96da8bcd6bc9d81419f0dd3308e3ef541bc7b030eee1339cf8b3c4e8420cd303180f8da77037c8c1ae375cab81ee475710923b9519adbddedb36db0c199f70
tcltest::test Hash_SHA3-512-2.7 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 71a986d2f662]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result def6aac2b08c98d56a0501a8cb93f5b47d6322daf99e03255457c303326395f765576930f8571d89c01e727cc79c2d4497f85c45691b554e20da810c2bc865ef
tcltest::test Hash_SHA3-512-2.8 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex ec83d707a1414a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 84fd3775bac5b87e550d03ec6fe4905cc60e851a4c33a61858d4e7d8a34d471f05008b9a1d63044445df5a9fce958cb012a6ac778ecf45104b0fcb979aa4692d
tcltest::test Hash_SHA3-512-2.9 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex af53fa3ff8a3cfb2]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 03c2ac02de1765497a0a6af466fb64758e3283ed83d02c0edb3904fd3cf296442e790018d4bf4ce55bc869cebb4aa1a799afc9d987e776fef5dfe6628e24de97
tcltest::test Hash_SHA3-512-2.10 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 3d6093966950abd846]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 53e30da8b74ae76abf1f65761653ebfbe87882e9ea0ea564addd7cfd5a6524578ad6be014d7799799ef5e15c679582b791159add823b95c91e26de62dcb74cfa
tcltest::test Hash_SHA3-512-2.11 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 1ca984dcc913344370cf]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 6915ea0eeffb99b9b246a0e34daf3947852684c3d618260119a22835659e4f23d4eb66a15d0affb8e93771578f5e8f25b7a5f2a55f511fb8b96325ba2cd14816
tcltest::test Hash_SHA3-512-2.12 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex fc7b8cdadebe48588f6851]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result c8439bb1285120b3c43631a00a3b5ac0badb4113586a3dd4f7c66c5d81012f7412617b169fa6d70f8e0a19e5e258e99a0ed2dcfa774c864c62a010e9b90ca00d
tcltest::test Hash_SHA3-512-2.13 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex ecb907adfb85f9154a3c23e8]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 94ae34fed2ef51a383fb853296e4b797e48e00cad27f094d2f411c400c4960ca4c610bf3dc40e94ecfd0c7a18e418877e182ca3ae5ca5136e2856a5531710f48
tcltest::test Hash_SHA3-512-2.14 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex d91a9c324ece84b072d0753618]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result fb1f06c4d1c0d066bdd850ab1a78b83296eba0ca423bb174d74283f46628e6095539214adfd82b462e8e9204a397a83c6842b721a32e8bb030927a568f3c29e6
tcltest::test Hash_SHA3-512-2.15 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex c61a9188812ae73994bc0d6d4021]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 069e6ab1675fed8d44105f3b62bbf5b8ff7ae804098986879b11e0d7d9b1b4cb7bc47aeb74201f509ddc92e5633abd2cbe0ddca2480e9908afa632c8c8d5af2a
tcltest::test Hash_SHA3-512-2.16 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex a6e7b218449840d134b566290dc896]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 3605a21ce00b289022193b70b535e6626f324739542978f5b307194fcf0a5988f542c0838a0443bb9bb8ff922a6a177fdbd12cf805f3ed809c48e9769c8bbd91
tcltest::test Hash_SHA3-512-2.17 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 054095ba531eec22113cc345e83795c7]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result f3adf5ccf2830cd621958021ef998252f2b6bc4c135096839586d5064a2978154ea076c600a97364bce0e9aab43b7f1f2da93537089de950557674ae6251ca4d
tcltest::test Hash_SHA3-512-2.18 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 5b1ec1c4e920f5b995b6a788b6e989ac29]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 135eea17ca4785482c19cd668b8dd2913216903311fa21f6b670b9b573264f8875b5d3c071d92d63556549e523b2af1f1a508bd1f105d29a436f455cd2ca1604
tcltest::test Hash_SHA3-512-2.19 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 133b497b00932773a53ba9bf8e61d59f05f4]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 783964a1cf41d6d210a8d7c81ce6970aa62c9053cb89e15f88053957ecf607f42af08804e76f2fbdbb31809c9eefc60e233d6624367a3b9c30f8ee5f65be56ac
tcltest::test Hash_SHA3-512-2.20 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 88c050ea6b66b01256bda299f399398e1e3162]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 6bf7fc8e9014f35c4bde6a2c7ce1965d9c1793f25c141021cc1c697d111363b3854953c2b4009df41878b5558e78a9a9092c22b8baa0ed6baca005455c6cca70
tcltest::test Hash_SHA3-512-2.21 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex d7d5363350709e96939e6b68b3bbdef6999ac8d9]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 7a46beca553fffa8021b0989f40a6563a8afb641e8133090bc034ab6763e96d7b7a0da4de3abd5a67d8085f7c28b21a24aefb359c37fac61d3a5374b4b1fb6bb
tcltest::test Hash_SHA3-512-2.22 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 54746a7ba28b5f263d2496bd0080d83520cd2dc503]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result d77048df60e20d03d336bfa634bc9931c2d3c1e1065d3a07f14ae01a085fe7e7fe6a89dc4c7880f1038938aa8fcd99d2a782d1bbe5eec790858173c7830c87a2
tcltest::test Hash_SHA3-512-2.23 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 73df7885830633fc66c9eb16940b017e9c6f9f871978]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 0edee1ea019a5c004fd8ae9dc8c2dd38d4331abe2968e1e9e0c128d2506db981a307c0f19bc2e62487a92992af77588d3ab7854fe1b68302f796b9dcd9f336df
tcltest::test Hash_SHA3-512-2.24 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 14cb35fa933e49b0d0a400183cbbea099c44995fae1163]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result af2ef4b0c01e381b4c382208b66ad95d759ec91e386e953984aa5f07774632d53b581eba32ed1d369c46b0a57fee64a02a0e5107c22f14f2227b1d11424becb5
tcltest::test Hash_SHA3-512-2.25 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 75a06869ca2a6ea857e26e78bb78a139a671ccb098d8205a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 88be1934385522ae1d739666f395f1d7f99978d62883a261adf5d618d012dfab5224575634446876b86b3e5f7609d397d338a784b4311027b1024ddfd4995a0a
tcltest::test Hash_SHA3-512-2.26 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex b413ab364dd410573b53f4c2f28982ca07061726e5d999f3c2]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 289e889b25f9f38facfccf3bdbceea06ef3baad6e9612b7232cd553f4884a7a642f6583a1a589d4dcb2dc771f1ff6d711b85f731145a89b100680f9a55dcbb3f
tcltest::test Hash_SHA3-512-2.27 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex d7f9053984213ebabc842fd8ce483609a9af5dc140ecdbe63336]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result f167cb30e4bacbdc5ed53bc615f8c9ea19ad4f6bd85ca0ff5fb1f1cbe5b576bda49276aa5814291a7e320f1d687b16ba8d7daab2b3d7e9af3cd9f84a1e9979a1
tcltest::test Hash_SHA3-512-2.28 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 9b7f9d11be48e786a11a472ab2344c57adf62f7c1d4e6d282074b6]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 82fa525d5efaa3cce39bffef8eee01afb52067097f8965cde71703345322645eae59dbaebed0805693104dfb0c5811c5828da9a75d812e5562615248c03ff880
tcltest::test Hash_SHA3-512-2.29 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 115784b1fccfabca457c4e27a24a7832280b7e7d6a123ffce5fdab72]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result ec12c4ed5ae84808883c5351003f7e26e1eaf509c866b357f97472e5e19c84f99f16dbbb8bfff060d6c0fe0ca9c34a210c909b05f6a81f441627ce8e666f6dc7
tcltest::test Hash_SHA3-512-2.30 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex c3b1ad16b2877def8d080477d8b59152fe5e84f3f3380d55182f36eb5f]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 4b9144edeeec28fd52ba4176a78e080e57782d2329b67d8ac8780bb6e8c2057583172af1d068922feaaff759be5a6ea548f5db51f4c34dfe7236ca09a67921c7
tcltest::test Hash_SHA3-512-2.31 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 4c66ca7a01129eaca1d99a08dd7226a5824b840d06d0059c60e97d291dc4]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 567c46f2f636223bd5ed3dc98c3f7a739b42898e70886f132eac43c2a6fadabe0dd9f1b6bc4a9365e5232295ac1ac34701b0fb181d2f7f07a79d033dd426d5a2
tcltest::test Hash_SHA3-512-2.32 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 481041c2f56662316ee85a10b98e103c8d48804f6f9502cf1b51cfa525cec1]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 46f0058abe678195b576df5c7eb8d739468cad1908f7953ea39c93fa1d96845c38a2934d23804864a8368dae38191d983053ccd045a9ab87ef2619e9dd50c8c1
tcltest::test Hash_SHA3-512-2.33 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 7c1688217b313278b9eae8edcf8aa4271614296d0c1e8916f9e0e940d28b88c5]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 627ba4de74d05bb6df8991112e4d373bfced37acde1304e0f664f29fa126cb497c8a1b717b9929120883ec8898968e4649013b760a2180a9dc0fc9b27f5b7f3b
tcltest::test Hash_SHA3-512-2.34 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 785f6513fcd92b674c450e85da22257b8e85bfa65e5d9b1b1ffc5c469ad337d1e3]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 5c11d6e4c5c5f76d26876c5976b6f555c255c785b2f28b6700ca2d8b3b3fa585636239277773330f4cf8c5d5203bcc091b8d47e7743bbc0b5a2c54444ee2acce
tcltest::test Hash_SHA3-512-2.35 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 34f4468e2d567b1e326c0942970efa32c5ca2e95d42c98eb5d3cab2889490ea16ee5]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 49adfa335e183c94b3160154d6698e318c8b5dd100b0227e3e34cabea1fe0f745326220f64263961349996bbe1aae9054de6406e8b350408ab0b9f656bb8daf7
tcltest::test Hash_SHA3-512-2.36 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 53a0121c8993b6f6eec921d2445035dd90654add1298c6727a2aed9b59bafb7dd62070]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 918b4d92e1fcb65a4c1fa0bd75c562ac9d83186bb2fbfae5c4784de31a14654546e107df0e79076b8687bb3841c83ba9181f9956cd43428ba72f603881b33a71
tcltest::test Hash_SHA3-512-2.37 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex d30fa4b40c9f84ac9bcbb535e86989ec6d1bec9b1b22e9b0f97370ed0f0d566082899d96]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 39f104c1da4af314d6bceb34eca1dfe4e67484519eb76ba38e4701e113e6cbc0200df86e4439d674b0f42c72233360478ba5244384d28e388c87aaa817007c69
tcltest::test Hash_SHA3-512-2.38 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex f34d100269aee3ead156895e8644d4749464d5921d6157dffcbbadf7a719aee35ae0fd4872]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 565a1dd9d49f8ddefb79a3c7a209f53f0bc9f5396269b1ce2a2b283a3cb45ee3ae652e4ca10b26ced7e5236227006c94a37553db1b6fe5c0c2eded756c896bb1
tcltest::test Hash_SHA3-512-2.39 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 12529769fe5191d3fce860f434ab1130ce389d340fca232cc50b7536e62ad617742e022ea38a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result daee10e815fff0f0985d208886e22f9bf20a3643eb9a29fda469b6a7dcd54b5213c851d6f19338d63688fe1f02936c5dae1b7c6d5906a13a9eeb934400b6fe8c
tcltest::test Hash_SHA3-512-2.40 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex b2e3a0eb36bf16afb618bfd42a56789179147effecc684d8e39f037ec7b2d23f3f57f6d7a7d0bb]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 04029d6d9e8e394afa387f1d03ab6b8a0a6cbab4b6b3c86ef62f7142ab3c108388d42cb87258b9e6d36e5814d8a662657cf717b35a5708365e8ec0396ec5546b
tcltest::test Hash_SHA3-512-2.41 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 25c4a5f4a07f2b81e0533313664bf615c73257e6b2930e752fe5050e25ff02731fd2872f4f56f727]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result ec2d38e5bb5d7b18438d5f2029c86d05a03510db0e66aa299c28635abd0988c58be203f04b7e0cc25451d18f2341cd46f8705d46c2066dafab30d90d63bf3d2c
tcltest::test Hash_SHA3-512-2.42 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 134bb8e7ea5ff9edb69e8f6bbd498eb4537580b7fba7ad31d0a09921237acd7d66f4da23480b9c1222]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 8f966aef96831a1499d63560b2578021ad970bf7557b8bf8078b3e12cefab122fe71b1212dc704f7094a40b36b71d3ad7ce2d30f72c1baa4d4bbccb3251198ac
tcltest::test Hash_SHA3-512-2.43 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex f793256f039fad11af24cee4d223cd2a771598289995ab802b5930ba5c666a24188453dcd2f0842b8152]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 22c3d9712535153a3e206b1033929c0fd9d937c39ba13cf1a6544dfbd68ebc94867b15fda3f1d30b00bf47f2c4bf41dabdeaa5c397dae901c57db9cd77ddbcc0
tcltest::test Hash_SHA3-512-2.44 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 23cc7f9052d5e22e6712fab88e8dfaa928b6e015ca589c3b89cb745b756ca7c7634a503bf0228e71c28ee2]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 6ecf3ad6064218ee101a555d20fab6cbeb6b145b4eeb9c8c971fc7ce05581a34b3c52179590e8a134be2e88c7e549875f4ff89b96374c6995960de3a5098cced
tcltest::test Hash_SHA3-512-2.45 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex a60b7b3df15b3f1b19db15d480388b0f3b00837369aa2cc7c3d7315775d7309a2d6f6d1371d9c875350dec0a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 8d651605c6b32bf022ea06ce6306b2ca6b5ba2781af87ca2375860315c83ad88743030d148ed8d73194c461ec1e84c045fc914705747614c04c8865b51da94f7
tcltest::test Hash_SHA3-512-2.46 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 2745dd2f1b215ea509a912e5761cccc4f19fa93ba38445c528cb2f099de99ab9fac955baa211fd8539a671cdb6]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 4af918eb676ce278c730212ef79d818773a76a43c74d643f238e9b61acaf4030c617c4d6b3b7514c59b3e5e95d82e1e1e35443e851718b13b63e70b123d1b72c
tcltest::test Hash_SHA3-512-2.47 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 88adee4b46d2a109c36fcfb660f17f48062f7a74679fb07e86cad84f79fd57c86d426356ec8e68c65b3caa5bc7ba]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 6257acb9f589c919c93c0adc4e907fe011bef6018fbb18e618ba6fcc8cbc5e40641be589e86dbb0cf7d7d6bf33b98d8458cce0af7857f5a7c7647cf350e25af0
tcltest::test Hash_SHA3-512-2.48 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 7d40f2dc4af3cfa12b00d64940dc32a22d66d81cb628be2b8dda47ed6728020d55b695e75260f4ec18c6d74839086a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 5c46c84a0a02d898ed5885ce99c47c77afd29ae015d027f2485d630f9b41d00b7c1f1faf6ce57a08b604b35021f7f79600381994b731bd8e6a5b010aeb90e1eb
tcltest::test Hash_SHA3-512-2.49 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 3689d8836af0dc132f85b212eb670b41ecf9d4aba141092a0a8eca2e6d5eb0ba4b7e61af9273624d14192df7388a8436]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 17355e61d66e40f750d0a9a8e8a88cd6f9bf6070b7efa76442698740b4487ea6c644d1654ef16a265204e03084a14cafdccf8ff298cd54c0b4009967b6dd47cc
tcltest::test Hash_SHA3-512-2.50 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 58ff23dee2298c2ca7146227789c1d4093551047192d862fc34c1112d13f1f744456cecc4d4a02410523b4b15e598df75a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result aca89aa547c46173b4b2a380ba980da6f9ac084f46ac9ddea5e4164aeef31a9955b814a45aec1d8ce340bd37680952c5d68226dda1cac2677f73c9fd9174fd13
tcltest::test Hash_SHA3-512-2.51 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 67f3f23df3bd8ebeb0096452fe4775fd9cc71fbb6e72fdcc7eb8094f42c903121d0817a927bcbabd3109d5a70420253deab2]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result f4207cc565f266a245f29bf20b95b5d9a83e1bb68ad988edc91faa25f25286c8398bac7dd6628259bff98f28360f263dfc54c4228bc437c5691de1219b758d9f
tcltest::test Hash_SHA3-512-2.52 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex a225070c2cb122c3354c74a254fc7b84061cba33005cab88c409fbd3738ff67ce23c41ebef46c7a61610f5b93fa92a5bda9569]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result e815a9a4e4887be014635e97958341e0519314b3a3289e1835121b153b462272b0aca418be96d60e5ab355d3eb463697c0191eb522b60b8463d89f4c3f1bf142
tcltest::test Hash_SHA3-512-2.53 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 6aa0886777e99c9acd5f1db6e12bda59a807f92411ae99c9d490b5656acb4b115c57beb3c1807a1b029ad64be1f03e15bafd91ec]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 241f2ebaf7ad09e173b184244e69acd7ebc94774d0fa3902cbf267d4806063b044131bcf4af4cf180eb7bd4e7960ce5fe3dc6aebfc6b90eec461f414f79a67d9
tcltest::test Hash_SHA3-512-2.54 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 6a06092a3cd221ae86b286b31f326248270472c5ea510cb9064d6024d10efee7f59e98785d4f09da554e97cdec7b75429d788c112f]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result d14a1a47f2bef9e0d4b3e90a6be9ab5893e1110b12db38d33ffb9a61e1661aecc4ea100839cfee58a1c5aff72915c14170dd99e13f71b0a5fc1985bf43415cb0
tcltest::test Hash_SHA3-512-2.55 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex dfc3fa61f7fffc7c88ed90e51dfc39a4f288b50d58ac83385b58a3b2a3a39d729862c40fcaf9bc308f713a43eecb0b72bb9458d204ba]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 947bc873dc41df195f8045deb6ea1b840f633917e79c70a88d38b8862197dc2ab0cc6314e974fb5ba7e1703b22b1309e37bd430879056bdc166573075a9c5e04
tcltest::test Hash_SHA3-512-2.56 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 52958b1ff0049efa5d050ab381ec99732e554dcd03725da991a37a80bd4756cf65d367c54721e93f1e0a22f70d36e9f841336956d3c523]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 9cc5aad0f529f4bac491d733537b69c8ec700fe38ab423d815e0927c8657f9cb8f4207762d816ab697580122066bc2b68f4177335d0a6e9081540779e572c41f
tcltest::test Hash_SHA3-512-2.57 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 302fa84fdaa82081b1192b847b81ddea10a9f05a0f04138fd1da84a39ba5e18e18bc3cea062e6df92ff1ace89b3c5f55043130108abf631e]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 8c8eaae9a445643a37df34cfa6a7f09deccab2a222c421d2fc574bbc5641e504354391e81eb5130280b1226812556d474e951bb78dbdd9b77d19f647e2e7d7be
tcltest::test Hash_SHA3-512-2.58 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex b82f500d6bc2dddcdc162d46cbfaa5ae64025d5c1cd72472dcd2c42161c9871ce329f94df445f0c8aceecafd0344f6317ecbb62f0ec2223a35]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 55c69d7accd179d5d9fcc522f794e7af5f0eec7198ffa39f80fb55b866c0857ff3e7aeef33e130d9c74ef90606ca821d20b7608b12e6e561f9e6c7122ace3db0
tcltest::test Hash_SHA3-512-2.59 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 86da9107ca3e16a2b58950e656a15c085b88033e79313e2c0f92f99f06fa187efba5b8fea08eb7145f8476304180dd280f36a072b7eac197f085]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 0d3b1a0459b4eca801e0737ff9ea4a12b9a483a73a8a92742a93c297b7149326bd92c1643c8177c8924482ab3bbd916c417580cc75d3d3ae096de531bc5dc355
tcltest::test Hash_SHA3-512-2.60 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 141a6eafe157053e780ac7a57b97990616ce1759ed132cb453bcdfcabdbb70b3767da4eb94125d9c2a8d6d20bfaeacc1ffbe49c4b1bb5da7e9b5c6]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result bdbdd5b94cdc89466e7670c63ba6a55b58294e93b351261a5457bf5a40f1b5b2e0acc7fceb1bfb4c8872777eeeaff7927fd3635ca18c996d870bf86b12b89ba5
tcltest::test Hash_SHA3-512-2.61 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 6e0c65ee0943e34d9bbd27a8547690f2291f5a86d713c2be258e6ac16919fe9c4d491895d3a961bb97f5fac255891a0eaa18f80e1fa1ebcb639fcfc1]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 39ebb992b8d39daae973e3813a50e9e79a67d8458a6f17f97a6dd30dd7d11d95701a11129ffeaf7d45781b21cac0c4c034e389d7590df5beeb9805072d0183b9
tcltest::test Hash_SHA3-512-2.62 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 57780b1c79e67fc3beaabead4a67a8cc98b83fa7647eae50c8798b96a516597b448851e93d1a62a098c4767333fcf7b463ce91edde2f3ad0d98f70716d]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 3ef36c3effad6eb5ad2d0a67780f80d1b90efcb74db20410c2261a3ab0f784429df874814748dc1b6efaab3d06dd0a41ba54fce59b67d45838eaa4aa1fadfa0f
tcltest::test Hash_SHA3-512-2.63 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex bcc9849da4091d0edfe908e7c3386b0cadadb2859829c9dfee3d8ecf9dec86196eb2ceb093c5551f7e9a4927faabcfaa7478f7c899cbef4727417738fc06]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 1fcd8a2c7b4fd98fcdc5fa665bab49bde3f9f556aa66b3646638f5a2d3806192f8a33145d8d0c535c85adff3cc0ea3c2715b33cec9f8886e9f4377b3632e9055
tcltest::test Hash_SHA3-512-2.64 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 05a32829642ed4808d6554d16b9b8023353ce65a935d126602970dba791623004dede90b52ac7f0d4335130a63cba68c656c139989614de20913e83db320db]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 49d8747bb53ddde6d1485965208670d1130bf35619d7506a2f2040d1129fcf0320207e5b36fea083e84ffc98755e691ad8bd5dc66f8972cb9857389344e11aad
tcltest::test Hash_SHA3-512-2.65 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 56ac4f6845a451dac3e8886f97f7024b64b1b1e9c5181c059b5755b9a6042be653a2a0d5d56a9e1e774be5c9312f48b4798019345beae2ffcc63554a3c69862e]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 5fde5c57a31febb98061f27e4506fa5c245506336ee90d595c91d791a5975c712b3ab9b3b5868f941db0aeb4c6d2837c4447442f8402e0e150a9dc0ef178dca8
tcltest::test Hash_SHA3-512-2.66 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 8a229f8d0294fe90d4cc8c875460d5d623f93287f905a999a2ab0f9a47046f78ef88b09445c671189c59388b3017cca2af8bdf59f8a6f04322b1701ec08624ab63]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 16b0fd239cc632842c443e1b92d286dd519cfc616a41f2456dd5cddebd10703c3e9cb669004b7f169bb4f99f350ec96904b0e8dd4de8e6be9953dc892c65099f
tcltest::test Hash_SHA3-512-2.67 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 87d6aa9979025b2437ea8159ea1d3e5d6f17f0a5b913b56970212f56de7884840c0da9a72865e1892aa780b8b8f5f57b46fc070b81ca5f00eee0470ace89b1e1466a]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result d816acf1797decfe34f4cc49e52aa505cc59bd17fe69dc9543fad82e9cf96298183021f704054d3d06adde2bf54e82a090a57b239e88daa04cb76c4fc9127843
tcltest::test Hash_SHA3-512-2.68 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 0823616ab87e4904308628c2226e721bb4169b7d34e8744a0700b721e38fe05e3f813fe4075d4c1a936d3a33da20cfb3e3ac722e7df7865330b8f62a73d9119a1f2199]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result e1da6be4403a4fd784c59be4e71c658a78bb8c5d7d571c5e816fbb3e218a4162f62de1c285f3779781cb5506e29c94e1b7c7d65af2aa71ea5c96d9585b5e45d5
tcltest::test Hash_SHA3-512-2.69 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 7d2d913c2460c09898b20366ae34775b1564f10edea49c073cebe41989bb93f38a533af1f425d3382f8aa40159b567358ee5a73b67df6d0dc09c1c92bf3f9a28124ab07f]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 3aa1e19a52b86cf414d977768bb535b7e5817117d436b4425ec8d775e8cb0e0b538072213884c7ff1bb9ca9984c82d65cb0115cc07332b0ea903e3b38650e88e
tcltest::test Hash_SHA3-512-2.70 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex fca5f68fd2d3a52187b349a8d2726b608fccea7db42e906b8718e85a0ec654fac70f5a839a8d3ff90cfed7aeb5ea9b08f487fc84e1d9f7fb831dea254468a65ba18cc5a126]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 2c74f846ecc722ea4a1eb1162e231b6903291fffa95dd5e1d17dbc2c2be7dfe549a80dd34487d714130ddc9924aed904ad55f49c91c80ceb05c0c034dae0a0a4
tcltest::test Hash_SHA3-512-2.71 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 881ff70ca34a3e1a0e864fd2615ca2a0e63def254e688c37a20ef6297cb3ae4c76d746b5e3d6bb41bd0d05d7df3eeded74351f4eb0ac801abe6dc10ef9b635055ee1dfbf4144]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 9a10a7ce23c0497fe8783927f833232ae664f1e1b91302266b6ace25a9c253d1ecab1aaaa62f865469480b2145ed0e489ae3f3f9f7e6da27492c81b07e606fb6
tcltest::test Hash_SHA3-512-2.72 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex b0de0430c200d74bf41ea0c92f8f28e11b68006a884e0d4b0d884533ee58b38a438cc1a75750b6434f467e2d0cd9aa4052ceb793291b93ef83fd5d8620456ce1aff2941b3605a4]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result 9e9e469ca9226cd012f5c9cc39c96adc22f420030fcee305a0ed27974e3c802701603dac873ae4476e9c3d57e55524483fc01adaef87daa9e304078c59802757
tcltest::test Hash_SHA3-512-2.73 {SHA3_512ShortMsg} \
-constraints SHA3-512 \
-constraints SHA3_512 \
-setup {set data [binary decode hex 0ce9f8c3a990c268f34efd9befdb0f7c4ef8466cfdb01171f8de70dc5fefa92acbe93d29e2ac1a5c2979129f1ab08c0e77de7924ddf68a209cdfa0adc62f85c18637d9c6b33f4ff8]} \
-body {tls::digest -digest SHA3-512 -data $data} \
-match exact -result b018a20fcf831dde290e4fb18c56342efe138472cbe142da6b77eea4fce52588c04c808eb32912faa345245a850346faec46c3a16d39bd2e1ddb1816bc57d2da
# Cleanup
::tcltest::cleanupTests
return
|