public function test_arrays()
{
$code = '<?php
/** @param mixed $a */
function func($a) {}
class a {
/** @param int $x */
function a($x) {}
}
$x = array();
$x[] = 4;
$x[] = 5;
$y = $x;
$x = array();
$z = clone $y;
$z[] = 6;
$c = array(1,2,3,array(array(\'abc\',2)));
func($c[0]);
func($c[1]);
func($c[2]);
func($c[3][0]);
func($c[3][0][0]);
func($c[3][0][1]);
func($c[4]);
func($c[3][0][1][0]);
$a = array();
$a[] = new a(1);
$a[] = 4;
$a[] = 5;
$a["Abc"] = "me";
$d = array(0,array(1),2,3);
$d[1][0] = 2;
$e = array();
$e{1} = 4;
$e{"foo"} = 5;
class foo {
public function bar() {
$a = array(
0 => 4,
self::R_TYPESCANNER => array(),
);
}
}
/** @return array */
function f() {
return $_;
}
$g = f();
$g[] = 1;
?>';
list(, , $vars, $calls, $errors) = $this->analyze($code);
self::assert_equals(0, count($errors));
$args = $calls[0]->get_arguments();
self::assert_equals((string) PC_Obj_MultiType::create_int(1), (string) $args[0]);
$args = $calls[1]->get_arguments();
self::assert_equals((string) PC_Obj_MultiType::create_int(2), (string) $args[0]);
$args = $calls[2]->get_arguments();
self::assert_equals((string) PC_Obj_MultiType::create_int(3), (string) $args[0]);
$args = $calls[3]->get_arguments();
$type = PC_Obj_MultiType::create_array(array());
$type->get_first()->set_array_type(0, PC_Obj_MultiType::create_string('abc'));
$type->get_first()->set_array_type(1, PC_Obj_MultiType::create_int(2));
self::assert_equals((string) $type, (string) $args[0]);
$args = $calls[4]->get_arguments();
self::assert_equals((string) PC_Obj_MultiType::create_string('abc'), (string) $args[0]);
$args = $calls[5]->get_arguments();
self::assert_equals((string) PC_Obj_MultiType::create_int(2), (string) $args[0]);
$args = $calls[6]->get_arguments();
self::assert_equals((string) new PC_Obj_MultiType(), (string) $args[0]);
$args = $calls[7]->get_arguments();
self::assert_equals((string) new PC_Obj_MultiType(), (string) $args[0]);
$global = $vars[PC_Obj_Variable::SCOPE_GLOBAL];
self::assert_equals((string) PC_Obj_Type::get_type_by_value(array()), (string) $global['x']->get_type());
self::assert_equals((string) PC_Obj_Type::get_type_by_value(array(4, 5)), (string) $global['y']->get_type());
self::assert_equals((string) PC_Obj_Type::get_type_by_value(array(4, 5, 6)), (string) $global['z']->get_type());
$type = PC_Obj_MultiType::create_array(array());
$type->get_first()->set_array_type(0, PC_Obj_MultiType::create_object('a'));
$type->get_first()->set_array_type(1, PC_Obj_MultiType::create_int(4));
$type->get_first()->set_array_type(2, PC_Obj_MultiType::create_int(5));
$type->get_first()->set_array_type('Abc', PC_Obj_MultiType::create_string('me'));
self::assert_equals((string) $type, (string) $global['a']->get_type());
$type = PC_Obj_MultiType::create_array(array());
$type->get_first()->set_array_type(0, PC_Obj_MultiType::create_int(0));
$subtype = PC_Obj_MultiType::create_array(array());
$subtype->get_first()->set_array_type(0, PC_Obj_MultiType::create_int(2));
$type->get_first()->set_array_type(1, $subtype);
$type->get_first()->set_array_type(2, PC_Obj_MultiType::create_int(2));
$type->get_first()->set_array_type(3, PC_Obj_MultiType::create_int(3));
self::assert_equals((string) $type, (string) $global['d']->get_type());
$bar = $vars['foo::bar'];
self::assert_equals('array', (string) $bar['a']->get_type());
$type = PC_Obj_MultiType::create_array(array());
$type->get_first()->set_array_type(1, PC_Obj_MultiType::create_int(4));
$type->get_first()->set_array_type("foo", PC_Obj_MultiType::create_int(5));
self::assert_equals((string) $type, (string) $global['e']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $global['g']->get_type());
}
/**
* Determines the type for the given type name, which is used, e.g., for return specifications.
*
* @param string $name the name
* @return PC_Obj_MultiType the type
*/
public function get_type_by_name($name)
{
switch ($name) {
case 'array':
return PC_Obj_MultiType::create_array();
case 'callable':
return PC_Obj_MultiType::create_callable();
case 'bool':
return PC_Obj_MultiType::create_bool();
case 'float':
return PC_Obj_MultiType::create_float();
case 'int':
return PC_Obj_MultiType::create_int();
case 'string':
return PC_Obj_MultiType::create_string();
case 'self':
// TODO get class name
return PC_Obj_MultiType::create_object();
default:
return PC_Obj_MultiType::create_object($name);
}
}
/**
* Handles the given binary-operator
*
* @param string $op the operator (+,-,...)
* @param PC_Obj_MultiType $e1 the left expression
* @param PC_Obj_MultiType $e2 the right expression
* @return PC_Obj_MultiType the result
*/
public function handle_bin_op($op, $e1, $e2)
{
if (!$e1 instanceof PC_Obj_MultiType) {
return $this->handle_error('$e1 is invalid');
}
if (!$e2 instanceof PC_Obj_MultiType) {
return $this->handle_error('$e2 is invalid');
}
// if we're in a loop, don't try to provide the value since we don't know how often it is done
if ($this->vars->is_in_loop()) {
return $this->get_type_from_op($op, $e1, $e2);
}
// if we don't know one of the types or values, try to determine the type by the operator
if ($e1->is_val_unknown() || $e2->is_val_unknown()) {
return $this->get_type_from_op($op, $e1, $e2);
}
// if we have an array-operation, check if we know all elements
if ($e1->get_array() !== null && $e2->get_array() !== null) {
// if not, we know at least, that its an array
if ($e1->is_array_unknown() || $e2->is_array_unknown()) {
return PC_Obj_MultiType::create_array();
}
}
// type and value is known, therefore calculate the result
$res = 0;
$rval = $e2->get_first()->get_value_for_eval();
// prevent division-by-zero error
if ($op == '/' && $rval == 0) {
return PC_Obj_MultiType::create_int();
}
eval('$res = ' . $e1->get_first()->get_value_for_eval() . ' ' . $op . ' ' . $rval . ';');
return $this->get_type_from_php($res);
}
public function test__set_state()
{
// public static object __set_state( array $props )
$code = '<?php
class A {
public function __set_state($arr);
}
class B {
public static function __set_state($arr);
}
?>';
list(, $classes, , , $errors) = $this->analyze($code);
$params = array(new PC_Obj_Parameter('props', PC_Obj_MultiType::create_array()));
$m = $classes['a']->get_method('__set_state');
self::assertParamsEqual($params, $m->get_params());
self::assert_equals((string) PC_Obj_MultiType::create_object(), (string) $m->get_return_type());
$m = $classes['b']->get_method('__set_state');
self::assertParamsEqual($params, $m->get_params());
self::assert_equals((string) PC_Obj_MultiType::create_object(), (string) $m->get_return_type());
self::assert_equals(3, count($errors));
$error = $errors[0];
self::assert_equals(PC_Obj_Error::E_S_RET_SPEC_BUT_NO_RET, $error->get_type());
self::assert_regex('/The function\\/method "#A#::__set_state" has a return-specification in PHPDoc, but does not return a value/', $error->get_msg());
$error = $errors[1];
self::assert_equals(PC_Obj_Error::E_T_MAGIC_IS_STATIC, $error->get_type());
self::assert_regex('/The magic method "#B#::__set_state" should not be static/', $error->get_msg());
$error = $errors[2];
self::assert_equals(PC_Obj_Error::E_S_RET_SPEC_BUT_NO_RET, $error->get_type());
self::assert_regex('/The function\\/method "#B#::__set_state" has a return-specification in PHPDoc, but does not return a value/', $error->get_msg());
}
public function test_special()
{
$code = '<?php
$u = `foo`;
// we can even say the type/value of variable variables if we can figure out the variable name ^^
$v = "u";
$w = ${$v};
$x = ${"unknown var"};
$y = ${123};
// array-union works when all values are known
$z = array("a" => 1,"c" => 123,"d" => 5) + array("a" => 2,"b" => 4);
$aa = array(array($_,1)) + array(2);
// comparison is just bool
$ab = array(1) === array(1);
$ac = array(1,"2") == array(1,2);
$ad = array(1) <> array($_);
$ba = 1 ? 0 : 2;
$bb = 4 ? "bla" : "blub";
$bc = $_ ? 1 : 2;
$bd = $_ ? "foo" : 1;
$be = (1) ? ((2) ? "a" : "b") : "c";
$bf = 1 ?: -1;
$bg = "f" ?: "g";
?>';
list(, , $vars, , $errors) = $this->analyze($code);
self::assert_equals(0, count($errors));
$global = $vars[PC_Obj_Variable::SCOPE_GLOBAL];
self::assert_equals((string) PC_Obj_MultiType::create_string(), (string) $global['u']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string(), (string) $global['w']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['x']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['y']->get_type());
self::assert_equals((string) PC_Obj_Type::get_type_by_value(array("a" => 1, "c" => 123, "d" => 5, "b" => 4)), (string) $global['z']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $global['aa']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(), (string) $global['ab']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(), (string) $global['ac']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(), (string) $global['ad']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(0), (string) $global['ba']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string("bla"), (string) $global['bb']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(), (string) $global['bc']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::STRING, "foo"), new PC_Obj_Type(PC_Obj_Type::INT, 1))), (string) $global['bd']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string("a"), (string) $global['be']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(1), (string) $global['bf']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(-1), (string) $global['bg']->get_type());
}
function yy_r454()
{
$this->_retvalue = PC_Obj_MultiType::create_array(array());
$this->_retvalue->get_first()->set_array_type($this->yystack[$this->yyidx + 0]->minor['key'], $this->yystack[$this->yyidx + 0]->minor['val'], $this->yystack[$this->yyidx + 0]->minor['append']);
}
public function test_loops()
{
$code = '<?php
/** @param array $x */
function func($x) {}
$a = 0;
while(true)
$a++;
// now we know that its still an integer, but dont know the value
// because we dont know how often the loop is executed; therefore, when changing a variable in a
// loop, we can never say its value after the loop
$b = "str";
foreach(array() as $_ => $_)
$b .= "foo";
// same here, string without value
for($c = 0; $c < 10; $c++)
;
// $c wasnt known before, therefore unknown.
// TODO actually we would know that its an integer because $c = 0 and $c < 10 is always executed
$d = 12;
do {
$d = true;
}
while(1);
// $d was known before, therefore int or bool
while(true)
{
$e = 4;
$e = 5;
}
// $d wasnt known before, therefore unknown.
do {
$f = 4;
}
while(1);
// $f wasnt known before, therefore unknown.
$g = array();
while($_)
{
$g[] = 1;
$g[44] = 2;
echo $g[3];
$h = array();
$h[] = 1;
// $h is known here
func($h);
}
// the array content of $g is now unknown
$i = array();
while($_)
{
$i[] = 1;
func($i);
$i = 1;
}
// $i is now either array() or integer=1
?>';
list(, , $vars, $calls, $errors) = $this->analyze($code);
self::assert_equals(0, count($errors));
$global = $vars[PC_Obj_Variable::SCOPE_GLOBAL];
self::assert_equals((string) PC_Obj_MultiType::create_int(), (string) $global['a']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string(), (string) $global['b']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['c']->get_type());
$type = new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::BOOL, true), new PC_Obj_Type(PC_Obj_Type::INT, 12)));
self::assert_equals((string) $type, (string) $global['d']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['e']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['f']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $global['g']->get_type());
$type = new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::INT, 1), new PC_Obj_Type(PC_Obj_Type::TARRAY, array())));
self::assert_equals((string) $type, (string) $global['i']->get_type());
self::assert_equals(2, count($calls));
self::assert_equals('func(array={0 = integer=1;})', $calls[0]);
self::assert_equals('func(array={0 = integer=1;})', $calls[1]);
}
/**
* Checks if the given method is "magic". If so it adds automatically parameter-types (if not
* already set).
*
* @param string $classname the class-name
* @param PC_Obj_Method $method the method
* @return bool true if handled
*/
private function handle_magic($classname, $method)
{
// the magic-methods:
// public void __set ( string $name , mixed $value )
// public mixed __get ( string $name )
// public bool __isset ( string $name )
// public void __unset ( string $name )
// public mixed __call ( string $name , array $arguments )
// public mixed __callStatic ( string $name , array $arguments )
// * array __sleep( void )
// * void__wakeup( void )
// public string __toString( void )
// public void __invoke( ... )
// public static object __set_state( array $props )
// * void __clone( void )
$ismagic = true;
$visibility = PC_Obj_Visible::V_PUBLIC;
$static = false;
$expected = null;
switch (strtolower($method->get_name())) {
case '__set':
$expected = array(new PC_Obj_Parameter('name', PC_Obj_MultiType::create_string()), new PC_Obj_Parameter('value', new PC_Obj_MultiType()));
break;
case '__isset':
case '__unset':
case '__get':
$expected = array(new PC_Obj_Parameter('name', PC_Obj_MultiType::create_string()));
break;
case '__call':
case '__callstatic':
$expected = array(new PC_Obj_Parameter('name', PC_Obj_MultiType::create_string()), new PC_Obj_Parameter('arguments', PC_Obj_MultiType::create_array()));
break;
case '__tostring':
$expected = array();
break;
case '__sleep':
case '__wakeup':
case '__clone':
$visibility = null;
// may be private or protected
$expected = array();
break;
case '__invoke':
$static = true;
break;
case '__set_state':
$expected = array(new PC_Obj_Parameter('props', PC_Obj_MultiType::create_array()));
break;
default:
$ismagic = false;
break;
}
if (!$ismagic) {
return false;
}
if ($visibility !== null && $method->get_visibility() != $visibility) {
$this->report($method, 'The magic method "#' . $classname . '#::' . $method->get_name() . '" should be public', PC_Obj_Error::E_T_MAGIC_NOT_PUBLIC);
}
if ($static && !$method->is_static()) {
$this->report($method, 'The magic method "#' . $classname . '#::' . $method->get_name() . '" should be static', PC_Obj_Error::E_T_MAGIC_NOT_STATIC);
} else {
if (!$static && $method->is_static()) {
$this->report($method, 'The magic method "#' . $classname . '#::' . $method->get_name() . '" should not be static', PC_Obj_Error::E_T_MAGIC_IS_STATIC);
}
}
if ($expected !== null) {
$changed = false;
if ($this->check_params($classname, $method, $expected, $method->get_params())) {
// set parameter-descriptions
$i = 0;
foreach ($method->get_params() as $param) {
$param->set_mtype($expected[$i++]->get_mtype());
$param->set_has_doc(true);
$changed = true;
}
}
$return = new PC_Obj_MultiType();
switch (strtolower($method->get_name())) {
case '__set':
case '__unset':
case '__wakeup':
case '__clone':
$return = PC_Obj_MultiType::create_void();
break;
case '__set_state':
$return = PC_Obj_MultiType::create_object();
break;
case '__isset':
$return = PC_Obj_MultiType::create_bool();
break;
case '__sleep':
$return = PC_Obj_MultiType::create_array();
break;
case '__tostring':
$return = PC_Obj_MultiType::create_string();
break;
}
if ($method->has_return_doc() && !$this->env->get_types()->is_type_conforming($method->get_return_type(), $return)) {
// its ok to specify a more specific return-value if the expected one is "mixed"
if (!$return->is_unknown()) {
$this->report($method, 'The return-type of the magic-method "#' . $classname . '#::' . $method->get_name() . '" is invalid ' . '(expected="' . $return . '", found="' . $method->get_return_type() . '")', PC_Obj_Error::E_T_MAGIC_METHOD_RET_INVALID);
}
}
if ($return !== null && !$method->has_return_doc()) {
$method->set_return_type($return);
$method->set_has_return_doc(true);
$changed = true;
}
if ($changed) {
$this->env->get_storage()->update_function($method, $method->get_class());
}
}
return true;
}
/**
* Creates a variable with type TARRAY and given value
*
* @param string $file the file of the def
* @param int $line the line of the def
* @param array $value the value
* @param string $varname optionally, the variable-name
* @return PC_Obj_Variable the variable
*/
public static function create_array($file, $line, $value = null, $varname = '')
{
return new self($file, $line, $varname, PC_Obj_MultiType::create_array($value));
}
public function test_oop()
{
list(, $classes, $vars, $calls, $errors) = $this->analyze(self::$code);
self::assert_equals(0, count($errors));
$a = $classes['a'];
/* @var $a PC_Obj_Class */
self::assert_equals(false, $a->is_abstract());
self::assert_equals(false, $a->is_interface());
self::assert_equals(false, $a->is_final());
self::assert_equals(null, $a->get_super_class());
self::assert_equals(array(), $a->get_interfaces());
self::assert_equals((string) PC_Obj_MultiType::create_int(0), (string) $a->get_constant('c')->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(4), (string) $a->get_constant('ME')->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string('str'), (string) $a->get_constant('YOU')->get_type());
self::assert_equals((string) new PC_Obj_Field('', 0, 'f', PC_Obj_MultiType::create_string('abc'), PC_Obj_Field::V_PRIVATE), (string) $a->get_field('f'));
self::assert_equals((string) new PC_Obj_Field('', 0, 'foo', PC_Obj_MultiType::get_type_by_name('int|string'), PC_Obj_Field::V_PRIVATE), (string) $a->get_field('foo'));
self::assert_equals((string) new PC_Obj_Field('', 0, 'bar', PC_Obj_MultiType::get_type_by_name('int|string'), PC_Obj_Field::V_PRIVATE), (string) $a->get_field('bar'));
self::assert_equals((string) new PC_Obj_Field('', 0, 'a', PC_Obj_MultiType::create_string(), PC_Obj_Field::V_PRIVATE), (string) $a->get_field('a'));
self::assert_equals((string) new PC_Obj_Field('', 0, 'b', PC_Obj_MultiType::create_string('a'), PC_Obj_Field::V_PRIVATE), (string) $a->get_field('b'));
$array = PC_Obj_MultiType::create_array(array());
$array->get_first()->set_array_type(0, PC_Obj_MultiType::create_int(1));
$array->get_first()->set_array_type(1, PC_Obj_MultiType::create_int(2));
$array->get_first()->set_array_type(2, PC_Obj_MultiType::create_int(3));
self::assert_equals((string) new PC_Obj_Field('', 0, 'p', $array, PC_Obj_Field::V_PROTECTED), (string) $a->get_field('p'));
self::assert_equals('public function __construct()', (string) $a->get_method('__construct'));
self::assert_equals('protected function test(): void', (string) $a->get_method('test'));
self::assert_equals('public function test2(a): a', (string) $a->get_method('test2'));
$b = $classes['b'];
/* @var $b PC_Obj_Class */
self::assert_equals(true, $b->is_abstract());
self::assert_equals(false, $b->is_interface());
self::assert_equals(false, $b->is_final());
self::assert_equals('a', $b->get_super_class());
self::assert_equals(array('i', 'j'), $b->get_interfaces());
self::assert_equals((string) PC_Obj_MultiType::create_int(0), (string) $b->get_constant('c')->get_type());
self::assert_equals(null, $b->get_field('f'));
self::assert_equals((string) new PC_Obj_Field('', 0, 'p', $array, PC_Obj_Field::V_PROTECTED), (string) $b->get_field('p'));
$i = $classes['i'];
/* @var $i PC_Obj_Class */
self::assert_equals(true, $i->is_abstract());
self::assert_equals(true, $i->is_interface());
self::assert_equals(false, $i->is_final());
self::assert_equals(array('i1', 'i2'), $i->get_interfaces());
self::assert_equals('public abstract function doSomething(): string', (string) $i->get_method('doSomething'));
$x = $classes['x'];
/* @var $x PC_Obj_Class */
self::assert_equals(false, $x->is_abstract());
self::assert_equals(false, $x->is_interface());
self::assert_equals(true, $x->is_final());
self::assert_equals('b', $x->get_super_class());
self::assert_equals(array('i'), $x->get_interfaces());
self::assert_equals('public function doSomething(): string', (string) $x->get_method('doSomething'));
self::assert_equals('public function test2(b): b', (string) $x->get_method('test2'));
self::assert_equals('public static function mystatic(): void', (string) $x->get_method('mystatic'));
$field = new PC_Obj_Field('', 0, 'var', PC_Obj_MultiType::create_int(4), PC_Obj_Field::V_PRIVATE);
$field->set_static(true);
self::assert_equals((string) $field, (string) $x->get_field('var'));
$global = $vars[PC_Obj_Variable::SCOPE_GLOBAL];
self::assert_equals((string) PC_Obj_MultiType::create_int(0), (string) $global['a']->get_type());
self::assert_equals('a', (string) $global['b']->get_type());
self::assert_equals('a', (string) $global['c']->get_type());
self::assert_equals('x', (string) $global['d']->get_type());
self::assert_equals('b', (string) $global['e']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(4), (string) $global['f']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(1), (string) $global['g']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(4), (string) $global['h']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_object('b'), (string) $global['i']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(), (string) $global['j']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string(), (string) $global['n']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(95), (string) $global['o']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_object('a'), (string) $global['q']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_object('b'), (string) $global['r']->get_type());
// check calls
$i = 0;
self::assert_equals((string) $calls[$i++], 'strstr(integer=4, string=str)');
self::assert_call($calls[$i++], 'b', 'get42', true);
self::assert_call($calls[$i++], 'a', 'test', false);
self::assert_equals((string) $calls[$i++], 'dummy(integer=2)');
self::assert_equals((string) $calls[$i++], 'dummy(integer=3)');
self::assert_equals((string) $calls[$i++], 'dummy(integer=6)');
self::assert_equals((string) $calls[$i++], 'dummy(unknown)');
self::assert_equals((string) $calls[$i++], 'dummy(unknown)');
self::assert_call($calls[$i++], 'a', '__construct', false);
self::assert_call($calls[$i++], 'a', 'test2', false);
self::assert_call($calls[$i++], 'x', '__construct', false);
self::assert_call($calls[$i++], 'x', 'test2', false);
self::assert_call($calls[$i++], 'x', 'test2', false);
self::assert_call($calls[$i++], 'b', 'test2', false);
self::assert_call($calls[$i++], 'b', 'sdf', true);
self::assert_call($calls[$i++], 'x', 'partest', false);
self::assert_call($calls[$i++], 'a', '__construct', false);
self::assert_call($calls[$i++], 'x', '__construct', false);
self::assert_call($calls[$i++], 'a', 'test2', false);
self::assert_call($calls[$i++], 'x', 'test2', false);
}
public function test_vars()
{
$code = '<?php
define("MYCONST",123);
$i1 = +1;
$i2 = -412;
$i3 = MYCONST;
$i4 = (int)"abc";
$f1 = 0.5;
$f2 = 0.123;
$f3 = 1.0;
$f4 = (float)(string)2;
$s1="my\'str";
$s2
= \'str2\';
$s3 = "ab $b c\'a\\\\\\""."bla";
$s4 = "ab c\'a\\\\\\""."bla";
$b1 = true;
$b2 = false;
$a1 = array();
$a2 = array(1);
$a3 = ARRAY(1,2,3);
$a4 = array(1 => 2,3 => 4,5 => 6);
$a5 = array(\'a\' => 1,2,3,\'4\');
$a6 = array(array(array(1,2,3),4),5);
$a7 = (array)1;
$a8 = 4;
unset($a8);
$a9 = "foo";
$a10 = 123;
unset($a9,$a10);
/**
* @param array $a
* @param MyClass $b
* @return int
*/
function x($a,MyClass $b) {
global $b1;
$i1 = $a;
$i2 = $i1;
return 1;
}
?>';
$options = new PC_Engine_Options();
$options->add_project(PC_Project::PHPREF_ID);
$options->add_min_req('PHP', '5');
list(, , $vars, , $errors) = $this->analyze($code, $options);
self::assert_equals(0, count($errors));
$global = $vars[PC_Obj_Variable::SCOPE_GLOBAL];
self::assert_equals((string) PC_Obj_MultiType::create_int(1), (string) $global['i1']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(-412), (string) $global['i2']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(123), (string) $global['i3']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(0), (string) $global['i4']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_float(0.5), (string) $global['f1']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_float(0.123), (string) $global['f2']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_float(1.0), (string) $global['f3']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_float(2.0), (string) $global['f4']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string('my\'str'), (string) $global['s1']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string('str2'), (string) $global['s2']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string(), (string) $global['s3']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_string('ab c\'a\\\\\\"bla'), (string) $global['s4']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(true), (string) $global['b1']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(false), (string) $global['b2']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(array()), (string) $global['a1']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value(array(1)));
self::assert_equals((string) $array, (string) $global['a2']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value(array(1, 2, 3)));
self::assert_equals((string) $array, (string) $global['a3']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value(array(1 => 2, 3 => 4, 5 => 6)));
self::assert_equals((string) $array, (string) $global['a4']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value(array('a' => 1, 2, 3, '4')));
self::assert_equals((string) $array, (string) $global['a5']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value(array(array(array(1, 2, 3), 4), 5)));
self::assert_equals((string) $array, (string) $global['a6']->get_type());
$array = new PC_Obj_MultiType(PC_Obj_Type::get_type_by_value((array) 1));
self::assert_equals((string) $array, (string) $global['a7']->get_type());
self::assert_equals(false, isset($global['a8']));
self::assert_equals(false, isset($global['a9']));
self::assert_equals(false, isset($global['a10']));
$x = $vars['x'];
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $x['a']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_object('MyClass'), (string) $x['b']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $x['i1']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_array(), (string) $x['i2']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_bool(true), (string) $x['b1']->get_type());
}
