[PHP] pobierz, plaintext 
<?
// KONFIGURACJA
set_time_limit( 300 ); // USTAWIA MAKSYMALNY CZAS DZIAŁANIA SKRYPTU. W PRZYPADKU DUŻEJ ILOŚCI DANYCH DO SPAKOWANIA NALEŻY ZWIĘKSZYĆ WARTOŚĆ
$path = "img"; // ŚCIEŻKA DO PLIKU
$filename = "photos.zip"; // NAZWA PLIKU WYNIKOWEGO
// KONIEC KONFIGURACJI
 
// KLASA DO OBSŁUGI PLIKÓW ZIP - NIC NIE ZMIENIAĆ !!!
class zipfile
{
   var $datasec = array();
   var $ctrl_dir = array();
   var $eof_ctrl_dir = "\x50\x4b\x05\x06\x00\x00\x00\x00";
   var $old_offset = 0;
 
   function add_dir($name) {
      $name = str_replace("\\", "/", $name);
 
      $fr = "\x50\x4b\x03\x04";
      $fr .= "\x0a\x00";
      $fr .= "\x00\x00";
      $fr .= "\x00\x00";
      $fr .= "\x00\x00\x00\x00";
 
      $fr .= pack("V",0);
      $fr .= pack("V",0);
      $fr .= pack("V",0);
      $fr .= pack("v", strlen($name) );
      $fr .= pack("v", 0 );
      $fr .= $name;
      $fr .= pack("V", 0);
      $fr .= pack("V", 0);
      $fr .= pack("V", 0);
 
      $this -> datasec[] = $fr;
      $new_offset = strlen(implode("", $this->datasec));
 
      $cdrec = "\x50\x4b\x01\x02";
      $cdrec .="\x00\x00";
      $cdrec .="\x0a\x00";
      $cdrec .="\x00\x00";
      $cdrec .="\x00\x00";
      $cdrec .="\x00\x00\x00\x00";
      $cdrec .= pack("V",0);
      $cdrec .= pack("V",0);
      $cdrec .= pack("V",0);
      $cdrec .= pack("v", strlen($name) );
      $cdrec .= pack("v", 0 );
      $cdrec .= pack("v", 0 );
      $cdrec .= pack("v", 0 );
      $cdrec .= pack("v", 0 );
      $ext = "\x00\x00\x10\x00";
      $ext = "\xff\xff\xff\xff";
      $cdrec .= pack("V", 16 );
      $cdrec .= pack("V", $this -> old_offset );
      $cdrec .= $name;
 
      $this -> ctrl_dir[] = $cdrec;
      $this -> old_offset = $new_offset;
      return;
   }
 
   function add_file($data, $name) {
      $fp = fopen($data,"r");
      $data = fread($fp,filesize($data));
      fclose($fp);
      $name = str_replace("\\", "/", $name);
      $unc_len = strlen($data);
      $crc = crc32($data);
      $zdata = gzcompress($data);
      $zdata = substr ($zdata, 2, -4);
      $c_len = strlen($zdata);
      $fr = "\x50\x4b\x03\x04";
      $fr .= "\x14\x00";
      $fr .= "\x00\x00";
      $fr .= "\x08\x00";
      $fr .= "\x00\x00\x00\x00";
      $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 .="\x00\x00\x00\x00";
      $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 file() {
      $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 zip_dir($path){
                 if ($dir = opendir($path)) {
                    while (false !== ($file = readdir($dir))) {
                          if (is_dir($path."/".$file)) {
                             if ($file != '.' && $file != '..') {
                                $this->zip_dir($path."/".$file);
                                $this->add_dir($path . "/" . $file,$path . "/" . $file);
                             }
                          }
                          else {
                               $this->add_file($path . "/" . $file,$path . "/" . $file);
                          }
                    }
                    closedir($dir);
                 }
        }
}
// KONIEC KLASY DO OBSŁUGI PLIKÓW ZIP
 
// KOD ARCHIWIZUJĄCY PLIK I WYSYŁAJĄCY GO DO PRZEGLĄDARKI
 
$backup = new zipfile();
 
$backup->zip_dir($path);
 
Header("Content-type: application/octet-stream");
Header ("Content-disposition: attachment; filename=" . $filename);
echo $backup->file();
 
// KONIEC
?>
[PHP] pobierz, plaintext