aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xtests/httpserver.pl15
1 files changed, 13 insertions, 2 deletions
diff --git a/tests/httpserver.pl b/tests/httpserver.pl
index 64d9d2100..9e473f3c9 100755
--- a/tests/httpserver.pl
+++ b/tests/httpserver.pl
@@ -66,7 +66,6 @@ for ( $waitedpid = 0;
my @headers;
- stdin:
while(<STDIN>) {
if($_ =~ /([A-Z]*) (.*) HTTP\/1.(\d)/) {
$request=$1;
@@ -96,6 +95,12 @@ for ( $waitedpid = 0;
if($request =~ /^(POST|PUT)$/) {
$left=$cl;
}
+ elsif($request =~ /^CONNECT$/) {
+ if($verbose) {
+ print STDERR "We're emulating a SSL proxy!\n";
+ }
+ $left = -1;
+ }
else {
$left = -1; # force abort
}
@@ -105,7 +110,13 @@ for ( $waitedpid = 0;
}
}
- if($path =~ /verifiedserver/) {
+ if($request =~ /^CONNECT$/) {
+ # ssl proxy mode
+ print "HTTP/1.1 400 WE CANNOT ROOL NOW\r\n",
+ "Server: bahoooba\r\n\r\n";
+ exit;
+ }
+ elsif($path =~ /verifiedserver/) {
# this is a hard-coded query-string for the test script
# to verify that this is the server actually running!
print "HTTP/1.1 999 WE ROOLZ\r\n";