+----------------------------------------------------------------------+
*/
+/*
+ * TODO:
+ * - look for test-specific php.ini files
+ */
+
ob_implicit_flush();
define('TEST_PASSED', 0);
/*****************************************************************************/
-function usage() {
+function usage()
+{
writeln("Usage: run-tests.php [-d] [-h] [dir|file...]");
}
* This makes it easier to convert to HTML output later.
*/
-function write($str) {
+function write($str)
+{
global $term_bold, $term_norm;
$str = str_replace("%b", $term_bold, $str);
$str = str_replace("%B", $term_norm, $str);
print $str;
}
-function writeln($str) {
+function writeln($str)
+{
write("$str\n");
}
-function initialize() {
+function initialize()
+{
global $term, $windows_p, $php, $skip, $testdirs, $tmpfile,
- $skipped, $failed, $passed, $total, $term_bold, $term_norm,
- $tests_in_dir;
+ $skipped, $failed, $passed, $total, $term_bold, $term_norm,
+ $tests_in_dir;
// XXX Should support HTML output as well.
$term = getenv("TERM");
if (preg_match('/^(xterm|vt220)/', $term)) {
- $term_bold = sprintf("%c%c%c%c", 27, 91, 49, 109);
- $term_norm = sprintf("%c%c%c", 27, 91, 109);
+ $term_bold = sprintf("%c%c%c%c", 27, 91, 49, 109);
+ $term_norm = sprintf("%c%c%c", 27, 91, 109);
} elseif (preg_match('/^vt100/', $term)) {
- $term_bold = sprintf("%c%c%c%c", 27, 91, 49, 109);
- $term_norm = sprintf("%c%c%c", 27, 91, 109);
+ $term_bold = sprintf("%c%c%c%c", 27, 91, 49, 109);
+ $term_norm = sprintf("%c%c%c", 27, 91, 109);
} else {
- $term_bold = $term_norm = "";
+ $term_bold = $term_norm = "";
}
$windows_p = (substr(php_uname(), 0, 7) == "Windows");
if ($windows_p) {
- if (file_exists('Release_TS_inline/php.exe')) $php ="Release_TS_inline\\php.exe";
- elseif (file_exists('Release_TS/php.exe')) $php ="Release_TS\\php.exe";
- else $php = "./php.exe";
+ if (file_exists('Release_TS_inline/php.exe')) {
+ $php = 'Release_TS_inline\php.exe';
+ } elseif (file_exists('Release_TS/php.exe')) {
+ $php = 'Release_TS\php.exe';
+ } else {
+ $php = "./php.exe";
+ }
} else {
- $php = "./php";
+ $php = "./php";
}
if (!is_executable($php)) {
- writeln("PHP CGI binary ($php) not executable.");
- writeln("Please compile PHP as a CGI executable and try again.");
- exit;
+ writeln("PHP CGI binary ($php) not executable.");
+ writeln("Please compile PHP as a CGI executable and try again.");
+ exit;
}
$skip = array(
- "CVS" => 1
- );
+ "CVS" => 1
+ );
$testdirs = array();
$tmpfile = array();
$tests_in_dir = array();
$skipped = $failed = $passed = $total = 0;
}
-function &parse_options(&$argc, &$argv) {
+function &parse_options(&$argc, &$argv)
+{
$options = array();
while ($argc > 0 && ($opt = substr($argv[0], 0, 2)) == "--") {
- $opt = array_shift($argv);
- $argc--;
- if ($arg == "--") {
- return $options;
- }
- if (preg_match('/^--([^=]+)=(.*)$/', $opt, $matches)) {
- $opt = $matches[1];
- $arg = $matches[2];
- } else {
- $arg = true;
- }
- $options[$opt] = $arg;
+ $opt = array_shift($argv);
+ $argc--;
+ if ($arg == "--") {
+ return $options;
+ }
+ if (preg_match('/^--([^=]+)=(.*)$/', $opt, $matches)) {
+ $opt = $matches[1];
+ $arg = $matches[2];
+ } else {
+ $arg = true;
+ }
+ $options[$opt] = $arg;
}
return $options;
}
-function do_testing($argc, &$argv) {
+function do_testing($argc, &$argv)
+{
global $term, $windows_p, $php, $skip, $testdirs, $tmpfile, $opts,
- $skipped, $failed, $passed, $total, $term_bold, $term_norm;
+ $skipped, $failed, $passed, $total, $term_bold, $term_norm;
if ($argc > 1) {
- if (is_dir($argv[1])) {
- $dir = $argv[1];
- } else {
- for ($i = 1; $i < $argc; $i++) {
- switch (run_test($argv[$i])) {
- case TEST_SKIPPED:
- case TEST_INTERNAL_ERROR:
- $skipped++;
- break;
- case TEST_FAILED:
- $failed++;
- break;
- case TEST_PASSED:
- $passed++;
- break;
- }
- $total++;
- }
- }
+ if (is_dir($argv[1])) {
+ $dir = $argv[1];
+ } else {
+ for ($i = 1; $i < $argc; $i++) {
+ switch (run_test($argv[$i])) {
+ case TEST_SKIPPED:
+ case TEST_INTERNAL_ERROR:
+ $skipped++;
+ break;
+ case TEST_FAILED:
+ $failed++;
+ break;
+ case TEST_PASSED:
+ $passed++;
+ break;
+ }
+ $total++;
+ }
+ }
} else {
- $dir = ".";
+ $dir = ".";
}
if ($dir) {
- find_testdirs($dir);
- for ($i = 0; $i < sizeof($testdirs); $i++) {
- run_tests_in_dir($testdirs[$i]);
- }
+ find_testdirs($dir);
+ for ($i = 0; $i < sizeof($testdirs); $i++) {
+ run_tests_in_dir($testdirs[$i]);
+ }
}
$counting = $total - $skipped;
if ($counting <= 0) {
- writeln("No tests were run.");
- return;
+ writeln("No tests were run.");
+ return;
}
$total_d = (double)$total;
writeln(sprintf("Tests passed: %4d (%s%%)", $passed, $passed_pstr));
}
-function find_testdirs($dir = '.', $first_pass = true) {
+function find_testdirs($dir = '.', $first_pass = true)
+{
global $testdirs, $skip;
if ($first_pass && is_dir($dir)) {
- $testdirs[] = $dir;
+ $testdirs[] = $dir;
}
$dp = @opendir($dir);
if (!$dp) {
- print "Warning: could not open directory $dir\n";
- return false;
+ print "Warning: could not open directory $dir\n";
+ return false;
}
while ($ent = readdir($dp)) {
- $path = "$dir/$ent";
- if ((isset($skip[$ent]) && $skip[$ent]) || substr($ent, 0, 1) == "." || !is_dir($path)) {
- continue;
- }
- if (strstr("/$path/", "/tests/")) {
- $testdirs[] = $path;
- }
- find_testdirs($path, false);
+ $path = "$dir/$ent";
+ if ((isset($skip[$ent]) && $skip[$ent]) || substr($ent, 0, 1) == "." || !is_dir($path)) {
+ continue;
+ }
+ if (strstr("/$path/", "/tests/")) {
+ $testdirs[] = $path;
+ }
+ find_testdirs($path, false);
}
closedir($dp);
}
-function run_tests_in_dir($dir = '.') {
+function run_tests_in_dir($dir = '.')
+{
global $skip, $skipped, $failed, $passed, $total, $opts, $tests_in_dir;
$dp = opendir($dir);
if (!$dp) {
- print "Warning: could not run tests in $dir\n";
- return false;
+ print "Warning: could not run tests in $dir\n";
+ return false;
}
$testfiles = array();
while ($ent = readdir($dp)) {
- if ((isset($skip[$ent]) && $skip[$ent]) || substr($ent, 0, 1) == "." || substr($ent, -5) != ".phpt") {
- continue;
- }
- $testfiles[] = "$dir/$ent";
- if(isset($tests_in_dir[$dir])) $tests_in_dir[$dir]++; else $tests_in_dir[$dir]=1;
+ if ((isset($skip[$ent]) && $skip[$ent]) || substr($ent, 0, 1) == "." || substr($ent, -5) != ".phpt") {
+ continue;
+ }
+ $testfiles[] = "$dir/$ent";
+ if(isset($tests_in_dir[$dir])) $tests_in_dir[$dir]++; else $tests_in_dir[$dir]=1;
}
closedir($dp);
if (isset($tests_in_dir[$dir]) && ($tests_in_dir[$dir] == 0)) {
- return true;
+ return true;
}
$oskipped = $skipped;
writeln("%bRunning tests in $dir%B");
writeln("=================".str_repeat("=", strlen($dir)));
sort($testfiles);
for ($i = 0; $i < sizeof($testfiles); $i++) {
- switch (run_test($testfiles[$i])) {
- case TEST_SKIPPED:
- case TEST_INTERNAL_ERROR:
- $skipped++;
- break;
- case TEST_FAILED:
- $failed++;
- break;
- case TEST_PASSED:
- $passed++;
- break;
- }
- $total++;
+ switch (run_test($testfiles[$i])) {
+ case TEST_SKIPPED:
+ case TEST_INTERNAL_ERROR:
+ $skipped++;
+ break;
+ case TEST_FAILED:
+ $failed++;
+ break;
+ case TEST_PASSED:
+ $passed++;
+ break;
+ }
+ $total++;
}
if ($oskipped + (isset($tests_in_dir[$dir])?$tests_in_dir[$dir]:0) == $skipped) {
- writeln("(all skipped)");
+ writeln("(all skipped)");
}
writeln("");
return true;
}
-function skip_headers($fp) {
+function skip_headers($fp)
+{
while (!feof($fp)) {
- if (trim(fgets($fp, 1024)) == "") {
- break;
- }
+ if (trim(fgets($fp, 1024)) == "") {
+ break;
+ }
}
}
-function delete_tmpfiles() {
+function delete_tmpfiles()
+{
global $tmpfile;
reset($tmpfile);
while (list($k, $v) = each($tmpfile)) {
- if (file_exists($v)) {
- //print "unlink($v): "; var_dump(unlink($v));
- unlink($v);
- }
+ if (file_exists($v)) {
+ //print "unlink($v): "; var_dump(unlink($v));
+ unlink($v);
+ }
}
}
*
* @return bool whether the files were "equal"
*/
-function compare_results($file1, $file2) {
- $data1 = $data2 = "";
+function compare_results($file1, $file2)
+{
+ $data1 = $data2 = "";
if (!($fp1 = @fopen($file1, "r")) || !($fp2 = @fopen($file2, "r"))) {
- return false;
+ return false;
}
while (!(feof($fp1) || feof($fp2))) {
- if (!feof($fp1) && trim($line1 = fgets($fp1, 10240)) != "") {
- //print "adding line1 $line1\n";
- $data1 .= $line1;
- }
- if (!feof($fp2) && trim($line2 = fgets($fp2, 10240)) != "") {
- //print "adding line2 $line2\n";
- $data2 .= $line2;
- }
+ if (!feof($fp1) && trim($line1 = fgets($fp1, 10240)) != "") {
+ //print "adding line1 $line1\n";
+ $data1 .= $line1;
+ }
+ if (!feof($fp2) && trim($line2 = fgets($fp2, 10240)) != "") {
+ //print "adding line2 $line2\n";
+ $data2 .= $line2;
+ }
}
fclose($fp1);
fclose($fp2);
if (trim($data1) != trim($data2)) {
- //print "data1=";var_dump($data1);
- //print "data2=";var_dump($data2);
- return false;
+ //print "data1=";var_dump($data1);
+ //print "data2=";var_dump($data2);
+ return false;
}
return true;
}
-function run_test($file) {
+function run_test($file)
+{
global $php, $tmpfile, $term_bold, $term_norm;
$variables = array("TEST", "POST", "GET", "FILE", "EXPECT", "SKIPIF",
- "OUTPUT");
+ "OUTPUT");
$fp = @fopen($file, "r");
if (!$fp) {
- return TEST_INTERNAL_ERROR;
+ return TEST_INTERNAL_ERROR;
}
$tmpdir = dirname($file);
$tmpfix = "phpt.";
$tmpfile["OUTPUT"] = tempnam($tmpdir, $tmpfix);
while ($line = fgets($fp, 4096)) {
- if (preg_match('/^--([A-Z]+)--$/', $line, $matches)) {
- $var = $matches[1];
- if (isset($tmpfile[$var]) && $tmpfile[$var]) {
- $fps[$var] = @fopen($tmpfile[$var], "w");
- } else {
- $$var = '';
- }
- } else {
- if (isset($var) && $var) {
- if ($var == "POST") {
- $line = trim($line);
- }
- if (isset($fps[$var]) && $fps[$var]) {
- fwrite($fps[$var], $line);
- } else {
- $$var .= $line;
- }
- }
- }
+ if (preg_match('/^--([A-Z]+)--$/', $line, $matches)) {
+ $var = $matches[1];
+ if (isset($tmpfile[$var]) && $tmpfile[$var]) {
+ $fps[$var] = @fopen($tmpfile[$var], "w");
+ } else {
+ $$var = '';
+ }
+ } else {
+ if (isset($var) && $var) {
+ if ($var == "POST") {
+ $line = trim($line);
+ }
+ if (isset($fps[$var]) && $fps[$var]) {
+ fwrite($fps[$var], $line);
+ } else {
+ $$var .= $line;
+ }
+ }
+ }
}
- if(isset($fps) && is_array($fps)) {
- reset($fps);
- while (list($k, $v) = each($fps)) {
- if (is_resource($v)) {
- fclose($v);
- }
- }
+ if(isset($fps) && is_array($fps)) {
+ reset($fps);
+ while (list($k, $v) = each($fps)) {
+ if (is_resource($v)) {
+ fclose($v);
+ }
+ }
}
putenv("PHP_TEST=1");
putenv("REDIRECT_STATUS=1");
putenv("CONTENT_LENGTH=");
putenv("QUERY_STRING=".(isset($GET)?$GET:""));
if (isset($fps["SKIPIF"])) {
- $tmpfile["SKIPIF_OUTPUT"] = tempnam($tmpdir, $tmpfix);
- putenv("REQUEST_METHOD=GET");
- putenv("CONTENT_TYPE=");
- putenv("PATH_TRANSLATED=$tmpfile[SKIPIF]");
- putenv("SCRIPT_FILENAME=$tmpfile[SKIPIF]");
- $skipifcmd = "$php -q -f $tmpfile[SKIPIF] > $tmpfile[SKIPIF_OUTPUT]";
- system($skipifcmd, $ret);
- $sp = @fopen($tmpfile["SKIPIF_OUTPUT"], "r");
- if ($sp) {
- skip_headers($sp);
- $skip = trim(fgets($sp, 1024));
- fclose($sp);
- if ($skip == "skip") {
- delete_tmpfiles();
- return TEST_SKIPPED;
- }
- }
+ $tmpfile["SKIPIF_OUTPUT"] = tempnam($tmpdir, $tmpfix);
+ putenv("REQUEST_METHOD=GET");
+ putenv("CONTENT_TYPE=");
+ putenv("PATH_TRANSLATED=$tmpfile[SKIPIF]");
+ putenv("SCRIPT_FILENAME=$tmpfile[SKIPIF]");
+ $skipifcmd = "$php -q -f $tmpfile[SKIPIF] > $tmpfile[SKIPIF_OUTPUT]";
+ system($skipifcmd, $ret);
+ $sp = @fopen($tmpfile["SKIPIF_OUTPUT"], "r");
+ if ($sp) {
+ skip_headers($sp);
+ $skip = trim(fgets($sp, 1024));
+ fclose($sp);
+ if ($skip == "skip") {
+ delete_tmpfiles();
+ return TEST_SKIPPED;
+ }
+ }
}
putenv("PATH_TRANSLATED=$tmpfile[FILE]");
putenv("SCRIPT_FILENAME=$tmpfile[FILE]");
if (isset($fps["POST"])) {
- putenv("REQUEST_METHOD=POST");
- putenv("CONTENT_TYPE=application/x-www-form-urlencoded");
- putenv("CONTENT_LENGTH=".filesize($tmpfile["POST"]));
+ putenv("REQUEST_METHOD=POST");
+ putenv("CONTENT_TYPE=application/x-www-form-urlencoded");
+ putenv("CONTENT_LENGTH=".filesize($tmpfile["POST"]));
} else {
- putenv("REQUEST_METHOD=GET");
- putenv("CONTENT_TYPE=");
- putenv("CONTENT_LENGTH=");
+ putenv("REQUEST_METHOD=GET");
+ putenv("CONTENT_TYPE=");
+ putenv("CONTENT_LENGTH=");
}
putenv("a=");
putenv("b=");
putenv("c=");
putenv("d=");
if (isset($fps["POST"])) {
- $cmd = "$php -f $tmpfile[FILE] < $tmpfile[POST]";
+ $cmd = "$php -f $tmpfile[FILE] < $tmpfile[POST]";
} else {
- $cmd = "$php -f $tmpfile[FILE]";
+ $cmd = "$php -f $tmpfile[FILE]";
}
$ofp = @fopen($tmpfile["OUTPUT"], "w");
if (!$ofp) {
- writeln("Error: could not write to output file");
- delete_tmpfiles();
- return TEST_INTERNAL_ERROR;
+ writeln("Error: could not write to output file");
+ delete_tmpfiles();
+ return TEST_INTERNAL_ERROR;
}
$cp = popen($cmd, "r");
if (!$cp) {
- writeln("Error: could not execute: $cmd");
- delete_tmpfiles();
- return TEST_INTERNAL_ERROR;
+ writeln("Error: could not execute: $cmd");
+ delete_tmpfiles();
+ return TEST_INTERNAL_ERROR;
}
skip_headers($cp);
while ($data = fread($cp, 2048)) {
- fwrite($ofp, $data);
+ fwrite($ofp, $data);
}
fclose($ofp);
pclose($cp);
$expectfile = preg_replace('/\.phpt$/', '.exp', $file);
$phpfile = preg_replace('/\.phpt$/', '.php', $file);
if (compare_results($tmpfile["OUTPUT"], $tmpfile["EXPECT"])) {
- $status = TEST_PASSED;
- $text = "passed";
- $pre = $post = "";
- if (file_exists($outfile)) {
- unlink($outfile);
- }
- if (file_exists($expectfile)) {
- unlink($expectfile);
- }
- if (file_exists($phpfile)) {
- unlink($phpfile);
- }
+ $status = TEST_PASSED;
+ $text = "passed";
+ $pre = $post = "";
+ if (file_exists($outfile)) {
+ unlink($outfile);
+ }
+ if (file_exists($expectfile)) {
+ unlink($expectfile);
+ }
+ if (file_exists($phpfile)) {
+ unlink($phpfile);
+ }
} else {
- //system("env");
- $status = TEST_FAILED;
- $text = "failed";
- $pre = $term_bold;
- $post = $term_norm;
- $desc .= " (".basename($file).")";
- if (file_exists($outfile)) {
- unlink($outfile);
- }
- copy($tmpfile["OUTPUT"], $outfile);
- copy($tmpfile["EXPECT"], $expectfile);
- copy($tmpfile["FILE"], $phpfile);
+ //system("env");
+ $status = TEST_FAILED;
+ $text = "failed";
+ $pre = $term_bold;
+ $post = $term_norm;
+ $desc .= " (".basename($file).")";
+ if (file_exists($outfile)) {
+ unlink($outfile);
+ }
+ copy($tmpfile["OUTPUT"], $outfile);
+ copy($tmpfile["EXPECT"], $expectfile);
+ copy($tmpfile["FILE"], $phpfile);
}
writeln(sprintf("%s%-68s ... %s%s", $pre, substr($desc, 0, 68),
- $text, $post));
+ $text, $post));
// if ($status == TEST_FAILED) {
-// for ($i = 0; $i < sizeof($variables); $i++) {
-// $var = $variables[$i];
-// print "$var:\n";
-// if ($tmpfile[$var]) {
-// if (file_exists($tmpfile[$var])) {
-// system("cat ".$tmpfile[$var]);
-// }
-// } else {
-// print $$var;
-// }
-// }
-// print "--\n\n";
+// for ($i = 0; $i < sizeof($variables); $i++) {
+// $var = $variables[$i];
+// print "$var:\n";
+// if ($tmpfile[$var]) {
+// if (file_exists($tmpfile[$var])) {
+// system("cat ".$tmpfile[$var]);
+// }
+// } else {
+// print $$var;
+// }
+// }
+// print "--\n\n";
// }
delete_tmpfiles();
return $status;
projects / php / commitdiff