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 2c e tls,,,,,,,,,.,
0080: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e ,,,,,,,,,.comman
0090: 64 2c 23 20 4d 61 6b 65 20 73 75 72 65 20 70 61 d,# Make sure pa
00a0: 74 68 20 69 6e 63 6c 75 64 65 73 20 6c 6f 63 61 th includes loca
00b0: 74 69 6f 6e 20 6f 66 20 4f 70 65 6e 53 53 4c 20 tion of OpenSSL
00c0: 65 78 65 63 75 74 61 62 6c 65 2c 2c 2c 2c 2c 2c executable,,,,,,
00d0: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 22 69 66 20 ,,,.command,"if
00e0: 7b 5b 69 6e 66 6f 20 65 78 69 73 74 73 20 3a 3a {[info exists ::
00f0: 65 6e 76 28 4f 50 45 4e 53 53 4c 29 5d 7d 20 7b env(OPENSSL)]} {
0100: 73 65 74 20 3a 3a 65 6e 76 28 70 61 74 68 29 20 set ::env(path)
0110: 5b 73 74 72 69 6e 67 20 63 61 74 20 5b 66 69 6c [string cat [fil
0120: 65 20 6a 6f 69 6e 20 24 3a 3a 65 6e 76 28 4f 50 e join $::env(OP
0130: 45 4e 53 53 4c 29 20 62 69 6e 5d 20 22 22 3b 22 ENSSL) bin] "";"
0140: 22 20 24 3a 3a 65 6e 76 28 70 61 74 68 29 5d 7d " $::env(path)]}
0150: 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c ",,,,,,,,,.,,,,,
0160: 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 ,,,,,.command,#
0170: 43 6f 6e 73 74 72 61 69 6e 74 73 2c 2c 2c 2c 2c Constraints,,,,,
0180: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 73 6f 75 ,,,,.command,sou
0190: 72 63 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5b rce [file join [
01a0: 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 69 6e file dirname [in
01b0: 66 6f 20 73 63 72 69 70 74 5d 5d 20 63 6f 6d 6d fo script]] comm
01c0: 6f 6e 2e 74 63 6c 5d 2c 2c 2c 2c 2c 2c 2c 2c 2c on.tcl],,,,,,,,,
01d0: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .,,,,,,,,,,.comm
01e0: 61 6e 64 2c 23 20 48 65 6c 70 65 72 20 66 75 6e and,# Helper fun
01f0: 63 74 69 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a ctions,,,,,,,,,.
0200: 63 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 6c 63 command,"proc lc
0210: 6f 6d 70 61 72 65 20 7b 6c 69 73 74 31 20 6c 69 ompare {list1 li
0220: 73 74 32 7d 20 7b 0a 20 20 20 20 73 65 74 20 6d st2} {. set m
0230: 20 22 22 22 22 0a 20 20 20 20 73 65 74 20 75 20 """". set u
0240: 22 22 22 22 0a 20 20 20 20 66 6f 72 65 61 63 68 """". foreach
0250: 20 69 20 24 6c 69 73 74 31 20 7b 0a 20 20 20 20 i $list1 {.
0260: 20 20 20 20 69 66 20 7b 24 69 20 6e 69 20 24 6c if {$i ni $l
0270: 69 73 74 32 7d 20 7b 0a 20 20 20 20 20 20 20 20 ist2} {.
0280: 20 20 20 20 6c 61 70 70 65 6e 64 20 6d 20 24 69 lappend m $i
0290: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 7d . }. }
02a0: 0a 20 20 20 20 66 6f 72 65 61 63 68 20 69 20 24 . foreach i $
02b0: 6c 69 73 74 32 20 7b 0a 20 20 20 20 20 20 20 20 list2 {.
02c0: 69 66 20 7b 24 69 20 6e 69 20 24 6c 69 73 74 31 if {$i ni $list1
02d0: 7d 20 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 } {.
02e0: 6c 61 70 70 65 6e 64 20 75 20 24 69 0a 20 20 20 lappend u $i.
02f0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 }. }.
0300: 20 72 65 74 75 72 6e 20 5b 6c 69 73 74 20 22 22 return [list ""
0310: 6d 69 73 73 69 6e 67 22 22 20 24 6d 20 22 22 75 missing"" $m ""u
0320: 6e 65 78 70 65 63 74 65 64 22 22 20 24 75 5d 0a nexpected"" $u].
0330: 7d 0a 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d }.",,,,,,,,,.com
0340: 6d 61 6e 64 2c 70 72 6f 63 20 65 78 65 63 5f 67 mand,proc exec_g
0350: 65 74 20 7b 64 65 6c 69 6d 20 61 72 67 73 7d 20 et {delim args}
0360: 7b 72 65 74 75 72 6e 20 5b 73 70 6c 69 74 20 5b {return [split [
0370: 65 78 65 63 20 6f 70 65 6e 73 73 6c 20 7b 2a 7d exec openssl {*}
0380: 24 61 72 67 73 5d 20 24 64 65 6c 69 6d 5d 7d 2c $args] $delim]},
0390: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
03a0: 2c 22 70 72 6f 63 20 65 78 65 63 5f 67 65 74 5f ,"proc exec_get_
03b0: 63 69 70 68 65 72 73 20 7b 7d 20 7b 0a 20 20 20 ciphers {} {.
03c0: 20 73 65 74 20 6c 69 73 74 20 5b 6c 69 73 74 5d set list [list]
03d0: 0a 20 20 20 20 73 65 74 20 64 61 74 61 20 5b 65 . set data [e
03e0: 78 65 63 20 6f 70 65 6e 73 73 6c 20 6c 69 73 74 xec openssl list
03f0: 20 2d 63 69 70 68 65 72 2d 61 6c 67 6f 72 69 74 -cipher-algorit
0400: 68 6d 73 5d 0a 20 20 20 20 66 6f 72 65 61 63 68 hms]. foreach
0410: 20 6c 69 6e 65 20 5b 73 70 6c 69 74 20 24 64 61 line [split $da
0420: 74 61 20 22 22 5c 6e 22 22 5d 20 7b 0a 20 20 20 ta ""\n""] {.
0430: 20 20 20 20 20 73 65 74 20 6c 69 6e 65 20 5b 73 set line [s
0440: 74 72 69 6e 67 20 74 72 69 6d 20 24 6c 69 6e 65 tring trim $line
0450: 5d 0a 20 20 20 20 20 20 20 20 69 66 20 7b 24 6c ]. if {$l
0460: 69 6e 65 20 65 71 20 22 22 4c 65 67 61 63 79 3a ine eq ""Legacy:
0470: 22 22 7d 20 63 6f 6e 74 69 6e 75 65 0a 20 20 20 ""} continue.
0480: 20 20 20 20 20 69 66 20 7b 24 6c 69 6e 65 20 65 if {$line e
0490: 71 20 22 22 50 72 6f 76 69 64 65 64 3a 22 22 7d q ""Provided:""}
04a0: 20 62 72 65 61 6b 0a 20 20 20 20 20 20 20 20 66 break. f
04b0: 6f 72 65 61 63 68 20 7b 63 69 70 68 65 72 20 70 oreach {cipher p
04c0: 74 72 20 61 6c 69 61 73 7d 20 5b 73 70 6c 69 74 tr alias} [split
04d0: 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 24 6c [string trim $l
04e0: 69 6e 65 5d 5d 20 7b 0a 20 20 20 20 20 20 20 20 ine]] {.
04f0: 20 20 20 20 6c 61 70 70 65 6e 64 20 6c 69 73 74 lappend list
0500: 20 5b 73 74 72 69 6e 67 20 74 6f 6c 6f 77 65 72 [string tolower
0510: 20 24 63 69 70 68 65 72 5d 0a 20 20 20 20 20 20 $cipher].
0520: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 }. }. re
0530: 74 75 72 6e 20 5b 6c 73 6f 72 74 20 2d 75 6e 69 turn [lsort -uni
0540: 71 75 65 20 24 6c 69 73 74 5d 0a 7d 0a 22 2c 2c que $list].}.",,
0550: 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c ,,,,,,,.command,
0560: 22 70 72 6f 63 20 65 78 65 63 5f 67 65 74 5f 64 "proc exec_get_d
0570: 69 67 65 73 74 73 20 7b 7d 20 7b 0a 20 20 20 20 igests {} {.
0580: 73 65 74 20 6c 69 73 74 20 5b 6c 69 73 74 5d 0a set list [list].
0590: 20 20 20 20 73 65 74 20 64 61 74 61 20 5b 65 78 set data [ex
05a0: 65 63 20 6f 70 65 6e 73 73 6c 20 64 67 73 74 20 ec openssl dgst
05b0: 2d 6c 69 73 74 5d 0a 20 20 20 20 66 6f 72 65 61 -list]. forea
05c0: 63 68 20 6c 69 6e 65 20 5b 73 70 6c 69 74 20 24 ch line [split $
05d0: 64 61 74 61 20 22 22 5c 6e 22 22 5d 20 7b 0a 20 data ""\n""] {.
05e0: 20 20 20 20 20 20 20 66 6f 72 65 61 63 68 20 64 foreach d
05f0: 69 67 65 73 74 20 24 6c 69 6e 65 20 7b 0a 20 20 igest $line {.
0600: 20 20 20 20 20 20 20 20 20 20 69 66 20 7b 5b 73 if {[s
0610: 74 72 69 6e 67 20 6d 61 74 63 68 20 22 22 2d 2a tring match ""-*
0620: 22 22 20 24 64 69 67 65 73 74 5d 7d 20 7b 0a 20 "" $digest]} {.
0630: 20 20 20 20 20 20 20 20 20 20 20 6c 61 70 70 65 lappe
0640: 6e 64 20 6c 69 73 74 20 5b 73 74 72 69 6e 67 20 nd list [string
0650: 74 72 69 6d 6c 65 66 74 20 24 64 69 67 65 73 74 trimleft $digest
0660: 20 22 22 2d 22 22 5d 7d 0a 20 20 20 20 20 20 20 ""-""]}.
0670: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 74 }. }. ret
0680: 75 72 6e 20 5b 6c 73 6f 72 74 20 24 6c 69 73 74 urn [lsort $list
0690: 5d 0a 7d 0a 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 ].}.",,,,,,,,,.c
06a0: 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 65 78 65 ommand,"proc exe
06b0: 63 5f 67 65 74 5f 70 6b 65 79 73 20 7b 7d 20 7b c_get_pkeys {} {
06c0: 0a 20 20 20 20 73 65 74 20 6c 69 73 74 20 5b 6c . set list [l
06d0: 69 73 74 5d 0a 20 20 20 20 73 65 74 20 64 61 74 ist]. set dat
06e0: 61 20 5b 65 78 65 63 20 6f 70 65 6e 73 73 6c 20 a [exec openssl
06f0: 6c 69 73 74 20 2d 70 75 62 6c 69 63 2d 6b 65 79 list -public-key
0700: 2d 6d 65 74 68 6f 64 73 5d 0a 20 20 20 20 66 6f -methods]. fo
0710: 72 65 61 63 68 20 6c 69 6e 65 20 5b 73 70 6c 69 reach line [spli
0720: 74 20 24 64 61 74 61 20 22 22 5c 6e 22 22 5d 20 t $data ""\n""]
0730: 7b 0a 20 20 20 20 20 20 20 20 73 65 74 20 6c 69 {. set li
0740: 6e 65 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 ne [string trim
0750: 24 6c 69 6e 65 5d 0a 20 20 20 20 20 20 20 20 69 $line]. i
0760: 66 20 7b 24 6c 69 6e 65 20 65 71 20 22 22 4c 65 f {$line eq ""Le
0770: 67 61 63 79 3a 22 22 20 7c 7c 20 5b 73 74 72 69 gacy:"" || [stri
0780: 6e 67 20 6d 61 74 63 68 20 22 22 54 79 70 65 3a ng match ""Type:
0790: 2a 22 22 20 24 6c 69 6e 65 5d 7d 20 63 6f 6e 74 *"" $line]} cont
07a0: 69 6e 75 65 0a 20 20 20 20 20 20 20 20 69 66 20 inue. if
07b0: 7b 24 6c 69 6e 65 20 65 71 20 22 22 50 72 6f 76 {$line eq ""Prov
07c0: 69 64 65 64 3a 22 22 7d 20 62 72 65 61 6b 0a 20 ided:""} break.
07d0: 20 20 20 20 20 20 20 6c 61 70 70 65 6e 64 20 6c lappend l
07e0: 69 73 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d ist [string trim
07f0: 20 24 6c 69 6e 65 5d 0a 20 20 20 20 7d 0a 20 20 $line]. }.
0800: 20 20 72 65 74 75 72 6e 20 24 6c 69 73 74 0a 7d return $list.}
0810: 0a 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .",,,,,,,,,.comm
0820: 61 6e 64 2c 70 72 6f 63 20 65 78 65 63 5f 67 65 and,proc exec_ge
0830: 74 5f 6d 61 63 73 20 7b 7d 20 7b 72 65 74 75 72 t_macs {} {retur
0840: 6e 20 5b 6c 69 73 74 20 63 6d 61 63 20 68 6d 61 n [list cmac hma
0850: 63 5d 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d c]},,,,,,,,,.com
0860: 6d 61 6e 64 2c 22 70 72 6f 63 20 6c 69 73 74 5f mand,"proc list_
0870: 74 6f 6c 6f 77 65 72 20 7b 6c 69 73 74 7d 20 7b tolower {list} {
0880: 0a 20 20 20 20 73 65 74 20 72 65 73 75 6c 74 20 . set result
0890: 5b 6c 69 73 74 5d 0a 20 20 20 20 66 6f 72 65 61 [list]. forea
08a0: 63 68 20 65 6c 65 6d 65 6e 74 20 24 6c 69 73 74 ch element $list
08b0: 20 7b 0a 20 20 20 20 20 20 20 20 6c 61 70 70 65 {. lappe
08c0: 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72 69 6e nd result [strin
08d0: 67 20 74 6f 6c 6f 77 65 72 20 24 65 6c 65 6d 65 g tolower $eleme
08e0: 6e 74 5d 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 nt]. }. re
08f0: 74 75 72 6e 20 24 72 65 73 75 6c 74 0a 7d 0a 22 turn $result.}."
0900: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c ,,,,,,,,,.,,,,,,
0910: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 ,,,,.command,# T
0920: 65 73 74 20 6c 69 73 74 20 63 69 70 68 65 72 73 est list ciphers
0930: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72 ,,,,,,,,,.Cipher
0940: 73 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f s List,All,,,lco
0950: 6d 70 61 72 65 20 5b 6c 73 6f 72 74 20 5b 65 78 mpare [lsort [ex
0960: 65 63 5f 67 65 74 5f 63 69 70 68 65 72 73 5d 5d ec_get_ciphers]]
0970: 20 5b 6c 69 73 74 5f 74 6f 6c 6f 77 65 72 20 5b [list_tolower [
0980: 6c 73 6f 72 74 20 5b 3a 3a 74 6c 73 3a 3a 63 69 lsort [::tls::ci
0990: 70 68 65 72 73 5d 5d 5d 2c 2c 2c 6d 69 73 73 69 phers]]],,,missi
09a0: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 ng {} unexpected
09b0: 20 7b 61 65 73 2d 31 32 38 2d 63 63 6d 20 61 65 {aes-128-ccm ae
09c0: 73 2d 31 32 38 2d 67 63 6d 20 61 65 73 2d 31 39 s-128-gcm aes-19
09d0: 32 2d 63 63 6d 20 61 65 73 2d 31 39 32 2d 67 63 2-ccm aes-192-gc
09e0: 6d 20 61 65 73 2d 32 35 36 2d 63 63 6d 20 61 65 m aes-256-ccm ae
09f0: 73 2d 32 35 36 2d 67 63 6d 7d 2c 2c 2c 0a 2c 2c s-256-gcm},,,.,,
0a00: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
0a10: 2c 23 20 54 65 73 74 20 6c 69 73 74 20 63 69 70 ,# Test list cip
0a20: 68 65 72 73 20 66 6f 72 20 70 72 6f 74 6f 63 6f hers for protoco
0a30: 6c 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 ls,,,,,,,,,.Ciph
0a40: 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c ers By Protocol,
0a50: 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 6c 63 6f 6d SSL2,ssl2,,"lcom
0a60: 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 pare [exec_get "
0a70: 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 ":"" ciphers -ss
0a80: 6c 32 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 l2] [::tls::ciph
0a90: 65 72 73 20 73 73 6c 32 5d 22 2c 2c 2c 6d 69 73 ers ssl2]",,,mis
0aa0: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 sing {} unexpect
0ab0: 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 ed {},,,.Ciphers
0ac0: 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 53 53 4c By Protocol,SSL
0ad0: 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72 3,ssl3,,"lcompar
0ae0: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 e [exec_get "":"
0af0: 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 5d " ciphers -ssl3]
0b00: 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 [::tls::ciphers
0b10: 20 73 73 6c 33 5d 22 2c 2c 2c 6d 69 73 73 69 6e ssl3]",,,missin
0b20: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 g {} unexpected
0b30: 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 42 79 {},,,.Ciphers By
0b40: 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 2e 30 Protocol,TLS1.0
0b50: 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 ,tls1,,"lcompare
0b60: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 [exec_get "":""
0b70: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5d 20 ciphers -tls1]
0b80: 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 [::tls::ciphers
0b90: 74 6c 73 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 tls1]",,,missing
0ba0: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b {} unexpected {
0bb0: 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 42 79 20 },,,.Ciphers By
0bc0: 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 2e 31 2c Protocol,TLS1.1,
0bd0: 74 6c 73 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 tls1.1,,"lcompar
0be0: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 e [exec_get "":"
0bf0: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f " ciphers -tls1_
0c00: 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 1] [::tls::ciphe
0c10: 72 73 20 74 6c 73 31 2e 31 5d 22 2c 2c 2c 6d 69 rs tls1.1]",,,mi
0c20: 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 ssing {} unexpec
0c30: 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 ted {},,,.Cipher
0c40: 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c s By Protocol,TL
0c50: 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c 22 6c 63 S1.2,tls1.2,,"lc
0c60: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 ompare [exec_get
0c70: 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d "":"" ciphers -
0c80: 74 6c 73 31 5f 32 5d 20 5b 3a 3a 74 6c 73 3a 3a tls1_2] [::tls::
0c90: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 32 5d 22 ciphers tls1.2]"
0ca0: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e ,,,missing {} un
0cb0: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 expected {},,,.C
0cc0: 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63 iphers By Protoc
0cd0: 6f 6c 2c 54 4c 53 31 2e 33 2c 74 6c 73 31 2e 33 ol,TLS1.3,tls1.3
0ce0: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 ,,"lcompare [exe
0cf0: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 c_get "":"" ciph
0d00: 65 72 73 20 2d 74 6c 73 31 5f 33 5d 20 5b 3a 3a ers -tls1_3] [::
0d10: 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 tls::ciphers tls
0d20: 31 2e 33 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 1.3]",,,missing
0d30: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d {} unexpected {}
0d40: 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 ,,,.,,,,,,,,,,.c
0d50: 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 63 69 ommand,# Test ci
0d60: 70 68 65 72 20 64 65 73 63 72 69 70 74 69 6f 6e pher description
0d70: 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 s,,,,,,,,,.Ciphe
0d80: 72 73 20 57 69 74 68 20 44 65 73 63 72 69 70 74 rs With Descript
0d90: 69 6f 6e 73 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c ions,SSL2,ssl2,,
0da0: 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f "lcompare [exec_
0db0: 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 get ""\r\n"" cip
0dc0: 68 65 72 73 20 2d 73 73 6c 32 20 2d 76 5d 20 5b hers -ssl2 -v] [
0dd0: 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 split [string tr
0de0: 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 im [::tls::ciphe
0df0: 72 73 20 73 73 6c 32 20 31 5d 5d 20 5c 6e 5d 22 rs ssl2 1]] \n]"
0e00: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e ,,,missing {} un
0e10: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 expected {},,,.C
0e20: 69 70 68 65 72 73 20 57 69 74 68 20 44 65 73 63 iphers With Desc
0e30: 72 69 70 74 69 6f 6e 73 2c 53 53 4c 33 2c 73 73 riptions,SSL3,ss
0e40: 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 l3,,"lcompare [e
0e50: 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 xec_get ""\r\n""
0e60: 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 20 2d ciphers -ssl3 -
0e70: 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e v] [split [strin
0e80: 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 g trim [::tls::c
0e90: 69 70 68 65 72 73 20 73 73 6c 33 20 31 5d 5d 20 iphers ssl3 1]]
0ea0: 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b \n]",,,missing {
0eb0: 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c } unexpected {},
0ec0: 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68 20 ,,.Ciphers With
0ed0: 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c 53 Descriptions,TLS
0ee0: 31 2e 30 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 1.0,tls1,,"lcomp
0ef0: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
0f00: 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 73 20 2d \r\n"" ciphers -
0f10: 74 6c 73 31 20 2d 76 5d 20 5b 73 70 6c 69 74 20 tls1 -v] [split
0f20: 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a [string trim [::
0f30: 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 tls::ciphers tls
0f40: 31 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 1 1]] \n]",,,mis
0f50: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 sing {} unexpect
0f60: 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 ed {},,,.Ciphers
0f70: 20 57 69 74 68 20 44 65 73 63 72 69 70 74 69 6f With Descriptio
0f80: 6e 73 2c 54 4c 53 31 2e 31 2c 74 6c 73 31 2e 31 ns,TLS1.1,tls1.1
0f90: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 ,,"lcompare [exe
0fa0: 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 c_get ""\r\n"" c
0fb0: 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 2d iphers -tls1_1 -
0fc0: 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e v] [split [strin
0fd0: 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 g trim [::tls::c
0fe0: 69 70 68 65 72 73 20 74 6c 73 31 2e 31 20 31 5d iphers tls1.1 1]
0ff0: 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 ] \n]",,,missing
1000: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b {} unexpected {
1010: 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 },,,.Ciphers Wit
1020: 68 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 h Descriptions,T
1030: 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c 22 6c LS1.2,tls1.2,,"l
1040: 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 compare [exec_ge
1050: 74 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 t ""\r\n"" ciphe
1060: 72 73 20 2d 74 6c 73 31 5f 32 20 2d 76 5d 20 5b rs -tls1_2 -v] [
1070: 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 split [string tr
1080: 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 im [::tls::ciphe
1090: 72 73 20 74 6c 73 31 2e 32 20 31 5d 5d 20 5c 6e rs tls1.2 1]] \n
10a0: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]",,,missing {}
10b0: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
10c0: 0a 43 69 70 68 65 72 73 20 57 69 74 68 20 44 65 .Ciphers With De
10d0: 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c 53 31 2e scriptions,TLS1.
10e0: 33 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 3,tls1.3,,"lcomp
10f0: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
1100: 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 73 20 2d \r\n"" ciphers -
1110: 74 6c 73 31 5f 33 20 2d 76 5d 20 5b 73 70 6c 69 tls1_3 -v] [spli
1120: 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 5b t [string trim [
1130: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 ::tls::ciphers t
1140: 6c 73 31 2e 33 20 31 5d 5d 20 5c 6e 5d 22 2c 2c ls1.3 1]] \n]",,
1150: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 ,missing {} unex
1160: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c pected {},,,.,,,
1170: 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c ,,,,,,,.command,
1180: 23 20 54 65 73 74 20 70 72 6f 74 6f 63 6f 6c 20 # Test protocol
1190: 73 70 65 63 69 66 69 63 20 63 69 70 68 65 72 73 specific ciphers
11a0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72 ,,,,,,,,,.Cipher
11b0: 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 s Protocol Speci
11c0: 66 69 63 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 fic,SSL2,ssl2,,"
11d0: 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 lcompare [exec_g
11e0: 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 et "":"" ciphers
11f0: 20 2d 73 73 6c 32 20 2d 73 5d 20 5b 3a 3a 74 6c -ssl2 -s] [::tl
1200: 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 32 20 s::ciphers ssl2
1210: 30 20 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 0 1]",,,missing
1220: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d {} unexpected {}
1230: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 50 72 6f 74 ,,,.Ciphers Prot
1240: 6f 63 6f 6c 20 53 70 65 63 69 66 69 63 2c 53 53 ocol Specific,SS
1250: 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 L3,ssl3,,"lcompa
1260: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a re [exec_get "":
1270: 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 "" ciphers -ssl3
1280: 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 -s] [::tls::cip
1290: 68 65 72 73 20 73 73 6c 33 20 30 20 31 5d 22 2c hers ssl3 0 1]",
12a0: 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 ,,missing {} une
12b0: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 xpected {},,,.Ci
12c0: 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 phers Protocol S
12d0: 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 30 2c 74 pecific,TLS1.0,t
12e0: 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b ls1,,"lcompare [
12f0: 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 exec_get "":"" c
1300: 69 70 68 65 72 73 20 2d 74 6c 73 31 20 2d 73 5d iphers -tls1 -s]
1310: 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 [::tls::ciphers
1320: 20 74 6c 73 31 20 30 20 31 5d 22 2c 2c 2c 6d 69 tls1 0 1]",,,mi
1330: 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 ssing {} unexpec
1340: 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 ted {},,,.Cipher
1350: 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 s Protocol Speci
1360: 66 69 63 2c 54 4c 53 31 2e 31 2c 74 6c 73 31 2e fic,TLS1.1,tls1.
1370: 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 1,,"lcompare [ex
1380: 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 ec_get "":"" cip
1390: 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 2d 73 5d hers -tls1_1 -s]
13a0: 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 [::tls::ciphers
13b0: 20 74 6c 73 31 2e 31 20 30 20 31 5d 22 2c 2c 2c tls1.1 0 1]",,,
13c0: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
13d0: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 ected {},,,.Ciph
13e0: 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 ers Protocol Spe
13f0: 63 69 66 69 63 2c 54 4c 53 31 2e 32 2c 74 6c 73 cific,TLS1.2,tls
1400: 31 2e 32 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 1.2,,"lcompare [
1410: 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 exec_get "":"" c
1420: 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d iphers -tls1_2 -
1430: 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 s] [::tls::ciphe
1440: 72 73 20 74 6c 73 31 2e 32 20 30 20 31 5d 22 2c rs tls1.2 0 1]",
1450: 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 ,,missing {} une
1460: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 xpected {},,,.Ci
1470: 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 phers Protocol S
1480: 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 33 2c 74 pecific,TLS1.3,t
1490: 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 ls1.3,,"lcompare
14a0: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 [exec_get "":""
14b0: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 33 ciphers -tls1_3
14c0: 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 -s] [::tls::cip
14d0: 68 65 72 73 20 74 6c 73 31 2e 33 20 30 20 31 5d hers tls1.3 0 1]
14e0: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 ",,,missing {} u
14f0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
1500: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
1510: 6e 64 2c 23 20 43 69 70 68 65 72 73 20 45 72 72 nd,# Ciphers Err
1520: 6f 72 20 43 61 73 65 73 2c 2c 2c 2c 2c 2c 2c 2c or Cases,,,,,,,,
1530: 2c 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 ,.Ciphers Errors
1540: 2c 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c ,Too many args,,
1550: 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 ,::tls::ciphers
1560: 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 20 74 6f too many args to
1570: 20 70 61 73 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 pass,,,"wrong #
1580: 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 args: should be
1590: 20 22 22 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 ""::tls::cipher
15a0: 73 20 3f 70 72 6f 74 6f 63 6f 6c 3f 20 3f 76 65 s ?protocol? ?ve
15b0: 72 62 6f 73 65 3f 20 3f 73 75 70 70 6f 72 74 65 rbose? ?supporte
15c0: 64 3f 22 22 22 2c 2c 2c 31 0a 43 69 70 68 65 72 d?""",,,1.Cipher
15d0: 73 20 45 72 72 6f 72 73 2c 49 6e 76 61 6c 69 64 s Errors,Invalid
15e0: 20 70 72 6f 74 6f 63 6f 6c 2c 2c 2c 3a 3a 74 6c protocol,,,::tl
15f0: 73 3a 3a 63 69 70 68 65 72 73 20 62 6f 67 75 73 s::ciphers bogus
1600: 2c 2c 2c 22 62 61 64 20 70 72 6f 74 6f 63 6f 6c ,,,"bad protocol
1610: 20 22 22 62 6f 67 75 73 22 22 3a 20 6d 75 73 74 ""bogus"": must
1620: 20 62 65 20 73 73 6c 32 2c 20 73 73 6c 33 2c 20 be ssl2, ssl3,
1630: 74 6c 73 31 2c 20 74 6c 73 31 2e 31 2c 20 74 6c tls1, tls1.1, tl
1640: 73 31 2e 32 2c 20 6f 72 20 74 6c 73 31 2e 33 22 s1.2, or tls1.3"
1650: 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 ,,,1.Ciphers Err
1660: 6f 72 73 2c 49 6e 76 61 6c 69 64 20 76 65 72 62 ors,Invalid verb
1670: 6f 73 65 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 ose,,,::tls::cip
1680: 68 65 72 73 20 74 6c 73 31 2e 33 20 62 6f 67 75 hers tls1.3 bogu
1690: 73 2c 2c 2c 22 65 78 70 65 63 74 65 64 20 62 6f s,,,"expected bo
16a0: 6f 6c 65 61 6e 20 76 61 6c 75 65 20 62 75 74 20 olean value but
16b0: 67 6f 74 20 22 22 62 6f 67 75 73 22 22 22 2c 2c got ""bogus""",,
16c0: 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 ,1.Ciphers Error
16d0: 73 2c 49 6e 76 61 6c 69 64 20 73 75 70 70 6f 72 s,Invalid suppor
16e0: 74 65 64 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 ted,,,::tls::cip
16f0: 68 65 72 73 20 74 6c 73 31 2e 33 20 31 20 62 6f hers tls1.3 1 bo
1700: 67 75 73 2c 2c 2c 22 65 78 70 65 63 74 65 64 20 gus,,,"expected
1710: 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 20 62 75 boolean value bu
1720: 74 20 67 6f 74 20 22 22 62 6f 67 75 73 22 22 22 t got ""bogus"""
1730: 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 ,,,1.Ciphers Err
1740: 6f 72 73 2c 53 53 4c 32 2c 21 73 73 6c 32 2c 2c ors,SSL2,!ssl2,,
1750: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 ::tls::ciphers s
1760: 73 6c 32 2c 2c 2c 73 73 6c 32 3a 20 70 72 6f 74 sl2,,,ssl2: prot
1770: 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 6f 72 74 ocol not support
1780: 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 ed,,,1.Ciphers E
1790: 72 72 6f 72 73 2c 53 53 4c 33 2c 21 73 73 6c 33 rrors,SSL3,!ssl3
17a0: 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 ,,::tls::ciphers
17b0: 20 73 73 6c 33 2c 2c 2c 73 73 6c 33 3a 20 70 72 ssl3,,,ssl3: pr
17c0: 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 6f otocol not suppo
17d0: 72 74 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 73 rted,,,1.Ciphers
17e0: 20 45 72 72 6f 72 73 2c 54 4c 53 31 2e 30 2c 21 Errors,TLS1.0,!
17f0: 74 6c 73 31 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 tls1,,::tls::cip
1800: 68 65 72 73 20 74 6c 73 31 2c 2c 2c 74 6c 73 31 hers tls1,,,tls1
1810: 3a 20 70 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 : protocol not s
1820: 75 70 70 6f 72 74 65 64 2c 2c 2c 31 0a 43 69 70 upported,,,1.Cip
1830: 68 65 72 73 20 45 72 72 6f 72 73 2c 54 4c 53 31 hers Errors,TLS1
1840: 2e 31 2c 21 74 6c 73 31 2e 31 2c 2c 3a 3a 74 6c .1,!tls1.1,,::tl
1850: 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e s::ciphers tls1.
1860: 31 2c 2c 2c 74 6c 73 31 2e 30 3a 20 70 72 6f 74 1,,,tls1.0: prot
1870: 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 6f 72 74 ocol not support
1880: 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 ed,,,1.Ciphers E
1890: 72 72 6f 72 73 2c 54 4c 53 31 2e 32 2c 21 74 6c rrors,TLS1.2,!tl
18a0: 73 31 2e 32 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 s1.2,,::tls::cip
18b0: 68 65 72 73 20 74 6c 73 31 2e 32 2c 2c 2c 74 6c hers tls1.2,,,tl
18c0: 73 31 2e 31 3a 20 70 72 6f 74 6f 63 6f 6c 20 6e s1.1: protocol n
18d0: 6f 74 20 73 75 70 70 6f 72 74 65 64 2c 2c 2c 31 ot supported,,,1
18e0: 0a 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c .Ciphers Errors,
18f0: 54 4c 53 31 2e 33 2c 21 74 6c 73 31 2e 33 2c 2c TLS1.3,!tls1.3,,
1900: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 ::tls::ciphers t
1910: 6c 73 31 2e 33 2c 2c 2c 74 6c 73 31 2e 33 3a 20 ls1.3,,,tls1.3:
1920: 70 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 protocol not sup
1930: 70 6f 72 74 65 64 2c 2c 2c 31 0a 2c 2c 2c 2c 2c ported,,,1.,,,,,
1940: 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 ,,,,,.command,#
1950: 54 65 73 74 20 43 69 70 68 65 72 20 49 6e 66 6f Test Cipher Info
1960: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72 ,,,,,,,,,.Cipher
1970: 20 49 6e 66 6f 2c 41 45 53 2d 32 35 36 2d 43 43 Info,AES-256-CC
1980: 4d 2c 2c 2c 74 6c 73 3a 3a 63 69 70 68 65 72 20 M,,,tls::cipher
1990: 61 65 73 2d 32 35 36 2d 63 63 6d 2c 2c 2c 6e 69 aes-256-ccm,,,ni
19a0: 64 20 61 65 73 2d 32 35 36 2d 63 63 6d 20 6e 61 d aes-256-ccm na
19b0: 6d 65 20 69 64 2d 61 65 73 32 35 36 2d 43 43 4d me id-aes256-CCM
19c0: 20 64 65 73 63 72 69 70 74 69 6f 6e 20 7b 7d 20 description {}
19d0: 62 6c 6f 63 6b 5f 73 69 7a 65 20 31 20 6b 65 79 block_size 1 key
19e0: 5f 6c 65 6e 67 74 68 20 33 32 20 69 76 5f 6c 65 _length 32 iv_le
19f0: 6e 67 74 68 20 31 32 20 74 79 70 65 20 61 65 73 ngth 12 type aes
1a00: 2d 32 35 36 2d 63 63 6d 20 70 72 6f 76 69 64 65 -256-ccm provide
1a10: 72 20 7b 7d 20 6d 6f 64 65 20 43 43 4d 20 66 6c r {} mode CCM fl
1a20: 61 67 73 20 7b 7b 56 61 72 69 61 62 6c 65 20 4c ags {{Variable L
1a30: 65 6e 67 74 68 7d 20 30 20 7b 41 6c 77 61 79 73 ength} 0 {Always
1a40: 20 43 61 6c 6c 20 49 6e 69 74 7d 20 31 20 7b 43 Call Init} 1 {C
1a50: 75 73 74 6f 6d 20 49 56 7d 20 31 20 7b 43 6f 6e ustom IV} 1 {Con
1a60: 74 72 6f 6c 20 49 6e 69 74 7d 20 31 20 7b 43 75 trol Init} 1 {Cu
1a70: 73 74 6f 6d 20 43 69 70 68 65 72 7d 20 31 20 7b stom Cipher} 1 {
1a80: 41 45 41 44 20 43 69 70 68 65 72 7d 20 31 20 7b AEAD Cipher} 1 {
1a90: 43 75 73 74 6f 6d 20 43 6f 70 79 7d 20 31 20 7b Custom Copy} 1 {
1aa0: 4e 6f 6e 20 46 49 50 53 20 41 6c 6c 6f 77 7d 20 Non FIPS Allow}
1ab0: 30 7d 20 74 61 67 5f 6c 65 6e 67 74 68 20 31 36 0} tag_length 16
1ac0: 20 61 61 64 5f 6c 65 6e 67 74 68 20 31 33 2c 2c aad_length 13,,
1ad0: 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d ,.,,,,,,,,,,.com
1ae0: 6d 61 6e 64 2c 23 20 54 65 73 74 20 6c 69 73 74 mand,# Test list
1af0: 20 64 69 67 65 73 74 73 2c 2c 2c 2c 2c 2c 2c 2c digests,,,,,,,,
1b00: 2c 0a 44 69 67 65 73 74 73 20 4c 69 73 74 2c 41 ,.Digests List,A
1b10: 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 5b 6c ll,,,lcompare [l
1b20: 73 6f 72 74 20 5b 65 78 65 63 5f 67 65 74 5f 64 sort [exec_get_d
1b30: 69 67 65 73 74 73 5d 5d 20 5b 6c 73 6f 72 74 20 igests]] [lsort
1b40: 5b 74 6c 73 3a 3a 64 69 67 65 73 74 73 5d 5d 2c [tls::digests]],
1b50: 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 ,,missing {} une
1b60: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c xpected {},,,.,,
1b70: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
1b80: 2c 23 20 54 65 73 74 20 44 69 67 65 73 74 20 49 ,# Test Digest I
1b90: 6e 66 6f 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 44 69 67 nfo,,,,,,,,,.Dig
1ba0: 65 73 74 20 49 6e 66 6f 2c 6d 64 35 2c 2c 2c 74 est Info,md5,,,t
1bb0: 6c 73 3a 3a 64 69 67 65 73 74 73 20 6d 64 35 2c ls::digests md5,
1bc0: 2c 2c 6e 61 6d 65 20 4d 44 35 20 64 65 73 63 72 ,,name MD5 descr
1bd0: 69 70 74 69 6f 6e 20 7b 7d 20 73 69 7a 65 20 31 iption {} size 1
1be0: 36 20 62 6c 6f 63 6b 5f 73 69 7a 65 20 36 34 20 6 block_size 64
1bf0: 70 72 6f 76 69 64 65 72 20 7b 7d 20 74 79 70 65 provider {} type
1c00: 20 6d 64 35 20 70 6b 65 79 5f 74 79 70 65 20 6d md5 pkey_type m
1c10: 64 35 57 69 74 68 52 53 41 45 6e 63 72 79 70 74 d5WithRSAEncrypt
1c20: 69 6f 6e 20 66 6c 61 67 73 20 7b 4f 6e 65 2d 73 ion flags {One-s
1c30: 68 6f 74 20 30 20 58 4f 46 20 30 20 44 69 67 65 hot 0 XOF 0 Dige
1c40: 73 74 41 6c 67 6f 72 69 74 68 6d 49 64 5f 4e 55 stAlgorithmId_NU
1c50: 4c 4c 20 30 20 44 69 67 65 73 74 41 6c 67 6f 72 LL 0 DigestAlgor
1c60: 69 74 68 6d 49 64 5f 41 62 73 63 65 6e 74 20 30 ithmId_Abscent 0
1c70: 20 44 69 67 65 73 74 41 6c 67 6f 72 69 74 68 6d DigestAlgorithm
1c80: 49 64 5f 43 75 73 74 6f 6d 20 30 20 46 49 50 53 Id_Custom 0 FIPS
1c90: 20 30 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 0},,,.,,,,,,,,,
1ca0: 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 ,.command,# Test
1cb0: 20 6c 69 73 74 20 4d 41 43 73 2c 2c 2c 2c 2c 2c list MACs,,,,,,
1cc0: 2c 2c 2c 0a 4d 41 43 20 4c 69 73 74 2c 41 6c 6c ,,,.MAC List,All
1cd0: 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 ,,,lcompare [exe
1ce0: 63 5f 67 65 74 5f 6d 61 63 73 5d 20 5b 74 6c 73 c_get_macs] [tls
1cf0: 3a 3a 6d 61 63 73 5d 2c 2c 2c 6d 69 73 73 69 6e ::macs],,,missin
1d00: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 g {} unexpected
1d10: 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c {},,,.,,,,,,,,,,
1d20: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 .command,# Test
1d30: 6c 69 73 74 20 50 6b 65 79 73 2c 2c 2c 2c 2c 2c list Pkeys,,,,,,
1d40: 2c 2c 2c 0a 50 6b 65 79 20 4c 69 73 74 2c 41 6c ,,,.Pkey List,Al
1d50: 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 5b 65 78 l,,,lcompare [ex
1d60: 65 63 5f 67 65 74 5f 70 6b 65 79 73 5d 20 5b 74 ec_get_pkeys] [t
1d70: 6c 73 3a 3a 70 6b 65 79 73 5d 2c 2c 2c 6d 69 73 ls::pkeys],,,mis
1d80: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 sing {} unexpect
1d90: 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c ed {},,,.,,,,,,,
1da0: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 ,,,.command,# Te
1db0: 73 74 20 6c 69 73 74 20 70 72 6f 74 6f 63 6f 6c st list protocol
1dc0: 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 50 72 6f 74 6f s,,,,,,,,,.Proto
1dd0: 63 6f 6c 73 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 cols,All,,,lcomp
1de0: 61 72 65 20 24 3a 3a 70 72 6f 74 6f 63 6f 6c 73 are $::protocols
1df0: 20 5b 3a 3a 74 6c 73 3a 3a 70 72 6f 74 6f 63 6f [::tls::protoco
1e00: 6c 73 5d 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 73 ls],,,missing {s
1e10: 73 6c 32 20 73 73 6c 33 7d 20 75 6e 65 78 70 65 sl2 ssl3} unexpe
1e20: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c cted {},,,.,,,,,
1e30: 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 ,,,,,.command,#
1e40: 54 65 73 74 20 73 68 6f 77 20 76 65 72 73 69 6f Test show versio
1e50: 6e 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 56 65 72 73 69 n,,,,,,,,,.Versi
1e60: 6f 6e 2c 41 6c 6c 2c 2c 2c 3a 3a 74 6c 73 3a 3a on,All,,,::tls::
1e70: 76 65 72 73 69 6f 6e 2c 2c 67 6c 6f 62 2c 2a 2c version,,glob,*,
1e80: 2c 2c 0a 56 65 72 73 69 6f 6e 2c 4f 70 65 6e 53 ,,.Version,OpenS
1e90: 53 4c 2c 4f 70 65 6e 53 53 4c 2c 2c 3a 3a 74 6c SL,OpenSSL,,::tl
1ea0: 73 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c 6f 62 s::version,,glob
1eb0: 2c 4f 70 65 6e 53 53 4c 2a 2c 2c 2c 0a 2c 2c 2c ,OpenSSL*,,,.,,,
1ec0: 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c ,,,,,,,.command,
1ed0: 23 20 45 72 72 6f 72 20 43 61 73 65 73 2c 2c 2c # Error Cases,,,
1ee0: 2c 2c 2c 2c 2c 2c 0a 45 72 72 6f 72 20 43 61 73 ,,,,,,.Error Cas
1ef0: 65 73 2c 43 69 70 68 65 72 20 74 6f 6f 20 6d 61 es,Cipher too ma
1f00: 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a ny args,,,::tls:
1f10: 3a 63 69 70 68 65 72 20 74 6f 6f 20 6d 61 6e 79 :cipher too many
1f20: 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 args,,,"wrong #
1f30: 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 args: should be
1f40: 20 22 22 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 ""::tls::cipher
1f50: 20 3f 6e 61 6d 65 3f 22 22 22 2c 2c 2c 31 0a 45 ?name?""",,,1.E
1f60: 72 72 6f 72 20 43 61 73 65 73 2c 44 69 67 65 73 rror Cases,Diges
1f70: 74 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 ts too many args
1f80: 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 ,,,::tls::digest
1f90: 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c s too many args,
1fa0: 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 73 3a ,,"wrong # args:
1fb0: 20 73 68 6f 75 6c 64 20 62 65 20 22 22 3a 3a 74 should be ""::t
1fc0: 6c 73 3a 3a 64 69 67 65 73 74 73 20 3f 6e 61 6d ls::digests ?nam
1fd0: 65 3f 22 22 22 2c 2c 2c 31 0a 45 72 72 6f 72 20 e?""",,,1.Error
1fe0: 43 61 73 65 73 2c 4d 41 43 73 20 74 6f 6f 20 6d Cases,MACs too m
1ff0: 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 any args,,,::tls
2000: 3a 3a 6d 61 63 73 20 74 6f 6f 20 6d 61 6e 79 20 ::macs too many
2010: 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 args,,,"wrong #
2020: 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 args: should be
2030: 22 22 3a 3a 74 6c 73 3a 3a 6d 61 63 73 20 3f 6e ""::tls::macs ?n
2040: 61 6d 65 3f 22 22 22 2c 2c 2c 31 0a 45 72 72 6f ame?""",,,1.Erro
2050: 72 20 43 61 73 65 73 2c 50 6b 65 79 73 20 74 6f r Cases,Pkeys to
2060: 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a o many args,,,::
2070: 74 6c 73 3a 3a 70 6b 65 79 73 20 74 6f 6f 20 6d tls::pkeys too m
2080: 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e any args,,,"wron
2090: 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 g # args: should
20a0: 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 70 6b 65 be ""::tls::pke
20b0: 79 73 20 3f 6e 61 6d 65 3f 22 22 22 2c 2c 2c 31 ys ?name?""",,,1
20c0: 0a 45 72 72 6f 72 20 43 61 73 65 73 2c 50 72 6f .Error Cases,Pro
20d0: 74 6f 63 6f 6c 73 20 74 6f 6f 20 6d 61 6e 79 20 tocols too many
20e0: 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 70 72 args,,,::tls::pr
20f0: 6f 74 6f 63 6f 6c 73 20 74 6f 6f 20 6d 61 6e 79 otocols too many
2100: 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 args,,,"wrong #
2110: 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 args: should be
2120: 20 22 22 3a 3a 74 6c 73 3a 3a 70 72 6f 74 6f 63 ""::tls::protoc
2130: 6f 6c 73 22 22 22 2c 2c 2c 31 0a 45 72 72 6f 72 ols""",,,1.Error
2140: 20 43 61 73 65 73 2c 56 65 72 73 69 6f 6e 20 74 Cases,Version t
2150: 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a oo many args,,,:
2160: 3a 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 20 74 6f :tls::version to
2170: 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 o many args,,,"w
2180: 72 6f 6e 67 20 23 20 61 72 67 73 3a 20 73 68 6f rong # args: sho
2190: 75 6c 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a uld be ""::tls::
21a0: 76 65 72 73 69 6f 6e 22 22 22 2c 2c 2c 31 0a 2c version""",,,1.,
21b0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e ,,,,,,,,,.comman
21c0: 64 2c 23 20 50 72 6f 76 69 64 65 72 20 63 6f 6d d,# Provider com
21d0: 6d 61 6e 64 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 50 72 mand,,,,,,,,,.Pr
21e0: 6f 76 69 64 65 72 2c 50 72 6f 76 69 64 65 72 20 ovider,Provider
21f0: 74 6f 6f 20 66 65 77 20 61 72 67 73 2c 6e 65 77 too few args,new
2200: 5f 61 70 69 2c 2c 3a 3a 74 6c 73 3a 3a 70 72 6f _api,,::tls::pro
2210: 76 69 64 65 72 2c 2c 2c 22 77 72 6f 6e 67 20 23 vider,,,"wrong #
2220: 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 args: should be
2230: 20 22 22 3a 3a 74 6c 73 3a 3a 70 72 6f 76 69 64 ""::tls::provid
2240: 65 72 20 6e 61 6d 65 22 22 22 2c 2c 2c 31 0a 50 er name""",,,1.P
2250: 72 6f 76 69 64 65 72 2c 50 72 6f 76 69 64 65 72 rovider,Provider
2260: 20 74 6f 6f 20 66 65 77 20 61 72 67 73 2c 6e 65 too few args,ne
2270: 77 5f 61 70 69 2c 2c 3a 3a 74 6c 73 3a 3a 70 72 w_api,,::tls::pr
2280: 6f 76 69 64 65 72 20 74 6f 6f 20 6d 61 6e 79 20 ovider too many
2290: 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 args,,,"wrong #
22a0: 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 args: should be
22b0: 22 22 3a 3a 74 6c 73 3a 3a 70 72 6f 76 69 64 65 ""::tls::provide
22c0: 72 20 6e 61 6d 65 22 22 22 2c 2c 2c 31 0a 50 72 r name""",,,1.Pr
22d0: 6f 76 69 64 65 72 2c 50 72 6f 76 69 64 65 72 20 ovider,Provider
22e0: 69 6e 76 61 6c 69 64 20 61 72 67 2c 6e 65 77 5f invalid arg,new_
22f0: 61 70 69 2c 2c 3a 3a 74 6c 73 3a 3a 70 72 6f 76 api,,::tls::prov
2300: 69 64 65 72 20 69 6e 76 61 6c 69 64 2c 2c 2c 63 ider invalid,,,c
2310: 6f 75 6c 64 20 6e 6f 74 20 6c 6f 61 64 20 74 68 ould not load th
2320: 65 20 73 68 61 72 65 64 20 6c 69 62 72 61 72 79 e shared library
2330: 2c 2c 2c 31 0a 50 72 6f 76 69 64 65 72 2c 50 72 ,,,1.Provider,Pr
2340: 6f 76 69 64 65 72 20 6c 65 67 61 63 79 20 70 72 ovider legacy pr
2350: 6f 76 69 64 65 72 2c 6e 65 77 5f 61 70 69 2c 2c ovider,new_api,,
2360: 3a 3a 74 6c 73 3a 3a 70 72 6f 76 69 64 65 72 20 ::tls::provider
2370: 6c 65 67 61 63 79 2c 2c 2c 2c 2c 2c 0a legacy,,,,,,.