Artifact
fa1ce880f10a6dc3f6744b7ea13b127feadbb5469452bb749a6e72ebd29c5a27:
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 53 4d 34 2d 43 42 43 2e 74 from "SM4-CBC.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 53 4d 34 5f 43 42 43 20 5b 65 78 70 int SM4_CBC [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 53 4d 34 2d 43 42 43 5d 20 3e 20 2d 31 s] SM4-CBC] > -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 53 4d 34 2d 43 42 43 2d 31 2e 31 20 7b 45 6e _SM4-CBC-1.1 {En
0160: 63 72 79 70 74 20 53 4d 34 2d 43 42 43 7d 20 5c crypt SM4-CBC} \
0170: 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 ..-constraints S
0180: 4d 34 5f 43 42 43 20 5c 0a 09 2d 62 6f 64 79 20 M4_CBC \..-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 53 4d 34 2d 43 42 43 -cipher SM4-CBC
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 31 32 33 34 35 36 code hex 0123456
01f0: 37 38 39 41 42 43 44 45 46 46 45 44 43 42 41 39 789ABCDEFFEDCBA9
0200: 38 37 36 35 34 33 32 31 30 5d 20 5c 0a 09 09 20 876543210] \...
0210: 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 6f -iv [binary deco
0220: 64 65 20 68 65 78 20 30 30 30 31 30 32 30 33 30 de hex 000102030
0230: 34 30 35 30 36 30 37 30 38 30 39 30 41 30 42 30 405060708090A0B0
0240: 43 30 44 30 45 30 46 5d 20 5c 0a 09 09 20 2d 64 C0D0E0F] \... -d
0250: 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f ata [binary deco
0260: 64 65 20 68 65 78 20 41 41 41 41 41 41 41 41 42 de hex AAAAAAAAB
0270: 42 42 42 42 42 42 42 43 43 43 43 43 43 43 43 44 BBBBBBBCCCCCCCCD
0280: 44 44 44 44 44 44 44 45 45 45 45 45 45 45 45 46 DDDDDDDEEEEEEEEF
0290: 46 46 46 46 46 46 46 41 41 41 41 41 41 41 41 42 FFFFFFFAAAAAAAAB
02a0: 42 42 42 42 42 42 42 5d 5d 7d 20 5c 0a 09 2d 6d BBBBBBB]]} \..-m
02b0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 atch exact -resu
02c0: 6c 74 20 37 38 65 62 62 31 31 63 63 34 30 62 30 lt 78ebb11cc40b0
02d0: 61 34 38 33 31 32 61 61 65 62 32 30 34 30 32 34 a48312aaeb204024
02e0: 34 63 62 34 63 62 37 30 31 36 39 35 31 39 30 39 4cb4cb7016951909
02f0: 32 32 36 39 37 39 62 30 64 31 35 64 63 36 61 38 226979b0d15dc6a8
0300: 66 36 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 f6d..tcltest::te
0310: 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f 63 st Symetric_Bloc
0320: 6b 5f 53 4d 34 2d 43 42 43 2d 31 2e 32 20 7b 44 k_SM4-CBC-1.2 {D
0330: 65 63 72 79 70 74 20 53 4d 34 2d 43 42 43 7d 20 ecrypt SM4-CBC}
0340: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
0350: 53 4d 34 5f 43 42 43 20 5c 0a 09 2d 62 6f 64 79 SM4_CBC \..-body
0360: 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 {binary encode
0370: 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 79 70 hex [tls::decryp
0380: 74 20 2d 63 69 70 68 65 72 20 53 4d 34 2d 43 42 t -cipher SM4-CB
0390: 43 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a 09 C -padding 0 \..
03a0: 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 64 . -key [binary d
03b0: 65 63 6f 64 65 20 68 65 78 20 30 31 32 33 34 35 ecode hex 012345
03c0: 36 37 38 39 41 42 43 44 45 46 46 45 44 43 42 41 6789ABCDEFFEDCBA
03d0: 39 38 37 36 35 34 33 32 31 30 5d 20 5c 0a 09 09 9876543210] \...
03e0: 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 63 -iv [binary dec
03f0: 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 33 ode hex 00010203
0400: 30 34 30 35 30 36 30 37 30 38 30 39 30 41 30 42 0405060708090A0B
0410: 30 43 30 44 30 45 30 46 5d 20 5c 0a 09 09 20 2d 0C0D0E0F] \... -
0420: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 data [binary dec
0430: 6f 64 65 20 68 65 78 20 37 38 45 42 42 31 31 43 ode hex 78EBB11C
0440: 43 34 30 42 30 41 34 38 33 31 32 41 41 45 42 32 C40B0A48312AAEB2
0450: 30 34 30 32 34 34 43 42 34 43 42 37 30 31 36 39 040244CB4CB70169
0460: 35 31 39 30 39 32 32 36 39 37 39 42 30 44 31 35 51909226979B0D15
0470: 44 43 36 41 38 46 36 44 5d 5d 7d 20 5c 0a 09 2d DC6A8F6D]]} \..-
0480: 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 match exact -res
0490: 75 6c 74 20 61 61 61 61 61 61 61 61 62 62 62 62 ult aaaaaaaabbbb
04a0: 62 62 62 62 63 63 63 63 63 63 63 63 64 64 64 64 bbbbccccccccdddd
04b0: 64 64 64 64 65 65 65 65 65 65 65 65 66 66 66 66 ddddeeeeeeeeffff
04c0: 66 66 66 66 61 61 61 61 61 61 61 61 62 62 62 62 ffffaaaaaaaabbbb
04d0: 62 62 62 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 bbbb..tcltest::t
04e0: 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c 6f est Symetric_Blo
04f0: 63 6b 5f 53 4d 34 2d 43 42 43 2d 31 2e 33 20 7b ck_SM4-CBC-1.3 {
0500: 45 6e 63 72 79 70 74 20 53 4d 34 2d 43 42 43 7d Encrypt SM4-CBC}
0510: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0520: 20 53 4d 34 5f 43 42 43 20 5c 0a 09 2d 62 6f 64 SM4_CBC \..-bod
0530: 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 y {binary encode
0540: 20 68 65 78 20 5b 74 6c 73 3a 3a 65 6e 63 72 79 hex [tls::encry
0550: 70 74 20 2d 63 69 70 68 65 72 20 53 4d 34 2d 43 pt -cipher SM4-C
0560: 42 43 20 2d 70 61 64 64 69 6e 67 20 30 20 5c 0a BC -padding 0 \.
0570: 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 20 .. -key [binary
0580: 64 65 63 6f 64 65 20 68 65 78 20 46 45 44 43 42 decode hex FEDCB
0590: 41 39 38 37 36 35 34 33 32 31 30 30 31 32 33 34 A987654321001234
05a0: 35 36 37 38 39 41 42 43 44 45 46 5d 20 5c 0a 09 56789ABCDEF] \..
05b0: 09 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 65 . -iv [binary de
05c0: 63 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 30 code hex 0001020
05d0: 33 30 34 30 35 30 36 30 37 30 38 30 39 30 41 30 30405060708090A0
05e0: 42 30 43 30 44 30 45 30 46 5d 20 5c 0a 09 09 20 B0C0D0E0F] \...
05f0: 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 -data [binary de
0600: 63 6f 64 65 20 68 65 78 20 41 41 41 41 41 41 41 code hex AAAAAAA
0610: 41 42 42 42 42 42 42 42 42 43 43 43 43 43 43 43 ABBBBBBBBCCCCCCC
0620: 43 44 44 44 44 44 44 44 44 45 45 45 45 45 45 45 CDDDDDDDDEEEEEEE
0630: 45 46 46 46 46 46 46 46 46 41 41 41 41 41 41 41 EFFFFFFFFAAAAAAA
0640: 41 42 42 42 42 42 42 42 42 5d 5d 7d 20 5c 0a 09 ABBBBBBBB]]} \..
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 30 64 33 61 36 64 64 63 32 64 32 sult 0d3a6ddc2d2
0670: 31 63 36 39 38 38 35 37 32 31 35 35 38 37 62 37 1c698857215587b7
0680: 62 62 35 39 61 39 31 66 32 63 31 34 37 39 31 31 bb59a91f2c147911
0690: 61 34 31 34 34 36 36 35 65 31 66 61 31 64 34 30 a4144665e1fa1d40
06a0: 62 61 65 33 38 0a 0a 74 63 6c 74 65 73 74 3a 3a bae38..tcltest::
06b0: 74 65 73 74 20 53 79 6d 65 74 72 69 63 5f 42 6c test Symetric_Bl
06c0: 6f 63 6b 5f 53 4d 34 2d 43 42 43 2d 31 2e 34 20 ock_SM4-CBC-1.4
06d0: 7b 44 65 63 72 79 70 74 20 53 4d 34 2d 43 42 43 {Decrypt SM4-CBC
06e0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
06f0: 73 20 53 4d 34 5f 43 42 43 20 5c 0a 09 2d 62 6f s SM4_CBC \..-bo
0700: 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f 64 dy {binary encod
0710: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 65 63 72 e hex [tls::decr
0720: 79 70 74 20 2d 63 69 70 68 65 72 20 53 4d 34 2d ypt -cipher SM4-
0730: 43 42 43 20 2d 70 61 64 64 69 6e 67 20 30 20 5c CBC -padding 0 \
0740: 0a 09 09 20 2d 6b 65 79 20 5b 62 69 6e 61 72 79 ... -key [binary
0750: 20 64 65 63 6f 64 65 20 68 65 78 20 46 45 44 43 decode hex FEDC
0760: 42 41 39 38 37 36 35 34 33 32 31 30 30 31 32 33 BA98765432100123
0770: 34 35 36 37 38 39 41 42 43 44 45 46 5d 20 5c 0a 456789ABCDEF] \.
0780: 09 09 20 2d 69 76 20 5b 62 69 6e 61 72 79 20 64 .. -iv [binary d
0790: 65 63 6f 64 65 20 68 65 78 20 30 30 30 31 30 32 ecode hex 000102
07a0: 30 33 30 34 30 35 30 36 30 37 30 38 30 39 30 41 030405060708090A
07b0: 30 42 30 43 30 44 30 45 30 46 5d 20 5c 0a 09 09 0B0C0D0E0F] \...
07c0: 20 2d 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 -data [binary d
07d0: 65 63 6f 64 65 20 68 65 78 20 30 44 33 41 36 44 ecode hex 0D3A6D
07e0: 44 43 32 44 32 31 43 36 39 38 38 35 37 32 31 35 DC2D21C698857215
07f0: 35 38 37 42 37 42 42 35 39 41 39 31 46 32 43 31 587B7BB59A91F2C1
0800: 34 37 39 31 31 41 34 31 34 34 36 36 35 45 31 46 47911A4144665E1F
0810: 41 31 44 34 30 42 41 45 33 38 5d 5d 7d 20 5c 0a A1D40BAE38]]} \.
0820: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0830: 65 73 75 6c 74 20 61 61 61 61 61 61 61 61 62 62 esult aaaaaaaabb
0840: 62 62 62 62 62 62 63 63 63 63 63 63 63 63 64 64 bbbbbbccccccccdd
0850: 64 64 64 64 64 64 65 65 65 65 65 65 65 65 66 66 ddddddeeeeeeeeff
0860: 66 66 66 66 66 66 61 61 61 61 61 61 61 61 62 62 ffffffaaaaaaaabb
0870: 62 62 62 62 62 62 0a 0a 23 20 43 6c 65 61 6e 75 bbbbbb..# Cleanu
0880: 70 0a 3a 3a 74 63 6c 74 65 73 74 3a 3a 63 6c 65 p.::tcltest::cle
0890: 61 6e 75 70 54 65 73 74 73 0a 72 65 74 75 72 6e anupTests.return
08a0: 0a .