算你_l的 PHP 程式大小

<?php    

/**    
* 算目下的程式模，包含n案担行担字    
*    
* @version 1.0    
* @since 1.0    
* @access public    
* @author Ryan <ryan@shinersoft.com>    
* @copyright Copyright (c) 2002-2004 by Shiner Technologies Co., Ltd.    
* @package AAPortal    
*/    

// 修改@目的位置    
$dir = "aaportal";    


// 以下不用更    
$counts = array("directory" => 0, "file" => 0, "line" => 0, "size" => 0);    

check($dir);    

echo "Total:\n";    
echo "Directry : ".$counts["directory"]."\n";    
echo "File : ".$counts["file"]."\n";    
echo "Line : ".$counts["line"]."\n";    
echo "Size : ".$counts["size"]."\n";    

function check($dir)    
{    
    global $counts;    

    if ($dh = opendir($dir)) {    
        while (($file = readdir($dh)) !== false) {    
            if ($file == ".") continue;    
            if ($file == "..") continue;    
            if ($file == "CVS") continue;    
            $path = $dir."/".$file;    
            if (is_dir($path)) {    
                $counts["directory"]++;    
                //echo "dir ".$counts["directory"]."  $path\n";    
                check($path);    
            } else {    
                $ext = array_pop(explode('.', basename($path)));    
                if ($ext=="php" || $ext=="inc") {    
                    $counts["file"]++;    
                    //echo "file ".$counts["file"]."  $path\n";    
                    $lines = file($path);    
                    $counts["line"] += count($lines);    
                    $counts["size"] += filesize($path);    
                }    
            }    
        }    
        closedir($dh);    
    }    
} ?>