diff options
Diffstat (limited to 'pear/tests/pear_common_analyzeSC.phpt')
-rw-r--r-- | pear/tests/pear_common_analyzeSC.phpt | 165 |
1 files changed, 0 insertions, 165 deletions
diff --git a/pear/tests/pear_common_analyzeSC.phpt b/pear/tests/pear_common_analyzeSC.phpt deleted file mode 100644 index 0c15a66c8d..0000000000 --- a/pear/tests/pear_common_analyzeSC.phpt +++ /dev/null @@ -1,165 +0,0 @@ ---TEST-- -PEAR_Common::analyzeSourceCode test ---SKIPIF-- -<?php -if (!getenv('PHP_PEAR_RUNTESTS')) { - echo 'skip'; -} -if (!function_exists('token_get_all')) { - echo 'skip'; -} -?> ---FILE-- -<?php - -require_once "PEAR/Common.php"; - -$x = PEAR_Common::analyzeSourceCode('=+"\\//452'); -echo "first test: returns false with non-existing filename? "; -echo $x ? "no\n" : "yes\n"; - -$testdir = dirname(__FILE__) . DIRECTORY_SEPARATOR . 'pear_common_analyzeSCtest'; -mkdir($testdir); - -$test1 = ' -<?php -::error(); -?> -'; -$fp = fopen($testdir . DIRECTORY_SEPARATOR . 'test1.php', 'w'); -fwrite($fp, $test1); -fclose($fp); - -$ret = PEAR_Common::analyzeSourceCode($testdir . DIRECTORY_SEPARATOR . 'test1.php'); -echo "second test: returns false with invalid PHP? "; -echo $ret ? "no\n" : "yes\n"; -unlink($testdir . DIRECTORY_SEPARATOR . 'test1.php'); - -$test3 = ' -<?php -class test -{ - class test2 { - } -} -?> -'; -$fp = fopen($testdir . DIRECTORY_SEPARATOR . 'test3.php', 'w'); -fwrite($fp, $test3); -fclose($fp); - -$ret = PEAR_Common::analyzeSourceCode($testdir . DIRECTORY_SEPARATOR . 'test3.php'); -echo "fourth test: returns false with invalid PHP? "; -echo $ret ? "no\n" : "yes\n"; -unlink($testdir . DIRECTORY_SEPARATOR . 'test3.php'); - -$test4 = ' -<?php -function test() -{ - class test2 { - } -} -?> -'; -$fp = fopen($testdir . DIRECTORY_SEPARATOR . 'test4.php', 'w'); -fwrite($fp, $test4); -fclose($fp); - -$ret = PEAR_Common::analyzeSourceCode($testdir . DIRECTORY_SEPARATOR . 'test4.php'); -echo "fifth test: returns false with invalid PHP? "; -echo $ret ? "no\n" : "yes\n"; -unlink($testdir . DIRECTORY_SEPARATOR . 'test4.php'); - -$test5 = ' -<?php -function test() -{ -} - -if (trytofool) { - function fool() - { - } -} -class test2 { - function test2() { - parent::unused(); - Greg::classes(); - $a = new Pierre; - } -} - -class blah extends test2 { - /** - * @nodep Stig - */ - function blah() - { - Stig::rules(); - } -} -?> -'; -$fp = fopen($testdir . DIRECTORY_SEPARATOR . 'test5.php', 'w'); -fwrite($fp, $test5); -fclose($fp); - -$ret = PEAR_Common::analyzeSourceCode($testdir . DIRECTORY_SEPARATOR . 'test5.php'); -echo "sixth test: returns false with valid PHP? "; -echo $ret ? "no\n" : "yes\n"; -$ret['source_file'] = str_replace(array(dirname(__FILE__),DIRECTORY_SEPARATOR), array('', '/'), $ret['source_file']); -var_dump($ret); -unlink($testdir . DIRECTORY_SEPARATOR . 'test5.php'); - -rmdir($testdir); -?> ---EXPECT-- -first test: returns false with non-existing filename? yes -second test: returns false with invalid PHP? yes -fourth test: returns false with invalid PHP? yes -fifth test: returns false with invalid PHP? yes -sixth test: returns false with valid PHP? no -array(6) { - ["source_file"]=> - string(36) "/pear_common_analyzeSCtest/test5.php" - ["declared_classes"]=> - array(2) { - [0]=> - string(5) "test2" - [1]=> - string(4) "blah" - } - ["declared_methods"]=> - array(2) { - ["test2"]=> - array(1) { - [0]=> - string(5) "test2" - } - ["blah"]=> - array(1) { - [0]=> - string(4) "blah" - } - } - ["declared_functions"]=> - array(2) { - [0]=> - string(4) "test" - [1]=> - string(4) "fool" - } - ["used_classes"]=> - array(2) { - [0]=> - string(4) "Greg" - [1]=> - string(6) "Pierre" - } - ["inheritance"]=> - array(1) { - ["blah"]=> - string(5) "test2" - } -}
\ No newline at end of file |