add test for bug #73037

ext/soap/tests/bug73037.phpt

@@ -0,0 +1,180 @@
+--TEST--
+Bug #73037 SoapServer reports Bad Request when gzipped, var 0
+--SKIPIF--
+<?php 
+	require_once('skipif.inc');
+	if (!extension_loaded("zlib")) {
+		echo "skip zlib is required for this test";
+	}
+
+	if (!file_exists(dirname(__FILE__) . "/../../../sapi/cli/tests/php_cli_server.inc")) {
+		echo "skip sapi/cli/tests/php_cli_server.inc required but not found";
+	}
+?>
+--FILE--
+<?php
+
+include dirname(__FILE__) . "/../../../sapi/cli/tests/php_cli_server.inc";
+
+function get_data($max)
+{
+	$piece = "<CD>
+		<TITLE>Empire Burlesque</TITLE>
+		<ARTIST>Bob Dylan</ARTIST>
+		<COUNTRY>USA</COUNTRY>
+		<COMPANY>Columbia</COMPANY>
+		<PRICE>10.90</PRICE>
+		<YEAR>1985</YEAR>
+	</CD>";
+
+	$begin = '<?xml version="1.0" encoding="UTF-8"?><soapenv:Envelope xmlns:soapenv="http://www.w3.org/2003/05/soap-envelope" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"><soapenv:Body><CATALOG>';
+	$end = '</CATALOG></soapenv:Body></soapenv:Envelope>';
+
+	$min = strlen($begin) + strlen($piece) + strlen($end);
+	$max = $max < $min ? $min : $max;
+
+	$data = $begin;
+	$data .= $piece;
+	while (strlen($data) + strlen($end) < $max) {
+		/* Randomize a bit, taking gzip in account. */
+		$tmp = str_replace(
+			array(
+				"Empire Burlesque",
+				"Bob Dylan",
+			),
+			array(
+				md5(uniqid()),
+				sha1(uniqid()),
+			),
+			$piece
+		);
+
+		if (strlen($begin) + strlen($tmp) + strlen($end) > $max) {
+			break;
+		}
+
+		$data .= $tmp;
+	}
+	$data .= $end;
+
+	return $data;
+}
+
+$router = "bug73037_server.php";
+$args = substr(PHP_OS, 0, 3) == 'WIN' ? "-d extension_dir=" . ini_get("extension_dir") . " -d extension=php_soap.dll" : "";
+$code = <<<'PHP'
+$s = new SoapServer(NULL, array('uri' => 'http://here'));
+$s->setObject(new stdclass());
+$s->handle();
+PHP;
+
+php_cli_server_start($code, $router, $args);
+
+foreach (array(1024-1, 1024*8-3, 1024*9+1, 1024*16-1, 1024*32-5, 1024*64+3, 1024*128-7) as $k => $i) {
+	echo "Iteration $k\n\n";
+
+	/* with and without compression */
+	foreach (array(false, true) as $b) {
+		$data = get_data($i);
+		if ($b) {
+			$data = gzencode($data);
+		}
+		$len = strlen($data);
+
+		//echo "len=$len\n";
+
+		$hdrs = <<<HDRS
+POST /bug73037_server.php HTTP/1.1
+Content-Type: application/soap+xml; charset=UTF-8
+Accept: application/soap+xml, application/dime, multipart/related, text/*
+SOAPAction: "urn:adressen#adressen#SetAda"
+Expect: 100-continue
+Content-Length: ${len}
+HDRS;
+		if ($b) {
+			$hdrs .="\nContent-Encoding: gzip";		
+		}
+		//echo "Headers sent:\n$hdrs\n\n";
+		$fp = fsockopen(PHP_CLI_SERVER_HOSTNAME, PHP_CLI_SERVER_PORT, $errno, $errstr, 5);
+		if (!$fp) {
+		  die("connect failed");
+		}
+
+		if(fwrite($fp, "$hdrs\n\n$data")) {
+			$out = "";
+			while (!feof($fp)) {
+				$out .= fread($fp, 1024);
+			}
+
+			$pos = strpos($out, "<env:Text>");
+			if (false === $pos) {
+				echo $out;
+				goto cleanup;
+			}
+			$pos0 = $pos + strlen("<env:Text>");
+			$pos = strpos($out, "</env:Text>");
+			if (false === $pos) {
+				echo $out;
+				goto cleanup;
+			}
+			$len = $pos - $pos0;
+			echo substr($out, $pos0, $len);
+		}
+
+cleanup:
+		fclose($fp);
+
+		echo "\n\n";
+		}
+}
+
+?>
+==DONE==
+--CLEAN--
+<?php
+unlink(dirname(__FILE__) . DIRECTORY_SEPARATOR . "bug73037_server.php");
+?>
+--EXPECT--
+Iteration 0
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 1
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 2
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 3
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 4
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 5
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+Iteration 6
+
+Function 'CATALOG' doesn't exist
+
+Function 'CATALOG' doesn't exist
+
+==DONE==