PHP/Python/Ruby

웹파일 압축기[ZIP] - HOWORLD.COM

페이지 정보

profile_image
작성자 최고관리자 작성일 13-01-16 17:36 조회 2,302 댓글 0

본문

<?php

//PASSWORD
$password = "123456";

?>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>웹파일 압축기[ZIP] - HOWORLD.COM</title>
<style type="text/css">
<!--
body,td{
font-size: 14px;
color: #000000;
}
a {
color: #000066;
text-decoration: none;
}
a:hover {
color: #FF6600;
text-decoration: underline;
}
-->
</style>
</head>

<body><br>
<form name="myform" method="post" action="<?=$_SERVER[PHP_SELF];?>">
<a target="_blank" href="http://www.howorld.com/"><font color="#FF0000">HOWORLD.COM</font></a><br>
<font color="#000000" size="4"><b>온라인 웹문서 ZIP파일로 압축하기</b></font><br>
<div style="color:#6600CC">
      <p>[1] 아래에 접속 비밀번호를 입력하시고 <b>ENTER !</b></p>
      <p>[2] 압축하려는 파일 또는 폴더를 선택하고.</p>
      <p>[3] 하위폴더는 자동포함, <b>Start To ZIP File !</b></p>
</div>
<br><br>
<?
if(!$_REQUEST["myaction"]):
?>
<table border="0">
<tr>
<td>PASSWORD:</td>
<td><input name="password" type="password" id="password" value="123456" size="15"></td>
<td><input name="myaction" type="hidden" id="myaction" value="dolist"></td>
<td><input type="submit" name="Submit" value=" ENTER "></td>
</tr>
</table>

<?
elseif($_REQUEST["myaction"]=="dolist"):
if($_REQUEST['password'] != $password) die("PASSWORD가 틀렸습니다.다시입력 하세요");
echo "압축할 파일 또는 폴더를 선택;<br><br>";
$fdir = opendir('./');
while($file=readdir($fdir)){
  if($file=='.'|| $file=='..') continue;
  echo "<input name='dfile[]' type='checkbox' value='$file' ".($file==basename(__FILE__)?"":"checked")."> ";
  if(is_file($file)){
    echo "【 File 】: $file<br>";
  }else{
    echo "〖 Folder 〗: $file<br>";
  }
}
?>

<br>
ZIP압축파일 저장:
<input name="todir" type="text" id="todir" value="__zipfiles__" size="15"> ( * 쓰기권한 * )<br>
ZIP압축파일 이름:
<input name="zipname" type="text" id="zipname" value="folder_backup.zip" size="15"> ( * 파일 .ZIP * )<br>
<br>
<input name="password" type="hidden" id="password" value="<?=$_POST['password'];?>">
<input name="myaction" type="hidden" id="myaction" value="dozip">
<input type='button' value='Inverse' onclick='selrev();'>
<input type="submit" name="Submit" value=" Start To ZIP File ">
<script language='javascript'>
function selrev() {
with(document.myform) {
  for(i=0;i<elements.length;i++) {
    thiselm = elements[i];
    if(thiselm.name.match(/dfile\[]/)) thiselm.checked = !thiselm.checked;
  }
}
}
</script>
<?

elseif($_REQUEST["myaction"]=="dozip"):

set_time_limit(0);

class PHPzip{

var $file_count = 0 ;
var $datastr_len  = 0;
var $dirstr_len = 0;
var $filedata = ''; //
var $gzfilename;
var $fp;
var $dirstr='';
/*
시간지정.
*/
    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);
    }

/*
폴더생성 및 쓰기권한.
*/
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;
}

