文件批量转换类（从ansi到utf-8）上一个版本的改进版。

这个类目前工作的很好。很有用，呵呵。

<?php

//header('Content-Type: text/html; charset=utf-8');

$fname=str_replace("\\\\","/",$_POST['fname']);

$encode=$_POST['encode'];

$changeType=$_POST['changetype'];

if($changeType == "dir")$fname = dirname($fname);

echo "需要转换的文件目录:".dirname($fname) ."<BR>";

echo "已有的文件编码格式:$encode";

echo "<PRE>";

if($fname)

{

$fc= new fileconv();

$fc->changeType="file";

if(is_dir($fname))

{

$fc->changeType="dir";

$fc->operateDir=$fname;

$fc->operateDirLen=strlen($fc->operateDir);

}

else if(is_file($fname))

{

$fc->operateFile=$fname;

$fc->operateDirLen=strlen($fc->operateFile);

}

else{

echo "fatal error";die;

}

$fc->backupPath="d:/usr/www/html/bkup_test/";

$fc->mainCallFunc="\$this->gb2utf8(\$file,\$filePath);";

if($encode){$fc->encode=$encode;}

$fc->mainsub();

}

class fileconv{

var $currentName;

var $changeType; //=dir 则操作目录，=file则操作文件。

var $operateFile; //如果this->changeType为file单个文件，那么这个值就是要操作的单个文件。

var $encode;

/**

* destEncode is the encode type you want to convert the text file to .

* @access public

var $destEncode;

var $extname; //有效文本文件的扩展名。

var $operateDir; //需要操作的目录

var $operateDirLen; //备份过程中用来截取子目录名的时候用

var $backupPath; //需要备份到的目录，如此目录不存在则自动创建

var $callFunc; //操作函数,用于lisDirTree里的调用

var $mainCallFunc; //主操作函数.

function fileconv()

{

$currentName="fileconv.php";

//初始化操作数据文件类型

$this->extname = ".php;.xml;html;.htm;.css;.txt;.js;.ini;.sql;";

$this->encode = "gb2312";

$this->destEncode = "utf-8";

//初始化结果数据。

$this->utf8File=0;

$this->convertedFile=0;

$this->notTextFile=0;

}

function mainsub()

{ //echo "2005-6-14mainsub start $this->backupPath";die;

if($this->changeType=="dir"){

if(strpos($this->backupPath,$this->operateDir)===false)

{ clearstatcache();

if(!is_dir($this->backupPath))$this->mymkdir($this->backupPath);

$this->backup($this->operateDir,$this->backupPath);

$this->callFunc="$this->gb2utf8(\$file,\$filePath);";

$this->callFunc=$this->mainCallFunc;

$this->listDirTree($this->operateDir);

}

else

{

echo "Fetal Error You must change your backupdir ,<BR>It can't be under the directory you want to backup";

die;

}

}// />转换的为目录

else if($this->changeType=="file"){

$posfile=strrpos($this->operateFile,"/");

$file=substr($this->operateFile,$posfile+1);

$filepath=substr($this->operateFile,0,$posfile);

$this->backupPath=$this->currentpath()."/testbk/";

//echo "$file $filepath $this->backupPath<BR>";

$this->backupFile($file,$this->operateFile,$filepath);

$this->gb2utf8($file,$this->operateFile);

}// />转换的为文件

$this->echoResult();

}//mainsub end

function backup()

{

if($this->readtag($this->backupPath)==0)//如果没有备份过,那么,执行备份

{

$this->callFunc="\$this->backupFile(\$file,\$filePath,\$dirName);";

$this->listDirTree($this->operateDir);

$this->setTag($this->backupPath); //设置备份标记

}

else

{//如果备份过了，那么，exit;

echo "backuped already";

}

}//function backup end

function backupFile($file,$filePath,$dirName)

{

$subdir = substr($dirName."/",$this->operateDirLen+1);

$this->mymkdir($this->backupPath.$subdir); //创建子目录

$bkfile=$this->backupPath.$subdir.$file;

echo "子目录:$subdir 备份文件为: $bkfile 原始文件为：$filePath<BR>";

$fstr=file_get_contents($filePath);

$fhandle=fopen($bkfile,"wb");

fwrite($fhandle,$fstr);

fclose($fhandle);

}

function echoResult()

{global $utf8File,$convertedFile,$notTextFile;

//echo (microtime()-$tm1)."秒<BR>";

echo "<BR>utf8文件：".$this->utf8File;

echo "<BR>被转换的文件总数:".$this->convertedFile;

echo "<BR>非文本文件数目:".$this->notTextFile;

}

function readtag( $backupDir )

{ //echo "$backupDir ";

if(!is_dir($backupDir)){

$this->mymkdir($backupDir);

}

if(!is_file($backupDir."tag.ini")) //如果tag.ini不存在，则建立并初始化

{ if(!$fp=fopen($backupDir."tag.ini","w")){

echo "error while reading or creating the tag.ini ";

}

else

{

$str="backuped=0";

if(!fwrite($fp,$str)){echo "error while init the tag.ini ";}

fclose($fp);

}

$this->gb2utf8("tag.ini",$backupDir."tag.ini"); //将新建的tag.ini转为utf-8编码

return 0;

}

else //如果tag.ini已经存在，读取其中的配置

{

$backupTag=file_get_contents($backupDir."tag.ini");

$tagTree=$this->myExplode($backupTag,"/\n/","=");

//print_r($tagTree); //tagtree存储所有tag.ini里的 x=y 的信息

return $tagTree['backuped'];

}

function setTag($backupDir)

{

$tagini=file_get_contents($backupDir."tag.ini");

if(!$fp=fopen($backupDir."tag.ini","w")){

echo "error while reading or creating the tag.ini ";

}

else

{

$str="backuped=1";

$pattern="/backuped=0/";

if(!strpos($tagini,"backuped=",0))

{

$tagini=$str;

}

else

{

$tagini=preg_replace($pattern,$str,$tagini);

}

if(!fwrite($fp,$tagini))

{

echo "error while set the tag.ini ";

}

fclose($fp);

}

function myExplode($originalStr,$firstTag,$secondTag)

{

$firstArray=preg_split($firstTag,$originalStr);

foreach($firstArray as $first)

{

$secondArray=explode($secondTag,$first);

$tagTree[$secondArray[0]]=$secondArray[1];

}

return $tagTree;

}

function mymkdir($mainDir)

{

if(!is_dir($mainDir))

{

global $validFatherDir;

$this->getFatherDir($mainDir);

$fullLen=strlen($mainDir); //控制循环

//echo "需要创建的目录".$mainDir."长度为 $fullLen <BR>";die;

//echo "最高有效的父目录".$validFatherDir."<BR>";

$validDirLen=strlen($validFatherDir);

while(($i<10 )&&($fullLen>$validDirLen+1))

{

//echo "父目录长度：$validDirLen<BR>";

$pos=strpos($mainDir,"/",$validDirLen+1);

//echo "/所在位置：$pos<BR>";

$dirname=substr($mainDir,$validDirLen,$pos-$validDirLen);

//echo "正在创建目录".$validFatherDir.$dirname."

<BR>";

$validFatherDir.=$dirname;

if(!mkdir($validFatherDir))

{

echo "Fetal Error accoured while create directory";die;

}

$validDirLen=strlen($validFatherDir);

$i++;

}

}//mymkdir function end

function getFatherDir($mainDir)

{ global $validFatherDir;

$pos = strrpos($mainDir,"/");

if ($pos===false)

{

// not found

echo "Fetal Error While Get Valid Father Dir";die;

return false;

}

else

{

$fatherDir=substr($mainDir,0,$pos);

if(!is_dir($fatherDir))

{ echo "<font color=red >$fatherDir is not exists<BR></font>";

$this->getFatherDir($fatherDir);

}

else

{

$validFatherDir= $fatherDir;

}

/** 函数 listDirTree( $dirName = null )

* 参数 $dirName 目录名称

* 返回目录结构数组 false为失败

function listDirTree( $dirName = null )

{//global $tree;

if( empty( $dirName ) )

exit( "IBFileSystem: directory is empty." );

if( is_dir( $dirName ) )

{

if( $dh = opendir( $dirName ) )

{

//$tree = array();

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

{

if( $file != "." && $file != ".." )

{

$filePath = $dirName . "/" . $file;

if( is_dir( $filePath ) )//为目录,递归

{

//$tree[$file] = $this->listDirTree( $filePath );

$this->listDirTree( $filePath );

}

else//为文件,进行处理

{ //echo "文件处理函数为 $this->callFunc <BR>";

eval($this->callFunc);

//$tree[] = $file;

} //文件处理结束

}

closedir( $dh );

}

else

{

exit( "IBFileSystem: can not open directory $dirName.");

}

//返回当前的$tree

//return $tree;

}

else

{

exit( "IBFileSystem: $dirName is not a directory.");

}

function test($arga,$argb)

{

echo $arga."<BR>".$argb."<BR>";

}

function gb2utf8($file,$filePath)

{

$fileext=substr($file,-4,4);

preg_match("/".$fileext."/i",$this->extname, $matches);

if ($matches[0]) //是文本文件扩展名为:.php,.xml,.css,.js

.由数组$matches定义

{

$outfilename=$filePath;

$fstr=file_get_contents($outfilename);

$utf8score=$this->utf8_probability(&$fstr);

if( 90<=$utf8score && $utf8score<=100)

{ $this->utf8File++;

//echo "<font color=red> $filePath is encoded with utf-8 already </font><BR>";//die;

}

else

{

$fp=fopen($outfilename,'wb');

$foutstr=iconv($this->encode,$this->destEncode,$fstr); //如果碰到此文件中不存在双字节字符，则这个函数并不起作用

//echo "文件原来的编码格式:$this->encode";die;

echo $filePath."<BR>";

fwrite($fp,$foutstr);

$this->convertedFile++;

//echo $filePath . "<<<<<<<<< $matches[0]<BR>";

fclose($fp);

}

}//是文本文件处理结束

else{

$this->notTextFile++;

//echo $file."=========<BR>";

}

function showdir($dir){

while ($file_name = readdir($dir)) {

if (($file_name != ".") && ($file_name != "..")) {

$file_list .= "<li>$file_name";

if(is_dir($file_name))

showdir($file_name);

}

function utf8_probability(&$rawtextstr) {

$score = 0;

$i = 0;

$rawtextlen = 0;

$goodbytes = 0;

$asciibytes = 0;

$rawtextarray = preg_split("//",$rawtextstr,-1, PREG_SPLIT_NO_EMPTY); //转换成char数组，如果是php5，则可使用str_split

$rawtext = array();

//var_dump($rawtextarray);die;

for($i=0;$i<count($rawtextarray);$i++)

$rawtext[] = ord($rawtextarray[$i]); //ord(char)

// Maybe also use UTF8 Byte Order Mark(BOM): EF BB BF

//BOM，某些utf8文件流的首3个字节，可以表示这个文件的编码方式

// Check to see if characters fit into acceptable ranges

//print_r($rawtext);

$rawtextlen = strlen($rawtextstr);

for ($i = 0; $i < $rawtextlen; $i++) {

if ($rawtext[$i] < 0x80) { // One byte

$asciibytes++; // Ignore ASCII, can throw off count

} else if (0xC0 <= $rawtext[$i] && $rawtext[$i] <= 0xDF && // Two bytes

$i+1 < $rawtextlen && 0x80 <= $rawtext[$i+1] && $rawtext[$i+1] <= 0xBF) {

$goodbytes += 2; $i++;

} else if (0xE0 <= $rawtext[$i] && $rawtext[$i] <= 0xEF && // Three bytes

$i+2 < $rawtextlen && 0x80 <= $rawtext[$i+1] && $rawtext[$i+1] <= 0xBF &&

0x80 <= $rawtext[$i+2] && $rawtext[$i+2] <= 0xBF) {

$goodbytes += 3; $i+=2;

}

//if you want check just a few ,you may stop here with a score make.

//or you will be delayed when you meet lots of big files.

}

//ascii is sub of utf8

if ($asciibytes == $rawtextlen) { return 0; }

$score = (int)(100 * ($goodbytes/($rawtextlen-$asciibytes)));

// If not above 98, reduce to zero to prevent coincidental matches

if ($score > 98) {

return $score;

} else if ($score > 95 && $goodbytes > 30) {

// Allows for some (few) bad formed sequences

return $score;

} else {

return 0;

}

function currentpath()

{

$currentpath=realpath($this->currentName);

$pos = strrpos ($currentpath,"\\" );

$currentpath=substr($currentpath,0,$pos);

$currentpath=str_replace("\\","/",$currentpath);

echo "当前执行文件所在目录:$currentpath <BR>";

return $currentpath;

}

}//class fileconv end

文件名:如果你改此文件名为目录名,则转换整个目录

原文件格式: <select name='encode'>

<option value='ISO-8859-1'> .iso8859-1 .latin1</option>

<option value='ISO-8859-2'> .iso8859-2 .latin2 .cen</option>

<option value='ISO-8859-3'> .iso8859-3 .latin3</option>

<option value='ISO-8859-4'> .iso8859-4 .latin4</option>

<option value='ISO-8859-5'> .iso8859-5 .latin5 .cyr .iso-ru</option>

<option value='ISO-8859-6'> .iso8859-6 .latin6 .arb</option>

<option value='ISO-8859-7'> .iso8859-7 .latin7 .grk</option>

<option value='ISO-8859-8'> .iso8859-8 .latin8 .heb</option>

<option value='ISO-8859-9'> .iso8859-9 .latin9 .trk</option>

</select>

转化后的格式:<select name='destencode'>

<option value='ISO-8859-1'> .iso8859-1 .latin1</option>

<option value='ISO-8859-2'> .iso8859-2 .latin2 .cen</option>

<option value='ISO-8859-3'> .iso8859-3 .latin3</option>

<option value='ISO-8859-4'> .iso8859-4 .latin4</option>

<option value='ISO-8859-5'> .iso8859-5 .latin5 .cyr .iso-ru</option>

<option value='ISO-8859-6'> .iso8859-6 .latin6 .arb</option>

<option value='ISO-8859-7'> .iso8859-7 .latin7 .grk</option>

<option value='ISO-8859-8'> .iso8859-8 .latin8 .heb</option>

<option value='ISO-8859-9'> .iso8859-9 .latin9 .trk</option>

</select>

转换为目录：<INPUT TYPE="radio" NAME="changetype" value="dir">

转换为文件：<INPUT TYPE="radio" NAME="changetype" value="file" checked>

</FORM>

Posted on 2005-06-27 14:45 古代阅读(1290) 评论(0) 编辑收藏举报

刷新页面返回顶部