Tests: fixed serving binary OCSP responses on win32.
diff --git a/ssl_ocsp.t b/ssl_ocsp.t
index e4b45b5..629c1e3 100644
--- a/ssl_ocsp.t
+++ b/ssl_ocsp.t
@@ -528,6 +528,8 @@
$resp = 'ec-resp';
}
+ next unless -s "$d/$resp.der";
+
# ocsp dummy handler
select undef, undef, undef, 0.02;
@@ -539,8 +541,14 @@
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
index d5b8ff3..d5f2a61 100644
--- a/ssl_stapling.t
+++ b/ssl_stapling.t
@@ -399,7 +399,14 @@
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;
}
}
