WebSVN - ant - Различия - Редакция 69 и 87 - /tags/0.2/lib/PEAR/Command/Package.php


<?php
/**
 * PEAR_Command_Package (package, package-validate, cvsdiff, cvstag, package-dependencies,
 * sign, makerpm, convert commands)
 *
 * PHP versions 4 and 5
 *
 * LICENSE: This source file is subject to version 3.0 of the PHP license
 * that is available through the world-wide-web at the following URI:
 * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
 * the PHP License and are unable to obtain it through the web, please
 * send a note to license@php.net so we can mail you a copy immediately.
 *
 * @category   pear
 * @package    PEAR
 * @author     Stig Bakken <ssb@php.net>
 * @author     Martin Jansen <mj@php.net>
 * @author     Greg Beaver <cellog@php.net>
 * @copyright  1997-2008 The PHP Group
 * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 * @version    CVS: $Id: Package.php,v 1.128 2008/03/29 21:06:58 dufuz Exp $
 * @link       http://pear.php.net/package/PEAR
 * @since      File available since Release 0.1
 */

/**
 * base class
 */
require_once 'PEAR/Command/Common.php';

/**
 * PEAR commands for login/logout
 *
 * @category   pear
 * @package    PEAR
 * @author     Stig Bakken <ssb@php.net>
 * @author     Martin Jansen <mj@php.net>
 * @author     Greg Beaver <cellog@php.net>
 * @copyright  1997-2008 The PHP Group
 * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 * @version    Release: @package_version@
 * @link       http://pear.php.net/package/PEAR
 * @since      Class available since Release 0.1
 */

class PEAR_Command_Package extends PEAR_Command_Common
{
    // {{{ properties

    var $commands = array(
        'package' => array(
            'summary' => 'Build Package',
            'function' => 'doPackage',
            'shortcut' => 'p',
            'options' => array(
                'nocompress' => array(
                    'shortopt' => 'Z',
                    'doc' => 'Do not gzip the package file'
                    ),
                'showname' => array(
                    'shortopt' => 'n',
                    'doc' => 'Print the name of the packaged file.',
                    ),
                ),
            'doc' => '[descfile] [descfile2]
Creates a PEAR package from its description file (usually called
package.xml).  If a second packagefile is passed in, then
the packager will check to make sure that one is a package.xml
version 1.0, and the other is a package.xml version 2.0.  The
package.xml version 1.0 will be saved as "package.xml" in the archive,
and the other as "package2.xml" in the archive"
'
            ),
        'package-validate' => array(
            'summary' => 'Validate Package Consistency',
            'function' => 'doPackageValidate',
            'shortcut' => 'pv',
            'options' => array(),
            'doc' => '
',
            ),
        'cvsdiff' => array(
            'summary' => 'Run a "cvs diff" for all files in a package',
            'function' => 'doCvsDiff',
            'shortcut' => 'cd',
            'options' => array(
                'quiet' => array(
                    'shortopt' => 'q',
                    'doc' => 'Be quiet',
                    ),
                'reallyquiet' => array(
                    'shortopt' => 'Q',
                    'doc' => 'Be really quiet',
                    ),
                'date' => array(
                    'shortopt' => 'D',
                    'doc' => 'Diff against revision of DATE',
                    'arg' => 'DATE',
                    ),
                'release' => array(
                    'shortopt' => 'R',
                    'doc' => 'Diff against tag for package release REL',
                    'arg' => 'REL',
                    ),
                'revision' => array(
                    'shortopt' => 'r',
                    'doc' => 'Diff against revision REV',
                    'arg' => 'REV',
                    ),
                'context' => array(
                    'shortopt' => 'c',
                    'doc' => 'Generate context diff',
                    ),
                'unified' => array(
                    'shortopt' => 'u',
                    'doc' => 'Generate unified diff',
                    ),
                'ignore-case' => array(
                    'shortopt' => 'i',
                    'doc' => 'Ignore case, consider upper- and lower-case letters equivalent',
                    ),
                'ignore-whitespace' => array(
                    'shortopt' => 'b',
                    'doc' => 'Ignore changes in amount of white space',
                    ),
                'ignore-blank-lines' => array(
                    'shortopt' => 'B',
                    'doc' => 'Ignore changes that insert or delete blank lines',
                    ),
                'brief' => array(
                    'doc' => 'Report only whether the files differ, no details',
                    ),
                'dry-run' => array(
                    'shortopt' => 'n',
                    'doc' => 'Don\'t do anything, just pretend',
                    ),
                ),
            'doc' => '<package.xml>
Compares all the files in a package.  Without any options, this
command will compare the current code with the last checked-in code.
Using the -r or -R option you may compare the current code with that
of a specific release.
',
            ),
        'cvstag' => array(
            'summary' => 'Set CVS Release Tag',
            'function' => 'doCvsTag',
            'shortcut' => 'ct',
            'options' => array(
                'quiet' => array(
                    'shortopt' => 'q',
                    'doc' => 'Be quiet',
                    ),
                'reallyquiet' => array(
                    'shortopt' => 'Q',
                    'doc' => 'Be really quiet',
                    ),
                'slide' => array(
                    'shortopt' => 'F',
                    'doc' => 'Move (slide) tag if it exists',
                    ),
                'delete' => array(
                    'shortopt' => 'd',
                    'doc' => 'Remove tag',
                    ),
                'dry-run' => array(
                    'shortopt' => 'n',
                    'doc' => 'Don\'t do anything, just pretend',
                    ),
                ),
            'doc' => '<package.xml> [files...]
Sets a CVS tag on all files in a package.  Use this command after you have
packaged a distribution tarball with the "package" command to tag what
revisions of what files were in that release.  If need to fix something
after running cvstag once, but before the tarball is released to the public,
use the "slide" option to move the release tag.

to include files (such as a second package.xml, or tests not included in the
release), pass them as additional parameters.
',
            ),
        'package-dependencies' => array(
            'summary' => 'Show package dependencies',
            'function' => 'doPackageDependencies',
            'shortcut' => 'pd',
            'options' => array(),
            'doc' => '
List all dependencies the package has.'
            ),
        'sign' => array(
            'summary' => 'Sign a package distribution file',
            'function' => 'doSign',
            'shortcut' => 'si',
            'options' => array(
                'verbose' => array(
                    'shortopt' => 'v',
                    'doc' => 'Display GnuPG output',
                    ),
            ),
            'doc' => '<package-file>
Signs a package distribution (.tar or .tgz) file with GnuPG.',
            ),
        'makerpm' => array(
            'summary' => 'Builds an RPM spec file from a PEAR package',
            'function' => 'doMakeRPM',
            'shortcut' => 'rpm',
            'options' => array(
                'spec-template' => array(
                    'shortopt' => 't',
                    'arg' => 'FILE',
                    'doc' => 'Use FILE as RPM spec file template'
                    ),
                'rpm-pkgname' => array(
                    'shortopt' => 'p',
                    'arg' => 'FORMAT',
                    'doc' => 'Use FORMAT as format string for RPM package name, %s is replaced
by the PEAR package name, defaults to "PEAR::%s".',
                    ),
                ),
            'doc' => '<package-file>

Creates an RPM .spec file for wrapping a PEAR package inside an RPM
package.  Intended to be used from the SPECS directory, with the PEAR
package tarball in the SOURCES directory:

$ pear makerpm ../SOURCES/Net_Socket-1.0.tgz
Wrote RPM spec file PEAR::Net_Geo-1.0.spec
$ rpm -bb PEAR::Net_Socket-1.0.spec
...
Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm
',
            ),
        'convert' => array(
            'summary' => 'Convert a package.xml 1.0 to package.xml 2.0 format',
            'function' => 'doConvert',
            'shortcut' => 'c2',
            'options' => array(
                'flat' => array(
                    'shortopt' => 'f',
                    'doc' => 'do not beautify the filelist.',
                    ),
                ),
            'doc' => '[descfile] [descfile2]
Converts a package.xml in 1.0 format into a package.xml
in 2.0 format.  The new file will be named package2.xml by default,
and package.xml will be used as the old file by default.
This is not the most intelligent conversion, and should only be
used for automated conversion or learning the format.
'
            ),
        );

