add test for bug #73037

diff --git a/ext/soap/tests/bug73037.phpt b/ext/soap/tests/bug73037.phpt
new file mode 100644 (file)
index 0000000..e68f621
--- /dev/null
+++ b/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==