<?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(!@Function_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(!@Function_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($handle=@opendir($path)){
While(false !== ($file=readdir($handle))){
IF($file !='.' and $file !='..'){
IF(ereg('\.' ,$file.@basename())){
$fd=fopen($path.'/'.$file,"r");
$fileValue=@fread($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(!@is_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;
}
}压缩一定要注意编码问题。