    var $output;

    // }}}
    // {{{ constructor

    /**
     * PEAR_Command_Package constructor.
     *
     * @access public
     */
    function PEAR_Command_Package(&$ui, &$config)
    {
        parent::PEAR_Command_Common($ui, $config);
    }

    // }}}

    // {{{ _displayValidationResults()

    function _displayValidationResults($err, $warn, $strict = false)
    {
        foreach ($err as $e) {
            $this->output .= "Error: $e\n";
        }
        foreach ($warn as $w) {
            $this->output .= "Warning: $w\n";
        }
        $this->output .= sprintf('Validation: %d error(s), %d warning(s)'."\n",
                                       sizeof($err), sizeof($warn));
        if ($strict && sizeof($err) > 0) {
            $this->output .= "Fix these errors and try again.";
            return false;
        }
        return true;
    }

    // }}}
    function &getPackager()
    {
        if (!class_exists('PEAR_Packager')) {
            require_once 'PEAR/Packager.php';
        }
        $a = &new PEAR_Packager;
        return $a;
    }

    function &getPackageFile($config, $debug = false, $tmpdir = null)
    {
        if (!class_exists('PEAR_Common')) {
            require_once 'PEAR/Common.php';
        }
        if (!class_exists('PEAR_PackageFile')) {
            require_once 'PEAR/PackageFile.php';
        }
        $a = &new PEAR_PackageFile($config, $debug, $tmpdir);
        $common = new PEAR_Common;
        $common->ui = $this->ui;
        $a->setLogger($common);
        return $a;
    }
    // {{{ doPackage()

    function doPackage($command, $options, $params)
    {
        $this->output = '';
        $pkginfofile = isset($params[0]) ? $params[0] : 'package.xml';
        $pkg2 = isset($params[1]) ? $params[1] : null;
        if (!$pkg2 && !isset($params[0])) {
            if (file_exists('package2.xml')) {
                $pkg2 = 'package2.xml';
            }
        }
        $packager = &$this->getPackager();
        $compress = empty($options['nocompress']) ? true : false;
        $result = $packager->package($pkginfofile, $compress, $pkg2);
        if (PEAR::isError($result)) {
            return $this->raiseError($result);
        }
        // Don't want output, only the package file name just created
        if (isset($options['showname'])) {
            $this->output = $result;
        }
        if ($this->output) {
            $this->ui->outputData($this->output, $command);
        }
        return true;
    }

    // }}}
    // {{{ doPackageValidate()

