From 3305f43276c67ff1d2a079aed747e58f2e6be5d8 Mon Sep 17 00:00:00 2001
From: Andrej Shadura <andrew.shadura@collabora.co.uk>
Date: Fri, 9 Jun 2023 14:46:20 +0200
Subject: Actually drop tests that talk to external resources

---
 debian/patches/disable-ssl-test.patch | 39 ++++++++++++++++++++++++++++++-----
 1 file 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
-- 
cgit v1.2.3