zip.php

您可以把文件压缩成zip格式

<?php


!defined("SCRIPT_DIR") && die('For hidden');
class PHPZip
{
var $chmod;

function PHPZip($chmod=''){
$this->chmod=$chmod;
}

function get_List($zip_name)
{
   $zip=@fopen($zip_name,"rb");
   if(!$zip) return false;
   $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 Extract_File($zn,$to='./',$index=Array(-1))
{
   $ok=0; $zip=@fopen($zn,"rb");
   if(!$zip) return false;
   $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 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);
   $pthss='';
   $pth=explode("/",$header['filename']);
   for($i=0;$i<count($pth)-1;$i++){
     if(!$pth[$i]) continue;
     $pthss.=$pth[$i].'/';
     if(!is_dir($to.$pthss)) @mkdir($to.$pthss, 0777);
   }
  if ($header['external']!=0x41FF0010 && $header['external']!=16 && !is_dir($to.$header['filename']))
  {
   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');
    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']);
   $this->chmod && @chmod($to.$header['filename'], 0777);
   @unlink($to.$header['filename'].'.gz');

  }}
  return true;
}

}

function phpTest(){
	get_cfg_var("safe_mode") && die('服务器开启了PHP安全模式，请联系空间管理员关闭安全模式！');
	$fp=@fopen("phpzip.test", "wb");
	if( !$fp){
		die('当前目录没有写的权限，请将当前目录属性修改为: 0777');
	}else{
		fclose($fp) ;
		@unlink("phpzip.test");
	}
	$dir = "phpziptest" ;
	$file =$dir.'/test.txt.php';
	@mkdir($dir, 0777);
	$fp = @fopen($file, "wb") ;
	if(!$fp){ 
	die('没有权限在服务器上建立文件夹，请确认您的权限！'); 
	}else{
	fclose($fp);
	@unlink($file);	@rmdir($dir);
	}
	$result="check PHP version... ".phpversion()."-------- OK!<br>testing Permission...----------------- OK!<br />";
	$result.="上传文件最大尺寸：".get_cfg_var('post_max_size');
	if(function_exists("pack")) {
	$result.="<br />恭喜：您可以把文件压缩成zip格式，使用本软件在线解压，这样大大提高效率！";
	}
	return $result;
}
function heardhtml(){
global $version;
print <<<MYCJQ
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="zh-cn" />
<title>SWZIP v{$version} 在线解压缩免费版</title>
<style>
<!--
body,td	 { font-size: 9pt; color: #494949 }
.yesbox	{font-size:11pt; line-height:160%; color:#800000}
-->
</style>
<script language="javascript">
function check1(obj){
if(obj.password.value=='') return false;
else obj.submit();
}

function check2(obj, em){
var type=document.all.file_type;
if(type[0].checked)
var fname=obj.upload_file.value;
else
var fname=obj.server_filename.value;

	if(/^.+(\.zip|\.gz)$/.test(fname)){
		em.disabled=true;obj.submit();
	}else{
		alert("请选择 zip、gz 文件");
		return false;
	}
}
function check3(obj, em){
var newname=obj.rename.value;
var oldname=obj.dirname.value;
	if(oldname==''){
	alert("请选择文件夹");
	return false;
	}else if(newname!=''){
		var rs=confirm("确定要重命名文件夹？");
	}else{
		var rs=confirm("确定要删除文件夹？");
	}
	if(rs) {em.disabled=true;obj.submit();}
}
</script>
</head>
<body bgcolor="#EEEEFE">
<table border="0" width="900" align="center" cellspacing="1" cellpadding="3">
MYCJQ;
}

function footer(){
global $version;
print <<<MYCJQ
</table>
<p align="center">　</p>
<p align="center" style="color:#000000">Powered by <a href="http://www.phpget.cn" target="_blank">
PHPget.cn</a> v{$version} Code  2006-2007 </p>
</body></html>
MYCJQ;
ob_flush;
flush;
exit;
}

//删除目录及子目录和文件 小心使用 删除不能恢复
function DeltreeDir($dir='')
{
global $delresult;
        $dir = realpath($dir);

        if(!$dir || !is_dir($dir)) return;

        $handle = opendir($dir); $delresult.="文件夹.....{$dir}<br />";

        if($dir[strlen($dir) - 1] != DIRECTORY_SEPARATOR) $dir .= DIRECTORY_SEPARATOR;

        while($file = readdir($handle))
        {
                if($file != '.' && $file != '..')
                {
                        if(is_dir($dir . $file) && !is_link($dir . $file))
			DeltreeDir($dir . $file);
                        else{
			$delresult.="文 件.....".$dir.$file."<br />";
			@unlink($dir . $file);
			}
                }
        }
        closedir($handle);
        @rmdir($dir);
}

function daddslashes(&$string) {
	if(!get_cfg_var("magic_quotes_gpc")){
		if(is_array($string)) {
			foreach($string as $key => $val) $string[$key] = daddslashes($val);
		} else {
			$string = addslashes($string);
		}
	}
	return $string;
}
?>