Viewing file:  compare_backwards.php (2.62 KB) -rw-rw-r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
/*
* phc -- the open source PHP compiler
* See doc/license/README.license for licensing information
*
*
*/
function get_pass_list ()
{
global $phc;
static $cache = false; // we only need to call this once
if ($cache === false)
{
list ($out, $err, $exit) = complete_exec ("$phc --list-passes");
assert ($out and $err === "" and $exit === 0);
preg_match_all ("/([a-zA-Z-_0-9]+)\s+\((enabled|disabled)\s+- (AST|HIR|MIR|LIR)\)\s+.+/", $out, $matches);
$cache = $matches[1];
}
return $cache;
}
class CompareBackwards extends AsyncTest
{
function __construct ($last_pass, $dump = "dump", $dependency = "BasicParseTest")
{
$this->last_pass = $last_pass;
$this->name = "cb_$last_pass";
// this might be dump-uppered
$this->dump = $dump;
$this->dependencies = array ($dependency);
parent::__construct ();
}
function get_name ()
{
return $this->name;
}
function get_test_subjects ()
{
return get_interpretable_scripts ();
}
function run_test ($subject)
{
global $phc;
$bundle = new AsyncBundle ($this, $subject);
$bundle->commands[0] = get_php_command_line ($subject);
$bundle->out_handlers[0] = "homogenize_output";
$bundle->callbacks[0] = NULL;
$commands = array ();
foreach (get_pass_list () as $pass)
{
array_unshift ($commands, $this->get_command_line ($subject, $this->dump, $pass));
if ($this->last_pass == $pass)
break;
}
// A slightly different approach here. We add all the passes. As
// soon as once succeeds, we pass the test. If none succeeds, the
// fail.
foreach ($commands as $command)
{
$bundle->commands[] = $command;
$bundle->out_handlers[] = "homogenize_output";
$bundle->callbacks[] = "check_output";
}
$bundle->final = "finish";
$bundle->start ();
}
function check_output ($out, $err, $exit, $bundle)
{
if ($bundle->outs[0] === $out
&& $bundle->errs[0] === $err
&& $bundle->exits[0] === $exit)
{
// correct
if ($bundle->state == 1)
{
// right first time
$this->async_success ($bundle);
}
else
{
// the pass which succeeded isnt the last pass
$this->async_failure ("Latest pass fails", $bundle);
}
return false; // dont process again
}
return true; // keep processing
}
function get_command_line ($subject, $dump, $pass_name)
{
global $phc;
$pipe_command = get_php_command_line ($subject, "pipe");
return "$phc --no-hash-bang --$dump=$pass_name $subject | $pipe_command";
}
function finish ($bundle)
{
$this->async_failure ("Every pass fails", $bundle);
}
function homogenize_output ($output, $bundle)
{
return homogenize_all ($output, $bundle->subject);
}
}
|