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 7d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c path)}",,,,,,,,,
0160: 0a 63 6f 6d 6d 61 6e 64 2c 2c 2c 2c 2c 2c 2c 2c .command,,,,,,,,
0170: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 43 6f 6e ,,.command,# Con
0180: 73 74 72 61 69 6e 74 73 2c 2c 2c 2c 2c 2c 2c 2c straints,,,,,,,,
0190: 2c 0a 63 6f 6d 6d 61 6e 64 2c 73 65 74 20 70 72 ,.command,set pr
01a0: 6f 74 6f 63 6f 6c 73 20 5b 6c 69 73 74 20 73 73 otocols [list ss
01b0: 6c 32 20 73 73 6c 33 20 74 6c 73 31 20 74 6c 73 l2 ssl3 tls1 tls
01c0: 31 2e 31 20 74 6c 73 31 2e 32 20 74 6c 73 31 2e 1.1 tls1.2 tls1.
01d0: 33 5d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 3],,,,,,,,,.comm
01e0: 61 6e 64 2c 66 6f 72 65 61 63 68 20 70 72 6f 74 and,foreach prot
01f0: 6f 63 6f 6c 20 24 70 72 6f 74 6f 63 6f 6c 73 20 ocol $protocols
0200: 7b 3a 3a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 {::tcltest::test
0210: 43 6f 6e 73 74 72 61 69 6e 74 20 24 70 72 6f 74 Constraint $prot
0220: 6f 63 6f 6c 20 30 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c ocol 0},,,,,,,,,
0230: 0a 63 6f 6d 6d 61 6e 64 2c 66 6f 72 65 61 63 68 .command,foreach
0240: 20 70 72 6f 74 6f 63 6f 6c 20 5b 3a 3a 74 6c 73 protocol [::tls
0250: 3a 3a 70 72 6f 74 6f 63 6f 6c 73 5d 20 7b 3a 3a ::protocols] {::
0260: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 43 6f 6e tcltest::testCon
0270: 73 74 72 61 69 6e 74 20 24 70 72 6f 74 6f 63 6f straint $protoco
0280: 6c 20 31 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f l 1},,,,,,,,,.co
0290: 6d 6d 61 6e 64 2c 22 3a 3a 74 63 6c 74 65 73 74 mmand,"::tcltest
02a0: 3a 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 ::testConstraint
02b0: 20 4f 70 65 6e 53 53 4c 20 5b 73 74 72 69 6e 67 OpenSSL [string
02c0: 20 6d 61 74 63 68 20 22 22 4f 70 65 6e 53 53 4c match ""OpenSSL
02d0: 2a 22 22 20 5b 3a 3a 74 6c 73 3a 3a 76 65 72 73 *"" [::tls::vers
02e0: 69 6f 6e 5d 5d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a ion]]",,,,,,,,,.
02f0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
0300: 6e 64 2c 23 20 48 65 6c 70 65 72 20 66 75 6e 63 nd,# Helper func
0310: 74 69 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 tions,,,,,,,,,.c
0320: 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 6c 63 6f ommand,"proc lco
0330: 6d 70 61 72 65 20 7b 6c 69 73 74 31 20 6c 69 73 mpare {list1 lis
0340: 74 32 7d 20 7b 0a 20 20 20 20 73 65 74 20 6d 20 t2} {. set m
0350: 22 22 22 22 0a 20 20 20 20 73 65 74 20 75 20 22 """". set u "
0360: 22 22 22 0a 20 20 20 20 66 6f 72 65 61 63 68 20 """. foreach
0370: 69 20 24 6c 69 73 74 31 20 7b 0a 20 20 20 20 20 i $list1 {.
0380: 20 20 20 69 66 20 7b 24 69 20 6e 69 20 24 6c 69 if {$i ni $li
0390: 73 74 32 7d 20 7b 0a 20 20 20 20 20 20 20 20 20 st2} {.
03a0: 20 20 20 6c 61 70 70 65 6e 64 20 6d 20 24 69 0a lappend m $i.
03b0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a }. }.
03c0: 20 20 20 20 66 6f 72 65 61 63 68 20 69 20 24 6c foreach i $l
03d0: 69 73 74 32 20 7b 0a 20 20 20 20 20 20 20 20 69 ist2 {. i
03e0: 66 20 7b 24 69 20 6e 69 20 24 6c 69 73 74 31 7d f {$i ni $list1}
03f0: 20 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 6c {. l
0400: 61 70 70 65 6e 64 20 75 20 24 69 0a 20 20 20 20 append u $i.
0410: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 }. }.
0420: 72 65 74 75 72 6e 20 5b 6c 69 73 74 20 22 22 6d return [list ""m
0430: 69 73 73 69 6e 67 22 22 20 24 6d 20 22 22 75 6e issing"" $m ""un
0440: 65 78 70 65 63 74 65 64 22 22 20 24 75 5d 0a 7d expected"" $u].}
0450: 0a 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .",,,,,,,,,.comm
0460: 61 6e 64 2c 70 72 6f 63 20 65 78 65 63 5f 67 65 and,proc exec_ge
0470: 74 20 7b 64 65 6c 69 6d 20 61 72 67 73 7d 20 7b t {delim args} {
0480: 72 65 74 75 72 6e 20 5b 73 70 6c 69 74 20 5b 65 return [split [e
0490: 78 65 63 20 6f 70 65 6e 73 73 6c 20 7b 2a 7d 24 xec openssl {*}$
04a0: 61 72 67 73 5d 20 24 64 65 6c 69 6d 5d 7d 2c 2c args] $delim]},,
04b0: 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c ,,,,,,,.,,,,,,,,
04c0: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 ,,.command,# Tes
04d0: 74 20 70 72 6f 74 6f 63 6f 6c 73 2c 2c 2c 2c 2c t protocols,,,,,
04e0: 2c 2c 2c 2c 0a 50 72 6f 74 6f 63 6f 6c 73 2c 41 ,,,,.Protocols,A
04f0: 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 24 70 ll,,,lcompare $p
0500: 72 6f 74 6f 63 6f 6c 73 20 5b 3a 3a 74 6c 73 3a rotocols [::tls:
0510: 3a 70 72 6f 74 6f 63 6f 6c 73 5d 2c 2c 2c 6d 69 :protocols],,,mi
0520: 73 73 69 6e 67 20 7b 73 73 6c 32 20 73 73 6c 33 ssing {ssl2 ssl3
0530: 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c } unexpected {},
0540: 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f ,,.,,,,,,,,,,.co
0550: 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 63 69 70 mmand,# Test cip
0560: 68 65 72 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 hers,,,,,,,,,.Ci
0570: 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f phers By Protoco
0580: 6c 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 6c 63 l,SSL2,ssl2,,"lc
0590: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 ompare [exec_get
05a0: 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d "":"" ciphers -
05b0: 73 73 6c 32 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 ssl2] [::tls::ci
05c0: 70 68 65 72 73 20 73 73 6c 32 5d 22 2c 2c 2c 6d phers ssl2]",,,m
05d0: 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 issing {} unexpe
05e0: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 cted {},,,.Ciphe
05f0: 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 53 rs By Protocol,S
0600: 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 SL3,ssl3,,"lcomp
0610: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
0620: 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c :"" ciphers -ssl
0630: 33 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 3] [::tls::ciphe
0640: 72 73 20 73 73 6c 33 5d 22 2c 2c 2c 6d 69 73 73 rs ssl3]",,,miss
0650: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 ing {} unexpecte
0660: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 d {},,,.Ciphers
0670: 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 By Protocol,TLS1
0680: 2e 30 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 .0,tls1,,"lcompa
0690: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a re [exec_get "":
06a0: 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 "" ciphers -tls1
06b0: 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 ] [::tls::cipher
06c0: 73 20 74 6c 73 31 5d 22 2c 2c 2c 6d 69 73 73 69 s tls1]",,,missi
06d0: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 ng {} unexpected
06e0: 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 42 {},,,.Ciphers B
06f0: 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 2e y Protocol,TLS1.
0700: 31 2c 74 6c 73 31 2e 31 2c 2c 22 6c 63 6f 6d 70 1,tls1.1,,"lcomp
0710: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
0720: 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 :"" ciphers -tls
0730: 31 5f 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 1_1] [::tls::cip
0740: 68 65 72 73 20 74 6c 73 31 2e 31 5d 22 2c 2c 2c hers tls1.1]",,,
0750: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
0760: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 ected {},,,.Ciph
0770: 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c ers By Protocol,
0780: 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c 22 TLS1.2,tls1.2,,"
0790: 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 lcompare [exec_g
07a0: 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 et "":"" ciphers
07b0: 20 2d 74 6c 73 31 5f 32 5d 20 5b 3a 3a 74 6c 73 -tls1_2] [::tls
07c0: 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e 32 ::ciphers tls1.2
07d0: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]",,,missing {}
07e0: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
07f0: 0a 43 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 .Ciphers By Prot
0800: 6f 63 6f 6c 2c 54 4c 53 31 2e 33 2c 74 6c 73 31 ocol,TLS1.3,tls1
0810: 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 .3,,"lcompare [e
0820: 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 xec_get "":"" ci
0830: 70 68 65 72 73 20 2d 74 6c 73 31 5f 33 5d 20 5b phers -tls1_3] [
0840: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 ::tls::ciphers t
0850: 6c 73 31 2e 33 5d 22 2c 2c 2c 6d 69 73 73 69 6e ls1.3]",,,missin
0860: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 g {} unexpected
0870: 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c {},,,.,,,,,,,,,,
0880: 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 .command,# Test
0890: 63 69 70 68 65 72 20 64 65 73 63 72 69 70 74 69 cipher descripti
08a0: 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 ons,,,,,,,,,.Cip
08b0: 68 65 72 73 20 57 69 74 68 20 44 65 73 63 72 69 hers With Descri
08c0: 70 74 69 6f 6e 73 2c 53 53 4c 32 2c 73 73 6c 32 ptions,SSL2,ssl2
08d0: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 ,,"lcompare [exe
08e0: 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 c_get ""\r\n"" c
08f0: 69 70 68 65 72 73 20 2d 73 73 6c 32 20 2d 76 5d iphers -ssl2 -v]
0900: 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 [split [string
0910: 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 trim [::tls::cip
0920: 68 65 72 73 20 73 73 6c 32 20 31 5d 5d 20 5c 6e hers ssl2 1]] \n
0930: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]",,,missing {}
0940: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
0950: 0a 43 69 70 68 65 72 73 20 57 69 74 68 20 44 65 .Ciphers With De
0960: 73 63 72 69 70 74 69 6f 6e 73 2c 53 53 4c 33 2c scriptions,SSL3,
0970: 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 ssl3,,"lcompare
0980: 5b 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e [exec_get ""\r\n
0990: 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c 33 "" ciphers -ssl3
09a0: 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 -v] [split [str
09b0: 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a ing trim [::tls:
09c0: 3a 63 69 70 68 65 72 73 20 73 73 6c 33 20 31 5d :ciphers ssl3 1]
09d0: 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 ] \n]",,,missing
09e0: 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b {} unexpected {
09f0: 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 },,,.Ciphers Wit
0a00: 68 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 h Descriptions,T
0a10: 4c 53 31 2e 30 2c 74 6c 73 31 2c 2c 22 6c 63 6f LS1.0,tls1,,"lco
0a20: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 mpare [exec_get
0a30: 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 73 ""\r\n"" ciphers
0a40: 20 2d 74 6c 73 31 20 2d 76 5d 20 5b 73 70 6c 69 -tls1 -v] [spli
0a50: 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 5b t [string trim [
0a60: 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 ::tls::ciphers t
0a70: 6c 73 31 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d ls1 1]] \n]",,,m
0a80: 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 issing {} unexpe
0a90: 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 cted {},,,.Ciphe
0aa0: 72 73 20 57 69 74 68 20 44 65 73 63 72 69 70 74 rs With Descript
0ab0: 69 6f 6e 73 2c 54 4c 53 31 2e 31 2c 74 6c 73 31 ions,TLS1.1,tls1
0ac0: 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 .1,,"lcompare [e
0ad0: 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 xec_get ""\r\n""
0ae0: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 ciphers -tls1_1
0af0: 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 -v] [split [str
0b00: 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a ing trim [::tls:
0b10: 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e 31 20 :ciphers tls1.1
0b20: 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 1]] \n]",,,missi
0b30: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 ng {} unexpected
0b40: 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 {},,,.Ciphers W
0b50: 69 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e 73 ith Descriptions
0b60: 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c ,TLS1.2,tls1.2,,
0b70: 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f "lcompare [exec_
0b80: 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 get ""\r\n"" cip
0b90: 68 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d 76 5d hers -tls1_2 -v]
0ba0: 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 [split [string
0bb0: 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 trim [::tls::cip
0bc0: 68 65 72 73 20 74 6c 73 31 2e 32 20 31 5d 5d 20 hers tls1.2 1]]
0bd0: 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b \n]",,,missing {
0be0: 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c } unexpected {},
0bf0: 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68 20 ,,.Ciphers With
0c00: 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c 53 Descriptions,TLS
0c10: 31 2e 33 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 1.3,tls1.3,,"lco
0c20: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 mpare [exec_get
0c30: 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 73 ""\r\n"" ciphers
0c40: 20 2d 74 6c 73 31 5f 33 20 2d 76 5d 20 5b 73 70 -tls1_3 -v] [sp
0c50: 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d lit [string trim
0c60: 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 [::tls::ciphers
0c70: 20 74 6c 73 31 2e 33 20 31 5d 5d 20 5c 6e 5d 22 tls1.3 1]] \n]"
0c80: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e ,,,missing {} un
0c90: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c expected {},,,.,
0ca0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e ,,,,,,,,,.comman
0cb0: 64 2c 23 20 54 65 73 74 20 70 72 6f 74 6f 63 6f d,# Test protoco
0cc0: 6c 20 73 70 65 63 69 66 69 63 20 63 69 70 68 65 l specific ciphe
0cd0: 72 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 rs,,,,,,,,,.Ciph
0ce0: 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 ers Protocol Spe
0cf0: 63 69 66 69 63 2c 53 53 4c 32 2c 73 73 6c 32 2c cific,SSL2,ssl2,
0d00: 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 ,"lcompare [exec
0d10: 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 _get "":"" ciphe
0d20: 72 73 20 2d 73 73 6c 32 20 2d 73 5d 20 5b 3a 3a rs -ssl2 -s] [::
0d30: 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 73 6c tls::ciphers ssl
0d40: 32 20 30 20 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 2 0 1]",,,missin
0d50: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 g {} unexpected
0d60: 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 50 72 {},,,.Ciphers Pr
0d70: 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66 69 63 2c otocol Specific,
0d80: 53 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d SSL3,ssl3,,"lcom
0d90: 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 pare [exec_get "
0da0: 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 ":"" ciphers -ss
0db0: 6c 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 l3 -s] [::tls::c
0dc0: 69 70 68 65 72 73 20 73 73 6c 33 20 30 20 31 5d iphers ssl3 0 1]
0dd0: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 ",,,missing {} u
0de0: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
0df0: 43 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c Ciphers Protocol
0e00: 20 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 30 Specific,TLS1.0
0e10: 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 ,tls1,,"lcompare
0e20: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 [exec_get "":""
0e30: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 20 2d ciphers -tls1 -
0e40: 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 s] [::tls::ciphe
0e50: 72 73 20 74 6c 73 31 20 30 20 31 5d 22 2c 2c 2c rs tls1 0 1]",,,
0e60: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
0e70: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 ected {},,,.Ciph
0e80: 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 65 ers Protocol Spe
0e90: 63 69 66 69 63 2c 54 4c 53 31 2e 31 2c 74 6c 73 cific,TLS1.1,tls
0ea0: 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 1.1,,"lcompare [
0eb0: 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 exec_get "":"" c
0ec0: 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 2d iphers -tls1_1 -
0ed0: 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 s] [::tls::ciphe
0ee0: 72 73 20 74 6c 73 31 2e 31 20 30 20 31 5d 22 2c rs tls1.1 0 1]",
0ef0: 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 ,,missing {} une
0f00: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 xpected {},,,.Ci
0f10: 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 phers Protocol S
0f20: 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 32 2c 74 pecific,TLS1.2,t
0f30: 6c 73 31 2e 32 2c 2c 22 6c 63 6f 6d 70 61 72 65 ls1.2,,"lcompare
0f40: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 [exec_get "":""
0f50: 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 ciphers -tls1_2
0f60: 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 -s] [::tls::cip
0f70: 68 65 72 73 20 74 6c 73 31 2e 32 20 30 20 31 5d hers tls1.2 0 1]
0f80: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 ",,,missing {} u
0f90: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
0fa0: 43 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c Ciphers Protocol
0fb0: 20 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 33 Specific,TLS1.3
0fc0: 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61 ,tls1.3,,"lcompa
0fd0: 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a re [exec_get "":
0fe0: 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 "" ciphers -tls1
0ff0: 5f 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 _3 -s] [::tls::c
1000: 69 70 68 65 72 73 20 74 6c 73 31 2e 33 20 30 20 iphers tls1.3 0
1010: 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 1]",,,missing {}
1020: 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c unexpected {},,
1030: 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d ,.,,,,,,,,,,.com
1040: 6d 61 6e 64 2c 23 20 54 65 73 74 20 76 65 72 73 mand,# Test vers
1050: 69 6f 6e 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 56 65 72 ion,,,,,,,,,.Ver
1060: 73 69 6f 6e 2c 41 6c 6c 2c 2c 2c 3a 3a 74 6c 73 sion,All,,,::tls
1070: 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c 6f 62 2c ::version,,glob,
1080: 2a 2c 2c 2c 0a 56 65 72 73 69 6f 6e 2c 4f 70 65 *,,,.Version,Ope
1090: 6e 53 53 4c 2c 4f 70 65 6e 53 53 4c 2c 2c 3a 3a nSSL,OpenSSL,,::
10a0: 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c tls::version,,gl
10b0: 6f 62 2c 4f 70 65 6e 53 53 4c 2a 2c 2c 2c 0a ob,OpenSSL*,,,.