Artifact
141aaf226e31bfc97abde1292ddbb81061eafb8e9bb182564f06f520cecf4dc6:
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 41 52 49 41 31 39 32 2e 74 from "ARIA192.t
0020: 78 74 22 0a 6c 61 70 70 65 6e 64 20 61 75 74 6f xt".lappend auto
0030: 5f 70 61 74 68 20 5b 66 69 6c 65 20 64 69 72 6e _path [file dirn
0040: 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d ame [file dirnam
0050: 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 e [file dirname
0060: 5b 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 [file dirname [f
0070: 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 64 5d 20 5b ile join [pwd] [
0080: 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d 5d 5d 5d info script]]]]]
0090: 5d 0a 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 ].package requir
00a0: 65 20 74 6c 73 0a 70 61 63 6b 61 67 65 20 72 65 e tls.package re
00b0: 71 75 69 72 65 20 74 63 6c 74 65 73 74 0a 0a 63 quire tcltest..c
00c0: 61 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f 76 69 atch {tls::provi
00d0: 64 65 72 20 6c 65 67 61 63 79 7d 0a 74 63 6c 74 der legacy}.tclt
00e0: 65 73 74 3a 3a 74 65 73 74 43 6f 6e 73 74 72 61 est::testConstra
00f0: 69 6e 74 20 41 52 49 41 31 39 32 20 5b 65 78 70 int ARIA192 [exp
0100: 72 20 7b 5b 6c 73 65 61 72 63 68 20 2d 6e 6f 63 r {[lsearch -noc
0110: 61 73 65 20 5b 74 6c 73 3a 3a 63 69 70 68 65 72 ase [tls::cipher
0120: 73 5d 20 41 52 49 41 31 39 32 5d 20 3e 20 2d 31 s] ARIA192] > -1
0130: 7d 5d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 }]..tcltest::tes
0140: 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 6b t Symetric_Block
0150: 5f 41 52 49 41 31 39 32 2d 31 2e 31 20 7b 45 6e _ARIA192-1.1 {En
0160: 63 72 79 70 74 20 41 52 49 41 31 39 32 7d 20 5c crypt ARIA192} \
0170: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 41 ..-constraints A
0180: 52 49 41 31 39 32 20 5c 0a 09 2d 62 6f 64 79 20 RIA192 \..-body
0190: 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 {binary encode h
01a0: 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 70 74 ex [tls::encrypt
01b0: 20 2d 63 69 70 68 65 72 20 41 52 49 41 31 39 32 -cipher ARIA192
01c0: 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 09 -padding 0 \...
01d0: 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 65 -key [binary de
01e0: 63 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 code hex 0001020
01f0: 33 30 34 30 35 30 36 30 37 30 38 30 39 30 61 30 30405060708090a0
0200: 62 30 63 30 64 30 65 30 66 31 30 31 31 31 32 31 b0c0d0e0f1011121
0210: 33 31 34 31 35 31 36 31 37 5d 20 5c 0a 09 09 20 314151617] \...
0220: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0230: 63 6f 64 65 20 68 65 78 20 30 30 31 31 32 32 33 code hex 0011223
0240: 33 34 34 35 35 36 36 37 37 38 38 39 39 61 61 62 3445566778899aab
0250: 62 63 63 64 64 65 65 66 66 5d 5d 7d 20 5c 0a 09 bccddeeff]]} \..
0260: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 -match exact -re
0270: 73 75 6c 74 20 32 36 34 34 39 63 31 38 30 35 64 sult 26449c1805d
0280: 62 65 37 61 61 32 35 61 34 36 38 63 65 32 36 33 be7aa25a468ce263
0290: 61 39 65 37 39 0a 0a 74 63 6c 74 65 73 74 3a 3a a9e79..tcltest::
02a0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
02b0: 6f 63 6b 5f 41 52 49 41 31 39 32 2d 31 2e 32 20 ock_ARIA192-1.2
02c0: 7b 44 65 63 72 79 70 74 20 41 52 49 41 31 39 32 {Decrypt ARIA192
02d0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
02e0: 73 20 41 52 49 41 31 39 32 20 5c 0a 09 2d 62 6f s ARIA192 \..-bo
02f0: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
0300: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
0310: 79 70 74 20 2d 63 69 70 68 65 72 20 41 52 49 41 ypt -cipher ARIA
0320: 31 39 32 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 192 -padding 0 \
0330: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
0340: 20 64 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 decode hex 0001
0350: 30 32 30 33 30 34 30 35 30 36 30 37 30 38 30 39 0203040506070809
0360: 30 61 30 62 30 63 30 64 30 65 30 66 31 30 31 31 0a0b0c0d0e0f1011
0370: 31 32 31 33 31 34 31 35 31 36 31 37 5d 20 5c 0a 121314151617] \.
0380: 09 09 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 .. -data [binary
0390: 20 64 65 63 6f 64 65 20 68 65 78 20 32 36 34 34 decode hex 2644
03a0: 39 63 31 38 30 35 64 62 65 37 61 61 32 35 61 34 9c1805dbe7aa25a4
03b0: 36 38 63 65 32 36 33 61 39 65 37 39 5d 5d 7d 20 68ce263a9e79]]}
03c0: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
03d0: 2d 72 65 73 75 6c 74 20 30 30 31 31 32 32 33 33 -result 00112233
03e0: 34 34 35 35 36 36 37 37 38 38 39 39 61 61 62 62 445566778899aabb
03f0: 63 63 64 64 65 65 66 66 0a 0a 23 20 43 6c 65 61 ccddeeff..# Clea
0400: 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 nup.::tcltest::c
0410: 6c 65 61 6e 75 70 54 65 73 74 73 0a 72 65 74 75 leanupTests.retu
0420: 72 6e 0a rn.