Hex Artifact Content

Artifact 629c4d4319b2bb79d01113ff4e3a183e7c6a350add574938cbdf456ec096cd4e:


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 70 61 63 6b 61 67 65 20  A1.txt".package 
0030: 72 65 71 75 69 72 65 20 74 6c 73 0a 70 61 63 6b  require tls.pack
0040: 61 67 65 20 72 65 71 75 69 72 65 20 74 63 6c 74  age require tclt
0050: 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  est..tcltest::te
0060: 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 50 42 4b  stConstraint PBK
0070: 44 46 32 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61  DF2 [expr {[lsea
0080: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73  rch -nocase [tls
0090: 3a 3a 6b 64 66 73 5d 20 50 42 4b 44 46 32 5d 20  ::kdfs] PBKDF2] 
00a0: 3e 20 2d 31 7d 5d 0a 74 63 6c 74 65 73 74 3a 3a  > -1}].tcltest::
00b0: 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20 53  testConstraint S
00c0: 48 41 31 20 5b 65 78 70 72 20 7b 5b 6c 73 65 61  HA1 [expr {[lsea
00d0: 72 63 68 20 2d 6e 6f 63 61 73 65 20 5b 74 6c 73  rch -nocase [tls
00e0: 3a 3a 64 69 67 65 73 74 73 5d 20 53 48 41 31 5d  ::digests] SHA1]
00f0: 20 3e 20 2d 31 7d 5d 0a 0a 74 63 6c 74 65 73 74   > -1}]..tcltest
0100: 3a 3a 74 65 73 74 20 4b 44 46 5f 50 42 4b 44 46  ::test KDF_PBKDF
0110: 32 2d 53 48 41 31 2d 31 2e 31 20 7b 50 42 4b 44  2-SHA1-1.1 {PBKD
0120: 46 32 2d 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e  F2-SHA1} \..-con
0130: 73 74 72 61 69 6e 74 73 20 7b 50 42 4b 44 46 32  straints {PBKDF2
0140: 20 53 48 41 31 7d 20 5c 0a 09 2d 73 65 74 75 70   SHA1} \..-setup
0150: 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69   {} \..-body {bi
0160: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
0170: 5b 74 6c 73 3a 3a 70 62 6b 64 66 32 20 2d 64 69  [tls::pbkdf2 -di
0180: 67 65 73 74 20 53 48 41 31 20 2d 70 61 73 73 77  gest SHA1 -passw
0190: 6f 72 64 20 22 70 61 73 73 77 6f 72 64 22 20 2d  ord "password" -
01a0: 73 61 6c 74 20 22 73 61 6c 74 22 20 2d 69 74 65  salt "salt" -ite
01b0: 72 61 74 69 6f 6e 73 20 31 20 2d 73 69 7a 65 20  rations 1 -size 
01c0: 32 30 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  20]} \..-match e
01d0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 30 63 36  xact -result 0c6
01e0: 30 63 38 30 66 39 36 31 66 30 65 37 31 66 33 61  0c80f961f0e71f3a
01f0: 39 62 35 32 34 61 66 36 30 31 32 30 36 32 66 65  9b524af6012062fe
0200: 30 33 37 61 36 0a 0a 74 63 6c 74 65 73 74 3a 3a  037a6..tcltest::
0210: 74 65 73 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d  test KDF_PBKDF2-
0220: 53 48 41 31 2d 31 2e 32 20 7b 50 42 4b 44 46 32  SHA1-1.2 {PBKDF2
0230: 2d 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74  -SHA1} \..-const
0240: 72 61 69 6e 74 73 20 7b 50 42 4b 44 46 32 20 53  raints {PBKDF2 S
0250: 48 41 31 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b  HA1} \..-setup {
0260: 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61  } \..-body {bina
0270: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74  ry encode hex [t
0280: 6c 73 3a 3a 70 62 6b 64 66 32 20 2d 64 69 67 65  ls::pbkdf2 -dige
0290: 73 74 20 53 48 41 31 20 2d 70 61 73 73 77 6f 72  st SHA1 -passwor
02a0: 64 20 22 70 61 73 73 77 6f 72 64 22 20 2d 73 61  d "password" -sa
02b0: 6c 74 20 22 73 61 6c 74 22 20 2d 69 74 65 72 61  lt "salt" -itera
02c0: 74 69 6f 6e 73 20 32 20 2d 73 69 7a 65 20 32 30  tions 2 -size 20
02d0: 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  ]} \..-match exa
02e0: 63 74 20 2d 72 65 73 75 6c 74 20 65 61 36 63 30  ct -result ea6c0
02f0: 31 34 64 63 37 32 64 36 66 38 63 63 64 31 65 64  14dc72d6f8ccd1ed
0300: 39 32 61 63 65 31 64 34 31 66 30 64 38 64 65 38  92ace1d41f0d8de8
0310: 39 35 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  957..tcltest::te
0320: 73 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d 53 48  st KDF_PBKDF2-SH
0330: 41 31 2d 31 2e 33 20 7b 50 42 4b 44 46 32 2d 53  A1-1.3 {PBKDF2-S
0340: 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  HA1} \..-constra
0350: 69 6e 74 73 20 7b 50 42 4b 44 46 32 20 53 48 41  ints {PBKDF2 SHA
0360: 31 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d 20  1} \..-setup {} 
0370: 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72 79  \..-body {binary
0380: 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73   encode hex [tls
0390: 3a 3a 70 62 6b 64 66 32 20 2d 64 69 67 65 73 74  ::pbkdf2 -digest
03a0: 20 53 48 41 31 20 2d 70 61 73 73 77 6f 72 64 20   SHA1 -password 
03b0: 22 70 61 73 73 77 6f 72 64 22 20 2d 73 61 6c 74  "password" -salt
03c0: 20 22 73 61 6c 74 22 20 2d 69 74 65 72 61 74 69   "salt" -iterati
03d0: 6f 6e 73 20 34 30 39 36 20 2d 73 69 7a 65 20 32  ons 4096 -size 2
03e0: 30 5d 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78  0]} \..-match ex
03f0: 61 63 74 20 2d 72 65 73 75 6c 74 20 34 62 30 30  act -result 4b00
0400: 37 39 30 31 62 37 36 35 34 38 39 61 62 65 61 64  7901b765489abead
0410: 34 39 64 39 32 36 66 37 32 31 64 30 36 35 61 34  49d926f721d065a4
0420: 32 39 63 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  29c1..tcltest::t
0430: 65 73 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d 53  est KDF_PBKDF2-S
0440: 48 41 31 2d 31 2e 34 20 7b 50 42 4b 44 46 32 2d  HA1-1.4 {PBKDF2-
0450: 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  SHA1} \..-constr
0460: 61 69 6e 74 73 20 7b 50 42 4b 44 46 32 20 53 48  aints {PBKDF2 SH
0470: 41 31 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d  A1} \..-setup {}
0480: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
0490: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
04a0: 73 3a 3a 70 62 6b 64 66 32 20 2d 64 69 67 65 73  s::pbkdf2 -diges
04b0: 74 20 53 48 41 31 20 2d 70 61 73 73 77 6f 72 64  t SHA1 -password
04c0: 20 22 70 61 73 73 77 6f 72 64 22 20 2d 73 61 6c   "password" -sal
04d0: 74 20 22 73 61 6c 74 22 20 2d 69 74 65 72 61 74  t "salt" -iterat
04e0: 69 6f 6e 73 20 31 36 37 37 37 32 31 36 20 2d 73  ions 16777216 -s
04f0: 69 7a 65 20 32 30 5d 7d 20 5c 0a 09 2d 6d 61 74  ize 20]} \..-mat
0500: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0510: 20 65 65 66 65 33 64 36 31 63 64 34 64 61 34 65   eefe3d61cd4da4e
0520: 34 65 39 39 34 35 62 33 64 36 62 61 32 31 35 38  4e9945b3d6ba2158
0530: 63 32 36 33 34 65 39 38 34 0a 0a 74 63 6c 74 65  c2634e984..tclte
0540: 73 74 3a 3a 74 65 73 74 20 4b 44 46 5f 50 42 4b  st::test KDF_PBK
0550: 44 46 32 2d 53 48 41 31 2d 31 2e 35 20 7b 50 42  DF2-SHA1-1.5 {PB
0560: 4b 44 46 32 2d 53 48 41 31 7d 20 5c 0a 09 2d 63  KDF2-SHA1} \..-c
0570: 6f 6e 73 74 72 61 69 6e 74 73 20 7b 50 42 4b 44  onstraints {PBKD
0580: 46 32 20 53 48 41 31 7d 20 5c 0a 09 2d 73 65 74  F2 SHA1} \..-set
0590: 75 70 20 7b 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b  up {} \..-body {
05a0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65  binary encode he
05b0: 78 20 5b 74 6c 73 3a 3a 70 62 6b 64 66 32 20 2d  x [tls::pbkdf2 -
05c0: 64 69 67 65 73 74 20 53 48 41 31 20 2d 70 61 73  digest SHA1 -pas
05d0: 73 77 6f 72 64 20 22 70 61 73 73 77 6f 72 64 50  sword "passwordP
05e0: 41 53 53 57 4f 52 44 70 61 73 73 77 6f 72 64 22  ASSWORDpassword"
05f0: 20 2d 73 61 6c 74 20 22 73 61 6c 74 53 41 4c 54   -salt "saltSALT
0600: 73 61 6c 74 53 41 4c 54 73 61 6c 74 53 41 4c 54  saltSALTsaltSALT
0610: 73 61 6c 74 53 41 4c 54 73 61 6c 74 22 20 2d 69  saltSALTsalt" -i
0620: 74 65 72 61 74 69 6f 6e 73 20 34 30 39 36 20 2d  terations 4096 -
0630: 73 69 7a 65 20 32 35 5d 7d 20 5c 0a 09 2d 6d 61  size 25]} \..-ma
0640: 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c  tch exact -resul
0650: 74 20 33 64 32 65 65 63 34 66 65 34 31 63 38 34  t 3d2eec4fe41c84
0660: 39 62 38 30 63 38 64 38 33 36 36 32 63 30 65 34  9b80c8d83662c0e4
0670: 34 61 38 62 32 39 31 61 39 36 34 63 66 32 66 30  4a8b291a964cf2f0
0680: 37 30 33 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74  7038..tcltest::t
0690: 65 73 74 20 4b 44 46 5f 50 42 4b 44 46 32 2d 53  est KDF_PBKDF2-S
06a0: 48 41 31 2d 31 2e 36 20 7b 50 42 4b 44 46 32 2d  HA1-1.6 {PBKDF2-
06b0: 53 48 41 31 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  SHA1} \..-constr
06c0: 61 69 6e 74 73 20 7b 50 42 4b 44 46 32 20 53 48  aints {PBKDF2 SH
06d0: 41 31 7d 20 5c 0a 09 2d 73 65 74 75 70 20 7b 7d  A1} \..-setup {}
06e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 62 69 6e 61 72   \..-body {binar
06f0: 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c  y encode hex [tl
0700: 73 3a 3a 70 62 6b 64 66 32 20 2d 64 69 67 65 73  s::pbkdf2 -diges
0710: 74 20 53 48 41 31 20 2d 70 61 73 73 77 6f 72 64  t SHA1 -password
0720: 20 22 70 61 73 73 5c 30 77 6f 72 64 22 20 2d 73   "pass\0word" -s
0730: 61 6c 74 20 22 73 61 5c 30 6c 74 22 20 2d 69 74  alt "sa\0lt" -it
0740: 65 72 61 74 69 6f 6e 73 20 34 30 39 36 20 2d 73  erations 4096 -s
0750: 69 7a 65 20 31 36 5d 7d 20 5c 0a 09 2d 6d 61 74  ize 16]} \..-mat
0760: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0770: 20 35 36 66 61 36 61 61 37 35 35 34 38 30 39 39   56fa6aa75548099
0780: 64 63 63 33 37 64 37 66 30 33 34 32 35 65 30 63  dcc37d7f03425e0c
0790: 33 0a 0a 23 20 43 6c 65 61 6e 75 70 0a 3a 3a 74  3..# Cleanup.::t
07a0: 63 6c 74 65 73 74 3a 3a 63 6c 65 61 6e 75 70 54  cltest::cleanupT
07b0: 65 73 74 73 0a 72 65 74 75 72 6e 0a              ests.return.