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 63 6f 6e 63 61 74 20 5b 65 78 65 63 5f e [concat [exec_
14e0: 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 get "":"" cipher
14f0: 73 20 2d 74 6c 73 31 5f 33 20 2d 73 5d 20 5b 65 s -tls1_3 -s] [e
1500: 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 xec_get "":"" ci
1510: 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d 73 phers -tls1_2 -s
1520: 5d 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 ]] [::tls::ciphe
1530: 72 73 20 74 6c 73 31 2e 33 20 30 20 31 5d 22 2c rs tls1.3 0 1]",
1540: 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 ,,missing {} une
1550: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c xpected {},,,.,,
1560: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
1570: 2c 23 20 43 69 70 68 65 72 73 20 45 72 72 6f 72 ,# Ciphers Error
1580: 20 43 61 73 65 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a Cases,,,,,,,,,.
1590: 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c 54 Ciphers Errors,T
15a0: 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a oo many args,,,:
15b0: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6f :tls::ciphers to
15c0: 6f 20 6d 61 6e 79 20 61 72 67 73 20 74 6f 20 70 o many args to p
15d0: 61 73 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 61 ass,,,"wrong # a
15e0: 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 22 rgs: should be "
15f0: 22 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 3f 70 "tls::ciphers ?p
1600: 72 6f 74 6f 63 6f 6c 3f 20 3f 76 65 72 62 6f 73 rotocol? ?verbos
1610: 65 3f 20 3f 73 75 70 70 6f 72 74 65 64 3f 22 22 e? ?supported?""
1620: 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 ",,,1.Ciphers Er
1630: 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20 70 72 6f rors,Invalid pro
1640: 74 6f 63 6f 6c 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 tocol,,,::tls::c
1650: 69 70 68 65 72 73 20 62 6f 67 75 73 2c 2c 2c 22 iphers bogus,,,"
1660: 62 61 64 20 70 72 6f 74 6f 63 6f 6c 20 22 22 62 bad protocol ""b
1670: 6f 67 75 73 22 22 3a 20 6d 75 73 74 20 62 65 20 ogus"": must be
1680: 73 73 6c 32 2c 20 73 73 6c 33 2c 20 74 6c 73 31 ssl2, ssl3, tls1
1690: 2c 20 74 6c 73 31 2e 31 2c 20 74 6c 73 31 2e 32 , tls1.1, tls1.2
16a0: 2c 20 6f 72 20 74 6c 73 31 2e 33 22 2c 2c 2c 31 , or tls1.3",,,1
16b0: 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c .Ciphers Errors,
16c0: 49 6e 76 61 6c 69 64 20 76 65 72 62 6f 73 65 2c Invalid verbose,
16d0: 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 ,,::tls::ciphers
16e0: 20 74 6c 73 31 2e 33 20 62 6f 67 75 73 2c 2c 2c tls1.3 bogus,,,
16f0: 22 65 78 70 65 63 74 65 64 20 62 6f 6f 6c 65 61 "expected boolea
1700: 6e 20 76 61 6c 75 65 20 62 75 74 20 67 6f 74 20 n value but got
1710: 22 22 62 6f 67 75 73 22 22 22 2c 2c 2c 31 0a 43 ""bogus""",,,1.C
1720: 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c 49 6e iphers Errors,In
1730: 76 61 6c 69 64 20 73 75 70 70 6f 72 74 65 64 2c valid supported,
1740: 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 ,,::tls::ciphers
1750: 20 74 6c 73 31 5f 33 20 31 20 62 6f 67 75 73 2c tls1_3 1 bogus,
1760: 2c 2c 22 65 78 70 65 63 74 65 64 20 62 6f 6f 6c ,,"expected bool
1770: 65 61 6e 20 76 61 6c 75 65 20 62 75 74 20 67 6f ean value but go
1780: 74 20 22 22 62 6f 67 75 73 22 22 22 2c 2c 2c 31 t ""bogus""",,,1
1790: 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c .Ciphers Errors,
17a0: 53 53 4c 32 2c 21 73 73 6c 32 2c 2c 3a 3a 74 6c SSL2,!ssl2,,::tl
17b0: 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 32 2c s::ciphers ssl2,
17c0: 2c 2c 73 73 6c 32 3a 20 70 72 6f 74 6f 63 6f 6c ,,ssl2: protocol
17d0: 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 2c 2c not supported,,
17e0: 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 ,1.Ciphers Error
17f0: 73 2c 53 53 4c 33 2c 21 73 73 6c 33 2c 2c 3a 3a s,SSL3,!ssl3,,::
1800: 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c tls::ciphers ssl
1810: 33 2c 2c 2c 73 73 6c 33 3a 20 70 72 6f 74 6f 63 3,,,ssl3: protoc
1820: 6f 6c 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 ol not supported
1830: 2c 2c 2c 31 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a ,,,1.,,,,,,,,,,.
1840: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 6c command,# Test l
1850: 69 73 74 20 64 69 67 65 73 74 73 2c 2c 2c 2c 2c ist digests,,,,,
1860: 2c 2c 2c 2c 0a 44 69 67 65 73 74 73 20 4c 69 73 ,,,,.Digests Lis
1870: 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 t,All,,,lcompare
1880: 20 5b 6c 73 6f 72 74 20 5b 65 78 65 63 5f 67 65 [lsort [exec_ge
1890: 74 5f 64 69 67 65 73 74 73 5d 5d 20 5b 6c 73 6f t_digests]] [lso
18a0: 72 74 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 73 rt [tls::digests
18b0: 5d 5d 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]],,,missing {}
18c0: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
18d0: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .,,,,,,,,,,.comm
18e0: 61 6e 64 2c 23 20 54 65 73 74 20 64 69 67 65 73 and,# Test diges
18f0: 74 20 63 6f 6d 6d 61 6e 64 73 2c 2c 2c 2c 2c 2c t commands,,,,,,
1900: 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6d 64 73 2c ,,,.Digest Cmds,
1910: 6d 64 34 20 63 6d 64 2c 2c 2c 22 74 6c 73 3a 3a md4 cmd,,,"tls::
1920: 6d 64 34 20 22 22 45 78 61 6d 70 6c 65 20 73 74 md4 ""Example st
1930: 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 ring for message
1940: 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 digest tests.""
1950: 22 2c 2c 2c 31 38 31 43 44 43 46 39 44 42 39 42 ",,,181CDCF9DB9B
1960: 36 46 41 38 46 43 30 41 33 42 46 39 43 33 34 45 6FA8FC0A3BF9C34E
1970: 32 39 44 39 2c 2c 2c 0a 44 69 67 65 73 74 20 43 29D9,,,.Digest C
1980: 6d 64 73 2c 6d 64 35 20 63 6d 64 2c 2c 2c 22 74 mds,md5 cmd,,,"t
1990: 6c 73 3a 3a 6d 64 35 20 22 22 45 78 61 6d 70 6c ls::md5 ""Exampl
19a0: 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 e string for mes
19b0: 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74 sage digest test
19c0: 73 2e 22 22 22 2c 2c 2c 43 43 42 31 42 45 32 45 s.""",,,CCB1BE2E
19d0: 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44 11D8183E843FF73D
19e0: 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65 A8C6D206,,,.Dige
19f0: 73 74 20 43 6d 64 73 2c 73 68 61 31 20 63 6d 64 st Cmds,sha1 cmd
1a00: 2c 2c 2c 22 74 6c 73 3a 3a 73 68 61 31 20 22 22 ,,,"tls::sha1 ""
1a10: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 Example string f
1a20: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 or message diges
1a30: 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 33 41 t tests.""",,,3A
1a40: 45 46 45 38 34 30 43 41 34 39 32 43 33 38 37 45 EFE840CA492C387E
1a50: 39 30 33 46 31 35 45 44 36 30 31 39 45 37 41 44 903F15ED6019E7AD
1a60: 38 33 33 42 34 37 2c 2c 2c 0a 44 69 67 65 73 74 833B47,,,.Digest
1a70: 20 43 6d 64 73 2c 73 68 61 32 35 36 20 63 6d 64 Cmds,sha256 cmd
1a80: 2c 2c 2c 22 74 6c 73 3a 3a 73 68 61 32 35 36 20 ,,,"tls::sha256
1a90: 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 ""Example string
1aa0: 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 for message dig
1ab0: 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c est tests.""",,,
1ac0: 42 37 44 46 44 44 45 42 30 33 31 34 41 37 34 46 B7DFDDEB0314A74F
1ad0: 46 35 36 41 38 41 43 31 45 33 44 43 35 37 44 46 F56A8AC1E3DC57DF
1ae0: 30 39 42 42 35 32 41 39 36 44 41 35 30 46 36 35 09BB52A96DA50F65
1af0: 34 39 45 42 36 32 43 41 36 31 41 30 41 34 39 31 49EB62CA61A0A491
1b00: 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6d 64 73 2c ,,,.Digest Cmds,
1b10: 73 68 61 35 31 32 20 63 6d 64 2c 2c 2c 22 74 6c sha512 cmd,,,"tl
1b20: 73 3a 3a 73 68 61 35 31 32 20 22 22 45 78 61 6d s::sha512 ""Exam
1b30: 70 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d ple string for m
1b40: 65 73 73 61 67 65 20 64 69 67 65 73 74 20 74 65 essage digest te
1b50: 73 74 73 2e 22 22 22 2c 2c 2c 42 35 36 45 43 35 sts.""",,,B56EC5
1b60: 35 45 33 33 31 39 33 45 31 37 42 36 31 44 36 36 5E33193E17B61D66
1b70: 39 46 42 37 42 30 34 41 44 32 34 38 33 44 45 39 9FB7B04AD2483DE9
1b80: 33 46 45 38 34 37 43 34 31 31 42 42 45 41 45 36 3FE847C411BBEAE6
1b90: 34 34 30 45 43 45 41 36 43 37 43 46 44 44 32 45 440ECEA6C7CFDD2E
1ba0: 36 46 33 35 41 30 36 43 42 31 38 39 46 43 36 32 6F35A06CB189FC62
1bb0: 44 37 39 39 45 37 38 35 43 44 42 37 41 32 33 31 D799E785CDB7A231
1bc0: 37 38 33 32 33 37 38 39 44 30 30 31 42 43 38 45 78323789D001BC8E
1bd0: 34 34 41 30 42 35 39 30 37 46 2c 2c 2c 0a 2c 2c 44A0B5907F,,,.,,
1be0: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
1bf0: 2c 23 20 54 65 73 74 20 64 69 67 65 73 74 20 63 ,# Test digest c
1c00: 6f 6d 6d 61 6e 64 20 66 6f 72 20 64 61 74 61 2c ommand for data,
1c10: 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 ,,,,,,,,.Digest
1c20: 44 61 74 61 2c 6d 64 34 2c 2c 2c 22 74 6c 73 3a Data,md4,,,"tls:
1c30: 3a 64 69 67 65 73 74 20 6d 64 34 20 22 22 45 78 :digest md4 ""Ex
1c40: 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 ample string for
1c50: 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 20 message digest
1c60: 74 65 73 74 73 2e 22 22 22 2c 2c 2c 31 38 31 43 tests.""",,,181C
1c70: 44 43 46 39 44 42 39 42 36 46 41 38 46 43 30 41 DCF9DB9B6FA8FC0A
1c80: 33 42 46 39 43 33 34 45 32 39 44 39 2c 2c 2c 0a 3BF9C34E29D9,,,.
1c90: 44 69 67 65 73 74 20 44 61 74 61 2c 6d 64 35 2c Digest Data,md5,
1ca0: 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d ,,"tls::digest m
1cb0: 64 35 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 d5 ""Example str
1cc0: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 ing for message
1cd0: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 digest tests."""
1ce0: 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 ,,,CCB1BE2E11D81
1cf0: 38 33 45 38 34 33 46 46 37 33 44 41 38 43 36 44 83E843FF73DA8C6D
1d00: 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 206,,,.Digest Da
1d10: 74 61 2c 73 68 61 31 2c 2c 2c 22 74 6c 73 3a 3a ta,sha1,,,"tls::
1d20: 64 69 67 65 73 74 20 73 68 61 31 20 22 22 45 78 digest sha1 ""Ex
1d30: 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 ample string for
1d40: 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 20 message digest
1d50: 74 65 73 74 73 2e 22 22 22 2c 2c 2c 33 41 45 46 tests.""",,,3AEF
1d60: 45 38 34 30 43 41 34 39 32 43 33 38 37 45 39 30 E840CA492C387E90
1d70: 33 46 31 35 45 44 36 30 31 39 45 37 41 44 38 33 3F15ED6019E7AD83
1d80: 33 42 34 37 2c 2c 2c 0a 44 69 67 65 73 74 20 44 3B47,,,.Digest D
1d90: 61 74 61 2c 73 68 61 32 35 36 2c 2c 2c 22 74 6c ata,sha256,,,"tl
1da0: 73 3a 3a 64 69 67 65 73 74 20 73 68 61 32 35 36 s::digest sha256
1db0: 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e ""Example strin
1dc0: 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 g for message di
1dd0: 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c gest tests.""",,
1de0: 2c 42 37 44 46 44 44 45 42 30 33 31 34 41 37 34 ,B7DFDDEB0314A74
1df0: 46 46 35 36 41 38 41 43 31 45 33 44 43 35 37 44 FF56A8AC1E3DC57D
1e00: 46 30 39 42 42 35 32 41 39 36 44 41 35 30 46 36 F09BB52A96DA50F6
1e10: 35 34 39 45 42 36 32 43 41 36 31 41 30 41 34 39 549EB62CA61A0A49
1e20: 31 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 74 61 1,,,.Digest Data
1e30: 2c 73 68 61 35 31 32 2c 2c 2c 22 74 6c 73 3a 3a ,sha512,,,"tls::
1e40: 64 69 67 65 73 74 20 73 68 61 35 31 32 20 22 22 digest sha512 ""
1e50: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 Example string f
1e60: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 or message diges
1e70: 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 42 35 t tests.""",,,B5
1e80: 36 45 43 35 35 45 33 33 31 39 33 45 31 37 42 36 6EC55E33193E17B6
1e90: 31 44 36 36 39 46 42 37 42 30 34 41 44 32 34 38 1D669FB7B04AD248
1ea0: 33 44 45 39 33 46 45 38 34 37 43 34 31 31 42 42 3DE93FE847C411BB
1eb0: 45 41 45 36 34 34 30 45 43 45 41 36 43 37 43 46 EAE6440ECEA6C7CF
1ec0: 44 44 32 45 36 46 33 35 41 30 36 43 42 31 38 39 DD2E6F35A06CB189
1ed0: 46 43 36 32 44 37 39 39 45 37 38 35 43 44 42 37 FC62D799E785CDB7
1ee0: 41 32 33 31 37 38 33 32 33 37 38 39 44 30 30 31 A23178323789D001
1ef0: 42 43 38 45 34 34 41 30 42 35 39 30 37 46 2c 2c BC8E44A0B5907F,,
1f00: 2c 0a 44 69 67 65 73 74 20 44 61 74 61 2c 6d 64 ,.Digest Data,md
1f10: 35 20 62 69 6e 2c 2c 2c 22 73 74 72 69 6e 67 20 5 bin,,,"string
1f20: 74 6f 75 70 70 65 72 20 5b 62 69 6e 61 72 79 20 toupper [binary
1f30: 65 6e 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a encode hex [tls:
1f40: 3a 64 69 67 65 73 74 20 6d 64 35 20 2d 62 69 6e :digest md5 -bin
1f50: 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e ""Example strin
1f60: 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 g for message di
1f70: 67 65 73 74 20 74 65 73 74 73 2e 22 22 5d 5d 22 gest tests.""]]"
1f80: 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 ,,,CCB1BE2E11D81
1f90: 38 33 45 38 34 33 46 46 37 33 44 41 38 43 36 44 83E843FF73DA8C6D
1fa0: 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 206,,,.Digest Da
1fb0: 74 61 2c 6d 64 35 20 68 65 78 2c 2c 2c 22 74 6c ta,md5 hex,,,"tl
1fc0: 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 2d 68 s::digest md5 -h
1fd0: 65 78 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 ex ""Example str
1fe0: 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 ing for message
1ff0: 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 digest tests."""
2000: 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 ,,,CCB1BE2E11D81
2010: 38 33 45 38 34 33 46 46 37 33 44 41 38 43 36 44 83E843FF73DA8C6D
2020: 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 44 61 206,,,.Digest Da
2030: 74 61 2c 6d 64 35 20 77 69 74 68 20 61 72 67 2c ta,md5 with arg,
2040: 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d ,,"tls::digest m
2050: 64 35 20 2d 64 61 74 61 20 22 22 45 78 61 6d 70 d5 -data ""Examp
2060: 6c 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 le string for me
2070: 73 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 ssage digest tes
2080: 74 73 2e 22 22 22 2c 2c 2c 43 43 42 31 42 45 32 ts.""",,,CCB1BE2
2090: 45 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 E11D8183E843FF73
20a0: 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c DA8C6D206,,,.,,,
20b0: 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c ,,,,,,,.command,
20c0: 23 20 54 65 73 74 20 64 69 67 65 73 74 20 63 6f # Test digest co
20d0: 6d 6d 61 6e 64 20 66 6f 72 20 66 69 6c 65 73 2c mmand for files,
20e0: 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 ,,,,,,,,.Digest
20f0: 46 69 6c 65 2c 6d 64 34 2c 2c 2c 74 6c 73 3a 3a File,md4,,,tls::
2100: 64 69 67 65 73 74 20 6d 64 34 20 2d 66 69 6c 65 digest md4 -file
2110: 20 6d 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 31 md_data.dat,,,1
2120: 38 31 43 44 43 46 39 44 42 39 42 36 46 41 38 46 81CDCF9DB9B6FA8F
2130: 43 30 41 33 42 46 39 43 33 34 45 32 39 44 39 2c C0A3BF9C34E29D9,
2140: 2c 2c 0a 44 69 67 65 73 74 20 46 69 6c 65 2c 6d ,,.Digest File,m
2150: 64 35 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74 d5,,,tls::digest
2160: 20 6d 64 35 20 2d 66 69 6c 65 20 6d 64 5f 64 61 md5 -file md_da
2170: 74 61 2e 64 61 74 2c 2c 2c 43 43 42 31 42 45 32 ta.dat,,,CCB1BE2
2180: 45 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 E11D8183E843FF73
2190: 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 DA8C6D206,,,.Dig
21a0: 65 73 74 20 46 69 6c 65 2c 73 68 61 31 2c 2c 2c est File,sha1,,,
21b0: 74 6c 73 3a 3a 64 69 67 65 73 74 20 73 68 61 31 tls::digest sha1
21c0: 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 -file md_data.d
21d0: 61 74 2c 2c 2c 33 41 45 46 45 38 34 30 43 41 34 at,,,3AEFE840CA4
21e0: 39 32 43 33 38 37 45 39 30 33 46 31 35 45 44 36 92C387E903F15ED6
21f0: 30 31 39 45 37 41 44 38 33 33 42 34 37 2c 2c 2c 019E7AD833B47,,,
2200: 0a 44 69 67 65 73 74 20 46 69 6c 65 2c 73 68 61 .Digest File,sha
2210: 32 35 36 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 256,,,tls::diges
2220: 74 20 73 68 61 32 35 36 20 2d 66 69 6c 65 20 6d t sha256 -file m
2230: 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 42 37 44 d_data.dat,,,B7D
2240: 46 44 44 45 42 30 33 31 34 41 37 34 46 46 35 36 FDDEB0314A74FF56
2250: 41 38 41 43 31 45 33 44 43 35 37 44 46 30 39 42 A8AC1E3DC57DF09B
2260: 42 35 32 41 39 36 44 41 35 30 46 36 35 34 39 45 B52A96DA50F6549E
2270: 42 36 32 43 41 36 31 41 30 41 34 39 31 2c 2c 2c B62CA61A0A491,,,
2280: 0a 44 69 67 65 73 74 20 46 69 6c 65 2c 73 68 61 .Digest File,sha
2290: 35 31 32 2c 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 512,,,tls::diges
22a0: 74 20 73 68 61 35 31 32 20 2d 66 69 6c 65 20 6d t sha512 -file m
22b0: 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 42 35 36 d_data.dat,,,B56
22c0: 45 43 35 35 45 33 33 31 39 33 45 31 37 42 36 31 EC55E33193E17B61
22d0: 44 36 36 39 46 42 37 42 30 34 41 44 32 34 38 33 D669FB7B04AD2483
22e0: 44 45 39 33 46 45 38 34 37 43 34 31 31 42 42 45 DE93FE847C411BBE
22f0: 41 45 36 34 34 30 45 43 45 41 36 43 37 43 46 44 AE6440ECEA6C7CFD
2300: 44 32 45 36 46 33 35 41 30 36 43 42 31 38 39 46 D2E6F35A06CB189F
2310: 43 36 32 44 37 39 39 45 37 38 35 43 44 42 37 41 C62D799E785CDB7A
2320: 32 33 31 37 38 33 32 33 37 38 39 44 30 30 31 42 23178323789D001B
2330: 43 38 45 34 34 41 30 42 35 39 30 37 46 2c 2c 2c C8E44A0B5907F,,,
2340: 0a 44 69 67 65 73 74 20 46 69 6c 65 2c 6d 64 35 .Digest File,md5
2350: 20 62 69 6e 2c 2c 2c 73 74 72 69 6e 67 20 74 6f bin,,,string to
2360: 75 70 70 65 72 20 5b 62 69 6e 61 72 79 20 65 6e upper [binary en
2370: 63 6f 64 65 20 68 65 78 20 5b 74 6c 73 3a 3a 64 code hex [tls::d
2380: 69 67 65 73 74 20 6d 64 35 20 2d 62 69 6e 20 2d igest md5 -bin -
2390: 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 file md_data.dat
23a0: 5d 5d 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44 ]],,,CCB1BE2E11D
23b0: 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38 43 8183E843FF73DA8C
23c0: 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 6D206,,,.Digest
23d0: 46 69 6c 65 2c 6d 64 35 20 68 65 78 2c 2c 2c 74 File,md5 hex,,,t
23e0: 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 2d ls::digest md5 -
23f0: 68 65 78 20 2d 66 69 6c 65 20 6d 64 5f 64 61 74 hex -file md_dat
2400: 61 2e 64 61 74 2c 2c 2c 43 43 42 31 42 45 32 45 a.dat,,,CCB1BE2E
2410: 31 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44 11D8183E843FF73D
2420: 41 38 43 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c 2c A8C6D206,,,.,,,,
2430: 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 ,,,,,,.command,#
2440: 20 54 65 73 74 20 64 69 67 65 73 74 20 63 6f 6d Test digest com
2450: 6d 61 6e 64 20 66 6f 72 20 63 68 61 6e 6e 65 6c mand for channel
2460: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 ,,,,,,,,,.Digest
2470: 20 43 68 61 6e 2c 6d 64 34 2c 2c 2c 72 65 61 64 Chan,md4,,,read
2480: 5f 63 68 61 6e 20 6d 64 34 20 6d 64 5f 64 61 74 _chan md4 md_dat
2490: 61 2e 64 61 74 2c 2c 2c 31 38 31 43 44 43 46 39 a.dat,,,181CDCF9
24a0: 44 42 39 42 36 46 41 38 46 43 30 41 33 42 46 39 DB9B6FA8FC0A3BF9
24b0: 43 33 34 45 32 39 44 39 2c 2c 2c 0a 44 69 67 65 C34E29D9,,,.Dige
24c0: 73 74 20 43 68 61 6e 2c 6d 64 35 2c 2c 2c 72 65 st Chan,md5,,,re
24d0: 61 64 5f 63 68 61 6e 20 6d 64 35 20 6d 64 5f 64 ad_chan md5 md_d
24e0: 61 74 61 2e 64 61 74 2c 2c 2c 43 43 42 31 42 45 ata.dat,,,CCB1BE
24f0: 32 45 31 31 44 38 31 38 33 45 38 34 33 46 46 37 2E11D8183E843FF7
2500: 33 44 41 38 43 36 44 32 30 36 2c 2c 2c 0a 44 69 3DA8C6D206,,,.Di
2510: 67 65 73 74 20 43 68 61 6e 2c 73 68 61 31 2c 2c gest Chan,sha1,,
2520: 2c 72 65 61 64 5f 63 68 61 6e 20 73 68 61 31 20 ,read_chan sha1
2530: 6d 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 33 41 md_data.dat,,,3A
2540: 45 46 45 38 34 30 43 41 34 39 32 43 33 38 37 45 EFE840CA492C387E
2550: 39 30 33 46 31 35 45 44 36 30 31 39 45 37 41 44 903F15ED6019E7AD
2560: 38 33 33 42 34 37 2c 2c 2c 0a 44 69 67 65 73 74 833B47,,,.Digest
2570: 20 43 68 61 6e 2c 73 68 61 32 35 36 2c 2c 2c 72 Chan,sha256,,,r
2580: 65 61 64 5f 63 68 61 6e 20 73 68 61 32 35 36 20 ead_chan sha256
2590: 6d 64 5f 64 61 74 61 2e 64 61 74 2c 2c 2c 42 37 md_data.dat,,,B7
25a0: 44 46 44 44 45 42 30 33 31 34 41 37 34 46 46 35 DFDDEB0314A74FF5
25b0: 36 41 38 41 43 31 45 33 44 43 35 37 44 46 30 39 6A8AC1E3DC57DF09
25c0: 42 42 35 32 41 39 36 44 41 35 30 46 36 35 34 39 BB52A96DA50F6549
25d0: 45 42 36 32 43 41 36 31 41 30 41 34 39 31 2c 2c EB62CA61A0A491,,
25e0: 2c 0a 44 69 67 65 73 74 20 43 68 61 6e 2c 73 68 ,.Digest Chan,sh
25f0: 61 35 31 32 2c 2c 2c 72 65 61 64 5f 63 68 61 6e a512,,,read_chan
2600: 20 73 68 61 35 31 32 20 6d 64 5f 64 61 74 61 2e sha512 md_data.
2610: 64 61 74 2c 2c 2c 42 35 36 45 43 35 35 45 33 33 dat,,,B56EC55E33
2620: 31 39 33 45 31 37 42 36 31 44 36 36 39 46 42 37 193E17B61D669FB7
2630: 42 30 34 41 44 32 34 38 33 44 45 39 33 46 45 38 B04AD2483DE93FE8
2640: 34 37 43 34 31 31 42 42 45 41 45 36 34 34 30 45 47C411BBEAE6440E
2650: 43 45 41 36 43 37 43 46 44 44 32 45 36 46 33 35 CEA6C7CFDD2E6F35
2660: 41 30 36 43 42 31 38 39 46 43 36 32 44 37 39 39 A06CB189FC62D799
2670: 45 37 38 35 43 44 42 37 41 32 33 31 37 38 33 32 E785CDB7A2317832
2680: 33 37 38 39 44 30 30 31 42 43 38 45 34 34 41 30 3789D001BC8E44A0
2690: 42 35 39 30 37 46 2c 2c 2c 0a 44 69 67 65 73 74 B5907F,,,.Digest
26a0: 20 43 68 61 6e 2c 6d 64 35 20 62 69 6e 2c 2c 2c Chan,md5 bin,,,
26b0: 73 74 72 69 6e 67 20 74 6f 75 70 70 65 72 20 5b string toupper [
26c0: 62 69 6e 61 72 79 20 65 6e 63 6f 64 65 20 68 65 binary encode he
26d0: 78 20 5b 72 65 61 64 5f 63 68 61 6e 20 6d 64 35 x [read_chan md5
26e0: 20 6d 64 5f 64 61 74 61 2e 64 61 74 20 2d 62 69 md_data.dat -bi
26f0: 6e 5d 5d 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 n]],,,CCB1BE2E11
2700: 44 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38 D8183E843FF73DA8
2710: 43 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 C6D206,,,.Digest
2720: 20 43 68 61 6e 2c 6d 64 35 20 68 65 78 2c 2c 2c Chan,md5 hex,,,
2730: 72 65 61 64 5f 63 68 61 6e 20 6d 64 35 20 6d 64 read_chan md5 md
2740: 5f 64 61 74 61 2e 64 61 74 20 2d 68 65 78 2c 2c _data.dat -hex,,
2750: 2c 43 43 42 31 42 45 32 45 31 31 44 38 31 38 33 ,CCB1BE2E11D8183
2760: 45 38 34 33 46 46 37 33 44 41 38 43 36 44 32 30 E843FF73DA8C6D20
2770: 36 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 6,,,.,,,,,,,,,,.
2780: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 64 command,# Test d
2790: 69 67 65 73 74 20 63 6f 6d 6d 61 6e 64 20 66 6f igest command fo
27a0: 72 20 61 63 63 75 6d 75 6c 61 74 6f 72 20 63 6f r accumulator co
27b0: 6d 6d 61 6e 64 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 mmand,,,,,,,,,.D
27c0: 69 67 65 73 74 20 43 6f 6d 6d 61 6e 64 2c 6d 64 igest Command,md
27d0: 34 2c 2c 2c 22 61 63 63 75 6d 75 6c 61 74 65 20 4,,,"accumulate
27e0: 6d 64 34 20 22 22 45 78 61 6d 70 6c 65 20 73 74 md4 ""Example st
27f0: 72 69 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 ring for message
2800: 20 64 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 digest tests.""
2810: 22 2c 2c 2c 31 38 31 43 44 43 46 39 44 42 39 42 ",,,181CDCF9DB9B
2820: 36 46 41 38 46 43 30 41 33 42 46 39 43 33 34 45 6FA8FC0A3BF9C34E
2830: 32 39 44 39 2c 2c 2c 0a 44 69 67 65 73 74 20 43 29D9,,,.Digest C
2840: 6f 6d 6d 61 6e 64 2c 6d 64 35 2c 2c 2c 22 61 63 ommand,md5,,,"ac
2850: 63 75 6d 75 6c 61 74 65 20 6d 64 35 20 22 22 45 cumulate md5 ""E
2860: 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 6f xample string fo
2870: 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 74 r message digest
2880: 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 43 43 42 tests.""",,,CCB
2890: 31 42 45 32 45 31 31 44 38 31 38 33 45 38 34 33 1BE2E11D8183E843
28a0: 46 46 37 33 44 41 38 43 36 44 32 30 36 2c 2c 2c FF73DA8C6D206,,,
28b0: 0a 44 69 67 65 73 74 20 43 6f 6d 6d 61 6e 64 2c .Digest Command,
28c0: 73 68 61 31 2c 2c 2c 22 61 63 63 75 6d 75 6c 61 sha1,,,"accumula
28d0: 74 65 20 73 68 61 31 20 22 22 45 78 61 6d 70 6c te sha1 ""Exampl
28e0: 65 20 73 74 72 69 6e 67 20 66 6f 72 20 6d 65 73 e string for mes
28f0: 73 61 67 65 20 64 69 67 65 73 74 20 74 65 73 74 sage digest test
2900: 73 2e 22 22 22 2c 2c 2c 33 41 45 46 45 38 34 30 s.""",,,3AEFE840
2910: 43 41 34 39 32 43 33 38 37 45 39 30 33 46 31 35 CA492C387E903F15
2920: 45 44 36 30 31 39 45 37 41 44 38 33 33 42 34 37 ED6019E7AD833B47
2930: 2c 2c 2c 0a 44 69 67 65 73 74 20 43 6f 6d 6d 61 ,,,.Digest Comma
2940: 6e 64 2c 73 68 61 32 35 36 2c 2c 2c 22 61 63 63 nd,sha256,,,"acc
2950: 75 6d 75 6c 61 74 65 20 73 68 61 32 35 36 20 22 umulate sha256 "
2960: 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 "Example string
2970: 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 for message dige
2980: 73 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 42 st tests.""",,,B
2990: 37 44 46 44 44 45 42 30 33 31 34 41 37 34 46 46 7DFDDEB0314A74FF
29a0: 35 36 41 38 41 43 31 45 33 44 43 35 37 44 46 30 56A8AC1E3DC57DF0
29b0: 39 42 42 35 32 41 39 36 44 41 35 30 46 36 35 34 9BB52A96DA50F654
29c0: 39 45 42 36 32 43 41 36 31 41 30 41 34 39 31 2c 9EB62CA61A0A491,
29d0: 2c 2c 0a 44 69 67 65 73 74 20 43 6f 6d 6d 61 6e ,,.Digest Comman
29e0: 64 2c 73 68 61 35 31 32 2c 2c 2c 22 61 63 63 75 d,sha512,,,"accu
29f0: 6d 75 6c 61 74 65 20 73 68 61 35 31 32 20 22 22 mulate sha512 ""
2a00: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 Example string f
2a10: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 or message diges
2a20: 74 20 74 65 73 74 73 2e 22 22 22 2c 2c 2c 42 35 t tests.""",,,B5
2a30: 36 45 43 35 35 45 33 33 31 39 33 45 31 37 42 36 6EC55E33193E17B6
2a40: 31 44 36 36 39 46 42 37 42 30 34 41 44 32 34 38 1D669FB7B04AD248
2a50: 33 44 45 39 33 46 45 38 34 37 43 34 31 31 42 42 3DE93FE847C411BB
2a60: 45 41 45 36 34 34 30 45 43 45 41 36 43 37 43 46 EAE6440ECEA6C7CF
2a70: 44 44 32 45 36 46 33 35 41 30 36 43 42 31 38 39 DD2E6F35A06CB189
2a80: 46 43 36 32 44 37 39 39 45 37 38 35 43 44 42 37 FC62D799E785CDB7
2a90: 41 32 33 31 37 38 33 32 33 37 38 39 44 30 30 31 A23178323789D001
2aa0: 42 43 38 45 34 34 41 30 42 35 39 30 37 46 2c 2c BC8E44A0B5907F,,
2ab0: 2c 0a 44 69 67 65 73 74 20 43 6f 6d 6d 61 6e 64 ,.Digest Command
2ac0: 2c 6d 64 35 20 62 69 6e 2c 2c 2c 22 73 74 72 69 ,md5 bin,,,"stri
2ad0: 6e 67 20 74 6f 75 70 70 65 72 20 5b 62 69 6e 61 ng toupper [bina
2ae0: 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b 61 ry encode hex [a
2af0: 63 63 75 6d 75 6c 61 74 65 20 6d 64 35 20 22 22 ccumulate md5 ""
2b00: 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 20 66 Example string f
2b10: 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 65 73 or message diges
2b20: 74 20 74 65 73 74 73 2e 22 22 20 2d 62 69 6e 5d t tests."" -bin]
2b30: 5d 22 2c 2c 2c 43 43 42 31 42 45 32 45 31 31 44 ]",,,CCB1BE2E11D
2b40: 38 31 38 33 45 38 34 33 46 46 37 33 44 41 38 43 8183E843FF73DA8C
2b50: 36 44 32 30 36 2c 2c 2c 0a 44 69 67 65 73 74 20 6D206,,,.Digest
2b60: 43 6f 6d 6d 61 6e 64 2c 6d 64 35 20 68 65 78 2c Command,md5 hex,
2b70: 2c 2c 22 61 63 63 75 6d 75 6c 61 74 65 20 6d 64 ,,"accumulate md
2b80: 35 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 5 ""Example stri
2b90: 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 ng for message d
2ba0: 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 20 2d igest tests."" -
2bb0: 68 65 78 22 2c 2c 2c 43 43 42 31 42 45 32 45 31 hex",,,CCB1BE2E1
2bc0: 31 44 38 31 38 33 45 38 34 33 46 46 37 33 44 41 1D8183E843FF73DA
2bd0: 38 43 36 44 32 30 36 2c 2c 2c 0a 2c 2c 2c 2c 2c 8C6D206,,,.,,,,,
2be0: 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 ,,,,,.command,#
2bf0: 54 65 73 74 20 48 4d 41 43 2c 2c 2c 2c 2c 2c 2c Test HMAC,,,,,,,
2c00: 2c 2c 0a 44 69 67 65 73 74 20 48 4d 41 43 2c 64 ,,.Digest HMAC,d
2c10: 61 74 61 2c 2c 2c 22 74 6c 73 3a 3a 64 69 67 65 ata,,,"tls::dige
2c20: 73 74 20 6d 64 35 20 2d 6b 65 79 20 22 22 45 78 st md5 -key ""Ex
2c30: 61 6d 70 6c 65 20 6b 65 79 22 22 20 2d 64 61 74 ample key"" -dat
2c40: 61 20 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 a ""Example stri
2c50: 6e 67 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 ng for message d
2c60: 69 67 65 73 74 20 74 65 73 74 73 2e 22 22 22 2c igest tests.""",
2c70: 2c 2c 39 30 31 44 41 36 45 36 39 37 36 41 37 31 ,,901DA6E6976A71
2c80: 36 35 30 43 37 37 34 34 33 43 33 37 46 46 39 43 650C77443C37FF9C
2c90: 37 46 2c 2c 2c 0a 44 69 67 65 73 74 20 48 4d 41 7F,,,.Digest HMA
2ca0: 43 2c 66 69 6c 65 2c 2c 2c 22 74 6c 73 3a 3a 64 C,file,,,"tls::d
2cb0: 69 67 65 73 74 20 6d 64 35 20 2d 6b 65 79 20 22 igest md5 -key "
2cc0: 22 45 78 61 6d 70 6c 65 20 6b 65 79 22 22 20 2d "Example key"" -
2cd0: 66 69 6c 65 20 6d 64 5f 64 61 74 61 2e 64 61 74 file md_data.dat
2ce0: 22 2c 2c 2c 39 30 31 44 41 36 45 36 39 37 36 41 ",,,901DA6E6976A
2cf0: 37 31 36 35 30 43 37 37 34 34 33 43 33 37 46 46 71650C77443C37FF
2d00: 39 43 37 46 2c 2c 2c 0a 44 69 67 65 73 74 20 48 9C7F,,,.Digest H
2d10: 4d 41 43 2c 63 68 61 6e 6e 65 6c 2c 2c 2c 22 72 MAC,channel,,,"r
2d20: 65 61 64 5f 63 68 61 6e 20 6d 64 35 20 6d 64 5f ead_chan md5 md_
2d30: 64 61 74 61 2e 64 61 74 20 2d 6b 65 79 20 22 22 data.dat -key ""
2d40: 45 78 61 6d 70 6c 65 20 6b 65 79 22 22 22 2c 2c Example key""",,
2d50: 2c 39 30 31 44 41 36 45 36 39 37 36 41 37 31 36 ,901DA6E6976A716
2d60: 35 30 43 37 37 34 34 33 43 33 37 46 46 39 43 37 50C77443C37FF9C7
2d70: 46 2c 2c 2c 0a 44 69 67 65 73 74 20 48 4d 41 43 F,,,.Digest HMAC
2d80: 2c 64 61 74 61 20 62 69 6e 2c 2c 2c 22 73 74 72 ,data bin,,,"str
2d90: 69 6e 67 20 74 6f 75 70 70 65 72 20 5b 62 69 6e ing toupper [bin
2da0: 61 72 79 20 65 6e 63 6f 64 65 20 68 65 78 20 5b ary encode hex [
2db0: 74 6c 73 3a 3a 64 69 67 65 73 74 20 6d 64 35 20 tls::digest md5
2dc0: 2d 62 69 6e 20 2d 6b 65 79 20 22 22 45 78 61 6d -bin -key ""Exam
2dd0: 70 6c 65 20 6b 65 79 22 22 20 2d 64 61 74 61 20 ple key"" -data
2de0: 22 22 45 78 61 6d 70 6c 65 20 73 74 72 69 6e 67 ""Example string
2df0: 20 66 6f 72 20 6d 65 73 73 61 67 65 20 64 69 67 for message dig
2e00: 65 73 74 20 74 65 73 74 73 2e 22 22 5d 5d 22 2c est tests.""]]",
2e10: 2c 2c 39 30 31 44 41 36 45 36 39 37 36 41 37 31 ,,901DA6E6976A71
2e20: 36 35 30 43 37 37 34 34 33 43 33 37 46 46 39 43 650C77443C37FF9C
2e30: 37 46 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 7F,,,.,,,,,,,,,,
2e40: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 44 69 67 65 73 .command,# Diges
2e50: 74 20 45 72 72 6f 72 20 43 61 73 65 73 2c 2c 2c t Error Cases,,,
2e60: 2c 2c 2c 2c 2c 2c 0a 44 69 67 65 73 74 20 45 72 ,,,,,,.Digest Er
2e70: 72 6f 72 73 2c 54 6f 6f 20 66 65 77 20 61 72 67 rors,Too few arg
2e80: 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 s,,,::tls::diges
2e90: 74 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 t,,,"wrong # arg
2ea0: 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a s: should be "":
2eb0: 3a 74 6c 73 3a 3a 64 69 67 65 73 74 20 74 79 70 :tls::digest typ
2ec0: 65 20 3f 2d 62 69 6e 7c 2d 68 65 78 3f 20 3f 2d e ?-bin|-hex? ?-
2ed0: 6b 65 79 20 68 6d 61 63 5f 6b 65 79 3f 20 5b 2d key hmac_key? [-
2ee0: 63 68 61 6e 6e 65 6c 20 63 68 61 6e 20 7c 20 2d channel chan | -
2ef0: 66 69 6c 65 20 66 69 6c 65 6e 61 6d 65 20 7c 20 file filename |
2f00: 3f 2d 64 61 74 61 3f 20 64 61 74 61 5d 22 22 22 ?-data? data]"""
2f10: 2c 2c 2c 31 0a 44 69 67 65 73 74 20 45 72 72 6f ,,,1.Digest Erro
2f20: 72 73 2c 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 rs,Too many args
2f30: 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 ,,,::tls::digest
2f40: 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 20 74 too many args t
2f50: 6f 20 70 61 73 73 20 74 68 65 20 74 65 73 74 20 o pass the test
2f60: 77 69 74 68 6f 75 74 20 61 6e 20 65 72 72 6f 72 without an error
2f70: 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 73 ,,,"wrong # args
2f80: 3a 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a 3a : should be ""::
2f90: 74 6c 73 3a 3a 64 69 67 65 73 74 20 74 79 70 65 tls::digest type
2fa0: 20 3f 2d 62 69 6e 7c 2d 68 65 78 3f 20 3f 2d 6b ?-bin|-hex? ?-k
2fb0: 65 79 20 68 6d 61 63 5f 6b 65 79 3f 20 5b 2d 63 ey hmac_key? [-c
2fc0: 68 61 6e 6e 65 6c 20 63 68 61 6e 20 7c 20 2d 66 hannel chan | -f
2fd0: 69 6c 65 20 66 69 6c 65 6e 61 6d 65 20 7c 20 3f ile filename | ?
2fe0: 2d 64 61 74 61 3f 20 64 61 74 61 5d 22 22 22 2c -data? data]""",
2ff0: 2c 2c 31 0a 44 69 67 65 73 74 20 45 72 72 6f 72 ,,1.Digest Error
3000: 73 2c 49 6e 76 61 6c 69 64 20 64 69 67 65 73 74 s,Invalid digest
3010: 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 ,,,::tls::digest
3020: 20 62 6f 67 75 73 20 64 61 74 61 2c 2c 2c 22 49 bogus data,,,"I
3030: 6e 76 61 6c 69 64 20 64 69 67 65 73 74 20 74 79 nvalid digest ty
3040: 70 65 20 22 22 62 6f 67 75 73 22 22 22 2c 2c 2c pe ""bogus""",,,
3050: 31 0a 44 69 67 65 73 74 20 45 72 72 6f 72 73 2c 1.Digest Errors,
3060: 49 6e 76 61 6c 69 64 20 6f 70 74 69 6f 6e 2c 2c Invalid option,,
3070: 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 20 73 ,::tls::digest s
3080: 68 61 32 35 36 20 2d 62 6f 67 75 73 20 76 61 6c ha256 -bogus val
3090: 75 65 2c 2c 2c 22 62 61 64 20 6f 70 74 69 6f 6e ue,,,"bad option
30a0: 20 22 22 2d 62 6f 67 75 73 22 22 3a 20 6d 75 73 ""-bogus"": mus
30b0: 74 20 62 65 20 2d 62 69 6e 2c 20 2d 64 61 74 61 t be -bin, -data
30c0: 2c 20 2d 66 69 6c 65 2c 20 2d 66 69 6c 65 6e 61 , -file, -filena
30d0: 6d 65 2c 20 2d 68 65 78 2c 20 6f 72 20 2d 6b 65 me, -hex, or -ke
30e0: 79 22 2c 2c 2c 31 0a 44 69 67 65 73 74 20 45 72 y",,,1.Digest Er
30f0: 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20 66 69 6c rors,Invalid fil
3100: 65 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 e,,,::tls::diges
3110: 74 20 73 68 61 32 35 36 20 2d 66 69 6c 65 20 62 t sha256 -file b
3120: 6f 67 75 73 2c 2c 2c 22 63 6f 75 6c 64 6e 27 74 ogus,,,"couldn't
3130: 20 6f 70 65 6e 20 22 22 62 6f 67 75 73 22 22 3a open ""bogus"":
3140: 20 6e 6f 20 73 75 63 68 20 66 69 6c 65 20 6f 72 no such file or
3150: 20 64 69 72 65 63 74 6f 72 79 22 2c 2c 2c 31 0a directory",,,1.
3160: 44 69 67 65 73 74 20 45 72 72 6f 72 73 2c 49 6e Digest Errors,In
3170: 76 61 6c 69 64 20 63 68 61 6e 6e 65 6c 2c 2c 2c valid channel,,,
3180: 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 20 73 68 ::tls::digest sh
3190: 61 32 35 36 20 2d 63 68 61 6e 6e 65 6c 20 62 6f a256 -channel bo
31a0: 67 75 73 2c 2c 2c 22 63 61 6e 20 6e 6f 74 20 66 gus,,,"can not f
31b0: 69 6e 64 20 63 68 61 6e 6e 65 6c 20 6e 61 6d 65 ind channel name
31c0: 64 20 22 22 62 6f 67 75 73 22 22 22 2c 2c 2c 31 d ""bogus""",,,1
31d0: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .,,,,,,,,,,.comm
31e0: 61 6e 64 2c 23 20 54 65 73 74 20 6c 69 73 74 20 and,# Test list
31f0: 4d 41 43 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 4d 41 MACs,,,,,,,,,.MA
3200: 43 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f C List,All,,,lco
3210: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 5f mpare [exec_get_
3220: 6d 61 63 73 5d 20 5b 74 6c 73 3a 3a 6d 61 63 73 macs] [tls::macs
3230: 5d 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 ],,,missing {} u
3240: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
3250: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
3260: 6e 64 2c 23 20 54 65 73 74 20 6c 69 73 74 20 70 nd,# Test list p
3270: 72 6f 74 6f 63 6f 6c 73 2c 2c 2c 2c 2c 2c 2c 2c rotocols,,,,,,,,
3280: 2c 0a 50 72 6f 74 6f 63 6f 6c 73 2c 41 6c 6c 2c ,.Protocols,All,
3290: 2c 2c 6c 63 6f 6d 70 61 72 65 20 24 70 72 6f 74 ,,lcompare $prot
32a0: 6f 63 6f 6c 73 20 5b 3a 3a 74 6c 73 3a 3a 70 72 ocols [::tls::pr
32b0: 6f 74 6f 63 6f 6c 73 5d 2c 2c 2c 6d 69 73 73 69 otocols],,,missi
32c0: 6e 67 20 7b 73 73 6c 32 20 73 73 6c 33 7d 20 75 ng {ssl2 ssl3} u
32d0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
32e0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
32f0: 6e 64 2c 23 20 54 65 73 74 20 73 68 6f 77 20 76 nd,# Test show v
3300: 65 72 73 69 6f 6e 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a ersion,,,,,,,,,.
3310: 56 65 72 73 69 6f 6e 2c 41 6c 6c 2c 2c 2c 3a 3a Version,All,,,::
3320: 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c tls::version,,gl
3330: 6f 62 2c 2a 2c 2c 2c 0a 56 65 72 73 69 6f 6e 2c ob,*,,,.Version,
3340: 4f 70 65 6e 53 53 4c 2c 4f 70 65 6e 53 53 4c 2c OpenSSL,OpenSSL,
3350: 2c 3a 3a 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 2c ,::tls::version,
3360: 2c 67 6c 6f 62 2c 4f 70 65 6e 53 53 4c 2a 2c 2c ,glob,OpenSSL*,,
3370: 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d ,.,,,,,,,,,,.com
3380: 6d 61 6e 64 2c 23 20 45 72 72 6f 72 20 43 61 73 mand,# Error Cas
3390: 65 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 45 72 72 6f es,,,,,,,,,.Erro
33a0: 72 20 43 61 73 65 73 2c 44 69 67 65 73 74 73 20 r Cases,Digests
33b0: 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c Too many args,,,
33c0: 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 73 20 74 ::tls::digests t
33d0: 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 22 oo many args,,,"
33e0: 77 72 6f 6e 67 20 23 20 61 72 67 73 3a 20 73 68 wrong # args: sh
33f0: 6f 75 6c 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a ould be ""::tls:
3400: 3a 64 69 67 65 73 74 73 22 22 22 2c 2c 2c 31 0a :digests""",,,1.
3410: 45 72 72 6f 72 20 43 61 73 65 73 2c 4d 41 43 73 Error Cases,MACs
3420: 20 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c Too many args,,
3430: 2c 3a 3a 74 6c 73 3a 3a 6d 61 63 73 20 74 6f 6f ,::tls::macs too
3440: 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72 many args,,,"wr
3450: 6f 6e 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 ong # args: shou
3460: 6c 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 6d ld be ""::tls::m
3470: 61 63 73 22 22 22 2c 2c 2c 31 0a 45 72 72 6f 72 acs""",,,1.Error
3480: 20 43 61 73 65 73 2c 50 72 6f 74 6f 63 6f 6c 73 Cases,Protocols
3490: 20 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c Too many args,,
34a0: 2c 3a 3a 74 6c 73 3a 3a 70 72 6f 74 6f 63 6f 6c ,::tls::protocol
34b0: 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c s too many args,
34c0: 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 73 3a ,,"wrong # args:
34d0: 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a 3a 74 should be ""::t
34e0: 6c 73 3a 3a 70 72 6f 74 6f 63 6f 6c 73 22 22 22 ls::protocols"""
34f0: 2c 2c 2c 31 0a 45 72 72 6f 72 20 43 61 73 65 73 ,,,1.Error Cases
3500: 2c 56 65 72 73 69 6f 6e 20 54 6f 6f 20 6d 61 6e ,Version Too man
3510: 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a y args,,,::tls::
3520: 76 65 72 73 69 6f 6e 20 74 6f 6f 20 6d 61 6e 79 version too many
3530: 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 args,,,"wrong #
3540: 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 args: should be
3550: 20 22 22 3a 3a 74 6c 73 3a 3a 76 65 72 73 69 6f ""::tls::versio
3560: 6e 22 22 22 2c 2c 2c 31 0a n""",,,1.