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()); }