<?php
namespace Home\Controller;
use Think\Controller;
class ZipController extends Controller{
    Private $StrPath="../../@UpLoad";
    Private $datasec=array();
    Private $ctrl_dir=array();
    Private $eof_ctrl_dir="\x50\x4b\x05\x06\x00\x00\x00\x00";
    Private $old_offset=0;

    //壓縮後下載
    Function DownLoad($curdir,$zipfilename,$out){
        $zipfilename=StrToLower($zipfilename);
        $curdir=Str_iReplace(basename($curdir),"",$curdir);
        chdir($curdir.$this->StrPath);

        header('Content-Encoding: none');
        header('Content-Type: application/zip');
        header('Content-Disposition: attachment ; filename='.Str_Replace(".zip","",basename($zipfilename)).'.zip');
        header('Pragma: no-cache');
        header('Expires: 0');
        print($out);
    }

    //壓縮後儲存在伺服器,預設在/@Upload下
    Function SaveFile($curdir,$zipfilename,$out){
        $curdir=Str_iReplace(basename($curdir),"",$curdir);
        chdir($curdir.$this->StrPath);
        $fp=fopen($zipfilename,"wb");
        fwrite($fp,$out,strlen($out));
        fclose($fp);
    }

    //函式用途:壓縮資料夾,遞迴逐層進行
    //引數詳解:$dir需要壓縮的目錄,$zipfilename壓縮後的檔名及存放路徑,$Todo處理方式1提供下載2儲存檔案在伺服器
    Function ZipDir($dir,$zipfilename,$Todo){
        IF(
 
[email protected]_exists('gzcompress')){Return 0;}
        @set_time_limit("0");
        $this->openFile($dir,$zipfilename);
        $out=$this -> filezip();

        Switch ($Todo){
            Case "1":
                $this -> DownLoad(__FILE__,$zipfilename,$out);
                Break;
            Case "2":
                $this -> SaveFile(__FILE__,$zipfilename,$out);
                Break;
        }
    }

    //函式用途:壓縮檔案,可以是單個也可以是陣列的多個
    //引數詳解:$file需要壓縮的檔案(可為陣列),$zipfilename壓縮後的檔名及存放路徑,$Todo處理方式1提供下載2儲存檔案在伺服器
    Function ZipFile($file,$zipfilename,$Todo){
        IF(
 
[email protected]_exists('gzcompress')){Return 0;}
        IF(is_array($file)){
            Foreach($file as $filename){
                IF(is_file($filename)){
                    $fd= fopen ($filename, "rb");
                    $content= @fread($fd, filesize ($filename));
                    fclose ($fd);

                    $filename= basename($filename);
                    $this -> addFile($content, $filename);
                }
            }
        }Else{
            IF(is_file($file)){
                $fd= fopen ($file, "rb");
                $content= @fread($fd, filesize($file));
                fclose ($fd);
                $file= basename($file);
                $this -> addFile($content, $file);
            }
        }
        $out= $this -> filezip();

        Switch ($Todo){
            Case "1":
                $this -> DownLoad(__FILE__,$zipfilename,$out);
                Break;
            Case "2":
                $this -> SaveFile(__FILE__,$zipfilename,$out);
                Break;
        }
    }

    //遞迴取得下層資料夾下的檔案
    Function openFile($path,$zipName){
        $temp_path=$path;
        $temp_zip_path=$zipName;
        IF(
 
[email protected]($path)){
            While(false !== ($file=readdir($handle))){
                IF($file !='.' and $file !='..'){
                    IF(ereg('\.' ,[email protected]())){
                        $fd=fopen($path.'/'.$file,"r");
                        [email protected]($fd,1024000);
                        fclose ($fd);
                        $this -> addFile($fileValue,$path.'/'.$file);
                    }Else{
                        $this ->openFile($path.'/'.$file,$zipName.'/'.$file);
                    }
                }
            }
            $zipName=$temp_zip_path;
            $path=$temp_path;
            closedir($handle);
        }
    }

