ConLite/conlite/plugins/pluginmanager/docs/pear/File/Archive/Writer/Zip.php

260 Zeilen
8.3 KiB
PHP

<?php
/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
/**
* ZIP archive writer
*
* PHP versions 4 and 5
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330,Boston,MA 02111-1307 USA
*
* @category File Formats
* @package File_Archive
* @author Vincent Lascaux <vincentlascaux@php.net>
* @copyright 1997-2005 The PHP Group
* @license http://www.gnu.org/copyleft/lesser.html LGPL
* @version CVS: $Id: Zip.php 2 2010-11-23 14:32:26Z oldperl $
* @link http://pear.php.net/package/File_Archive
*/
require_once "File/Archive/Writer/MemoryArchive.php";
/**
* ZIP archive writer
*/
class File_Archive_Writer_Zip extends File_Archive_Writer_MemoryArchive
{
/**
* @var int Compression level
* @access private
*/
var $compressionLevel;
/**
* @var int Current position in the writer
* @access private
*/
var $offset = 0;
/**
* @var string Optionnal comment to add to the zip
* @access private
*/
var $comment = "";
/**
* @var string Data written at the end of the ZIP file
* @access private
*/
var $central = "";
function File_Archive_Writer_Zip($filename, &$innerWriter,
$stat=array(), $autoClose = true)
{
global $_File_Archive_Options;
parent::File_Archive_Writer_MemoryArchive(
$filename, $innerWriter, $stat, $autoClose
);
$this->compressionLevel = File_Archive::getOption('zipCompressionLevel', 9);
}
/**
* Change the level of the compression. This may be done between two files
*
* @param Int $compressionLevel New compression level from 0 to 9
*/
function setCompressionLevel($compressionLevel)
{
$this->compressionLevel = $compressionLevel;
}
/**
* Set a comment on the ZIP file
*/
function setComment($comment) { $this->comment = $comment; }
/**
* @param int $time Unix timestamp of the date to convert
* @return the date formated as a ZIP date
*/
function getMTime($time)
{
$mtime = ($time !== null ? getdate($time) : getdate());
$mtime = preg_replace(
"/(..){1}(..){1}(..){1}(..){1}/",
"\\x\\4\\x\\3\\x\\2\\x\\1",
dechex(($mtime['year']-1980<<25)|
($mtime['mon' ]<<21)|
($mtime['mday' ]<<16)|
($mtime['hours' ]<<11)|
($mtime['minutes']<<5)|
($mtime['seconds']>>1)));
eval('$mtime = "'.$mtime.'";');
return $mtime;
}
/**
* Inform the archive that $filename is present.
* Consequences are the same as appendFileData, but no data is output
* to the inner writer.
* This is used by File_Archive_Reader_Zip::makeWriter()
*
* @param string $filename name of the file
* @param array $stat stats of the file, indexes 9 and 7 must be present
* @param int $crc32 checksum of the file
* @param int $compLength length of the compressed data
*/
function alreadyWrittenFile($filename, $stat, $crc32, $complength)
{
$filename = preg_replace("/^(\.{1,2}(\/|\\\))+/","",$filename);
$mtime = $this->getMTime(isset($stat[9]) ? $stat[9] : null);
$normlength = $stat[7];
$this->nbFiles++;
$this->central .= "\x50\x4b\x01\x02\x00\x00\x14\x00\x00\x00\x08\x00".
$mtime.
pack("VVVvvvvvVV",
$crc32, $complength, $normlength,
strlen($filename), 0x00,0x00,0x00,0x00,
0x0000,$this->offset).
$filename;
$this->offset += 30 + strlen($filename) + $complength;
}
/**
* @see File_Archive_Writer_MemoryArchive::appendFileData()
* @access protected
*/
function appendFileData($filename, $stat, $data)
{
$crc32 = crc32($data);
$normlength = strlen($data);
$data = gzcompress($data,$this->compressionLevel);
$data = substr($data,2,strlen($data)-6);
return $this->appendCompressedData($filename, $stat, $data, $crc32, $normlength);
}
function appendCompressedData($filename, $stat, $data, $crc32, $normlength)
{
$filename = preg_replace("/^(\.{1,2}(\/|\\\))+/","",$filename);
$mtime = $this->getMTime(isset($stat[9]) ? $stat[9] : null);
$complength = strlen($data);
$zipData = "\x50\x4b\x03\x04\x14\x00\x00\x00\x08\x00".
$mtime.
pack("VVVvv",
$crc32,
$complength,
$normlength,
strlen($filename),
0x00).
$filename.
$data;
$error = $this->innerWriter->writeData($zipData);
if (PEAR::isError($error)) {
return $error;
}
$this->central .= "\x50\x4b\x01\x02\x00\x00\x14\x00\x00\x00\x08\x00".
$mtime.
pack("VVVvvvvvVV",
$crc32, $complength, $normlength,
strlen($filename), 0x00,0x00,0x00,0x00,
0x0000,$this->offset).
$filename;
$this->offset += strlen($zipData);
}
function appendFile($filename, $dataFilename)
{
//Try to read from the cache
$cache = File_Archive::getOption('cache', null);
if ($cache !== null && $this->compressionLevel > 0) {
$id = realpath($dataFilename);
$id = urlencode($id);
$id = str_replace('_', '%5F', $id);
$group = 'FileArchiveZip'.$this->compressionLevel;
$mtime = filemtime($dataFilename);
//Tries to read from cache
if (($data = $cache->get($id, $group)) !== false) {
$info = unpack('Vmtime/Vcrc/Vnlength', substr($data, 0, 12));
$data = substr($data, 12);
}
//If cache failed or file modified since then
if ($data === false ||
$info['mtime'] != $mtime) {
$data = file_get_contents($dataFilename);
$info = array(
'crc' => crc32($data),
'nlength' => strlen($data),
'mtime' => $mtime
);
$data = gzcompress($data,$this->compressionLevel);
$data = substr($data,2,strlen($data)-6);
$data = pack('VVV', $info['mtime'], $info['crc'], $info['nlength']).$data;
$cache->save($data, $id, $group);
}
return $this->appendCompressedData(
$filename,
stat($dataFilename),
$data,
$info['crc'],
$info['nlength']
);
}
//If no cache system, use the standard way
return parent::appendFile($filename, $dataFilename);
}
/**
* @see File_Archive_Writer_MemoryArchive::sendFooter()
* @access protected
*/
function sendFooter()
{
return $this->innerWriter->writeData(
$this->central.
"\x50\x4b\x05\x06\x00\x00\x00\x00".
pack("vvVVv",
$this->nbFiles,$this->nbFiles,
strlen($this->central),$this->offset,
strlen($this->comment)).
$this->comment
);
}
/**
* @see File_Archive_Writer::getMime()
*/
function getMime() { return "application/zip"; }
}
?>