WebSVN – Applications.gtt – Diff – /trunk/bibliotheque/pear/PEAR/PackageFile/Generator/v1.php


<?php
/**
 * package.xml generation class, package.xml version 1.0
 *
 * PHP versions 4 and 5
 *
 
 
 
 
 
 
 * @category   pear
 * @package    PEAR
 * @author     Greg Beaver <cellog@php.net>
 * @copyright  1997-2009 The Authors
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
 
 * @link       http://pear.php.net/package/PEAR
 * @since      File available since Release 1.4.0a1
 */
/**
 * needed for PEAR_VALIDATE_* constants
 */
require_once 'PEAR/Validate.php';
require_once 'System.php';
require_once 'PEAR/PackageFile/v2.php';
/**
 * This class converts a PEAR_PackageFile_v1 object into any output format.
 *
 * Supported output formats include array, XML string, and a PEAR_PackageFile_v2
 * object, for converting package.xml 1.0 into package.xml 2.0 with no sweat.
 * @category   pear
 * @package    PEAR
 * @author     Greg Beaver <cellog@php.net>
 * @copyright  1997-2009 The Authors
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
 * @version    Release: 1.10.1
 * @link       http://pear.php.net/package/PEAR
 * @since      Class available since Release 1.4.0a1
 */
class PEAR_PackageFile_Generator_v1
{
    /**
     * @var PEAR_PackageFile_v1
     */
    var $_packagefile;
    function __construct(&$packagefile)
    {
        $this->_packagefile = &$packagefile;
    }
 
    function getPackagerVersion()
    {
        return '1.10.1';
    }
 
