File:
[ELWIX - Embedded LightWeight unIX -] /
embedaddon /
php /
ext /
phar /
tests /
files /
phar_test.inc
Revision
1.1.1.1 (vendor branch):
download - view:
text,
annotated -
select for diffs -
revision graph
Tue Feb 21 23:48:00 2012 UTC (12 years, 10 months ago) by
misho
Branches:
php,
MAIN
CVS tags:
v5_4_3elwix,
v5_4_29p0,
v5_4_29,
v5_4_20p0,
v5_4_20,
v5_4_17p0,
v5_4_17,
v5_3_10,
HEAD
php
<?php
if (function_exists('date_default_timezone_set')) {
date_default_timezone_set('UTC');
}
$manifest = (binary)'';
$gflags = 0;
foreach($files as $name => $cont)
{
global $gflags, $files;
$comp = NULL;
$crc32= NULL;
$clen = NULL;
$ulen = NULL;
$time = isset($ftime) ? $ftime : @mktime(12, 0, 0, 3, 1, 2006);
$flags= 0;
$perm = 0x000001B6;
$meta = NULL;
// overwrite if array
if (is_array($cont))
{
foreach(array('comp','crc32','clen','ulen','time','flags','perm','meta','cont') as $what)
{
if (isset($cont[$what]))
{
$$what = $cont[$what];
}
}
}
// create if not yet done
if (empty($comp)) $comp = $cont;
if (empty($ulen)) $ulen = strlen($cont);
if (empty($clen)) $clen = strlen($comp);
if (empty($crc32))$crc32= crc32((binary)$cont);
if (isset($meta)) $meta = serialize($meta);
// write manifest entry
$manifest .= pack('V', strlen($name)) . (binary)$name;
$manifest .= pack('VVVVVV', $ulen, $time, $clen, $crc32, $flags|$perm, strlen($meta)) . (binary)$meta;
// globals
$gflags |= $flags;
$files[$name] = $comp;
}
if (!isset($alias)) $alias = 'hio';
if (isset($pmeta)) $pmeta = serialize($pmeta); else $pmeta = '';
$manifest = pack('VnVV', count($files), isset($hasdir) ? 0x1110 : 0x1000, $gflags, strlen($alias)) . (binary)$alias . pack('V', strlen($pmeta)) . (binary)$pmeta . $manifest;
$file = (binary)$file;
$file .= pack('V', strlen($manifest)) . $manifest;
foreach($files as $cont)
{
$file .= (binary)$cont;
}
file_put_contents($fname, $file);
if (@$gzip) {
$fp = gzopen($fname, 'w');
fwrite($fp, $file);
fclose($fp);
}
if (@$bz2) {
$fp = bzopen($fname, 'w');
fwrite($fp, $file);
fclose($fp);
}
?>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>