Mirrors
/
php
mirror of https://github.com/php/php-src
3
0
Fork 0
Code Releases Activity
Browse Source

- Provide ascriptto build phar.php from phar directory 

- Fix minor issues
- Make pack -p also add phar/phar.incto the generated package
PHAR_1_2
Marcus Boerger 19 years ago
parent
38bb8cb5af
commit
7c9d3a5745
4 changed files with 2047 additions and 696 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 60
      ext/phar/build_precommand.php
  2. 2534
      ext/phar/phar.php
  3. 80
      ext/phar/phar/phar.inc
  4. 69
      ext/phar/phar/pharcommand.inc

60
ext/phar/build_precommand.php
View File

@ -0,0 +1,60 @@
#!/usr/bin/php
<?php echo '<'.'?php';?>
/** @file phar.php
* @ingroup Phar
* @brief class Phar Pre Command
* @author Marcus Boerger
* @date 2007 - 2007
*
* Phar Command
*/
foreach(array("SPL", "Reflection", "Phar") as $ext)
{
if (!extension_loaded($ext))
{
echo "$argv[0] requires PHP extension $ext.\n";
exit(1);
}
}
<?php
$classes = array(
'DirectoryTreeIterator',
'DirectoryGraphIterator',
'InvertedRegexIterator',
'CLICommand',
'PharCommand',
);
foreach($classes as $name)
{
echo "if (!class_exists('$name', 0))\n{\n";
$f = file(dirname(__FILE__) . '/phar/' . strtolower($name) . '.inc');
unset($f[0]);
$c = count($f);
while ($c && (strlen($f[$c]) == 0 || $f[$c] == "\n" || $f[$c] == "\r\n"))
{
unset($f[$c--]);
}
if (substr($f[$c], -2) == "\r\n") {
$f[$c] = substr($f[$c], 0, -2);
}
if (substr($f[$c], -1) == "\n") {
$f[$c] = substr($f[$c], 0, -1);
}
if (substr($f[$c], -2) == '?>') {
$f[$c] = substr($f[$c], 0,-2);
}
while ($c && (strlen($f[$c]) == 0 || $f[$c] == "\n" || $f[$c] == "\r\n"))
{
unset($f[$c--]);
}
echo join('', $f);
echo "\n}\n\n";
}
?>
new PharCommand($argc, $argv);

2534
ext/phar/phar.php
File diff suppressed because it is too large
View File

80
ext/phar/phar/phar.inc
View File

@ -0,0 +1,80 @@
<?php
/**
* @file phar.inc
* @ingroup Phar
* @brief class Phar
* @author Marcus Boerger
* @date 2007 - 2007
*
* Phar Command
*/
// {{{ class Phar extends PHP_Archive
/**
* Phar class
*
* @ingroup Phar
* @brief Phar implementation
* @author Marcus Boerger
* @version 1.0
*/
class Phar extends PHP_Archive implements RecursiveIterator
{
function getSignature()
{
return false;
}
function getAlias()
{
return false;
}
function rewind()
{
}
function valid()
{
return false;
}
function current()
{
}
function key()
{
}
function next()
{
}
function hasChildren()
{
return false;
}
function getChildren()
{
}
function hasMetadata()
{
}
function getMetadata()
{
}
function getStub()
{
}
function setStub()
{
}
}
?>

69
ext/phar/phar/pharcommand.inc
View File

