diff options
-rw-r--r-- | debian/patches/disable-ssl-test.patch | 39 |
1 files changed, 34 insertions, 5 deletions
diff --git a/debian/patches/disable-ssl-test.patch b/debian/patches/disable-ssl-test.patch index 50726e1..c513259 100644 --- a/debian/patches/disable-ssl-test.patch +++ b/debian/patches/disable-ssl-test.patch @@ -1,8 +1,37 @@ --- a/tests/ssl.test +++ b/tests/ssl.test -@@ -86,4 +86,4 @@ - set buf [$c read] - } -returnCodes error -match glob -result {error:*} +@@ -56,34 +56,4 @@ test ssl-1.2 {puts/gets} { + } + } {a g a i n} --testreport -+#testreport +-test ssl-2.1 {https to google.com, gets} -body { +- set c [[socket stream www.google.com:443] ssl] +- $c puts -nonewline "GET / HTTP/1.0\r\n\r\n" +- $c flush +- set lines {} +- while {[$c gets buf] >= 0} { +- lappend lines $buf +- } +- $c close +- join $lines \n +-} -match glob -result {HTTP/1.0 200 OK*</html>} +- +-test ssl-2.2 {https to google.com, read with cert verify} -body { +- # Note that in order to verify the cert, we need sni +- set c [[socket stream www.google.com:443] ssl -sni www.google.com] +- # Verify the cert (note that this does not check CN) +- $c verify +- $c puts -nonewline "GET / HTTP/1.0\r\n\r\n" +- $c flush +- set buf [$c read] +-} -match glob -result {HTTP/1.0 200 OK*</html>} +- +-test ssl-2.3 {ssl to google.com on port 80} -body { +- # Try to talk SSL to a non-SSL server +- set c [[socket stream www.google.com:80] ssl] +- $c puts -nonewline "GET / HTTP/1.0\r\n\r\n" +- $c flush +- set buf [$c read] +-} -returnCodes error -match glob -result {error:*} +- + testreport |