Artifact
b929ed5d95b109c0b11f22dd05901d4d8af367b0e0692bc4f5c1acc4bf3c2dfc:
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 50 42 4b 44 46 32 2d 53 48 from "PBKDF2-SH
0020: 41 31 2e 74 78 74 22 0a 6c 61 70 70 65 6e 64 20 A1.txt".lappend
0030: 61 75 74 6f 5f 70 61 74 68 20 5b 66 69 6c 65 20 auto_path [file
0040: 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 dirname [file di
0050: 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e rname [file dirn
0060: 61 6d 65 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d ame [file dirnam
0070: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b 70 77 e [file join [pw
0080: 64 5d 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d d] [info script]
0090: 5d 5d 5d 5d 5d 0a 70 61 63 6b 61 67 65 20 72 65 ]]]]].package re
00a0: 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b 61 67 quire tls.packag
00b0: 65 20 72 65 71 75 69 72 65 20 74 63 6c 74 65 73 e require tcltes
00c0: 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 t..tcltest::test
00d0: 43 6f 6e 73 74 72 61 69 6e 74 20 50 42 4b 44 46 Constraint PBKDF
00e0: 32 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 2 [expr {[lsearc
00f0: 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a h -nocase [tls::
0100: 6b 64 66 73 5d 20 50 42 4b 44 46 32 5d 20 3e 20 kdfs] PBKDF2] >
0110: 2d 31 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a 74 65 -1}].tcltest::te
0120: 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 53 48 41 stConstraint SHA
0130: 31 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61 72 63 1 [expr {[lsearc
0140: 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73 3a 3a h -nocase [tls::
0150: 64 69 67 65 73 74 73 5d 20 53 48 41 31 5d 20 3e digests] SHA1] >
0160: 20 2d 31 7d 5d 0a 63 61 74 63 68 20 7b 74 6c 73 -1}].catch {tls
0170: 3a 3a 70 72 6f 76 69 64 65 72 20 6c 65 67 61 63 ::provider legac
0180: 79 7d 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 y}..tcltest::tes
0190: 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d 53 48 41 t KDF_PBKDF2-SHA
01a0: 31 2d 31 2e 31 20 7b 50 42 4b 44 46 32 2d 53 48 1-1.1 {PBKDF2-SH
01b0: 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 A1} \..-constrai
01c0: 6e 74 73 20 7b 50 42 4b 44 46 32 20 53 48 41 31 nts {PBKDF2 SHA1
01d0: 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c } \..-setup {} \
01e0: 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 ..-body {binary
01f0: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
0200: 3a 70 62 6b 64 66 32 20 2d 64 69 67 65 73 74 20 :pbkdf2 -digest
0210: 53 48 41 31 20 2d 70 61 73 73 77 6f 72 64 20 22 SHA1 -password "
0220: 70 61 73 73 77 6f 72 64 22 20 2d 73 61 6c 74 20 password" -salt
0230: 22 73 61 6c 74 22 20 2d 69 74 65 72 61 74 69 6f "salt" -iteratio
0240: 6e 73 20 31 20 2d 73 69 7a 65 20 32 30 5d 7d 20 ns 1 -size 20]}
0250: 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 \..-match exact
0260: 2d 72 65 73 75 6c 74 20 30 63 36 30 63 38 30 66 -result 0c60c80f
0270: 39 36 31 66 30 65 37 31 66 33 61 39 62 35 32 34 961f0e71f3a9b524
0280: 61 66 36 30 31 32 30 36 32 66 65 30 33 37 61 36 af6012062fe037a6
0290: 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 ..tcltest::test
02a0: 4b 44 46 5f 50 42 4b 44 46 32 2d 53 48 41 31 2d KDF_PBKDF2-SHA1-
02b0: 31 2e 32 20 7b 50 42 4b 44 46 32 2d 53 48 41 31 1.2 {PBKDF2-SHA1
02c0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 } \..-constraint
02d0: 73 20 7b 50 42 4b 44 46 32 20 53 48 41 31 7d 20 s {PBKDF2 SHA1}
02e0: 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 \..-setup {} \..
02f0: 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e -body {binary en
0300: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 70 code hex [tls::p
0310: 62 6b 64 66 32 20 2d 64 69 67 65 73 74 20 53 48 bkdf2 -digest SH
0320: 41 31 20 2d 70 61 73 73 77 6f 72 64 20 22 70 61 A1 -password "pa
0330: 73 73 77 6f 72 64 22 20 2d 73 61 6c 74 20 22 73 ssword" -salt "s
0340: 61 6c 74 22 20 2d 69 74 65 72 61 74 69 6f 6e 73 alt" -iterations
0350: 20 32 20 2d 73 69 7a 65 20 32 30 5d 7d 20 5c 0a 2 -size 20]} \.
0360: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 .-match exact -r
0370: 65 73 75 6c 74 20 65 61 36 63 30 31 34 64 63 37 esult ea6c014dc7
0380: 32 64 36 66 38 63 63 64 31 65 64 39 32 61 63 65 2d6f8ccd1ed92ace
0390: 31 64 34 31 66 30 64 38 64 65 38 39 35 37 0a 0a 1d41f0d8de8957..
03a0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4b 44 tcltest::test KD
03b0: 46 5f 50 42 4b 44 46 32 2d 53 48 41 31 2d 31 2e F_PBKDF2-SHA1-1.
03c0: 33 20 7b 50 42 4b 44 46 32 2d 53 48 41 31 7d 20 3 {PBKDF2-SHA1}
03d0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 \..-constraints
03e0: 7b 50 42 4b 44 46 32 20 53 48 41 31 7d 20 5c 0a {PBKDF2 SHA1} \.
03f0: 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d 62 .-setup {} \..-b
0400: 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 6f ody {binary enco
0410: 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 70 62 6b de hex [tls::pbk
0420: 64 66 32 20 2d 64 69 67 65 73 74 20 53 48 41 31 df2 -digest SHA1
0430: 20 2d 70 61 73 73 77 6f 72 64 20 22 70 61 73 73 -password "pass
0440: 77 6f 72 64 22 20 2d 73 61 6c 74 20 22 73 61 6c word" -salt "sal
0450: 74 22 20 2d 69 74 65 72 61 74 69 6f 6e 73 20 34 t" -iterations 4
0460: 30 39 36 20 2d 73 69 7a 65 20 32 30 5d 7d 20 5c 096 -size 20]} \
0470: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d ..-match exact -
0480: 72 65 73 75 6c 74 20 34 62 30 30 37 39 30 31 62 result 4b007901b
0490: 37 36 35 34 38 39 61 62 65 61 64 34 39 64 39 32 765489abead49d92
04a0: 36 66 37 32 31 64 30 36 35 61 34 32 39 63 31 0a 6f721d065a429c1.
04b0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4b .tcltest::test K
04c0: 44 46 5f 50 42 4b 44 46 32 2d 53 48 41 31 2d 31 DF_PBKDF2-SHA1-1
04d0: 2e 34 20 7b 50 42 4b 44 46 32 2d 53 48 41 31 7d .4 {PBKDF2-SHA1}
04e0: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
04f0: 20 7b 50 42 4b 44 46 32 20 53 48 41 31 7d 20 5c {PBKDF2 SHA1} \
0500: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0510: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
0520: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 70 62 ode hex [tls::pb
0530: 6b 64 66 32 20 2d 64 69 67 65 73 74 20 53 48 41 kdf2 -digest SHA
0540: 31 20 2d 70 61 73 73 77 6f 72 64 20 22 70 61 73 1 -password "pas
0550: 73 77 6f 72 64 22 20 2d 73 61 6c 74 20 22 73 61 sword" -salt "sa
0560: 6c 74 22 20 2d 69 74 65 72 61 74 69 6f 6e 73 20 lt" -iterations
0570: 31 36 37 37 37 32 31 36 20 2d 73 69 7a 65 20 32 16777216 -size 2
0580: 30 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 0]} \..-match ex
0590: 61 63 74 20 2d 72 65 73 75 6c 74 20 65 65 66 65 act -result eefe
05a0: 33 64 36 31 63 64 34 64 61 34 65 34 65 39 39 34 3d61cd4da4e4e994
05b0: 35 62 33 64 36 62 61 32 31 35 38 63 32 36 33 34 5b3d6ba2158c2634
05c0: 65 39 38 34 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 e984..tcltest::t
05d0: 65 73 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d 53 est KDF_PBKDF2-S
05e0: 48 41 31 2d 31 2e 35 20 7b 50 42 4b 44 46 32 2d HA1-1.5 {PBKDF2-
05f0: 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 SHA1} \..-constr
0600: 61 69 6e 74 73 20 7b 50 42 4b 44 46 32 20 53 48 aints {PBKDF2 SH
0610: 41 31 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d A1} \..-setup {}
0620: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 \..-body {binar
0630: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c y encode hex [tl
0640: 73 3a 3a 70 62 6b 64 66 32 20 2d 64 69 67 65 73 s::pbkdf2 -diges
0650: 74 20 53 48 41 31 20 2d 70 61 73 73 77 6f 72 64 t SHA1 -password
0660: 20 22 70 61 73 73 77 6f 72 64 50 41 53 53 57 4f "passwordPASSWO
0670: 52 44 70 61 73 73 77 6f 72 64 22 20 2d 73 61 6c RDpassword" -sal
0680: 74 20 22 73 61 6c 74 53 41 4c 54 73 61 6c 74 53 t "saltSALTsaltS
0690: 41 4c 54 73 61 6c 74 53 41 4c 54 73 61 6c 74 53 ALTsaltSALTsaltS
06a0: 41 4c 54 73 61 6c 74 22 20 2d 69 74 65 72 61 74 ALTsalt" -iterat
06b0: 69 6f 6e 73 20 34 30 39 36 20 2d 73 69 7a 65 20 ions 4096 -size
06c0: 32 35 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 25]} \..-match e
06d0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 33 64 32 xact -result 3d2
06e0: 65 65 63 34 66 65 34 31 63 38 34 39 62 38 30 63 eec4fe41c849b80c
06f0: 38 64 38 33 36 36 32 63 30 65 34 34 61 38 62 32 8d83662c0e44a8b2
0700: 39 31 61 39 36 34 63 66 32 66 30 37 30 33 38 0a 91a964cf2f07038.
0710: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 4b .tcltest::test K
0720: 44 46 5f 50 42 4b 44 46 32 2d 53 48 41 31 2d 31 DF_PBKDF2-SHA1-1
0730: 2e 36 20 7b 50 42 4b 44 46 32 2d 53 48 41 31 7d .6 {PBKDF2-SHA1}
0740: 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 \..-constraints
0750: 20 7b 50 42 4b 44 46 32 20 53 48 41 31 7d 20 5c {PBKDF2 SHA1} \
0760: 0a 09 2d 73 65 74 75 70 20 7b 7d 20 5c 0a 09 2d ..-setup {} \..-
0770: 62 6f 64 79 20 7b 62 69 6e 61 72 79 20 65 6e 63 body {binary enc
0780: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 70 62 ode hex [tls::pb
0790: 6b 64 66 32 20 2d 64 69 67 65 73 74 20 53 48 41 kdf2 -digest SHA
07a0: 31 20 2d 70 61 73 73 77 6f 72 64 20 22 70 61 73 1 -password "pas
07b0: 73 5c 30 77 6f 72 64 22 20 2d 73 61 6c 74 20 22 s\0word" -salt "
07c0: 73 61 5c 30 6c 74 22 20 2d 69 74 65 72 61 74 69 sa\0lt" -iterati
07d0: 6f 6e 73 20 34 30 39 36 20 2d 73 69 7a 65 20 31 ons 4096 -size 1
07e0: 36 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 6]} \..-match ex
07f0: 61 63 74 20 2d 72 65 73 75 6c 74 20 35 36 66 61 act -result 56fa
0800: 36 61 61 37 35 35 34 38 30 39 39 64 63 63 33 37 6aa75548099dcc37
0810: 64 37 66 30 33 34 32 35 65 30 63 33 0a 0a 23 20 d7f03425e0c3..#
0820: 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65 73 Cleanup.::tcltes
0830: 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73 0a t::cleanupTests.
0840: 72 65 74 75 72 6e 0a return.