發(fā)布時間:2016/8/16 9:11:16 關(guān)注:1567
<?php
//remove the utf-8 boms
//by magicbug at gmail dot com
if (isset($_GET['dir'])){ //config the basedir
 $basedir=$_GET['dir'];
}else{
 $basedir = '.';
} 
$auto = 1; 
checkdir($basedir);
function checkdir($basedir){
 if ($dh = opendir($basedir)) {
  while (($file = readdir($dh)) !== false) {
   if ($file != '.' && $file != '..'){
    if (!is_dir($basedir."/".$file)) {
     echo "filename: $basedir/
$file ".checkBOM("$basedir/$file")." <br>";
    }else{
     $dirname = $basedir."/".
$file;
     checkdir($dirname);
    }
   }
  }
 closedir($dh);
 }
}
function checkBOM ($filename) {
 global $auto;
 $contents = file_get_contents($filename);
 $charset[1] = substr($contents, 0, 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) {
  if ($auto == 1) {
   $rest = substr($contents, 3);
   rewrite ($filename, $rest);
   return ("<font color=red>BOM found, 
automatically removed.</font>");
  } else {
   return ("<font color=red>BOM found.
</font>");
  }
 }
 else return ("BOM Not Found.");
}
function rewrite ($filename, $data) {
 $filenum = fopen($filename, "w");
 flock($filenum, LOCK_EX);
 fwrite($filenum, $data);
 fclose($filenum);
}
?>
    
地址:山東省濰坊奎文區(qū)新華路樂川街華誼大廈三樓
網(wǎng)址:http://www.edu-red.com/ 垂詢電話:
網(wǎng)站備案:魯ICP備14027302號-5
copyright© 濰坊華邦網(wǎng)絡(luò)有限公司2011-2025