php清理服務器無效軟連接（源碼）

<?php
/**
* @desc 遞歸刪除當前目錄下的無效軟鏈接
* @author mengdj<mengdj@outlook.com> 2014.10.03 1118
*/
//定義腳本持續執行直到退出爲止
set_time_limit(0);
ignore_user_abort(true);
//遞歸刪除指定文件類型
if(!function_exists("scan_links")){
    function scan_links($baseDir){
        if($file_handler=opendir($baseDir)){
            while(($file=readdir($file_handler))!==false){
                   if($file!='.'&&$file!='..'){
                      $tmpFile=$baseDir."/".$file;
                   if(is_dir($tmpFile)){
                     scan_links($tmpFile);
                   }else if(!is_file($tmpFile)&&is_link($tmpFile)&&!opendir($tmpFile)){
                        echo $tmpFile." has found,it will be delete.";
                        system("rm -rf ".$tmpFile,$retval);
                        echo $retval."<br/>";
                   }
                   }
                   
              }
            closedir($file_handler);
        }
    }
}
$baseDir=dirname(__FILE__);;
isset($_GET['dir'])&&$baseDir=trim($_GET['dir']);
scan_links($baseDir);
?>