    function doPackageValidate($command, $options, $params)
    {
        $this->output = '';
        if (sizeof($params) < 1) {
            $params[0] = "package.xml";
        }
        $obj = &$this->getPackageFile($this->config, $this->_debug);
        $obj->rawReturn();
        PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN);
        $info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL);
        if (PEAR::isError($info)) {
            $info = $obj->fromPackageFile($params[0], PEAR_VALIDATE_NORMAL);
        } else {
            $archive = $info->getArchiveFile();
            $tar = &new Archive_Tar($archive);
            $tar->extract(dirname($info->getPackageFile()));
            $info->setPackageFile(dirname($info->getPackageFile()) . DIRECTORY_SEPARATOR .
                $info->getPackage() . '-' . $info->getVersion() . DIRECTORY_SEPARATOR .
                basename($info->getPackageFile()));
        }
        PEAR::staticPopErrorHandling();
        if (PEAR::isError($info)) {
            return $this->raiseError($info);
        }
        $valid = false;
        if ($info->getPackagexmlVersion() == '2.0') {
            if ($valid = $info->validate(PEAR_VALIDATE_NORMAL)) {
                $info->flattenFileList();
                $valid = $info->validate(PEAR_VALIDATE_PACKAGING);
            }
        } else {
            $valid = $info->validate(PEAR_VALIDATE_PACKAGING);
        }
        $err = $warn = array();
        if ($errors = $info->getValidationWarnings()) {
            foreach ($errors as $error) {
                if ($error['level'] == 'warning') {
                    $warn[] = $error['message'];
                } else {
                    $err[] = $error['message'];
                }
            }
        }
        $this->_displayValidationResults($err, $warn);
        $this->ui->outputData($this->output, $command);
        return true;
    }

    // }}}
    // {{{ doCvsTag()

    function doCvsTag($command, $options, $params)
    {
        $this->output = '';
        $_cmd = $command;
        if (sizeof($params) < 1) {
            $help = $this->getHelp($command);
            return $this->raiseError("$command: missing parameter: $help[0]");
        }
        $obj = &$this->getPackageFile($this->config, $this->_debug);
        $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);
        if (PEAR::isError($info)) {
            return $this->raiseError($info);
        }
        $err = $warn = array();
        if (!$info->validate()) {
            foreach ($info->getValidationWarnings() as $error) {
                if ($error['level'] == 'warning') {
                    $warn[] = $error['message'];
                } else {
                    $err[] = $error['message'];
                }
            }
        }
        if (!$this->_displayValidationResults($err, $warn, true)) {
            $this->ui->outputData($this->output, $command);
            return $this->raiseError('CVS tag failed');
        }
        $version = $info->getVersion();
        $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $version);
        $cvstag = "RELEASE_$cvsversion";
        $files = array_keys($info->getFilelist());
        $command = "cvs";
        if (isset($options['quiet'])) {
            $command .= ' -q';
        }
        if (isset($options['reallyquiet'])) {
            $command .= ' -Q';
        }
        $command .= ' tag';
        if (isset($options['slide'])) {
            $command .= ' -F';
        }
        if (isset($options['delete'])) {
            $command .= ' -d';
        }
        $command .= ' ' . $cvstag . ' ' . escapeshellarg($params[0]);
        array_shift($params);
        if (count($params)) {
            // add in additional files to be tagged
            $files = array_merge($files, $params);
        }
        foreach ($files as $file) {
            $command .= ' ' . escapeshellarg($file);
        }
        if ($this->config->get('verbose') > 1) {
            $this->output .= "+ $command\n";
        }
        $this->output .= "+ $command\n";
        if (empty($options['dry-run'])) {
            $fp = popen($command, "r");
            while ($line = fgets($fp, 1024)) {
                $this->output .= rtrim($line)."\n";
            }
            pclose($fp);
        }
        $this->ui->outputData($this->output, $_cmd);
        return true;
    }

    // }}}
    // {{{ doCvsDiff()

    function doCvsDiff($command, $options, $params)
    {
        $this->output = '';
        if (sizeof($params) < 1) {
            $help = $this->getHelp($command);
            return $this->raiseError("$command: missing parameter: $help[0]");
        }
        $obj = &$this->getPackageFile($this->config, $this->_debug);
        $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);
        if (PEAR::isError($info)) {
            return $this->raiseError($info);
        }
        $err = $warn = array();
        if (!$info->validate()) {
            foreach ($info->getValidationWarnings() as $error) {
                if ($error['level'] == 'warning') {
                    $warn[] = $error['message'];
                } else {
                    $err[] = $error['message'];
                }
            }
        }
        if (!$this->_displayValidationResults($err, $warn, true)) {
            $this->ui->outputData($this->output, $command);
            return $this->raiseError('CVS diff failed');
        }
        $info1 = $info->getFilelist();
        $files = $info1;
        $cmd = "cvs";
        if (isset($options['quiet'])) {
            $cmd .= ' -q';
            unset($options['quiet']);
        }
        if (isset($options['reallyquiet'])) {
            $cmd .= ' -Q';
            unset($options['reallyquiet']);
        }
        if (isset($options['release'])) {
            $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $options['release']);
            $cvstag = "RELEASE_$cvsversion";
            $options['revision'] = $cvstag;
            unset($options['release']);
        }
        $execute = true;
        if (isset($options['dry-run'])) {
            $execute = false;
            unset($options['dry-run']);
        }
        $cmd .= ' diff';
        // the rest of the options are passed right on to "cvs diff"
        foreach ($options as $option => $optarg) {
            $arg = $short = false;
            if (isset($this->commands[$command]['options'][$option])) {
                $arg = $this->commands[$command]['options'][$option]['arg'];
                $short = $this->commands[$command]['options'][$option]['shortopt'];
            }
            $cmd .= $short ? " -$short" : " --$option";
            if ($arg && $optarg) {
                $cmd .= ($short ? '' : '=') . escapeshellarg($optarg);
            }
        }
        foreach ($files as $file) {
            $cmd .= ' ' . escapeshellarg($file['name']);
        }
        if ($this->config->get('verbose') > 1) {
            $this->output .= "+ $cmd\n";
        }
        if ($execute) {
            $fp = popen($cmd, "r");
            while ($line = fgets($fp, 1024)) {
                $this->output .= rtrim($line)."\n";
            }
            pclose($fp);
        }
        $this->ui->outputData($this->output, $command);
        return true;
    }

    // }}}
    // {{{ doPackageDependencies()

    function doPackageDependencies($command, $options, $params)
    {
        // $params[0] -> the PEAR package to list its information
        if (sizeof($params) != 1) {
            return $this->raiseError("bad parameter(s), try \"help $command\"");
        }
        $obj = &$this->getPackageFile($this->config, $this->_debug);
        $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);
        if (PEAR::isError($info)) {
            return $this->raiseError($info);
        }
        $deps = $info->getDeps();
        if (is_array($deps)) {
            if ($info->getPackagexmlVersion() == '1.0') {
                $data = array(
                    'caption' => 'Dependencies for pear/' . $info->getPackage(),
                    'border' => true,
                    'headline' => array("Required?", "Type", "Name", "Relation", "Version"),
                    );

                foreach ($deps as $d) {
                    if (isset($d['optional'])) {
                        if ($d['optional'] == 'yes') {
                            $req = 'No';
                        } else {
                            $req = 'Yes';
                        }
                    } else {
                        $req = 'Yes';
                    }
                    if (isset($this->_deps_rel_trans[$d['rel']])) {
                        $rel = $this->_deps_rel_trans[$d['rel']];
                    } else {
                        $rel = $d['rel'];
                    }

                    if (isset($this->_deps_type_trans[$d['type']])) {
                        $type = ucfirst($this->_deps_type_trans[$d['type']]);
                    } else {
                        $type = $d['type'];
                    }

                    if (isset($d['name'])) {
                        $name = $d['name'];
                    } else {
                        $name = '';
                    }

                    if (isset($d['version'])) {
                        $version = $d['version'];
                    } else {
                        $version = '';
                    }

                    $data['data'][] = array($req, $type, $name, $rel, $version);
                }
            } else { // package.xml 2.0 dependencies display
                require_once 'PEAR/Dependency2.php';
                $deps = $info->getDependencies();
                $reg = &$this->config->getRegistry();
                if (is_array($deps)) {
                    $d = new PEAR_Dependency2($this->config, array(), '');
                    $data = array(
                        'caption' => 'Dependencies for ' . $info->getPackage(),
                        'border' => true,
                        'headline' => array("Required?", "Type", "Name", 'Versioning', 'Group'),
                        );
                    foreach ($deps as $type => $subd) {
                        $req = ($type == 'required') ? 'Yes' : 'No';
                        if ($type == 'group') {
                            $group = $subd['attribs']['name'];
                        } else {
                            $group = '';
                        }
                        if (!isset($subd[0])) {
                            $subd = array($subd);
                        }
                        foreach ($subd as $groupa) {
                            foreach ($groupa as $deptype => $depinfo) {
                                if ($deptype == 'attribs') {
                                    continue;
                                }
                                if ($deptype == 'pearinstaller') {
                                    $deptype = 'pear Installer';
                                }
                                if (!isset($depinfo[0])) {
                                    $depinfo = array($depinfo);
                                }
                                foreach ($depinfo as $inf) {
                                    $name = '';
                                    if (isset($inf['channel'])) {
                                        $alias = $reg->channelAlias($inf['channel']);
                                        if (!$alias) {
                                            $alias = '(channel?) ' .$inf['channel'];
                                        }
                                        $name = $alias . '/';
                                    }
                                    if (isset($inf['name'])) {
                                        $name .= $inf['name'];
                                    } elseif (isset($inf['pattern'])) {
                                        $name .= $inf['pattern'];
                                    } else {
                                        $name .= '';
                                    }
                                    if (isset($inf['uri'])) {
                                        $name .= ' [' . $inf['uri'] .  ']';
                                    }
                                    if (isset($inf['conflicts'])) {
                                        $ver = 'conflicts';
                                    } else {
                                        $ver = $d->_getExtraString($inf);
                                    }
                                    $data['data'][] = array($req, ucfirst($deptype), $name,
                                        $ver, $group);
                                }
                            }
                        }
                    }
                }
            }

            $this->ui->outputData($data, $command);
            return true;
        }

        // Fallback
        $this->ui->outputData("This package does not have any dependencies.", $command);
    }

    // }}}
    // {{{ doSign()

    function doSign($command, $options, $params)
    {
        require_once 'System.php';
        require_once 'Archive/Tar.php';
        // should move most of this code into PEAR_Packager
        // so it'll be easy to implement "pear package --sign"
        if (sizeof($params) != 1) {
            return $this->raiseError("bad parameter(s), try \"help $command\"");
        }
        if (!file_exists($params[0])) {
            return $this->raiseError("file does not exist: $params[0]");
        }
        $obj = $this->getPackageFile($this->config, $this->_debug);
        $info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL);
        if (PEAR::isError($info)) {
            return $this->raiseError($info);
        }
        $tar = new Archive_Tar($params[0]);
        $tmpdir = System::mktemp('-d pearsign');
        if (!$tar->extractList('package2.xml package.xml package.sig', $tmpdir)) {
            return $this->raiseError("failed to extract tar file");
        }
        if (file_exists("$tmpdir/package.sig")) {
            return $this->raiseError("package already signed");
        }
        $packagexml = 'package.xml';
        if (file_exists("$tmpdir/package2.xml")) {
            $packagexml = 'package2.xml';
        }
        if (file_exists("$tmpdir/package.sig")) {
            unlink("$tmpdir/package.sig");
        }
        if (!file_exists("$tmpdir/$packagexml")) {
            return $this->raiseError("Extracted file $tmpdir/$packagexml not found.");
        }
        $input = $this->ui->userDialog($command,
                                       array('GnuPG Passphrase'),
                                       array('password'));
        if (!isset($input[0])) {
            //use empty passphrase
            $input[0] = '';
        }

        $devnull = (isset($options['verbose'])) ? '' : ' 2>/dev/null';
        $gpg = popen("gpg --batch --passphrase-fd 0 --armor --detach-sign --output $tmpdir/package.sig $tmpdir/$packagexml" . $devnull, "w");
        if (!$gpg) {
            return $this->raiseError("gpg command failed");
        }
        fwrite($gpg, "$input[0]\n");
        if (pclose($gpg) || !file_exists("$tmpdir/package.sig")) {
            return $this->raiseError("gpg sign failed");
        }
        if (!$tar->addModify("$tmpdir/package.sig", '', $tmpdir)) {
            return $this->raiseError('failed adding signature to file');
        }

        $this->ui->outputData("Package signed.", $command);
        return true;
    }

    // }}}

    /**
     * For unit testing purposes
     */
    function &getInstaller(&$ui)
    {
        if (!class_exists('PEAR_Installer')) {
            require_once 'PEAR/Installer.php';
        }
        $a = &new PEAR_Installer($ui);
        return $a;
    }

    /**
     * For unit testing purposes
     */
    function &getCommandPackaging(&$ui, &$config)
    {
        if (!class_exists('PEAR_Command_Packaging')) {
            if ($fp = @fopen('PEAR/Command/Packaging.php', 'r', true)) {
                fclose($fp);
                include_once 'PEAR/Command/Packaging.php';
            }
        }

        if (class_exists('PEAR_Command_Packaging')) {
            $a = &new PEAR_Command_Packaging($ui, $config);
        } else {
            $a = null;
        }
        return $a;
    }

    // {{{ doMakeRPM()

    function doMakeRPM($command, $options, $params)
    {

        // Check to see if PEAR_Command_Packaging is installed, and
        // transparently switch to use the "make-rpm-spec" command from it
        // instead, if it does. Otherwise, continue to use the old version
        // of "makerpm" supplied with this package (PEAR).
        $packaging_cmd = $this->getCommandPackaging($this->ui, $this->config);
        if ($packaging_cmd !== null) {
            $this->ui->outputData('PEAR_Command_Packaging is installed; using '.
                'newer "make-rpm-spec" command instead');
            return $packaging_cmd->run('make-rpm-spec', $options, $params);
        } else {
            $this->ui->outputData('WARNING: "pear makerpm" is no longer available; an '.
              'improved version is available via "pear make-rpm-spec", which '.
              'is available by installing PEAR_Command_Packaging');
        }
        return true;
    }

    function doConvert($command, $options, $params)
    {
        $packagexml = isset($params[0]) ? $params[0] : 'package.xml';
        $newpackagexml = isset($params[1]) ? $params[1] : dirname($packagexml) .
            DIRECTORY_SEPARATOR . 'package2.xml';
        $pkg = &$this->getPackageFile($this->config, $this->_debug);
        PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN);
        $pf = $pkg->fromPackageFile($packagexml, PEAR_VALIDATE_NORMAL);
        PEAR::staticPopErrorHandling();
        if (!PEAR::isError($pf)) {
            if (is_a($pf, 'PEAR_PackageFile_v2')) {
                $this->ui->outputData($packagexml . ' is already a package.xml version 2.0');
                return true;
            }
            $gen = &$pf->getDefaultGenerator();
            $newpf = &$gen->toV2();
            $newpf->setPackagefile($newpackagexml);
            $gen = &$newpf->getDefaultGenerator();
            PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN);
            $state = (isset($options['flat']) ? PEAR_VALIDATE_PACKAGING : PEAR_VALIDATE_NORMAL);
            $saved = $gen->toPackageFile(dirname($newpackagexml), $state,
                basename($newpackagexml));
            PEAR::staticPopErrorHandling();
            if (PEAR::isError($saved)) {
                if (is_array($saved->getUserInfo())) {
                    foreach ($saved->getUserInfo() as $warning) {
                        $this->ui->outputData($warning['message']);
                    }
                }
                $this->ui->outputData($saved->getMessage());
                return true;
            }
            $this->ui->outputData('Wrote new version 2.0 package.xml to "' . $saved . '"');
            return true;
        } else {
            if (is_array($pf->getUserInfo())) {
                foreach ($pf->getUserInfo() as $warning) {
                    $this->ui->outputData($warning['message']);
                }
            }
            return $this->raiseError($pf);
        }
    }

    // }}}
}

