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 63 6f 6d 6d 6f 6e 2e 74 63 6c 2c 2c rce common.tcl,,
01a0: 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c ,,,,,,,.,,,,,,,,
01b0: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 48 65 6c ,,.command,# Hel
01c0: 70 65 72 20 66 75 6e 63 74 69 6f 6e 73 2c 2c 2c per functions,,,
01d0: 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 22 ,,,,,,.command,"
01e0: 70 72 6f 63 20 6c 63 6f 6d 70 61 72 65 20 7b 6c proc lcompare {l
01f0: 69 73 74 31 20 6c 69 73 74 32 7d 20 7b 73 65 74 ist1 list2} {set
0200: 20 6d 20 22 22 22 22 3b 73 65 74 20 75 20 22 22 m """";set u ""
0210: 22 22 3b 66 6f 72 65 61 63 68 20 69 20 24 6c 69 "";foreach i $li
0220: 73 74 31 20 7b 69 66 20 7b 24 69 20 6e 69 20 24 st1 {if {$i ni $
0230: 6c 69 73 74 32 7d 20 7b 6c 61 70 70 65 6e 64 20 list2} {lappend
0240: 6d 20 24 69 7d 7d 3b 66 6f 72 65 61 63 68 20 69 m $i}};foreach i
0250: 20 24 6c 69 73 74 32 20 7b 69 66 20 7b 24 69 20 $list2 {if {$i
0260: 6e 69 20 24 6c 69 73 74 31 7d 20 7b 6c 61 70 70 ni $list1} {lapp
0270: 65 6e 64 20 75 20 24 69 7d 7d 3b 72 65 74 75 72 end u $i}};retur
0280: 6e 20 5b 6c 69 73 74 20 22 22 6d 69 73 73 69 6e n [list ""missin
0290: 67 22 22 20 24 6d 20 22 22 75 6e 65 78 70 65 63 g"" $m ""unexpec
02a0: 74 65 64 22 22 20 24 75 5d 7d 22 2c 2c 2c 2c 2c ted"" $u]}",,,,,
02b0: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 70 72 6f ,,,,.command,pro
02c0: 63 20 65 78 65 63 5f 67 65 74 20 7b 64 65 6c 69 c exec_get {deli
02d0: 6d 20 61 72 67 73 7d 20 7b 72 65 74 75 72 6e 20 m args} {return
02e0: 5b 73 70 6c 69 74 20 5b 65 78 65 63 20 6f 70 65 [split [exec ope
02f0: 6e 73 73 6c 20 7b 2a 7d 24 61 72 67 73 5d 20 24 nssl {*}$args] $
0300: 64 65 6c 69 6d 5d 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c delim]},,,,,,,,,
0310: 0a 63 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 65 .command,"proc e
0320: 78 65 63 5f 67 65 74 5f 63 69 70 68 65 72 73 20 xec_get_ciphers
0330: 7b 7d 20 7b 73 65 74 20 6c 69 73 74 20 5b 6c 69 {} {set list [li
0340: 73 74 5d 3b 73 65 74 20 64 61 74 61 20 5b 65 78 st];set data [ex
0350: 65 63 20 6f 70 65 6e 73 73 6c 20 6c 69 73 74 20 ec openssl list
0360: 2d 63 69 70 68 65 72 2d 61 6c 67 6f 72 69 74 68 -cipher-algorith
0370: 6d 73 5d 3b 66 6f 72 65 61 63 68 20 6c 69 6e 65 ms];foreach line
0380: 20 5b 73 70 6c 69 74 20 24 64 61 74 61 20 22 22 [split $data ""
0390: 5c 6e 22 22 5d 20 7b 66 6f 72 65 61 63 68 20 7b \n""] {foreach {
03a0: 63 69 70 68 65 72 20 6e 75 6c 6c 20 61 6c 69 61 cipher null alia
03b0: 73 7d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e s} [split [strin
03c0: 67 20 74 72 69 6d 20 24 6c 69 6e 65 5d 5d 20 7b g trim $line]] {
03d0: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 5b 73 74 lappend list [st
03e0: 72 69 6e 67 20 74 6f 6c 6f 77 65 72 20 24 63 69 ring tolower $ci
03f0: 70 68 65 72 5d 7d 7d 3b 72 65 74 75 72 6e 20 5b pher]}};return [
0400: 6c 73 6f 72 74 20 2d 75 6e 69 71 75 65 20 24 6c lsort -unique $l
0410: 69 73 74 5d 7d 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a ist]}",,,,,,,,,.
0420: 63 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 20 65 78 command,"proc ex
0430: 65 63 5f 67 65 74 5f 64 69 67 65 73 74 73 20 7b ec_get_digests {
0440: 7d 20 7b 73 65 74 20 6c 69 73 74 20 5b 6c 69 73 } {set list [lis
0450: 74 5d 3b 73 65 74 20 64 61 74 61 20 5b 65 78 65 t];set data [exe
0460: 63 20 6f 70 65 6e 73 73 6c 20 64 67 73 74 20 2d c openssl dgst -
0470: 6c 69 73 74 5d 3b 66 6f 72 65 61 63 68 20 6c 69 list];foreach li
0480: 6e 65 20 5b 73 70 6c 69 74 20 24 64 61 74 61 20 ne [split $data
0490: 22 22 5c 6e 22 22 5d 20 7b 66 6f 72 65 61 63 68 ""\n""] {foreach
04a0: 20 64 69 67 65 73 74 20 24 6c 69 6e 65 20 7b 69 digest $line {i
04b0: 66 20 7b 5b 73 74 72 69 6e 67 20 6d 61 74 63 68 f {[string match
04c0: 20 22 22 2d 2a 22 22 20 24 64 69 67 65 73 74 5d ""-*"" $digest]
04d0: 7d 20 7b 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 } {lappend list
04e0: 5b 73 74 72 69 6e 67 20 74 72 69 6d 6c 65 66 74 [string trimleft
04f0: 20 24 64 69 67 65 73 74 20 22 22 2d 22 22 5d 7d $digest ""-""]}
0500: 7d 7d 3b 72 65 74 75 72 6e 20 5b 6c 73 6f 72 74 }};return [lsort
0510: 20 24 6c 69 73 74 5d 7d 22 2c 2c 2c 2c 2c 2c 2c $list]}",,,,,,,
0520: 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 22 70 72 6f 63 ,,.command,"proc
0530: 20 65 78 65 63 5f 67 65 74 5f 70 6b 65 79 73 20 exec_get_pkeys
0540: 7b 7d 20 7b 73 65 74 20 6c 69 73 74 20 5b 6c 69 {} {set list [li
0550: 73 74 5d 3b 73 65 74 20 64 61 74 61 20 5b 65 78 st];set data [ex
0560: 65 63 20 6f 70 65 6e 73 73 6c 20 6c 69 73 74 20 ec openssl list
0570: 2d 70 75 62 6c 69 63 2d 6b 65 79 2d 6d 65 74 68 -public-key-meth
0580: 6f 64 73 5d 3b 66 6f 72 65 61 63 68 20 6c 69 6e ods];foreach lin
0590: 65 20 5b 73 70 6c 69 74 20 24 64 61 74 61 20 22 e [split $data "
05a0: 22 5c 6e 22 22 5d 20 7b 69 66 20 7b 21 5b 73 74 "\n""] {if {![st
05b0: 72 69 6e 67 20 6d 61 74 63 68 20 22 22 2a 54 79 ring match ""*Ty
05c0: 70 65 3a 2a 22 22 20 24 6c 69 6e 65 5d 7d 20 7b pe:*"" $line]} {
05d0: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 5b 73 74 lappend list [st
05e0: 72 69 6e 67 20 74 72 69 6d 20 24 6c 69 6e 65 5d ring trim $line]
05f0: 7d 7d 3b 72 65 74 75 72 6e 20 24 6c 69 73 74 7d }};return $list}
0600: 22 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ",,,,,,,,,.comma
0610: 6e 64 2c 70 72 6f 63 20 65 78 65 63 5f 67 65 74 nd,proc exec_get
0620: 5f 6d 61 63 73 20 7b 7d 20 7b 72 65 74 75 72 6e _macs {} {return
0630: 20 5b 6c 69 73 74 20 63 6d 61 63 20 68 6d 61 63 [list cmac hmac
0640: 5d 7d 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d ]},,,,,,,,,.comm
0650: 61 6e 64 2c 70 72 6f 63 20 6c 69 73 74 5f 74 6f and,proc list_to
0660: 6c 6f 77 65 72 20 7b 6c 69 73 74 7d 20 7b 73 65 lower {list} {se
0670: 74 20 72 65 73 75 6c 74 20 5b 6c 69 73 74 5d 3b t result [list];
0680: 66 6f 72 65 61 63 68 20 65 6c 65 6d 65 6e 74 20 foreach element
0690: 24 6c 69 73 74 20 7b 6c 61 70 70 65 6e 64 20 72 $list {lappend r
06a0: 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 74 6f esult [string to
06b0: 6c 6f 77 65 72 20 24 65 6c 65 6d 65 6e 74 5d 7d lower $element]}
06c0: 3b 72 65 74 75 72 6e 20 24 72 65 73 75 6c 74 7d ;return $result}
06d0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c ,,,,,,,,,.,,,,,,
06e0: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 ,,,,.command,# T
06f0: 65 73 74 20 6c 69 73 74 20 63 69 70 68 65 72 73 est list ciphers
0700: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 68 65 72 ,,,,,,,,,.Cipher
0710: 73 20 4c 69 73 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f s List,All,,,lco
0720: 6d 70 61 72 65 20 5b 6c 73 6f 72 74 20 5b 65 78 mpare [lsort [ex
0730: 65 63 5f 67 65 74 5f 63 69 70 68 65 72 73 5d 5d ec_get_ciphers]]
0740: 20 5b 6c 69 73 74 5f 74 6f 6c 6f 77 65 72 20 5b [list_tolower [
0750: 6c 73 6f 72 74 20 5b 3a 3a 74 6c 73 3a 3a 63 69 lsort [::tls::ci
0760: 70 68 65 72 73 5d 5d 5d 2c 2c 2c 6d 69 73 73 69 phers]]],,,missi
0770: 6e 67 20 7b 72 63 35 20 72 63 35 2d 63 62 63 20 ng {rc5 rc5-cbc
0780: 72 63 35 2d 63 66 62 20 72 63 35 2d 65 63 62 20 rc5-cfb rc5-ecb
0790: 72 63 35 2d 6f 66 62 7d 20 75 6e 65 78 70 65 63 rc5-ofb} unexpec
07a0: 74 65 64 20 7b 61 65 73 2d 31 32 38 2d 63 63 6d ted {aes-128-ccm
07b0: 20 61 65 73 2d 31 32 38 2d 67 63 6d 20 61 65 73 aes-128-gcm aes
07c0: 2d 31 39 32 2d 63 63 6d 20 61 65 73 2d 31 39 32 -192-ccm aes-192
07d0: 2d 67 63 6d 20 61 65 73 2d 32 35 36 2d 63 63 6d -gcm aes-256-ccm
07e0: 20 61 65 73 2d 32 35 36 2d 67 63 6d 7d 2c 2c 2c aes-256-gcm},,,
07f0: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .,,,,,,,,,,.comm
0800: 61 6e 64 2c 23 20 54 65 73 74 20 6c 69 73 74 20 and,# Test list
0810: 63 69 70 68 65 72 73 20 66 6f 72 20 70 72 6f 74 ciphers for prot
0820: 6f 63 6f 6c 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 ocols,,,,,,,,,.C
0830: 69 70 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63 iphers By Protoc
0840: 6f 6c 2c 53 53 4c 32 2c 73 73 6c 32 2c 2c 22 6c ol,SSL2,ssl2,,"l
0850: 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 compare [exec_ge
0860: 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 t "":"" ciphers
0870: 2d 73 73 6c 32 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 -ssl2] [::tls::c
0880: 69 70 68 65 72 73 20 73 73 6c 32 5d 22 2c 2c 2c iphers ssl2]",,,
0890: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
08a0: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 ected {},,,.Ciph
08b0: 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c ers By Protocol,
08c0: 53 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d SSL3,ssl3,,"lcom
08d0: 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 pare [exec_get "
08e0: 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 ":"" ciphers -ss
08f0: 6c 33 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 l3] [::tls::ciph
0900: 65 72 73 20 73 73 6c 33 5d 22 2c 2c 2c 6d 69 73 ers ssl3]",,,mis
0910: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 sing {} unexpect
0920: 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 ed {},,,.Ciphers
0930: 20 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 By Protocol,TLS
0940: 31 2e 30 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 1.0,tls1,,"lcomp
0950: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
0960: 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 :"" ciphers -tls
0970: 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 1] [::tls::ciphe
0980: 72 73 20 74 6c 73 31 5d 22 2c 2c 2c 6d 69 73 73 rs tls1]",,,miss
0990: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 ing {} unexpecte
09a0: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 d {},,,.Ciphers
09b0: 42 79 20 50 72 6f 74 6f 63 6f 6c 2c 54 4c 53 31 By Protocol,TLS1
09c0: 2e 31 2c 74 6c 73 31 2e 31 2c 2c 22 6c 63 6f 6d .1,tls1.1,,"lcom
09d0: 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 pare [exec_get "
09e0: 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c ":"" ciphers -tl
09f0: 73 31 5f 31 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 s1_1] [::tls::ci
0a00: 70 68 65 72 73 20 74 6c 73 31 2e 31 5d 22 2c 2c phers tls1.1]",,
0a10: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 ,missing {} unex
0a20: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 pected {},,,.Cip
0a30: 68 65 72 73 20 42 79 20 50 72 6f 74 6f 63 6f 6c hers By Protocol
0a40: 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c 2c ,TLS1.2,tls1.2,,
0a50: 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f "lcompare [exec_
0a60: 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 65 72 get "":"" cipher
0a70: 73 20 2d 74 6c 73 31 5f 32 5d 20 5b 3a 3a 74 6c s -tls1_2] [::tl
0a80: 73 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e s::ciphers tls1.
0a90: 32 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 2]",,,missing {}
0aa0: 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c unexpected {},,
0ab0: 2c 0a 43 69 70 68 65 72 73 20 42 79 20 50 72 6f ,.Ciphers By Pro
0ac0: 74 6f 63 6f 6c 2c 54 4c 53 31 2e 33 2c 74 6c 73 tocol,TLS1.3,tls
0ad0: 31 2e 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 1.3,,"lcompare [
0ae0: 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 63 exec_get "":"" c
0af0: 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 33 5d 20 iphers -tls1_3]
0b00: 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 [::tls::ciphers
0b10: 74 6c 73 31 2e 33 5d 22 2c 2c 2c 6d 69 73 73 69 tls1.3]",,,missi
0b20: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 ng {} unexpected
0b30: 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c {},,,.,,,,,,,,,
0b40: 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 ,.command,# Test
0b50: 20 63 69 70 68 65 72 20 64 65 73 63 72 69 70 74 cipher descript
0b60: 69 6f 6e 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 ions,,,,,,,,,.Ci
0b70: 70 68 65 72 73 20 57 69 74 68 20 44 65 73 63 72 phers With Descr
0b80: 69 70 74 69 6f 6e 73 2c 53 53 4c 32 2c 73 73 6c iptions,SSL2,ssl
0b90: 32 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 2,,"lcompare [ex
0ba0: 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 ec_get ""\r\n""
0bb0: 63 69 70 68 65 72 73 20 2d 73 73 6c 32 20 2d 76 ciphers -ssl2 -v
0bc0: 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 ] [split [string
0bd0: 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 trim [::tls::ci
0be0: 70 68 65 72 73 20 73 73 6c 32 20 31 5d 5d 20 5c phers ssl2 1]] \
0bf0: 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d n]",,,missing {}
0c00: 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c unexpected {},,
0c10: 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68 20 44 ,.Ciphers With D
0c20: 65 73 63 72 69 70 74 69 6f 6e 73 2c 53 53 4c 33 escriptions,SSL3
0c30: 2c 73 73 6c 33 2c 2c 22 6c 63 6f 6d 70 61 72 65 ,ssl3,,"lcompare
0c40: 20 5b 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c [exec_get ""\r\
0c50: 6e 22 22 20 63 69 70 68 65 72 73 20 2d 73 73 6c n"" ciphers -ssl
0c60: 33 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 3 -v] [split [st
0c70: 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 ring trim [::tls
0c80: 3a 3a 63 69 70 68 65 72 73 20 73 73 6c 33 20 31 ::ciphers ssl3 1
0c90: 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e ]] \n]",,,missin
0ca0: 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 g {} unexpected
0cb0: 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 {},,,.Ciphers Wi
0cc0: 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c th Descriptions,
0cd0: 54 4c 53 31 2e 30 2c 74 6c 73 31 2c 2c 22 6c 63 TLS1.0,tls1,,"lc
0ce0: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 ompare [exec_get
0cf0: 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 ""\r\n"" cipher
0d00: 73 20 2d 74 6c 73 31 20 2d 76 5d 20 5b 73 70 6c s -tls1 -v] [spl
0d10: 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d 20 it [string trim
0d20: 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 [::tls::ciphers
0d30: 74 6c 73 31 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c tls1 1]] \n]",,,
0d40: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
0d50: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 ected {},,,.Ciph
0d60: 65 72 73 20 57 69 74 68 20 44 65 73 63 72 69 70 ers With Descrip
0d70: 74 69 6f 6e 73 2c 54 4c 53 31 2e 31 2c 74 6c 73 tions,TLS1.1,tls
0d80: 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 1.1,,"lcompare [
0d90: 65 78 65 63 5f 67 65 74 20 22 22 5c 72 5c 6e 22 exec_get ""\r\n"
0da0: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f " ciphers -tls1_
0db0: 31 20 2d 76 5d 20 5b 73 70 6c 69 74 20 5b 73 74 1 -v] [split [st
0dc0: 72 69 6e 67 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 ring trim [::tls
0dd0: 3a 3a 63 69 70 68 65 72 73 20 74 6c 73 31 2e 31 ::ciphers tls1.1
0de0: 20 31 5d 5d 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 1]] \n]",,,miss
0df0: 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 ing {} unexpecte
0e00: 64 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 d {},,,.Ciphers
0e10: 57 69 74 68 20 44 65 73 63 72 69 70 74 69 6f 6e With Description
0e20: 73 2c 54 4c 53 31 2e 32 2c 74 6c 73 31 2e 32 2c s,TLS1.2,tls1.2,
0e30: 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 63 ,"lcompare [exec
0e40: 5f 67 65 74 20 22 22 5c 72 5c 6e 22 22 20 63 69 _get ""\r\n"" ci
0e50: 70 68 65 72 73 20 2d 74 6c 73 31 5f 32 20 2d 76 phers -tls1_2 -v
0e60: 5d 20 5b 73 70 6c 69 74 20 5b 73 74 72 69 6e 67 ] [split [string
0e70: 20 74 72 69 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 trim [::tls::ci
0e80: 70 68 65 72 73 20 74 6c 73 31 2e 32 20 31 5d 5d phers tls1.2 1]]
0e90: 20 5c 6e 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 \n]",,,missing
0ea0: 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d {} unexpected {}
0eb0: 2c 2c 2c 0a 43 69 70 68 65 72 73 20 57 69 74 68 ,,,.Ciphers With
0ec0: 20 44 65 73 63 72 69 70 74 69 6f 6e 73 2c 54 4c Descriptions,TL
0ed0: 53 31 2e 33 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 S1.3,tls1.3,,"lc
0ee0: 6f 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 ompare [exec_get
0ef0: 20 22 22 5c 72 5c 6e 22 22 20 63 69 70 68 65 72 ""\r\n"" cipher
0f00: 73 20 2d 74 6c 73 31 5f 33 20 2d 76 5d 20 5b 73 s -tls1_3 -v] [s
0f10: 70 6c 69 74 20 5b 73 74 72 69 6e 67 20 74 72 69 plit [string tri
0f20: 6d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 m [::tls::cipher
0f30: 73 20 74 6c 73 31 2e 33 20 31 5d 5d 20 5c 6e 5d s tls1.3 1]] \n]
0f40: 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 ",,,missing {} u
0f50: 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a nexpected {},,,.
0f60: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
0f70: 6e 64 2c 23 20 54 65 73 74 20 70 72 6f 74 6f 63 nd,# Test protoc
0f80: 6f 6c 20 73 70 65 63 69 66 69 63 20 63 69 70 68 ol specific ciph
0f90: 65 72 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 ers,,,,,,,,,.Cip
0fa0: 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 hers Protocol Sp
0fb0: 65 63 69 66 69 63 2c 53 53 4c 32 2c 73 73 6c 32 ecific,SSL2,ssl2
0fc0: 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 5b 65 78 65 ,,"lcompare [exe
0fd0: 63 5f 67 65 74 20 22 22 3a 22 22 20 63 69 70 68 c_get "":"" ciph
0fe0: 65 72 73 20 2d 73 73 6c 32 20 2d 73 5d 20 5b 3a ers -ssl2 -s] [:
0ff0: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 73 73 :tls::ciphers ss
1000: 6c 32 20 30 20 31 5d 22 2c 2c 2c 6d 69 73 73 69 l2 0 1]",,,missi
1010: 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 65 64 ng {} unexpected
1020: 20 7b 7d 2c 2c 2c 0a 43 69 70 68 65 72 73 20 50 {},,,.Ciphers P
1030: 72 6f 74 6f 63 6f 6c 20 53 70 65 63 69 66 69 63 rotocol Specific
1040: 2c 53 53 4c 33 2c 73 73 6c 33 2c 2c 22 6c 63 6f ,SSL3,ssl3,,"lco
1050: 6d 70 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 mpare [exec_get
1060: 22 22 3a 22 22 20 63 69 70 68 65 72 73 20 2d 73 "":"" ciphers -s
1070: 73 6c 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a sl3 -s] [::tls::
1080: 63 69 70 68 65 72 73 20 73 73 6c 33 20 30 20 31 ciphers ssl3 0 1
1090: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]",,,missing {}
10a0: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
10b0: 0a 43 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f .Ciphers Protoco
10c0: 6c 20 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e l Specific,TLS1.
10d0: 30 2c 74 6c 73 31 2c 2c 22 6c 63 6f 6d 70 61 72 0,tls1,,"lcompar
10e0: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 e [exec_get "":"
10f0: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 20 " ciphers -tls1
1100: 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 -s] [::tls::ciph
1110: 65 72 73 20 74 6c 73 31 20 30 20 31 5d 22 2c 2c ers tls1 0 1]",,
1120: 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 ,missing {} unex
1130: 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 69 70 pected {},,,.Cip
1140: 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 53 70 hers Protocol Sp
1150: 65 63 69 66 69 63 2c 54 4c 53 31 2e 31 2c 74 6c ecific,TLS1.1,tl
1160: 73 31 2e 31 2c 2c 22 6c 63 6f 6d 70 61 72 65 20 s1.1,,"lcompare
1170: 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 22 20 [exec_get "":""
1180: 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f 31 20 ciphers -tls1_1
1190: 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 70 68 -s] [::tls::ciph
11a0: 65 72 73 20 74 6c 73 31 2e 31 20 30 20 31 5d 22 ers tls1.1 0 1]"
11b0: 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e ,,,missing {} un
11c0: 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 43 expected {},,,.C
11d0: 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f 6c 20 iphers Protocol
11e0: 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e 32 2c Specific,TLS1.2,
11f0: 74 6c 73 31 2e 32 2c 2c 22 6c 63 6f 6d 70 61 72 tls1.2,,"lcompar
1200: 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 3a 22 e [exec_get "":"
1210: 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 31 5f " ciphers -tls1_
1220: 32 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 63 69 2 -s] [::tls::ci
1230: 70 68 65 72 73 20 74 6c 73 31 2e 32 20 30 20 31 phers tls1.2 0 1
1240: 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]",,,missing {}
1250: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
1260: 0a 43 69 70 68 65 72 73 20 50 72 6f 74 6f 63 6f .Ciphers Protoco
1270: 6c 20 53 70 65 63 69 66 69 63 2c 54 4c 53 31 2e l Specific,TLS1.
1280: 33 2c 74 6c 73 31 2e 33 2c 2c 22 6c 63 6f 6d 70 3,tls1.3,,"lcomp
1290: 61 72 65 20 5b 65 78 65 63 5f 67 65 74 20 22 22 are [exec_get ""
12a0: 3a 22 22 20 63 69 70 68 65 72 73 20 2d 74 6c 73 :"" ciphers -tls
12b0: 31 5f 33 20 2d 73 5d 20 5b 3a 3a 74 6c 73 3a 3a 1_3 -s] [::tls::
12c0: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 33 20 30 ciphers tls1.3 0
12d0: 20 31 5d 22 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 1]",,,missing {
12e0: 7d 20 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c } unexpected {},
12f0: 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f ,,.,,,,,,,,,,.co
1300: 6d 6d 61 6e 64 2c 23 20 43 69 70 68 65 72 73 20 mmand,# Ciphers
1310: 45 72 72 6f 72 20 43 61 73 65 73 2c 2c 2c 2c 2c Error Cases,,,,,
1320: 2c 2c 2c 2c 0a 43 69 70 68 65 72 73 20 45 72 72 ,,,,.Ciphers Err
1330: 6f 72 73 2c 54 6f 6f 20 6d 61 6e 79 20 61 72 67 ors,Too many arg
1340: 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 s,,,::tls::ciphe
1350: 72 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 rs too many args
1360: 20 74 6f 20 70 61 73 73 2c 2c 2c 22 77 72 6f 6e to pass,,,"wron
1370: 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 g # args: should
1380: 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 63 69 70 be ""::tls::cip
1390: 68 65 72 73 20 3f 70 72 6f 74 6f 63 6f 6c 3f 20 hers ?protocol?
13a0: 3f 76 65 72 62 6f 73 65 3f 20 3f 73 75 70 70 6f ?verbose? ?suppo
13b0: 72 74 65 64 3f 22 22 22 2c 2c 2c 31 0a 43 69 70 rted?""",,,1.Cip
13c0: 68 65 72 73 20 45 72 72 6f 72 73 2c 49 6e 76 61 hers Errors,Inva
13d0: 6c 69 64 20 70 72 6f 74 6f 63 6f 6c 2c 2c 2c 3a lid protocol,,,:
13e0: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 62 6f :tls::ciphers bo
13f0: 67 75 73 2c 2c 2c 22 62 61 64 20 70 72 6f 74 6f gus,,,"bad proto
1400: 63 6f 6c 20 22 22 62 6f 67 75 73 22 22 3a 20 6d col ""bogus"": m
1410: 75 73 74 20 62 65 20 73 73 6c 32 2c 20 73 73 6c ust be ssl2, ssl
1420: 33 2c 20 74 6c 73 31 2c 20 74 6c 73 31 2e 31 2c 3, tls1, tls1.1,
1430: 20 74 6c 73 31 2e 32 2c 20 6f 72 20 74 6c 73 31 tls1.2, or tls1
1440: 2e 33 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 .3",,,1.Ciphers
1450: 45 72 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20 76 Errors,Invalid v
1460: 65 72 62 6f 73 65 2c 2c 2c 3a 3a 74 6c 73 3a 3a erbose,,,::tls::
1470: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 33 20 62 ciphers tls1.3 b
1480: 6f 67 75 73 2c 2c 2c 22 65 78 70 65 63 74 65 64 ogus,,,"expected
1490: 20 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 20 62 boolean value b
14a0: 75 74 20 67 6f 74 20 22 22 62 6f 67 75 73 22 22 ut got ""bogus""
14b0: 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 ",,,1.Ciphers Er
14c0: 72 6f 72 73 2c 49 6e 76 61 6c 69 64 20 73 75 70 rors,Invalid sup
14d0: 70 6f 72 74 65 64 2c 2c 2c 3a 3a 74 6c 73 3a 3a ported,,,::tls::
14e0: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 33 20 31 ciphers tls1.3 1
14f0: 20 62 6f 67 75 73 2c 2c 2c 22 65 78 70 65 63 74 bogus,,,"expect
1500: 65 64 20 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 ed boolean value
1510: 20 62 75 74 20 67 6f 74 20 22 22 62 6f 67 75 73 but got ""bogus
1520: 22 22 22 2c 2c 2c 31 0a 43 69 70 68 65 72 73 20 """,,,1.Ciphers
1530: 45 72 72 6f 72 73 2c 53 53 4c 32 2c 21 73 73 6c Errors,SSL2,!ssl
1540: 32 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 2,,::tls::cipher
1550: 73 20 73 73 6c 32 2c 2c 2c 73 73 6c 32 3a 20 70 s ssl2,,,ssl2: p
1560: 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 rotocol not supp
1570: 6f 72 74 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 orted,,,1.Cipher
1580: 73 20 45 72 72 6f 72 73 2c 53 53 4c 33 2c 21 73 s Errors,SSL3,!s
1590: 73 6c 33 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 sl3,,::tls::ciph
15a0: 65 72 73 20 73 73 6c 33 2c 2c 2c 73 73 6c 33 3a ers ssl3,,,ssl3:
15b0: 20 70 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 protocol not su
15c0: 70 70 6f 72 74 65 64 2c 2c 2c 31 0a 43 69 70 68 pported,,,1.Ciph
15d0: 65 72 73 20 45 72 72 6f 72 73 2c 54 4c 53 31 2e ers Errors,TLS1.
15e0: 30 2c 21 74 6c 73 31 2c 2c 3a 3a 74 6c 73 3a 3a 0,!tls1,,::tls::
15f0: 63 69 70 68 65 72 73 20 74 6c 73 31 2c 2c 2c 74 ciphers tls1,,,t
1600: 6c 73 31 3a 20 70 72 6f 74 6f 63 6f 6c 20 6e 6f ls1: protocol no
1610: 74 20 73 75 70 70 6f 72 74 65 64 2c 2c 2c 31 0a t supported,,,1.
1620: 43 69 70 68 65 72 73 20 45 72 72 6f 72 73 2c 54 Ciphers Errors,T
1630: 4c 53 31 2e 31 2c 21 74 6c 73 31 2e 31 2c 2c 3a LS1.1,!tls1.1,,:
1640: 3a 74 6c 73 3a 3a 63 69 70 68 65 72 73 20 74 6c :tls::ciphers tl
1650: 73 31 2e 31 2c 2c 2c 74 6c 73 31 2e 30 3a 20 70 s1.1,,,tls1.0: p
1660: 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 73 75 70 70 rotocol not supp
1670: 6f 72 74 65 64 2c 2c 2c 31 0a 43 69 70 68 65 72 orted,,,1.Cipher
1680: 73 20 45 72 72 6f 72 73 2c 54 4c 53 31 2e 32 2c s Errors,TLS1.2,
1690: 21 74 6c 73 31 2e 32 2c 2c 3a 3a 74 6c 73 3a 3a !tls1.2,,::tls::
16a0: 63 69 70 68 65 72 73 20 74 6c 73 31 2e 32 2c 2c ciphers tls1.2,,
16b0: 2c 74 6c 73 31 2e 31 3a 20 70 72 6f 74 6f 63 6f ,tls1.1: protoco
16c0: 6c 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 2c l not supported,
16d0: 2c 2c 31 0a 43 69 70 68 65 72 73 20 45 72 72 6f ,,1.Ciphers Erro
16e0: 72 73 2c 54 4c 53 31 2e 33 2c 21 74 6c 73 31 2e rs,TLS1.3,!tls1.
16f0: 33 2c 2c 3a 3a 74 6c 73 3a 3a 63 69 70 68 65 72 3,,::tls::cipher
1700: 73 20 74 6c 73 31 2e 33 2c 2c 2c 74 6c 73 31 2e s tls1.3,,,tls1.
1710: 33 3a 20 70 72 6f 74 6f 63 6f 6c 20 6e 6f 74 20 3: protocol not
1720: 73 75 70 70 6f 72 74 65 64 2c 2c 2c 31 0a 2c 2c supported,,,1.,,
1730: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
1740: 2c 23 20 54 65 73 74 20 43 69 70 68 65 72 20 49 ,# Test Cipher I
1750: 6e 66 6f 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 43 69 70 nfo,,,,,,,,,.Cip
1760: 68 65 72 20 49 6e 66 6f 2c 41 45 53 2d 32 35 36 her Info,AES-256
1770: 2d 43 43 4d 2c 2c 2c 74 6c 73 3a 3a 63 69 70 68 -CCM,,,tls::ciph
1780: 65 72 20 61 65 73 2d 32 35 36 2d 63 63 6d 2c 2c er aes-256-ccm,,
1790: 2c 6e 69 64 20 61 65 73 2d 32 35 36 2d 63 63 6d ,nid aes-256-ccm
17a0: 20 6e 61 6d 65 20 69 64 2d 61 65 73 32 35 36 2d name id-aes256-
17b0: 43 43 4d 20 64 65 73 63 72 69 70 74 69 6f 6e 20 CCM description
17c0: 7b 7d 20 62 6c 6f 63 6b 5f 73 69 7a 65 20 31 20 {} block_size 1
17d0: 6b 65 79 5f 6c 65 6e 67 74 68 20 33 32 20 69 76 key_length 32 iv
17e0: 5f 6c 65 6e 67 74 68 20 31 32 20 74 79 70 65 20 _length 12 type
17f0: 61 65 73 2d 32 35 36 2d 63 63 6d 20 70 72 6f 76 aes-256-ccm prov
1800: 69 64 65 72 20 7b 7d 20 6d 6f 64 65 20 43 43 4d ider {} mode CCM
1810: 20 66 6c 61 67 73 20 7b 7b 56 61 72 69 61 62 6c flags {{Variabl
1820: 65 20 4c 65 6e 67 74 68 7d 20 30 20 7b 41 6c 77 e Length} 0 {Alw
1830: 61 79 73 20 43 61 6c 6c 20 49 6e 69 74 7d 20 31 ays Call Init} 1
1840: 20 7b 43 75 73 74 6f 6d 20 49 56 7d 20 31 20 7b {Custom IV} 1 {
1850: 43 6f 6e 74 72 6f 6c 20 49 6e 69 74 7d 20 31 20 Control Init} 1
1860: 7b 43 75 73 74 6f 6d 20 43 69 70 68 65 72 7d 20 {Custom Cipher}
1870: 31 20 7b 41 45 41 44 20 43 69 70 68 65 72 7d 20 1 {AEAD Cipher}
1880: 31 20 7b 43 75 73 74 6f 6d 20 43 6f 70 79 7d 20 1 {Custom Copy}
1890: 31 20 7b 4e 6f 6e 20 46 49 50 53 20 41 6c 6c 6f 1 {Non FIPS Allo
18a0: 77 7d 20 30 7d 20 74 61 67 5f 6c 65 6e 67 74 68 w} 0} tag_length
18b0: 20 31 36 20 61 61 64 5f 6c 65 6e 67 74 68 20 31 16 aad_length 1
18c0: 33 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 3,,,.,,,,,,,,,,.
18d0: 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 73 74 20 6c command,# Test l
18e0: 69 73 74 20 64 69 67 65 73 74 73 2c 2c 2c 2c 2c ist digests,,,,,
18f0: 2c 2c 2c 2c 0a 44 69 67 65 73 74 73 20 4c 69 73 ,,,,.Digests Lis
1900: 74 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 t,All,,,lcompare
1910: 20 5b 6c 73 6f 72 74 20 5b 65 78 65 63 5f 67 65 [lsort [exec_ge
1920: 74 5f 64 69 67 65 73 74 73 5d 5d 20 5b 6c 73 6f t_digests]] [lso
1930: 72 74 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 73 rt [tls::digests
1940: 5d 5d 2c 2c 2c 6d 69 73 73 69 6e 67 20 7b 7d 20 ]],,,missing {}
1950: 75 6e 65 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c unexpected {},,,
1960: 0a 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d .,,,,,,,,,,.comm
1970: 61 6e 64 2c 23 20 54 65 73 74 20 44 69 67 65 73 and,# Test Diges
1980: 74 20 49 6e 66 6f 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a t Info,,,,,,,,,.
1990: 44 69 67 65 73 74 20 49 6e 66 6f 2c 6d 64 35 2c Digest Info,md5,
19a0: 2c 2c 74 6c 73 3a 3a 64 69 67 65 73 74 73 20 6d ,,tls::digests m
19b0: 64 35 2c 2c 2c 6e 61 6d 65 20 4d 44 35 20 64 65 d5,,,name MD5 de
19c0: 73 63 72 69 70 74 69 6f 6e 20 7b 7d 20 73 69 7a scription {} siz
19d0: 65 20 31 36 20 62 6c 6f 63 6b 5f 73 69 7a 65 20 e 16 block_size
19e0: 36 34 20 70 72 6f 76 69 64 65 72 20 7b 7d 20 74 64 provider {} t
19f0: 79 70 65 20 6d 64 35 20 70 6b 65 79 5f 74 79 70 ype md5 pkey_typ
1a00: 65 20 6d 64 35 57 69 74 68 52 53 41 45 6e 63 72 e md5WithRSAEncr
1a10: 79 70 74 69 6f 6e 20 66 6c 61 67 73 20 7b 4f 6e yption flags {On
1a20: 65 2d 73 68 6f 74 20 30 20 58 4f 46 20 30 20 44 e-shot 0 XOF 0 D
1a30: 69 67 65 73 74 41 6c 67 6f 72 69 74 68 6d 49 64 igestAlgorithmId
1a40: 5f 4e 55 4c 4c 20 30 20 44 69 67 65 73 74 41 6c _NULL 0 DigestAl
1a50: 67 6f 72 69 74 68 6d 49 64 5f 41 62 73 63 65 6e gorithmId_Abscen
1a60: 74 20 30 20 44 69 67 65 73 74 41 6c 67 6f 72 69 t 0 DigestAlgori
1a70: 74 68 6d 49 64 5f 43 75 73 74 6f 6d 20 30 20 46 thmId_Custom 0 F
1a80: 49 50 53 20 30 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c IPS 0},,,.,,,,,,
1a90: 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 ,,,,.command,# T
1aa0: 65 73 74 20 6c 69 73 74 20 4d 41 43 73 2c 2c 2c est list MACs,,,
1ab0: 2c 2c 2c 2c 2c 2c 0a 4d 41 43 20 4c 69 73 74 2c ,,,,,,.MAC List,
1ac0: 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 5b All,,,lcompare [
1ad0: 65 78 65 63 5f 67 65 74 5f 6d 61 63 73 5d 20 5b exec_get_macs] [
1ae0: 74 6c 73 3a 3a 6d 61 63 73 5d 2c 2c 2c 6d 69 73 tls::macs],,,mis
1af0: 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 65 63 74 sing {} unexpect
1b00: 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c 2c 2c 2c ed {},,,.,,,,,,,
1b10: 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 20 54 65 ,,,.command,# Te
1b20: 73 74 20 6c 69 73 74 20 50 6b 65 79 73 2c 2c 2c st list Pkeys,,,
1b30: 2c 2c 2c 2c 2c 2c 0a 50 6b 65 79 20 4c 69 73 74 ,,,,,,.Pkey List
1b40: 2c 41 6c 6c 2c 2c 2c 6c 63 6f 6d 70 61 72 65 20 ,All,,,lcompare
1b50: 5b 65 78 65 63 5f 67 65 74 5f 70 6b 65 79 73 5d [exec_get_pkeys]
1b60: 20 5b 74 6c 73 3a 3a 70 6b 65 79 73 5d 2c 2c 2c [tls::pkeys],,,
1b70: 6d 69 73 73 69 6e 67 20 7b 7d 20 75 6e 65 78 70 missing {} unexp
1b80: 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c 2c 2c ected {},,,.,,,,
1b90: 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 2c 23 ,,,,,,.command,#
1ba0: 20 54 65 73 74 20 6c 69 73 74 20 70 72 6f 74 6f Test list proto
1bb0: 63 6f 6c 73 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 50 72 cols,,,,,,,,,.Pr
1bc0: 6f 74 6f 63 6f 6c 73 2c 41 6c 6c 2c 2c 2c 6c 63 otocols,All,,,lc
1bd0: 6f 6d 70 61 72 65 20 24 3a 3a 70 72 6f 74 6f 63 ompare $::protoc
1be0: 6f 6c 73 20 5b 3a 3a 74 6c 73 3a 3a 70 72 6f 74 ols [::tls::prot
1bf0: 6f 63 6f 6c 73 5d 2c 2c 2c 6d 69 73 73 69 6e 67 ocols],,,missing
1c00: 20 7b 73 73 6c 32 20 73 73 6c 33 7d 20 75 6e 65 {ssl2 ssl3} une
1c10: 78 70 65 63 74 65 64 20 7b 7d 2c 2c 2c 0a 2c 2c xpected {},,,.,,
1c20: 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 6e 64 ,,,,,,,,.command
1c30: 2c 23 20 54 65 73 74 20 73 68 6f 77 20 76 65 72 ,# Test show ver
1c40: 73 69 6f 6e 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 56 65 sion,,,,,,,,,.Ve
1c50: 72 73 69 6f 6e 2c 41 6c 6c 2c 2c 2c 3a 3a 74 6c rsion,All,,,::tl
1c60: 73 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 6c 6f 62 s::version,,glob
1c70: 2c 2a 2c 2c 2c 0a 56 65 72 73 69 6f 6e 2c 4f 70 ,*,,,.Version,Op
1c80: 65 6e 53 53 4c 2c 4f 70 65 6e 53 53 4c 2c 2c 3a enSSL,OpenSSL,,:
1c90: 3a 74 6c 73 3a 3a 76 65 72 73 69 6f 6e 2c 2c 67 :tls::version,,g
1ca0: 6c 6f 62 2c 4f 70 65 6e 53 53 4c 2a 2c 2c 2c 0a lob,OpenSSL*,,,.
1cb0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 63 6f 6d 6d 61 ,,,,,,,,,,.comma
1cc0: 6e 64 2c 23 20 45 72 72 6f 72 20 43 61 73 65 73 nd,# Error Cases
1cd0: 2c 2c 2c 2c 2c 2c 2c 2c 2c 0a 45 72 72 6f 72 20 ,,,,,,,,,.Error
1ce0: 43 61 73 65 73 2c 43 69 70 68 65 72 20 54 6f 6f Cases,Cipher Too
1cf0: 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 many args,,,::t
1d00: 6c 73 3a 3a 63 69 70 68 65 72 20 74 6f 6f 20 6d ls::cipher too m
1d10: 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e any args,,,"wron
1d20: 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 g # args: should
1d30: 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 63 69 70 be ""::tls::cip
1d40: 68 65 72 20 3f 6e 61 6d 65 3f 22 22 22 2c 2c 2c her ?name?""",,,
1d50: 31 0a 45 72 72 6f 72 20 43 61 73 65 73 2c 44 69 1.Error Cases,Di
1d60: 67 65 73 74 73 20 54 6f 6f 20 6d 61 6e 79 20 61 gests Too many a
1d70: 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a 3a 64 69 67 rgs,,,::tls::dig
1d80: 65 73 74 73 20 74 6f 6f 20 6d 61 6e 79 20 61 72 ests too many ar
1d90: 67 73 2c 2c 2c 22 77 72 6f 6e 67 20 23 20 61 72 gs,,,"wrong # ar
1da0: 67 73 3a 20 73 68 6f 75 6c 64 20 62 65 20 22 22 gs: should be ""
1db0: 3a 3a 74 6c 73 3a 3a 64 69 67 65 73 74 73 20 3f ::tls::digests ?
1dc0: 6e 61 6d 65 3f 22 22 22 2c 2c 2c 31 0a 45 72 72 name?""",,,1.Err
1dd0: 6f 72 20 43 61 73 65 73 2c 4d 41 43 73 20 54 6f or Cases,MACs To
1de0: 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a o many args,,,::
1df0: 74 6c 73 3a 3a 6d 61 63 73 20 74 6f 6f 20 6d 61 tls::macs too ma
1e00: 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e 67 ny args,,,"wrong
1e10: 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 20 # args: should
1e20: 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 6d 61 63 73 be ""::tls::macs
1e30: 20 3f 6e 61 6d 65 3f 22 22 22 2c 2c 2c 31 0a 45 ?name?""",,,1.E
1e40: 72 72 6f 72 20 43 61 73 65 73 2c 50 6b 65 79 73 rror Cases,Pkeys
1e50: 20 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c Too many args,,
1e60: 2c 3a 3a 74 6c 73 3a 3a 70 6b 65 79 73 20 74 6f ,::tls::pkeys to
1e70: 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 o many args,,,"w
1e80: 72 6f 6e 67 20 23 20 61 72 67 73 3a 20 73 68 6f rong # args: sho
1e90: 75 6c 64 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a uld be ""::tls::
1ea0: 70 6b 65 79 73 20 3f 6e 61 6d 65 3f 22 22 22 2c pkeys ?name?""",
1eb0: 2c 2c 31 0a 45 72 72 6f 72 20 43 61 73 65 73 2c ,,1.Error Cases,
1ec0: 50 72 6f 74 6f 63 6f 6c 73 20 54 6f 6f 20 6d 61 Protocols Too ma
1ed0: 6e 79 20 61 72 67 73 2c 2c 2c 3a 3a 74 6c 73 3a ny args,,,::tls:
1ee0: 3a 70 72 6f 74 6f 63 6f 6c 73 20 74 6f 6f 20 6d :protocols too m
1ef0: 61 6e 79 20 61 72 67 73 2c 2c 2c 22 77 72 6f 6e any args,,,"wron
1f00: 67 20 23 20 61 72 67 73 3a 20 73 68 6f 75 6c 64 g # args: should
1f10: 20 62 65 20 22 22 3a 3a 74 6c 73 3a 3a 70 72 6f be ""::tls::pro
1f20: 74 6f 63 6f 6c 73 22 22 22 2c 2c 2c 31 0a 45 72 tocols""",,,1.Er
1f30: 72 6f 72 20 43 61 73 65 73 2c 56 65 72 73 69 6f ror Cases,Versio
1f40: 6e 20 54 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c n Too many args,
1f50: 2c 2c 3a 3a 74 6c 73 3a 3a 76 65 72 73 69 6f 6e ,,::tls::version
1f60: 20 74 6f 6f 20 6d 61 6e 79 20 61 72 67 73 2c 2c too many args,,
1f70: 2c 22 77 72 6f 6e 67 20 23 20 61 72 67 73 3a 20 ,"wrong # args:
1f80: 73 68 6f 75 6c 64 20 62 65 20 22 22 3a 3a 74 6c should be ""::tl
1f90: 73 3a 3a 76 65 72 73 69 6f 6e 22 22 22 2c 2c 2c s::version""",,,
1fa0: 31 0a 1.