Merge branch 'R_2_5'
[m6w6/ext-http] / tests / helper / server.inc
index c522c63f473df6a2cdfe1f9662b7d356cd2f2232..091ff5cd483834d5c88d7e6304b42270bad9fe91 100644 (file)
@@ -4,6 +4,9 @@ ini_set("log_errors", true);
 ini_set("error_log", __DIR__."/server.log");
 
 function logger() {
+       if (!ini_get("date.timezone")) {
+               date_default_timezone_set(@date_default_timezone_get());
+       }
        error_log(sprintf("%s(%s): %s", 
                basename(getenv("SCRIPT_FILENAME"), ".php"), 
                basename(current(get_included_files()), ".inc"), 
@@ -21,6 +24,18 @@ if ($php) {
        define("PHP_BIN", PHP_BINDIR.DIRECTORY_SEPARATOR."php");
 }
 
+foreach (array("raphf", "propro", "http") as $ext) {
+       if (!extension_loaded($ext)) {
+               switch (PHP_SHLIB_SUFFIX) {
+                       case "dll":
+                               dl("php_$ext.dll"); 
+                               break;
+                       default:
+                               dl($ext .".". PHP_SHLIB_SUFFIX);
+               }
+       }
+}
+
 function serve($cb) {
        /* stream_socket_server() automatically sets SO_REUSEADDR, 
         * which is, well, bad if the tests are run in parallel
@@ -33,7 +48,7 @@ function serve($cb) {
                        logger("serve: Using port %d", $port);
                        do {
                                $R = array($server); $W = array(); $E = array();
-                               $select = stream_select($R, $E, $E, 0, 10000);
+                               $select = stream_select($R, $E, $E, 10, 0);
                                if ($select && ($client = stream_socket_accept($server, 1))) {
                                        logger("serve: Accept client %d", (int) $client);
                                        if (getenv("PHP_HTTP_TEST_SSL")) {
@@ -46,7 +61,7 @@ function serve($cb) {
                                                }
                                                logger("serve: EOF on client %d", (int) $client);
                                        } catch (Exception $ex) {
-                                               logger("serve: Exception on client %d", (int) $client);
+                                               logger("serve: Exception on client %d: %s", (int) $client, $ex->getMessage());
                                                /* ignore disconnect */
                                                if ($ex->getMessage() !== "Empty message received from stream") {
                                                        fprintf(STDERR, "%s\n", $ex);
@@ -54,7 +69,7 @@ function serve($cb) {
                                                break;
                                        }
                                }
-                       } while ($select !== false);
+                       } while ($select);
                        return;
                }
        }