disable-ssl-testarchive/debian/0.82-1

Gbp-Pq: Name disable-ssl-test.patch

1 files changed, 0 insertions, 30 deletions

diff --git a/tests/ssl.test b/tests/ssl.test
index b01069d..a8f04a2 100644
--- a/tests/ssl.test
+++ b/tests/ssl.test
@@ -56,34 +56,4 @@ test ssl-1.2 {puts/gets} {
 	}
 } {a g a i n}
 
-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