tls-debug 0.4.7 → 0.4.8

raw patch · 3 files changed

+7/−7 lines, 3 filesnew-uploader

Files

• src/SimpleClient.hs +3/−3
• src/SimpleServer.hs +3/−3
• tls-debug.cabal +1/−1

@@ -119,7 +119,7 @@                 | Tls11 `elem` flags = TLS11                 | Ssl3  `elem` flags = SSL3                 | Tls10 `elem` flags = TLS10-                | otherwise          = TLS12+                | otherwise          = TLS13             supportedVers                 | NoVersionDowngrade `elem` flags = [tlsConnectVer]                 | otherwise = filter (<= tlsConnectVer) allVers@@ -183,8 +183,8 @@     , Option []     ["user-agent"] (ReqArg UserAgent "user-agent") "use a user agent"     , Option []     ["tls10"]   (NoArg Tls10) "use TLS 1.0"     , Option []     ["tls11"]   (NoArg Tls11) "use TLS 1.1"-    , Option []     ["tls12"]   (NoArg Tls12) "use TLS 1.2 (default)"-    , Option []     ["tls13"]   (NoArg Tls13) "use TLS 1.3"+    , Option []     ["tls12"]   (NoArg Tls12) "use TLS 1.2"+    , Option []     ["tls13"]   (NoArg Tls13) "use TLS 1.3 (default)"     , Option []     ["bogocipher"] (ReqArg BogusCipher "cipher-id") "add a bogus cipher id for testing"     , Option ['x']  ["no-version-downgrade"] (NoArg NoVersionDowngrade) "do not allow version downgrade"     , Option []     ["uri"]     (ReqArg Uri "URI") "optional URI requested by default /"

@@ -115,7 +115,7 @@                 | Tls11 `elem` flags = TLS11                 | Ssl3  `elem` flags = SSL3                 | Tls10 `elem` flags = TLS10-                | otherwise          = TLS12+                | otherwise          = TLS13             supportedVers                 | NoVersionDowngrade `elem` flags = [tlsConnectVer]                 | otherwise = filter (<= tlsConnectVer) allVers@@ -173,8 +173,8 @@     , Option []     ["ssl3"]    (NoArg Ssl3) "use SSL 3.0"     , Option []     ["tls10"]   (NoArg Tls10) "use TLS 1.0"     , Option []     ["tls11"]   (NoArg Tls11) "use TLS 1.1"-    , Option []     ["tls12"]   (NoArg Tls12) "use TLS 1.2 (default)"-    , Option []     ["tls13"]   (NoArg Tls13) "use TLS 1.3"+    , Option []     ["tls12"]   (NoArg Tls12) "use TLS 1.2"+    , Option []     ["tls13"]   (NoArg Tls13) "use TLS 1.3 (default)"     , Option []     ["bogocipher"] (ReqArg BogusCipher "cipher-id") "add a bogus cipher id for testing"     , Option ['x']  ["no-version-downgrade"] (NoArg NoVersionDowngrade) "do not allow version downgrade"     , Option []     ["allow-renegotiation"] (NoArg AllowRenegotiation) "allow client-initiated renegotiation"

@@ -1,5 +1,5 @@ Name:                tls-debug-Version:             0.4.7+Version:             0.4.8 Description:    A set of program to test and debug various aspect of the TLS package.    .