    /**
     * @param PEAR_Packager
     * @param bool if true, a .tgz is written, otherwise a .tar is written
     * @param string|null directory in which to save the .tgz
     * @return string|PEAR_Error location of package or error object
     */
    function toTgz(&$packager, $compress = true, $where = null)
    {
        require_once 'Archive/Tar.php';
        if ($where === null) {
            if (!($where = System::mktemp(array('-d')))) {
                return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: mktemp failed');
            }
        } elseif (!@System::mkDir(array('-p', $where))) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: "' . $where . '" could' .
                ' not be created');
        }
        if (file_exists($where . DIRECTORY_SEPARATOR . 'package.xml') &&
              !is_file($where . DIRECTORY_SEPARATOR . 'package.xml')) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: unable to save package.xml as' .
                ' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"');
        }
        if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: invalid package file');
        }
        $pkginfo = $this->_packagefile->getArray();
        $ext = $compress ? '.tgz' : '.tar';
        $pkgver = $pkginfo['package'] . '-' . $pkginfo['version'];
        $dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext;
        if (file_exists(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext) &&
              !is_file(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext)) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: cannot create tgz file "' .
                getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext . '"');
        }
        if ($pkgfile = $this->_packagefile->getPackageFile()) {
            $pkgdir = dirname(realpath($pkgfile));
            $pkgfile = basename($pkgfile);
        } else {
            return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: package file object must ' .
                'be created from a real file');
        }
        // {{{ Create the package file list
        $filelist = array();
        $i = 0;
 
        foreach ($this->_packagefile->getFilelist() as $fname => $atts) {
            $file = $pkgdir . DIRECTORY_SEPARATOR . $fname;
            if (!file_exists($file)) {
                return PEAR::raiseError("File does not exist: $fname");
            } else {
                $filelist[$i++] = $file;
                if (!isset($atts['md5sum'])) {
                    $this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($file));
                }
                $packager->log(2, "Adding file $fname");
            }
        }
        // }}}
        $packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, 'package.xml', true);
        if ($packagexml) {
            $tar = new Archive_Tar($dest_package, $compress);
            $tar->setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors
            // ----- Creates with the package.xml file
            $ok = $tar->createModify(array($packagexml), '', $where);
            if (PEAR::isError($ok)) {
                return $ok;
            } elseif (!$ok) {
                return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');
            }
            // ----- Add the content of the package
            if (!$tar->addModify($filelist, $pkgver, $pkgdir)) {
                return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');
            }
            return $dest_package;
        }
    }
 
    /**
     * @param string|null directory to place the package.xml in, or null for a temporary dir
     * @param int one of the PEAR_VALIDATE_* constants
     * @param string name of the generated file
     * @param bool if true, then no analysis will be performed on role="php" files
     * @return string|PEAR_Error path to the created file on success
     */
    function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml',
                           $nofilechecking = false)
    {
        if (!$this->_packagefile->validate($state, $nofilechecking)) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: invalid package.xml',
                null, null, null, $this->_packagefile->getValidationWarnings());
        }
        if ($where === null) {
            if (!($where = System::mktemp(array('-d')))) {
                return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: mktemp failed');
            }
        } elseif (!@System::mkDir(array('-p', $where))) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: "' . $where . '" could' .
                ' not be created');
        }
        $newpkgfile = $where . DIRECTORY_SEPARATOR . $name;
        $np = @fopen($newpkgfile, 'wb');
        if (!$np) {
            return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: unable to save ' .
               "$name as $newpkgfile");
        }
        fwrite($np, $this->toXml($state, true));
        fclose($np);
        return $newpkgfile;
    }
 
    /**
     * fix both XML encoding to be UTF8, and replace standard XML entities < > " & '
     *
     * @param string $string
     * @return string
     * @access private
     */
    function _fixXmlEncoding($string)
    {
 
 
 
        return strtr($string, array(
                                          '&'  => '&amp;',
                                          '>'  => '&gt;',
                                          '<'  => '&lt;',
                                          '"'  => '&quot;',
                                          '\'' => '&apos;' ));
    }
 
    /**
     * Return an XML document based on the package info (as returned
     * by the PEAR_Common::infoFrom* methods).
     *
     * @return string XML data
     */
    function toXml($state = PEAR_VALIDATE_NORMAL, $nofilevalidation = false)
    {
        $this->_packagefile->setDate(date('Y-m-d'));
        if (!$this->_packagefile->validate($state, $nofilevalidation)) {
            return false;
        }
        $pkginfo = $this->_packagefile->getArray();
        static $maint_map = array(
            "handle" => "user",
            "name" => "name",
            "email" => "email",
            "role" => "role",
            );
        $ret = "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n";
        $ret .= "<!DOCTYPE package SYSTEM \"http://pear.php.net/dtd/package-1.0\">\n";
        $ret .= "<package version=\"1.0\" packagerversion=\"1.10.1\">\n" .
" <name>$pkginfo[package]</name>";
        if (isset($pkginfo['extends'])) {
            $ret .= "\n<extends>$pkginfo[extends]</extends>";
        }
        $ret .=
 "\n <summary>".$this->_fixXmlEncoding($pkginfo['summary'])."</summary>\n" .
" <description>".trim($this->_fixXmlEncoding($pkginfo['description']))."\n </description>\n" .
" <maintainers>\n";
        foreach ($pkginfo['maintainers'] as $maint) {
            $ret .= "  <maintainer>\n";
            foreach ($maint_map as $idx => $elm) {
                $ret .= "   <$elm>";
                $ret .= $this->_fixXmlEncoding($maint[$idx]);
                $ret .= "</$elm>\n";
            }
            $ret .= "  </maintainer>\n";
        }
        $ret .= "  </maintainers>\n";
        $ret .= $this->_makeReleaseXml($pkginfo, false, $state);
        if (isset($pkginfo['changelog']) && count($pkginfo['changelog']) > 0) {
            $ret .= " <changelog>\n";
            foreach ($pkginfo['changelog'] as $oldrelease) {
                $ret .= $this->_makeReleaseXml($oldrelease, true);
            }
            $ret .= " </changelog>\n";
        }
        $ret .= "</package>\n";
        return $ret;
    }
 
    // }}}
    // {{{ _makeReleaseXml()
 
    /**
     * Generate part of an XML description with release information.
     *
     * @param array  $pkginfo    array with release information
     * @param bool   $changelog  whether the result will be in a changelog element
     *
     * @return string XML data
     *
     * @access private
     */
    function _makeReleaseXml($pkginfo, $changelog = false, $state = PEAR_VALIDATE_NORMAL)
    {
        // XXX QUOTE ENTITIES IN PCDATA, OR EMBED IN CDATA BLOCKS!!
        $indent = $changelog ? "  " : "";
        $ret = "$indent <release>\n";
        if (!empty($pkginfo['version'])) {
            $ret .= "$indent  <version>$pkginfo[version]</version>\n";
        }
        if (!empty($pkginfo['release_date'])) {
            $ret .= "$indent  <date>$pkginfo[release_date]</date>\n";
        }
        if (!empty($pkginfo['release_license'])) {
            $ret .= "$indent  <license>$pkginfo[release_license]</license>\n";
        }
        if (!empty($pkginfo['release_state'])) {
            $ret .= "$indent  <state>$pkginfo[release_state]</state>\n";
        }
        if (!empty($pkginfo['release_notes'])) {
            $ret .= "$indent  <notes>".trim($this->_fixXmlEncoding($pkginfo['release_notes']))
            ."\n$indent  </notes>\n";
        }
        if (!empty($pkginfo['release_warnings'])) {
            $ret .= "$indent  <warnings>".$this->_fixXmlEncoding($pkginfo['release_warnings'])."</warnings>\n";
        }
        if (isset($pkginfo['release_deps']) && sizeof($pkginfo['release_deps']) > 0) {
            $ret .= "$indent  <deps>\n";
            foreach ($pkginfo['release_deps'] as $dep) {
                $ret .= "$indent   <dep type=\"$dep[type]\" rel=\"$dep[rel]\"";
                if (isset($dep['version'])) {
                    $ret .= " version=\"$dep[version]\"";
                }
                if (isset($dep['optional'])) {
                    $ret .= " optional=\"$dep[optional]\"";
                }
                if (isset($dep['name'])) {
                    $ret .= ">$dep[name]</dep>\n";
                } else {
                    $ret .= "/>\n";
                }
            }
            $ret .= "$indent  </deps>\n";
        }
        if (isset($pkginfo['configure_options'])) {
            $ret .= "$indent  <configureoptions>\n";
            foreach ($pkginfo['configure_options'] as $c) {
                $ret .= "$indent   <configureoption name=\"".
                    $this->_fixXmlEncoding($c['name']) . "\"";
                if (isset($c['default'])) {
                    $ret .= " default=\"" . $this->_fixXmlEncoding($c['default']) . "\"";
                }
                $ret .= " prompt=\"" . $this->_fixXmlEncoding($c['prompt']) . "\"";
                $ret .= "/>\n";
            }
            $ret .= "$indent  </configureoptions>\n";
        }
        if (isset($pkginfo['provides'])) {
            foreach ($pkginfo['provides'] as $key => $what) {
                $ret .= "$indent  <provides type=\"$what[type]\" ";
                $ret .= "name=\"$what[name]\" ";
                if (isset($what['extends'])) {
                    $ret .= "extends=\"$what[extends]\" ";
                }
                $ret .= "/>\n";
            }
        }
        if (isset($pkginfo['filelist'])) {
            $ret .= "$indent  <filelist>\n";
            if ($state ^ PEAR_VALIDATE_PACKAGING) {
                $ret .= $this->recursiveXmlFilelist($pkginfo['filelist']);
            } else {
                foreach ($pkginfo['filelist'] as $file => $fa) {
                    if (!isset($fa['role'])) {
                        $fa['role'] = '';
                    }
                    $ret .= "$indent   <file role=\"$fa[role]\"";
                    if (isset($fa['baseinstalldir'])) {
                        $ret .= ' baseinstalldir="' .
                            $this->_fixXmlEncoding($fa['baseinstalldir']) . '"';
                    }
                    if (isset($fa['md5sum'])) {
                        $ret .= " md5sum=\"$fa[md5sum]\"";
                    }
                    if (isset($fa['platform'])) {
                        $ret .= " platform=\"$fa[platform]\"";
                    }
                    if (!empty($fa['install-as'])) {
                        $ret .= ' install-as="' .
                            $this->_fixXmlEncoding($fa['install-as']) . '"';
                    }
                    $ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';
                    if (empty($fa['replacements'])) {
                        $ret .= "/>\n";
                    } else {
                        $ret .= ">\n";
                        foreach ($fa['replacements'] as $r) {
                            $ret .= "$indent    <replace";
                            foreach ($r as $k => $v) {
                                $ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';
                            }
                            $ret .= "/>\n";
                        }
                        $ret .= "$indent   </file>\n";
                    }
                }
            }
            $ret .= "$indent  </filelist>\n";
        }
        $ret .= "$indent </release>\n";
        return $ret;
    }
 
    /**
     * @param array
     * @access protected
     */
    function recursiveXmlFilelist($list)
    {
        $this->_dirs = array();
        foreach ($list as $file => $attributes) {
            $this->_addDir($this->_dirs, explode('/', dirname($file)), $file, $attributes);
        }
        return $this->_formatDir($this->_dirs);
    }
 
    /**
     * @param array
     * @param array
     * @param string|null
     * @param array|null
     * @access private
     */
    function _addDir(&$dirs, $dir, $file = null, $attributes = null)
    {
        if ($dir == array() || $dir == array('.')) {
            $dirs['files'][basename($file)] = $attributes;
            return;
        }
        $curdir = array_shift($dir);
        if (!isset($dirs['dirs'][$curdir])) {
            $dirs['dirs'][$curdir] = array();
        }
        $this->_addDir($dirs['dirs'][$curdir], $dir, $file, $attributes);
    }
 
    /**
     * @param array
     * @param string
     * @param string
     * @access private
     */
    function _formatDir($dirs, $indent = '', $curdir = '')
    {
        $ret = '';
        if (!count($dirs)) {
            return '';
        }
        if (isset($dirs['dirs'])) {
            uksort($dirs['dirs'], 'strnatcasecmp');
            foreach ($dirs['dirs'] as $dir => $contents) {
                $usedir = "$curdir/$dir";
                $ret .= "$indent   <dir name=\"$dir\">\n";
                $ret .= $this->_formatDir($contents, "$indent ", $usedir);
                $ret .= "$indent   </dir> <!-- $usedir -->\n";
            }
        }
        if (isset($dirs['files'])) {
            uksort($dirs['files'], 'strnatcasecmp');
            foreach ($dirs['files'] as $file => $attribs) {
                $ret .= $this->_formatFile($file, $attribs, $indent);
            }
        }
        return $ret;
    }
 
    /**
     * @param string
     * @param array
     * @param string
     * @access private
     */
    function _formatFile($file, $attributes, $indent)
    {
        $ret = "$indent   <file role=\"$attributes[role]\"";
        if (isset($attributes['baseinstalldir'])) {
            $ret .= ' baseinstalldir="' .
                $this->_fixXmlEncoding($attributes['baseinstalldir']) . '"';
        }
        if (isset($attributes['md5sum'])) {
            $ret .= " md5sum=\"$attributes[md5sum]\"";
        }
        if (isset($attributes['platform'])) {
            $ret .= " platform=\"$attributes[platform]\"";
        }
        if (!empty($attributes['install-as'])) {
            $ret .= ' install-as="' .
                $this->_fixXmlEncoding($attributes['install-as']) . '"';
        }
        $ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';
        if (empty($attributes['replacements'])) {
            $ret .= "/>\n";
        } else {
            $ret .= ">\n";
            foreach ($attributes['replacements'] as $r) {
                $ret .= "$indent    <replace";
                foreach ($r as $k => $v) {
                    $ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';
                }
                $ret .= "/>\n";
            }
            $ret .= "$indent   </file>\n";
        }
        return $ret;
    }
 
    // {{{ _unIndent()
 
    /**
     * Unindent given string (?)
     *
     * @param string $str The string that has to be unindented.
     * @return string
     * @access private
     */
    function _unIndent($str)
    {
        // remove leading newlines
        $str = preg_replace('/^[\r\n]+/', '', $str);
        // find whitespace at the beginning of the first line
        $indent_len = strspn($str, " \t");
        $indent = substr($str, 0, $indent_len);
        $data = '';
        // remove the same amount of whitespace from following lines
        foreach (explode("\n", $str) as $line) {
            if (substr($line, 0, $indent_len) == $indent) {
                $data .= substr($line, $indent_len) . "\n";
            }
        }
        return $data;
    }
 
    /**
     * @return array
     */
    function dependenciesToV2()
    {
        $arr = array();
        $this->_convertDependencies2_0($arr);
        return $arr['dependencies'];
    }
 
    /**
     * Convert a package.xml version 1.0 into version 2.0
     *
     * Note that this does a basic conversion, to allow more advanced
     * features like bundles and multiple releases
     * @param string the classname to instantiate and return.  This must be
     *               PEAR_PackageFile_v2 or a descendant
     * @param boolean if true, only valid, deterministic package.xml 1.0 as defined by the
     *                strictest parameters will be converted
     * @return PEAR_PackageFile_v2|PEAR_Error
     */
    function &toV2($class = 'PEAR_PackageFile_v2', $strict = false)
    {
        if ($strict) {
            if (!$this->_packagefile->validate()) {
                $a = PEAR::raiseError('invalid package.xml version 1.0 cannot be converted' .
                    ' to version 2.0', null, null, null,
                    $this->_packagefile->getValidationWarnings(true));
                return $a;
            }
        }
 
        $arr = array(
            'attribs' => array(
                             'version' => '2.0',
                             'xmlns' => 'http://pear.php.net/dtd/package-2.0',
                             'xmlns:tasks' => 'http://pear.php.net/dtd/tasks-1.0',
                             'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance',
                             'xsi:schemaLocation' => "http://pear.php.net/dtd/tasks-1.0\n" .
"http://pear.php.net/dtd/tasks-1.0.xsd\n" .
"http://pear.php.net/dtd/package-2.0\n" .
'http://pear.php.net/dtd/package-2.0.xsd',
                         ),
            'name' => $this->_packagefile->getPackage(),
            'channel' => 'pear.php.net',
        );
        $arr['summary'] = $this->_packagefile->getSummary();
        $arr['description'] = $this->_packagefile->getDescription();
        $maintainers = $this->_packagefile->getMaintainers();
        foreach ($maintainers as $maintainer) {
            if ($maintainer['role'] != 'lead') {
                continue;
            }
            $new = array(
                'name' => $maintainer['name'],
                'user' => $maintainer['handle'],
                'email' => $maintainer['email'],
                'active' => 'yes',
            );
            $arr['lead'][] = $new;
        }
 
        if (!isset($arr['lead'])) { // some people... you know?
            $arr['lead'] = array(
                'name' => 'unknown',
                'user' => 'unknown',
                'email' => 'noleadmaintainer@example.com',
                'active' => 'no',
            );
        }
 
        if (count($arr['lead']) == 1) {
            $arr['lead'] = $arr['lead'][0];
        }
 
        foreach ($maintainers as $maintainer) {
            if ($maintainer['role'] == 'lead') {
                continue;
            }
            $new = array(
                'name' => $maintainer['name'],
                'user' => $maintainer['handle'],
                'email' => $maintainer['email'],
                'active' => 'yes',
            );
            $arr[$maintainer['role']][] = $new;
        }
 
        if (isset($arr['developer']) && count($arr['developer']) == 1) {
            $arr['developer'] = $arr['developer'][0];
        }
 
        if (isset($arr['contributor']) && count($arr['contributor']) == 1) {
            $arr['contributor'] = $arr['contributor'][0];
        }
 
        if (isset($arr['helper']) && count($arr['helper']) == 1) {
            $arr['helper'] = $arr['helper'][0];
        }
 
        $arr['date'] = $this->_packagefile->getDate();
        $arr['version'] =
            array(
                'release' => $this->_packagefile->getVersion(),
                'api' => $this->_packagefile->getVersion(),
            );
        $arr['stability'] =
            array(
                'release' => $this->_packagefile->getState(),
                'api' => $this->_packagefile->getState(),
            );
        $licensemap =
            array(
                'php' => 'http://www.php.net/license',
                'php license' => 'http://www.php.net/license',
                'lgpl' => 'http://www.gnu.org/copyleft/lesser.html',
                'bsd' => 'http://www.opensource.org/licenses/bsd-license.php',
                'bsd style' => 'http://www.opensource.org/licenses/bsd-license.php',
                'bsd-style' => 'http://www.opensource.org/licenses/bsd-license.php',
                'mit' => 'http://www.opensource.org/licenses/mit-license.php',
                'gpl' => 'http://www.gnu.org/copyleft/gpl.html',
                'apache' => 'http://www.opensource.org/licenses/apache2.0.php'
            );
 
        if (isset($licensemap[strtolower($this->_packagefile->getLicense())])) {
            $arr['license'] = array(
                'attribs' => array('uri' =>
                    $licensemap[strtolower($this->_packagefile->getLicense())]),
                '_content' => $this->_packagefile->getLicense()
                );
        } else {
            // don't use bogus uri
            $arr['license'] = $this->_packagefile->getLicense();
        }
 
        $arr['notes'] = $this->_packagefile->getNotes();
        $temp = array();
        $arr['contents'] = $this->_convertFilelist2_0($temp);
        $this->_convertDependencies2_0($arr);
        $release = ($this->_packagefile->getConfigureOptions() || $this->_isExtension) ?
            'extsrcrelease' : 'phprelease';
        if ($release == 'extsrcrelease') {
            $arr['channel'] = 'pecl.php.net';
            $arr['providesextension'] = $arr['name']; // assumption
        }
 
        $arr[$release] = array();
        if ($this->_packagefile->getConfigureOptions()) {
            $arr[$release]['configureoption'] = $this->_packagefile->getConfigureOptions();
            foreach ($arr[$release]['configureoption'] as $i => $opt) {
                $arr[$release]['configureoption'][$i] = array('attribs' => $opt);
            }
            if (count($arr[$release]['configureoption']) == 1) {
                $arr[$release]['configureoption'] = $arr[$release]['configureoption'][0];
            }
        }
 
        $this->_convertRelease2_0($arr[$release], $temp);
        if ($release == 'extsrcrelease' && count($arr[$release]) > 1) {
            // multiple extsrcrelease tags added in PEAR 1.4.1
            $arr['dependencies']['required']['pearinstaller']['min'] = '1.4.1';
        }
 
        if ($cl = $this->_packagefile->getChangelog()) {
            foreach ($cl as $release) {
                $rel = array();
                $rel['version'] =
                    array(
                        'release' => $release['version'],
                        'api' => $release['version'],
                    );
                if (!isset($release['release_state'])) {
                    $release['release_state'] = 'stable';
                }
 
                $rel['stability'] =
                    array(
                        'release' => $release['release_state'],
                        'api' => $release['release_state'],
                    );
                if (isset($release['release_date'])) {
                    $rel['date'] = $release['release_date'];
                } else {
                    $rel['date'] = date('Y-m-d');
                }
 
                if (isset($release['release_license'])) {
                    if (isset($licensemap[strtolower($release['release_license'])])) {
                        $uri = $licensemap[strtolower($release['release_license'])];
                    } else {
                        $uri = 'http://www.example.com';
                    }
                    $rel['license'] = array(
                            'attribs' => array('uri' => $uri),
                            '_content' => $release['release_license']
                        );
                } else {
                    $rel['license'] = $arr['license'];
                }
 
                if (!isset($release['release_notes'])) {
                    $release['release_notes'] = 'no release notes';
                }
 
                $rel['notes'] = $release['release_notes'];
                $arr['changelog']['release'][] = $rel;
            }
        }
 
        $ret = new $class;
        $ret->setConfig($this->_packagefile->_config);
        if (isset($this->_packagefile->_logger) && is_object($this->_packagefile->_logger)) {
            $ret->setLogger($this->_packagefile->_logger);
        }
 
        $ret->fromArray($arr);
        return $ret;
    }
 
    /**
     * @param array
     * @param bool
     * @access private
     */
    function _convertDependencies2_0(&$release, $internal = false)
    {
        $peardep = array('pearinstaller' =>
            array('min' => '1.4.0b1')); // this is a lot safer
        $required = $optional = array();
        $release['dependencies'] = array('required' => array());
        if ($this->_packagefile->hasDeps()) {
            foreach ($this->_packagefile->getDeps() as $dep) {
                if (!isset($dep['optional']) || $dep['optional'] == 'no') {
                    $required[] = $dep;
                } else {
                    $optional[] = $dep;
                }
            }
            foreach (array('required', 'optional') as $arr) {
                $deps = array();
                foreach ($$arr as $dep) {
                    // organize deps by dependency type and name
                    if (!isset($deps[$dep['type']])) {
                        $deps[$dep['type']] = array();
                    }
                    if (isset($dep['name'])) {
                        $deps[$dep['type']][$dep['name']][] = $dep;
                    } else {
                        $deps[$dep['type']][] = $dep;
                    }
                }
                do {
                    if (isset($deps['php'])) {
                        $php = array();
                        if (count($deps['php']) > 1) {
                            $php = $this->_processPhpDeps($deps['php']);
                        } else {
                            if (!isset($deps['php'][0])) {
                                list($key, $blah) = each ($deps['php']); // stupid buggy versions
                                $deps['php'] = array($blah[0]);
                            }
                            $php = $this->_processDep($deps['php'][0]);
                            if (!$php) {
                                break; // poor mans throw
                            }
                        }
                        $release['dependencies'][$arr]['php'] = $php;
                    }
                } while (false);
                do {
                    if (isset($deps['pkg'])) {
                        $pkg = array();
                        $pkg = $this->_processMultipleDepsName($deps['pkg']);
                        if (!$pkg) {
                            break; // poor mans throw
                        }
                        $release['dependencies'][$arr]['package'] = $pkg;
                    }
                } while (false);
                do {
                    if (isset($deps['ext'])) {
                        $pkg = array();
                        $pkg = $this->_processMultipleDepsName($deps['ext']);
                        $release['dependencies'][$arr]['extension'] = $pkg;
                    }
                } while (false);
                // skip sapi - it's not supported so nobody will have used it
                // skip os - it's not supported in 1.0
            }
        }
        if (isset($release['dependencies']['required'])) {
            $release['dependencies']['required'] =
                array_merge($peardep, $release['dependencies']['required']);
        } else {
            $release['dependencies']['required'] = $peardep;
        }
        if (!isset($release['dependencies']['required']['php'])) {
            $release['dependencies']['required']['php'] =
                array('min' => '4.0.0');
        }
        $order = array();
        $bewm = $release['dependencies']['required'];
        $order['php'] = $bewm['php'];
        $order['pearinstaller'] = $bewm['pearinstaller'];
        isset($bewm['package']) ? $order['package'] = $bewm['package'] :0;
        isset($bewm['extension']) ? $order['extension'] = $bewm['extension'] :0;
        $release['dependencies']['required'] = $order;
    }
 
    /**
     * @param array
     * @access private
     */
    function _convertFilelist2_0(&$package)
    {
        $ret = array('dir' =>
                    array(
                        'attribs' => array('name' => '/'),
                        'file' => array()
                        )
                    );
        $package['platform'] =
        $package['install-as'] = array();
        $this->_isExtension = false;
        foreach ($this->_packagefile->getFilelist() as $name => $file) {
            $file['name'] = $name;
            if (isset($file['role']) && $file['role'] == 'src') {
                $this->_isExtension = true;
            }
            if (isset($file['replacements'])) {
                $repl = $file['replacements'];
                unset($file['replacements']);
            } else {
                unset($repl);
            }
            if (isset($file['install-as'])) {
                $package['install-as'][$name] = $file['install-as'];
                unset($file['install-as']);
            }
            if (isset($file['platform'])) {
                $package['platform'][$name] = $file['platform'];
                unset($file['platform']);
            }
            $file = array('attribs' => $file);
            if (isset($repl)) {
                foreach ($repl as $replace ) {
                    $file['tasks:replace'][] = array('attribs' => $replace);
                }
                if (count($repl) == 1) {
                    $file['tasks:replace'] = $file['tasks:replace'][0];
                }
            }
            $ret['dir']['file'][] = $file;
        }
        return $ret;
    }
 
    /**
     * Post-process special files with install-as/platform attributes and
     * make the release tag.
     *
     * This complex method follows this work-flow to create the release tags:
     *
     * <pre>
     * - if any install-as/platform exist, create a generic release and fill it with
     *   o <install as=..> tags for <file name=... install-as=...>
     *   o <install as=..> tags for <file name=... platform=!... install-as=..>
     *   o <ignore> tags for <file name=... platform=...>
     *   o <ignore> tags for <file name=... platform=... install-as=..>
     * - create a release for each platform encountered and fill with
     *   o <install as..> tags for <file name=... install-as=...>
     *   o <install as..> tags for <file name=... platform=this platform install-as=..>
     *   o <install as..> tags for <file name=... platform=!other platform install-as=..>
     *   o <ignore> tags for <file name=... platform=!this platform>
     *   o <ignore> tags for <file name=... platform=other platform>
     *   o <ignore> tags for <file name=... platform=other platform install-as=..>
     *   o <ignore> tags for <file name=... platform=!this platform install-as=..>
     * </pre>
     *
     * It does this by accessing the $package parameter, which contains an array with
     * indices:
     *
     *  - platform: mapping of file => OS the file should be installed on
     *  - install-as: mapping of file => installed name
     *  - osmap: mapping of OS => list of files that should be installed
     *    on that OS
     *  - notosmap: mapping of OS => list of files that should not be
     *    installed on that OS
     *
     * @param array
     * @param array
     * @access private
     */
    function _convertRelease2_0(&$release, $package)
    {
        //- if any install-as/platform exist, create a generic release and fill it with
        if (count($package['platform']) || count($package['install-as'])) {
            $generic = array();
            $genericIgnore = array();
            foreach ($package['install-as'] as $file => $as) {
                //o <install as=..> tags for <file name=... install-as=...>
                if (!isset($package['platform'][$file])) {
                    $generic[] = $file;
                    continue;
                }
                //o <install as=..> tags for <file name=... platform=!... install-as=..>
                if (isset($package['platform'][$file]) &&
                      $package['platform'][$file]{0} == '!') {
                    $generic[] = $file;
                    continue;
                }
                //o <ignore> tags for <file name=... platform=... install-as=..>
                if (isset($package['platform'][$file]) &&
                      $package['platform'][$file]{0} != '!') {
                    $genericIgnore[] = $file;
                    continue;
                }
            }
            foreach ($package['platform'] as $file => $platform) {
                if (isset($package['install-as'][$file])) {
                    continue;
                }
                if ($platform{0} != '!') {
                    //o <ignore> tags for <file name=... platform=...>
                    $genericIgnore[] = $file;
                }
            }
            if (count($package['platform'])) {
                $oses = $notplatform = $platform = array();
                foreach ($package['platform'] as $file => $os) {
                    // get a list of oses
                    if ($os{0} == '!') {
                        if (isset($oses[substr($os, 1)])) {
                            continue;
                        }
                        $oses[substr($os, 1)] = count($oses);
                    } else {
                        if (isset($oses[$os])) {
                            continue;
                        }
                        $oses[$os] = count($oses);
                    }
                }
                //- create a release for each platform encountered and fill with
                foreach ($oses as $os => $releaseNum) {
                    $release[$releaseNum]['installconditions']['os']['name'] = $os;
                    $release[$releaseNum]['filelist'] = array('install' => array(),
                        'ignore' => array());
                    foreach ($package['install-as'] as $file => $as) {
                        //o <install as=..> tags for <file name=... install-as=...>
                        if (!isset($package['platform'][$file])) {
                            $release[$releaseNum]['filelist']['install'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                        'as' => $as,
                                    ),
                                );
                            continue;
                        }
                        //o <install as..> tags for
                        //  <file name=... platform=this platform install-as=..>
                        if (isset($package['platform'][$file]) &&
                              $package['platform'][$file] == $os) {
                            $release[$releaseNum]['filelist']['install'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                        'as' => $as,
                                    ),
                                );
                            continue;
                        }
                        //o <install as..> tags for
                        //  <file name=... platform=!other platform install-as=..>
                        if (isset($package['platform'][$file]) &&
                              $package['platform'][$file] != "!$os" &&
                              $package['platform'][$file]{0} == '!') {
                            $release[$releaseNum]['filelist']['install'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                        'as' => $as,
                                    ),
                                );
                            continue;
                        }
                        //o <ignore> tags for
                        //  <file name=... platform=!this platform install-as=..>
                        if (isset($package['platform'][$file]) &&
                              $package['platform'][$file] == "!$os") {
                            $release[$releaseNum]['filelist']['ignore'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                    ),
                                );
                            continue;
                        }
                        //o <ignore> tags for
                        //  <file name=... platform=other platform install-as=..>
                        if (isset($package['platform'][$file]) &&
                              $package['platform'][$file]{0} != '!' &&
                              $package['platform'][$file] != $os) {
                            $release[$releaseNum]['filelist']['ignore'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                    ),
                                );
                            continue;
                        }
                    }
                    foreach ($package['platform'] as $file => $platform) {
                        if (isset($package['install-as'][$file])) {
                            continue;
                        }
                        //o <ignore> tags for <file name=... platform=!this platform>
                        if ($platform == "!$os") {
                            $release[$releaseNum]['filelist']['ignore'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                    ),
                                );
                            continue;
                        }
                        //o <ignore> tags for <file name=... platform=other platform>
                        if ($platform{0} != '!' && $platform != $os) {
                            $release[$releaseNum]['filelist']['ignore'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                    ),
                                );
                        }
                    }
                    if (!count($release[$releaseNum]['filelist']['install'])) {
                        unset($release[$releaseNum]['filelist']['install']);
                    }
                    if (!count($release[$releaseNum]['filelist']['ignore'])) {
                        unset($release[$releaseNum]['filelist']['ignore']);
                    }
                }
                if (count($generic) || count($genericIgnore)) {
                    $release[count($oses)] = array();
                    if (count($generic)) {
                        foreach ($generic as $file) {
                            if (isset($package['install-as'][$file])) {
                                $installas = $package['install-as'][$file];
                            } else {
                                $installas = $file;
                            }
                            $release[count($oses)]['filelist']['install'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                        'as' => $installas,
                                    )
                                );
                        }
                    }
                    if (count($genericIgnore)) {
                        foreach ($genericIgnore as $file) {
                            $release[count($oses)]['filelist']['ignore'][] =
                                array(
                                    'attribs' => array(
                                        'name' => $file,
                                    )
                                );
                        }
                    }
                }
                // cleanup
                foreach ($release as $i => $rel) {
                    if (isset($rel['filelist']['install']) &&
                          count($rel['filelist']['install']) == 1) {
                        $release[$i]['filelist']['install'] =
                            $release[$i]['filelist']['install'][0];
                    }
                    if (isset($rel['filelist']['ignore']) &&
                          count($rel['filelist']['ignore']) == 1) {
                        $release[$i]['filelist']['ignore'] =
                            $release[$i]['filelist']['ignore'][0];
                    }
                }
                if (count($release) == 1) {
                    $release = $release[0];
                }
            } else {
                // no platform atts, but some install-as atts
                foreach ($package['install-as'] as $file => $value) {
                    $release['filelist']['install'][] =
                        array(
                            'attribs' => array(
                                'name' => $file,
                                'as' => $value
                            )
                        );
                }
                if (count($release['filelist']['install']) == 1) {
                    $release['filelist']['install'] = $release['filelist']['install'][0];
                }
            }
        }
    }
 
    /**
     * @param array
     * @return array
     * @access private
     */
    function _processDep($dep)
    {
        if ($dep['type'] == 'php') {
            if ($dep['rel'] == 'has') {
                // come on - everyone has php!
                return false;
            }
        }
        $php = array();
        if ($dep['type'] != 'php') {
            $php['name'] = $dep['name'];
            if ($dep['type'] == 'pkg') {
                $php['channel'] = 'pear.php.net';
            }
        }
        switch ($dep['rel']) {
            case 'gt' :
                $php['min'] = $dep['version'];
                $php['exclude'] = $dep['version'];
            break;
            case 'ge' :
                if (!isset($dep['version'])) {
                    if ($dep['type'] == 'php') {
                        if (isset($dep['name'])) {
                            $dep['version'] = $dep['name'];
                        }
                    }
                }
                $php['min'] = $dep['version'];
            break;
            case 'lt' :
                $php['max'] = $dep['version'];
                $php['exclude'] = $dep['version'];
            break;
            case 'le' :
                $php['max'] = $dep['version'];
            break;
            case 'eq' :
                $php['min'] = $dep['version'];
                $php['max'] = $dep['version'];
            break;
            case 'ne' :
                $php['exclude'] = $dep['version'];
            break;
            case 'not' :
                $php['conflicts'] = 'yes';
            break;
        }
        return $php;
    }
 
    /**
     * @param array
     * @return array
     */
    function _processPhpDeps($deps)
    {
        $test = array();
        foreach ($deps as $dep) {
            $test[] = $this->_processDep($dep);
        }
        $min = array();
        $max = array();
        foreach ($test as $dep) {
            if (!$dep) {
                continue;
            }
            if (isset($dep['min'])) {
                $min[$dep['min']] = count($min);
            }
            if (isset($dep['max'])) {
                $max[$dep['max']] = count($max);
            }
        }
        if (count($min) > 0) {
            uksort($min, 'version_compare');
        }
        if (count($max) > 0) {
            uksort($max, 'version_compare');
        }
        if (count($min)) {
            // get the highest minimum
            $a = array_flip($min);
            $min = array_pop($a);
        } else {
            $min = false;
        }
        if (count($max)) {
            // get the lowest maximum
            $a = array_flip($max);
            $max = array_shift($a);
        } else {
            $max = false;
        }
        if ($min) {
            $php['min'] = $min;
        }
        if ($max) {
            $php['max'] = $max;
        }
        $exclude = array();
        foreach ($test as $dep) {
            if (!isset($dep['exclude'])) {
                continue;
            }
            $exclude[] = $dep['exclude'];
        }
        if (count($exclude)) {
            $php['exclude'] = $exclude;
        }
        return $php;
    }
 
    /**
     * process multiple dependencies that have a name, like package deps
     * @param array
     * @return array
     * @access private
     */
    function _processMultipleDepsName($deps)
    {
        $ret = $tests = array();
        foreach ($deps as $name => $dep) {
            foreach ($dep as $d) {
                $tests[$name][] = $this->_processDep($d);
            }
        }
 
        foreach ($tests as $name => $test) {
 
 
            $max = $min = $php = array();
            $php['name'] = $name;
            foreach ($test as $dep) {
                if (!$dep) {
                    continue;
                }
                if (isset($dep['channel'])) {
                    $php['channel'] = 'pear.php.net';
                }
                if (isset($dep['conflicts']) && $dep['conflicts'] == 'yes') {
                    $php['conflicts'] = 'yes';
                }
                if (isset($dep['min'])) {
                    $min[$dep['min']] = count($min);
                }
                if (isset($dep['max'])) {
                    $max[$dep['max']] = count($max);
                }
            }
            if (count($min) > 0) {
                uksort($min, 'version_compare');
            }
            if (count($max) > 0) {
                uksort($max, 'version_compare');
            }
            if (count($min)) {
                // get the highest minimum
                $a = array_flip($min);
                $min = array_pop($a);
            } else {
                $min = false;
            }
            if (count($max)) {
                // get the lowest maximum
                $a = array_flip($max);
                $max = array_shift($a);
            } else {
                $max = false;
            }
            if ($min) {
                $php['min'] = $min;
            }
            if ($max) {
                $php['max'] = $max;
            }
            $exclude = array();
            foreach ($test as $dep) {
                if (!isset($dep['exclude'])) {
                    continue;
                }
                $exclude[] = $dep['exclude'];
            }
            if (count($exclude)) {
                $php['exclude'] = $exclude;
            }
            $ret[] = $php;
        }
        return $ret;
    }
}
 