    Function addFile($data,$name,$time=0){
        $name=str_replace('\\','/',$name);
        $name=str_replace('./','',str_replace('../','',$name));
        $dtime=dechex($this->unix2DosTime($time));
        $hexdtime='\x'.$dtime[6].$dtime[7].'\x'.$dtime[4].$dtime[5].'\x'.$dtime[2].$dtime[3].'\x'.$dtime[0].$dtime[1];
        Eval('$hexdtime="'.$hexdtime.'";');

        $fr="\x50\x4b\x03\x04";
        $fr.="\x14\x00";
        $fr.="\x00\x00";
        $fr.="\x08\x00";
        $fr.=$hexdtime;

        $unc_len=strlen($data);
        $crc=crc32($data);
        $zdata=gzcompress($data);
        $c_len=strlen($zdata);
        $zdata=substr(substr($zdata,0,strlen($zdata) - 4),2);
        $fr.=pack('V',$crc);
        $fr.=pack('V',$c_len);
        $fr.=pack('V',$unc_len);
        $fr.=pack('v',strlen($name));
        $fr.=pack('v',0);
        $fr.=$name;
        $fr.=$zdata;
        $fr.=pack('V',$crc);
        $fr.=pack('V',$c_len);
        $fr.=pack('V',$unc_len);

        $this -> datasec[]=$fr;
        $new_offset=strlen(implode('',$this->datasec));

        $cdrec="\x50\x4b\x01\x02";
        $cdrec.="\x00\x00";
        $cdrec.="\x14\x00";
        $cdrec.="\x00\x00";
        $cdrec.="\x08\x00";
        $cdrec.=$hexdtime;
        $cdrec.=pack('V',$crc);
        $cdrec.=pack('V',$c_len);
        $cdrec.=pack('V',$unc_len);
        $cdrec.=pack('v',strlen($name) );
        $cdrec.=pack('v',0 );
        $cdrec.=pack('v',0 );
        $cdrec.=pack('v',0 );
        $cdrec.=pack('v',0 );
        $cdrec.=pack('V',32 );
        $cdrec.=pack('V',$this -> old_offset );
        $this -> old_offset=$new_offset;
        $cdrec.=$name;
        $this -> ctrl_dir[]=$cdrec;
    }

