1<?php 2/* 3 +----------------------------------------------------------------------+ 4 | PHP Version 7 | 5 +----------------------------------------------------------------------+ 6 | Copyright (c) 1997-2018 The PHP Group | 7 +----------------------------------------------------------------------+ 8 | This source file is subject to version 3.01 of the PHP license, | 9 | that is bundled with this package in the file LICENSE, and is | 10 | available through the world-wide-web at the following url: | 11 | http://www.php.net/license/3_01.txt | 12 | If you did not receive a copy of the PHP license and are unable to | 13 | obtain it through the world-wide-web, please send a note to | 14 | license@php.net so we can mail you a copy immediately. | 15 +----------------------------------------------------------------------+ 16 | Authors: Ilia Alshanetsky <ilia@php.net> | 17 | Preston L. Bannister <pbannister@php.net> | 18 | Marcus Boerger <helly@php.net> | 19 | Shane Caraveo <shane@php.net> | 20 | Derick Rethans <derick@php.net> | 21 | Sander Roobol <sander@php.net> | 22 | (based on version by: Stig Bakken <ssb@php.net>) | 23 | (based on the PHP 3 test framework by Rasmus Lerdorf) | 24 +----------------------------------------------------------------------+ 25 */ 26 27set_time_limit(0); 28while(@ob_end_clean()); 29if (ob_get_level()) echo "Not all buffers were deleted.\n"; 30error_reporting(E_ALL); 31 32/********************************************************************** 33 * QA configuration 34 */ 35 36define('PHP_QA_EMAIL', 'qa-reports@lists.php.net'); 37define('QA_SUBMISSION_PAGE', 'http://qa.php.net/buildtest-process.php'); 38 39/********************************************************************** 40 * error messages 41 */ 42 43define('PCRE_MISSING_ERROR', 44'+-----------------------------------------------------------+ 45| ! ERROR ! | 46| The test-suite requires that you have pcre extension | 47| enabled. To enable this extension either compile your PHP | 48| with --with-pcre-regex or if you have compiled pcre as a | 49| shared module load it via php.ini. | 50+-----------------------------------------------------------+'); 51define('TMP_MISSING', 52'+-----------------------------------------------------------+ 53| ! ERROR ! | 54| You must create /tmp for session tests to work! | 55| | 56+-----------------------------------------------------------+'); 57define('PROC_OPEN_MISSING', 58'+-----------------------------------------------------------+ 59| ! ERROR ! | 60| The test-suite requires that proc_open() is available. | 61| Please check if you disabled it in php.ini. | 62+-----------------------------------------------------------+'); 63define('REQ_PHP_VERSION', 64'+-----------------------------------------------------------+ 65| ! ERROR ! | 66| The test-suite must be run with PHP 5 or later. | 67| You can still test older extecutables by setting | 68| TEST_PHP_EXECUTABLE and running this script with PHP 5. | 69+-----------------------------------------------------------+'); 70/********************************************************************** 71 * information scripts 72 */ 73define('PHP_INFO_SCRIPT','<?php echo " 74PHP_SAPI=" . PHP_SAPI . " 75PHP_VERSION=" . phpversion() . " 76ZEND_VERSION=" . zend_version() . " 77PHP_OS=" . PHP_OS . " 78INCLUDE_PATH=" . get_cfg_var("include_path") . " 79INI=" . realpath(get_cfg_var("cfg_file_path")) . " 80SCANNED_INI=" . (function_exists(\'php_ini_scanned_files\') ? 81 str_replace("\n","", php_ini_scanned_files()) : 82 "** not determined **") . " 83SERVER_SOFTWARE=" . (isset($_ENV[\'SERVER_SOFTWARE\']) ? $_ENV[\'SERVER_SOFTWARE\'] : \'UNKNOWN\'); 84?>'); 85 86define('PHP_EXTENSIONS_SCRIPT','<?php print join(get_loaded_extensions(),":"); ?>'); 87define('PHP_INI_SETTINGS_SCRIPT','<?php echo serialize(ini_get_all()); ?>'); 88 89/********************************************************************** 90 * various utility functions 91 */ 92 93function settings2array($settings, &$ini_settings) 94{ 95 foreach($settings as $setting) { 96 if (strpos($setting, '=')!==false) { 97 $setting = explode("=", $setting, 2); 98 $name = trim($setting[0]); 99 $value = trim($setting[1]); 100 $ini_settings[$name] = $value; 101 } 102 } 103} 104 105function settings2params(&$ini_settings) 106{ 107 $settings = ''; 108 if (count($ini_settings)) { 109 foreach($ini_settings as $name => $value) { 110 $value = addslashes($value); 111 $settings .= " -d \"".strtolower($name)."=$value\""; 112 } 113 } 114 return $settings; 115} 116 117function generate_diff($wanted,$output) 118{ 119 $w = explode("\n", $wanted); 120 $o = explode("\n", $output); 121 $w1 = array_diff_assoc($w,$o); 122 $o1 = array_diff_assoc($o,$w); 123 $w2 = array(); 124 $o2 = array(); 125 foreach($w1 as $idx => $val) $w2[sprintf("%03d<",$idx)] = sprintf("%03d- ", $idx+1).$val; 126 foreach($o1 as $idx => $val) $o2[sprintf("%03d>",$idx)] = sprintf("%03d+ ", $idx+1).$val; 127 $diff = array_merge($w2, $o2); 128 ksort($diff); 129 return implode("\r\n", $diff); 130} 131 132function mkpath($path,$mode = 0777) { 133 $dirs = preg_split('/[\\/]/',$path); 134 $path = $dirs[0]; 135 for($i = 1;$i < count($dirs);$i++) { 136 $path .= '/'.$dirs[$i]; 137 @mkdir($path,$mode); 138 } 139} 140 141function copyfiles($src,$new) { 142 $d = dir($src); 143 while (($entry = $d->read())) { 144 if (is_file("$src/$entry")) { 145 copy("$src/$entry", "$new/$entry"); 146 } 147 } 148 $d->close(); 149} 150 151function post_result_data($query,$data) 152{ 153 $url = QA_SUBMISSION_PAGE.'?'.$query; 154 $post = "php_test_data=" . urlencode(base64_encode(preg_replace("/[\\x00]/", "[0x0]", $data))); 155 $r = new HTTPRequest($url,NULL,NULL,$post); 156 return $this->response_headers['Status']=='200'; 157} 158 159 160function execute($command, $args=NULL, $input=NULL, $cwd=NULL, $env=NULL) 161{ 162 $data = ""; 163 164 if (gettype($args)=='array') { 165 $args = join($args,' '); 166 } 167 $commandline = "$command $args"; 168 $proc = proc_open($commandline, array( 169 0 => array('pipe', 'r'), 170 1 => array('pipe', 'w')), 171 $pipes, $cwd, $env); 172 173 if (!$proc) 174 return false; 175 176 if ($input) { 177 $out = fwrite($pipes[0],$input); 178 if ($out != strlen($input)) { 179 return NULL; 180 } 181 } 182 183 fclose($pipes[0]); 184 185 while (true) { 186 /* hide errors from interrupted syscalls */ 187 $r = $pipes; 188 $w = null; 189 $e = null; 190 $n = @stream_select($r, $w, $e, 60); 191 192 if ($n === 0) { 193 /* timed out */ 194 $data .= "\n ** ERROR: process timed out **\n"; 195 proc_terminate($proc); 196 return $data; 197 } else if ($n) { 198 $line = fread($pipes[1], 8192); 199 if (strlen($line) == 0) { 200 /* EOF */ 201 break; 202 } 203 $data .= $line; 204 } 205 } 206 $code = proc_close($proc); 207 return $data; 208} 209 210function executeCode($php, $ini_overwrites, $code, $remove_headers=true, $cwd=NULL, $env=NULL) 211{ 212 $params = NULL; 213 if ($ini_overwrites) { 214 $info_params = array(); 215 settings2array($ini_overwrites,$info_params); 216 $params = settings2params($info_params); 217 } 218 $out = execute($php, $params, $code, $cwd, $env); 219 // kill the headers 220 if ($remove_headers && preg_match("/^(.*?)\r?\n\r?\n(.*)/s", $out, $match)) { 221 $out = $match[2]; 222 } 223 return $out; 224} 225 226 227/********************************************************************** 228 * a simple request class that lets us handle http based tests 229 */ 230 231class HTTPRequest 232{ 233 public $headers = array(); 234 public $timeout = 4; 235 public $urlparts = NULL; 236 public $url = ''; 237 public $userAgent = 'PHP-Test-Harness'; 238 public $options = array(); 239 public $postdata = NULL; 240 public $errmsg = ''; 241 public $errno = 0; 242 public $response; 243 public $response_headers; 244 public $outgoing_payload; 245 public $incoming_payload = ''; 246 247 /* 248 URL is the full url 249 headers is assoc array of outgoing http headers 250 251 options may include 252 timeout 253 proxy_host 254 proxy_port 255 proxy_user 256 proxy_pass 257 method (GET|POST) 258 259 post data is, well, post data. It is not processed so 260 multipart stuff must be prepared before calling this 261 (or add it to class) 262 */ 263 function HTTPRequest($URL, $headers=array(), $options=array(), $postdata=NULL) 264 { 265 $this->urlparts = @parse_url($URL); 266 $this->url = $URL; 267 $this->options = $options; 268 $this->headers = $headers; 269 $this->postdata = &$postdata; 270 $this->doRequest(); 271 } 272 273 function doRequest() 274 { 275 if (!$this->_validateUrl()) return; 276 277 if (isset($this->options['timeout'])) 278 $this->timeout = (int)$this->options['timeout']; 279 280 $this->_sendHTTP(); 281 } 282 283 function _validateUrl() 284 { 285 if ( ! is_array($this->urlparts) ) { 286 return FALSE; 287 } 288 if (!isset($this->urlparts['host'])) { 289 $this->urlparts['host']='127.0.0.1'; 290 } 291 if (!isset($this->urlparts['port'])) { 292 $this->urlparts['port'] = 80; 293 } 294 if (!isset($this->urlparts['path']) || !$this->urlparts['path']) 295 $this->urlparts['path'] = '/'; 296 return TRUE; 297 } 298 299 function _parseResponse() 300 { 301 if (preg_match("/^(.*?)\r?\n\r?\n(.*)/s", $this->incoming_payload, $match)) { 302 $this->response = $match[2]; 303 if (preg_match("/^HTTP\/1\.. (\d+).*/s",$match[1],$status) && !$status[1]) { 304 $this->errmsg = "HTTP Response $status[1] Not Found"; 305 return FALSE; 306 } 307 $rh = preg_split("/[\n\r]+/",$match[1]); 308 $this->response_headers = array(); 309 foreach ($rh as $line) { 310 if (strpos($line, ':')!==false) { 311 $line = explode(":", $line, 2); 312 $this->response_headers[trim($line[0])] = trim($line[1]); 313 } 314 } 315 $this->response_headers['Status']=$status[1]; 316 // if no content, return false 317 if(strlen($this->response) > 0) return TRUE; 318 } 319 $this->errmsg = 'Invalid HTTP Response'; 320 return FALSE; 321 } 322 323 function &_getRequest() 324 { 325 $fullpath = $this->urlparts['path']. 326 (isset($this->urlparts['query'])?'?'.$this->urlparts['query']:''). 327 (isset($this->urlparts['fragment'])?'#'.$this->urlparts['fragment']:''); 328 if (isset($this->options['proxy_host'])) { 329 $fullpath = 'http://'.$this->urlparts['host'].':'.$this->urlparts['port'].$fullpath; 330 } 331 if (isset($this->options['proxy_user'])) { 332 $headers['Proxy-Authorization'] = 'Basic ' . base64_encode($this->options['proxy_user'].":".$this->options['proxy_pass']); 333 } 334 $headers['User-Agent'] = $this->userAgent; 335 $headers['Host'] = $this->urlparts['host']; 336 $headers['Content-Length'] = strlen($this->postdata); 337 $headers['Content-Type'] = 'application/x-www-form-urlencoded'; 338 if (isset($this->headers)) { 339 $headers = array_merge($headers, $this->headers); 340 } 341 $headertext = ''; 342 foreach ($headers as $k => $v) { 343 $headertext .= "$k: $v\r\n"; 344 } 345 $method = trim($this->options['method'])?strtoupper(trim($this->options['method'])):'GET'; 346 $this->outgoing_payload = 347 "$method $fullpath HTTP/1.0\r\n". 348 $headertext."\r\n". 349 $this->postdata; 350 return $this->outgoing_payload; 351 } 352 353 function _sendHTTP() 354 { 355 $this->_getRequest(); 356 $host = $this->urlparts['host']; 357 $port = $this->urlparts['port']; 358 if (isset($this->options['proxy_host'])) { 359 $host = $this->options['proxy_host']; 360 $port = isset($this->options['proxy_port'])?$this->options['proxy_port']:8080; 361 } 362 // send 363 if ($this->timeout > 0) { 364 $fp = fsockopen($host, $port, $this->errno, $this->errmsg, $this->timeout); 365 } else { 366 $fp = fsockopen($host, $port, $this->errno, $this->errmsg); 367 } 368 if (!$fp) { 369 $this->errmsg = "Connect Error to $host:$port"; 370 return NULL; 371 } 372 if ($this->timeout > 0) { 373 // some builds of php do not support this, silence 374 // the warning 375 @socket_set_timeout($fp, $this->timeout); 376 } 377 if (!fputs($fp, $this->outgoing_payload, strlen($this->outgoing_payload))) { 378 $this->errmsg = "Error Sending Request Data to $host"; 379 return NULL; 380 } 381 382 while ($data = fread($fp, 32768)) { 383 $this->incoming_payload .= $data; 384 } 385 386 fclose($fp); 387 388 $this->_parseResponse(); 389 } 390 391# a simple test case 392#$r = new HTTPRequest('http://localhost:81/info.php/path/info'); 393#print_r($r->response_headers); 394#print $r->response; 395 396} // end HTTPRequest 397 398 399/********************************************************************** 400 * main test harness 401 */ 402 403class testHarness { 404 public $cwd; 405 public $xargs = array( 406 #arg env var value default description 407 'c' => array('' ,'file' ,NULL ,'configuration file, see server-tests-config.php for example'), 408 'd' => array('TEST_PATHS' ,'paths' ,NULL ,'colon separate path list'), 409 'e' => array('TEST_PHP_ERROR_STYLE','EMACS|MSVC' ,'EMACS' ,'editor error style'), 410 'h' => array('' ,'' ,NULL ,'this help'), 411 'i' => array('PHPRC' ,'path|file' ,NULL ,'ini file to use for tests (sets PHPRC)'), 412 'l' => array('TEST_PHP_LOG_FORMAT' ,'string' ,'LEODC' ,'any combination of CDELO'), 413 'm' => array('TEST_BASE_PATH' ,'path' ,NULL ,'copy tests to this path before testing'), 414 'n' => array('NO_PHPTEST_SUMMARY' ,'' ,0 ,'do not print test summary'), 415 'p' => array('TEST_PHP_EXECUTABLE' ,'path' ,NULL ,'php executable to be tested'), 416 'q' => array('NO_INTERACTION' ,'' ,0 ,'no console interaction (ie dont contact QA)'), 417 'r' => array('REPORT_EXIT_STATUS' ,'' ,0 ,'exit with status at end of execution'), 418 's' => array('TEST_PHP_SRCDIR' ,'path' ,NULL ,'path to php source code'), 419 't' => array('TEST_PHP_DETAILED' ,'number' ,0 ,'level of detail output to dump'), 420 'u' => array('TEST_WEB_BASE_URL' ,'url' ,'' ,'base url for http testing'), 421 'v' => array('TEST_CONTEXT_INFO' ,'' ,0 ,'view text executable context info'), 422 'w' => array('TEST_WEB' ,'' ,0 ,'run tests via http'), 423 'x' => array('TEST_WEB_EXT' ,'file ext' ,'php' ,'http file extension to use') 424 ); 425 426 public $conf = array(); 427 public $test_to_run = array(); 428 public $test_files = array(); 429 public $test_results = array(); 430 public $failed_tests = array(); 431 public $exts_to_test; 432 public $exts_tested = 0; 433 public $exts_skipped = 0; 434 public $ignored_by_ext = 0; 435 public $test_dirs = array('tests', 'pear', 'ext', 'sapi'); 436 public $start_time; 437 public $end_time; 438 public $exec_info; 439 public $test_executable_iscgi = false; 440 public $inisettings; // the test executables settings, used for web tests 441 public $iswin32 = false; 442 443 public $ddash = "====================================================================="; 444 public $sdash = "---------------------------------------------------------------------"; 445 446 // Default ini settings 447 public $ini_overwrites = array( 448 'output_handler'=>'', 449 'zlib.output_compression'=>'Off', 450 'open_basedir'=>'', 451 'disable_functions'=>'', 452 'output_buffering'=>'Off', 453 'error_reporting'=>'4095', 454 'display_errors'=>'1', 455 'log_errors'=>'0', 456 'html_errors'=>'0', 457 'track_errors'=>'1', 458 'report_memleaks'=>'1', 459 'report_zend_debug'=>'0', 460 'docref_root'=>'/phpmanual/', 461 'docref_ext'=>'.html', 462 'error_prepend_string'=>'', 463 'error_append_string'=>'', 464 'auto_prepend_file'=>'', 465 'auto_append_file'=>'', 466 ); 467 public $env = array(); 468 public $info_params = array(); 469 470 function testHarness() { 471 $this->iswin32 = substr(PHP_OS, 0, 3) == "WIN"; 472 $this->checkRequirements(); 473 $this->env = $_ENV; 474 $this->removeSensitiveEnvVars(); 475 476 $this->initializeConfiguration(); 477 $this->parseArgs(); 478 $this->setTestPaths(); 479 # change to working directory 480 if ($this->conf['TEST_PHP_SRCDIR']) { 481 @chdir($this->conf['TEST_PHP_SRCDIR']); 482 } 483 $this->cwd = getcwd(); 484 485 if (!$this->conf['TEST_PHP_SRCDIR']) 486 $this->conf['TEST_PHP_SRCDIR'] = $this->cwd; 487 if (!$this->conf['TEST_BASE_PATH'] && $this->conf['TEST_PHP_SRCDIR']) 488 $this->conf['TEST_BASE_PATH'] = $this->conf['TEST_PHP_SRCDIR']; 489 if ($this->iswin32) { 490 $this->conf['TEST_PHP_SRCDIR'] = str_replace('/','\\',$this->conf['TEST_PHP_SRCDIR']); 491 $this->conf['TEST_BASE_PATH'] = str_replace('/','\\',$this->conf['TEST_BASE_PATH']); 492 } 493 494 if (!$this->conf['TEST_WEB'] && !is_executable($this->conf['TEST_PHP_EXECUTABLE'])) { 495 $this->error("invalid PHP executable specified by TEST_PHP_EXECUTABLE = " . 496 $this->conf['TEST_PHP_EXECUTABLE']); 497 return false; 498 } 499 500 $this->getInstalledExtensions(); 501 $this->getExecutableInfo(); 502 $this->getExecutableIniSettings(); 503 $this->test_executable_iscgi = strncmp($this->exec_info['PHP_SAPI'],'cgi',3)==0; 504 $this->calculateDocumentRoot(); 505 506 // add TEST_PHP_SRCDIR to the include path, this facilitates 507 // tests including files from src/tests 508 //$this->ini_overwrites['include_path'] = $this->cwd.($this->iswin32?';.;':':.:').$this->exec_info['INCLUDE_PATH']; 509 510 $params = array(); 511 settings2array($this->ini_overwrites,$params); 512 $this->info_params = settings2params($params); 513 514 $this->contextHeader(); 515 if ($this->conf['TEST_CONTEXT_INFO']) return; 516 $this->loadFileList(); 517 $this->moveTestFiles(); 518 $this->run(); 519 $this->summarizeResults(); 520 } 521 522 function getExecutableIniSettings() 523 { 524 $out = $this->runscript(PHP_INI_SETTINGS_SCRIPT,true); 525 $this->inisettings = unserialize($out); 526 } 527 528 function getExecutableInfo() 529 { 530 $out = $this->runscript(PHP_INFO_SCRIPT,true); 531 $out = preg_split("/[\n\r]+/",$out); 532 $info = array(); 533 foreach ($out as $line) { 534 if (strpos($line, '=')!==false) { 535 $line = explode("=", $line, 2); 536 $name = trim($line[0]); 537 $value = trim($line[1]); 538 $info[$name] = $value; 539 } 540 } 541 $this->exec_info = $info; 542 } 543 544 function getInstalledExtensions() 545 { 546 // get the list of installed extensions 547 $out = $this->runscript(PHP_EXTENSIONS_SCRIPT,true); 548 $this->exts_to_test = explode(":",$out); 549 sort($this->exts_to_test); 550 $this->exts_tested = count($this->exts_to_test); 551 } 552 553 // if running local, calls executeCode, 554 // otherwise does an http request 555 function runscript($script,$removeheaders=false,$cwd=NULL) 556 { 557 if ($this->conf['TEST_WEB']) { 558 $pi = '/testscript.' . $this->conf['TEST_WEB_EXT']; 559 if (!$cwd) $cwd = $this->conf['TEST_BASE_PATH']; 560 $tmp_file = "$cwd$pi"; 561 $pi = substr($cwd,strlen($this->conf['TEST_BASE_PATH'])) . $pi; 562 $url = $this->conf['TEST_WEB_BASE_URL'] . $pi; 563 file_put_contents($tmp_file,$script); 564 $fd = fopen($url, "rb"); 565 $out = ''; 566 if ($fd) { 567 while (!feof($fd)) 568 $out .= fread($fd, 8192); 569 fclose($fd); 570 } 571 unlink($tmp_file); 572 if (0 && $removeheaders && 573 preg_match("/^(.*?)\r?\n\r?\n(.*)/s", $out, $match)) { 574 return $match[2]; 575 } 576 return $out; 577 } else { 578 return executeCode($this->conf['TEST_PHP_EXECUTABLE'],$this->ini_overwrites, $script,$removeheaders,$cwd,$this->env); 579 } 580 } 581 582 583 // Use this function to do any displaying of text, so that 584 // things can be over-written as necessary. 585 586 function writemsg($msg) { 587 588 echo $msg; 589 590 } 591 592 // Another wrapper function, this one should be used any time 593 // a particular test passes or fails 594 595 function showstatus($item, $status, $reason = '') { 596 597 switch($status) { 598 case 'PASSED': 599 $this->writemsg("PASSED: $item ($reason)\n"); 600 break; 601 case 'FAILED': 602 $this->writemsg("FAILED: $item ($reason)\n"); 603 break; 604 case 'SKIPPED': 605 $this->writemsg("SKIPPED: $item ($reason)\n"); 606 break; 607 } 608 } 609 610 611 function help() 612 { 613 $usage = "usage: php run-tests.php [options]\n"; 614 foreach ($this->xargs as $arg=>$arg_info) { 615 $usage .= sprintf(" -%s %-12s %s\n",$arg,$arg_info[1],$arg_info[3]); 616 } 617 return $usage; 618 } 619 620 function parseArgs() { 621 global $argc; 622 global $argv; 623 global $_SERVER; 624 625 if (!isset($argv)) { 626 $argv = $_SERVER['argv']; 627 $argc = $_SERVER['argc']; 628 } 629 630 $conf = NULL; 631 for ($i=1; $i<$argc;) { 632 if ($argv[$i][0] != '-') continue; 633 $opt = $argv[$i++][1]; 634 if (isset($value)) unset($value); 635 if (@$argv[$i][0] != '-') { 636 @$value = $argv[$i++]; 637 } 638 switch($opt) { 639 case 'c': 640 /* TODO: Implement configuraiton file */ 641 include($value); 642 if (!isset($conf)) { 643 $this->writemsg("Invalid configuration file\n"); 644 exit(1); 645 } 646 $this->conf = array_merge($this->conf,$conf); 647 break; 648 case 'e': 649 $this->conf['TEST_PHP_ERROR_STYLE'] = strtoupper($value); 650 break; 651 case 'h': 652 print $this->help(); 653 exit(0); 654 default: 655 if ($this->xargs[$opt][1] && isset($value)) 656 $this->conf[$this->xargs[$opt][0]] = $value; 657 else if (!$this->xargs[$opt][1]) 658 $this->conf[$this->xargs[$opt][0]] = isset($value)?$value:1; 659 else 660 $this->error("Invalid argument setting for argument $opt, should be [{$this->xargs[$opt][1]}]\n"); 661 break; 662 } 663 } 664 665 // set config into environment, this allows 666 // executed tests to find out about the test 667 // configurations. config file or args overwrite 668 // env var config settings 669 $this->env = array_merge($this->env,$this->conf); 670 if (!$this->conf['TEST_WEB'] && !$this->conf['TEST_PHP_EXECUTABLE']) { 671 $this->writemsg($this->help()); 672 exit(0); 673 } 674 } 675 676 function removeSensitiveEnvVars() 677 { 678 # delete sensitive env vars 679 $this->env['SSH_CLIENT']='deleted'; 680 $this->env['SSH_AUTH_SOCK']='deleted'; 681 $this->env['SSH_TTY']='deleted'; 682 } 683 684 function setEnvConfigVar($name) 685 { 686 if (isset($this->env[$name])) { 687 $this->conf[$name] = $this->env[$name]; 688 } 689 } 690 691 function initializeConfiguration() 692 { 693 foreach ($this->xargs as $arg=>$arg_info) { 694 if ($arg_info[0]) { 695 # initialize the default setting 696 $this->conf[$arg_info[0]]=$arg_info[2]; 697 # get config from environment 698 $this->setEnvConfigVar($arg_info[0]); 699 } 700 } 701 } 702 703 function setTestPaths() 704 { 705 // configure test paths from config file or command line 706 if (@$this->conf['TEST_PATHS']) { 707 $this->test_dirs = array(); 708 if ($this->iswin32) { 709 $paths = explode(';',$this->conf['TEST_PATHS']); 710 } else { 711 $paths = explode(':|;',$this->conf['TEST_PATHS']); 712 } 713 foreach($paths as $path) { 714 $this->test_dirs[] = realpath($path); 715 } 716 } 717 } 718 719 function test_sort($a, $b) { 720 $ta = strpos($a, "{$this->cwd}/tests")===0 ? 1 + (strpos($a, "{$this->cwd}/tests/run-test")===0 ? 1 : 0) : 0; 721 $tb = strpos($b, "{$this->cwd}/tests")===0 ? 1 + (strpos($b, "{$this->cwd}/tests/run-test")===0 ? 1 : 0) : 0; 722 if ($ta == $tb) { 723 return strcmp($a, $b); 724 } else { 725 return $tb - $ta; 726 } 727 } 728 729 function checkRequirements() { 730 if (version_compare(phpversion(), "5.4") < 0) { 731 $this->writemsg(REQ_PHP_VERSION); 732 exit; 733 } 734// We might want to check another server so we won't see that server's /tmp 735// if (!file_exists("/tmp")) { 736// $this->writemsg(TMP_MISSING); 737// exit; 738// } 739 if (!function_exists("proc_open")) { 740 $this->writemsg(PROC_OPEN_MISSING); 741 exit; 742 } 743 if (!extension_loaded("pcre")) { 744 $this->writemsg(PCRE_MISSING_ERROR); 745 exit; 746 } 747 } 748 749 // 750 // Write test context information. 751 // 752 function contextHeader() 753 { 754 $info = ''; 755 foreach ($this->exec_info as $k=>$v) { 756 $info .= sprintf("%-20.s: %s\n",$k,$v); 757 } 758 $exts = ''; 759 foreach ($this->exts_to_test as $ext) { 760 $exts .="$ext\n "; 761 } 762 $dirs = ''; 763 foreach ($this->test_dirs as $test_dir) { 764 $dirs .= "$test_dir\n "; 765 } 766 $conf = ''; 767 foreach ($this->conf as $k=>$v) { 768 $conf .= sprintf("%-20.s: %s\n",$k,$v); 769 } 770 771 $exeinfo = ''; 772 if (!$this->conf['TEST_WEB']) 773 $exeinfo = "CWD : {$this->cwd}\n". 774 "PHP : {$this->conf['TEST_PHP_EXECUTABLE']}\n"; 775 776 $this->writemsg("\n$this->ddash\n". 777 "$exeinfo$info\n". 778 "Test Harness Configuration:\n$conf\n". 779 "Extensions : $exts\n". 780 "Test Dirs : $dirs\n". 781 "$this->ddash\n"); 782 } 783 784 function loadFileList() 785 { 786 foreach ($this->test_dirs as $dir) { 787 if (is_dir($dir)) { 788 $this->findFilesInDir($dir, ($dir == 'ext')); 789 } else { 790 $this->test_files[] = $dir; 791 } 792 } 793 usort($this->test_files,array($this,"test_sort")); 794 $this->writemsg("found ".count($this->test_files)." files\n"); 795 } 796 797 function moveTestFiles() 798 { 799 if (!$this->conf['TEST_BASE_PATH'] || 800 $this->conf['TEST_BASE_PATH'] == $this->conf['TEST_PHP_SRCDIR']) return; 801 $this->writemsg("moving files from {$this->conf['TEST_PHP_SRCDIR']} to {$this->conf['TEST_BASE_PATH']}\n"); 802 $l = strlen($this->conf['TEST_PHP_SRCDIR']); 803 $files = array(); 804 $dirs = array(); 805 foreach ($this->test_files as $file) { 806 if (strpos($file,$this->conf['TEST_PHP_SRCDIR'])==0) { 807 $newlocation = $this->conf['TEST_BASE_PATH'].substr($file,$l); 808 $files[] = $newlocation; 809 $dirs[dirname($file)] = dirname($newlocation); 810 } else { 811 // XXX what to do with test files outside the 812 // php source directory? Need to map them into 813 // the new directory somehow. 814 } 815 } 816 foreach ($dirs as $src=>$new) { 817 mkpath($new); 818 copyfiles($src,$new); 819 } 820 $this->test_files = $files; 821 } 822 823 function findFilesInDir($dir,$is_ext_dir=FALSE,$ignore=FALSE) 824 { 825 $skip = array('.', '..', 'CVS'); 826 $o = opendir($dir) or $this->error("cannot open directory: $dir"); 827 while (($name = readdir($o)) !== FALSE) { 828 if (in_array($name, $skip)) continue; 829 if (is_dir("$dir/$name")) { 830 $skip_ext = ($is_ext_dir && !in_array($name, $this->exts_to_test)); 831 if ($skip_ext) { 832 $this->exts_skipped++; 833 } 834 $this->findFilesInDir("$dir/$name", FALSE, $ignore || $skip_ext); 835 } 836 837 // Cleanup any left-over tmp files from last run. 838 if (substr($name, -4) == '.tmp') { 839 @unlink("$dir/$name"); 840 continue; 841 } 842 843 // Otherwise we're only interested in *.phpt files. 844 if (substr($name, -5) == '.phpt') { 845 if ($ignore) { 846 $this->ignored_by_ext++; 847 } else { 848 $testfile = realpath("$dir/$name"); 849 $this->test_files[] = $testfile; 850 } 851 } 852 } 853 closedir($o); 854 } 855 856 function runHeader() 857 { 858 $this->writemsg("TIME START " . date('Y-m-d H:i:s', $this->start_time) . "\n".$this->ddash."\n"); 859 if (count($this->test_to_run)) { 860 $this->writemsg("Running selected tests.\n"); 861 } else { 862 $this->writemsg("Running all test files.\n"); 863 } 864 } 865 866 function run() 867 { 868 $this->start_time = time(); 869 $this->runHeader(); 870 // Run selected tests. 871 if (count($this->test_to_run)) { 872 873 foreach($this->test_to_run as $name=>$runnable) { 874 if(!preg_match("/\.phpt$/", $name)) 875 continue; 876 if ($runnable) { 877 $this->test_results[$name] = $this->run_test($name); 878 } 879 } 880 } else { 881 foreach ($this->test_files as $name) { 882 $this->test_results[$name] = $this->run_test($name); 883 } 884 } 885 $this->end_time = time(); 886 } 887 888 function summarizeResults() 889 { 890 if (count($this->test_results) == 0) { 891 $this->writemsg("No tests were run.\n"); 892 return; 893 } 894 895 $n_total = count($this->test_results); 896 $n_total += $this->ignored_by_ext; 897 898 $sum_results = array('PASSED'=>0, 'SKIPPED'=>0, 'FAILED'=>0); 899 foreach ($this->test_results as $v) { 900 $sum_results[$v]++; 901 } 902 $sum_results['SKIPPED'] += $this->ignored_by_ext; 903 $percent_results = array(); 904 while (list($v,$n) = each($sum_results)) { 905 $percent_results[$v] = (100.0 * $n) / $n_total; 906 } 907 908 $this->writemsg("\n".$this->ddash."\n". 909 "TIME END " . date('Y-m-d H:i:s', $this->end_time) . "\n". 910 $this->ddash."\n". 911 "TEST RESULT SUMMARY\n". 912 $this->sdash."\n". 913 "Exts skipped : " . sprintf("%4d",$this->exts_skipped) . "\n". 914 "Exts tested : " . sprintf("%4d",$this->exts_tested) . "\n". 915 $this->sdash."\n". 916 "Number of tests : " . sprintf("%4d",$n_total) . "\n". 917 "Tests skipped : " . sprintf("%4d (%2.1f%%)",$sum_results['SKIPPED'],$percent_results['SKIPPED']) . "\n". 918 "Tests failed : " . sprintf("%4d (%2.1f%%)",$sum_results['FAILED'],$percent_results['FAILED']) . "\n". 919 "Tests passed : " . sprintf("%4d (%2.1f%%)",$sum_results['PASSED'],$percent_results['PASSED']) . "\n". 920 $this->sdash."\n". 921 "Time taken : " . sprintf("%4d seconds", $this->end_time - $this->start_time) . "\n". 922 $this->ddash."\n"); 923 924 $failed_test_summary = ''; 925 if ($this->failed_tests) { 926 $failed_test_summary .= "\n".$this->ddash."\n". 927 "FAILED TEST SUMMARY\n".$this->sdash."\n"; 928 foreach ($this->failed_tests as $failed_test_data) { 929 $failed_test_summary .= $failed_test_data['test_name'] . "\n"; 930 } 931 $failed_test_summary .= $this->ddash."\n"; 932 } 933 934 if ($failed_test_summary && !$this->conf['NO_PHPTEST_SUMMARY']) { 935 $this->writemsg($failed_test_summary); 936 } 937 938 /* We got failed Tests, offer the user to send and e-mail to QA team, unless NO_INTERACTION is set */ 939 if ($sum_results['FAILED'] && !$this->conf['NO_INTERACTION']) { 940 $fp = fopen("php://stdin", "r+"); 941 $this->writemsg("\nPlease allow this report to be send to the PHP QA\nteam. This will give us a better understanding in how\n"); 942 $this->writemsg("PHP's test cases are doing.\n"); 943 $this->writemsg("(choose \"s\" to just save the results to a file)? [Yns]: "); 944 flush(); 945 $user_input = fgets($fp, 10); 946 $just_save_results = (strtolower($user_input[0]) == 's'); 947 948 if ($just_save_results || strlen(trim($user_input)) == 0 || strtolower($user_input[0]) == 'y') { 949 /* 950 * Collect information about the host system for our report 951 * Fetch phpinfo() output so that we can see the PHP environment 952 * Make an archive of all the failed tests 953 * Send an email 954 */ 955 956 /* Ask the user to provide an email address, so that QA team can contact the user */ 957 if (!strncasecmp($user_input, 'y', 1) || strlen(trim($user_input)) == 0) { 958 echo "\nPlease enter your email address.\n(Your address will be mangled so that it will not go out on any\nmailinglist in plain text): "; 959 flush(); 960 $fp = fopen("php://stdin", "r+"); 961 $user_email = trim(fgets($fp, 1024)); 962 $user_email = str_replace("@", " at ", str_replace(".", " dot ", $user_email)); 963 } 964 965 $failed_tests_data = ''; 966 $sep = "\n" . str_repeat('=', 80) . "\n"; 967 968 $failed_tests_data .= $failed_test_summary . "\n"; 969 970 if (array_sum($this->failed_tests)) { 971 foreach ($this->failed_tests as $test_info) { 972 $failed_tests_data .= $sep . $test_info['name']; 973 $failed_tests_data .= $sep . file_get_contents(realpath($test_info['output'])); 974 $failed_tests_data .= $sep . file_get_contents(realpath($test_info['diff'])); 975 $failed_tests_data .= $sep . "\n\n"; 976 } 977 $status = "failed"; 978 } else { 979 $status = "success"; 980 } 981 982 $failed_tests_data .= "\n" . $sep . 'BUILD ENVIRONMENT' . $sep; 983 $failed_tests_data .= "OS:\n". PHP_OS. "\n\n"; 984 $automake = $autoconf = $libtool = $compiler = 'N/A'; 985 986 if (!$this->iswin32) { 987 $automake = shell_exec('automake --version'); 988 $autoconf = shell_exec('autoconf --version'); 989 /* Always use the generated libtool - Mac OSX uses 'glibtool' */ 990 $libtool = shell_exec('./libtool --version'); 991 /* Try the most common flags for 'version' */ 992 $flags = array('-v', '-V', '--version'); 993 $cc_status=0; 994 foreach($flags AS $flag) { 995 system($this->env['CC']." $flag >/dev/null 2>&1", $cc_status); 996 if($cc_status == 0) { 997 $compiler = shell_exec($this->env['CC']." $flag 2>&1"); 998 break; 999 } 1000 } 1001 } 1002 1003 $failed_tests_data .= "Automake:\n$automake\n"; 1004 $failed_tests_data .= "Autoconf:\n$autoconf\n"; 1005 $failed_tests_data .= "Libtool:\n$libtool\n"; 1006 $failed_tests_data .= "Compiler:\n$compiler\n"; 1007 $failed_tests_data .= "Bison:\n". @shell_exec('bison --version'). "\n"; 1008 $failed_tests_data .= "\n\n"; 1009 1010 if (isset($user_email)) { 1011 $failed_tests_data .= "User's E-mail: ".$user_email."\n\n"; 1012 } 1013 1014 $failed_tests_data .= $sep . "PHPINFO" . $sep; 1015 $failed_tests_data .= shell_exec($this->conf['TEST_PHP_EXECUTABLE'].' -dhtml_errors=0 -i'); 1016 1017 $compression = 0; 1018 1019 if ($just_save_results || 1020 !post_result_data("status=$status&version=".urlencode(TESTED_PHP_VERSION),$failed_tests_data)) { 1021 $output_file = 'php_test_results_' . date('Ymd_Hi') . ( $compression ? '.txt.gz' : '.txt' ); 1022 $fp = fopen($output_file, "w"); 1023 fwrite($fp, $failed_tests_data); 1024 fclose($fp); 1025 1026 if (!$just_save_results) 1027 echo "\nThe test script was unable to automatically send the report to PHP's QA Team\n"; 1028 echo "Please send ".$output_file." to ".PHP_QA_EMAIL." manually, thank you.\n"; 1029 } else { 1030 fwrite($fp, "\nThank you for helping to make PHP better.\n"); 1031 fclose($fp); 1032 } 1033 } 1034 } 1035 1036 if($this->conf['REPORT_EXIT_STATUS'] and $sum_results['FAILED']) { 1037 exit(1); 1038 } 1039 } 1040 1041 function getINISettings(&$section_text) 1042 { 1043 $ini_settings = $this->ini_overwrites; 1044 // Any special ini settings 1045 // these may overwrite the test defaults... 1046 if (array_key_exists('INI', $section_text)) { 1047 settings2array(preg_split( "/[\n\r]+/", $section_text['INI']), $ini_settings); 1048 } 1049 return $ini_settings; 1050 } 1051 1052 function getINIParams(&$section_text) 1053 { 1054 if (!$section_text) return ''; 1055 // XXX php5 current has a problem doing this in one line 1056 // it fails with Only variables can be passed by reference 1057 // on test ext\calendar\tests\jdtojewish.phpt 1058 // return settings2params($this->getINISettings($section_text)); 1059 $ini = $this->getINISettings($section_text); 1060 return settings2params($ini); 1061 } 1062 1063 function calculateDocumentRoot() 1064 { 1065 if ($this->conf['TEST_WEB'] || $this->test_executable_iscgi) { 1066 // configure DOCUMENT_ROOT for web tests 1067 // this assumes that directories from the base url 1068 // matches directory depth from the base path 1069 $parts = parse_url($this->conf['TEST_WEB_BASE_URL']); 1070 $depth = substr_count($parts['path'],'/'); 1071 $docroot = $this->conf['TEST_BASE_PATH']; 1072 for ($i=0 ; $i < $depth; $i++) $docroot = dirname($docroot); 1073 $this->conf['TEST_DOCUMENT_ROOT']=$docroot; 1074 $this->conf['TEST_BASE_SCRIPT_NAME']=$parts['path']; 1075 $this->conf['TEST_SERVER_URL']=substr($this->conf['TEST_WEB_BASE_URL'],0,strlen($this->conf['TEST_WEB_BASE_URL'])-strlen($parts['path'])); 1076 } else { 1077 $this->conf['TEST_DOCUMENT_ROOT']=''; 1078 $this->conf['TEST_BASE_SCRIPT_NAME']=''; 1079 $this->conf['TEST_SERVER_URL']=''; 1080 } 1081 } 1082 1083 function evalSettings($filename,$data) { 1084 // we eval the section so we can allow dynamic env vars 1085 // for cgi testing 1086 $filename = str_replace('\\','/',$filename); 1087 $cwd = str_replace('\\','/',$this->cwd); 1088 $filepath = dirname($filename); 1089 $scriptname = substr($filename,strlen($this->conf['TEST_DOCUMENT_ROOT'])); 1090 // eval fails if no newline 1091 return eval("$data\n"); 1092 } 1093 1094 function getENVSettings(&$section_text,$testfile) 1095 { 1096 $env = $this->env; 1097 // Any special environment settings 1098 // these may overwrite the test defaults... 1099 if (array_key_exists('ENV', $section_text)) { 1100 $sect = $this->evalSettings($testfile,$section_text['ENV']); 1101 //print "data evaled:\n$sect\n"; 1102 settings2array(preg_split( "/[\n\r]+/", $sect), $env); 1103 } 1104 return $env; 1105 } 1106 1107 function getEvalTestSettings($section_text,$testfile) 1108 { 1109 $rq = array(); 1110 // Any special environment settings 1111 // these may overwrite the test defaults... 1112 if ($section_text) { 1113 $sect = $this->evalSettings($testfile,$section_text); 1114 //print "data evaled:\n$sect\n"; 1115 settings2array(preg_split( "/[\n\r]+/", $sect), $rq); 1116 } 1117 return $rq; 1118 } 1119 1120 // 1121 // Load the sections of the test file. 1122 // 1123 function getSectionText($file) 1124 { 1125 // Load the sections of the test file. 1126 $section_text = array( 1127 'TEST' => '(unnamed test)', 1128 'SKIPIF' => '', 1129 'GET' => '', 1130 'ARGS' => '', 1131 '_FILE' => $file, 1132 '_DIR' => realpath(dirname($file)), 1133 ); 1134 1135 $fp = @fopen($file, "r") 1136 or $this->error("Cannot open test file: $file"); 1137 1138 $section = ''; 1139 while (!feof($fp)) { 1140 $line = fgets($fp); 1141 // Match the beginning of a section. 1142 if (preg_match('/^--([A-Z]+)--/',$line,$r)) { 1143 $section = $r[1]; 1144 $section_text[$section] = ''; 1145 continue; 1146 } 1147 1148 // Add to the section text. 1149 $section_text[$section] .= $line; 1150 } 1151 fclose($fp); 1152 foreach ($section_text as $k=>$v) { 1153 // for POST data ,we only want to trim the last new line! 1154 if ($k == 'POST' && preg_match('/^(.*?)\r?\n$/Ds',$v,$matches)) { 1155 $section_text[$k]=$matches[1]; 1156 } else { 1157 $section_text[$k]=trim($v); 1158 } 1159 } 1160 return $section_text; 1161 } 1162 1163 // 1164 // Check if test should be skipped. 1165 // 1166 function getSkipReason($file,&$section_text,$docgi=false) 1167 { 1168 // if the test uses POST or GET, and it's not the cgi 1169 // executable, skip 1170 if ($docgi && !$this->conf['TEST_WEB'] && !$this->test_executable_iscgi) { 1171 $this->showstatus($section_text['TEST'], 'SKIPPED', 'CGI Test needs CGI Binary'); 1172 return "SKIPPED"; 1173 } 1174 // if we're doing web testing, then we wont be able to set 1175 // ini setting on the command line. be sure the executables 1176 // ini settings are compatible with the test, or skip 1177 if (($docgi || $this->conf['TEST_WEB']) && 1178 isset($section_text['INI']) && $section_text['INI']) { 1179 $settings = $this->getINISettings($section_text); 1180 foreach ($settings as $k=>$v) { 1181 if (strcasecmp($v,'off')==0 || !$v) $v=''; 1182 $haveval = isset($this->inisettings[$k]['local_value']); 1183 if ($k == 'include_path') { 1184 // we only want to know that src directory 1185 // is in the include path 1186 if (strpos($this->inisettings[$k]['local_value'],$this->cwd)) 1187 continue; 1188 } 1189 if (($haveval && $this->inisettings[$k]['local_value'] != $v) || (!$haveval && $v)) { 1190 $this->showstatus($section_text['TEST'], 'SKIPPED', "Test requires ini setting $k=[$v], not [".($haveval?$this->inisettings[$k]['local_value']:'')."]"); 1191 return "SKIPPED"; 1192 } 1193 } 1194 } 1195 // now handle a SKIPIF section 1196 if ($section_text['SKIPIF']) { 1197 $output = trim($this->runscript($section_text['SKIPIF'],$this->test_executable_iscgi,realpath(dirname($file))),true); 1198 if (!$output) return NULL; 1199 if ($this->conf['TEST_PHP_DETAILED'] > 2) 1200 print "SKIPIF: [$output]\n"; 1201 if (preg_match("/^skip/i", $output)){ 1202 1203 $reason = (preg_match("/^skip\s*(.+)\$/", $output)) ? preg_replace("/^skip\s*(.+)\$/", "\\1", $output) : FALSE; 1204 $this->showstatus($section_text['TEST'], 'SKIPPED', $reason); 1205 return 'SKIPPED'; 1206 } 1207 if (preg_match("/^info/i", $output)) { 1208 $reason = (preg_match("/^info\s*(.+)\$/", $output)) ? preg_replace("/^info\s*(.+)\$/", "\\1", $output) : FALSE; 1209 if ($reason) { 1210 $tested .= " (info: $reason)"; 1211 } 1212 } 1213 } 1214 return NULL; 1215 } 1216 1217 // 1218 // Run an individual test case. 1219 // 1220 function run_test($file) 1221 { 1222 if ($this->conf['TEST_PHP_DETAILED']) 1223 $this->writemsg("\n=================\nTEST $file\n"); 1224 1225 $section_text = $this->getSectionText($file); 1226 1227 if ($this->iswin32) 1228 $shortname = str_replace($this->conf['TEST_BASE_PATH'].'\\', '', $file); 1229 else 1230 $shortname = str_replace($this->conf['TEST_BASE_PATH'].'/', '', $file); 1231 $tested = $section_text['TEST']." [$shortname]"; 1232 1233 if ($this->conf['TEST_WEB']) { 1234 $tmp_file = preg_replace('/\.phpt$/','.'.$this->conf['TEST_WEB_EXT'],$file); 1235 $uri = $this->conf['TEST_BASE_SCRIPT_NAME'].str_replace($this->conf['TEST_BASE_PATH'], '', $tmp_file); 1236 $uri = str_replace('\\', '/', $uri); 1237 } else { 1238 $tmp_file = preg_replace('/\.phpt$/','.php',$file); 1239 } 1240 @unlink($tmp_file); 1241 1242 // unlink old test results 1243 @unlink(preg_replace('/\.phpt$/','.diff',$file)); 1244 @unlink(preg_replace('/\.phpt$/','.log',$file)); 1245 @unlink(preg_replace('/\.phpt$/','.exp',$file)); 1246 @unlink(preg_replace('/\.phpt$/','.out',$file)); 1247 1248 if (!$this->conf['TEST_WEB']) { 1249 // Reset environment from any previous test. 1250 $env = $this->getENVSettings($section_text,$tmp_file); 1251 $ini_overwrites = $this->getINIParams($section_text); 1252 } 1253 1254 // if this is a cgi test, prepare for it 1255 $query_string = ''; 1256 $havepost = array_key_exists('POST', $section_text) && !empty($section_text['POST']); 1257 // allow empty query_string requests 1258 $haveget = array_key_exists('GET', $section_text) && !empty($section_text['GET']); 1259 $do_cgi = array_key_exists('CGI', $section_text) || $haveget || $havepost; 1260 1261 $skipreason = $this->getSkipReason($file,$section_text,$do_cgi); 1262 if ($skipreason == 'SKIPPED') { 1263 return $skipreason; 1264 } 1265 1266 // We've satisfied the preconditions - run the test! 1267 file_put_contents($tmp_file,$section_text['FILE']); 1268 1269 $post = NULL; 1270 $args = ""; 1271 1272 $headers = array(); 1273 if ($this->conf['TEST_WEB']) { 1274 $request = $this->getEvalTestSettings(@$section_text['REQUEST'],$tmp_file); 1275 $headers = $this->getEvalTestSettings(@$section_text['HEADERS'],$tmp_file); 1276 1277 $method = isset($request['method'])?$request['method']:$havepost?'POST':'GET'; 1278 $query_string = $haveget?$section_text['GET']:''; 1279 1280 $options = array(); 1281 $options['method']=$method; 1282 if (isset($this->conf['timeout'])) $options['timeout'] = $this->conf['timeout']; 1283 if (isset($this->conf['proxy_host'])) $options['proxy_host'] = $this->conf['proxy_host']; 1284 if (isset($this->conf['proxy_port'])) $options['proxy_port'] = $this->conf['proxy_port']; 1285 if (isset($this->conf['proxy_user'])) $options['proxy_user'] = $this->conf['proxy_user']; 1286 if (isset($this->conf['proxy_pass'])) $options['proxy_pass'] = $this->conf['proxy_pass']; 1287 1288 $post = $havepost?$section_text['POST']:NULL; 1289 $url = $this->conf['TEST_SERVER_URL']; 1290 if (isset($request['SCRIPT_NAME'])) 1291 $url .= $request['SCRIPT_NAME']; 1292 else 1293 $url .= $uri; 1294 if (isset($request['PATH_INFO'])) 1295 $url .= $request['PATH_INFO']; 1296 if (isset($request['FRAGMENT'])) 1297 $url .= '#'.$request['FRAGMENT']; 1298 if (isset($request['QUERY_STRING'])) 1299 $query_string = $request['QUERY_STRING']; 1300 if ($query_string) 1301 $url .= '?'.$query_string; 1302 if ($this->conf['TEST_PHP_DETAILED']) 1303 $this->writemsg("\nURL = $url\n"); 1304 } else if ($do_cgi) { 1305 $query_string = $haveget?$section_text['GET']:''; 1306 1307 if (!array_key_exists('GATEWAY_INTERFACE', $env)) 1308 $env['GATEWAY_INTERFACE']='CGI/1.1'; 1309 if (!array_key_exists('SERVER_SOFTWARE', $env)) 1310 $env['SERVER_SOFTWARE']='PHP Test Harness'; 1311 if (!array_key_exists('SERVER_SOFTWARE', $env)) 1312 $env['SERVER_NAME']='127.0.0.1'; 1313 if (!array_key_exists('REDIRECT_STATUS', $env)) 1314 $env['REDIRECT_STATUS']='200'; 1315 if (!array_key_exists('SERVER_NAME', $env)) 1316 $env['QUERY_STRING']=$query_string; 1317 if (!array_key_exists('PATH_TRANSLATED', $env) && 1318 !array_key_exists('SCRIPT_FILENAME', $env)) { 1319 $env['PATH_TRANSLATED']=$tmp_file; 1320 $env['SCRIPT_FILENAME']=$tmp_file; 1321 } 1322 if (!array_key_exists('PATH_TRANSLATED', $env)) 1323 $env['PATH_TRANSLATED']=''; 1324 if (!array_key_exists('PATH_INFO', $env)) 1325 $env['PATH_INFO']=''; 1326 if (!array_key_exists('SCRIPT_NAME', $env)) 1327 $env['SCRIPT_NAME']=''; 1328 if (!array_key_exists('SCRIPT_FILENAME', $env)) 1329 $env['SCRIPT_FILENAME']=''; 1330 1331 if (array_key_exists('POST', $section_text) && (!$haveget || !empty($section_text['POST']))) { 1332 $post = $section_text['POST']; 1333 $content_length = strlen($post); 1334 if (!array_key_exists('REQUEST_METHOD', $env)) 1335 $env['REQUEST_METHOD']='POST'; 1336 if (!array_key_exists('CONTENT_TYPE', $env)) 1337 $env['CONTENT_TYPE']='application/x-www-form-urlencoded'; 1338 if (!array_key_exists('CONTENT_LENGTH', $env)) 1339 $env['CONTENT_LENGTH']=$content_length; 1340 } else { 1341 if (!array_key_exists('REQUEST_METHOD', $env)) 1342 $env['REQUEST_METHOD']='GET'; 1343 if (!array_key_exists('CONTENT_TYPE', $env)) 1344 $env['CONTENT_TYPE']=''; 1345 if (!array_key_exists('CONTENT_LENGTH', $env)) 1346 $env['CONTENT_LENGTH']=''; 1347 } 1348 if ($this->conf['TEST_PHP_DETAILED'] > 1) 1349 $this->writemsg("\nCONTENT_LENGTH = " . $env['CONTENT_LENGTH'] . 1350 "\nCONTENT_TYPE = " . $env['CONTENT_TYPE'] . 1351 "\nPATH_TRANSLATED = " . $env['PATH_TRANSLATED'] . 1352 "\nPATH_INFO = " . $env['PATH_INFO'] . 1353 "\nQUERY_STRING = " . $env['QUERY_STRING'] . 1354 "\nREDIRECT_STATUS = " . $env['REDIRECT_STATUS'] . 1355 "\nREQUEST_METHOD = " . $env['REQUEST_METHOD'] . 1356 "\nSCRIPT_NAME = " . $env['SCRIPT_NAME'] . 1357 "\nSCRIPT_FILENAME = " . $env['SCRIPT_FILENAME'] . "\n"); 1358 /* not cgi spec to put query string on command line, 1359 but used by a couple tests to catch a security hole 1360 in older php versions. At least IIS can be configured 1361 to do this. */ 1362 $args = $env['QUERY_STRING']; 1363 $args = "$ini_overwrites $tmp_file \"$args\" 2>&1"; 1364 } else { 1365 $args = $section_text['ARGS'] ? $section_text['ARGS'] : ''; 1366 $args = "$ini_overwrites $tmp_file $args 2>&1"; 1367 } 1368 1369 if ($this->conf['TEST_WEB']) { 1370 // we want headers also, so fopen 1371 $r = new HTTPRequest($url,$headers,$options,$post); 1372 //$out = preg_replace("/\r\n/","\n",$r->response); 1373 $out = $r->response; 1374 $headers = $r->response_headers; 1375 //print $r->outgoing_payload."\n"; 1376 //print $r->incoming_payload."\n"; 1377 } else { 1378 $out = execute($this->conf['TEST_PHP_EXECUTABLE'],$args,$post,$this->cwd,$env); 1379 // if this is a cgi, remove the headers first 1380 if ($this->test_executable_iscgi 1381 && preg_match("/^(.*?)\r?\n\r?\n(.*)/s", $out, $match)) { 1382 $out = $match[2]; 1383 $rh = preg_split("/[\n\r]+/",$match[1]); 1384 $headers = array(); 1385 foreach ($rh as $line) { 1386 if (strpos($line, ':')!==false) { 1387 $line = explode(":", $line, 2); 1388 $headers[trim($line[0])] = trim($line[1]); 1389 } 1390 } 1391 } 1392 } 1393 1394 if ($this->conf['TEST_PHP_DETAILED'] > 2) { 1395 echo "HEADERS: "; 1396 print_r($headers); 1397 echo "OUTPUT: \n$out\n"; 1398 1399 } 1400 1401 // Does the output match what is expected? 1402 $output = trim($out); 1403 $output = preg_replace('/\r\n/',"\n",$output); 1404 1405 $failed = FALSE; 1406 1407 if (isset($section_text['EXPECTF']) || isset($section_text['EXPECTREGEX'])) { 1408 if (isset($section_text['EXPECTF'])) { 1409 $wanted = $section_text['EXPECTF']; 1410 } else { 1411 $wanted = $section_text['EXPECTREGEX']; 1412 } 1413 $wanted_re = preg_replace('/\r\n/',"\n",$wanted); 1414 if (isset($section_text['EXPECTF'])) { 1415 // do preg_quote, but miss out any %r delimited sections 1416 $temp = ""; 1417 $r = "%r"; 1418 $startOffset = 0; 1419 $length = strlen($wanted_re); 1420 while($startOffset < $length) { 1421 $start = strpos($wanted_re, $r, $startOffset); 1422 if ($start !== false) { 1423 // we have found a start tag 1424 $end = strpos($wanted_re, $r, $start+2); 1425 if ($end === false) { 1426 // unbalanced tag, ignore it. 1427 $end = $start = $length; 1428 } 1429 } else { 1430 // no more %r sections 1431 $start = $end = $length; 1432 } 1433 // quote a non re portion of the string 1434 $temp = $temp . preg_quote(substr($wanted_re, $startOffset, ($start - $startOffset)), '/'); 1435 // add the re unquoted. 1436 if ($end > $start) { 1437 $temp = $temp . '(' . substr($wanted_re, $start+2, ($end - $start-2)). ')'; 1438 } 1439 $startOffset = $end + 2; 1440 } 1441 $wanted_re = $temp; 1442 1443 $wanted_re = str_replace( 1444 array('%binary_string_optional%'), 1445 'string', 1446 $wanted_re 1447 ); 1448 $wanted_re = str_replace( 1449 array('%unicode_string_optional%'), 1450 'string', 1451 $wanted_re 1452 ); 1453 $wanted_re = str_replace( 1454 array('%unicode\|string%', '%string\|unicode%'), 1455 'string', 1456 $wanted_re 1457 ); 1458 $wanted_re = str_replace( 1459 array('%u\|b%', '%b\|u%'), 1460 '', 1461 $wanted_re 1462 ); 1463 // Stick to basics 1464 $wanted_re = str_replace('%e', '\\' . DIRECTORY_SEPARATOR, $wanted_re); 1465 $wanted_re = str_replace('%s', '[^\r\n]+', $wanted_re); 1466 $wanted_re = str_replace('%S', '[^\r\n]*', $wanted_re); 1467 $wanted_re = str_replace('%a', '.+', $wanted_re); 1468 $wanted_re = str_replace('%A', '.*', $wanted_re); 1469 $wanted_re = str_replace('%w', '\s*', $wanted_re); 1470 $wanted_re = str_replace('%i', '[+-]?\d+', $wanted_re); 1471 $wanted_re = str_replace('%d', '\d+', $wanted_re); 1472 $wanted_re = str_replace('%x', '[0-9a-fA-F]+', $wanted_re); 1473 $wanted_re = str_replace('%f', '[+-]?\.?\d+\.?\d*(?:[Ee][+-]?\d+)?', $wanted_re); 1474 $wanted_re = str_replace('%c', '.', $wanted_re); 1475 // %f allows two points "-.0.0" but that is the best *simple* expression 1476 1477 } 1478 /* DEBUG YOUR REGEX HERE 1479 var_dump($wanted_re); 1480 print(str_repeat('=', 80) . "\n"); 1481 var_dump($output); 1482 */ 1483 $failed = !preg_match("/^$wanted_re\$/s", $output); 1484 } 1485 1486 $skipexpect = false; 1487 if (!$failed && $this->conf['TEST_WEB'] && isset($section_text['EXPECTHEADERS'])) { 1488 $want = array(); 1489 $lines = preg_split("/[\n\r]+/",$section_text['EXPECTHEADERS']); 1490 $wanted=''; 1491 foreach ($lines as $line) { 1492 if (strpos($line, ':')!==false) { 1493 $line = explode(":", $line, 2); 1494 $want[trim($line[0])] = trim($line[1]); 1495 $wanted .= trim($line[0]).': '.trim($line[1])."\n"; 1496 } 1497 } 1498 $output=''; 1499 foreach ($want as $k=>$v) { 1500 $output .= "$k: {$headers[$k]}\n"; 1501 if (!isset($headers[$k]) || $headers[$k] != $v) { 1502 $failed = TRUE; 1503 } 1504 } 1505 1506 // different servers may do different things on non-200 results 1507 // for instance, IIS will deliver it's own error pages, so we 1508 // cannot expect to match up the EXPECT section. We may however, 1509 // want to match EXPECT on more than 200 results, so this may 1510 // need to change later. 1511 $skipexpect = isset($headers['Status']) && $headers['Status'] != 200; 1512 } 1513 1514 if (!$failed && !$skipexpect && isset($section_text['EXPECT'])) { 1515 $wanted = $section_text['EXPECT']; 1516 $wanted = preg_replace('/\r\n/',"\n",$wanted); 1517 $failed = (0 != strcmp($output,$wanted)); 1518 } 1519 1520 if (!$failed) { 1521 @unlink($tmp_file); 1522 $this->showstatus($tested, 'PASSED'); 1523 return 'PASSED'; 1524 } 1525 1526 // Test failed so we need to report details. 1527 $this->showstatus($tested, 'FAILED'); 1528 1529 $this->failed_tests[] = array( 1530 'name' => $file, 1531 'test_name' => $tested, 1532 'output' => preg_replace('/\.phpt$/','.log', $file), 1533 'diff' => preg_replace('/\.phpt$/','.diff', $file) 1534 ); 1535 1536 if ($this->conf['TEST_PHP_DETAILED']) 1537 $this->writemsg(generate_diff($wanted,$output)."\n"); 1538 1539 // write .exp 1540 if (strpos($this->conf['TEST_PHP_LOG_FORMAT'],'E') !== FALSE) { 1541 $logname = preg_replace('/\.phpt$/','.exp',$file); 1542 file_put_contents($logname,$wanted); 1543 } 1544 1545 // write .out 1546 if (strpos($this->conf['TEST_PHP_LOG_FORMAT'],'O') !== FALSE) { 1547 $logname = preg_replace('/\.phpt$/','.out',$file); 1548 file_put_contents($logname,$output); 1549 } 1550 1551 // write .diff 1552 if (strpos($this->conf['TEST_PHP_LOG_FORMAT'],'D') !== FALSE) { 1553 $logname = preg_replace('/\.phpt$/','.diff',$file); 1554 file_put_contents($logname,generate_diff($wanted,$output)); 1555 } 1556 1557 // write .log 1558 if (strpos($this->conf['TEST_PHP_LOG_FORMAT'],'L') !== FALSE) { 1559 $logname = preg_replace('/\.phpt$/','.log',$file); 1560 file_put_contents($logname, 1561 "\n---- EXPECTED OUTPUT\n$wanted\n". 1562 "---- ACTUAL OUTPUT\n$output\n". 1563 "---- FAILED\n"); 1564 // display emacs/msvc error output 1565 if (strpos($this->conf['TEST_PHP_LOG_FORMAT'],'C') !== FALSE) { 1566 $this->error_report($file,$logname,$tested); 1567 } 1568 } 1569 return 'FAILED'; 1570 } 1571 1572 // 1573 // Write an error in a format recognizable to Emacs or MSVC. 1574 // 1575 function error_report($testname,$logname,$tested) 1576 { 1577 $testname = realpath($testname); 1578 $logname = realpath($logname); 1579 switch ($this->conf['TEST_PHP_ERROR_STYLE']) { 1580 default: 1581 case 'MSVC': 1582 $this->writemsg($testname . "(1) : $tested\n"); 1583 $this->writemsg($logname . "(1) : $tested\n"); 1584 break; 1585 case 'EMACS': 1586 $this->writemsg($testname . ":1: $tested\n"); 1587 $this->writemsg($logname . ":1: $tested\n"); 1588 break; 1589 } 1590 } 1591 1592 function error($message) 1593 { 1594 $this->writemsg("ERROR: {$message}\n"); 1595 exit(1); 1596 } 1597} 1598 1599$test = new testHarness(); 1600/* 1601 * Local variables: 1602 * tab-width: 4 1603 * c-basic-offset: 4 1604 * End: 1605 * vim600: fdm=marker 1606 * vim: noet sw=4 ts=4 1607 */ 1608?> 1609
