timeout on stdin
[m6w6/ext-http] / tests / helper / pipeline.inc
index b7175c109fac1b24d4f4a31e000e08cda288ae4d..a6b16999c373b3835396edd44f17e5e4428e554f 100644 (file)
@@ -10,17 +10,24 @@ function respond($client, $msg) {
 }
 
 serve(function($client) {
+       $R = array(STDIN); $W = $E = array();
+       if (!stream_select($R, $W, $E, 10, 0)) {
+               logger("Client %d timed out", (int) $client);
+               return;
+       }
        $count = trim(fgets(STDIN));
-       
+       logger("Expecting %d messages from client %d", $count, (int) $client);
        /* the peek message */
        respond($client, new http\Message($client, false));
-       
+       logger("Handled the peek request of client %d", (int) $client);
        /* pipelined messages */
        $req = array();
        for ($i=0; $i < $count; ++ $i) {
                $req[] = new http\Message($client, false);
+               logger("Read request no. %d from client %d", $i+1, (int) $client);
        }
-       foreach ($req as $msg) {
+       foreach ($req as $i => $msg) {
                respond($client, $msg);
+               logger("Sent response no. %d to client %d", $i+1, (int) $client);
        }
 });