Hex Artifact Content

Artifact 0720d3697c39cef3972d52dd6769a7ae4491ac13e0e7f5cdc688aa43d562d3a8:


0000: 23 20 47 72 6f 75 70 2c 4e 61 6d 65 2c 43 6f 6e  # Group,Name,Con
0010: 73 74 72 61 69 6e 74 73 2c 53 65 74 75 70 2c 42  straints,Setup,B
0020: 6f 64 79 2c 43 6c 65 61 6e 75 70 2c 4d 61 74 63  ody,Cleanup,Matc
0030: 68 2c 52 65 73 75 6c 74 2c 4f 75 74 70 75 74 2c  h,Result,Output,
0040: 45 72 72 6f 72 20 4f 75 74 70 75 74 2c 52 65 74  Error Output,Ret
0050: 75 72 6e 20 43 6f 64 65 73 0a 63 6f 6d 6d 61 6e  urn Codes.comman
0060: 64 2c 70 61 63 6b 61 67 65 20 72 65 71 75 69 72  d,package requir
0070: 65 20 74 6c 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63  e tls,,,,,,,,,.c
0080: 6f 6d 6d 61 6e 64 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c  ommand,,,,,,,,,,
0090: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 4d 61 6b 65 20  .command,# Make 
00a0: 73 75 72 65 20 70 61 74 68 20 69 6e 63 6c 75 64  sure path includ
00b0: 65 73 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 20 4f  es location of O
00c0: 70 65 6e 53 53 4c 20 65 78 65 63 75 74 61 62 6c  penSSL executabl
00d0: 65 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61  e,,,,,,,,,.comma
00e0: 6e 64 2c 22 69 66 20 7b 5b 69 6e 66 6f 20 65 78  nd,"if {[info ex
00f0: 69 73 74 73 20 3a 3a 65 6e 76 28 4f 50 45 4e 53  ists ::env(OPENS
0100: 53 4c 29 5d 7d 20 7b 73 65 74 20 3a 3a 65 6e 76  SL)]} {set ::env
0110: 28 70 61 74 68 29 20 5b 73 74 72 69 6e 67 20 63  (path) [string c
0120: 61 74 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 24 3a  at [file join $:
0130: 3a 65 6e 76 28 4f 50 45 4e 53 53 4c 29 20 62 69  :env(OPENSSL) bi
0140: 6e 5d 20 22 22 3b 22 22 20 24 3a 3a 65 6e 76 28  n] "";"" $::env(
0150: 70 61 74 68 29 5d 7d 22 2c 2c 2c 2c 2c 2c 2c 2c  path)]}",,,,,,,,
0160: 2c 0a 63 6f 6d 6d 61 6e 64 2c 2c 2c 2c 2c 2c 2c  ,.command,,,,,,,
0170: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 43 6f  ,,,.command,# Co
0180: 6e 73 74 72 61 69 6e 74 73 2c 2c 2c 2c 2c 2c 2c  nstraints,,,,,,,
0190: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 73 65 74 20 70  ,,.command,set p
01a0: 72 6f 74 6f 63 6f 6c 73 20 5b 6c 69 73 74 20 73  rotocols [list s
01b0: 73 6c 32 20 73 73 6c 33 20 74 6c 73 31 20 74 6c  sl2 ssl3 tls1 tl
01c0: 73 31 2e 31 20 74 6c 73 31 2e 32 20 74 6c 73 31  s1.1 tls1.2 tls1
01d0: 2e 33 5d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d  .3],,,,,,,,,.com
01e0: 6d 61 6e 64 2c 66 6f 72 65 61 63 68 20 70 72 6f  mand,foreach pro
01f0: 74 6f 63 6f 6c 20 24 70 72 6f 74 6f 63 6f 6c 73  tocol $protocols
0200: 20 7b 3a 3a 74 63 6c 74 65 73 74 3a 3a 74 65 73   {::tcltest::tes
0210: 74 43 6f 6e 73 74 72 61 69 6e 74 20 24 70 72 6f  tConstraint $pro
0220: 74 6f 63 6f 6c 20 30 7d 2c 2c 2c 2c 2c 2c 2c 2c  tocol 0},,,,,,,,
0230: 2c 0a 63 6f 6d 6d 61 6e 64 2c 66 6f 72 65 61 63  ,.command,foreac
0240: 68 20 70 72 6f 74 6f 63 6f 6c 20 5b 3a 3a 74 6c  h protocol [::tl
0250: 73 3a 3a 70 72 6f 74 6f 63 6f 6c 73 5d 20 7b 3a  s::protocols] {:
0260: 3a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f  :tcltest::testCo
0270: 6e 73 74 72 61 69 6e 74 20 24 70 72 6f 74 6f 63  nstraint $protoc
0280: 6f 6c 20 31 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63  ol 1},,,,,,,,,.c
0290: 6f 6d 6d 61 6e 64 2c 22 3a 3a 74 63 6c 74 65 73  ommand,"::tcltes
02a0: 74 3a 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e  t::testConstrain
02b0: 74 20 4f 70 65 6e 53 53 4c 20 5b 73 74 72 69 6e  t OpenSSL [strin
02c0: 67 20 6d 61 74 63 68 20 22 22 4f 70 65 6e 53 53  g match ""OpenSS
02d0: 4c 2a 22 22 20 5b 3a 3a 74 6c 73 3a 3a 76 65 72  L*"" [::tls::ver
02e0: 73 69 6f 6e 5d 5d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c  sion]]",,,,,,,,,
02f0: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d  .,,,,,,,,,,.comm
0300: 61 6e 64 2c 23 20 48 65 6c 70 65 72 20 66 75 6e  and,# Helper fun
0310: 63 74 69 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  ctions,,,,,,,,,.
0320: 63 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 6c 63  command,"proc lc
0330: 6f 6d 70 61 72 65 20 7b 6c 69 73 74 31 20 6c 69  ompare {list1 li
0340: 73 74 32 7d 20 7b 73 65 74 20 6d 20 22 22 22 22  st2} {set m """"
0350: 3b 73 65 74 20 75 20 22 22 22 22 3b 66 6f 72 65  ;set u """";fore
0360: 61 63 68 20 69 20 24 6c 69 73 74 31 20 7b 69 66  ach i $list1 {if
0370: 20 7b 24 69 20 6e 69 20 24 6c 69 73 74 32 7d 20   {$i ni $list2} 
0380: 7b 6c 61 70 70 65 6e 64 20 6d 20 24 69 7d 7d 3b  {lappend m $i}};
0390: 66 6f 72 65 61 63 68 20 69 20 24 6c 69 73 74 32  foreach i $list2
03a0: 20 7b 69 66 20 7b 24 69 20 6e 69 20 24 6c 69 73   {if {$i ni $lis
03b0: 74 31 7d 20 7b 6c 61 70 70 65 6e 64 20 75 20 24  t1} {lappend u $
03c0: 69 7d 7d 3b 72 65 74 75 72 6e 20 5b 6c 69 73 74  i}};return [list
03d0: 20 22 22 6d 69 73 73 69 6e 67 22 22 20 24 6d 20   ""missing"" $m 
03e0: 22 22 75 6e 65 78 70 65 63 74 65 64 22 22 20 24  ""unexpected"" $
03f0: 75 5d 7d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f  u]}",,,,,,,,,.co
0400: 6d 6d 61 6e 64 2c 70 72 6f 63 20 65 78 65 63 5f  mmand,proc exec_
0410: 67 65 74 20 7b 64 65 6c 69 6d 20 61 72 67 73 7d  get {delim args}
0420: 20 7b 72 65 74 75 72 6e 20 5b 73 70 6c 69 74 20   {return [split 
0430: 5b 65 78 65 63 20 6f 70 65 6e 73 73 6c 20 7b 2a  [exec openssl {*
0440: 7d 24 61 72 67 73 5d 20 24 64 65 6c 69 6d 5d 7d  }$args] $delim]}
0450: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e  ,,,,,,,,,.comman
0460: 64 2c 22 70 72 6f 63 20 65 78 65 63 5f 67 65 74  d,"proc exec_get
0470: 5f 63 69 70 68 65 72 73 20 7b 7d 20 7b 73 65 74  _ciphers {} {set
0480: 20 6c 69 73 74 20 5b 6c 69 73 74 5d 3b 73 65 74   list [list];set
0490: 20 64 61 74 61 20 5b 65 78 65 63 20 6f 70 65 6e   data [exec open
04a0: 73 73 6c 20 6c 69 73 74 20 2d 63 69 70 68 65 72  ssl list -cipher
04b0: 2d 61 6c 67 6f 72 69 74 68 6d 73 5d 3b 66 6f 72  -algorithms];for
04c0: 65 61 63 68 20 6c 69 6e 65 20 5b 73 70 6c 69 74  each line [split
04d0: 20 24 64 61 74 61 20 22 22 5c 6e 22 22 5d 20 7b   $data ""\n""] {
04e0: 66 6f 72 65 61 63 68 20 7b 63 69 70 68 65 72 20  foreach {cipher 
04f0: 6e 75 6c 6c 20 61 6c 69 61 73 7d 20 5b 73 70 6c  null alias} [spl
0500: 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20  it [string trim 
0510: 24 6c 69 6e 65 5d 5d 20 7b 6c 61 70 70 65 6e 64  $line]] {lappend
0520: 20 6c 69 73 74 20 5b 73 74 72 69 6e 67 20 74 6f   list [string to
0530: 6c 6f 77 65 72 20 24 63 69 70 68 65 72 5d 7d 7d  lower $cipher]}}
0540: 3b 72 65 74 75 72 6e 20 5b 6c 73 6f 72 74 20 2d  ;return [lsort -
0550: 75 6e 69 71 75 65 20 24 6c 69 73 74 5d 7d 22 2c  unique $list]}",
0560: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64  ,,,,,,,,.command
0570: 2c 22 70 72 6f 63 20 65 78 65 63 5f 67 65 74 5f  ,"proc exec_get_
0580: 64 69 67 65 73 74 73 20 7b 7d 20 7b 73 65 74 20  digests {} {set 
0590: 6c 69 73 74 20 5b 6c 69 73 74 5d 3b 73 65 74 20  list [list];set 
05a0: 64 61 74 61 20 5b 65 78 65 63 20 6f 70 65 6e 73  data [exec opens
05b0: 73 6c 20 64 67 73 74 20 2d 6c 69 73 74 5d 3b 66  sl dgst -list];f
05c0: 6f 72 65 61 63 68 20 6c 69 6e 65 20 5b 73 70 6c  oreach line [spl
05d0: 69 74 20 24 64 61 74 61 20 22 22 5c 6e 22 22 5d  it $data ""\n""]
05e0: 20 7b 66 6f 72 65 61 63 68 20 64 69 67 65 73 74   {foreach digest
05f0: 20 24 6c 69 6e 65 20 7b 69 66 20 7b 5b 73 74 72   $line {if {[str
0600: 69 6e 67 20 6d 61 74 63 68 20 22 22 2d 2a 22 22  ing match ""-*""
0610: 20 24 64 69 67 65 73 74 5d 7d 20 7b 6c 61 70 70   $digest]} {lapp
0620: 65 6e 64 20 6c 69 73 74 20 5b 73 74 72 69 6e 67  end list [string
0630: 20 74 72 69 6d 6c 65 66 74 20 24 64 69 67 65 73   trimleft $diges
0640: 74 20 22 22 2d 22 22 5d 7d 7d 7d 3b 72 65 74 75  t ""-""]}}};retu
0650: 72 6e 20 5b 6c 73 6f 72 74 20 24 6c 69 73 74 5d  rn [lsort $list]
0660: 7d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d  }",,,,,,,,,.comm
0670: 61 6e 64 2c 70 72 6f 63 20 6c 69 73 74 5f 74 6f  and,proc list_to
0680: 6c 6f 77 65 72 20 7b 6c 69 73 74 7d 20 7b 73 65  lower {list} {se
0690: 74 20 72 65 73 75 6c 74 20 5b 6c 69 73 74 5d 3b  t result [list];
06a0: 66 6f 72 65 61 63 68 20 65 6c 65 6d 65 6e 74 20  foreach element 
06b0: 24 6c 69 73 74 20 7b 6c 61 70 70 65 6e 64 20 72  $list {lappend r
06c0: 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 74 6f  esult [string to
06d0: 6c 6f 77 65 72 20 24 65 6c 65 6d 65 6e 74 5d 7d  lower $element]}
06e0: 3b 72 65 74 75 72 6e 20 24 72 65 73 75 6c 74 7d  ;return $result}
06f0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c  ,,,,,,,,,.,,,,,,
0700: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54  ,,,,.command,# T
0710: 65 73 74 20 6c 69 73 74 20 63 69 70 68 65 72 73  est list ciphers
0720: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72  ,,,,,,,,,.Cipher
0730: 73 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f  s List,All,,,lco
0740: 6d 70 61 72 65 20 5b 6c 73 6f 72 74 20 5b 65 78  mpare [lsort [ex
0750: 65 63 5f 67 65 74 5f 63 69 70 68 65 72 73 5d 5d  ec_get_ciphers]]
0760: 20 5b 6c 69 73 74 5f 74 6f 6c 6f 77 65 72 20 5b   [list_tolower [
0770: 6c 73 6f 72 74 20 5b 3a 3a 74 6c 73 3a 3a 63 69  lsort [::tls::ci
0780: 70 68 65 72 73 5d 5d 5d 2c 2c 2c 6d 69 73 73 69  phers]]],,,missi
0790: 6e 67 20 7b 72 63 35 20 72 63 35 2d 63 62 63 20  ng {rc5 rc5-cbc 
07a0: 72 63 35 2d 63 66 62 20 72 63 35 2d 65 63 62 20  rc5-cfb rc5-ecb 
07b0: 72 63 35 2d 6f 66 62 7d 20 75 6e 65 78 70 65 63  rc5-ofb} unexpec
07c0: 74 65 64 20 7b 61 65 73 2d 31 32 38 2d 63 63 6d  ted {aes-128-ccm
07d0: 20 61 65 73 2d 31 32 38 2d 67 63 6d 20 61 65 73   aes-128-gcm aes
07e0: 2d 31 39 32 2d 63 63 6d 20 61 65 73 2d 31 39 32  -192-ccm aes-192
07f0: 2d 67 63 6d 20 61 65 73 2d 32 35 36 2d 63 63 6d  -gcm aes-256-ccm
0800: 20 61 65 73 2d 32 35 36 2d 67 63 6d 7d 2c 2c 2c   aes-256-gcm},,,
0810: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d  .,,,,,,,,,,.comm
0820: 61 6e 64 2c 23 20 54 65 73 74 20 6c 69 73 74 20  and,# Test list 
0830: 63 69 70 68 65 72 73 20 66 6f 72 20 70 72 6f 74  ciphers for prot
0840: 6f 63 6f 6c 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43  ocols,,,,,,,,,.C
0850: 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63  iphers By Protoc
0860: 6f 6c 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 6c  ol,SSL2,ssl2,,"l
0870: 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65  compare [exec_ge
0880: 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20  t "":"" ciphers 
0890: 2d 73 73 6c 32 5d 20 5b 3a 3a 74 6c 73 3a 3a 63  -ssl2] [::tls::c
08a0: 69 70 68 65 72 73 20 73 73 6c 32 5d 22 2c 2c 2c  iphers ssl2]",,,
08b0: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70  missing {} unexp
08c0: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68  ected {},,,.Ciph
08d0: 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c  ers By Protocol,
08e0: 53 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d  SSL3,ssl3,,"lcom
08f0: 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22  pare [exec_get "
0900: 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 73  ":"" ciphers -ss
0910: 6c 33 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68  l3] [::tls::ciph
0920: 65 72 73 20 73 73 6c 33 5d 22 2c 2c 2c 6d 69 73  ers ssl3]",,,mis
0930: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74  sing {} unexpect
0940: 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73  ed {},,,.Ciphers
0950: 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53   By Protocol,TLS
0960: 31 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72  1,tls1,,"lcompar
0970: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22  e [exec_get "":"
0980: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5d  " ciphers -tls1]
0990: 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73   [::tls::ciphers
09a0: 20 74 6c 73 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e   tls1]",,,missin
09b0: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20  g {} unexpected 
09c0: 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 42 79  {},,,.Ciphers By
09d0: 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 2e 31   Protocol,TLS1.1
09e0: 2c 74 6c 73 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61  ,tls1.1,,"lcompa
09f0: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a  re [exec_get "":
0a00: 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31  "" ciphers -tls1
0a10: 5f 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68  _1] [::tls::ciph
0a20: 65 72 73 20 74 6c 73 31 2e 31 5d 22 2c 2c 2c 6d  ers tls1.1]",,,m
0a30: 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65  issing {} unexpe
0a40: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65  cted {},,,.Ciphe
0a50: 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54  rs By Protocol,T
0a60: 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c 22 6c  LS1.2,tls1.2,,"l
0a70: 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65  compare [exec_ge
0a80: 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20  t "":"" ciphers 
0a90: 2d 74 6c 73 31 5f 32 5d 20 5b 3a 3a 74 6c 73 3a  -tls1_2] [::tls:
0aa0: 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e 32 5d  :ciphers tls1.2]
0ab0: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75  ",,,missing {} u
0ac0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a  nexpected {},,,.
0ad0: 43 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f  Ciphers By Proto
0ae0: 63 6f 6c 2c 54 4c 53 31 2e 33 2c 74 6c 73 31 2e  col,TLS1.3,tls1.
0af0: 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78  3,,"lcompare [ex
0b00: 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70  ec_get "":"" cip
0b10: 68 65 72 73 20 2d 74 6c 73 31 5f 33 5d 20 5b 3a  hers -tls1_3] [:
0b20: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c  :tls::ciphers tl
0b30: 73 31 2e 33 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67  s1.3]",,,missing
0b40: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b   {} unexpected {
0b50: 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  },,,.,,,,,,,,,,.
0b60: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 63  command,# Test c
0b70: 69 70 68 65 72 20 64 65 73 63 72 69 70 74 69 6f  ipher descriptio
0b80: 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68  ns,,,,,,,,,.Ciph
0b90: 65 72 73 20 57 69 74 68 20 44 65 73 63 72 69 70  ers With Descrip
0ba0: 74 69 6f 6e 73 2c 53 53 4c 32 2c 73 73 6c 32 2c  tions,SSL2,ssl2,
0bb0: 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63  ,"lcompare [exec
0bc0: 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69  _get ""\r\n"" ci
0bd0: 70 68 65 72 73 20 2d 73 73 6c 32 20 2d 76 5d 20  phers -ssl2 -v] 
0be0: 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74  [split [string t
0bf0: 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68  rim [::tls::ciph
0c00: 65 72 73 20 73 73 6c 32 20 31 5d 5d 20 5c 6e 5d  ers ssl2 1]] \n]
0c10: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75  ",,,missing {} u
0c20: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a  nexpected {},,,.
0c30: 43 69 70 68 65 72 73 20 57 69 74 68 20 44 65 73  Ciphers With Des
0c40: 63 72 69 70 74 69 6f 6e 73 2c 53 53 4c 33 2c 73  criptions,SSL3,s
0c50: 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b  sl3,,"lcompare [
0c60: 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22  exec_get ""\r\n"
0c70: 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 20  " ciphers -ssl3 
0c80: 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69  -v] [split [stri
0c90: 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a  ng trim [::tls::
0ca0: 63 69 70 68 65 72 73 20 73 73 6c 33 20 31 5d 5d  ciphers ssl3 1]]
0cb0: 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20   \n]",,,missing 
0cc0: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d  {} unexpected {}
0cd0: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68  ,,,.Ciphers With
0ce0: 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c   Descriptions,TL
0cf0: 53 31 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61  S1,tls1,,"lcompa
0d00: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 5c  re [exec_get ""\
0d10: 72 5c 6e 22 22 20 63 69 70 68 65 72 73 20 2d 74  r\n"" ciphers -t
0d20: 6c 73 31 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b  ls1 -v] [split [
0d30: 73 74 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74  string trim [::t
0d40: 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31  ls::ciphers tls1
0d50: 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73   1]] \n]",,,miss
0d60: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65  ing {} unexpecte
0d70: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20  d {},,,.Ciphers 
0d80: 57 69 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e  With Description
0d90: 73 2c 54 4c 53 31 2e 31 2c 74 6c 73 31 2e 31 2c  s,TLS1.1,tls1.1,
0da0: 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63  ,"lcompare [exec
0db0: 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69  _get ""\r\n"" ci
0dc0: 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 2d 76  phers -tls1_1 -v
0dd0: 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67  ] [split [string
0de0: 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69   trim [::tls::ci
0df0: 70 68 65 72 73 20 74 6c 73 31 2e 31 20 31 5d 5d  phers tls1.1 1]]
0e00: 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20   \n]",,,missing 
0e10: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d  {} unexpected {}
0e20: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68  ,,,.Ciphers With
0e30: 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c   Descriptions,TL
0e40: 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c 22 6c 63  S1.2,tls1.2,,"lc
0e50: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74  ompare [exec_get
0e60: 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72   ""\r\n"" cipher
0e70: 73 20 2d 74 6c 73 31 5f 32 20 2d 76 5d 20 5b 73  s -tls1_2 -v] [s
0e80: 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69  plit [string tri
0e90: 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  m [::tls::cipher
0ea0: 73 20 74 6c 73 31 2e 32 20 31 5d 5d 20 5c 6e 5d  s tls1.2 1]] \n]
0eb0: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75  ",,,missing {} u
0ec0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a  nexpected {},,,.
0ed0: 43 69 70 68 65 72 73 20 57 69 74 68 20 44 65 73  Ciphers With Des
0ee0: 63 72 69 70 74 69 6f 6e 73 2c 54 4c 53 31 2e 33  criptions,TLS1.3
0ef0: 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61  ,tls1.3,,"lcompa
0f00: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 5c  re [exec_get ""\
0f10: 72 5c 6e 22 22 20 63 69 70 68 65 72 73 20 2d 74  r\n"" ciphers -t
0f20: 6c 73 31 5f 33 20 2d 76 5d 20 5b 73 70 6c 69 74  ls1_3 -v] [split
0f30: 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 5b 3a   [string trim [:
0f40: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c  :tls::ciphers tl
0f50: 73 31 2e 33 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c  s1.3 1]] \n]",,,
0f60: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70  missing {} unexp
0f70: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c  ected {},,,.,,,,
0f80: 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23  ,,,,,,.command,#
0f90: 20 54 65 73 74 20 70 72 6f 74 6f 63 6f 6c 20 73   Test protocol s
0fa0: 70 65 63 69 66 69 63 20 63 69 70 68 65 72 73 2c  pecific ciphers,
0fb0: 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72 73  ,,,,,,,,.Ciphers
0fc0: 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66   Protocol Specif
0fd0: 69 63 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 6c  ic,SSL2,ssl2,,"l
0fe0: 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65  compare [exec_ge
0ff0: 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20  t "":"" ciphers 
1000: 2d 73 73 6c 32 20 2d 73 5d 20 5b 3a 3a 74 6c 73  -ssl2 -s] [::tls
1010: 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 32 20 30  ::ciphers ssl2 0
1020: 20 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b   1]",,,missing {
1030: 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c  } unexpected {},
1040: 2c 2c 0a 43 69 70 68 65 72 73 20 50 72 6f 74 6f  ,,.Ciphers Proto
1050: 63 6f 6c 20 53 70 65 63 69 66 69 63 2c 53 53 4c  col Specific,SSL
1060: 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72  3,ssl3,,"lcompar
1070: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22  e [exec_get "":"
1080: 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 20  " ciphers -ssl3 
1090: 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68  -s] [::tls::ciph
10a0: 65 72 73 20 73 73 6c 33 20 30 20 31 5d 22 2c 2c  ers ssl3 0 1]",,
10b0: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78  ,missing {} unex
10c0: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70  pected {},,,.Cip
10d0: 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70  hers Protocol Sp
10e0: 65 63 69 66 69 63 2c 54 4c 53 31 2c 74 6c 73 31  ecific,TLS1,tls1
10f0: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65  ,,"lcompare [exe
1100: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68  c_get "":"" ciph
1110: 65 72 73 20 2d 74 6c 73 31 20 2d 73 5d 20 5b 3a  ers -tls1 -s] [:
1120: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c  :tls::ciphers tl
1130: 73 31 20 30 20 31 5d 22 2c 2c 2c 6d 69 73 73 69  s1 0 1]",,,missi
1140: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64  ng {} unexpected
1150: 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 50   {},,,.Ciphers P
1160: 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66 69 63  rotocol Specific
1170: 2c 54 4c 53 31 2e 31 2c 74 6c 73 31 2e 31 2c 2c  ,TLS1.1,tls1.1,,
1180: 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f  "lcompare [exec_
1190: 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72  get "":"" cipher
11a0: 73 20 2d 74 6c 73 31 5f 31 20 2d 73 5d 20 5b 3a  s -tls1_1 -s] [:
11b0: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c  :tls::ciphers tl
11c0: 73 31 2e 31 20 30 20 31 5d 22 2c 2c 2c 6d 69 73  s1.1 0 1]",,,mis
11d0: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74  sing {} unexpect
11e0: 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73  ed {},,,.Ciphers
11f0: 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66   Protocol Specif
1200: 69 63 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32  ic,TLS1.2,tls1.2
1210: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65  ,,"lcompare [exe
1220: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68  c_get "":"" ciph
1230: 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d 73 5d 20  ers -tls1_2 -s] 
1240: 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20  [::tls::ciphers 
1250: 74 6c 73 31 2e 32 20 30 20 31 5d 22 2c 2c 2c 6d  tls1.2 0 1]",,,m
1260: 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65  issing {} unexpe
1270: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65  cted {},,,.Ciphe
1280: 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63  rs Protocol Spec
1290: 69 66 69 63 2c 54 4c 53 31 2e 33 2c 74 6c 73 31  ific,TLS1.3,tls1
12a0: 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 63  .3,,"lcompare [c
12b0: 6f 6e 63 61 74 20 5b 65 78 65 63 5f 67 65 74 20  oncat [exec_get 
12c0: 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74  "":"" ciphers -t
12d0: 6c 73 31 5f 33 20 2d 73 5d 20 5b 65 78 65 63 5f  ls1_3 -s] [exec_
12e0: 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72  get "":"" cipher
12f0: 73 20 2d 74 6c 73 31 5f 32 20 2d 73 5d 5d 20 5b  s -tls1_2 -s]] [
1300: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74  ::tls::ciphers t
1310: 6c 73 31 2e 33 20 30 20 31 5d 22 2c 2c 2c 6d 69  ls1.3 0 1]",,,mi
1320: 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63  ssing {} unexpec
1330: 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c  ted {},,,.,,,,,,
1340: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54  ,,,,.command,# T
1350: 65 73 74 20 6c 69 73 74 20 64 69 67 65 73 74 73  est list digests
1360: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74  ,,,,,,,,,.Digest
1370: 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d   List,All,,,lcom
1380: 70 61 72 65 20 5b 6c 73 6f 72 74 20 5b 65 78 65  pare [lsort [exe
1390: 63 5f 67 65 74 5f 64 69 67 65 73 74 73 5d 5d 20  c_get_digests]] 
13a0: 5b 6c 73 6f 72 74 20 5b 74 6c 73 3a 3a 64 69 67  [lsort [tls::dig
13b0: 65 73 74 73 5d 5d 2c 2c 2c 6d 69 73 73 69 6e 67  ests]],,,missing
13c0: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b   {} unexpected {
13d0: 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  },,,.,,,,,,,,,,.
13e0: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 64  command,# Test d
13f0: 69 67 65 73 74 20 63 6f 6d 6d 61 6e 64 73 2c 2c  igest commands,,
1400: 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 43  ,,,,,,,.Digest C
1410: 6d 64 73 2c 6d 64 34 20 63 6d 64 2c 2c 2c 22 74  mds,md4 cmd,,,"t
1420: 6c 73 3a 3a 6d 64 34 20 22 22 45 78 61 6d 70 6c  ls::md4 ""Exampl
1430: 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73  e string for mes
1440: 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74  sage digest test
1450: 73 2e 22 22 22 2c 2c 2c 31 38 31 43 44 43 46 39  s.""",,,181CDCF9
1460: 44 42 39 42 36 46 41 38 46 43 30 41 33 42 46 39  DB9B6FA8FC0A3BF9
1470: 43 33 34 45 32 39 44 39 2c 2c 2c 0a 44 69 67 65  C34E29D9,,,.Dige
1480: 73 74 20 43 6d 64 73 2c 6d 64 35 20 63 6d 64 2c  st Cmds,md5 cmd,
1490: 2c 2c 22 74 6c 73 3a 3a 6d 64 35 20 22 22 45 78  ,,"tls::md5 ""Ex
14a0: 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f 72  ample string for
14b0: 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 20   message digest 
14c0: 74 65 73 74 73 2e 22 22 22 2c 2c 2c 43 43 42 31  tests.""",,,CCB1
14d0: 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33 46  BE2E11D8183E843F
14e0: 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a  F73DA8C6D206,,,.
14f0: 44 69 67 65 73 74 20 43 6d 64 73 2c 73 68 61 31  Digest Cmds,sha1
1500: 20 63 6d 64 2c 2c 2c 22 74 6c 73 3a 3a 73 68 61   cmd,,,"tls::sha
1510: 31 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69  1 ""Example stri
1520: 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64  ng for message d
1530: 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c  igest tests.""",
1540: 2c 2c 33 41 45 46 45 38 34 30 43 41 34 39 32 43  ,,3AEFE840CA492C
1550: 33 38 37 45 39 30 33 46 31 35 45 44 36 30 31 39  387E903F15ED6019
1560: 45 37 41 44 38 33 33 42 34 37 2c 2c 2c 0a 44 69  E7AD833B47,,,.Di
1570: 67 65 73 74 20 43 6d 64 73 2c 73 68 61 32 35 36  gest Cmds,sha256
1580: 20 63 6d 64 2c 2c 2c 22 74 6c 73 3a 3a 73 68 61   cmd,,,"tls::sha
1590: 32 35 36 20 22 22 45 78 61 6d 70 6c 65 20 73 74  256 ""Example st
15a0: 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65  ring for message
15b0: 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22   digest tests.""
15c0: 22 2c 2c 2c 42 37 44 46 44 44 45 42 30 33 31 34  ",,,B7DFDDEB0314
15d0: 41 37 34 46 46 35 36 41 38 41 43 31 45 33 44 43  A74FF56A8AC1E3DC
15e0: 35 37 44 46 30 39 42 42 35 32 41 39 36 44 41 35  57DF09BB52A96DA5
15f0: 30 46 36 35 34 39 45 42 36 32 43 41 36 31 41 30  0F6549EB62CA61A0
1600: 41 34 39 31 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c  A491,,,.,,,,,,,,
1610: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73  ,,.command,# Tes
1620: 74 20 64 69 67 65 73 74 20 63 6f 6d 6d 61 6e 64  t digest command
1630: 20 66 6f 72 20 64 61 74 61 2c 2c 2c 2c 2c 2c 2c   for data,,,,,,,
1640: 2c 2c 0a 44 69 67 65 73 74 20 44 61 74 61 2c 6d  ,,.Digest Data,m
1650: 64 34 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73  d4,,,"tls::diges
1660: 74 20 6d 64 34 20 22 22 45 78 61 6d 70 6c 65 20  t md4 ""Example 
1670: 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61  string for messa
1680: 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e  ge digest tests.
1690: 22 22 22 2c 2c 2c 31 38 31 43 44 43 46 39 44 42  """,,,181CDCF9DB
16a0: 39 42 36 46 41 38 46 43 30 41 33 42 46 39 43 33  9B6FA8FC0A3BF9C3
16b0: 34 45 32 39 44 39 2c 2c 2c 0a 44 69 67 65 73 74  4E29D9,,,.Digest
16c0: 20 44 61 74 61 2c 6d 64 35 2c 2c 2c 22 74 6c 73   Data,md5,,,"tls
16d0: 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 22 22 45  ::digest md5 ""E
16e0: 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f  xample string fo
16f0: 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74  r message digest
1700: 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 43 43 42   tests.""",,,CCB
1710: 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33  1BE2E11D8183E843
1720: 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c  FF73DA8C6D206,,,
1730: 0a 44 69 67 65 73 74 20 44 61 74 61 2c 73 68 61  .Digest Data,sha
1740: 31 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73 74  1,,,"tls::digest
1750: 20 73 68 61 31 20 22 22 45 78 61 6d 70 6c 65 20   sha1 ""Example 
1760: 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61  string for messa
1770: 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e  ge digest tests.
1780: 22 22 22 2c 2c 2c 33 41 45 46 45 38 34 30 43 41  """,,,3AEFE840CA
1790: 34 39 32 43 33 38 37 45 39 30 33 46 31 35 45 44  492C387E903F15ED
17a0: 36 30 31 39 45 37 41 44 38 33 33 42 34 37 2c 2c  6019E7AD833B47,,
17b0: 2c 0a 44 69 67 65 73 74 20 44 61 74 61 2c 73 68  ,.Digest Data,sh
17c0: 61 32 35 36 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67  a256,,,"tls::dig
17d0: 65 73 74 20 73 68 61 32 35 36 20 22 22 45 78 61  est sha256 ""Exa
17e0: 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 20  mple string for 
17f0: 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 20 74  message digest t
1800: 65 73 74 73 2e 22 22 22 2c 2c 2c 42 37 44 46 44  ests.""",,,B7DFD
1810: 44 45 42 30 33 31 34 41 37 34 46 46 35 36 41 38  DEB0314A74FF56A8
1820: 41 43 31 45 33 44 43 35 37 44 46 30 39 42 42 35  AC1E3DC57DF09BB5
1830: 32 41 39 36 44 41 35 30 46 36 35 34 39 45 42 36  2A96DA50F6549EB6
1840: 32 43 41 36 31 41 30 41 34 39 31 2c 2c 2c 0a 44  2CA61A0A491,,,.D
1850: 69 67 65 73 74 20 44 61 74 61 2c 6d 64 35 20 62  igest Data,md5 b
1860: 69 6e 2c 2c 2c 22 73 74 72 69 6e 67 20 74 6f 75  in,,,"string tou
1870: 70 70 65 72 20 5b 62 69 6e 61 72 79 20 65 6e 63  pper [binary enc
1880: 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 69  ode hex [tls::di
1890: 67 65 73 74 20 6d 64 35 20 2d 62 69 6e 20 22 22  gest md5 -bin ""
18a0: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66  Example string f
18b0: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73  or message diges
18c0: 74 20 74 65 73 74 73 2e 22 22 5d 5d 22 2c 2c 2c  t tests.""]]",,,
18d0: 43 43 42 31 42 45 32 45 31 31 44 38 31 38 33 45  CCB1BE2E11D8183E
18e0: 38 34 33 46 46 37 33 44 41 38 43 36 44 32 30 36  843FF73DA8C6D206
18f0: 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 74 61 2c  ,,,.Digest Data,
1900: 6d 64 35 20 68 65 78 2c 2c 2c 22 74 6c 73 3a 3a  md5 hex,,,"tls::
1910: 64 69 67 65 73 74 20 6d 64 35 20 2d 68 65 78 20  digest md5 -hex 
1920: 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67  ""Example string
1930: 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67   for message dig
1940: 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c  est tests.""",,,
1950: 43 43 42 31 42 45 32 45 31 31 44 38 31 38 33 45  CCB1BE2E11D8183E
1960: 38 34 33 46 46 37 33 44 41 38 43 36 44 32 30 36  843FF73DA8C6D206
1970: 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 74 61 2c  ,,,.Digest Data,
1980: 6d 64 35 20 77 69 74 68 20 61 72 67 2c 2c 2c 22  md5 with arg,,,"
1990: 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20  tls::digest md5 
19a0: 2d 64 61 74 61 20 22 22 45 78 61 6d 70 6c 65 20  -data ""Example 
19b0: 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61  string for messa
19c0: 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e  ge digest tests.
19d0: 22 22 22 2c 2c 2c 43 43 42 31 42 45 32 45 31 31  """,,,CCB1BE2E11
19e0: 44 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38  D8183E843FF73DA8
19f0: 43 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c  C6D206,,,.,,,,,,
1a00: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54  ,,,,.command,# T
1a10: 65 73 74 20 64 69 67 65 73 74 20 63 6f 6d 6d 61  est digest comma
1a20: 6e 64 20 66 6f 72 20 66 69 6c 65 73 2c 2c 2c 2c  nd for files,,,,
1a30: 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c  ,,,,,.Digest Fil
1a40: 65 2c 6d 64 34 2c 2c 2c 74 6c 73 3a 3a 64 69 67  e,md4,,,tls::dig
1a50: 65 73 74 20 6d 64 34 20 2d 66 69 6c 65 20 6d 64  est md4 -file md
1a60: 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 31 38 31 43  _data.dat,,,181C
1a70: 44 43 46 39 44 42 39 42 36 46 41 38 46 43 30 41  DCF9DB9B6FA8FC0A
1a80: 33 42 46 39 43 33 34 45 32 39 44 39 2c 2c 2c 0a  3BF9C34E29D9,,,.
1a90: 44 69 67 65 73 74 20 46 69 6c 65 2c 6d 64 35 2c  Digest File,md5,
1aa0: 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64  ,,tls::digest md
1ab0: 35 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e  5 -file md_data.
1ac0: 64 61 74 2c 2c 2c 43 43 42 31 42 45 32 45 31 31  dat,,,CCB1BE2E11
1ad0: 44 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38  D8183E843FF73DA8
1ae0: 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74  C6D206,,,.Digest
1af0: 20 46 69 6c 65 2c 73 68 61 31 2c 2c 2c 74 6c 73   File,sha1,,,tls
1b00: 3a 3a 64 69 67 65 73 74 20 73 68 61 31 20 2d 66  ::digest sha1 -f
1b10: 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 2c  ile md_data.dat,
1b20: 2c 2c 33 41 45 46 45 38 34 30 43 41 34 39 32 43  ,,3AEFE840CA492C
1b30: 33 38 37 45 39 30 33 46 31 35 45 44 36 30 31 39  387E903F15ED6019
1b40: 45 37 41 44 38 33 33 42 34 37 2c 2c 2c 0a 44 69  E7AD833B47,,,.Di
1b50: 67 65 73 74 20 46 69 6c 65 2c 73 68 61 32 35 36  gest File,sha256
1b60: 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74 20 73  ,,,tls::digest s
1b70: 68 61 32 35 36 20 2d 66 69 6c 65 20 6d 64 5f 64  ha256 -file md_d
1b80: 61 74 61 2e 64 61 74 2c 2c 2c 42 37 44 46 44 44  ata.dat,,,B7DFDD
1b90: 45 42 30 33 31 34 41 37 34 46 46 35 36 41 38 41  EB0314A74FF56A8A
1ba0: 43 31 45 33 44 43 35 37 44 46 30 39 42 42 35 32  C1E3DC57DF09BB52
1bb0: 41 39 36 44 41 35 30 46 36 35 34 39 45 42 36 32  A96DA50F6549EB62
1bc0: 43 41 36 31 41 30 41 34 39 31 2c 2c 2c 0a 44 69  CA61A0A491,,,.Di
1bd0: 67 65 73 74 20 46 69 6c 65 2c 6d 64 35 20 62 69  gest File,md5 bi
1be0: 6e 2c 2c 2c 73 74 72 69 6e 67 20 74 6f 75 70 70  n,,,string toupp
1bf0: 65 72 20 5b 62 69 6e 61 72 79 20 65 6e 63 6f 64  er [binary encod
1c00: 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 69 67 65  e hex [tls::dige
1c10: 73 74 20 6d 64 35 20 2d 62 69 6e 20 2d 66 69 6c  st md5 -bin -fil
1c20: 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 5d 5d 2c  e md_data.dat]],
1c30: 2c 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 38  ,,CCB1BE2E11D818
1c40: 33 45 38 34 33 46 46 37 33 44 41 38 43 36 44 32  3E843FF73DA8C6D2
1c50: 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c  06,,,.Digest Fil
1c60: 65 2c 6d 64 35 20 68 65 78 2c 2c 2c 74 6c 73 3a  e,md5 hex,,,tls:
1c70: 3a 64 69 67 65 73 74 20 6d 64 35 20 2d 68 65 78  :digest md5 -hex
1c80: 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64   -file md_data.d
1c90: 61 74 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44  at,,,CCB1BE2E11D
1ca0: 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38 43  8183E843FF73DA8C
1cb0: 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c  6D206,,,.,,,,,,,
1cc0: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65  ,,,.command,# Te
1cd0: 73 74 20 6c 69 73 74 20 70 72 6f 74 6f 63 6f 6c  st list protocol
1ce0: 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 50 72 6f 74 6f  s,,,,,,,,,.Proto
1cf0: 63 6f 6c 73 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70  cols,All,,,lcomp
1d00: 61 72 65 20 24 70 72 6f 74 6f 63 6f 6c 73 20 5b  are $protocols [
1d10: 3a 3a 74 6c 73 3a 3a 70 72 6f 74 6f 63 6f 6c 73  ::tls::protocols
1d20: 5d 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 73 73 6c  ],,,missing {ssl
1d30: 32 20 73 73 6c 33 7d 20 75 6e 65 78 70 65 63 74  2 ssl3} unexpect
1d40: 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c  ed {},,,.,,,,,,,
1d50: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65  ,,,.command,# Te
1d60: 73 74 20 73 68 6f 77 20 76 65 72 73 69 6f 6e 2c  st show version,
1d70: 2c 2c 2c 2c 2c 2c 2c 2c 0a 56 65 72 73 69 6f 6e  ,,,,,,,,.Version
1d80: 2c 41 6c 6c 2c 2c 2c 3a 3a 74 6c 73 3a 3a 76 65  ,All,,,::tls::ve
1d90: 72 73 69 6f 6e 2c 2c 67 6c 6f 62 2c 2a 2c 2c 2c  rsion,,glob,*,,,
1da0: 0a 56 65 72 73 69 6f 6e 2c 4f 70 65 6e 53 53 4c  .Version,OpenSSL
1db0: 2c 4f 70 65 6e 53 53 4c 2c 2c 3a 3a 74 6c 73 3a  ,OpenSSL,,::tls:
1dc0: 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c 6f 62 2c 4f  :version,,glob,O
1dd0: 70 65 6e 53 53 4c 2a 2c 2c 2c 0a                 penSSL*,,,.