?>
 

Редакция 69	Редакция 87
1	<?php	1	<?php
2	/**	2	/**
3	* PEAR_Command_Package (package, package-validate, cvsdiff, cvstag, package-dependencies,	3	* PEAR_Command_Package (package, package-validate, cvsdiff, cvstag, package-dependencies,
4	* sign, makerpm, convert commands)	4	* sign, makerpm, convert commands)
5	*	5	*
6	* PHP versions 4 and 5	6	* PHP versions 4 and 5
7	*	7	*
8	* LICENSE: This source file is subject to version 3.0 of the PHP license	8	* LICENSE: This source file is subject to version 3.0 of the PHP license
9	* that is available through the world-wide-web at the following URI:	9	* that is available through the world-wide-web at the following URI:
10	* http://www.php.net/license/3_0.txt. If you did not receive a copy of	10	* http://www.php.net/license/3_0.txt. If you did not receive a copy of
11	* the PHP License and are unable to obtain it through the web, please	11	* the PHP License and are unable to obtain it through the web, please
12	* send a note to license@php.net so we can mail you a copy immediately.	12	* send a note to license@php.net so we can mail you a copy immediately.
13	*	13	*
14	* @category pear	14	* @category pear
15	* @package PEAR	15	* @package PEAR
16	* @author Stig Bakken <ssb@php.net>	16	* @author Stig Bakken <ssb@php.net>
17	* @author Martin Jansen <mj@php.net>	17	* @author Martin Jansen <mj@php.net>
18	* @author Greg Beaver <cellog@php.net>	18	* @author Greg Beaver <cellog@php.net>
19	* @copyright 1997-2008 The PHP Group	19	* @copyright 1997-2008 The PHP Group
20	* @license http://www.php.net/license/3_0.txt PHP License 3.0	20	* @license http://www.php.net/license/3_0.txt PHP License 3.0
21	* @version CVS: $Id: Package.php,v 1.128 2008/03/29 21:06:58 dufuz Exp $	21	* @version CVS: $Id: Package.php,v 1.128 2008/03/29 21:06:58 dufuz Exp $
22	* @link http://pear.php.net/package/PEAR	22	* @link http://pear.php.net/package/PEAR
23	* @since File available since Release 0.1	23	* @since File available since Release 0.1
24	*/	24	*/
25		25
26	/**	26	/**
27	* base class	27	* base class
28	*/	28	*/
29	require_once 'PEAR/Command/Common.php';	29	require_once 'PEAR/Command/Common.php';
30		30
31	/**	31	/**
32	* PEAR commands for login/logout	32	* PEAR commands for login/logout
33	*	33	*
34	* @category pear	34	* @category pear
35	* @package PEAR	35	* @package PEAR
36	* @author Stig Bakken <ssb@php.net>	36	* @author Stig Bakken <ssb@php.net>
37	* @author Martin Jansen <mj@php.net>	37	* @author Martin Jansen <mj@php.net>
38	* @author Greg Beaver <cellog@php.net>	38	* @author Greg Beaver <cellog@php.net>
39	* @copyright 1997-2008 The PHP Group	39	* @copyright 1997-2008 The PHP Group
40	* @license http://www.php.net/license/3_0.txt PHP License 3.0	40	* @license http://www.php.net/license/3_0.txt PHP License 3.0
41	* @version Release: @package_version@	41	* @version Release: @package_version@
42	* @link http://pear.php.net/package/PEAR	42	* @link http://pear.php.net/package/PEAR
43	* @since Class available since Release 0.1	43	* @since Class available since Release 0.1
44	*/	44	*/
45		45
46	class PEAR_Command_Package extends PEAR_Command_Common	46	class PEAR_Command_Package extends PEAR_Command_Common
47	{	47	{
48	// {{{ properties	48	// {{{ properties
49		49
50	var $commands = array(	50	var $commands = array(
51	'package' => array(	51	'package' => array(
52	'summary' => 'Build Package',	52	'summary' => 'Build Package',
53	'function' => 'doPackage',	53	'function' => 'doPackage',
54	'shortcut' => 'p',	54	'shortcut' => 'p',
55	'options' => array(	55	'options' => array(
56	'nocompress' => array(	56	'nocompress' => array(
57	'shortopt' => 'Z',	57	'shortopt' => 'Z',
58	'doc' => 'Do not gzip the package file'	58	'doc' => 'Do not gzip the package file'
59	),	59	),
60	'showname' => array(	60	'showname' => array(
61	'shortopt' => 'n',	61	'shortopt' => 'n',
62	'doc' => 'Print the name of the packaged file.',	62	'doc' => 'Print the name of the packaged file.',
63	),	63	),
64	),	64	),
65	'doc' => '[descfile] [descfile2]	65	'doc' => '[descfile] [descfile2]
66	Creates a PEAR package from its description file (usually called	66	Creates a PEAR package from its description file (usually called
67	package.xml). If a second packagefile is passed in, then	67	package.xml). If a second packagefile is passed in, then
68	the packager will check to make sure that one is a package.xml	68	the packager will check to make sure that one is a package.xml
69	version 1.0, and the other is a package.xml version 2.0. The	69	version 1.0, and the other is a package.xml version 2.0. The
70	package.xml version 1.0 will be saved as "package.xml" in the archive,	70	package.xml version 1.0 will be saved as "package.xml" in the archive,
71	and the other as "package2.xml" in the archive"	71	and the other as "package2.xml" in the archive"
72	'	72	'
73	),	73	),
74	'package-validate' => array(	74	'package-validate' => array(
75	'summary' => 'Validate Package Consistency',	75	'summary' => 'Validate Package Consistency',
76	'function' => 'doPackageValidate',	76	'function' => 'doPackageValidate',
77	'shortcut' => 'pv',	77	'shortcut' => 'pv',
78	'options' => array(),	78	'options' => array(),
79	'doc' => '	79	'doc' => '
80	',	80	',
81	),	81	),
82	'cvsdiff' => array(	82	'cvsdiff' => array(
83	'summary' => 'Run a "cvs diff" for all files in a package',	83	'summary' => 'Run a "cvs diff" for all files in a package',
84	'function' => 'doCvsDiff',	84	'function' => 'doCvsDiff',
85	'shortcut' => 'cd',	85	'shortcut' => 'cd',
86	'options' => array(	86	'options' => array(
87	'quiet' => array(	87	'quiet' => array(
88	'shortopt' => 'q',	88	'shortopt' => 'q',
89	'doc' => 'Be quiet',	89	'doc' => 'Be quiet',
90	),	90	),
91	'reallyquiet' => array(	91	'reallyquiet' => array(
92	'shortopt' => 'Q',	92	'shortopt' => 'Q',
93	'doc' => 'Be really quiet',	93	'doc' => 'Be really quiet',
94	),	94	),
95	'date' => array(	95	'date' => array(
96	'shortopt' => 'D',	96	'shortopt' => 'D',
97	'doc' => 'Diff against revision of DATE',	97	'doc' => 'Diff against revision of DATE',
98	'arg' => 'DATE',	98	'arg' => 'DATE',
99	),	99	),
100	'release' => array(	100	'release' => array(
101	'shortopt' => 'R',	101	'shortopt' => 'R',
102	'doc' => 'Diff against tag for package release REL',	102	'doc' => 'Diff against tag for package release REL',
103	'arg' => 'REL',	103	'arg' => 'REL',
104	),	104	),
105	'revision' => array(	105	'revision' => array(
106	'shortopt' => 'r',	106	'shortopt' => 'r',
107	'doc' => 'Diff against revision REV',	107	'doc' => 'Diff against revision REV',
108	'arg' => 'REV',	108	'arg' => 'REV',
109	),	109	),
110	'context' => array(	110	'context' => array(
111	'shortopt' => 'c',	111	'shortopt' => 'c',
112	'doc' => 'Generate context diff',	112	'doc' => 'Generate context diff',
113	),	113	),
114	'unified' => array(	114	'unified' => array(
115	'shortopt' => 'u',	115	'shortopt' => 'u',
116	'doc' => 'Generate unified diff',	116	'doc' => 'Generate unified diff',
117	),	117	),
118	'ignore-case' => array(	118	'ignore-case' => array(
119	'shortopt' => 'i',	119	'shortopt' => 'i',
120	'doc' => 'Ignore case, consider upper- and lower-case letters equivalent',	120	'doc' => 'Ignore case, consider upper- and lower-case letters equivalent',
121	),	121	),
122	'ignore-whitespace' => array(	122	'ignore-whitespace' => array(
123	'shortopt' => 'b',	123	'shortopt' => 'b',
124	'doc' => 'Ignore changes in amount of white space',	124	'doc' => 'Ignore changes in amount of white space',
125	),	125	),
126	'ignore-blank-lines' => array(	126	'ignore-blank-lines' => array(
127	'shortopt' => 'B',	127	'shortopt' => 'B',
128	'doc' => 'Ignore changes that insert or delete blank lines',	128	'doc' => 'Ignore changes that insert or delete blank lines',
129	),	129	),
130	'brief' => array(	130	'brief' => array(
131	'doc' => 'Report only whether the files differ, no details',	131	'doc' => 'Report only whether the files differ, no details',
132	),	132	),
133	'dry-run' => array(	133	'dry-run' => array(
134	'shortopt' => 'n',	134	'shortopt' => 'n',
135	'doc' => 'Don\'t do anything, just pretend',	135	'doc' => 'Don\'t do anything, just pretend',
136	),	136	),
137	),	137	),
138	'doc' => '<package.xml>	138	'doc' => '<package.xml>
139	Compares all the files in a package. Without any options, this	139	Compares all the files in a package. Without any options, this
140	command will compare the current code with the last checked-in code.	140	command will compare the current code with the last checked-in code.
141	Using the -r or -R option you may compare the current code with that	141	Using the -r or -R option you may compare the current code with that
142	of a specific release.	142	of a specific release.
143	',	143	',
144	),	144	),
145	'cvstag' => array(	145	'cvstag' => array(
146	'summary' => 'Set CVS Release Tag',	146	'summary' => 'Set CVS Release Tag',
147	'function' => 'doCvsTag',	147	'function' => 'doCvsTag',
148	'shortcut' => 'ct',	148	'shortcut' => 'ct',
149	'options' => array(	149	'options' => array(
150	'quiet' => array(	150	'quiet' => array(
151	'shortopt' => 'q',	151	'shortopt' => 'q',
152	'doc' => 'Be quiet',	152	'doc' => 'Be quiet',
153	),	153	),
154	'reallyquiet' => array(	154	'reallyquiet' => array(
155	'shortopt' => 'Q',	155	'shortopt' => 'Q',
156	'doc' => 'Be really quiet',	156	'doc' => 'Be really quiet',
157	),	157	),
158	'slide' => array(	158	'slide' => array(
159	'shortopt' => 'F',	159	'shortopt' => 'F',
160	'doc' => 'Move (slide) tag if it exists',	160	'doc' => 'Move (slide) tag if it exists',
161	),	161	),
162	'delete' => array(	162	'delete' => array(
163	'shortopt' => 'd',	163	'shortopt' => 'd',
164	'doc' => 'Remove tag',	164	'doc' => 'Remove tag',
165	),	165	),
166	'dry-run' => array(	166	'dry-run' => array(
167	'shortopt' => 'n',	167	'shortopt' => 'n',
168	'doc' => 'Don\'t do anything, just pretend',	168	'doc' => 'Don\'t do anything, just pretend',
169	),	169	),
170	),	170	),
171	'doc' => '<package.xml> [files...]	171	'doc' => '<package.xml> [files...]
172	Sets a CVS tag on all files in a package. Use this command after you have	172	Sets a CVS tag on all files in a package. Use this command after you have
173	packaged a distribution tarball with the "package" command to tag what	173	packaged a distribution tarball with the "package" command to tag what
174	revisions of what files were in that release. If need to fix something	174	revisions of what files were in that release. If need to fix something
175	after running cvstag once, but before the tarball is released to the public,	175	after running cvstag once, but before the tarball is released to the public,
176	use the "slide" option to move the release tag.	176	use the "slide" option to move the release tag.
177		177
178	to include files (such as a second package.xml, or tests not included in the	178	to include files (such as a second package.xml, or tests not included in the
179	release), pass them as additional parameters.	179	release), pass them as additional parameters.
180	',	180	',
181	),	181	),
182	'package-dependencies' => array(	182	'package-dependencies' => array(
183	'summary' => 'Show package dependencies',	183	'summary' => 'Show package dependencies',
184	'function' => 'doPackageDependencies',	184	'function' => 'doPackageDependencies',
185	'shortcut' => 'pd',	185	'shortcut' => 'pd',
186	'options' => array(),	186	'options' => array(),
187	'doc' => '	187	'doc' => '
188	List all dependencies the package has.'	188	List all dependencies the package has.'
189	),	189	),
190	'sign' => array(	190	'sign' => array(
191	'summary' => 'Sign a package distribution file',	191	'summary' => 'Sign a package distribution file',
192	'function' => 'doSign',	192	'function' => 'doSign',
193	'shortcut' => 'si',	193	'shortcut' => 'si',
194	'options' => array(	194	'options' => array(
195	'verbose' => array(	195	'verbose' => array(
196	'shortopt' => 'v',	196	'shortopt' => 'v',
197	'doc' => 'Display GnuPG output',	197	'doc' => 'Display GnuPG output',
198	),	198	),
199	),	199	),
200	'doc' => '<package-file>	200	'doc' => '<package-file>
201	Signs a package distribution (.tar or .tgz) file with GnuPG.',	201	Signs a package distribution (.tar or .tgz) file with GnuPG.',
202	),	202	),
203	'makerpm' => array(	203	'makerpm' => array(
204	'summary' => 'Builds an RPM spec file from a PEAR package',	204	'summary' => 'Builds an RPM spec file from a PEAR package',
205	'function' => 'doMakeRPM',	205	'function' => 'doMakeRPM',
206	'shortcut' => 'rpm',	206	'shortcut' => 'rpm',
207	'options' => array(	207	'options' => array(
208	'spec-template' => array(	208	'spec-template' => array(
209	'shortopt' => 't',	209	'shortopt' => 't',
210	'arg' => 'FILE',	210	'arg' => 'FILE',
211	'doc' => 'Use FILE as RPM spec file template'	211	'doc' => 'Use FILE as RPM spec file template'
212	),	212	),
213	'rpm-pkgname' => array(	213	'rpm-pkgname' => array(
214	'shortopt' => 'p',	214	'shortopt' => 'p',
215	'arg' => 'FORMAT',	215	'arg' => 'FORMAT',
216	'doc' => 'Use FORMAT as format string for RPM package name, %s is replaced	216	'doc' => 'Use FORMAT as format string for RPM package name, %s is replaced
217	by the PEAR package name, defaults to "PEAR::%s".',	217	by the PEAR package name, defaults to "PEAR::%s".',
218	),	218	),
219	),	219	),
220	'doc' => '<package-file>	220	'doc' => '<package-file>
221		221
222	Creates an RPM .spec file for wrapping a PEAR package inside an RPM	222	Creates an RPM .spec file for wrapping a PEAR package inside an RPM
223	package. Intended to be used from the SPECS directory, with the PEAR	223	package. Intended to be used from the SPECS directory, with the PEAR
224	package tarball in the SOURCES directory:	224	package tarball in the SOURCES directory:
225		225
226	$ pear makerpm ../SOURCES/Net_Socket-1.0.tgz	226	$ pear makerpm ../SOURCES/Net_Socket-1.0.tgz
227	Wrote RPM spec file PEAR::Net_Geo-1.0.spec	227	Wrote RPM spec file PEAR::Net_Geo-1.0.spec
228	$ rpm -bb PEAR::Net_Socket-1.0.spec	228	$ rpm -bb PEAR::Net_Socket-1.0.spec
229	...	229	...
230	Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm	230	Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm
231	',	231	',
232	),	232	),
233	'convert' => array(	233	'convert' => array(
234	'summary' => 'Convert a package.xml 1.0 to package.xml 2.0 format',	234	'summary' => 'Convert a package.xml 1.0 to package.xml 2.0 format',
235	'function' => 'doConvert',	235	'function' => 'doConvert',
236	'shortcut' => 'c2',	236	'shortcut' => 'c2',
237	'options' => array(	237	'options' => array(
238	'flat' => array(	238	'flat' => array(
239	'shortopt' => 'f',	239	'shortopt' => 'f',
240	'doc' => 'do not beautify the filelist.',	240	'doc' => 'do not beautify the filelist.',
241	),	241	),
242	),	242	),
243	'doc' => '[descfile] [descfile2]	243	'doc' => '[descfile] [descfile2]
244	Converts a package.xml in 1.0 format into a package.xml	244	Converts a package.xml in 1.0 format into a package.xml
245	in 2.0 format. The new file will be named package2.xml by default,	245	in 2.0 format. The new file will be named package2.xml by default,
246	and package.xml will be used as the old file by default.	246	and package.xml will be used as the old file by default.
247	This is not the most intelligent conversion, and should only be	247	This is not the most intelligent conversion, and should only be
248	used for automated conversion or learning the format.	248	used for automated conversion or learning the format.
249	'	249	'
250	),	250	),
251	);	251	);
252		252
253	var $output;	253	var $output;
254		254
255	// }}}	255	// }}}
256	// {{{ constructor	256	// {{{ constructor
257		257
258	/**	258	/**
259	* PEAR_Command_Package constructor.	259	* PEAR_Command_Package constructor.
260	*	260	*
261	* @access public	261	* @access public
262	*/	262	*/
263	function PEAR_Command_Package(&$ui, &$config)	263	function PEAR_Command_Package(&$ui, &$config)
264	{	264	{
265	parent::PEAR_Command_Common($ui, $config);	265	parent::PEAR_Command_Common($ui, $config);
266	}	266	}
267		267
268	// }}}	268	// }}}
269		269
270	// {{{ _displayValidationResults()	270	// {{{ _displayValidationResults()
271		271
272	function _displayValidationResults($err, $warn, $strict = false)	272	function _displayValidationResults($err, $warn, $strict = false)
273	{	273	{
274	foreach ($err as $e) {	274	foreach ($err as $e) {
275	$this->output .= "Error: $e\n";	275	$this->output .= "Error: $e\n";
276	}	276	}
277	foreach ($warn as $w) {	277	foreach ($warn as $w) {
278	$this->output .= "Warning: $w\n";	278	$this->output .= "Warning: $w\n";
279	}	279	}
280	$this->output .= sprintf('Validation: %d error(s), %d warning(s)'."\n",	280	$this->output .= sprintf('Validation: %d error(s), %d warning(s)'."\n",
281	sizeof($err), sizeof($warn));	281	sizeof($err), sizeof($warn));
282	if ($strict && sizeof($err) > 0) {	282	if ($strict && sizeof($err) > 0) {
283	$this->output .= "Fix these errors and try again.";	283	$this->output .= "Fix these errors and try again.";
284	return false;	284	return false;
285	}	285	}
286	return true;	286	return true;
287	}	287	}
288		288
289	// }}}	289	// }}}
290	function &getPackager()	290	function &getPackager()
291	{	291	{
292	if (!class_exists('PEAR_Packager')) {	292	if (!class_exists('PEAR_Packager')) {
293	require_once 'PEAR/Packager.php';	293	require_once 'PEAR/Packager.php';
294	}	294	}
295	$a = &new PEAR_Packager;	295	$a = &new PEAR_Packager;
296	return $a;	296	return $a;
297	}	297	}
298		298
299	function &getPackageFile($config, $debug = false, $tmpdir = null)	299	function &getPackageFile($config, $debug = false, $tmpdir = null)
300	{	300	{
301	if (!class_exists('PEAR_Common')) {	301	if (!class_exists('PEAR_Common')) {
302	require_once 'PEAR/Common.php';	302	require_once 'PEAR/Common.php';
303	}	303	}
304	if (!class_exists('PEAR_PackageFile')) {	304	if (!class_exists('PEAR_PackageFile')) {
305	require_once 'PEAR/PackageFile.php';	305	require_once 'PEAR/PackageFile.php';
306	}	306	}
307	$a = &new PEAR_PackageFile($config, $debug, $tmpdir);	307	$a = &new PEAR_PackageFile($config, $debug, $tmpdir);
308	$common = new PEAR_Common;	308	$common = new PEAR_Common;
309	$common->ui = $this->ui;	309	$common->ui = $this->ui;
310	$a->setLogger($common);	310	$a->setLogger($common);
311	return $a;	311	return $a;
312	}	312	}
313	// {{{ doPackage()	313	// {{{ doPackage()
314		314
315	function doPackage($command, $options, $params)	315	function doPackage($command, $options, $params)
316	{	316	{
317	$this->output = '';	317	$this->output = '';
318	$pkginfofile = isset($params[0]) ? $params[0] : 'package.xml';	318	$pkginfofile = isset($params[0]) ? $params[0] : 'package.xml';
319	$pkg2 = isset($params[1]) ? $params[1] : null;	319	$pkg2 = isset($params[1]) ? $params[1] : null;
320	if (!$pkg2 && !isset($params[0])) {	320	if (!$pkg2 && !isset($params[0])) {
321	if (file_exists('package2.xml')) {	321	if (file_exists('package2.xml')) {
322	$pkg2 = 'package2.xml';	322	$pkg2 = 'package2.xml';
323	}	323	}
324	}	324	}
325	$packager = &$this->getPackager();	325	$packager = &$this->getPackager();
326	$compress = empty($options['nocompress']) ? true : false;	326	$compress = empty($options['nocompress']) ? true : false;
327	$result = $packager->package($pkginfofile, $compress, $pkg2);	327	$result = $packager->package($pkginfofile, $compress, $pkg2);
328	if (PEAR::isError($result)) {	328	if (PEAR::isError($result)) {
329	return $this->raiseError($result);	329	return $this->raiseError($result);
330	}	330	}
331	// Don't want output, only the package file name just created	331	// Don't want output, only the package file name just created
332	if (isset($options['showname'])) {	332	if (isset($options['showname'])) {
333	$this->output = $result;	333	$this->output = $result;
334	}	334	}
335	if ($this->output) {	335	if ($this->output) {
336	$this->ui->outputData($this->output, $command);	336	$this->ui->outputData($this->output, $command);
337	}	337	}
338	return true;	338	return true;
339	}	339	}
340		340
341	// }}}	341	// }}}
342	// {{{ doPackageValidate()	342	// {{{ doPackageValidate()
343		343
344	function doPackageValidate($command, $options, $params)	344	function doPackageValidate($command, $options, $params)
345	{	345	{
346	$this->output = '';	346	$this->output = '';
347	if (sizeof($params) < 1) {	347	if (sizeof($params) < 1) {
348	$params[0] = "package.xml";	348	$params[0] = "package.xml";
349	}	349	}
350	$obj = &$this->getPackageFile($this->config, $this->_debug);	350	$obj = &$this->getPackageFile($this->config, $this->_debug);
351	$obj->rawReturn();	351	$obj->rawReturn();
352	PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN);	352	PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN);
353	$info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL);	353	$info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL);
354	if (PEAR::isError($info)) {	354	if (PEAR::isError($info)) {
355	$info = $obj->fromPackageFile($params[0], PEAR_VALIDATE_NORMAL);	355	$info = $obj->fromPackageFile($params[0], PEAR_VALIDATE_NORMAL);
356	} else {	356	} else {
357	$archive = $info->getArchiveFile();	357	$archive = $info->getArchiveFile();
358	$tar = &new Archive_Tar($archive);	358	$tar = &new Archive_Tar($archive);
359	$tar->extract(dirname($info->getPackageFile()));	359	$tar->extract(dirname($info->getPackageFile()));
360	$info->setPackageFile(dirname($info->getPackageFile()) . DIRECTORY_SEPARATOR .	360	$info->setPackageFile(dirname($info->getPackageFile()) . DIRECTORY_SEPARATOR .
361	$info->getPackage() . '-' . $info->getVersion() . DIRECTORY_SEPARATOR .	361	$info->getPackage() . '-' . $info->getVersion() . DIRECTORY_SEPARATOR .
362	basename($info->getPackageFile()));	362	basename($info->getPackageFile()));
363	}	363	}
364	PEAR::staticPopErrorHandling();	364	PEAR::staticPopErrorHandling();
365	if (PEAR::isError($info)) {	365	if (PEAR::isError($info)) {
366	return $this->raiseError($info);	366	return $this->raiseError($info);
367	}	367	}
368	$valid = false;	368	$valid = false;
369	if ($info->getPackagexmlVersion() == '2.0') {	369	if ($info->getPackagexmlVersion() == '2.0') {
370	if ($valid = $info->validate(PEAR_VALIDATE_NORMAL)) {	370	if ($valid = $info->validate(PEAR_VALIDATE_NORMAL)) {
371	$info->flattenFileList();	371	$info->flattenFileList();
372	$valid = $info->validate(PEAR_VALIDATE_PACKAGING);	372	$valid = $info->validate(PEAR_VALIDATE_PACKAGING);
373	}	373	}
374	} else {	374	} else {
375	$valid = $info->validate(PEAR_VALIDATE_PACKAGING);	375	$valid = $info->validate(PEAR_VALIDATE_PACKAGING);
376	}	376	}
377	$err = $warn = array();	377	$err = $warn = array();
378	if ($errors = $info->getValidationWarnings()) {	378	if ($errors = $info->getValidationWarnings()) {
379	foreach ($errors as $error) {	379	foreach ($errors as $error) {
380	if ($error['level'] == 'warning') {	380	if ($error['level'] == 'warning') {
381	$warn[] = $error['message'];	381	$warn[] = $error['message'];
382	} else {	382	} else {
383	$err[] = $error['message'];	383	$err[] = $error['message'];
384	}	384	}
385	}	385	}
386	}	386	}
387	$this->_displayValidationResults($err, $warn);	387	$this->_displayValidationResults($err, $warn);
388	$this->ui->outputData($this->output, $command);	388	$this->ui->outputData($this->output, $command);
389	return true;	389	return true;
390	}	390	}
391		391
392	// }}}	392	// }}}
393	// {{{ doCvsTag()	393	// {{{ doCvsTag()
394		394
395	function doCvsTag($command, $options, $params)	395	function doCvsTag($command, $options, $params)
396	{	396	{
397	$this->output = '';	397	$this->output = '';
398	$_cmd = $command;	398	$_cmd = $command;
399	if (sizeof($params) < 1) {	399	if (sizeof($params) < 1) {
400	$help = $this->getHelp($command);	400	$help = $this->getHelp($command);
401	return $this->raiseError("$command: missing parameter: $help[0]");	401	return $this->raiseError("$command: missing parameter: $help[0]");
402	}	402	}
403	$obj = &$this->getPackageFile($this->config, $this->_debug);	403	$obj = &$this->getPackageFile($this->config, $this->_debug);
404	$info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);	404	$info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);
405	if (PEAR::isError($info)) {	405	if (PEAR::isError($info)) {
406	return $this->raiseError($info);	406	return $this->raiseError($info);
407	}	407	}
408	$err = $warn = array();	408	$err = $warn = array();
409	if (!$info->validate()) {	409	if (!$info->validate()) {
410	foreach ($info->getValidationWarnings() as $error) {	410	foreach ($info->getValidationWarnings() as $error) {
411	if ($error['level'] == 'warning') {	411	if ($error['level'] == 'warning') {
412	$warn[] = $error['message'];	412	$warn[] = $error['message'];
413	} else {	413	} else {
414	$err[] = $error['message'];	414	$err[] = $error['message'];
415	}	415	}
416	}	416	}
417	}	417	}
418	if (!$this->_displayValidationResults($err, $warn, true)) {	418	if (!$this->_displayValidationResults($err, $warn, true)) {
419	$this->ui->outputData($this->output, $command);	419	$this->ui->outputData($this->output, $command);
420	return $this->raiseError('CVS tag failed');	420	return $this->raiseError('CVS tag failed');
421	}	421	}
422	$version = $info->getVersion();	422	$version = $info->getVersion();
423	$cvsversion = preg_replace('/[^a-z0-9]/i', '_', $version);	423	$cvsversion = preg_replace('/[^a-z0-9]/i', '_', $version);
424	$cvstag = "RELEASE_$cvsversion";	424	$cvstag = "RELEASE_$cvsversion";
425	$files = array_keys($info->getFilelist());	425	$files = array_keys($info->getFilelist());
426	$command = "cvs";	426	$command = "cvs";
427	if (isset($options['quiet'])) {	427	if (isset($options['quiet'])) {
428	$command .= ' -q';	428	$command .= ' -q';
429	}	429	}
430	if (isset($options['reallyquiet'])) {	430	if (isset($options['reallyquiet'])) {
431	$command .= ' -Q';	431	$command .= ' -Q';
432	}	432	}
433	$command .= ' tag';	433	$command .= ' tag';
434	if (isset($options['slide'])) {	434	if (isset($options['slide'])) {
435	$command .= ' -F';	435	$command .= ' -F';
436	}	436	}
437	if (isset($options['delete'])) {	437	if (isset($options['delete'])) {
438	$command .= ' -d';	438	$command .= ' -d';
439	}	439	}
440	$command .= ' ' . $cvstag . ' ' . escapeshellarg($params[0]);	440	$command .= ' ' . $cvstag . ' ' . escapeshellarg($params[0]);
441	array_shift($params);	441	array_shift($params);
442	if (count($params)) {	442	if (count($params)) {
443	// add in additional files to be tagged	443	// add in additional files to be tagged
444	$files = array_merge($files, $params);	444	$files = array_merge($files, $params);
445	}	445	}
446	foreach ($files as $file) {	446	foreach ($files as $file) {
447	$command .= ' ' . escapeshellarg($file);	447	$command .= ' ' . escapeshellarg($file);
448	}	448	}
449	if ($this->config->get('verbose') > 1) {	449	if ($this->config->get('verbose') > 1) {
450	$this->output .= "+ $command\n";	450	$this->output .= "+ $command\n";
451	}	451	}
452	$this->output .= "+ $command\n";	452	$this->output .= "+ $command\n";
453	if (empty($options['dry-run'])) {	453	if (empty($options['dry-run'])) {
454	$fp = popen($command, "r");	454	$fp = popen($command, "r");
455	while ($line = fgets($fp, 1024)) {	455	while ($line = fgets($fp, 1024)) {
456	$this->output .= rtrim($line)."\n";	456	$this->output .= rtrim($line)."\n";
457	}	457	}
458	pclose($fp);	458	pclose($fp);
459	}	459	}
460	$this->ui->outputData($this->output, $_cmd);	460	$this->ui->outputData($this->output, $_cmd);
461	return true;	461	return true;
462	}	462	}
463		463
464	// }}}	464	// }}}
465	// {{{ doCvsDiff()	465	// {{{ doCvsDiff()
466		466
467	function doCvsDiff($command, $options, $params)	467	function doCvsDiff($command, $options, $params)
468	{	468	{
469	$this->output = '';	469	$this->output = '';
470	if (sizeof($params) < 1) {	470	if (sizeof($params) < 1) {
471	$help = $this->getHelp($command);	471	$help = $this->getHelp($command);
472	return $this->raiseError("$command: missing parameter: $help[0]");	472	return $this->raiseError("$command: missing parameter: $help[0]");
473	}	473	}
474	$obj = &$this->getPackageFile($this->config, $this->_debug);	474	$obj = &$this->getPackageFile($this->config, $this->_debug);
475	$info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);	475	$info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL);
476	if (PEAR::isError($info)) {	476	if (PEAR::isError($info)) {
477	return $this->raiseError($info);	477	return $this->raiseError($info);
478	}	478	}
479	$err = $warn = array();	479	$err = $warn = array();
480	if (!$info->validate()) {	480	if (!$info->validate()) {
481	foreach ($info->getValidationWarnings() as $error) {	481	foreach ($info->getValidationWarnings() as $error) {
482	if ($error['level'] == 'warning') {	482	if ($error['level'] == 'warning') {
483	$warn[] = $error['message'];	483	$warn[] = $error['message'];
484	} else {	484	} else {
485	$err[] = $error['message'];	485	$err[] = $error['message'];
486	}	486	}
487	}	487	}
488	}	488	}
489	if (!$this->_displayValidationResults($err, $warn, true)) {	489	if (!$this->_displayValidationResults($err, $warn, true)) {
490	$this->ui->outputData($this->output, $command);	490	$this->ui->outputData($this->output, $command);
491	return $this->raiseError('CVS diff failed');	491	return $this->raiseError('CVS diff failed');
492	}	492	}
493	$info1 = $info->getFilelist();	493	$info1 = $info->getFilelist();
494	$files = $info1;	494	$files = $info1;
495	$cmd = "cvs";	495	$cmd = "cvs";
496	if (isset($options['quiet'])) {	496	if (isset($options['quiet'])) {
497	$cmd .= ' -q';	497	$cmd .= ' -q';
498	unset($options['quiet']);	498	unset($options['quiet']);
499	}	499	}
500	if (isset($options['reallyquiet'])) {	500	if (isset($options['reallyquiet'])) {

Хранилища Subversion ant

(root)/tags/0.2/lib/PEAR/Command/Package.php @ 678 - Редакция 69 → 87