/**
* 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);
}
}
public function test__get()
{
// public mixed __get ( string $name )
$code = '<?php
class A {
public function __get($name);
}
class B {
/**
* @return int
*/
public function __get($name);
}
?>';
list(, $classes, , , $errors) = $this->analyze($code);
$params = array(new PC_Obj_Parameter('name', PC_Obj_MultiType::create_string()));
self::assert_equals(2, count($errors));
$m = $classes['a']->get_method('__get');
self::assertParamsEqual($params, $m->get_params());
self::assert_equals((string) PC_Obj_MultiType::create_void(), (string) $m->get_return_type());
$m = $classes['b']->get_method('__get');
self::assertParamsEqual($params, $m->get_params());
self::assert_equals((string) PC_Obj_MultiType::create_int(), (string) $m->get_return_type());
$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#::__get" 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_S_RET_SPEC_BUT_NO_RET, $error->get_type());
self::assert_regex('/The function\\/method "#B#::__get" has a return-specification in PHPDoc, but does not return a value/', $error->get_msg());
}
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());
}
public function test_nesting()
{
$code = '<?php
/** @param int $a */
function f1(int $a) {}
/** @param int $a */
function f2(int $a) {}
/** @param int $a */
function f3(int $a) {}
class A {
function a() {
$a = 1;
function b() {
$b = 2;
function c() {
$c = 3;
function d() {
$d = 4;
}
f3($c);
}
f2($b);
}
f1($a);
}
}
function e() {
$e = 5;
function f() {
$f = 6;
class B {
function g() {
static $h = 4;
$g = 7;
}
}
}
}
?>';
list(, , $vars, $calls, $errors) = $this->analyze($code);
self::assert_equals(0, count($errors));
self::assert_equals('f3(integer=3)', (string) $calls[0]);
self::assert_equals('f2(integer=2)', (string) $calls[1]);
self::assert_equals('f1(integer=1)', (string) $calls[2]);
self::assert_equals((string) PC_Obj_MultiType::create_int(1), (string) $vars['A::a']['a']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(2), (string) $vars['b']['b']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(3), (string) $vars['c']['c']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(4), (string) $vars['d']['d']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(5), (string) $vars['e']['e']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(6), (string) $vars['f']['f']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(7), (string) $vars['B::g']['g']->get_type());
self::assert_equals((string) PC_Obj_MultiType::create_int(4), (string) $vars['B::g']['h']->get_type());
}
/**
* Handles the given compare-operator
*
* @param string $op the operator (==, !=, ===, ...)
* @param PC_Obj_MultiType $e1 the first operand
* @param PC_Obj_MultiType $e2 the second operand
* @return PC_Obj_MultiType the result
*/
public function handle_cmp($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 don't know one of the types or values, try to determine the type by the operator
// if we're in a loop, do that, too.
if ($this->vars->is_in_loop() || $e1->is_val_unknown() || $e2->is_val_unknown()) {
return $this->get_type_from_op($op, $e1, $e2);
}
// if we have an array-operation, just return bool, because we would have to do it ourself
// and I think its not worth the effort.
$e1arr = $e1->get_first()->get_type() == PC_Obj_Type::TARRAY;
$e2arr = $e2->get_first()->get_type() == PC_Obj_Type::TARRAY;
if ($e1arr && $e2arr || $e1arr && $e1->is_array_unknown() || $e2arr && $e2->is_array_unknown()) {
return PC_Obj_MultiType::create_bool();
}
$val = false;
$f1 = $e1->get_first();
$f2 = $e2->get_first();
switch ($op) {
// its not a good idea to use eval in this case because it might change the type
case '===':
$val = $f1->get_value_for_use() === $f2->get_value_for_use();
break;
case '!==':
$val = $f1->get_value_for_use() !== $f2->get_value_for_use();
break;
case '?:':
if ($f1->get_value_for_use() < $f2->get_value_for_use()) {
$val = -1;
} else {
if ($f1->get_value_for_use() > $f2->get_value_for_use()) {
$val = 1;
} else {
$val = 0;
}
}
return PC_Obj_MultiType::create_int($val);
case '==':
case '!=':
case '<':
case '>':
case '<=':
case '>=':
case '?:':
eval('$val = ' . $f1->get_value_for_eval() . ' ' . $op . ' ' . $f2->get_value_for_eval() . ';');
break;
}
return PC_Obj_MultiType::create_bool($val);
}
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_r394()
{
$this->_retvalue = PC_Obj_MultiType::create_int($this->state->get_line());
}
public function test_nesting()
{
$code = '<?php
/** @param mixed $a */
function func($a) {}
$a = 0;
while(true)
{
if($_)
$a++;
else
$a--;
}
// now we know that its still an integer, but dont know the value
foreach($_ as $_)
{
while(true)
{
do {
$b = 4;
}
while(true);
}
}
// $b is unknown since we didnt know it before
$c = "str";
foreach($_ as $_)
{
while(true)
{
do {
$c = 1;
}
while(true);
}
}
// $c is an int or string since we knew it before
$d = 1;
if($_)
{
if($_)
{
if($_)
{
if($_)
{
$d = "str";
}
}
}
}
// $d is an int or string since we knew it before
$e = 1;
if($_)
{
$e = 2;
if($_)
{
$e = 12.3;
if($_)
{
$e = "str";
if($_)
{
$e = true;
func($e);
}
func($e);
}
func($e);
}
func($e);
}
func($e);
// $e is an int, string, float or bool. note that we even know the value except for the int
if($_)
{
$f = 0;
if($_)
{
if($_)
$f = 2;
else
$f = 4;
// here we know that f is an int
func($f);
}
// here we still know that because $f was assigned in this block before
func($f);
}
// here we dont know that anymore since it didnt exist before
?>';
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) new PC_Obj_MultiType(), (string) $global['b']->get_type());
$type = new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::INT, 1), new PC_Obj_Type(PC_Obj_Type::STRING, "str")));
self::assert_equals((string) $type, (string) $global['c']->get_type());
$type = new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::STRING, "str"), new PC_Obj_Type(PC_Obj_Type::INT, 1)));
self::assert_equals((string) $type, (string) $global['d']->get_type());
$type = new PC_Obj_MultiType(array(new PC_Obj_Type(PC_Obj_Type::BOOL, true), new PC_Obj_Type(PC_Obj_Type::STRING, "str"), new PC_Obj_Type(PC_Obj_Type::FLOAT, 12.3), new PC_Obj_Type(PC_Obj_Type::INT)));
self::assert_equals((string) $type, (string) $global['e']->get_type());
self::assert_equals((string) new PC_Obj_MultiType(), (string) $global['f']->get_type());
self::assert_equals('func(bool=1)', (string) $calls[0]);
self::assert_equals('func(bool=1 or string=str)', (string) $calls[1]);
self::assert_equals('func(bool=1 or string=str or float=12.3)', (string) $calls[2]);
self::assert_equals('func(bool=1 or string=str or float=12.3 or integer=2)', (string) $calls[3]);
self::assert_equals('func(bool=1 or string=str or float=12.3 or integer)', (string) $calls[4]);
self::assert_equals('func(integer)', (string) $calls[5]);
self::assert_equals('func(integer)', (string) $calls[6]);
}
/**
* Determines the next array-key to use
*
* @return PC_Obj_MultiType the key
*/
public function get_next_array_key()
{
if ($this->_type != self::TARRAY || $this->_value === null) {
return PC_Obj_MultiType::create_int(0);
}
$max = -1;
foreach (array_keys($this->_value) as $k) {
if (FWS_Helper::is_integer($k) && $k > $max) {
$max = $k;
}
}
return PC_Obj_MultiType::create_int($max + 1);
}
/**
* Creates a variable with type INT and given value
*
* @param string $file the file of the def
* @param int $line the line of the def
* @param int $value the value
* @param string $varname optionally, the variable-name
* @return PC_Obj_Variable the variable
*/
public static function create_int($file, $line, $value = null, $varname = '')
{
return new self($file, $line, $varname, PC_Obj_MultiType::create_int($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());
}
