# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1608826625 -10800
# Node ID 2d371452658cb7754a0c0ec9ecf55bc0ec348fb3
# Parent  7b80c8e0479a498a86c76b7be80a835522696b6d
Tests: fixed serving binary OCSP responses on win32.

diff --git a/ssl_ocsp.t b/ssl_ocsp.t
--- a/ssl_ocsp.t
+++ b/ssl_ocsp.t
@@ -528,6 +528,8 @@ sub http_daemon {
 			$resp = 'ec-resp';
 		}
 
+		next unless -s "$d/$resp.der";
+
 		# ocsp dummy handler
 
 		select undef, undef, undef, 0.02;
@@ -539,8 +541,14 @@ Content-Type: application/ocsp-response
 
 EOF
 
-		print $client $headers . $t->read_file("$resp.der")
-			if -e "$d/$resp.der";
+		local $/;
+		open my $fh, '<', "$d/$resp.der"
+			or die "Can't open $resp.der: $!";
+		binmode $fh;
+		my $content = <$fh>;
+		close $fh;
+
+		print $client $headers . $content;
 	}
 }
 
diff --git a/ssl_stapling.t b/ssl_stapling.t
--- a/ssl_stapling.t
+++ b/ssl_stapling.t
@@ -399,7 +399,14 @@ Content-Type: application/ocsp-response
 
 EOF
 
-		print $client $headers . $t->read_file("$resp.der");
+		local $/;
+		open my $fh, '<', "$d/$resp.der"
+			or die "Can't open $resp.der: $!";
+		binmode $fh;
+		my $content = <$fh>;
+		close $fh;
+
+		print $client $headers . $content;
 	}
 }