PHP統計目錄下的檔案總數及程式碼數（去除注釋及空行）

<?php
/**
* @author xiaoxiao <x_824@sina.com> 2011-1-12
* @link http://xiaoyaoxia.cnblogs.com/
* @license
* 統計目錄下的檔案行數及總檔案數··去除注釋
*/

$obj = new CaculateFiles();
//如果設定為false,這不會顯示每個檔案的資訊，否則顯示
$obj->setShowFlag(false);
//會跳過所有All開頭的檔案
$obj->setFileSkip(array('All'));
$obj->run("D:\PHPAPP\php\_tests");

//所有檔案，（預設格式為.php)
$obj->setFileSkip(array());
$obj->run("D:\PHPAPP\php");

$obj->setShowFlag(true);
//跳過所有I和A開頭的檔案，（比如介面和抽象類別開頭）
$obj->setFileSkip(array('I', 'A'));
$obj->run("D:\PHPAPP\php");


/**
* 執行目錄中檔案的統計（包括檔案數及總行數
*
* 1、跳過檔案的時候：
* 匹配的規則只是從檔案名稱上著手，匹配的規則也僅限在開頭。
* 2、跳過檔案中的注釋行：
* 匹配的規則只是從注釋段落的頭部匹配，如果出現// 及 *及 #及/*開頭的行及空行會被跳過。所以類似/*這種多汗注釋，每行的開頭都必須加上*號，否則無法匹配到這種的注釋。
* 3、目錄過濾：
* 匹配的規則是從目錄名的全名匹配
*/
class CaculateFiles {
/**
* 統計的尾碼
*/
private $ext = ".php";
/**
* 是否顯示每個檔案的統計數
*/
private $showEveryFile = true;
/**
* 檔案的的跳過規則
*/
private $fileSkip = array();
/**
* 統計的跳過行規則
*/
private $lineSkip = array("*", "/*", "//", "#");
/**
* 統計跳過的目錄規則
*/
private $dirSkip = array(".", "..", '.svn');

public function __construct($ext = '', $dir = '', $showEveryFile = true, $dirSkip = array(), $lineSkip = array(), $fileSkip = array()) {
$this->setExt($ext);
$this->setDirSkip($dirSkip);
$this->setFileSkip($fileSkip);
$this->setLineSkip($lineSkip);
$this->setShowFlag($showEveryFile);
$this->run($dir);
}

public function setExt($ext) {
trim($ext) && $this->ext = strtolower(trim($ext));
}
public function setShowFlag($flag = true) {
$this->showEveryFile = $flag;
}
public function setDirSkip($dirSkip) {
$dirSkip && is_array($dirSkip) && $this->dirSkip = $dirSkip;
}
public function setFileSkip($fileSkip) {
$this->fileSkip = $fileSkip;
}
public function setLineSkip($lineSkip) {
$lineSkip && is_array($lineSkip) && $this->lineSkip = array_merge($this->lineSkip, $lineSkip);
}
/**
* 執行統計
* @param string $dir 統計的目錄
*/
public function run($dir = '') {
if ($dir == '') return;
if (!is_dir($dir)) exit('Path error!');
$this->dump($dir, $this->readDir($dir));
}

/**
* 顯示統計結果
* @param string $dir 目錄
* @param array $result 統計結果（包含總行數，有效函數，總檔案數
*/
private function dump($dir, $result) {
$totalLine = $result['totalLine'];
$lineNum = $result['lineNum'];
$fileNum = $result['fileNum'];
echo "*************************************************************\r\n<br/>";
echo $dir . ":\r\n<br/>";
echo "TotalLine: " . $totalLine . "\r\n<br/>";
echo "TotalLine with no comment and empty: " . $lineNum . "\r\n<br/>";
echo 'TotalFiles:' . $fileNum . "\r\n<br/>";
}

/**
* 讀取目錄
* @param string $dir 目錄
*/
private function readDir($dir) {
$num = array('totalLine' => 0, 'lineNum' => 0, 'fileNum' => 0);
if ($dh = opendir($dir)) {
while (($file = readdir($dh)) !== false) {
if ($this->skipDir($file)) continue;
if (is_dir($dir . '/' . $file)) {
$result = $this->readDir($dir . '/' . $file);
$num['totalLine'] += $result['totalLine'];
$num['lineNum'] += $result['lineNum'];
$num['fileNum'] += $result['fileNum'];
} else {
if ($this->skipFile($file)) continue;
list($num1, $num2) = $this->readfiles($dir . '/' . $file);
$num['totalLine'] += $num1;
$num['lineNum'] += $num2;
$num['fileNum']++;
}
}
closedir($dh);
} else {
echo 'open dir <' . $dir . '> error!' . "\r";
}
return $num;
}

/**
* 讀取檔案
* @param string $file 檔案
*/
private function readfiles($file) {
$str = file($file);
$linenum = 0;
foreach ($str as $value) {
if ($this->skipLine(trim($value))) continue;
$linenum++;
}
$totalnum = count(file($file));
if (!$this->showEveryFile) return array($totalnum, $linenum);
echo $file . "\r\n";
echo 'TotalLine in the file:' . $totalnum . "\r\n";
echo 'TotalLine with no comment and empty in the file:' . $linenum . "\r\n";
return array($totalnum, $linenum);
}

/**
* 執行跳過的目錄規則
* @param string $dir 目錄名
*/
private function skipDir($dir) {
if (in_array($dir, $this->dirSkip)) return true;
return false;
}

/**
* 執行跳過的檔案規則
* @param string $file 檔案名稱
*/
private function skipFile($file) {
if (strtolower(strrchr($file, '.')) != $this->ext) return true;
if (!$this->fileSkip) return false;
foreach ($this->fileSkip as $skip) {
if (strpos($file, $skip) === 0) return true;
}
return false;
}

/**
* 執行檔案中行的跳過規則
* @param string $string 行內容
*/
private function skipLine($string) {
if ($string == '') return true;
foreach ($this->lineSkip as $tag) {
if (strpos($string, $tag) === 0) return true;
}
return false;
}
}