?>


Rev 94	Rev 187
1	`<?php`	1	`<?php`
2	`/**`	2	`/**`
3	`* package.xml generation class, package.xml version 1.0`	3	`* package.xml generation class, package.xml version 1.0`
4	`*`	4	`*`
5	`* PHP versions 4 and 5`	5	`* PHP versions 4 and 5`
6	`*`	6	`*`
7	`* LICENSE: This source file is subject to version 3.0 of the PHP license`	-
8	`* that is available through the world-wide-web at the following URI:`	-
9	`* http://www.php.net/license/3_0.txt. If you did not receive a copy of`	-
10	`* the PHP License and are unable to obtain it through the web, please`	-
11	`* send a note to license@php.net so we can mail you a copy immediately.`	-
12	`*`	-
13	`* @category pear`	7	`* @category pear`
14	`* @package PEAR`	8	`* @package PEAR`
15	`* @author Greg Beaver <cellog@php.net>`	9	`* @author Greg Beaver <cellog@php.net>`
16	`* @copyright 1997-2006 The PHP Group`	10	`* @copyright 1997-2009 The Authors`
17	`* @license http://www.php.net/license/3_0.txt PHP License 3.0`	11	`* @license http://opensource.org/licenses/bsd-license.php New BSD License`
18	`* @version CVS: $Id: v1.php,v 1.72 2006/05/10 02:56:19 cellog Exp $`	-
19	`* @link http://pear.php.net/package/PEAR`	12	`* @link http://pear.php.net/package/PEAR`
20	`* @since File available since Release 1.4.0a1`	13	`* @since File available since Release 1.4.0a1`
21	`*/`	14	`*/`
22	`/**`	15	`/**`
23	`* needed for PEAR_VALIDATE_* constants`	16	`* needed for PEAR_VALIDATE_* constants`
24	`*/`	17	`*/`
25	`require_once 'PEAR/Validate.php';`	18	`require_once 'PEAR/Validate.php';`
26	`require_once 'System.php';`	19	`require_once 'System.php';`
27	`require_once 'PEAR/PackageFile/v2.php';`	20	`require_once 'PEAR/PackageFile/v2.php';`
28	`/**`	21	`/**`
29	`* This class converts a PEAR_PackageFile_v1 object into any output format.`	22	`* This class converts a PEAR_PackageFile_v1 object into any output format.`
30	`*`	23	`*`
31	`* Supported output formats include array, XML string, and a PEAR_PackageFile_v2`	24	`* Supported output formats include array, XML string, and a PEAR_PackageFile_v2`
32	`* object, for converting package.xml 1.0 into package.xml 2.0 with no sweat.`	25	`* object, for converting package.xml 1.0 into package.xml 2.0 with no sweat.`
33	`* @category pear`	26	`* @category pear`
34	`* @package PEAR`	27	`* @package PEAR`
35	`* @author Greg Beaver <cellog@php.net>`	28	`* @author Greg Beaver <cellog@php.net>`
36	`* @copyright 1997-2006 The PHP Group`	29	`* @copyright 1997-2009 The Authors`
37	`* @license http://www.php.net/license/3_0.txt PHP License 3.0`	30	`* @license http://opensource.org/licenses/bsd-license.php New BSD License`
38	`* @version Release: 1.5.1`	31	`* @version Release: 1.10.1`
39	`* @link http://pear.php.net/package/PEAR`	32	`* @link http://pear.php.net/package/PEAR`
40	`* @since Class available since Release 1.4.0a1`	33	`* @since Class available since Release 1.4.0a1`
41	`*/`	34	`*/`
42	`class PEAR_PackageFile_Generator_v1`	35	`class PEAR_PackageFile_Generator_v1`
43	`{`	36	`{`
44	`/**`	37	`/**`
45	`* @var PEAR_PackageFile_v1`	38	`* @var PEAR_PackageFile_v1`
46	`*/`	39	`*/`
47	`var $_packagefile;`	40	`var $_packagefile;`
48	`function PEAR_PackageFile_Generator_v1(&$packagefile)`	41	`function __construct(&$packagefile)`
49	`{`	42	`{`
50	`$this->_packagefile = &$packagefile;`	43	`$this->_packagefile = &$packagefile;`
51	`}`	44	`}`
52		45
53	`function getPackagerVersion()`	46	`function getPackagerVersion()`
54	`{`	47	`{`
55	`return '1.5.1';`	48	`return '1.10.1';`
56	`}`	49	`}`
57		50
58	`/**`	51	`/**`
59	`* @param PEAR_Packager`	52	`* @param PEAR_Packager`
60	`* @param bool if true, a .tgz is written, otherwise a .tar is written`	53	`* @param bool if true, a .tgz is written, otherwise a .tar is written`
61	`* @param string\|null directory in which to save the .tgz`	54	`* @param string\|null directory in which to save the .tgz`
62	`* @return string\|PEAR_Error location of package or error object`	55	`* @return string\|PEAR_Error location of package or error object`
63	`*/`	56	`*/`
64	`function toTgz(&$packager, $compress = true, $where = null)`	57	`function toTgz(&$packager, $compress = true, $where = null)`
65	`{`	58	`{`
66	`require_once 'Archive/Tar.php';`	59	`require_once 'Archive/Tar.php';`
67	`if ($where === null) {`	60	`if ($where === null) {`
68	`if (!($where = System::mktemp(array('-d')))) {`	61	`if (!($where = System::mktemp(array('-d')))) {`
69	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: mktemp failed');`	62	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: mktemp failed');`
70	`}`	63	`}`
71	`} elseif (!@System::mkDir(array('-p', $where))) {`	64	`} elseif (!@System::mkDir(array('-p', $where))) {`
72	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: "' . $where . '" could' .`	65	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: "' . $where . '" could' .`
73	`' not be created');`	66	`' not be created');`
74	`}`	67	`}`
75	`if (file_exists($where . DIRECTORY_SEPARATOR . 'package.xml') &&`	68	`if (file_exists($where . DIRECTORY_SEPARATOR . 'package.xml') &&`
76	`!is_file($where . DIRECTORY_SEPARATOR . 'package.xml')) {`	69	`!is_file($where . DIRECTORY_SEPARATOR . 'package.xml')) {`
77	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: unable to save package.xml as' .`	70	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: unable to save package.xml as' .`
78	`' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"');`	71	`' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"');`
79	`}`	72	`}`
80	`if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) {`	73	`if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) {`
81	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: invalid package file');`	74	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: invalid package file');`
82	`}`	75	`}`
83	`$pkginfo = $this->_packagefile->getArray();`	76	`$pkginfo = $this->_packagefile->getArray();`
84	`$ext = $compress ? '.tgz' : '.tar';`	77	`$ext = $compress ? '.tgz' : '.tar';`
85	`$pkgver = $pkginfo['package'] . '-' . $pkginfo['version'];`	78	`$pkgver = $pkginfo['package'] . '-' . $pkginfo['version'];`
86	`$dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext;`	79	`$dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext;`
87	`if (file_exists(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext) &&`	80	`if (file_exists(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext) &&`
88	`!is_file(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext)) {`	81	`!is_file(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext)) {`
89	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: cannot create tgz file "' .`	82	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: cannot create tgz file "' .`
90	`getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext . '"');`	83	`getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext . '"');`
91	`}`	84	`}`
92	`if ($pkgfile = $this->_packagefile->getPackageFile()) {`	85	`if ($pkgfile = $this->_packagefile->getPackageFile()) {`
93	`$pkgdir = dirname(realpath($pkgfile));`	86	`$pkgdir = dirname(realpath($pkgfile));`
94	`$pkgfile = basename($pkgfile);`	87	`$pkgfile = basename($pkgfile);`
95	`} else {`	88	`} else {`
96	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: package file object must ' .`	89	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: package file object must ' .`
97	`'be created from a real file');`	90	`'be created from a real file');`
98	`}`	91	`}`
99	`// {{{ Create the package file list`	92	`// {{{ Create the package file list`
100	`$filelist = array();`	93	`$filelist = array();`
101	`$i = 0;`	94	`$i = 0;`
102		95
103	`foreach ($this->_packagefile->getFilelist() as $fname => $atts) {`	96	`foreach ($this->_packagefile->getFilelist() as $fname => $atts) {`
104	`$file = $pkgdir . DIRECTORY_SEPARATOR . $fname;`	97	`$file = $pkgdir . DIRECTORY_SEPARATOR . $fname;`
105	`if (!file_exists($file)) {`	98	`if (!file_exists($file)) {`
106	`return PEAR::raiseError("File does not exist: $fname");`	99	`return PEAR::raiseError("File does not exist: $fname");`
107	`} else {`	100	`} else {`
108	`$filelist[$i++] = $file;`	101	`$filelist[$i++] = $file;`
109	`if (!isset($atts['md5sum'])) {`	102	`if (!isset($atts['md5sum'])) {`
110	`$this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($file));`	103	`$this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($file));`
111	`}`	104	`}`
112	`$packager->log(2, "Adding file $fname");`	105	`$packager->log(2, "Adding file $fname");`
113	`}`	106	`}`
114	`}`	107	`}`
115	`// }}}`	108	`// }}}`
116	`$packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, 'package.xml', true);`	109	`$packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, 'package.xml', true);`
117	`if ($packagexml) {`	110	`if ($packagexml) {`
118	`$tar =& new Archive_Tar($dest_package, $compress);`	111	`$tar = new Archive_Tar($dest_package, $compress);`
119	`$tar->setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors`	112	`$tar->setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors`
120	`// ----- Creates with the package.xml file`	113	`// ----- Creates with the package.xml file`
121	`$ok = $tar->createModify(array($packagexml), '', $where);`	114	`$ok = $tar->createModify(array($packagexml), '', $where);`
122	`if (PEAR::isError($ok)) {`	115	`if (PEAR::isError($ok)) {`
123	`return $ok;`	116	`return $ok;`
124	`} elseif (!$ok) {`	117	`} elseif (!$ok) {`
125	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');`	118	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');`
126	`}`	119	`}`
127	`// ----- Add the content of the package`	120	`// ----- Add the content of the package`
128	`if (!$tar->addModify($filelist, $pkgver, $pkgdir)) {`	121	`if (!$tar->addModify($filelist, $pkgver, $pkgdir)) {`
129	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');`	122	`return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed');`
130	`}`	123	`}`
131	`return $dest_package;`	124	`return $dest_package;`
132	`}`	125	`}`
133	`}`	126	`}`
134		127
135	`/**`	128	`/**`
136	`* @param string\|null directory to place the package.xml in, or null for a temporary dir`	129	`* @param string\|null directory to place the package.xml in, or null for a temporary dir`
137	`* @param int one of the PEAR_VALIDATE_* constants`	130	`* @param int one of the PEAR_VALIDATE_* constants`
138	`* @param string name of the generated file`	131	`* @param string name of the generated file`
139	`* @param bool if true, then no analysis will be performed on role="php" files`	132	`* @param bool if true, then no analysis will be performed on role="php" files`
140	`* @return string\|PEAR_Error path to the created file on success`	133	`* @return string\|PEAR_Error path to the created file on success`
141	`*/`	134	`*/`
142	`function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml',`	135	`function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml',`
143	`$nofilechecking = false)`	136	`$nofilechecking = false)`
144	`{`	137	`{`
145	`if (!$this->_packagefile->validate($state, $nofilechecking)) {`	138	`if (!$this->_packagefile->validate($state, $nofilechecking)) {`
146	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: invalid package.xml',`	139	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: invalid package.xml',`
147	`null, null, null, $this->_packagefile->getValidationWarnings());`	140	`null, null, null, $this->_packagefile->getValidationWarnings());`
148	`}`	141	`}`
149	`if ($where === null) {`	142	`if ($where === null) {`
150	`if (!($where = System::mktemp(array('-d')))) {`	143	`if (!($where = System::mktemp(array('-d')))) {`
151	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: mktemp failed');`	144	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: mktemp failed');`
152	`}`	145	`}`
153	`} elseif (!@System::mkDir(array('-p', $where))) {`	146	`} elseif (!@System::mkDir(array('-p', $where))) {`
154	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: "' . $where . '" could' .`	147	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: "' . $where . '" could' .`
155	`' not be created');`	148	`' not be created');`
156	`}`	149	`}`
157	`$newpkgfile = $where . DIRECTORY_SEPARATOR . $name;`	150	`$newpkgfile = $where . DIRECTORY_SEPARATOR . $name;`
158	`$np = @fopen($newpkgfile, 'wb');`	151	`$np = @fopen($newpkgfile, 'wb');`
159	`if (!$np) {`	152	`if (!$np) {`
160	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: unable to save ' .`	153	`return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: unable to save ' .`
161	`"$name as $newpkgfile");`	154	`"$name as $newpkgfile");`
162	`}`	155	`}`
163	`fwrite($np, $this->toXml($state, true));`	156	`fwrite($np, $this->toXml($state, true));`
164	`fclose($np);`	157	`fclose($np);`
165	`return $newpkgfile;`	158	`return $newpkgfile;`
166	`}`	159	`}`
167		160
168	`/**`	161	`/**`
169	`* fix both XML encoding to be UTF8, and replace standard XML entities < > " & '`	162	`* fix both XML encoding to be UTF8, and replace standard XML entities < > " & '`
170	`*`	163	`*`
171	`* @param string $string`	164	`* @param string $string`
172	`* @return string`	165	`* @return string`
173	`* @access private`	166	`* @access private`
174	`*/`	167	`*/`
175	`function _fixXmlEncoding($string)`	168	`function _fixXmlEncoding($string)`
176	`{`	169	`{`
177	`if (version_compare(phpversion(), '5.0.0', 'lt')) {`	-
178	`$string = utf8_encode($string);`	-
179	`}`	-
180	`return strtr($string, array(`	170	`return strtr($string, array(`
181	`'&' => '&',`	171	`'&' => '&',`
182	`'>' => '>',`	172	`'>' => '>',`
183	`'<' => '<',`	173	`'<' => '<',`
184	`'"' => '"',`	174	`'"' => '"',`
185	`'\'' => ''' ));`	175	`'\'' => ''' ));`
186	`}`	176	`}`
187		177
188	`/**`	178	`/**`
189	`* Return an XML document based on the package info (as returned`	179	`* Return an XML document based on the package info (as returned`
190	`* by the PEAR_Common::infoFrom* methods).`	180	`* by the PEAR_Common::infoFrom* methods).`
191	`*`	181	`*`
192	`* @return string XML data`	182	`* @return string XML data`
193	`*/`	183	`*/`
194	`function toXml($state = PEAR_VALIDATE_NORMAL, $nofilevalidation = false)`	184	`function toXml($state = PEAR_VALIDATE_NORMAL, $nofilevalidation = false)`
195	`{`	185	`{`
196	`$this->_packagefile->setDate(date('Y-m-d'));`	186	`$this->_packagefile->setDate(date('Y-m-d'));`
197	`if (!$this->_packagefile->validate($state, $nofilevalidation)) {`	187	`if (!$this->_packagefile->validate($state, $nofilevalidation)) {`
198	`return false;`	188	`return false;`
199	`}`	189	`}`
200	`$pkginfo = $this->_packagefile->getArray();`	190	`$pkginfo = $this->_packagefile->getArray();`
201	`static $maint_map = array(`	191	`static $maint_map = array(`
202	`"handle" => "user",`	192	`"handle" => "user",`
203	`"name" => "name",`	193	`"name" => "name",`
204	`"email" => "email",`	194	`"email" => "email",`
205	`"role" => "role",`	195	`"role" => "role",`
206	`);`	196	`);`
207	`$ret = "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n";`	197	`$ret = "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n";`
208	`$ret .= "<!DOCTYPE package SYSTEM \"http://pear.php.net/dtd/package-1.0\">\n";`	198	`$ret .= "<!DOCTYPE package SYSTEM \"http://pear.php.net/dtd/package-1.0\">\n";`
209	`$ret .= "<package version=\"1.0\" packagerversion=\"1.5.1\">\n" .`	199	`$ret .= "<package version=\"1.0\" packagerversion=\"1.10.1\">\n" .`
210	`" <name>$pkginfo[package]</name>";`	200	`" <name>$pkginfo[package]</name>";`
211	`if (isset($pkginfo['extends'])) {`	201	`if (isset($pkginfo['extends'])) {`
212	`$ret .= "\n<extends>$pkginfo[extends]</extends>";`	202	`$ret .= "\n<extends>$pkginfo[extends]</extends>";`
213	`}`	203	`}`
214	`$ret .=`	204	`$ret .=`
215	`"\n <summary>".$this->_fixXmlEncoding($pkginfo['summary'])."</summary>\n" .`	205	`"\n <summary>".$this->_fixXmlEncoding($pkginfo['summary'])."</summary>\n" .`
216	`" <description>".trim($this->_fixXmlEncoding($pkginfo['description']))."\n </description>\n" .`	206	`" <description>".trim($this->_fixXmlEncoding($pkginfo['description']))."\n </description>\n" .`
217	`" <maintainers>\n";`	207	`" <maintainers>\n";`
218	`foreach ($pkginfo['maintainers'] as $maint) {`	208	`foreach ($pkginfo['maintainers'] as $maint) {`
219	`$ret .= " <maintainer>\n";`	209	`$ret .= " <maintainer>\n";`
220	`foreach ($maint_map as $idx => $elm) {`	210	`foreach ($maint_map as $idx => $elm) {`
221	`$ret .= " <$elm>";`	211	`$ret .= " <$elm>";`
222	`$ret .= $this->_fixXmlEncoding($maint[$idx]);`	212	`$ret .= $this->_fixXmlEncoding($maint[$idx]);`
223	`$ret .= "</$elm>\n";`	213	`$ret .= "</$elm>\n";`
224	`}`	214	`}`
225	`$ret .= " </maintainer>\n";`	215	`$ret .= " </maintainer>\n";`
226	`}`	216	`}`
227	`$ret .= " </maintainers>\n";`	217	`$ret .= " </maintainers>\n";`
228	`$ret .= $this->_makeReleaseXml($pkginfo, false, $state);`	218	`$ret .= $this->_makeReleaseXml($pkginfo, false, $state);`
229	`if (isset($pkginfo['changelog']) && count($pkginfo['changelog']) > 0) {`	219	`if (isset($pkginfo['changelog']) && count($pkginfo['changelog']) > 0) {`
230	`$ret .= " <changelog>\n";`	220	`$ret .= " <changelog>\n";`
231	`foreach ($pkginfo['changelog'] as $oldrelease) {`	221	`foreach ($pkginfo['changelog'] as $oldrelease) {`
232	`$ret .= $this->_makeReleaseXml($oldrelease, true);`	222	`$ret .= $this->_makeReleaseXml($oldrelease, true);`
233	`}`	223	`}`
234	`$ret .= " </changelog>\n";`	224	`$ret .= " </changelog>\n";`
235	`}`	225	`}`
236	`$ret .= "</package>\n";`	226	`$ret .= "</package>\n";`
237	`return $ret;`	227	`return $ret;`
238	`}`	228	`}`
239		229
240	`// }}}`	230	`// }}}`
241	`// {{{ _makeReleaseXml()`	231	`// {{{ _makeReleaseXml()`
242		232
243	`/**`	233	`/**`
244	`* Generate part of an XML description with release information.`	234	`* Generate part of an XML description with release information.`
245	`*`	235	`*`
246	`* @param array $pkginfo array with release information`	236	`* @param array $pkginfo array with release information`
247	`* @param bool $changelog whether the result will be in a changelog element`	237	`* @param bool $changelog whether the result will be in a changelog element`
248	`*`	238	`*`
249	`* @return string XML data`	239	`* @return string XML data`
250	`*`	240	`*`
251	`* @access private`	241	`* @access private`
252	`*/`	242	`*/`
253	`function _makeReleaseXml($pkginfo, $changelog = false, $state = PEAR_VALIDATE_NORMAL)`	243	`function _makeReleaseXml($pkginfo, $changelog = false, $state = PEAR_VALIDATE_NORMAL)`
254	`{`	244	`{`
255	`// XXX QUOTE ENTITIES IN PCDATA, OR EMBED IN CDATA BLOCKS!!`	245	`// XXX QUOTE ENTITIES IN PCDATA, OR EMBED IN CDATA BLOCKS!!`
256	`$indent = $changelog ? " " : "";`	246	`$indent = $changelog ? " " : "";`
257	`$ret = "$indent <release>\n";`	247	`$ret = "$indent <release>\n";`
258	`if (!empty($pkginfo['version'])) {`	248	`if (!empty($pkginfo['version'])) {`
259	`$ret .= "$indent <version>$pkginfo[version]</version>\n";`	249	`$ret .= "$indent <version>$pkginfo[version]</version>\n";`
260	`}`	250	`}`
261	`if (!empty($pkginfo['release_date'])) {`	251	`if (!empty($pkginfo['release_date'])) {`
262	`$ret .= "$indent <date>$pkginfo[release_date]</date>\n";`	252	`$ret .= "$indent <date>$pkginfo[release_date]</date>\n";`
263	`}`	253	`}`
264	`if (!empty($pkginfo['release_license'])) {`	254	`if (!empty($pkginfo['release_license'])) {`
265	`$ret .= "$indent <license>$pkginfo[release_license]</license>\n";`	255	`$ret .= "$indent <license>$pkginfo[release_license]</license>\n";`
266	`}`	256	`}`
267	`if (!empty($pkginfo['release_state'])) {`	257	`if (!empty($pkginfo['release_state'])) {`
268	`$ret .= "$indent <state>$pkginfo[release_state]</state>\n";`	258	`$ret .= "$indent <state>$pkginfo[release_state]</state>\n";`
269	`}`	259	`}`
270	`if (!empty($pkginfo['release_notes'])) {`	260	`if (!empty($pkginfo['release_notes'])) {`
271	`$ret .= "$indent <notes>".trim($this->_fixXmlEncoding($pkginfo['release_notes']))`	261	`$ret .= "$indent <notes>".trim($this->_fixXmlEncoding($pkginfo['release_notes']))`
272	`."\n$indent </notes>\n";`	262	`."\n$indent </notes>\n";`
273	`}`	263	`}`
274	`if (!empty($pkginfo['release_warnings'])) {`	264	`if (!empty($pkginfo['release_warnings'])) {`
275	`$ret .= "$indent <warnings>".$this->_fixXmlEncoding($pkginfo['release_warnings'])."</warnings>\n";`	265	`$ret .= "$indent <warnings>".$this->_fixXmlEncoding($pkginfo['release_warnings'])."</warnings>\n";`
276	`}`	266	`}`
277	`if (isset($pkginfo['release_deps']) && sizeof($pkginfo['release_deps']) > 0) {`	267	`if (isset($pkginfo['release_deps']) && sizeof($pkginfo['release_deps']) > 0) {`
278	`$ret .= "$indent <deps>\n";`	268	`$ret .= "$indent <deps>\n";`
279	`foreach ($pkginfo['release_deps'] as $dep) {`	269	`foreach ($pkginfo['release_deps'] as $dep) {`
280	`$ret .= "$indent <dep type=\"$dep[type]\" rel=\"$dep[rel]\"";`	270	`$ret .= "$indent <dep type=\"$dep[type]\" rel=\"$dep[rel]\"";`
281	`if (isset($dep['version'])) {`	271	`if (isset($dep['version'])) {`
282	`$ret .= " version=\"$dep[version]\"";`	272	`$ret .= " version=\"$dep[version]\"";`
283	`}`	273	`}`
284	`if (isset($dep['optional'])) {`	274	`if (isset($dep['optional'])) {`
285	`$ret .= " optional=\"$dep[optional]\"";`	275	`$ret .= " optional=\"$dep[optional]\"";`
286	`}`	276	`}`
287	`if (isset($dep['name'])) {`	277	`if (isset($dep['name'])) {`
288	`$ret .= ">$dep[name]</dep>\n";`	278	`$ret .= ">$dep[name]</dep>\n";`
289	`} else {`	279	`} else {`
290	`$ret .= "/>\n";`	280	`$ret .= "/>\n";`
291	`}`	281	`}`
292	`}`	282	`}`
293	`$ret .= "$indent </deps>\n";`	283	`$ret .= "$indent </deps>\n";`
294	`}`	284	`}`
295	`if (isset($pkginfo['configure_options'])) {`	285	`if (isset($pkginfo['configure_options'])) {`
296	`$ret .= "$indent <configureoptions>\n";`	286	`$ret .= "$indent <configureoptions>\n";`
297	`foreach ($pkginfo['configure_options'] as $c) {`	287	`foreach ($pkginfo['configure_options'] as $c) {`
298	`$ret .= "$indent <configureoption name=\"".`	288	`$ret .= "$indent <configureoption name=\"".`
299	`$this->_fixXmlEncoding($c['name']) . "\"";`	289	`$this->_fixXmlEncoding($c['name']) . "\"";`
300	`if (isset($c['default'])) {`	290	`if (isset($c['default'])) {`
301	`$ret .= " default=\"" . $this->_fixXmlEncoding($c['default']) . "\"";`	291	`$ret .= " default=\"" . $this->_fixXmlEncoding($c['default']) . "\"";`
302	`}`	292	`}`
303	`$ret .= " prompt=\"" . $this->_fixXmlEncoding($c['prompt']) . "\"";`	293	`$ret .= " prompt=\"" . $this->_fixXmlEncoding($c['prompt']) . "\"";`
304	`$ret .= "/>\n";`	294	`$ret .= "/>\n";`
305	`}`	295	`}`
306	`$ret .= "$indent </configureoptions>\n";`	296	`$ret .= "$indent </configureoptions>\n";`
307	`}`	297	`}`
308	`if (isset($pkginfo['provides'])) {`	298	`if (isset($pkginfo['provides'])) {`
309	`foreach ($pkginfo['provides'] as $key => $what) {`	299	`foreach ($pkginfo['provides'] as $key => $what) {`
310	`$ret .= "$indent <provides type=\"$what[type]\" ";`	300	`$ret .= "$indent <provides type=\"$what[type]\" ";`
311	`$ret .= "name=\"$what[name]\" ";`	301	`$ret .= "name=\"$what[name]\" ";`
312	`if (isset($what['extends'])) {`	302	`if (isset($what['extends'])) {`
313	`$ret .= "extends=\"$what[extends]\" ";`	303	`$ret .= "extends=\"$what[extends]\" ";`
314	`}`	304	`}`
315	`$ret .= "/>\n";`	305	`$ret .= "/>\n";`
316	`}`	306	`}`
317	`}`	307	`}`
318	`if (isset($pkginfo['filelist'])) {`	308	`if (isset($pkginfo['filelist'])) {`
319	`$ret .= "$indent <filelist>\n";`	309	`$ret .= "$indent <filelist>\n";`
320	`if ($state ^ PEAR_VALIDATE_PACKAGING) {`	310	`if ($state ^ PEAR_VALIDATE_PACKAGING) {`
321	`$ret .= $this->recursiveXmlFilelist($pkginfo['filelist']);`	311	`$ret .= $this->recursiveXmlFilelist($pkginfo['filelist']);`
322	`} else {`	312	`} else {`
323	`foreach ($pkginfo['filelist'] as $file => $fa) {`	313	`foreach ($pkginfo['filelist'] as $file => $fa) {`
324	`if (!isset($fa['role'])) {`	314	`if (!isset($fa['role'])) {`
325	`$fa['role'] = '';`	315	`$fa['role'] = '';`
326	`}`	316	`}`
327	`$ret .= "$indent <file role=\"$fa[role]\"";`	317	`$ret .= "$indent <file role=\"$fa[role]\"";`
328	`if (isset($fa['baseinstalldir'])) {`	318	`if (isset($fa['baseinstalldir'])) {`
329	`$ret .= ' baseinstalldir="' .`	319	`$ret .= ' baseinstalldir="' .`
330	`$this->_fixXmlEncoding($fa['baseinstalldir']) . '"';`	320	`$this->_fixXmlEncoding($fa['baseinstalldir']) . '"';`
331	`}`	321	`}`
332	`if (isset($fa['md5sum'])) {`	322	`if (isset($fa['md5sum'])) {`
333	`$ret .= " md5sum=\"$fa[md5sum]\"";`	323	`$ret .= " md5sum=\"$fa[md5sum]\"";`
334	`}`	324	`}`
335	`if (isset($fa['platform'])) {`	325	`if (isset($fa['platform'])) {`
336	`$ret .= " platform=\"$fa[platform]\"";`	326	`$ret .= " platform=\"$fa[platform]\"";`
337	`}`	327	`}`
338	`if (!empty($fa['install-as'])) {`	328	`if (!empty($fa['install-as'])) {`
339	`$ret .= ' install-as="' .`	329	`$ret .= ' install-as="' .`
340	`$this->_fixXmlEncoding($fa['install-as']) . '"';`	330	`$this->_fixXmlEncoding($fa['install-as']) . '"';`
341	`}`	331	`}`
342	`$ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';`	332	`$ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';`
343	`if (empty($fa['replacements'])) {`	333	`if (empty($fa['replacements'])) {`
344	`$ret .= "/>\n";`	334	`$ret .= "/>\n";`
345	`} else {`	335	`} else {`
346	`$ret .= ">\n";`	336	`$ret .= ">\n";`
347	`foreach ($fa['replacements'] as $r) {`	337	`foreach ($fa['replacements'] as $r) {`
348	`$ret .= "$indent <replace";`	338	`$ret .= "$indent <replace";`
349	`foreach ($r as $k => $v) {`	339	`foreach ($r as $k => $v) {`
350	`$ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';`	340	`$ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';`
351	`}`	341	`}`
352	`$ret .= "/>\n";`	342	`$ret .= "/>\n";`
353	`}`	343	`}`
354	`$ret .= "$indent </file>\n";`	344	`$ret .= "$indent </file>\n";`
355	`}`	345	`}`
356	`}`	346	`}`
357	`}`	347	`}`
358	`$ret .= "$indent </filelist>\n";`	348	`$ret .= "$indent </filelist>\n";`
359	`}`	349	`}`
360	`$ret .= "$indent </release>\n";`	350	`$ret .= "$indent </release>\n";`
361	`return $ret;`	351	`return $ret;`
362	`}`	352	`}`
363		353
364	`/**`	354	`/**`
365	`* @param array`	355	`* @param array`
366	`* @access protected`	356	`* @access protected`
367	`*/`	357	`*/`
368	`function recursiveXmlFilelist($list)`	358	`function recursiveXmlFilelist($list)`
369	`{`	359	`{`
370	`$this->_dirs = array();`	360	`$this->_dirs = array();`
371	`foreach ($list as $file => $attributes) {`	361	`foreach ($list as $file => $attributes) {`
372	`$this->_addDir($this->_dirs, explode('/', dirname($file)), $file, $attributes);`	362	`$this->_addDir($this->_dirs, explode('/', dirname($file)), $file, $attributes);`
373	`}`	363	`}`
374	`return $this->_formatDir($this->_dirs);`	364	`return $this->_formatDir($this->_dirs);`
375	`}`	365	`}`
376		366
377	`/**`	367	`/**`
378	`* @param array`	368	`* @param array`
379	`* @param array`	369	`* @param array`
380	`* @param string\|null`	370	`* @param string\|null`
381	`* @param array\|null`	371	`* @param array\|null`
382	`* @access private`	372	`* @access private`
383	`*/`	373	`*/`
384	`function _addDir(&$dirs, $dir, $file = null, $attributes = null)`	374	`function _addDir(&$dirs, $dir, $file = null, $attributes = null)`
385	`{`	375	`{`
386	`if ($dir == array() \|\| $dir == array('.')) {`	376	`if ($dir == array() \|\| $dir == array('.')) {`
387	`$dirs['files'][basename($file)] = $attributes;`	377	`$dirs['files'][basename($file)] = $attributes;`
388	`return;`	378	`return;`
389	`}`	379	`}`
390	`$curdir = array_shift($dir);`	380	`$curdir = array_shift($dir);`
391	`if (!isset($dirs['dirs'][$curdir])) {`	381	`if (!isset($dirs['dirs'][$curdir])) {`
392	`$dirs['dirs'][$curdir] = array();`	382	`$dirs['dirs'][$curdir] = array();`
393	`}`	383	`}`
394	`$this->_addDir($dirs['dirs'][$curdir], $dir, $file, $attributes);`	384	`$this->_addDir($dirs['dirs'][$curdir], $dir, $file, $attributes);`
395	`}`	385	`}`
396		386
397	`/**`	387	`/**`
398	`* @param array`	388	`* @param array`
399	`* @param string`	389	`* @param string`
400	`* @param string`	390	`* @param string`
401	`* @access private`	391	`* @access private`
402	`*/`	392	`*/`
403	`function _formatDir($dirs, $indent = '', $curdir = '')`	393	`function _formatDir($dirs, $indent = '', $curdir = '')`
404	`{`	394	`{`
405	`$ret = '';`	395	`$ret = '';`
406	`if (!count($dirs)) {`	396	`if (!count($dirs)) {`
407	`return '';`	397	`return '';`
408	`}`	398	`}`
409	`if (isset($dirs['dirs'])) {`	399	`if (isset($dirs['dirs'])) {`
410	`uksort($dirs['dirs'], 'strnatcasecmp');`	400	`uksort($dirs['dirs'], 'strnatcasecmp');`
411	`foreach ($dirs['dirs'] as $dir => $contents) {`	401	`foreach ($dirs['dirs'] as $dir => $contents) {`
412	`$usedir = "$curdir/$dir";`	402	`$usedir = "$curdir/$dir";`
413	`$ret .= "$indent <dir name=\"$dir\">\n";`	403	`$ret .= "$indent <dir name=\"$dir\">\n";`
414	`$ret .= $this->_formatDir($contents, "$indent ", $usedir);`	404	`$ret .= $this->_formatDir($contents, "$indent ", $usedir);`
415	`$ret .= "$indent </dir> <!-- $usedir -->\n";`	405	`$ret .= "$indent </dir> <!-- $usedir -->\n";`
416	`}`	406	`}`
417	`}`	407	`}`
418	`if (isset($dirs['files'])) {`	408	`if (isset($dirs['files'])) {`
419	`uksort($dirs['files'], 'strnatcasecmp');`	409	`uksort($dirs['files'], 'strnatcasecmp');`
420	`foreach ($dirs['files'] as $file => $attribs) {`	410	`foreach ($dirs['files'] as $file => $attribs) {`
421	`$ret .= $this->_formatFile($file, $attribs, $indent);`	411	`$ret .= $this->_formatFile($file, $attribs, $indent);`
422	`}`	412	`}`
423	`}`	413	`}`
424	`return $ret;`	414	`return $ret;`
425	`}`	415	`}`
426		416
427	`/**`	417	`/**`
428	`* @param string`	418	`* @param string`
429	`* @param array`	419	`* @param array`
430	`* @param string`	420	`* @param string`
431	`* @access private`	421	`* @access private`
432	`*/`	422	`*/`
433	`function _formatFile($file, $attributes, $indent)`	423	`function _formatFile($file, $attributes, $indent)`
434	`{`	424	`{`
435	`$ret = "$indent <file role=\"$attributes[role]\"";`	425	`$ret = "$indent <file role=\"$attributes[role]\"";`
436	`if (isset($attributes['baseinstalldir'])) {`	426	`if (isset($attributes['baseinstalldir'])) {`
437	`$ret .= ' baseinstalldir="' .`	427	`$ret .= ' baseinstalldir="' .`
438	`$this->_fixXmlEncoding($attributes['baseinstalldir']) . '"';`	428	`$this->_fixXmlEncoding($attributes['baseinstalldir']) . '"';`
439	`}`	429	`}`
440	`if (isset($attributes['md5sum'])) {`	430	`if (isset($attributes['md5sum'])) {`
441	`$ret .= " md5sum=\"$attributes[md5sum]\"";`	431	`$ret .= " md5sum=\"$attributes[md5sum]\"";`
442	`}`	432	`}`
443	`if (isset($attributes['platform'])) {`	433	`if (isset($attributes['platform'])) {`
444	`$ret .= " platform=\"$attributes[platform]\"";`	434	`$ret .= " platform=\"$attributes[platform]\"";`
445	`}`	435	`}`
446	`if (!empty($attributes['install-as'])) {`	436	`if (!empty($attributes['install-as'])) {`
447	`$ret .= ' install-as="' .`	437	`$ret .= ' install-as="' .`
448	`$this->_fixXmlEncoding($attributes['install-as']) . '"';`	438	`$this->_fixXmlEncoding($attributes['install-as']) . '"';`
449	`}`	439	`}`
450	`$ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';`	440	`$ret .= ' name="' . $this->_fixXmlEncoding($file) . '"';`
451	`if (empty($attributes['replacements'])) {`	441	`if (empty($attributes['replacements'])) {`
452	`$ret .= "/>\n";`	442	`$ret .= "/>\n";`
453	`} else {`	443	`} else {`
454	`$ret .= ">\n";`	444	`$ret .= ">\n";`
455	`foreach ($attributes['replacements'] as $r) {`	445	`foreach ($attributes['replacements'] as $r) {`
456	`$ret .= "$indent <replace";`	446	`$ret .= "$indent <replace";`
457	`foreach ($r as $k => $v) {`	447	`foreach ($r as $k => $v) {`
458	`$ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';`	448	`$ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"';`
459	`}`	449	`}`
460	`$ret .= "/>\n";`	450	`$ret .= "/>\n";`
461	`}`	451	`}`
462	`$ret .= "$indent </file>\n";`	452	`$ret .= "$indent </file>\n";`
463	`}`	453	`}`
464	`return $ret;`	454	`return $ret;`
465	`}`	455	`}`
466		456
467	`// {{{ _unIndent()`	457	`// {{{ _unIndent()`
468		458
469	`/**`	459	`/**`
470	`* Unindent given string (?)`	460	`* Unindent given string (?)`
471	`*`	461	`*`
472	`* @param string $str The string that has to be unindented.`	462	`* @param string $str The string that has to be unindented.`
473	`* @return string`	463	`* @return string`
474	`* @access private`	464	`* @access private`
475	`*/`	465	`*/`
476	`function _unIndent($str)`	466	`function _unIndent($str)`
477	`{`	467	`{`
478	`// remove leading newlines`	468	`// remove leading newlines`
479	`$str = preg_replace('/^[\r\n]+/', '', $str);`	469	`$str = preg_replace('/^[\r\n]+/', '', $str);`
480	`// find whitespace at the beginning of the first line`	470	`// find whitespace at the beginning of the first line`
481	`$indent_len = strspn($str, " \t");`	471	`$indent_len = strspn($str, " \t");`
482	`$indent = substr($str, 0, $indent_len);`	472	`$indent = substr($str, 0, $indent_len);`
483	`$data = '';`	473	`$data = '';`
484	`// remove the same amount of whitespace from following lines`	474	`// remove the same amount of whitespace from following lines`
485	`foreach (explode("\n", $str) as $line) {`	475	`foreach (explode("\n", $str) as $line) {`
486	`if (substr($line, 0, $indent_len) == $indent) {`	476	`if (substr($line, 0, $indent_len) == $indent) {`
487	`$data .= substr($line, $indent_len) . "\n";`	477	`$data .= substr($line, $indent_len) . "\n";`
488	`}`	478	`}`
489	`}`	479	`}`
490	`return $data;`	480	`return $data;`
491	`}`	481	`}`
492		482
493	`/**`	483	`/**`
494	`* @return array`	484	`* @return array`
495	`*/`	485	`*/`
496	`function dependenciesToV2()`	486	`function dependenciesToV2()`
497	`{`	487	`{`
498	`$arr = array();`	488	`$arr = array();`
499	`$this->_convertDependencies2_0($arr);`	489	`$this->_convertDependencies2_0($arr);`
500	`return $arr['dependencies'];`	490	`return $arr['dependencies'];`

Subversion Repositories Applications.gtt

(root)/trunk/bibliotheque/pear/PEAR/PackageFile/Generator/v1.php – Rev 94 → 187