@ -111,7 +111,14 @@ class PharCommand extends CLICommand
'p' => array(
'typ' => 'loader',
'val' => NULL,
'inf' => '<loader> Location of PHP_Archive class file (pear list-files PHP_Archive). You can use \'0\' or \'1\' to locate it automatically using the mentioned pear command. When using \'0\' the command does not error out when the class file cannot be located.',
'inf' => '<loader> Location of PHP_Archive class file (pear list-files PHP_Archive).'
.'You can use \'0\' or \'1\' to locate it automatically using the mentioned '
.'pear command. When using \'0\' the command does not error out when the '
.'class file cannot be located. This switch also adds some code around the '
.'stub so that class PHP_Archive gets registered as phar:// stream wrapper '
.'if necessary. And finally this switch will add the file phar.inc from '
.'this package and load it to ensure class Phar is present.'
,
),
's' => array(
'typ' => 'file',
@ -409,11 +416,14 @@ class PharCommand extends CLICommand
$s .= substr($c, 0, strpos($c, "\n") + 1);
}
$s .= '<?php if (!class_exists("Phar",0) && !class_exists("PHP_Archive")) { ?>';
$s .= file_get_contents($loader);
$s .= '<?php class Phar extends PHP_Archive { } ';
$s .= '} ';
$s .= 'if (!in_array(\'phar\', stream_get_wrappers())) { stream_wrapper_register(\'phar\', \'Phar\'); } ';
$s .= "<?php if (!class_exists('PHP_Archive')) {\n?>";
$s .= file_get_contents($loader);
$s .= "<?php\n";
$s .= "}\n";
$s .= "if (!in_array('phar', stream_get_wrappers())) {\n\tstream_wrapper_register('phar', 'PHP_Archive');\n}\n";
$s .= "if (!class_exists('Phar',0)) {\n";
$s .= "\tinclude 'phar://'.__FILE__.'/phar.inc';\n";
$s .= "}\n";
$s .= '?>';
if (substr($c,0,1) == '#') {
@ -428,13 +438,21 @@ class PharCommand extends CLICommand
}
if (!is_array($input)) {
$this->phar_add($phar, $level, $input, $regex, $invregex, $stub, NULL);
$this->phar_add($phar, $level, $input, $regex, $invregex, $stub, NULL, isset($loader));
} else {
foreach($input as $i) {
$this->phar_add($phar, $level, $i, $regex, $invregex, $stub);
$this->phar_add($phar, $level, $i, $regex, $invregex, $stub, NULL, isset($loader));
}
}
if (isset($loader)) {
if (substr(__FILE__, -15) == 'pharcommand.inc') {
self::phar_add_file($phar, 0, 'phar.inc', 'phar://'.__FILE__.'/phar.inc', NULL);
} else {
self::phar_add_file($phar, 0, 'phar.inc', dirname(__FILE__).'/phar/phar.inc', NULL);
}
}
switch($this->args['c']['val']) {
case 'gz':
case 'gzip':
@ -464,13 +482,15 @@ class PharCommand extends CLICommand
* This function will take a directory and iterate through
* it and get the files to insert into the Phar archive.
*
* @param Phar $phar The phar object.
* @param string $input The input directory
* @param string $regex The regex use in RegexIterator.
* @param string $invregex The InvertedRegexIterator expression.
* @param SplFileInfo $stub
* @param Phar $phar The phar object.
* @param string $input The input directory
* @param string $regex The regex use in RegexIterator.
* @param string $invregex The InvertedRegexIterator expression.
* @param SplFileInfo $stub Stub file object
* @param mixed $compress Compression algorithm or NULL
* @param boolean $noloader Whether to prevent adding the loader
*/
static function phar_add(Phar $phar, $level, $input, $regex, $invregex, SplFileInfo $stub = NULL, $compress = NULL)
static function phar_add(Phar $phar, $level, $input, $regex, $invregex, SplFileInfo $stub = NULL, $compress = NULL, $noloader = false)
{
if ($input && is_file($input) && !is_dir($input)) {
return self::phar_add_file($phar, $level, $input, $input, $compress);
@ -489,7 +509,7 @@ class PharCommand extends CLICommand
try {
foreach($dir as $file) {
if (empty($stub) || $file->getRealPath() != $stub->getRealPath()) {
self::phar_add_file($phar, $level, $dir->getSubPathName(), $file, $compress);
self::phar_add_file($phar, $level, $dir->getSubPathName(), $file, $compress, $noloader);
}
}
} catch(Excpetion $e) {
@ -503,19 +523,24 @@ class PharCommand extends CLICommand
*
* This function adds a file to a phar archive.
*
* @param Phar $phar The phar object
* @param string $level The level of the file.
* @param string $entry The entry point
* @param string $file The file to add to the archive
* @param string $compress The compression scheme for the file.
* @param Phar $phar The phar object
* @param string $level The level of the file.
* @param string $entry The entry point
* @param string $file The file to add to the archive
* @param string $compress The compression scheme for the file.
* @param boolean $noloader Whether to prevent adding the loader
*/
static function phar_add_file(Phar $phar, $level, $entry, $file, $compress)
static function phar_add_file(Phar $phar, $level, $entry, $file, $compress, $noloader = false)
{
$entry = str_replace('//', '/', $entry);
while($level-- > 0 && ($p = strpos($entry, '/')) !== false) {
$entry = substr($entry, $p+1);
}
if ($noloader && $entry == 'phar.inc') {
return;
}
echo "$entry\n";
$phar[$entry] = file_get_contents($file);
@ -1331,7 +1356,7 @@ class PharCommand extends CLICommand
$infos['Compressed-bz2'] = $compalg['BZ2'];
$infos['Uncompressed-size'] = $usize;
$infos['Compressed-size'] = $csize;
$infos['Compression-ratio'] = sprintf('%.3g%%', ($csize * 100) / $usize);
$infos['Compression-ratio'] = sprintf('%.3g%%', $usize ? ($csize * 100) / $usize : 100);
$infos['Metadata-global'] = $phar->hasMetadata() * 1;
$infos['Metadata-files'] = $mcount;
$infos['Stub-size'] = strlen($phar->getStub());

Write Preview
Loading…
Cancel
Save