/*
파일을 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);
 
  //
        $datastr = "\x50\x4b\x03\x04";
        $datastr .= "\x14\x00";            // ver needed to extract
        $datastr .= "\x00\x00";            // gen purpose bit flag
        $datastr .= "\x08\x00";            // 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); //
  $my_datastr_len = strlen($datastr);
  unset($datastr);
 
  //
        $dirstr = "\x50\x4b\x01\x02";
        $dirstr .= "\x00\x00";                // version made by
        $dirstr .= "\x14\x00";                // version needed to extract
        $dirstr .= "\x00\x00";                // gen purpose bit flag
        $dirstr .= "\x08\x00";                // 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 = "\x50\x4b\x03\x04\x0a\x00\x00\x00\x00\x00\x00\x00\x00\x00";
 
  $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); //새로운 내용쓰기
  $my_datastr_len = strlen($datastr);
  unset($datastr);
 
  $dirstr = "\x50\x4b\x01\x02\x00\x00\x0a\x00\x00\x00\x00\x00\x00\x00\x00\x00";
  $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;
}


function createfile(){
  //압축파일 내용
  $endstr = "\x50\x4b\x05\x06\x00\x00\x00\x00" .
      pack('v', $this -> file_count) .
      pack('v', $this -> file_count) .
      pack('V', $this -> dirstr_len) .
      pack('V', $this -> datastr_len) .
      "\x00\x00";

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


if(!trim($_REQUEST[zipname])) $_REQUEST[zipname] = "faisunzip.zip"; else $_REQUEST[zipname] = trim($_REQUEST[zipname]);
if(!strrchr(strtolower($_REQUEST[zipname]),'.')=='.zip') $_REQUEST[zipname] .= ".zip";
$_REQUEST[todir] = str_replace('\','/',trim($_REQUEST[todir]));
if(!strrchr(strtolower($_REQUEST[todir]),'/')=='/') $_REQUEST[todir] .= "/";
if($_REQUEST[todir]=="/") $_REQUEST[todir] = "./";

function listfiles($dir="."){
  global $faisunZIP;
  $sub_file_num = 0;

  if(is_file("$dir")){
    if(realpath($faisunZIP ->gzfilename)!=realpath("$dir")){
    $faisunZIP -> addfile(implode('',file("$dir")),"$dir");
    return 1;
    }
    return 0;
  }
 
  $handle=opendir("$dir");
  while ($file = readdir($handle)) {
    if($file=="."||$file=="..")continue;
    if(is_dir("$dir/$file")){
    $sub_file_num += listfiles("$dir/$file");
    }
    else {
        if(realpath($faisunZIP ->gzfilename)!=realpath("$dir/$file")){
        $faisunZIP -> addfile(implode('',file("$dir/$file")),"$dir/$file");
    $sub_file_num ++;
    }
    }
  }
  closedir($handle);
  if(!$sub_file_num) $faisunZIP -> addfile("","$dir/");
  return $sub_file_num;
}

function num_bitunit($num){
  $bitunit=array(' B',' KB',' MB',' GB');
  for($key=0;$key<count($bitunit);$key++){
  if($num>=pow(2,10*$key)-1){ //1023B = 1KB
    $num_bitunit_str=(ceil($num/pow(2,10*$key)*100)/100)." $bitunit[$key]";
  }
  }
  return $num_bitunit_str;
}

if(is_array($_REQUEST[dfile])){
  $faisunZIP = new PHPzip;
  if($faisunZIP -> startfile("$_REQUEST[todir]$_REQUEST[zipname]")){
    echo "Start To ZIP File ...<br><br>";
    $filenum = 0;
    foreach($_REQUEST[dfile] as $file){
    if(is_file($file)){
      echo "【 File 】: $file<br>";
    }else{
      echo "〖 Folder 〗: $file<br>";
    }
    $filenum += listfiles($file);
    }
    $faisunZIP -> createfile();
    echo "<br>압축완료, 모두 $filenum 개 파일.<br><a href='$_REQUEST[todir]$_REQUEST[zipname]'>$_REQUEST[todir]$_REQUEST[zipname] (".num_bitunit(filesize("$_REQUEST[todir]$_REQUEST[zipname]")).")</a>";
  }else{
    echo "$_REQUEST[todir]$_REQUEST[zipname] 쓰기권한이 없습니다,경로또는 쓰기권한을 체크 하세요.<br>";
  }
}else{
  echo "파일또는 폴더를 선택하세요.<br>";
}


endif;

?>
</form>
</body>
</html>

댓글목록

등록된 댓글이 없습니다.

게시물 검색
전체 3건 1 페이지

회원로그인

Copyright © 2001-2016 ITNANUM. All Rights Reserved..