1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
<?php
/**************************************************************************
* *
* 4images - A Web Based Image Gallery Management System *
* ---------------------------------------------------------------- *
* *
* File: zip.php *
* Copyright: (C) 2002 Jan Sorgalla *
* Email: jan@4homepages.de *
* Web: http://www.4homepages.de *
* Scriptversion: 1.7.1 *
* *
* Never released without support from: Nicky (http://www.nicky.net) *
* *
**************************************************************************
* *
* 4images ist KEINE Freeware. Bitte lesen Sie die Lizenz- *
* bedingungen (Lizenz.txt) für weitere Informationen. *
* --------------------------------------------------------------- *
* 4images is NOT freeware! Please read the Copyright Notice *
* (Licence.txt) for further information. *
* *
*************************************************************************/#
if (!defined('ROOT_PATH')) {
die("Security violation");
}
/*
Zip file creation class
makes zip files on the fly...
Based on classes by:
Eric Mueller
http://www.themepark.com
Denis O.Philippov
http://www.atlant.ru
*/
class Zipfile {
var $datasec = array(); // array to store compressed data
var $ctrl_dir = array(); // central directory
var $eof_ctrl_dir = "\x50\x4b\x05\x06\x00\x00\x00\x00"; //end of Central directory record
var $old_offset = 0;
function add_file($data, $name) {
$name = str_replace('\\', '/', $name);
//$name = str_replace("\\", "\\\\", $name);
$fr = "\x50\x4b\x03\x04";
$fr .= "\x14\x00"; // ver needed to extract
$fr .= "\x00\x00"; // gen purpose bit flag
$fr .= "\x08\x00"; // compression method
$fr .= "\x00\x00\x00\x00"; // last mod time and date
$unc_len = strlen($data);
$crc = crc32($data);
$zdata = gzcompress($data);
$zdata = substr( substr($zdata, 0, strlen($zdata) - 4), 2); // fix crc bug
$c_len = strlen($zdata);
$fr .= pack('V', $crc); // crc32
$fr .= pack('V', $c_len); //compressed filesize
$fr .= pack('V', $unc_len); //uncompressed filesize
$fr .= pack('v', strlen($name)); //length of filename
$fr .= pack('v', 0); //extra field length
$fr .= $name;
// end of "local file header" segment
// "file data" segment
$fr .= $zdata;
// "data descriptor" segment (optional but necessary if archive is not served as file)
$fr .= pack('V', $crc); //crc32
$fr .= pack('V', $c_len); //compressed filesize
$fr .= pack('V', $unc_len); //uncompressed filesize
// add this entry to array
$this->datasec[] = $fr;
$new_offset = strlen(implode('', $this->datasec));
// now add to central directory record
$cdrec = "\x50\x4b\x01\x02";
$cdrec .="\x00\x00"; // version made by
$cdrec .="\x14\x00"; // version needed to extract
$cdrec .="\x00\x00"; // gen purpose bit flag
$cdrec .="\x08\x00"; // compression method
$cdrec .="\x00\x00\x00\x00"; // last mod time & date
$cdrec .= pack('V', $crc); // crc32
$cdrec .= pack('V', $c_len); //compressed filesize
$cdrec .= pack('V', $unc_len); //uncompressed filesize
$cdrec .= pack('v', strlen($name) ); //length of filename
$cdrec .= pack('v', 0); //extra field length
$cdrec .= pack('v', 0); //file comment length
$cdrec .= pack('v', 0); //disk number start
$cdrec .= pack('v', 0); //internal file attributes
$cdrec .= pack('V', 32); //external file attributes - 'archive' bit set
$cdrec .= pack('V', $this->old_offset); //relative offset of local header
$this->old_offset = $new_offset;
$cdrec .= $name;
// optional extra field, file comment goes here
// save to central directory
$this->ctrl_dir[] = $cdrec;
}
function file() { // dump out file
$data = implode('', $this->datasec);
$ctrldir = implode('', $this->ctrl_dir);
return
$data.
$ctrldir.
$this->eof_ctrl_dir.
pack('v', sizeof($this->ctrl_dir)). // total # of entries "on this disk"
pack('v', sizeof($this->ctrl_dir)). // total # of entries overall
pack('V', strlen($ctrldir)). // size of central dir
pack('V', strlen($data)). // offset to start of central dir
"\x00\x00"; // .zip file comment length
}
} // end of class
?>
|