php文件在線壓縮程序類(lèi)

2024-09-04 11:44:10

字體：大中小

供稿：網(wǎng)友

提供一款超完美的php文件在線壓縮程序,原理很簡(jiǎn)單就是把文件以二進(jìn)制形式保存了,以前用過(guò)利用rar的內(nèi)核程序,這是php自帶的壓縮功能,實(shí)例代碼如下:

set_time_limit(0);

class phpzip{

    var $file_count = 0 ;

    var $datastr_len   = 0;

    var $dirstr_len = 0;

    var $filedata = ''; //該變量只被類(lèi)外部程序訪問(wèn)

    var $gzfilename;

    var $fp;

    var $dirstr='';

    /*

    返回文件的修改時(shí)間格式.

    只為本類(lèi)內(nèi)部函數(shù)調(diào)用.

    */

    function unix2dostime($unixtime = 0) {

        $timearray = ($unixtime == 0) ? getdate() : getdate($unixtime);

        if ($timearray['year'] < 1980) {

        $timearray['year']    = 1980;

        $timearray['mon']     = 1;

        $timearray['mday']    = 1;

        $timearray['hours']   = 0;

        $timearray['minutes'] = 0;

        $timearray['seconds'] = 0;

        }

        return (($timearray['year'] - 1980) << 25) | ($timearray['mon'] << 21) | ($timearray['mday'] << 16) |

               ($timearray['hours'] << 11) | ($timearray['minutes'] << 5) | ($timearray['seconds'] >> 1);

    }

    /*

    初始化文件,建立文件目錄,

    并返回文件的寫(xiě)入權(quán)限.

    */

    function startfile($path = 'faisun.zip'){

       $this->gzfilename=$path;

       $mypathdir=array();

       do{

        $mypathdir[] = $path = dirname($path);

       }while($path != '.');

       @end($mypathdir);

       do{

        $path = @current($mypathdir);

        @mkdir($path);

       }while(@prev($mypathdir));

       if($this->fp=@fopen($this->gzfilename,"w")){

        return true;

       }

       return false;

    }

    /*

    添加一個(gè)文件到 zip 壓縮包中.

    */



function addfile($data, $name){

        $name     = str_replace('/', '/', $name);

    if(strrchr($name,'/')=='/') return $this->adddir($name);

        $dtime    = dechex($this->unix2dostime());

        $hexdtime = 'x' . $dtime[6] . $dtime[7]

                  . 'x' . $dtime[4] . $dtime[5]

                  . 'x' . $dtime[2] . $dtime[3]

                  . 'x' . $dtime[0] . $dtime[1];

        eval('$hexdtime = "' . $hexdtime . '";');

        $unc_len = strlen($data);

        $crc     = crc32($data);

        $zdata   = gzcompress($data);

        $c_len   = strlen($zdata);

        $zdata   = substr(substr($zdata, 0, strlen($zdata) - 4), 2);

    //新添文件內(nèi)容格式化:

        $datastr = "PK";

        $datastr .= "";            // ver needed to extract

        $datastr .= "";            // gen purpose bit flag

        $datastr .= "";            // compression method

        $datastr .= $hexdtime;             // last mod time and date

        $datastr .= pack('v', $crc);             // crc32

        $datastr .= pack('v', $c_len);           // compressed filesize

        $datastr .= pack('v', $unc_len);         // uncompressed filesize

        $datastr .= pack('v', strlen($name));    // length of filename

        $datastr .= pack('v', 0);                // extra field length

        $datastr .= $name;

        $datastr .= $zdata;

        $datastr .= pack('v', $crc);                 // crc32

        $datastr .= pack('v', $c_len);               // compressed filesize

        $datastr .= pack('v', $unc_len);             // uncompressed filesize

    fwrite($this->fp,$datastr); //寫(xiě)入新的文件內(nèi)容

    $my_datastr_len = strlen($datastr);

    unset($datastr);

    //新添文件目錄信息

        $dirstr = "PK";

        $dirstr .= "";                // version made by

        $dirstr .= "";                // version needed to extract

        $dirstr .= "";                // gen purpose bit flag

        $dirstr .= "";                // compression method

        $dirstr .= $hexdtime;                 // last mod time & date

        $dirstr .= pack('v', $crc);           // crc32

        $dirstr .= pack('v', $c_len);         // compressed filesize

        $dirstr .= pack('v', $unc_len);       // uncompressed filesize

        $dirstr .= pack('v', strlen($name) ); // length of filename

        $dirstr .= pack('v', 0 );             // extra field length

        $dirstr .= pack('v', 0 );             // file comment length

        $dirstr .= pack('v', 0 );             // disk number start

        $dirstr .= pack('v', 0 );             // internal file attributes

        $dirstr .= pack('v', 32 );            // external file attributes - 'archive' bit set

        $dirstr .= pack('v',$this->datastr_len ); // relative offset of local header

        $dirstr .= $name;

    $this->dirstr .= $dirstr; //目錄信息

    $this -> file_count ++;

    $this -> dirstr_len += strlen($dirstr);

    $this -> datastr_len += $my_datastr_len;

    }

    function adddir($name){

       $name = str_replace("/", "/", $name);

       $datastr = "PK ";

       $datastr .= pack("v",0).pack("v",0).pack("v",0).pack("v", strlen($name) );

       $datastr .= pack("v", 0 ).$name.pack("v", 0).pack("v", 0).pack("v", 0);

       fwrite($this->fp,$datastr); //寫(xiě)入新的文件內(nèi)容

       $my_datastr_len = strlen($datastr);

       unset($datastr);

       $dirstr = "PK ";

       $dirstr .= pack("v",0).pack("v",0).pack("v",0).pack("v", strlen($name) );

       $dirstr .= pack("v", 0 ).pack("v", 0 ).pack("v", 0 ).pack("v", 0 );

       $dirstr .= pack("v", 16 ).pack("v",$this->datastr_len).$name;

       $this->dirstr .= $dirstr; //目錄信息

       $this -> file_count ++;

       $this -> dirstr_len += strlen($dirstr);

       $this -> datastr_len += $my_datastr_len;

    }//開(kāi)源代碼Vevb.com

    function createfile(){

       //壓縮包結(jié)束信息,包括文件總數(shù),目錄信息讀取指針位置等信息

       $endstr = "PK" .

          pack('v', $this -> file_count) .

          pack('v', $this -> file_count) .

          pack('v', $this -> dirstr_len) .

          pack('v', $this -> datastr_len) .

          "";

       fwrite($this->fp,$this->dirstr.$endstr);

       fclose($this->fp);

    }

}