moriyoshi               Sun Jul 13 04:03:46 2003 EDT

  Added files:                 
    /php-src/ext/standard/tests/file    proc_open01.phpt 
  Log:
  Added regression test for proc_open()
  
  

Index: php-src/ext/standard/tests/file/proc_open01.phpt
+++ php-src/ext/standard/tests/file/proc_open01.phpt
--TEST--
proc_open() regression test 1 (proc_open() leak)
--FILE--
<?php
$pipes = array(1, 2, 3);
$orig_pipes = $pipes;
$proc = proc_open(
        $_ENV['TEST_PHP_EXECUTABLE'],
        array(0 => array('pipe', 'r'), 1 => array('pipe', 'w')),
        $pipes
);
if ($proc === false) {
        print "something went wrong.\n";
}
var_dump($pipes);
stream_set_blocking($pipes[1], FALSE);
$test_string = "yay!\n";
fwrite($pipes[0], $test_string);
fflush($pipes[0]);
fclose($pipes[0]);
$cnt = '';
for ($left = strlen($test_string); $left > 0;) { 
        $read_fds = array($pipes[1]);
        $retval = stream_select($read_fds, $write_fds = NULL, $exp_fds = NULL, 1);
        if ($retval === false) {
                print "select() failed\n";
                break;
        }
        if ($retval === 0) {
                print "timed out\n";
                break;
        }
        $buf = fread($pipes[1], 1024);
        $cnt .= $buf;
        $left -= strlen($buf);
}
var_dump($cnt);
fclose($pipes[1]);
proc_close($proc);
var_dump($orig_pipes);
?>
--EXPECTF--
array(2) {
  [0]=>
  resource(%d) of type (stream)
  [1]=>
  resource(%d) of type (stream)
}
string(5) "yay!
"
array(3) {
  [0]=>
  int(1)
  [1]=>
  int(2)
  [2]=>
  int(3)
}



-- 
PHP CVS Mailing List (http://www.php.net/)
To unsubscribe, visit: http://www.php.net/unsub.php

Reply via email to