//此文件用于快速测试UTF8编码的文件是不是加了BOM，并可自动移除

//By Bob Shen

$basedir="."; //修改此行为需要检测的目录，点表示当前目录

$auto=1; //是否自动移除发现的BOM信息。1为是，0为否。

//以下不用改动

if ($dh = opendir($basedir)) {

while (($file = readdir($dh)) !== false) {

if ($file!='.' && $file!='..' && !isdir($basedir."/".$file)) echo "filename: $file ".checkBOM("$basedir/$file")." @H301_4@";

}

closedir($dh);

}

function checkBOM ($filename) {

$contents=file_get_contents($filename);

$charset[1]=substr($contents,1);
$charset[2]=substr($contents,1,1);
$charset[3]=substr($contents,2,1);

if (ord($charset[1])==239 && ord($charset[2])==187 && ord($charset[3])==191) {
$rest=substr($contents,3);
rewrite ($filename,$rest);
return true;
}
else return ("BOM Not Found.");
}

function rewrite ($filename,$data) {
$filenum=fopen($filename,"w");
flock($filenum,LOCK_EX);
fwrite($filenum,$data);
fclose($filenum);
}

?>