    Function filezip(){
        $data=implode('',$this -> datasec);
        $ctrldir=implode('',$this -> ctrl_dir);

        Return
            $data.$ctrldir.$this -> eof_ctrl_dir .
            pack('v',sizeof($this -> ctrl_dir)) .
            pack('v',sizeof($this -> ctrl_dir)) .
            pack('V',strlen($ctrldir)) .
            pack('V',strlen($data))."\x00\x00";
    }

    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);
    }

    /*
    解壓縮部分
    用途:解壓縮檔案
    引數:$zn需要解壓縮的zip檔案及路徑,$to解壓縮的目的地
    */
    Function Unzip_File($zn, $to, $index = Array(-1)){
        $ok = 0;
        $zip = @fopen($zn, 'rb');
        IF(!$zip){Return(-1);}
        $cdir = $this -> ReadCentralDir($zip, $zn);
        $pos_entry = $cdir['offset'];

        IF(!is_array($index)){
            $index = array($index);
        }
        For($i = 0; $index[$i];$i++){
            IF(intval($index[$i])!= $index[$i] || $index[$i] > $cdir['entries']){Return(-1);}
        }

        For($i=0;$i<$cdir['entries'];$i++){
            @fseek($zip, $pos_entry);
            $header = $this -> ReadCentralFileHeaders($zip);
            $header['index'] = $i;
            $pos_entry = ftell($zip);
            @rewind($zip);
            fseek($zip, $header['offset']);
            IF(in_array("-1", $index) || in_array($i, $index)){$stat[$header['filename']] = $this -> ExtractFile($header, $to, $zip);}
        }
        fclose($zip);
        Return $stat;
    }

    //取得壓縮包內的檔案資訊
    Function get_List($zip_name){
        $zip = @fopen($zip_name, 'rb');
        IF(!$zip){Return(0);}
        $centd = $this -> ReadCentralDir($zip, $zip_name);

        @rewind($zip);
        @fseek($zip, $centd['offset']);

        For($i=0;$i<$centd['entries'];$i++){
            $header = $this -> ReadCentralFileHeaders($zip);
            $header['index'] = $i;
            $info['filename'] = $header['filename'];
            $info['stored_filename'] = $header['stored_filename'];
            $info['size'] = $header['size'];
            $info['compressed_size'] = $header['compressed_size'];
            $info['crc'] = strtoupper(dechex($header['crc']));
            $info['mtime'] = $header['mtime'];
            $info['comment'] = $header['comment'];
            $info['folder'] = ($header['external'] == 0x41FF0010 || $header['external'] == 16)?1:0;
            $info['index'] = $header['index'];
            $info['status'] = $header['status'];
            $ret[] = $info;
            unset($header);
        }
        Return $ret;
    }

    Function ReadFileHeader($zip){
        $binary_data = fread($zip, 30);
        $data = unpack('vchk/vid/vversion/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len', $binary_data);

        $header['filename'] = fread($zip, $data['filename_len']);
        IF($data['extra_len'] != 0){$header['extra'] = fread($zip, $data['extra_len']);}Else{$header['extra'] = '';}

        $header['compression'] = $data['compression'];
        $header['size'] = $data['size'];
        $header['compressed_size'] = $data['compressed_size'];
        $header['crc'] = $data['crc'];
        $header['flag'] = $data['flag'];
        $header['mdate'] = $data['mdate'];
        $header['mtime'] = $data['mtime'];

        IF($header['mdate'] && $header['mtime']){
            $hour = ($header['mtime']&0xF800) >> 11;
            $minute = ($header['mtime']&0x07E0) >> 5;
            $seconde = ($header['mtime']&0x001F) * 2;
            $year = (($header['mdate']&0xFE00) >> 9) + 1980;
            $month = ($header['mdate']&0x01E0) >> 5;
            $day = $header['mdate']&0x001F;
            $header['mtime'] = mktime($hour, $minute, $seconde, $month, $day, $year);
        }Else{
            $header['mtime'] = time();
        }

        $header['stored_filename'] = $header['filename'];
        $header['status'] = "ok";
        Return $header;
    }

    Function ReadCentralFileHeaders($zip){
        $binary_data = fread($zip, 46);
        $header = unpack('vchkid/vid/vversion/vversion_extracted/vflag/vcompression/vmtime/vmdate/Vcrc/Vcompressed_size/Vsize/vfilename_len/vextra_len/vcomment_len/vdisk/vinternal/Vexternal/Voffset', $binary_data);

        IF($header['filename_len'] != 0)
            $header['filename'] = fread($zip, $header['filename_len']);
        Else $header['filename'] = '';

        IF($header['extra_len'] != 0)
            $header['extra'] = fread($zip, $header['extra_len']);
        Else $header['extra'] = '';

        IF($header['comment_len'] != 0)
            $header['comment'] = fread($zip, $header['comment_len']);
        Else $header['comment'] = '';

        IF($header['mdate'] && $header['mtime']){
            $hour = ($header['mtime'] &0xF800) >> 11;
            $minute = ($header['mtime'] &0x07E0) >> 5;
            $seconde = ($header['mtime'] &0x001F) * 2;
            $year = (($header['mdate'] &0xFE00) >> 9) + 1980;
            $month = ($header['mdate'] &0x01E0) >> 5;
            $day = $header['mdate'] &0x001F;
            $header['mtime'] = mktime($hour, $minute, $seconde, $month, $day, $year);
        }Else{
            $header['mtime'] = time();
        }
        $header['stored_filename'] = $header['filename'];
        $header['status'] = 'ok';
        IF(substr($header['filename'], -1) == '/')
            $header['external'] = 0x41FF0010;
        Return $header;
    }

    Function ReadCentralDir($zip, $zip_name){
        $size = filesize($zip_name);
        IF($size < 277){$maximum_size = $size;}Else{$maximum_size = 277;}

        @fseek($zip, $size - $maximum_size);
        $pos = ftell($zip);
        $bytes = 0x00000000;

        While($pos < $size){
            $byte = @fread($zip, 1);
            $bytes = ($bytes << 8) | Ord($byte);
            IF($bytes == 0x504b0506){
                $pos++;
                break;
            }
            $pos++;
        }

        $data = unpack('vdisk/vdisk_start/vdisk_entries/ventries/Vsize/Voffset/vcomment_size', fread($zip, 18));

        IF($data['comment_size'] != 0){$centd['comment'] = fread($zip, $data['comment_size']);}Else{$centd['comment'] = '';}
        $centd['entries'] = $data['entries'];
        $centd['disk_entries'] = $data['disk_entries'];
        $centd['offset'] = $data['offset'];
        $centd['disk_start'] = $data['disk_start'];
        $centd['size'] = $data['size'];
        $centd['disk'] = $data['disk'];
        Return $centd;
    }

    Function ExtractFile($header, $to, $zip){
        $header = $this -> readfileheader($zip);

        IF(substr($to, -1) != "/") $to .= "/";
        IF([email protected]_dir($to)) @mkdir($to, 0777);

        $pth = explode("/", dirname($header['filename']));
        For($i = 0;isset($pth[$i]);$i++){
            IF(!$pth[$i]) continue;
            $pthss .= $pth[$i] . "/";
            IF(!is_dir($to . $pthss)) @mkdir($to . $pthss, 0777);
        }
        IF(!($header['external'] == 0x41FF0010) && !($header['external'] == 16)){
            IF($header['compression'] == 0){
                $fp = @fopen($to . $header['filename'], 'wb');
                IF(!$fp) Return(-1);
                $size = $header['compressed_size'];

                While($size != 0){
                    $read_size = ($size < 2048 ? $size : 2048);
                    $buffer = fread($zip, $read_size);
                    $binary_data = pack('a' . $read_size, $buffer);
                    @fwrite($fp, $binary_data, $read_size);
                    $size -= $read_size;
                }
                fclose($fp);
                touch($to . $header['filename'], $header['mtime']);
            }Else{
                $fp = @fopen($to . $header['filename'] . '.gz', 'wb');
                IF(!$fp) Return(-1);
                $binary_data = pack('va1a1Va1a1', 0x8b1f, Chr($header['compression']),
                    Chr(0x00), time(), Chr(0x00), Chr(3));

                fwrite($fp, $binary_data, 10);
                $size = $header['compressed_size'];

                While($size != 0){
                    $read_size = ($size < 1024 ? $size : 1024);
                    $buffer = fread($zip, $read_size);
                    $binary_data = pack('a' . $read_size, $buffer);
                    @fwrite($fp, $binary_data, $read_size);
                    $size -= $read_size;
                }

                $binary_data = pack('VV', $header['crc'], $header['size']);
                fwrite($fp, $binary_data, 8);
                fclose($fp);

                $gzp = @gzopen($to . $header['filename'] . '.gz', 'rb') or die("Cette archive est compress閑");
                IF(!$gzp) Return(-2);
                $fp = @fopen($to . $header['filename'], 'wb');
                IF(!$fp) Return(-1);
                $size = $header['size'];

                While($size != 0){
                    $read_size = ($size < 2048 ? $size : 2048);
                    $buffer = gzread($gzp, $read_size);
                    $binary_data = pack('a' . $read_size, $buffer);
                    @fwrite($fp, $binary_data, $read_size);
                    $size -= $read_size;
                }
                fclose($fp);
                gzclose($gzp);

                touch($to . $header['filename'], $header['mtime']);
                @unlink($to . $header['filename'] . '.gz');
            }
        }
        Return true;
    }



}

壓縮一定要注意編碼問題。