Hex Artifact Content

Artifact 312225a4041fa717d37a746ff2060b08ee00001c4cbc5d54c27b99f54b199484:


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 65 78 65 63 5f 67 65  and,proc exec_ge
0680: 74 5f 6d 61 63 73 20 7b 7d 20 7b 72 65 74 75 72  t_macs {} {retur
0690: 6e 20 5b 6c 69 73 74 20 63 6d 61 63 20 68 6d 61  n [list cmac hma
06a0: 63 5d 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d  c]},,,,,,,,,.com
06b0: 6d 61 6e 64 2c 70 72 6f 63 20 6c 69 73 74 5f 74  mand,proc list_t
06c0: 6f 6c 6f 77 65 72 20 7b 6c 69 73 74 7d 20 7b 73  olower {list} {s
06d0: 65 74 20 72 65 73 75 6c 74 20 5b 6c 69 73 74 5d  et result [list]
06e0: 3b 66 6f 72 65 61 63 68 20 65 6c 65 6d 65 6e 74  ;foreach element
06f0: 20 24 6c 69 73 74 20 7b 6c 61 70 70 65 6e 64 20   $list {lappend 
0700: 72 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 74  result [string t
0710: 6f 6c 6f 77 65 72 20 24 65 6c 65 6d 65 6e 74 5d  olower $element]
0720: 7d 3b 72 65 74 75 72 6e 20 24 72 65 73 75 6c 74  };return $result
0730: 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61  },,,,,,,,,.comma
0740: 6e 64 2c 70 72 6f 63 20 72 65 61 64 5f 63 68 61  nd,proc read_cha
0750: 6e 20 7b 6d 64 20 66 69 6c 65 6e 61 6d 65 20 61  n {md filename a
0760: 72 67 73 7d 20 7b 73 65 74 20 63 68 20 5b 6f 70  rgs} {set ch [op
0770: 65 6e 20 24 66 69 6c 65 6e 61 6d 65 20 72 62 5d  en $filename rb]
0780: 3b 66 63 6f 6e 66 69 67 75 72 65 20 24 63 68 20  ;fconfigure $ch 
0790: 2d 74 72 61 6e 73 6c 61 74 69 6f 6e 20 62 69 6e  -translation bin
07a0: 61 72 79 3b 73 65 74 20 62 73 69 7a 65 20 5b 66  ary;set bsize [f
07b0: 63 6f 6e 66 69 67 75 72 65 20 24 63 68 20 2d 62  configure $ch -b
07c0: 75 66 66 65 72 73 69 7a 65 5d 3b 73 65 74 20 6e  uffersize];set n
07d0: 65 77 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 20  ew [tls::digest 
07e0: 24 6d 64 20 7b 2a 7d 24 61 72 67 73 20 2d 63 68  $md {*}$args -ch
07f0: 61 6e 20 24 63 68 5d 3b 77 68 69 6c 65 20 7b 21  an $ch];while {!
0800: 5b 65 6f 66 20 24 6e 65 77 5d 7d 20 7b 73 65 74  [eof $new]} {set
0810: 20 72 65 73 75 6c 74 20 5b 72 65 61 64 20 24 6e   result [read $n
0820: 65 77 20 24 62 73 69 7a 65 5d 7d 3b 63 6c 6f 73  ew $bsize]};clos
0830: 65 20 24 6e 65 77 3b 72 65 74 75 72 6e 20 24 72  e $new;return $r
0840: 65 73 75 6c 74 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  esult},,,,,,,,,.
0850: 63 6f 6d 6d 61 6e 64 2c 70 72 6f 63 20 61 63 63  command,proc acc
0860: 75 6d 75 6c 61 74 65 20 7b 6d 64 20 73 74 72 69  umulate {md stri
0870: 6e 67 20 61 72 67 73 7d 20 7b 73 65 74 20 63 6d  ng args} {set cm
0880: 64 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 20 24  d [tls::digest $
0890: 6d 64 20 7b 2a 7d 24 61 72 67 73 20 2d 63 6f 6d  md {*}$args -com
08a0: 6d 61 6e 64 20 64 63 6d 64 5d 3b 24 63 6d 64 20  mand dcmd];$cmd 
08b0: 75 70 64 61 74 65 20 5b 73 74 72 69 6e 67 20 72  update [string r
08c0: 61 6e 67 65 20 24 73 74 72 69 6e 67 20 30 20 32  ange $string 0 2
08d0: 30 5d 3b 24 63 6d 64 20 75 70 64 61 74 65 20 5b  0];$cmd update [
08e0: 73 74 72 69 6e 67 20 72 61 6e 67 65 20 24 73 74  string range $st
08f0: 72 69 6e 67 20 32 31 20 65 6e 64 5d 3b 72 65 74  ring 21 end];ret
0900: 75 72 6e 20 5b 24 63 6d 64 20 66 69 6e 61 6c 69  urn [$cmd finali
0910: 7a 65 5d 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c  ze]},,,,,,,,,.,,
0920: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64  ,,,,,,,,.command
0930: 2c 23 20 54 65 73 74 20 6c 69 73 74 20 63 69 70  ,# Test list cip
0940: 68 65 72 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69  hers,,,,,,,,,.Ci
0950: 70 68 65 72 73 20 4c 69 73 74 2c 41 6c 6c 2c 2c  phers List,All,,
0960: 2c 6c 63 6f 6d 70 61 72 65 20 5b 6c 73 6f 72 74  ,lcompare [lsort
0970: 20 5b 65 78 65 63 5f 67 65 74 5f 63 69 70 68 65   [exec_get_ciphe
0980: 72 73 5d 5d 20 5b 6c 69 73 74 5f 74 6f 6c 6f 77  rs]] [list_tolow
0990: 65 72 20 5b 6c 73 6f 72 74 20 5b 3a 3a 74 6c 73  er [lsort [::tls
09a0: 3a 3a 63 69 70 68 65 72 73 5d 5d 5d 2c 2c 2c 6d  ::ciphers]]],,,m
09b0: 69 73 73 69 6e 67 20 7b 72 63 35 20 72 63 35 2d  issing {rc5 rc5-
09c0: 63 62 63 20 72 63 35 2d 63 66 62 20 72 63 35 2d  cbc rc5-cfb rc5-
09d0: 65 63 62 20 72 63 35 2d 6f 66 62 7d 20 75 6e 65  ecb rc5-ofb} une
09e0: 78 70 65 63 74 65 64 20 7b 61 65 73 2d 31 32 38  xpected {aes-128
09f0: 2d 63 63 6d 20 61 65 73 2d 31 32 38 2d 67 63 6d  -ccm aes-128-gcm
0a00: 20 61 65 73 2d 31 39 32 2d 63 63 6d 20 61 65 73   aes-192-ccm aes
0a10: 2d 31 39 32 2d 67 63 6d 20 61 65 73 2d 32 35 36  -192-gcm aes-256
0a20: 2d 63 63 6d 20 61 65 73 2d 32 35 36 2d 67 63 6d  -ccm aes-256-gcm
0a30: 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  },,,.,,,,,,,,,,.
0a40: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 6c  command,# Test l
0a50: 69 73 74 20 63 69 70 68 65 72 73 20 66 6f 72 20  ist ciphers for 
0a60: 70 72 6f 74 6f 63 6f 6c 73 2c 2c 2c 2c 2c 2c 2c  protocols,,,,,,,
0a70: 2c 2c 0a 43 69 70 68 65 72 73 20 42 79 20 50 72  ,,.Ciphers By Pr
0a80: 6f 74 6f 63 6f 6c 2c 53 53 4c 32 2c 73 73 6c 32  otocol,SSL2,ssl2
0a90: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65  ,,"lcompare [exe
0aa0: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68  c_get "":"" ciph
0ab0: 65 72 73 20 2d 73 73 6c 32 5d 20 5b 3a 3a 74 6c  ers -ssl2] [::tl
0ac0: 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 32 5d  s::ciphers ssl2]
0ad0: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75  ",,,missing {} u
0ae0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a  nexpected {},,,.
0af0: 43 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f  Ciphers By Proto
0b00: 63 6f 6c 2c 53 53 4c 33 2c 73 73 6c 33 2c 2c 22  col,SSL3,ssl3,,"
0b10: 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67  lcompare [exec_g
0b20: 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73  et "":"" ciphers
0b30: 20 2d 73 73 6c 33 5d 20 5b 3a 3a 74 6c 73 3a 3a   -ssl3] [::tls::
0b40: 63 69 70 68 65 72 73 20 73 73 6c 33 5d 22 2c 2c  ciphers ssl3]",,
0b50: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78  ,missing {} unex
0b60: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70  pected {},,,.Cip
0b70: 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c  hers By Protocol
0b80: 2c 54 4c 53 31 2c 74 6c 73 31 2c 2c 22 6c 63 6f  ,TLS1,tls1,,"lco
0b90: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20  mpare [exec_get 
0ba0: 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74  "":"" ciphers -t
0bb0: 6c 73 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70  ls1] [::tls::cip
0bc0: 68 65 72 73 20 74 6c 73 31 5d 22 2c 2c 2c 6d 69  hers tls1]",,,mi
0bd0: 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63  ssing {} unexpec
0be0: 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72  ted {},,,.Cipher
0bf0: 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c  s By Protocol,TL
0c00: 53 31 2e 31 2c 74 6c 73 31 2e 31 2c 2c 22 6c 63  S1.1,tls1.1,,"lc
0c10: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74  ompare [exec_get
0c20: 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d   "":"" ciphers -
0c30: 74 6c 73 31 5f 31 5d 20 5b 3a 3a 74 6c 73 3a 3a  tls1_1] [::tls::
0c40: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 31 5d 22  ciphers tls1.1]"
0c50: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e  ,,,missing {} un
0c60: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43  expected {},,,.C
0c70: 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63  iphers By Protoc
0c80: 6f 6c 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32  ol,TLS1.2,tls1.2
0c90: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65  ,,"lcompare [exe
0ca0: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68  c_get "":"" ciph
0cb0: 65 72 73 20 2d 74 6c 73 31 5f 32 5d 20 5b 3a 3a  ers -tls1_2] [::
0cc0: 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73  tls::ciphers tls
0cd0: 31 2e 32 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20  1.2]",,,missing 
0ce0: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d  {} unexpected {}
0cf0: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 42 79 20 50  ,,,.Ciphers By P
0d00: 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 2e 33 2c 74  rotocol,TLS1.3,t
0d10: 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72 65  ls1.3,,"lcompare
0d20: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22   [exec_get "":""
0d30: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 33   ciphers -tls1_3
0d40: 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  ] [::tls::cipher
0d50: 73 20 74 6c 73 31 2e 33 5d 22 2c 2c 2c 6d 69 73  s tls1.3]",,,mis
0d60: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74  sing {} unexpect
0d70: 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c  ed {},,,.,,,,,,,
0d80: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65  ,,,.command,# Te
0d90: 73 74 20 63 69 70 68 65 72 20 64 65 73 63 72 69  st cipher descri
0da0: 70 74 69 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  ptions,,,,,,,,,.
0db0: 43 69 70 68 65 72 73 20 57 69 74 68 20 44 65 73  Ciphers With Des
0dc0: 63 72 69 70 74 69 6f 6e 73 2c 53 53 4c 32 2c 73  criptions,SSL2,s
0dd0: 73 6c 32 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b  sl2,,"lcompare [
0de0: 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22  exec_get ""\r\n"
0df0: 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 32 20  " ciphers -ssl2 
0e00: 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69  -v] [split [stri
0e10: 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a  ng trim [::tls::
0e20: 63 69 70 68 65 72 73 20 73 73 6c 32 20 31 5d 5d  ciphers ssl2 1]]
0e30: 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20   \n]",,,missing 
0e40: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d  {} unexpected {}
0e50: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68  ,,,.Ciphers With
0e60: 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 53 53   Descriptions,SS
0e70: 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61  L3,ssl3,,"lcompa
0e80: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 5c  re [exec_get ""\
0e90: 72 5c 6e 22 22 20 63 69 70 68 65 72 73 20 2d 73  r\n"" ciphers -s
0ea0: 73 6c 33 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b  sl3 -v] [split [
0eb0: 73 74 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74  string trim [::t
0ec0: 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 33  ls::ciphers ssl3
0ed0: 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73   1]] \n]",,,miss
0ee0: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65  ing {} unexpecte
0ef0: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20  d {},,,.Ciphers 
0f00: 57 69 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e  With Description
0f10: 73 2c 54 4c 53 31 2c 74 6c 73 31 2c 2c 22 6c 63  s,TLS1,tls1,,"lc
0f20: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74  ompare [exec_get
0f30: 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72   ""\r\n"" cipher
0f40: 73 20 2d 74 6c 73 31 20 2d 76 5d 20 5b 73 70 6c  s -tls1 -v] [spl
0f50: 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20  it [string trim 
0f60: 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20  [::tls::ciphers 
0f70: 74 6c 73 31 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c  tls1 1]] \n]",,,
0f80: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70  missing {} unexp
0f90: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68  ected {},,,.Ciph
0fa0: 65 72 73 20 57 69 74 68 20 44 65 73 63 72 69 70  ers With Descrip
0fb0: 74 69 6f 6e 73 2c 54 4c 53 31 2e 31 2c 74 6c 73  tions,TLS1.1,tls
0fc0: 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b  1.1,,"lcompare [
0fd0: 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22  exec_get ""\r\n"
0fe0: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f  " ciphers -tls1_
0ff0: 31 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74  1 -v] [split [st
1000: 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73  ring trim [::tls
1010: 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e 31  ::ciphers tls1.1
1020: 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73   1]] \n]",,,miss
1030: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65  ing {} unexpecte
1040: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20  d {},,,.Ciphers 
1050: 57 69 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e  With Description
1060: 73 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c  s,TLS1.2,tls1.2,
1070: 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63  ,"lcompare [exec
1080: 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69  _get ""\r\n"" ci
1090: 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d 76  phers -tls1_2 -v
10a0: 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67  ] [split [string
10b0: 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69   trim [::tls::ci
10c0: 70 68 65 72 73 20 74 6c 73 31 2e 32 20 31 5d 5d  phers tls1.2 1]]
10d0: 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20   \n]",,,missing 
10e0: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d  {} unexpected {}
10f0: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68  ,,,.Ciphers With
1100: 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c   Descriptions,TL
1110: 53 31 2e 33 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63  S1.3,tls1.3,,"lc
1120: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74  ompare [exec_get
1130: 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72   ""\r\n"" cipher
1140: 73 20 2d 74 6c 73 31 5f 33 20 2d 76 5d 20 5b 73  s -tls1_3 -v] [s
1150: 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69  plit [string tri
1160: 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  m [::tls::cipher
1170: 73 20 74 6c 73 31 2e 33 20 31 5d 5d 20 5c 6e 5d  s tls1.3 1]] \n]
1180: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75  ",,,missing {} u
1190: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a  nexpected {},,,.
11a0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61  ,,,,,,,,,,.comma
11b0: 6e 64 2c 23 20 54 65 73 74 20 70 72 6f 74 6f 63  nd,# Test protoc
11c0: 6f 6c 20 73 70 65 63 69 66 69 63 20 63 69 70 68  ol specific ciph
11d0: 65 72 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70  ers,,,,,,,,,.Cip
11e0: 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70  hers Protocol Sp
11f0: 65 63 69 66 69 63 2c 53 53 4c 32 2c 73 73 6c 32  ecific,SSL2,ssl2
1200: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65  ,,"lcompare [exe
1210: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68  c_get "":"" ciph
1220: 65 72 73 20 2d 73 73 6c 32 20 2d 73 5d 20 5b 3a  ers -ssl2 -s] [:
1230: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 73  :tls::ciphers ss
1240: 6c 32 20 30 20 31 5d 22 2c 2c 2c 6d 69 73 73 69  l2 0 1]",,,missi
1250: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64  ng {} unexpected
1260: 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 50   {},,,.Ciphers P
1270: 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66 69 63  rotocol Specific
1280: 2c 53 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f  ,SSL3,ssl3,,"lco
1290: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20  mpare [exec_get 
12a0: 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73  "":"" ciphers -s
12b0: 73 6c 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a  sl3 -s] [::tls::
12c0: 63 69 70 68 65 72 73 20 73 73 6c 33 20 30 20 31  ciphers ssl3 0 1
12d0: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20  ]",,,missing {} 
12e0: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c  unexpected {},,,
12f0: 0a 43 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f  .Ciphers Protoco
1300: 6c 20 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2c  l Specific,TLS1,
1310: 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20  tls1,,"lcompare 
1320: 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20  [exec_get "":"" 
1330: 63 69 70 68 65 72 73 20 2d 74 6c 73 31 20 2d 73  ciphers -tls1 -s
1340: 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  ] [::tls::cipher
1350: 73 20 74 6c 73 31 20 30 20 31 5d 22 2c 2c 2c 6d  s tls1 0 1]",,,m
1360: 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65  issing {} unexpe
1370: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65  cted {},,,.Ciphe
1380: 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63  rs Protocol Spec
1390: 69 66 69 63 2c 54 4c 53 31 2e 31 2c 74 6c 73 31  ific,TLS1.1,tls1
13a0: 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65  .1,,"lcompare [e
13b0: 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69  xec_get "":"" ci
13c0: 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 2d 73  phers -tls1_1 -s
13d0: 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  ] [::tls::cipher
13e0: 73 20 74 6c 73 31 2e 31 20 30 20 31 5d 22 2c 2c  s tls1.1 0 1]",,
13f0: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78  ,missing {} unex
1400: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70  pected {},,,.Cip
1410: 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70  hers Protocol Sp
1420: 65 63 69 66 69 63 2c 54 4c 53 31 2e 32 2c 74 6c  ecific,TLS1.2,tl
1430: 73 31 2e 32 2c 2c 22 6c 63 6f 6d 70 61 72 65 20  s1.2,,"lcompare 
1440: 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20  [exec_get "":"" 
1450: 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 20  ciphers -tls1_2 
1460: 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68  -s] [::tls::ciph
1470: 65 72 73 20 74 6c 73 31 2e 32 20 30 20 31 5d 22  ers tls1.2 0 1]"
1480: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e  ,,,missing {} un
1490: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43  expected {},,,.C
14a0: 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20  iphers Protocol 
14b0: 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 33 2c  Specific,TLS1.3,
14c0: 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72  tls1.3,,"lcompar
14d0: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22  e [exec_get "":"
14e0: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f  " ciphers -tls1_
14f0: 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69  3 -s] [::tls::ci
1500: 70 68 65 72 73 20 74 6c 73 31 2e 33 20 30 20 31  phers tls1.3 0 1
1510: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20  ]",,,missing {} 
1520: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c  unexpected {},,,
1530: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d  .,,,,,,,,,,.comm
1540: 61 6e 64 2c 23 20 43 69 70 68 65 72 73 20 45 72  and,# Ciphers Er
1550: 72 6f 72 20 43 61 73 65 73 2c 2c 2c 2c 2c 2c 2c  ror Cases,,,,,,,
1560: 2c 2c 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72  ,,.Ciphers Error
1570: 73 2c 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c  s,Too many args,
1580: 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73  ,,::tls::ciphers
1590: 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 20 74   too many args t
15a0: 6f 20 70 61 73 73 2c 2c 2c 22 77 72 6f 6e 67 20  o pass,,,"wrong 
15b0: 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62  # args: should b
15c0: 65 20 22 22 3a 3a 74 6c 73 3a 3a 63 69 70 68 65  e ""::tls::ciphe
15d0: 72 73 20 3f 70 72 6f 74 6f 63 6f 6c 3f 20 3f 76  rs ?protocol? ?v
15e0: 65 72 62 6f 73 65 3f 20 3f 73 75 70 70 6f 72 74  erbose? ?support
15f0: 65 64 3f 22 22 22 2c 2c 2c 31 0a 43 69 70 68 65  ed?""",,,1.Ciphe
1600: 72 73 20 45 72 72 6f 72 73 2c 49 6e 76 61 6c 69  rs Errors,Invali
1610: 64 20 70 72 6f 74 6f 63 6f 6c 2c 2c 2c 3a 3a 74  d protocol,,,::t
1620: 6c 73 3a 3a 63 69 70 68 65 72 73 20 62 6f 67 75  ls::ciphers bogu
1630: 73 2c 2c 2c 22 62 61 64 20 70 72 6f 74 6f 63 6f  s,,,"bad protoco
1640: 6c 20 22 22 62 6f 67 75 73 22 22 3a 20 6d 75 73  l ""bogus"": mus
1650: 74 20 62 65 20 73 73 6c 32 2c 20 73 73 6c 33 2c  t be ssl2, ssl3,
1660: 20 74 6c 73 31 2c 20 74 6c 73 31 2e 31 2c 20 74   tls1, tls1.1, t
1670: 6c 73 31 2e 32 2c 20 6f 72 20 74 6c 73 31 2e 33  ls1.2, or tls1.3
1680: 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72  ",,,1.Ciphers Er
1690: 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20 76 65 72  rors,Invalid ver
16a0: 62 6f 73 65 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 69  bose,,,::tls::ci
16b0: 70 68 65 72 73 20 74 6c 73 31 2e 33 20 62 6f 67  phers tls1.3 bog
16c0: 75 73 2c 2c 2c 22 65 78 70 65 63 74 65 64 20 62  us,,,"expected b
16d0: 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 20 62 75 74  oolean value but
16e0: 20 67 6f 74 20 22 22 62 6f 67 75 73 22 22 22 2c   got ""bogus""",
16f0: 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 6f  ,,1.Ciphers Erro
1700: 72 73 2c 49 6e 76 61 6c 69 64 20 73 75 70 70 6f  rs,Invalid suppo
1710: 72 74 65 64 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 69  rted,,,::tls::ci
1720: 70 68 65 72 73 20 74 6c 73 31 2e 33 20 31 20 62  phers tls1.3 1 b
1730: 6f 67 75 73 2c 2c 2c 22 65 78 70 65 63 74 65 64  ogus,,,"expected
1740: 20 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 20 62   boolean value b
1750: 75 74 20 67 6f 74 20 22 22 62 6f 67 75 73 22 22  ut got ""bogus""
1760: 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72  ",,,1.Ciphers Er
1770: 72 6f 72 73 2c 53 53 4c 32 2c 21 73 73 6c 32 2c  rors,SSL2,!ssl2,
1780: 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20  ,::tls::ciphers 
1790: 73 73 6c 32 2c 2c 2c 73 73 6c 32 3a 20 70 72 6f  ssl2,,,ssl2: pro
17a0: 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 6f 72  tocol not suppor
17b0: 74 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20  ted,,,1.Ciphers 
17c0: 45 72 72 6f 72 73 2c 53 53 4c 33 2c 21 73 73 6c  Errors,SSL3,!ssl
17d0: 33 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72  3,,::tls::cipher
17e0: 73 20 73 73 6c 33 2c 2c 2c 73 73 6c 33 3a 20 70  s ssl3,,,ssl3: p
17f0: 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70  rotocol not supp
1800: 6f 72 74 65 64 2c 2c 2c 31 0a 2c 2c 2c 2c 2c 2c  orted,,,1.,,,,,,
1810: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54  ,,,,.command,# T
1820: 65 73 74 20 6c 69 73 74 20 64 69 67 65 73 74 73  est list digests
1830: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74  ,,,,,,,,,.Digest
1840: 73 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f  s List,All,,,lco
1850: 6d 70 61 72 65 20 5b 6c 73 6f 72 74 20 5b 65 78  mpare [lsort [ex
1860: 65 63 5f 67 65 74 5f 64 69 67 65 73 74 73 5d 5d  ec_get_digests]]
1870: 20 5b 6c 73 6f 72 74 20 5b 74 6c 73 3a 3a 64 69   [lsort [tls::di
1880: 67 65 73 74 73 5d 5d 2c 2c 2c 6d 69 73 73 69 6e  gests]],,,missin
1890: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20  g {} unexpected 
18a0: 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c  {},,,.,,,,,,,,,,
18b0: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20  .command,# Test 
18c0: 64 69 67 65 73 74 20 63 6f 6d 6d 61 6e 64 73 2c  digest commands,
18d0: 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20  ,,,,,,,,.Digest 
18e0: 43 6d 64 73 2c 6d 64 34 20 63 6d 64 2c 2c 2c 22  Cmds,md4 cmd,,,"
18f0: 74 6c 73 3a 3a 6d 64 34 20 22 22 45 78 61 6d 70  tls::md4 ""Examp
1900: 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65  le string for me
1910: 73 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73  ssage digest tes
1920: 74 73 2e 22 22 22 2c 2c 2c 31 38 31 43 44 43 46  ts.""",,,181CDCF
1930: 39 44 42 39 42 36 46 41 38 46 43 30 41 33 42 46  9DB9B6FA8FC0A3BF
1940: 39 43 33 34 45 32 39 44 39 2c 2c 2c 0a 44 69 67  9C34E29D9,,,.Dig
1950: 65 73 74 20 43 6d 64 73 2c 6d 64 35 20 63 6d 64  est Cmds,md5 cmd
1960: 2c 2c 2c 22 74 6c 73 3a 3a 6d 64 35 20 22 22 45  ,,,"tls::md5 ""E
1970: 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f  xample string fo
1980: 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74  r message digest
1990: 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 43 43 42   tests.""",,,CCB
19a0: 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33  1BE2E11D8183E843
19b0: 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c  FF73DA8C6D206,,,
19c0: 0a 44 69 67 65 73 74 20 43 6d 64 73 2c 73 68 61  .Digest Cmds,sha
19d0: 31 20 63 6d 64 2c 2c 2c 22 74 6c 73 3a 3a 73 68  1 cmd,,,"tls::sh
19e0: 61 31 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72  a1 ""Example str
19f0: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20  ing for message 
1a00: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22  digest tests."""
1a10: 2c 2c 2c 33 41 45 46 45 38 34 30 43 41 34 39 32  ,,,3AEFE840CA492
1a20: 43 33 38 37 45 39 30 33 46 31 35 45 44 36 30 31  C387E903F15ED601
1a30: 39 45 37 41 44 38 33 33 42 34 37 2c 2c 2c 0a 44  9E7AD833B47,,,.D
1a40: 69 67 65 73 74 20 43 6d 64 73 2c 73 68 61 32 35  igest Cmds,sha25
1a50: 36 20 63 6d 64 2c 2c 2c 22 74 6c 73 3a 3a 73 68  6 cmd,,,"tls::sh
1a60: 61 32 35 36 20 22 22 45 78 61 6d 70 6c 65 20 73  a256 ""Example s
1a70: 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67  tring for messag
1a80: 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22  e digest tests."
1a90: 22 22 2c 2c 2c 42 37 44 46 44 44 45 42 30 33 31  "",,,B7DFDDEB031
1aa0: 34 41 37 34 46 46 35 36 41 38 41 43 31 45 33 44  4A74FF56A8AC1E3D
1ab0: 43 35 37 44 46 30 39 42 42 35 32 41 39 36 44 41  C57DF09BB52A96DA
1ac0: 35 30 46 36 35 34 39 45 42 36 32 43 41 36 31 41  50F6549EB62CA61A
1ad0: 30 41 34 39 31 2c 2c 2c 0a 44 69 67 65 73 74 20  0A491,,,.Digest 
1ae0: 43 6d 64 73 2c 73 68 61 35 31 32 20 63 6d 64 2c  Cmds,sha512 cmd,
1af0: 2c 2c 22 74 6c 73 3a 3a 73 68 61 35 31 32 20 22  ,,"tls::sha512 "
1b00: 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20  "Example string 
1b10: 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65  for message dige
1b20: 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 42  st tests.""",,,B
1b30: 35 36 45 43 35 35 45 33 33 31 39 33 45 31 37 42  56EC55E33193E17B
1b40: 36 31 44 36 36 39 46 42 37 42 30 34 41 44 32 34  61D669FB7B04AD24
1b50: 38 33 44 45 39 33 46 45 38 34 37 43 34 31 31 42  83DE93FE847C411B
1b60: 42 45 41 45 36 34 34 30 45 43 45 41 36 43 37 43  BEAE6440ECEA6C7C
1b70: 46 44 44 32 45 36 46 33 35 41 30 36 43 42 31 38  FDD2E6F35A06CB18
1b80: 39 46 43 36 32 44 37 39 39 45 37 38 35 43 44 42  9FC62D799E785CDB
1b90: 37 41 32 33 31 37 38 33 32 33 37 38 39 44 30 30  7A23178323789D00
1ba0: 31 42 43 38 45 34 34 41 30 42 35 39 30 37 46 2c  1BC8E44A0B5907F,
1bb0: 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f  ,,.,,,,,,,,,,.co
1bc0: 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 64 69 67  mmand,# Test dig
1bd0: 65 73 74 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20  est command for 
1be0: 64 61 74 61 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69  data,,,,,,,,,.Di
1bf0: 67 65 73 74 20 44 61 74 61 2c 6d 64 34 2c 2c 2c  gest Data,md4,,,
1c00: 22 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 34  "tls::digest md4
1c10: 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e   ""Example strin
1c20: 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69  g for message di
1c30: 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c  gest tests.""",,
1c40: 2c 31 38 31 43 44 43 46 39 44 42 39 42 36 46 41  ,181CDCF9DB9B6FA
1c50: 38 46 43 30 41 33 42 46 39 43 33 34 45 32 39 44  8FC0A3BF9C34E29D
1c60: 39 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 74 61  9,,,.Digest Data
1c70: 2c 6d 64 35 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67  ,md5,,,"tls::dig
1c80: 65 73 74 20 6d 64 35 20 22 22 45 78 61 6d 70 6c  est md5 ""Exampl
1c90: 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73  e string for mes
1ca0: 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74  sage digest test
1cb0: 73 2e 22 22 22 2c 2c 2c 43 43 42 31 42 45 32 45  s.""",,,CCB1BE2E
1cc0: 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44  11D8183E843FF73D
1cd0: 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65  A8C6D206,,,.Dige
1ce0: 73 74 20 44 61 74 61 2c 73 68 61 31 2c 2c 2c 22  st Data,sha1,,,"
1cf0: 74 6c 73 3a 3a 64 69 67 65 73 74 20 73 68 61 31  tls::digest sha1
1d00: 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e   ""Example strin
1d10: 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69  g for message di
1d20: 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c  gest tests.""",,
1d30: 2c 33 41 45 46 45 38 34 30 43 41 34 39 32 43 33  ,3AEFE840CA492C3
1d40: 38 37 45 39 30 33 46 31 35 45 44 36 30 31 39 45  87E903F15ED6019E
1d50: 37 41 44 38 33 33 42 34 37 2c 2c 2c 0a 44 69 67  7AD833B47,,,.Dig
1d60: 65 73 74 20 44 61 74 61 2c 73 68 61 32 35 36 2c  est Data,sha256,
1d70: 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73 74 20 73  ,,"tls::digest s
1d80: 68 61 32 35 36 20 22 22 45 78 61 6d 70 6c 65 20  ha256 ""Example 
1d90: 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61  string for messa
1da0: 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e  ge digest tests.
1db0: 22 22 22 2c 2c 2c 42 37 44 46 44 44 45 42 30 33  """,,,B7DFDDEB03
1dc0: 31 34 41 37 34 46 46 35 36 41 38 41 43 31 45 33  14A74FF56A8AC1E3
1dd0: 44 43 35 37 44 46 30 39 42 42 35 32 41 39 36 44  DC57DF09BB52A96D
1de0: 41 35 30 46 36 35 34 39 45 42 36 32 43 41 36 31  A50F6549EB62CA61
1df0: 41 30 41 34 39 31 2c 2c 2c 0a 44 69 67 65 73 74  A0A491,,,.Digest
1e00: 20 44 61 74 61 2c 73 68 61 35 31 32 2c 2c 2c 22   Data,sha512,,,"
1e10: 74 6c 73 3a 3a 64 69 67 65 73 74 20 73 68 61 35  tls::digest sha5
1e20: 31 32 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72  12 ""Example str
1e30: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20  ing for message 
1e40: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22  digest tests."""
1e50: 2c 2c 2c 42 35 36 45 43 35 35 45 33 33 31 39 33  ,,,B56EC55E33193
1e60: 45 31 37 42 36 31 44 36 36 39 46 42 37 42 30 34  E17B61D669FB7B04
1e70: 41 44 32 34 38 33 44 45 39 33 46 45 38 34 37 43  AD2483DE93FE847C
1e80: 34 31 31 42 42 45 41 45 36 34 34 30 45 43 45 41  411BBEAE6440ECEA
1e90: 36 43 37 43 46 44 44 32 45 36 46 33 35 41 30 36  6C7CFDD2E6F35A06
1ea0: 43 42 31 38 39 46 43 36 32 44 37 39 39 45 37 38  CB189FC62D799E78
1eb0: 35 43 44 42 37 41 32 33 31 37 38 33 32 33 37 38  5CDB7A2317832378
1ec0: 39 44 30 30 31 42 43 38 45 34 34 41 30 42 35 39  9D001BC8E44A0B59
1ed0: 30 37 46 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61  07F,,,.Digest Da
1ee0: 74 61 2c 6d 64 35 20 62 69 6e 2c 2c 2c 22 73 74  ta,md5 bin,,,"st
1ef0: 72 69 6e 67 20 74 6f 75 70 70 65 72 20 5b 62 69  ring toupper [bi
1f00: 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20  nary encode hex 
1f10: 5b 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35  [tls::digest md5
1f20: 20 2d 62 69 6e 20 22 22 45 78 61 6d 70 6c 65 20   -bin ""Example 
1f30: 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61  string for messa
1f40: 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e  ge digest tests.
1f50: 22 22 5d 5d 22 2c 2c 2c 43 43 42 31 42 45 32 45  ""]]",,,CCB1BE2E
1f60: 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44  11D8183E843FF73D
1f70: 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65  A8C6D206,,,.Dige
1f80: 73 74 20 44 61 74 61 2c 6d 64 35 20 68 65 78 2c  st Data,md5 hex,
1f90: 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d  ,,"tls::digest m
1fa0: 64 35 20 2d 68 65 78 20 22 22 45 78 61 6d 70 6c  d5 -hex ""Exampl
1fb0: 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73  e string for mes
1fc0: 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74  sage digest test
1fd0: 73 2e 22 22 22 2c 2c 2c 43 43 42 31 42 45 32 45  s.""",,,CCB1BE2E
1fe0: 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44  11D8183E843FF73D
1ff0: 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65  A8C6D206,,,.Dige
2000: 73 74 20 44 61 74 61 2c 6d 64 35 20 77 69 74 68  st Data,md5 with
2010: 20 61 72 67 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67   arg,,,"tls::dig
2020: 65 73 74 20 6d 64 35 20 2d 64 61 74 61 20 22 22  est md5 -data ""
2030: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66  Example string f
2040: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73  or message diges
2050: 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 43 43  t tests.""",,,CC
2060: 42 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34  B1BE2E11D8183E84
2070: 33 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c  3FF73DA8C6D206,,
2080: 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d  ,.,,,,,,,,,,.com
2090: 6d 61 6e 64 2c 23 20 54 65 73 74 20 64 69 67 65  mand,# Test dige
20a0: 73 74 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 66  st command for f
20b0: 69 6c 65 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69  iles,,,,,,,,,.Di
20c0: 67 65 73 74 20 46 69 6c 65 2c 6d 64 34 2c 2c 2c  gest File,md4,,,
20d0: 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 34 20  tls::digest md4 
20e0: 2d 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61  -file md_data.da
20f0: 74 2c 2c 2c 31 38 31 43 44 43 46 39 44 42 39 42  t,,,181CDCF9DB9B
2100: 36 46 41 38 46 43 30 41 33 42 46 39 43 33 34 45  6FA8FC0A3BF9C34E
2110: 32 39 44 39 2c 2c 2c 0a 44 69 67 65 73 74 20 46  29D9,,,.Digest F
2120: 69 6c 65 2c 6d 64 35 2c 2c 2c 74 6c 73 3a 3a 64  ile,md5,,,tls::d
2130: 69 67 65 73 74 20 6d 64 35 20 2d 66 69 6c 65 20  igest md5 -file 
2140: 6d 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 43 43  md_data.dat,,,CC
2150: 42 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34  B1BE2E11D8183E84
2160: 33 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c  3FF73DA8C6D206,,
2170: 2c 0a 44 69 67 65 73 74 20 46 69 6c 65 2c 73 68  ,.Digest File,sh
2180: 61 31 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74  a1,,,tls::digest
2190: 20 73 68 61 31 20 2d 66 69 6c 65 20 6d 64 5f 64   sha1 -file md_d
21a0: 61 74 61 2e 64 61 74 2c 2c 2c 33 41 45 46 45 38  ata.dat,,,3AEFE8
21b0: 34 30 43 41 34 39 32 43 33 38 37 45 39 30 33 46  40CA492C387E903F
21c0: 31 35 45 44 36 30 31 39 45 37 41 44 38 33 33 42  15ED6019E7AD833B
21d0: 34 37 2c 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c  47,,,.Digest Fil
21e0: 65 2c 73 68 61 32 35 36 2c 2c 2c 74 6c 73 3a 3a  e,sha256,,,tls::
21f0: 64 69 67 65 73 74 20 73 68 61 32 35 36 20 2d 66  digest sha256 -f
2200: 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 2c  ile md_data.dat,
2210: 2c 2c 42 37 44 46 44 44 45 42 30 33 31 34 41 37  ,,B7DFDDEB0314A7
2220: 34 46 46 35 36 41 38 41 43 31 45 33 44 43 35 37  4FF56A8AC1E3DC57
2230: 44 46 30 39 42 42 35 32 41 39 36 44 41 35 30 46  DF09BB52A96DA50F
2240: 36 35 34 39 45 42 36 32 43 41 36 31 41 30 41 34  6549EB62CA61A0A4
2250: 39 31 2c 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c  91,,,.Digest Fil
2260: 65 2c 73 68 61 35 31 32 2c 2c 2c 74 6c 73 3a 3a  e,sha512,,,tls::
2270: 64 69 67 65 73 74 20 73 68 61 35 31 32 20 2d 66  digest sha512 -f
2280: 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 2c  ile md_data.dat,
2290: 2c 2c 42 35 36 45 43 35 35 45 33 33 31 39 33 45  ,,B56EC55E33193E
22a0: 31 37 42 36 31 44 36 36 39 46 42 37 42 30 34 41  17B61D669FB7B04A
22b0: 44 32 34 38 33 44 45 39 33 46 45 38 34 37 43 34  D2483DE93FE847C4
22c0: 31 31 42 42 45 41 45 36 34 34 30 45 43 45 41 36  11BBEAE6440ECEA6
22d0: 43 37 43 46 44 44 32 45 36 46 33 35 41 30 36 43  C7CFDD2E6F35A06C
22e0: 42 31 38 39 46 43 36 32 44 37 39 39 45 37 38 35  B189FC62D799E785
22f0: 43 44 42 37 41 32 33 31 37 38 33 32 33 37 38 39  CDB7A23178323789
2300: 44 30 30 31 42 43 38 45 34 34 41 30 42 35 39 30  D001BC8E44A0B590
2310: 37 46 2c 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c  7F,,,.Digest Fil
2320: 65 2c 6d 64 35 20 62 69 6e 2c 2c 2c 73 74 72 69  e,md5 bin,,,stri
2330: 6e 67 20 74 6f 75 70 70 65 72 20 5b 62 69 6e 61  ng toupper [bina
2340: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 74  ry encode hex [t
2350: 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 2d  ls::digest md5 -
2360: 62 69 6e 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74  bin -file md_dat
2370: 61 2e 64 61 74 5d 5d 2c 2c 2c 43 43 42 31 42 45  a.dat]],,,CCB1BE
2380: 32 45 31 31 44 38 31 38 33 45 38 34 33 46 46 37  2E11D8183E843FF7
2390: 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69  3DA8C6D206,,,.Di
23a0: 67 65 73 74 20 46 69 6c 65 2c 6d 64 35 20 68 65  gest File,md5 he
23b0: 78 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74 20  x,,,tls::digest 
23c0: 6d 64 35 20 2d 68 65 78 20 2d 66 69 6c 65 20 6d  md5 -hex -file m
23d0: 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 43 43 42  d_data.dat,,,CCB
23e0: 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33  1BE2E11D8183E843
23f0: 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c  FF73DA8C6D206,,,
2400: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d  .,,,,,,,,,,.comm
2410: 61 6e 64 2c 23 20 54 65 73 74 20 64 69 67 65 73  and,# Test diges
2420: 74 20 63 6f 6d 6d 61 6e 64 20 66 6f 72 20 63 68  t command for ch
2430: 61 6e 6e 65 6c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44  annel,,,,,,,,,.D
2440: 69 67 65 73 74 20 43 68 61 6e 2c 6d 64 34 2c 2c  igest Chan,md4,,
2450: 2c 72 65 61 64 5f 63 68 61 6e 20 6d 64 34 20 6d  ,read_chan md4 m
2460: 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 31 38 31  d_data.dat,,,181
2470: 43 44 43 46 39 44 42 39 42 36 46 41 38 46 43 30  CDCF9DB9B6FA8FC0
2480: 41 33 42 46 39 43 33 34 45 32 39 44 39 2c 2c 2c  A3BF9C34E29D9,,,
2490: 0a 44 69 67 65 73 74 20 43 68 61 6e 2c 6d 64 35  .Digest Chan,md5
24a0: 2c 2c 2c 72 65 61 64 5f 63 68 61 6e 20 6d 64 35  ,,,read_chan md5
24b0: 20 6d 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 43   md_data.dat,,,C
24c0: 43 42 31 42 45 32 45 31 31 44 38 31 38 33 45 38  CB1BE2E11D8183E8
24d0: 34 33 46 46 37 33 44 41 38 43 36 44 32 30 36 2c  43FF73DA8C6D206,
24e0: 2c 2c 0a 44 69 67 65 73 74 20 43 68 61 6e 2c 73  ,,.Digest Chan,s
24f0: 68 61 31 2c 2c 2c 72 65 61 64 5f 63 68 61 6e 20  ha1,,,read_chan 
2500: 73 68 61 31 20 6d 64 5f 64 61 74 61 2e 64 61 74  sha1 md_data.dat
2510: 2c 2c 2c 33 41 45 46 45 38 34 30 43 41 34 39 32  ,,,3AEFE840CA492
2520: 43 33 38 37 45 39 30 33 46 31 35 45 44 36 30 31  C387E903F15ED601
2530: 39 45 37 41 44 38 33 33 42 34 37 2c 2c 2c 0a 44  9E7AD833B47,,,.D
2540: 69 67 65 73 74 20 43 68 61 6e 2c 73 68 61 32 35  igest Chan,sha25
2550: 36 2c 2c 2c 72 65 61 64 5f 63 68 61 6e 20 73 68  6,,,read_chan sh
2560: 61 32 35 36 20 6d 64 5f 64 61 74 61 2e 64 61 74  a256 md_data.dat
2570: 2c 2c 2c 42 37 44 46 44 44 45 42 30 33 31 34 41  ,,,B7DFDDEB0314A
2580: 37 34 46 46 35 36 41 38 41 43 31 45 33 44 43 35  74FF56A8AC1E3DC5
2590: 37 44 46 30 39 42 42 35 32 41 39 36 44 41 35 30  7DF09BB52A96DA50
25a0: 46 36 35 34 39 45 42 36 32 43 41 36 31 41 30 41  F6549EB62CA61A0A
25b0: 34 39 31 2c 2c 2c 0a 44 69 67 65 73 74 20 43 68  491,,,.Digest Ch
25c0: 61 6e 2c 73 68 61 35 31 32 2c 2c 2c 72 65 61 64  an,sha512,,,read
25d0: 5f 63 68 61 6e 20 73 68 61 35 31 32 20 6d 64 5f  _chan sha512 md_
25e0: 64 61 74 61 2e 64 61 74 2c 2c 2c 42 35 36 45 43  data.dat,,,B56EC
25f0: 35 35 45 33 33 31 39 33 45 31 37 42 36 31 44 36  55E33193E17B61D6
2600: 36 39 46 42 37 42 30 34 41 44 32 34 38 33 44 45  69FB7B04AD2483DE
2610: 39 33 46 45 38 34 37 43 34 31 31 42 42 45 41 45  93FE847C411BBEAE
2620: 36 34 34 30 45 43 45 41 36 43 37 43 46 44 44 32  6440ECEA6C7CFDD2
2630: 45 36 46 33 35 41 30 36 43 42 31 38 39 46 43 36  E6F35A06CB189FC6
2640: 32 44 37 39 39 45 37 38 35 43 44 42 37 41 32 33  2D799E785CDB7A23
2650: 31 37 38 33 32 33 37 38 39 44 30 30 31 42 43 38  178323789D001BC8
2660: 45 34 34 41 30 42 35 39 30 37 46 2c 2c 2c 0a 44  E44A0B5907F,,,.D
2670: 69 67 65 73 74 20 43 68 61 6e 2c 6d 64 35 20 62  igest Chan,md5 b
2680: 69 6e 2c 2c 2c 73 74 72 69 6e 67 20 74 6f 75 70  in,,,string toup
2690: 70 65 72 20 5b 62 69 6e 61 72 79 20 65 6e 63 6f  per [binary enco
26a0: 64 65 20 68 65 78 20 5b 72 65 61 64 5f 63 68 61  de hex [read_cha
26b0: 6e 20 6d 64 35 20 6d 64 5f 64 61 74 61 2e 64 61  n md5 md_data.da
26c0: 74 20 2d 62 69 6e 5d 5d 2c 2c 2c 43 43 42 31 42  t -bin]],,,CCB1B
26d0: 45 32 45 31 31 44 38 31 38 33 45 38 34 33 46 46  E2E11D8183E843FF
26e0: 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44  73DA8C6D206,,,.D
26f0: 69 67 65 73 74 20 43 68 61 6e 2c 6d 64 35 20 68  igest Chan,md5 h
2700: 65 78 2c 2c 2c 72 65 61 64 5f 63 68 61 6e 20 6d  ex,,,read_chan m
2710: 64 35 20 6d 64 5f 64 61 74 61 2e 64 61 74 20 2d  d5 md_data.dat -
2720: 68 65 78 2c 2c 2c 43 43 42 31 42 45 32 45 31 31  hex,,,CCB1BE2E11
2730: 44 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38  D8183E843FF73DA8
2740: 43 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c  C6D206,,,.,,,,,,
2750: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54  ,,,,.command,# T
2760: 65 73 74 20 64 69 67 65 73 74 20 63 6f 6d 6d 61  est digest comma
2770: 6e 64 20 66 6f 72 20 61 63 63 75 6d 75 6c 61 74  nd for accumulat
2780: 6f 72 20 63 6f 6d 6d 61 6e 64 2c 2c 2c 2c 2c 2c  or command,,,,,,
2790: 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6f 6d 6d 61  ,,,.Digest Comma
27a0: 6e 64 2c 6d 64 34 2c 2c 2c 22 61 63 63 75 6d 75  nd,md4,,,"accumu
27b0: 6c 61 74 65 20 6d 64 34 20 22 22 45 78 61 6d 70  late md4 ""Examp
27c0: 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65  le string for me
27d0: 73 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73  ssage digest tes
27e0: 74 73 2e 22 22 22 2c 2c 2c 31 38 31 43 44 43 46  ts.""",,,181CDCF
27f0: 39 44 42 39 42 36 46 41 38 46 43 30 41 33 42 46  9DB9B6FA8FC0A3BF
2800: 39 43 33 34 45 32 39 44 39 2c 2c 2c 0a 44 69 67  9C34E29D9,,,.Dig
2810: 65 73 74 20 43 6f 6d 6d 61 6e 64 2c 6d 64 35 2c  est Command,md5,
2820: 2c 2c 22 61 63 63 75 6d 75 6c 61 74 65 20 6d 64  ,,"accumulate md
2830: 35 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69  5 ""Example stri
2840: 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64  ng for message d
2850: 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c  igest tests.""",
2860: 2c 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 38  ,,CCB1BE2E11D818
2870: 33 45 38 34 33 46 46 37 33 44 41 38 43 36 44 32  3E843FF73DA8C6D2
2880: 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6f 6d  06,,,.Digest Com
2890: 6d 61 6e 64 2c 73 68 61 31 2c 2c 2c 22 61 63 63  mand,sha1,,,"acc
28a0: 75 6d 75 6c 61 74 65 20 73 68 61 31 20 22 22 45  umulate sha1 ""E
28b0: 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f  xample string fo
28c0: 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74  r message digest
28d0: 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 33 41 45   tests.""",,,3AE
28e0: 46 45 38 34 30 43 41 34 39 32 43 33 38 37 45 39  FE840CA492C387E9
28f0: 30 33 46 31 35 45 44 36 30 31 39 45 37 41 44 38  03F15ED6019E7AD8
2900: 33 33 42 34 37 2c 2c 2c 0a 44 69 67 65 73 74 20  33B47,,,.Digest 
2910: 43 6f 6d 6d 61 6e 64 2c 73 68 61 32 35 36 2c 2c  Command,sha256,,
2920: 2c 22 61 63 63 75 6d 75 6c 61 74 65 20 73 68 61  ,"accumulate sha
2930: 32 35 36 20 22 22 45 78 61 6d 70 6c 65 20 73 74  256 ""Example st
2940: 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65  ring for message
2950: 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22   digest tests.""
2960: 22 2c 2c 2c 42 37 44 46 44 44 45 42 30 33 31 34  ",,,B7DFDDEB0314
2970: 41 37 34 46 46 35 36 41 38 41 43 31 45 33 44 43  A74FF56A8AC1E3DC
2980: 35 37 44 46 30 39 42 42 35 32 41 39 36 44 41 35  57DF09BB52A96DA5
2990: 30 46 36 35 34 39 45 42 36 32 43 41 36 31 41 30  0F6549EB62CA61A0
29a0: 41 34 39 31 2c 2c 2c 0a 44 69 67 65 73 74 20 43  A491,,,.Digest C
29b0: 6f 6d 6d 61 6e 64 2c 73 68 61 35 31 32 2c 2c 2c  ommand,sha512,,,
29c0: 22 61 63 63 75 6d 75 6c 61 74 65 20 73 68 61 35  "accumulate sha5
29d0: 31 32 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72  12 ""Example str
29e0: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20  ing for message 
29f0: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22  digest tests."""
2a00: 2c 2c 2c 42 35 36 45 43 35 35 45 33 33 31 39 33  ,,,B56EC55E33193
2a10: 45 31 37 42 36 31 44 36 36 39 46 42 37 42 30 34  E17B61D669FB7B04
2a20: 41 44 32 34 38 33 44 45 39 33 46 45 38 34 37 43  AD2483DE93FE847C
2a30: 34 31 31 42 42 45 41 45 36 34 34 30 45 43 45 41  411BBEAE6440ECEA
2a40: 36 43 37 43 46 44 44 32 45 36 46 33 35 41 30 36  6C7CFDD2E6F35A06
2a50: 43 42 31 38 39 46 43 36 32 44 37 39 39 45 37 38  CB189FC62D799E78
2a60: 35 43 44 42 37 41 32 33 31 37 38 33 32 33 37 38  5CDB7A2317832378
2a70: 39 44 30 30 31 42 43 38 45 34 34 41 30 42 35 39  9D001BC8E44A0B59
2a80: 30 37 46 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6f  07F,,,.Digest Co
2a90: 6d 6d 61 6e 64 2c 6d 64 35 20 62 69 6e 2c 2c 2c  mmand,md5 bin,,,
2aa0: 22 73 74 72 69 6e 67 20 74 6f 75 70 70 65 72 20  "string toupper 
2ab0: 5b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68  [binary encode h
2ac0: 65 78 20 5b 61 63 63 75 6d 75 6c 61 74 65 20 6d  ex [accumulate m
2ad0: 64 35 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72  d5 ""Example str
2ae0: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20  ing for message 
2af0: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 20  digest tests."" 
2b00: 2d 62 69 6e 5d 5d 22 2c 2c 2c 43 43 42 31 42 45  -bin]]",,,CCB1BE
2b10: 32 45 31 31 44 38 31 38 33 45 38 34 33 46 46 37  2E11D8183E843FF7
2b20: 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69  3DA8C6D206,,,.Di
2b30: 67 65 73 74 20 43 6f 6d 6d 61 6e 64 2c 6d 64 35  gest Command,md5
2b40: 20 68 65 78 2c 2c 2c 22 61 63 63 75 6d 75 6c 61   hex,,,"accumula
2b50: 74 65 20 6d 64 35 20 22 22 45 78 61 6d 70 6c 65  te md5 ""Example
2b60: 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73   string for mess
2b70: 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73  age digest tests
2b80: 2e 22 22 20 2d 68 65 78 22 2c 2c 2c 43 43 42 31  ."" -hex",,,CCB1
2b90: 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33 46  BE2E11D8183E843F
2ba0: 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a  F73DA8C6D206,,,.
2bb0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61  ,,,,,,,,,,.comma
2bc0: 6e 64 2c 23 20 54 65 73 74 20 48 4d 41 43 2c 2c  nd,# Test HMAC,,
2bd0: 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 48  ,,,,,,,.Digest H
2be0: 4d 41 43 2c 64 61 74 61 2c 2c 2c 22 74 6c 73 3a  MAC,data,,,"tls:
2bf0: 3a 64 69 67 65 73 74 20 6d 64 35 20 2d 6b 65 79  :digest md5 -key
2c00: 20 22 22 45 78 61 6d 70 6c 65 20 6b 65 79 22 22   ""Example key""
2c10: 20 2d 64 61 74 61 20 22 22 45 78 61 6d 70 6c 65   -data ""Example
2c20: 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73   string for mess
2c30: 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74 73  age digest tests
2c40: 2e 22 22 22 2c 2c 2c 39 30 31 44 41 36 45 36 39  .""",,,901DA6E69
2c50: 37 36 41 37 31 36 35 30 43 37 37 34 34 33 43 33  76A71650C77443C3
2c60: 37 46 46 39 43 37 46 2c 2c 2c 0a 44 69 67 65 73  7FF9C7F,,,.Diges
2c70: 74 20 48 4d 41 43 2c 66 69 6c 65 2c 2c 2c 22 74  t HMAC,file,,,"t
2c80: 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 2d  ls::digest md5 -
2c90: 6b 65 79 20 22 22 45 78 61 6d 70 6c 65 20 6b 65  key ""Example ke
2ca0: 79 22 22 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74  y"" -file md_dat
2cb0: 61 2e 64 61 74 22 2c 2c 2c 39 30 31 44 41 36 45  a.dat",,,901DA6E
2cc0: 36 39 37 36 41 37 31 36 35 30 43 37 37 34 34 33  6976A71650C77443
2cd0: 43 33 37 46 46 39 43 37 46 2c 2c 2c 0a 44 69 67  C37FF9C7F,,,.Dig
2ce0: 65 73 74 20 48 4d 41 43 2c 63 68 61 6e 6e 65 6c  est HMAC,channel
2cf0: 2c 2c 2c 22 72 65 61 64 5f 63 68 61 6e 20 6d 64  ,,,"read_chan md
2d00: 35 20 6d 64 5f 64 61 74 61 2e 64 61 74 20 2d 6b  5 md_data.dat -k
2d10: 65 79 20 22 22 45 78 61 6d 70 6c 65 20 6b 65 79  ey ""Example key
2d20: 22 22 22 2c 2c 2c 39 30 31 44 41 36 45 36 39 37  """,,,901DA6E697
2d30: 36 41 37 31 36 35 30 43 37 37 34 34 33 43 33 37  6A71650C77443C37
2d40: 46 46 39 43 37 46 2c 2c 2c 0a 44 69 67 65 73 74  FF9C7F,,,.Digest
2d50: 20 48 4d 41 43 2c 64 61 74 61 20 62 69 6e 2c 2c   HMAC,data bin,,
2d60: 2c 22 73 74 72 69 6e 67 20 74 6f 75 70 70 65 72  ,"string toupper
2d70: 20 5b 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20   [binary encode 
2d80: 68 65 78 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74  hex [tls::digest
2d90: 20 6d 64 35 20 2d 62 69 6e 20 2d 6b 65 79 20 22   md5 -bin -key "
2da0: 22 45 78 61 6d 70 6c 65 20 6b 65 79 22 22 20 2d  "Example key"" -
2db0: 64 61 74 61 20 22 22 45 78 61 6d 70 6c 65 20 73  data ""Example s
2dc0: 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67  tring for messag
2dd0: 65 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22  e digest tests."
2de0: 22 5d 5d 22 2c 2c 2c 39 30 31 44 41 36 45 36 39  "]]",,,901DA6E69
2df0: 37 36 41 37 31 36 35 30 43 37 37 34 34 33 43 33  76A71650C77443C3
2e00: 37 46 46 39 43 37 46 2c 2c 2c 0a 2c 2c 2c 2c 2c  7FF9C7F,,,.,,,,,
2e10: 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20  ,,,,,.command,# 
2e20: 44 69 67 65 73 74 20 45 72 72 6f 72 20 43 61 73  Digest Error Cas
2e30: 65 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65  es,,,,,,,,,.Dige
2e40: 73 74 20 45 72 72 6f 72 73 2c 54 6f 6f 20 66 65  st Errors,Too fe
2e50: 77 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a  w args,,,::tls::
2e60: 64 69 67 65 73 74 2c 2c 2c 22 77 72 6f 6e 67 20  digest,,,"wrong 
2e70: 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62  # args: should b
2e80: 65 20 22 22 3a 3a 74 6c 73 3a 3a 64 69 67 65 73  e ""::tls::diges
2e90: 74 20 64 69 67 65 73 74 20 3f 2d 62 69 6e 7c 2d  t digest ?-bin|-
2ea0: 68 65 78 3f 20 3f 2d 63 69 70 68 65 72 20 6e 61  hex? ?-cipher na
2eb0: 6d 65 3f 20 3f 2d 6b 65 79 20 68 6d 61 63 5f 6b  me? ?-key hmac_k
2ec0: 65 79 3f 20 5b 2d 63 68 61 6e 6e 65 6c 20 63 68  ey? [-channel ch
2ed0: 61 6e 20 7c 20 2d 63 6f 6d 6d 61 6e 64 20 63 6d  an | -command cm
2ee0: 64 4e 61 6d 65 20 7c 20 2d 66 69 6c 65 20 66 69  dName | -file fi
2ef0: 6c 65 6e 61 6d 65 20 7c 20 3f 2d 64 61 74 61 3f  lename | ?-data?
2f00: 20 64 61 74 61 5d 22 22 22 2c 2c 2c 31 0a 44 69   data]""",,,1.Di
2f10: 67 65 73 74 20 45 72 72 6f 72 73 2c 54 6f 6f 20  gest Errors,Too 
2f20: 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c  many args,,,::tl
2f30: 73 3a 3a 64 69 67 65 73 74 20 74 6f 6f 20 6d 61  s::digest too ma
2f40: 6e 79 20 61 72 67 73 20 74 6f 20 70 61 73 73 20  ny args to pass 
2f50: 74 68 65 20 74 65 73 74 20 77 69 74 68 6f 75 74  the test without
2f60: 20 61 6e 20 65 72 72 6f 72 2c 2c 2c 22 77 72 6f   an error,,,"wro
2f70: 6e 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c  ng # args: shoul
2f80: 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 64 69  d be ""::tls::di
2f90: 67 65 73 74 20 64 69 67 65 73 74 20 3f 2d 62 69  gest digest ?-bi
2fa0: 6e 7c 2d 68 65 78 3f 20 3f 2d 63 69 70 68 65 72  n|-hex? ?-cipher
2fb0: 20 6e 61 6d 65 3f 20 3f 2d 6b 65 79 20 68 6d 61   name? ?-key hma
2fc0: 63 5f 6b 65 79 3f 20 5b 2d 63 68 61 6e 6e 65 6c  c_key? [-channel
2fd0: 20 63 68 61 6e 20 7c 20 2d 63 6f 6d 6d 61 6e 64   chan | -command
2fe0: 20 63 6d 64 4e 61 6d 65 20 7c 20 2d 66 69 6c 65   cmdName | -file
2ff0: 20 66 69 6c 65 6e 61 6d 65 20 7c 20 3f 2d 64 61   filename | ?-da
3000: 74 61 3f 20 64 61 74 61 5d 22 22 22 2c 2c 2c 31  ta? data]""",,,1
3010: 0a 44 69 67 65 73 74 20 45 72 72 6f 72 73 2c 49  .Digest Errors,I
3020: 6e 76 61 6c 69 64 20 64 69 67 65 73 74 2c 2c 2c  nvalid digest,,,
3030: 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 20 62 6f  ::tls::digest bo
3040: 67 75 73 20 64 61 74 61 2c 2c 2c 22 49 6e 76 61  gus data,,,"Inva
3050: 6c 69 64 20 64 69 67 65 73 74 20 22 22 62 6f 67  lid digest ""bog
3060: 75 73 22 22 22 2c 2c 2c 31 0a 44 69 67 65 73 74  us""",,,1.Digest
3070: 20 45 72 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20   Errors,Invalid 
3080: 6f 70 74 69 6f 6e 2c 2c 2c 3a 3a 74 6c 73 3a 3a  option,,,::tls::
3090: 64 69 67 65 73 74 20 73 68 61 32 35 36 20 2d 62  digest sha256 -b
30a0: 6f 67 75 73 20 76 61 6c 75 65 2c 2c 2c 22 62 61  ogus value,,,"ba
30b0: 64 20 6f 70 74 69 6f 6e 20 22 22 2d 62 6f 67 75  d option ""-bogu
30c0: 73 22 22 3a 20 6d 75 73 74 20 62 65 20 2d 62 69  s"": must be -bi
30d0: 6e 2c 20 2d 63 68 61 6e 6e 65 6c 2c 20 2d 63 69  n, -channel, -ci
30e0: 70 68 65 72 2c 20 2d 63 6f 6d 6d 61 6e 64 2c 20  pher, -command, 
30f0: 2d 64 61 74 61 2c 20 2d 66 69 6c 65 2c 20 2d 66  -data, -file, -f
3100: 69 6c 65 6e 61 6d 65 2c 20 2d 68 65 78 2c 20 6f  ilename, -hex, o
3110: 72 20 2d 6b 65 79 22 2c 2c 2c 31 0a 44 69 67 65  r -key",,,1.Dige
3120: 73 74 20 45 72 72 6f 72 73 2c 49 6e 76 61 6c 69  st Errors,Invali
3130: 64 20 66 69 6c 65 2c 2c 2c 3a 3a 74 6c 73 3a 3a  d file,,,::tls::
3140: 64 69 67 65 73 74 20 73 68 61 32 35 36 20 2d 66  digest sha256 -f
3150: 69 6c 65 20 62 6f 67 75 73 2c 2c 2c 22 63 6f 75  ile bogus,,,"cou
3160: 6c 64 6e 27 74 20 6f 70 65 6e 20 22 22 62 6f 67  ldn't open ""bog
3170: 75 73 22 22 3a 20 6e 6f 20 73 75 63 68 20 66 69  us"": no such fi
3180: 6c 65 20 6f 72 20 64 69 72 65 63 74 6f 72 79 22  le or directory"
3190: 2c 2c 2c 31 0a 44 69 67 65 73 74 20 45 72 72 6f  ,,,1.Digest Erro
31a0: 72 73 2c 49 6e 76 61 6c 69 64 20 63 68 61 6e 6e  rs,Invalid chann
31b0: 65 6c 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65  el,,,::tls::dige
31c0: 73 74 20 73 68 61 32 35 36 20 2d 63 68 61 6e 6e  st sha256 -chann
31d0: 65 6c 20 62 6f 67 75 73 2c 2c 2c 22 63 61 6e 20  el bogus,,,"can 
31e0: 6e 6f 74 20 66 69 6e 64 20 63 68 61 6e 6e 65 6c  not find channel
31f0: 20 6e 61 6d 65 64 20 22 22 62 6f 67 75 73 22 22   named ""bogus""
3200: 22 2c 2c 2c 31 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c  ",,,1.,,,,,,,,,,
3210: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20  .command,# Test 
3220: 6c 69 73 74 20 4d 41 43 73 2c 2c 2c 2c 2c 2c 2c  list MACs,,,,,,,
3230: 2c 2c 0a 4d 41 43 20 4c 69 73 74 2c 41 6c 6c 2c  ,,.MAC List,All,
3240: 2c 2c 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63  ,,lcompare [exec
3250: 5f 67 65 74 5f 6d 61 63 73 5d 20 5b 74 6c 73 3a  _get_macs] [tls:
3260: 3a 6d 61 63 73 5d 2c 2c 2c 6d 69 73 73 69 6e 67  :macs],,,missing
3270: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b   {} unexpected {
3280: 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  },,,.,,,,,,,,,,.
3290: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 6c  command,# Test l
32a0: 69 73 74 20 70 72 6f 74 6f 63 6f 6c 73 2c 2c 2c  ist protocols,,,
32b0: 2c 2c 2c 2c 2c 2c 0a 50 72 6f 74 6f 63 6f 6c 73  ,,,,,,.Protocols
32c0: 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20  ,All,,,lcompare 
32d0: 24 70 72 6f 74 6f 63 6f 6c 73 20 5b 3a 3a 74 6c  $protocols [::tl
32e0: 73 3a 3a 70 72 6f 74 6f 63 6f 6c 73 5d 2c 2c 2c  s::protocols],,,
32f0: 6d 69 73 73 69 6e 67 20 7b 73 73 6c 32 20 73 73  missing {ssl2 ss
3300: 6c 33 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b  l3} unexpected {
3310: 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a  },,,.,,,,,,,,,,.
3320: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 73  command,# Test s
3330: 68 6f 77 20 76 65 72 73 69 6f 6e 2c 2c 2c 2c 2c  how version,,,,,
3340: 2c 2c 2c 2c 0a 56 65 72 73 69 6f 6e 2c 41 6c 6c  ,,,,.Version,All
3350: 2c 2c 2c 3a 3a 74 6c 73 3a 3a 76 65 72 73 69 6f  ,,,::tls::versio
3360: 6e 2c 2c 67 6c 6f 62 2c 2a 2c 2c 2c 0a 56 65 72  n,,glob,*,,,.Ver
3370: 73 69 6f 6e 2c 4f 70 65 6e 53 53 4c 2c 4f 70 65  sion,OpenSSL,Ope
3380: 6e 53 53 4c 2c 2c 3a 3a 74 6c 73 3a 3a 76 65 72  nSSL,,::tls::ver
3390: 73 69 6f 6e 2c 2c 67 6c 6f 62 2c 4f 70 65 6e 53  sion,,glob,OpenS
33a0: 53 4c 2a 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c  SL*,,,.,,,,,,,,,
33b0: 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 45 72 72 6f  ,.command,# Erro
33c0: 72 20 43 61 73 65 73 2c 2c 2c 2c 2c 2c 2c 2c 2c  r Cases,,,,,,,,,
33d0: 0a 45 72 72 6f 72 20 43 61 73 65 73 2c 44 69 67  .Error Cases,Dig
33e0: 65 73 74 73 20 54 6f 6f 20 6d 61 6e 79 20 61 72  ests Too many ar
33f0: 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65  gs,,,::tls::dige
3400: 73 74 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67  sts too many arg
3410: 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67  s,,,"wrong # arg
3420: 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a  s: should be "":
3430: 3a 74 6c 73 3a 3a 64 69 67 65 73 74 73 22 22 22  :tls::digests"""
3440: 2c 2c 2c 31 0a 45 72 72 6f 72 20 43 61 73 65 73  ,,,1.Error Cases
3450: 2c 4d 41 43 73 20 54 6f 6f 20 6d 61 6e 79 20 61  ,MACs Too many a
3460: 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 6d 61 63  rgs,,,::tls::mac
3470: 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c  s too many args,
3480: 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 73 3a  ,,"wrong # args:
3490: 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a 3a 74   should be ""::t
34a0: 6c 73 3a 3a 6d 61 63 73 22 22 22 2c 2c 2c 31 0a  ls::macs""",,,1.
34b0: 45 72 72 6f 72 20 43 61 73 65 73 2c 50 72 6f 74  Error Cases,Prot
34c0: 6f 63 6f 6c 73 20 54 6f 6f 20 6d 61 6e 79 20 61  ocols Too many a
34d0: 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 70 72 6f  rgs,,,::tls::pro
34e0: 74 6f 63 6f 6c 73 20 74 6f 6f 20 6d 61 6e 79 20  tocols too many 
34f0: 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20  args,,,"wrong # 
3500: 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 20  args: should be 
3510: 22 22 3a 3a 74 6c 73 3a 3a 70 72 6f 74 6f 63 6f  ""::tls::protoco
3520: 6c 73 22 22 22 2c 2c 2c 31 0a 45 72 72 6f 72 20  ls""",,,1.Error 
3530: 43 61 73 65 73 2c 56 65 72 73 69 6f 6e 20 54 6f  Cases,Version To
3540: 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a  o many args,,,::
3550: 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 20 74 6f 6f  tls::version too
3560: 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72   many args,,,"wr
3570: 6f 6e 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75  ong # args: shou
3580: 6c 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 76  ld be ""::tls::v
3590: 65 72 73 69 6f 6e 22 22 22 2c 2c 2c 31 0a        ersion""",,,1.